7b0507a950
* bin/common_conv.cc (to_int, to_unsigned): Here. * bin/common_range.cc (parse_range): And there. * tests/core/ltlgrind.test, tests/core/genaut.test, tests/core/randaut.test: Add test cases.
241 lines
7.4 KiB
Bash
Executable file
241 lines
7.4 KiB
Bash
Executable file
#!/bin/sh
|
|
# -*- coding: utf-8 -*-
|
|
# Copyright (C) 2014-2018, 2020, 2022, 2023 Laboratoire de Recherche
|
|
# et Développement de l'Epita (LRDE).
|
|
#
|
|
# 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
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (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
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
. ./defs
|
|
|
|
set -e
|
|
|
|
randaut -e foo 2>err && exit 1
|
|
grep "randaut: failed to parse 'foo' as a float (in argument of -e" err
|
|
randaut -e 3.14 2>err && exit 1
|
|
grep "randaut: 3.1.*is not between 0 and 1 (in argument of -e" err
|
|
randaut -n1a 3 2>err && exit 1
|
|
grep "randaut: failed to parse '1a' as an integer.* -n/--automata)" err
|
|
|
|
randaut -n99999999999999999999999999 3 2>err && exit 1
|
|
grep "randaut:.*too large" err
|
|
|
|
randaut --spin -Q4 a b | ../ikwiad -H -XN - >out
|
|
grep 'States: 4' out
|
|
grep 'AP: 2' out
|
|
grep 'state-acc' out
|
|
grep 'Acceptance: 1' out
|
|
|
|
randaut -n 3 --hoa -Q5..9 -A1..3 3 >out
|
|
test `grep -c 'States: [5-9]$' out` = 3
|
|
test `grep -c 'Acceptance: [1-3] ' out` = 3
|
|
test `grep -c 'AP: 3 ' out` = 3
|
|
|
|
|
|
randaut --spin -A2 3 2>stderr && exit 1
|
|
grep 'spin.*incompatible' stderr
|
|
|
|
randaut --spin -A0 3 # should work
|
|
|
|
randaut --ba -A2 3 2>stderr && exit 1
|
|
grep 'ba.*incompatible' stderr
|
|
|
|
randaut --ba -A0 3 2>stderr && exit 1
|
|
grep 'ba.*incompatible' stderr
|
|
|
|
randaut --buchi -A2 3 2>stderr && exit 1
|
|
grep 'buchi.*incompatible' stderr
|
|
|
|
randaut -b 2 | autfilt --acceptance-is=Buchi | grep trans-acc
|
|
randaut -B 2 | autfilt --acceptance-is=Buchi | grep state-acc
|
|
|
|
randaut --states 10..20 2 -n 100 -H > aut.hoa
|
|
a=`autfilt --states=..14 -c <aut.hoa`
|
|
b=`autfilt aut.hoa --states=15.. -c`
|
|
test `expr $a + $b` = 100
|
|
|
|
# The count of SCCs and edges might change if the
|
|
# algorithm or its default values are changed. Do
|
|
# not hesitate to adjust the expected values below.
|
|
randaut -n 5 --name='%F-%L-%s-%c-%e' -H a | grep '^name' >out
|
|
cat >expected<<EOF
|
|
name: "0-0-10-1-30"
|
|
name: "0-1-10-1-29"
|
|
name: "0-2-10-3-22"
|
|
name: "0-3-10-1-30"
|
|
name: "0-4-10-1-27"
|
|
EOF
|
|
diff out expected
|
|
|
|
randaut -n 5 --stats='name: "%F-%L-%s-%c-%e"' a >out2
|
|
diff out2 expected
|
|
|
|
randaut -n 5 --dot='~' a 2>stderr && exit 1
|
|
grep 'randaut: unknown option.*~' stderr
|
|
|
|
randaut -n -1 -Q2 2 -H | autfilt -H --is-deterministic -n 3 -o out.hoa
|
|
randaut -n -1 -Q2 2 -H | autfilt -H -v --is-deterministic -n 4 -o '>>out.hoa'
|
|
autfilt -H out.hoa -o 'out-det%d.hoa'
|
|
autfilt -H out.hoa -o '>>out-det%d.hoa'
|
|
test 8 = `autfilt -c out-det0.hoa`
|
|
test 6 = `autfilt -c out-det1.hoa`
|
|
|
|
autfilt -H out.hoa -o foo -c 2>stderr && exit 1
|
|
grep 'autfilt: options --output and --count are incompatible' stderr
|
|
|
|
(
|
|
randaut -n 2 -Q5 -A4 -H 2
|
|
randaut -A 'random 4' -n 2 -Q5 -H 2
|
|
randaut -A 'parity rand rand 2..4' -n3 -Q5 -H 2
|
|
randaut -A 'generalized-Rabin 3 1..2 2..3 0' -n3 -Q5 -H 2
|
|
) | tee input | grep -E '(acc-name:|Acceptance:)' > output
|
|
cat output
|
|
|
|
a=Acceptance
|
|
cat >expected <<EOF
|
|
acc-name: generalized-Buchi 4
|
|
$a: 4 Inf(0)&Inf(1)&Inf(2)&Inf(3)
|
|
acc-name: generalized-Buchi 4
|
|
$a: 4 Inf(0)&Inf(1)&Inf(2)&Inf(3)
|
|
$a: 4 Fin(1) | (Fin(2) & Fin(3) & Fin(0))
|
|
$a: 4 (Fin(0) & Fin(3)) | (Fin(2) & Inf(1))
|
|
acc-name: parity min even 4
|
|
$a: 4 Inf(0) | (Fin(1) & (Inf(2) | Fin(3)))
|
|
acc-name: parity max even 2
|
|
$a: 2 Fin(1) & Inf(0)
|
|
acc-name: parity max odd 4
|
|
$a: 4 Inf(3) | (Fin(2) & (Inf(1) | Fin(0)))
|
|
acc-name: generalized-Rabin 3 2 3 0
|
|
$a: 8 (Fin(0) & (Inf(1)&Inf(2))) | (Fin(3) & (Inf(4)&Inf(5)&Inf(6))) | Fin(7)
|
|
acc-name: generalized-Rabin 3 2 2 0
|
|
$a: 7 (Fin(0) & (Inf(1)&Inf(2))) | (Fin(3) & (Inf(4)&Inf(5))) | Fin(6)
|
|
acc-name: generalized-Rabin 3 2 3 0
|
|
$a: 8 (Fin(0) & (Inf(1)&Inf(2))) | (Fin(3) & (Inf(4)&Inf(5)&Inf(6))) | Fin(7)
|
|
EOF
|
|
diff output expected
|
|
|
|
autfilt --acceptance-is=generalized-Buchi --stats='%g,%[s]g' >stdout <input
|
|
cat >expected <<EOF
|
|
Inf(0)&Inf(1)&Inf(2)&Inf(3),generalized-Buchi
|
|
Inf(0)&Inf(1)&Inf(2)&Inf(3),generalized-Buchi
|
|
EOF
|
|
diff stdout expected
|
|
autfilt --acceptance-is=Fin-less --stats='%g,%[s]g' >stdout <input
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is=generalized-Rabin --stats='%[sb]g' >stdout <input
|
|
cat >expected <<EOF
|
|
gen. Rabin
|
|
gen. Rabin
|
|
gen. Rabin
|
|
EOF
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is=parity --stats='%g,%[sb]g' >stdout <input
|
|
cat >expected <<EOF
|
|
Inf(0) | (Fin(1) & (Inf(2) | Fin(3))),parity
|
|
Fin(1) & Inf(0),parity
|
|
Inf(3) | (Fin(2) & (Inf(1) | Fin(0))),parity
|
|
EOF
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is=parity-odd --stats='%g,%[m]g' >stdout <input
|
|
cat >expected <<EOF
|
|
Inf(3) | (Fin(2) & (Inf(1) | Fin(0))),parity max odd
|
|
EOF
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is=parity-min --stats='%g,%[m]g' >stdout <input
|
|
cat >expected <<EOF
|
|
Inf(0) | (Fin(1) & (Inf(2) | Fin(3))),parity min even
|
|
EOF
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is=parity-max-even --stats='%g,%[m]g' >stdout <input
|
|
cat >expected <<EOF
|
|
Fin(1) & Inf(0),parity max even
|
|
EOF
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is=Streett <input && exit 1
|
|
|
|
autfilt --acceptance-is='Fin(1)|Fin(2)&Fin(3)&Fin(0)' --stats='%g,%[s]g' \
|
|
>stdout <input
|
|
cat >expected <<EOF
|
|
Fin(1) | (Fin(2) & Fin(3) & Fin(0)),other
|
|
EOF
|
|
diff stdout expected
|
|
|
|
autfilt --acceptance-is='Fin(1)|' <input 2>err && exit 1
|
|
grep acceptance-is err
|
|
grep 'syntax error at end of acceptance' err
|
|
grep " - 'generalized-Streett'" err
|
|
|
|
randaut --spin -A 'random 2' 2 2>stderr && exit 1
|
|
grep 'randaut: --spin.*--acceptance' stderr
|
|
randaut --ba --acceptance='random 2' 2 2>stderr && exit 1
|
|
grep 'randaut: --acceptance.*--ba' stderr
|
|
|
|
randaut -n 10 2..4 -H | grep AP: > output
|
|
cat output
|
|
cat >expected <<EOF
|
|
AP: 3 "p0" "p1" "p2"
|
|
AP: 4 "p0" "p1" "p2" "p3"
|
|
AP: 3 "p0" "p1" "p2"
|
|
AP: 4 "p0" "p1" "p2" "p3"
|
|
AP: 3 "p0" "p1" "p2"
|
|
AP: 4 "p0" "p1" "p2" "p3"
|
|
AP: 2 "p0" "p1"
|
|
AP: 3 "p0" "p1" "p2"
|
|
AP: 2 "p0" "p1"
|
|
AP: 3 "p0" "p1" "p2"
|
|
EOF
|
|
diff output expected
|
|
|
|
randaut -A3 --colored 2 -H | grep 'properties:.*colored'
|
|
randaut -S -A'parity min even 3' --colored 2 -H | grep 'properties:.*colored'
|
|
|
|
randaut --colored 2 2>stderr && exit 1
|
|
grep 'randaut: --colored requires' stderr
|
|
randaut -A0..2 --colored 2 2>stderr && exit 1
|
|
grep 'randaut: --colored requires' stderr
|
|
randaut -S -A'parity min even 0..3' -q -n10 --colored 2 2>stderr && exit 1
|
|
grep 'randaut: --colored requires' stderr
|
|
|
|
randaut -A'parity foo' 2 -q 2>stderr && exit 1
|
|
grep 'randaut:.*foo.*min.*max.*rand' stderr
|
|
randaut -A'parity ' 2 -q 2>stderr && exit 1
|
|
grep 'randaut:.*end of acceptance.*min.*max.*rand' stderr
|
|
randaut -A'parity min foo' 2 -q 2>stderr && exit 1
|
|
grep 'randaut:.*foo.*odd.*even.*rand' stderr
|
|
randaut -A'parity min' 2 -q 2>stderr && exit 1
|
|
grep 'randaut:.*end of acceptance.*odd.*even.*rand' stderr
|
|
randaut -A'parity min rand foo' 2 -q 2>stderr && exit 1
|
|
grep 'randaut:.*foo.*invalid range' stderr
|
|
randaut -A'parity min rand ' 2 -q 2>stderr && exit 1
|
|
grep 'randaut:.*end of acceptance.*invalid range' stderr
|
|
|
|
randaut -Q0 1 2>stderr && exit 1
|
|
grep '0 states' stderr
|
|
|
|
# This catch a bug where 'Fin(1) & Inf(2) & Fin(0)' was
|
|
# incorrectly detected a generalized-Rabin and output a
|
|
# 'Fin(0) | Fin(1) & Inf(2)'.
|
|
randaut -Q1 -A 'Fin(1) & Inf(2) & Fin(0)' 2 > out.hoa
|
|
grep 'Acceptance:' out.hoa > out.acc
|
|
echo 'Acceptance: 3 Fin(1) & Inf(2) & Fin(0)' > out.exp
|
|
diff out.acc out.exp
|
|
|
|
:
|