Home | History | Annotate | Line # | Download | only in systat
cmds.c revision 1.7
      1  1.7       mrg /*	$NetBSD: cmds.c,v 1.7 1997/07/21 07:04:56 mrg 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.7       mrg #include <sys/cdefs.h>
     37  1.1       jtc #ifndef lint
     38  1.2       jtc #if 0
     39  1.3       jtc static char sccsid[] = "@(#)cmds.c	8.2 (Berkeley) 4/29/95";
     40  1.2       jtc #endif
     41  1.7       mrg __RCSID("$NetBSD: cmds.c,v 1.7 1997/07/21 07:04:56 mrg Exp $");
     42  1.1       jtc #endif /* not lint */
     43  1.1       jtc 
     44  1.1       jtc #include <stdlib.h>
     45  1.1       jtc #include <unistd.h>
     46  1.1       jtc #include <signal.h>
     47  1.1       jtc #include <ctype.h>
     48  1.1       jtc #include <string.h>
     49  1.1       jtc #include "systat.h"
     50  1.1       jtc #include "extern.h"
     51  1.1       jtc 
     52  1.1       jtc void
     53  1.1       jtc command(cmd)
     54  1.5    scottr 	char *cmd;
     55  1.1       jtc {
     56  1.5    scottr 	register struct cmdtab *p;
     57  1.5    scottr 	register char *cp;
     58  1.5    scottr 	int interval;
     59  1.5    scottr 	sigset_t set;
     60  1.5    scottr 
     61  1.5    scottr 	sigemptyset(&set);
     62  1.5    scottr 	sigaddset(&set, SIGALRM);
     63  1.5    scottr 	sigprocmask(SIG_BLOCK, &set, NULL);
     64  1.5    scottr 	for (cp = cmd; *cp && !isspace(*cp); cp++)
     65  1.5    scottr 		;
     66  1.5    scottr 	if (*cp)
     67  1.5    scottr 		*cp++ = '\0';
     68  1.1       jtc 	if (*cmd == '\0')
     69  1.1       jtc 		return;
     70  1.1       jtc 	for (; *cp && isspace(*cp); cp++)
     71  1.1       jtc 		;
     72  1.5    scottr 	if (strcmp(cmd, "quit") == 0 || strcmp(cmd, "q") == 0)
     73  1.5    scottr 		die(0);
     74  1.1       jtc 	if (strcmp(cmd, "load") == 0) {
     75  1.1       jtc 		load();
     76  1.1       jtc 		goto done;
     77  1.1       jtc 	}
     78  1.5    scottr 	if (strcmp(cmd, "stop") == 0) {
     79  1.5    scottr 		alarm(0);
     80  1.5    scottr 		mvaddstr(CMDLINE, 0, "Refresh disabled.");
     81  1.5    scottr 		clrtoeol();
     82  1.1       jtc 		goto done;
     83  1.5    scottr 	}
     84  1.1       jtc 	if (strcmp(cmd, "help") == 0) {
     85  1.1       jtc 		int col, len;
     86  1.1       jtc 
     87  1.1       jtc 		move(CMDLINE, col = 0);
     88  1.1       jtc 		for (p = cmdtab; p->c_name; p++) {
     89  1.1       jtc 			len = strlen(p->c_name);
     90  1.1       jtc 			if (col + len > COLS)
     91  1.1       jtc 				break;
     92  1.1       jtc 			addstr(p->c_name); col += len;
     93  1.1       jtc 			if (col + 1 < COLS)
     94  1.1       jtc 				addch(' ');
     95  1.1       jtc 		}
     96  1.1       jtc 		clrtoeol();
     97  1.1       jtc 		goto done;
     98  1.1       jtc 	}
     99  1.1       jtc 	interval = atoi(cmd);
    100  1.5    scottr 	if (interval <= 0 &&
    101  1.1       jtc 	    (strcmp(cmd, "start") == 0 || strcmp(cmd, "interval") == 0)) {
    102  1.1       jtc 		interval = *cp ? atoi(cp) : naptime;
    103  1.5    scottr 		if (interval <= 0) {
    104  1.1       jtc 			error("%d: bad interval.", interval);
    105  1.1       jtc 			goto done;
    106  1.5    scottr 		}
    107  1.1       jtc 	}
    108  1.1       jtc 	if (interval > 0) {
    109  1.5    scottr 		alarm(0);
    110  1.5    scottr 		naptime = interval;
    111  1.5    scottr 		display(0);
    112  1.5    scottr 		status();
    113  1.1       jtc 		goto done;
    114  1.5    scottr 	}
    115  1.1       jtc 	p = lookup(cmd);
    116  1.1       jtc 	if (p == (struct cmdtab *)-1) {
    117  1.6  matthias 		error("%s: Ambiguous command.", cmd);
    118  1.1       jtc 		goto done;
    119  1.1       jtc 	}
    120  1.5    scottr 	if (p) {
    121  1.5    scottr 		if (curcmd == p)
    122  1.1       jtc 			goto done;
    123  1.5    scottr 		alarm(0);
    124  1.1       jtc 		(*curcmd->c_close)(wnd);
    125  1.1       jtc 		wnd = (*p->c_open)();
    126  1.1       jtc 		if (wnd == 0) {
    127  1.1       jtc 			error("Couldn't open new display");
    128  1.1       jtc 			wnd = (*curcmd->c_open)();
    129  1.1       jtc 			if (wnd == 0) {
    130  1.1       jtc 				error("Couldn't change back to previous cmd");
    131  1.1       jtc 				exit(1);
    132  1.1       jtc 			}
    133  1.1       jtc 			p = curcmd;
    134  1.1       jtc 		}
    135  1.1       jtc 		if ((p->c_flags & CF_INIT) == 0) {
    136  1.1       jtc 			if ((*p->c_init)())
    137  1.1       jtc 				p->c_flags |= CF_INIT;
    138  1.1       jtc 			else
    139  1.1       jtc 				goto done;
    140  1.1       jtc 		}
    141  1.5    scottr 		curcmd = p;
    142  1.1       jtc 		labels();
    143  1.5    scottr 		display(0);
    144  1.5    scottr 		status();
    145  1.1       jtc 		goto done;
    146  1.5    scottr 	}
    147  1.6  matthias 	if (curcmd->c_cmd == 0 || !(*curcmd->c_cmd)(cmd, cp))
    148  1.6  matthias 		error("%s: Unknown command.", cmd);
    149  1.1       jtc done:
    150  1.5    scottr 	sigprocmask(SIG_UNBLOCK, &set, NULL);
    151  1.1       jtc }
    152  1.1       jtc 
    153  1.1       jtc struct cmdtab *
    154  1.1       jtc lookup(name)
    155  1.1       jtc 	register char *name;
    156  1.1       jtc {
    157  1.1       jtc 	register char *p, *q;
    158  1.1       jtc 	register struct cmdtab *c, *found;
    159  1.1       jtc 	register int nmatches, longest;
    160  1.1       jtc 
    161  1.1       jtc 	longest = 0;
    162  1.1       jtc 	nmatches = 0;
    163  1.1       jtc 	found = (struct cmdtab *) 0;
    164  1.7       mrg 	for (c = cmdtab; (p = c->c_name); c++) {
    165  1.1       jtc 		for (q = name; *q == *p++; q++)
    166  1.1       jtc 			if (*q == 0)		/* exact match? */
    167  1.1       jtc 				return (c);
    168  1.1       jtc 		if (!*q) {			/* the name was a prefix */
    169  1.1       jtc 			if (q - name > longest) {
    170  1.1       jtc 				longest = q - name;
    171  1.1       jtc 				nmatches = 1;
    172  1.1       jtc 				found = c;
    173  1.1       jtc 			} else if (q - name == longest)
    174  1.1       jtc 				nmatches++;
    175  1.1       jtc 		}
    176  1.1       jtc 	}
    177  1.6  matthias 	if (nmatches > 1)
    178  1.1       jtc 		return ((struct cmdtab *)-1);
    179  1.1       jtc 	return (found);
    180  1.1       jtc }
    181  1.1       jtc 
    182  1.1       jtc void
    183  1.1       jtc status()
    184  1.1       jtc {
    185  1.5    scottr 	error("Showing %s, refresh every %d seconds.", curcmd->c_name, naptime);
    186  1.1       jtc }
    187  1.1       jtc 
    188  1.1       jtc int
    189  1.1       jtc prefix(s1, s2)
    190  1.5    scottr 	register char *s1, *s2;
    191  1.1       jtc {
    192  1.1       jtc 
    193  1.5    scottr 	while (*s1 == *s2) {
    194  1.5    scottr 		if (*s1 == '\0')
    195  1.5    scottr 			return (1);
    196  1.5    scottr 		s1++, s2++;
    197  1.5    scottr 	}
    198  1.5    scottr 	return (*s1 == '\0');
    199  1.1       jtc }
    200