kstack

# 因为CPU hang，可以把LOOP值调大
FOLD=0
LOOP=5
test $FOLD = 0 && LOOP=1

for x in $(seq 1 $LOOP); do
  for pid in $(ls /proc/$PID/task); do
    if test $FOLD = 1; then
      tac /proc/$PID/task/$pid/stack | awk -F'[ +]' '{print $2}' | tr '\n' ';' | sed -E 's|;$|\n|'
    else
      name=$(cat /proc/$PID/task/$pid/stat | awk -F'[()]' '{print $2}')
      echo $pid $name
      echo "========"
      cat /proc/$PID/task/$pid/stack
      echo
    fi
  done
  sleep 0.1
done > tmp.txt
if test $FOLD = 1; then
  cat tmp.txt | sort | uniq -c | sort -n | awk '{print $2,$1}' > kstack.txt
else
  mv tmp.txt kstack.txt
fi