summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.stress/all_kernel_functions.exp
diff options
context:
space:
mode:
authorfche <fche>2006-08-12 05:13:09 +0000
committerfche <fche>2006-08-12 05:13:09 +0000
commit814bc89d4635f101b2c0077598f31aad95ed15b7 (patch)
tree407a49dbaf446af4751f5068607a7fb8dad0611d /testsuite/systemtap.stress/all_kernel_functions.exp
parent6b6d04673a1ef175821afc7d4fabdb496698e8e3 (diff)
downloadsystemtap-steved-814bc89d4635f101b2c0077598f31aad95ed15b7.tar.gz
systemtap-steved-814bc89d4635f101b2c0077598f31aad95ed15b7.tar.xz
systemtap-steved-814bc89d4635f101b2c0077598f31aad95ed15b7.zip
2006-08-12 Frank Ch. Eigler <fche@elastic.org>
* configure.ac, Makefile.am: Descend into testsuite/ directory. Remove local test logic. * configure, Makefile.in: Regenerated. * runtest.sh: Not yet removed. * HACKING: Update for new testsuite layout. 2006-08-12 Frank Ch. Eigler <fche@elastic.org> * all: Reorganized old pass-1..4 tests one dejagnu bucket. Moved over old pass-5 tests, except for disabled syscalls tests. * Makefile (installcheck): New target for running pass-1..5 tests against installed systemtap.
Diffstat (limited to 'testsuite/systemtap.stress/all_kernel_functions.exp')
-rw-r--r--testsuite/systemtap.stress/all_kernel_functions.exp59
1 files changed, 59 insertions, 0 deletions
diff --git a/testsuite/systemtap.stress/all_kernel_functions.exp b/testsuite/systemtap.stress/all_kernel_functions.exp
new file mode 100644
index 00000000..f81b6430
--- /dev/null
+++ b/testsuite/systemtap.stress/all_kernel_functions.exp
@@ -0,0 +1,59 @@
+load_lib "stap_run.exp"
+
+proc genload {} {
+ # if 'genload' from the ltp exists, use it to create a real load
+ set genload {/usr/local/ltp/testcases/bin/genload}
+ if [file executable $genload] {
+ exec $genload -c 10 -i 10 -m 10 -t 10
+ # ^^^^^ run for 10 seconds
+ # ^^^^^ 10 procs spinning on malloc
+ # ^^^^^ 10 procs spinning on sync
+ # ^^^^^ 10 procs spinning on sqrt
+ } else {
+ # sleep for a bit
+ after 10000
+ }
+ return 0
+}
+
+proc probe_ok {probepoint} {
+ set cmd {exec stap -p2 -e}
+ lappend cmd "probe $probepoint {}"
+ return ![catch $cmd]
+}
+
+set systemtap_script {
+ global stat
+ probe %s {
+ stat[probefunc()] <<< 1
+ }
+ probe begin {
+ log("systemtap starting probe")
+ }
+ probe end {
+ log("systemtap ending probe")
+ foreach (func in stat)
+ printf("%%d %%s\n", @count(stat[func]), func)
+ }
+}
+
+set letters [split {abcdefghijklmnopqrstuvwxyz_ABCDEFGHIJKLMNOPQRSTUVWXYZ} {}]
+
+set output_string "(\\d+ \\w+\\r\\n)*(WARNING.*skipped.*)?"
+
+# Because this test is known to expose system crashes, it is not enabled
+# by default. Change the line below to 'if 1' to enable it.
+if 0 {
+ foreach start $letters {
+ set probepoint "kernel.function(\"$start*\")"
+ set prefix "all_kernel_functions:"
+ if [probe_ok $probepoint] {
+ set script [format $systemtap_script $probepoint]
+ stap_run $prefix$probepoint genload $output_string -e $script
+ } else {
+ unsupported "$prefix no match for $probepoint"
+ }
+ }
+} else {
+ untested "all_kernel_functions is disabled"
+}