Home | History | Annotate | Line # | Download | only in timedc
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