xref: /plan9/sys/lib/lp/kill/generic (revision 219b2ee8daee37f4aad58d63f21287faa8e4ffdc)
1#!/bin/rc
2
3cd $LPSPOOL
4if (~ $#* 0) KILLARGS=`{sed 1q};
5if not	KILLARGS=$*;
6
7if (test -d $LPDEST) {
8	for (i in $KILLARGS) {
9		for (j in `{bind -b $LPLIB/sched /bin;$SCHED $LPDEST}) {
10			if (test -r $LPDEST/$j^id) {
11				STATLINE=`{cat $LPDEST/$j^id}
12				if (~ $STATLINE(1)^$STATLINE(3) $i)
13					if (rm $LPDEST/$j $LPDEST/$j^id >/dev/null >[1=2])
14						echo $i removed from $LPDEST queue on $THIS_HOST
15			}
16		}
17	}
18}
19if (! ~ $THIS_HOST $DEST_HOST) {
20	@{echo -d$LPDEST -k;echo $KILLARGS;sleep 7} | lpsend.rc $DEST_HOST
21}
22exit ''
23