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.base/probefunc.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.base/probefunc.exp')
-rw-r--r-- | testsuite/systemtap.base/probefunc.exp | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/testsuite/systemtap.base/probefunc.exp b/testsuite/systemtap.base/probefunc.exp new file mode 100644 index 00000000..10190fc9 --- /dev/null +++ b/testsuite/systemtap.base/probefunc.exp @@ -0,0 +1,58 @@ +# Test cases for probefunc() function + +load_lib "stap_run.exp" + +proc grep {fd re } { + while {[gets $fd s] >= 0} { + if [regexp $re $s] { + return $s + } + } +} + +proc sleep_one_sec {} { + after 1000; + return 0; +} + +set systemtap_script { + global funcname + probe %s { + funcname = probefunc() + } + probe begin { + log("systemtap starting probe") + } + probe end { + log("systemtap ending probe") + printf("%%s\n", funcname) + } +} + +# open /proc/kallsyms to get address for scheduler_tick symbol +set symf "/proc/kallsyms" +set symfd [open $symf r] +set re "\\mscheduler_tick\\M" +set rs [grep $symfd $re] +set flds [split $rs " "] +set addr [lindex $flds 0] +close $symfd + +set prefix "probefunc:" + +# test probefunc() with kernel.statement() +set output_string "\\mscheduler_tick\\M" +set probepoint "kernel.statement(0x$addr)" +set script [format $systemtap_script $probepoint] +stap_run $prefix$probepoint sleep_one_sec $output_string -e $script + +# test probefunc() with kernel.function() +set probepoint "kernel.function(\"scheduler_tick\")" +set script [format $systemtap_script $probepoint] +stap_run $prefix$probepoint sleep_one_sec $output_string -e $script + +# test probefunc() with kernel.inline() +set output_string "\\mcontext_switch\\M" +set probepoint "kernel.inline(\"context_switch\")" +set script [format $systemtap_script $probepoint] +stap_run $prefix$probepoint sleep_one_sec $output_string -e $script |