Annotation of sys/kern/kern_proc.c, Revision 1.1
1.1 ! nbrk 1: /* $OpenBSD: kern_proc.c,v 1.34 2007/08/04 02:43:54 ckuethe Exp $ */
! 2: /* $NetBSD: kern_proc.c,v 1.14 1996/02/09 18:59:41 christos Exp $ */
! 3:
! 4: /*
! 5: * Copyright (c) 1982, 1986, 1989, 1991, 1993
! 6: * The Regents of the University of California. All rights reserved.
! 7: *
! 8: * Redistribution and use in source and binary forms, with or without
! 9: * modification, are permitted provided that the following conditions
! 10: * are met:
! 11: * 1. Redistributions of source code must retain the above copyright
! 12: * notice, this list of conditions and the following disclaimer.
! 13: * 2. Redistributions in binary form must reproduce the above copyright
! 14: * notice, this list of conditions and the following disclaimer in the
! 15: * documentation and/or other materials provided with the distribution.
! 16: * 3. Neither the name of the University nor the names of its contributors
! 17: * may be used to endorse or promote products derived from this software
! 18: * without specific prior written permission.
! 19: *
! 20: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
! 21: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
! 22: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
! 23: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
! 24: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
! 25: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
! 26: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
! 27: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
! 28: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
! 29: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
! 30: * SUCH DAMAGE.
! 31: *
! 32: * @(#)kern_proc.c 8.4 (Berkeley) 1/4/94
! 33: */
! 34:
! 35: #include <sys/param.h>
! 36: #include <sys/systm.h>
! 37: #include <sys/kernel.h>
! 38: #include <sys/proc.h>
! 39: #include <sys/buf.h>
! 40: #include <sys/acct.h>
! 41: #include <sys/wait.h>
! 42: #include <sys/file.h>
! 43: #include <ufs/ufs/quota.h>
! 44: #include <sys/uio.h>
! 45: #include <sys/malloc.h>
! 46: #include <sys/mbuf.h>
! 47: #include <sys/ioctl.h>
! 48: #include <sys/tty.h>
! 49: #include <sys/signalvar.h>
! 50: #include <sys/pool.h>
! 51:
! 52: #define UIHASH(uid) (&uihashtbl[(uid) & uihash])
! 53: LIST_HEAD(uihashhead, uidinfo) *uihashtbl;
! 54: u_long uihash; /* size of hash table - 1 */
! 55:
! 56: /*
! 57: * Other process lists
! 58: */
! 59: struct pidhashhead *pidhashtbl;
! 60: u_long pidhash;
! 61: struct pgrphashhead *pgrphashtbl;
! 62: u_long pgrphash;
! 63: struct proclist allproc;
! 64: struct proclist zombproc;
! 65:
! 66: struct pool proc_pool;
! 67: struct pool process_pool;
! 68: struct pool rusage_pool;
! 69: struct pool ucred_pool;
! 70: struct pool pgrp_pool;
! 71: struct pool session_pool;
! 72: struct pool pcred_pool;
! 73:
! 74: static void orphanpg(struct pgrp *);
! 75: #ifdef DEBUG
! 76: void pgrpdump(void);
! 77: #endif
! 78:
! 79: /*
! 80: * Initialize global process hashing structures.
! 81: */
! 82: void
! 83: procinit(void)
! 84: {
! 85: LIST_INIT(&allproc);
! 86: LIST_INIT(&zombproc);
! 87:
! 88:
! 89: pidhashtbl = hashinit(maxproc / 4, M_PROC, M_NOWAIT, &pidhash);
! 90: pgrphashtbl = hashinit(maxproc / 4, M_PROC, M_NOWAIT, &pgrphash);
! 91: uihashtbl = hashinit(maxproc / 16, M_PROC, M_NOWAIT, &uihash);
! 92: if (!pidhashtbl || !pgrphashtbl || !uihashtbl)
! 93: panic("procinit: malloc");
! 94:
! 95: pool_init(&proc_pool, sizeof(struct proc), 0, 0, 0, "procpl",
! 96: &pool_allocator_nointr);
! 97: pool_init(&process_pool, sizeof(struct process), 0, 0, 0, "processpl",
! 98: &pool_allocator_nointr);
! 99: pool_init(&rusage_pool, sizeof(struct rusage), 0, 0, 0, "zombiepl",
! 100: &pool_allocator_nointr);
! 101: pool_init(&ucred_pool, sizeof(struct ucred), 0, 0, 0, "ucredpl",
! 102: &pool_allocator_nointr);
! 103: pool_init(&pgrp_pool, sizeof(struct pgrp), 0, 0, 0, "pgrppl",
! 104: &pool_allocator_nointr);
! 105: pool_init(&session_pool, sizeof(struct session), 0, 0, 0, "sessionpl",
! 106: &pool_allocator_nointr);
! 107: pool_init(&pcred_pool, sizeof(struct pcred), 0, 0, 0, "pcredpl",
! 108: &pool_allocator_nointr);
! 109: }
! 110:
! 111: /*
! 112: * Change the count associated with number of processes
! 113: * a given user is using.
! 114: */
! 115: struct uidinfo *
! 116: uid_find(uid_t uid)
! 117: {
! 118: struct uidinfo *uip, *nuip;
! 119: struct uihashhead *uipp;
! 120:
! 121: uipp = UIHASH(uid);
! 122: LIST_FOREACH(uip, uipp, ui_hash)
! 123: if (uip->ui_uid == uid)
! 124: break;
! 125: if (uip)
! 126: return (uip);
! 127: MALLOC(nuip, struct uidinfo *, sizeof(*nuip), M_PROC, M_WAITOK);
! 128: /* may have slept, have to check again */
! 129: LIST_FOREACH(uip, uipp, ui_hash)
! 130: if (uip->ui_uid == uid)
! 131: break;
! 132: if (uip) {
! 133: free(nuip, M_PROC);
! 134: return (uip);
! 135: }
! 136: bzero(nuip, sizeof(*nuip));
! 137: nuip->ui_uid = uid;
! 138: LIST_INSERT_HEAD(uipp, nuip, ui_hash);
! 139:
! 140: return (nuip);
! 141: }
! 142:
! 143: int
! 144: chgproccnt(uid_t uid, int diff)
! 145: {
! 146: struct uidinfo *uip;
! 147:
! 148: uip = uid_find(uid);
! 149: uip->ui_proccnt += diff;
! 150: if (uip->ui_proccnt < 0)
! 151: panic("chgproccnt: procs < 0");
! 152: return (uip->ui_proccnt);
! 153: }
! 154:
! 155: /*
! 156: * Is p an inferior of the current process?
! 157: */
! 158: int
! 159: inferior(struct proc *p)
! 160: {
! 161:
! 162: for (; p != curproc; p = p->p_pptr)
! 163: if (p->p_pid == 0)
! 164: return (0);
! 165: return (1);
! 166: }
! 167:
! 168: /*
! 169: * Locate a process by number
! 170: */
! 171: struct proc *
! 172: pfind(pid_t pid)
! 173: {
! 174: struct proc *p;
! 175:
! 176: LIST_FOREACH(p, PIDHASH(pid), p_hash)
! 177: if (p->p_pid == pid)
! 178: return (p);
! 179: return (NULL);
! 180: }
! 181:
! 182: /*
! 183: * Locate a process group by number
! 184: */
! 185: struct pgrp *
! 186: pgfind(pid_t pgid)
! 187: {
! 188: struct pgrp *pgrp;
! 189:
! 190: LIST_FOREACH(pgrp, PGRPHASH(pgid), pg_hash)
! 191: if (pgrp->pg_id == pgid)
! 192: return (pgrp);
! 193: return (NULL);
! 194: }
! 195:
! 196: /*
! 197: * Move p to a new or existing process group (and session)
! 198: */
! 199: int
! 200: enterpgrp(struct proc *p, pid_t pgid, int mksess)
! 201: {
! 202: struct pgrp *pgrp = pgfind(pgid);
! 203:
! 204: #ifdef DIAGNOSTIC
! 205: if (pgrp != NULL && mksess) /* firewalls */
! 206: panic("enterpgrp: setsid into non-empty pgrp");
! 207: if (SESS_LEADER(p))
! 208: panic("enterpgrp: session leader attempted setpgrp");
! 209: #endif
! 210: if (pgrp == NULL) {
! 211: pid_t savepid = p->p_pid;
! 212: struct proc *np;
! 213: /*
! 214: * new process group
! 215: */
! 216: #ifdef DIAGNOSTIC
! 217: if (p->p_pid != pgid)
! 218: panic("enterpgrp: new pgrp and pid != pgid");
! 219: #endif
! 220: if ((np = pfind(savepid)) == NULL || np != p)
! 221: return (ESRCH);
! 222: pgrp = pool_get(&pgrp_pool, PR_WAITOK);
! 223: if (mksess) {
! 224: struct session *sess;
! 225:
! 226: /*
! 227: * new session
! 228: */
! 229: sess = pool_get(&session_pool, PR_WAITOK);
! 230: sess->s_leader = p;
! 231: sess->s_count = 1;
! 232: sess->s_ttyvp = NULL;
! 233: sess->s_ttyp = NULL;
! 234: bcopy(p->p_session->s_login, sess->s_login,
! 235: sizeof(sess->s_login));
! 236: atomic_clearbits_int(&p->p_flag, P_CONTROLT);
! 237: pgrp->pg_session = sess;
! 238: #ifdef DIAGNOSTIC
! 239: if (p != curproc)
! 240: panic("enterpgrp: mksession and p != curproc");
! 241: #endif
! 242: } else {
! 243: pgrp->pg_session = p->p_session;
! 244: pgrp->pg_session->s_count++;
! 245: }
! 246: pgrp->pg_id = pgid;
! 247: LIST_INIT(&pgrp->pg_members);
! 248: LIST_INSERT_HEAD(PGRPHASH(pgid), pgrp, pg_hash);
! 249: pgrp->pg_jobc = 0;
! 250: } else if (pgrp == p->p_pgrp)
! 251: return (0);
! 252:
! 253: /*
! 254: * Adjust eligibility of affected pgrps to participate in job control.
! 255: * Increment eligibility counts before decrementing, otherwise we
! 256: * could reach 0 spuriously during the first call.
! 257: */
! 258: fixjobc(p, pgrp, 1);
! 259: fixjobc(p, p->p_pgrp, 0);
! 260:
! 261: LIST_REMOVE(p, p_pglist);
! 262: if (LIST_EMPTY(&p->p_pgrp->pg_members))
! 263: pgdelete(p->p_pgrp);
! 264: p->p_pgrp = pgrp;
! 265: LIST_INSERT_HEAD(&pgrp->pg_members, p, p_pglist);
! 266: return (0);
! 267: }
! 268:
! 269: /*
! 270: * remove process from process group
! 271: */
! 272: int
! 273: leavepgrp(struct proc *p)
! 274: {
! 275:
! 276: LIST_REMOVE(p, p_pglist);
! 277: if (LIST_EMPTY(&p->p_pgrp->pg_members))
! 278: pgdelete(p->p_pgrp);
! 279: p->p_pgrp = 0;
! 280: return (0);
! 281: }
! 282:
! 283: /*
! 284: * delete a process group
! 285: */
! 286: void
! 287: pgdelete(struct pgrp *pgrp)
! 288: {
! 289:
! 290: if (pgrp->pg_session->s_ttyp != NULL &&
! 291: pgrp->pg_session->s_ttyp->t_pgrp == pgrp)
! 292: pgrp->pg_session->s_ttyp->t_pgrp = NULL;
! 293: LIST_REMOVE(pgrp, pg_hash);
! 294: SESSRELE(pgrp->pg_session);
! 295: pool_put(&pgrp_pool, pgrp);
! 296: }
! 297:
! 298: /*
! 299: * Adjust pgrp jobc counters when specified process changes process group.
! 300: * We count the number of processes in each process group that "qualify"
! 301: * the group for terminal job control (those with a parent in a different
! 302: * process group of the same session). If that count reaches zero, the
! 303: * process group becomes orphaned. Check both the specified process'
! 304: * process group and that of its children.
! 305: * entering == 0 => p is leaving specified group.
! 306: * entering == 1 => p is entering specified group.
! 307: */
! 308: void
! 309: fixjobc(struct proc *p, struct pgrp *pgrp, int entering)
! 310: {
! 311: struct pgrp *hispgrp;
! 312: struct session *mysession = pgrp->pg_session;
! 313:
! 314: /*
! 315: * Check p's parent to see whether p qualifies its own process
! 316: * group; if so, adjust count for p's process group.
! 317: */
! 318: if ((hispgrp = p->p_pptr->p_pgrp) != pgrp &&
! 319: hispgrp->pg_session == mysession) {
! 320: if (entering)
! 321: pgrp->pg_jobc++;
! 322: else if (--pgrp->pg_jobc == 0)
! 323: orphanpg(pgrp);
! 324: }
! 325:
! 326: /*
! 327: * Check this process' children to see whether they qualify
! 328: * their process groups; if so, adjust counts for children's
! 329: * process groups.
! 330: */
! 331: LIST_FOREACH(p, &p->p_children, p_sibling)
! 332: if ((hispgrp = p->p_pgrp) != pgrp &&
! 333: hispgrp->pg_session == mysession &&
! 334: P_ZOMBIE(p) == 0) {
! 335: if (entering)
! 336: hispgrp->pg_jobc++;
! 337: else if (--hispgrp->pg_jobc == 0)
! 338: orphanpg(hispgrp);
! 339: }
! 340: }
! 341:
! 342: /*
! 343: * A process group has become orphaned;
! 344: * if there are any stopped processes in the group,
! 345: * hang-up all process in that group.
! 346: */
! 347: static void
! 348: orphanpg(struct pgrp *pg)
! 349: {
! 350: struct proc *p;
! 351:
! 352: LIST_FOREACH(p, &pg->pg_members, p_pglist) {
! 353: if (p->p_stat == SSTOP) {
! 354: LIST_FOREACH(p, &pg->pg_members, p_pglist) {
! 355: psignal(p, SIGHUP);
! 356: psignal(p, SIGCONT);
! 357: }
! 358: return;
! 359: }
! 360: }
! 361: }
! 362:
! 363: #ifdef DDB
! 364: void
! 365: proc_printit(struct proc *p, const char *modif, int (*pr)(const char *, ...))
! 366: {
! 367: static const char *const pstat[] = {
! 368: "idle", "run", "sleep", "stop", "zombie", "dead", "onproc"
! 369: };
! 370: char pstbuf[5];
! 371: const char *pst = pstbuf;
! 372:
! 373: if (p->p_stat < 1 || p->p_stat > sizeof(pstat) / sizeof(pstat[0]))
! 374: snprintf(pstbuf, sizeof(pstbuf), "%d", p->p_stat);
! 375: else
! 376: pst = pstat[(int)p->p_stat - 1];
! 377:
! 378: (*pr)("PROC (%s) pid=%d stat=%s flags=%b\n",
! 379: p->p_comm, p->p_pid, pst, p->p_flag, P_BITS);
! 380: (*pr)(" pri=%u, usrpri=%u, nice=%d\n",
! 381: p->p_priority, p->p_usrpri, p->p_nice);
! 382: (*pr)(" forw=%p, back=%p, list=%p,%p\n",
! 383: p->p_forw, p->p_back, p->p_list.le_next, p->p_list.le_prev);
! 384: (*pr)(" user=%p, vmspace=%p\n",
! 385: p->p_addr, p->p_vmspace);
! 386: (*pr)(" estcpu=%u, cpticks=%d, pctcpu=%u.%u%, swtime=%u\n",
! 387: p->p_estcpu, p->p_cpticks, p->p_pctcpu / 100, p->p_pctcpu % 100,
! 388: p->p_swtime);
! 389: (*pr)(" user=%llu, sys=%llu, intr=%llu\n",
! 390: p->p_uticks, p->p_sticks, p->p_iticks);
! 391: }
! 392: #include <machine/db_machdep.h>
! 393:
! 394: #include <ddb/db_interface.h>
! 395: #include <ddb/db_output.h>
! 396:
! 397: void
! 398: db_show_all_procs(db_expr_t addr, int haddr, db_expr_t count, char *modif)
! 399: {
! 400: char *mode;
! 401: int doingzomb = 0;
! 402: struct proc *p, *pp;
! 403:
! 404: if (modif[0] == 0)
! 405: modif[0] = 'n'; /* default == normal mode */
! 406:
! 407: mode = "mawn";
! 408: while (*mode && *mode != modif[0])
! 409: mode++;
! 410: if (*mode == 0 || *mode == 'm') {
! 411: db_printf("usage: show all procs [/a] [/n] [/w]\n");
! 412: db_printf("\t/a == show process address info\n");
! 413: db_printf("\t/n == show normal process info [default]\n");
! 414: db_printf("\t/w == show process wait/emul info\n");
! 415: return;
! 416: }
! 417:
! 418: p = LIST_FIRST(&allproc);
! 419:
! 420: switch (*mode) {
! 421:
! 422: case 'a':
! 423: db_printf(" PID %-10s %18s %18s %18s\n",
! 424: "COMMAND", "STRUCT PROC *", "UAREA *", "VMSPACE/VM_MAP");
! 425: break;
! 426: case 'n':
! 427: db_printf(" PID %5s %5s %5s S %10s %-12s %-16s\n",
! 428: "PPID", "PGRP", "UID", "FLAGS", "WAIT", "COMMAND");
! 429: break;
! 430: case 'w':
! 431: db_printf(" PID %-16s %-8s %18s %s\n",
! 432: "COMMAND", "EMUL", "WAIT-CHANNEL", "WAIT-MSG");
! 433: break;
! 434: }
! 435:
! 436: while (p != 0) {
! 437: pp = p->p_pptr;
! 438: if (p->p_stat) {
! 439:
! 440: db_printf("%c%5d ", p == curproc ? '*' : ' ',
! 441: p->p_pid);
! 442:
! 443: switch (*mode) {
! 444:
! 445: case 'a':
! 446: db_printf("%-10.10s %18p %18p %18p\n",
! 447: p->p_comm, p, p->p_addr, p->p_vmspace);
! 448: break;
! 449:
! 450: case 'n':
! 451: db_printf("%5d %5d %5d %d %#10x "
! 452: "%-12.12s %-16s\n",
! 453: pp ? pp->p_pid : -1, p->p_pgrp->pg_id,
! 454: p->p_cred->p_ruid, p->p_stat, p->p_flag,
! 455: (p->p_wchan && p->p_wmesg) ?
! 456: p->p_wmesg : "", p->p_comm);
! 457: break;
! 458:
! 459: case 'w':
! 460: db_printf("%-16s %-8s %18p %s\n", p->p_comm,
! 461: p->p_emul->e_name, p->p_wchan,
! 462: (p->p_wchan && p->p_wmesg) ?
! 463: p->p_wmesg : "");
! 464: break;
! 465:
! 466: }
! 467: }
! 468: p = LIST_NEXT(p, p_list);
! 469: if (p == 0 && doingzomb == 0) {
! 470: doingzomb = 1;
! 471: p = LIST_FIRST(&zombproc);
! 472: }
! 473: }
! 474: }
! 475: #endif
! 476:
! 477: #ifdef DEBUG
! 478: void
! 479: pgrpdump(void)
! 480: {
! 481: struct pgrp *pgrp;
! 482: struct proc *p;
! 483: int i;
! 484:
! 485: for (i = 0; i <= pgrphash; i++) {
! 486: if (!LIST_EMPTY(&pgrphashtbl[i])) {
! 487: printf("\tindx %d\n", i);
! 488: LIST_FOREACH(pgrp, &pgrphashtbl[i], pg_hash) {
! 489: printf("\tpgrp %p, pgid %d, sess %p, sesscnt %d, mem %p\n",
! 490: pgrp, pgrp->pg_id, pgrp->pg_session,
! 491: pgrp->pg_session->s_count,
! 492: LIST_FIRST(&pgrp->pg_members));
! 493: LIST_FOREACH(p, &pgrp->pg_members, p_pglist) {
! 494: printf("\t\tpid %d addr %p pgrp %p\n",
! 495: p->p_pid, p, p->p_pgrp);
! 496: }
! 497: }
! 498: }
! 499: }
! 500: }
! 501: #endif /* DEBUG */
CVSweb