From a3cb4ae582fb4c70b0442d554c071b51d6a5570b Mon Sep 17 00:00:00 2001
From: Keith Bostic <bostic@ucbvax.Berkeley.EDU>
Date: Fri, 11 Jun 1993 06:43:39 -0800
Subject: [PATCH] date and time created 93/06/10 23:43:39 by bostic

SCCS-vsn: sys/scripts/kdump 7.1
---
 usr/src/sys/scripts/kdump | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 usr/src/sys/scripts/kdump

diff --git a/usr/src/sys/scripts/kdump b/usr/src/sys/scripts/kdump
new file mode 100644
index 0000000000..63779d3338
--- /dev/null
+++ b/usr/src/sys/scripts/kdump
@@ -0,0 +1,37 @@
+# Dump kmem statistics
+#	@(#)kdump	7.1 (Berkeley) %G%
+
+set $last=75
+set $seg=43
+
+# kmem_hdr
+define kmemhdr
+	printf "\tINUSE\tCALLS\tMEMUSED\tLIMBLK\tMAPBLK\tMAXUSED\t\tLIMIT\n"
+end
+
+# pkmem <ptr>
+define pkmem
+	set $kp=(struct kmemstats *)$arg0
+	set $n = (struct kmemstats *)$kp - (struct kmemstats *)kmemstats
+	printf "%d:\t%d\t%d", $n, $kp->ks_inuse, $kp->ks_calls
+	printf "\t0x%x\t%d", $kp->ks_memuse, $kp->ks_limblocks
+	printf "\t%d\t0x%x\t\t%d\n", $kp->ks_mapblocks, $kp->ks_maxused, $kp->ks_limit
+end
+
+define kmemdump
+	set $kp=(struct kmemstats *)(kmemstats + $arg0)
+	kmemhdr
+	pkmem $kp
+end
+
+define kdumpall
+	set $i=0
+
+	kmemhdr
+	set $kp = (struct kmemstats *)kmemstats
+	while ($i < $last)
+		pkmem $kp
+		set $kp++
+		set $i++
+	end
+end
-- 
2.20.1