Lines Matching +full:sub +full:- +full:messages
2 # SPDX-License-Identifier: GPL-2.0
29 sub compare {
40 $expect =~ s/^.*?>>//; # '?' is non-greedy, minimal match
54 if ($got =~ /^[+-]*[0-9]+/) {
55 $got =~ s/^[+-]*[0-9]+//;
60 if ($got =~ /^(0x)*[0-9a-f]+/) {
61 $got =~ s/^(0x)*[0-9a-f]+//;
90 sub usage {
100 -h print program usage
101 --help print program usage
102 --hide-expect suppress output of EXPECTed lines
103 --line-num report line number of CONSOLE_LOG
104 --no-expect-stats do not report EXPECT statistics
105 --no-strip-ts do not strip leading console timestamps
106 --verbose do not suppress EXPECT begin and end lines
107 --version print program version and exit
110 Process a console log for EXPECTed test related messages to either
111 highlight expected devicetree unittest related messages or suppress
112 the messages. Leading console timestamps will be stripped.
114 Various unittests may trigger kernel messages from outside the
133 <<int>> matches: [+-]*[0-9]+
134 <<hex>> matches: (0x)*[0-9a-f]+
145 '-> ' Line reports start or end of the unittests
155 --line-num causes the CONSOLE_LOG line number to be printed in 4 columns.
158 lines 10000 - 99999, 5 columns will be used).
170 "hide-expect" => \$hide_expect,
171 "line-num" => \$print_line_num,
172 "no-expect-stats" => \$no_expect_stats,
173 "no-strip-ts" => \$no_strip_ts,
180 print STDERR "For help, type '$script_name --help'\n";
196 # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
205 # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
215 # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
222 # once for all input - it is not an expected use case to generate one
243 $pr_fmt = "### dt-test ### ";
267 if ($timestamp =~ /^\[\s*[0-9]+\.[0-9]*\] /) {
276 $line =~ s/^\[\s*[0-9]+\.[0-9]*\] //;
279 # ----- find EXPECT begin
297 # ----- find EXPECT end
328 print " end ---> $line\n";
337 printf "** %s%s$script_name WARNING - not found ---> %s\n",
344 print " begin -> $begin\n";
345 print " end ---> $line\n";
353 # ----- find EXPECT_NOT begin
371 # ----- find EXPECT_NOT end
400 print " end ---> $line\n";
410 printf "** %s%s$script_name WARNING - next line matches EXPECT_NOT\n",
427 print " begin -> $begin\n";
428 print " end ---> $line\n";
437 # ----- not an EXPECT line
439 if (($line =~ /^${pr_fmt}start of unittest - you will see error messages$/) ||
440 ($line =~ /^${pr_fmt}end of unittest - [0-9]+ passed, [0-9]+ failed$/ ) ) {
441 $prefix = "->"; # 2 characters
508 printf "** non-zero values expected:\n";
531 print " begin ---> $begin\n";
539 print " begin ---> $begin\n";