summaryrefslogtreecommitdiff
path: root/scripts/media-bench.pl
diff options
context:
space:
mode:
authorTvrtko Ursulin <tvrtko.ursulin@intel.com>2017-05-17 13:50:37 +0100
committerTvrtko Ursulin <tvrtko.ursulin@intel.com>2017-05-17 13:50:37 +0100
commit42e3cf129c5d7c706c510eec38ace943e70fa035 (patch)
tree0324f44963a1186d9479c2e50ac09c50e1bffc16 /scripts/media-bench.pl
parent635d2d04b008324f6499951575d5ef9d9b2f1f38 (diff)
media-bench: Print score range when evaluation workloads
When evaluating best balancers it is useful to be able to glance over the range of results for a particular workload since that determines the weighted scoring. Signed-off-by: Tvrtko Ursulin <tvrtko.ursulin@intel.com>
Diffstat (limited to 'scripts/media-bench.pl')
-rwxr-xr-xscripts/media-bench.pl7
1 files changed, 4 insertions, 3 deletions
diff --git a/scripts/media-bench.pl b/scripts/media-bench.pl
index a5a5b84e..77febc26 100755
--- a/scripts/media-bench.pl
+++ b/scripts/media-bench.pl
@@ -344,6 +344,7 @@ foreach my $wrk (@workloads) {
my ($r, $error, $should_b, $best);
my (%wps, %cwps, %mwps);
my @sorted;
+ my $range;
my @args;
$should_b = can_balance_workload($wrk);
@@ -398,9 +399,9 @@ foreach my $wrk (@workloads) {
@sorted = sort { $mwps{$b} <=> $mwps{$a} } keys %mwps;
$best = $sorted[0];
@sorted = sort { $b <=> $a } values %mwps;
- $best_bal{$wrk} = $sorted[0] if not exists $best_bal{$wrk} or
- $sorted[0] > $best_bal{$wrk};
- say " Best balancer is '$best' ($sorted[0]).";
+ $range = 1 - $sorted[-1] / $sorted[0];
+ $best_bal{$wrk} = $sorted[0];
+ say " Best balancer is '$best' (range=$range).";
$results{$wrk} = \%mwps;