#!/bin/sh ############################################################################### # fmtutil: utility to maintain format files. # # Thomas Esser, public domain. # # Commands: # --all recreate all format files # --missing create all missing format files # --refresh recreate only existing format files # --byfmt formatname (re)create format for `formatname' # --byhyphen hyphenfile (re)create formats that depend on `hyphenfile' # --enablefmt formatname enable formatname in config file # --disablefmt formatname disable formatname in config file # --listcfg list (enabled and disabled) configurations, # filtered to available formats # --catcfg output the content of the config file # --showhyphen formatname print name of hyphenfile for format `formatname' # --edit edit fmtutil.cnf file # --version show version info # --help show this message # # Options: # --cnffile file set configfile for fmtutil # --fmtdir directory set destination directory for format files # --no-engine-subdir don't use $engine subdirectory of the fmtdir ############################################################################### ############################################################################### # program history: # 2007-01-04 patch by JK to support $engine subdir (enabled by default) # Fr Apr 8 19:15:05 CEST 2005 cleanup now has an argument for the return code # Do Mar 02 10:42:31 CET 2006 add tmpdir to TEXFORMATS # So Mär 27 18:52:06 CEST 2005 honor $TMPDIR, $TEMP and $TMP, not just $TMP # Sa Jan 15 18:13:46 CET 2005 avoid multiple variable assignments in one statement # Di Jan 11 11:42:36 CET 2005 fix --byhyphen with relative hyphenfile # Fr Dez 31 16:51:29 CET 2004 option catcfg added (for being called by texconfig) # Do Dez 30 21:53:27 CET 2004 rename variable verbose to verboseFlag # Sa Dez 25 12:44:23 CET 2004 implementation adopted for teTeX-3.0 (tcfmgr) # Do Okt 28 11:09:36 CEST 2004 added --refresh # Fr Sep 17 19:25:28 CEST 2004 save $0 in a variable before calling a function # Sun May 9 23:24:06 CEST 2004 changes for new web2c: format names # are now *.fmt, nothing else, disable # "plain" symlinks # Thu May 6 14:16:19 CEST 2004: "mv .../dev/null \ && { RUNNING_KSH=true; export RUNNING_KSH; exec /bin/ksh $0 ${1+"$@"}; } unset RUNNING_KSH test -f /bin/bsh && test -z "$RUNNING_BSH" \ && { UNAMES=`uname -s`; test "x$UNAMES" = xAIX; } 2>/dev/null \ && { RUNNING_BSH=true; export RUNNING_BSH; exec /bin/bsh $0 ${1+"$@"}; } unset RUNNING_BSH # hack around a bug in zsh: test -n "${ZSH_VERSION+set}" && alias -g '${1+"$@"}'='"$@"' progname=fmtutil argv0=$0 version=1168729197 # seconds since `00:00:00 1970-01-01 UTC' # date '+%s' (with GNU date) cnf=fmtutil.cnf # name of the config file export PATH ############################################################################### # cleanup() # clean up the temp area and exit with proper exit status ############################################################################### cleanup() { rc=$1 # for debugging, exit $rc here so $tmpdir with its logs sticks around. $needsCleanup && test -n "$tmpdir" && test -d "$tmpdir" \ && { cd / && rm -rf "$tmpdir"; } (exit $rc); exit $rc } ############################################################################### # setupTmpDir() # set up a temp directory and a trap to remove it ############################################################################### setupTmpDir() { $needsCleanup && return trap 'cleanup 1' 1 2 3 7 13 15 needsCleanup=true (umask 077; mkdir "$tmpdir") \ || abort "could not create directory \`$tmpdir'" } ############################################################################### # configReplace(file, pattern, line) # The first line in file that matches pattern gets replaced by line. # line will be added at the end of the file if pattern does not match. ############################################################################### configReplace() { file=$1; pat=$2; line=$3 if grep "$pat" "$file" >/dev/null; then ed "$file" >/dev/null 2>&1 <<-eof /$pat/ c $line . w q eof else echo "$line" >> $file fi } ############################################################################### # setmatch(match) # setting the "match state" to true or false. Used to see if there was at # least one match. ############################################################################### setmatch() { match=$1 } ############################################################################### # getmatch() # return success if there was at least one match. ############################################################################### getmatch() { test "x$match" = xtrue } ############################################################################### # initTexmfMain() # get $MT_TEXMFMAIN from $TEXMFMAIN ############################################################################### initTexmfMain() { case $MT_TEXMFMAIN in "") MT_TEXMFMAIN=`kpsewhich --var-value=TEXMFMAIN`;; esac export MT_TEXMFMAIN } ############################################################################### # cache_vars() # locate files / kpathsea variables and export variables to environment # this speeds up future calls to e.g. mktexupd ############################################################################### cache_vars() { : ${MT_VARTEXFONTS=`kpsewhich --expand-var='$VARTEXFONTS' | sed 's%^!!%%'`} : ${MT_MKTEXNAM=`kpsewhich --format='web2c files' mktexnam`} : ${MT_MKTEXNAM_OPT=`kpsewhich --format='web2c files' mktexnam.opt`} : ${MT_MKTEXDIR=`kpsewhich --format='web2c files' mktexdir`} : ${MT_MKTEXDIR_OPT=`kpsewhich --format='web2c files' mktexdir.opt`} : ${MT_MKTEXUPD=`kpsewhich --format='web2c files' mktexupd`} : ${MT_MKTEX_CNF=`kpsewhich --format='web2c files' mktex.cnf`} : ${MT_MKTEX_OPT=`kpsewhich --format='web2c files' mktex.opt`} export MT_VARTEXFONTS MT_MKTEXNAM MT_MKTEXNAM_OPT MT_MKTEXDIR export MT_MKTEXDIR_OPT MT_MKTEXUPD MT_MKTEX_CNF MT_MKTEX_OPT } ############################################################################### # help() # display help message and exit ############################################################################### help() { cat <<'eof' Usage: fmtutil [option] ... cmd [argument] Valid options: --cnffile file --fmtdir directory --no-engine-subdir don't use engine-specific subdir of the fmtdir --quiet (not implemented, just for compatibility) --test (not implemented, just for compatibility) --dolinks (not implemented, just for compatibility) --force (not implemented, just for compatibility) Valid commands: --all recreate all format files --missing create all missing format files --refresh recreate only existing format files --byfmt formatname (re)create format for `formatname' --byhyphen hyphenfile (re)create formats that depend on `hyphenfile' --enablefmt formatname enable formatname in config file --disablefmt formatname disable formatname in config file --listcfg list (enabled and disabled) configurations, filtered to available formats --catcfg output the content of the config file --showhyphen formatname print name of hyphenfile for format `formatname' --edit edit fmtutil.cnf file --version show version info --help show this message eof cleanup 0 } version() { cat <&2 cleanup 1 } ############################################################################### # verboseMsg(msg) # print `msg' to stderr is $verbose is true ############################################################################### verboseMsg() { $verboseFlag && verbose echo ${1+"$@"} } ############################################################################### # byebye() # report any failures and exit the program ############################################################################### byebye() { if $has_errors; then { cat <&2 cleanup 1 else cleanup 0 fi } ############################################################################### # init_log_failure() # reset the list of failure messages ############################################################################### init_log_failure() { log_failure_msg= has_errors=false } ############################################################################### # log_failure(errmsg) # report and save failure message `errmsg' ############################################################################### log_failure() { echo "Error: $@" >&2 if test -z "$log_failure_msg"; then log_failure_msg="$@" else OLDIFS=$IFS; IFS= log_failure_msg="$log_failure_msg $@" IFS=$OLDIFS fi has_errors=true } ############################################################################### # verbose (cmd) # execute cmd. Redirect output depending on $mktexfmtMode. ############################################################################### verbose() { $mktexfmtMode && ${1+"$@"} >&2 || ${1+"$@"} } ############################################################################### # mktexdir(args) # call mktexdir script, disable all features (to prevent sticky directories) ############################################################################### mktexdir() { initTexmfMain MT_FEATURES=none "$MT_TEXMFMAIN/web2c/mktexdir" "$@" >&2 } ############################################################################### # tcfmgr(args) # call tcfmgr script ############################################################################### tcfmgr() { initTexmfMain "$MT_TEXMFMAIN/texconfig/tcfmgr" "$@" } ############################################################################### # mktexupd(args) # call mktexupd script ############################################################################### mktexupd() { initTexmfMain "$MT_TEXMFMAIN/web2c/mktexupd" "$@" } ############################################################################### # main() # parse commandline arguments, initialize variables, # switch into temp. direcrory, execute desired command ############################################################################### main() { destdir= # global variable: where do we put the format files? cnf_file= # global variable: full name of the config file cmd= # desired action from command line needsCleanup=false need_find_hyphenfile=false cfgparam= cfgmaint= tmpdir=${TMPDIR-${TEMP-${TMP-/tmp}}}/$progname.$$ verboseFlag=true # mktexfmtMode: if called as mktexfmt, set to true. Will echo the # first generated filename after successful generation to stdout then # (and nothing else), since kpathsea can only deal with one. mktexfmtMode=false case $argv0 in mktexfmt|*/mktexfmt) mktexfmtMode=true fullfmt=$1; shift case $fullfmt in *.fmt|*.mem|*.base) set x --byfmt `echo $fullfmt | sed 's@\.[a-z]*$@@'` ${1+"$@"}; shift ;; *.*) abort "unknown format type: $fullfmt" ;; "") help ;; *) set x --byfmt $fullfmt; shift ;; esac ;; esac use_engine_dir=true # whether to use web2c/$engine subdirs while case $1 in --cnffile) shift; cnf_file=$1; cfgparam=1;; --cnffile=*) cnf_file=`echo "$1" | sed 's/--cnffile=//'`; cfgparam=1; shift ;; --fmtdir) shift; destdir=$1;; --fmtdir=*) destdir=`echo "$1" | sed 's/--fmtdir=//'`; shift ;; --no-engine-subdir) use_engine_dir=false;; --all|-a) cmd=all;; --edit|-e) cmd=edit; cfgmaint=1;; --missing|-m) cmd=missing;; --refresh|-r) cmd=refresh;; --byfmt|-f) shift; cmd=byfmt; arg=$1;; --byfmt=*) cmd=byfmt; arg=`echo "$1" | sed 's/--byfmt=//'`; shift ;; --byhyphen|-h) shift; cmd=byhyphen; arg=$1;; --byhyphen=*) cmd=byhyphen; arg=`echo "$1" | sed 's/--byhyphen=//'`; shift ;; --showhyphen|-s) shift; cmd=showhyphen; arg=$1;; --showhyphen=*) cmd=showhyphen; arg=`echo "$1" | sed 's/--showhyphen=//'`; shift ;; --help|-help) cmd=help;; --version) cmd=version;; --enablefmt) shift; cmd=enablefmt; arg=$1; cfgmaint=1;; --enablefmt=*) cmd=enablefmt; arg=`echo "$1" | sed 's/--enablefmt=//'`; cfgmaint=1; shift;; --disablefmt) shift; cmd=disablefmt; arg=$1; cfgmaint=1;; --disablefmt=*) cmd=disablefmt; arg=`echo "$1" | sed 's/--disablefmt=//'`; cfgmaint=1; shift;; --catcfg) cmd=catcfg;; --listcfg) cmd=listcfg;; --quiet|-q) verboseFlag=false;; --test|--dolinks|--force) ;; "") break;; *) abort "$progname: unknown option \`$1'. Try $progname --help for help";; esac do test $# -gt 0 && shift; done case "$cmd" in help|"") help;; version) version;; esac if test -n "$cfgparam"; then test -f "$cnf_file" || abort "config file \`$cnf_file' not found" fi if test -n "$cfgmaint"; then if test -z "$cfgparam"; then setupTmpDir co=`tcfmgr --tmp $tmpdir --cmd co --file $cnf` test $? = 0 || cleanup 1 set x $co; shift id=$1; cnf_file=$3; orig=$4 verboseMsg "$progname: initial config file is \`$orig'" fi else if test -z "$cfgparam"; then cnf_file=`tcfmgr --cmd find --file $cnf` test -f "$cnf_file" || abort "config file \`$cnf' not found" fi fi # showhyphen and edit do not need any temp. directory, so do it here: case "$cmd" in showhyphen) show_hyphen_file "$arg" cleanup $? ;; edit) ${VISUAL-${EDITOR-vi}} $cnf_file ;; enablefmt|disablefmt) $cmd $arg ;; catcfg) grep -v '^ *#' "$cnf_file" | sed 's@^ *@@; s@ *$@@' | grep . | sort cleanup $? ;; listcfg) listcfg_loop cleanup $? ;; esac if test -n "$cfgmaint"; then if test -z "$cfgparam"; then ci=`tcfmgr --tmp $tmpdir --cmd ci --id $id` if test $? = 0; then if test -n "$ci"; then verboseMsg "$progname: configuration file updated: \`$ci'" else verboseMsg "$progname: configuration file unchanged." fi else abort "failed to update configuration file." fi fi cleanup $? fi # set up destdir: if test -z "$destdir"; then : ${MT_TEXMFVAR=`kpsewhich -var-value=TEXMFVAR`} destdir=$MT_TEXMFVAR/web2c fi test -d "$destdir" || mktexdir "$destdir" >/dev/null 2>&1 test -d "$destdir" || abort "format directory \`$destdir' does not exist" test -w "$destdir" || abort "format directory \`$destdir' is not writable" thisdir=`pwd` : ${KPSE_DOT=$thisdir} export KPSE_DOT # due to KPSE_DOT, we don't search the current directory, so include # it explicitly for formats that \write and later on \read TEXINPUTS="$tmpdir:$TEXINPUTS"; export TEXINPUTS # for formats that load other formats (e.g., jadetex loads latex.fmt), # add the current directory to TEXFORMATS, too. Currently unnecessary # for MFBASES and MPMEMS. TEXFORMATS="$tmpdir:$TEXFORMATS"; export TEXFORMATS setupTmpDir cd "$tmpdir" || cleanup 1 # make local paths absolute: case "$destdir" in /*) ;; *) destdir="$thisdir/$destdir";; esac case "$cnf_file" in /*) ;; *) cnf_file="$thisdir/$cnf_file";; esac cache_vars init_log_failure # execute the desired command: case "$cmd" in all) recreate_all;; missing) create_missing;; refresh) recreate_existing;; byfmt) recreate_by_fmt "$arg";; byhyphen) recreate_by_hyphenfile "$arg";; esac byebye } ############################################################################### # parse_line(config_line) sets global variables: # format: name of the format, e.g. pdflatex # engine: name of the TeX engine, e.g. tex, etex, pdftex # texargs: flags for initex and name of the ini file (e.g. -mltex frlatex.ini) # fmtfile: name of the format file (without directory, but with extension) # # Support for building internationalized formats sets: # pool: base name of pool file (to support translated pool files) # tcx: translation file used when creating the format # # Example (for fmtutil.cnf): # mex-pl tex mexconf.tex nls=tex-pl,il2-pl mex.ini # # The nls parameter (pool,tcx) can only be specified as the first argument # inside the 4th field in fmtutil.cnf. # # exit code: returns error code if the ini file is not installed ############################################################################### parse_line() { case $1 in '#!') disabled=true; shift;; *) disabled=false;; esac format=$1 engine=$2 hyphenation=$3 shift; shift; shift # handle nls support: pool + tcx pool=; tcx= case $1 in nls=*) pool=`echo $1 | sed 's@nls=@@; s@,.*@@'` tcx=`echo $1 | sed 's@nls=[^,]*@@; s@^,@@'` shift # nls stuff is not handled by the engine directly, # so we shift this away ;; esac texargs="$@" eval lastarg=\$$# inifile=`echo $lastarg | sed 's%^\*%%'` case "$engine" in mpost) fmtfile="$format.mem"; kpsefmt=mpost; texengine=metapost;; mf|mfw|mf-nowin) fmtfile="$format.base"; kpsefmt=mf; texengine=metafont;; *) fmtfile="$format.fmt"; kpsefmt=tex; texengine=$engine;; esac # See if we can find $inifile for return code: kpsewhich -progname=$format -format=$kpsefmt $inifile >/dev/null 2>&1 } ############################################################################### # find_hyphenfile(format, hyphenation) searches for hyphenation along # searchpath of format # exit code: returns error is file is not found ############################################################################### find_hyphenfile() { format="$1"; hyphenation="$2" case $hyphenation in -) ;; *) kpsewhich -progname="$format" -format=tex "$hyphenation";; esac } ############################################################################### # find_info_for_name(format) # Look up the config line for format `format' and call parse_line to set # global variables. ############################################################################### find_info_for_name() { format="$1" # set x `awk '$1 == format {print; exit}' format="$format" "$cnf_file"`; shift set x `egrep "^$format( | )" "$cnf_file" | sed q`; shift test $# = 0 && abort "no info for format \`$format'" parse_line "$@" } ############################################################################### # run_initex() # Calls initex. Assumes that global variables are set by parse_line. ############################################################################### run_initex() { # install a pool file and set tcx flag if requested in lang= option: rm -f *.pool poolfile= tcxflag= test -n "$pool" \ && poolfile=`(kpsewhich -progname=$engine $pool.pool) 2>/dev/null` if test -n "$poolfile" && test -f "$poolfile"; then verboseMsg "$progname: attempting to create localized format using pool=$pool and tcx=$tcx." cp "$poolfile" $engine.pool test -n "$tcx" && tcxflag=-translate-file=$tcx localpool=true else localpool=false fi jobswitch="-jobname=$format" case "$format" in metafun) prgswitch=-progname=mpost;; mptopdf|cont-??) prgswitch=-progname=context;; *) prgswitch=-progname=$format;; esac rm -f $fmtfile verboseMsg "$progname: running \`$engine -ini $tcxflag $jobswitch $prgswitch $texargs' ..." # run in a subshell to get a local effect of TEXPOOL manipulation: ( # If necessary, set TEXPOOL. Use absolute path, because of KPSE_DOT. $localpool && { TEXPOOL="`pwd`:$TEXPOOL"; export TEXPOOL; } verbose $engine -ini $tcxflag $jobswitch $prgswitch $texargs ) /dev/null 2>&1 && log_failure "\`$engine -ini $tcxflag $jobswitch $prgswitch $texargs' possibly failed." rm -f "$fulldestdir/$format.log" # We don't want user-interaction for the following "mv" commands: mv "$format.log" "$fulldestdir/$format.log" /dev/null || { (exit 0); return 0; } ed $cnf_file >/dev/null 2>&1 <<-eof g/^$1[ ]/s/^/#! / w q eof (exit 0); return 0 } ############################################################################### # enablefmt(format) # enables format in configuration file ############################################################################### enablefmt() { grep "^#![ ]*$1[ ]" $cnf_file >/dev/null || { (exit 0); return 0; } ed $cnf_file >/dev/null 2>&1 <<-eof g/^#![ ]*$1[ ]/s/..[ ]*// w q eof (exit 0); return 0 } main ${1+"$@"} cleanup 0