author | wenzelm |
Sat, 10 Mar 2018 14:11:58 +0100 | |
changeset 67811 | 33199d033505 |
parent 67810 | 8ebae6708590 |
child 67876 | cc4832285c38 |
permissions | -rwxr-xr-x |
67810 | 1 |
#!/usr/bin/env bash |
2 |
# |
|
3 |
# Author: Makarius |
|
4 |
# |
|
5 |
# DESCRIPTION: console interaction for Isabelle server (with line-editor) |
|
6 |
||
7 |
PRG="$(basename "$0")" |
|
8 |
||
9 |
function usage() |
|
10 |
{ |
|
11 |
echo |
|
12 |
echo "Usage: isabelle $PRG [OPTIONS]" |
|
13 |
echo |
|
14 |
echo " Options are:" |
|
15 |
echo " -n NAME explicit server name" |
|
16 |
echo " -p PORT explicit server port" |
|
17 |
echo |
|
18 |
echo " Console interaction for Isabelle server (with line-editor)." |
|
19 |
echo |
|
20 |
exit 1 |
|
21 |
} |
|
22 |
||
23 |
function fail() |
|
24 |
{ |
|
25 |
echo "$1" >&2 |
|
26 |
exit 2 |
|
27 |
} |
|
28 |
||
29 |
||
30 |
## process command line |
|
31 |
||
32 |
# options |
|
33 |
||
34 |
declare -a SERVER_OPTS=() |
|
35 |
||
36 |
while getopts "n:p:" OPT |
|
37 |
do |
|
38 |
case "$OPT" in |
|
39 |
n) |
|
40 |
SERVER_OPTS["${#SERVER_OPTS[@]}"]="-n" |
|
41 |
SERVER_OPTS["${#SERVER_OPTS[@]}"]="$OPTARG" |
|
42 |
;; |
|
43 |
p) |
|
44 |
SERVER_OPTS["${#SERVER_OPTS[@]}"]="-p" |
|
45 |
SERVER_OPTS["${#SERVER_OPTS[@]}"]="$OPTARG" |
|
46 |
;; |
|
47 |
\?) |
|
48 |
usage |
|
49 |
;; |
|
50 |
esac |
|
51 |
done |
|
52 |
||
53 |
shift $(($OPTIND - 1)) |
|
54 |
||
55 |
||
56 |
# args |
|
57 |
||
58 |
[ "$#" -ne 0 ] && usage |
|
59 |
||
60 |
||
61 |
# main |
|
62 |
||
63 |
if type -p "$ISABELLE_LINE_EDITOR" > /dev/null |
|
64 |
then |
|
67811
33199d033505
more options: client without implicit server startup;
wenzelm
parents:
67810
diff
changeset
|
65 |
exec "$ISABELLE_LINE_EDITOR" isabelle server -s -C "${SERVER_OPTS[@]}" |
67810 | 66 |
else |
67 |
echo "### No line editor: \"$ISABELLE_LINE_EDITOR\"" |
|
67811
33199d033505
more options: client without implicit server startup;
wenzelm
parents:
67810
diff
changeset
|
68 |
exec isabelle server -s -C "${SERVER_OPTS[@]}" |
67810 | 69 |
fi |