Change Byline

[bacula/bacula] / bacula / scripts / btraceback.dbx

diff --git a/bacula/scripts/btraceback.dbx b/bacula/scripts/btraceback.dbx
index 6c22d3c0eadfdd6bc4a1e33adf6f521cc0560888..8c7fe860eda2a4a5cd5e1091021e02f8f31fe275 100644 (file)
--- a/bacula/scripts/btraceback.dbx
+++ b/bacula/scripts/btraceback.dbx
@@ -10,40 +10,39 @@ echo "host_os ==> \c"; print -l (char *)host_os
 echo "distname ==> \c"; print -l (char *)distname
 echo "distver ==> \c"; print -l (char *)distver
 echo "dist_name ==> \c"; print -l (char *)dist_name
-echo "beef ==> \c"; print -l (int)dist_name
+echo "beef ==> \c"; print -l (int)beef
 
-echo "******** RUNNING THREADS:"
+echo "******** RUNNING THREADS/LWPS:"
 echo
-threads
+lwps
 
 echo
 echo
-echo "******** STACK TRACE OF CURRENT THREAD:"
+echo "******** STACK TRACE OF CURRENT THREAD/LWP:"
 echo
 where
 
 echo
 echo
-echo "******** VARIABLES DUMP OF CURRENT THREAD:"
+echo "******** VARIABLES DUMP OF CURRENT THREAD/LWP:"
 echo
 dump
 
-for THREAD in $(threads | sh sed -e 's/.*@//' -e 's/ .*//'); do
-       (
-       if thread t@$THREAD; then
-               echo 
-               echo 
-               echo "******** STACK TRACE OF THREAD ${THREAD}:"
-               echo
-               where
+for LWP in $(lwps | sh sed -e 's/.*@//' -e 's/ .*//'); do
+(
+   if lwp l@$LWP; then
+      echo "******************************************"
+      echo
+      echo "******** STACK TRACE OF THREAD/LWP ${LWP}:"
+      echo
+      where
 
-               echo
-               echo
-               echo "******** VARIABLES DUMP OF THREAD ${THREAD}:"
-               echo
-               dump
-               
-       fi
-       )
+      echo
+      echo "******** VARIABLES DUMP OF THREAD/LWP ${LWP}:"
+      echo
+      dump
+      echo "******************************************"
+   fi
+)
 done
 quit