[perl #21364] : blead perl segfault in Inline

This is a bug report for perl from david.dyck@fluke.com,
generated with the help of perlbug 1.34 running under perl v5.9.0.


-----------------------------------------------------------------
[Please enter your report here]


I rebuild and installed Inline (Inline-0.44)
(had some problems getting make test to complete
but that's another story)

With an installed Inline and Inline::C the
following code seg faults.

$ perl -MInline=_CONFIG_ -e1 /tmp/_Inline
Segmentation fault

GDB reports:

dd:Inline-0.44$ gdb /usr/local/bin/perl
GDB is free software and you are welcome to distribute copies of it
 under certain conditions; type "show copying" to see the conditions.
There is absolutely no warranty for GDB; type "show warranty" for details.
GDB 4.14 (i486-slackware-linux),
Copyright 1995 Free Software Foundation, Inc...
(gdb) run -MInline=_CONFIG_ -e1 /tmp/_Inline
Starting program: /usr/local/bin/perl -MInline=_CONFIG_ -e1 /tmp/_Inline

Program received signal SIGSEGV, Segmentation fault.
0x401772e4 in PerlIO_fd_refcnt ()
(gdb) where
#0  0x401772e4 in PerlIO_fd_refcnt ()
#1  0x40182cbc in PerlIO_fd_refcnt ()
#2  0x4017be22 in PerlIO_fd_refcnt ()
#3  0x4013a869 in PerlIO_fd_refcnt ()
#4  0x4012270d in PerlIO_fd_refcnt ()
#5  0x40122600 in PerlIO_fd_refcnt ()
#6  0x40122cf6 in PerlIO_fd_refcnt ()
#7  0x401211f8 in PerlIO_fd_refcnt ()
#8  0x40122a78 in PerlIO_fd_refcnt ()
#9  0x40121277 in PerlIO_fd_refcnt ()
#10 0x4011e5fe in PerlIO_fd_refcnt ()
#11 0x4012ee6b in PerlIO_fd_refcnt ()
#12 0x4012f31d in PerlIO_fd_refcnt ()
#13 0x4012fb5b in PerlIO_fd_refcnt ()
#14 0x40130667 in PerlIO_fd_refcnt ()
#15 0x40130286 in PerlIO_fd_refcnt ()
#16 0x4012ff45 in PerlIO_fd_refcnt ()
#17 0x40130060 in PerlIO_fd_refcnt ()
#18 0x40146515 in PerlIO_fd_refcnt ()
#19 0x4012270d in PerlIO_fd_refcnt ()
#20 0x40122600 in PerlIO_fd_refcnt ()
#21 0x401224ef in PerlIO_fd_refcnt ()
#22 0x4010359c in PerlIO_fd_refcnt ()
#23 0x40103639 in PerlIO_fd_refcnt ()
#24 0x40130962 in PerlIO_fd_refcnt ()
#25 0x4012fec2 in PerlIO_fd_refcnt ()
#26 0x4013405d in PerlIO_fd_refcnt ()
#27 0x40133d5c in PerlIO_fd_refcnt ()
#28 0x400fe9d5 in PerlIO_fd_refcnt ()
#29 0x400ff82f in PerlIO_fd_refcnt ()
#30 0x80bc023 in Perl_pp_entersub () at pp_hot.c:2723
#31 0x80a675d in Perl_runops_debug () at dump.c:1423
#32 0x80635b5 in S_call_body (myop=0xbffff248, is_eval=0) at perl.c:1942
#33 0x8060283 in Perl_call_sv (sv=0x814b894, flags=6) at perl.c:1860
#34 0x8063601 in S_call_list_body (cv=0x814b894) at perl.c:4024
#35 0x8062819 in Perl_call_list (oldscope=1, paramList=0x814b948)
    at perl.c:3953
#36 0x8090133 in Perl_newATTRSUB (floor=103, o=0x814e118, proto=0x0,
    attrs=0x0, block=0x814e038) at op.c:4197
#37 0x808bf38 in Perl_utilize (aver=1, floor=103, version=0x0, id=0x81449f0,
    arg=0x8142598) at op.c:2855
#38 0x8085aac in Perl_yyparse () at perly.y:412
#39 0x805f960 in S_parse_body (env=0x0, xsinit=0x805ccfc <xs_init>)
    at perl.c:1422
#40 0x805ee51 in perl_parse (my_perl=0x813e7a8, xsinit=0x805ccfc <xs_init>,
    argc=4, argv=0xbffff464, env=0x0) at perl.c:929
#41 0x805ccc4 in main (argc=4, argv=0xbffff464, env=0xbffff478)
    at perlmain.c:83
#42 0x805cbbe in ___crt_dummy__ ()


[Please do not change anything below this line]
-----------------------------------------------------------------
---
Flags:
    category=core
    severity=high
---
Site configuration information for perl v5.9.0:

Configured by dcd at Mon Feb 24 22:14:00 PST 2003.

Summary of my perl5 (revision 5.0 version 9 subversion 0 patch 18768) configuration:
  Platform:
    osname=linux, osvers=2.4.21-pre4, archname=i686-linux
    uname='linux dd 2.4.21-pre4 #1 wed jan 29 10:34:02 pst 2003 i686 '
    config_args='-Dmksymlinks -Dinstallusrbinperl -Uversiononly -Dusedevel -Doptimize=-O3 -g -de -Dcf_email=david.dyck@fluke.com'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef useithreads=undef usemultiplicity=undef
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O3 -g',
    cppflags='-DDEBUGGING -fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='egcs-2.91.66.1 19990314/Linux (egcs-1.1.2 release)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lgdbm -ldbm -ldb -ldl -lm -lc
    perllibs=-ldl -lm -lc
    libc=/lib/libc.so.5.4.44, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'

Locally applied patches:
    DEVEL18374

---
@INC for perl v5.9.0:
    /usr/local/lib/perl5/5.9.0/i686-linux
    /usr/local/lib/perl5/5.9.0
    /usr/local/lib/perl5/site_perl/5.9.0/i686-linux
    /usr/local/lib/perl5/site_perl/5.9.0
    /usr/local/lib/perl5/site_perl
    .

---
Environment for perl v5.9.0:
    HOME=/home/dcd
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=/home/dcd/bin:/sbin:/usr/local/bin:/bin:/usr/bin:/usr/X11/bin:/usr/games:/usr/local/samba:/home/hobbes/tools/scripts:/home/hobbes/tools/linux:/usr0/hobbes/tools/scripts:/usr0/dcd/bin:/apps/general/bin:/usr/public
    PERL_BADLANG (unset)
    SHELL=/bin/bash

• [perl #21364] : blead perl segfault in Inline by David Dyck
• Re: [perl #21364] : blead perl segfault in Inline (happens in 5.8.1 also) by David Dyck