r57876 - in /branches/upstream/libnetaddr-ip-perl/current: Changes IP.pm Lite/Util/Changes Lite/Util/README Lite/Util/Util.pm Lite/Util/Util.xs META.yml
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Fri May 14 00:51:37 UTC 2010
Author: jawnsy-guest
Date: Fri May 14 00:51:31 2010
New Revision: 57876
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=57876
Log:
[svn-upgrade] Integrating new upstream version, libnetaddr-ip-perl (4.028+dfsg)
Modified:
branches/upstream/libnetaddr-ip-perl/current/Changes
branches/upstream/libnetaddr-ip-perl/current/IP.pm
branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Changes
branches/upstream/libnetaddr-ip-perl/current/Lite/Util/README
branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.pm
branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.xs
branches/upstream/libnetaddr-ip-perl/current/META.yml
Modified: branches/upstream/libnetaddr-ip-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/Changes?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/Changes (original)
+++ branches/upstream/libnetaddr-ip-perl/current/Changes Fri May 14 00:51:31 2010
@@ -1,4 +1,14 @@
Revision history for Perl extension NetAddr::IP
+
+4.028 Wed May 12 14:18:20 PDT 2010
+ In /Lite/Util/Util.xs v1.32,
+ changed netswap() to postincrement
+ *a++ = to *a and added increment after save to mollify some
+ picky compilers that return possible undefined behavior.
+
+ changed type of _128x10 to 'void'
+
+ Thanks to David Bolt <dbolt at davjam.org> for the above two patches
4.027 Tue Jun 9 10:31:11 PDT 2009
In NetAddr::IP::Util v1.31,
Modified: branches/upstream/libnetaddr-ip-perl/current/IP.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/IP.pm?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/IP.pm (original)
+++ branches/upstream/libnetaddr-ip-perl/current/IP.pm Fri May 14 00:51:31 2010
@@ -5,7 +5,7 @@
use strict;
#use diagnostics;
use NetAddr::IP::Lite 1.13 qw(Zero Zeros Ones V4mask V4net);
-use NetAddr::IP::Util 1.30 qw(
+use NetAddr::IP::Util 1.32 qw(
sub128
inet_aton
inet_any2n
@@ -34,7 +34,7 @@
@ISA = qw(Exporter NetAddr::IP::Lite);
-$VERSION = do { sprintf " %d.%03d", (q$Revision: 4.27 $ =~ /\d+/g) };
+$VERSION = do { sprintf " %d.%03d", (q$Revision: 4.28 $ =~ /\d+/g) };
=pod
@@ -1531,7 +1531,7 @@
=head1 LICENSE
This software is (c) Luis E. Muñoz, 1999 - 2007, and (c) Michael
-Robinton, 2006 - 2008. It can be used under the terms of the Perl
+Robinton, 2006 - 2010. It can be used under the terms of the Perl
artistic license provided that proper credit for the work of the
authors is preserved in the form of this copyright notice and license
for this module.
Modified: branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Changes?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Changes (original)
+++ branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Changes Fri May 14 00:51:31 2010
@@ -1,4 +1,12 @@
Revision history for Perl extension NetAddr::IP::Util
+
+1.32 Wed May 12 14:18:20 PDT 2010
+ In Util.xs,
+ changed netswap() to postincrement
+ *a++ = to *a and added increment after save to mollify some
+ picky compilers that return possible undefined behavior.
+
+ changed type of _128x10 to 'void'
1.31 Tue Jun 9 10:31:11 PDT 2009
ferret out shell value for Makefile.PL when calling
Modified: branches/upstream/libnetaddr-ip-perl/current/Lite/Util/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/Lite/Util/README?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/Lite/Util/README (original)
+++ branches/upstream/libnetaddr-ip-perl/current/Lite/Util/README Fri May 14 00:51:31 2010
@@ -439,7 +439,7 @@
us.
COPYRIGHT
- Copyright 2003 - 2008, Michael Robinton <michael at bizsystems.com>
+ Copyright 2003 - 2010, Michael Robinton <michael at bizsystems.com>
LICENSE AND WARRANTY
Modified: branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.pm?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.pm (original)
+++ branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.pm Fri May 14 00:51:31 2010
@@ -13,7 +13,7 @@
@ISA = qw(Exporter DynaLoader);
-$VERSION = do { my @r = (q$Revision: 1.31 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = do { my @r = (q$Revision: 1.32 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
@EXPORT_OK = qw(
inet_aton
@@ -746,7 +746,7 @@
=head1 COPYRIGHT
-Copyright 2003 - 2008, Michael Robinton E<lt>michael at bizsystems.comE<gt>
+Copyright 2003 - 2010, Michael Robinton E<lt>michael at bizsystems.comE<gt>
LICENSE AND WARRANTY
Modified: branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.xs
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.xs?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.xs (original)
+++ branches/upstream/libnetaddr-ip-perl/current/Lite/Util/Util.xs Fri May 14 00:51:31 2010
@@ -1,6 +1,6 @@
/*
- * Copyright 2006, Michael Robinton <michael at bizsystems.com>
+ * Copyright 2006 - 2010, Michael Robinton <michael at bizsystems.com>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
@@ -237,8 +237,9 @@
#ifdef host_is_LITTLE_ENDIAN
register u_int32_t * a = ap;
for (/* -- */;len >0;len--) {
- *a++ = (((*a & 0xff000000) >> 24) | ((*a & 0x00ff0000) >> 8) | \
+ *a = (((*a & 0xff000000) >> 24) | ((*a & 0x00ff0000) >> 8) | \
((*a & 0x0000ff00) << 8) | ((*a & 0x000000ff) << 24));
+ a++;
}
#endif
}
@@ -292,7 +293,7 @@
/* multiply 128 bit number X10
*/
-int
+void
_128x10(n128 * ap128, n128 * tp128)
{
register u_int32_t * ap = ap128->u, * tp = tp128->u;
Modified: branches/upstream/libnetaddr-ip-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnetaddr-ip-perl/current/META.yml?rev=57876&op=diff
==============================================================================
--- branches/upstream/libnetaddr-ip-perl/current/META.yml (original)
+++ branches/upstream/libnetaddr-ip-perl/current/META.yml Fri May 14 00:51:31 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: NetAddr-IP
-version: 4.027
+version: 4.028
abstract: Manages IPv4 and IPv6 addresses and subnets
license: ~
author:
More information about the Pkg-perl-cvs-commits
mailing list