Package: libnet-ssleay-perl
Version: 1.30-1
Severity: normal
Tags: patch

When the underlying TCP connection gets broken and the SIGPIPE signal is
blocked, the ssl_write_all method loops forever instead of reporting the
error properly.

Below is my attempt to fix the problem.

-- System Information:
Debian Release: 4.0
  APT prefers stable
  APT policy: (500, 'stable')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.20-kamsmp
Locale: LANG=C, LC_CTYPE=cs_CZ (charmap=ISO-8859-2)

Versions of packages libnet-ssleay-perl depends on:
ii  libc6                       2.3.6.ds1-13 GNU C Library: Shared libraries
ii  libssl0.9.8                 0.9.8c-4     SSL shared libraries
ii  perl                        5.8.8-7      Larry Wall's Practical Extraction 
ii  perl-base [perlapi-5.8.7]   5.8.8-7      The Pathologically Eclectic Rubbis

libnet-ssleay-perl recommends no packages.

-- no debconf information


--- /usr/lib/perl5/Net/SSLeay.pm.mj     2007-06-29 22:12:18.000000000 +0200
+++ /usr/lib/perl5/Net/SSLeay.pm        2007-06-29 22:17:37.000000000 +0200
@@ -1659,9 +1659,10 @@
        }
        $vm = $trace>2 && $linux_debug ?
            (split ' ', `cat /proc/$$/stat`)[22] : 'vm_unknown';
        warn "  written so far $wrote:$written bytes (VM=$vm)\n" if $trace>2;
        
        $errs .= print_errs('SSL_write');
+       $errs .= "SSL_write $$: 1 - $!\n" if $wrote < 0 && !$errs;
        return (wantarray ? (undef, $errs) : undef) if $errs;
     }
     return wantarray ? ($written, $errs) : $written;


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to