File Coverage

root/tapper/testruns/testrun_overview.mas
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             <%args>
2             $overview
3             </%args>
4 1     1   7245 % use File::Basename;
  1         4  
  1         688  
5             % if ($overview) {
6             <h4>Testrun Specification</h4>
7             <table class="reportsectionmeta">
8             <tbody>
9             <tr>
10             <td><h5>Name</h5></td>
11             <td><% ucfirst($overview->{name} || '') %></td>
12             </tr>
13             % if ($overview->{shortname}) {
14             <tr>
15             <td><h5>Short name</h5></td>
16             <td><% $overview->{shortname} %></td>
17             </tr>
18             % }
19             <tr>
20             <td colspan="2"><h5>Host</h5></td>
21             </tr>
22             % if ($overview->{arch}) {
23             <tr>
24             <th>Architecture</th>
25             <td><% $overview->{arch} %></td>
26             </tr>
27             % }
28             % if ($overview->{image}) {
29             <tr>
30             <th>Root image</th>
31             <td><% $overview->{image} %></td>
32             </tr>
33             % }
34             % if ($overview->{xen_package}) {
35             <tr>
36             <th>Xen package</th>
37             <td><% basename($overview->{xen_package}) %></td>
38             </tr>
39             % }
40             % if (@{$overview->{test} || []}) {
41             <tr>
42             <th>Tests</th>
43             <td>
44             % foreach my $test (@{$overview->{test}}) {
45             <% $test %>
46             <br/>
47             % }
48             </td>
49             </tr>
50             % }
51             % for(my $i = 0; $i <= $#{$overview->{guests}}; $i++) {
52             % my $guest_overview = $overview->{guests}->[$i];
53             <td colspan="2"><h5>Guest number <% $i+1 %></h5></td>
54             <tr>
55             <th>Architecture</th>
56             <td><% $guest_overview->{arch} || '' %></td>
57             </tr>
58             <tr>
59             <th>Root image</th>
60             <td><% $guest_overview->{image} || '' %></td>
61             </tr>
62             % if (@{$guest_overview->{test} || []}) {
63             <tr>
64             <th>Tests</th>
65             <td>
66             % foreach my $test (@{$guest_overview->{test}}) {
67             <% $test %>
68             <br/>
69             % }
70             </td>
71             </tr>
72             % }
73             % }
74             </tbody>
75             </table>
76             <br/>
77             % }