Your message dated Sat, 07 Aug 2010 07:56:58 +0000
with message-id <[email protected]>
and subject line Bug#591462: fixed in libwww-perl 5.813-1+lenny1
has caused the Debian Bug report #591462,
regarding libwww-perl: redo; outside the scope of the module
(LWP/Protocol/http.pm)
to be marked as done.
This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.
(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact [email protected]
immediately.)
--
591462: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=591462
Debian Bug Tracking System
Contact [email protected] with problems
--- Begin Message ---
Package: libwww-perl
Version: 5.813-1
Severity: normal
Tags: patch
Here is how to reproduce :
#!/usr/bin/perl -w
use strict;
use LWP::UserAgent;
use Switch;
my $browser = LWP::UserAgent->new();
sub called_once {
my $url = "http://www.lighttpd.net/"; . "/"x2**16;
print STDERR "1\n";
my $res = $browser->get($url);
print STDERR "2\n";
}
my $arg = "bug";
switch($arg) {
case "bug" {
&called_once;
}
}
Here is how it is corrected in squeeze's libwww-perl :
--- http-lenny.pm 2010-08-03 12:08:02.562469636 +0200
+++ http-as-in-squeeze.pm 2010-08-03 12:11:56.218409712 +0200
@@ -203,15 +203,16 @@
#print "------\n$req_buf\n------\n";
if (!$has_content || $write_wait || $has_content > 8*1024) {
- do {
+ WRITE:
+ {
# Since this just writes out the header block it should almost
# always succeed to send the whole buffer in a single write call.
my $n = $socket->syswrite($req_buf, length($req_buf));
unless (defined $n) {
- redo if $!{EINTR};
+ redo WRITE if $!{EINTR};
if ($!{EAGAIN}) {
select(undef, undef, undef, 0.1);
- redo;
+ redo WRITE;
}
die "write failed: $!";
}
@@ -221,8 +222,8 @@
else {
select(undef, undef, undef, 0.5);
}
+ redo WRITE if length $req_buf;
}
- while (length $req_buf);
}
my($code, $mess, @junk);
-- System Information:
Debian Release: 5.0.4
APT prefers stable
APT policy: (500, 'stable')
Architecture: i386 (i686)
Kernel: Linux 2.6.32.15-grsec-vs (SMP w/4 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8) (ignored: LC_ALL
set to en_US.UTF-8)
Shell: /bin/sh linked to /bin/bash
Versions of packages libwww-perl depends on:
ii libhtml-parser-perl 3.56-1+lenny1 A collection of modules that parse
ii libhtml-tagset-perl 3.20-2 Data tables pertaining to HTML
ii libhtml-tree-perl 3.23-1 represent and create HTML syntax t
ii liburi-perl 1.35.dfsg.1-1 Manipulates and accesses URI strin
ii netbase 4.34 Basic TCP/IP networking system
ii perl [libdigest-md5-perl 5.10.0-19lenny2 Larry Wall's Practical Extraction
Versions of packages libwww-perl recommends:
ii libcompress-zlib-perl 2.012-1 Perl module for creation and manip
ii libhtml-format-perl 2.04-2 format HTML syntax trees into text
ii libmailtools-perl 2.03-1 Manipulate email in perl programs
Versions of packages libwww-perl suggests:
ii libio-socket-ssl-perl 1.16-1+lenny1 Perl module implementing object or
-- no debconf information
--- End Message ---
--- Begin Message ---
Source: libwww-perl
Source-Version: 5.813-1+lenny1
We believe that the bug you reported is fixed in the latest version of
libwww-perl, which is due to be installed in the Debian FTP archive:
libwww-perl_5.813-1+lenny1.diff.gz
to main/libw/libwww-perl/libwww-perl_5.813-1+lenny1.diff.gz
libwww-perl_5.813-1+lenny1.dsc
to main/libw/libwww-perl/libwww-perl_5.813-1+lenny1.dsc
libwww-perl_5.813-1+lenny1_all.deb
to main/libw/libwww-perl/libwww-perl_5.813-1+lenny1_all.deb
A summary of the changes between this version and the previous one is
attached.
Thank you for reporting the bug, which will now be closed. If you
have further comments please address them to [email protected],
and the maintainer will reopen the bug report if appropriate.
Debian distribution maintenance software
pp.
Ansgar Burchardt <[email protected]> (supplier of updated libwww-perl package)
(This message was generated automatically at their request; if you
believe that there is a problem with it please contact the archive
administrators by mailing [email protected])
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA256
Format: 1.8
Date: Sat, 07 Aug 2010 08:20:19 +0900
Source: libwww-perl
Binary: libwww-perl
Architecture: source all
Version: 5.813-1+lenny1
Distribution: stable
Urgency: low
Maintainer: Debian Perl Group <[email protected]>
Changed-By: Ansgar Burchardt <[email protected]>
Description:
libwww-perl - WWW client/server library for Perl (aka LWP)
Closes: 591462
Changes:
libwww-perl (5.813-1+lenny1) stable; urgency=low
.
* Fix incorrect use of redo. (Closes: #591462)
Checksums-Sha1:
4819fa3c0cf4dc0374ec4695470768e3a135381c 2143 libwww-perl_5.813-1+lenny1.dsc
a708452dea4c882422508bcbca2e5152f313433d 9631
libwww-perl_5.813-1+lenny1.diff.gz
733e2420fa83eda48abb82abbaf14f3ea48acc8d 370806
libwww-perl_5.813-1+lenny1_all.deb
Checksums-Sha256:
fe717d4bcdd35c679b712f9059e1f744bde782b4ab976c28ff0423eddd9eb232 2143
libwww-perl_5.813-1+lenny1.dsc
f0cbcd8a6af3a090a88aa6b7c619ac7a99f33d4b6cad401641dd322f23d30d68 9631
libwww-perl_5.813-1+lenny1.diff.gz
011a17905a69bff1244f089d3987b4dc1f440628dc29a5cdf1dc4ca8e57dbc2a 370806
libwww-perl_5.813-1+lenny1_all.deb
Files:
d63ff1e4412ba5ae3f13870f91b13678 2143 perl optional
libwww-perl_5.813-1+lenny1.dsc
d584d11165432fa23e1fe1f3c61dbb05 9631 perl optional
libwww-perl_5.813-1+lenny1.diff.gz
d99be8a9e4d9a5893e9c2d056f98c4c0 370806 perl optional
libwww-perl_5.813-1+lenny1_all.deb
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.10 (GNU/Linux)
iQIcBAEBCAAGBQJMXKfzAAoJELs6aAGGSaoGTmQP/1V04hpeP7Z0pSZWSlkGk6JL
Kqy0Ofy0/QX7p/QMuNl8xYFhHxfwCmRbFJGAfDg0bV2iAr4tzBvRQsP7hBhRMP0o
DdY0NibE0jdGBGC3+MIWlYGPtbAwVtDvvND+FrtJVuE1jX9ZX/PxnRvG5oaMp8xv
eGTd6+RbwVMZ/6/jHNHCZl1N8xT/O2cb6ACGQV9Fb10onp3/NwHaaVb6uKm2LZ5U
vJQse9+KlKdeBpVD1pCHIFyVU25H+42FBIm5WrMGCjpKK/yzJvQ68elcCVIvsDqT
EswO7RrOY8a6e6rfYucUMCllA4LCzbuujsRE7bHM7GGuHHl0utLUoKxk0xZcgea3
e1YCWhQKfJ+Oluk/wj/N1WYJ8AKqUva6RxUl/HjSMf4aq/1ZAuhQVtpFZOQ0cmcW
tRKgIeBEpI1arZ2OoK+lqVp78t6Yf42VLl1xUX6wU2+dnUxQSq5i4+dRdmM5gd7h
M0MIyac/vGT8E/pHNR9lY9Gjk/ufUm6kSYeVnnLXq43S0+YWZACGPoUd4uTgBnTL
CG2ygsbG9fduLtHEfEAK6ZFbKKEZ6iW1+AmJM8tpbcUW/qQ2zFAwRaaXCsalk9hp
+yM3dBE7jGUGUT/m2Qi58NLbglJOiMY/zqDeqRjEkC2xC/qDIDyyQUSbKSuY1/c1
NSiQzpdz0zwIwC/zBv/Q
=x8uJ
-----END PGP SIGNATURE-----
--- End Message ---
