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