Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#!/bin/rc
2 
if (! ~ $DEBUG '') flag x +
3 
 
4 
if (~ $THIS_HOST $DEST_HOST) {
5 
	echo printers queue:
6 
	/$cputype/bin/aux/lpdsend -dps -q $OUTDEV
7 
	if (test -f $LPLIB/log/$LPDEST^.st) {
8 
		echo status:
9 
		tail -3 $LPLIB/log/$LPDEST^.st
10 
	}
11 
	cd $LPSPOOL
12 
	if (test -d $LPDEST) {
13 
		once=''
14 
		for (i in `{bind -b $LPLIB/sched /bin;$SCHED $LPDEST}) {
15 
			if (~ $once '') {
16 
				echo
17 
				echo queue on $THIS_HOST:
18 
				echo 'job		user	try	size'
19 
				once=1
20 
			}
21 
			STATLINE=`{cat $LPDEST/$i^id}
22 
			LSLINE=`{ls -l $LPDEST/$i}
23 
			echo $STATLINE(1)^$STATLINE(3)'	'$STATLINE(2)'	'$STATLINE(4)'	'$LSLINE(6)
24 
		}
25 
	}
26 
}
27 
if not {
28 
	{ echo -d$LPDEST -q; sleep 5 } | lpsend.rc $DEST_HOST
29 
}