summaryrefslogtreecommitdiff
path: root/tools/testing/ktest/ktest.pl
diff options
context:
space:
mode:
authorSteven Rostedt <srostedt@redhat.com>2011-10-01 06:41:14 +0400
committerSteven Rostedt <rostedt@goodmis.org>2011-10-17 19:54:11 +0400
commit9900b5dc067551fcdcaec63d013b1d95b36835ae (patch)
tree7d5b8009f6ee03e4bae24efcb802be9b620c78c9 /tools/testing/ktest/ktest.pl
parent3d1cc41432b0491a39a3185b52bfa1d0411bba10 (diff)
downloadlinux-9900b5dc067551fcdcaec63d013b1d95b36835ae.tar.xz
ktest: Add DEFINED keyword for IF statements
Have IF statements process if a config variable or option has been defined or not. Can use NOT DEFINED in the case for telling if a variable or option has not been defined. DEFAULTS IF NOT DEFINED SSH_USER SSH_USER = root Signed-off-by: Steven Rostedt <rostedt@goodmis.org>
Diffstat (limited to 'tools/testing/ktest/ktest.pl')
-rwxr-xr-xtools/testing/ktest/ktest.pl17
1 files changed, 16 insertions, 1 deletions
diff --git a/tools/testing/ktest/ktest.pl b/tools/testing/ktest/ktest.pl
index 7bce412bbdcc..76a5964595da 100755
--- a/tools/testing/ktest/ktest.pl
+++ b/tools/testing/ktest/ktest.pl
@@ -396,6 +396,13 @@ sub process_compare {
return $ret;
}
+sub value_defined {
+ my ($val) = @_;
+
+ return defined($variable{$2}) ||
+ defined($opt{$2});
+}
+
sub process_if {
my ($name, $value) = @_;
@@ -409,13 +416,21 @@ sub process_if {
return $ret;
}
+ if ($val =~ /^\s*(NOT\s*)?DEFINED\s+(\S+)\s*$/) {
+ if (defined $1) {
+ return !value_defined($2);
+ } else {
+ return value_defined($2);
+ }
+ }
+
if ($val =~ /^\s*0\s*$/) {
return 0;
} elsif ($val =~ /^\s*\d+\s*$/) {
return 1;
}
- die ("$name: $.: Undefined variable $val in if statement\n");
+ die ("$name: $.: Undefined content $val in if statement\n");
return 1;
}