mirror of https://github.com/postgres/postgres
regression driver into two parts and reusing half of it. Required to run ECPG tests without a shell on MSVC builds. Fix ECPG thread tests for MSVC build (incl output files). Joachim Wieland and Magnus HaganderREL8_3_STABLE
Magnus Hagander
19 years ago
parent
e514740e69
commit
09922597c5
@ -0,0 +1,40 @@ |
|||||||
|
test: compat_informix/dec_test |
||||||
|
test: compat_informix/charfuncs |
||||||
|
test: compat_informix/rfmtdate |
||||||
|
test: compat_informix/rfmtlong |
||||||
|
test: compat_informix/rnull |
||||||
|
test: compat_informix/test_informix |
||||||
|
test: compat_informix/test_informix2 |
||||||
|
test: connect/test2 |
||||||
|
test: connect/test3 |
||||||
|
test: connect/test4 |
||||||
|
test: connect/test5 |
||||||
|
test: pgtypeslib/dt_test |
||||||
|
test: pgtypeslib/dt_test2 |
||||||
|
test: pgtypeslib/num_test |
||||||
|
test: pgtypeslib/num_test2 |
||||||
|
test: preproc/comment |
||||||
|
test: preproc/define |
||||||
|
test: preproc/init |
||||||
|
test: preproc/type |
||||||
|
test: preproc/variable |
||||||
|
test: preproc/whenever |
||||||
|
test: sql/array |
||||||
|
test: sql/binary |
||||||
|
test: sql/code100 |
||||||
|
test: sql/copystdout |
||||||
|
test: sql/define |
||||||
|
test: sql/desc |
||||||
|
test: sql/dynalloc |
||||||
|
test: sql/dynalloc2 |
||||||
|
test: sql/dyntest |
||||||
|
test: sql/execute |
||||||
|
test: sql/fetch |
||||||
|
test: sql/func |
||||||
|
test: sql/indicators |
||||||
|
test: sql/quote |
||||||
|
test: sql/show |
||||||
|
test: sql/insupd |
||||||
|
test: sql/parser |
||||||
|
test: thread/thread |
||||||
|
test: thread/thread_implicit |
||||||
@ -1,811 +0,0 @@ |
|||||||
#! /bin/sh |
|
||||||
# $PostgreSQL: pgsql/src/interfaces/ecpg/test/pg_regress.sh,v 1.19 2007/03/29 12:02:24 meskes Exp $ |
|
||||||
|
|
||||||
me=`basename $0` |
|
||||||
|
|
||||||
message(){ |
|
||||||
_dashes='==============' # 14 |
|
||||||
_spaces=' ' # 38 |
|
||||||
_msg=`echo "$1$_spaces" | cut -c 1-38` |
|
||||||
echo "$_dashes $_msg $_dashes" |
|
||||||
} |
|
||||||
|
|
||||||
build_help(){ |
|
||||||
help="\ |
|
||||||
PostgreSQL regression test driver |
|
||||||
|
|
||||||
Usage: $me [options...] [extra tests...] |
|
||||||
|
|
||||||
Options: |
|
||||||
--dbname=DB use database DB (default \`regression') |
|
||||||
--debug turn on debug mode in programs that are run |
|
||||||
--inputdir=DIR take input files from DIR (default \`.') |
|
||||||
--load-language=lang load the named language before running the |
|
||||||
tests; can appear multiple times |
|
||||||
--max-connections=N maximum number of concurrent connections |
|
||||||
(default is 0 meaning unlimited) |
|
||||||
--multibyte=ENCODING use ENCODING as the multibyte encoding, and |
|
||||||
also run a test by the same name |
|
||||||
--outputdir=DIR place output files in DIR (default \`.') |
|
||||||
--temp-install[=DIR] create a temporary installation (in DIR) |
|
||||||
--no-locale use C locale |
|
||||||
$1 |
|
||||||
Options for \`temp-install' mode: |
|
||||||
--top-builddir=DIR (relative) path to top level build directory |
|
||||||
--temp-port=PORT port number to start temp postmaster on |
|
||||||
--listen-on-tcp listen on the tcp port as well |
|
||||||
--enable-threading expect threading to be enabled |
|
||||||
|
|
||||||
Options for using an existing installation: |
|
||||||
--host=HOST use postmaster running on HOST |
|
||||||
--port=PORT use postmaster running at PORT |
|
||||||
--user=USER connect as USER |
|
||||||
|
|
||||||
The exit status is 0 if all tests passed, 1 if some tests failed, and 2 |
|
||||||
if the tests could not be run for some reason. |
|
||||||
|
|
||||||
Report bugs to <pgsql-bugs@postgresql.org>." |
|
||||||
} |
|
||||||
|
|
||||||
init_vars(){ |
|
||||||
: ${TMPDIR=/tmp} |
|
||||||
TMPFILE=$TMPDIR/pg_regress.$$ |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Initialize default settings |
|
||||||
# ---------- |
|
||||||
|
|
||||||
: ${inputdir=.} |
|
||||||
: ${outputdir=.} |
|
||||||
|
|
||||||
libdir='@libdir@' |
|
||||||
bindir='@bindir@' |
|
||||||
datadir='@datadir@' |
|
||||||
host_platform='@host_tuple@' |
|
||||||
enable_shared='@enable_shared@' |
|
||||||
VERSION=@VERSION@ |
|
||||||
|
|
||||||
unset mode |
|
||||||
unset schedule |
|
||||||
unset debug |
|
||||||
unset nolocale |
|
||||||
unset top_builddir |
|
||||||
unset temp_install |
|
||||||
unset multibyte |
|
||||||
|
|
||||||
dbname=regression |
|
||||||
hostname=localhost |
|
||||||
maxconnections=0 |
|
||||||
temp_port=65432 |
|
||||||
load_langs="" |
|
||||||
listen_on_tcp=no |
|
||||||
enable_threading=no |
|
||||||
|
|
||||||
: ${GMAKE='@GMAKE@'} |
|
||||||
} |
|
||||||
|
|
||||||
parse_general_options(){ |
|
||||||
# ---------- |
|
||||||
# Parse command line options |
|
||||||
# ---------- |
|
||||||
|
|
||||||
while [ "$#" -gt 0 ] |
|
||||||
do |
|
||||||
case $1 in |
|
||||||
--help|-\?) |
|
||||||
echo "$help" |
|
||||||
exit 0;; |
|
||||||
--version) |
|
||||||
echo "pg_regress (PostgreSQL $VERSION)" |
|
||||||
exit 0;; |
|
||||||
--dbname=*) |
|
||||||
dbname=`expr "x$1" : "x--dbname=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--debug) |
|
||||||
debug=yes |
|
||||||
shift;; |
|
||||||
--inputdir=*) |
|
||||||
inputdir=`expr "x$1" : "x--inputdir=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--listen-on-tcp) |
|
||||||
listen_on_tcp=yes |
|
||||||
shift;; |
|
||||||
--enable-threading) |
|
||||||
enable_threading=yes |
|
||||||
shift;; |
|
||||||
--load-language=*) |
|
||||||
lang=`expr "x$1" : "x--load-language=\(.*\)"` |
|
||||||
load_langs="$load_langs $lang" |
|
||||||
unset lang |
|
||||||
shift;; |
|
||||||
--multibyte=*) |
|
||||||
multibyte=`expr "x$1" : "x--multibyte=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--no-locale) |
|
||||||
nolocale=yes |
|
||||||
shift;; |
|
||||||
--temp-install) |
|
||||||
temp_install=./tmp_check |
|
||||||
shift;; |
|
||||||
--temp-install=*) |
|
||||||
temp_install=`expr "x$1" : "x--temp-install=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--max-connections=*) |
|
||||||
maxconnections=`expr "x$1" : "x--max-connections=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--outputdir=*) |
|
||||||
outputdir=`expr "x$1" : "x--outputdir=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--top-builddir=*) |
|
||||||
top_builddir=`expr "x$1" : "x--top-builddir=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--temp-port=*) |
|
||||||
temp_port=`expr "x$1" : "x--temp-port=\(.*\)"` |
|
||||||
shift;; |
|
||||||
--host=*) |
|
||||||
PGHOST=`expr "x$1" : "x--host=\(.*\)"` |
|
||||||
export PGHOST |
|
||||||
unset PGHOSTADDR |
|
||||||
shift;; |
|
||||||
--port=*) |
|
||||||
PGPORT=`expr "x$1" : "x--port=\(.*\)"` |
|
||||||
export PGPORT |
|
||||||
shift;; |
|
||||||
--user=*) |
|
||||||
PGUSER=`expr "x$1" : "x--user=\(.*\)"` |
|
||||||
export PGUSER |
|
||||||
shift;; |
|
||||||
-*) |
|
||||||
# on error, this will not return but exit |
|
||||||
parse_special_options "$1" |
|
||||||
shift;; |
|
||||||
*) |
|
||||||
extra_tests="$extra_tests $1" |
|
||||||
shift;; |
|
||||||
esac |
|
||||||
done |
|
||||||
} |
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
setup_environment_variables(){ |
|
||||||
|
|
||||||
# This function has two parts. Part 1 sets/unsets environment variables |
|
||||||
# independently of what options the script receives. |
|
||||||
# Part 2 later sets environment variables with respect to the |
|
||||||
# options given. |
|
||||||
|
|
||||||
# ======= |
|
||||||
# PART 1: Options independent stuff goes here |
|
||||||
# ======= |
|
||||||
|
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Unset locale settings |
|
||||||
# ---------- |
|
||||||
|
|
||||||
unset LC_COLLATE LC_CTYPE LC_MONETARY LC_MESSAGES LC_NUMERIC LC_TIME LC_ALL LANG LANGUAGE |
|
||||||
|
|
||||||
# On Windows the default locale may not be English, so force it |
|
||||||
case $host_platform in |
|
||||||
*-*-cygwin*|*-*-mingw32*) |
|
||||||
LANG=en |
|
||||||
export LANG |
|
||||||
;; |
|
||||||
esac |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# On some platforms we can't use Unix sockets. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
case $host_platform in |
|
||||||
*-*-cygwin* | *-*-mingw32*) |
|
||||||
listen_on_tcp=yes |
|
||||||
esac |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Set up diff to ignore horizontal white space differences. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
case $host_platform in |
|
||||||
*-*-sco3.2v5*) |
|
||||||
DIFFFLAGS=-b;; |
|
||||||
*) |
|
||||||
DIFFFLAGS=-w;; |
|
||||||
esac |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Check for echo -n vs echo \c |
|
||||||
# ---------- |
|
||||||
|
|
||||||
if echo '\c' | grep c >/dev/null 2>&1; then |
|
||||||
ECHO_N='echo -n' |
|
||||||
ECHO_C='' |
|
||||||
else |
|
||||||
ECHO_N='echo' |
|
||||||
ECHO_C='\c' |
|
||||||
fi |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Set backend timezone and datestyle explicitly |
|
||||||
# |
|
||||||
# To pass the horology test in its current form, the postmaster must be |
|
||||||
# started with PGDATESTYLE=ISO, while the frontend must be started with |
|
||||||
# PGDATESTYLE=Postgres. We set the postmaster values here and change |
|
||||||
# to the frontend settings after the postmaster has been started. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
PGTZ='PST8PDT'; export PGTZ |
|
||||||
PGDATESTYLE='ISO, MDY'; export PGDATESTYLE |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Set up SQL shell for the test. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
psql_test_options="-a -q -X $psql_options" |
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
# ======= |
|
||||||
# PART 2: Options dependent stuff goes here |
|
||||||
# ======= |
|
||||||
|
|
||||||
LOGDIR=$outputdir/log |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# warn of Cygwin likely failure if maxconnections = 0 |
|
||||||
# and we are running parallel tests |
|
||||||
# ---------- |
|
||||||
|
|
||||||
case $host_platform in |
|
||||||
*-*-cygwin*) |
|
||||||
case "$schedule" in |
|
||||||
*parallel_schedule*) |
|
||||||
if [ $maxconnections -eq 0 ] ; then |
|
||||||
echo Using unlimited parallel connections is likely to fail or hang on Cygwin. |
|
||||||
echo Try \"$me --max-connections=n\" or \"gmake MAX_CONNECTIONS=n check\" |
|
||||||
echo with n = 5 or 10 if this happens. |
|
||||||
echo |
|
||||||
fi |
|
||||||
;; |
|
||||||
esac |
|
||||||
;; |
|
||||||
esac |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Set up multibyte environment |
|
||||||
# ---------- |
|
||||||
|
|
||||||
if [ -n "$multibyte" ]; then |
|
||||||
PGCLIENTENCODING=$multibyte |
|
||||||
export PGCLIENTENCODING |
|
||||||
encoding_opt="-E $multibyte" |
|
||||||
else |
|
||||||
unset PGCLIENTENCODING |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
do_temp_install(){ |
|
||||||
if echo x"$temp_install" | grep -v '^x/' >/dev/null 2>&1; then |
|
||||||
temp_install="`pwd`/$temp_install" |
|
||||||
fi |
|
||||||
|
|
||||||
bindir=$temp_install/install/$bindir |
|
||||||
libdir=$temp_install/install/$libdir |
|
||||||
datadir=$temp_install/install/$datadir |
|
||||||
PGDATA=$temp_install/data |
|
||||||
|
|
||||||
if [ "$unix_sockets" = no ]; then |
|
||||||
PGHOST=$hostname |
|
||||||
export PGHOST |
|
||||||
unset PGHOSTADDR |
|
||||||
else |
|
||||||
unset PGHOST |
|
||||||
unset PGHOSTADDR |
|
||||||
fi |
|
||||||
|
|
||||||
# since Makefile isn't very bright, check for out-of-range temp_port |
|
||||||
if [ "$temp_port" -ge 1024 -a "$temp_port" -le 65535 ] ; then |
|
||||||
PGPORT=$temp_port |
|
||||||
else |
|
||||||
PGPORT=65432 |
|
||||||
fi |
|
||||||
export PGPORT |
|
||||||
|
|
||||||
# Get rid of environment stuff that might cause psql to misbehave |
|
||||||
# while contacting our temp installation |
|
||||||
unset PGDATABASE PGUSER PGSERVICE PGSSLMODE PGREQUIRESSL PGCONNECT_TIMEOUT |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Set up shared library paths, needed by psql and pg_encoding |
|
||||||
# (if you run multibyte). LD_LIBRARY_PATH covers many platforms. |
|
||||||
# DYLD_LIBRARY_PATH works on Darwin, and maybe other Mach-based systems. |
|
||||||
# LIBPATH is for AIX. |
|
||||||
# Feel free to account for others as well. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
if [ -n "$LD_LIBRARY_PATH" ]; then |
|
||||||
LD_LIBRARY_PATH="$libdir:$LD_LIBRARY_PATH" |
|
||||||
else |
|
||||||
LD_LIBRARY_PATH=$libdir |
|
||||||
fi |
|
||||||
export LD_LIBRARY_PATH |
|
||||||
|
|
||||||
if [ -n "$DYLD_LIBRARY_PATH" ]; then |
|
||||||
DYLD_LIBRARY_PATH="$libdir:$DYLD_LIBRARY_PATH" |
|
||||||
else |
|
||||||
DYLD_LIBRARY_PATH=$libdir |
|
||||||
fi |
|
||||||
export DYLD_LIBRARY_PATH |
|
||||||
|
|
||||||
if [ -n "$LIBPATH" ]; then |
|
||||||
LIBPATH="$libdir:$LIBPATH" |
|
||||||
else |
|
||||||
LIBPATH=$libdir |
|
||||||
fi |
|
||||||
export LIBPATH |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Windows needs shared libraries in PATH. (Only those linked into |
|
||||||
# executables, not dlopen'ed ones) |
|
||||||
# ---------- |
|
||||||
case $host_platform in |
|
||||||
*-*-cygwin*|*-*-mingw32*) |
|
||||||
PATH=$libdir:$PATH |
|
||||||
export PATH |
|
||||||
;; |
|
||||||
esac |
|
||||||
|
|
||||||
if [ -d "$temp_install" ]; then |
|
||||||
message "removing existing temp installation" |
|
||||||
rm -rf "$temp_install" |
|
||||||
fi |
|
||||||
|
|
||||||
message "creating temporary installation" |
|
||||||
if [ ! -d "$LOGDIR" ]; then |
|
||||||
mkdir -p "$LOGDIR" || { (exit 2); exit; } |
|
||||||
fi |
|
||||||
$GMAKE -C "$top_builddir" DESTDIR="$temp_install/install" install with_perl=no with_python=no >"$LOGDIR/install.log" 2>&1 |
|
||||||
|
|
||||||
if [ $? -ne 0 ] |
|
||||||
then |
|
||||||
echo |
|
||||||
echo "$me: installation failed" |
|
||||||
echo "Examine $LOGDIR/install.log for the reason." |
|
||||||
echo |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
|
|
||||||
message "initializing database system" |
|
||||||
[ "$debug" = yes ] && initdb_options="--debug" |
|
||||||
[ "$nolocale" = yes ] && initdb_options="$initdb_options --no-locale" |
|
||||||
"$bindir/initdb" -D "$PGDATA" -L "$datadir" --noclean $initdb_options >"$LOGDIR/initdb.log" 2>&1 |
|
||||||
|
|
||||||
if [ $? -ne 0 ] |
|
||||||
then |
|
||||||
echo |
|
||||||
echo "$me: initdb failed" |
|
||||||
echo "Examine $LOGDIR/initdb.log for the reason." |
|
||||||
echo |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
|
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Start postmaster |
|
||||||
# ---------- |
|
||||||
|
|
||||||
message "starting postmaster" |
|
||||||
[ "$debug" = yes ] && postmaster_options="$postmaster_options -d 5" |
|
||||||
if [ "$listen_on_tcp" = yes ]; then |
|
||||||
postmaster_options="$postmaster_options -c listen_addresses=$hostname" |
|
||||||
else |
|
||||||
postmaster_options="$postmaster_options -c listen_addresses=" |
|
||||||
fi |
|
||||||
"$bindir/postmaster" -D "$PGDATA" -F $postmaster_options >"$LOGDIR/postmaster.log" 2>&1 & |
|
||||||
postmaster_pid=$! |
|
||||||
|
|
||||||
# Wait till postmaster is able to accept connections (normally only |
|
||||||
# a second or so, but Cygwin is reportedly *much* slower). Don't |
|
||||||
# wait forever, however. |
|
||||||
i=0 |
|
||||||
max=60 |
|
||||||
until "$bindir/psql" -X $psql_options postgres </dev/null 2>/dev/null |
|
||||||
do |
|
||||||
i=`expr $i + 1` |
|
||||||
if [ $i -ge $max ] |
|
||||||
then |
|
||||||
break |
|
||||||
fi |
|
||||||
if kill -0 $postmaster_pid >/dev/null 2>&1 |
|
||||||
then |
|
||||||
: still starting up |
|
||||||
else |
|
||||||
break |
|
||||||
fi |
|
||||||
sleep 1 |
|
||||||
done |
|
||||||
|
|
||||||
if kill -0 $postmaster_pid >/dev/null 2>&1 |
|
||||||
then |
|
||||||
echo "running on port $PGPORT with pid $postmaster_pid" |
|
||||||
else |
|
||||||
echo |
|
||||||
echo "$me: postmaster did not start" |
|
||||||
echo "Examine $LOGDIR/postmaster.log for the reason." |
|
||||||
echo |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
dont_temp_install(){ |
|
||||||
# ---------- |
|
||||||
# Windows needs shared libraries in PATH. (Only those linked into |
|
||||||
# executables, not dlopen'ed ones) |
|
||||||
# ---------- |
|
||||||
case $host_platform in |
|
||||||
*-*-cygwin*|*-*-mingw32*) |
|
||||||
PATH=$libdir:$PATH |
|
||||||
export PATH |
|
||||||
;; |
|
||||||
esac |
|
||||||
|
|
||||||
if [ -n "$PGPORT" ]; then |
|
||||||
port_info="port $PGPORT" |
|
||||||
else |
|
||||||
port_info="default port" |
|
||||||
fi |
|
||||||
|
|
||||||
if [ -n "$PGHOST" ]; then |
|
||||||
echo "(using postmaster on $PGHOST, $port_info)" |
|
||||||
else |
|
||||||
if [ "$unix_sockets" = no ]; then |
|
||||||
echo "(using postmaster on localhost, $port_info)" |
|
||||||
else |
|
||||||
echo "(using postmaster on Unix socket, $port_info)" |
|
||||||
fi |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
setup_client_environment_variables(){ |
|
||||||
PGDATESTYLE='Postgres' |
|
||||||
export PGDATESTYLE |
|
||||||
} |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Exit trap to remove temp file and shut down postmaster |
|
||||||
# ---------- |
|
||||||
|
|
||||||
# Note: There are some stupid shells (even among recent ones) that |
|
||||||
# ignore the argument to exit (as in `exit 1') if there is an exit |
|
||||||
# trap. The trap (and thus the shell script) will then always exit |
|
||||||
# with the result of the last shell command before the `exit'. Hence |
|
||||||
# we have to write `(exit x); exit' below this point. |
|
||||||
|
|
||||||
exit_trap(){ |
|
||||||
savestatus=$1 |
|
||||||
if [ -n "$postmaster_pid" ]; then |
|
||||||
kill -2 "$postmaster_pid" |
|
||||||
wait "$postmaster_pid" |
|
||||||
unset postmaster_pid |
|
||||||
fi |
|
||||||
rm -f "$TMPFILE" && exit $savestatus |
|
||||||
} |
|
||||||
|
|
||||||
sig_trap() { |
|
||||||
savestatus=$1 |
|
||||||
echo; echo "caught signal" |
|
||||||
if [ -n "$postmaster_pid" ]; then |
|
||||||
echo "signalling fast shutdown to postmaster with pid $postmaster_pid" |
|
||||||
kill -2 "$postmaster_pid" |
|
||||||
wait "$postmaster_pid" |
|
||||||
unset postmaster_pid |
|
||||||
fi |
|
||||||
(exit $savestatus); exit |
|
||||||
} |
|
||||||
|
|
||||||
setup_database(){ |
|
||||||
# this receives the name of the database to set up as its argument |
|
||||||
"$bindir/psql" -q -X $psql_options -c "\ |
|
||||||
alter database \"$1\" set lc_messages to 'C'; |
|
||||||
alter database \"$1\" set lc_monetary to 'C'; |
|
||||||
alter database \"$1\" set lc_numeric to 'C'; |
|
||||||
alter database \"$1\" set lc_time to 'C';" "$1" |
|
||||||
if [ $? -ne 0 ]; then |
|
||||||
echo "$me: could not set database default locales" |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Install any requested PL languages |
|
||||||
# ---------- |
|
||||||
|
|
||||||
if [ "$enable_shared" = yes ]; then |
|
||||||
for lang in xyzzy $load_langs ; do |
|
||||||
if [ "$lang" != "xyzzy" ]; then |
|
||||||
message "installing $lang" |
|
||||||
"$bindir/createlang" $psql_options $lang "$1" |
|
||||||
if [ $? -ne 0 ] && [ $? -ne 2 ]; then |
|
||||||
echo "$me: createlang $lang failed" |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
fi |
|
||||||
done |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
drop_database(){ |
|
||||||
message "dropping database \"$1\"" |
|
||||||
"$bindir/dropdb" $psql_options "$1" |
|
||||||
} |
|
||||||
|
|
||||||
create_database(){ |
|
||||||
# ---------- |
|
||||||
# We use template0 so that any installation-local cruft in template1 |
|
||||||
# will not mess up the tests. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
message "creating database \"$1\"" |
|
||||||
"$bindir/createdb" $encoding_opt $psql_options --template template0 "$1" |
|
||||||
if [ $? -ne 0 ]; then |
|
||||||
echo "$me: createdb failed" |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
|
|
||||||
setup_database "$1" |
|
||||||
} |
|
||||||
|
|
||||||
database_cleanup(){ |
|
||||||
# ---------- |
|
||||||
# Remove regressuser* and regressgroup* user accounts. |
|
||||||
# ---------- |
|
||||||
|
|
||||||
message "dropping regression test user accounts" |
|
||||||
"$bindir/psql" -q -X $psql_options -c 'DROP GROUP regressgroup1; DROP GROUP regressgroup2; DROP USER regressuser1, regressuser2, regressuser3, regressuser4;' $dbname 2>/dev/null |
|
||||||
if [ $? -eq 2 ]; then |
|
||||||
echo "$me: could not drop user accounts" |
|
||||||
(exit 2); exit |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
postmaster_shutdown(){ |
|
||||||
# ---------- |
|
||||||
# Server shutdown |
|
||||||
# ---------- |
|
||||||
|
|
||||||
if [ -n "$postmaster_pid" ]; then |
|
||||||
message "shutting down postmaster" |
|
||||||
"$bindir/pg_ctl" -s -D "$PGDATA" stop |
|
||||||
wait "$postmaster_pid" |
|
||||||
unset postmaster_pid |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
evaluate(){ |
|
||||||
# ---------- |
|
||||||
# Evaluation |
|
||||||
# ---------- |
|
||||||
|
|
||||||
count_total=`cat "$result_summary_file" | grep '\.\.\.' | wc -l | sed 's/ //g'` |
|
||||||
count_ok=`cat "$result_summary_file" | grep '\.\.\. ok' | wc -l | sed 's/ //g'` |
|
||||||
count_failed=`cat "$result_summary_file" | grep '\.\.\. FAILED' | wc -l | sed 's/ //g'` |
|
||||||
count_ignored=`cat "$result_summary_file" | grep '\.\.\. failed (ignored)' | wc -l | sed 's/ //g'` |
|
||||||
|
|
||||||
echo |
|
||||||
if [ $count_total -eq $count_ok ]; then |
|
||||||
msg="All $count_total tests passed." |
|
||||||
result=0 |
|
||||||
elif [ $count_failed -eq 0 ]; then |
|
||||||
msg="$count_ok of $count_total tests passed, $count_ignored failed test(s) ignored." |
|
||||||
result=0 |
|
||||||
elif [ $count_ignored -eq 0 ]; then |
|
||||||
msg="$count_failed of $count_total tests failed." |
|
||||||
result=1 |
|
||||||
else |
|
||||||
msg="`expr $count_failed + $count_ignored` of $count_total tests failed, $count_ignored of these failures ignored." |
|
||||||
result=1 |
|
||||||
fi |
|
||||||
|
|
||||||
dashes=`echo " $msg " | sed 's/./=/g'` |
|
||||||
echo "$dashes" |
|
||||||
echo " $msg " |
|
||||||
echo "$dashes" |
|
||||||
echo |
|
||||||
|
|
||||||
if [ -s "$diff_file" ]; then |
|
||||||
echo "The differences that caused some tests to fail can be viewed in the" |
|
||||||
echo "file \`$diff_file'. A copy of the test summary that you see" |
|
||||||
echo "above is saved in the file \`$result_summary_file'." |
|
||||||
echo |
|
||||||
else |
|
||||||
rm -f "$diff_file" "$result_summary_file" |
|
||||||
fi |
|
||||||
} |
|
||||||
|
|
||||||
additional_regress_options="" |
|
||||||
|
|
||||||
build_help "$additional_regress_options" |
|
||||||
init_vars |
|
||||||
|
|
||||||
parse_special_options(){ |
|
||||||
# no special options so far |
|
||||||
case $1 in |
|
||||||
-*) |
|
||||||
echo "$me: invalid argument $1" 1>&2 |
|
||||||
exit 2;; |
|
||||||
esac |
|
||||||
} |
|
||||||
|
|
||||||
# this will call parse_special_options from above |
|
||||||
parse_general_options $* |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Set up the environment variables (some of them depend on the parameters) |
|
||||||
# ---------- |
|
||||||
setup_environment_variables |
|
||||||
|
|
||||||
trap 'exit_trap $?' 0 |
|
||||||
trap 'sig_trap $?' 1 2 13 15 |
|
||||||
|
|
||||||
if [ x"$temp_install" != x"" ] |
|
||||||
then |
|
||||||
do_temp_install |
|
||||||
#PGPORT=$temp_port; export PGPORT |
|
||||||
else # not temp-install |
|
||||||
dont_temp_install |
|
||||||
fi |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Postmaster is started, now we can change some environment variables for the |
|
||||||
# client |
|
||||||
# ---------- |
|
||||||
|
|
||||||
setup_client_environment_variables |
|
||||||
|
|
||||||
# set up the dbs we use for ecpg regression tests |
|
||||||
drop_database "$dbname" |
|
||||||
create_database "$dbname" |
|
||||||
drop_database connectdb |
|
||||||
create_database connectdb |
|
||||||
|
|
||||||
# ---------- |
|
||||||
# Let's go |
|
||||||
# ---------- |
|
||||||
|
|
||||||
message "running regression test queries" |
|
||||||
|
|
||||||
outputdir="results" |
|
||||||
|
|
||||||
if [ ! -d "$outputdir" ]; then |
|
||||||
mkdir -p "$outputdir" || { (exit 2); exit; } |
|
||||||
fi |
|
||||||
#result_summary_file=$outputdir/regression.out |
|
||||||
#diff_file=$outputdir/regression.diffs |
|
||||||
|
|
||||||
#cat /dev/null >"$result_summary_file" |
|
||||||
#cat /dev/null >"$diff_file" |
|
||||||
|
|
||||||
# we also have different users for ecpg regression diffs (need them for testing |
|
||||||
# connects) |
|
||||||
echo "$bindir/createuser" $psql_options -R -S -D -q regressuser1 |
|
||||||
"$bindir/createuser" $psql_options -R -S -D -q regressuser1 |
|
||||||
if [ $? -ne 0 ]; then |
|
||||||
echo Could not create user regressuser1 |
|
||||||
fi |
|
||||||
echo "$bindir/createuser" $psql_options -R -S -D -q connectuser |
|
||||||
"$bindir/createuser" $psql_options -R -S -D -q connectuser |
|
||||||
if [ $? -ne 0 ]; then |
|
||||||
echo Could not create user connectuser |
|
||||||
fi |
|
||||||
# to test username = dbname |
|
||||||
echo "$bindir/createuser" $psql_options -R -S -D -q connectdb |
|
||||||
"$bindir/createuser" $psql_options -R -S -D -q connectdb |
|
||||||
if [ $? -ne 0 ]; then |
|
||||||
echo Could not create user connectdb |
|
||||||
fi |
|
||||||
|
|
||||||
# this variable prevents that the PID gets included in the logfiles |
|
||||||
#ECPG_REGRESSION=1; export ECPG_REGRESSION |
|
||||||
LD_LIBRARY_PATH=$libdir:$LD_LIBRARY_PATH; export LD_LIBRARY_PATH |
|
||||||
|
|
||||||
DIFFPRETTYFLAGS="$DIFFFLAGS -C3" |
|
||||||
FAILNUM="" |
|
||||||
|
|
||||||
rm -f regression.diffs |
|
||||||
|
|
||||||
for i in \ |
|
||||||
connect/*.pgc \ |
|
||||||
compat_informix/*.pgc \ |
|
||||||
preproc/*.pgc \ |
|
||||||
pgtypeslib/*.pgc \ |
|
||||||
sql/*.pgc \ |
|
||||||
thread/*.pgc; do |
|
||||||
|
|
||||||
formatted=`echo $i | awk '{printf "%-38.38s", $1;}'` |
|
||||||
$ECHO_N "testing $formatted ... $ECHO_C" |
|
||||||
|
|
||||||
# connect/test1.pgc uses tcp to connect to the server. We run this test |
|
||||||
# only if called with --listen-on-tcp |
|
||||||
if [ $listen_on_tcp = no ] && [ "$i" = "connect/test1.pgc" ]; then |
|
||||||
echo skipped |
|
||||||
continue; |
|
||||||
fi |
|
||||||
|
|
||||||
runprg=`echo $i | sed -e 's,\.pgc$,,'` |
|
||||||
outprg=`echo $runprg | sed -e's/\//-/'` |
|
||||||
|
|
||||||
case $host_platform in |
|
||||||
*-*-mingw32*) |
|
||||||
PLATFORM_TAG="-MinGW32" |
|
||||||
;; |
|
||||||
*-*-openbsd3.8) |
|
||||||
# OpenBSD 3.8 is buggy: |
|
||||||
# http://archives.postgresql.org/pgsql-hackers/2006-09/msg00593.php |
|
||||||
PLATFORM_TAG="-OpenBSD3.8.broken" |
|
||||||
;; |
|
||||||
esac |
|
||||||
|
|
||||||
outfile_stderr="$outputdir/$outprg.stderr" |
|
||||||
outfile_stdout="$outputdir/$outprg.stdout" |
|
||||||
outfile_source="$outputdir/$outprg.c" |
|
||||||
cp $runprg.c "$outfile_source" |
|
||||||
# echo "$runprg > $outfile_stdout 2> $outfile_stderr" |
|
||||||
$runprg > "$outfile_stdout" 2> "$outfile_stderr" |
|
||||||
|
|
||||||
mv "$outfile_source" "$outfile_source.tmp" |
|
||||||
cat "$outfile_source.tmp" | sed -e 's,^\(#line [0-9]*\) ".*/\([^/]*\)",\1 "\2",' > "$outfile_source" |
|
||||||
rm "$outfile_source.tmp" |
|
||||||
|
|
||||||
if [ "$enable_threading" = yes ] && [ "${i%%/*}" = "thread" ]; then |
|
||||||
expectedoutprg="expected/$outprg-thread" |
|
||||||
else |
|
||||||
expectedoutprg="expected/$outprg" |
|
||||||
fi |
|
||||||
|
|
||||||
expected_stdout="$expectedoutprg$PLATFORM_TAG.stdout" |
|
||||||
if [ ! -f "$expected_stdout" ]; then |
|
||||||
expected_stdout="$expectedoutprg.stdout" |
|
||||||
fi |
|
||||||
# threading has log output disabled |
|
||||||
expected_stderr="expected/$outprg$PLATFORM_TAG.stderr" |
|
||||||
if [ ! -f "$expected_stderr" ]; then |
|
||||||
expected_stderr="expected/$outprg.stderr" |
|
||||||
fi |
|
||||||
# the source should be identical on all platforms |
|
||||||
expected_source="expected/$outprg.c" |
|
||||||
|
|
||||||
DIFFER="" |
|
||||||
diff $DIFFFLAGS "$expected_stderr" "$outfile_stderr" > /dev/null 2>&1 |
|
||||||
if [ $? != 0 ]; then |
|
||||||
DIFFER="$DIFFER, log" |
|
||||||
diff $DIFFPRETTYFLAGS "$expected_stderr" "$outfile_stderr" >> regression.diffs 2>&1 |
|
||||||
fi |
|
||||||
|
|
||||||
diff $DIFFFLAGS "$expected_stdout" "$outfile_stdout" > /dev/null 2>&1 |
|
||||||
if [ $? != 0 ]; then |
|
||||||
DIFFER="$DIFFER, output" |
|
||||||
diff $DIFFPRETTYFLAGS "$expected_stdout" "$outfile_stdout" >> regression.diffs 2>&1 |
|
||||||
fi |
|
||||||
|
|
||||||
diff $DIFFFLAGS "$expected_source" "$outputdir"/$outprg.c > /dev/null 2>&1 |
|
||||||
if [ $? != 0 ]; then |
|
||||||
DIFFER="$DIFFER, source" |
|
||||||
diff $DIFFPRETTYFLAGS "$expected_source" "$outputdir"/$outprg.c >> regression.diffs 2>&1 |
|
||||||
fi |
|
||||||
|
|
||||||
DIFFER=`echo $DIFFER | sed -e 's/^, //'` |
|
||||||
if [ "x$DIFFER" = "x" ]; then |
|
||||||
echo ok |
|
||||||
else |
|
||||||
echo "FAILED ($DIFFER)" |
|
||||||
# some sh's don't know about $((x+1)) |
|
||||||
FAILNUM=x$FAILNUM |
|
||||||
fi |
|
||||||
done |
|
||||||
|
|
||||||
postmaster_shutdown |
|
||||||
|
|
||||||
# FAILNUM is empty if no test has failed |
|
||||||
[ x"$FAILNUM" = x"" ] && exit 0 |
|
||||||
(exit 1); exit |
|
||||||
|
|
||||||
@ -0,0 +1,177 @@ |
|||||||
|
/*-------------------------------------------------------------------------
|
||||||
|
* |
||||||
|
* pg_regress_ecpg --- regression test driver for ecpg |
||||||
|
* |
||||||
|
* This is a C implementation of the previous shell script for running |
||||||
|
* the regression tests, and should be mostly compatible with it. |
||||||
|
* Initial author of C translation: Magnus Hagander |
||||||
|
* |
||||||
|
* This code is released under the terms of the PostgreSQL License. |
||||||
|
* |
||||||
|
* Portions Copyright (c) 1996-2007, PostgreSQL Global Development Group |
||||||
|
* Portions Copyright (c) 1994, Regents of the University of California |
||||||
|
* |
||||||
|
* $PostgreSQL: pgsql/src/interfaces/ecpg/test/pg_regress_ecpg.c,v 1.1 2007/06/12 11:07:30 mha Exp $ |
||||||
|
* |
||||||
|
*------------------------------------------------------------------------- |
||||||
|
*/ |
||||||
|
|
||||||
|
#include "pg_regress.h" |
||||||
|
|
||||||
|
#define LINEBUFSIZE 300 |
||||||
|
static void |
||||||
|
ecpg_filter(const char *sourcefile, const char *outfile) |
||||||
|
{ |
||||||
|
/*
|
||||||
|
* Create a filtered copy of sourcefile, replacing |
||||||
|
* #line x "./../bla/foo.h" |
||||||
|
* with |
||||||
|
* #line x "foo.h" |
||||||
|
*/ |
||||||
|
FILE *s, *t; |
||||||
|
char linebuf[LINEBUFSIZE]; |
||||||
|
|
||||||
|
s = fopen(sourcefile, "r"); |
||||||
|
if (!s) |
||||||
|
{ |
||||||
|
fprintf(stderr, "Could not open file %s for reading\n", sourcefile); |
||||||
|
exit_nicely(2); |
||||||
|
} |
||||||
|
t = fopen(outfile, "w"); |
||||||
|
if (!t) |
||||||
|
{ |
||||||
|
fprintf(stderr, "Could not open file %s for writing\n", outfile); |
||||||
|
exit_nicely(2); |
||||||
|
} |
||||||
|
|
||||||
|
while (fgets(linebuf, LINEBUFSIZE, s)) |
||||||
|
{ |
||||||
|
/* check for "#line " in the beginning */ |
||||||
|
if (strstr(linebuf, "#line ") == linebuf) |
||||||
|
{ |
||||||
|
char *p = strchr(linebuf, '"'); |
||||||
|
char *n; |
||||||
|
int plen = 1; |
||||||
|
while (*p && (*(p + plen) == '.' || strchr(p + plen, '/') != NULL)) |
||||||
|
{ |
||||||
|
plen++; |
||||||
|
} |
||||||
|
/* plen is one more than the number of . and / characters */ |
||||||
|
if (plen > 1) |
||||||
|
{ |
||||||
|
n = (char *) malloc(plen); |
||||||
|
strncpy(n, p+1, plen - 1); |
||||||
|
n[plen-1] = '\0'; |
||||||
|
replace_string(linebuf, n, ""); |
||||||
|
} |
||||||
|
} |
||||||
|
fputs(linebuf, t); |
||||||
|
} |
||||||
|
fclose(s); |
||||||
|
fclose(t); |
||||||
|
} |
||||||
|
|
||||||
|
/*
|
||||||
|
* start an ecpg test process for specified file (including redirection), |
||||||
|
* and return process ID |
||||||
|
*/ |
||||||
|
|
||||||
|
static PID_TYPE |
||||||
|
ecpg_start_test(const char *testname, |
||||||
|
_stringlist **resultfiles, |
||||||
|
_stringlist **expectfiles, |
||||||
|
_stringlist **tags) |
||||||
|
{ |
||||||
|
PID_TYPE pid; |
||||||
|
char inprg[MAXPGPATH]; |
||||||
|
char insource[MAXPGPATH]; |
||||||
|
char *outfile_stdout, expectfile_stdout[MAXPGPATH]; |
||||||
|
char *outfile_stderr, expectfile_stderr[MAXPGPATH]; |
||||||
|
char *outfile_source, expectfile_source[MAXPGPATH]; |
||||||
|
char cmd[MAXPGPATH * 3]; |
||||||
|
char *testname_dash; |
||||||
|
|
||||||
|
snprintf(inprg, sizeof(inprg), "%s/%s", inputdir, testname); |
||||||
|
|
||||||
|
testname_dash = strdup(testname); |
||||||
|
replace_string(testname_dash, "/", "-"); |
||||||
|
snprintf(expectfile_stdout, sizeof(expectfile_stdout), |
||||||
|
"%s/expected/%s.stdout", |
||||||
|
outputdir, testname_dash); |
||||||
|
snprintf(expectfile_stderr, sizeof(expectfile_stderr), |
||||||
|
"%s/expected/%s.stderr", |
||||||
|
outputdir, testname_dash); |
||||||
|
snprintf(expectfile_source, sizeof(expectfile_source), |
||||||
|
"%s/expected/%s.c", |
||||||
|
outputdir, testname_dash); |
||||||
|
|
||||||
|
/*
|
||||||
|
* We can use replace_string() here because the replacement string does |
||||||
|
* not occupy more space than the replaced one. |
||||||
|
*/ |
||||||
|
outfile_stdout = strdup(expectfile_stdout); |
||||||
|
replace_string(outfile_stdout, "/expected/", "/results/"); |
||||||
|
outfile_stderr = strdup(expectfile_stderr); |
||||||
|
replace_string(outfile_stderr, "/expected/", "/results/"); |
||||||
|
outfile_source = strdup(expectfile_source); |
||||||
|
replace_string(outfile_source, "/expected/", "/results/"); |
||||||
|
|
||||||
|
add_stringlist_item(resultfiles, outfile_stdout); |
||||||
|
add_stringlist_item(expectfiles, expectfile_stdout); |
||||||
|
add_stringlist_item(tags, "stdout"); |
||||||
|
|
||||||
|
add_stringlist_item(resultfiles, outfile_stderr); |
||||||
|
add_stringlist_item(expectfiles, expectfile_stderr); |
||||||
|
add_stringlist_item(tags, "stderr"); |
||||||
|
|
||||||
|
add_stringlist_item(resultfiles, outfile_source); |
||||||
|
add_stringlist_item(expectfiles, expectfile_source); |
||||||
|
add_stringlist_item(tags, "source"); |
||||||
|
|
||||||
|
snprintf(insource, sizeof(insource), "%s.c", testname); |
||||||
|
ecpg_filter(insource, outfile_source); |
||||||
|
|
||||||
|
snprintf(inprg, sizeof(inprg), "%s/%s", inputdir, testname); |
||||||
|
|
||||||
|
snprintf(cmd, sizeof(cmd), |
||||||
|
SYSTEMQUOTE "\"%s\" >\"%s\" 2>\"%s\"" SYSTEMQUOTE, |
||||||
|
inprg, |
||||||
|
outfile_stdout, |
||||||
|
outfile_stderr); |
||||||
|
|
||||||
|
pid = spawn_process(cmd); |
||||||
|
|
||||||
|
if (pid == INVALID_PID) |
||||||
|
{ |
||||||
|
fprintf(stderr, _("could not start process for test %s\n"), |
||||||
|
testname); |
||||||
|
exit_nicely(2); |
||||||
|
} |
||||||
|
|
||||||
|
free(outfile_stdout); |
||||||
|
free(outfile_stderr); |
||||||
|
free(outfile_source); |
||||||
|
|
||||||
|
return pid; |
||||||
|
} |
||||||
|
|
||||||
|
static void |
||||||
|
ecpg_init(void) |
||||||
|
{ |
||||||
|
/* no reason to set -w for ecpg checks, except for when on windows */ |
||||||
|
if (strstr(host_platform, "-win32")) |
||||||
|
basic_diff_opts = "-w"; |
||||||
|
else
|
||||||
|
basic_diff_opts = ""; |
||||||
|
if (strstr(host_platform, "-win32")) |
||||||
|
pretty_diff_opts = "-C3 -w"; |
||||||
|
else
|
||||||
|
pretty_diff_opts = "-C3"; |
||||||
|
} |
||||||
|
|
||||||
|
int |
||||||
|
main(int argc, char *argv[]) |
||||||
|
{ |
||||||
|
return regression_main(argc, argv, ecpg_init, ecpg_start_test); |
||||||
|
} |
||||||
|
|
||||||
@ -0,0 +1,3 @@ |
|||||||
|
compat_informix/dec_test:stdout:i.86-pc-win32vc=compat_informix-dec_test-MinGW32.stdout |
||||||
|
pgtypeslib/num_test:stdout:i.86-pc-win32vc=pgtypeslib-num_test-MinGW32.stdout |
||||||
|
pgtypeslib/num_test2:stdout:i.86-pc-win32vc=pgtypeslib-num_test2-MinGW32.stdout |
||||||
@ -0,0 +1,59 @@ |
|||||||
|
/*-------------------------------------------------------------------------
|
||||||
|
* pg_regress.h --- regression test driver |
||||||
|
* |
||||||
|
* Portions Copyright (c) 1996-2007, PostgreSQL Global Development Group |
||||||
|
* Portions Copyright (c) 1994, Regents of the University of California |
||||||
|
* |
||||||
|
* $PostgreSQL: pgsql/src/test/regress/pg_regress.h,v 1.1 2007/06/12 11:07:34 mha Exp $ |
||||||
|
*------------------------------------------------------------------------- |
||||||
|
*/ |
||||||
|
|
||||||
|
#include "postgres_fe.h" |
||||||
|
#include <unistd.h> |
||||||
|
|
||||||
|
#ifndef WIN32 |
||||||
|
#define PID_TYPE pid_t |
||||||
|
#define INVALID_PID (-1) |
||||||
|
#else |
||||||
|
#define PID_TYPE HANDLE |
||||||
|
#define INVALID_PID INVALID_HANDLE_VALUE |
||||||
|
#endif |
||||||
|
|
||||||
|
/* simple list of strings */ |
||||||
|
typedef struct _stringlist |
||||||
|
{ |
||||||
|
char *str; |
||||||
|
struct _stringlist *next; |
||||||
|
} _stringlist; |
||||||
|
|
||||||
|
typedef PID_TYPE (*test_function)(const char *, |
||||||
|
_stringlist **, |
||||||
|
_stringlist **, |
||||||
|
_stringlist **); |
||||||
|
typedef void (*init_function)(void); |
||||||
|
|
||||||
|
extern char *bindir; |
||||||
|
extern char *libdir; |
||||||
|
extern char *datadir; |
||||||
|
extern char *host_platform; |
||||||
|
|
||||||
|
extern _stringlist *dblist; |
||||||
|
extern bool debug; |
||||||
|
extern char *inputdir; |
||||||
|
extern char *outputdir; |
||||||
|
/*
|
||||||
|
* This should not be global but every module should be able to read command |
||||||
|
* line parameters. |
||||||
|
*/ |
||||||
|
extern char *psqldir; |
||||||
|
|
||||||
|
extern const char *basic_diff_opts; |
||||||
|
extern const char *pretty_diff_opts; |
||||||
|
|
||||||
|
int regression_main(int argc, char *argv[], |
||||||
|
init_function ifunc, test_function tfunc); |
||||||
|
void add_stringlist_item(_stringlist ** listhead, const char *str); |
||||||
|
PID_TYPE spawn_process(const char *cmdline); |
||||||
|
void exit_nicely(int code); |
||||||
|
void replace_string(char *string, char *replace, char *replacement); |
||||||
|
|
||||||
@ -0,0 +1,78 @@ |
|||||||
|
/*-------------------------------------------------------------------------
|
||||||
|
* |
||||||
|
* pg_regress_main --- regression test for the main backend |
||||||
|
* |
||||||
|
* This is a C implementation of the previous shell script for running |
||||||
|
* the regression tests, and should be mostly compatible with it. |
||||||
|
* Initial author of C translation: Magnus Hagander |
||||||
|
* |
||||||
|
* This code is released under the terms of the PostgreSQL License. |
||||||
|
* |
||||||
|
* Portions Copyright (c) 1996-2007, PostgreSQL Global Development Group |
||||||
|
* Portions Copyright (c) 1994, Regents of the University of California |
||||||
|
* |
||||||
|
* $PostgreSQL: pgsql/src/test/regress/pg_regress_main.c,v 1.1 2007/06/12 11:07:34 mha Exp $ |
||||||
|
* |
||||||
|
*------------------------------------------------------------------------- |
||||||
|
*/ |
||||||
|
|
||||||
|
#include "pg_regress.h" |
||||||
|
|
||||||
|
/*
|
||||||
|
* start a psql test process for specified file (including redirection), |
||||||
|
* and return process ID |
||||||
|
*/ |
||||||
|
static PID_TYPE |
||||||
|
psql_start_test(const char *testname, |
||||||
|
_stringlist **resultfiles, |
||||||
|
_stringlist **expectfiles, |
||||||
|
_stringlist **tags) |
||||||
|
{ |
||||||
|
PID_TYPE pid; |
||||||
|
char infile[MAXPGPATH]; |
||||||
|
char outfile[MAXPGPATH]; |
||||||
|
char expectfile[MAXPGPATH]; |
||||||
|
char psql_cmd[MAXPGPATH * 3]; |
||||||
|
|
||||||
|
snprintf(infile, sizeof(infile), "%s/sql/%s.sql", |
||||||
|
inputdir, testname); |
||||||
|
snprintf(outfile, sizeof(outfile), "%s/results/%s.out", |
||||||
|
outputdir, testname); |
||||||
|
snprintf(expectfile, sizeof(expectfile), "%s/expected/%s.out", |
||||||
|
inputdir, testname); |
||||||
|
|
||||||
|
add_stringlist_item(resultfiles, outfile); |
||||||
|
add_stringlist_item(expectfiles, expectfile); |
||||||
|
|
||||||
|
snprintf(psql_cmd, sizeof(psql_cmd), |
||||||
|
SYSTEMQUOTE "\"%s%spsql\" -X -a -q -d \"%s\" < \"%s\" > \"%s\" 2>&1" SYSTEMQUOTE, |
||||||
|
psqldir ? psqldir : "", |
||||||
|
psqldir ? "/" : "", |
||||||
|
dblist->str, |
||||||
|
infile, |
||||||
|
outfile); |
||||||
|
|
||||||
|
pid = spawn_process(psql_cmd); |
||||||
|
|
||||||
|
if (pid == INVALID_PID) |
||||||
|
{ |
||||||
|
fprintf(stderr, _("could not start process for test %s\n"), |
||||||
|
testname); |
||||||
|
exit_nicely(2); |
||||||
|
} |
||||||
|
|
||||||
|
return pid; |
||||||
|
} |
||||||
|
|
||||||
|
static void |
||||||
|
psql_init(void) |
||||||
|
{ |
||||||
|
/* set default regression database name */ |
||||||
|
add_stringlist_item(&dblist, "regression"); |
||||||
|
} |
||||||
|
|
||||||
|
int |
||||||
|
main(int argc, char *argv[]) |
||||||
|
{ |
||||||
|
return regression_main(argc, argv, psql_init, psql_start_test); |
||||||
|
} |
||||||
@ -1,11 +1,11 @@ |
|||||||
float4/i.86-pc-mingw32=float4-exp-three-digits |
float4:out:i.86-pc-mingw32=float4-exp-three-digits.out |
||||||
float4/i.86-pc-win32vc=float4-exp-three-digits |
float4:out:i.86-pc-win32vc=float4-exp-three-digits.out |
||||||
float8/i.86-.*-freebsd=float8-small-is-zero |
float8:out:i.86-.*-freebsd=float8-small-is-zero.out |
||||||
float8/i.86-.*-openbsd=float8-small-is-zero |
float8:out:i.86-.*-openbsd=float8-small-is-zero.out |
||||||
float8/i.86-.*-netbsd=float8-small-is-zero |
float8:out:i.86-.*-netbsd=float8-small-is-zero.out |
||||||
float8/m68k-.*-netbsd=float8-small-is-zero |
float8:out:m68k-.*-netbsd=float8-small-is-zero.out |
||||||
float8/i.86-pc-mingw32=float8-exp-three-digits-win32 |
float8:out:i.86-pc-mingw32=float8-exp-three-digits-win32.out |
||||||
float8/i.86-pc-win32vc=float8-exp-three-digits-win32 |
float8:out:i.86-pc-win32vc=float8-exp-three-digits-win32.out |
||||||
float8/i.86-pc-cygwin=float8-small-is-zero |
float8:out:i.86-pc-cygwin=float8-small-is-zero.out |
||||||
int8/i.86-pc-mingw32=int8-exp-three-digits |
int8:out:i.86-pc-mingw32=int8-exp-three-digits.out |
||||||
int8/i.86-pc-win32vc=int8-exp-three-digits |
int8:out:i.86-pc-win32vc=int8-exp-three-digits.out |
||||||
|
|||||||
@ -0,0 +1,46 @@ |
|||||||
|
<?xml version="1.0"?> |
||||||
|
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003" DefaultTargets="all"> |
||||||
|
<!-- |
||||||
|
MSBuild project file to build ecpg regression tests |
||||||
|
--> |
||||||
|
|
||||||
|
<PropertyGroup> |
||||||
|
<TESTDIR>..\..\interfaces\ecpg\test</TESTDIR> |
||||||
|
<CONFIG>Debug</CONFIG> |
||||||
|
<OUTDIR>..\..\..\..\..\$(CONFIG)\</OUTDIR> |
||||||
|
</PropertyGroup> |
||||||
|
<PropertyGroup Condition="'$(CONFIG)'=='DEBUG'"> |
||||||
|
<!-- set debug runtime library if necessary to be compatible with the LIB files generated --> |
||||||
|
<DEBUGLIB>d</DEBUGLIB> |
||||||
|
</PropertyGroup> |
||||||
|
|
||||||
|
<ItemGroup> |
||||||
|
<Pgc Include="$(TESTDIR)\**\*.pgc" Exclude="$(TESTDIR)\performance\perftest.pgc"/> |
||||||
|
</ItemGroup> |
||||||
|
|
||||||
|
<ItemGroup> |
||||||
|
<OutputToDelete Include="$(TESTDIR)\**\*.exe" /> |
||||||
|
<OutputToDelete Include="$(TESTDIR)\**\*.exe.manifest" /> |
||||||
|
<OutputToDelete Include="$(TESTDIR)\**\*.obj" /> |
||||||
|
<OutputToDelete Include="$(TESTDIR)\**\*.c" Exclude="$(TESTDIR)\pg_regress_ecpg.c;$(TESTDIR)\expected\*.c" /> |
||||||
|
</ItemGroup> |
||||||
|
|
||||||
|
<Target Name="all" Inputs="@(Pgc)" Outputs="%(RelativeDir)%(Filename).exe"> |
||||||
|
<!-- Set special parameters for some tests --> |
||||||
|
<CreateProperty Value="-C INFORMIX" Condition="'%(Pgc.RelativeDir)'=='$(TESTDIR)\compat_informix\'"> |
||||||
|
<Output TaskParameter="Value" PropertyName="ECPGPARAM" /> |
||||||
|
</CreateProperty> |
||||||
|
<CreateProperty Value="-C INFORMIX -r no_indicator" Condition="'%(Pgc.FileName)'=='rnull'"> |
||||||
|
<Output TaskParameter="Value" PropertyName="ECPGPARAM" /> |
||||||
|
</CreateProperty> |
||||||
|
|
||||||
|
<!-- Run ECPG and the Visual C++ compiler on the files. Don't bother with dependency check between the steps --> |
||||||
|
<Exec WorkingDirectory="%(Pgc.RelativeDir)" Command="$(OUTDIR)ecpg\ecpg -I ../../include --regression $(ECPGPARAM) -o %(Pgc.Filename).c %(Pgc.Filename).pgc" /> |
||||||
|
<Exec WorkingDirectorY="%(Pgc.RelativeDir)" Command="cl /nologo %(Pgc.FileName).c /TC /MD$(DEBUGLIB) /DENABLE_THREAD_SAFETY /DWIN32 /DWIN32_ONLY_COMPILER /I. /I..\..\include /I..\..\..\libpq /I..\..\..\..\include /link /defaultlib:$(OUTDIR)libecpg\libecpg.lib /defaultlib:$(OUTDIR)libecpg_compat\libecpg_compat.lib /defaultlib:$(OUTDIR)libpgtypes\libpgtypes.lib" /> |
||||||
|
</Target> |
||||||
|
|
||||||
|
<!-- Clean up all output files --> |
||||||
|
<Target Name="clean"> |
||||||
|
<Delete Files="@(OutputToDelete)" /> |
||||||
|
</Target> |
||||||
|
</Project> |
||||||
Loading…
Reference in new issue