r25361 - in /branches/upstream/libphp-serialization-perl/current: Changes MANIFEST META.yml lib/PHP/Serialization.pm t/02basic.t t/04arraysRT21218.t t/05RT24441.t

ansgar-guest at users.alioth.debian.org ansgar-guest at users.alioth.debian.org
Fri Sep 19 12:53:32 UTC 2008


Author: ansgar-guest
Date: Fri Sep 19 12:53:29 2008
New Revision: 25361

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=25361
Log:
[svn-upgrade] Integrating new upstream version, libphp-serialization-perl (0.29)

Added:
    branches/upstream/libphp-serialization-perl/current/t/04arraysRT21218.t
    branches/upstream/libphp-serialization-perl/current/t/05RT24441.t
Modified:
    branches/upstream/libphp-serialization-perl/current/Changes
    branches/upstream/libphp-serialization-perl/current/MANIFEST
    branches/upstream/libphp-serialization-perl/current/META.yml
    branches/upstream/libphp-serialization-perl/current/lib/PHP/Serialization.pm
    branches/upstream/libphp-serialization-perl/current/t/02basic.t

Modified: branches/upstream/libphp-serialization-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/Changes?rev=25361&op=diff
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/Changes (original)
+++ branches/upstream/libphp-serialization-perl/current/Changes Fri Sep 19 12:53:29 2008
@@ -1,15 +1,24 @@
 Revision history for Perl extension PHP::Serialization
 
+0.29  2008-09-17
+ - Fix bug with negative numbers, RT#6402, patch from
+   <tom [...] eborcom.com>
+ - Add TODO test for RT21218
+ - Add TODO test for RT24441
+
 0.28
- - Fix RT#6112 - serializing long integers comes out as -1 on the PHP end
-   patch from <kcivey at cpcug.org>.
- - Add test for the issue above.
- - Fix POD as noted in RT#6113.
- - Only require perl 5.6 in Makefile.PL (RT#17034)
+ - Serializing long integers comes out  as -1 on the PHP end 
+   as noted in RT#6112 patch from <kcivey [...] cpcug.org>.
+ - Add test for the issue above (t0m).
+ - Fix POD as noted in RT#6113 by MCMAHON.
+ - Only require perl 5.6 in Makefile.PL as noted in RT#17034
+   by <kcivey [...] cpcug.org>
 
 0.27
- - Fixed versioning (internal lib version was .26, was reporting as .25 in previous version)
- - Fixed array serialization/unserialization issues due to incorrect element counts
+ - Fixed versioning (internal lib version was .26, was reporting 
+   as .25 in previous version)
+ - Fixed array serialization/unserialization issues due to 
+   incorrect element counts
  - Fixed overly restrictive perl version requirement
  - Fixed formatting issues in the documentation
 

Modified: branches/upstream/libphp-serialization-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/MANIFEST?rev=25361&op=diff
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/MANIFEST (original)
+++ branches/upstream/libphp-serialization-perl/current/MANIFEST Fri Sep 19 12:53:29 2008
@@ -6,4 +6,6 @@
 t/01use.t
 t/02basic.t
 t/03largeints.t
+t/04arraysRT21218.t
+t/05RT24441.t
 META.yml                                 Module meta-data (added by MakeMaker)

Modified: branches/upstream/libphp-serialization-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/META.yml?rev=25361&op=diff
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/META.yml (original)
+++ branches/upstream/libphp-serialization-perl/current/META.yml Fri Sep 19 12:53:29 2008
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                PHP-Serialization
-version:             0.28
+version:             0.29
 abstract:            simple flexible means of converting the output of PHP's serialize() into the equivalent Perl memory structure, and vice versa.
 license:             ~
 author:              

Modified: branches/upstream/libphp-serialization-perl/current/lib/PHP/Serialization.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/lib/PHP/Serialization.pm?rev=25361&op=diff
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/lib/PHP/Serialization.pm (original)
+++ branches/upstream/libphp-serialization-perl/current/lib/PHP/Serialization.pm Fri Sep 19 12:53:29 2008
@@ -5,7 +5,7 @@
 
 use vars qw/$VERSION @ISA @EXPORT_OK/;
 
-$VERSION = '0.28';
+$VERSION = '0.29';
 	
 @ISA = qw(Exporter);	
 @EXPORT_OK = qw(unserialize serialize);
@@ -267,7 +267,7 @@
 	my $string;
 	while ( 1 ) {
 		my $char = $self->_readchar();
-		if ( $char !~ /^[\d\.]+$/ ) {
+		if ( $char !~ /^[\d\.-]+$/ ) {
 			$$cursor--;
 			last;
 		}
@@ -369,6 +369,8 @@
 Copyright (c) 2003 Jesse Brown <jbrown at cpan.org>. All rights reserved. This program is free software; 
 you can redistribute it and/or modify it under the same terms as Perl itself.
 
+Various patches contributed by assorted authors on rt.cpan.org (as detailed in Changes file).
+
 Currently maintained by Tomas Doran <bobtfish at bobtfish.net>.
 
 =cut

Modified: branches/upstream/libphp-serialization-perl/current/t/02basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/t/02basic.t?rev=25361&op=diff
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/t/02basic.t (original)
+++ branches/upstream/libphp-serialization-perl/current/t/02basic.t Fri Sep 19 12:53:29 2008
@@ -5,7 +5,8 @@
 use PHP::Serialization qw(unserialize serialize);
 my $data = {
 	this_is_a_test => 1.23,
-	second_test => [1,2,3]
+	second_test => [1,2,3],
+	third_test => -2,
 };
 my $encoded = serialize($data);
 is_deeply($data, unserialize($encoded));

Added: branches/upstream/libphp-serialization-perl/current/t/04arraysRT21218.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/t/04arraysRT21218.t?rev=25361&op=file
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/t/04arraysRT21218.t (added)
+++ branches/upstream/libphp-serialization-perl/current/t/04arraysRT21218.t Fri Sep 19 12:53:29 2008
@@ -1,0 +1,21 @@
+use strict;
+use warnings;
+use Test::More tests => 2;
+
+BEGIN { use_ok('PHP::Serialization') };
+
+my $data = PHP::Serialization::unserialize(
+    q{a:1:{s:3:"lll";a:2:{i:195;a:2:{i:0;i:111;i:1;s:3:"bbb";}i:194;a:2:{i:0;i:222;i:1;s:3:"ccc";}}}}
+);
+{
+    $TODO = 'Not currently sure about the correct representation in this, need to read the PHP manual';
+
+    is_deeply($data,
+        {
+            'lll' => {
+                '195' => {111 => 'bbb'},
+                '194' => {222 => 'ccc'},
+            }
+        }
+    );
+}

Added: branches/upstream/libphp-serialization-perl/current/t/05RT24441.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libphp-serialization-perl/current/t/05RT24441.t?rev=25361&op=file
==============================================================================
--- branches/upstream/libphp-serialization-perl/current/t/05RT24441.t (added)
+++ branches/upstream/libphp-serialization-perl/current/t/05RT24441.t Fri Sep 19 12:53:29 2008
@@ -1,0 +1,18 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use Test::More tests => 2;
+
+BEGIN { use_ok('PHP::Serialization') };
+
+my $str = <DATA>;
+
+eval { PHP::Serialization::unserialize $str };
+
+{
+    local $TODO = 'BUG!';
+    ok(!$@, 'No exception') or warn $@;
+}
+
+__END__
+rand_code|s:32:"13680074cb023d44014946df7c1d7819";ban|a:5:{s:12:"last_checked";i:1165345329;s:9:"ID_MEMBER";i:0;s:2:"ip";s:15:"68.75.16.72";s:3:"ip2";s:15:"195.174.114.197";s:5:"email";s:0:"";}log_time|i:1165345329;timeOnlineUpdated|i:1165344980;old_url|s:64:"http://www.site.com/";USER_AGENT|s:34:"Opera/9.02 (Windows NT 5.1; U; tr)";visual_verification_code|s:5:"WZAPE";just_registered|i:1;




More information about the Pkg-perl-cvs-commits mailing list