[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Help: Perl crashes, probably pthread-problem?



Hello,
(this was reported as a bug to the BTS, but no response received). It
is probably glibc/pthreads related.

I have a small perl program
http://bugs.debian.org/cgi-bin/bugreport.cgi/smallTest.pl?bug=243311&msg=3&att=2

using a small module:
http://bugs.debian.org/cgi-bin/bugreport.cgi/iohelp.pm?bug=243311&msg=3&att=1

This perl script crashes perl. To reproduce, type/tab complete e.g.:
helge@sixtyfor:~/prog/db/eingabe$ ./smallTest.pl
y, Protokoll:: http
Publisher:
y, Protokoll:: http
Publisher:
y, Protokoll:: http
Publisher:
Speicherzugriffsfehler (core dumped)

(Speicherzugriffsfehler == segmentation fault)

I was no able to get a better backtrace:

GNU gdb 6.1-debian
Copyright 2004 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or 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.
This GDB was configured as "alpha-linux"...Using host libthread_db library "/usr/lib/debug/libthread_db.so.1".


warning: core file may not match specified executable file.
Core was generated by `/usr/bin/debugperl ./smallTest.pl'.
Program terminated with signal 11, Segmentation fault.
Reading symbols from /usr/lib/debug/libdl.so.2.1...done.
Loaded symbols for /usr/lib/debug/libdl.so.2.1
Reading symbols from /usr/lib/debug/libm.so.6.1...done.
Loaded symbols for /usr/lib/debug/libm.so.6.1
Reading symbols from /usr/lib/debug/libpthread.so.0...done.
[Thread debugging using libthread_db enabled]
Loaded symbols for /usr/lib/debug/libpthread.so.0
Reading symbols from /usr/lib/debug/libc.so.6.1...done.
Loaded symbols for /usr/lib/debug/libc.so.6.1
Reading symbols from /usr/lib/debug/libcrypt.so.1.1...done.
Loaded symbols for /usr/lib/debug/libcrypt.so.1.1
Reading symbols from /lib/ld-linux.so.2...Reading symbols from /usr/lib/debug//lib/ld-2.3.2.so...done.
done.
Loaded symbols for /lib/ld-linux.so.2
Reading symbols from /usr/lib/perl5/auto/Term/ReadLine/Gnu/Gnu.so...done.
Loaded symbols for /usr/lib/perl5/auto/Term/ReadLine/Gnu/Gnu.so
Reading symbols from /lib/libreadline.so.4...done.
Loaded symbols for /lib/libreadline.so.4
Reading symbols from /usr/lib/libncurses.so.5...done.
Loaded symbols for /usr/lib/libncurses.so.5
Reading symbols from /usr/lib/gconv/ISO8859-15.so...Reading symbols from /usr/lib/debug//usr/lib/gconv/ISO8859-15.so...done.
done.
Loaded symbols for /usr/lib/gconv/ISO8859-15.so
#0  *__GI___pthread_mutex_lock (mutex=0x120424f30) at mutex.c:102
102	mutex.c: Datei oder Verzeichnis nicht gefunden.
	in mutex.c
(gdb) bt full
#0  *__GI___pthread_mutex_lock (mutex=0x120424f30) at mutex.c:102
	self = 0x11ffff8b8
#1  0x00000200000d85dc in __flockfile (stream=0x0) at lockfile.c:29
No locals.
#2  0x00000200001f32ec in _IO_fflush (fp=0x120424f30) at iofflush.c:47
	_buffer = {__routine = 0x200000d85f0 <__funlockfile>, 
  __arg = 0x120424f30, __canceltype = 0, __prev = 0x0}
	_avail = 1
	result = 536869048
#3  0x00000001201b4f44 in PerlIOStdio_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:3106
	stdio = (FILE *) 0x120424f30
#4  0x00000001201b0f70 in Perl_PerlIO_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:1599
	tab = (PerlIO_funcs *) 0x12020c3b8
#5  0x00000001201b1034 in Perl_PerlIO_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:1623
	i = 8
	table = (PerlIO **) 0x120233b10
	code = 0
#6  0x000000012016b4b0 in Perl_pp_system (my_perl=0x12021eea0) at pp_sys.c:4090
	sp = (SV **) 0x1204092c8
	mark = (SV **) 0x1204092c0
	origmark = 0
	targ = (SV *) 0x1202da210
	value = 3197336
	n_a = 2
	result = 536995568
	did_pipes = 0
#7  0x00000001200af914 in Perl_runops_debug (my_perl=0x12021eea0)
    at dump.c:1442
No locals.
#8  0x000000012002608c in S_run_body (my_perl=0x12021eea0, oldscope=1)
    at perl.c:1921
No locals.
#9  0x00000001200258ec in perl_run (my_perl=0x12021eea0) at perl.c:1840
	oldscope = 1
	ret = 0
	cur_env = {je_prev = 0x12021f118, je_buf = {{__jmpbuf = {
        2199023424016, 4831836344, 4833756736, 2, 4831962864, 2199026431760, 
        4831991884, 4831835728, 4831835728, 0, 2882303761517117440, 0, 
        2882303761517117440, 3458764513820540928, 4035225266123964416, 
        1152921504606846976, 2882303761517117440}, __mask_was_saved = 0, 
      __saved_mask = {__val = {4834066704, 4831974288, 4831836096, 4834061984, 
          4831836096, 4834061984, 4834066704, 4834071088, 1729382256910270464, 
          4831963060, 2199023424016, 4831836208, 4218575435983750144, 
          4834061984, 0, 4831838184}}}}, je_ret = 0, je_mustcatch = 0 '\0'}
#10 0x000000012001e84c in main (argc=2, argv=0x11ffff8b8, env=0x11ffff8d0)
    at perlmain.c:86
	exitstatus = 0
(gdb) 
#0  *__GI___pthread_mutex_lock (mutex=0x120424f30) at mutex.c:102
	self = 0x11ffff8b8
#1  0x00000200000d85dc in __flockfile (stream=0x0) at lockfile.c:29
No locals.
#2  0x00000200001f32ec in _IO_fflush (fp=0x120424f30) at iofflush.c:47
	_buffer = {__routine = 0x200000d85f0 <__funlockfile>, 
  __arg = 0x120424f30, __canceltype = 0, __prev = 0x0}
	_avail = 1
	result = 536869048
#3  0x00000001201b4f44 in PerlIOStdio_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:3106
	stdio = (FILE *) 0x120424f30
#4  0x00000001201b0f70 in Perl_PerlIO_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:1599
	tab = (PerlIO_funcs *) 0x12020c3b8
#5  0x00000001201b1034 in Perl_PerlIO_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:1623
	i = 8
	table = (PerlIO **) 0x120233b10
	code = 0
#6  0x000000012016b4b0 in Perl_pp_system (my_perl=0x12021eea0) at pp_sys.c:4090
	sp = (SV **) 0x1204092c8
	mark = (SV **) 0x1204092c0
	origmark = 0
	targ = (SV *) 0x1202da210
	value = 3197336
	n_a = 2
	result = 536995568
	did_pipes = 0
#7  0x00000001200af914 in Perl_runops_debug (my_perl=0x12021eea0)
    at dump.c:1442
No locals.
#8  0x000000012002608c in S_run_body (my_perl=0x12021eea0, oldscope=1)
    at perl.c:1921
No locals.
#9  0x00000001200258ec in perl_run (my_perl=0x12021eea0) at perl.c:1840
	oldscope = 1
	ret = 0
	cur_env = {je_prev = 0x12021f118, je_buf = {{__jmpbuf = {
        2199023424016, 4831836344, 4833756736, 2, 4831962864, 2199026431760, 
        4831991884, 4831835728, 4831835728, 0, 2882303761517117440, 0, 
        2882303761517117440, 3458764513820540928, 4035225266123964416, 
        1152921504606846976, 2882303761517117440}, __mask_was_saved = 0, 
      __saved_mask = {__val = {4834066704, 4831974288, 4831836096, 4834061984, 
          4831836096, 4834061984, 4834066704, 4834071088, 1729382256910270464, 
          4831963060, 2199023424016, 4831836208, 4218575435983750144, 
          4834061984, 0, 4831838184}}}}, je_ret = 0, je_mustcatch = 0 '\0'}
#10 0x000000012001e84c in main (argc=2, argv=0x11ffff8b8, env=0x11ffff8d0)
    at perlmain.c:86
	exitstatus = 0
(gdb) 
#0  *__GI___pthread_mutex_lock (mutex=0x120424f30) at mutex.c:102
	self = 0x11ffff8b8
#1  0x00000200000d85dc in __flockfile (stream=0x0) at lockfile.c:29
No locals.
#2  0x00000200001f32ec in _IO_fflush (fp=0x120424f30) at iofflush.c:47
	_buffer = {__routine = 0x200000d85f0 <__funlockfile>, 
  __arg = 0x120424f30, __canceltype = 0, __prev = 0x0}
	_avail = 1
	result = 536869048
#3  0x00000001201b4f44 in PerlIOStdio_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:3106
	stdio = (FILE *) 0x120424f30
#4  0x00000001201b0f70 in Perl_PerlIO_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:1599
	tab = (PerlIO_funcs *) 0x12020c3b8
#5  0x00000001201b1034 in Perl_PerlIO_flush (my_perl=0x12021eea0, 
    f=0x120233b50) at perlio.c:1623
	i = 8
	table = (PerlIO **) 0x120233b10
	code = 0
#6  0x000000012016b4b0 in Perl_pp_system (my_perl=0x12021eea0) at pp_sys.c:4090
	sp = (SV **) 0x1204092c8
	mark = (SV **) 0x1204092c0
	origmark = 0
	targ = (SV *) 0x1202da210
	value = 3197336
	n_a = 2
	result = 536995568
	did_pipes = 0
#7  0x00000001200af914 in Perl_runops_debug (my_perl=0x12021eea0)
    at dump.c:1442
No locals.
#8  0x000000012002608c in S_run_body (my_perl=0x12021eea0, oldscope=1)
    at perl.c:1921
No locals.
#9  0x00000001200258ec in perl_run (my_perl=0x12021eea0) at perl.c:1840
	oldscope = 1
	ret = 0
	cur_env = {je_prev = 0x12021f118, je_buf = {{__jmpbuf = {
        2199023424016, 4831836344, 4833756736, 2, 4831962864, 2199026431760, 
        4831991884, 4831835728, 4831835728, 0, 2882303761517117440, 0, 
        2882303761517117440, 3458764513820540928, 4035225266123964416, 
        1152921504606846976, 2882303761517117440}, __mask_was_saved = 0, 
      __saved_mask = {__val = {4834066704, 4831974288, 4831836096, 4834061984, 
          4831836096, 4834061984, 4834066704, 4834071088, 1729382256910270464, 
          4831963060, 2199023424016, 4831836208, 4218575435983750144, 
          4834061984, 0, 4831838184}}}}, je_ret = 0, je_mustcatch = 0 '\0'}
#10 0x000000012001e84c in main (argc=2, argv=0x11ffff8b8, env=0x11ffff8d0)
    at perlmain.c:86
	exitstatus = 0
(gdb) quit


Any help appreciated. 

Greetings

        Helge
-- 
Helge Kreutzmann, Dipl.-Phys.               Helge.Kreutzmann@itp.uni-hannover.de
  gpg signed mail preferred    gpg-key: finger kreutzm@zibal.itp.uni-hannover.de
    64bit GNU powered                  http://www.itp.uni-hannover.de/~kreutzm
       Help keep free software "libre": http://www.freepatents.org/

Attachment: pgpjS9yqRKs4e.pgp
Description: PGP signature


Reply to: