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