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