From 814bc89d4635f101b2c0077598f31aad95ed15b7 Mon Sep 17 00:00:00 2001
From: fche <fche>
Date: Sat, 12 Aug 2006 05:13:09 +0000
Subject: 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.
---
 testsuite/systemtap.samples/iotask.stp | 45 ++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)
 create mode 100644 testsuite/systemtap.samples/iotask.stp

(limited to 'testsuite/systemtap.samples/iotask.stp')

diff --git a/testsuite/systemtap.samples/iotask.stp b/testsuite/systemtap.samples/iotask.stp
new file mode 100644
index 00000000..13d273a3
--- /dev/null
+++ b/testsuite/systemtap.samples/iotask.stp
@@ -0,0 +1,45 @@
+# iotask.stp
+# A reimplementation of user script: iotask.stp given at OLS 2005
+# in the current language.
+#
+# Will Cohen
+# 9/22/2005
+
+global names, opens
+global reads, read_bytes
+global writes, write_bytes
+
+probe kernel.function("sys_open") {
+   ++names[execname()]; ++opens[execname()];
+}
+
+probe kernel.function("sys_read") {
+  ++names[execname()]; ++reads[execname()];
+  read_bytes[execname()] += $count;
+}
+
+probe kernel.function("sys_write") {
+  ++names[execname()]; ++writes[execname()];
+  write_bytes[execname()] += $count;
+}
+
+probe begin { log( "starting probe" ); }
+
+probe end {
+  foreach( name in names){
+    log ("process: " . name);
+    if (opens[name]) 
+      log( "opens n=" . sprint(opens[name]));
+    if ( reads[name]){
+      count = reads[name]; total=read_bytes[name];
+      log("reads n, sum, avg=". sprint(count)
+        . "," . sprint(total) . "," . sprint(total/count));
+    }
+    if (writes[name]){
+      count = writes[name]; total=write_bytes[name];
+      log("writes n, sum, avg=". sprint(count)
+        . "," . sprint(total) . "," . sprint(total/count));
+    }
+    log("");
+  }
+}
-- 
cgit