2 * ------+---------+---------+---------+---------+---------+---------+---------*
3 * Copyright (c) 2001 - Garance Alistair Drosehn <gad@FreeBSD.org>.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
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.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * The views and conclusions contained in the software and documentation
28 * are those of the authors and should not be interpreted as representing
29 * official policies, either expressed or implied, of the FreeBSD Project.
31 * ------+---------+---------+---------+---------+---------+---------+---------*
33 * $FreeBSD: src/usr.sbin/lpr/chkprintcap/skimprintcap.c,v 1.1.2.2 2002/06/19 01:53:48 gad Exp $
34 * $DragonFly: src/usr.sbin/lpr/chkprintcap/skimprintcap.c,v 1.2 2003/06/17 04:29:55 dillon Exp $
37 #include <sys/types.h>
48 #include <sys/param.h> /* needed for lp.h but not used here */
49 #include <dirent.h> /* ditto */
52 #include "skimprintcap.h"
55 * Save the canonical queue name of the entry that is currently being
56 * scanned, in case a warning message is printed for the current queue.
57 * Only the first 'QENTRY_MAXLEN' characters will be saved, since this
58 * is only for warning messages. The variable includes space for the
59 * string " (entry " and a trailing ")", when the scanner is in the
60 * middle of an entry. When the scanner is not in a specific entry,
61 * the variable will be the a null string.
63 #define QENTRY_MAXLEN 30
64 #define QENTRY_PREFIX " (entry "
65 static char skim_entryname
[sizeof(QENTRY_PREFIX
) + QENTRY_MAXLEN
+ 2];
68 * isgraph is defined to work on an 'int', in the range 0 to 255, plus EOF.
69 * Define a wrapper which can take 'char', either signed or unsigned.
71 #define isgraphch(Anychar) isgraph(((int) Anychar) & 255)
74 skim_printcap(const char *pcap_fname
, int verbosity
)
76 struct skiminfo
*skinf
;
78 char *ch
, *curline
, *endfield
, *lastchar
;
81 enum {NO_CONTINUE
, WILL_CONTINUE
, BAD_CONTINUE
} is_cont
, had_cont
;
82 enum {CMNT_LINE
, ENTRY_LINE
, TAB_LINE
, TABERR_LINE
} is_type
, had_type
;
84 skinf
= malloc(sizeof(struct skiminfo
));
85 memset(skinf
, 0, sizeof(struct skiminfo
));
87 pc_file
= fopen(pcap_fname
, "r");
88 if (pc_file
== NULL
) {
89 warn("fopen(%s)", pcap_fname
);
91 return (skinf
); /* fatal error */
94 skim_entryname
[0] = '0';
96 is_cont
= NO_CONTINUE
;
99 curline
= fgets(buff
, sizeof(buff
), pc_file
);
100 while (curline
!= NULL
) {
103 /* Check for the expected newline char, and remove it */
105 lastchar
= strchr(curline
, '\n');
106 if (lastchar
!= NULL
)
109 lastchar
= strchr(curline
, '\0');
112 if (curline
< lastchar
)
116 * Check for `\' (continuation-character) at end of line.
117 * If there is none, then trim off spaces and check again.
118 * This would be a bad line because it looks like it is
119 * continued, but it will not be treated that way.
122 is_cont
= NO_CONTINUE
;
123 if (*lastchar
== '\\') {
124 is_cont
= WILL_CONTINUE
;
127 while ((curline
< lastchar
) && !isgraphch(*lastchar
))
129 if (*lastchar
== '\\')
130 is_cont
= BAD_CONTINUE
;
136 case '\0': /* treat zero-length line as comment */
145 is_type
= ENTRY_LINE
;
148 /* pick up the queue name, to use in warning messages */
150 while ((ch
<= lastchar
) && (*ch
!= ':') && (*ch
!= '|'))
152 ch
--; /* last char of queue name */
153 strcpy(skim_entryname
, QENTRY_PREFIX
);
154 if ((ch
- curline
) > QENTRY_MAXLEN
) {
155 strncat(skim_entryname
, curline
, QENTRY_MAXLEN
157 strcat(skim_entryname
, "+");
159 strncat(skim_entryname
, curline
, (ch
- curline
162 strlcat(skim_entryname
, ")", sizeof(skim_entryname
));
167 * Check to see if the previous line was a bad contination
168 * line. The check is delayed until now so a warning message
169 * is not printed when a "bad continuation" is on a comment
170 * line, and it just "continues" into another comment line.
172 if (had_cont
== BAD_CONTINUE
) {
173 if ((had_type
!= CMNT_LINE
) || (is_type
!= CMNT_LINE
) ||
176 warnx("Warning: blanks after trailing '\\',"
177 " at line %d%s", skinf
->lines
- 1,
182 /* If we are no longer in an entry, then forget the name */
183 if ((had_cont
!= WILL_CONTINUE
) && (is_type
!= ENTRY_LINE
)) {
184 skim_entryname
[0] = '\0';
188 * Print out warning for missing newline, done down here
189 * so we are sure to have the right entry-name for it.
193 warnx("Warning: No newline at end of line %d%s",
194 skinf
->lines
, skim_entryname
);
198 * Check for start-of-entry lines which do not include a
199 * ":" character (to indicate the end of the name field).
200 * This can cause standard printcap processing to ignore
201 * ALL of the following lines.
202 * XXXXX - May need to allow for the list-of-names to
203 * continue on to the following line...
205 if (is_type
== ENTRY_LINE
) {
206 endfield
= strchr(curline
, ':');
207 if (endfield
== NULL
) {
209 warnx("Warning: No ':' to terminate name-field"
210 " at line %d%s", skinf
->lines
,
216 * Now check for cases where this line is (or is-not) a
217 * continuation of the previous line, and a person skimming
218 * the file would assume it is not (or is) a continuation.
223 if (is_type
== TAB_LINE
) {
225 warnx("Warning: values-line after line with"
226 " NO trailing '\\', at line %d%s",
227 skinf
->lines
, skim_entryname
);
232 if (is_type
== ENTRY_LINE
) {
234 warnx("Warning: new entry starts after line"
235 " with trailing '\\', at line %d%s",
236 skinf
->lines
, skim_entryname
);
241 /* get another line from printcap and repeat loop */
242 curline
= fgets(buff
, sizeof(buff
), pc_file
);
246 warn("fgets(%s)", pcap_fname
);
247 skinf
->fatalerr
++; /* fatal error */
250 if (skinf
->warnings
> 0)
251 warnx("%4d warnings from skimming %s", skinf
->warnings
,
255 warnx("%4d lines (%d comments), %d entries for %s",
256 skinf
->lines
, skinf
->comments
, skinf
->entries
, pcap_fname
);