plan9fox/sys/lib/lp/stat/xerox-4512

30 lines
655 B
Text
Raw Normal View History

#!/bin/rc
if (! ~ $DEBUG '') flag x +
if (~ $THIS_HOST $DEST_HOST) {
echo printers queue:
/$cputype/bin/aux/lpdsend -dPORT1 -q $OUTDEV
if (test -f $LPLIB/log/$LPDEST^.st) {
echo status:
tail -3 $LPLIB/log/$LPDEST^.st
}
cd $LPSPOOL
if (test -d $LPDEST) {
once=''
for (i in `{bind -b $LPLIB/sched /bin;$SCHED $LPDEST}) {
if (~ $once '') {
echo
echo queue on $THIS_HOST:
echo 'job user try size'
once=1
}
STATLINE=`{cat $LPDEST/$i^id}
LSLINE=`{ls -l $LPDEST/$i}
echo $STATLINE(1)^$STATLINE(3)' '$STATLINE(2)' '$STATLINE(4)' '$LSLINE(6)
}
}
}
if not {
{ echo -d$LPDEST -q; sleep 5 } | lpsend.rc $DEST_HOST
}