home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / texlatex.zip / web2c72.zip / bin / mktexlsr < prev    next >
Text File  |  1999-11-04  |  4KB  |  125 lines
  1. #!sh
  2. # original mktexlsr -- create or rebuild ls-R.
  3. # 
  4. # (If you change or delete the word `original' on the previous line,
  5. # installation won't write this script over yours.)
  6. #
  7. # Suitable for calling from cron, as in:
  8. # 0 * * * * cd /your/texmf/root && /usr/local/bin/mktexlsr
  9. # unless the scripts live in a different directory than the 'access',
  10. # 'kpsestat', 'readlink', and 'kpsewhich' binaries.
  11. # 
  12. # Originally written as `texhash' by Thomas Esser
  13. # <te@informatik.uni-hannover.de>, Okt., 1994.
  14. # Public domain.
  15.  
  16. version='$Id: mktexlsr,v 1.21 1998/03/17 22:26:01 olaf Exp $'
  17. progname=`echo $0 | sed 's%.*/%%'`
  18. usage="Usage: $progname [DIRS ...]
  19.  
  20. Rebuild all necessary ls-R filename databases completely. If one or
  21. more arguments DIRS are given, these are used as texmf directories to
  22. build ls-R for. Else all directories in the search path for ls-R files
  23. (\$TEXMFDBS) are used."
  24.  
  25. # MS-DOS and MS-Windows define $COMSPEC or $ComSpec and use `;' to separate
  26. # directories in path lists whereas Unix uses `:'.
  27. # Create a variable that holds the right character to be used by the scripts.
  28. if test -z "$COMSPEC" && test -z "$ComSpec"; then SEP=':'; else SEP=';'; fi
  29.  
  30. # Add the location of the script to the PATH if necessary.  This must
  31. # be done before kpsewhich can be called, and thus cannot be put into
  32. # mktex.opt.
  33. dirname=`echo $0 | sed -e 's%/*[^/][^/]*$%%' -e 's%^.:%%'`
  34. case $dirname in
  35.   "") # Do nothing
  36.       ;;
  37.   /* | [A-z]:/*) # Absolute name
  38.       PATH="$dirname$SEP$PATH" ;;
  39.    *)  # Relative name
  40.       PATH="`pwd`/$dirname$SEP$PATH" ;;
  41. esac
  42.  
  43. # A copy of some stuff from mktex.opt, so we can run in the presence of
  44. # terminally damaged ls-R files.
  45. if test "x$1" = x--help || test "x$1" = x-help; then
  46.   echo "$usage"
  47.   exit 0
  48. elif test "x$1" = x--version || test "x$1" = x-version; then
  49.   echo "`basename $0` $version"
  50.   kpsewhich --version
  51.   exit 0
  52. fi
  53.  
  54. # mktexupd and mktexlsr make sure they're coordinated via this.  A copy
  55. # is found mktex.opt.
  56. ls_R_magic='% ls-R -- filename database for kpathsea; do not change this line.'
  57.  
  58.  
  59. trap 'cd / ; rm -f "$db_file_tmp"; exit' 1 2 15
  60.  
  61. test $# = 0 && {
  62.   OIFS=$IFS; IFS=$SEP; set x `kpsewhich --show-path=ls-R`; shift; IFS=$OIFS
  63. }
  64. for TEXMFLS_R in "$@"; do
  65.   # Prepend cwd if the directory was relative.
  66.   case "$TEXMFLS_R" in
  67.   "") continue ;;
  68.   /* | [A-z]:/*) ;;
  69.   *)  TEXMFLS_R="`pwd`/$TEXMFLS_R"
  70.   esac
  71.   # Follow a possible symlink to get the right filesystem, 
  72.   db_file=`readlink "$TEXMFLS_R/ls-R" 2>/dev/null`
  73.   case "$db_file" in
  74.   "") db_file="$TEXMFLS_R/ls-R" ;;
  75.   /* | [A-z]:/*) ;;
  76.   *)  db_file="$TEXMFLS_R/$db_file"
  77.   esac
  78.   db_dir=`echo "$db_file" | sed -e 's%/[^/][^/]*$%%' -e's%^.:%%'` # can't rely on dirname
  79.   db_file_tmp="$db_dir/lsR$$.tmp"
  80.  
  81.   test -d "$db_dir" || continue
  82.   test -w "$db_dir" || { echo "$progname: $db_dir: directory not writable. Skipping..." >&2; continue; }
  83.  
  84.   if test ! -f "$db_file"; then
  85.     cp /dev/null "$db_file"
  86.     # Use same permissions as parent directory, minus x,s, or t bits.
  87.     chmod `kpsestat -xst "$db_dir"` "$db_file"
  88.   fi
  89.  
  90.   # Skip if we cannot write the file:
  91.   access -w "$db_file" || { echo "$progname: $db_file: no write permission. Skipping..." >&2; continue; }
  92.  
  93.   rm -f "$db_file_tmp"
  94.  
  95.   tty -s && echo "$progname: Updating $db_file... "
  96.   echo "$ls_R_magic" >"$db_file_tmp"
  97.  
  98.   # The main task. We ls two things so the top-level directory name ends
  99.   # up in the output, so top-level files can be found via ls-R. Probably
  100.   # irrelevant in practice.
  101.   # The sed command is because on new FreeBSD/NetBSD systems, ls -LAR ./
  102.   # produces .//. Sigh.
  103.   #  (cd "$TEXMFLS_R" && \ls -LRa /dev/null ./ 2>/dev/null) |
  104.   #    sed 's%\.//%./%; /^\.$/d; /^\.\.$/d' |
  105.   #    sed 's@\.//@./@' \
  106.   #    sed '1i\
  107.   #./:
  108.   #s/.*:/\.\/&/g' \
  109.   #>>"$db_file_tmp"
  110. (cd $TEXMFLS_R && ls -LAR /dev/null ./ 2>/dev/null) \
  111. | sed 's@\.//@./@' \
  112. | sed '1i\
  113. ./:
  114. s/.*:/\.\/&/g' \
  115. >>$db_file_tmp
  116.  
  117.   # To be really safe, a loop.
  118.   until PERMS=`kpsestat = "$db_file"`; do sleep 1; done
  119.   chmod $PERMS "$db_file_tmp"
  120.   rm -f "$db_file"
  121.   mv "$db_file_tmp" "$db_file"
  122. done
  123. tty -s && echo "$progname: Done."
  124. exit 0
  125.