diff options
author | Tim Moore <timoore@redhat.com> | 2009-10-27 19:50:06 +0100 |
---|---|---|
committer | Tim Moore <timoore@redhat.com> | 2009-10-27 19:50:06 +0100 |
commit | f70d5f6b702e8da5c6affb3f34836c466b01f1b9 (patch) | |
tree | 46954ea80adcd97d18e21ecd1357b075d97f7e50 /testsuite | |
parent | 8447d5545aa58965a5f47d604e14e97e673d1cd9 (diff) | |
parent | 618a8a634b37da88b67a49beec7282634bff3efe (diff) | |
download | systemtap-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.exp | 20 | ||||
-rwxr-xr-x | testsuite/transko/varargs.stp | 10 | ||||
-rwxr-xr-x | testsuite/transok/varargs.stp | 9 |
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) +} |