Home | History | Annotate | Line # | Download | only in systat
cmds.c revision 1.1
      1  1.1  jtc /*-
      2  1.1  jtc  * Copyright (c) 1980, 1992, 1993
      3  1.1  jtc  *	The Regents of the University of California.  All rights reserved.
      4  1.1  jtc  *
      5  1.1  jtc  * Redistribution and use in source and binary forms, with or without
      6  1.1  jtc  * modification, are permitted provided that the following conditions
      7  1.1  jtc  * are met:
      8  1.1  jtc  * 1. Redistributions of source code must retain the above copyright
      9  1.1  jtc  *    notice, this list of conditions and the following disclaimer.
     10  1.1  jtc  * 2. Redistributions in binary form must reproduce the above copyright
     11  1.1  jtc  *    notice, this list of conditions and the following disclaimer in the
     12  1.1  jtc  *    documentation and/or other materials provided with the distribution.
     13  1.1  jtc  * 3. All advertising materials mentioning features or use of this software
     14  1.1  jtc  *    must display the following acknowledgement:
     15  1.1  jtc  *	This product includes software developed by the University of
     16  1.1  jtc  *	California, Berkeley and its contributors.
     17  1.1  jtc  * 4. Neither the name of the University nor the names of its contributors
     18  1.1  jtc  *    may be used to endorse or promote products derived from this software
     19  1.1  jtc  *    without specific prior written permission.
     20  1.1  jtc  *
     21  1.1  jtc  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     22  1.1  jtc  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  1.1  jtc  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  1.1  jtc  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     25  1.1  jtc  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     26  1.1  jtc  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     27  1.1  jtc  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     28  1.1  jtc  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     29  1.1  jtc  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  1.1  jtc  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  1.1  jtc  * SUCH DAMAGE.
     32  1.1  jtc  */
     33  1.1  jtc 
     34  1.1  jtc #ifndef lint
     35  1.1  jtc static char sccsid[] = "@(#)cmds.c	8.1 (Berkeley) 6/6/93";
     36  1.1  jtc #endif /* not lint */
     37  1.1  jtc 
     38  1.1  jtc #include <stdlib.h>
     39  1.1  jtc #include <unistd.h>
     40  1.1  jtc #include <signal.h>
     41  1.1  jtc #include <ctype.h>
     42  1.1  jtc #include <string.h>
     43  1.1  jtc #include "systat.h"
     44  1.1  jtc #include "extern.h"
     45  1.1  jtc 
     46  1.1  jtc void
     47  1.1  jtc command(cmd)
     48  1.1  jtc         char *cmd;
     49  1.1  jtc {
     50  1.1  jtc         register struct cmdtab *p;
     51  1.1  jtc         register char *cp;
     52  1.1  jtc 	int interval, omask;
     53  1.1  jtc 
     54  1.1  jtc 	omask = sigblock(sigmask(SIGALRM));
     55  1.1  jtc         for (cp = cmd; *cp && !isspace(*cp); cp++)
     56  1.1  jtc                 ;
     57  1.1  jtc         if (*cp)
     58  1.1  jtc                 *cp++ = '\0';
     59  1.1  jtc 	if (*cmd == '\0')
     60  1.1  jtc 		return;
     61  1.1  jtc 	for (; *cp && isspace(*cp); cp++)
     62  1.1  jtc 		;
     63  1.1  jtc         if (strcmp(cmd, "quit") == 0 || strcmp(cmd, "q") == 0)
     64  1.1  jtc                 die(0);
     65  1.1  jtc 	if (strcmp(cmd, "load") == 0) {
     66  1.1  jtc 		load();
     67  1.1  jtc 		goto done;
     68  1.1  jtc 	}
     69  1.1  jtc         if (strcmp(cmd, "stop") == 0) {
     70  1.1  jtc                 alarm(0);
     71  1.1  jtc                 mvaddstr(CMDLINE, 0, "Refresh disabled.");
     72  1.1  jtc                 clrtoeol();
     73  1.1  jtc 		goto done;
     74  1.1  jtc         }
     75  1.1  jtc 	if (strcmp(cmd, "help") == 0) {
     76  1.1  jtc 		int col, len;
     77  1.1  jtc 
     78  1.1  jtc 		move(CMDLINE, col = 0);
     79  1.1  jtc 		for (p = cmdtab; p->c_name; p++) {
     80  1.1  jtc 			len = strlen(p->c_name);
     81  1.1  jtc 			if (col + len > COLS)
     82  1.1  jtc 				break;
     83  1.1  jtc 			addstr(p->c_name); col += len;
     84  1.1  jtc 			if (col + 1 < COLS)
     85  1.1  jtc 				addch(' ');
     86  1.1  jtc 		}
     87  1.1  jtc 		clrtoeol();
     88  1.1  jtc 		goto done;
     89  1.1  jtc 	}
     90  1.1  jtc 	interval = atoi(cmd);
     91  1.1  jtc         if (interval <= 0 &&
     92  1.1  jtc 	    (strcmp(cmd, "start") == 0 || strcmp(cmd, "interval") == 0)) {
     93  1.1  jtc 		interval = *cp ? atoi(cp) : naptime;
     94  1.1  jtc                 if (interval <= 0) {
     95  1.1  jtc 			error("%d: bad interval.", interval);
     96  1.1  jtc 			goto done;
     97  1.1  jtc                 }
     98  1.1  jtc 	}
     99  1.1  jtc 	if (interval > 0) {
    100  1.1  jtc                 alarm(0);
    101  1.1  jtc                 naptime = interval;
    102  1.1  jtc                 display(0);
    103  1.1  jtc                 status();
    104  1.1  jtc 		goto done;
    105  1.1  jtc         }
    106  1.1  jtc 	p = lookup(cmd);
    107  1.1  jtc 	if (p == (struct cmdtab *)-1) {
    108  1.1  jtc 		error("%s: Ambiguous command.", cmd);
    109  1.1  jtc 		goto done;
    110  1.1  jtc 	}
    111  1.1  jtc         if (p) {
    112  1.1  jtc                 if (curcmd == p)
    113  1.1  jtc 			goto done;
    114  1.1  jtc                 alarm(0);
    115  1.1  jtc 		(*curcmd->c_close)(wnd);
    116  1.1  jtc 		wnd = (*p->c_open)();
    117  1.1  jtc 		if (wnd == 0) {
    118  1.1  jtc 			error("Couldn't open new display");
    119  1.1  jtc 			wnd = (*curcmd->c_open)();
    120  1.1  jtc 			if (wnd == 0) {
    121  1.1  jtc 				error("Couldn't change back to previous cmd");
    122  1.1  jtc 				exit(1);
    123  1.1  jtc 			}
    124  1.1  jtc 			p = curcmd;
    125  1.1  jtc 		}
    126  1.1  jtc 		if ((p->c_flags & CF_INIT) == 0) {
    127  1.1  jtc 			if ((*p->c_init)())
    128  1.1  jtc 				p->c_flags |= CF_INIT;
    129  1.1  jtc 			else
    130  1.1  jtc 				goto done;
    131  1.1  jtc 		}
    132  1.1  jtc                 curcmd = p;
    133  1.1  jtc 		labels();
    134  1.1  jtc                 display(0);
    135  1.1  jtc                 status();
    136  1.1  jtc 		goto done;
    137  1.1  jtc         }
    138  1.1  jtc 	if (curcmd->c_cmd == 0 || !(*curcmd->c_cmd)(cmd, cp))
    139  1.1  jtc 		error("%s: Unknown command.", cmd);
    140  1.1  jtc done:
    141  1.1  jtc 	sigsetmask(omask);
    142  1.1  jtc }
    143  1.1  jtc 
    144  1.1  jtc struct cmdtab *
    145  1.1  jtc lookup(name)
    146  1.1  jtc 	register char *name;
    147  1.1  jtc {
    148  1.1  jtc 	register char *p, *q;
    149  1.1  jtc 	register struct cmdtab *c, *found;
    150  1.1  jtc 	register int nmatches, longest;
    151  1.1  jtc 
    152  1.1  jtc 	longest = 0;
    153  1.1  jtc 	nmatches = 0;
    154  1.1  jtc 	found = (struct cmdtab *) 0;
    155  1.1  jtc 	for (c = cmdtab; p = c->c_name; c++) {
    156  1.1  jtc 		for (q = name; *q == *p++; q++)
    157  1.1  jtc 			if (*q == 0)		/* exact match? */
    158  1.1  jtc 				return (c);
    159  1.1  jtc 		if (!*q) {			/* the name was a prefix */
    160  1.1  jtc 			if (q - name > longest) {
    161  1.1  jtc 				longest = q - name;
    162  1.1  jtc 				nmatches = 1;
    163  1.1  jtc 				found = c;
    164  1.1  jtc 			} else if (q - name == longest)
    165  1.1  jtc 				nmatches++;
    166  1.1  jtc 		}
    167  1.1  jtc 	}
    168  1.1  jtc 	if (nmatches > 1)
    169  1.1  jtc 		return ((struct cmdtab *)-1);
    170  1.1  jtc 	return (found);
    171  1.1  jtc }
    172  1.1  jtc 
    173  1.1  jtc void
    174  1.1  jtc status()
    175  1.1  jtc {
    176  1.1  jtc 
    177  1.1  jtc         error("Showing %s, refresh every %d seconds.",
    178  1.1  jtc           curcmd->c_name, naptime);
    179  1.1  jtc }
    180  1.1  jtc 
    181  1.1  jtc int
    182  1.1  jtc prefix(s1, s2)
    183  1.1  jtc         register char *s1, *s2;
    184  1.1  jtc {
    185  1.1  jtc 
    186  1.1  jtc         while (*s1 == *s2) {
    187  1.1  jtc                 if (*s1 == '\0')
    188  1.1  jtc                         return (1);
    189  1.1  jtc                 s1++, s2++;
    190  1.1  jtc         }
    191  1.1  jtc         return (*s1 == '\0');
    192  1.1  jtc }
    193