Replace Crypt::Random with Crypt::PRNG to emiminate pari requirment

Author: timlegge

Makefile.PL

@@ -21,7 +21,7 @@ my %WriteMakefileArgs = (
     "Crypt::Mode::CBC" => 0,
     "Crypt::OpenSSL::X509" => 0,
     "Crypt::PK::RSA" => 0,
-    "Crypt::Random" => 0,
+    "Crypt::PRNG" => 0,
     "MIME::Base64" => 0,
     "XML::LibXML" => 0,
     "strict" => 0,
@@ -46,7 +46,7 @@ my %FallbackPrereqs = (
   "Crypt::Mode::CBC" => 0,
   "Crypt::OpenSSL::X509" => 0,
   "Crypt::PK::RSA" => 0,
-  "Crypt::Random" => 0,
+  "Crypt::PRNG" => 0,
   "File::Slurper" => 0,
   "File::Which" => 0,
   "MIME::Base64" => 0,

cpanfile

@@ -5,7 +5,7 @@ requires "Crypt::AuthEnc::GCM" => "0.062";
 requires "Crypt::Mode::CBC" => "0";
 requires "Crypt::OpenSSL::X509" => "0";
 requires "Crypt::PK::RSA" => "0";
-requires "Crypt::Random" => "0";
+requires "Crypt::PRNG" => "0";
 requires "MIME::Base64" => "0";
 requires "XML::LibXML" => "0";
 requires "perl" => "5.008";

dist.ini

@@ -18,7 +18,6 @@ Crypt::OpenSSL::X509 = 0
 MIME::Base64 = 0
 XML::LibXML = 0
 Crypt::Mode::CBC = 0
-Crypt::Random = 0
 Crypt::AuthEnc::GCM = 0.062
 
 [Prereqs / TestRequires]

lib/XML/Enc.pm

@@ -12,7 +12,7 @@ use Crypt::PK::RSA;
 use Crypt::Mode::CBC;
 use Crypt::AuthEnc::GCM 0.062;
 use MIME::Base64 qw/decode_base64 encode_base64/;
-use Crypt::Random qw( makerandom_octet );
+use Crypt::PRNG qw( random_bytes );
 
 use vars qw($VERSION @EXPORT_OK %EXPORT_TAGS $DEBUG);
 
@@ -500,8 +500,8 @@ sub _EncryptData {
     my $ivsize  = $encmethods{$method}->{ivsize};
     my $keysize = $encmethods{$method}->{keysize};
 
-    my $iv      = makerandom_octet ( Length => $ivsize);
-    ${$key}     = makerandom_octet ( Length => $keysize);
+    my $iv      = random_bytes ( $ivsize);
+    ${$key}     = random_bytes ( $keysize);
 
     if (defined $encmethods{$method} & $method !~ /gcm/ ){
         my $cbc = Crypt::Mode::CBC->new($encmethods{$method}->{modename}, 0);