e93fb54646c18179ce00a7ace69a66ae06edde8c
[dragonfly.git] / contrib / top / commands.c
1 /*
2  * Copyright (c) 1984 through 2008, William LeFebvre
3  * All rights reserved.
4  * 
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions are met:
7  * 
8  *     * Redistributions of source code must retain the above copyright
9  * notice, this list of conditions and the following disclaimer.
10  * 
11  *     * Redistributions in binary form must reproduce the above
12  * copyright notice, this list of conditions and the following disclaimer
13  * in the documentation and/or other materials provided with the
14  * distribution.
15  * 
16  *     * Neither the name of William LeFebvre nor the names of other
17  * contributors may be used to endorse or promote products derived from
18  * this software without specific prior written permission.
19  * 
20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
23  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
24  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
25  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
26  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
30  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31  */
32
33 /*
34  *  Top users/processes display for Unix
35  *  Version 3
36  */
37
38 /*
39  *  This file contains the routines that implement some of the interactive
40  *  mode commands.  Note that some of the commands are implemented in-line
41  *  in "main".  This is necessary because they change the global state of
42  *  "top" (i.e.:  changing the number of processes to display).
43  */
44
45 #include "os.h"
46 #include <ctype.h>
47 #include <signal.h>
48 #include <stdarg.h>
49 #include <unistd.h>
50 #include <color.h>
51 #include <errno.h>
52 #ifdef HAVE_SYS_RESOURCE_H
53 #include <sys/resource.h>
54 #endif
55
56 #if defined(HAVE_DECL_SYS_SIGLIST) & defined(HAVE_STRCASECMP)
57 #define USE_SYS_SIGLIST
58 #endif
59
60 #ifdef USE_SYS_SIGLIST
61 extern const char * const sys_siglist[];
62 extern const char * const sys_signame[];
63 #else
64 #include "sigdesc.h"            /* generated automatically */
65 #endif
66 #include "top.h"
67 #include "machine.h"
68 #include "globalstate.h"
69 #include "boolean.h"
70 #include "color.h"
71 #include "commands.h"
72 #include "display.h"
73 #include "screen.h"
74 #include "username.h"
75 #include "utils.h"
76 #include "version.h"
77
78 extern int  errno;
79
80 extern char *copyright;
81
82 typedef struct command {
83     int ch;
84     int (*cmd_func)(globalstate *);
85     char *help;
86 } command;
87
88 /*
89  *  Some of the commands make system calls that could generate errors.
90  *  These errors are collected up in an array of structures for later
91  *  contemplation and display.  Such routines return a string containing an
92  *  error message, or NULL if no errors occurred.  We need an upper limit on
93  *  the number of errors, so we arbitrarily choose 20.
94  */
95
96 #define ERRMAX 20
97
98 struct errs             /* structure for a system-call error */
99 {
100     int  errnum;        /* value of errno (that is, the actual error) */
101     char *arg;          /* argument that caused the error */
102 };
103
104 static struct errs errs[ERRMAX];
105 static int errcnt;
106
107 /* These macros get used to reset and log the errors */
108 #define ERR_RESET   errcnt = 0
109 #define ERROR(p, e) if (errcnt < ERRMAX) \
110                     { \
111                         errs[errcnt].arg = (p); \
112                         errs[errcnt++].errnum = (e); \
113                     }
114
115 /*
116  *  err_compar(p1, p2) - comparison routine used by "qsort"
117  *      for sorting errors.
118  */
119
120 int
121 err_compar(const void *p1, const void *p2)
122
123 {
124     register int result;
125
126     if ((result = ((struct errs *)p1)->errnum -
127          ((struct errs *)p2)->errnum) == 0)
128     {
129         return(strcmp(((struct errs *)p1)->arg,
130                       ((struct errs *)p2)->arg));
131     }
132     return(result);
133 }
134
135 /*
136  *  str_adderr(str, len, err) - add an explanation of error "err" to
137  *      the string "str" without overflowing length "len".  return
138  *      number of characters remaining in str, or 0 if overflowed.
139  */
140
141 int
142 str_adderr(char *str, int len, int err)
143
144 {
145     register char *msg;
146     register int  msglen;
147
148     msg = err == 0 ? "Not a number" : errmsg(err);
149     msglen = strlen(msg) + 2;
150     if (len <= msglen)
151     {
152         return(0);
153     }
154     (void) strcat(str, ": ");
155     (void) strcat(str, msg);
156     return(len - msglen);
157 }
158
159 /*
160  *  str_addarg(str, len, arg, first) - add the string argument "arg" to
161  *      the string "str" without overflowing length "len".  This is the
162  *      first in the group when "first" is set (indicating that a comma
163  *      should NOT be added to the front).  Return number of characters
164  *      remaining in str, or 0 if overflowed.
165  */
166
167 int
168 str_addarg(char *str, int len, char *arg, int first)
169
170 {
171     register int arglen;
172
173     arglen = strlen(arg);
174     if (!first)
175     {
176         arglen += 2;
177     }
178     if (len <= arglen)
179     {
180         return(0);
181     }
182     if (!first)
183     {
184         (void) strcat(str, ", ");
185     }
186     (void) strcat(str, arg);
187     return(len - arglen);
188 }
189
190 /*
191  * void err_string()
192  *
193  * Use message_error to log errors in the errs array.  This function 
194  * will combine identical errors to make the message short, but if
195  * there is more than one type of error it will call message_error
196  * for each one.
197  */
198
199 #define STRMAX 80
200
201 void
202 err_string()
203
204 {
205     register struct errs *errp;
206     register int  cnt = 0;
207     register int  first = Yes;
208     register int  currerr = -1;
209     int stringlen = 0;          /* characters still available in "string" */
210     char string[STRMAX];
211
212     /* if there are no errors, our job is easy */
213     if (errcnt == 0)
214     {
215         return;
216     }
217
218     /* sort the errors */
219     qsort((char *)errs, errcnt, sizeof(struct errs), err_compar);
220
221     /* initialize the buffer (probably not necessary) */
222     string[0] = '\0';
223     stringlen = STRMAX - 1;
224
225     /* loop thru the sorted list, logging errors */
226     while (cnt < errcnt)
227     {
228         /* point to the current error */
229         errp = &(errs[cnt++]);
230
231         /* note that on overflow "stringlen" will become 0 and all
232            subsequent calls to str_addarg or str_adderr will return 0 */
233
234         /* if the error number is different then add the error string */
235         if (errp->errnum != currerr)
236         {
237             if (currerr != -1)
238             {
239                 /* add error string and log the error */
240                 stringlen = str_adderr(string, stringlen, currerr);
241                 message_error(" %s", string);
242
243             }
244             /* reset the buffer */
245             string[0] = '\0';
246             stringlen = STRMAX - 1;
247
248             /* move to next error num */
249             currerr = errp->errnum;
250             first = Yes;
251         }
252
253         /* add this arg */
254         stringlen = str_addarg(string, stringlen, errp->arg, first);
255         first = No;
256     }
257
258     /* add final message */
259     stringlen = str_adderr(string, stringlen, currerr);
260
261     /* write the error string */
262     message_error(" %s", string);
263 }
264
265 /*
266  *  Utility routines that help with some of the commands.
267  */
268
269 char *
270 next_field(char *str)
271
272
273 {
274     if ((str = strchr(str, ' ')) == NULL)
275     {
276         return(NULL);
277     }
278     *str = '\0';
279     while (*++str == ' ') /* loop */;
280
281     /* if there is nothing left of the string, return NULL */
282     /* This fix is dedicated to Greg Earle */
283     return(*str == '\0' ? NULL : str);
284 }
285
286 int
287 scanint(char *str, int *intp)
288
289 {
290     register int val = 0;
291     register int ch;
292
293     /* if there is nothing left of the string, flag it as an error */
294     /* This fix is dedicated to Greg Earle */
295     if (*str == '\0')
296     {
297         return(-1);
298     }
299
300     while ((ch = *str++) != '\0')
301     {
302         if (isdigit(ch))
303         {
304             val = val * 10 + (ch - '0');
305         }
306         else if (isspace(ch))
307         {
308             break;
309         }
310         else
311         {
312             return(-1);
313         }
314     }
315     *intp = val;
316     return(0);
317 }
318
319 /*
320  *  error_count() - return the number of errors currently logged.
321  */
322
323 int
324 error_count()
325
326 {
327     return(errcnt);
328 }
329
330 /*
331  *  show_errors() - display on stdout the current log of errors.
332  */
333
334 void
335 show_errors()
336
337 {
338     register int cnt = 0;
339     register struct errs *errp = errs;
340
341     printf("%d error%s:\n\n", errcnt, errcnt == 1 ? "" : "s");
342     while (cnt++ < errcnt)
343     {
344         printf("%5s: %s\n", errp->arg,
345             errp->errnum == 0 ? "Not a number" : errmsg(errp->errnum));
346         errp++;
347     }
348 }
349
350 /*
351  *  kill_procs(str) - send signals to processes, much like the "kill"
352  *              command does; invoked in response to 'k'.
353  */
354
355 void
356 kill_procs(char *str)
357
358 {
359     register char *nptr;
360     int signum = SIGTERM;       /* default */
361     int procnum;
362     int uid;
363     int owner;
364 #ifndef USE_SYS_SIGLIST
365     struct sigdesc *sigp;
366 #endif
367
368     /* reset error array */
369     ERR_RESET;
370
371     /* remember our uid */
372     uid = getuid();
373
374     /* skip over leading white space */
375     while (isspace((int)*str)) str++;
376
377     if (str[0] == '-')
378     {
379         /* explicit signal specified */
380         if ((nptr = next_field(str)) == NULL)
381         {
382             message_error(" kill: no processes specified");
383             return;
384         }
385
386         str++;
387         if (isdigit((int)str[0]))
388         {
389             (void) scanint(str, &signum);
390             if (signum <= 0 || signum >= NSIG)
391             {
392                 message_error(" kill: invalid signal number");
393                 return;
394             }
395         }
396         else 
397         {
398             /* translate the name into a number */
399 #ifdef USE_SYS_SIGLIST
400             for (signum = 1; signum < NSIG; signum++)
401             {
402                 if (strcasecmp(sys_signame[signum], str) == 0)
403                 {
404                     break;
405                 }
406             }
407             if (signum == NSIG)
408             {
409                 message_error(" kill: bad signal name");
410                 return;
411             }
412 #else
413             for (sigp = sigdesc; sigp->name != NULL; sigp++)
414             {
415 #ifdef HAVE_STRCASECMP
416                 if (strcasecmp(sigp->name, str) == 0)
417 #else
418                 if (strcmp(sigp->name, str) == 0)
419 #endif
420                 {
421                     signum = sigp->number;
422                     break;
423                 }
424             }
425
426             /* was it ever found */
427             if (sigp->name == NULL)
428             {
429                 message_error(" kill: bad signal name");
430                 return;
431             }
432 #endif
433         }
434         /* put the new pointer in place */
435         str = nptr;
436     }
437
438     /* loop thru the string, killing processes */
439     do
440     {
441         if (scanint(str, &procnum) == -1)
442         {
443             ERROR(str, 0);
444         }
445         else
446         {
447             /* check process owner if we're not root */
448             owner = proc_owner(procnum);
449             if (uid && (uid != owner))
450             {
451                 ERROR(str, owner == -1 ? ESRCH : EACCES);
452             }
453             /* go in for the kill */
454             else if (kill(procnum, signum) == -1)
455             {
456                 /* chalk up an error */
457                 ERROR(str, errno);
458             }
459         }
460     } while ((str = next_field(str)) != NULL);
461
462     /* process errors */
463     err_string();
464 }
465
466 /*
467  *  renice_procs(str) - change the "nice" of processes, much like the
468  *              "renice" command does; invoked in response to 'r'.
469  */
470
471 void
472 renice_procs(char *str)
473
474 {
475     register char negate;
476     int prio;
477     int procnum;
478     int uid;
479
480     ERR_RESET;
481     uid = getuid();
482
483     /* allow for negative priority values */
484     if ((negate = (*str == '-')) != 0)
485     {
486         /* move past the minus sign */
487         str++;
488     }
489
490     /* use procnum as a temporary holding place and get the number */
491     procnum = scanint(str, &prio);
492
493     /* negate if necessary */
494     if (negate)
495     {
496         prio = -prio;
497     }
498
499 #if defined(PRIO_MIN) && defined(PRIO_MAX)
500     /* check for validity */
501     if (procnum == -1 || prio < PRIO_MIN || prio > PRIO_MAX)
502     {
503         message_error(" renice: bad priority value");
504     }
505 #endif
506
507     /* move to the first process number */
508     if ((str = next_field(str)) == NULL)
509     {
510         message_error(" remice: no processes specified");
511     }
512
513 #ifdef HAVE_SETPRIORITY
514     /* loop thru the process numbers, renicing each one */
515     do
516     {
517         if (scanint(str, &procnum) == -1)
518         {
519             ERROR(str, 0);
520         }
521
522         /* check process owner if we're not root */
523         else if (uid && (uid != proc_owner(procnum)))
524         {
525             ERROR(str, EACCES);
526         }
527         else if (setpriority(PRIO_PROCESS, procnum, prio) == -1)
528         {
529             ERROR(str, errno);
530         }
531     } while ((str = next_field(str)) != NULL);
532     err_string();
533 #else
534     message_error(" renice operation not supported");
535 #endif
536 }
537
538 /* COMMAND ROUTINES */
539
540 /*
541  * Each command routine is called by command_process and is passed a
542  * pointer to the current global state.  Command routines are free
543  * to change anything in the global state, although changes to the
544  * statics structure are discouraged.  Whatever a command routine
545  * returns will be returned by command_process.
546  */
547
548 void
549 cmd_quit(globalstate *gstate)
550
551 {
552     quit(EX_OK);
553     /*NOTREACHED*/
554 }
555
556 int
557 cmd_update(globalstate *gstate)
558
559 {
560     /* go home for visual feedback */
561     screen_home();
562     fflush(stdout);
563     message_expire();
564     return CMD_REFRESH;
565 }
566
567 int
568 cmd_redraw(globalstate *gstate)
569
570 {
571     gstate->fulldraw = Yes;
572     return CMD_REFRESH;
573 }
574
575 int
576 cmd_color(globalstate *gstate)
577
578 {
579     gstate->use_color = color_activate(-1);
580     gstate->fulldraw = Yes;
581     return CMD_REFRESH;
582 }
583
584 int
585 cmd_number(globalstate *gstate)
586
587 {
588     int newval;
589     char tmpbuf[20];
590
591     message_prompt("Number of processes to show: ");
592     newval = readline(tmpbuf, 8, Yes);
593     if (newval > -1)
594     {
595         if (newval > gstate->max_topn)
596         {
597             message_error(" This terminal can only display %d processes",
598                           gstate->max_topn);
599         }
600
601         if (newval == 0)
602         {
603             /* inhibit the header */
604             display_header(No);
605         }
606
607         else if (gstate->topn == 0)
608         {
609             display_header(Yes);
610         }
611
612         gstate->topn = newval;
613     }
614     return CMD_REFRESH;
615 }
616
617 int
618 cmd_delay(globalstate *gstate)
619
620 {
621     int newval;
622     char tmpbuf[20];
623
624     message_prompt("Seconds to delay: ");
625     if ((newval = readline(tmpbuf, 8, Yes)) > -1)
626     {
627         if ((gstate->delay = newval) == 0 && getuid() != 0)
628         {
629             gstate->delay = 1;
630         }
631     }
632     return CMD_REFRESH;
633 }
634
635 int
636 cmd_idle(globalstate *gstate)
637
638 {
639     gstate->pselect.idle = !gstate->pselect.idle;
640     message_error(" %sisplaying idle processes.",
641                   gstate->pselect.idle ? "D" : "Not d");
642     return CMD_REFRESH;
643 }
644
645 int
646 cmd_displays(globalstate *gstate)
647
648 {
649     int i;
650     char tmpbuf[20];
651
652     message_prompt("Displays to show (currently %s): ",
653                    gstate->displays == -1 ? "infinite" :
654                    itoa(gstate->displays));
655
656     if ((i = readline(tmpbuf, 10, Yes)) > 0)
657     {
658         gstate->displays = i;
659     }
660     else if (i == 0)
661     {
662         quit(EX_OK);
663         /*NOTREACHED*/
664     }
665     return CMD_OK;
666 }
667
668 int
669 cmd_cmdline(globalstate *gstate)
670
671 {
672     if (gstate->statics->flags.fullcmds)
673     {
674         gstate->pselect.fullcmd = !gstate->pselect.fullcmd;
675         message_error(" %sisplaying full command lines.",
676                       gstate->pselect.fullcmd ? "D" : "Not d");
677         return CMD_REFRESH;
678     }
679     message_error(" Full command display not supported.");
680     return CMD_OK;
681 }
682
683 int
684 cmd_order(globalstate *gstate)
685
686 {
687     char tmpbuf[MAX_COLS];
688     int i;
689
690     if (gstate->statics->order_names != NULL)
691     {
692         message_prompt("Column to sort: ");
693         if (readline(tmpbuf, sizeof(tmpbuf), No) > 0)
694         {
695             if ((i = string_index(tmpbuf, gstate->statics->order_names)) == -1)
696             {
697                 message_error(" Sort order \"%s\" not recognized", tmpbuf);
698             }
699             else
700             {
701                 gstate->order_index = i;
702                 return CMD_REFRESH;
703             }
704         }
705     }
706     return CMD_OK;
707 }
708
709 int
710 cmd_order_x(globalstate *gstate, char *name, ...)
711
712 {
713     va_list ap;
714     char *p;
715     char **names;
716     int i;
717
718     names = gstate->statics->order_names;
719     if (names != NULL)
720     {
721         if ((i = string_index(name, names)) == -1)
722         {
723             /* check the alternate list */
724             va_start(ap, name);
725             p = va_arg(ap, char *);
726             while (p != NULL)
727             {
728                 if ((i = string_index(p, names)) != -1)
729                 {
730                     gstate->order_index = i;
731                     return CMD_REFRESH;
732                 }
733                 p = va_arg(ap, char *);
734             }
735             message_error(" Sort order not recognized");
736         }
737         else
738         {
739             gstate->order_index = i;
740             return CMD_REFRESH;
741         }
742     }
743     return CMD_OK;
744 }
745
746 int
747 cmd_order_cpu(globalstate *gstate)
748
749 {
750     return cmd_order_x(gstate, "cpu", NULL);
751 }
752
753 int
754 cmd_order_pid(globalstate *gstate)
755
756 {
757     return cmd_order_x(gstate, "pid", NULL);
758 }
759
760 int
761 cmd_order_mem(globalstate *gstate)
762
763 {
764     return cmd_order_x(gstate, "mem", "size", NULL);
765 }
766
767 int
768 cmd_order_time(globalstate *gstate)
769
770 {
771     return cmd_order_x(gstate, "time");
772 }
773
774 #ifdef ENABLE_KILL
775
776 int
777 cmd_kill(globalstate *gstate)
778
779 {
780     char tmpbuf[MAX_COLS];
781
782     message_prompt_plain("kill ");
783     if (readline(tmpbuf, sizeof(tmpbuf), No) > 0)
784     {
785         kill_procs(tmpbuf);
786     }
787     return CMD_OK;
788 }
789             
790 int
791 cmd_renice(globalstate *gstate)
792
793 {
794     char tmpbuf[MAX_COLS];
795
796     message_prompt_plain("renice ");
797     if (readline(tmpbuf, sizeof(tmpbuf), No) > 0)
798     {
799         renice_procs(tmpbuf);
800     }
801     return CMD_OK;
802 }
803
804 #endif
805
806 int
807 cmd_user(globalstate *gstate)
808
809 {
810     char linebuf[MAX_COLS];
811     int i;
812     int ret = CMD_OK;
813
814     message_prompt("Username to show: ");
815     if (readline(linebuf, sizeof(linebuf), No) > 0)
816     {
817         if (linebuf[0] == '+' &&
818             linebuf[1] == '\0')
819         {
820             gstate->pselect.uid = -1;
821             ret = CMD_REFRESH;
822         }
823         else if ((i = userid(linebuf)) == -1)
824         {
825             message_error(" %s: unknown user", linebuf);
826         }
827         else
828         {
829             gstate->pselect.uid = i;
830             ret = CMD_REFRESH;
831         }
832     }
833     return ret;
834 }
835
836 int
837 cmd_command(globalstate *gstate)
838
839 {
840     char linebuf[MAX_COLS];
841
842     if (gstate->pselect.command != NULL)
843     {
844         free(gstate->pselect.command);
845         gstate->pselect.command = NULL;
846     }
847
848     message_prompt("Command to show: ");
849     if (readline(linebuf, sizeof(linebuf), No) > 0)
850     {
851         if (linebuf[0] != '\0')
852         {
853             gstate->pselect.command = strdup(linebuf);
854         }
855     }
856     return CMD_REFRESH;
857 }
858
859 int
860 cmd_useruid(globalstate *gstate)
861
862 {
863     gstate->pselect.usernames = !gstate->pselect.usernames;
864     display_header(2);
865     return CMD_REFRESH;
866 }
867
868 int
869 cmd_mode(globalstate *gstate)
870
871 {
872     if (gstate->statics->modemax <= 1)
873     {
874         return CMD_NA;
875     }
876     gstate->pselect.mode = (gstate->pselect.mode + 1) % gstate->statics->modemax;
877     display_header(2);
878     return CMD_REFRESH;
879 }
880
881 int
882 cmd_system(globalstate *gstate)
883
884 {
885     gstate->pselect.system = !gstate->pselect.system;
886     display_header(2);
887     return CMD_REFRESH;
888 }
889
890 int
891 cmd_threads(globalstate *gstate)
892
893 {
894     if (gstate->statics->flags.threads)
895     {
896         gstate->pselect.threads = !gstate->pselect.threads;
897         display_header(2);
898         return CMD_REFRESH;
899     }
900     return CMD_NA;
901 }
902
903 /* forward reference for cmd_help, as it needs to see the command_table */
904 int cmd_help(globalstate *gstate);
905
906 /* command table */
907 command command_table[] = {
908     { '\014', cmd_redraw, "redraw screen" },
909     { ' ', cmd_update, "update screen" },
910     { '?', cmd_help, "help; show this text" },
911     { 'h', cmd_help, NULL },
912     { 'C', cmd_color, "toggle the use of color" },
913     { 'H', cmd_threads, "toggle the display of individual threads" },
914     { 't', cmd_threads, NULL },
915     { 'M', cmd_order_mem, "sort by memory usage" },
916     { 'N', cmd_order_pid, "sort by process id" },
917     { 'P', cmd_order_cpu, "sort by CPU usage" },
918     { 'S', cmd_system, "toggle the display of system processes" },
919     { 'T', cmd_order_time, "sort by CPU time" },
920     { 'U', cmd_useruid, "toggle the display of usernames or uids" },
921     { 'c', cmd_command, "display processes by command name" },
922     { 'd', cmd_displays, "change number of displays to show" },
923     { 'f', cmd_cmdline, "toggle the display of full command paths" },
924     { 'i', cmd_idle, "toggle the displaying of idle processes" },
925     { 'I', cmd_idle, NULL },
926 #ifdef ENABLE_KILL
927     { 'k', cmd_kill, "kill processes; send a signal to a list of processes" },
928 #endif
929     { 'm', cmd_mode, "toggle between display modes" },
930     { 'n', cmd_number, "change number of processes to display" },
931     { '#', cmd_number, NULL },
932     { 'o', cmd_order, "specify sort order (see below)" },
933     { 'q', (int (*)(globalstate *))cmd_quit, "quit" },
934 #ifdef ENABLE_KILL
935     { 'r', cmd_renice, "renice a process" },
936 #endif
937     { 's', cmd_delay, "change number of seconds to delay between updates" },
938     { 'u', cmd_user, "display processes for only one user (+ selects all users)" },
939     { '\0', NULL, NULL },
940 };
941
942 int
943 cmd_help(globalstate *gstate)
944
945 {
946     command *c;
947     char buf[12];
948     char *p;
949     char *help;
950
951     display_pagerstart();
952
953     display_pager("Top version %s, %s\n", version_string(), copyright);
954     display_pager("Platform module: %s\n\n", MODULE);
955     display_pager("A top users display for Unix\n\n");
956     display_pager("These single-character commands are available:\n\n");
957
958     c = command_table;
959     while (c->cmd_func != NULL)
960     {
961         /* skip null help strings */
962         if ((help = c->help) == NULL)
963         {
964             continue;
965         }
966
967         /* translate character in to something readable */
968         if (c->ch < ' ')
969         {
970             buf[0] = '^';
971             buf[1] = c->ch + '@';
972             buf[2] = '\0';
973         }
974         else if (c->ch == ' ')
975         {
976             strcpy(buf, "<sp>");
977         }
978         else
979         {
980             buf[0] = c->ch;
981             buf[1] = '\0';
982         }
983
984         /* if the next command is the same, fold them onto one line */
985         if ((c+1)->cmd_func == c->cmd_func)
986         {
987             strcat(buf, " or ");
988             p = buf + strlen(buf);
989             *p++ = (c+1)->ch;
990             *p = '\0';
991             c++;
992         }
993
994         display_pager("%-7s - %s\n", buf, help);
995         c++;
996     }
997
998     display_pager("\nNot all commands are available on all systems.\n\n");
999     display_pager("Available sort orders: %s\n", gstate->order_namelist);
1000     display_pagerend();
1001     gstate->fulldraw = Yes;
1002     return CMD_REFRESH;
1003 }
1004
1005 /*
1006  * int command_process(globalstate *gstate, int cmd)
1007  *
1008  * Process the single-character command "cmd".  The global state may
1009  * be modified by the command to alter the output.  Returns CMD_ERROR
1010  * if there was a serious error that requires an immediate exit, CMD_OK
1011  * to indicate success, CMD_REFRESH to indicate that the screen needs
1012  * to be refreshed immediately, CMD_UNKNOWN when the command is not known,
1013  * and CMD_NA when the command is not available.  Error messages for
1014  * CMD_NA and CMD_UNKNOWN must be handled by the caller.
1015  */
1016
1017 int
1018 command_process(globalstate *gstate, int cmd)
1019
1020 {
1021     command *c;
1022
1023     c = command_table;
1024     while (c->cmd_func != NULL)
1025     {
1026         if (c->ch == cmd)
1027         {
1028             return (c->cmd_func)(gstate);
1029         }
1030         c++;
1031     }
1032
1033     return CMD_UNKNOWN;
1034 }