diff options
Diffstat (limited to 'runner')
| -rwxr-xr-x | runner/result_stats | 74 | ||||
| -rw-r--r-- | runner/result_templates/html.tmpl | 42 |
2 files changed, 0 insertions, 116 deletions
diff --git a/runner/result_stats b/runner/result_stats deleted file mode 100755 index a92d6d6..0000000 --- a/runner/result_stats +++ /dev/null @@ -1,74 +0,0 @@ -#!/bin/perl - -use strict; -use warnings; -use utf8; - -use Data::Dumper; -use File::Basename; -use Cwd; -use Encode 'encode_utf8'; - -# teplates -use Text::Xslate; - -# yaml (quick) parser -use YAML::Syck; - -our $srcdir = dirname(__FILE__); - -sub html_printer -{ - my $results = $_[0]; - my $task_ids = $_[1]; - - my $xslate = Text::Xslate->new(path => ["$srcdir/result_templates"]); - - my $content = $xslate->render("html.tmpl", { - results => $results, - task_ids => $task_ids, - }); - print encode_utf8($content); -} - -my $workdir = $ARGV[0]; - -my $data = []; - -my $task_ids = {}; - -# go through *each* result directory -my $olddir = getcwd; -for (`find "$workdir" -maxdepth 1 -type d -name 'result_*'`) { - chomp; - chdir $_; - - my $run_results = {}; - $run_results->{dirname} = basename($_); - $run_results->{tasks} = {}; - $run_results->{exit_status} = 0; - - # go through each task - for (`find -maxdepth 1 -type f -name '*.result'`) { - chomp; - - (my $task_id = $_) =~ s/\.result$//; - $task_id =~ s/.*\///; - $task_ids->{$task_id} = 1; - - my $yaml_file = $_; - open my $fd, '<', $yaml_file - or die "can't open yaml file '$yaml_file'"; - - my $config = YAML::Syck::LoadFile($fd); - if ($config->{exit_status} != 0) { - $run_results->{exit_status} = 1; - } - $run_results->{tasks}->{$task_id} = $config; - } - - push @{$data}, $run_results; -} -chdir $olddir; - -html_printer $data, $task_ids; diff --git a/runner/result_templates/html.tmpl b/runner/result_templates/html.tmpl deleted file mode 100644 index 8a09ad7..0000000 --- a/runner/result_templates/html.tmpl +++ /dev/null @@ -1,42 +0,0 @@ -<!DOCTYPE html> -<html> -<head> -<meta charset="UTF-8" /> -<meta name="keywords" content="" /> -<title>Results</title> -<link href="https://praiskup.fedorapeople.org/staticdata/patternfly-1.1/css/patternfly.css" rel="stylesheet" media="screen, print"> -</head> -<body> -<div class="table-responsive"> -<table class="table table-condensed table-hover"> -<thead> - <tr> - <th>Run time</th> -: for $task_ids.keys() -> $task_id { - <th><: $task_id :></th> -: } - </tr> -</thead><tbody> -: for $results -> $result { - : if ($result.exit_status) { - <tr class="danger"> - : } else { - <tr> - : } - <td><: $result.dirname :></td> - : for $task_ids.keys() -> $task_id { - : if (not defined($result.tasks[$task_id].exit_status)) { - <td>NOT AVAILABLE</td> - : } elsif ($result.tasks[$task_id].exit_status == 0) { - <td>OK</td> - : } else { - <td class="danger">FAIL</td> - : } - : } - <tr> -:} -</tbody> -</table> -</div> -</body> -</html> |
