lib/Tools/installfonts
author wenzelm
Fri, 10 Nov 2000 19:02:37 +0100
changeset 10432 3dfbc913d184
parent 9974 5361a27c1853
child 10511 efb3428c9879
permissions -rwxr-xr-x
added axclass inverse and consts inverse, divide (infix "/"); moved axclass power to Nat.thy;

#!/bin/bash
#
# $Id$
# Author: Markus Wenzel, TU Muenchen
# License: GPL (GNU GENERAL PUBLIC LICENSE)
#
# DESCRIPTION: install symbol fonts on the current X11 server


PRG=$(basename "$0")

function usage()
{
  echo
  echo "Usage: $PRG [OPTIONS]"
  echo
  echo "  Options are:"
  echo "    -x           install X-Symbol fonts"
  echo
  echo "  Install symbol fonts on the current X11 server."
  echo
  exit 1
}


## process command line

# options

XSYMB=""

while getopts "x" OPT
do
  case "$OPT" in
    x)
      XSYMB=true
      ;;
    \?)
      usage
      ;;
  esac
done

shift $(($OPTIND - 1))


# args

[ "$#" -ne 0 ] && usage


## check fonts

function checkfonts()
{
  RESULT=$(xlsfonts -fn "$1" 2>&1) || return 1

  case "$RESULT" in
    xlsfonts:*)
      return 1
      ;;
  esac

  return 0
}


## main

ISABELLE_PATTERN="-isabelle-fixed-*-isabelle-0"
XSYMBOL_PATTERN="-xsymb-xsymb0-*"

if [ -z "$XSYMB" ]; then
  checkfonts "$ISABELLE_PATTERN" || eval $ISABELLE_INSTALLFONTS
  checkfonts "$ISABELLE_PATTERN" || \
    echo "Warning: Isabelle fonts probably not installed correctly!" >&2
else
  checkfonts "$XSYMBOL_PATTERN" || eval $XSYMBOL_INSTALLFONTS
  checkfonts "$XSYMBOL_PATTERN" || \
    echo "Warning: X-Symbol fonts probably not installed correctly!" >&2
fi