shithub: riscv

ref: 6fe18e7c7b6dd98c6eb7b01ad7c753d42d60fd0f
dir: /sys/lib/lp/spooler/lpdspool/

View raw version 
#!/bin/rc

if (! ~ $DEBUG '') flag x +

if (~ $#* 0) *='/fd/0'

for (j in $*) {
	if (~ $j '/fd/0' || test -f $j) {
		@{bind -b $LPLIB/process /bin; $LPPROC} < $j | /$cputype/bin/aux/lpdsend -d$OUTDEV -tf -H$LPMACHID -P$LPUSERID $DEST_HOST >[2]$LPLOGDIR/$LPDEST^.st
	}
	if not {
		echo $j cannot be opened >[1=2]
	}
}