git: 9front

ref: 4fd1bf0724c01b033532f643d228f6fb6cfcb886
dir: /sys/src/cmd/fossil/deadlock/

View raw version 
#!/bin/rc

rfork e

x=($*)
if(~ $#x 0){
	x=`{ps |awk '$NF=="8.fossil" {print $2}'}
	ps | awk '$7=="8.fossil"'
}
if(~ $#x 0){
	x=`{ps | awk '$NF=="fossil" {print $2}'}
	ps -a | awk '$7 == "fossil"'
}

y=$x^', '
y=$"y
echo 'include("/sys/src/cmd/fossil/fossil-acid");
print("--XXX\n");
deadlocklist({' ^ $y ^ '});
print("--YYY\n");' |
	acid $x(1) |
	sed -n '/--XXX/,/--YYY/p' |
	sed 's/acid: //g' |
	grep -v '^--'