155819Smarc# xps 255819Smarc# kernel ps 355819Smarc# 4*67733Smckusick# @(#)xps 8.3 (Berkeley) 08/22/94 555819Smarc 655760Smarcdefine xps 755760Smarc 855819Smarc set $i = 0 955760Smarc 1055819Smarc while ($i < 2) 1155819Smarc 1255819Smarc if ($i == 0) 13*67733Smckusick set $p = allproc.lh_first 1455760Smarc end 1555819Smarc if ($i == 1) 16*67733Smckusick set $p = zombproc.lh_first 1755819Smarc end 1855819Smarc 1955819Smarc printf " proc pid flag st wchan comm\n" 2055819Smarc while ($p) 2155819Smarc printf "%#10x %5d %8x %2x %#10x %s", $p, $p->p_pid, \ 2255819Smarc $p->p_flag, $p->p_stat, $p->p_wchan, \ 2355819Smarc (char *) $p->p_comm 2455819Smarc if ($p->p_wmesg) 2555819Smarc printf " (%s)", $p->p_wmesg 2655819Smarc end 2755819Smarc printf "\n" 28*67733Smckusick set $p = $p->p_list.le_next 2955819Smarc end 3055819Smarc set $i++ 3155760Smarc end 3255760Smarcend 33