diff options
author | Dan Fandrich <dan@coneharvesters.com> | 2011-12-31 00:49:34 -0800 |
---|---|---|
committer | Dan Fandrich <dan@coneharvesters.com> | 2011-12-31 00:49:34 -0800 |
commit | 9e3f8c48501920c2c944f7a6eb447849500a3033 (patch) | |
tree | b4d97f7c28e86b31d9b50f7600ca74a65e846c29 /tests/runtests.pl | |
parent | 90343c76c6f1517a2d9d3c9e9cea15a1be2bfd6d (diff) |
runtests.pl: Use logmsg more consistently
Diffstat (limited to 'tests/runtests.pl')
-rwxr-xr-x | tests/runtests.pl | 15 |
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) { |