11 lines
323 B
Plaintext
11 lines
323 B
Plaintext
|
#!/cmd/rc
|
||
|
|
# dontkill regexp - mark invoker's processes with names matching regexp
|
||
|
|
# as not killable when the kernel runs out of memory
|
||
|
|
if (! ~ $#* 1) {
|
||
|
|
echo $0 regexp >[1=2]
|
||
|
|
exit usage
|
||
|
|
}
|
||
|
|
# see /sys/src/kern/port/proc.c:/^killbig
|
||
|
|
pids=`{psu | awk '$NF ~ /'$1'/ {print $2}'}
|
||
|
|
~ $#pids 0 || chmod -w $pids^/ctl >[2]/dev/null
|