The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Crypt::Cipher::SEED - Symetric cipher SEED, key size: 128 bits (Crypt::CBC compliant)

SYNOPSIS

  use Crypt::CBC;
  use Crypt::Cipher::SEED;
  
  my $key = '...'; # length has to be valid key size for this cipher
  my $cipher = Crypt::Cipher::SEED->new($key);
  my $cbc = Crypt::CBC->new( -cipher=>$cipher );
  my $ciphertext = $cbc->encrypt("secret data");

DESCRIPTION

This module implements the SEED cipher. Provided interface is compliant with Crypt::CBC module.

BEWARE: This module implements just elementary "one-block-(en|de)cryption" operation - if you want to encrypt/decrypt generic data you have to use some of the cipher block modes - check for example Crypt::CBC.

METHODS

The OO interface provides the same set of functions as Crypt::Cipher.

new

 $c = Crypt::Cipher::SEED->new($key);
 #or
 $c = Crypt::Cipher::SEED->new($key, $rounds);

encrypt

 $ciphertext = $c->encrypt($plaintext);

decrypt

 $plaintext = $c->decrypt($ciphertext);

keysize

  $c->keysize;
  #or
  Crypt::Cipher::SEED->keysize;
  #or
  Crypt::Cipher::SEED::keysize;

blocksize

  $c->blocksize;
  #or
  Crypt::Cipher::SEED->blocksize;
  #or
  Crypt::Cipher::SEED::blocksize;

max_keysize

  $c->max_keysize;
  #or
  Crypt::Cipher::SEED->max_keysize;
  #or
  Crypt::Cipher::SEED::max_keysize;

min_keysize

  $c->min_keysize;
  #or
  Crypt::Cipher::SEED->min_keysize;
  #or
  Crypt::Cipher::SEED::min_keysize;

default_rounds

  $c->default_rounds;
  #or
  Crypt::Cipher::SEED->default_rounds;
  #or
  Crypt::Cipher::SEED::default_rounds;

SEE ALSO

CryptX, Crypt::Cipher
http://en.wikipedia.org/wiki/SEED