|
|
1.1 ! root 1: #! /bin/sh ! 2: # ! 3: # @(#)nettroff.sh 4.1 (Berkeley) 9/12/82 ! 4: # ! 5: # nettroff typeset on CC or VAX typesetter ! 6: # ! 7: # don't change this code - it is updated remotely ! 8: # mail problems to "csvax:schmidt" -- your changes wil be lost ! 9: # ! 10: # A machine phototypesetter version ! 11: # ! 12: set local=`cat /usr/include/whoami` ! 13: set typesetter=a ! 14: set troff=troff ! 15: set net=/usr/ucb/net ! 16: set whoami=/usr/ucb/whoami ! 17: onintr remove ! 18: set flags=() noglob length=() fonts=() fontf=() ! 19: top: ! 20: if ($#argv > 0) then ! 21: switch ($argv[1]) ! 22: ! 23: case -l*: ! 24: case -F: ! 25: case -1: ! 26: case -2: ! 27: case -3: ! 28: case -a: ! 29: case -b: ! 30: case -f: ! 31: case -g: ! 32: case -s*: ! 33: case -w: ! 34: echo $argv[1] not allowed. ! 35: exit(1) ! 36: ! 37: case -*: ! 38: set flags = ($flags $argv[1]) ! 39: shift argv ! 40: goto top ! 41: ! 42: endsw ! 43: endif ! 44: if ($#argv == 0) then ! 45: set argv=(-) ! 46: endif ! 47: $troff -t $flags $fontf $* >/usr/tmp/vp$$ ! 48: # check for valid format before sending off to A machine ! 49: /usr/net/bin/chktroff /usr/tmp/vp$$ ! 50: if ($status != 0) then ! 51: goto remove ! 52: endif ! 53: set person=`$whoami` ! 54: $net -q -m $typesetter -s /usr/tmp/vp$$ -c "nettroff $*" "/usr/lib/ntq -m $local -n $person" ! 55: remove: ! 56: rm -f /usr/tmp/vp$$ ! 57: if ($#fontf) then ! 58: rm -f $fontf ! 59: endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.