summaryrefslogtreecommitdiffstats
path: root/testsuite
diff options
context:
space:
mode:
authorfche <fche>2007-09-24 21:18:24 +0000
committerfche <fche>2007-09-24 21:18:24 +0000
commitf25f07a54547b521d5498e34953a5c0958a70808 (patch)
tree3f6d269f26a4cab347458af94d9e8553131406af /testsuite
parentca99ed191f42ccf1cb5a85e962ea1f5f35127d14 (diff)
downloadsystemtap-steved-f25f07a54547b521d5498e34953a5c0958a70808.tar.gz
systemtap-steved-f25f07a54547b521d5498e34953a5c0958a70808.tar.xz
systemtap-steved-f25f07a54547b521d5498e34953a5c0958a70808.zip
replace examples buildok testing
* systemtap.samples/examples.exp: New file, replacing * buildok/examples.stp: Removed.
Diffstat (limited to 'testsuite')
-rwxr-xr-xtestsuite/buildok/example.stp34
-rwxr-xr-xtestsuite/systemtap.samples/examples.exp12
2 files changed, 12 insertions, 34 deletions
diff --git a/testsuite/buildok/example.stp b/testsuite/buildok/example.stp
deleted file mode 100755
index 1051a247..00000000
--- a/testsuite/buildok/example.stp
+++ /dev/null
@@ -1,34 +0,0 @@
-#! /bin/sh
-
-example_stp=`ls ${SRCDIR}/examples/*.stp`
-sub_stp=`ls ${SRCDIR}/examples/small_demos/*.stp`
-
-ret=0
-
-for i in $example_stp $sub_stp
-do
-#iostat-scsi, sigmon need parameter
-case $i in
- (*iostat-scsi.stp)
- stap -p4 $i 5
- ;;
- (*sigmon.stp)
- stap -p4 -x 1234 $i SIGKILL
- ;;
- (*small_demos/keyhack.stp)
- stap -p4 -g $i
- ;;
- *)
- stap -p4 $i
- ;;
-esac
-
-if [ $? -eq 0 ];then
- echo "PASS: $i"
-else
- echo "FAIL: $i"
- ret=1
-fi
-done
-
-exit $ret
diff --git a/testsuite/systemtap.samples/examples.exp b/testsuite/systemtap.samples/examples.exp
new file mode 100755
index 00000000..d8c43ecd
--- /dev/null
+++ b/testsuite/systemtap.samples/examples.exp
@@ -0,0 +1,12 @@
+foreach file [lsort [glob -nocomplain $srcdir/../examples/*.stp $srcdir/../examples/small_demos/*.stp]] {
+ set test [file tail $file]
+ switch $test {
+ {iostat-scsi.stp} {set cmd "stap -p4 $file 5"}
+ {sigmon.stp} {set cmd "stap -p4 -x 1234 $file SIGKILL"}
+ {keyhack.stp} {set cmd "stap -p4 -g $file"}
+ default {set cmd "stap -p4 $file"}
+ }
+ verbose -log "Running $cmd"
+ set rc [catch {eval "exec $cmd"} baz]
+ if {$rc} { fail $test; verbose -log $baz } else { pass $test }
+} \ No newline at end of file