[PATCH] testbot: Return log access errors in the BadLog field for ParseWineTestRepor().

[Francois Gouget]

This makes diagnosis easier for the ParseWineTestRepor() callers and
matches ParseTaskLog().

Signed-off-by: Francois Gouget <fgouget(a)codeweavers.com>
---
 testbot/bin/UpdateTaskLogs          | 5 +----
 testbot/bin/WineRunTask.pl          | 6 +++---
 testbot/bin/WineRunWineTest.pl      | 6 +++---
 testbot/lib/WineTestBot/LogUtils.pm | 5 ++++-
 4 files changed, 11 insertions(+), 11 deletions(-)

diff --git a/testbot/bin/UpdateTaskLogs b/testbot/bin/UpdateTaskLogs
index 00a6f23223..f5205f23d8 100755
--- a/testbot/bin/UpdateTaskLogs
+++ b/testbot/bin/UpdateTaskLogs
@@ -191,10 +191,7 @@ sub BuildErrFile($$$$)
   my $TaskKey = Path2TaskKey($Dir);
 
   my $LogInfo = ParseWineTestReport("$Dir/$ReportName", $IsWineTest, $TaskTimedOut);
-  if (!defined $LogInfo->{Failures} and @{$LogInfo->{Extra}} == 1)
-  {
-    return "$TaskKey: $LogInfo->{Extra}->[0]";
-  }
+  return "$TaskKey: $LogInfo->{BadLog}" if (defined $LogInfo->{BadLog});
   return undef if (!@{$LogInfo->{Extra}});
 
   Debug("$TaskKey: Creating $ReportName.err\n");
diff --git a/testbot/bin/WineRunTask.pl b/testbot/bin/WineRunTask.pl
index 3044cd76bd..7c8c5704fe 100755
--- a/testbot/bin/WineRunTask.pl
+++ b/testbot/bin/WineRunTask.pl
@@ -558,12 +558,12 @@ if ($TA->GetFile($RptFileName, "$TaskDir/$RptFileName"))
 
   my $LogInfo = ParseWineTestReport("$TaskDir/$RptFileName", $IsWineTest, $TaskTimedOut);
   $TaskTimedOut = 1 if ($LogInfo->{TestUnitCount} == $LogInfo->{TimeoutCount});
-  if (!defined $LogInfo->{Failures} and @{$LogInfo->{Extra}} == 1)
+  if (defined $LogInfo->{BadLog})
   {
     # Could not open the file
     $NewStatus = 'boterror';
-    Error "$LogInfo->{Extra}->[0]\n";
-    LogTaskError("$LogInfo->{Extra}->[0]\n");
+    Error "$LogInfo->{BadLog}\n";
+    LogTaskError("$LogInfo->{BadLog}\n");
   }
   else
   {
diff --git a/testbot/bin/WineRunWineTest.pl b/testbot/bin/WineRunWineTest.pl
index 696e27e7a8..6ca1d284fe 100755
--- a/testbot/bin/WineRunWineTest.pl
+++ b/testbot/bin/WineRunWineTest.pl
@@ -580,12 +580,12 @@ foreach my $Mission (@{$TaskMissions->{Missions}})
 
     my $LogInfo = ParseWineTestReport("$TaskDir/$RptFileName", $Step->FileType eq "patch", $TaskTimedOut);
     $TaskTimedOut = 1 if ($LogInfo->{TestUnitCount} == $LogInfo->{TimeoutCount});
-    if (!defined $LogInfo->{Failures} and @{$LogInfo->{Extra}} == 1)
+    if (defined $LogInfo->{BadLog})
     {
       # Could not open the file
       $NewStatus = 'boterror';
-      Error "$LogInfo->{Extra}->[0]\n";
-      LogTaskError("$LogInfo->{Extra}->[0]\n");
+      Error "$LogInfo->{BadLog}\n";
+      LogTaskError("$LogInfo->{BadLog}\n");
     }
     else
     {
diff --git a/testbot/lib/WineTestBot/LogUtils.pm b/testbot/lib/WineTestBot/LogUtils.pm
index 96840eba58..9aa2e81c70 100644
--- a/testbot/lib/WineTestBot/LogUtils.pm
+++ b/testbot/lib/WineTestBot/LogUtils.pm
@@ -353,6 +353,9 @@ The number of failed tests.
 =item Extra
 An array containing the extra errors detected during the inconsistency check.
 
+=item BadLog
+Contains an error message if the report could not be read.
+
 =back
 =back
 =cut
@@ -365,7 +368,7 @@ sub ParseWineTestReport($$$)
   if (!open($LogFile, "<", $FileName))
   {
     my $LogName = basename($FileName);
-    return {Extra => ["Unable to open '$LogName' for reading: $!"]};
+    return {BadLog => "Unable to open '$LogName' for reading: $!"};
   }
 
   my $LogInfo = {
-- 
2.20.1