From fc934d477e8cf645612cf617a8ab8cbf5ebaa336 Mon Sep 17 00:00:00 2001
From: David Faure <faure@kde.org>
Date: Mon, 4 Oct 2010 16:42:53 +0000
Subject: [PATCH] Show the exact number of failing unittests, rather than just
 "Some tests".

svn path=/trunk/KDE/kdesdk/scripts/kdesrc-build; revision=1182459
---
 kdesrc-build | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/kdesrc-build b/kdesrc-build
index d599728..8251518 100755
--- a/kdesrc-build
+++ b/kdesrc-build
@@ -5660,7 +5660,21 @@ sub run_tests
     my $result = log_command($module, 'test-results', [ 'make', 'test' ]);
     if ($result != 0) {
         my $logdir = get_log_dir($module);
-        warning "Some tests failed for y[$module], consult $logdir/test-results.log for info";
+        my $logfile = "$logdir/test-results.log";
+        my $numTests = -1;
+        # Extract the number of failed tests
+        if (open(my $logf, "<$logfile")) {
+           my @lines = <$logf>;
+           my @matches = grep (/failed out of/, @lines);
+           if (scalar(@matches)) {
+               ($numTests) = $matches[0] =~ /([0-9]+) tests failed out of/;
+           }
+        }
+        if ($numTests > -1 ) {
+           warning "\t$numTests tests failed for y[$module], consult $logdir/test-results.log for info";
+        } else {
+           warning "\tSome tests failed for y[$module], consult $logdir/test-results.log for info";
+        }
         return 0;
     } else {
         info "\tAll tests ran successfully.";