From 5b0e9ed86dfa2754ffe770fb81ec362fa4da0de6 Mon Sep 17 00:00:00 2001
From: Steve Dickson <steved@redhat.com>
Date: Tue, 16 Jun 2009 18:02:23 -0400
Subject: added sunrpc/call_status.stp

Signed-off-by: Steve Dickson <steved@redhat.com>
---
 sunrpc/call_status.stp | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 sunrpc/call_status.stp

diff --git a/sunrpc/call_status.stp b/sunrpc/call_status.stp
new file mode 100644
index 0000000..56976cd
--- /dev/null
+++ b/sunrpc/call_status.stp
@@ -0,0 +1,32 @@
+/*
+ * stap -g -I../tapset call_status.stp
+ */
+probe module("sunrpc").function("call_connect_status")
+{
+	terror = task_status($task);
+	if (terror)
+		printf("call_connect_status:%s:%s: error %d (%s)\n", 
+			cl_server($task), cl_prog($task), terror, errno_str(terror));
+}
+probe module("sunrpc").function("call_bind_status")
+{
+	terror = task_status($task);
+	if (terror)
+		printf("call_bind_status:%s:%s: error %d (%s)\n", 
+			cl_server($task), cl_prog($task), terror, errno_str(terror));
+}
+probe module("sunrpc").function("call_connect_status")
+{
+	terror = task_status($task);
+	if (terror)
+		printf("call_connect_status:%s:%s: error %d (%s)\n", 
+			cl_server($task), cl_prog($task), terror, errno_str(terror));
+}
+probe module("sunrpc").function("xs_tcp_finish_connecting").return
+{
+	if ($return)
+		printf("xs_tcp_finish_connecting: error %d (%s)\n", 
+			$return, errno_str($return));
+}
+probe begin { log("starting  call_status probe") }
+probe end { log("ending call_status probe") }
-- 
cgit