timedc.c revision 1.7 1 1.7 lukem /* $NetBSD: timedc.c,v 1.7 2001/01/11 03:05:42 lukem Exp $ */
2 1.4 mrg
3 1.3 cgd /*-
4 1.3 cgd * Copyright (c) 1985, 1993 The Regents of the University of California.
5 1.1 cgd * All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.5 lukem #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.5 lukem __COPYRIGHT(
39 1.3 cgd "@(#) Copyright (c) 1985, 1993 The Regents of the University of California.\n\
40 1.5 lukem All rights reserved.\n");
41 1.1 cgd #endif /* not lint */
42 1.1 cgd
43 1.1 cgd #ifndef lint
44 1.5 lukem #if 0
45 1.4 mrg static char sccsid[] = "@(#)timedc.c 8.1 (Berkeley) 6/6/93";
46 1.5 lukem #else
47 1.7 lukem __RCSID("$NetBSD: timedc.c,v 1.7 2001/01/11 03:05:42 lukem Exp $");
48 1.5 lukem #endif
49 1.1 cgd #endif /* not lint */
50 1.1 cgd
51 1.3 cgd #ifdef sgi
52 1.7 lukem #ident "$Revision: 1.7 $"
53 1.3 cgd #endif
54 1.3 cgd
55 1.1 cgd #include "timedc.h"
56 1.1 cgd #include <ctype.h>
57 1.1 cgd #include <setjmp.h>
58 1.6 lukem #include <signal.h>
59 1.3 cgd #include <stdlib.h>
60 1.6 lukem #include <string.h>
61 1.1 cgd #include <syslog.h>
62 1.6 lukem #include <unistd.h>
63 1.1 cgd
64 1.3 cgd int trace = 0;
65 1.3 cgd FILE *fd = 0;
66 1.1 cgd int margc;
67 1.1 cgd int fromatty;
68 1.1 cgd char *margv[20];
69 1.1 cgd char cmdline[200];
70 1.1 cgd jmp_buf toplevel;
71 1.3 cgd static struct cmd *getcmd(char *);
72 1.1 cgd
73 1.3 cgd int
74 1.3 cgd main(int argc, char *argv[])
75 1.1 cgd {
76 1.1 cgd register struct cmd *c;
77 1.1 cgd
78 1.7 lukem openlog("timedc", 0, LOG_AUTH);
79 1.1 cgd
80 1.1 cgd /*
81 1.1 cgd * security dictates!
82 1.1 cgd */
83 1.1 cgd if (priv_resources() < 0) {
84 1.1 cgd fprintf(stderr, "Could not get privileged resources\n");
85 1.1 cgd exit(1);
86 1.1 cgd }
87 1.1 cgd (void) setuid(getuid());
88 1.1 cgd
89 1.1 cgd if (--argc > 0) {
90 1.1 cgd c = getcmd(*++argv);
91 1.1 cgd if (c == (struct cmd *)-1) {
92 1.1 cgd printf("?Ambiguous command\n");
93 1.1 cgd exit(1);
94 1.1 cgd }
95 1.1 cgd if (c == 0) {
96 1.1 cgd printf("?Invalid command\n");
97 1.1 cgd exit(1);
98 1.1 cgd }
99 1.1 cgd if (c->c_priv && getuid()) {
100 1.1 cgd printf("?Privileged command\n");
101 1.1 cgd exit(1);
102 1.1 cgd }
103 1.1 cgd (*c->c_handler)(argc, argv);
104 1.1 cgd exit(0);
105 1.1 cgd }
106 1.3 cgd
107 1.1 cgd fromatty = isatty(fileno(stdin));
108 1.3 cgd if (setjmp(toplevel))
109 1.1 cgd putchar('\n');
110 1.3 cgd (void) signal(SIGINT, intr);
111 1.1 cgd for (;;) {
112 1.1 cgd if (fromatty) {
113 1.1 cgd printf("timedc> ");
114 1.1 cgd (void) fflush(stdout);
115 1.1 cgd }
116 1.1 cgd if (fgets(cmdline, sizeof(cmdline), stdin) == 0)
117 1.5 lukem quit(0, NULL);
118 1.1 cgd if (cmdline[0] == 0)
119 1.1 cgd break;
120 1.1 cgd makeargv();
121 1.3 cgd if (margv[0] == 0)
122 1.3 cgd continue;
123 1.1 cgd c = getcmd(margv[0]);
124 1.1 cgd if (c == (struct cmd *)-1) {
125 1.1 cgd printf("?Ambiguous command\n");
126 1.1 cgd continue;
127 1.1 cgd }
128 1.1 cgd if (c == 0) {
129 1.1 cgd printf("?Invalid command\n");
130 1.1 cgd continue;
131 1.1 cgd }
132 1.1 cgd if (c->c_priv && getuid()) {
133 1.1 cgd printf("?Privileged command\n");
134 1.1 cgd continue;
135 1.1 cgd }
136 1.1 cgd (*c->c_handler)(margc, margv);
137 1.1 cgd }
138 1.3 cgd return 0;
139 1.3 cgd }
140 1.3 cgd
141 1.3 cgd void
142 1.3 cgd intr(signo)
143 1.3 cgd int signo;
144 1.3 cgd {
145 1.3 cgd if (!fromatty)
146 1.3 cgd exit(0);
147 1.3 cgd longjmp(toplevel, 1);
148 1.1 cgd }
149 1.1 cgd
150 1.3 cgd
151 1.3 cgd static struct cmd *
152 1.3 cgd getcmd(char *name)
153 1.1 cgd {
154 1.1 cgd register char *p, *q;
155 1.1 cgd register struct cmd *c, *found;
156 1.1 cgd register int nmatches, longest;
157 1.1 cgd extern struct cmd cmdtab[];
158 1.1 cgd extern int NCMDS;
159 1.1 cgd
160 1.1 cgd longest = 0;
161 1.1 cgd nmatches = 0;
162 1.1 cgd found = 0;
163 1.1 cgd for (c = cmdtab; c < &cmdtab[NCMDS]; c++) {
164 1.1 cgd p = c->c_name;
165 1.1 cgd for (q = name; *q == *p++; q++)
166 1.1 cgd if (*q == 0) /* exact match? */
167 1.1 cgd return(c);
168 1.1 cgd if (!*q) { /* the name was a prefix */
169 1.1 cgd if (q - name > longest) {
170 1.1 cgd longest = q - name;
171 1.1 cgd nmatches = 1;
172 1.1 cgd found = c;
173 1.1 cgd } else if (q - name == longest)
174 1.1 cgd nmatches++;
175 1.1 cgd }
176 1.1 cgd }
177 1.1 cgd if (nmatches > 1)
178 1.1 cgd return((struct cmd *)-1);
179 1.1 cgd return(found);
180 1.1 cgd }
181 1.1 cgd
182 1.1 cgd /*
183 1.1 cgd * Slice a string up into argc/argv.
184 1.1 cgd */
185 1.3 cgd void
186 1.1 cgd makeargv()
187 1.1 cgd {
188 1.1 cgd register char *cp;
189 1.1 cgd register char **argp = margv;
190 1.1 cgd
191 1.1 cgd margc = 0;
192 1.1 cgd for (cp = cmdline; *cp;) {
193 1.1 cgd while (isspace(*cp))
194 1.1 cgd cp++;
195 1.1 cgd if (*cp == '\0')
196 1.1 cgd break;
197 1.1 cgd *argp++ = cp;
198 1.1 cgd margc += 1;
199 1.1 cgd while (*cp != '\0' && !isspace(*cp))
200 1.1 cgd cp++;
201 1.1 cgd if (*cp == '\0')
202 1.1 cgd break;
203 1.1 cgd *cp++ = '\0';
204 1.1 cgd }
205 1.1 cgd *argp++ = 0;
206 1.1 cgd }
207 1.1 cgd
208 1.1 cgd #define HELPINDENT (sizeof ("directory"))
209 1.1 cgd
210 1.1 cgd /*
211 1.1 cgd * Help command.
212 1.1 cgd */
213 1.3 cgd void
214 1.1 cgd help(argc, argv)
215 1.1 cgd int argc;
216 1.1 cgd char *argv[];
217 1.1 cgd {
218 1.1 cgd register struct cmd *c;
219 1.1 cgd extern struct cmd cmdtab[];
220 1.1 cgd
221 1.1 cgd if (argc == 1) {
222 1.1 cgd register int i, j, w;
223 1.1 cgd int columns, width = 0, lines;
224 1.1 cgd extern int NCMDS;
225 1.1 cgd
226 1.1 cgd printf("Commands may be abbreviated. Commands are:\n\n");
227 1.1 cgd for (c = cmdtab; c < &cmdtab[NCMDS]; c++) {
228 1.1 cgd int len = strlen(c->c_name);
229 1.1 cgd
230 1.1 cgd if (len > width)
231 1.1 cgd width = len;
232 1.1 cgd }
233 1.1 cgd width = (width + 8) &~ 7;
234 1.1 cgd columns = 80 / width;
235 1.1 cgd if (columns == 0)
236 1.1 cgd columns = 1;
237 1.1 cgd lines = (NCMDS + columns - 1) / columns;
238 1.1 cgd for (i = 0; i < lines; i++) {
239 1.1 cgd for (j = 0; j < columns; j++) {
240 1.1 cgd c = cmdtab + j * lines + i;
241 1.1 cgd printf("%s", c->c_name);
242 1.1 cgd if (c + lines >= &cmdtab[NCMDS]) {
243 1.1 cgd printf("\n");
244 1.1 cgd break;
245 1.1 cgd }
246 1.1 cgd w = strlen(c->c_name);
247 1.1 cgd while (w < width) {
248 1.1 cgd w = (w + 8) &~ 7;
249 1.1 cgd putchar('\t');
250 1.1 cgd }
251 1.1 cgd }
252 1.1 cgd }
253 1.1 cgd return;
254 1.1 cgd }
255 1.1 cgd while (--argc > 0) {
256 1.1 cgd register char *arg;
257 1.1 cgd arg = *++argv;
258 1.1 cgd c = getcmd(arg);
259 1.1 cgd if (c == (struct cmd *)-1)
260 1.1 cgd printf("?Ambiguous help command %s\n", arg);
261 1.1 cgd else if (c == (struct cmd *)0)
262 1.1 cgd printf("?Invalid help command %s\n", arg);
263 1.1 cgd else
264 1.3 cgd printf("%-*s\t%s\n", (int)HELPINDENT,
265 1.1 cgd c->c_name, c->c_help);
266 1.1 cgd }
267 1.1 cgd }
268