In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/a21a75c8b50f9fa1a0642bac43a6e51ed8083f0f?hp=3ef6ec9001c8089ebaa0aeefdf6fa0839780776a>
- Log ----------------------------------------------------------------- commit a21a75c8b50f9fa1a0642bac43a6e51ed8083f0f Author: Chris 'BinGOs' Williams <[email protected]> Date: Tue Dec 11 11:49:36 2012 +0000 Update Digest-SHA to CPAN version 5.80 [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% ----------------------------------------------------------------------- Summary of changes: Porting/Maintainers.pl | 2 +- cpan/Digest-SHA/Changes | 5 +++++ cpan/Digest-SHA/Makefile.PL | 6 ++++++ cpan/Digest-SHA/README | 2 +- cpan/Digest-SHA/lib/Digest/SHA.pm | 2 +- cpan/Digest-SHA/shasum | 6 +++--- cpan/Digest-SHA/src/hmac.c | 4 ++-- cpan/Digest-SHA/src/hmac.h | 4 ++-- cpan/Digest-SHA/src/sha.c | 6 +++--- cpan/Digest-SHA/src/sha.h | 4 ++-- 10 files changed, 26 insertions(+), 15 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 0315215..c19fb8d 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -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 diff --git a/cpan/Digest-SHA/Changes b/cpan/Digest-SHA/Changes index 0651b77..97cb0fa 100644 --- a/cpan/Digest-SHA/Changes +++ b/cpan/Digest-SHA/Changes @@ -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 diff --git a/cpan/Digest-SHA/Makefile.PL b/cpan/Digest-SHA/Makefile.PL index a3a4caa..9e87594 100644 --- a/cpan/Digest-SHA/Makefile.PL +++ b/cpan/Digest-SHA/Makefile.PL @@ -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, diff --git a/cpan/Digest-SHA/README b/cpan/Digest-SHA/README index acae6e4..c6592c8 100644 --- a/cpan/Digest-SHA/README +++ b/cpan/Digest-SHA/README @@ -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 diff --git a/cpan/Digest-SHA/lib/Digest/SHA.pm b/cpan/Digest-SHA/lib/Digest/SHA.pm index 5edaae9..40934b6 100644 --- a/cpan/Digest-SHA/lib/Digest/SHA.pm +++ b/cpan/Digest-SHA/lib/Digest/SHA.pm @@ -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; diff --git a/cpan/Digest-SHA/shasum b/cpan/Digest-SHA/shasum index 643651c..12a27db 100644 --- a/cpan/Digest-SHA/shasum +++ b/cpan/Digest-SHA/shasum @@ -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 diff --git a/cpan/Digest-SHA/src/hmac.c b/cpan/Digest-SHA/src/hmac.c index 2a429de..97e7894 100644 --- a/cpan/Digest-SHA/src/hmac.c +++ b/cpan/Digest-SHA/src/hmac.c @@ -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 * */ diff --git a/cpan/Digest-SHA/src/hmac.h b/cpan/Digest-SHA/src/hmac.h index f45dbe5..bb81a33 100644 --- a/cpan/Digest-SHA/src/hmac.h +++ b/cpan/Digest-SHA/src/hmac.h @@ -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 * */ diff --git a/cpan/Digest-SHA/src/sha.c b/cpan/Digest-SHA/src/sha.c index 2b250fb..d6b24c2 100644 --- a/cpan/Digest-SHA/src/sha.c +++ b/cpan/Digest-SHA/src/sha.c @@ -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); diff --git a/cpan/Digest-SHA/src/sha.h b/cpan/Digest-SHA/src/sha.h index 8fe8598..3355086 100644 --- a/cpan/Digest-SHA/src/sha.h +++ b/cpan/Digest-SHA/src/sha.h @@ -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 * */ -- Perl5 Master Repository
