GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages


Manual Reference Pages  -  CRYPT::RIJNDAEL_PP (3)

.ds Aq ’

NAME

Crypt::Rijndael_PP - Perl implementation of Rijndael

CONTENTS

DISCLAIMER

This is a pure perl implementation of the new AES Rijndael. You want to use Crypt::Rijndael where available. This implementation is really slow, but I am working on it.

SYNOPSIS



 # Functional style
 use Crypt::Rijndael_PP :all;

 $key = 1234567890ABCDEF x 4; # 256bit hex number

 # keysize = 256bit, blocksize = 128bit
 $c_txt = rijndael_encrypt($key, MODE_CBC, $data,  256, 128);
 $p_txt = rijndael_decrypt($key, MODE_CBC, $c_txt, 256, 128);


 # OO style
 # same interface as Crypt::Rijndael
 use Crypt::Rijndael_PP;

 $cipher = Crypt::Rijndael_PP->new( pack(H*, $key), MODE_CBC );

 $c_txt = $cipher->encrypt($data);
 $p_txt = $cipher->decrypt($c_txt);



DESCRIPTION

This modules shares the OO style interface with Crypt::Rijndael from Rafael R. Sevilla.
o Supported modes: Electronic CodeBook (MODE_ECB) and Cipher Block Chaining (MODE_CBC). Please use Crypt::CBC for CBC-Mode, as my CBC is not compatible with neither Crypt::CBC nor Crypt::Rijndael and it is subject to change in the near future. When using Crypt::CBC this module is 100% compatible to Crypt::Rijndael and you can decrypt and encrypt your data with both modules!
o Supported keysizes: 128, 192 and 256 (default)
o Supported blocksizes: 128 (default), 192 and 256
If the size of the key does not match the given keysize then the key is padded with 0 (hex) or truncated to the right size.

The last data block is padded with \0 if it does not match a multiple of the blocksize.

Warnings a raised in both cases.

EXAMPLES

Using Crypt::CBC



 use Crypt::CBC;

 my $key = my secret key;
 my $input = The answer is 42.;
 my $cipher = new Crypt::CBC($key,Rijndael_PP);

 my $ciphertext = $cipher->encrypt($input);
 my $plaintext  = $cipher->decrypt($ciphertext);


 # - or -

 #!/usr/local/bin/perl -w
 #
 # Usage: r.pl e "my secret key" < in > out
 #
 use strict;
 use Crypt::CBC;
 die "Usage: $0 mode([ed]) key\n" unless @ARGV == 2;
 my $cipher = new Crypt::CBC($ARGV[1],Rijndael_PP);
 $cipher->start($ARGV[0]);
 my $buffer;
 while( read(STDIN, $buffer, 1024) ) {
         print $cipher->crypt($buffer);
 }
 print $cipher->finish;



LIMITATIONS

This implementation is really slow. I’m trying to tweak the performance in coming releases.

CBC-Mode is not yet compatible to Crypt::Rijndael. But you are advised to use Crypt::CBC for this mode anyway.

SEE ALSO

Crypt::Rijndael

Crypt::CBC

<http://csrc.nist.gov/encryption/aes/>

COPYRIGHT

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.



 Copyright 2001 Christian Lackas
 Copyright 2000 Vincent Rijmen and Joan Daemen



AUTHORS

The original algorithm was developed by Vincent Rijmen and Joan Daemen.

This release was made by Christian Lackas <delta@lackas.net>. http://www.lackas.net/. It is based on the reference implementation for the AES contest. At present I am working on a faster version.

Search for    or go to Top of page |  Section 3 |  Main Index


perl v5.20.3 RIJNDAEL_PP (3) 2010-09-22

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.