machine.c revision 1.95
1/* $OpenBSD: machine.c,v 1.95 2018/11/17 23:10:08 cheloha 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/param.h> /* DEV_BSIZE MAXCOMLEN PZERO */ 37#include <sys/types.h> 38#include <sys/signal.h> 39#include <sys/mount.h> 40#include <sys/proc.h> 41#include <sys/sched.h> 42#include <sys/swap.h> 43#include <sys/sysctl.h> 44 45#include <stdio.h> 46#include <stdlib.h> 47#include <string.h> 48#include <unistd.h> 49#include <err.h> 50#include <errno.h> 51 52#include "top.h" 53#include "display.h" 54#include "machine.h" 55#include "utils.h" 56 57static int swapmode(int *, int *); 58static char *state_abbr(struct kinfo_proc *); 59static char *format_comm(struct kinfo_proc *); 60static int cmd_matches(struct kinfo_proc *, char *); 61static char **get_proc_args(struct kinfo_proc *); 62 63/* get_process_info passes back a handle. This is what it looks like: */ 64 65struct handle { 66 struct kinfo_proc **next_proc; /* points to next valid proc pointer */ 67 int remaining; /* number of pointers remaining */ 68}; 69 70/* what we consider to be process size: */ 71#define PROCSIZE(pp) ((pp)->p_vm_tsize + (pp)->p_vm_dsize + (pp)->p_vm_ssize) 72 73/* 74 * These definitions control the format of the per-process area 75 */ 76static char header[] = 77 " PID X PRI NICE SIZE RES STATE WAIT TIME CPU COMMAND"; 78 79/* 0123456 -- field to fill in starts at header+6 */ 80#define UNAME_START 6 81 82#define Proc_format \ 83 "%5d %-8.8s %3d %4d %5s %5s %-9s %-7.7s %6s %5.2f%% %s" 84 85/* process state names for the "STATE" column of the display */ 86/* 87 * the extra nulls in the string "run" are for adding a slash and the 88 * processor number when needed 89 */ 90 91char *state_abbrev[] = { 92 "", "start", "run", "sleep", "stop", "zomb", "dead", "onproc" 93}; 94 95/* these are for calculating cpu state percentages */ 96static struct cpustats *cp_time; 97static struct cpustats *cp_old; 98static struct cpustats *cp_diff; 99 100/* these are for detailing the process states */ 101int process_states[8]; 102char *procstatenames[] = { 103 "", " starting, ", " running, ", " idle, ", 104 " stopped, ", " zombie, ", " dead, ", " on processor, ", 105 NULL 106}; 107 108/* these are for detailing the cpu states */ 109int64_t *cpu_states; 110char *cpustatenames[] = { 111 "user", "nice", "sys", "spin", "intr", "idle", NULL 112}; 113 114/* this is for tracking which cpus are online */ 115int *cpu_online; 116 117/* these are for detailing the memory statistics */ 118int memory_stats[10]; 119char *memorynames[] = { 120 "Real: ", "K/", "K act/tot ", "Free: ", "K ", 121 "Cache: ", "K ", 122 "Swap: ", "K/", "K", 123 NULL 124}; 125 126/* these are names given to allowed sorting orders -- first is default */ 127char *ordernames[] = { 128 "cpu", "size", "res", "time", "pri", "pid", "command", NULL 129}; 130 131/* these are for keeping track of the proc array */ 132static int nproc; 133static int onproc = -1; 134static int pref_len; 135static struct kinfo_proc *pbase; 136static struct kinfo_proc **pref; 137 138/* these are for getting the memory statistics */ 139static int pageshift; /* log base 2 of the pagesize */ 140 141/* define pagetok in terms of pageshift */ 142#define pagetok(size) ((size) << pageshift) 143 144int ncpu; 145int ncpuonline; 146int fscale; 147 148unsigned int maxslp; 149 150int 151getfscale(void) 152{ 153 int mib[] = { CTL_KERN, KERN_FSCALE }; 154 size_t size = sizeof(fscale); 155 156 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), 157 &fscale, &size, NULL, 0) < 0) 158 return (-1); 159 return fscale; 160} 161 162int 163getncpu(void) 164{ 165 int mib[] = { CTL_HW, HW_NCPU }; 166 int numcpu; 167 size_t size = sizeof(numcpu); 168 169 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), 170 &numcpu, &size, NULL, 0) == -1) 171 return (-1); 172 173 return (numcpu); 174} 175 176int 177getncpuonline(void) 178{ 179 int mib[] = { CTL_HW, HW_NCPUONLINE }; 180 int numcpu; 181 size_t size = sizeof(numcpu); 182 183 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), 184 &numcpu, &size, NULL, 0) == -1) 185 return (-1); 186 187 return (numcpu); 188} 189 190int 191machine_init(struct statics *statics) 192{ 193 int pagesize; 194 195 ncpu = getncpu(); 196 if (ncpu == -1) 197 return (-1); 198 if (getfscale() == -1) 199 return (-1); 200 cpu_states = calloc(ncpu, CPUSTATES * sizeof(int64_t)); 201 if (cpu_states == NULL) 202 err(1, NULL); 203 cp_time = calloc(ncpu, sizeof(*cp_time)); 204 cp_old = calloc(ncpu, sizeof(*cp_old)); 205 cp_diff = calloc(ncpu, sizeof(*cp_diff)); 206 if (cp_time == NULL || cp_old == NULL || cp_diff == NULL) 207 err(1, NULL); 208 cpu_online = calloc(ncpu, sizeof(*cpu_online)); 209 if (cpu_online == NULL) 210 err(1, NULL); 211 212 pbase = NULL; 213 pref = NULL; 214 onproc = -1; 215 nproc = 0; 216 217 /* 218 * get the page size with "getpagesize" and calculate pageshift from 219 * it 220 */ 221 pagesize = getpagesize(); 222 pageshift = 0; 223 while (pagesize > 1) { 224 pageshift++; 225 pagesize >>= 1; 226 } 227 228 /* we only need the amount of log(2)1024 for our conversion */ 229 pageshift -= LOG1024; 230 231 /* fill in the statics information */ 232 statics->procstate_names = procstatenames; 233 statics->cpustate_names = cpustatenames; 234 statics->memory_names = memorynames; 235 statics->order_names = ordernames; 236 return (0); 237} 238 239char * 240format_header(char *second_field, int show_threads) 241{ 242 char *field_name, *thread_field = " TID"; 243 char *ptr; 244 245 if (show_threads) 246 field_name = thread_field; 247 else 248 field_name = second_field; 249 250 ptr = header + UNAME_START; 251 while (*field_name != '\0') 252 *ptr++ = *field_name++; 253 return (header); 254} 255 256void 257get_system_info(struct system_info *si) 258{ 259 static int cpustats_mib[] = {CTL_KERN, KERN_CPUSTATS, /*fillme*/0}; 260 static int sysload_mib[] = {CTL_VM, VM_LOADAVG}; 261 static int uvmexp_mib[] = {CTL_VM, VM_UVMEXP}; 262 static int bcstats_mib[] = {CTL_VFS, VFS_GENERIC, VFS_BCACHESTAT}; 263 struct loadavg sysload; 264 struct uvmexp uvmexp; 265 struct bcachestats bcstats; 266 double *infoloadp; 267 size_t size; 268 int i; 269 int64_t *tmpstate; 270 271 size = sizeof(*cp_time); 272 for (i = 0; i < ncpu; i++) { 273 cpustats_mib[2] = i; 274 tmpstate = cpu_states + (CPUSTATES * i); 275 if (sysctl(cpustats_mib, 3, &cp_time[i], &size, NULL, 0) < 0) 276 warn("sysctl kern.cpustats failed"); 277 /* convert cpustats counts to percentages */ 278 (void) percentages(CPUSTATES, tmpstate, cp_time[i].cs_time, 279 cp_old[i].cs_time, cp_diff[i].cs_time); 280 /* note whether the cpu is online */ 281 cpu_online[i] = (cp_time[i].cs_flags & CPUSTATS_ONLINE) != 0; 282 } 283 284 size = sizeof(sysload); 285 if (sysctl(sysload_mib, 2, &sysload, &size, NULL, 0) < 0) 286 warn("sysctl failed"); 287 infoloadp = si->load_avg; 288 for (i = 0; i < 3; i++) 289 *infoloadp++ = ((double) sysload.ldavg[i]) / sysload.fscale; 290 291 292 /* get total -- systemwide main memory usage structure */ 293 size = sizeof(uvmexp); 294 if (sysctl(uvmexp_mib, 2, &uvmexp, &size, NULL, 0) < 0) { 295 warn("sysctl failed"); 296 bzero(&uvmexp, sizeof(uvmexp)); 297 } 298 size = sizeof(bcstats); 299 if (sysctl(bcstats_mib, 3, &bcstats, &size, NULL, 0) < 0) { 300 warn("sysctl failed"); 301 bzero(&bcstats, sizeof(bcstats)); 302 } 303 /* convert memory stats to Kbytes */ 304 memory_stats[0] = -1; 305 memory_stats[1] = pagetok(uvmexp.active); 306 memory_stats[2] = pagetok(uvmexp.npages - uvmexp.free); 307 memory_stats[3] = -1; 308 memory_stats[4] = pagetok(uvmexp.free); 309 memory_stats[5] = -1; 310 memory_stats[6] = pagetok(bcstats.numbufpages); 311 memory_stats[7] = -1; 312 313 if (!swapmode(&memory_stats[8], &memory_stats[9])) { 314 memory_stats[8] = 0; 315 memory_stats[9] = 0; 316 } 317 318 /* set arrays and strings */ 319 si->cpustates = cpu_states; 320 si->cpuonline = cpu_online; 321 si->memory = memory_stats; 322 si->last_pid = -1; 323} 324 325static struct handle handle; 326 327struct kinfo_proc * 328getprocs(int op, int arg, int *cnt) 329{ 330 size_t size; 331 int mib[6] = {CTL_KERN, KERN_PROC, 0, 0, sizeof(struct kinfo_proc), 0}; 332 static int maxslp_mib[] = {CTL_VM, VM_MAXSLP}; 333 static struct kinfo_proc *procbase; 334 int st; 335 336 mib[2] = op; 337 mib[3] = arg; 338 339 size = sizeof(maxslp); 340 if (sysctl(maxslp_mib, 2, &maxslp, &size, NULL, 0) < 0) { 341 warn("sysctl vm.maxslp failed"); 342 return (0); 343 } 344 retry: 345 free(procbase); 346 st = sysctl(mib, 6, NULL, &size, NULL, 0); 347 if (st == -1) { 348 /* _kvm_syserr(kd, kd->program, "kvm_getprocs"); */ 349 return (0); 350 } 351 size = 5 * size / 4; /* extra slop */ 352 if ((procbase = malloc(size)) == NULL) 353 return (0); 354 mib[5] = (int)(size / sizeof(struct kinfo_proc)); 355 st = sysctl(mib, 6, procbase, &size, NULL, 0); 356 if (st == -1) { 357 if (errno == ENOMEM) 358 goto retry; 359 /* _kvm_syserr(kd, kd->program, "kvm_getprocs"); */ 360 return (0); 361 } 362 *cnt = (int)(size / sizeof(struct kinfo_proc)); 363 return (procbase); 364} 365 366static char ** 367get_proc_args(struct kinfo_proc *kp) 368{ 369 static char **s; 370 static size_t siz = 1023; 371 int mib[4]; 372 373 if (!s && !(s = malloc(siz))) 374 err(1, NULL); 375 376 mib[0] = CTL_KERN; 377 mib[1] = KERN_PROC_ARGS; 378 mib[2] = kp->p_pid; 379 mib[3] = KERN_PROC_ARGV; 380 for (;;) { 381 size_t space = siz; 382 if (sysctl(mib, 4, s, &space, NULL, 0) == 0) 383 break; 384 if (errno != ENOMEM) 385 return NULL; 386 siz *= 2; 387 if ((s = realloc(s, siz)) == NULL) 388 err(1, NULL); 389 } 390 return s; 391} 392 393static int 394cmd_matches(struct kinfo_proc *proc, char *term) 395{ 396 extern int show_args; 397 char **args = NULL; 398 399 if (!term) { 400 /* No command filter set */ 401 return 1; 402 } else { 403 /* Filter set, process name needs to contain term */ 404 if (strstr(proc->p_comm, term)) 405 return 1; 406 /* If showing arguments, search those as well */ 407 if (show_args) { 408 args = get_proc_args(proc); 409 410 if (args == NULL) { 411 /* Failed to get args, so can't search them */ 412 return 0; 413 } 414 415 while (*args != NULL) { 416 if (strstr(*args, term)) 417 return 1; 418 args++; 419 } 420 } 421 } 422 return 0; 423} 424 425caddr_t 426get_process_info(struct system_info *si, struct process_select *sel, 427 int (*compare) (const void *, const void *)) 428{ 429 int show_idle, show_system, show_threads, show_uid, show_pid, show_cmd; 430 int hide_uid; 431 int total_procs, active_procs; 432 struct kinfo_proc **prefp, *pp; 433 int what = KERN_PROC_KTHREAD; 434 435 if (sel->threads) 436 what |= KERN_PROC_SHOW_THREADS; 437 438 if ((pbase = getprocs(what, 0, &nproc)) == NULL) { 439 /* warnx("%s", kvm_geterr(kd)); */ 440 quit(23); 441 } 442 if (nproc > onproc) 443 pref = reallocarray(pref, (onproc = nproc), 444 sizeof(struct kinfo_proc *)); 445 if (pref == NULL) { 446 warnx("Out of memory."); 447 quit(23); 448 } 449 /* get a pointer to the states summary array */ 450 si->procstates = process_states; 451 452 /* set up flags which define what we are going to select */ 453 show_idle = sel->idle; 454 show_system = sel->system; 455 show_threads = sel->threads; 456 show_uid = sel->uid != (uid_t)-1; 457 hide_uid = sel->huid != (uid_t)-1; 458 show_pid = sel->pid != (pid_t)-1; 459 show_cmd = sel->command != NULL; 460 461 /* count up process states and get pointers to interesting procs */ 462 total_procs = 0; 463 active_procs = 0; 464 memset((char *) process_states, 0, sizeof(process_states)); 465 prefp = pref; 466 for (pp = pbase; pp < &pbase[nproc]; pp++) { 467 /* 468 * Place pointers to each valid proc structure in pref[]. 469 * Process slots that are actually in use have a non-zero 470 * status field. Processes with P_SYSTEM set are system 471 * processes---these get ignored unless show_system is set. 472 */ 473 if (show_threads && pp->p_tid == -1) 474 continue; 475 if (pp->p_stat != 0 && 476 (show_system || (pp->p_flag & P_SYSTEM) == 0) && 477 (show_threads || (pp->p_flag & P_THREAD) == 0)) { 478 total_procs++; 479 process_states[(unsigned char) pp->p_stat]++; 480 if ((pp->p_psflags & PS_ZOMBIE) == 0 && 481 (show_idle || pp->p_pctcpu != 0 || 482 pp->p_stat == SRUN) && 483 (!hide_uid || pp->p_ruid != sel->huid) && 484 (!show_uid || pp->p_ruid == sel->uid) && 485 (!show_pid || pp->p_pid == sel->pid) && 486 (!show_cmd || cmd_matches(pp, sel->command))) { 487 *prefp++ = pp; 488 active_procs++; 489 } 490 } 491 } 492 493 /* if requested, sort the "interesting" processes */ 494 if (compare != NULL) 495 qsort((char *) pref, active_procs, 496 sizeof(struct kinfo_proc *), compare); 497 /* remember active and total counts */ 498 si->p_total = total_procs; 499 si->p_active = pref_len = active_procs; 500 501 /* pass back a handle */ 502 handle.next_proc = pref; 503 handle.remaining = active_procs; 504 return ((caddr_t) & handle); 505} 506 507char fmt[MAX_COLS]; /* static area where result is built */ 508 509static char * 510state_abbr(struct kinfo_proc *pp) 511{ 512 static char buf[10]; 513 514 if (ncpu > 1 && pp->p_cpuid != KI_NOCPU) 515 snprintf(buf, sizeof buf, "%s/%llu", 516 state_abbrev[(unsigned char)pp->p_stat], pp->p_cpuid); 517 else 518 snprintf(buf, sizeof buf, "%s", 519 state_abbrev[(unsigned char)pp->p_stat]); 520 return buf; 521} 522 523static char * 524format_comm(struct kinfo_proc *kp) 525{ 526 static char buf[MAX_COLS]; 527 char **p, **s; 528 extern int show_args; 529 530 if (!show_args) 531 return (kp->p_comm); 532 533 s = get_proc_args(kp); 534 if (s == NULL) 535 return kp->p_comm; 536 537 buf[0] = '\0'; 538 for (p = s; *p != NULL; p++) { 539 if (p != s) 540 strlcat(buf, " ", sizeof(buf)); 541 strlcat(buf, *p, sizeof(buf)); 542 } 543 if (buf[0] == '\0') 544 return (kp->p_comm); 545 return (buf); 546} 547 548char * 549format_next_process(caddr_t hndl, const char *(*get_userid)(uid_t, int), 550 pid_t *pid, int show_threads) 551{ 552 char *p_wait; 553 struct kinfo_proc *pp; 554 struct handle *hp; 555 int cputime; 556 double pct; 557 char buf[16]; 558 559 /* find and remember the next proc structure */ 560 hp = (struct handle *) hndl; 561 pp = *(hp->next_proc++); 562 hp->remaining--; 563 564 cputime = pp->p_rtime_sec + ((pp->p_rtime_usec + 500000) / 1000000); 565 566 /* calculate the base for cpu percentages */ 567 pct = (double)pp->p_pctcpu / fscale; 568 569 if (pp->p_wmesg[0]) 570 p_wait = pp->p_wmesg; 571 else 572 p_wait = "-"; 573 574 if (show_threads) 575 snprintf(buf, sizeof(buf), "%8d", pp->p_tid); 576 else 577 snprintf(buf, sizeof(buf), "%s", (*get_userid)(pp->p_ruid, 0)); 578 579 /* format this entry */ 580 snprintf(fmt, sizeof(fmt), Proc_format, pp->p_pid, buf, 581 pp->p_priority - PZERO, pp->p_nice - NZERO, 582 format_k(pagetok(PROCSIZE(pp))), 583 format_k(pagetok(pp->p_vm_rssize)), 584 (pp->p_stat == SSLEEP && pp->p_slptime > maxslp) ? 585 "idle" : state_abbr(pp), 586 p_wait, format_time(cputime), 100.0 * pct, 587 printable(format_comm(pp))); 588 589 *pid = pp->p_pid; 590 /* return the result */ 591 return (fmt); 592} 593 594/* comparison routine for qsort */ 595static unsigned char sorted_state[] = 596{ 597 0, /* not used */ 598 4, /* start */ 599 5, /* run */ 600 2, /* sleep */ 601 3, /* stop */ 602 1 /* zombie */ 603}; 604 605/* 606 * proc_compares - comparison functions for "qsort" 607 */ 608 609/* 610 * First, the possible comparison keys. These are defined in such a way 611 * that they can be merely listed in the source code to define the actual 612 * desired ordering. 613 */ 614 615#define ORDERKEY_PCTCPU \ 616 if ((result = (int)(p2->p_pctcpu - p1->p_pctcpu)) == 0) 617#define ORDERKEY_CPUTIME \ 618 if ((result = p2->p_rtime_sec - p1->p_rtime_sec) == 0) \ 619 if ((result = p2->p_rtime_usec - p1->p_rtime_usec) == 0) 620#define ORDERKEY_STATE \ 621 if ((result = sorted_state[(unsigned char)p2->p_stat] - \ 622 sorted_state[(unsigned char)p1->p_stat]) == 0) 623#define ORDERKEY_PRIO \ 624 if ((result = p2->p_priority - p1->p_priority) == 0) 625#define ORDERKEY_RSSIZE \ 626 if ((result = p2->p_vm_rssize - p1->p_vm_rssize) == 0) 627#define ORDERKEY_MEM \ 628 if ((result = PROCSIZE(p2) - PROCSIZE(p1)) == 0) 629#define ORDERKEY_PID \ 630 if ((result = p1->p_pid - p2->p_pid) == 0) 631#define ORDERKEY_CMD \ 632 if ((result = strcmp(p1->p_comm, p2->p_comm)) == 0) 633 634/* compare_cpu - the comparison function for sorting by cpu percentage */ 635static int 636compare_cpu(const void *v1, const void *v2) 637{ 638 struct proc **pp1 = (struct proc **) v1; 639 struct proc **pp2 = (struct proc **) v2; 640 struct kinfo_proc *p1, *p2; 641 int result; 642 643 /* remove one level of indirection */ 644 p1 = *(struct kinfo_proc **) pp1; 645 p2 = *(struct kinfo_proc **) pp2; 646 647 ORDERKEY_PCTCPU 648 ORDERKEY_CPUTIME 649 ORDERKEY_STATE 650 ORDERKEY_PRIO 651 ORDERKEY_RSSIZE 652 ORDERKEY_MEM 653 ; 654 return (result); 655} 656 657/* compare_size - the comparison function for sorting by total memory usage */ 658static int 659compare_size(const void *v1, const void *v2) 660{ 661 struct proc **pp1 = (struct proc **) v1; 662 struct proc **pp2 = (struct proc **) v2; 663 struct kinfo_proc *p1, *p2; 664 int result; 665 666 /* remove one level of indirection */ 667 p1 = *(struct kinfo_proc **) pp1; 668 p2 = *(struct kinfo_proc **) pp2; 669 670 ORDERKEY_MEM 671 ORDERKEY_RSSIZE 672 ORDERKEY_PCTCPU 673 ORDERKEY_CPUTIME 674 ORDERKEY_STATE 675 ORDERKEY_PRIO 676 ; 677 return (result); 678} 679 680/* compare_res - the comparison function for sorting by resident set size */ 681static int 682compare_res(const void *v1, const void *v2) 683{ 684 struct proc **pp1 = (struct proc **) v1; 685 struct proc **pp2 = (struct proc **) v2; 686 struct kinfo_proc *p1, *p2; 687 int result; 688 689 /* remove one level of indirection */ 690 p1 = *(struct kinfo_proc **) pp1; 691 p2 = *(struct kinfo_proc **) pp2; 692 693 ORDERKEY_RSSIZE 694 ORDERKEY_MEM 695 ORDERKEY_PCTCPU 696 ORDERKEY_CPUTIME 697 ORDERKEY_STATE 698 ORDERKEY_PRIO 699 ; 700 return (result); 701} 702 703/* compare_time - the comparison function for sorting by CPU time */ 704static int 705compare_time(const void *v1, const void *v2) 706{ 707 struct proc **pp1 = (struct proc **) v1; 708 struct proc **pp2 = (struct proc **) v2; 709 struct kinfo_proc *p1, *p2; 710 int result; 711 712 /* remove one level of indirection */ 713 p1 = *(struct kinfo_proc **) pp1; 714 p2 = *(struct kinfo_proc **) pp2; 715 716 ORDERKEY_CPUTIME 717 ORDERKEY_PCTCPU 718 ORDERKEY_STATE 719 ORDERKEY_PRIO 720 ORDERKEY_MEM 721 ORDERKEY_RSSIZE 722 ; 723 return (result); 724} 725 726/* compare_prio - the comparison function for sorting by CPU time */ 727static int 728compare_prio(const void *v1, const void *v2) 729{ 730 struct proc **pp1 = (struct proc **) v1; 731 struct proc **pp2 = (struct proc **) v2; 732 struct kinfo_proc *p1, *p2; 733 int result; 734 735 /* remove one level of indirection */ 736 p1 = *(struct kinfo_proc **) pp1; 737 p2 = *(struct kinfo_proc **) pp2; 738 739 ORDERKEY_PRIO 740 ORDERKEY_PCTCPU 741 ORDERKEY_CPUTIME 742 ORDERKEY_STATE 743 ORDERKEY_RSSIZE 744 ORDERKEY_MEM 745 ; 746 return (result); 747} 748 749static int 750compare_pid(const void *v1, const void *v2) 751{ 752 struct proc **pp1 = (struct proc **) v1; 753 struct proc **pp2 = (struct proc **) v2; 754 struct kinfo_proc *p1, *p2; 755 int result; 756 757 /* remove one level of indirection */ 758 p1 = *(struct kinfo_proc **) pp1; 759 p2 = *(struct kinfo_proc **) pp2; 760 761 ORDERKEY_PID 762 ORDERKEY_PCTCPU 763 ORDERKEY_CPUTIME 764 ORDERKEY_STATE 765 ORDERKEY_PRIO 766 ORDERKEY_RSSIZE 767 ORDERKEY_MEM 768 ; 769 return (result); 770} 771 772static int 773compare_cmd(const void *v1, const void *v2) 774{ 775 struct proc **pp1 = (struct proc **) v1; 776 struct proc **pp2 = (struct proc **) v2; 777 struct kinfo_proc *p1, *p2; 778 int result; 779 780 /* remove one level of indirection */ 781 p1 = *(struct kinfo_proc **) pp1; 782 p2 = *(struct kinfo_proc **) pp2; 783 784 ORDERKEY_CMD 785 ORDERKEY_PCTCPU 786 ORDERKEY_CPUTIME 787 ORDERKEY_STATE 788 ORDERKEY_PRIO 789 ORDERKEY_RSSIZE 790 ORDERKEY_MEM 791 ; 792 return (result); 793} 794 795 796int (*proc_compares[])(const void *, const void *) = { 797 compare_cpu, 798 compare_size, 799 compare_res, 800 compare_time, 801 compare_prio, 802 compare_pid, 803 compare_cmd, 804 NULL 805}; 806 807/* 808 * proc_owner(pid) - returns the uid that owns process "pid", or -1 if 809 * the process does not exist. 810 * It is EXTREMELY IMPORTANT that this function work correctly. 811 * If top runs setuid root (as in SVR4), then this function 812 * is the only thing that stands in the way of a serious 813 * security problem. It validates requests for the "kill" 814 * and "renice" commands. 815 */ 816uid_t 817proc_owner(pid_t pid) 818{ 819 struct kinfo_proc **prefp, *pp; 820 int cnt; 821 822 prefp = pref; 823 cnt = pref_len; 824 while (--cnt >= 0) { 825 pp = *prefp++; 826 if (pp->p_pid == pid) 827 return ((uid_t)pp->p_ruid); 828 } 829 return (uid_t)(-1); 830} 831 832/* 833 * swapmode is rewritten by Tobias Weingartner <weingart@openbsd.org> 834 * to be based on the new swapctl(2) system call. 835 */ 836static int 837swapmode(int *used, int *total) 838{ 839 struct swapent *swdev; 840 int nswap, rnswap, i; 841 842 nswap = swapctl(SWAP_NSWAP, 0, 0); 843 if (nswap == 0) 844 return 0; 845 846 swdev = calloc(nswap, sizeof(*swdev)); 847 if (swdev == NULL) 848 return 0; 849 850 rnswap = swapctl(SWAP_STATS, swdev, nswap); 851 if (rnswap == -1) { 852 free(swdev); 853 return 0; 854 } 855 856 /* if rnswap != nswap, then what? */ 857 858 /* Total things up */ 859 *total = *used = 0; 860 for (i = 0; i < nswap; i++) { 861 if (swdev[i].se_flags & SWF_ENABLE) { 862 *used += (swdev[i].se_inuse / (1024 / DEV_BSIZE)); 863 *total += (swdev[i].se_nblks / (1024 / DEV_BSIZE)); 864 } 865 } 866 free(swdev); 867 return 1; 868} 869