aboutsummaryrefslogtreecommitdiff
path: root/tests/ret-exec.at
diff options
context:
space:
mode:
Diffstat (limited to 'tests/ret-exec.at')
-rw-r--r--tests/ret-exec.at68
1 files changed, 68 insertions, 0 deletions
diff --git a/tests/ret-exec.at b/tests/ret-exec.at
new file mode 100644
index 0000000..f674d84
--- /dev/null
+++ b/tests/ret-exec.at
@@ -0,0 +1,68 @@
1# This file is part of GNU pies testsuite. -*- Autotest -*-
2# Copyright (C) 2016 Sergey Poznyakoff
3#
4# GNU pies is free software; you can redistribute it and/or modify
5# it under the terms of the GNU General Public License as published by
6# the Free Software Foundation; either version 3, or (at your option)
7# any later version.
8#
9# GNU pies is distributed in the hope that it will be useful,
10# but WITHOUT ANY WARRANTY; without even the implied warranty of
11# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12# GNU General Public License for more details.
13#
14# You should have received a copy of the GNU General Public License
15# along with GNU pies. If not, see <http://www.gnu.org/licenses/>.
16
17AT_SETUP([Exec on return code])
18AT_KEYWORDS([ret-exec])
19
20AT_CHECK([
21PIES_XFAIL_CHECK
22PIES_CONTROL_INIT
23comp_pid_file=$PWD/comp.pid
24report_file=$PWD/report
25cat > pies.conf <<_EOT
26component test {
27 mode respawn;
28 return-code 10 {
29 exec "$abs_srcdir/retcode $report_file";
30 action disable;
31 }
32 command "$abs_srcdir/respawn -sleep 2 -pid $comp_pid_file -exit 10";
33}
34_EOT
35
36>$report_file
37
38pies --config-file control.conf --config-file pies.conf
39
40n=0
41while test ! -s $report_file
42do
43 sleep 1
44 n=$(($n + 1))
45 if test $n -gt 4; then
46 echo >&2 "timed out"
47 break
48 fi
49done
50
51PIES_STOP
52
53if test -f $report_file; then
54 pid=`head $comp_pid_file`
55 sed "s/$pid/PID/" $report_file
56else
57 echo >&2 "no report file"
58fi
59],
60[0],
61[AT_PACKAGE_VERSION
62test
63PID
6410
65No signal
66])
67
68AT_CLEANUP

Return to:

Send suggestions and report system problems to the System administrator.