grahamc/hydra2 - Change VH5ZABDRP565VZIG55YHNYYPST53NQ2J6YM362NSLXCAHI5WPH4AC

Add a page to show the latest evaluations for the entire server

Created by Eelco Dolstra on February 21, 2013

VH5ZABDRP565VZIG55YHNYYPST53NQ2J6YM362NSLXCAHI5WPH4AC

Dependencies

In channels

main

Change contents

Replacement in src/lib/Hydra/Controller/Jobset.pm at line 52 [5.104]

B:BD[4.1] → [3.0:53]

    $c->stash->{evals} = getEvals($self, $c, 0, 10);

[4.1]

[6.4]

    $c->stash->{evals} = getEvals($self, $c, scalar $c->stash->{jobset}->jobsetevals, 0, 10);

Deletion in src/lib/Hydra/Controller/Jobset.pm at line 303 [5.104]

∅:D[7.608] → [8.53:113]

B:BD[9.1555] → [8.53:113]

B:BD[8.113] → [10.1996:1997]

∅:D[10.1997] → [11.58:116]

B:BD[11.58] → [11.58:116]

B:BD[11.116] → [10.1998:2029]

∅:D[10.2029] → [12.0:74]

B:BD[8.200] → [12.0:74]

∅:D[12.74] → [11.158:177]

B:BD[11.158] → [11.158:177]

B:BD[11.177] → [13.0:25]

B:BD[13.25] → [12.75:89]

∅:D[12.89] → [13.25:78]

B:BD[13.25] → [13.25:78]

∅:D[13.78] → [11.258:288]

B:BD[11.258] → [11.258:288]

B:BD[11.288] → [12.90:126]

B:BD[12.126] → [14.0:439]

∅:D[12.343] → [11.323:381]

∅:D[14.439] → [11.323:381]

B:BD[11.323] → [11.323:381]

B:BD[11.381] → [13.79:137]

B:BD[13.137] → [15.0:139]

∅:D[15.139] → [13.138:177]

B:BD[11.572] → [13.138:177]

∅:D[13.177] → [11.948:1201]

B:BD[8.958] → [11.948:1201]

B:BD[11.1201] → [10.2030:2186]

∅:D[16.157] → [15.265:389]

∅:D[10.2186] → [15.265:389]

B:BD[15.265] → [15.265:389]

∅:D[17.122] → [11.1323:1333]

∅:D[15.389] → [11.1323:1333]

B:BD[11.1323] → [11.1323:1333]

B:BD[11.1333] → [13.178:212]

B:BD[13.212] → [12.344:345]

B:BD[12.345] → [10.2187:2203]

∅:D[12.362] → [13.232:259]

∅:D[10.2203] → [13.232:259]

B:BD[13.232] → [13.232:259]

B:BD[12.399] → [12.399:483]

B:BD[12.483] → [14.440:511]

∅:D[14.511] → [12.549:627]

B:BD[12.549] → [12.549:627]

∅:D[12.627] → [13.368:433]

B:BD[13.368] → [13.368:433]

B:BD[13.433] → [12.628:685]

∅:D[13.433] → [11.1465:1471]

∅:D[12.685] → [11.1465:1471]

B:BD[11.1465] → [11.1465:1471]

B:BD[11.1471] → [10.2204:2205]

∅:D[10.2205] → [12.686:713]

B:BD[11.1476] → [12.686:713]

}
sub getEvals {
    my ($self, $c, $offset, $rows) = @_;
    my @evals = $c->stash->{jobset}->jobsetevals->search(
        { hasnewbuilds => 1 },
        { order_by => "id DESC", rows => $rows + 1, offset => $offset });
    my @res = ();
    my $prevInputs = [];
    my $prev;
    for (my $n = scalar @evals - 1; $n >= 0; $n--) {
        my $cur = $evals[$n];
        # Get stats for this eval.
        my $nrScheduled;
        my $nrSucceeded = $cur->nrsucceeded;
        if (defined $nrSucceeded) {
            $nrScheduled = 0;
        } else {
            $nrScheduled = $cur->builds->search({finished => 0})->count;
            $nrSucceeded = $cur->builds->search({finished => 1, buildStatus => 0})->count;
            if ($nrScheduled == 0) {
                $cur->update({nrsucceeded => $nrSucceeded});
            }
        }
        # Compute what inputs changed between each eval.
        my $curInputs = [ $cur->jobsetevalinputs->search(
            { -or => [ -and => [ uri => { '!=' => undef }, revision => { '!=' => undef }], dependency => { '!=' => undef }], altNr => 0 },
            { order_by => "name" }) ];
        my @changedInputs;
        my %prevInputsHash;
        $prevInputsHash{$_->name} = $_ foreach @{$prevInputs};
        foreach my $input (@{$curInputs}) {
            my $p = $prevInputsHash{$input->name};
            push @changedInputs, $input
                if !defined $p || ($input->revision || "") ne ($p->revision || "") || $input->type ne $p->type || ($input->uri || "") ne ($p->uri || "") ||
                   ( defined $input->dependency && defined $p->dependency && $input->dependency->id ne $p->dependency->id);
        }
        $prevInputs = $curInputs;
        my $e =
            { eval => $cur
            , nrScheduled => $nrScheduled
            , nrSucceeded => $nrSucceeded
            , nrFailed => $cur->nrbuilds - $nrSucceeded - $nrScheduled
            , diff => defined $prev ? $nrSucceeded - $prev->{nrSucceeded} : 0
            , changedInputs => [ @changedInputs ]
            };
        push @res, $e if $n < $rows;
        $prev = $e;
    }
    return [reverse @res];

Replacement in src/lib/Hydra/Controller/Jobset.pm at line 309 [5.104]
B:BD[18.123] → [18.123:170]
```
    $c->stash->{template} = 'jobset-evals.tt';
```
[18.123]
[9.1562]
```
    $c->stash->{template} = 'evals.tt';
```
Insertion in src/lib/Hydra/Controller/Jobset.pm at line 314 [5.104]
[18.257]
[9.1564]
```
    my $evals = $c->stash->{jobset}->jobsetevals;
```

Replacement in src/lib/Hydra/Controller/Jobset.pm at line 319 [5.104]

B:BD[18.340] → [18.340:436]

B:BD[18.436] → [11.1496:1589]

    $c->stash->{total} = $c->stash->{jobset}->jobsetevals->search({hasnewbuilds => 1})->count;
    $c->stash->{evals} = getEvals($self, $c, ($page - 1) * $resultsPerPage, $resultsPerPage)

[18.340]

[18.1296]

    $c->stash->{total} = $evals->search({hasnewbuilds => 1})->count;
    $c->stash->{evals} = getEvals($self, $c, $evals, ($page - 1) * $resultsPerPage, $resultsPerPage)

Insertion in src/lib/Hydra/Controller/Root.pm at line 281 [20.804]

[19.416]

}
sub evals :Local Args(0) {
    my ($self, $c) = @_;
    $c->stash->{template} = 'evals.tt';
    my $page = int($c->req->param('page') || "1") || 1;
    my $resultsPerPage = 20;
    my $evals = $c->model('DB::JobsetEvals');
    $c->stash->{page} = $page;
    $c->stash->{resultsPerPage} = $resultsPerPage;
    $c->stash->{total} = $evals->search({hasnewbuilds => 1})->count;
    $c->stash->{evals} = getEvals($self, $c, $evals, ($page - 1) * $resultsPerPage, $resultsPerPage)

Replacement in src/lib/Hydra/Helper/Nix.pm at line 18 [22.436]
B:BD[21.9497] → [21.9497:9517]
```
    getMainOutput);
```
[21.9497]
[23.77]
```
    getMainOutput
    getEvals);
```

Insertion in src/lib/Hydra/Helper/Nix.pm at line 288 [22.436]

[21.9702]

}
sub getEvals {
    my ($self, $c, $evals, $offset, $rows) = @_;
    my @evals = $evals->search(
        { hasnewbuilds => 1 },
        { order_by => "id DESC", rows => $rows + 1, offset => $offset });
    my @res = ();
    my $prevInputs = [];
    my $prev;
    for (my $n = scalar @evals - 1; $n >= 0; $n--) {
        my $cur = $evals[$n];
        # Get stats for this eval.
        my $nrScheduled;
        my $nrSucceeded = $cur->nrsucceeded;
        if (defined $nrSucceeded) {
            $nrScheduled = 0;
        } else {
            $nrScheduled = $cur->builds->search({finished => 0})->count;
            $nrSucceeded = $cur->builds->search({finished => 1, buildStatus => 0})->count;
            if ($nrScheduled == 0) {
                $cur->update({nrsucceeded => $nrSucceeded});
            }
        }
        # Compute what inputs changed between each eval.
        my $curInputs = [ $cur->jobsetevalinputs->search(
            { -or => [ -and => [ uri => { '!=' => undef }, revision => { '!=' => undef }], dependency => { '!=' => undef }], altNr => 0 },
            { order_by => "name" }) ];
        my @changedInputs;
        my %prevInputsHash;
        $prevInputsHash{$_->name} = $_ foreach @{$prevInputs};
        foreach my $input (@{$curInputs}) {
            my $p = $prevInputsHash{$input->name};
            push @changedInputs, $input
                if !defined $p || ($input->revision || "") ne ($p->revision || "") || $input->type ne $p->type || ($input->uri || "") ne ($p->uri || "") ||
                   ( defined $input->dependency && defined $p->dependency && $input->dependency->id ne $p->dependency->id);
        }
        $prevInputs = $curInputs;
        my $e =
            { eval => $cur
            , nrScheduled => $nrScheduled
            , nrSucceeded => $nrSucceeded
            , nrFailed => $cur->nrbuilds - $nrSucceeded - $nrScheduled
            , diff => defined $prev ? $nrSucceeded - $prev->{nrSucceeded} : 0
            , changedInputs => [ @changedInputs ]
            };
        push @res, $e if $n < $rows;
        $prev = $e;
    }
    return [reverse @res];

Insertion in src/root/common.tt at line 387 [25.2803]

[24.9786]

        [% IF !jobset %]
          <th>Jobset</th>
        [% END %]

Replacement in src/root/common.tt at line 391 [25.2803]
B:BD[24.9805] → [24.9805:9827]
```
        <th>Date</th>
```
[24.9805]
[24.9827]
```
        <th style="width: 10em">Date</th>
```

Replacement in src/root/common.tt at line 393 [25.2803]

B:BD[24.9858] → [24.9858:9895]

        <th colspan='2'>Success</th>

[24.9858]

[24.9895]

        <th colspan='2' style="width: 25em">Success</th>

Insertion in src/root/common.tt at line 401 [25.2803]

[24.10056]

[26.277]

          [% IF !jobset %]
            <td>[% INCLUDE renderFullJobsetName project=eval.get_column('project') jobset=eval.get_column('jobset') %]</td>
          [% END %]

Replacement in src/root/common.tt at line 411 [25.2803]
B:BD[24.10420] → [24.10420:10445]
```
                sep=',';
```
[24.10420]
[24.10445]
```
                sep=', ';
```
Deletion in src/root/error.tt at line 3 [20.8490]
∅:D[27.1258] → [20.8554:8555]
∅:D[28.7190] → [20.8554:8555]
B:BD[20.8554] → [20.8554:8555]
B:BD[20.8555] → [29.11465:11525]
```
<p>I'm very sorry, but the following error(s) occurred:</p>
```
Deletion in src/root/error.tt at line 4 [20.8490]
B:BD[29.11526] → [29.11526:11531]
```
<ul>
```

Replacement in src/root/error.tt at line 5 [20.8490]

B:BD[29.11561] → [29.11561:11624]

<li><div class="error-msg">[% HTML.escape(error) %]</div></li>

[29.11561]

[29.11624]

   <div class="alert alert-error">[% HTML.escape(error) %]</div>

Deletion in src/root/error.tt at line 7 [20.8490]
B:BD[29.11634] → [29.11634:11640]
```
</ul>
```
File move: jobset-evals.tt → evals.tt
BF:BFD[30.1486] → [18.7904:7943]
BF:BF[18.7943] → [18.6334:6334]
[30.1486]
[18.6334]

Replacement in src/root/evals.tt at line 1 [18.6334]

B:BD[18.6334] → [31.2155:2236]

[% WRAPPER layout.tt title="Evaluations of jobset $project.name:$jobset.name" %]

[18.6334]

[18.6419]

[% WRAPPER layout.tt title=(jobset ? "Evaluations of jobset $project.name:$jobset.name" : "Latest evaluations") %]

Insertion in src/root/topbar.tt at line 40 [32.6671]

[2.480]

       uri = c.uri_for(c.controller('Root').action_for('evals'))
       title = "Latest evaluations" %]
    [% INCLUDE makeLink

Add a page to show the latest evaluations for the entire server

Dependencies

In channels

Change contents

Replacement in src/lib/Hydra/Controller/Jobset.pm at line 52 [5.104]

Deletion in src/lib/Hydra/Controller/Jobset.pm at line 303 [5.104]

Replacement in src/lib/Hydra/Controller/Jobset.pm at line 309 [5.104]

Insertion in src/lib/Hydra/Controller/Jobset.pm at line 314 [5.104]

Replacement in src/lib/Hydra/Controller/Jobset.pm at line 319 [5.104]

Insertion in src/lib/Hydra/Controller/Root.pm at line 281 [20.804]

Replacement in src/lib/Hydra/Helper/Nix.pm at line 18 [22.436]

Insertion in src/lib/Hydra/Helper/Nix.pm at line 288 [22.436]

Insertion in src/root/common.tt at line 387 [25.2803]

Replacement in src/root/common.tt at line 391 [25.2803]

Replacement in src/root/common.tt at line 393 [25.2803]

Insertion in src/root/common.tt at line 401 [25.2803]

Replacement in src/root/common.tt at line 411 [25.2803]

Deletion in src/root/error.tt at line 3 [20.8490]

Deletion in src/root/error.tt at line 4 [20.8490]

Replacement in src/root/error.tt at line 5 [20.8490]

Deletion in src/root/error.tt at line 7 [20.8490]

File move: jobset-evals.tt → evals.tt

Replacement in src/root/evals.tt at line 1 [18.6334]

Insertion in src/root/topbar.tt at line 40 [32.6671]