home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume11 / netdata / sendfile < prev   
Encoding:
Text File  |  1987-10-03  |  840 b   |  42 lines
  1. :
  2. # Send a file to a user at another node
  3. V="$VMID"
  4. D=""
  5. F="NETDATA"
  6. CMD=$0
  7. L="/usr/cserv/mills/sendfile"
  8. SKIP=""
  9.  
  10. for ARG do
  11.     if [ "$SKIP" ]; then
  12.     SKIP=""
  13.     else
  14.     case $ARG in
  15.     -v) shift; V="$1"; SKIP="Y"; shift;;
  16.     -d) shift; D="$1"; SKIP="Y"; shift;;
  17.     -o) shift; F="DISK DUMP";;
  18.     -p) shift; F="PUNCH";;
  19.     -*) echo $CMD: invalid option \'$ARG\'; exit 1;;
  20.         esac
  21.     fi
  22. done
  23.  
  24. if test ! -r $1; then
  25.     echo $CMD: file $1 is not readable;
  26.     exit 1;
  27. fi
  28.  
  29. if [ x"$D" = "x" ]; then
  30.     X="$V";D="UOMFCCX";echo Sending file $1 to $V in $F format.;
  31. else
  32.     X="$D"."$V";echo Sending file $1 to "$V"@"$D" in $F format.;
  33. fi
  34.  
  35. case $F in
  36.     D*) $L/diskdump -n $LOGNAME $1 |
  37.     lp -db -o"-r -v $X -f $LOGNAME";;
  38.     N*) $L/netdata -n $LOGNAME -v $V -d $D $1 |
  39.     lp -db -o"-r -v $X -f $LOGNAME";;
  40.     *) lp -db -o"-v $X -f $LOGNAME" < $1;;
  41. esac
  42.