blob: 1df9ccc5f6c1738cbf1f4d7ba9ecdb1d1ed099c7
1 | /* "$Id: mkg3states.c,v 1.11 2010-03-10 18:56:48 bfriesen Exp $ */ |
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 | */ |
32 | #include "tif_config.h" |
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 | |
44 | #ifndef HAVE_GETOPT |
45 | extern int getopt(int, char**, char*); |
46 | #endif |
47 | |
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: */ |
445 | /* |
446 | * Local Variables: |
447 | * mode: c |
448 | * c-basic-offset: 8 |
449 | * fill-column: 78 |
450 | * End: |
451 | */ |
452 |