Blame tests/test-subr.sh

Packit Service 97d2fb
#! /bin/sh
Packit Service 97d2fb
# Copyright (C) 2005-2015, 2017 Red Hat, Inc.
Packit Service 97d2fb
# This file is part of elfutils.
Packit Service 97d2fb
#
Packit Service 97d2fb
# This file is free software; you can redistribute it and/or modify
Packit Service 97d2fb
# it under the terms of the GNU General Public License as published by
Packit Service 97d2fb
# the Free Software Foundation; either version 3 of the License, or
Packit Service 97d2fb
# (at your option) any later version.
Packit Service 97d2fb
#
Packit Service 97d2fb
# elfutils is distributed in the hope that it will be useful, but
Packit Service 97d2fb
# WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service 97d2fb
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit Service 97d2fb
# GNU General Public License for more details.
Packit Service 97d2fb
#
Packit Service 97d2fb
# You should have received a copy of the GNU General Public License
Packit Service 97d2fb
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
Packit Service 97d2fb
Packit Service 97d2fb
Packit Service 97d2fb
# This file is sourced by ". $srcdir/test-subr.sh" at the start of
Packit Service 97d2fb
# each test script.  It defines some functions they use and sets up
Packit Service 97d2fb
# canonical sh state for test runs.
Packit Service 97d2fb
Packit Service 97d2fb
set -e
Packit Service 97d2fb
Packit Service 97d2fb
# Each test runs in its own directory to make sure they can run in parallel.
Packit Service 97d2fb
test_dir="test-$$"
Packit Service 97d2fb
mkdir -p "$test_dir"
Packit Service 97d2fb
cd "$test_dir"
Packit Service 97d2fb
Packit Service 97d2fb
#LC_ALL=C
Packit Service 97d2fb
#export LC_ALL
Packit Service 97d2fb
Packit Service 97d2fb
remove_files=
Packit Service 97d2fb
Packit Service 97d2fb
# Tests that trap EXIT (0) themselves should call this explicitly.
Packit Service 97d2fb
exit_cleanup()
Packit Service 97d2fb
{
Packit Service 97d2fb
  rm -f $remove_files; cd ..; rmdir $test_dir
Packit Service 97d2fb
}
Packit Service 97d2fb
trap exit_cleanup 0
Packit Service 97d2fb
Packit Service 97d2fb
tempfiles()
Packit Service 97d2fb
{
Packit Service 97d2fb
  remove_files="$remove_files $*"
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
testfiles()
Packit Service 97d2fb
{
Packit Service 97d2fb
  for file; do
Packit Service 97d2fb
    bunzip2 -c ${abs_srcdir}/${file}.bz2 > ${file} || exit 77
Packit Service 97d2fb
    remove_files="$remove_files $file"
Packit Service 97d2fb
  done
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
testrun_out()
Packit Service 97d2fb
{
Packit Service 97d2fb
  outfile="$1"
Packit Service 97d2fb
  shift
Packit Service 97d2fb
  remove_files="$remove_files $outfile"
Packit Service 97d2fb
  testrun "$@" > $outfile 2>&1 || :
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
testrun_compare()
Packit Service 97d2fb
{
Packit Service 97d2fb
  outfile="${1##*/}.out"
Packit Service 97d2fb
  testrun_out $outfile "$@"
Packit Service 97d2fb
  diff -u $outfile -
Packit Service 97d2fb
  # diff's exit status will kill the script.
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
test_cleanup()
Packit Service 97d2fb
{
Packit Service 97d2fb
  rm -f $remove_files
Packit Service 97d2fb
  remove_files=
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
# See test-wrapper.sh, which sets the environment for this.
Packit Service 97d2fb
testrun()
Packit Service 97d2fb
{
Packit Service 97d2fb
  ${elfutils_testrun}_testrun "$@"
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
built_testrun()
Packit Service 97d2fb
{
Packit Service 97d2fb
  LD_LIBRARY_PATH="${built_library_path}${LD_LIBRARY_PATH:+:}$LD_LIBRARY_PATH"\
Packit Service 97d2fb
  $VALGRIND_CMD "$@"
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
installed_testrun()
Packit Service 97d2fb
{
Packit Service 97d2fb
  program="$1"
Packit Service 97d2fb
  shift
Packit Service 97d2fb
  case "$program" in
Packit Service 97d2fb
  ${abs_builddir}/*)
Packit Service 97d2fb
    if [ "x$elfutils_tests_rpath" != xno ]; then
Packit Service 97d2fb
      echo >&2 installcheck not possible with --enable-tests-rpath
Packit Service 97d2fb
      exit 77
Packit Service 97d2fb
    fi
Packit Service 97d2fb
    ;;
Packit Service 97d2fb
  ${abs_top_builddir}/src/*)
Packit Service 97d2fb
    program=${bindir}/`program_transform ${program##*/}`
Packit Service 97d2fb
    ;;
Packit Service 97d2fb
  esac
Packit Service 97d2fb
  if [ "${libdir}" != /usr/lib ] && [ "${libdir}" != /usr/lib64 ]; then
Packit Service 97d2fb
    LD_LIBRARY_PATH="${libdir}:${libdir}/elfutils\
Packit Service 97d2fb
${LD_LIBRARY_PATH:+:}$LD_LIBRARY_PATH" \
Packit Service 97d2fb
    $VALGRIND_CMD $program ${1+"$@"}
Packit Service 97d2fb
  else
Packit Service 97d2fb
    $VALGRIND_CMD $program ${1+"$@"}
Packit Service 97d2fb
  fi
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
program_transform()
Packit Service 97d2fb
{
Packit Service 97d2fb
  echo "$*" | sed "${program_transform_name}"
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
self_test_files_exe=`echo ${abs_top_builddir}/src/addr2line \
Packit Service 97d2fb
${abs_top_builddir}/src/elfclassify \
Packit Service 97d2fb
${abs_top_builddir}/src/stack \
Packit Service 97d2fb
${abs_top_builddir}/src/unstrip`
Packit Service 97d2fb
Packit Service 97d2fb
self_test_files_lib=`echo ${abs_top_builddir}/libelf/libelf.so \
Packit Service 97d2fb
${abs_top_builddir}/libasm/libasm.so`
Packit Service 97d2fb
Packit Service 97d2fb
self_test_files_obj=`echo ${abs_top_builddir}/src/size.o \
Packit Service 97d2fb
${abs_top_builddir}/src/strip.o`
Packit Service 97d2fb
Packit Service 97d2fb
self_test_files="$self_test_files_exe $self_test_files_lib $self_test_files_obj"
Packit Service 97d2fb
Packit Service 97d2fb
# Provide a command to run on all self-test files with testrun.
Packit Service 97d2fb
testrun_on_self()
Packit Service 97d2fb
{
Packit Service 97d2fb
  exit_status=0
Packit Service 97d2fb
Packit Service 97d2fb
  for file in $self_test_files; do
Packit Service 97d2fb
      testrun $* $file \
Packit Service 97d2fb
	  || { echo "*** failure in $* $file"; exit_status=1; }
Packit Service 97d2fb
  done
Packit Service 97d2fb
Packit Service 97d2fb
  # Only exit if something failed
Packit Service 97d2fb
  if test $exit_status != 0; then exit $exit_status; fi
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
testrun_on_self_exe()
Packit Service 97d2fb
{
Packit Service 97d2fb
  exit_status=0
Packit Service 97d2fb
Packit Service 97d2fb
  for file in $self_test_files_exe; do
Packit Service 97d2fb
      testrun $* $file \
Packit Service 97d2fb
	  || { echo "*** failure in $* $file"; exit_status=1; }
Packit Service 97d2fb
  done
Packit Service 97d2fb
Packit Service 97d2fb
  # Only exit if something failed
Packit Service 97d2fb
  if test $exit_status != 0; then exit $exit_status; fi
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
testrun_on_self_lib()
Packit Service 97d2fb
{
Packit Service 97d2fb
  exit_status=0
Packit Service 97d2fb
Packit Service 97d2fb
  for file in $self_test_files_lib; do
Packit Service 97d2fb
      testrun $* $file \
Packit Service 97d2fb
	  || { echo "*** failure in $* $file"; exit_status=1; }
Packit Service 97d2fb
  done
Packit Service 97d2fb
Packit Service 97d2fb
  # Only exit if something failed
Packit Service 97d2fb
  if test $exit_status != 0; then exit $exit_status; fi
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
testrun_on_self_obj()
Packit Service 97d2fb
{
Packit Service 97d2fb
  exit_status=0
Packit Service 97d2fb
Packit Service 97d2fb
  for file in $self_test_files_obj; do
Packit Service 97d2fb
      testrun $* $file \
Packit Service 97d2fb
	  || { echo "*** failure in $* $file"; exit_status=1; }
Packit Service 97d2fb
  done
Packit Service 97d2fb
Packit Service 97d2fb
  # Only exit if something failed
Packit Service 97d2fb
  if test $exit_status != 0; then exit $exit_status; fi
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
# Compress the files first. Compress both debug sections and symtab.
Packit Service 97d2fb
testrun_on_self_compressed()
Packit Service 97d2fb
{
Packit Service 97d2fb
  exit_status=0
Packit Service 97d2fb
Packit Service 97d2fb
  for file in $self_test_files; do
Packit Service 97d2fb
      tempfiles ${file}z
Packit Service 97d2fb
      testrun ${abs_top_builddir}/src/elfcompress -f -q -o ${file}z ${file}
Packit Service 97d2fb
      testrun ${abs_top_builddir}/src/elfcompress -f -q --name='.s??tab' ${file}z
Packit Service 97d2fb
Packit Service 97d2fb
      testrun $* ${file}z \
Packit Service 97d2fb
	  || { echo "*** failure in $* ${file}z"; exit_status=1; }
Packit Service 97d2fb
  done
Packit Service 97d2fb
Packit Service 97d2fb
  # Only exit if something failed
Packit Service 97d2fb
  if test $exit_status != 0; then exit $exit_status; fi
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
# Same as above, but redirects stdout to /dev/null
Packit Service 97d2fb
testrun_on_self_quiet()
Packit Service 97d2fb
{
Packit Service 97d2fb
  exit_status=0
Packit Service 97d2fb
Packit Service 97d2fb
  for file in $self_test_files; do
Packit Service 97d2fb
      testrun $* $file > /dev/null \
Packit Service 97d2fb
	  || { echo "*** failure in $* $file"; exit_status=1; }
Packit Service 97d2fb
  done
Packit Service 97d2fb
Packit Service 97d2fb
  # Only exit if something failed
Packit Service 97d2fb
  if test $exit_status != 0; then exit $exit_status; fi
Packit Service 97d2fb
}