Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add db_kill_proc() for DDB (and move db_show_all_procs here so 

all the "proc" debugging stuff is here in one place).
This commit is contained in:
gwr 1997-05-07 18:48:15 +00:00
parent b5c783c6e4
commit 48c524e63a
1 changed files with 91 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

92
sys/kern/kern_proc.c
View File

@ -1,4 +1,4 @@
/* $NetBSD: kern_proc.c,v 1.16 1996/10/13 02:32:33 christos Exp $ */
/* $NetBSD: kern_proc.c,v 1.17 1997/05/07 18:48:15 gwr Exp $ */
/*
* Copyright (c) 1982, 1986, 1989, 1991, 1993
@ -379,3 +379,93 @@ pgrpdump()
}
}
#endif /* DEBUG */
#ifdef DDB
#include <machine/db_machdep.h>
#include <ddb/db_interface.h>
#include <ddb/db_lex.h>
#include <ddb/db_output.h>
void
db_kill_proc(addr, haddr, count, modif)
db_expr_t addr;
int haddr;
db_expr_t count;
char *modif;
{
struct proc *p;
db_expr_t pid, sig;
int t;
/* What pid? */
if (!db_expression(&pid)) {
db_error("pid?\n");
/*NOTREACHED*/
}
/* What sig? */
t = db_read_token();
if (t == tCOMMA) {
if (!db_expression(&sig)) {
db_error("sig?\n");
/*NOTREACHED*/
}
} else {
db_unread_token(t);
sig = 15;
}
if (db_read_token() != tEOL) {
db_error("?\n");
/*NOTREACHED*/
}
p = pfind((pid_t)pid);
if (p == NULL) {
db_error("no such proc\n");
/*NOTREACHED*/
}
psignal(p, (int)sig);
}
void
db_show_all_procs(addr, haddr, count, modif)
db_expr_t addr;
int haddr;
db_expr_t count;
char *modif;
{
int map = modif[0] == 'm';
int doingzomb = 0;
struct proc *p, *pp;
p = allproc.lh_first;
db_printf(" pid proc addr %s comm wchan\n",
map ? "map " : "uid ppid pgrp flag stat em ");
while (p != 0) {
pp = p->p_pptr;
if (p->p_stat) {
db_printf("%5d %p %p ",
p->p_pid, p, p->p_addr);
if (map)
db_printf("%p %s ",
p->p_vmspace, p->p_comm);
else
db_printf("%3d %5d %5d %06x %d %s %s ",
p->p_cred->p_ruid, pp ? pp->p_pid : -1,
p->p_pgrp->pg_id, p->p_flag, p->p_stat,
p->p_emul->e_name, p->p_comm);
if (p->p_wchan) {
if (p->p_wmesg)
db_printf("%s ", p->p_wmesg);
db_printf("%p", p->p_wchan);
}
db_printf("\n");
}
p = p->p_list.le_next;
if (p == 0 && doingzomb == 0) {
doingzomb = 1;
p = zombproc.lh_first;
}
}
}
#endif