check.test 2.88 KB
Newer Older
1
#!/bin/sh
2
# -*- coding: utf-8 -*-
3
4
# Copyright (C) 2011, 2012, 2014, 2015, 2016 Laboratoire de Recherche
# et Développement de l'Epita (LRDE).
5
6
7
8
9
#
# This file is part of Spot, a model checking library.
#
# Spot is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by
10
# the Free Software Foundation; either version 3 of the License, or
11
12
13
14
15
16
17
18
# (at your option) any later version.
#
# Spot is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
# or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
# License for more details.
#
# You should have received a copy of the GNU General Public License
19
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
20
21
22
23
24
25
26
27
28
29
30
31
32


. ./defs

divine compile > output 2>&1

if grep -i ltsmin output; then
  :
else
  echo "divine not installed, or no ltsmin interface"
  exit 77
fi

33
34
35
36
37
if ! test -x "$(which spins)"; then
  echo "spins not installed."
  exit 77
fi

38
39
40
41
42
if ! test -x "$(which gal2c)"; then
  echo "gal2c not installed."
  exit 77
fi

43
44
set -e

45
46
47
48
49
50
51
52
53
54
# Promela
for opt in '' '-z'; do

  run 0 ../modelcheck $opt -E $srcdir/elevator2.1.pm \
    '!G("req[1]==1" -> (F("p==1" && "cabin_0._pc==2")))'
  run 0 ../modelcheck $opt -e $srcdir/elevator2.1.pm \
    'F("p==2")'
done

# dve2
55
56
57
58
for opt in '' '-z'; do
  # The three examples from the README.
  # (Don't run the first one using "run 0" because it would take too much
  # time with valgrind.).
59

60
  ../modelcheck $opt -E $srcdir/beem-peterson.4.dve \
61
62
    '!GF(P_0.CS|P_1.CS|P_2.CS|P_3.CS)' \
    | grep -v pages > stdout1
63
  # same formula, different syntax.
64
  ../modelcheck $opt -E $srcdir/beem-peterson.4.dve \
65
66
    '!GF("P_0==CS"|"P_1 == CS"|"P_2 ==CS"|"P_3==  CS")' \
    | grep -v pages > stdout2
67
  cmp stdout1 stdout2
68
  run 0 ../modelcheck $opt -e $srcdir/beem-peterson.4.dve \
69
    '!G(P_0.wait -> F P_0.CS)'
70
  run 0 ../modelcheck $opt -e $srcdir/beem-peterson.4.dve '!G("pos[1] < 3")'
71
done
72

73
74
75
76
77
78
79
80
81
# gal
# TODO also compare gal and dve results
for opt in '' '-z'; do
  # The three examples from the README.
  # (Don't run the first one using "run 0" because it would take too much
  # time with valgrind.).

  run 0 ../modelcheck $opt -e $srcdir/beem-peterson.4.gal \
    '!G("P_0.state==2" -> F "P_0.state==1")'
82
  run 0 ../modelcheck $opt -e $srcdir/beem-peterson.4.gal '!G("pos[1] < 3")'
83
84
done

85
# Now check some error messages.
86
run 1 ../modelcheck foo.dve "F(P_0.CS)" 2>stderr
87
88
89
cat stderr
grep 'Cannot open' stderr
# the dve2C file was generated in the current directory
90
run 1 ../modelcheck beem-peterson.4.dve2C \
91
92
93
94
95
96
97
98
99
100
        'Xfoo | P_0.f & X"P_0.k < 2xx" | G"pos[0]"' 2>stderr
cat stderr
grep 'variable `foo' stderr
grep "state \`f'.*P_0" stderr
grep "Unexpected.*\`xx'" stderr
grep 'Possible.*CS' stderr
grep 'Possible.*NCS' stderr
grep 'Possible.*q2' stderr
grep 'Possible.*q3' stderr
grep 'Possible.*wait' stderr