aboutsummaryrefslogtreecommitdiffstats
path: root/ulri
diff options
context:
space:
mode:
Diffstat (limited to 'ulri')
-rwxr-xr-xulri6
1 files changed, 3 insertions, 3 deletions
diff --git a/ulri b/ulri
index 532cb36..ee08226 100755
--- a/ulri
+++ b/ulri
@@ -276,12 +276,12 @@ foreach my $prefix (keys %pkg_tree) {
my $status_file = "$prefix_dir/log/status.log";
plog('INFO', "check status: $host/$arch ($bot [$pid])");
+ my $timeout = (time()-$time) > $config->{faildelay};
my $status = sout($remote, "cat $status_file");
if ($? == 255) {
plog('WARN', "failed to get status for $host/$arch");
- # TODO Check for timeout, else we may have packages stuck forever
- # when losing a machine.
- next bot;
+ # If we are already out of time, we should fail anyway
+ next bot unless $timeout;
}
my $proc_state;