r39195 - in /branches/upstream/libio-socket-ssl-perl/current: Changes META.yml SSL.pm t/nonblock.t

[carnil-guest at users.alioth.debian.org]

Author: carnil-guest
Date: Fri Jul  3 08:57:18 2009
New Revision: 39195

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39195
Log:
[svn-upgrade] Integrating new upstream version, libio-socket-ssl-perl (1.25)

Modified:
    branches/upstream/libio-socket-ssl-perl/current/Changes
    branches/upstream/libio-socket-ssl-perl/current/META.yml
    branches/upstream/libio-socket-ssl-perl/current/SSL.pm
    branches/upstream/libio-socket-ssl-perl/current/t/nonblock.t

Modified: branches/upstream/libio-socket-ssl-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-ssl-perl/current/Changes?rev=39195&op=diff
==============================================================================
--- branches/upstream/libio-socket-ssl-perl/current/Changes (original)
+++ branches/upstream/libio-socket-ssl-perl/current/Changes Fri Jul  3 08:57:18 2009
@@ -1,3 +1,7 @@
+
+v1.25 2009.07.02
+- t/nonblock.t: increase number of bytes written to fix bug with OS X 10.5
+  https://rt.cpan.org/Ticket/Display.html?id=47240
 
 v1.24 2009.04.01
 - add verify hostname scheme ftp, same as http

Modified: branches/upstream/libio-socket-ssl-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-ssl-perl/current/META.yml?rev=39195&op=diff
==============================================================================
--- branches/upstream/libio-socket-ssl-perl/current/META.yml (original)
+++ branches/upstream/libio-socket-ssl-perl/current/META.yml Fri Jul  3 08:57:18 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                IO-Socket-SSL
-version:             1.24
+version:             1.25
 abstract:            Nearly transparent SSL encapsulation for IO::Socket::INET.
 license:             ~
 author:              

Modified: branches/upstream/libio-socket-ssl-perl/current/SSL.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-ssl-perl/current/SSL.pm?rev=39195&op=diff
==============================================================================
--- branches/upstream/libio-socket-ssl-perl/current/SSL.pm (original)
+++ branches/upstream/libio-socket-ssl-perl/current/SSL.pm Fri Jul  3 08:57:18 2009
@@ -66,7 +66,7 @@
 	}) {
 		@ISA = qw(IO::Socket::INET);
 	}
-	$VERSION = '1.24';
+	$VERSION = '1.25';
 	$GLOBAL_CONTEXT_ARGS = {};
 
 	#Make $DEBUG another name for $Net::SSLeay::trace

Modified: branches/upstream/libio-socket-ssl-perl/current/t/nonblock.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-ssl-perl/current/t/nonblock.t?rev=39195&op=diff
==============================================================================
--- branches/upstream/libio-socket-ssl-perl/current/t/nonblock.t (original)
+++ branches/upstream/libio-socket-ssl-perl/current/t/nonblock.t Fri Jul  3 08:57:18 2009
@@ -161,7 +161,7 @@
 	}
 
 	# send some data
-	# we send up to 100000 bytes, server reads first 10 bytes and then sleeps
+	# we send up to 500000 bytes, server reads first 10 bytes and then sleeps
 	# before reading more. In total server only reads 30000 bytes 
 	# the sleep will cause the internal buffers to fill up so that the syswrite
 	# should return with EAGAIN+SSL_WANT_WRITE.
@@ -171,7 +171,7 @@
 	$attempts = 0;
 	my $bytes_send = 0;
 
-	# set send buffer to 8192 so it will definitly fail writing all 100000 bytes in it
+	# set send buffer to 8192 so it will definitly fail writing all 500000 bytes in it
 	# linux allocates twice as much (see tcp(7)) but it's small enough anyway
 	eval q{ 
 	    setsockopt( $to_server, SOL_SOCKET, SO_SNDBUF, pack( "I",8192 ));
@@ -184,7 +184,7 @@
 	}
 
 	WRITE:
-	for( my $i=0;$i<10000;$i++ ) {
+	for( my $i=0;$i<50000;$i++ ) {
 	    my $offset = 0;
 	    while (1) {
 		my $n = syswrite( $to_server,$msg,length($msg)-$offset,$offset );