Add support for stop files, the existence of which signals tbmaster to

skip particular platforms or configs, or simply stop running.
This commit is contained in:
Dag-Erling Smørgrav 2003-09-19 09:15:10 +00:00
parent da4536cd6d
commit 65c0d0bfeb

View File

@ -358,11 +358,19 @@ MAIN:{
die("Where is the tinderbox script?\n");
}
my $stopfile = expand('SANDBOX') . "/stop";
foreach my $branch (@{$CONFIG{'BRANCHES'}}) {
foreach my $platform (@{$CONFIG{'PLATFORMS'}}) {
if (-e $stopfile || -e "$stopfile.$config") {
die("stop file found, aborting\n");
}
my ($arch, $machine) = split('/', $platform, 2);
$machine = $arch
unless defined($machine);
if (-e "$stopfile.$arch" || -e "$stopfile.$arch.$machine") {
warn("stop file for $arch/$machine found, skipping\n");
next;
}
tinderbox($branch, $arch, $machine);
}
}