2 * Top users/processes display for Unix
5 * This program may be freely redistributed,
6 * but this entire comment MUST remain intact.
8 * Copyright (c) 1984, 1989, William LeFebvre, Rice University
9 * Copyright (c) 1989, 1990, 1992, William LeFebvre, Northwestern University
15 * This file contains the routines that implement some of the interactive
16 * mode commands. Note that some of the commands are implemented in-line
17 * in "main". This is necessary because they change the global state of
18 * "top" (i.e.: changing the number of processes to display).
21 #include <sys/resource.h>
22 #include <sys/signal.h>
37 static int err_compar(const void *p1, const void *p2);
39 struct errs /* structure for a system-call error */
41 int errnum; /* value of errno (that is, the actual error) */
42 char *arg; /* argument that caused the error */
45 static char *err_string(void);
46 static int str_adderr(char *str, int len, int err);
47 static int str_addarg(char *str, int len, char *arg, bool first);
50 * show_help() - display the help screen; invoked in response to
54 const struct command all_commands[] =
56 {'C', "toggle the displaying of weighted CPU percentage", false, CMD_wcputog},
57 {'d', "change number of displays to show", false, CMD_displays},
58 {'e', "list errors generated by last \"kill\" or \"renice\" command", false, CMD_errors},
59 {'H', "toggle the displaying of threads", false, CMD_thrtog},
60 {'h', "show this help text", true, CMD_help},
61 {'?', NULL, true, CMD_help},
62 {'i', "toggle the displaying of idle processes", false, CMD_idletog},
63 {'I', NULL, false, CMD_idletog},
64 {'j', "toggle the displaying of jail ID", false, CMD_jidtog},
65 {'J', "display processes for only one jail (+ selects all jails)", false, CMD_jail},
66 {'k', "kill processes; send a signal to a list of processes", false, CMD_kill},
67 {'q', "quit" , true, CMD_quit},
68 {'m', "toggle the display between 'cpu' and 'io' modes", false, CMD_viewtog},
69 {'n', "change number of processes to display", false, CMD_number},
70 {'#', NULL, false, CMD_number},
71 {'o', "specify the sort order", false, CMD_order},
72 {'p', "display one process (+ selects all processes)", false, CMD_pid},
73 {'P', "toggle the displaying of per-CPU statistics", false, CMD_pcputog},
74 {'r', "renice a process", false, CMD_renice},
75 {'s', "change number of seconds to delay between updates", false, CMD_delay},
76 {'S', "toggle the displaying of system processes", false, CMD_viewsys},
77 {'a', "toggle the displaying of process titles", false, CMD_showargs},
78 {'T', "toggle the displaying of thread IDs", false, CMD_toggletid},
79 {'t', "toggle the display of this process", false, CMD_selftog},
80 {'u', "display processes for only one user (+ selects all users)", false, CMD_user},
81 {'w', "toggle the display of swap use for each process", false, CMD_swaptog},
82 {'z', "toggle the displaying of the system idle process", false, CMD_kidletog},
83 {' ', "update the display", false, CMD_update},
84 {0, NULL, true, CMD_NONE}
90 const struct command *curcmd, *nextcmd;
92 _Static_assert(sizeof(keys) >= sizeof("a or b"), "keys right size");
94 printf("Top version FreeBSD, %s\n", copyright);
95 curcmd = all_commands;
96 while (curcmd->c != 0) {
97 if (overstrike && !curcmd->available_to_dumb) {
101 if (curcmd->desc == NULL) {
102 /* we already printed this */
106 nextcmd = curcmd + 1;
107 if (nextcmd->desc == NULL && nextcmd->c != '\0') {
108 sprintf(keys, "%c or %c", curcmd->c, nextcmd->c);
109 } else if (curcmd->c == ' '){
110 /* special case space rather than introducing a "display string" to
112 sprintf(keys, "SPC");
114 sprintf(keys, "%c", curcmd->c);
116 printf("%s\t- %s\n", keys, curcmd->desc);
122 Other commands are also available, but this terminal is not\n\
123 sophisticated enough to handle those commands gracefully.\n", stdout);
128 * Utility routines that help with some of the commands.
132 next_field(char *str)
134 if ((str = strchr(str, ' ')) == NULL)
139 while (*++str == ' ') /* loop */;
141 /* if there is nothing left of the string, return NULL */
142 /* This fix is dedicated to Greg Earle */
143 return(*str == '\0' ? NULL : str);
147 scanint(char *str, int *intp)
152 /* if there is nothing left of the string, flag it as an error */
153 /* This fix is dedicated to Greg Earle */
159 while ((ch = *str++) != '\0')
163 val = val * 10 + (ch - '0');
165 else if (isspace(ch))
179 * Some of the commands make system calls that could generate errors.
180 * These errors are collected up in an array of structures for later
181 * contemplation and display. Such routines return a string containing an
182 * error message, or NULL if no errors occurred. The next few routines are
183 * for manipulating and displaying these errors. We need an upper limit on
184 * the number of errors, so we arbitrarily choose 20.
189 static struct errs errs[ERRMAX];
191 static char err_toomany[] = " too many errors occurred";
192 static char err_listem[] =
193 " Many errors occurred. Press `e' to display the list of errors.";
195 /* These macros get used to reset and log the errors */
196 #define ERR_RESET errcnt = 0
197 #define ERROR(p, e) if (errcnt >= ERRMAX) \
199 return(err_toomany); \
203 errs[errcnt].arg = (p); \
204 errs[errcnt++].errnum = (e); \
208 * err_string() - return an appropriate error string. This is what the
209 * command will return for displaying. If no errors were logged, then
210 * return NULL. The maximum length of the error string is defined by
223 int stringlen; /* characters still available in "string" */
224 static char string[STRMAX];
226 /* if there are no errors, return NULL */
232 /* sort the errors */
233 qsort((char *)errs, errcnt, sizeof(struct errs), err_compar);
235 /* need a space at the front of the error string */
238 stringlen = STRMAX - 2;
240 /* loop thru the sorted list, building an error string */
243 errp = &(errs[cnt++]);
244 if (errp->errnum != currerr)
248 if ((stringlen = str_adderr(string, stringlen, currerr)) < 2)
252 strcat(string, "; "); /* we know there's more */
254 currerr = errp->errnum;
257 if ((stringlen = str_addarg(string, stringlen, errp->arg, first)) ==0)
264 /* add final message */
265 stringlen = str_adderr(string, stringlen, currerr);
267 /* return the error string */
268 return(stringlen == 0 ? err_listem : string);
272 * str_adderr(str, len, err) - add an explanation of error "err" to
277 str_adderr(char *str, int len, int err)
282 msg = err == 0 ? "Not a number" : strerror(err);
283 msglen = strlen(msg) + 2;
290 return(len - msglen);
294 * str_addarg(str, len, arg, first) - add the string argument "arg" to
295 * the string "str". This is the first in the group when "first"
296 * is set (indicating that a comma should NOT be added to the front).
300 str_addarg(char str[], int len, char arg[], bool first)
304 arglen = strlen(arg);
318 return(len - arglen);
322 * err_compar(p1, p2) - comparison routine used by "qsort"
323 * for sorting errors.
327 err_compar(const void *p1, const void *p2)
330 const struct errs * const g1 = (const struct errs * const)p1;
331 const struct errs * const g2 = (const struct errs * const)p2;
335 if ((result = g1->errnum - g2->errnum) == 0)
337 return(strcmp(g1->arg, g2->arg));
343 * error_count() - return the number of errors currently logged.
353 * show_errors() - display on stdout the current log of errors.
360 struct errs *errp = errs;
362 printf("%d error%s:\n\n", errcnt, errcnt == 1 ? "" : "s");
363 while (cnt++ < errcnt)
365 printf("%5s: %s\n", errp->arg,
366 errp->errnum == 0 ? "Not a number" : strerror(errp->errnum));
371 static const char no_proc_specified[] = " no processes specified";
372 static const char invalid_signal_number[] = " invalid_signal_number";
373 static const char bad_signal_name[] = " bad signal name";
374 static const char bad_pri_value[] = " bad priority value";
377 signame_to_signum(const char * sig)
381 if (strncasecmp(sig, "SIG", 3) == 0)
383 for (n = 1; n < sys_nsig; n++) {
384 if (!strcasecmp(sys_signame[n], sig))
391 * kill_procs(str) - send signals to processes, much like the "kill"
392 * command does; invoked in response to 'k'.
396 kill_procs(char *str)
399 int signum = SIGTERM; /* default */
402 /* reset error array */
405 /* skip over leading white space */
406 while (isspace(*str)) str++;
410 /* explicit signal specified */
411 if ((nptr = next_field(str)) == NULL)
413 return(no_proc_specified);
418 scanint(str + 1, &signum);
419 if (signum <= 0 || signum >= NSIG)
421 return(invalid_signal_number);
426 signum = signame_to_signum(str + 1);
428 /* was it ever found */
431 return(bad_signal_name);
434 /* put the new pointer in place */
438 /* loop thru the string, killing processes */
441 if (scanint(str, &procnum) == -1)
447 /* go in for the kill */
448 if (kill(procnum, signum) == -1)
450 /* chalk up an error */
454 } while ((str = next_field(str)) != NULL);
456 /* return appropriate error string */
457 return(err_string());
461 * renice_procs(str) - change the "nice" of processes, much like the
462 * "renice" command does; invoked in response to 'r'.
466 renice_procs(char *str)
474 /* allow for negative priority values */
475 if ((negate = (*str == '-')) != 0)
477 /* move past the minus sign */
481 /* use procnum as a temporary holding place and get the number */
482 procnum = scanint(str, &prio);
484 /* negate if necessary */
490 /* check for validity */
491 if (procnum == -1 || prio < PRIO_MIN || prio > PRIO_MAX)
493 return(bad_pri_value);
496 /* move to the first process number */
497 if ((str = next_field(str)) == NULL)
499 return(no_proc_specified);
502 /* loop thru the process numbers, renicing each one */
505 if (scanint(str, &procnum) == -1)
510 if (setpriority(PRIO_PROCESS, procnum, prio) == -1)
514 } while ((str = next_field(str)) != NULL);
516 /* return appropriate error string */
517 return(err_string());