From 44f753868fd81e3b5c614acc3a4898d5c812a610 Mon Sep 17 00:00:00 2001
From: fche <fche>
Date: Fri, 9 Feb 2007 13:45:49 +0000
Subject: 2007-02-09  Frank Ch. Eigler  <fche@elastic.org>

	PR 3965
	* configure.ac: Add --enable-prologue option.
	* configure, config.in: Regenerated.
	* session.h (prologue_searching): New field.
	* main.cxx (main): Parse new "-P" option.  Initialize based on
	autoconf flag.
	* stap.1.in, NEWS: Document it.
	* hash.cxx (find_hash): Include it in computation.
	* tapsets.cxx (query_func_info, query_cu): Respect it.

2007-02-09  Frank Ch. Eigler  <fche@elastic.org>

	* systemtap.base/prologue.*: New test case.
---
 testsuite/systemtap.base/prologues.exp | 21 +++++++++++++++++++++
 testsuite/systemtap.base/prologues.stp |  6 ++++++
 2 files changed, 27 insertions(+)
 create mode 100644 testsuite/systemtap.base/prologues.exp
 create mode 100644 testsuite/systemtap.base/prologues.stp

(limited to 'testsuite/systemtap.base')

diff --git a/testsuite/systemtap.base/prologues.exp b/testsuite/systemtap.base/prologues.exp
new file mode 100644
index 00000000..b349e839
--- /dev/null
+++ b/testsuite/systemtap.base/prologues.exp
@@ -0,0 +1,21 @@
+set test "prologues -P"
+set ok 0
+spawn stap -P $srcdir/$subdir/prologues.stp
+expect {
+    -re {read[^\r\n]*\r\n} { incr ok; exp_continue }
+    -re {write[^\r\n]*\r\n} { incr ok; exp_continue }
+    eof
+}
+wait
+if {$ok > 10} { pass $test } else { fail $test }
+
+set test "prologues no-P"
+set ok 0
+spawn stap $srcdir/$subdir/prologues.stp
+expect {
+    -re {read[^\r\n]*\r\n} { incr ok; exp_continue }
+    -re {write[^\r\n]*\r\n} { incr ok; exp_continue }
+    eof
+}
+wait
+if {$ok > 10} { pass $test } else { fail $test }
\ No newline at end of file
diff --git a/testsuite/systemtap.base/prologues.stp b/testsuite/systemtap.base/prologues.stp
new file mode 100644
index 00000000..fc32ccd9
--- /dev/null
+++ b/testsuite/systemtap.base/prologues.stp
@@ -0,0 +1,6 @@
+# These sys_ functions often display prologue sensitivity
+probe syscall.read, syscall.write {
+  log (name . argstr)
+  if (num++ > 20) exit()
+}
+global num
-- 
cgit