#!/bin/sh # original mktexpk -- make a new PK font, because one wasn't found. # # (If you change or delete the word `original' on the previous line, # installation won't write this script over yours.) # # te@informatik.uni-hannover.de, kb@mail.tug.org, and infovore@xs4all.nl. # Public domain. version='$Id: mktexpk,v 1.16 1998/01/29 20:43:16 olaf Exp $' progname=`echo $0 | sed 's@.*/@@'` usage="Usage: $progname NAME DPI BDPI MAG [MODE [DESTDIR [REDIRECT]]]. Try to create a PK file for NAME at resolution DPI, with an assumed device base resolution of BDPI, and a Metafont \`mag' of MAG. Use MODE for the Metafont mode if supplied, unless MODE is \`default', in hich case guess as usual. (This is so you can specify DESTDIR without MODE.) Use DESTDIR for the root of where to install into, either the absolute irectory name to use (if it starts with a /) or relative to the default DESTDIR (if not). REDIRECT if supplied, is a string of the form '>&n', where n is the number of the file descriptor which is to receive, instead of stdout, the name of the newly created pk file." if test "x$7" != x; then tail="`echo \"x$7\" | sed 's/^x>&//' | grep '^[0-9]*$'`" if test -z "$tail"; then echo "$progname: argument '$7' ignored - bad file number" >&2 elif test "$tail" != 1; then eval 'exec 1>&$tail' fi fi mt_min_args=4 mt_max_args=7 # Common code for all scripts. mktex_opt=`kpsewhich --format='web2c files' mktex.opt` if test -z "$mktex_opt"; then echo "$progname: Cannot find mktex.opt; check your installation." >&2 exit 1 fi . "$mktex_opt" # Since we want to pass the generated filename and only that filename # back to the caller on standard output, we do some redirections so # regular echo's will end up on stderr, and do an echo >$STDOUT at the end. # Then the contents of $STDOUT will be echoed to stdout by a trap. # start of redirection stdout -> stderr, stdin <- /dev/null ( NAME=$1 case "$NAME" in *[0-9]w[0-9][0-9][0-9][0-9]) NAMESTEM=`echo "$NAME" | sed 's/w[0-9]*$//'` EXTENSION=`echo "$NAME" | sed 's/^.*[0-9]w//'`;; *) NAMESTEM="$NAME" EXTENSION=1000;; esac DPI=$2 BDPI=$3 MAG=$4 MODE=$5 DEST="$6" # grep for the font in $PSMAPFILE. These are base font names, such as # rpplr (the original) or pplr0 (an interim step) or pplr8r (current). : ${PSMAPFILE=`kpsewhich psfonts.map`} pattern="^$NAMESTEM"'([ ]|$)' psline=`egrep "$pattern" $PSMAPFILE` if test -n "$psline"; then MODE=modeless # ps_to_pk is set in mktex.opt case $ps_to_pk in ps2pk) set x `echo "$psline" | sed 's@[<["]@@g'` shift; shift; shift; encoding=; psname=; slant=; extend= while test ! -z "$1"; do case "$1" in *.enc) encoding="-e $1";; *.pf[ab]) psname="$1";; *SlantFont) slant="-S $lastopt";; *ExtendFont) extend="-E $lastopt";; esac lastopt="$1" shift done test -n "$psname" || { pfa=`(kpsewhich $NAME.pfa 2>/dev/null)`; psname=$pfa; } test -n "$psname" || { pfb=`(kpsewhich $NAME.pfb 2>/dev/null)`; psname=$pfb; } ANAME=`echo $NAME | sed 's/8r$/8a/'` test -n "$psname" || { pfa=`(kpsewhich $ANAME.pfa 2>/dev/null)`; psname=$pfa; } test -n "$psname" || { pfb=`(kpsewhich $ANAME.pfb 2>/dev/null)`; psname=$pfb; } if [ -z "$psname" ]; then echo "$progname: cannot find $NAME.pfa or $NAME.pfb. Trying gsftopk." >&2 cmd="gsftopk $NAME $DPI" else cmd="ps2pk -v -X$DPI -R$BDPI $slant $extend $encoding $psname $NAME.${DPI}pk" fi ;; *) cmd="$ps_to_pk $NAME $DPI" ;; esac else # Check that $BDPI and $MODE are consistent; if not, ignore the mode and # hope we can correctly guess it from bdpi. (People like to specify the # resolution on the command line, not the mode so much.) if test -n "$MODE"; then mf_bdpi=`mf \ '\mode:='$MODE';mode_setup;message"BDPI= "&decimal round pixels_per_inch;end.'\ &2 MODE= fi fi # If an explicit mode is not supplied, try to guess. You can get a # list of extant modes from ftp://ftp.tug.org/tex/modes.mf. if test -z "$MODE" || test "$MODE" = default; then case "$BDPI" in 85) MODE=sun;; 100) MODE=nextscrn;; 180) MODE=toshiba;; 300) MODE=cx;; 400) MODE=nexthi;; 600) MODE=ljfour;; 1270) MODE=linoone;; *) echo "$progname: Can't guess mode for $BDPI dpi devices." >&2 echo "$progname: Use a config file, or update me." >&2 exit 1 esac fi # Run Metafont. Always use plain Metafont, since reading cmbase.mf # does not noticeably slow things down. cmd="mf \mode:=$MODE; mag:=$MAG; nonstopmode; input $NAME" fi OIFS=$IFS; IFS=$SEP set x `"$mktexnam" $NAME $DPI $MODE $DEST`; shift IFS=$OIFS PKDEST="$1" PKDESTDIR=`echo "$PKDEST" | sed 's%/[^/][^/]*$%%'` # can't rely on dirname PKNAME=`basename "$PKDEST"` GFNAME=$NAME.${DPI}gf if test -r "$PKDESTDIR/$PKNAME"; then echo "$progname: $PKDESTDIR/$PKNAME already exists." >&2 echo "$PKDESTDIR/$PKNAME" >$STDOUT "$mktexupd" "$PKDESTDIR" $PKNAME exit 0 fi "$mktexdir" "$PKDESTDIR" if test ! -d "$PKDESTDIR"; then echo "$progname: mktexdir $PKDESTDIR failed." >&2 exit 1 fi echo "$progname: Running $cmd" $cmd $$.errs 2>/dev/null grep '^! Strange path' $$.errs >$$.strange 2>/dev/null if cmp $$.errs $$.strange >/dev/null 2>&1 \ && test -s $$.strange >/dev/null 2>&1; then echo "$progname: warning: \`$cmd' caused strange path errors." >&2 else echo "$progname: \`$cmd' failed." >&2 test -s $NAME.log && mv -f $NAME.log "$KPSE_DOT" exit 1; fi } test -r $GFNAME && { gftopk ./$GFNAME $PKNAME || exit 1; } test ! -f $PKNAME && test -f $NAME.${DPI}pk && mv $NAME.${DPI}pk $PKNAME if test ! -s $PKNAME; then echo "$progname: \`$cmd' failed to make $PKNAME." >&2 exit 1 fi # Install the PK file carefully, since others may be working simultaneously. # Use cp when mv fails, since DOS will fail mv for deeply-nested directories. mv $PKNAME "$PKDESTDIR/pk$$.tmp" 2>/dev/null \ || cp $PKNAME "$PKDESTDIR/pk$$.tmp" || exit 1 cd $PKDESTDIR || exit 1 test -r $PKNAME || mv pk$$.tmp $PKNAME || exit 1 chmod `kpsestat -stx .` $PKNAME # Update ls-R if necessary. "$mktexupd" "$PKDESTDIR" $PKNAME # If this line (or an equivalent) is not present, dvipsk/xdvik/dviljk # will think mktexpk failed. Any other output to stdout will also lose. echo "$PKDESTDIR/$PKNAME" >$STDOUT echo "$progname: $PKDESTDIR/$PKNAME: successfully generated." >&2 ) 1>&2