Return to nettroff.sh CVS log

Up to [CSRG BSD Unix] / 41BSD / cmd / berknet

Annotation of 41BSD/cmd/berknet/nettroff.sh, revision 1.1

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

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.