:
# Send a file to a user at another node
V="$VMID"
D=""
F="NETDATA"
CMD=$0
L="/usr/cserv/mills/sendfile"
SKIP=""

for ARG do
    if [ "$SKIP" ]; then
	SKIP=""
    else
	case $ARG in
	-v) shift; V="$1"; SKIP="Y"; shift;;
	-d) shift; D="$1"; SKIP="Y"; shift;;
	-o) shift; F="DISK DUMP";;
	-p) shift; F="PUNCH";;
	-*) echo $CMD: invalid option \'$ARG\'; exit 1;;
    	esac
    fi
done

if test ! -r $1; then
    echo $CMD: file $1 is not readable;
    exit 1;
fi

if [ x"$D" = "x" ]; then
    X="$V";D="UOMFCCX";echo Sending file $1 to $V in $F format.;
else
    X="$D"."$V";echo Sending file $1 to "$V"@"$D" in $F format.;
fi

case $F in
    D*) $L/diskdump -n $LOGNAME $1 |
	lp -db -o"-r -v $X -f $LOGNAME";;
    N*) $L/netdata -n $LOGNAME -v $V -d $D $1 |
	lp -db -o"-r -v $X -f $LOGNAME";;
    *) lp -db -o"-v $X -f $LOGNAME" < $1;;
esac
