diff options
Diffstat (limited to 'testsuite/systemtap.base/bz6850.exp')
| -rw-r--r-- | testsuite/systemtap.base/bz6850.exp | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/testsuite/systemtap.base/bz6850.exp b/testsuite/systemtap.base/bz6850.exp new file mode 100644 index 00000000..cd56ddce --- /dev/null +++ b/testsuite/systemtap.base/bz6850.exp @@ -0,0 +1,21 @@ +set test bz6850 + +catch {exec gcc -g -o bz6850 $srcdir/$subdir/bz6850.c} err +if {$err == "" && [file exists bz6850]} then { pass "$test compile" } else { fail "$test compile" } + +set rc [stap_run_batch $srcdir/$subdir/bz6850.stp] +if {$rc == 0} then { pass "$test -p4" } else { fail "$test -p4" } + +if {! [installtest_p]} { untested "$test -p5"; return } + +spawn sudo stap $srcdir/$subdir/bz6850.stp -c ./bz6850 +expect { + -timeout 60 + -re {[^\r\n]*called\r\n} { exp_continue } + -re {[^\r\n]*returns\r\n} { exp_continue } + timeout { fail "$test (timeout)" } + eof { } +} +wait +if {[file exists bz6850_pass]} then { pass "$test -p5" } else { fail "$test -p5" } +exec rm -f bz6850_pass bz6850 |