From 1e58341902a90a0ded670eaff29a3e17c1c5596d Mon Sep 17 00:00:00 2001 From: CentOS Sources Date: Nov 02 2019 22:10:17 +0000 Subject: import perl-Digest-SHA-5.85-4.el7 --- diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..3294072 --- /dev/null +++ b/.gitignore @@ -0,0 +1 @@ +SOURCES/Digest-SHA-5.85.tar.gz diff --git a/.perl-Digest-SHA.metadata b/.perl-Digest-SHA.metadata new file mode 100644 index 0000000..9876e05 --- /dev/null +++ b/.perl-Digest-SHA.metadata @@ -0,0 +1 @@ +a603cfba95afcd0266c9482c0c93e84241fe0ce0 SOURCES/Digest-SHA-5.85.tar.gz diff --git a/SOURCES/Digest-SHA-5.84-Reset-CFLAGS.patch b/SOURCES/Digest-SHA-5.84-Reset-CFLAGS.patch new file mode 100644 index 0000000..ece3b78 --- /dev/null +++ b/SOURCES/Digest-SHA-5.84-Reset-CFLAGS.patch @@ -0,0 +1,29 @@ +From 77ac96bd42f3986dd77e5f1afcdb3e71d2aa03b3 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= +Date: Mon, 11 Mar 2013 09:44:22 +0100 +Subject: [PATCH] Reset CFLAGS + +--- + Makefile.PL | 6 ------ + 1 file changed, 6 deletions(-) + +diff --git a/Makefile.PL b/Makefile.PL +index 3d83865..f0d08a1 100644 +--- a/Makefile.PL ++++ b/Makefile.PL +@@ -27,12 +27,6 @@ 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, +-- +1.8.1.4 + diff --git a/SOURCES/Digest-SHA-5.85-Check-for-ISA-when-invoking-methods.patch b/SOURCES/Digest-SHA-5.85-Check-for-ISA-when-invoking-methods.patch new file mode 100644 index 0000000..94749b4 --- /dev/null +++ b/SOURCES/Digest-SHA-5.85-Check-for-ISA-when-invoking-methods.patch @@ -0,0 +1,68 @@ +From c898bd4f5880bd7ddbf5987024c2748eae3d88a7 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= +Date: Wed, 12 Mar 2014 10:17:16 +0100 +Subject: [PATCH] Check for ISA when invoking methods +MIME-Version: 1.0 +Content-Type: text/plain; charset=UTF-8 +Content-Transfer-Encoding: 8bit + +After: + +use Digest::SHA; +my $d=Digest::SHA->add(qq(a)); + +calling $d->hashsize() and other methods resulted in crash. + +This is relevant patch from Digest-SHA-5.87. + +Perl RT#121421 + + +Signed-off-by: Petr Písař +--- + SHA.xs | 8 ++++++++ + 1 file changed, 8 insertions(+) + +diff --git a/SHA.xs b/SHA.xs +index 3caf8ef..69908a0 100644 +--- a/SHA.xs ++++ b/SHA.xs +@@ -34,6 +34,8 @@ shaclose(s) + CODE: + RETVAL = shaclose(s); + sv_setiv(SvRV(ST(0)), 0); ++OUTPUT: ++ RETVAL + + int + shadump(file, s) +@@ -186,6 +188,8 @@ PREINIT: + SHA *state; + int result; + PPCODE: ++ if (!sv_isa(self, "Digest::SHA")) ++ XSRETURN_UNDEF; + state = INT2PTR(SHA *, SvIV(SvRV(SvRV(self)))); + result = ix ? shaalg(state) : shadsize(state) << 3; + ST(0) = sv_2mortal(newSViv(result)); +@@ -200,6 +204,8 @@ PREINIT: + STRLEN len; + SHA *state; + PPCODE: ++ if (!sv_isa(self, "Digest::SHA")) ++ XSRETURN_UNDEF; + state = INT2PTR(SHA *, SvIV(SvRV(SvRV(self)))); + for (i = 1; i < items; i++) { + data = (unsigned char *) (SvPVbyte(ST(i), len)); +@@ -224,6 +230,8 @@ PREINIT: + SHA *state; + char *result; + PPCODE: ++ if (!sv_isa(self, "Digest::SHA")) ++ XSRETURN_UNDEF; + state = INT2PTR(SHA *, SvIV(SvRV(SvRV(self)))); + shafinish(state); + len = 0; +-- +1.8.5.3 + diff --git a/SPECS/perl-Digest-SHA.spec b/SPECS/perl-Digest-SHA.spec new file mode 100644 index 0000000..b99bdc7 --- /dev/null +++ b/SPECS/perl-Digest-SHA.spec @@ -0,0 +1,137 @@ +Name: perl-Digest-SHA +Epoch: 1 +Version: 5.85 +Release: 4%{?dist} +Summary: Perl extension for SHA-1/224/256/384/512 +License: GPL+ or Artistic +Group: Development/Libraries +URL: http://search.cpan.org/dist/Digest-SHA/ +Source0: http://www.cpan.org/authors/id/M/MS/MSHELOR/Digest-SHA-%{version}.tar.gz +# Since 5.80, upstream overrides CFLAGS because they think it improves +# performance. Revert it. +Patch0: Digest-SHA-5.84-Reset-CFLAGS.patch +# Fix possible crash on uninitialized object, fixed in 5.87, bug #1189039, +# RT#121421 +Patch1: Digest-SHA-5.85-Check-for-ISA-when-invoking-methods.patch +BuildRequires: perl +BuildRequires: perl(Config) +BuildRequires: perl(ExtUtils::MakeMaker) +BuildRequires: perl(Getopt::Std) +BuildRequires: perl(strict) +# Run-time +BuildRequires: perl(Carp) +BuildRequires: perl(DynaLoader) +BuildRequires: perl(Exporter) +BuildRequires: perl(Fcntl) +BuildRequires: perl(integer) +BuildRequires: perl(vars) +# Optional run-time +BuildRequires: perl(Digest::base) +# Tests +BuildRequires: perl(FileHandle) +# Optional tests +%if !%{defined perl_bootstrap} +BuildRequires: perl(Test::Pod) >= 1.00 +BuildRequires: perl(Test::Pod::Coverage) >= 0.08 +%endif +Requires: perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version)) +Requires: perl(Carp) +# Optional but recommended +Requires: perl(Digest::base) + +%{?perl_default_filter} + +%description +Digest::SHA is a complete implementation of the NIST Secure Hash Standard. It +gives Perl programmers a convenient way to calculate SHA-1, SHA-224, SHA-256, +SHA-384, SHA-512, SHA-512/224, and SHA-512/256 message digests. The module can +handle all types of input, including partial-byte data. + +%prep +%setup -q -n Digest-SHA-%{version} +%patch0 -p1 +%patch1 -p1 +chmod -x examples/* +perl -MExtUtils::MakeMaker -e 'ExtUtils::MM_Unix->fixin(q{examples/dups})' + +%build +%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="$RPM_OPT_FLAGS" +make %{?_smp_mflags} + +%install +make pure_install DESTDIR=$RPM_BUILD_ROOT +find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \; +find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -exec rm -f {} \; +%{_fixperms} $RPM_BUILD_ROOT/* + +%check +make test + +%files +%doc Changes examples README +%{_bindir}/* +%{perl_vendorarch}/auto/* +%{perl_vendorarch}/Digest* +%{_mandir}/man1/* +%{_mandir}/man3/* + +%changelog +* Wed Feb 04 2015 Petr Pisar - 1:5.85-4 +- Fix possible crash on uninitialized object (bug #1189039) + +* Fri Jan 24 2014 Daniel Mach - 1:5.85-3 +- Mass rebuild 2014-01-24 + +* Fri Dec 27 2013 Daniel Mach - 1:5.85-2 +- Mass rebuild 2013-12-27 + +* Fri Jun 28 2013 Petr Pisar - 1:5.85-1 +- 5.85 bump + +* Mon Mar 11 2013 Petr Pisar - 1:5.84-1 +- 5.84 bump + +* Tue Mar 05 2013 Petr Pisar - 1:5.83-1 +- 5.83 bump + +* Mon Jan 28 2013 Petr Pisar - 1:5.82-1 +- 5.82 bump + +* Tue Jan 15 2013 Petr Pisar - 1:5.81-1 +- 5.81 bump + +* Tue Dec 11 2012 Petr Pisar - 1:5.80-1 +- 5.80 bump + +* Fri Nov 30 2012 Petr Pisar - 1:5.74-2 +- Restore epoch value broken in 5.73 bump + +* Mon Nov 26 2012 Petr Pisar - 0:5.74-1 +- 5.74 bump + +* Thu Nov 01 2012 Petr Pisar - 0:5.73-2 +- 5.73 bump + +* Wed Sep 26 2012 Petr Pisar - 1:5.72-1 +- 5.72 bump + +* Mon Aug 13 2012 Marcela Mašláňová - 1:5.71-240 +- bump release to override sub-package from perl.spec + +* Fri Jul 20 2012 Fedora Release Engineering - 1:5.71-5 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_18_Mass_Rebuild + +* Tue Jul 10 2012 Petr Pisar - 1:5.71-4 +- Perl 5.16 re-rebuild of bootstrapped packages + +* Wed Jun 06 2012 Petr Pisar - 1:5.71-3 +- Perl 5.16 rebuild + +* Fri Jun 01 2012 Petr Pisar - 1:5.71-2 +- Omit optional POD tests on bootstrap + +* Wed Mar 14 2012 Petr Pisar - 1:5.71-1 +- 5.71 bump + +* Tue Feb 14 2012 Petr Pisar 1:5.70-1 +- Specfile autogenerated by cpanspec 1.78.