|
0
|
1 #! /bin/sh
|
|
|
2
|
|
|
3 # (C) 1998, 2000, 2002, 2003, 2007 Free Software Foundation
|
|
|
4 # Originally by Alexandre Oliva <oliva@dcc.unicamp.br>
|
|
|
5
|
|
|
6 # This script is Free Software, and it can be copied, distributed and
|
|
|
7 # modified as defined in the GNU General Public License. A copy of
|
|
|
8 # its license can be downloaded from http://www.gnu.org/copyleft/gpl.html
|
|
|
9
|
|
|
10 # This scripts assumes it lives in the contrib directory of the GCC
|
|
|
11 # source tree, so it will find the testsuite tree from its location.
|
|
|
12 # If you move it elsewhere, or want to use another testsuite tree, you
|
|
|
13 # can override the defaults with --srcdir=/some/dir/GCC or
|
|
|
14 # --testsuite=/some/dir/GCC/gcc/testsuite. If you specify
|
|
|
15 # --testsuite, --srcdir will be ignored; otherwise, `/gcc/testsuite'
|
|
|
16 # will be appended to the srcdir.
|
|
|
17
|
|
|
18 # You may specify where the binaries to be tested should be picked up
|
|
|
19 # from. If you specify --prefix=/some/dir, gcc, g++ and gfortran will be
|
|
|
20 # looked for at /some/dir/bin. Each one may be overridden by
|
|
|
21 # specifying --with-gcc=/pathname/to/gcc, --with-g++=/pathname/to/g++
|
|
|
22 # and --with-gfortran=/pathname/to/gfortran. If you specify --without-gcc,
|
|
|
23 # --without-g++ or --without-gfortran, the test for the specified program
|
|
|
24 # will be skipped. By default, gcc, g++ and gfortran will be searched in
|
|
|
25 # the PATH.
|
|
|
26
|
|
|
27 # An additional argument may specify --tmpdir=/some/dir; by default,
|
|
|
28 # temporaries will be stored in the current directory, where the log
|
|
|
29 # files will be stored.
|
|
|
30
|
|
|
31 # The script will interpret arguments until it finds one it does not
|
|
|
32 # understand. The remaining ones will be passed to `runtest'. A
|
|
|
33 # double-dash can be used to explicitly separate the arguments to
|
|
|
34 # `test_installed' from the ones to `runtest'.
|
|
|
35
|
|
|
36 # This script should be run in an empty directory; it will refuse to
|
|
|
37 # run if it finds a file named site.exp in the current directory.
|
|
|
38
|
|
|
39
|
|
|
40 if test -f site.exp; then
|
|
|
41 echo site.exp already exists >&2
|
|
|
42 exit 1
|
|
|
43 fi
|
|
|
44
|
|
|
45 while true; do
|
|
|
46 case "$1" in
|
|
|
47 --with-testsuite=*) testsuite=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
|
48 --srcdir=*) srcdir=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
111
|
49 --target=*) target=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
0
|
50 --prefix=*) prefix=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
|
51 --with-gcc=*) GCC_UNDER_TEST=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
|
52 --with-g++=*) GXX_UNDER_TEST=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
|
53 --with-gfortran=*) GFORTRAN_UNDER_TEST=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
|
54 --without-gcc) GCC_UNDER_TEST=no; shift;;
|
|
|
55 --without-g++) GXX_UNDER_TEST=no; shift;;
|
|
|
56 --without-gfortran) GFORTRAN_UNDER_TEST=no; shift;;
|
|
|
57 --without-objc) OBJC_UNDER_TEST=no; shift;;
|
|
|
58
|
|
|
59 --tmpdir=*) tmpdir=`echo "$1" | sed 's/[^=]*=//'`; shift;;
|
|
|
60
|
|
|
61 --help) cat <<\EOF
|
|
|
62 Runs the testsuite for an installed version of gcc/g++/gfortran/objc
|
|
|
63 Copyright (C) 1998 Free Software Foundation
|
|
|
64 by Alexandre Oliva <oliva@dcc.unicamp.br>
|
|
|
65
|
|
|
66 Supported arguments:
|
|
|
67
|
|
|
68 --help prints this page
|
|
|
69
|
|
|
70 --with-testsuite=/some/dir/gcc/testsuite specify the testsuite directory
|
|
|
71 --srcdir=/some/dir same as --with-testsuite=/some/dir/gcc/testsuite
|
|
|
72 [deduced from shell-script pathname]
|
|
|
73
|
|
111
|
74 --target=triplet The target architecture of the compiler being
|
|
|
75 tested if different than the host.
|
|
|
76
|
|
0
|
77 --prefix=/some/dir use gcc, g++ and gfortran from /some/dir/bin [PATH]
|
|
|
78 --with-gcc=/some/dir/bin/gcc use specified gcc program [gcc]
|
|
|
79 --with-g++=/some/dir/bin/g++ use specified g++ program [g++]
|
|
|
80 --with-gfortran=/some/dir/bin/gfortran use specified gfortran program [gfortran]
|
|
|
81 --without-gcc do not run gcc testsuite
|
|
|
82 --without-g++ do not run g++ testsuite
|
|
|
83 --without-gfortran do not run gfortran testsuite
|
|
|
84 --without-objc do not run objc testsuite
|
|
|
85
|
|
|
86 --tmpdir=/some/dir create temporaries and leave failed programs
|
|
|
87 at specified directory [.]
|
|
|
88
|
|
|
89 -- end of argument list; following arguments are passed to runtest
|
|
|
90 EOF
|
|
|
91 exit
|
|
|
92 ;;
|
|
|
93
|
|
|
94 --) shift; break;;
|
|
|
95 *) break;;
|
|
|
96 esac
|
|
|
97 done
|
|
|
98
|
|
|
99 if test x"${testsuite+set}" != x"set" && test x"${srcdir+set}" != x"set"; then
|
|
|
100 file=$0
|
|
|
101 while [ -h $file ]; do
|
|
|
102 file=`ls -l $file | sed s/'.* -> '//`
|
|
|
103 done
|
|
|
104 srcdir=`CDPATH=. && cd \`echo "$file" | sed 's,/*[^/]*$,,;s,^$,.,'\`/.. >/dev/null && ${PWDCMD-pwd}`
|
|
|
105 fi
|
|
|
106
|
|
|
107 cat >site.exp <<EOF
|
|
|
108 set rootme "."
|
|
|
109 set tmpdir "${tmpdir-`${PWDCMD-pwd}`}"
|
|
|
110 set srcdir "${testsuite-${srcdir}/gcc/testsuite}"
|
|
|
111 set CFLAGS ""
|
|
|
112 set CXXFLAGS ""
|
|
|
113 set GCC_UNDER_TEST "${GCC_UNDER_TEST-${prefix}${prefix+/bin/}gcc}"
|
|
|
114 set GXX_UNDER_TEST "${GXX_UNDER_TEST-${prefix}${prefix+/bin/}g++}"
|
|
|
115 set GFORTRAN_UNDER_TEST "${GFORTRAN_UNDER_TEST-${prefix}${prefix+/bin/}gfortran}"
|
|
|
116 set OBJC_UNDER_TEST "${OBJC_UNDER_TEST-${prefix}${prefix+/bin/}gcc}"
|
|
|
117 EOF
|
|
111
|
118 if test x${target} != x; then
|
|
|
119 echo "set target_triplet $target" >> site.exp
|
|
|
120 echo "set target_alias $target" >> site.exp
|
|
|
121 fi
|
|
0
|
122
|
|
|
123 test x"${GCC_UNDER_TEST}" = x"no" || runtest --tool gcc ${1+"$@"}
|
|
|
124 test x"${GXX_UNDER_TEST}" = x"no" || runtest --tool g++ ${1+"$@"}
|
|
|
125 test x"${GFORTRAN_UNDER_TEST}" = x"no" || runtest --tool gfortran ${1+"$@"}
|
|
|
126 test x"${OBJC_UNDER_TEST}" = x"no" || runtest --tool objc ${1+"$@"}
|
|
|
127
|
|
|
128 exit 0
|
