Home | History | Annotate | Line # | Download | only in systat
cmds.c revision 1.9.2.1
      1  1.9.2.1        he /*	$NetBSD: cmds.c,v 1.9.2.1 1999/09/26 13:38:54 he 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.9.2.1        he __RCSID("$NetBSD: cmds.c,v 1.9.2.1 1999/09/26 13:38:54 he 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.8     lukem 	struct cmdtab *p;
     57      1.8     lukem 	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.9  christos 	for (cp = cmd; *cp && !isspace((unsigned char)*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.9  christos 	for (; *cp && isspace((unsigned char)*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.8     lukem 	char *name;
    156      1.1       jtc {
    157      1.8     lukem 	char *p, *q;
    158      1.8     lukem 	struct cmdtab *c, *found;
    159      1.8     lukem 	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.9.2.1        he /* case insensitive prefix comparison */
    189      1.1       jtc int
    190      1.1       jtc prefix(s1, s2)
    191      1.8     lukem 	char *s1, *s2;
    192      1.1       jtc {
    193  1.9.2.1        he 	char c1, c2;
    194      1.1       jtc 
    195  1.9.2.1        he 	while (1) {
    196  1.9.2.1        he 		c1 = *s1 >= 'A' && *s1 <= 'Z' ? *s1 + 'a' - 'A' : *s1;
    197  1.9.2.1        he 		c2 = *s2 >= 'A' && *s2 <= 'Z' ? *s2 + 'a' - 'A' : *s2;
    198  1.9.2.1        he 		if (c1 != c2)
    199  1.9.2.1        he 			break;
    200  1.9.2.1        he 		if (c1 == '\0')
    201      1.5    scottr 			return (1);
    202      1.5    scottr 		s1++, s2++;
    203      1.5    scottr 	}
    204      1.5    scottr 	return (*s1 == '\0');
    205      1.1       jtc }
    206