241 # PRINT HTML SUMMARY |
241 # PRINT HTML SUMMARY |
242 my $aggregated_html = "$outputdir/index.html"; |
242 my $aggregated_html = "$outputdir/index.html"; |
243 open(AGGREGATED, ">$aggregated_html"); |
243 open(AGGREGATED, ">$aggregated_html"); |
244 print AGGREGATED "RAPTOR BUILD SUMMARY<br/><br/>\n"; |
244 print AGGREGATED "RAPTOR BUILD SUMMARY<br/><br/>\n"; |
245 |
245 |
246 my $allfilesstring = ''; |
|
247 for my $raptorfile (sort {$a cmp $b} @logfiles) { $allfilesstring .= ", $raptorfile"; } |
|
248 $allfilesstring =~ s/^, //; |
|
249 print AGGREGATED "PARSED LOGS: $allfilesstring<br/>\n"; |
|
250 |
|
251 my $allconfigsstring = ''; |
246 my $allconfigsstring = ''; |
252 for my $raptorconfig (sort {$a cmp $b} keys %{$allconfigs}) { $allconfigsstring .= ", $raptorconfig"; } |
247 for my $raptorconfig (sort {$a cmp $b} keys %{$allconfigs}) { $allconfigsstring .= ", $raptorconfig"; } |
253 $allconfigsstring =~ s/^, //; |
248 $allconfigsstring =~ s/^, //; |
254 print AGGREGATED "BUILT CONFIGS: $allconfigsstring<br/><br/>\n"; |
249 print AGGREGATED "BUILT CONFIGS:<br/>$allconfigsstring<br/>\n"; |
255 |
250 |
256 print AGGREGATED "<br/>GENERAL FAILURES<br/>\n"; |
251 print AGGREGATED "<br/>GENERAL FAILURES<br/>\n"; |
257 print AGGREGATED "<table border='1'>\n"; |
252 print AGGREGATED "<table border='1'>\n"; |
258 my $tableheader = "<tr><th>category</th>"; |
253 my $tableheader = "<tr><th>category</th>"; |
259 for (@severities) { $tableheader .= "<th>$_</th>"; } |
254 for (@severities) { $tableheader .= "<th>$_</th>"; } |
309 $packageline .= "</tr>\n"; |
304 $packageline .= "</tr>\n"; |
310 print AGGREGATED "$packageline\n"; |
305 print AGGREGATED "$packageline\n"; |
311 } |
306 } |
312 } |
307 } |
313 print AGGREGATED "</table>\n"; |
308 print AGGREGATED "</table>\n"; |
|
309 print AGGREGATED "<br/>\n"; |
|
310 |
|
311 my $allfilesstring = ''; |
|
312 for my $raptorfile (sort {$a cmp $b} @logfiles) { $allfilesstring .= "<br/>$raptorfile"; } |
|
313 print AGGREGATED "PARSED LOGS:$allfilesstring<br/>\n"; |
|
314 |
314 close(AGGREGATED); |
315 close(AGGREGATED); |
315 |
316 |
316 translate_detail_files_to_html(); |
317 translate_detail_files_to_html(); |
317 |
318 |
318 print "OK, done. Please open $outputdir/index.html.\n"; |
319 print "OK, done. Please open $outputdir/index.html.\n"; |