mcrypt_cbc

Encrypt/decrypt data in CBC mode (PHP 4, PHP 5)
string mcrypt_cbc ( int cipher, string key, string data, int mode [, string iv] )

string mcrypt_cbc ( string cipher, string key, string data, int mode [, string iv] )

Code Examples / Notes » mcrypt_cbc

I was able get php and perl to play together with blowfish using cipher block chaining. The blowfish key needs to be atleast 8 chars (even though blowfish min is 8 bits, perl didn't like keys smaller than 8 chars) and max 56. The iv must be exactly 8 chars and padding needs to be null because php pads with nulls. Also, php needs libmcrypt >= 2.4.9 to be compatible with perl. PERL ---- use Crypt::CBC; $cipher = Crypt::CBC->new( {'key' => 'my secret key', 'cipher'=> 'Blowfish', 'iv' => '12345678', 'regenerate_key' => 0, 'padding' => 'null', 'prepend_iv' => 0 }); $cc = 'my secret text'; $encrypted = $cipher->encrypt($cc); $decrypted = $cipher->decrypt($encrypted); print "encrypted : ".$encrypted; print " "; print "decrypted : ".$decrypted; PHP --- $cc = 'my secret text'; $encrypted = mcrypt_cbc(MCRYPT_BLOWFISH,'my secret key',$cc,MCRYPT_ENCRYPT,'12345678'); $decrypted = mcrypt_cbc(MCRYPT_BLOWFISH, 'my secret key', $encrypted, MCRYPT_DECRYPT,'12345678'); echo "encrypted : ".$encrypted; echo " "; echo "decrypted : ".$decrypted;

Here is a post similar to the one above, except this works for AES256 256 bit key and 128 bit block size... just make sure the $key variable is at least 48 characters long ---- PERL --- my $key = '12345678901234567890123456789012345678901234567890'; my $CC = '4007000000027'; # You need Crypt::Rijndael installed for this to work use Crypt::CBC; my $cipher = Crypt::CBC->new( {'key' => substr($key,0,32), 'cipher'=> 'Rijndael', 'iv' => substr($key,32,16), 'regenerate_key' => 0, 'padding' => 'null', 'prepend_iv' => 0 }); my $encrypted = $cipher->encrypt($CC); print "encrypted : ".$encrypted."\n"; print "decrypted : ".$cipher->decrypt($encrypted)."\n"; --- PHP --- $key = '123456789012345678901234567890123456789012345678901234567890'; $CC = '4007000000027'; $encrypted = mcrypt_cbc(MCRYPT_RIJNDAEL_128,substr($key,0,32) ,$CC,MCRYPT_ENCRYPT,substr($key,32,16)); $decrypted = mcrypt_cbc(MCRYPT_RIJNDAEL_128,substr($key,0,32) ,$encrypted,MCRYPT_DECRYPT,substr($key,32,16)); echo "encrypted : ".bin2hex($encrypted);

mcrypt_cbc

Encrypt/decrypt data in CBC mode (PHP 4, PHP 5) string mcrypt_cbc ( int cipher, string key, string data, int mode [, string iv] ) string mcrypt_cbc ( string cipher, string key, string data, int mode [, string iv] )

Code Examples / Notes » mcrypt_cbc

Change Language

Encrypt/decrypt data in CBC mode (PHP 4, PHP 5)
string mcrypt_cbc ( int cipher, string key, string data, int mode [, string iv] )

string mcrypt_cbc ( string cipher, string key, string data, int mode [, string iv] )