Einzelnen Beitrag anzeigen

Hedge

Registriert seit: 30. Jun 2007
278 Beiträge
 
Delphi 2009 Professional
 
#1

Mit Delphi verschlüsseln / PHP entschlüsseln

  Alt 3. Dez 2009, 23:09
Versuche mit Rijndael (unter Zuhilfenahme von DEC) etwas zu verschlüsseln und mit PHP wieder zu entschlüsseln:

Hier der Delphi-Teil:

Delphi-Quellcode:
  with TCipher_Rijndael.Create do
  try
    Mode := cmCBCx;
    Init(TFormat_MIME64.Decode('lala'));
    SendDebug(EncodeBinary('hallo schatz', TFormat_MIME64));
  finally
    Free;
  end;
Im Debugfenster steht dann:

wDqs4CMiGUUo7mWx

Das wollte ich mit folgendem PHP-Script entschlüsseln:

Code:
<?php
function mc_decrypt($decrypt, $mc_key) {
   $decoded = base64_decode($decrypt);
   $iv = mcrypt_create_iv(mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_CBC), MCRYPT_RAND);
   $decrypted = trim(mcrypt_decrypt(MCRYPT_RIJNDAEL_256, $mc_key, trim($decoded), MCRYPT_MODE_CBC, $iv));
   return $decrypted;
}

echo mc_decrypt('wDqs4CMiGUUo7mWx','lala')
?>
Bei jeder Ausführung des PHP-Scripts erscheint eine andere Lösung.
Kann Jemand sagen was ich falsch mache?
٩๏̯͡๏)۶
  Mit Zitat antworten Zitat