1 f3435ec5 2006-09-17 devnull #!/usr/local/plan9/bin/rc
 2 f3435ec5 2006-09-17 devnull if (! ~ $DEBUG '') flag x +
 3 f3435ec5 2006-09-17 devnull 
 4 f3435ec5 2006-09-17 devnull if (~ $THIS_HOST $DEST_HOST) {
 5 f3435ec5 2006-09-17 devnull 	if (test -f $LPLIB/log/$LPDEST^.st) {
 6 f3435ec5 2006-09-17 devnull 		echo status:
 7 f3435ec5 2006-09-17 devnull 		tail -3 $LPLIB/log/$LPDEST^.st
 8 f3435ec5 2006-09-17 devnull 	}
 9 f3435ec5 2006-09-17 devnull 	cd $LPSPOOL
10 f3435ec5 2006-09-17 devnull 	if (test -d $LPDEST) {
11 f3435ec5 2006-09-17 devnull 		once=''
12 ec270e2d 2006-09-17 devnull 		for (i in `{lpsub sched $SCHED $LPDEST}) {
13 f3435ec5 2006-09-17 devnull 			if (~ $once '') {
14 f3435ec5 2006-09-17 devnull 				echo
15 f3435ec5 2006-09-17 devnull 				echo queue on $THIS_HOST:
16 f3435ec5 2006-09-17 devnull 				echo 'job		user	try	size'
17 f3435ec5 2006-09-17 devnull 				once=1
18 f3435ec5 2006-09-17 devnull 			}
19 f3435ec5 2006-09-17 devnull 			STATLINE=`{cat $LPDEST/$i^id}
20 f3435ec5 2006-09-17 devnull 			LSLINE=`{ls -l $LPDEST/$i}
21 f3435ec5 2006-09-17 devnull 			echo $STATLINE(1)^$STATLINE(3)'	'$STATLINE(2)'	'$STATLINE(4)'	'$LSLINE(6)
22 f3435ec5 2006-09-17 devnull 		}
23 f3435ec5 2006-09-17 devnull 	}
24 f3435ec5 2006-09-17 devnull }
25 f3435ec5 2006-09-17 devnull if not {
26 f3435ec5 2006-09-17 devnull 	{ echo -d$LPDEST -q; sleep 5 } | lpsend $DEST_HOST
27 f3435ec5 2006-09-17 devnull }