develooper Front page | perl.perl5.porters | Postings from March 2016

[perl #127774] segfault in caller()

Thread Next
From:
James E Keenan via RT
Date:
March 24, 2016 00:39
Subject:
[perl #127774] segfault in caller()
Message ID:
rt-4.0.18-6659-1458779937-1657.127774-15-0@perl.org
On Wed Mar 23 17:25:11 2016, mauke- wrote:
> 
> This is a bug report for perl from l.mai@web.de,
> generated with the help of perlbug 1.40 running under perl 5.22.1.
> 
> 
> -----------------------------------------------------------------
> [Please describe your issue here]
> 
> $ perl -e 'END { caller 1 } eval("sub { die }")->()'
> Died at (eval 1) line 1.
> Segmentation fault (core dumped)
> 
> A threaded/debugging 5.22.1 segfaults at pp_ctl.c:1797:
> assert(CopSTASH(cx->blk_oldcop));
> because oldcop is NULL.
> 
> This seems to be fixed in blead (probably due to the context stack
> overhaul?).
> 

Confirmed that blead looks okay on non-threaded, non-debugging builds.

#####
$ ./perl -v | head -2 | tail -1
This is perl 5, version 23, subversion 10 (v5.23.10 (v5.23.9-14-g2ebde1c)) built for x86_64-linux

$ ./perl -e 'END { caller 1 } eval("sub { die }")->()'
Died at (eval 1) line 1.
#####


> If I used bisect.pl right, the crash was introduced with commit
> 515abc43ad7e359e9f2f1fedb73378c13fd16348 (Set PL_curcop to NULL in
> op.c:S_cop_free) between 5.18 and 5.20. ("Introduced" is probably
> wrong; more
> like "exposed".)
> 
> It seems to consistently crash 5.20 and 5.22.
> 

Ditto for me (unthreaded, non-debugging)

> [Please do not change anything below this line]
> -----------------------------------------------------------------
> ---
> Flags:
>     category=core
>     severity=low
> ---
> Site configuration information for perl 5.22.1:
> 
> Configured by mauke at Tue Dec 29 15:36:05 CET 2015.
> 
> Summary of my perl5 (revision 5 version 22 subversion 1)
> configuration:
> 
> Platform:
>   osname=linux, osvers=4.2.5-1-arch, archname=i686-linux
>   uname='linux simplicio 4.2.5-1-arch #1 smp preempt tue oct 27
> 08:28:41 cet 2015 i686 gnulinux '
>   config_args=''
>   hint=recommended, useposix=true, d_sigaction=define
>   useithreads=undef, usemultiplicity=undef
>   use64bitint=undef, use64bitall=undef, uselongdouble=undef
>   usemymalloc=n, bincompat5005=undef
> Compiler:
>   cc='cc', ccflags ='-fwrapv -fno-strict-aliasing -pipe -fstack-
> protector-strong -I/usr/local/include -D_LARGEFILE_SOURCE
> -D_FILE_OFFSET_BITS=64',
>   optimize='-O2',
>   cppflags='-fwrapv -fno-strict-aliasing -pipe -fstack-protector-
> strong -I/usr/local/include'
>   ccversion='', gccversion='5.3.0', gccosandvers=''
>   intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234,
> doublekind=3
>   d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12,
> longdblkind=3
>   ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
> lseeksize=8
>   alignbytes=4, prototype=define
> Linker and Libraries:
>   ld='cc', ldflags =' -fstack-protector-strong -L/usr/local/lib'
>   libpth=/usr/local/lib /usr/lib/gcc/i686-pc-linux-gnu/5.3.0/include-
> fixed /usr/lib /lib
>   libs=-lpthread -lnsl -lnm -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc
> -lgdbm_compat
>   perllibs=-lpthread -lnsl -lnm -ldl -lm -lcrypt -lutil -lc
>   libc=libc-2.22.so, so=so, useshrplib=false, libperl=libperl.a
>   gnulibc_version='2.22'
> Dynamic Linking:
>   dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
>   cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib -fstack-
> protector-strong'
> 
> 
> ---
> @INC for perl 5.22.1:
>     /home/mauke/usr/lib/perl5/site_perl/5.22.1/i686-linux
>     /home/mauke/usr/lib/perl5/site_perl/5.22.1
>     /home/mauke/usr/lib/perl5/5.22.1/i686-linux
>     /home/mauke/usr/lib/perl5/5.22.1
>     .
> 
> ---
> Environment for perl 5.22.1:
>     HOME=/home/mauke
>     LANG=en_US.UTF-8
>     LANGUAGE=en_US
>     LC_COLLATE=C
>     LC_MONETARY=de_DE.UTF-8
>     LC_TIME=de_DE.UTF-8
>     LD_LIBRARY_PATH (unset)
>     LOGDIR (unset)
>     PATH=/home/mauke/perl5/perlbrew/bin:/home/mauke/bin:/usr/local/sbin:/usr/local/bin:/usr/bin:/usr/bin/site_perl:/usr/bin/vendor_perl:/usr/bin/core_perl
>     PERLBREW_BASHRC_VERSION=0.73
>     PERLBREW_HOME=/home/mauke/.perlbrew
>     PERLBREW_ROOT=/home/mauke/perl5/perlbrew
>     PERL_BADLANG (unset)
>     PERL_UNICODE=SAL
>     SHELL=/bin/bash


-- 
James E Keenan (jkeenan@cpan.org)

---
via perlbug:  queue: perl5 status: open
https://rt.perl.org/Ticket/Display.html?id=127774

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About