grahamc/hydra2 - Change SLBM7H4QGAX5J25YXYZL7APK5Y3TSB4KSWCEJPF3X3KF7UG7Y3GQC

hydra-update-gc-roots: Keep derivations of failed builds

By keeping the derivations of failed builds in the most recent evaluations, we ensure that failed builds can be restarted.

Created by Eelco Dolstra on April 8, 2014

SLBM7H4QGAX5J25YXYZL7APK5Y3TSB4KSWCEJPF3X3KF7UG7Y3GQC

Dependencies

In channels

main

Change contents

Replacement in src/script/hydra-update-gc-roots at line 24 [3.472]

B:BD[3.1073] → [4.17994:18092]

my @columns = ( "id", "project", "jobset", "job", "system", "finished", "drvpath", "timestamp" );

[3.1073]

my @columns = ( "id", "project", "jobset", "job", "system", "finished", "drvpath", "timestamp", "buildstatus" );

Replacement in src/script/hydra-update-gc-roots at line 27 [3.472]
B:BD[5.155] → [5.155:177]
```
    my ($build) = @_;
```
[5.155]
[6.153]
```
    my ($build, $keepFailedDrvs) = @_;
```

Replacement in src/script/hydra-update-gc-roots at line 32 [3.472]

B:BD[7.106] → [4.18124:18365]

    foreach my $out ($build->buildoutputs->all) {
        if (isValidPath($out->path)) {
            addRoot $out->path;
        } else {
            print STDERR "    warning: output ", $out->path, " has disappeared\n" if $build->finished;

[7.106]

[4.18365]

    if ($build->finished && ($build->buildstatus == 0 || $build->buildstatus == 6)) {
        foreach my $out ($build->buildoutputs->all) {
            if (isValidPath($out->path)) {
                addRoot $out->path;
            } else {
                print STDERR "    warning: output ", $out->path, " has disappeared\n" if $build->finished;
            }

Replacement in src/script/hydra-update-gc-roots at line 41 [3.472]

B:BD[6.525] → [6.525:554]

    if (!$build->finished) {

[6.525]

[4.18376]

    if (!$build->finished || ($keepFailedDrvs && $build->buildstatus != 0)) {

Replacement in src/script/hydra-update-gc-roots at line 63 [3.472]

B:BD[2.116] → [2.116:219]

keepBuild $_ foreach $db->resultset('Builds')->search({ finished => 0 }, { columns => [ @columns ] });

[2.116]

[2.219]

keepBuild($_, 0) foreach $db->resultset('Builds')->search({ finished => 0 }, { columns => [ @columns ] });

Replacement in src/script/hydra-update-gc-roots at line 68 [3.472]

B:BD[6.824] → [6.824:887]

keepBuild $_ foreach $db->resultset('Builds')->search_literal(

[6.824]

[4.18577]

keepBuild($_, 0) foreach $db->resultset('Builds')->search_literal(

Replacement in src/script/hydra-update-gc-roots at line 77 [3.472]
B:BD[6.1269] → [6.1269:1305]
```
keepBuild $_ foreach @buildsToKeep;
```
[6.1269]
[3.1148]
```
keepBuild($_, 0) foreach @buildsToKeep;
```

Replacement in src/script/hydra-update-gc-roots at line 112 [3.472]

B:BD[5.798] → [8.0:116]

B:BD[8.116] → [2.1041:1183]

        keepBuild $_ foreach $jobset->builds->search(
            { finished => 1, buildStatus => { -in => [0, 6] }
            , id => { -in => $db->resultset('JobsetEvalMembers')->search({ eval => { -in => [@evals] } }, { select => "build" })->as_query }

[5.798]

[8.146]

        keepBuild($_, 1) foreach $jobset->builds->search(
            { id => { -in => $db->resultset('JobsetEvalMembers')->search({ eval => { -in => [@evals] } }, { select => "build" })->as_query }