projects
/
unix-history
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
date and time created 83/08/05 13:35:46 by sam
[unix-history]
/
usr
/
src
/
old
/
vpr
/
vtroff.sh
diff --git
a/usr/src/old/vpr/vtroff.sh
b/usr/src/old/vpr/vtroff.sh
index
609d163
..
b54d75d
100644
(file)
--- a/
usr/src/old/vpr/vtroff.sh
+++ b/
usr/src/old/vpr/vtroff.sh
@@
-1,41
+1,34
@@
#! /bin/csh -f
#
#! /bin/csh -f
#
-# @(#)vtroff.sh
1.4
(Berkeley) %G%
+# @(#)vtroff.sh
4.2
(Berkeley) %G%
#
#
-set remote = ucbernie
-set execdir = /usr/ucb
-if ($remote != `hostname`) then
- set cmd = "/usr/ucb/rsh $remote"
-else
- set cmd = ""
-endif
umask 0
umask 0
-set flags=() noglob length=() fonts=() fontf=()
macp=(/usr/lib/tmac/tmac.vcat)
+set flags=() noglob length=() fonts=() fontf=()
unset t
unset t
+set macp = (/usr/lib/tmac/tmac.vcat)
+set sort = (/usr/lib/rvsort)
+set lpr = (/usr/ucb/lpr -Pvarian)
top:
if ($#argv > 0) then
switch ($argv[1])
top:
if ($#argv > 0) then
switch ($argv[1])
-
case -t:
set t
shift argv
goto top
case -t:
set t
shift argv
goto top
-
case -l*:
set length = $argv[1]
shift argv
goto top
case -l*:
set length = $argv[1]
shift argv
goto top
-
case -V:
case -V:
- unset wide
+ set sort = (/usr/lib/rvsort)
+ set lpr = (/usr/ucb/lpr -Pvarian)
shift argv
goto top
shift argv
goto top
-
case -W:
case -W:
- set wide
+ set sort = (/usr/lib/vsort -W)
+ set lpr = (/usr/ucb/lpr -Pversatec)
shift argv
goto top
shift argv
goto top
-
case -F:
if ($#argv < 2) then
echo -F takes following font name.
case -F:
if ($#argv < 2) then
echo -F takes following font name.
@@
-43,7
+36,6
@@
top:
endif
set argv=(-1 $2.r -2 $2.i -3 $2.b $argv[3-])
goto top
endif
set argv=(-1 $2.r -2 $2.i -3 $2.b $argv[3-])
goto top
-
case -1:
case -2:
case -3:
case -1:
case -2:
case -3:
@@
-69,37
+61,28
@@
top:
shift argv
shift argv
goto top
shift argv
shift argv
goto top
-
case -x:
set macp=()
shift argv
goto top
case -x:
set macp=()
shift argv
goto top
-
case -*:
set flags = ($flags $argv[1])
shift argv
goto top
case -*:
set flags = ($flags $argv[1])
shift argv
goto top
-
endsw
endif
if ($#argv == 0) then
set argv=(-)
endsw
endif
if ($#argv == 0) then
set argv=(-)
+ set banner=vtroff
+else
+ set banner=$argv[1]
endif
endif
-if ($?wide) then
- if ($?t) then
- /usr/bin/troff -t -rv1 $flags $macp $fontf $* | /usr/lib/vsort -W $length
- else
- /usr/bin/troff -t -rv1 $flags $macp $fontf $* | \
- /usr/lib/vsort -W $length | $cmd $execdir/vpr -W -t $fonts
- endif
+if ($?t) then
+ /usr/bin/troff -t -rv1 $flags $macp $fontf $* | $sort $length
else
else
- if ($?t) then
- /usr/bin/troff -t -rv1 $flags $macp $fontf $* | /usr/lib/rvsort $length
- else
- /usr/bin/troff -t -rv1 $flags $macp $fontf $* | \
- /usr/lib/rvsort $length | $cmd $execdir/vpr -t $fonts
- endif
+ /usr/bin/troff -t -rv1 $flags $macp $fontf $* | $sort $length |\
+ $lpr -J$banner -t $fonts
endif
if ($#fontf) then
endif
if ($#fontf) then
-
rm $fontf
+
/bin/
rm $fontf
endif
endif