summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.samples
diff options
context:
space:
mode:
authorWilliam Cohen <wcohen@redhat.com>2009-01-29 15:22:40 -0500
committerWilliam Cohen <wcohen@redhat.com>2009-01-29 15:22:40 -0500
commitae7f749b222f23e3904dc79c4217f0070a05591c (patch)
tree690f491c3edcb2bc25d00eee9eaf4b17f3d53e58 /testsuite/systemtap.samples
parentc5b08ee1ec3c731b85a3891c366527171bc56009 (diff)
downloadsystemtap-steved-ae7f749b222f23e3904dc79c4217f0070a05591c.tar.gz
systemtap-steved-ae7f749b222f23e3904dc79c4217f0070a05591c.tar.xz
systemtap-steved-ae7f749b222f23e3904dc79c4217f0070a05591c.zip
Remove uninteresting examples, args.stp, primes.stp, and testlog.stp.
Diffstat (limited to 'testsuite/systemtap.samples')
-rw-r--r--testsuite/systemtap.samples/args.exp82
-rw-r--r--testsuite/systemtap.samples/args.stp9
-rw-r--r--testsuite/systemtap.samples/primes.exp21
-rw-r--r--testsuite/systemtap.samples/primes.stp23
-rw-r--r--testsuite/systemtap.samples/testlog.stp6
5 files changed, 0 insertions, 141 deletions
diff --git a/testsuite/systemtap.samples/args.exp b/testsuite/systemtap.samples/args.exp
deleted file mode 100644
index 6b1fd3d0..00000000
--- a/testsuite/systemtap.samples/args.exp
+++ /dev/null
@@ -1,82 +0,0 @@
-set test "args"
-if {![installtest_p]} { untested $test; return }
-
-set stappath [exec which stap]
-set staprunpath [exec which staprun]
-
-if [file exists $staprunpath] {
- pass "$test search for staprun"
-} else {
- fail "$test search for staprun"
- return
-}
-
-set modname "args_[pid]"
-spawn stap -w -k -p4 -m $modname $srcdir/$subdir/args.stp
-set tmpdir NO_SUCH_FILE
-expect {
- -timeout 120
- -re {Keeping temporary directory "([/a-zA-Z0-9_]*)"} { pass "$test compile";
- set tmpdir $expect_out(1,string) }
- timeout { fail "$test compile (timeout)" }
- eof { }
-}
-catch {close}; wait
-
-set modpath_cwd "$modname.ko"
-if [file exists $modpath_cwd] {
- pass "$test search for probe module"
-} else {
- fail "$test search for probe module"
- return
-}
-exec /bin/rm -f $modpath_cwd
-
-if [file exists $tmpdir] {
- pass "$test search for tmpdir"
-} else {
- fail "$test search for tmpdir"
- return
-}
-
-set modpath "$tmpdir/$modname.ko"
-if [file exists $modpath] {
- pass "$test search for tmpdir probe module"
-} else {
- fail "$test search for tmpdir probe module"
- return
-}
-
-spawn $staprunpath $modpath foo=hello bar=999
-set ok 0
-expect {
- -timeout 120
- -re {foo=hello bar=999} { incr ok }
- timeout { }
- eof { }
-}
-catch {close}; wait
-if {$ok == 1} {
- pass "$test run 1"
-} else {
- fail "$test run 1"
-}
-
-spawn $staprunpath $modpath foo=goodbye bar=0
-set ok 0
-expect {
- -timeout 120
- -re {foo=goodbye bar=0} { incr ok }
- timeout { }
- eof { }
-}
-catch {close}; wait
-if {$ok == 1} {
- pass "$test run 2"
-} else {
- fail "$test run 2"
-}
-
-
-
-exec /bin/rm -rf $tmpdir
diff --git a/testsuite/systemtap.samples/args.stp b/testsuite/systemtap.samples/args.stp
deleted file mode 100644
index 84b6080e..00000000
--- a/testsuite/systemtap.samples/args.stp
+++ /dev/null
@@ -1,9 +0,0 @@
-#! stap
-
-global foo, bar
-
-probe begin {
- printf("foo=%s bar=%d\n", foo, bar)
- exit ()
-}
-
diff --git a/testsuite/systemtap.samples/primes.exp b/testsuite/systemtap.samples/primes.exp
deleted file mode 100644
index f99f67cc..00000000
--- a/testsuite/systemtap.samples/primes.exp
+++ /dev/null
@@ -1,21 +0,0 @@
-set test "primes"
-if {![installtest_p]} { untested $test; return }
-
-spawn stap $srcdir/$subdir/primes.stp
-set ok 0
-expect {
- -timeout 150
- -ex {odds[0] = 1} { incr ok; exp_continue }
- -ex {odds[1] = 3} { incr ok; exp_continue }
- -ex {odds[3] = 7} { incr ok; exp_continue }
- -ex {odds[4] = 9} { incr ok; exp_continue }
- -ex {evens[2] = 6} { incr ok; exp_continue }
- -ex {evens[1] = 4} { incr ok; exp_continue }
- -ex {evens[0] = 2} { incr ok; exp_continue }
- timeout { fail "$test (timeout)" }
- eof { }
-}
-#FIXME does not handle case of hanging primes.stp correctly
-wait
-
-if {$ok == 7} { pass "$test" } { fail "$test" }
diff --git a/testsuite/systemtap.samples/primes.stp b/testsuite/systemtap.samples/primes.stp
deleted file mode 100644
index 1072b4b2..00000000
--- a/testsuite/systemtap.samples/primes.stp
+++ /dev/null
@@ -1,23 +0,0 @@
-#! stap
-
-global odds, evens
-
-probe begin {
- # "no" and "ne" are local integers
- for (i=1; i<10; i++) {
- if (i % 2) odds [no++] = i
- else evens [ne++] = i
- }
- delete odds[2]
- delete evens[3]
- exit ()
-}
-
-probe end {
- foreach (x+ in odds) {
- printf("odds[%d] = %d\n", x, odds[x])
- }
- foreach (x in evens-) {
- printf("evens[%d] = %d\n", x, evens[x])
- }
-}
diff --git a/testsuite/systemtap.samples/testlog.stp b/testsuite/systemtap.samples/testlog.stp
deleted file mode 100644
index 5b702aa9..00000000
--- a/testsuite/systemtap.samples/testlog.stp
+++ /dev/null
@@ -1,6 +0,0 @@
-probe begin
-{
- printf("Hello");
- printf("World");
- printf("\n");
-}