git: 9front

ref: 332f070e5a51e5fcc1f2f17f15f67aa98a01b5f4
dir: /sys/lib/dist/pc/inst/watchfd/

View raw version 
#!/bin/rc

p=`{ps | grep $1 | sed 's/[^ ]* +([^ ]+) .*/\1/' }
while(! ~ $#p 1) {
	sleep 1
	p=`{ps | grep $1 | sed 's/[^ ]* +([^ ]+) .*/\1/'}
}
p=$p(1)

baropt='-w 145,129,445,168'
if(~ $textinst 1)
	baropt=-t

{
	while(test -f /proc/$p/fd)
		grep '^ *'^$2^' ' /proc/$p/fd >[2]/dev/null
} | awk '{print $9 " '^$3^'"; fflush("/dev/stdout")}' | bargraph $baropt $4