summaryrefslogtreecommitdiffstats
path: root/runner
diff options
context:
space:
mode:
Diffstat (limited to 'runner')
-rwxr-xr-xrunner/result_stats74
-rw-r--r--runner/result_templates/html.tmpl42
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>