2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
4 * ------+---------+---------+---------+---------+---------+---------+---------*
5 * Copyright (c) 2001 - Garance Alistair Drosehn <gad@FreeBSD.org>.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * The views and conclusions contained in the software and documentation
30 * are those of the authors and should not be interpreted as representing
31 * official policies, either expressed or implied, of the FreeBSD Project.
33 * ------+---------+---------+---------+---------+---------+---------+---------*
36 #include "lp.cdefs.h" /* A cross-platform version of <sys/cdefs.h> */
37 __FBSDID("$FreeBSD$");
39 #include <sys/types.h>
50 #include <sys/param.h> /* needed for lp.h but not used here */
51 #include <dirent.h> /* ditto */
54 #include "skimprintcap.h"
57 * Save the canonical queue name of the entry that is currently being
58 * scanned, in case a warning message is printed for the current queue.
59 * Only the first 'QENTRY_MAXLEN' characters will be saved, since this
60 * is only for warning messages. The variable includes space for the
61 * string " (entry " and a trailing ")", when the scanner is in the
62 * middle of an entry. When the scanner is not in a specific entry,
63 * the variable will be the a null string.
65 #define QENTRY_MAXLEN 30
66 #define QENTRY_PREFIX " (entry "
67 static char skim_entryname[sizeof(QENTRY_PREFIX) + QENTRY_MAXLEN + 2];
70 * isgraph is defined to work on an 'int', in the range 0 to 255, plus EOF.
71 * Define a wrapper which can take 'char', either signed or unsigned.
73 #define isgraphch(Anychar) isgraph(((int) Anychar) & 255)
76 skim_printcap(const char *pcap_fname, int verbosity)
78 struct skiminfo *skinf;
80 char *ch, *curline, *endfield, *lastchar;
83 enum {NO_CONTINUE, WILL_CONTINUE, BAD_CONTINUE} is_cont, had_cont;
84 enum {CMNT_LINE, ENTRY_LINE, TAB_LINE, TABERR_LINE} is_type, had_type;
86 skinf = malloc(sizeof(struct skiminfo));
87 memset(skinf, 0, sizeof(struct skiminfo));
89 pc_file = fopen(pcap_fname, "r");
90 if (pc_file == NULL) {
91 warn("fopen(%s)", pcap_fname);
93 return (skinf); /* fatal error */
96 skim_entryname[0] = '0';
98 is_cont = NO_CONTINUE;
101 curline = fgets(buff, sizeof(buff), pc_file);
102 while (curline != NULL) {
105 /* Check for the expected newline char, and remove it */
107 lastchar = strchr(curline, '\n');
108 if (lastchar != NULL)
111 lastchar = strchr(curline, '\0');
114 if (curline < lastchar)
118 * Check for `\' (continuation-character) at end of line.
119 * If there is none, then trim off spaces and check again.
120 * This would be a bad line because it looks like it is
121 * continued, but it will not be treated that way.
124 is_cont = NO_CONTINUE;
125 if (*lastchar == '\\') {
126 is_cont = WILL_CONTINUE;
129 while ((curline < lastchar) && !isgraphch(*lastchar))
131 if (*lastchar == '\\')
132 is_cont = BAD_CONTINUE;
138 case '\0': /* treat zero-length line as comment */
147 is_type = ENTRY_LINE;
150 /* pick up the queue name, to use in warning messages */
152 while ((ch <= lastchar) && (*ch != ':') && (*ch != '|'))
154 ch--; /* last char of queue name */
155 strcpy(skim_entryname, QENTRY_PREFIX);
156 if ((ch - curline) > QENTRY_MAXLEN) {
157 strncat(skim_entryname, curline, QENTRY_MAXLEN
159 strcat(skim_entryname, "+");
161 strncat(skim_entryname, curline, (ch - curline
164 strlcat(skim_entryname, ")", sizeof(skim_entryname));
169 * Check to see if the previous line was a bad contination
170 * line. The check is delayed until now so a warning message
171 * is not printed when a "bad continuation" is on a comment
172 * line, and it just "continues" into another comment line.
174 if (had_cont == BAD_CONTINUE) {
175 if ((had_type != CMNT_LINE) || (is_type != CMNT_LINE) ||
178 warnx("Warning: blanks after trailing '\\',"
179 " at line %d%s", skinf->lines - 1,
184 /* If we are no longer in an entry, then forget the name */
185 if ((had_cont != WILL_CONTINUE) && (is_type != ENTRY_LINE)) {
186 skim_entryname[0] = '\0';
190 * Print out warning for missing newline, done down here
191 * so we are sure to have the right entry-name for it.
195 warnx("Warning: No newline at end of line %d%s",
196 skinf->lines, skim_entryname);
200 * Check for start-of-entry lines which do not include a
201 * ":" character (to indicate the end of the name field).
202 * This can cause standard printcap processing to ignore
203 * ALL of the following lines.
204 * XXXXX - May need to allow for the list-of-names to
205 * continue on to the following line...
207 if (is_type == ENTRY_LINE) {
208 endfield = strchr(curline, ':');
209 if (endfield == NULL) {
211 warnx("Warning: No ':' to terminate name-field"
212 " at line %d%s", skinf->lines,
218 * Now check for cases where this line is (or is-not) a
219 * continuation of the previous line, and a person skimming
220 * the file would assume it is not (or is) a continuation.
225 if (is_type == TAB_LINE) {
227 warnx("Warning: values-line after line with"
228 " NO trailing '\\', at line %d%s",
229 skinf->lines, skim_entryname);
234 if (is_type == ENTRY_LINE) {
236 warnx("Warning: new entry starts after line"
237 " with trailing '\\', at line %d%s",
238 skinf->lines, skim_entryname);
243 /* get another line from printcap and repeat loop */
244 curline = fgets(buff, sizeof(buff), pc_file);
248 warn("fgets(%s)", pcap_fname);
249 skinf->fatalerr++; /* fatal error */
252 if (skinf->warnings > 0)
253 warnx("%4d warnings from skimming %s", skinf->warnings,
257 warnx("%4d lines (%d comments), %d entries for %s",
258 skinf->lines, skinf->comments, skinf->entries, pcap_fname);