Blame


1 61746420 2005-08-31 devnull #!/usr/local/plan9/bin/rc
2 61746420 2005-08-31 devnull # fn sigexit { rm -f $LPSPOOL/$LPDEST/.$pid.* $LPSPOOL/$LPDEST/$pid.* $LPSPOOL/$LPDEST }
3 61746420 2005-08-31 devnull if (! ~ $DEBUG '') flag x +
4 61746420 2005-08-31 devnull
5 61746420 2005-08-31 devnull echo $THIS_HOST $DEST_HOST
6 61746420 2005-08-31 devnull if (~ $THIS_HOST $DEST_HOST) {
7 61746420 2005-08-31 devnull if (! test -d $LPSPOOL/$LPDEST) {
8 61746420 2005-08-31 devnull mkdir $LPSPOOL/$LPDEST
9 61746420 2005-08-31 devnull chmod 777 $LPSPOOL/$LPDEST >[2]/dev/null
10 61746420 2005-08-31 devnull chmod +t $LPSPOOL/$LPDEST >[2]/dev/null
11 61746420 2005-08-31 devnull }
12 61746420 2005-08-31 devnull }
13 61746420 2005-08-31 devnull # Process and enqueue files to be printed
14 61746420 2005-08-31 devnull # take arguments as input files
15 61746420 2005-08-31 devnull i=0
16 61746420 2005-08-31 devnull if (~ $#* 0) *=''
17 61746420 2005-08-31 devnull for (j in $*) {
18 61746420 2005-08-31 devnull i= `{echo $i + 1|hoc}
19 61746420 2005-08-31 devnull
20 61746420 2005-08-31 devnull # check access to the file so that you know that a failure in the
21 61746420 2005-08-31 devnull # processing is a drastic error which will cause an exit from lp.
22 61746420 2005-08-31 devnull
23 61746420 2005-08-31 devnull if (~ $j '' || test -f $j) {
24 61746420 2005-08-31 devnull if (~ $THIS_HOST $DEST_HOST) {
25 61746420 2005-08-31 devnull echo $LPMACHID $LPUSERID $pid.$i 0 > $LPSPOOL/$LPDEST/.$pid.$i^id
26 61746420 2005-08-31 devnull lpinput $j lpsub process $LPPROC >$LPSPOOL/$LPDEST/.$pid.$i
27 61746420 2005-08-31 devnull if (~ $status '') {
28 61746420 2005-08-31 devnull mv $LPSPOOL/$LPDEST/.$pid.$i $LPSPOOL/$LPDEST/$pid.$i
29 61746420 2005-08-31 devnull mv $LPSPOOL/$LPDEST/.$pid.$i^id $LPSPOOL/$LPDEST/$pid.$i^id
30 61746420 2005-08-31 devnull }
31 61746420 2005-08-31 devnull if not {
32 61746420 2005-08-31 devnull rval='preprocessing failed'
33 61746420 2005-08-31 devnull rm -f $LPSPOOL/$LPDEST/.$pid.$i $LPSPOOL/queue/$LPDEST/.$pid.$i^id
34 61746420 2005-08-31 devnull exit $rval
35 61746420 2005-08-31 devnull }
36 61746420 2005-08-31 devnull }
37 61746420 2005-08-31 devnull if not {
38 61746420 2005-08-31 devnull {
39 61746420 2005-08-31 devnull echo -d^$LPDEST -pnoproc -M^$LPMACHID -u^$LPUSERID
40 61746420 2005-08-31 devnull lpinput $j lpsub process $LPPROC
41 61746420 2005-08-31 devnull } | lpsend.rc $DEST_HOST
42 61746420 2005-08-31 devnull rval=$status
43 61746420 2005-08-31 devnull }
44 61746420 2005-08-31 devnull }
45 61746420 2005-08-31 devnull if not {
46 61746420 2005-08-31 devnull echo $j cannot be opened >[1=2]
47 61746420 2005-08-31 devnull }
48 61746420 2005-08-31 devnull }