#!/bin/rc

cd $LPSPOOL
if (~ $#* 0) KILLARGS=`{sed 1q};
if not	KILLARGS=$*;
	
if (test -d $LPDEST) {
	for (i in $KILLARGS) {
		for (j in `{bind -b $LPLIB/sched /bin;$SCHED $LPDEST}) {
			if (test -r $LPDEST/$j^id) {
				STATLINE=`{cat $LPDEST/$j^id}
				if (~ $STATLINE(1)^$STATLINE(3) $i)
					if (rm $LPDEST/$j $LPDEST/$j^id >/dev/null >[1=2])
						echo $i removed from $LPDEST queue on $THIS_HOST
			}
		}
	}
}
switch ($THIS_HOST) {
case $DEST_HOST;	$KILL_CMD;
case *;	@ {echo -d$LPDEST -k;echo $KILLARGS;sleep 7} | lpsend.rc $DEST_HOST
}
exit 0