aboutsummaryrefslogtreecommitdiff
path: root/tests/runtests.pl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/runtests.pl')
-rwxr-xr-xtests/runtests.pl5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl
index c7bdcb760..3cdadd6e9 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -231,6 +231,7 @@ my %doesntrun; # servers that don't work, identified by pidfile
my $torture;
my $tortnum;
my $tortalloc;
+my $testnumrequiringthis;
# open and close each time to allow removal at any time
sub logmsg {
@@ -988,6 +989,7 @@ sub runftpserver {
# it is NOT alive
logmsg "RUN: failed to start the FTP$id$nameext server\n";
stopserver("$pid2");
+ displaylogs($testnumrequiringthis) if($testnumrequiringthis == 100);
$doesntrun{$pidfile} = 1;
return (0,0);
}
@@ -998,6 +1000,7 @@ sub runftpserver {
logmsg "RUN: FTP$id$nameext server failed verification\n";
# failed to talk to it properly. Kill the server and return failure
stopserver("$ftppid $pid2");
+ displaylogs($testnumrequiringthis) if($testnumrequiringthis == 100);
$doesntrun{$pidfile} = 1;
return (0,0);
}
@@ -1740,6 +1743,8 @@ sub singletest {
my %feature;
my $cmd;
+ $testnumrequiringthis = $testnum;
+
# load the test case file definition
if(loadtest("${TESTDIR}/test${testnum}")) {
if($verbose) {