src/Pure/mk
author wenzelm
Wed, 27 Sep 2000 19:51:11 +0200
changeset 10097 1db5bd97f6a3
parent 9789 7e5e6c47c0b5
child 10102 3c21a2e616e7
permissions -rwxr-xr-x
THIS_IS_ISABELLE_BUILD;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3056
200565f7592a removed -c option;
wenzelm
parents: 2768
diff changeset
     1
#!/bin/bash
2339
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
     2
#
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
     3
# $Id$
9789
wenzelm
parents: 8361
diff changeset
     4
# Author: Markus Wenzel, TU Muenchen
wenzelm
parents: 8361
diff changeset
     5
# License: GPL (GNU GENERAL PUBLIC LICENSE)
2339
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
     6
#
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
     7
# mk - build Pure Isabelle.
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
     8
#
2432
527b5f1b7520 minor modifications to accomodate IsaMakefile;
wenzelm
parents: 2401
diff changeset
     9
# Assumes to be called via Isabelle make utility (cf. IsaMakefile).
2339
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    10
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    11
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    12
## diagnostics
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    13
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    14
function usage()
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    15
{
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    16
  echo
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    17
  echo "Usage: $PRG [OPTIONS]"
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    18
  echo
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    19
  echo "  Make Pure Isabelle."
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    20
  echo
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    21
  echo "    -r           just prepare RAW image"
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    22
  echo
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    23
  exit 1
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    24
}
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    25
2339
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    26
function fail()
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    27
{
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    28
  echo "$1" >&2
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    29
  exit 2
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    30
}
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    31
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    32
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    33
## process command line
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    34
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    35
# options
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    36
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    37
RAW=""
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    38
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    39
while getopts "r" OPT
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    40
do
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    41
  case "$OPT" in
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    42
    r)
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    43
      RAW=true
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    44
      ;;
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    45
    \?)
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    46
      usage
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    47
      ;;
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    48
  esac
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    49
done
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    50
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    51
shift $(($OPTIND - 1))
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    52
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    53
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    54
# args
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    55
9789
wenzelm
parents: 8361
diff changeset
    56
[ "$#" -ne 0 ] && usage
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    57
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    58
2339
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    59
## main
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    60
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    61
# get compatibility file
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    62
9789
wenzelm
parents: 8361
diff changeset
    63
ML_SYSTEM_BASE=$(echo "$ML_SYSTEM" | cut -f1 -d-)
3056
200565f7592a removed -c option;
wenzelm
parents: 2768
diff changeset
    64
[ -z "$ML_SYSTEM" ] && \
6186
72abe86d9418 tuned msg;
wenzelm
parents: 4495
diff changeset
    65
  fail "Missing ML system settings! Probably not run via 'isatool make'."
2339
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    66
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    67
COMPAT=""
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    68
[ -f "ML-Systems/$ML_SYSTEM_BASE.ML" ] && COMPAT="ML-Systems/$ML_SYSTEM_BASE.ML"
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    69
[ -f "ML-Systems/$ML_SYSTEM.ML" ] && COMPAT="ML-Systems/$ML_SYSTEM.ML"
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    70
[ -z "$COMPAT" ] && fail "Missing compatibility file for ML system \"$ML_SYSTEM\"!"
2d5551c8dec0 mk - build Pure Isabelle.
wenzelm
parents:
diff changeset
    71
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    72
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    73
# prepare log dir
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    74
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    75
LOGDIR="$ISABELLE_OUTPUT/log"
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    76
mkdir -p "$LOGDIR"
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    77
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    78
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    79
# run isabelle
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    80
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    81
SECONDS=0
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    82
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    83
if [ -z "$RAW" ]; then
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    84
  ITEM="Pure"
7277
bb9502f9154a improved messages;
wenzelm
parents: 7263
diff changeset
    85
  echo "Building $ITEM ..."
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    86
  LOG="$LOGDIR/$ITEM"
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    87
9789
wenzelm
parents: 8361
diff changeset
    88
  "$ISABELLE" \
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    89
    -e "val ml_system = \"$ML_SYSTEM\";" \
4495
8648ba842d14 improved error handling;
wenzelm
parents: 4492
diff changeset
    90
    -e "(use\"$COMPAT\"; use\"ROOT.ML\") handle _ => exit 1;" \
9789
wenzelm
parents: 8361
diff changeset
    91
    -c -q -w RAW_ML_SYSTEM Pure > "$LOG" 2>&1
wenzelm
parents: 8361
diff changeset
    92
  RC="$?"
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    93
else
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    94
  ITEM="RAW"
7277
bb9502f9154a improved messages;
wenzelm
parents: 7263
diff changeset
    95
  echo "Building $ITEM ..."
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    96
  LOG="$LOGDIR/$ITEM"
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
    97
9789
wenzelm
parents: 8361
diff changeset
    98
  "$ISABELLE" \
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
    99
    -e "val ml_system = \"$ML_SYSTEM\";" \
4495
8648ba842d14 improved error handling;
wenzelm
parents: 4492
diff changeset
   100
    -e "use\"$COMPAT\" handle _ => exit 1;;" \
9789
wenzelm
parents: 8361
diff changeset
   101
    -q -w RAW_ML_SYSTEM RAW > "$LOG" 2>&1
wenzelm
parents: 8361
diff changeset
   102
  RC="$?"
3774
b1bfd394b60a RAW target;
wenzelm
parents: 3505
diff changeset
   103
fi
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   104
9789
wenzelm
parents: 8361
diff changeset
   105
ELAPSED=$("$ISABELLE_HOME/lib/scripts/showtime" "$SECONDS")
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   106
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   107
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   108
# exit status
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   109
9789
wenzelm
parents: 8361
diff changeset
   110
if [ "$RC" -eq 0 ]; then
7277
bb9502f9154a improved messages;
wenzelm
parents: 7263
diff changeset
   111
  echo "Finished $ITEM ($ELAPSED elapsed time)"
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   112
  gzip --force "$LOG"
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   113
else
7263
2d09363ada6c tuned messages;
wenzelm
parents: 6239
diff changeset
   114
  echo "$ITEM FAILED"
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   115
  echo "(see also $LOG)"
9789
wenzelm
parents: 8361
diff changeset
   116
  echo; tail "$LOG"; echo
4442
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   117
fi
8ed9e689a15e log file;
wenzelm
parents: 3774
diff changeset
   118
9789
wenzelm
parents: 8361
diff changeset
   119
exit "$RC"