* Don't discard old build steps when restarting a build.

[?]

Mar 16, 2009, 4:56 PM

G5A7TZVIRTVTI7P5SESOC567QEYSM4SKBZJNYHBXNCTUV53WSZIAC

Dependencies

[2] K3EAQY3X * Doh.
[3] A63IHCMX * Register GC roots properly.
[4] AS5PAYLI
[5] NLJJZVHO * Use ->update({...}) properly.
[6] LQNBKF3D
[7] 7YBYT2LQ
[8] D3DIBMOK * For products that are directories (like manuals), allow a default
[9] S3ZLZP3N * Cut off builds after half an hour of apparent inactivity. This
[10] ECBA3GQO * Make the schema class names match the case of the SQL table names.
[11] CLJQCY2X * Store info about all the build actions and allow them to be
[12] BD3GRK4B * Get rid of "positive failures" and separate log phases.
[13] L2E6EVE2 * Merged the Build and Job tables.
[14] 3E6IP3R3 * Add the name of the jobset to ReleaseSetJobs, otherwise we can't

Change contents

edit in src/script/hydra_build.pl at line 78

[3.1163]

[4.5140]

my $buildStepNr = $build->buildsteps->find({},
{select => {max => 'stepnr + 1'}, as => ['max']})->get_column('max') || 1;
replacement in src/script/hydra_build.pl at line 82

[4.5141]→[4.5141:5170](∅→∅)

my $buildStepNr = 1;

[4.5141]

[4.5170]

my %buildSteps;
replacement in src/script/hydra_build.pl at line 97

[4.4388]→[4.4388:4439](∅→∅)

{ stepnr => $buildStepNr++

[4.4388]

[4.5648]

{ stepnr => ($buildSteps{$drvPath} = $buildStepNr++)
replacement in src/script/hydra_build.pl at line 111

[4.6018]→[4.4440:4564](∅→∅),[4.4564]→[4.6208:6246](∅→∅),[4.6208]→[4.6208:6246](∅→∅)

(my $step) = $build->buildsteps->search(
{type => 0, drvpath => $drvPath}, {});
die unless $step;

[4.6018]

[2.145]

my $step = $build->buildsteps->find({stepnr => $buildSteps{$drvPath}}) or die;
replacement in src/script/hydra_build.pl at line 121

[4.6495]→[4.4565:4693](∅→∅),[4.3970]→[4.2610:2643](∅→∅),[4.4693]→[4.2610:2643](∅→∅),[4.6685]→[4.2610:2643](∅→∅)

(my $step) = $build->buildsteps->search(
{type => 0, drvpath => $drvPathStep}, {});
if ($step) {

[4.6495]

[4.541]

if ($buildSteps{$drvPathStep}) {
my $step = $build->buildsteps->find({stepnr => $buildSteps{$drvPathStep}}) or die;
replacement in src/script/hydra_build.pl at line 145

[4.4850]→[4.4850:4901](∅→∅)

{ stepnr => $buildStepNr++

[4.4850]

[4.950]

{ stepnr => ($buildSteps{$outPath} = $buildStepNr++)
replacement in src/script/hydra_build.pl at line 157

[4.1314]→[4.4902:5026](∅→∅),[4.5026]→[4.1466:1504](∅→∅),[4.1466]→[4.1466:1504](∅→∅)

(my $step) = $build->buildsteps->search(
{type => 1, outpath => $outPath}, {});
die unless $step;

[4.1314]

[4.641]

my $step = $build->buildsteps->find({stepnr => $buildSteps{$outPath}}) or die;
replacement in src/script/hydra_build.pl at line 165

[4.1799]→[4.5027:5151](∅→∅),[4.5151]→[4.1951:1989](∅→∅),[4.1951]→[4.1951:1989](∅→∅)

(my $step) = $build->buildsteps->search(
{type => 1, outpath => $outPath}, {});
die unless $step;

[4.1799]

[4.721]

my $step = $build->buildsteps->find({stepnr => $buildSteps{$outPath}}) or die;
replacement in src/script/hydra_build.pl at line 302

[4.935]→[4.3730:3766](∅→∅),[4.8345]→[4.3730:3766](∅→∅)

$build->buildsteps->delete_all;

[4.935]

[4.3766]

$build->buildsteps->search({busy => 1})->delete_all;