From 42e3cf129c5d7c706c510eec38ace943e70fa035 Mon Sep 17 00:00:00 2001 From: Tvrtko Ursulin Date: Wed, 17 May 2017 13:50:37 +0100 Subject: 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 --- scripts/media-bench.pl | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'scripts/media-bench.pl') 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; -- cgit v1.2.3