From d6102982ae0e69a2c75cd2a499ba3909516cc0ae Mon Sep 17 00:00:00 2001 From: Sergey Poznyakoff Date: Sat, 19 Mar 2016 14:58:27 +0200 Subject: Add testsute --- tests/ret-exec.at | 68 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 68 insertions(+) create mode 100644 tests/ret-exec.at (limited to 'tests/ret-exec.at') 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 @@ +# This file is part of GNU pies testsuite. -*- Autotest -*- +# Copyright (C) 2016 Sergey Poznyakoff +# +# GNU pies 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, or (at your option) +# any later version. +# +# GNU pies 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 GNU pies. If not, see . + +AT_SETUP([Exec on return code]) +AT_KEYWORDS([ret-exec]) + +AT_CHECK([ +PIES_XFAIL_CHECK +PIES_CONTROL_INIT +comp_pid_file=$PWD/comp.pid +report_file=$PWD/report +cat > pies.conf <<_EOT +component test { + mode respawn; + return-code 10 { + exec "$abs_srcdir/retcode $report_file"; + action disable; + } + command "$abs_srcdir/respawn -sleep 2 -pid $comp_pid_file -exit 10"; +} +_EOT + +>$report_file + +pies --config-file control.conf --config-file pies.conf + +n=0 +while test ! -s $report_file +do + sleep 1 + n=$(($n + 1)) + if test $n -gt 4; then + echo >&2 "timed out" + break + fi +done + +PIES_STOP + +if test -f $report_file; then + pid=`head $comp_pid_file` + sed "s/$pid/PID/" $report_file +else + echo >&2 "no report file" +fi +], +[0], +[AT_PACKAGE_VERSION +test +PID +10 +No signal +]) + +AT_CLEANUP -- cgit v1.2.1