python/samba/netcmd/schema.py: add schema show_oc for attribute
[kai/samba-autobuild/.git] / selftest / gdb_backtrace
index 1d8249b08a0378808629bd26ff7ff69f29ebf1ac..ef02e784efc926277ab88664f588b3a2a587f97a 100755 (executable)
@@ -30,6 +30,20 @@ case "${UNAME}" in
        OSF1)
                DB_LIST="ladebug ${DB_LIST}"
        ;;
+       #
+       # On solaris dbx is working way more better than gdb
+       # let's try it first
+       #
+       SunOS)
+               DB_LIST="dbx ${DB_LIST}"
+       ;;
+       #
+       # FreeBSD comes with a flavor that works gdb66 and one that don't gdb
+       # (gdb 6.1) let's try it first the one that works !
+       #
+       FreeBSD)
+               DB_LIST="gdb66 ${DB_LIST}"
+       ;;
 esac
 
 for DB in ${DB_LIST}; do
@@ -44,25 +58,48 @@ test x"${DB_BIN}" = x"" && {
        exit 1
 }
 
-#
-# we first try to use /proc/${PID}/exe
+need_binary="no"
+case "${DB}" in
+# These debuggers need the process binary specified:
+       ladebug)
+       need_binary="yes"
+       ;;
+       gdb66)
+       need_binary="yes"
+       ;;
+       dbx)
+       need_binary="yes"
+       ;;
+esac
+
+test x"${need_binary}" = x"yes" && {
+
+# we first try to use /proc/${PID}/exe or /proc/{$PID}/path for solaris
 # then fallback to the binary from the commandline
 # then we search for the commandline argument with
 # 'which'
 #
-test -f "/proc/${PID}/exe" && BINARY="/proc/${PID}/exe"
-test x"${BINARY}" = x"" && BINARY="/proc/${PID}/exe"
-test -f "${BINARY}" || BINARY=`which ${BINARY}`
+       test -f "/proc/${PID}/exe" && BINARY="/proc/${PID}/exe"
+       test -f "/proc/${PID}/path/a.out" && BINARY=`ls -l /proc/${PID}/path/a.out |sed 's/.*-> //'`
+       test x"${BINARY}" = x"" && BINARY="/proc/${PID}/exe"
+       test -f "${BINARY}" || BINARY=`which ${BINARY}`
+       
+       test -f "${BINARY}" || {
+           echo "${BASENAME}: ERROR: Cannot find binary '${BINARY}'."
+           exit 1
+       }
+}
 
-test -f "${BINARY}" || {
-       echo "${BASENAME}: ERROR: Cannot find binary '${BINARY}'."
+BATCHFILE_PRE=`mktemp --tmpdir gdb_backtrace_pre.XXXXXXXXXX`
+test -n "${BATCHFILE_PRE}" || {
+       echo "mktemp doesn't work" 1>&2
+       exit 1
+}
+BATCHFILE_MAIN=`mktemp --tmpdir gdb_backtrace_main.XXXXXXXXXX`
+test -n "${BATCHFILE_MAIN}" || {
+       echo "mktemp doesn't work" 1>&2
        exit 1
 }
-
-echo "${BASENAME}: Trying to use ${DB_BIN} on ${BINARY} on PID ${PID}"
-
-BATCHFILE_PRE=/tmp/gdb_backtrace_pre.$$
-BATCHFILE_MAIN=/tmp/gdb_backtrace_main.$$
 case "${DB}" in
        ladebug)
 cat << EOF  > ${BATCHFILE_PRE}
@@ -75,14 +112,28 @@ quit
 EOF
        ${DB_BIN} -c "${BATCHFILE_MAIN}" -i "${BATCHFILE_PRE}" -pid "${PID}" "${BINARY}"
        ;;
-       gdb)
+       gdb66)
 cat << EOF  > ${BATCHFILE_MAIN}
 set height 1000
 bt full
 info locals
+kill
 quit
 EOF
        ${DB_BIN} -x "${BATCHFILE_MAIN}" "${BINARY}" "${PID}"
        ;;
+       gdb)
+cat << EOF  > ${BATCHFILE_MAIN}
+set height 0
+bt full
+thread apply all bt full
+info locals
+quit
+EOF
+       ${DB_BIN} -batch -x "${BATCHFILE_MAIN}" --pid "${PID}" < /dev/null
+       ;;
+dbx)
+       ${DB_BIN} "where;dump;kill;quit" "${BINARY}" "${PID}"
+       ;;
 esac
 /bin/rm -f ${BATCHFILE_PRE} ${BATCHFILE_MAIN}