xref: /freebsd/usr.sbin/lpr/lpq/lpq.c (revision f4b37ed0f8b307b1f3f0f630ca725d68f1dff30d)
1 /*
2  * Copyright (c) 1983, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 4. Neither the name of the University nor the names of its contributors
15  *    may be used to endorse or promote products derived from this software
16  *    without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
19  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
22  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28  * SUCH DAMAGE.
29  */
30 
31 #ifndef lint
32 static const char copyright[] =
33 "@(#) Copyright (c) 1983, 1993\n\
34 	The Regents of the University of California.  All rights reserved.\n";
35 #endif /* not lint */
36 
37 #if 0
38 #ifndef lint
39 static char sccsid[] = "@(#)lpq.c	8.3 (Berkeley) 5/10/95";
40 #endif /* not lint */
41 #endif
42 
43 #include "lp.cdefs.h"		/* A cross-platform version of <sys/cdefs.h> */
44 __FBSDID("$FreeBSD$");
45 
46 /*
47  * Spool Queue examination program
48  *
49  * lpq [-a] [-l] [-Pprinter] [user...] [job...]
50  *
51  * -a show all non-null queues on the local machine
52  * -l long output
53  * -P used to identify printer as per lpr/lprm
54  */
55 
56 #include <sys/param.h>
57 
58 #include <ctype.h>
59 #include <dirent.h>
60 #include <err.h>
61 #include <stdio.h>
62 #include <stdlib.h>
63 #include <syslog.h>
64 #include <unistd.h>
65 
66 #include "lp.h"
67 #include "lp.local.h"
68 #include "pathnames.h"
69 
70 int	 requ[MAXREQUESTS];	/* job number of spool entries */
71 int	 requests;		/* # of spool requests */
72 char	*user[MAXUSERS];	/* users to process */
73 int	 users;			/* # of users in user array */
74 
75 uid_t	uid, euid;
76 
77 static int	 ckqueue(const struct printer *_pp);
78 static void	 usage(void);
79 int 		 main(int _argc, char **_argv);
80 
81 int
82 main(int argc, char **argv)
83 {
84 	int ch, aflag, lflag;
85 	const char *printer;
86 	struct printer myprinter, *pp = &myprinter;
87 
88 	printer = NULL;
89 	euid = geteuid();
90 	uid = getuid();
91 	PRIV_END
92 	progname = *argv;
93 	if (gethostname(local_host, sizeof(local_host)))
94 		err(1, "gethostname");
95 	openlog("lpd", 0, LOG_LPR);
96 
97 	aflag = lflag = 0;
98 	while ((ch = getopt(argc, argv, "alP:")) != -1)
99 		switch((char)ch) {
100 		case 'a':
101 			++aflag;
102 			break;
103 		case 'l':			/* long output */
104 			++lflag;
105 			break;
106 		case 'P':		/* printer name */
107 			printer = optarg;
108 			break;
109 		case '?':
110 		default:
111 			usage();
112 		}
113 
114 	if (!aflag && printer == NULL && (printer = getenv("PRINTER")) == NULL)
115 		printer = DEFLP;
116 
117 	for (argc -= optind, argv += optind; argc; --argc, ++argv)
118 		if (isdigit(argv[0][0])) {
119 			if (requests >= MAXREQUESTS)
120 				fatal(0, "too many requests");
121 			requ[requests++] = atoi(*argv);
122 		}
123 		else {
124 			if (users >= MAXUSERS)
125 				fatal(0, "too many users");
126 			user[users++] = *argv;
127 		}
128 
129 	if (aflag) {
130 		int more, status;
131 
132 		more = firstprinter(pp, &status);
133 		if (status)
134 			goto looperr;
135 		while (more) {
136 			if (ckqueue(pp) > 0) {
137 				printf("%s:\n", pp->printer);
138 				displayq(pp, lflag);
139 				printf("\n");
140 			}
141 			do {
142 				more = nextprinter(pp, &status);
143 looperr:
144 				switch (status) {
145 				case PCAPERR_TCOPEN:
146 					printf("warning: %s: unresolved "
147 					       "tc= reference(s) ",
148 					       pp->printer);
149 				case PCAPERR_SUCCESS:
150 					break;
151 				default:
152 					fatal(pp, "%s", pcaperr(status));
153 				}
154 			} while (more && status);
155 		}
156 	} else {
157 		int status;
158 
159 		init_printer(pp);
160 		status = getprintcap(printer, pp);
161 		if (status < 0)
162 			fatal(pp, "%s", pcaperr(status));
163 
164 		displayq(pp, lflag);
165 	}
166 	exit(0);
167 }
168 
169 static int
170 ckqueue(const struct printer *pp)
171 {
172 	register struct dirent *d;
173 	DIR *dirp;
174 	char *spooldir;
175 
176 	spooldir = pp->spool_dir;
177 	if ((dirp = opendir(spooldir)) == NULL)
178 		return (-1);
179 	while ((d = readdir(dirp)) != NULL) {
180 		if (d->d_name[0] != 'c' || d->d_name[1] != 'f')
181 			continue;	/* daemon control files only */
182 		closedir(dirp);
183 		return (1);		/* found something */
184 	}
185 	closedir(dirp);
186 	return (0);
187 }
188 
189 static void
190 usage(void)
191 {
192 	fprintf(stderr,
193 	"usage: lpq [-a] [-l] [-Pprinter] [user ...] [job ...]\n");
194 	exit(1);
195 }
196