Hello community,
here is the log from the commit of package perl-Digest-Perl-MD5 for
openSUSE:Factory checked in at 2014-02-11 10:44:30
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Digest-Perl-MD5 (Old)
and /work/SRC/openSUSE:Factory/.perl-Digest-Perl-MD5.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Digest-Perl-MD5"
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Digest-Perl-MD5/perl-Digest-Perl-MD5.changes
2011-12-07 14:38:54.000000000 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Digest-Perl-MD5.new/perl-Digest-Perl-MD5.changes
2014-02-11 10:44:31.000000000 +0100
@@ -1,0 +2,5 @@
+Sun Feb 9 13:33:36 UTC 2014 - [email protected]
+
+- updated to 1.9, no changelog
+
+-------------------------------------------------------------------
Old:
----
Digest-Perl-MD5-1.8.tar.gz
New:
----
Digest-Perl-MD5-1.9.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Digest-Perl-MD5.spec ++++++
--- /var/tmp/diff_new_pack.C9PVaN/_old 2014-02-11 10:44:31.000000000 +0100
+++ /var/tmp/diff_new_pack.C9PVaN/_new 2014-02-11 10:44:31.000000000 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Digest-Perl-MD5
#
-# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,11 +17,11 @@
Name: perl-Digest-Perl-MD5
-Version: 1.8
+Version: 1.9
Release: 0
%define cpan_name Digest-Perl-MD5
Summary: Perl implementation of Ron Rivests MD5 Algorithm
-License: Artistic-1.0 or GPL-1.0+
+License: GPL-1.0+ or Artistic-1.0
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/Digest-Perl-MD5/
Source:
http://www.cpan.org/authors/id/D/DE/DELTA/%{cpan_name}-%{version}.tar.gz
@@ -71,11 +71,8 @@
%perl_process_packlist
%perl_gen_filelist
-%clean
-%{__rm} -rf %{buildroot}
-
%files -f %{name}.files
%defattr(-,root,root,755)
-%doc CHANGES rand.f README
+%doc CHANGES rand.f
%changelog
++++++ Digest-Perl-MD5-1.8.tar.gz -> Digest-Perl-MD5-1.9.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/MANIFEST
new/Digest-Perl-MD5-1.9/MANIFEST
--- old/Digest-Perl-MD5-1.8/MANIFEST 2004-06-02 00:06:34.000000000 +0200
+++ new/Digest-Perl-MD5-1.9/MANIFEST 2013-12-14 14:08:23.000000000 +0100
@@ -10,3 +10,4 @@
INSTALL How to install
rand.f Random binary data for testing
META.yml Module meta-data (added by MakeMaker)
+META.json Module JSON meta-data (added by
MakeMaker)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/META.json
new/Digest-Perl-MD5-1.9/META.json
--- old/Digest-Perl-MD5-1.8/META.json 1970-01-01 01:00:00.000000000 +0100
+++ new/Digest-Perl-MD5-1.9/META.json 2013-12-14 14:08:22.000000000 +0100
@@ -0,0 +1,41 @@
+{
+ "abstract" : "Perl Implementation of Rivest's MD5 algorithm",
+ "author" : [
+ "Christian Lackas <[email protected]>"
+ ],
+ "dynamic_config" : 1,
+ "generated_by" : "ExtUtils::MakeMaker version 6.72, CPAN::Meta::Converter
version 2.120351",
+ "license" : [
+ "unknown"
+ ],
+ "meta-spec" : {
+ "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
+ "version" : "2"
+ },
+ "name" : "Digest-Perl-MD5",
+ "no_index" : {
+ "directory" : [
+ "t",
+ "inc"
+ ]
+ },
+ "prereqs" : {
+ "build" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "configure" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "runtime" : {
+ "requires" : {
+ "Exporter" : "0"
+ }
+ }
+ },
+ "release_status" : "stable",
+ "version" : "1.9"
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/META.yml
new/Digest-Perl-MD5-1.9/META.yml
--- old/Digest-Perl-MD5-1.8/META.yml 2004-08-27 22:29:00.000000000 +0200
+++ new/Digest-Perl-MD5-1.9/META.yml 2013-12-14 14:08:22.000000000 +0100
@@ -1,11 +1,22 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
-name: Digest-Perl-MD5
-version: 1.8
-version_from: ./lib/Digest/Perl/MD5.pm
-installdirs: site
+---
+abstract: "Perl Implementation of Rivest's MD5 algorithm"
+author:
+ - 'Christian Lackas <[email protected]>'
+build_requires:
+ ExtUtils::MakeMaker: 0
+configure_requires:
+ ExtUtils::MakeMaker: 0
+dynamic_config: 1
+generated_by: 'ExtUtils::MakeMaker version 6.72, CPAN::Meta::Converter version
2.120351'
+license: unknown
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: Digest-Perl-MD5
+no_index:
+ directory:
+ - t
+ - inc
requires:
- Exporter: 0
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+ Exporter: 0
+version: 1.9
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/Makefile.PL
new/Digest-Perl-MD5-1.9/Makefile.PL
--- old/Digest-Perl-MD5-1.8/Makefile.PL 2000-08-19 02:53:45.000000000 +0200
+++ new/Digest-Perl-MD5-1.9/Makefile.PL 2013-04-11 11:20:14.000000000 +0200
@@ -1,4 +1,4 @@
-# $Id: Makefile.PL,v 1.3 2000/08/19 00:53:45 lackas Exp $
+# $Id$
#
use ExtUtils::MakeMaker;
@@ -9,7 +9,7 @@
WriteMakefile(
'NAME' => 'Digest::Perl::MD5',
'VERSION_FROM' => './lib/Digest/Perl/MD5.pm', # finds $VERSION
- 'AUTHOR' => 'Christian Lackas <[email protected]>',
+ 'AUTHOR' => 'Christian Lackas <[email protected]>',
'ABSTRACT' => 'Perl Implementation of Rivest\'s MD5 algorithm',
'PREREQ_PM' => {
'Exporter' => 0
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/README
new/Digest-Perl-MD5-1.9/README
--- old/Digest-Perl-MD5-1.8/README 2004-02-14 03:28:04.000000000 +0100
+++ new/Digest-Perl-MD5-1.9/README 1970-01-01 01:00:00.000000000 +0100
@@ -1,159 +0,0 @@
-NAME
- Digest::MD5::Perl - Perl implementation of Ron Rivests MD5 Algorithm
-
-DISCLAIMER
- This is not an interface (like "Digest::MD5") but a Perl implementation
- of MD5. It is written in perl only and because of this it is slow but it
- works without C-Code. You should use "Digest::MD5" instead of this
- module if it is available. This module is only usefull for
-
- computers where you cannot install "Digest::MD5" (e.g. lack of a
- C-Compiler)
-
- encrypting only small amounts of data (less than one million bytes).
- I use it to hash passwords.
-
- educational purposes
-
-SYNOPSIS
- # Functional style
- use Digest::MD5 qw(md5 md5_hex md5_base64);
-
- $hash = md5 $data;
- $hash = md5_hex $data;
- $hash = md5_base64 $data;
-
- # OO style
- use Digest::MD5;
-
- $ctx = Digest::MD5->new;
-
- $ctx->add($data);
- $ctx->addfile(*FILE);
-
- $digest = $ctx->digest;
- $digest = $ctx->hexdigest;
- $digest = $ctx->b64digest;
-
-DESCRIPTION
- This modules has the same interface as the much faster "Digest::MD5". So
- you can easily exchange them, e.g.
-
- BEGIN {
- eval {
- require Digest::MD5;
- import Digest::MD5 'md5_hex'
- };
- if ($@) { # ups, no Digest::MD5
- require Digest::Perl::MD5;
- import Digest::Perl::MD5 'md5_hex'
- }
- }
-
- If the "Digest::MD5" module is available it is used and if not you take
- "Digest::Perl::MD5".
-
- You can also install the Perl part of Digest::MD5 together with
- Digest::Perl::MD5 and use Digest::MD5 as normal, it falls back to
- Digest::Perl::MD5 if it cannot load its object files.
-
- For a detailed Documentation see the "Digest::MD5" module.
-
-EXAMPLES
- The simplest way to use this library is to import the md5_hex() function
- (or one of its cousins):
-
- use Digest::Perl::MD5 'md5_hex';
- print 'Digest is ', md5_hex('foobarbaz'), "\n";
-
- The above example would print out the message
-
- Digest is 6df23dc03f9b54cc38a0fc1483df6e21
-
- provided that the implementation is working correctly. The same checksum
- can also be calculated in OO style:
-
- use Digest::MD5;
-
- $md5 = Digest::MD5->new;
- $md5->add('foo', 'bar');
- $md5->add('baz');
- $digest = $md5->hexdigest;
-
- print "Digest is $digest\n";
-
- The digest methods are destructive. That means you can only call them
- once and the $md5 objects is reset after use. You can make a copy with
- clone:
-
- $md5->clone->hexdigest
-
-LIMITATIONS
- This implementation of the MD5 algorithm has some limitations:
-
- It's slow, very slow. I've done my very best but Digest::MD5 is
- still about 100 times faster. You can only encrypt Data up to one
- million bytes in an acceptable time. But it's very usefull for
- encrypting small amounts of data like passwords.
-
- You can only encrypt up to 2^32 bits = 512 MB on 32bit archs. But
- You should use "Digest::MD5" for those amounts of data anyway.
-
-SEE ALSO
- the Digest::MD5 manpage
-
- the md5(1) manpage
-
- RFC 1321
-
- tools/md5: a small BSD compatible md5 tool written in pure perl.
-
-COPYRIGHT
- This library is free software; you can redistribute it and/or modify it
- under the same terms as Perl itself.
-
- Copyright 2000 Christian Lackas, Imperia Software Solutions
- Copyright 1998-1999 Gisle Aas.
- Copyright 1995-1996 Neil Winton.
- Copyright 1991-1992 RSA Data Security, Inc.
-
- The MD5 algorithm is defined in RFC 1321. The basic C code implementing
- the algorithm is derived from that in the RFC and is covered by the
- following copyright:
-
- Copyright (C) 1991-1992, RSA Data Security, Inc. Created 1991. All
- rights reserved.
-
- License to copy and use this software is granted provided that it is
- identified as the "RSA Data Security, Inc. MD5 Message-Digest
- Algorithm" in all material mentioning or referencing this software
- or this function.
-
- License is also granted to make and use derivative works provided
- that such works are identified as "derived from the RSA Data
- Security, Inc. MD5 Message-Digest Algorithm" in all material
- mentioning or referencing the derived work.
-
- RSA Data Security, Inc. makes no representations concerning either
- the merchantability of this software or the suitability of this
- software for any particular purpose. It is provided "as is" without
- express or implied warranty of any kind.
-
- These notices must be retained in any copies of any part of this
- documentation and/or software.
-
- This copyright does not prohibit distribution of any version of Perl
- containing this extension under the terms of the GNU or Artistic
- licenses.
-
-AUTHORS
- The original MD5 interface was written by Neil Winton (<N.Winton (at)
- axion.bt.co.uk>).
-
- "Digest::MD5" was made by Gisle Aas <gisle (at) aas.no> (I took his
- Interface and part of the documentation).
-
- Thanks to Guido Flohr for his 'use integer'-hint.
-
- This release was made by Christian Lackas <delta (at) lackas.net>.
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/lib/Digest/Perl/MD5.pm
new/Digest-Perl-MD5-1.9/lib/Digest/Perl/MD5.pm
--- old/Digest-Perl-MD5-1.8/lib/Digest/Perl/MD5.pm 2004-08-27
22:28:25.000000000 +0200
+++ new/Digest-Perl-MD5-1.9/lib/Digest/Perl/MD5.pm 2013-12-13
22:56:02.000000000 +0100
@@ -1,8 +1,3 @@
-#! /usr/bin/false
-#
-# $Id: MD5.pm,v 1.23 2004/08/27 20:28:25 lackas Exp $
-#
-
package Digest::Perl::MD5;
use strict;
use integer;
@@ -12,7 +7,7 @@
@EXPORT_OK = qw(md5 md5_hex md5_base64);
@ISA = 'Exporter';
-$VERSION = '1.8';
+$VERSION = '1.9';
# I-Vektor
sub A() { 0x67_45_23_01 }
@@ -23,7 +18,7 @@
# for internal use
sub MAX() { 0xFFFFFFFF }
-# padd a message to a multiple of 64
+# pad a message to a multiple of 64
sub padding {
my $l = length (my $msg = shift() . chr(128));
$msg .= "\0" x (($l%64<=56?56:120)-$l%64);
@@ -61,10 +56,10 @@
);
my $insert = "\n";
- while(<DATA>) {
- chomp;
- next unless /^[FGHI]/;
- my ($func,@x) = split /,/;
+ while(defined( my $data = <DATA> )) {
+ chomp $data;
+ next unless $data =~ /^[FGHI]/;
+ my ($func,@x) = split /,/, $data;
my $c = $f{$func};
$c =~ s/X(\d)/$x[$1]/g;
$c =~ s/(S\d{2})/$s{$1}/;
@@ -231,7 +226,7 @@
This is B<not> an interface (like C<Digest::MD5>) but a Perl implementation of
MD5.
It is written in perl only and because of this it is slow but it works without
C-Code.
You should use C<Digest::MD5> instead of this module if it is available.
-This module is only usefull for
+This module is only useful for
=over 4
@@ -335,7 +330,7 @@
=item
It's slow, very slow. I've done my very best but Digest::MD5 is still about
100 times faster.
-You can only encrypt Data up to one million bytes in an acceptable time. But
it's very usefull
+You can only encrypt Data up to one million bytes in an acceptable time. But
it's very useful
for encrypting small amounts of data like passwords.
=item
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/test.pl
new/Digest-Perl-MD5-1.9/test.pl
--- old/Digest-Perl-MD5-1.8/test.pl 2004-02-15 03:16:17.000000000 +0100
+++ new/Digest-Perl-MD5-1.9/test.pl 2013-04-11 11:20:14.000000000 +0200
@@ -1,5 +1,5 @@
#!/usr/bin/perl -w
-# $Id: test.pl,v 1.11 2004/02/15 02:16:17 lackas Exp $
+# $Id$
use Test;
use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/tools/md5
new/Digest-Perl-MD5-1.9/tools/md5
--- old/Digest-Perl-MD5-1.8/tools/md5 2004-02-15 03:15:48.000000000 +0100
+++ new/Digest-Perl-MD5-1.9/tools/md5 2013-04-11 11:20:14.000000000 +0200
@@ -1,6 +1,6 @@
#! /usr/local/bin/perl -w
#
-# $Id: md5,v 1.2 2004/02/15 02:15:48 lackas Exp $
+# $Id$
#
use strict;
my $PP = 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/tools/md5-bench.pl
new/Digest-Perl-MD5-1.9/tools/md5-bench.pl
--- old/Digest-Perl-MD5-1.8/tools/md5-bench.pl 2004-02-15 01:55:02.000000000
+0100
+++ new/Digest-Perl-MD5-1.9/tools/md5-bench.pl 2013-04-11 11:20:14.000000000
+0200
@@ -1,5 +1,5 @@
#!/usr/local/bin/perl -w
-# $Id: md5-bench.pl,v 1.5 2004/02/15 00:55:02 lackas Exp $
+# $Id$
# Benchmark
# compares Digest::Perl::MD5 and Digest::MD5
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Digest-Perl-MD5-1.8/tools/md5-test.pl
new/Digest-Perl-MD5-1.9/tools/md5-test.pl
--- old/Digest-Perl-MD5-1.8/tools/md5-test.pl 2000-09-17 17:53:47.000000000
+0200
+++ new/Digest-Perl-MD5-1.9/tools/md5-test.pl 2013-04-11 11:20:14.000000000
+0200
@@ -1,5 +1,5 @@
#!/usr/bin/perl -w
-# $Id: md5-test.pl,v 1.4 2000/09/17 15:53:47 lackas Exp $
+# $Id$
# Compare results from Digest::Perl::MD5 with Digest::MD5
# Press Ctrl-C to stop the test (on Unix)
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]