Commit | Line | Data |
---|---|---|
b0d4a798 MT |
1 | # xps |
2 | # kernel ps | |
3 | # | |
ed554bc5 | 4 | # @(#)xps 8.2 (Berkeley) 9/26/93 |
b0d4a798 | 5 | |
592da51a MT |
6 | define xps |
7 | ||
b0d4a798 MT |
8 | set $i = 0 |
9 | ||
10 | while ($i < 2) | |
11 | ||
12 | if ($i == 0) | |
13 | set $p = allproc | |
14 | end | |
15 | if ($i == 1) | |
16 | set $p = zombproc | |
17 | end | |
592da51a | 18 | |
b0d4a798 MT |
19 | printf " proc pid flag st wchan comm\n" |
20 | while ($p) | |
21 | printf "%#10x %5d %8x %2x %#10x %s", $p, $p->p_pid, \ | |
22 | $p->p_flag, $p->p_stat, $p->p_wchan, \ | |
23 | (char *) $p->p_comm | |
24 | if ($p->p_wmesg) | |
25 | printf " (%s)", $p->p_wmesg | |
26 | end | |
27 | printf "\n" | |
62921fca | 28 | set $p = $p->p_next |
592da51a | 29 | end |
b0d4a798 | 30 | set $i++ |
592da51a MT |
31 | end |
32 | end |