Update Digest-SHA to CPAN version 5.80
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Tue, 11 Dec 2012 11:49:36 +0000 (11:49 +0000)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Tue, 11 Dec 2012 11:49:36 +0000 (11:49 +0000)
  [DELTA]

  5.80  Mon Dec 10 14:15:26 MST 2012
    - obtained noticeable speedup on Intel/gcc
        -- by setting -O1 and -fomit-frame-pointer
        -- SHA-1 about 63% faster, SHA-2 improves 11-20%

Porting/Maintainers.pl
cpan/Digest-SHA/Changes
cpan/Digest-SHA/Makefile.PL
cpan/Digest-SHA/README
cpan/Digest-SHA/lib/Digest/SHA.pm
cpan/Digest-SHA/shasum
cpan/Digest-SHA/src/hmac.c
cpan/Digest-SHA/src/hmac.h
cpan/Digest-SHA/src/sha.c
cpan/Digest-SHA/src/sha.h

index 0315215..c19fb8d 100755 (executable)
@@ -594,7 +594,7 @@ use File::Glob qw(:case);
 
     'Digest::SHA' => {
         'MAINTAINER'   => 'mshelor',
-        'DISTRIBUTION' => 'MSHELOR/Digest-SHA-5.74.tar.gz',
+        'DISTRIBUTION' => 'MSHELOR/Digest-SHA-5.80.tar.gz',
         'FILES'        => q[cpan/Digest-SHA],
         'EXCLUDED'     => [
             qw( t/pod.t
index 0651b77..97cb0fa 100644 (file)
@@ -1,5 +1,10 @@
 Revision history for Perl extension Digest::SHA.
 
+5.80  Mon Dec 10 14:15:26 MST 2012
+       - obtained noticeable speedup on Intel/gcc
+               -- by setting -O1 and -fomit-frame-pointer
+               -- SHA-1 about 63% faster, SHA-2 improves 11-20%
+
 5.74  Sat Nov 24 03:10:18 MST 2012
        - handle wide-string input by converting to bytes first
                -- viz. use SvPVbyte instead of SvPV in SHA.xs
index a3a4caa..9e87594 100644 (file)
@@ -37,6 +37,12 @@ if ($^O eq 'VMS') {
        }
 }
 
+       # Enhance performance on Intel when using gcc
+
+if ($Config{archname} =~ /^i[3456]86/ && $Config{ccname} eq 'gcc') {
+       push(@extra, OPTIMIZE => '-O1 -fomit-frame-pointer');
+}
+
 my %att = (
        'NAME'          => 'Digest::SHA',
        'VERSION_FROM'  => $PM,
index acae6e4..c6592c8 100644 (file)
@@ -1,4 +1,4 @@
-Digest::SHA version 5.74
+Digest::SHA version 5.80
 ========================
 
 Digest::SHA is a complete implementation of the NIST Secure Hash
index 5edaae9..40934b6 100644 (file)
@@ -7,7 +7,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
 use Fcntl;
 use integer;
 
-$VERSION = '5.74';
+$VERSION = '5.80';
 
 require Exporter;
 require DynaLoader;
index 643651c..12a27db 100644 (file)
@@ -4,8 +4,8 @@
        ##
        ## Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
        ##
-       ## Version: 5.74
-       ## Sat Nov 24 03:10:18 MST 2012
+       ## Version: 5.80
+       ## Mon Dec 10 14:15:26 MST 2012
 
        ## shasum SYNOPSIS adapted from GNU Coreutils sha1sum.
        ## Add an "-a" option for algorithm selection, a "-p"
@@ -97,7 +97,7 @@ use strict;
 use Fcntl;
 use Getopt::Long;
 
-my $VERSION = "5.74";
+my $VERSION = "5.80";
 
 
        ## Try to use Digest::SHA.  If not installed, use the slower
index 2a429de..97e7894 100644 (file)
@@ -5,8 +5,8 @@
  *
  * Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
  *
- * Version: 5.74
- * Sat Nov 24 03:10:18 MST 2012
+ * Version: 5.80
+ * Mon Dec 10 14:15:26 MST 2012
  *
  */
 
index f45dbe5..bb81a33 100644 (file)
@@ -5,8 +5,8 @@
  *
  * Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
  *
- * Version: 5.74
- * Sat Nov 24 03:10:18 MST 2012
+ * Version: 5.80
+ * Mon Dec 10 14:15:26 MST 2012
  *
  */
 
index 2b250fb..d6b24c2 100644 (file)
@@ -5,8 +5,8 @@
  *
  * Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
  *
- * Version: 5.74
- * Sat Nov 24 03:10:18 MST 2012
+ * Version: 5.80
+ * Mon Dec 10 14:15:26 MST 2012
  *
  */
 
@@ -456,7 +456,7 @@ char *shabase64(SHA *s)
 
        digcpy(s);
        s->base64[0] = '\0';
-       if (B64LEN(s->digestlen) >= sizeof(s->base64))
+       if (B64LEN((size_t) s->digestlen) >= sizeof(s->base64))
                return(s->base64);
        for (n = s->digestlen, q = s->digest; n > 3; n -= 3, q += 3) {
                encbase64(q, 3, out);
index 8fe8598..3355086 100644 (file)
@@ -5,8 +5,8 @@
  *
  * Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
  *
- * Version: 5.74
- * Sat Nov 24 03:10:18 MST 2012
+ * Version: 5.80
+ * Mon Dec 10 14:15:26 MST 2012
  *
  */