2006-08-12 Frank Ch. Eigler <fche@elastic.org>

	* configure.ac, Makefile.am: Descend into testsuite/
	directory.  Remove local test logic.
	* configure, Makefile.in: Regenerated.
	* runtest.sh: Not yet removed.
	* HACKING: Update for new testsuite layout.

2006-08-12  Frank Ch. Eigler  <fche@elastic.org>

	* all: Reorganized old pass-1..4 tests one dejagnu bucket.
	Moved over old pass-5 tests, except for disabled syscalls tests.
	* Makefile (installcheck): New target for running pass-1..5
	tests against installed systemtap.

1 files changed, 38 insertions, 0 deletions

diff --git a/testsuite/systemtap.samples/profile.stp b/testsuite/systemtap.samples/profile.stp
new file mode 100644
index 00000000..1a93153d
--- /dev/null
+++ b/testsuite/systemtap.samples/profile.stp
@@ -0,0 +1,38 @@
+#! stap
+
+global command, syscall_count, syscall_times, this_syscall_time, this_syscall
+
+function accumulate () {
+  pid = pid()
+  if (! ([pid] in command)) command[pid] = execname()
+  syscall=pp() # just the substring ideally
+  syscall_count[pid,syscall] ++
+  this_syscall[pid] = syscall
+  this_syscall_time[pid] = gettimeofday_us()
+}
+function decumulate () {
+  pid = pid()
+  syscall = this_syscall[pid]
+  syscall_times[pid,syscall] += 
+    gettimeofday_us() - this_syscall_time[pid]
+  # free up memory
+  this_syscall[pid] = ""
+  this_syscall_time[pid] = 0
+}
+probe kernel.function("sys_*") {
+  accumulate ()
+}
+probe kernel.function("sys_*").return {
+  decumulate ()
+}
+probe timer.ms(5000) {
+  exit ()
+}
+probe end {
+  foreach ([pid,syscall] in syscall_count-) {
+    log (command[pid] . "(" . sprint(pid) . ") " . syscall .
+         " count=" . sprint(syscall_count[pid,syscall]) .
+         " ttime=" . sprint(syscall_times[pid,syscall]))
+    if (count++ > 30) next
+  }
+}