ebl fix bacula-logo

[bacula/bacula] / bacula / scripts / btraceback.in

diff --git a/bacula/scripts/btraceback.in b/bacula/scripts/btraceback.in
index 7a66e32ee60234bd60dbd701834fa7ae2413acad..d4271c34cef29dde8255fece4cd2b54536ff160b 100755 (executable)
--- a/bacula/scripts/btraceback.in
+++ b/bacula/scripts/btraceback.in
@@ -9,11 +9,15 @@
 #  $2 = main pid of running program to be traced back.
 #
 PNAME=`basename $1`
+PNAME="${PNAME} on `hostname`"
+WD="@working_dir@"
 if test `uname -s` = SunOS ; then
-  gcore -o @working_dir@/${PNAME} $2
-  dbx $1 $2 <@scriptdir@/btraceback.dbx 2>&1 \
+  gcore -o ${WD}/${PNAME} $2
+  dbx $1 $2 <@scriptdir@/btraceback.dbx >${WD}/bacula.$$.traceback 2>&1
+  cat ${WD}/bacula.$$.traceback \
    | @sbindir@/bsmtp -h @smtp_host@ -f @dump_email@ -s "Bacula DBX traceback of ${PNAME}" @dump_email@
 else
-  gdb -quiet -batch -x @scriptdir@/btraceback.gdb $1 $2 2>&1 \
+  gdb -quiet -batch -x @scriptdir@/btraceback.gdb $1 $2 >${WD}/bacula.$$.traceback 2>&1
+  cat ${WD}/bacula.$$.traceback \
    | @sbindir@/bsmtp -h @smtp_host@ -f @dump_email@ -s "Bacula GDB traceback of ${PNAME}" @dump_email@
 fi