Discussion :

[Nicoclem]

Bonjour,

J'utilise le composant TDCP_Blowfish de Delphi pour crypter un mot de passe.
Seulement voila, je rencontre un problème lorsque j'essaye de crypter une deuxième fois le même mot de passe avec la même clé de cryptage : les deux chaines cryptées sont différentes.

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
mdp := 'alain';
 
DCP_blowfish1.Init('ma_cle_de_connexion',64,nil); //Initialisation cypher
Password := DCP_blowfish1.EncryptString(mdp); //Cryptage
ShowMessage(Password); //Chaîne affichée : YXmPXng=
 
//Deuxième cryptage avec la même variable
DCP_blowfish1.Init('ma_cle_de_connexion',64,nil);          
Password := DCP_blowfish1.EncryptString(mdp);
ShowMessage(Password); //Chaîne affichée : x7W7xUo=

Comment cela est-il possible ?

Merci de votre aide

[Lung]

Question bête : à quoi sert la fonction Init ?
Est-ce utile de la rappeller à chaque fois ?

[Nicoclem]

Ah je viens de trouver

La fonction Init sert à définir une clé de cryptage avec, ici, la chaine : "ma_cle_de_connexion" sur 64 bits. Par contre je ne connais pas le principe de l'algorithme Blowfish.

En fait, lors du premier cryptage du mdp il y a aussi un cryptage du login (que je n'ai pas mis dans le code) et donc lors du deuxième cryptage il faut également crypter une seconde fois le login.
Apparemment cela joue sur la chaine résultante du mdp.