How do I decrypt AES-generated crypttext in PHP with Perl? -


i have following code in php:

$key="ed8677a0fc735e9bf1d7bca3310bb82854b5217589f2e00dd3bab399be9707a7"; $file="test"; $in   = fopen($file, 'rb'); $out  = fopen($file.'.encrypted', 'wb');  $file_size = filesize($file); echo "[?] filesize: ".$file_size."\n"; echo "\n[?] key: $key \n"; $block_size = mcrypt_get_block_size(mcrypt_rijndael_128, mcrypt_mode_cbc);  // encrypt echo date('y-m-d h:i:s')."\n"; $time_s = time(); echo "[1] encrypting.... \n"; $content=''; $encrypt=true;  $ip=0; while (!feof($in)) {     $off_s = ftell($in);     $content = fread($in, 8192);     $off_e = ftell($in);     $size = $off_e-$off_s;      //if (($size!=8192)&&($size>0))      if ($size>0) {             if ($size!=8192)             $content = pkcs5_pad($content, $size, $block_size);          $encrypted = mcrypt_cbc(mcrypt_rijndael_128, substr($key,0,32) ,$content, mcrypt_encrypt, substr($key,32,16));          fwrite($out, $encrypted);         } }  fclose($in); fclose($out);

how decrypt in perl? tried no success:

use archive::zip qw( :error_codes :constants ); use posix; use file::basename; use crypt::cbc; use digest::md5 qw(md5 md5_hex); # a) decrypt $key="ed8677a0fc735e9bf1d7bca3310bb82854b5217589f2e00dd3bab399be9707a7"; $sourcefile="test.encrypted";  $cipher = crypt::cbc->new( {'key' => substr($key,0,32),                             'cipher'=> 'rijndael',                             'blocksize' => 16,                             'iv' => substr($key,32,16),                             'regenerate_key' => 0,                             'padding' => 'standard',                             'prepend_iv' => 0,                             'header' => 'none',                                });  open (inf1, "< ".$sourcefile) || die; open (outf1, "> ".$sourcefile.".decrypt") || die;   while (my $size = read(inf1,my $buf, 8192 ) ) {          $count += $size;     $buf2 = $cipher->decrypt($buf);     $buf2 .= $cipher->finish();                       print outf1 $buf2;     #syswrite (outf1, $buf2, $size); }  close(inf1); close(outf1);

i think there problem padding - way php , perl it, can't find proper solution.


Comments

Post a Comment

Popular posts from this blog

asp.net - repeatedly call AddImageUrl(url) to assemble pdf document -

i'm using abcpdf , i'm curious if can recursively call addimageurl() function assemble pdf document compile multiple urls? something like: int pagecount = 0; int theid = thedoc.addimageurl("http://stackoverflow.com/search?q=abcpdf+footer+page+x+out+of+", true, 0, true); //assemble document while (thedoc.chainable(theid)) { thedoc.page = thedoc.addpage(); theid = thedoc.addimagetochain(theid); } pagecount = thedoc.pagecount; console.writeline("1 document page count:" + pagecount); //flatten document (int = 1; <= pagecount; i++) { thedoc.pagenumber = i; thedoc.flatten(); } //now try again theid = thedoc.addimageurl("http://stackoverflow.com/questions/1980890/pdf-report-generation", true, 0, true); //assemble document while (thedoc.chainable(theid)) { thedoc.page = thedoc.addpage(); theid = thedoc.addimagetoc...
Read more

java - Android recognize cell phone with keyboard or not? -

in android app, want detect user's device if device has keyboard(like motorola milestone) , show corresponding user interface. guys know how that? ! regards justicepenny http://developer.android.com/reference/android/content/res/configuration.html public int keyboard the kind of keyboard attached device. 1 of: keyboard_nokeys, keyboard_qwerty, keyboard_12key. that's it!
Read more

iphone - How would you achieve a LED Scrolling effect? -

how achieve led scrolling effect example below? led sign - led ticker emulator iphone , ipad http://img.skitch.com/20101201-rsfh4p1bajb1wp94k466pdpiuj.preview.jpg sometimes remunerates comment in other posts :) have put code you, should implement font '8pin matrix' realistic feeling. uilabel *label; - (void)viewdidload { [super viewdidload]; label = [[uilabel alloc]initwithframe:cgrectmake(10, 50, 300, 20)]; label.font = [uifont fontwithname:@"courier-bold" size:16.0]; label.backgroundcolor = [uicolor blackcolor]; label.textcolor = [uicolor greencolor]; label.linebreakmode = uilinebreakmodecharacterwrap; // otherwise "…" label.text = @"this led text scrolled "; // blanks space between [self.view addsubview:label]; [nstimer scheduledtimerwithtimeinterval:0.12f target:self selector:@selector(scrolllabel) use...
Read more