Skip Menu |

This queue is for tickets about the IO-Socket-SSL CPAN distribution.

Report information
The Basics
Id: 72170
Status: resolved
Priority: 0/
Queue: IO-Socket-SSL

People
Owner: Nobody in particular
Requestors: w.phillip.moore [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 1.48
Fixed in: (no value)



Subject: t/memleak_bad_handshake.t hangs on AIX 6
Building 1.48 on AIX 6, for perl5.10.1, 5.12.4, and 5.14.2, I've found that the t/memleak_bad_handshake.t tests will hang, and I've been unable to determine why. Oddly, the tests hangs when run via the test_harness(), but not when run directly. That is, this fails: PERL_DL_NONLAZY=1 /efs/dist/perl5/core/5.14/.exec/powerpc64.aix.6/bin/perl "- MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/memleak_bad_handshake.t But this does not: perl -Mblib t/memleak_bad_handshake.t I've done some digging, but I can't find a root cause for this. Considering the context of WHAT this test is verifying, I simply patched the test not to run on AIX. I don't know if this is an acceptable workaround or not, but considering that the test skip a lot of other platforms, it seems reasonable: diff -rc ../IO-Socket-SSL-1.48-orig/t/memleak_bad_handshake.t ./t/memleak_bad_handshake.t *** ../IO-Socket-SSL-1.48-orig/t/memleak_bad_handshake.t Wed Mar 17 07:35:24 2010 --- ./t/memleak_bad_handshake.t Fri Nov 4 09:09:28 2011 *************** *** 10,15 **** --- 10,20 ---- use Errno qw(EAGAIN EINPROGRESS ); use strict; + if ( $^O =~ m{AIX}i ) { + print "1..0 # Skipped: this tests hangs on AIX\n"; + exit + } + if ( grep { $^O =~m{$_}i } qw( MacOS VOS vmesa riscos amigaos mswin32) ) { print "1..0 # Skipped: ps not implemented on this platform\n"; exit
FYI - Same for AIX-5.3 So maybe change the title to "t/memleak_bad_handshake.t hangs on AIX"
Show quoted text
> + if ( $^O =~ m{AIX}i ) { > + print "1..0 # Skipped: this tests hangs on AIX\n"; > + exit > + } > +
I've added something like this to version 1.51. Thanks for reporting the bug.