xref: /netbsd-src/sys/gdbscripts/pgrpdump (revision 69506806eacbba15fa925fd119e17998442604f0)
1*69506806Sgwr#	$NetBSD: pgrpdump,v 1.2 1997/02/12 23:35:08 gwr Exp $
2*69506806Sgwr
348faabf3Sgwr#	@(#)pgrpdump	8.1 (Berkeley) 6/10/93
448faabf3Sgwr
548faabf3Sgwrdefine allpgrps
648faabf3Sgwr	set $lim = pidhashmask + 1
748faabf3Sgwr	set $i = 0
848faabf3Sgwr	while ($i < $lim)
948faabf3Sgwr		if (pgrphash[$i])
1048faabf3Sgwr			printf "--- pgrphash[%d] ---\n", $i
1148faabf3Sgwr			pgrpchain pgrphash[$i]
1248faabf3Sgwr		end
1348faabf3Sgwr		set $i++
1448faabf3Sgwr	end
1548faabf3Sgwrend
1648faabf3Sgwr
1748faabf3Sgwrdefine pgrpchain
1848faabf3Sgwr	set $pgrp = (struct pgrp *)$arg0
1948faabf3Sgwr	while ($pgrp)
2048faabf3Sgwr		print *$pgrp
2148faabf3Sgwr		set $pgrp = $pgrp->pg_hforw
2248faabf3Sgwr	end
2348faabf3Sgwrend
24