Crypter une chaine de caractères en shell

Version imprimable

Voir 40 message(s) de cette discussion en une page

@hizoka: oui c'est passwd (j'ai loupé mon copier/coller ...)

sinon, un exemple en perl:

Code:

1
2
3
$ echo -e "titi toto\ninsert into table1 ( id, nom, prenom ) values ( 1, 'toto', 'tata' );" | perl -F'\(' -ane 'if ($_ =~ /table1/) { @b=split /\x27/ , @F[2]; $b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$AZERTY"))[3],0,14)."\x27";$b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$AZERTY"))[3],0,14)."\x27";$_=join("",$F[0]."(".$F[1]."(",@b) ;} print'
titi toto
insert into table1 ( id, nom, prenom ) values ( 1, '2LYnjdDbzDiIoy', 'p29gFqKXgcfuyj' );

Reste plus qu'à écrire le if pour table2

En plus lisible:

Code:

1
2
3
4
5
6
7
8
9
10
$ echo -e "titi toto\ninsert into table1 ( id, nom, prenom ) values ( 1, 'toto', 'tata' );" | perl -F'\(' -ane '
if ($_ =~ /table1/) { 
@b=split /\x27/ , @F[2]; 
$b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$AZERTY"))[3],0,14)."\x27";
$_=join("",$F[0]."(".$F[1]."(",@b);
} 
print'
titi toto
insert into table1 ( id, nom, prenom ) values ( 1, '2LYnjdDbzDiIoy', 'p29gFqKXgcfuyj' );

13/11/2020, 09h41
steph44470

bonjour à vous tous,
finalement , l'utilisateur qui nous donnera la fichier d'export ne veut pas que l'on touche à sa base de donnée.
Donc, il faut modifier le fichier d'export.
Je vais travailler sur la lecture du fichier ligne par ligne et recréer un fichier avec les données anonymisées.

bonjour,
suite à différentes lectures , j'arrive bien à refaire mon fichier mais je bloque sur un retour chariot :
mon fichier de départ :

Citation:

test
insert into table1 ( id, nom, prenom ) values ( 1, 'nom1', 'prenom1');
insert into table1 ( id, nom, prenom ) values ( 1, 'nom2', 'prenom2');
insert into table1 ( id, nom, prenom ) values ( 1, 'nom3', 'prenom3');
insert into table1 ( id, nom, prenom ) values ( 1, 'nom4', 'prenom4');
test2
insert into table2 ( id, nom, prenom, adresse ) values ( 1, 'nom1', 'prenom1', 'adresse1');
insert into table2 ( id, nom, prenom, adresse ) values ( 1, 'nom2', 'prenom2', 'adresse1');
insert into table2 ( id, nom, prenom, adresse ) values ( 1, 'nom3', 'prenom3', 'adresse1');
insert into table2 ( id, nom, prenom, adresse ) values ( 1, 'nom4', 'prenom4', 'adresse1');

mon essai de l'exécutable :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 clear awk ' BEGIN { FS="(" } ( $1 !~ /table/ ) { print $0; } ( $1 ~ /table1/ ) { split($3,b,"\x27"); print $1,"(",$2, "(",b[1],"\x27" command="echo "b[2]"|md5sum" ;command | getline b[2]; close(command); print b[2]; } ( $1 ~ /table2/ ) { split($3,b,"\x27"); print b[2],b[4],b[6]; command="echo "b[2]"|md5sum" ;command | getline b[2]; close(command); print b[2] ; } END { print "fin" } ' test.sql > test_1.sql ################################
mon fichier résultat :

Citation:

test
insert into table1 ( id, nom, prenom ) values ( 1, '
fe2850b21684dc60d37cbfd8171ab477 -
insert into table1 ( id, nom, prenom ) values ( 1, '
af417f05e99ff1b2266358bd608ecf6d -
insert into table1 ( id, nom, prenom ) values ( 1, '
4e56f5f82634539a29792e721b42df3e -
insert into table1 ( id, nom, prenom ) values ( 1, '
2d1b096f54ef3b1a11aaad15beed1fa3 -
test2
nom1 prenom1 adresse1
fe2850b21684dc60d37cbfd8171ab477 -
nom2 prenom2 adresse1
af417f05e99ff1b2266358bd608ecf6d -
nom3 prenom3 adresse1
4e56f5f82634539a29792e721b42df3e -
nom4 prenom4 adresse1
2d1b096f54ef3b1a11aaad15beed1fa3 -
fin

pourriez-vous m'aider à retirer le retour chariot au niveau des lignes de la table1 ?

Si vous savez optimiser le code , n'hésitez pas.

je ne maitrise pas trop awk.

stephane

13/11/2020, 13h37
disedorgue

Perso, je t'ai donné une solution en perl qui fait tout le boulot pour table1, il reste juste à rajoute un autre bloc if pour la table2 et avant le print.

Sinon, celui-ci en l'état, ne modifie que les lignes avec table1 et reconduit le autres lignes sans y toucher.

Et selon moi, il sera plus rapide que ton awk qui lance autant de fois un process md5sum qu'il y a de modification à faire.
13/11/2020, 14h35
Flodelarab

"print" fait un retour à la ligne. Pas "printf".

Code:

printf("%s ( %s ( %s \x27",$1,$2,b[1])

Bonjour disedorgue ,
le code devient donc :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
$ echo -e "titi toto\ninsert into table1 ( id, nom, prenom ) values ( 1, 'toto', 'tata' );" | perl -F'\(' -ane '
if ($_ =~ /table1/) { 
@b=split /\x27/ , @F[2]; 
$b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$AZERTY"))[3],0,14)."\x27";
$_=join("",$F[0]."(".$F[1]."(",@b);
} 
if ($_ =~ /table2/) { 
@b=split /\x27/ , @F[2]; 
$b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[5]="\x27".substr((split /\$/,crypt($b[5],"\$5\$AZERTY"))[3],0,14)."\x27";
$_=join("",$F[0]."(".$F[1]."(",@b);
} 
print > resultat.txt'

La sortie est bien

Code:

print > resultat.txt

Par contre comment indiqué le fichier départ et que toutes les lignes soient bien lues.

Voici un exemple:
Le fichier source:

Code:

1
2
3
4
5
6
7
$ cat fic1.txt
ICI Une ligne quelconque
insert into table2 ( id, nom, prenom ) values ( 1, 'toto', 'tata' ,'tutu' );
autre ligne quelconque
insert into table1 ( id, nom, prenom ) values ( 1, 'toto', 'tata' );"
encore une
et une autre

La commande:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
$ perl -F'\(' -ane '
if ($_ =~ /table1/) {
@b=split /\x27/ , @F[2];
$b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$AZERTY"))[3],0,14)."\x27";
$_=join("",$F[0]."(".$F[1]."(",@b);
}
if ($_ =~ /table2/) {
@b=split /\x27/ , @F[2];
$b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$AZERTY"))[3],0,14)."\x27";
$b[5]="\x27".substr((split /\$/,crypt($b[5],"\$5\$AZERTY"))[3],0,14)."\x27";
$_=join("",$F[0]."(".$F[1]."(",@b);
}
print' fic1.txt >resultat.txt

Le fichier resultat:

Code:

1
2
3
4
5
6
7
$ cat resultat.txt
ICI Une ligne quelconque
insert into table2 ( id, nom, prenom ) values ( 1, '2LYnjdDbzDiIoy', 'p29gFqKXgcfuyj' ,'xTlILtmiNl7ZuG' );
autre ligne quelconque
insert into table1 ( id, nom, prenom ) values ( 1, '2LYnjdDbzDiIoy', 'p29gFqKXgcfuyj' );"
encore une
et une autre

Après, ne pas oublier de changer la clé de hash (AZERTY ici).
Et un petit détail, dans le hash, on peut avoir des '.' ou des '/' qu'il faudra peut-être retirer s'ils ne sont pas accepté par la bdd.

13/11/2020, 16h20
steph44470

Merci beaucoup , cela fonctionne parfaitement.
Il me reste à faire les ajustement .
13/11/2020, 17h35
steph44470

Question complémentaire si a la place de azerty, on souhaite le numéro du jours
Comment faire ?
13/11/2020, 17h42
disedorgue

Comprend pas la question, suffit juste de mettre la chaine que l'on veut à la place, par exemple
Au lieu de:

Code:

crypt($b[1],"\$5\$AZERTY"))

on met:

Code:

crypt($b[1],"\$5\$20201113"))
13/11/2020, 18h17
steph44470

oui, j'avais fais des tests, mais en fait je voudrais que cela soit dynamique .
exemple :

Code:

crypt($b[1],"\$5\donnéesChoisiParLutilisateur"))

j'execute le ksh suivant :

Code:

./anonymisation lundi

le traitement :

Code:

crypt($b[1],"\$5\$lundi"))

Travaillant quasiment sur sql, je ne connais pas bien le shell.
Je te remercie énormément pour ton aide.

Ok, dans ce cas, on peut comme suit:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 perl -F'\(' -ane ' BEGIN{$XX=shift;} if ($_ =~ /table1/) { @b=split /\x27/ , @F[2]; $b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$$XX"))[3],0,14)."\x27"; $b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$$XX"))[3],0,14)."\x27"; $_=join("",$F[0]."(".$F[1]."(",@b); } if ($_ =~ /table2/) { @b=split /\x27/ , @F[2]; $b[1]="\x27".substr((split /\$/,crypt($b[1],"\$5\$$XX"))[3],0,14)."\x27"; $b[3]="\x27".substr((split /\$/,crypt($b[3],"\$5\$$XX"))[3],0,14)."\x27"; $b[5]="\x27".substr((split /\$/,crypt($b[5],"\$5\$$XX"))[3],0,14)."\x27"; $_=join("",$F[0]."(".$F[1]."(",@b); } print' AZERTY fic1.txt >resultat.txt
ici, le script prendra AZERTY comme clé de hash, mais si tu remplaces le mot AZERTY par (dans ton cas) "$1" (on garde les guillemets) , ça devrait le faire, puisqu'en shell le $1 représente le premier argument qui dans ton exemple est lundi.

Voir 40 message(s) de cette discussion en une page