]>
Commit | Line | Data |
---|---|---|
80ca4592 | 1 | /* |
d09495fa | 2 | * "$Id: cupstestdsc.c 5838 2006-08-17 14:41:42Z mike $" |
80ca4592 | 3 | * |
4 | * DSC test program for the Common UNIX Printing System (CUPS). | |
5 | * | |
6 | * Copyright 2006 by Easy Software Products, all rights reserved. | |
7 | * | |
8 | * These coded instructions, statements, and computer programs are the | |
9 | * property of Easy Software Products and are protected by Federal | |
10 | * copyright law. Distribution and use rights are outlined in the file | |
11 | * "LICENSE.txt" which should have been included with this file. If this | |
12 | * file is missing or damaged please contact Easy Software Products | |
13 | * at: | |
14 | * | |
15 | * Attn: CUPS Licensing Information | |
16 | * Easy Software Products | |
17 | * 44141 Airport View Drive, Suite 204 | |
18 | * Hollywood, Maryland 20636 USA | |
19 | * | |
20 | * Voice: (301) 373-9600 | |
21 | * EMail: cups-info@cups.org | |
22 | * WWW: http://www.cups.org | |
23 | * | |
24 | * PostScript is a trademark of Adobe Systems, Inc. | |
25 | * | |
26 | * This file is subject to the Apple OS-Developed Software exception. | |
27 | * | |
28 | * Contents: | |
29 | * | |
89d46774 | 30 | * main() - Main entry for test program. |
31 | * check() - Check a file for conformance. | |
32 | * usage() - Show program usage. | |
80ca4592 | 33 | */ |
34 | ||
35 | /* | |
36 | * Include necessary headers... | |
37 | */ | |
38 | ||
39 | #include <cups/string.h> | |
40 | #include <cups/cups.h> | |
41 | #include <cups/file.h> | |
42 | #include <cups/i18n.h> | |
43 | #include <errno.h> | |
44 | #include <stdlib.h> | |
45 | ||
46 | ||
47 | /* | |
48 | * Local functions... | |
49 | */ | |
50 | ||
51 | static int check_file(const char *filename); | |
52 | static void usage(void); | |
53 | ||
54 | ||
55 | /* | |
56 | * 'main()' - Main entry for test program. | |
57 | */ | |
58 | ||
59 | int /* O - Exit status */ | |
60 | main(int argc, /* I - Number of command-line args */ | |
61 | char *argv[]) /* I - Command-line arguments */ | |
62 | { | |
63 | int i; /* Looping var */ | |
64 | int status; /* Status of tests */ | |
65 | int num_files; /* Number of files tested */ | |
66 | ||
67 | ||
d09495fa | 68 | _cupsSetLocale(); |
69 | ||
80ca4592 | 70 | /* |
71 | * Collect command-line arguments... | |
72 | */ | |
73 | ||
74 | for (i = 1, num_files = 0, status = 0; i < argc; i ++) | |
75 | if (argv[i][0] == '-') | |
76 | { | |
77 | if (argv[i][1]) | |
78 | { | |
79 | /* | |
80 | * Currently the only supported option is "-h" (help)... | |
81 | */ | |
82 | ||
83 | usage(); | |
84 | } | |
85 | else | |
86 | { | |
87 | num_files ++; | |
88 | status += check_file("(stdin)"); | |
89 | } | |
90 | } | |
91 | else | |
92 | { | |
93 | num_files ++; | |
94 | status += check_file(argv[i]); | |
95 | } | |
96 | ||
97 | if (!num_files) | |
98 | usage(); | |
99 | ||
100 | return (status); | |
101 | } | |
102 | ||
103 | ||
104 | /* | |
89d46774 | 105 | * 'check()' - Check a file for conformance. |
80ca4592 | 106 | */ |
107 | ||
108 | static int /* O - 0 on success, 1 on failure */ | |
109 | check_file(const char *filename) /* I - File to read from */ | |
110 | { | |
111 | int i; /* Looping var */ | |
112 | cups_file_t *fp; /* File */ | |
113 | char line[1024]; /* Line from file */ | |
114 | int ch; /* Current character */ | |
115 | size_t bytes; /* Length of line */ | |
116 | int status; /* Status of test */ | |
117 | int linenum; /* Line number */ | |
118 | int binary; /* File contains binary data? */ | |
119 | float version; /* DSC version */ | |
120 | int lbrt[4]; /* Bounding box */ | |
121 | char page_label[256]; /* Page label string */ | |
122 | int page_number; /* Page number */ | |
89d46774 | 123 | int last_page_number; /* Last page number seen */ |
80ca4592 | 124 | int level; /* Embedded document level */ |
125 | int saw_bounding_box, /* %%BoundingBox seen? */ | |
126 | saw_pages, /* %%Pages seen? */ | |
127 | saw_end_comments, /* %%EndComments seen? */ | |
128 | saw_begin_prolog, /* %%BeginProlog seen? */ | |
129 | saw_end_prolog, /* %%EndProlog seen? */ | |
130 | saw_begin_setup, /* %%BeginSetup seen? */ | |
131 | saw_end_setup, /* %%EndSetup seen? */ | |
132 | saw_page, /* %%Page seen? */ | |
133 | saw_trailer, /* %%Trailer seen? */ | |
80ca4592 | 134 | saw_long_line; /* Saw long lines? */ |
135 | ||
136 | ||
137 | /* | |
138 | * Open the file... | |
139 | */ | |
140 | ||
141 | if (!strcmp(filename, "(stdin)")) | |
142 | fp = cupsFileStdin(); | |
143 | else | |
144 | fp = cupsFileOpen(filename, "r"); | |
145 | ||
146 | if (!fp) | |
147 | { | |
148 | perror(filename); | |
149 | return (1); | |
150 | } | |
151 | ||
152 | /* | |
153 | * Scan the file... | |
154 | */ | |
155 | ||
156 | binary = 0; | |
89d46774 | 157 | last_page_number = 0; |
80ca4592 | 158 | level = 0; |
159 | linenum = 0; | |
160 | saw_begin_prolog = 0; | |
161 | saw_begin_setup = 0; | |
162 | saw_bounding_box = 0; | |
163 | saw_end_comments = 0; | |
164 | saw_end_prolog = 0; | |
165 | saw_end_setup = 0; | |
80ca4592 | 166 | saw_long_line = 0; |
167 | saw_page = 0; | |
168 | saw_pages = 0; | |
169 | saw_trailer = 0; | |
170 | status = 0; | |
171 | version = 0.0f; | |
172 | ||
173 | _cupsLangPrintf(stdout, "%s: ", filename); | |
174 | fflush(stdout); | |
175 | ||
176 | while ((bytes = cupsFileGetLine(fp, line, sizeof(line))) > 0) | |
177 | { | |
178 | linenum ++; | |
179 | ||
180 | if (bytes > 255) | |
181 | { | |
182 | if (!saw_long_line) | |
183 | { | |
184 | if (!status) | |
185 | _cupsLangPuts(stdout, _("FAIL\n")); | |
186 | ||
187 | status ++; | |
188 | _cupsLangPrintf(stdout, | |
189 | _(" Line %d is longer than 255 characters (%d)!\n" | |
190 | " REF: Page 25, Line Length\n"), | |
191 | linenum, (int)bytes); | |
192 | } | |
193 | ||
194 | saw_long_line ++; | |
195 | } | |
196 | ||
197 | if (linenum == 1) | |
198 | { | |
199 | if (strncmp(line, "%!PS-Adobe-", 11)) | |
200 | { | |
201 | if (!status) | |
202 | _cupsLangPuts(stdout, _("FAIL\n")); | |
203 | ||
204 | status ++; | |
205 | _cupsLangPuts(stdout, | |
206 | _(" Missing %!PS-Adobe-3.0 on first line!\n" | |
207 | " REF: Page 17, 3.1 Conforming Documents\n")); | |
208 | cupsFileClose(fp); | |
209 | return (1); | |
210 | } | |
211 | else | |
212 | version = atof(line + 11); | |
213 | } | |
214 | else if (level > 0) | |
215 | { | |
216 | if (!strncmp(line, "%%BeginDocument:", 16)) | |
217 | level ++; | |
218 | else if (!strncmp(line, "%%EndDocument", 13)) | |
219 | level --; | |
220 | } | |
221 | else if (saw_trailer) | |
222 | { | |
223 | if (!strncmp(line, "%%Pages:", 8)) | |
224 | { | |
225 | if (atoi(line + 8) <= 0) | |
226 | { | |
227 | if (!status) | |
228 | _cupsLangPuts(stdout, _("FAIL\n")); | |
229 | ||
230 | status ++; | |
231 | _cupsLangPrintf(stdout, | |
232 | _(" Bad %%%%Pages: on line %d!\n" | |
233 | " REF: Page 43, %%%%Pages:\n"), | |
234 | linenum); | |
235 | } | |
236 | else | |
237 | saw_pages = 1; | |
238 | } | |
239 | else if (!strncmp(line, "%%BoundingBox:", 14)) | |
240 | { | |
241 | if (sscanf(line + 14, "%d%d%d%d", lbrt + 0, lbrt + 1, lbrt + 2, | |
242 | lbrt + 3) != 4) | |
243 | { | |
244 | if (!status) | |
245 | _cupsLangPuts(stdout, _("FAIL\n")); | |
246 | ||
247 | status ++; | |
248 | _cupsLangPrintf(stdout, _(" Bad %%%%BoundingBox: on line %d!\n" | |
249 | " REF: Page 39, %%%%BoundingBox:\n"), | |
250 | linenum); | |
251 | } | |
252 | else | |
253 | saw_bounding_box = 1; | |
254 | } | |
255 | } | |
256 | else if (!saw_end_comments) | |
257 | { | |
258 | if (!strncmp(line, "%%EndComments", 13)) | |
259 | saw_end_comments = 1; | |
260 | else if (line[0] != '%') | |
261 | saw_end_comments = -1; | |
262 | else if (!strncmp(line, "%%Pages:", 8)) | |
263 | { | |
264 | if (strstr(line + 8, "(atend)")) | |
265 | saw_pages = -1; | |
266 | else if (atoi(line + 8) <= 0) | |
267 | { | |
268 | if (!status) | |
269 | _cupsLangPuts(stdout, _("FAIL\n")); | |
270 | ||
271 | status ++; | |
272 | _cupsLangPrintf(stdout, _(" Bad %%%%Pages: on line %d!\n" | |
273 | " REF: Page 43, %%%%Pages:\n"), | |
274 | linenum); | |
275 | } | |
276 | else | |
277 | saw_pages = 1; | |
278 | } | |
279 | else if (!strncmp(line, "%%BoundingBox:", 14)) | |
280 | { | |
281 | if (strstr(line, "(atend)")) | |
282 | saw_bounding_box = -1; | |
283 | else if (sscanf(line + 14, "%d%d%d%d", lbrt + 0, lbrt + 1, lbrt + 2, | |
284 | lbrt + 3) != 4) | |
285 | { | |
286 | if (!status) | |
287 | _cupsLangPuts(stdout, _("FAIL\n")); | |
288 | ||
289 | status ++; | |
290 | _cupsLangPrintf(stdout, _(" Bad %%%%BoundingBox: on line %d!\n" | |
291 | " REF: Page 39, %%%%BoundingBox:\n"), | |
292 | linenum); | |
293 | } | |
294 | else | |
295 | saw_bounding_box = 1; | |
296 | } | |
297 | } | |
298 | else if (saw_begin_prolog && !saw_end_prolog) | |
299 | { | |
300 | if (!strncmp(line, "%%EndProlog", 11)) | |
301 | saw_end_prolog = 1; | |
302 | } | |
303 | else if (saw_begin_setup && !saw_end_setup) | |
304 | { | |
305 | if (!strncmp(line, "%%EndSetup", 10)) | |
306 | saw_end_setup = 1; | |
307 | } | |
308 | else if (saw_end_comments) | |
309 | { | |
310 | if (!strncmp(line, "%%Page:", 7)) | |
311 | { | |
89d46774 | 312 | if (sscanf(line + 7, "%255s%d", page_label, &page_number) != 2 || |
313 | page_number != (last_page_number + 1) || page_number < 1) | |
80ca4592 | 314 | { |
315 | if (!status) | |
316 | _cupsLangPuts(stdout, _("FAIL\n")); | |
317 | ||
318 | status ++; | |
319 | _cupsLangPrintf(stdout, _(" Bad %%%%Page: on line %d!\n" | |
320 | " REF: Page 53, %%%%Page:\n"), | |
321 | linenum); | |
322 | } | |
323 | else | |
89d46774 | 324 | { |
325 | last_page_number = page_number; | |
326 | saw_page = 1; | |
327 | } | |
80ca4592 | 328 | } |
329 | else if (!strncmp(line, "%%BeginProlog", 13)) | |
330 | saw_begin_prolog = 1; | |
331 | else if (!strncmp(line, "%%BeginSetup", 12)) | |
332 | saw_begin_setup = 1; | |
333 | else if (!strncmp(line, "%%BeginDocument:", 16)) | |
334 | level ++; | |
335 | else if (!strncmp(line, "%%EndDocument", 13)) | |
336 | level --; | |
337 | else if (!strncmp(line, "%%Trailer", 9)) | |
338 | saw_trailer = 1; | |
339 | } | |
340 | ||
341 | for (i = 0; !binary && i < bytes; i ++) | |
342 | { | |
343 | ch = line[i]; | |
344 | ||
345 | if ((ch < ' ' || (ch & 0x80)) && ch != '\n' && ch != '\r' && ch != '\t') | |
346 | binary = 1; | |
347 | } | |
348 | } | |
349 | ||
350 | if (saw_bounding_box <= 0) | |
351 | { | |
352 | if (!status) | |
353 | _cupsLangPuts(stdout, _("FAIL\n")); | |
354 | ||
355 | status ++; | |
356 | _cupsLangPuts(stdout, _(" Missing or bad %%BoundingBox: comment!\n" | |
357 | " REF: Page 39, %%BoundingBox:\n")); | |
358 | } | |
359 | ||
360 | if (saw_pages <= 0) | |
361 | { | |
362 | if (!status) | |
363 | _cupsLangPuts(stdout, _("FAIL\n")); | |
364 | ||
365 | status ++; | |
366 | _cupsLangPuts(stdout, _(" Missing or bad %%Pages: comment!\n" | |
367 | " REF: Page 43, %%Pages:\n")); | |
368 | } | |
369 | ||
370 | if (!saw_end_comments) | |
371 | { | |
372 | if (!status) | |
373 | _cupsLangPuts(stdout, _("FAIL\n")); | |
374 | ||
375 | status ++; | |
376 | _cupsLangPuts(stdout, _(" Missing %%EndComments comment!\n" | |
377 | " REF: Page 41, %%EndComments\n")); | |
378 | } | |
379 | ||
380 | if (!saw_page) | |
381 | { | |
382 | if (!status) | |
383 | _cupsLangPuts(stdout, _("FAIL\n")); | |
384 | ||
385 | status ++; | |
386 | _cupsLangPuts(stdout, _(" Missing or bad %%Page: comments!\n" | |
387 | " REF: Page 53, %%Page:\n")); | |
388 | } | |
389 | ||
390 | if (level < 0) | |
391 | { | |
392 | if (!status) | |
393 | _cupsLangPuts(stdout, _("FAIL\n")); | |
394 | ||
395 | status ++; | |
396 | _cupsLangPuts(stdout, _(" Too many %%EndDocument comments!\n")); | |
397 | } | |
398 | else if (level > 0) | |
399 | { | |
400 | if (!status) | |
401 | _cupsLangPuts(stdout, _("FAIL\n")); | |
402 | ||
403 | status ++; | |
404 | _cupsLangPuts(stdout, _(" Too many %%BeginDocument comments!\n")); | |
405 | } | |
406 | ||
407 | if (saw_long_line > 1) | |
408 | _cupsLangPrintf(stderr, | |
409 | _(" Saw %d lines that exceeded 255 characters!\n"), | |
410 | saw_long_line); | |
411 | ||
412 | if (!status) | |
413 | _cupsLangPuts(stdout, _("PASS\n")); | |
414 | ||
415 | if (binary) | |
416 | _cupsLangPuts(stdout, _(" Warning: file contains binary data!\n")); | |
417 | ||
418 | if (version < 3.0f) | |
419 | _cupsLangPrintf(stdout, | |
420 | _(" Warning: obsolete DSC version %.1f in file!\n"), | |
421 | version); | |
422 | ||
423 | if (saw_end_comments < 0) | |
424 | _cupsLangPuts(stdout, _(" Warning: no %%EndComments comment in file!\n")); | |
425 | ||
426 | cupsFileClose(fp); | |
427 | ||
428 | return (status); | |
429 | } | |
430 | ||
431 | ||
432 | /* | |
433 | * 'usage()' - Show program usage. | |
434 | */ | |
435 | ||
436 | static void | |
437 | usage(void) | |
438 | { | |
439 | _cupsLangPuts(stdout, | |
440 | _("Usage: cupstestdsc [options] filename.ps [... filename.ps]\n" | |
441 | " cupstestdsc [options] -\n" | |
442 | "\n" | |
443 | "Options:\n" | |
444 | "\n" | |
445 | " -h Show program usage\n" | |
446 | "\n" | |
447 | " Note: this program only validates the DSC comments, " | |
448 | "not the PostScript itself.\n")); | |
449 | ||
450 | exit(1); | |
451 | } | |
452 | ||
453 | ||
454 | /* | |
d09495fa | 455 | * End of "$Id: cupstestdsc.c 5838 2006-08-17 14:41:42Z mike $". |
80ca4592 | 456 | */ |