| commit | dd6c037b72b0988ed9d55fd89af30b10ca9999ea | [log] [tgz] |
|---|---|---|
| author | rsc <devnull@localhost> | Mon Jun 26 00:02:19 2006 +0000 |
| committer | rsc <devnull@localhost> | Mon Jun 26 00:02:19 2006 +0000 |
| tree | 4462c5940358efcbe102a5edd1b2f2cd061b9031 | |
| parent | 1dc6e083c15e1580b02d30aa349821fe98fcf989 [diff] |
accept process names
diff --git a/bin/stack b/bin/stack index af649d5..933a613 100755 --- a/bin/stack +++ b/bin/stack
@@ -1,3 +1,14 @@ #!/usr/local/plan9/bin/rc -echo '$c' | 9 db -q $* +pid=$1 +shift +if(! ~ $pid [0-9] [0-9]*[0-9] */core *.core core.* */core.*){ + name=$pid + pid=`{psu|awk '$NF=="'$name'" {print $2}'} + if(~ $#pid 0){ + echo 'stack: no process '$name + exit none + } +} +for(p in $pid) + echo '$c' | 9 db -q $p $*