server übergreifend

[G G]

hi leude,

ich habe folgendes problem.

ich habe ein chat program geschrieben und dieses chat program checked ob der user das richtige password eingegeben hat anhand einer mysql datenbank. Die registrierung erfolgt via php und das password wird auch dem server mit md5 verschlüsselt. und die chat software läuft auf einem anderen server. nun meine frage ist es möglich den md5 code mit delphi herzustellen auch auf einem anderen server?

danke GG

[supermuckl]

@ torry.net gibts diverse encryption componenten

such md5 hash

( dcpcrypt ist das wo ich verwende )

[supermuckl]

Delphi-Quellcode:

function Tform1.makeMD5(input:String):string;
var
Digest: array[0..15] of byte;
KeyStr: string;
i: integer;
Hash: TDCP_md5;
s: string;
begin
Hash:= TDCP_md5.Create(Self);
KeyStr := input;
Hash.Init;
Hash.UpdateStr(KEyStr);
Hash.Final(Digest);
KeyStr := 'bla         ';
input := 'blubb        ';
for i:= 0 to 15 do
s:= s+ inttohex(Digest[i],2);
result := uppercase(s);
hash.free;
end;

das is der code der aus nem string einen md5 hash zaubert
allerdings müssen die dcpcrypt compos installiert sein und folgende libarys in die uses:
DCPcrypt2, DCPmd5;

[himitsu]

Oder nur mit 'ner kleinen Pas.

Delphi-Quellcode:

Uses ..., UUHash_MD5;

Var P, S: String;
  H: MD5Digest; {MD5Digest = Array[0..15] of Byte}
  i: Integer;

Begin
  P := 'Dein Passwort';
  H := MD5String(P);
  S := '';
  For i := 0 to 15 do S := S + IntToHex(H[i], 2);
  ...
  {S = der MD5-Hash}

(du kannst die Datei auch umbenennen, wenn du willst)

[G G]

und dieser wert wird dann dem der durch php auf dem anderen server entstanden ist genau gleichen?

[himitsu]

Also da die Vorgehensweise für die Berechnung von MD5 und Co. festgelegt ist und unabhängig von der Programmiersprache und dem Erstellungsort ist, sollten die Hash's übereinstimmen.