]>
Commit | Line | Data |
---|---|---|
8414a40c VZ |
1 | /* "$Id$ */ |
2 | ||
3 | /* | |
4 | * Copyright (c) 1991-1997 Sam Leffler | |
5 | * Copyright (c) 1991-1997 Silicon Graphics, Inc. | |
6 | * | |
7 | * Permission to use, copy, modify, distribute, and sell this software and | |
8 | * its documentation for any purpose is hereby granted without fee, provided | |
9 | * that (i) the above copyright notices and this permission notice appear in | |
10 | * all copies of the software and related documentation, and (ii) the names of | |
11 | * Sam Leffler and Silicon Graphics may not be used in any advertising or | |
12 | * publicity relating to the software without the specific, prior written | |
13 | * permission of Sam Leffler and Silicon Graphics. | |
14 | * | |
15 | * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, | |
16 | * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY | |
17 | * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. | |
18 | * | |
19 | * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR | |
20 | * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND, | |
21 | * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, | |
22 | * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF | |
23 | * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE | |
24 | * OF THIS SOFTWARE. | |
25 | */ | |
26 | ||
27 | /* Initialise fax decoder tables | |
28 | * Decoder support is derived, with permission, from the code | |
29 | * in Frank Cringle's viewfax program; | |
30 | * Copyright (C) 1990, 1995 Frank D. Cringle. | |
31 | */ | |
92ab7bed | 32 | #include <tif_config.h> |
8414a40c VZ |
33 | |
34 | #include <stdio.h> | |
35 | #include <stdlib.h> | |
36 | #include <string.h> | |
37 | ||
38 | #ifdef HAVE_UNISTD_H | |
39 | # include <unistd.h> | |
40 | #endif | |
41 | ||
42 | #include "tif_fax3.h" | |
43 | ||
80ed523f VZ |
44 | #ifndef HAVE_GETOPT |
45 | extern int getopt(int, char**, char*); | |
46 | #endif | |
47 | ||
8414a40c VZ |
48 | #define streq(a,b) (strcmp(a,b) == 0) |
49 | ||
50 | /* NB: can't use names in tif_fax3.h 'cuz they are declared const */ | |
51 | TIFFFaxTabEnt MainTable[128]; | |
52 | TIFFFaxTabEnt WhiteTable[4096]; | |
53 | TIFFFaxTabEnt BlackTable[8192]; | |
54 | ||
55 | struct proto { | |
56 | uint16 code; /* right justified, lsb-first, zero filled */ | |
57 | uint16 val; /* (pixel count)<<4 + code width */ | |
58 | }; | |
59 | ||
60 | static struct proto Pass[] = { | |
61 | { 0x0008, 4 }, | |
62 | { 0, 0 } | |
63 | }; | |
64 | ||
65 | static struct proto Horiz[] = { | |
66 | { 0x0004, 3 }, | |
67 | { 0, 0 } | |
68 | }; | |
69 | ||
70 | static struct proto V0[] = { | |
71 | { 0x0001, 1 }, | |
72 | { 0, 0 } | |
73 | }; | |
74 | ||
75 | static struct proto VR[] = { | |
76 | { 0x0006, (1<<4)+3 }, | |
77 | { 0x0030, (2<<4)+6 }, | |
78 | { 0x0060, (3<<4)+7 }, | |
79 | { 0, 0 } | |
80 | }; | |
81 | ||
82 | static struct proto VL[] = { | |
83 | { 0x0002, (1<<4)+3 }, | |
84 | { 0x0010, (2<<4)+6 }, | |
85 | { 0x0020, (3<<4)+7 }, | |
86 | { 0, 0 } | |
87 | }; | |
88 | ||
89 | static struct proto Ext[] = { | |
90 | { 0x0040, 7 }, | |
91 | { 0, 0 } | |
92 | }; | |
93 | ||
94 | static struct proto EOLV[] = { | |
95 | { 0x0000, 7 }, | |
96 | { 0, 0 } | |
97 | }; | |
98 | ||
99 | static struct proto MakeUpW[] = { | |
100 | { 0x001b, 1029 }, | |
101 | { 0x0009, 2053 }, | |
102 | { 0x003a, 3078 }, | |
103 | { 0x0076, 4103 }, | |
104 | { 0x006c, 5128 }, | |
105 | { 0x00ec, 6152 }, | |
106 | { 0x0026, 7176 }, | |
107 | { 0x00a6, 8200 }, | |
108 | { 0x0016, 9224 }, | |
109 | { 0x00e6, 10248 }, | |
110 | { 0x0066, 11273 }, | |
111 | { 0x0166, 12297 }, | |
112 | { 0x0096, 13321 }, | |
113 | { 0x0196, 14345 }, | |
114 | { 0x0056, 15369 }, | |
115 | { 0x0156, 16393 }, | |
116 | { 0x00d6, 17417 }, | |
117 | { 0x01d6, 18441 }, | |
118 | { 0x0036, 19465 }, | |
119 | { 0x0136, 20489 }, | |
120 | { 0x00b6, 21513 }, | |
121 | { 0x01b6, 22537 }, | |
122 | { 0x0032, 23561 }, | |
123 | { 0x0132, 24585 }, | |
124 | { 0x00b2, 25609 }, | |
125 | { 0x0006, 26630 }, | |
126 | { 0x01b2, 27657 }, | |
127 | { 0, 0 } | |
128 | }; | |
129 | ||
130 | static struct proto MakeUpB[] = { | |
131 | { 0x03c0, 1034 }, | |
132 | { 0x0130, 2060 }, | |
133 | { 0x0930, 3084 }, | |
134 | { 0x0da0, 4108 }, | |
135 | { 0x0cc0, 5132 }, | |
136 | { 0x02c0, 6156 }, | |
137 | { 0x0ac0, 7180 }, | |
138 | { 0x06c0, 8205 }, | |
139 | { 0x16c0, 9229 }, | |
140 | { 0x0a40, 10253 }, | |
141 | { 0x1a40, 11277 }, | |
142 | { 0x0640, 12301 }, | |
143 | { 0x1640, 13325 }, | |
144 | { 0x09c0, 14349 }, | |
145 | { 0x19c0, 15373 }, | |
146 | { 0x05c0, 16397 }, | |
147 | { 0x15c0, 17421 }, | |
148 | { 0x0dc0, 18445 }, | |
149 | { 0x1dc0, 19469 }, | |
150 | { 0x0940, 20493 }, | |
151 | { 0x1940, 21517 }, | |
152 | { 0x0540, 22541 }, | |
153 | { 0x1540, 23565 }, | |
154 | { 0x0b40, 24589 }, | |
155 | { 0x1b40, 25613 }, | |
156 | { 0x04c0, 26637 }, | |
157 | { 0x14c0, 27661 }, | |
158 | { 0, 0 } | |
159 | }; | |
160 | ||
161 | static struct proto MakeUp[] = { | |
162 | { 0x0080, 28683 }, | |
163 | { 0x0180, 29707 }, | |
164 | { 0x0580, 30731 }, | |
165 | { 0x0480, 31756 }, | |
166 | { 0x0c80, 32780 }, | |
167 | { 0x0280, 33804 }, | |
168 | { 0x0a80, 34828 }, | |
169 | { 0x0680, 35852 }, | |
170 | { 0x0e80, 36876 }, | |
171 | { 0x0380, 37900 }, | |
172 | { 0x0b80, 38924 }, | |
173 | { 0x0780, 39948 }, | |
174 | { 0x0f80, 40972 }, | |
175 | { 0, 0 } | |
176 | }; | |
177 | ||
178 | static struct proto TermW[] = { | |
179 | { 0x00ac, 8 }, | |
180 | { 0x0038, 22 }, | |
181 | { 0x000e, 36 }, | |
182 | { 0x0001, 52 }, | |
183 | { 0x000d, 68 }, | |
184 | { 0x0003, 84 }, | |
185 | { 0x0007, 100 }, | |
186 | { 0x000f, 116 }, | |
187 | { 0x0019, 133 }, | |
188 | { 0x0005, 149 }, | |
189 | { 0x001c, 165 }, | |
190 | { 0x0002, 181 }, | |
191 | { 0x0004, 198 }, | |
192 | { 0x0030, 214 }, | |
193 | { 0x000b, 230 }, | |
194 | { 0x002b, 246 }, | |
195 | { 0x0015, 262 }, | |
196 | { 0x0035, 278 }, | |
197 | { 0x0072, 295 }, | |
198 | { 0x0018, 311 }, | |
199 | { 0x0008, 327 }, | |
200 | { 0x0074, 343 }, | |
201 | { 0x0060, 359 }, | |
202 | { 0x0010, 375 }, | |
203 | { 0x000a, 391 }, | |
204 | { 0x006a, 407 }, | |
205 | { 0x0064, 423 }, | |
206 | { 0x0012, 439 }, | |
207 | { 0x000c, 455 }, | |
208 | { 0x0040, 472 }, | |
209 | { 0x00c0, 488 }, | |
210 | { 0x0058, 504 }, | |
211 | { 0x00d8, 520 }, | |
212 | { 0x0048, 536 }, | |
213 | { 0x00c8, 552 }, | |
214 | { 0x0028, 568 }, | |
215 | { 0x00a8, 584 }, | |
216 | { 0x0068, 600 }, | |
217 | { 0x00e8, 616 }, | |
218 | { 0x0014, 632 }, | |
219 | { 0x0094, 648 }, | |
220 | { 0x0054, 664 }, | |
221 | { 0x00d4, 680 }, | |
222 | { 0x0034, 696 }, | |
223 | { 0x00b4, 712 }, | |
224 | { 0x0020, 728 }, | |
225 | { 0x00a0, 744 }, | |
226 | { 0x0050, 760 }, | |
227 | { 0x00d0, 776 }, | |
228 | { 0x004a, 792 }, | |
229 | { 0x00ca, 808 }, | |
230 | { 0x002a, 824 }, | |
231 | { 0x00aa, 840 }, | |
232 | { 0x0024, 856 }, | |
233 | { 0x00a4, 872 }, | |
234 | { 0x001a, 888 }, | |
235 | { 0x009a, 904 }, | |
236 | { 0x005a, 920 }, | |
237 | { 0x00da, 936 }, | |
238 | { 0x0052, 952 }, | |
239 | { 0x00d2, 968 }, | |
240 | { 0x004c, 984 }, | |
241 | { 0x00cc, 1000 }, | |
242 | { 0x002c, 1016 }, | |
243 | { 0, 0 } | |
244 | }; | |
245 | ||
246 | static struct proto TermB[] = { | |
247 | { 0x03b0, 10 }, | |
248 | { 0x0002, 19 }, | |
249 | { 0x0003, 34 }, | |
250 | { 0x0001, 50 }, | |
251 | { 0x0006, 67 }, | |
252 | { 0x000c, 84 }, | |
253 | { 0x0004, 100 }, | |
254 | { 0x0018, 117 }, | |
255 | { 0x0028, 134 }, | |
256 | { 0x0008, 150 }, | |
257 | { 0x0010, 167 }, | |
258 | { 0x0050, 183 }, | |
259 | { 0x0070, 199 }, | |
260 | { 0x0020, 216 }, | |
261 | { 0x00e0, 232 }, | |
262 | { 0x0030, 249 }, | |
263 | { 0x03a0, 266 }, | |
264 | { 0x0060, 282 }, | |
265 | { 0x0040, 298 }, | |
266 | { 0x0730, 315 }, | |
267 | { 0x00b0, 331 }, | |
268 | { 0x01b0, 347 }, | |
269 | { 0x0760, 363 }, | |
270 | { 0x00a0, 379 }, | |
271 | { 0x0740, 395 }, | |
272 | { 0x00c0, 411 }, | |
273 | { 0x0530, 428 }, | |
274 | { 0x0d30, 444 }, | |
275 | { 0x0330, 460 }, | |
276 | { 0x0b30, 476 }, | |
277 | { 0x0160, 492 }, | |
278 | { 0x0960, 508 }, | |
279 | { 0x0560, 524 }, | |
280 | { 0x0d60, 540 }, | |
281 | { 0x04b0, 556 }, | |
282 | { 0x0cb0, 572 }, | |
283 | { 0x02b0, 588 }, | |
284 | { 0x0ab0, 604 }, | |
285 | { 0x06b0, 620 }, | |
286 | { 0x0eb0, 636 }, | |
287 | { 0x0360, 652 }, | |
288 | { 0x0b60, 668 }, | |
289 | { 0x05b0, 684 }, | |
290 | { 0x0db0, 700 }, | |
291 | { 0x02a0, 716 }, | |
292 | { 0x0aa0, 732 }, | |
293 | { 0x06a0, 748 }, | |
294 | { 0x0ea0, 764 }, | |
295 | { 0x0260, 780 }, | |
296 | { 0x0a60, 796 }, | |
297 | { 0x04a0, 812 }, | |
298 | { 0x0ca0, 828 }, | |
299 | { 0x0240, 844 }, | |
300 | { 0x0ec0, 860 }, | |
301 | { 0x01c0, 876 }, | |
302 | { 0x0e40, 892 }, | |
303 | { 0x0140, 908 }, | |
304 | { 0x01a0, 924 }, | |
305 | { 0x09a0, 940 }, | |
306 | { 0x0d40, 956 }, | |
307 | { 0x0340, 972 }, | |
308 | { 0x05a0, 988 }, | |
309 | { 0x0660, 1004 }, | |
310 | { 0x0e60, 1020 }, | |
311 | { 0, 0 } | |
312 | }; | |
313 | ||
314 | static struct proto EOLH[] = { | |
315 | { 0x0000, 11 }, | |
316 | { 0, 0 } | |
317 | }; | |
318 | ||
319 | static void | |
320 | FillTable(TIFFFaxTabEnt *T, int Size, struct proto *P, int State) | |
321 | { | |
322 | int limit = 1 << Size; | |
323 | ||
324 | while (P->val) { | |
325 | int width = P->val & 15; | |
326 | int param = P->val >> 4; | |
327 | int incr = 1 << width; | |
328 | int code; | |
329 | for (code = P->code; code < limit; code += incr) { | |
330 | TIFFFaxTabEnt *E = T+code; | |
331 | E->State = State; | |
332 | E->Width = width; | |
333 | E->Param = param; | |
334 | } | |
335 | P++; | |
336 | } | |
337 | } | |
338 | ||
339 | static char* storage_class = ""; | |
340 | static char* const_class = ""; | |
341 | static int packoutput = 1; | |
342 | static char* prebrace = ""; | |
343 | static char* postbrace = ""; | |
344 | ||
345 | void | |
346 | WriteTable(FILE* fd, const TIFFFaxTabEnt* T, int Size, const char* name) | |
347 | { | |
348 | int i; | |
349 | char* sep; | |
350 | ||
351 | fprintf(fd, "%s %s TIFFFaxTabEnt %s[%d] = {", | |
352 | storage_class, const_class, name, Size); | |
353 | if (packoutput) { | |
354 | sep = "\n"; | |
355 | for (i = 0; i < Size; i++) { | |
356 | fprintf(fd, "%s%s%d,%d,%d%s", | |
357 | sep, prebrace, T->State, T->Width, (int) T->Param, postbrace); | |
358 | if (((i+1) % 10) == 0) | |
359 | sep = ",\n"; | |
360 | else | |
361 | sep = ","; | |
362 | T++; | |
363 | } | |
364 | } else { | |
365 | sep = "\n "; | |
366 | for (i = 0; i < Size; i++) { | |
367 | fprintf(fd, "%s%s%3d,%3d,%4d%s", | |
368 | sep, prebrace, T->State, T->Width, (int) T->Param, postbrace); | |
369 | if (((i+1) % 6) == 0) | |
370 | sep = ",\n "; | |
371 | else | |
372 | sep = ","; | |
373 | T++; | |
374 | } | |
375 | } | |
376 | fprintf(fd, "\n};\n"); | |
377 | } | |
378 | ||
379 | /* initialise the huffman code tables */ | |
380 | int | |
381 | main(int argc, char* argv[]) | |
382 | { | |
383 | FILE* fd; | |
384 | char* outputfile; | |
385 | int c; | |
386 | extern int optind; | |
387 | extern char* optarg; | |
388 | ||
389 | while ((c = getopt(argc, argv, "c:s:bp")) != -1) | |
390 | switch (c) { | |
391 | case 'c': | |
392 | const_class = optarg; | |
393 | break; | |
394 | case 's': | |
395 | storage_class = optarg; | |
396 | break; | |
397 | case 'p': | |
398 | packoutput = 0; | |
399 | break; | |
400 | case 'b': | |
401 | prebrace = "{"; | |
402 | postbrace = "}"; | |
403 | break; | |
404 | case '?': | |
405 | fprintf(stderr, | |
406 | "usage: %s [-c const] [-s storage] [-p] [-b] file\n", | |
407 | argv[0]); | |
408 | return (-1); | |
409 | } | |
410 | outputfile = optind < argc ? argv[optind] : "g3states.h"; | |
411 | fd = fopen(outputfile, "w"); | |
412 | if (fd == NULL) { | |
413 | fprintf(stderr, "%s: %s: Cannot create output file.\n", | |
414 | argv[0], outputfile); | |
415 | return (-2); | |
416 | } | |
417 | FillTable(MainTable, 7, Pass, S_Pass); | |
418 | FillTable(MainTable, 7, Horiz, S_Horiz); | |
419 | FillTable(MainTable, 7, V0, S_V0); | |
420 | FillTable(MainTable, 7, VR, S_VR); | |
421 | FillTable(MainTable, 7, VL, S_VL); | |
422 | FillTable(MainTable, 7, Ext, S_Ext); | |
423 | FillTable(MainTable, 7, EOLV, S_EOL); | |
424 | FillTable(WhiteTable, 12, MakeUpW, S_MakeUpW); | |
425 | FillTable(WhiteTable, 12, MakeUp, S_MakeUp); | |
426 | FillTable(WhiteTable, 12, TermW, S_TermW); | |
427 | FillTable(WhiteTable, 12, EOLH, S_EOL); | |
428 | FillTable(BlackTable, 13, MakeUpB, S_MakeUpB); | |
429 | FillTable(BlackTable, 13, MakeUp, S_MakeUp); | |
430 | FillTable(BlackTable, 13, TermB, S_TermB); | |
431 | FillTable(BlackTable, 13, EOLH, S_EOL); | |
432 | ||
433 | fprintf(fd, "/* WARNING, this file was automatically generated by the\n"); | |
434 | fprintf(fd, " mkg3states program */\n"); | |
435 | fprintf(fd, "#include \"tiff.h\"\n"); | |
436 | fprintf(fd, "#include \"tif_fax3.h\"\n"); | |
437 | WriteTable(fd, MainTable, 128, "TIFFFaxMainTable"); | |
438 | WriteTable(fd, WhiteTable, 4096, "TIFFFaxWhiteTable"); | |
439 | WriteTable(fd, BlackTable, 8192, "TIFFFaxBlackTable"); | |
440 | fclose(fd); | |
441 | return (0); | |
442 | } | |
443 | ||
444 | /* vim: set ts=8 sts=8 sw=8 noet: */ | |
80ed523f VZ |
445 | /* |
446 | * Local Variables: | |
447 | * mode: c | |
448 | * c-basic-offset: 8 | |
449 | * fill-column: 78 | |
450 | * End: | |
451 | */ |