1# btraceback.dbx 2 3dbxenv language_mode c++ 4 5echo "exename ==> \c"; print -l (char *)exename 6echo "exepath ==> \c"; print -l (char *)exepath 7echo "catalog_db ==> \c"; print -l (char *)catalog_db 8echo "version ==> \c"; print -l (char *)version 9 10echo "******** RUNNING THREADS/LWPS:" 11echo 12lwps 13 14echo 15echo 16echo "******** STACK TRACE OF CURRENT THREAD/LWP:" 17echo 18where 19 20echo 21echo 22echo "******** VARIABLES DUMP OF CURRENT THREAD/LWP:" 23echo 24dump 25 26for LWP in $(lwps | sh sed -e 's/.*@//' -e 's/ .*//'); do 27( 28 if lwp l@$LWP; then 29 echo "******************************************" 30 echo 31 echo "******** STACK TRACE OF THREAD/LWP ${LWP}:" 32 echo 33 where 34 35 echo 36 echo "******** VARIABLES DUMP OF THREAD/LWP ${LWP}:" 37 echo 38 dump 39 echo "******************************************" 40 fi 41) 42done 43quit 44