NAME

SYNOPSIS

  use Crypt::DH::GMP;

  my $dh = Crypt::DH::GMP->new(p => $p, g => $g);
  my $val = $dh->compute_secret();

  # If you want compatibility with Crypt::DH (it uses Math::BigInt)
  # then use this flag
  # You /think/ you're using Crypt::DH, but...
  use Crypt::DH::GMP qw(-compat);

  my $dh = Crypt::DH->new(p => $p, g => $g);
  my $val = $dh->compute_secret();

DESCRIPTION

RATIONALE

GMP/Pari libraries are almost always required

"Crypt::DH" works with a plain "Math::BigInt", but if you want to use it in production, you almost always need to install "Math::BigInt::GMP" or "Math::BigInt::Pari" because without them, the computation that is required by "Crypt::DH" makes the module pretty much unusable.

Because of this, "Crypt::DH" might as well make "Math::BigInt::GMP" a hard requirement.

Crypt::DH suffers from having Math::BigInt in between GMP

With or without "Math::BigInt::GMP" or "Math::BigInt::Pari", "Crypt::DH" makes several round trip conversions between Perl scalars, Math::BigInt objects, and finally its C representation (if GMP/Pari are installed).

Instantiating an object comes with a relatively high cost, and if you make many computations in one go, your program will suffer dramatically because of this.

These problems quickly become apparent when you use modules such as "Net::OpenID::Consumer", which requires to make a few calls to "Crypt::DH".

"Crypt::DH::GMP" attempts to alleviate these problems by providing a "Crypt::DH"-compatible layer, which, instead of doing calculations via Math::BigInt, directly works with libgmp in C.

This means that we've essentially eliminated 2 call stacks worth of expensive Perl method calls and we also only load 1 (Crypt::DH::GMP) module instead of 3 (Crypt::DH + Math::BigInt + Math::BigInt::GMP).

These add up to a fairly significant increase in performance.

COMPATIBILITY WITH Crypt::DH

  use Crypt::DH;
  use Crypt::DH::GMP qw(-compat); # must be loaded AFTER Crypt::DH

Specifying -compat invokes a very nasty hack that overwrites Crypt::DH's symbol table -- this then forces Crypt::DH users to use Crypt::DH::GMP instead, even if you are writing

  my $dh = Crypt::DH->new(...);
  $dh->compute_key();

BENCHMARK

  Benchmarking instatiation cost...
         Rate   pp  gmp
  pp   9488/s   -- -79%
  gmp 45455/s 379%   --

  Benchmarking key generation cost...
        Rate gmp  pp
  gmp 6.46/s  -- -0%
  pp  6.46/s  0%  --

  Benchmarking compute_key cost...
          Rate    pp   gmp
  pp   12925/s    --  -96%
  gmp 365854/s 2730%    --

METHODS

AUTHOR

LICENSE

See http://www.perl.com/perl/misc/Artistic.html