aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rwxr-xr-xtests/testcurl.pl99
1 files changed, 69 insertions, 30 deletions
diff --git a/tests/testcurl.pl b/tests/testcurl.pl
index 1efbba375..ff9c13399 100755
--- a/tests/testcurl.pl
+++ b/tests/testcurl.pl
@@ -35,12 +35,15 @@
# USAGE:
# testcurl.pl [curl-daily-name] > output
+# or:
+# testcurl.pl --target=your_os > output
# Updated:
-# v1.2 8-Mar-04 - rewritten in perl
-# v1.1 6-Nov-03 - to take an optional parameter, the name of a daily-build
-# directory. If present, build from that directory, otherwise
-# perform a normal CVS build.
+# v1.7 22-Jun-04 - added --target option for other platform targets.
+# v1.2 8-Mar-04 - rewritten in perl
+# v1.1 6-Nov-03 - to take an optional parameter, the name of a daily-build
+# directory. If present, build from that directory, otherwise
+# perform a normal CVS build.
use strict;
@@ -49,20 +52,44 @@ use Cwd;
# Turn on warnings (equivalent to -w, which can't be used with /usr/bin/env)
BEGIN { $^W = 1; }
-use vars qw($version $fixed $infixed $CURLDIR $CVS $pwd $build $buildlog $buildlogname $gnulikebuild);
+use vars qw($version $fixed $infixed $CURLDIR $CVS $pwd $build $buildlog
+ $buildlogname $gnulikebuild $targetos $confsuffix $binext);
use vars qw($name $email $desc $confopts);
# version of this script
$version='$Revision$';
$fixed=0;
-# Determine if we're running from CVS or a canned copy of curl
+# Determine if we're running from CVS or a canned copy of curl,
+# or if we got a specific target option
+$CURLDIR="curl";
+$CVS=1;
if (@ARGV && $ARGV[0]) {
- $CURLDIR=$ARGV[0];
- $CVS=0;
-} else {
- $CURLDIR="curl";
- $CVS=1;
+ if ($ARGV[0] =~ /--target=/) {
+ $targetos = (split(/=/, $ARGV[0]))[1];
+ } else {
+ $CURLDIR=$ARGV[0];
+ $CVS=0;
+ }
+}
+
+# Do the platform-specific stuff here
+$gnulikebuild = 1;
+$confsuffix = '';
+$binext = '';
+if ($^O eq 'MSWin32' || defined($targetos)) {
+ $gnulikebuild = 0;
+ if (!defined($targetos)) {
+ # If no target defined on Win32 lets assume vc
+ $targetos = 'vc';
+ }
+ if ($targetos =~ /vc/ || $targetos =~ /mingw32/) {
+ $confsuffix = '-win32';
+ $binext = '.exe';
+ } elsif ($targetos =~ /netware/) {
+ $confsuffix = '-netware';
+ $binext = '.nlm';
+ }
}
$ENV{LANG}="C";
@@ -118,11 +145,6 @@ sub mydie($){
exit 1;
}
-$gnulikebuild = 1;
-if ($^O eq 'MSWin32') {
- $gnulikebuild = 0;
-}
-
if (open(F, "setup")) {
while (<F>) {
if (/(\w+)=(.*)/) {
@@ -183,6 +205,7 @@ logit "DESC = $desc";
logit "CONFOPTS = $confopts";
logit "CFLAGS = ".($ENV{CFLAGS} ? $ENV{CFLAGS} : "");
logit "CC = ".($ENV{CC} ? $ENV{CC} : "");
+logit "target = ".($targetos ? $targetos : "");
logit "version = $version";
logit "date = ".(scalar gmtime)." UTC";
@@ -286,7 +309,8 @@ if ($CVS) {
mydie "buildconf was NOT successful";
}
} else {
- system("buildconf.bat");
+ system("buildconf.bat") if ($^O eq 'MSWin32');
+ # logit "buildconf was successful (dummy message)" if ($^O eq 'linux');
}
}
@@ -314,24 +338,28 @@ if ($gnulikebuild) {
mydie "configure didn't work";
}
} else {
- system("xcopy /s /q ..\\$CURLDIR .");
+ system("xcopy /s /q ..\\$CURLDIR .") if ($^O eq 'MSWin32');
+ if ($^O eq 'linux') {
+ system("cp -ar ../$CURLDIR/* .");
+ system("cp -a ../$CURLDIR/Makefile.dist Makefile");
+ }
}
-logit "display lib/config.h";
-open(F, $gnulikebuild ? "lib/config.h" : "lib/config-win32.h") or die;
+logit "display lib/config$confsuffix.h";
+open(F, "lib/config$confsuffix.h") or die;
while (<F>) {
print if /^ *#/;
}
close(F);
-logit "display src/config.h";
-open(F, $gnulikebuild ? "src/config.h" : "src/config-win32.h") or die;
+logit "display src/config$confsuffix.h";
+open(F, "src/config$confsuffix.h") or die;
while (<F>) {
print if /^ *#/;
}
close(F);
-if (grepfile("define USE_ARES", $gnulikebuild ? "lib/config.h" : "lib/config-win32.h")) {
+if (grepfile("define USE_ARES", "lib/config$confsuffix.h")) {
logit "setup to build ares";
logit "build ares";
@@ -362,7 +390,15 @@ if ($gnulikebuild) {
}
close(F);
} else {
- open(F, "nmake -i vc|") or die;
+ if ($^O eq 'MSWin32') {
+ if ($targetos =~ /vc/) {
+ open(F, "nmake -i $targetos|") or die;
+ } else {
+ open(F, "make -i $targetos |") or die;
+ }
+ } else {
+ open(F, "make -i $targetos 2>&1 |") or die;
+ }
while (<F>) {
s/$pwd//g;
print;
@@ -370,16 +406,19 @@ if ($gnulikebuild) {
close(F);
}
-my $exe = $gnulikebuild ? "curl" : "curl.exe";
-if (-f "src/$exe") {
- logit "src/curl was created fine ($exe)";
+if (-f "src/curl$binext") {
+ logit "src/curl was created fine (curl$binext)";
} else {
- mydie "src/curl was not created ($exe)";
+ mydie "src/curl was not created (curl$binext)";
}
-logit "display $exe --version output";
+if (defined($targetos) && $targetos =~ /netware/) {
+ #system('../../curlver.sh');
+} else {
+logit "display curl$binext --version output";
-system("./src/$exe --version");
+system("./src/curl$binext --version");
+}
if ($gnulikebuild) {
logit "run make test-full";