Home | History | Annotate | Line # | Download | only in gdbscripts 
      1 #	$NetBSD: procs,v 1.4 2019/05/09 07:59:49 mrg Exp $
      2 
      3 define procs
      4 	set $i = 0
      5 
      6 	while ($i < 2)
      7 		if ($i == 0)
      8 			set $p = allproc.lh_first
      9 		end
     10 		if ($p)
     11 			printf "            proc   pid     flag stat nlwps            lwp  comm\n"
     12 		end
     13 		while ($p)
     14 			printf "%16lx %5d %8x %4x %5d %16lx %s\n", \
     15 				$p, $p->p_pid, \
     16 				$p->p_flag, $p->p_stat, $p->p_nlwps, $p->p_lwps.lh_first, \
     17 				(char *) $p->p_comm
     18 			set $p = $p->p_list.le_next
     19 		end
     20 		set $i++
     21 	end
     22 end
     23 document procs
     24 list all processes.
     25 displays struct proc *, pid, flags, status, nlwps, first lwp addr
     26 and command name.
     27 end
     28