summaryrefslogtreecommitdiffstats
path: root/testsuite
diff options
context:
space:
mode:
authorTim Moore <timoore@redhat.com>2009-10-27 19:50:06 +0100
committerTim Moore <timoore@redhat.com>2009-10-27 19:50:06 +0100
commitf70d5f6b702e8da5c6affb3f34836c466b01f1b9 (patch)
tree46954ea80adcd97d18e21ecd1357b075d97f7e50 /testsuite
parent8447d5545aa58965a5f47d604e14e97e673d1cd9 (diff)
parent618a8a634b37da88b67a49beec7282634bff3efe (diff)
downloadsystemtap-steved-f70d5f6b702e8da5c6affb3f34836c466b01f1b9.tar.gz
systemtap-steved-f70d5f6b702e8da5c6affb3f34836c466b01f1b9.tar.xz
systemtap-steved-f70d5f6b702e8da5c6affb3f34836c466b01f1b9.zip
Merge branch 'master' of ssh://sourceware.org/git/systemtap
Diffstat (limited to 'testsuite')
-rw-r--r--testsuite/systemtap.base/onoffprobe.exp20
-rwxr-xr-xtestsuite/transko/varargs.stp10
-rwxr-xr-xtestsuite/transok/varargs.stp9
3 files changed, 38 insertions, 1 deletions
diff --git a/testsuite/systemtap.base/onoffprobe.exp b/testsuite/systemtap.base/onoffprobe.exp
index 1b39dab5..c6d83d5d 100644
--- a/testsuite/systemtap.base/onoffprobe.exp
+++ b/testsuite/systemtap.base/onoffprobe.exp
@@ -10,9 +10,27 @@ proc advance {} {
global expect_out
global ok
global modname
+ set procfs_file "/proc/systemtap/$modname/switch"
+
pass "$test $expect_out(1,string)"
+
+ # If this is the first time, wait until the procfs file exists
+ # (for up to 10 seconds).
+ if {$ok == 0} {
+ set i 0
+ while {![file exists $procfs_file]} {
+ sleep 1
+ incr i
+ if {$i >= 10} { break }
+ }
+ # If the procfs file still doesn't exist, fail.
+ if {![file exists $procfs_file]} {
+ fail "$test (missing procfs file)"
+ }
+ }
+
incr ok
- exec echo $ok > /proc/systemtap/$modname/switch
+ if {[file exists $procfs_file]} { exec echo $ok > $procfs_file }
exec echo dummy > /dev/null
exp_continue
}
diff --git a/testsuite/transko/varargs.stp b/testsuite/transko/varargs.stp
new file mode 100755
index 00000000..f38309ad
--- /dev/null
+++ b/testsuite/transko/varargs.stp
@@ -0,0 +1,10 @@
+#! stap -p3
+
+probe begin {
+ // PR10750 enforces at most 32 print args
+ println(1, 2, 3, 4, 5, 6, 7, 8,
+ 9, 10, 11, 12, 13, 14, 15, 16,
+ 17, 18, 19, 20, 21, 22, 23, 24,
+ 25, 26, 27, 28, 29, 30, 31, 32,
+ 33)
+}
diff --git a/testsuite/transok/varargs.stp b/testsuite/transok/varargs.stp
new file mode 100755
index 00000000..216166f6
--- /dev/null
+++ b/testsuite/transok/varargs.stp
@@ -0,0 +1,9 @@
+#! stap -p3
+
+probe begin {
+ // PR10750 enforces at most 32 print args
+ println(1, 2, 3, 4, 5, 6, 7, 8,
+ 9, 10, 11, 12, 13, 14, 15, 16,
+ 17, 18, 19, 20, 21, 22, 23, 24,
+ 25, 26, 27, 28, 29, 30, 31, 32)
+}