summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.samples
diff options
context:
space:
mode:
authorWilliam Cohen <wcohen@redhat.com>2009-02-10 16:18:29 -0500
committerWilliam Cohen <wcohen@redhat.com>2009-02-10 16:18:29 -0500
commita70a69bd47f2b0c7e8e4e99b7a630ebbedc5f264 (patch)
tree5abda041a1bba2387eaf996665a0936322d4b004 /testsuite/systemtap.samples
parent955925b709fcf1aeaa667423ed7b639dcfd94478 (diff)
downloadsystemtap-steved-a70a69bd47f2b0c7e8e4e99b7a630ebbedc5f264.tar.gz
systemtap-steved-a70a69bd47f2b0c7e8e4e99b7a630ebbedc5f264.tar.xz
systemtap-steved-a70a69bd47f2b0c7e8e4e99b7a630ebbedc5f264.zip
Move crash.exp and crash.sh to systemtap.base directory.
Diffstat (limited to 'testsuite/systemtap.samples')
-rw-r--r--testsuite/systemtap.samples/crash.exp45
-rwxr-xr-xtestsuite/systemtap.samples/crash.sh8
2 files changed, 0 insertions, 53 deletions
diff --git a/testsuite/systemtap.samples/crash.exp b/testsuite/systemtap.samples/crash.exp
deleted file mode 100644
index 9c3e5e05..00000000
--- a/testsuite/systemtap.samples/crash.exp
+++ /dev/null
@@ -1,45 +0,0 @@
-# Simple test for staplog.so crash(8) extension
-set test "crash"
-
-if {![installtest_p]} { untested $test; return }
-if {![file exists $env(CRASH_LIBDIR)/staplog.so]} { untested "$test - no staplog.so"; return }
-
-# Load a test script
-spawn stap $srcdir/$subdir/testlog.stp -m testlog
-expect {
- -timeout 120
- "HelloWorld\r\n" {
- pass "$test - testlog.stp"
- # Need to run crash(8) while this script is still running.
- # Since crash(8) needs /dev/mem access, need it run as_root too.
- # This [ eval ... \{ \} ] business is necessary because as_root
- # evals the given list/variables in its own scope.
- eval as_root \{ $srcdir/$subdir/crash.sh $env(CRASH_LIBDIR) \}
- }
- timeout { fail "$test - testlog.stp timeout" }
- timeout { fail "$test - testlog.stp eof" }
-}
-catch { exec kill -INT -[exp_pid]; close ; wait }
-
-# The crash(8) script creates testlog/global or testlog/cpu<n>
-as_root { chmod -R a+rX testlog }
-
-set ok 0
-foreach f [glob -nocomplain testlog/*] {
- pass "$test - crash(8) generated $f"
- set fp [open $f]
- set chars [read $fp]
- close $fp
- if [string match "HelloWorld*" $chars] {
- incr ok
- pass "$test - crash(8) data"
- } else {
- fail "$test - crash(8) data $chars"
- }
-}
-if {$ok == 0} {
- fail "$test - crash(8) data"
-}
-
-as_root { rm -rf testlog testlog.ko }
-
diff --git a/testsuite/systemtap.samples/crash.sh b/testsuite/systemtap.samples/crash.sh
deleted file mode 100755
index 06aa414e..00000000
--- a/testsuite/systemtap.samples/crash.sh
+++ /dev/null
@@ -1,8 +0,0 @@
-#! /bin/sh
-
-crash --readnow << END
-mod -s testlog testlog.ko
-extend $1/staplog.so
-staplog testlog
-exit
-END