hydra-queue-runner: Don't unlock builds we just started

[?]
Jun 7, 2013, 8:10 PM
I7UELKBVDQOL47ZCBLDOLP3KUEFDNCWUPL4K4IG6FDRVVHOBWQ4QC

Dependencies

  • [2] MOX7XJ2E Merge the BuildSchedulingInfo table into the Builds table
  • [3] D6YQQQCN * Don't ignore SIGCHLD after all, Perl doesn't like it. Just do
  • [4] ULHEOJO2 * Better timeout.
  • [5] DQD7JMSU * Fix the terminology.
  • [*] 7YBYT2LQ
  • [*] RWIBJ5L4 * Autoflush stdout.
  • [*] YTESD75Z * Get rid of zombies.
  • [*] TULPZ62Y * Perform builds in parallel.

Change contents

  • edit in src/script/hydra-queue-runner at line 17
    [8.46]
    [9.0]
    my $lastTime;
  • replacement in src/script/hydra-queue-runner at line 31
    [3.116][3.116:320](),[3.320][3.0:63](),[3.63][3.384:489](),[3.384][3.384:489](),[3.489][2.6837:6890]()
    # Work around sqlite locking timeouts: if the child
    # barfed because of a locked DB before updating the
    # `locker' field, then `locker' is still set to $$.
    # So if after a minute it hasn't been updated,
    # unlock the build. !!! need a better fix for those
    # locking timeouts.
    if ($build->starttime + 60 < time) {
    [3.116]
    [3.558]
    if (!defined $lastTime || $build->starttime < $lastTime - 300) {
  • edit in src/script/hydra-queue-runner at line 189
    [3.1644]
    [10.886]
    $lastTime = time();