aboutsummaryrefslogtreecommitdiff
path: root/tests/runtests.pl
diff options
context:
space:
mode:
authorDan Fandrich <dan@coneharvesters.com>2011-12-31 00:49:34 -0800
committerDan Fandrich <dan@coneharvesters.com>2011-12-31 00:49:34 -0800
commit9e3f8c48501920c2c944f7a6eb447849500a3033 (patch)
treeb4d97f7c28e86b31d9b50f7600ca74a65e846c29 /tests/runtests.pl
parent90343c76c6f1517a2d9d3c9e9cea15a1be2bfd6d (diff)
runtests.pl: Use logmsg more consistently
Diffstat (limited to 'tests/runtests.pl')
-rwxr-xr-xtests/runtests.pl15
1 files changed, 7 insertions, 8 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl
index 386ed6faf..6055173c9 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -149,8 +149,8 @@ my $LOGDIR="log";
my $TESTDIR="$srcdir/data";
my $LIBDIR="./libtest";
my $UNITDIR="./unit";
+# TODO: change this to use server_inputfilename()
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
my $FTPDCMD="$LOGDIR/ftpserver.cmd"; # copy ftp server instructions here
my $SERVERLOGS_LOCK="$LOGDIR/serverlogs.lock"; # server logs advisor read lock
@@ -2868,7 +2868,7 @@ sub singletest {
$teststat[$testnum]=$why; # store reason for this test case
if(!$short) {
- printf "test %03d SKIPPED: $why\n", $testnum;
+ logmsg sprintf("test %03d SKIPPED: $why\n", $testnum);
}
timestampskippedevents($testnum);
@@ -2933,9 +2933,8 @@ sub singletest {
chomp $tool;
}
- # remove server output logfiles
+ # remove server output logfile
unlink($SERVERIN);
- unlink($SERVER2IN);
if(@ftpservercmd) {
# write the instructions to file
@@ -3039,7 +3038,7 @@ sub singletest {
}
if(! -f $CMDLINE) {
- print "The tool set in the test case for this: '$tool' does not exist\n";
+ logmsg "The tool set in the test case for this: '$tool' does not exist\n";
timestampskippedevents($testnum);
return -1;
}
@@ -3493,8 +3492,8 @@ sub singletest {
}
else {
if(!$short) {
- printf("\n%s returned $cmdres, when expecting %s\n",
- (!$tool)?"curl":$tool, $errorcode);
+ logmsg sprintf("\n%s returned $cmdres, when expecting %s\n",
+ (!$tool)?"curl":$tool, $errorcode);
}
logmsg " exit FAILED\n";
# timestamp test result verification end
@@ -3585,7 +3584,7 @@ sub singletest {
my $left=sprintf("remaining: %02d:%02d",
$estleft/60,
$estleft%60);
- printf "OK (%-3d out of %-3d, %s)\n", $count, $total, $left;
+ logmsg sprintf("OK (%-3d out of %-3d, %s)\n", $count, $total, $left);
# the test succeeded, remove all log files
if(!$keepoutfiles) {