templates/history.tt

   1 [%#
   2
   3 Copyright (c) 2003-2010, Andrew Dunstan
   4
   5 See accompanying License file for license details
   6
   7 -%]
   8 [%- BLOCK cl %] class="[% SWITCH bgfor -%]
   9   [%- CASE 'OK' %]pass[% CASE 'ContribCheck' %]warn[% CASE [ 'Check' 'InstallCheck' ] %]warnx[% CASE %]fail[% END %]"
  10 [%- END -%]
  11 [% WRAPPER 'page.tt'
  12         title = 'Exim BuildFarm History'
  13         bodyclass = 'history'
  14         pagebutton = 'none'
  15 %]
  16 <h1>Exim BuildFarm Status History</h1>
  17   <table cellspacing="0">
  18     <tr><th class="head" colspan="3">System Detail</th></tr>
  19     <tr class="member"><th>Farm member</th><td>[% member %]</td></tr>
  20     <tr><th>OS</th><td>[% statrows.0.operating_system %] [% statrows.0.os_version %]</td></tr>
  21     <tr><th>Compiler</th><td>[% statrows.0.compiler %] [% statrows.0.compiler_version %]</td></tr>
  22     <tr><th>Architecture</th><td>[% statrows.0.architecture %]</td></tr>
  23     <tr><th>Owner</th><td>[% statrows.0.owner_email %]</td></tr>
  24   </table>
  25 [% IF statrows.0.sys_notes %]
  26     <br />
  27     <table>
  28      <tr>
  29        <th class="head" rowspan="2">System Notes</th>
  30        <th>Date</th>
  31        <th>Notes</th>
  32      </tr>
  33      <tr>
  34       <td>[% statrows.0.sys_notes_date %]</td>
  35       <td>[% statrows.0.sys_notes %]</td>
  36      </tr>
  37    </table>
  38 [% END %]
  39   <h3>Branch: [% branch %][% IF statrows.size >= hm %] (last [% hm %] entries shown)[% END %]</h3>
  40 [% BLOCK stdet %]
  41     <tr [% PROCESS cl bgfor=row.stage %]>
  42       <td>[%- row.when_ago | replace('\s','&nbsp;') %]&nbsp;ago&nbsp;</td>
  43       <td class="status">[% row.stage -%]</td>
  44       <td class="status"><a href="show_log.pl?nm=
  45                [%- row.sysname %]&amp;dt=
  46                [%- row.snapshot | uri %]">
  47                 [%- IF row.stage != 'OK' %]Details[% ELSE %]Config[% END -%]</a></td>
  48
  49     </tr>
  50 [% END %]
  51 <table border="0"> <tr>
  52   [% FOREACH offset IN [0,1,2] %][% low = offset * statrows.size / 3 ; high = -1 + (offset + 1) * statrows.size / 3 %]
  53     [% TRY %][% PERL %]
  54       use POSIX qw(floor);
  55       $stash->set(low => floor($stash->get('low')));
  56       $stash->set(high => floor($stash->get('high')));
  57     [% END %][% CATCH %]<!-- [% error.info %] --> [% END %]
  58     <td><table cellspacing="0">
  59         [% FOREACH xrow IN statrows.slice(low,high) %][% PROCESS stdet row=xrow %][% END %]
  60     </table></td>
  61   [% END %]
  62 </table>
  63 [% END %]