xref: /netbsd-src/usr.sbin/lpr/lpc/lpc.c (revision f7a3540ecf73535f4217ff5a1ae640ad21e02832)
1*f7a3540eSsevan /*	$NetBSD: lpc.c,v 1.27 2017/05/04 16:26:09 sevan Exp $	*/
2fe7ed7ceSmrg 
361f28255Scgd /*
4f881d1d4Scgd  * Copyright (c) 1983, 1993
5f881d1d4Scgd  *	The Regents of the University of California.  All rights reserved.
6f881d1d4Scgd  *
761f28255Scgd  *
861f28255Scgd  * Redistribution and use in source and binary forms, with or without
961f28255Scgd  * modification, are permitted provided that the following conditions
1061f28255Scgd  * are met:
1161f28255Scgd  * 1. Redistributions of source code must retain the above copyright
1261f28255Scgd  *    notice, this list of conditions and the following disclaimer.
1361f28255Scgd  * 2. Redistributions in binary form must reproduce the above copyright
1461f28255Scgd  *    notice, this list of conditions and the following disclaimer in the
1561f28255Scgd  *    documentation and/or other materials provided with the distribution.
16326b2259Sagc  * 3. Neither the name of the University nor the names of its contributors
1761f28255Scgd  *    may be used to endorse or promote products derived from this software
1861f28255Scgd  *    without specific prior written permission.
1961f28255Scgd  *
2061f28255Scgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
2161f28255Scgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
2261f28255Scgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
2361f28255Scgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
2461f28255Scgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
2561f28255Scgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
2661f28255Scgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
2761f28255Scgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
2861f28255Scgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
2961f28255Scgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
3061f28255Scgd  * SUCH DAMAGE.
3161f28255Scgd  */
3261f28255Scgd 
33fe7ed7ceSmrg #include <sys/cdefs.h>
3461f28255Scgd #ifndef lint
359c194566Slukem __COPYRIGHT("@(#) Copyright (c) 1983, 1993\
369c194566Slukem  The Regents of the University of California.  All rights reserved.");
37fe7ed7ceSmrg #if 0
38e6a91a09Smrg static char sccsid[] = "@(#)lpc.c	8.3 (Berkeley) 4/28/95";
39fe7ed7ceSmrg #else
40*f7a3540eSsevan __RCSID("$NetBSD: lpc.c,v 1.27 2017/05/04 16:26:09 sevan Exp $");
41fe7ed7ceSmrg #endif
4261f28255Scgd #endif /* not lint */
4361f28255Scgd 
44f881d1d4Scgd #include <sys/param.h>
45f881d1d4Scgd 
46f881d1d4Scgd #include <dirent.h>
47f881d1d4Scgd #include <signal.h>
48f881d1d4Scgd #include <setjmp.h>
49f881d1d4Scgd #include <syslog.h>
5053df3feaSgarbled #include <histedit.h>
51f881d1d4Scgd #include <unistd.h>
52f881d1d4Scgd #include <stdlib.h>
53f881d1d4Scgd #include <stdio.h>
54f881d1d4Scgd #include <ctype.h>
55f881d1d4Scgd #include <string.h>
56e6a91a09Smrg #include <grp.h>
57fe7ed7ceSmrg #include <err.h>
58f881d1d4Scgd #include "lp.h"
59f881d1d4Scgd #include "lpc.h"
60f881d1d4Scgd #include "extern.h"
61f881d1d4Scgd 
62e6a91a09Smrg #ifndef LPR_OPER
63e6a91a09Smrg #define LPR_OPER	"operator"	/* group name of lpr operators */
64e6a91a09Smrg #endif
65e6a91a09Smrg 
6661f28255Scgd /*
6761f28255Scgd  * lpc -- line printer control program
6861f28255Scgd  */
6961f28255Scgd 
708e41ca80Shpeyerl #define MAX_MARGV	20
7161f28255Scgd int	fromatty;
7261f28255Scgd 
7353df3feaSgarbled char	*cmdline;
7461f28255Scgd int	margc;
758e41ca80Shpeyerl char	*margv[MAX_MARGV];
7661f28255Scgd int	top;
778e41ca80Shpeyerl uid_t	uid, euid;
7861f28255Scgd 
7961f28255Scgd jmp_buf	toplevel;
8061f28255Scgd 
8153df3feaSgarbled History	*hist;
8253df3feaSgarbled HistEvent he;
8353df3feaSgarbled EditLine *elptr;
8453df3feaSgarbled 
85257a846aSjoerg __dead static void	 cmdscanner(int);
8604723c3fSchristos static struct cmd	*getcmd(const char *);
87257a846aSjoerg __dead static void	 intr(int);
88895dc72aSwiz static void		 makeargv(void);
8904723c3fSchristos static int		 ingroup(const char *);
9053df3feaSgarbled const char		*prompt(void);
9153df3feaSgarbled static int		 parse(char *, char *p[], int);
92f881d1d4Scgd 
93f881d1d4Scgd int
main(int argc,char * argv[])94895dc72aSwiz main(int argc, char *argv[])
9561f28255Scgd {
968e41ca80Shpeyerl 	euid = geteuid();
978e41ca80Shpeyerl 	uid = getuid();
988e41ca80Shpeyerl 	seteuid(uid);
9904723c3fSchristos 	setprogname(argv[0]);
10061f28255Scgd 	openlog("lpd", 0, LOG_LPR);
10161f28255Scgd 
10261f28255Scgd 	if (--argc > 0) {
103def92bcaSis 		argv++;
10453df3feaSgarbled 		exit(!parse(*argv, argv, argc));
10561f28255Scgd 	}
10661f28255Scgd 	fromatty = isatty(fileno(stdin));
10761f28255Scgd 	top = setjmp(toplevel) == 0;
10861f28255Scgd 	if (top)
10961f28255Scgd 		signal(SIGINT, intr);
11061f28255Scgd 	for (;;) {
11161f28255Scgd 		cmdscanner(top);
11261f28255Scgd 		top = 1;
11361f28255Scgd 	}
11461f28255Scgd }
11561f28255Scgd 
11653df3feaSgarbled static int
parse(char * arg,char ** pargv,int pargc)11753df3feaSgarbled parse(char *arg, char **pargv, int pargc)
11853df3feaSgarbled {
11953df3feaSgarbled 	struct cmd *c;
12053df3feaSgarbled 
12153df3feaSgarbled 	c = getcmd(arg);
12253df3feaSgarbled 	if (c == (struct cmd *)-1) {
12353df3feaSgarbled 		printf("?Ambiguous command\n");
12453df3feaSgarbled 		return(0);
12553df3feaSgarbled 	}
12653df3feaSgarbled 	if (c == 0) {
12753df3feaSgarbled 		printf("?Invalid command\n");
12853df3feaSgarbled 		return(0);
12953df3feaSgarbled 	}
13053df3feaSgarbled 	if (c->c_priv && getuid() && ingroup(LPR_OPER) == 0) {
13153df3feaSgarbled 		printf("?Privileged command\n");
13253df3feaSgarbled 		return(0);
13353df3feaSgarbled 	}
13453df3feaSgarbled 	(*c->c_handler)(pargc, pargv);
13553df3feaSgarbled 	return(1);
13653df3feaSgarbled }
13753df3feaSgarbled 
138f881d1d4Scgd static void
intr(int signo)139895dc72aSwiz intr(int signo)
14061f28255Scgd {
14153df3feaSgarbled 	el_end(elptr);
14253df3feaSgarbled 	history_end(hist);
14361f28255Scgd 	if (!fromatty)
14461f28255Scgd 		exit(0);
14561f28255Scgd 	longjmp(toplevel, 1);
14661f28255Scgd }
14761f28255Scgd 
14853df3feaSgarbled const char *
prompt(void)14953df3feaSgarbled prompt(void)
15053df3feaSgarbled {
15153df3feaSgarbled 	return ("lpc> ");
15253df3feaSgarbled }
15353df3feaSgarbled 
15461f28255Scgd /*
15561f28255Scgd  * Command parser.
15661f28255Scgd  */
157f881d1d4Scgd static void
cmdscanner(int tp)15804723c3fSchristos cmdscanner(int tp)
15961f28255Scgd {
16053df3feaSgarbled 	int scratch;
16153df3feaSgarbled 	const char *elline;
16261f28255Scgd 
16304723c3fSchristos 	if (!tp)
16461f28255Scgd 		putchar('\n');
16553df3feaSgarbled 	hist = history_init();
16653df3feaSgarbled 	history(hist, &he, H_SETSIZE, 100);	/* 100 elt history buffer */
16753df3feaSgarbled 
16853df3feaSgarbled 	elptr = el_init(getprogname(), stdin, stdout, stderr);
16953df3feaSgarbled 	el_set(elptr, EL_EDITOR, "emacs");
17053df3feaSgarbled 	el_set(elptr, EL_PROMPT, prompt);
17153df3feaSgarbled 	el_set(elptr, EL_HIST, history, hist);
17253df3feaSgarbled 	el_source(elptr, NULL);
17353df3feaSgarbled 
17461f28255Scgd 	for (;;) {
17553df3feaSgarbled 		cmdline = NULL;
17653df3feaSgarbled 		do {
17753df3feaSgarbled 			if (((elline = el_gets(elptr, &scratch)) != NULL)
17853df3feaSgarbled 			    && (scratch != 0)) {
17953df3feaSgarbled 				history(hist, &he, H_ENTER, elline);
18053df3feaSgarbled 				cmdline = strdup(elline);
18161f28255Scgd 				makeargv();
18253df3feaSgarbled 			} else {
18353df3feaSgarbled 				margc = 0;
1846737e7d6Senami 				break;
18553df3feaSgarbled 			}
18653df3feaSgarbled 		} while (margc == 0);
18753df3feaSgarbled 		if (margc == 0)
18853df3feaSgarbled 			quit(0, NULL);
18953df3feaSgarbled 		if (!parse(cmdline, margv, margc)) {
19053df3feaSgarbled 			if (cmdline != NULL)
19153df3feaSgarbled 				free(cmdline);
19261f28255Scgd 			continue;
19361f28255Scgd 		}
19453df3feaSgarbled 		fflush(stdout);
19553df3feaSgarbled 		if (cmdline != NULL)
19653df3feaSgarbled 			free(cmdline);
19761f28255Scgd 	}
19861f28255Scgd 	longjmp(toplevel, 0);
19961f28255Scgd }
20061f28255Scgd 
201e6a91a09Smrg static struct cmd *
getcmd(const char * name)20204723c3fSchristos getcmd(const char *name)
20361f28255Scgd {
20404723c3fSchristos 	const char *p, *q;
205fe7ed7ceSmrg 	struct cmd *c, *found;
206fe7ed7ceSmrg 	int nmatches, longest;
20761f28255Scgd 
20861f28255Scgd 	longest = 0;
20961f28255Scgd 	nmatches = 0;
21061f28255Scgd 	found = 0;
2117d65d1afSmikel 	for (c = cmdtab; (p = c->c_name) != NULL; c++) {
21261f28255Scgd 		for (q = name; *q == *p++; q++)
21361f28255Scgd 			if (*q == 0)		/* exact match? */
21461f28255Scgd 				return(c);
21561f28255Scgd 		if (!*q) {			/* the name was a prefix */
21661f28255Scgd 			if (q - name > longest) {
21761f28255Scgd 				longest = q - name;
21861f28255Scgd 				nmatches = 1;
21961f28255Scgd 				found = c;
22061f28255Scgd 			} else if (q - name == longest)
22161f28255Scgd 				nmatches++;
22261f28255Scgd 		}
22361f28255Scgd 	}
22461f28255Scgd 	if (nmatches > 1)
22561f28255Scgd 		return((struct cmd *)-1);
22661f28255Scgd 	return(found);
22761f28255Scgd }
22861f28255Scgd 
22961f28255Scgd /*
23061f28255Scgd  * Slice a string up into argc/argv.
23161f28255Scgd  */
232f881d1d4Scgd static void
makeargv(void)233895dc72aSwiz makeargv(void)
23461f28255Scgd {
235fe7ed7ceSmrg 	char *cp;
236fe7ed7ceSmrg 	char **argp = margv;
237fe7ed7ceSmrg 	int n = 0;
23853df3feaSgarbled 	size_t s;
23961f28255Scgd 
240606b0481Sgarbled 	s = strlen(cmdline) + 1;
24161f28255Scgd 	margc = 0;
242f5a433a7Slukem 	for (cp = cmdline; *cp && (size_t)(cp - cmdline) < s && n < MAX_MARGV; n++) {
24375ba9fc7Sdsl 		while (isspace((unsigned char)*cp))
24461f28255Scgd 			cp++;
24561f28255Scgd 		if (*cp == '\0')
24661f28255Scgd 			break;
24761f28255Scgd 		*argp++ = cp;
24861f28255Scgd 		margc += 1;
24975ba9fc7Sdsl 		while (*cp != '\0' && !isspace((unsigned char)*cp))
25061f28255Scgd 			cp++;
25161f28255Scgd 		if (*cp == '\0')
25261f28255Scgd 			break;
25361f28255Scgd 		*cp++ = '\0';
25461f28255Scgd 	}
25561f28255Scgd 	*argp++ = 0;
25661f28255Scgd }
25761f28255Scgd 
25861f28255Scgd #define HELPINDENT (sizeof ("directory"))
25961f28255Scgd 
26061f28255Scgd /*
26161f28255Scgd  * Help command.
26261f28255Scgd  */
263f881d1d4Scgd void
help(int argc,char * argv[])264895dc72aSwiz help(int argc, char *argv[])
26561f28255Scgd {
266fe7ed7ceSmrg 	struct cmd *c;
26761f28255Scgd 
26861f28255Scgd 	if (argc == 1) {
2690bfe3e61Schristos 		size_t i, j, w;
2700bfe3e61Schristos 		size_t columns, width = 0, lines;
27161f28255Scgd 
27261f28255Scgd 		printf("Commands may be abbreviated.  Commands are:\n\n");
27361f28255Scgd 		for (c = cmdtab; c->c_name; c++) {
2740bfe3e61Schristos 			size_t len = strlen(c->c_name);
27561f28255Scgd 
27661f28255Scgd 			if (len > width)
27761f28255Scgd 				width = len;
27861f28255Scgd 		}
27961f28255Scgd 		width = (width + 8) &~ 7;
28061f28255Scgd 		columns = 80 / width;
28161f28255Scgd 		if (columns == 0)
28261f28255Scgd 			columns = 1;
28361f28255Scgd 		lines = (NCMDS + columns - 1) / columns;
28461f28255Scgd 		for (i = 0; i < lines; i++) {
28561f28255Scgd 			for (j = 0; j < columns; j++) {
28661f28255Scgd 				c = cmdtab + j * lines + i;
28761f28255Scgd 				printf("%s", c->c_name);
2880bfe3e61Schristos 				if (c + lines >= &cmdtab[NCMDS - 1]) {
28961f28255Scgd 					printf("\n");
29061f28255Scgd 					break;
29161f28255Scgd 				}
29261f28255Scgd 				w = strlen(c->c_name);
29361f28255Scgd 				while (w < width) {
29461f28255Scgd 					w = (w + 8) &~ 7;
29561f28255Scgd 					putchar('\t');
29661f28255Scgd 				}
29761f28255Scgd 			}
29861f28255Scgd 		}
29961f28255Scgd 		return;
30061f28255Scgd 	}
30161f28255Scgd 	while (--argc > 0) {
302fe7ed7ceSmrg 		char *arg;
30361f28255Scgd 		arg = *++argv;
30461f28255Scgd 		c = getcmd(arg);
30561f28255Scgd 		if (c == (struct cmd *)-1)
30661f28255Scgd 			printf("?Ambiguous help command %s\n", arg);
30761f28255Scgd 		else if (c == (struct cmd *)0)
30861f28255Scgd 			printf("?Invalid help command %s\n", arg);
30961f28255Scgd 		else
3101bb06f8aSmrg 			printf("%-*s\t%s\n", (int)HELPINDENT,
31161f28255Scgd 				c->c_name, c->c_help);
31261f28255Scgd 	}
31361f28255Scgd }
314e6a91a09Smrg 
315e6a91a09Smrg /*
316e6a91a09Smrg  * return non-zero if the user is a member of the given group
317e6a91a09Smrg  */
318e6a91a09Smrg static int
ingroup(const char * grname)31904723c3fSchristos ingroup(const char *grname)
320e6a91a09Smrg {
321e6a91a09Smrg 	static struct group *gptr = NULL;
322e6a91a09Smrg 	static gid_t groups[NGROUPS];
32301ff6324Swiz 	static int ngroups;
324fe7ed7ceSmrg 	gid_t gid;
32501ff6324Swiz 	int i;
326e6a91a09Smrg 
327e6a91a09Smrg 	if (gptr == NULL) {
328e6a91a09Smrg 		if ((gptr = getgrnam(grname)) == NULL) {
329eda9e509Sgrant 			warnx("Warning: unknown group `%s'",
330e6a91a09Smrg 				grname);
331e6a91a09Smrg 			return(0);
332e6a91a09Smrg 		}
333c829aa77Ssommerfeld 		ngroups = getgroups(NGROUPS, groups);
334c829aa77Ssommerfeld 		if (ngroups < 0)
335fe7ed7ceSmrg 			err(1, "getgroups");
336e6a91a09Smrg 	}
337e6a91a09Smrg 	gid = gptr->gr_gid;
338c829aa77Ssommerfeld 	for (i = 0; i < ngroups; i++)
339e6a91a09Smrg 		if (gid == groups[i])
340e6a91a09Smrg 			return(1);
341e6a91a09Smrg 	return(0);
342e6a91a09Smrg }
343