diff options
author | fche <fche> | 2006-08-12 05:13:09 +0000 |
---|---|---|
committer | fche <fche> | 2006-08-12 05:13:09 +0000 |
commit | 814bc89d4635f101b2c0077598f31aad95ed15b7 (patch) | |
tree | 407a49dbaf446af4751f5068607a7fb8dad0611d /testsuite/systemtap.stress/all_kernel_functions.exp | |
parent | 6b6d04673a1ef175821afc7d4fabdb496698e8e3 (diff) | |
download | systemtap-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.exp | 59 |
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" +} |