Home | History | Annotate | Line # | Download | only in systat
cmds.c revision 1.3
      1  1.3  jtc /*	$NetBSD: cmds.c,v 1.3 1995/08/31 22:20:18 jtc 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.3  jtc static char rcsid[] = "$NetBSD: cmds.c,v 1.3 1995/08/31 22:20:18 jtc 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.1  jtc         char *cmd;
     54  1.1  jtc {
     55  1.1  jtc         register struct cmdtab *p;
     56  1.1  jtc         register char *cp;
     57  1.1  jtc 	int interval, omask;
     58  1.1  jtc 
     59  1.1  jtc 	omask = sigblock(sigmask(SIGALRM));
     60  1.1  jtc         for (cp = cmd; *cp && !isspace(*cp); cp++)
     61  1.1  jtc                 ;
     62  1.1  jtc         if (*cp)
     63  1.1  jtc                 *cp++ = '\0';
     64  1.1  jtc 	if (*cmd == '\0')
     65  1.1  jtc 		return;
     66  1.1  jtc 	for (; *cp && isspace(*cp); cp++)
     67  1.1  jtc 		;
     68  1.1  jtc         if (strcmp(cmd, "quit") == 0 || strcmp(cmd, "q") == 0)
     69  1.1  jtc                 die(0);
     70  1.1  jtc 	if (strcmp(cmd, "load") == 0) {
     71  1.1  jtc 		load();
     72  1.1  jtc 		goto done;
     73  1.1  jtc 	}
     74  1.1  jtc         if (strcmp(cmd, "stop") == 0) {
     75  1.1  jtc                 alarm(0);
     76  1.1  jtc                 mvaddstr(CMDLINE, 0, "Refresh disabled.");
     77  1.1  jtc                 clrtoeol();
     78  1.1  jtc 		goto done;
     79  1.1  jtc         }
     80  1.1  jtc 	if (strcmp(cmd, "help") == 0) {
     81  1.1  jtc 		int col, len;
     82  1.1  jtc 
     83  1.1  jtc 		move(CMDLINE, col = 0);
     84  1.1  jtc 		for (p = cmdtab; p->c_name; p++) {
     85  1.1  jtc 			len = strlen(p->c_name);
     86  1.1  jtc 			if (col + len > COLS)
     87  1.1  jtc 				break;
     88  1.1  jtc 			addstr(p->c_name); col += len;
     89  1.1  jtc 			if (col + 1 < COLS)
     90  1.1  jtc 				addch(' ');
     91  1.1  jtc 		}
     92  1.1  jtc 		clrtoeol();
     93  1.1  jtc 		goto done;
     94  1.1  jtc 	}
     95  1.1  jtc 	interval = atoi(cmd);
     96  1.1  jtc         if (interval <= 0 &&
     97  1.1  jtc 	    (strcmp(cmd, "start") == 0 || strcmp(cmd, "interval") == 0)) {
     98  1.1  jtc 		interval = *cp ? atoi(cp) : naptime;
     99  1.1  jtc                 if (interval <= 0) {
    100  1.1  jtc 			error("%d: bad interval.", interval);
    101  1.1  jtc 			goto done;
    102  1.1  jtc                 }
    103  1.1  jtc 	}
    104  1.1  jtc 	if (interval > 0) {
    105  1.1  jtc                 alarm(0);
    106  1.1  jtc                 naptime = interval;
    107  1.1  jtc                 display(0);
    108  1.1  jtc                 status();
    109  1.1  jtc 		goto done;
    110  1.1  jtc         }
    111  1.1  jtc 	p = lookup(cmd);
    112  1.1  jtc 	if (p == (struct cmdtab *)-1) {
    113  1.1  jtc 		error("%s: Ambiguous command.", cmd);
    114  1.1  jtc 		goto done;
    115  1.1  jtc 	}
    116  1.1  jtc         if (p) {
    117  1.1  jtc                 if (curcmd == p)
    118  1.1  jtc 			goto done;
    119  1.1  jtc                 alarm(0);
    120  1.1  jtc 		(*curcmd->c_close)(wnd);
    121  1.1  jtc 		wnd = (*p->c_open)();
    122  1.1  jtc 		if (wnd == 0) {
    123  1.1  jtc 			error("Couldn't open new display");
    124  1.1  jtc 			wnd = (*curcmd->c_open)();
    125  1.1  jtc 			if (wnd == 0) {
    126  1.1  jtc 				error("Couldn't change back to previous cmd");
    127  1.1  jtc 				exit(1);
    128  1.1  jtc 			}
    129  1.1  jtc 			p = curcmd;
    130  1.1  jtc 		}
    131  1.1  jtc 		if ((p->c_flags & CF_INIT) == 0) {
    132  1.1  jtc 			if ((*p->c_init)())
    133  1.1  jtc 				p->c_flags |= CF_INIT;
    134  1.1  jtc 			else
    135  1.1  jtc 				goto done;
    136  1.1  jtc 		}
    137  1.1  jtc                 curcmd = p;
    138  1.1  jtc 		labels();
    139  1.1  jtc                 display(0);
    140  1.1  jtc                 status();
    141  1.1  jtc 		goto done;
    142  1.1  jtc         }
    143  1.1  jtc 	if (curcmd->c_cmd == 0 || !(*curcmd->c_cmd)(cmd, cp))
    144  1.1  jtc 		error("%s: Unknown command.", cmd);
    145  1.1  jtc done:
    146  1.1  jtc 	sigsetmask(omask);
    147  1.1  jtc }
    148  1.1  jtc 
    149  1.1  jtc struct cmdtab *
    150  1.1  jtc lookup(name)
    151  1.1  jtc 	register char *name;
    152  1.1  jtc {
    153  1.1  jtc 	register char *p, *q;
    154  1.1  jtc 	register struct cmdtab *c, *found;
    155  1.1  jtc 	register int nmatches, longest;
    156  1.1  jtc 
    157  1.1  jtc 	longest = 0;
    158  1.1  jtc 	nmatches = 0;
    159  1.1  jtc 	found = (struct cmdtab *) 0;
    160  1.1  jtc 	for (c = cmdtab; p = c->c_name; c++) {
    161  1.1  jtc 		for (q = name; *q == *p++; q++)
    162  1.1  jtc 			if (*q == 0)		/* exact match? */
    163  1.1  jtc 				return (c);
    164  1.1  jtc 		if (!*q) {			/* the name was a prefix */
    165  1.1  jtc 			if (q - name > longest) {
    166  1.1  jtc 				longest = q - name;
    167  1.1  jtc 				nmatches = 1;
    168  1.1  jtc 				found = c;
    169  1.1  jtc 			} else if (q - name == longest)
    170  1.1  jtc 				nmatches++;
    171  1.1  jtc 		}
    172  1.1  jtc 	}
    173  1.3  jtc 	if (nmatches != 1)
    174  1.1  jtc 		return ((struct cmdtab *)-1);
    175  1.1  jtc 	return (found);
    176  1.1  jtc }
    177  1.1  jtc 
    178  1.1  jtc void
    179  1.1  jtc status()
    180  1.1  jtc {
    181  1.1  jtc 
    182  1.1  jtc         error("Showing %s, refresh every %d seconds.",
    183  1.1  jtc           curcmd->c_name, naptime);
    184  1.1  jtc }
    185  1.1  jtc 
    186  1.1  jtc int
    187  1.1  jtc prefix(s1, s2)
    188  1.1  jtc         register char *s1, *s2;
    189  1.1  jtc {
    190  1.1  jtc 
    191  1.1  jtc         while (*s1 == *s2) {
    192  1.1  jtc                 if (*s1 == '\0')
    193  1.1  jtc                         return (1);
    194  1.1  jtc                 s1++, s2++;
    195  1.1  jtc         }
    196  1.1  jtc         return (*s1 == '\0');
    197  1.1  jtc }
    198