diff options
author | Mauro Carvalho Chehab <mchehab@kernel.org> | 2022-04-14 14:24:58 +0200 |
---|---|---|
committer | Petri Latvala <petri.latvala@intel.com> | 2022-04-14 18:19:39 +0300 |
commit | 3b73a372a3b21192b9fec51352c5019675834b26 (patch) | |
tree | a9c50c95a167f25d027ed0d22632f8266cadfe65 /scripts | |
parent | fc8769fdd2e9ba8645ee92511a9ea513a3902a18 (diff) |
scripts/code_cov_parse_info: better handle test name
The TN field generated by standard lcov is weird: it keeps
repeating the TN field from time to time. At genhtml, it seems
that only the first one is used.
As we're using TN to indicate the test name, preserve all different
test names at the output file.
Also, printing such names doesn't really makes sense when
--print-used and --print-unused command line options are used,
and printing a list of 100+ names won't make much sense.
So, just remove printing the test names.
Reviewed-by: Ch Sai Gowtham <sai.gowtham.ch@intel.com>
Reviewed-by: Andrzej Hajda <andrzej.hajda@intel.com>
Signed-off-by: Mauro Carvalho Chehab <mchehab@kernel.org>
Diffstat (limited to 'scripts')
-rwxr-xr-x | scripts/code_cov_parse_info | 20 |
1 files changed, 8 insertions, 12 deletions
diff --git a/scripts/code_cov_parse_info b/scripts/code_cov_parse_info index 604812b4..3e1525a6 100755 --- a/scripts/code_cov_parse_info +++ b/scripts/code_cov_parse_info @@ -17,8 +17,8 @@ my %used_source; my %record; my %files; my @func_regexes; +my %test_names; my @src_regexes; -my $testname = ""; my $verbose = 0; my $ignore_unused = 0; @@ -99,11 +99,7 @@ sub parse_info_data($) if (m/^TN:(.*)/) { if ($1 ne $cur_test) { $cur_test = $1; - if (!$testname) { - $testname = $cur_test; - } else { - $testname = "Code_coverage_tests"; - } + $test_names{$cur_test} = 1; } $source = $before_sf; $func = $before_sf; @@ -297,9 +293,13 @@ sub write_filtered_file($) { my $filter = shift; - # Generates filtered data - my $filtered = "TN:$testname\n"; + my $filtered = ""; + + foreach my $testname(sort keys %test_names) { + $filtered .= "TN:$testname\n"; + } + # Generates filtered data foreach my $source(sort keys %record) { next if (!$used_source{$source}); @@ -363,10 +363,6 @@ sub print_code_coverage($$$) return if (!$print_used && !$print_unused); - if ($testname ne "") { - $testname =~ s/(.*)_on_(\w+)$/$1 on $2/; - print "TEST: $testname\n"; - } my $prev_file = ""; foreach my $func (sort keys(%all_func)) { |