Your message dated Wed, 1 Jun 2011 22:32:14 +0100
with message-id <[email protected]>
and subject line Re: Bug#164615: perl: "perl -wle 'open(FUN, "<&STDOUT")' 1<
wow" causes segfault
has caused the Debian Bug report #164615,
regarding perl: "perl -wle 'open(FUN, "<&STDOUT")' 1< wow" causes segfault
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.)
--
164615: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=164615
Debian Bug Tracking System
Contact [email protected] with problems
--- Begin Message ---
Package: perl
Version: 5.8.0-13
Severity: normal
Hi,
A very similar line is used in amavis-ng's Qmail.pm, where STDOUT is a read
handle due to an oddity of the qmail-queue program.
An ltrace shows the bug in perl:
fileno(0x0030d1e0) = 1
dup(1, 0x0030d1e0, 0x08148cc8, 0, 2) = 3
fdopen(3, 0xb96bb8b4, 0x0030d1e0, 0x0025b05e, 0x08134440) = 0
fileno(0 <unfinished ...>
--- SIGSEGV (Segmentation fault) ---
+++ killed by SIGSEGV +++
perl shouldn't attempt the fileno() call after fdopen returned NULL.
Andrew
--
Andrew Korn (Korn Andras) <[email protected]>
Finger [email protected] for pgp key. QOTD:
Once upon a time, there were two Chinamen. Now look how many there are.
-- System Information
Debian Release: testing/unstable
Kernel Version: Linux chardonnay 2.4.18-ak1.2.1-chardonnay #1 Thu Apr 11
15:48:31 CEST 2002 i686 AMD Athlon(tm) Processor AuthenticAMD GNU/Linux
Versions of the packages perl depends on:
ii libc6 2.2.5-15 GNU C Library: Shared libraries and Timezone
ii libdb4.0 4.0.14-1 Berkeley v4.0 Database Libraries [runtime]
ii libgdbmg1 1.7.3-27.1 GNU dbm database routines (runtime version).
ii perl-base 5.8.0-13 The Pathologically Eclectic Rubbish Lister.
ii perl-modules 5.8.0-13 Core Perl modules.
--- End Message ---
--- Begin Message ---
Version: 5.10.1-17
On Fri, Mar 30, 2007 at 01:56:31PM +0300, Niko Tyni wrote:
> found 164615 5.8.8-7
> thanks
>
> On Sun, Oct 13, 2002 at 09:24:09PM -0000, KORN Andras wrote:
>
> > fileno(0x0030d1e0) = 1
> > dup(1, 0x0030d1e0, 0x08148cc8, 0, 2) = 3
> > fdopen(3, 0xb96bb8b4, 0x0030d1e0, 0x0025b05e, 0x08134440) = 0
> > fileno(0 <unfinished ...>
> > --- SIGSEGV (Segmentation fault) ---
> > +++ killed by SIGSEGV +++
> >
> > perl shouldn't attempt the fileno() call after fdopen returned NULL.
>
> This is still present in 5.8.8-7 with PERLIO=stdio.
>
> % PERLIO=stdio perl -e 'open(F, "<&STDOUT")' 1< /dev/null
> zsh: segmentation fault PERLIO=stdio perl -e 'open(F, "<&STDOUT")' 1<
> /dev/null
And also in 5.10.0-19lenny3, but not 5.10.1-17. Nothing on the upstream
bug report. Couldn't find an obvious source change to explain it, but
never mind.
--
Dominic Hargreaves | http://www.larted.org.uk/~dom/
PGP key 5178E2A5 from the.earth.li (keyserver,web,email)
--- End Message ---
