diff options
author | Tvrtko Ursulin <tvrtko.ursulin@intel.com> | 2017-05-17 13:50:37 +0100 |
---|---|---|
committer | Tvrtko Ursulin <tvrtko.ursulin@intel.com> | 2017-05-17 13:50:37 +0100 |
commit | 42e3cf129c5d7c706c510eec38ace943e70fa035 (patch) | |
tree | 0324f44963a1186d9479c2e50ac09c50e1bffc16 /scripts | |
parent | 635d2d04b008324f6499951575d5ef9d9b2f1f38 (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')
-rwxr-xr-x | scripts/media-bench.pl | 7 |
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; |