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