mirror/curl
2
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2024-11-21 01:16:58 +08:00
Code Issues Packages Projects Releases Wiki Activity

Improve chance of running runtests.pl from outside the

Browse Source 
source tree 'tests' directory
This commit is contained in:
Yang Tse 2007-11-23 04:03:46 +00:00
parent 6efb6addf2
commit 8f1829d1d2
5 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/data/test1013
View File

@ -23,7 +23,7 @@ Compare curl --version with curl-config --protocols
--version
</command>
<postcheck>
%SRCDIR/libtest/test1013.pl ../curl-config log/stdout1013 protocols
%SRCDIR/libtest/test1013.pl %SRCDIR/../curl-config log/stdout1013 protocols
</postcheck>
</client>

2
tests/data/test1014
View File

@ -23,7 +23,7 @@ Compare curl --version with curl-config --features
--version
</command>
<postcheck>
%SRCDIR/libtest/test1013.pl ../curl-config log/stdout1014 features
%SRCDIR/libtest/test1013.pl %SRCDIR/../curl-config log/stdout1014 features
</postcheck>
</client>

6
tests/ftpserver.pl
View File

@ -163,7 +163,7 @@ sub sysread_or_die {
}
sub startsf {
my $cmd="./server/sockfilt --port $port --logfile log/sockctrl$ftpdnum$ext.log --pidfile .sockfilt$ftpdnum$ext.pid $ipv6";
my $cmd="$srcdir/server/sockfilt --port $port --logfile log/sockctrl$ftpdnum$ext.log --pidfile .sockfilt$ftpdnum$ext.pid $ipv6";
$sfpid = open2(*SFREAD, *SFWRITE, $cmd);
print STDERR "$cmd\n" if($verbose);
@ -548,7 +548,7 @@ sub PASV_command {
# We fire up a new sockfilt to do the data transfer for us.
$slavepid = open2(\*DREAD, \*DWRITE,
"./server/sockfilt --port 0 --logfile log/sockdata$ftpdnum$ext.log --pidfile $pidf $ipv6");
"$srcdir/server/sockfilt --port 0 --logfile log/sockdata$ftpdnum$ext.log --pidfile $pidf $ipv6");
print DWRITE "PING\n";
my $pong;
@ -680,7 +680,7 @@ sub PORT_command {
# We fire up a new sockfilt to do the data transfer for us.
# FIX: make it use IPv6 if need be
my $filtcmd="./server/sockfilt --connect $port --addr $addr --logfile log/sockdata$ftpdnum$ext.log --pidfile .sockdata$ftpdnum$ext.pid $ipv6";
my $filtcmd="$srcdir/server/sockfilt --connect $port --addr $addr --logfile log/sockdata$ftpdnum$ext.log --pidfile .sockdata$ftpdnum$ext.pid $ipv6";
$slavepid = open2(\*DREAD, \*DWRITE, $filtcmd);
print STDERR "$filtcmd\n" if($verbose);

6
tests/httpserver.pl
View File

@ -4,7 +4,7 @@ use strict;
my $verbose=0; # set to 1 for debugging
my $dir=".";
my $srcdir=".";
my $port = 8999; # just a default
my $ipv6;
my $pid=".http.pid"; # name of the pidfile
@ -14,7 +14,7 @@ do {
$verbose=1;
}
elsif($ARGV[0] eq "-d") {
$dir=$ARGV[1];
$srcdir=$ARGV[1];
shift @ARGV;
}
elsif($ARGV[0] eq "-p") {
@ -33,4 +33,4 @@ do {
}
} while(shift @ARGV);
exec("server/sws --pidfile $pid$fork $ipv6$port $dir");
exec("$srcdir/server/sws --pidfile $pid$fork $ipv6$port $srcdir");

8
tests/runtests.pl
View File

@ -86,11 +86,11 @@ my $SSHPORT; # SCP/SFTP
my $SOCKSPORT; # SOCKS4/5 port
my $srcdir = $ENV{'srcdir'} || '.';
my $CURL="../src/curl"; # what curl executable to run on the tests
my $DBGCURL=$CURL; #"../src/.libs/curl"; # alternative for debugging
my $CURL="$srcdir/../src/curl"; # what curl executable to run on the tests
my $DBGCURL=$CURL; #"$srcdir/../src/.libs/curl"; # alternative for debugging
my $LOGDIR="log";
my $TESTDIR="$srcdir/data";
my $LIBDIR="./libtest";
my $LIBDIR="$srcdir/libtest";
my $SERVERIN="$LOGDIR/server.input"; # what curl sent the server
my $SERVER2IN="$LOGDIR/server2.input"; # what curl sent the second server
my $CURLLOG="$LOGDIR/curl.log"; # all command lines run
@ -1000,7 +1000,7 @@ sub runtftpserver {
if($ipv6) {
$flag .="--ipv6 ";
}
$cmd="./server/tftpd --pidfile $pidfile $flag $port";
$cmd="$srcdir/server/tftpd --pidfile $pidfile $flag $port";
unlink($pidfile);