From 7f79ea13a0f64573ce13353257d322ae49ef0c27 Mon Sep 17 00:00:00 2001
From: William Cohen <wcohen@localhost.localdomain>
Date: Thu, 24 Apr 2008 12:20:13 -0400
Subject: Move examples to testsuite/systemtap.examples

---
 testsuite/systemtap.examples/small_demos/top.stp | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 testsuite/systemtap.examples/small_demos/top.stp

(limited to 'testsuite/systemtap.examples/small_demos/top.stp')

diff --git a/testsuite/systemtap.examples/small_demos/top.stp b/testsuite/systemtap.examples/small_demos/top.stp
new file mode 100755
index 00000000..b46b9940
--- /dev/null
+++ b/testsuite/systemtap.examples/small_demos/top.stp
@@ -0,0 +1,24 @@
+#!/usr/bin/env stap 
+#
+# This script continuously lists the top 20 systemcalls on the system
+#
+
+global syscalls
+
+function print_top () {
+	printf ("SYSCALL\t\t\t\tCOUNT\n")
+	foreach ([name] in syscalls- limit 20)
+		printf("%-20s\t\t%5d\n",name, syscalls[name])
+	printf("--------------------------------------\n")
+	delete syscalls
+}
+
+probe syscall.* {
+	syscalls[probefunc()]++
+}
+
+# print top syscalls every 5 seconds
+probe timer.ms(5000) {
+	print_top ()
+}
+
-- 
cgit