From: Yang Tse <yangsita@gmail.com>
Date: Sun, 30 Oct 2011 15:45:14 +0000 (+0100)
Subject: runtests.pl: running server checks - commit 4464583a follow-up
X-Git-Tag: curl-7_23_0~25
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=e2928e1555f8eaca440259c7280d2963b12c15bb;p=thirdparty%2Fcurl.git

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.
---

diff --git a/tests/runtests.pl b/tests/runtests.pl
index cadf231634..54eb53951b 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -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");