git.sur5r.net Git - bacula/bacula/blob - bacula/scripts/btraceback.in

   1 #!/bin/sh
   2 #
   3 # Script to do a stackdump of a Bacula daemon/program.
   4 #
   5 # We attempt to attach to running program
   6 #
   7 # Arguments to this script are
   8 #  $1 = path to executable
   9 #  $2 = main pid of running program to be traced back.
  10 #  $3 = working directory
  11 #
  12 PNAME=`basename $1`
  13 WD="$3"
  14 if test `uname -s` = SunOS ; then
  15    gcore -o ${WD}/${PNAME} $2
  16    if [ -x /usr/bin/mdb ]; then
  17       mdb -u -p $2 <@scriptdir@/btraceback.mdb >${WD}/bacula.$2.traceback 2>&1
  18    else
  19       dbx $1 $2 <@scriptdir@/btraceback.dbx >${WD}/bacula.$2.traceback 2>&1
  20    fi
  21    PNAME="${PNAME} on `hostname`"
  22    cat ${WD}/bacula.$2.traceback \
  23     | @sbindir@/bsmtp -h @smtp_host@ -f @dump_email@ -s "Bacula DBX traceback of ${PNAME}" @dump_email@
  24 else
  25    gdb -quiet -batch -x @scriptdir@/btraceback.gdb $1 $2 >${WD}/bacula.$2.traceback 2>&1
  26    PNAME="${PNAME} on `hostname`"
  27    cat ${WD}/bacula.$2.traceback \
  28     | @sbindir@/bsmtp -h @smtp_host@ -f @dump_email@ -s "Bacula GDB traceback of ${PNAME}" @dump_email@
  29 fi