2008-04-16 14:34:53 +04:00
#
# subunit.sh: shell functions to report test status via the subunit protocol.
# Copyright (C) 2006 Robert Collins <robertc@robertcollins.net>
# Copyright (C) 2008 Jelmer Vernooij <jelmer@samba.org>
#
# This program 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 2 of the License, or
# (at your option) any later version.
#
# This program 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, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
2016-08-03 07:03:57 +03:00
timestamp( ) {
# mark the start time. With Gnu date, you get nanoseconds from %N
# (here truncated to microseconds with %6N), but not on BSDs,
# Solaris, etc, which will apparently leave either %N or N at the end.
2016-11-23 15:54:39 +03:00
date -u +'time: %Y-%m-%d %H:%M:%S.%6NZ' | sed 's/\..*NZ$/.000000Z/'
2016-08-03 07:03:57 +03:00
}
2008-04-16 14:34:53 +04:00
subunit_start_test ( ) {
# emit the current protocol start-marker for test $1
2016-08-03 07:03:57 +03:00
timestamp
2017-05-05 02:10:56 +03:00
printf 'test: %s\n' " $1 "
2008-04-16 14:34:53 +04:00
}
subunit_pass_test ( ) {
# emit the current protocol test passed marker for test $1
2016-08-03 07:03:57 +03:00
timestamp
2017-05-05 02:10:56 +03:00
printf 'success: %s\n' " $1 "
2008-04-16 14:34:53 +04:00
}
2010-07-10 11:25:57 +04:00
# This is just a hack as we have some broken scripts
# which use "exit $failed", without initializing failed.
failed = 0
2008-04-16 14:34:53 +04:00
subunit_fail_test ( ) {
# emit the current protocol fail-marker for test $1, and emit stdin as
# the error text.
# we use stdin because the failure message can be arbitrarily long, and this
# makes it convenient to write in scripts (using <<END syntax.
2016-08-03 07:03:57 +03:00
timestamp
2017-05-05 02:10:56 +03:00
printf 'failure: %s [\n' " $1 "
2008-04-16 14:34:53 +04:00
cat -
echo "]"
}
subunit_error_test ( ) {
# emit the current protocol error-marker for test $1, and emit stdin as
# the error text.
# we use stdin because the failure message can be arbitrarily long, and this
# makes it convenient to write in scripts (using <<END syntax.
2016-08-03 07:03:57 +03:00
timestamp
2017-05-05 02:10:56 +03:00
printf 'error: %s [\n' " $1 "
2008-04-16 14:34:53 +04:00
cat -
echo "]"
}
2013-02-16 02:36:07 +04:00
subunit_skip_test ( ) {
# emit the current protocol skip-marker for test $1, and emit stdin as
# the error text.
# we use stdin because the failure message can be arbitrarily long, and this
# makes it convenient to write in scripts (using <<END syntax.
2017-05-05 02:10:56 +03:00
printf 'skip: %s [\n' " $1 "
2013-02-16 02:36:07 +04:00
cat -
echo "]"
}
2008-04-16 14:34:53 +04:00
testit ( ) {
name = " $1 "
shift
2017-03-13 19:30:37 +03:00
cmdline = " $@ "
2008-04-16 14:34:53 +04:00
subunit_start_test " $name "
2008-05-21 11:07:45 +04:00
output = ` $cmdline 2>& 1`
2008-04-16 14:34:53 +04:00
status = $?
if [ x$status = x0 ] ; then
subunit_pass_test " $name "
else
2009-01-08 17:57:59 +03:00
echo " $output " | subunit_fail_test " $name "
2008-04-16 14:34:53 +04:00
fi
return $status
}
2009-09-09 01:01:26 +04:00
2018-09-04 11:38:44 +03:00
# This returns 0 if the command gave success and the grep value was found
# all other cases return != 0
testit_grep ( ) {
name = " $1 "
shift
grep = " $1 "
shift
cmdline = " $@ "
subunit_start_test " $name "
output = ` $cmdline 2>& 1`
status = $?
if [ x$status != x0 ] ; then
printf '%s' " $output " | subunit_fail_test " $name "
return $status
fi
printf '%s' " $output " | grep -q " $grep "
gstatus = $?
if [ x$gstatus = x0 ] ; then
subunit_pass_test " $name "
else
printf 'GREP: "%s" not found in output:\n%s' " $grep " " $output " | subunit_fail_test " $name "
fi
return $status
}
2009-09-09 01:01:26 +04:00
testit_expect_failure ( ) {
name = " $1 "
shift
2017-03-13 19:30:37 +03:00
cmdline = " $@ "
2009-09-09 01:01:26 +04:00
subunit_start_test " $name "
output = ` $cmdline 2>& 1`
status = $?
if [ x$status = x0 ] ; then
echo " $output " | subunit_fail_test " $name "
else
subunit_pass_test " $name "
fi
return $status
}
2011-02-03 09:30:53 +03:00
2018-09-04 11:38:44 +03:00
# This returns 0 if the command gave a failure and the grep value was found
# all other cases return != 0
testit_expect_failure_grep ( ) {
name = " $1 "
shift
grep = " $1 "
shift
cmdline = " $@ "
subunit_start_test " $name "
output = ` $cmdline 2>& 1`
status = $?
if [ x$status = x0 ] ; then
printf '%s' " $output " | subunit_fail_test " $name "
return 1
fi
printf '%s' " $output " | grep -q " $grep "
gstatus = $?
if [ x$gstatus = x0 ] ; then
subunit_pass_test " $name "
else
printf 'GREP: "%s" not found in output:\n%s' " $grep " " $output " | subunit_fail_test " $name "
fi
return $status
}
2011-02-15 18:03:58 +03:00
testok ( ) {
name = ` basename $1 `
failed = $2
exit $failed
}
2011-02-03 09:30:53 +03:00
# work out the top level source directory
if [ -d source4 ] ; then
SRCDIR = "."
else
SRCDIR = ".."
fi
export SRCDIR