xref: /plan9/sys/src/cmd/fossil/deadlock (revision 5e96a66c77eb9140492ca53f857cbbf108e128ed)
1#!/bin/rc
2
3rfork e
4
5x=($*)
6if(~ $#x 0){
7	x=`{ps |awk '$NF=="8.fossil" {print $2}'}
8	ps | awk '$7=="8.fossil"'
9}
10if(~ $#x 0){
11	x=`{ps | awk '$NF=="fossil" {print $2}'}
12	ps -a | awk '$7 == "fossil"'
13}
14
15y=$x^', '
16y=$"y
17echo 'include("/sys/src/cmd/fossil/fossil-acid");
18print("--XXX\n");
19deadlocklist({' ^ $y ^ '});
20print("--YYY\n");' |
21	acid $x(1) |
22	sed -n '/--XXX/,/--YYY/p' |
23	sed 's/acid: //g' |
24	grep -v '^--'
25
26