mirror of
https://github.com/moparisthebest/curl
synced 2024-12-21 23:58:49 -05:00
now counts all test cases and presents a counter at the end
This commit is contained in:
parent
b2f0ca8a43
commit
0d7ba0ec61
@ -346,6 +346,7 @@ sub singletest {
|
||||
|
||||
if(! -r $CURLCMD) {
|
||||
# this is not a test
|
||||
print "$NUMBER doesn't look like a test case!\n";
|
||||
next;
|
||||
}
|
||||
|
||||
@ -606,7 +607,7 @@ runftpserver($verbose);
|
||||
if ( $TESTCASES eq "all") {
|
||||
# Get all commands and find out their test numbers
|
||||
opendir(DIR, $TESTDIR) || die "can't opendir $TESTDIR: $!";
|
||||
my @cmds = grep { /^command/ && -f "$TESTDIR/$_" } readdir(DIR);
|
||||
my @cmds = grep { /^command([0-9]+).txt/ && -f "$TESTDIR/$_" } readdir(DIR);
|
||||
closedir DIR;
|
||||
|
||||
$TESTCASES=""; # start with no test cases
|
||||
@ -632,13 +633,20 @@ open(CMDLOG, ">$CURLLOG") ||
|
||||
#
|
||||
|
||||
my $testnum;
|
||||
my $ok=0;
|
||||
my $total=0;
|
||||
foreach $testnum (split(" ", $TESTCASES)) {
|
||||
|
||||
if(singletest($testnum) && !$anyway) {
|
||||
$total++;
|
||||
my $error = singletest($testnum);
|
||||
if($error && !$anyway) {
|
||||
# a test failed, abort
|
||||
print "\n - abort tests\n";
|
||||
last;
|
||||
}
|
||||
elsif(!$error) {
|
||||
$ok++;
|
||||
}
|
||||
|
||||
# loop for next test
|
||||
}
|
||||
@ -655,3 +663,4 @@ close(CMDLOG);
|
||||
stopserver($FTPPIDFILE);
|
||||
stopserver($PIDFILE);
|
||||
|
||||
print "$ok tests out of $total reported OK\n";
|
||||
|
Loading…
Reference in New Issue
Block a user