RFC: find core dumps on Linux
Jim Blandy
jimb@redhat.com
Thu May 22 22:30:00 GMT 2003
I didn't realize this, but for a very long time, gdb.base/coredump.exp
has been broken on Linux. Linux creates core files named 'core.PID';
the test suite didn't know how to find them, so it suggested you check
your 'ulimit -c' setting and skipped the tests.
2003-05-22 Jim Blandy <jimb@redhat.com>
* gdb.base/corefile.exp: Find corefiles on Linux, which names them
'core.PID'.
Index: gdb/testsuite/gdb.base/corefile.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/corefile.exp,v
retrieving revision 1.5
diff -c -r1.5 corefile.exp
*** gdb/testsuite/gdb.base/corefile.exp 17 Dec 2001 21:03:48 -0000 1.5
--- gdb/testsuite/gdb.base/corefile.exp 22 May 2003 22:22:43 -0000
***************
*** 54,69 ****
# allows us to generate a core on systems where it does.
#
# Some systems append "core" to the name of the program; others append
! # the name of the program to "core".
set found 0
! catch "system \"(cd ${objdir}/${subdir}; ulimit -c unlimited; ${binfile}; true) >/dev/null 2>&1\""
# remote_exec host "${binfile}"
! foreach i "${objdir}/${subdir}/core ${objdir}/${subdir}/core.coremaker.c ${binfile}.core" {
if [remote_file build exists $i] {
remote_exec build "mv $i ${objdir}/${subdir}/corefile"
set found 1
}
}
if { $found == 0 } {
# The braindamaged HPUX shell quits after the ulimit -c above
# without executing ${binfile}. So we try again without the
--- 54,83 ----
# allows us to generate a core on systems where it does.
#
# Some systems append "core" to the name of the program; others append
! # the name of the program to "core"; still others (like Linux, as of
! # May 2003) create cores named "core.PID". In the latter case, we
! # could have many core files lying around, and it may be difficult to
! # tell which one is ours, so let's run the program in a subdirectory.
set found 0
! set coredir "${objdir}/${subdir}/coredir.[getpid]"
! file mkdir $coredir
! catch "system \"(cd ${coredir}; ulimit -c unlimited; ${binfile}; true) >/dev/null 2>&1\""
# remote_exec host "${binfile}"
! foreach i "${coredir}/core ${coredir}/core.coremaker.c ${binfile}.core" {
if [remote_file build exists $i] {
remote_exec build "mv $i ${objdir}/${subdir}/corefile"
set found 1
}
}
+ # Check for "core.PID".
+ if { $found == 0 } {
+ set names [glob -nocomplain -directory $coredir core.*]
+ if {[llength $names] == 1} {
+ set corefile [file join $coredir [lindex $names 0]]
+ remote_exec build "mv $corefile ${objdir}/${subdir}/corefile"
+ set found 1
+ }
+ }
if { $found == 0 } {
# The braindamaged HPUX shell quits after the ulimit -c above
# without executing ${binfile}. So we try again without the
***************
*** 77,87 ****
set found 1
}
}
! if { $found == 0 } {
! warning "can't generate a core file - core tests suppressed - check ulimit -c"
! return 0
! }
}
#
--- 91,105 ----
set found 1
}
}
+ }
+
+ # Try to clean up after ourselves.
+ remote_file build delete [file join $coredir coremmap.data]
+ remote_exec build "rmdir $coredir"
! if { $found == 0 } {
! warning "can't generate a core file - core tests suppressed - check ulimit -c"
! return 0
}
#
More information about the Gdb-patches
mailing list