1 /* $OpenBSD: machine.c,v 1.74 2012/07/09 22:41:45 deraadt Exp $ */ 2 3 /*- 4 * Copyright (c) 1994 Thorsten Lockert <tholo@sigmasoft.com> 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, 19 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY 20 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL 21 * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 22 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 23 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 24 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 25 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 26 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 27 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28 * 29 * AUTHOR: Thorsten Lockert <tholo@sigmasoft.com> 30 * Adapted from BSD4.4 by Christos Zoulas <christos@ee.cornell.edu> 31 * Patch for process wait display by Jarl F. Greipsland <jarle@idt.unit.no> 32 * Patch for -DORDER by Kenneth Stailey <kstailey@disclosure.com> 33 * Patch for new swapctl(2) by Tobias Weingartner <weingart@openbsd.org> 34 */ 35 36 #include <sys/types.h> 37 #include <sys/param.h> 38 #include <stdio.h> 39 #include <stdlib.h> 40 #include <string.h> 41 #include <unistd.h> 42 #include <sys/sysctl.h> 43 #include <sys/dkstat.h> 44 #include <sys/mount.h> 45 #include <sys/swap.h> 46 #include <err.h> 47 #include <errno.h> 48 49 #include "top.h" 50 #include "display.h" 51 #include "machine.h" 52 #include "utils.h" 53 #include "loadavg.h" 54 55 static int swapmode(int *, int *); 56 static char *state_abbr(struct kinfo_proc *); 57 static char *format_comm(struct kinfo_proc *); 58 59 /* get_process_info passes back a handle. This is what it looks like: */ 60 61 struct handle { 62 struct kinfo_proc **next_proc; /* points to next valid proc pointer */ 63 int remaining; /* number of pointers remaining */ 64 }; 65 66 /* what we consider to be process size: */ 67 #define PROCSIZE(pp) ((pp)->p_vm_tsize + (pp)->p_vm_dsize + (pp)->p_vm_ssize) 68 69 /* 70 * These definitions control the format of the per-process area 71 */ 72 static char header[] = 73 " PID X PRI NICE SIZE RES STATE WAIT TIME CPU COMMAND"; 74 75 /* 0123456 -- field to fill in starts at header+6 */ 76 #define UNAME_START 6 77 78 #define Proc_format \ 79 "%5d %-8.8s %3d %4d %5s %5s %-9s %-7.7s %6s %5.2f%% %s" 80 81 /* process state names for the "STATE" column of the display */ 82 /* 83 * the extra nulls in the string "run" are for adding a slash and the 84 * processor number when needed 85 */ 86 87 char *state_abbrev[] = { 88 "", "start", "run", "sleep", "stop", "zomb", "dead", "onproc" 89 }; 90 91 /* these are for calculating cpu state percentages */ 92 static int64_t **cp_time; 93 static int64_t **cp_old; 94 static int64_t **cp_diff; 95 96 /* these are for detailing the process states */ 97 int process_states[8]; 98 char *procstatenames[] = { 99 "", " starting, ", " running, ", " idle, ", 100 " stopped, ", " zombie, ", " dead, ", " on processor, ", 101 NULL 102 }; 103 104 /* these are for detailing the cpu states */ 105 int64_t *cpu_states; 106 char *cpustatenames[] = { 107 "user", "nice", "system", "interrupt", "idle", NULL 108 }; 109 110 /* these are for detailing the memory statistics */ 111 int memory_stats[10]; 112 char *memorynames[] = { 113 "Real: ", "K/", "K act/tot ", "Free: ", "K ", 114 "Cache: ", "K ", 115 "Swap: ", "K/", "K", 116 NULL 117 }; 118 119 /* these are names given to allowed sorting orders -- first is default */ 120 char *ordernames[] = { 121 "cpu", "size", "res", "time", "pri", "pid", "command", NULL 122 }; 123 124 /* these are for keeping track of the proc array */ 125 static int nproc; 126 static int onproc = -1; 127 static int pref_len; 128 static struct kinfo_proc *pbase; 129 static struct kinfo_proc **pref; 130 131 /* these are for getting the memory statistics */ 132 static int pageshift; /* log base 2 of the pagesize */ 133 134 /* define pagetok in terms of pageshift */ 135 #define pagetok(size) ((size) << pageshift) 136 137 int ncpu; 138 139 unsigned int maxslp; 140 141 int 142 machine_init(struct statics *statics) 143 { 144 size_t size = sizeof(ncpu); 145 int mib[2], pagesize, cpu; 146 147 mib[0] = CTL_HW; 148 mib[1] = HW_NCPU; 149 if (sysctl(mib, 2, &ncpu, &size, NULL, 0) == -1) 150 return (-1); 151 cpu_states = calloc(ncpu, CPUSTATES * sizeof(int64_t)); 152 if (cpu_states == NULL) 153 err(1, NULL); 154 cp_time = calloc(ncpu, sizeof(int64_t *)); 155 cp_old = calloc(ncpu, sizeof(int64_t *)); 156 cp_diff = calloc(ncpu, sizeof(int64_t *)); 157 if (cp_time == NULL || cp_old == NULL || cp_diff == NULL) 158 err(1, NULL); 159 for (cpu = 0; cpu < ncpu; cpu++) { 160 cp_time[cpu] = calloc(CPUSTATES, sizeof(int64_t)); 161 cp_old[cpu] = calloc(CPUSTATES, sizeof(int64_t)); 162 cp_diff[cpu] = calloc(CPUSTATES, sizeof(int64_t)); 163 if (cp_time[cpu] == NULL || cp_old[cpu] == NULL || 164 cp_diff[cpu] == NULL) 165 err(1, NULL); 166 } 167 168 pbase = NULL; 169 pref = NULL; 170 onproc = -1; 171 nproc = 0; 172 173 /* 174 * get the page size with "getpagesize" and calculate pageshift from 175 * it 176 */ 177 pagesize = getpagesize(); 178 pageshift = 0; 179 while (pagesize > 1) { 180 pageshift++; 181 pagesize >>= 1; 182 } 183 184 /* we only need the amount of log(2)1024 for our conversion */ 185 pageshift -= LOG1024; 186 187 /* fill in the statics information */ 188 statics->procstate_names = procstatenames; 189 statics->cpustate_names = cpustatenames; 190 statics->memory_names = memorynames; 191 statics->order_names = ordernames; 192 return (0); 193 } 194 195 char * 196 format_header(char *uname_field) 197 { 198 char *ptr; 199 200 ptr = header + UNAME_START; 201 while (*uname_field != '\0') 202 *ptr++ = *uname_field++; 203 return (header); 204 } 205 206 void 207 get_system_info(struct system_info *si) 208 { 209 static int sysload_mib[] = {CTL_VM, VM_LOADAVG}; 210 static int vmtotal_mib[] = {CTL_VM, VM_METER}; 211 static int bcstats_mib[] = {CTL_VFS, VFS_GENERIC, VFS_BCACHESTAT}; 212 struct loadavg sysload; 213 struct vmtotal vmtotal; 214 struct bcachestats bcstats; 215 double *infoloadp; 216 size_t size; 217 int i; 218 int64_t *tmpstate; 219 220 if (ncpu > 1) { 221 int cp_time_mib[] = {CTL_KERN, KERN_CPTIME2, /*fillme*/0}; 222 223 size = CPUSTATES * sizeof(int64_t); 224 for (i = 0; i < ncpu; i++) { 225 cp_time_mib[2] = i; 226 tmpstate = cpu_states + (CPUSTATES * i); 227 if (sysctl(cp_time_mib, 3, cp_time[i], &size, NULL, 0) < 0) 228 warn("sysctl kern.cp_time2 failed"); 229 /* convert cp_time2 counts to percentages */ 230 (void) percentages(CPUSTATES, tmpstate, cp_time[i], 231 cp_old[i], cp_diff[i]); 232 } 233 } else { 234 int cp_time_mib[] = {CTL_KERN, KERN_CPTIME}; 235 long cp_time_tmp[CPUSTATES]; 236 237 size = sizeof(cp_time_tmp); 238 if (sysctl(cp_time_mib, 2, cp_time_tmp, &size, NULL, 0) < 0) 239 warn("sysctl kern.cp_time failed"); 240 for (i = 0; i < CPUSTATES; i++) 241 cp_time[0][i] = cp_time_tmp[i]; 242 /* convert cp_time counts to percentages */ 243 (void) percentages(CPUSTATES, cpu_states, cp_time[0], 244 cp_old[0], cp_diff[0]); 245 } 246 247 size = sizeof(sysload); 248 if (sysctl(sysload_mib, 2, &sysload, &size, NULL, 0) < 0) 249 warn("sysctl failed"); 250 infoloadp = si->load_avg; 251 for (i = 0; i < 3; i++) 252 *infoloadp++ = ((double) sysload.ldavg[i]) / sysload.fscale; 253 254 255 /* get total -- systemwide main memory usage structure */ 256 size = sizeof(vmtotal); 257 if (sysctl(vmtotal_mib, 2, &vmtotal, &size, NULL, 0) < 0) { 258 warn("sysctl failed"); 259 bzero(&vmtotal, sizeof(vmtotal)); 260 } 261 size = sizeof(bcstats); 262 if (sysctl(bcstats_mib, 3, &bcstats, &size, NULL, 0) < 0) { 263 warn("sysctl failed"); 264 bzero(&bcstats, sizeof(bcstats)); 265 } 266 /* convert memory stats to Kbytes */ 267 memory_stats[0] = -1; 268 memory_stats[1] = pagetok(vmtotal.t_arm); 269 memory_stats[2] = pagetok(vmtotal.t_rm); 270 memory_stats[3] = -1; 271 memory_stats[4] = pagetok(vmtotal.t_free); 272 memory_stats[5] = -1; 273 memory_stats[6] = pagetok(bcstats.numbufpages); 274 memory_stats[7] = -1; 275 276 if (!swapmode(&memory_stats[8], &memory_stats[9])) { 277 memory_stats[8] = 0; 278 memory_stats[9] = 0; 279 } 280 281 /* set arrays and strings */ 282 si->cpustates = cpu_states; 283 si->memory = memory_stats; 284 si->last_pid = -1; 285 } 286 287 static struct handle handle; 288 289 struct kinfo_proc * 290 getprocs(int op, int arg, int *cnt) 291 { 292 size_t size; 293 int mib[6] = {CTL_KERN, KERN_PROC, 0, 0, sizeof(struct kinfo_proc), 0}; 294 static int maxslp_mib[] = {CTL_VM, VM_MAXSLP}; 295 static struct kinfo_proc *procbase; 296 int st; 297 298 mib[2] = op; 299 mib[3] = arg; 300 301 size = sizeof(maxslp); 302 if (sysctl(maxslp_mib, 2, &maxslp, &size, NULL, 0) < 0) { 303 warn("sysctl vm.maxslp failed"); 304 return (0); 305 } 306 retry: 307 free(procbase); 308 st = sysctl(mib, 6, NULL, &size, NULL, 0); 309 if (st == -1) { 310 /* _kvm_syserr(kd, kd->program, "kvm_getprocs"); */ 311 return (0); 312 } 313 size = 5 * size / 4; /* extra slop */ 314 if ((procbase = malloc(size)) == NULL) 315 return (0); 316 mib[5] = (int)(size / sizeof(struct kinfo_proc)); 317 st = sysctl(mib, 6, procbase, &size, NULL, 0); 318 if (st == -1) { 319 if (errno == ENOMEM) 320 goto retry; 321 /* _kvm_syserr(kd, kd->program, "kvm_getprocs"); */ 322 return (0); 323 } 324 *cnt = (int)(size / sizeof(struct kinfo_proc)); 325 return (procbase); 326 } 327 328 caddr_t 329 get_process_info(struct system_info *si, struct process_select *sel, 330 int (*compare) (const void *, const void *)) 331 { 332 int show_idle, show_system, show_threads, show_uid, show_pid, show_cmd; 333 int hide_uid; 334 int total_procs, active_procs; 335 struct kinfo_proc **prefp, *pp; 336 int what = KERN_PROC_KTHREAD; 337 338 if (sel->threads) 339 what |= KERN_PROC_SHOW_THREADS; 340 341 if ((pbase = getprocs(what, 0, &nproc)) == NULL) { 342 /* warnx("%s", kvm_geterr(kd)); */ 343 quit(23); 344 } 345 if (nproc > onproc) 346 pref = (struct kinfo_proc **)realloc(pref, 347 sizeof(struct kinfo_proc *) * (onproc = nproc)); 348 if (pref == NULL) { 349 warnx("Out of memory."); 350 quit(23); 351 } 352 /* get a pointer to the states summary array */ 353 si->procstates = process_states; 354 355 /* set up flags which define what we are going to select */ 356 show_idle = sel->idle; 357 show_system = sel->system; 358 show_threads = sel->threads; 359 show_uid = sel->uid != (uid_t)-1; 360 hide_uid = sel->huid != (uid_t)-1; 361 show_pid = sel->pid != (pid_t)-1; 362 show_cmd = sel->command != NULL; 363 364 /* count up process states and get pointers to interesting procs */ 365 total_procs = 0; 366 active_procs = 0; 367 memset((char *) process_states, 0, sizeof(process_states)); 368 prefp = pref; 369 for (pp = pbase; pp < &pbase[nproc]; pp++) { 370 /* 371 * Place pointers to each valid proc structure in pref[]. 372 * Process slots that are actually in use have a non-zero 373 * status field. Processes with P_SYSTEM set are system 374 * processes---these get ignored unless show_system is set. 375 */ 376 if (show_threads && pp->p_tid == -1) 377 continue; 378 if (pp->p_stat != 0 && 379 (show_system || (pp->p_flag & P_SYSTEM) == 0) && 380 (show_threads || (pp->p_flag & P_THREAD) == 0)) { 381 total_procs++; 382 process_states[(unsigned char) pp->p_stat]++; 383 if (pp->p_stat != SZOMB && 384 (show_idle || pp->p_pctcpu != 0 || 385 pp->p_stat == SRUN) && 386 (!hide_uid || pp->p_ruid != sel->huid) && 387 (!show_uid || pp->p_ruid == sel->uid) && 388 (!show_pid || pp->p_pid == sel->pid) && 389 (!show_cmd || strstr(pp->p_comm, 390 sel->command))) { 391 *prefp++ = pp; 392 active_procs++; 393 } 394 } 395 } 396 397 /* if requested, sort the "interesting" processes */ 398 if (compare != NULL) 399 qsort((char *) pref, active_procs, 400 sizeof(struct kinfo_proc *), compare); 401 /* remember active and total counts */ 402 si->p_total = total_procs; 403 si->p_active = pref_len = active_procs; 404 405 /* pass back a handle */ 406 handle.next_proc = pref; 407 handle.remaining = active_procs; 408 return ((caddr_t) & handle); 409 } 410 411 char fmt[MAX_COLS]; /* static area where result is built */ 412 413 static char * 414 state_abbr(struct kinfo_proc *pp) 415 { 416 static char buf[10]; 417 418 if (ncpu > 1 && pp->p_cpuid != KI_NOCPU) 419 snprintf(buf, sizeof buf, "%s/%llu", 420 state_abbrev[(unsigned char)pp->p_stat], pp->p_cpuid); 421 else 422 snprintf(buf, sizeof buf, "%s", 423 state_abbrev[(unsigned char)pp->p_stat]); 424 return buf; 425 } 426 427 static char * 428 format_comm(struct kinfo_proc *kp) 429 { 430 static char **s, buf[MAX_COLS]; 431 size_t siz = 100; 432 char **p; 433 int mib[4]; 434 extern int show_args; 435 436 if (!show_args) 437 return (kp->p_comm); 438 439 for (;; siz *= 2) { 440 if ((s = realloc(s, siz)) == NULL) 441 err(1, NULL); 442 mib[0] = CTL_KERN; 443 mib[1] = KERN_PROC_ARGS; 444 mib[2] = kp->p_pid; 445 mib[3] = KERN_PROC_ARGV; 446 if (sysctl(mib, 4, s, &siz, NULL, 0) == 0) 447 break; 448 if (errno != ENOMEM) 449 return (kp->p_comm); 450 } 451 buf[0] = '\0'; 452 for (p = s; *p != NULL; p++) { 453 if (p != s) 454 strlcat(buf, " ", sizeof(buf)); 455 strlcat(buf, *p, sizeof(buf)); 456 } 457 if (buf[0] == '\0') 458 return (kp->p_comm); 459 return (buf); 460 } 461 462 char * 463 format_next_process(caddr_t handle, char *(*get_userid)(uid_t), pid_t *pid) 464 { 465 char *p_wait, waddr[sizeof(void *) * 2 + 3]; /* Hexify void pointer */ 466 struct kinfo_proc *pp; 467 struct handle *hp; 468 int cputime; 469 double pct; 470 471 /* find and remember the next proc structure */ 472 hp = (struct handle *) handle; 473 pp = *(hp->next_proc++); 474 hp->remaining--; 475 476 cputime = pp->p_rtime_sec + ((pp->p_rtime_usec + 500000) / 1000000); 477 478 /* calculate the base for cpu percentages */ 479 pct = pctdouble(pp->p_pctcpu); 480 481 if (pp->p_wchan) { 482 if (pp->p_wmesg) 483 p_wait = pp->p_wmesg; 484 else { 485 snprintf(waddr, sizeof(waddr), "%llx", 486 (unsigned long long)pp->p_wchan); 487 p_wait = waddr; 488 } 489 } else 490 p_wait = "-"; 491 492 /* format this entry */ 493 snprintf(fmt, sizeof fmt, Proc_format, 494 pp->p_pid, (*get_userid)(pp->p_ruid), 495 pp->p_priority - PZERO, pp->p_nice - NZERO, 496 format_k(pagetok(PROCSIZE(pp))), 497 format_k(pagetok(pp->p_vm_rssize)), 498 (pp->p_stat == SSLEEP && pp->p_slptime > maxslp) ? 499 "idle" : state_abbr(pp), 500 p_wait, format_time(cputime), 100.0 * pct, 501 printable(format_comm(pp))); 502 503 *pid = pp->p_pid; 504 /* return the result */ 505 return (fmt); 506 } 507 508 /* comparison routine for qsort */ 509 static unsigned char sorted_state[] = 510 { 511 0, /* not used */ 512 4, /* start */ 513 5, /* run */ 514 2, /* sleep */ 515 3, /* stop */ 516 1 /* zombie */ 517 }; 518 519 /* 520 * proc_compares - comparison functions for "qsort" 521 */ 522 523 /* 524 * First, the possible comparison keys. These are defined in such a way 525 * that they can be merely listed in the source code to define the actual 526 * desired ordering. 527 */ 528 529 #define ORDERKEY_PCTCPU \ 530 if (lresult = (pctcpu)p2->p_pctcpu - (pctcpu)p1->p_pctcpu, \ 531 (result = lresult > 0 ? 1 : lresult < 0 ? -1 : 0) == 0) 532 #define ORDERKEY_CPUTIME \ 533 if ((result = p2->p_rtime_sec - p1->p_rtime_sec) == 0) \ 534 if ((result = p2->p_rtime_usec - p1->p_rtime_usec) == 0) 535 #define ORDERKEY_STATE \ 536 if ((result = sorted_state[(unsigned char)p2->p_stat] - \ 537 sorted_state[(unsigned char)p1->p_stat]) == 0) 538 #define ORDERKEY_PRIO \ 539 if ((result = p2->p_priority - p1->p_priority) == 0) 540 #define ORDERKEY_RSSIZE \ 541 if ((result = p2->p_vm_rssize - p1->p_vm_rssize) == 0) 542 #define ORDERKEY_MEM \ 543 if ((result = PROCSIZE(p2) - PROCSIZE(p1)) == 0) 544 #define ORDERKEY_PID \ 545 if ((result = p1->p_pid - p2->p_pid) == 0) 546 #define ORDERKEY_CMD \ 547 if ((result = strcmp(p1->p_comm, p2->p_comm)) == 0) 548 549 /* compare_cpu - the comparison function for sorting by cpu percentage */ 550 static int 551 compare_cpu(const void *v1, const void *v2) 552 { 553 struct proc **pp1 = (struct proc **) v1; 554 struct proc **pp2 = (struct proc **) v2; 555 struct kinfo_proc *p1, *p2; 556 pctcpu lresult; 557 int result; 558 559 /* remove one level of indirection */ 560 p1 = *(struct kinfo_proc **) pp1; 561 p2 = *(struct kinfo_proc **) pp2; 562 563 ORDERKEY_PCTCPU 564 ORDERKEY_CPUTIME 565 ORDERKEY_STATE 566 ORDERKEY_PRIO 567 ORDERKEY_RSSIZE 568 ORDERKEY_MEM 569 ; 570 return (result); 571 } 572 573 /* compare_size - the comparison function for sorting by total memory usage */ 574 static int 575 compare_size(const void *v1, const void *v2) 576 { 577 struct proc **pp1 = (struct proc **) v1; 578 struct proc **pp2 = (struct proc **) v2; 579 struct kinfo_proc *p1, *p2; 580 pctcpu lresult; 581 int result; 582 583 /* remove one level of indirection */ 584 p1 = *(struct kinfo_proc **) pp1; 585 p2 = *(struct kinfo_proc **) pp2; 586 587 ORDERKEY_MEM 588 ORDERKEY_RSSIZE 589 ORDERKEY_PCTCPU 590 ORDERKEY_CPUTIME 591 ORDERKEY_STATE 592 ORDERKEY_PRIO 593 ; 594 return (result); 595 } 596 597 /* compare_res - the comparison function for sorting by resident set size */ 598 static int 599 compare_res(const void *v1, const void *v2) 600 { 601 struct proc **pp1 = (struct proc **) v1; 602 struct proc **pp2 = (struct proc **) v2; 603 struct kinfo_proc *p1, *p2; 604 pctcpu lresult; 605 int result; 606 607 /* remove one level of indirection */ 608 p1 = *(struct kinfo_proc **) pp1; 609 p2 = *(struct kinfo_proc **) pp2; 610 611 ORDERKEY_RSSIZE 612 ORDERKEY_MEM 613 ORDERKEY_PCTCPU 614 ORDERKEY_CPUTIME 615 ORDERKEY_STATE 616 ORDERKEY_PRIO 617 ; 618 return (result); 619 } 620 621 /* compare_time - the comparison function for sorting by CPU time */ 622 static int 623 compare_time(const void *v1, const void *v2) 624 { 625 struct proc **pp1 = (struct proc **) v1; 626 struct proc **pp2 = (struct proc **) v2; 627 struct kinfo_proc *p1, *p2; 628 pctcpu lresult; 629 int result; 630 631 /* remove one level of indirection */ 632 p1 = *(struct kinfo_proc **) pp1; 633 p2 = *(struct kinfo_proc **) pp2; 634 635 ORDERKEY_CPUTIME 636 ORDERKEY_PCTCPU 637 ORDERKEY_STATE 638 ORDERKEY_PRIO 639 ORDERKEY_MEM 640 ORDERKEY_RSSIZE 641 ; 642 return (result); 643 } 644 645 /* compare_prio - the comparison function for sorting by CPU time */ 646 static int 647 compare_prio(const void *v1, const void *v2) 648 { 649 struct proc **pp1 = (struct proc **) v1; 650 struct proc **pp2 = (struct proc **) v2; 651 struct kinfo_proc *p1, *p2; 652 pctcpu lresult; 653 int result; 654 655 /* remove one level of indirection */ 656 p1 = *(struct kinfo_proc **) pp1; 657 p2 = *(struct kinfo_proc **) pp2; 658 659 ORDERKEY_PRIO 660 ORDERKEY_PCTCPU 661 ORDERKEY_CPUTIME 662 ORDERKEY_STATE 663 ORDERKEY_RSSIZE 664 ORDERKEY_MEM 665 ; 666 return (result); 667 } 668 669 static int 670 compare_pid(const void *v1, const void *v2) 671 { 672 struct proc **pp1 = (struct proc **) v1; 673 struct proc **pp2 = (struct proc **) v2; 674 struct kinfo_proc *p1, *p2; 675 pctcpu lresult; 676 int result; 677 678 /* remove one level of indirection */ 679 p1 = *(struct kinfo_proc **) pp1; 680 p2 = *(struct kinfo_proc **) pp2; 681 682 ORDERKEY_PID 683 ORDERKEY_PCTCPU 684 ORDERKEY_CPUTIME 685 ORDERKEY_STATE 686 ORDERKEY_PRIO 687 ORDERKEY_RSSIZE 688 ORDERKEY_MEM 689 ; 690 return (result); 691 } 692 693 static int 694 compare_cmd(const void *v1, const void *v2) 695 { 696 struct proc **pp1 = (struct proc **) v1; 697 struct proc **pp2 = (struct proc **) v2; 698 struct kinfo_proc *p1, *p2; 699 pctcpu lresult; 700 int result; 701 702 /* remove one level of indirection */ 703 p1 = *(struct kinfo_proc **) pp1; 704 p2 = *(struct kinfo_proc **) pp2; 705 706 ORDERKEY_CMD 707 ORDERKEY_PCTCPU 708 ORDERKEY_CPUTIME 709 ORDERKEY_STATE 710 ORDERKEY_PRIO 711 ORDERKEY_RSSIZE 712 ORDERKEY_MEM 713 ; 714 return (result); 715 } 716 717 718 int (*proc_compares[])(const void *, const void *) = { 719 compare_cpu, 720 compare_size, 721 compare_res, 722 compare_time, 723 compare_prio, 724 compare_pid, 725 compare_cmd, 726 NULL 727 }; 728 729 /* 730 * proc_owner(pid) - returns the uid that owns process "pid", or -1 if 731 * the process does not exist. 732 * It is EXTREMELY IMPORTANT that this function work correctly. 733 * If top runs setuid root (as in SVR4), then this function 734 * is the only thing that stands in the way of a serious 735 * security problem. It validates requests for the "kill" 736 * and "renice" commands. 737 */ 738 uid_t 739 proc_owner(pid_t pid) 740 { 741 struct kinfo_proc **prefp, *pp; 742 int cnt; 743 744 prefp = pref; 745 cnt = pref_len; 746 while (--cnt >= 0) { 747 pp = *prefp++; 748 if (pp->p_pid == pid) 749 return ((uid_t)pp->p_ruid); 750 } 751 return (uid_t)(-1); 752 } 753 754 /* 755 * swapmode is rewritten by Tobias Weingartner <weingart@openbsd.org> 756 * to be based on the new swapctl(2) system call. 757 */ 758 static int 759 swapmode(int *used, int *total) 760 { 761 struct swapent *swdev; 762 int nswap, rnswap, i; 763 764 nswap = swapctl(SWAP_NSWAP, 0, 0); 765 if (nswap == 0) 766 return 0; 767 768 swdev = calloc(nswap, sizeof(*swdev)); 769 if (swdev == NULL) 770 return 0; 771 772 rnswap = swapctl(SWAP_STATS, swdev, nswap); 773 if (rnswap == -1) { 774 free(swdev); 775 return 0; 776 } 777 778 /* if rnswap != nswap, then what? */ 779 780 /* Total things up */ 781 *total = *used = 0; 782 for (i = 0; i < nswap; i++) { 783 if (swdev[i].se_flags & SWF_ENABLE) { 784 *used += (swdev[i].se_inuse / (1024 / DEV_BSIZE)); 785 *total += (swdev[i].se_nblks / (1024 / DEV_BSIZE)); 786 } 787 } 788 free(swdev); 789 return 1; 790 } 791