Blame test-driver

Packit Service af52df
#! /bin/sh
Packit Service af52df
# test-driver - basic testsuite driver script.
Packit Service af52df
Packit Service af52df
scriptversion=2012-06-27.10; # UTC
Packit Service af52df
Packit Service af52df
# Copyright (C) 2011-2013 Free Software Foundation, Inc.
Packit Service af52df
#
Packit Service af52df
# This program is free software; you can redistribute it and/or modify
Packit Service af52df
# it under the terms of the GNU General Public License as published by
Packit Service af52df
# the Free Software Foundation; either version 2, or (at your option)
Packit Service af52df
# any later version.
Packit Service af52df
#
Packit Service af52df
# This program is distributed in the hope that it will be useful,
Packit Service af52df
# but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service af52df
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit Service af52df
# GNU General Public License for more details.
Packit Service af52df
#
Packit Service af52df
# You should have received a copy of the GNU General Public License
Packit Service af52df
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
Packit Service af52df
Packit Service af52df
# As a special exception to the GNU General Public License, if you
Packit Service af52df
# distribute this file as part of a program that contains a
Packit Service af52df
# configuration script generated by Autoconf, you may include it under
Packit Service af52df
# the same distribution terms that you use for the rest of that program.
Packit Service af52df
Packit Service af52df
# This file is maintained in Automake, please report
Packit Service af52df
# bugs to <bug-automake@gnu.org> or send patches to
Packit Service af52df
# <automake-patches@gnu.org>.
Packit Service af52df
Packit Service af52df
# Make unconditional expansion of undefined variables an error.  This
Packit Service af52df
# helps a lot in preventing typo-related bugs.
Packit Service af52df
set -u
Packit Service af52df
Packit Service af52df
usage_error ()
Packit Service af52df
{
Packit Service af52df
  echo "$0: $*" >&2
Packit Service af52df
  print_usage >&2
Packit Service af52df
  exit 2
Packit Service af52df
}
Packit Service af52df
Packit Service af52df
print_usage ()
Packit Service af52df
{
Packit Service af52df
  cat <
Packit Service af52df
Usage:
Packit Service af52df
  test-driver --test-name=NAME --log-file=PATH --trs-file=PATH
Packit Service af52df
              [--expect-failure={yes|no}] [--color-tests={yes|no}]
Packit Service af52df
              [--enable-hard-errors={yes|no}] [--] TEST-SCRIPT
Packit Service af52df
The '--test-name', '--log-file' and '--trs-file' options are mandatory.
Packit Service af52df
END
Packit Service af52df
}
Packit Service af52df
Packit Service af52df
# TODO: better error handling in option parsing (in particular, ensure
Packit Service af52df
# TODO: $log_file, $trs_file and $test_name are defined).
Packit Service af52df
test_name= # Used for reporting.
Packit Service af52df
log_file=  # Where to save the output of the test script.
Packit Service af52df
trs_file=  # Where to save the metadata of the test run.
Packit Service af52df
expect_failure=no
Packit Service af52df
color_tests=no
Packit Service af52df
enable_hard_errors=yes
Packit Service af52df
while test $# -gt 0; do
Packit Service af52df
  case $1 in
Packit Service af52df
  --help) print_usage; exit $?;;
Packit Service af52df
  --version) echo "test-driver $scriptversion"; exit $?;;
Packit Service af52df
  --test-name) test_name=$2; shift;;
Packit Service af52df
  --log-file) log_file=$2; shift;;
Packit Service af52df
  --trs-file) trs_file=$2; shift;;
Packit Service af52df
  --color-tests) color_tests=$2; shift;;
Packit Service af52df
  --expect-failure) expect_failure=$2; shift;;
Packit Service af52df
  --enable-hard-errors) enable_hard_errors=$2; shift;;
Packit Service af52df
  --) shift; break;;
Packit Service af52df
  -*) usage_error "invalid option: '$1'";;
Packit Service af52df
  esac
Packit Service af52df
  shift
Packit Service af52df
done
Packit Service af52df
Packit Service af52df
if test $color_tests = yes; then
Packit Service af52df
  # Keep this in sync with 'lib/am/check.am:$(am__tty_colors)'.
Packit Service af52df
  red='?[0;31m' # Red.
Packit Service af52df
  grn='?[0;32m' # Green.
Packit Service af52df
  lgn='?[1;32m' # Light green.
Packit Service af52df
  blu='?[1;34m' # Blue.
Packit Service af52df
  mgn='?[0;35m' # Magenta.
Packit Service af52df
  std='?[m'     # No color.
Packit Service af52df
else
Packit Service af52df
  red= grn= lgn= blu= mgn= std=
Packit Service af52df
fi
Packit Service af52df
Packit Service af52df
do_exit='rm -f $log_file $trs_file; (exit $st); exit $st'
Packit Service af52df
trap "st=129; $do_exit" 1
Packit Service af52df
trap "st=130; $do_exit" 2
Packit Service af52df
trap "st=141; $do_exit" 13
Packit Service af52df
trap "st=143; $do_exit" 15
Packit Service af52df
Packit Service af52df
# Test script is run here.
Packit Service af52df
"$@" >$log_file 2>&1
Packit Service af52df
estatus=$?
Packit Service af52df
if test $enable_hard_errors = no && test $estatus -eq 99; then
Packit Service af52df
  estatus=1
Packit Service af52df
fi
Packit Service af52df
Packit Service af52df
case $estatus:$expect_failure in
Packit Service af52df
  0:yes) col=$red res=XPASS recheck=yes gcopy=yes;;
Packit Service af52df
  0:*)   col=$grn res=PASS  recheck=no  gcopy=no;;
Packit Service af52df
  77:*)  col=$blu res=SKIP  recheck=no  gcopy=yes;;
Packit Service af52df
  99:*)  col=$mgn res=ERROR recheck=yes gcopy=yes;;
Packit Service af52df
  *:yes) col=$lgn res=XFAIL recheck=no  gcopy=yes;;
Packit Service af52df
  *:*)   col=$red res=FAIL  recheck=yes gcopy=yes;;
Packit Service af52df
esac
Packit Service af52df
Packit Service af52df
# Report outcome to console.
Packit Service af52df
echo "${col}${res}${std}: $test_name"
Packit Service af52df
Packit Service af52df
# Register the test result, and other relevant metadata.
Packit Service af52df
echo ":test-result: $res" > $trs_file
Packit Service af52df
echo ":global-test-result: $res" >> $trs_file
Packit Service af52df
echo ":recheck: $recheck" >> $trs_file
Packit Service af52df
echo ":copy-in-global-log: $gcopy" >> $trs_file
Packit Service af52df
Packit Service af52df
# Local Variables:
Packit Service af52df
# mode: shell-script
Packit Service af52df
# sh-indentation: 2
Packit Service af52df
# eval: (add-hook 'write-file-hooks 'time-stamp)
Packit Service af52df
# time-stamp-start: "scriptversion="
Packit Service af52df
# time-stamp-format: "%:y-%02m-%02d.%02H"
Packit Service af52df
# time-stamp-time-zone: "UTC"
Packit Service af52df
# time-stamp-end: "; # UTC"
Packit Service af52df
# End: