code: plan9front

ref: 65bd53b9b89b0a84d0f16db4adc3f53fa6ab3a3a
dir: /rc/bin/aanuke/

View raw version 
#!/bin/rc
rfork e
for(i in `{psu | awk '/[ ]+aan$/ {print $2}'}){
	if(! grep -s -e '[ ]+\/net(\.alt)?\/tcp\/[0-9]+\/data$' /proc/$i/fd)
		echo '@{echo kill>/proc/'$i'/note} # aan (idle)'
}