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