1 /* $NetBSD: cmds.c,v 1.30 2016/10/22 22:02:55 christos Exp $ */
2
3 /*-
4 * Copyright (c) 1980, 1992, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 #if 0
35 static char sccsid[] = "@(#)cmds.c 8.2 (Berkeley) 4/29/95";
36 #endif
37 __RCSID("$NetBSD: cmds.c,v 1.30 2016/10/22 22:02:55 christos Exp $");
38 #endif /* not lint */
39
40 #include <ctype.h>
41 #include <signal.h>
42 #include <string.h>
43 #include <unistd.h>
44
45 #include "systat.h"
46 #include "extern.h"
47
48 void switch_mode(struct mode *p);
49
50 void
command(char * cmd)51 command(char *cmd)
52 {
53 struct command *c;
54 struct mode *p;
55 char *args;
56
57 if (cmd[0] == '\0')
58 return;
59
60 args = cmd;
61 cmd = strsep(&args, " \t");
62
63 if (curmode->c_commands) {
64 for (c = curmode->c_commands; c->c_name; c++) {
65 if (strstr(c->c_name, cmd) == c->c_name) {
66 (c->c_cmd)(args);
67 goto done;
68 }
69 }
70 }
71
72 for (c = global_commands; c->c_name; c++) {
73 if (strstr(c->c_name, cmd) == c->c_name) {
74 (c->c_cmd)(args);
75 goto done;
76 }
77 }
78
79 for (p = modes; p->c_name; p++) {
80 if (strstr(p->c_name, cmd) == p->c_name) {
81 switch_mode(p);
82 goto done;
83 }
84 }
85
86 if (isdigit((unsigned char)cmd[0])) {
87 global_interval(cmd);
88 goto done;
89 }
90
91 error("%s: Unknown command.", cmd);
92 done:
93 ;
94 }
95
96 void
switch_mode(struct mode * p)97 switch_mode(struct mode *p)
98 {
99 int switchfail;
100 struct mode *r;
101
102 switchfail = 0;
103 r = p;
104
105 if (curmode == p) {
106 status();
107 return;
108 }
109
110 alarm(0);
111 (*curmode->c_close)(wnd);
112 wnd = (*p->c_open)();
113 if (wnd == 0) {
114 wnd = (*curmode->c_open)();
115 if (wnd == 0) {
116 error("Couldn't change back to previous mode");
117 die(0);
118 }
119
120 p = curmode;
121 switchfail++;
122 }
123
124 if ((p->c_flags & CF_INIT) == 0) {
125 if ((*p->c_init)())
126 p->c_flags |= CF_INIT;
127 else {
128 (*p->c_close)(wnd);
129 wnd = (*curmode->c_open)();
130 p = curmode;
131 switchfail++;
132 }
133 }
134
135 curmode = p;
136 labels();
137 display(0);
138 if (switchfail && !allflag)
139 error("Couldn't switch mode, back to %s", curmode->c_name);
140 else {
141 if (switchfail && allflag) {
142 r++;
143 switch_mode(r);
144 } else {
145 status();
146 }
147 }
148 }
149
150 void
status(void)151 status(void)
152 {
153 error("Showing %s, refresh every %g seconds.", curmode->c_name, naptime);
154 }
155
156 int
prefix(const char * s1,const char * s2)157 prefix(const char *s1, const char *s2)
158 {
159
160 while (*s1 == *s2) {
161 if (*s1 == '\0')
162 return (1);
163 s1++, s2++;
164 }
165 return (*s1 == '\0');
166 }
167