ref: a2c0e55e6885fde0d135831a77d227bc933d89e7
dir: /sys/src/cmd/postscript/trofftable/trofftable.rc/
#!/bin/rc # Writes a PostScript program on standard output that builds a width # table or typesetter description file. The program uses PostScript's # print procedure, which means the table comes back on the printer's # serial port. Try hardcopy if you don't have access to the port. # POSTLIB=/sys/lib/postscript/prologues FONTDIR=/sys/lib/troff/font PROLOGUE=$POSTLIB/trofftable.ps DPOSTPROLOGUE=$POSTLIB/dpost.ps COPYFILE=() HOSTFONTDIR=() DEVICE=() LIBRARY=() TEMPLATE=-R SLOWDOWN=25 STARTCOMMENTS=256 NONCONFORMING='%!PS' ENDPROLOG='%%EndProlog' BEGINSETUP='%%BeginSetup' ENDSETUP='%%EndSetup' TRAILER='%%Trailer' while (! ~ $#* 0 && ~ $1 -*) { switch ($1) { case -C; shift; COPYFILE=$COPYFILE' '$1 case -C*; COPYFILE=$COPYFILE' '`{echo $1 | sed s/-C//} case -F; shift; FONTDIR=$1 case -F*; FONTDIR=`{echo $1 | sed s/-F//} case -H; shift; HOSTFONTDIR=$1 case -H*; HOSTFONTDIR=`{echo $1 | sed s/-H//} case -L; shift; PROLOGUE=$1 case -L*; PROLOGUE=`{echo $1 | sed s/-L//} case -S; shift; LIBRARY=$1 case -S*; LIBRARY=`{echo $1 | sed s/-S//} case -T; shift; DEVICE=$1 case -T*; DEVICE=`{echo $1 | sed s/-T//} case -c; shift; STARTCOMMENTS=$1 case -c*; STARTCOMMENTS=`{echo $1 | sed s/-c//} case -o; shift; OCTALESCAPES=$1 # only for Latin1 tables case -o*; OCTALESCAPES=`{echo $1 | sed s/-o//} case -s; shift; SLOWDOWN=$1 case -s*; SLOWDOWN=`{echo $1 | sed s/-s//} case -t; shift; TEMPLATE=$1 case -t*; TEMPLATE=`{echo $1 | sed s/-t//} case -*; echo $0: illegal option $1 >[1=2]; exit 1 } shift } if (! ~ $#DEVICE 0 && ! ~ $#LIBRARY 0) { echo $0: no device or shell library >[1=2] exit 1 } if (! ~ $#* 1 2) { echo $0: bad argument count >[1=2] exit 1 } if (test -d $HOSTFONTDIR -a -f $HOSTFONTDIR/$1) { COPYFILE=$COPYFILE' '$HOSTFONTDIR/$1 } # # Include the shell library and get the command used to build the table. # Make awk call a separate library function?? # if (~ $#LIBRARY 0 || ~ $LIBRARY '') LIBRARY=$FONTDIR/dev$DEVICE/shell.lib . $LIBRARY if (~ $#* 1) TEMPLATE=$1 CMD=`{BuiltinTables | awk '$2 == template"" { if ( pname == "" ) pname = $3 printf "%s %s %s", $1, tname, pname exit 0 }' template=$TEMPLATE tname=$1 pname=$2} if (! $CMD) { echo $0: $TEMPLATE not found >[1=2] exit 1 } # # Build the PostScript font table program. # echo $NONCONFORMING cat $PROLOGUE echo /DpostPrologue 100 dict dup begin cat $DPOSTPROLOGUE echo end def echo $ENDPROLOG echo $BEGINSETUP if (~ $COPYFILE '') COPYFILE=/dev/null cat $COPYFILE echo /slowdown $SLOWDOWN def echo /startcomments $STARTCOMMENTS def echo $ENDSETUP $CMD echo $TRAILER