1#! /bin/csh -f 2# 3# @(#)vpr.sh 1.5 (Berkeley) 11/29/82 4# 5# vpr.sh - Use on machines without raster plotters 6# 7set remote = ucbernie 8set execdir = /usr/ucb 9if ($remote != `hostname`) then 10 set cmd = "/usr/ucb/rsh $remote $execdir" 11else 12 set cmd = "/usr/lib" 13endif 14set flags=() files=() 15top: 16 if ($#argv > 0) then 17 switch ($argv[1]) 18 19 case -m: 20 echo "Sorry, the '$argv[1]' flag is not supported." 21 shift argv 22 goto top 23 24 case -1: 25 case -2: 26 case -3: 27 case -4: 28 if ($#argv > 1) then 29 set flags = ($flags $argv[1] $argv[2]) 30 shift argv 31 shift argv 32 goto top 33 else 34 echo $argv[1] takes following font name. 35 exit(1) 36 endif 37 38 case -*: 39 set flags = ($flags $argv[1]) 40 shift argv 41 goto top 42 43 default: 44 set files = ($files $argv[1]) 45 shift argv 46 goto top 47 48 endsw 49 endif 50 51if ($#files) then 52 foreach i ($files) 53 $cmd/vpr $flags < $i 54 end 55else 56 $cmd/vpr $flags 57endif 58