runtests.pl: running server checks - commit 4464583a follow-up

Ensure verification takes place with no server commands file.
Ignore verbose setting for running server precheck.
Tweak unresponsive server message, to allow detection by haxx.se scripts.
This commit is contained in:
Yang Tse 2011-10-30 16:45:14 +01:00
parent f5bb370186
commit e2928e1555

View File

@ -1134,16 +1134,19 @@ sub verifyserver {
#
sub responsiveserver {
my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
my $prev_verbose = $verbose;
$verbose = 0;
my $fun = $protofunc{$proto};
my $pid = &$fun($proto, $ipvnum, $idnum, $ip, $port);
$verbose = $prev_verbose;
if($pid > 0) {
return 1; # responsive
}
my $srvrname = servername_str($proto, $ipvnum, $idnum);
logmsg " FAILED running server precheck (unresponsive $srvrname server)\n";
logmsg " server precheck FAILED (unresponsive $srvrname server)\n";
return 0;
}
@ -2778,6 +2781,9 @@ sub singletest {
delete $oldenv{$var};
}
# remove test server commands file before servers are started/verified
unlink($FTPDCMD) if(-f $FTPDCMD);
# timestamp required servers verification start
$timesrvrini{$testnum} = Time::HiRes::time() if($timestats);
@ -3251,7 +3257,7 @@ sub singletest {
}
# remove the test server commands file after each test
unlink($FTPDCMD);
unlink($FTPDCMD) if(-f $FTPDCMD);
# run the postcheck command
my @postcheck= getpart("client", "postcheck");