Francois Gouget : testbot/Janitor: Clean up obsolete failures.
Alexandre Julliard
julliard at winehq.org
Tue Jun 28 11:49:22 CDT 2022
Module: tools
Branch: master
Commit: 55b455dac141e7fb707d01676e48b7cc8797d2e9
URL: https://source.winehq.org/git/tools.git/?a=commit;h=55b455dac141e7fb707d01676e48b7cc8797d2e9
Author: Francois Gouget <fgouget at codeweavers.com>
Date: Mon Jun 27 19:57:17 2022 +0200
testbot/Janitor: Clean up obsolete failures.
Delete failures that have been marked for deletion once they are no
longer referenced.
Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>
---
testbot/bin/Janitor.pl | 17 +++++++++++++++++
1 file changed, 17 insertions(+)
diff --git a/testbot/bin/Janitor.pl b/testbot/bin/Janitor.pl
index 618c31d0..839e1a94 100755
--- a/testbot/bin/Janitor.pl
+++ b/testbot/bin/Janitor.pl
@@ -43,6 +43,7 @@ $Name0 =~ s+^.*/++;
use File::Path;
use WineTestBot::Config;
+use WineTestBot::Failures;
use WineTestBot::Jobs;
use WineTestBot::Log;
use WineTestBot::Patches;
@@ -193,6 +194,22 @@ if ($JobPurgeDays != 0)
}
}
+# And also failures marked for deletion
+my $Failures = CreateFailures();
+$Failures->AddFilter("BugStatus", ["deleted"]);
+foreach my $Failure (@{$Failures->GetItems()})
+{
+ if ($Failure->TaskFailures->IsEmpty())
+ {
+ $Failures->DeleteItem($Failure);
+ }
+ else
+ {
+ my $TaskFailure = @{$Failure->TaskFailures->GetItems()}[0];
+ Trace "Keeping failure ", $Failure->Id, " for task log ", join("/", $TaskFailure->JobId, $TaskFailure->StepNo, $TaskFailure->TaskNo, $TaskFailure->TaskLog), "\n";
+ }
+}
+
# Purge the deleted VMs if they are not referenced anymore
my $VMs = CreateVMs();
$VMs->AddFilter("Role", ["deleted"]);
More information about the wine-cvs
mailing list