2011-03-30 14:14:36 +00:00
|
|
|
#!/bin/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/9/port/proc.c:/^killbig
|
|
|
|
|
pids=`{psu | awk '$NF ~ /'$1'/ {print $2}'}
|
2011-08-27 15:20:42 +00:00
|
|
|
~ $#pids 0 || {for(p in /proc/^$pids^/ctl){chmod +w $p; echo noswap >$p; chmod -w $p}} >/dev/null >[2=1]
|
|
|
|
|
|
