Einzelnen Beitrag anzeigen

egal

Registriert seit: 14. Jul 2004
190 Beiträge
 
Delphi XE4 Professional
 
#1

Rijndael-ECB-Entschlüsselung mit DEC

  Alt 7. Jul 2008, 11:22
Hallo,
brauche schon weider eure Hilfe. Irgendwie komme ich nicht zurecht mit ECB und DEC...
Ich habe eine Datei, die mit ECB verschlüsselt wurde, allerdings in C#, mir ist Key, IV und KeySize bekannt. Aber Entschlüsselung klappt nicht.
Hier ist mein Stück Code, bestimmt mache ich was falsch...
Delphi-Quellcode:
procedure Encrypt(ASource, ADest: TStream; const APassword: String); overload;
const
  ACipherClass: TDECCipherClass = TCipher_Rijndael;
  ACipherMode: TCipherMode = cmECBx;
var
  cIV: Binary;
begin
  with ValidCipher(ACipherClass).Create do
  try
    cIV := '1234567891011123'; // IV
    Mode := ACipherMode;
    // APassword-mein Key
    Init(APassword, Length(APassword), cIV, Length(cIV));
    
    EncodeStream(ASource, ADest, -1, nil);
  finally
    Free;
    ProtectBinary(cIV);
  end;
end;
Verstehe auch nicht, wo ich KeySize=256 verwenden soll? Vielen Dank im Voraus!
  Mit Zitat antworten Zitat