leandrof/linux
1
0
Fork 0
forked from Minki/linux
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ktest: Fix compare script to test if options are not documented

Browse Source 
The compare script compare-ktest-sample.pl checks for options
that are defined in ktest.pl and not documented in samples.conf,
as well as samples in samples.conf that are not used in ktest.pl.

With the switch to the hash format to initialize the ktest variables
the compare script needs to be updated to handle the change.

Signed-off-by: Steven Rostedt <rostedt@goodmis.org>
This commit is contained in:
Steven Rostedt 2011-12-22 22:06:59 -05:00 committed by Steven Rostedt
parent 9cc9e091ed
commit c2857cb4a8
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tools/testing/ktest/compare-ktest-sample.pl
View File

@ -2,7 +2,9 @@
open (IN,"ktest.pl"); open (IN,"ktest.pl");
while (<IN>) { while (<IN>) {
# hashes are now used
if (/\$opt\{"?([A-Z].*?)(\[.*\])?"?\}/ || if (/\$opt\{"?([A-Z].*?)(\[.*\])?"?\}/ ||
/^\s*"?([A-Z].*?)"?\s*=>\s*/ ||
/set_test_option\("(.*?)"/) { /set_test_option\("(.*?)"/) {
$opt{$1} = 1; $opt{$1} = 1;
} }
@ -11,7 +13,7 @@ close IN;
open (IN, "sample.conf"); open (IN, "sample.conf");
while (<IN>) { while (<IN>) {
if (/^\s*#?\s*(\S+)\s*=/) { if (/^\s*#?\s*([A-Z]\S*)\s*=/) {
$samp{$1} = 1; $samp{$1} = 1;
} }
} }