1219b2ee8SDavid du Colombier#!/bin/rc 2*f43f8ee6SDavid du Colombier# lpsend.rc dialstring - run lpsend network!dialstring!printer 3*f43f8ee6SDavid du Colombierif (! ~ $DEBUG '') 4*f43f8ee6SDavid du Colombier flag x + 5*f43f8ee6SDavid du Colombierif (! test -e /net/tcp/clone) 6*f43f8ee6SDavid du Colombier exit 'no tcp' 7*f43f8ee6SDavid du Colombier 8219b2ee8SDavid du Colombierdialstring=`{ndb/query sys $1 dom} 9*f43f8ee6SDavid du Colombierif (~ $#dialstring 0 || ~ $dialstring '') # no dom for sys in ndb? 10*f43f8ee6SDavid du Colombier dialstring=$1 # use arg unchanged 11219b2ee8SDavid du Colombier 12*f43f8ee6SDavid du Colombierlpsend tcp!^$dialstring^!printer 13*f43f8ee6SDavid du Colombierexit $status 14