plan9port

fork of plan9port with libvec, libstr and libsdb
Log | Files | Refs | README | LICENSE

lpsend.rc (361B)

      1 #!/bin/rc
      2 if (! ~ $DEBUG '') { flag x + }
      3 if (test -e /net/tcp/clone) {
      4 	dialstring=`{ndb/query sys $1 dom}
      5 	network=tcp
      6 	if (~ $#dialstring 0 || ! ~ $dialstring '') {
      7 		dialstring=$1
      8 	}
      9 	if(lpsend $network^!^$dialstring^!printer) exit ''
     10 	rv='tcp failed'
     11 }
     12 if not rv='no tcp'
     13 
     14 
     15 if (! ~ $dialstring '')
     16 	exit 'lpsend: no dialstring'
     17 if not
     18 	exit 'lpsend: '^$rv