shithub: riscv

ref: ceed9b8853ab7b10e5a9e39704e712bfce53ce8a
dir: /sys/src/cmd/lp/lpsend.rc/

View raw version 
#!/bin/rc
if (! ~ $DEBUG '') { flag x + }
if (test -e /net/tcp/clone) {
	dialstring=`{ndb/query sys $1 dom}
	network=tcp
	if (~ $#dialstring 0 || ! ~ $dialstring '') {
		dialstring=$1
	}
	if(lpsend $network^!^$dialstring^!printer) exit ''
	rv='tcp failed'
}
if not rv='no tcp'


if (! ~ $dialstring '')
	exit 'lpsend: no dialstring'
if not
	exit 'lpsend: '^$rv