DES-56 / VNC Passwort erzeugen

[Gruber_Hans_12345]

*push*

Ich hätte das ganze mal mit Hagens DEC probiert, aber irgendwie kommt bei mir was anderes raus als was sollte ... (liegt vermutlich daran, das ich noch nicht genau weiss, wie und was ich biem aufruf verwenden muß ...)

... so hab ichs probiert (das Shared Secret, habe ich mal mit dem fixedkey gleich gesetzt???? unsigned char fixedkey[8] = {23,82,107,6,35,78,88,7};)

und TCipher_1DES sollte es auch sein, da das mit (Keysize 56 bits relevant) steht und vermute daher mal auch DES56 heisst?

Delphi-Quellcode:

var
    FSharedSecret: Binary;
begin
  FSharedSecret   := #23#82#107#6#35#78#88#7;
  with TCipher_1DES.Create do
  try
    Mode := cmCBCx;
    Init(FSharedSecret);
    Edit2.Text := EncodeBinary(Edit1.Text, TFormat_HEX);
  finally
    Free;
  end;

Delphi-Quellcode:

12345678->f0e43164f6c2e373  // sollte rauskommen
12345678->3DFAE700B8924001  // kommt raus