diff options
Diffstat (limited to 'contrib/test_installed')
-rwxr-xr-x | contrib/test_installed | 121 |
1 files changed, 121 insertions, 0 deletions
diff --git a/contrib/test_installed b/contrib/test_installed new file mode 100755 index 000000000..e518cbcf7 --- /dev/null +++ b/contrib/test_installed @@ -0,0 +1,121 @@ +#! /bin/sh + +# (C) 1998, 2000, 2002, 2003, 2007 Free Software Foundation +# Originally by Alexandre Oliva <oliva@dcc.unicamp.br> + +# This script is Free Software, and it can be copied, distributed and +# modified as defined in the GNU General Public License. A copy of +# its license can be downloaded from http://www.gnu.org/copyleft/gpl.html + +# This scripts assumes it lives in the contrib directory of the GCC +# source tree, so it will find the testsuite tree from its location. +# If you move it elsewhere, or want to use another testsuite tree, you +# can override the defaults with --srcdir=/some/dir/GCC or +# --testsuite=/some/dir/GCC/gcc/testsuite. If you specify +# --testsuite, --srcdir will be ignored; otherwise, `/gcc/testsuite' +# will be appended to the srcdir. + +# You may specify where the binaries to be tested should be picked up +# from. If you specify --prefix=/some/dir, gcc, g++ and gfortran will be +# looked for at /some/dir/bin. Each one may be overridden by +# specifying --with-gcc=/pathname/to/gcc, --with-g++=/pathname/to/g++ +# and --with-gfortran=/pathname/to/gfortran. If you specify --without-gcc, +# --without-g++ or --without-gfortran, the test for the specified program +# will be skipped. By default, gcc, g++ and gfortran will be searched in +# the PATH. + +# An additional argument may specify --tmpdir=/some/dir; by default, +# temporaries will be stored in the current directory, where the log +# files will be stored. + +# The script will interpret arguments until it finds one it does not +# understand. The remaining ones will be passed to `runtest'. A +# double-dash can be used to explicitly separate the arguments to +# `test_installed' from the ones to `runtest'. + +# This script should be run in an empty directory; it will refuse to +# run if it finds a file named site.exp in the current directory. + + +if test -f site.exp; then + echo site.exp already exists >&2 + exit 1 +fi + +while true; do + case "$1" in + --with-testsuite=*) testsuite=`echo "$1" | sed 's/[^=]*=//'`; shift;; + --srcdir=*) srcdir=`echo "$1" | sed 's/[^=]*=//'`; shift;; + + --prefix=*) prefix=`echo "$1" | sed 's/[^=]*=//'`; shift;; + --with-gcc=*) GCC_UNDER_TEST=`echo "$1" | sed 's/[^=]*=//'`; shift;; + --with-g++=*) GXX_UNDER_TEST=`echo "$1" | sed 's/[^=]*=//'`; shift;; + --with-gfortran=*) GFORTRAN_UNDER_TEST=`echo "$1" | sed 's/[^=]*=//'`; shift;; + --without-gcc) GCC_UNDER_TEST=no; shift;; + --without-g++) GXX_UNDER_TEST=no; shift;; + --without-gfortran) GFORTRAN_UNDER_TEST=no; shift;; + --without-objc) OBJC_UNDER_TEST=no; shift;; + + --tmpdir=*) tmpdir=`echo "$1" | sed 's/[^=]*=//'`; shift;; + + --help) cat <<\EOF +Runs the testsuite for an installed version of gcc/g++/gfortran/objc +Copyright (C) 1998 Free Software Foundation +by Alexandre Oliva <oliva@dcc.unicamp.br> + +Supported arguments: + +--help prints this page + +--with-testsuite=/some/dir/gcc/testsuite specify the testsuite directory +--srcdir=/some/dir same as --with-testsuite=/some/dir/gcc/testsuite + [deduced from shell-script pathname] + +--prefix=/some/dir use gcc, g++ and gfortran from /some/dir/bin [PATH] +--with-gcc=/some/dir/bin/gcc use specified gcc program [gcc] +--with-g++=/some/dir/bin/g++ use specified g++ program [g++] +--with-gfortran=/some/dir/bin/gfortran use specified gfortran program [gfortran] +--without-gcc do not run gcc testsuite +--without-g++ do not run g++ testsuite +--without-gfortran do not run gfortran testsuite +--without-objc do not run objc testsuite + +--tmpdir=/some/dir create temporaries and leave failed programs + at specified directory [.] + +-- end of argument list; following arguments are passed to runtest +EOF + exit + ;; + + --) shift; break;; + *) break;; + esac +done + +if test x"${testsuite+set}" != x"set" && test x"${srcdir+set}" != x"set"; then + file=$0 + while [ -h $file ]; do + file=`ls -l $file | sed s/'.* -> '//` + done + srcdir=`CDPATH=. && cd \`echo "$file" | sed 's,/*[^/]*$,,;s,^$,.,'\`/.. >/dev/null && ${PWDCMD-pwd}` +fi + +cat >site.exp <<EOF +set rootme "." +set tmpdir "${tmpdir-`${PWDCMD-pwd}`}" +set srcdir "${testsuite-${srcdir}/gcc/testsuite}" +set CFLAGS "" +set CXXFLAGS "" +set GCC_UNDER_TEST "${GCC_UNDER_TEST-${prefix}${prefix+/bin/}gcc}" +set GXX_UNDER_TEST "${GXX_UNDER_TEST-${prefix}${prefix+/bin/}g++}" +set GFORTRAN_UNDER_TEST "${GFORTRAN_UNDER_TEST-${prefix}${prefix+/bin/}gfortran}" +set OBJC_UNDER_TEST "${OBJC_UNDER_TEST-${prefix}${prefix+/bin/}gcc}" +EOF + +test x"${GCC_UNDER_TEST}" = x"no" || runtest --tool gcc ${1+"$@"} +test x"${GXX_UNDER_TEST}" = x"no" || runtest --tool g++ ${1+"$@"} +test x"${GFORTRAN_UNDER_TEST}" = x"no" || runtest --tool gfortran ${1+"$@"} +test x"${OBJC_UNDER_TEST}" = x"no" || runtest --tool objc ${1+"$@"} + +exit 0 |