o Added color support
[s-roff.git] / src / xditview / DviChar.c
blobfa37b24ce330927c7f10bc003b859bcc09533a23
1 /*
2 * DviChar.c
4 * Map DVI (ditroff output) character names to
5 * font indexes and back
6 */
8 #include <stdlib.h>
9 #include <string.h>
10 #include "DviChar.h"
12 extern char *xmalloc();
14 #define allocHash() ((DviCharNameHash *) xmalloc (sizeof (DviCharNameHash)))
16 struct map_list {
17 struct map_list *next;
18 DviCharNameMap *map;
21 static struct map_list *world;
23 static int standard_maps_loaded = 0;
24 static void load_standard_maps ();
25 static int hash_name ();
26 static void dispose_hash(), compute_hash();
28 DviCharNameMap *
29 DviFindMap (encoding)
30 char *encoding;
32 struct map_list *m;
34 if (!standard_maps_loaded)
35 load_standard_maps ();
36 for (m = world; m; m=m->next)
37 if (!strcmp (m->map->encoding, encoding))
38 return m->map;
39 return 0;
42 void
43 DviRegisterMap (map)
44 DviCharNameMap *map;
46 struct map_list *m;
48 if (!standard_maps_loaded)
49 load_standard_maps ();
50 for (m = world; m; m = m->next)
51 if (!strcmp (m->map->encoding, map->encoding))
52 break;
53 if (!m) {
54 m = (struct map_list *) xmalloc (sizeof *m);
55 m->next = world;
56 world = m;
58 dispose_hash (map);
59 m->map = map;
60 compute_hash (map);
63 static void
64 dispose_hash (map)
65 DviCharNameMap *map;
67 DviCharNameHash **buckets;
68 DviCharNameHash *h, *next;
69 int i;
71 buckets = map->buckets;
72 for (i = 0; i < DVI_HASH_SIZE; i++) {
73 for (h = buckets[i]; h; h=next) {
74 next = h->next;
75 free (h);
80 static int
81 hash_name (name)
82 char *name;
84 int i = 0;
86 while (*name)
87 i = (i << 1) ^ *name++;
88 if (i < 0)
89 i = -i;
90 return i;
93 static void
94 compute_hash (map)
95 DviCharNameMap *map;
97 DviCharNameHash **buckets;
98 int c, s, i;
99 DviCharNameHash *h;
101 buckets = map->buckets;
102 for (i = 0; i < DVI_HASH_SIZE; i++)
103 buckets[i] = 0;
104 for (c = 0; c < DVI_MAP_SIZE; c++)
105 for (s = 0; s < DVI_MAX_SYNONYMS; s++) {
106 if (!map->dvi_names[c][s])
107 break;
108 i = hash_name (map->dvi_names[c][s]) % DVI_HASH_SIZE;
109 h = allocHash ();
110 h->next = buckets[i];
111 buckets[i] = h;
112 h->name = map->dvi_names[c][s];
113 h->position = c;
119 DviCharIndex (map, name)
120 DviCharNameMap *map;
121 char *name;
123 int i;
124 DviCharNameHash *h;
126 i = hash_name (name) % DVI_HASH_SIZE;
127 for (h = map->buckets[i]; h; h=h->next)
128 if (!strcmp (h->name, name))
129 return h->position;
130 return -1;
133 static DviCharNameMap ISO8859_1_map = {
134 "iso8859-1",
137 { 0, /* 0 */},
138 { 0, /* 1 */},
139 { 0, /* 2 */},
140 { 0, /* 3 */},
141 { 0, /* 4 */},
142 { 0, /* 5 */},
143 { 0, /* 6 */},
144 { 0, /* 7 */},
145 { 0, /* 8 */},
146 { 0, /* 9 */},
147 { 0, /* 10 */},
148 { 0, /* 11 */},
149 { 0, /* 12 */},
150 { 0, /* 13 */},
151 { 0, /* 14 */},
152 { 0, /* 15 */},
153 { 0, /* 16 */},
154 { 0, /* 17 */},
155 { 0, /* 18 */},
156 { 0, /* 19 */},
157 { 0, /* 20 */},
158 { 0, /* 21 */},
159 { 0, /* 22 */},
160 { 0, /* 23 */},
161 { 0, /* 24 */},
162 { 0, /* 25 */},
163 { 0, /* 26 */},
164 { 0, /* 27 */},
165 { 0, /* 28 */},
166 { 0, /* 29 */},
167 { 0, /* 30 */},
168 { 0, /* 31 */},
169 { 0, /* 32 */},
170 { "!", /* 33 */},
171 { "\"", "dq", /* 34 */},
172 { "#", "sh", /* 35 */},
173 { "$", "Do", /* 36 */},
174 { "%", /* 37 */},
175 { "&", /* 38 */},
176 { "'", "cq", /* 39 */},
177 { "(", /* 40 */},
178 { ")", /* 41 */},
179 { "*", /* 42 */},
180 { "+", /* 43 */},
181 { ",", /* 44 */},
182 { "\\-", /* 45 */},
183 { ".", /* 46 */},
184 { "/", "sl", /* 47 */},
185 { "0", /* 48 */},
186 { "1", /* 49 */},
187 { "2", /* 50 */},
188 { "3", /* 51 */},
189 { "4", /* 52 */},
190 { "5", /* 53 */},
191 { "6", /* 54 */},
192 { "7", /* 55 */},
193 { "8", /* 56 */},
194 { "9", /* 57 */},
195 { ":", /* 58 */},
196 { ";", /* 59 */},
197 { "<", /* 60 */},
198 { "=", /* 61 */},
199 { ">", /* 62 */},
200 { "?", /* 63 */},
201 { "@", "at", /* 64 */},
202 { "A", /* 65 */},
203 { "B", /* 66 */},
204 { "C", /* 67 */},
205 { "D", /* 68 */},
206 { "E", /* 69 */},
207 { "F", /* 70 */},
208 { "G", /* 71 */},
209 { "H", /* 72 */},
210 { "I", /* 73 */},
211 { "J", /* 74 */},
212 { "K", /* 75 */},
213 { "L", /* 76 */},
214 { "M", /* 77 */},
215 { "N", /* 78 */},
216 { "O", /* 79 */},
217 { "P", /* 80 */},
218 { "Q", /* 81 */},
219 { "R", /* 82 */},
220 { "S", /* 83 */},
221 { "T", /* 84 */},
222 { "U", /* 85 */},
223 { "V", /* 86 */},
224 { "W", /* 87 */},
225 { "X", /* 88 */},
226 { "Y", /* 89 */},
227 { "Z", /* 90 */},
228 { "[", "lB", /* 91 */},
229 { "\\", "rs", /* 92 */},
230 { "]", "rB", /* 93 */},
231 { "^", "a^", "ha", /* 94 */},
232 { "_", /* 95 */},
233 { "`", "oq", /* 96 */},
234 { "a", /* 97 */},
235 { "b", /* 98 */},
236 { "c", /* 99 */},
237 { "d", /* 100 */},
238 { "e", /* 101 */},
239 { "f", /* 102 */},
240 { "g", /* 103 */},
241 { "h", /* 104 */},
242 { "i", /* 105 */},
243 { "j", /* 106 */},
244 { "k", /* 107 */},
245 { "l", /* 108 */},
246 { "m", /* 109 */},
247 { "n", /* 110 */},
248 { "o", /* 111 */},
249 { "p", /* 112 */},
250 { "q", /* 113 */},
251 { "r", /* 114 */},
252 { "s", /* 115 */},
253 { "t", /* 116 */},
254 { "u", /* 117 */},
255 { "v", /* 118 */},
256 { "w", /* 119 */},
257 { "x", /* 120 */},
258 { "y", /* 121 */},
259 { "z", /* 122 */},
260 { "{", "lC", /* 123 */},
261 { "|", "ba", /* 124 */},
262 { "}", "rC", /* 125 */},
263 { "~", "a~", "ti", /* 126 */},
264 { 0, /* 127 */},
265 { 0, /* 128 */},
266 { 0, /* 129 */},
267 { 0, /* 130 */},
268 { 0, /* 131 */},
269 { 0, /* 132 */},
270 { 0, /* 133 */},
271 { 0, /* 134 */},
272 { 0, /* 135 */},
273 { 0, /* 136 */},
274 { 0, /* 137 */},
275 { 0, /* 138 */},
276 { 0, /* 139 */},
277 { 0, /* 140 */},
278 { 0, /* 141 */},
279 { 0, /* 142 */},
280 { 0, /* 143 */},
281 { 0, /* 144 */},
282 { 0, /* 145 */},
283 { 0, /* 146 */},
284 { 0, /* 147 */},
285 { 0, /* 148 */},
286 { 0, /* 149 */},
287 { 0, /* 150 */},
288 { 0, /* 151 */},
289 { 0, /* 152 */},
290 { 0, /* 153 */},
291 { 0, /* 154 */},
292 { 0, /* 155 */},
293 { 0, /* 156 */},
294 { 0, /* 157 */},
295 { 0, /* 158 */},
296 { 0, /* 159 */},
297 { 0, /* 160 */},
298 { "r!", /* 161 */},
299 { "ct", /* 162 */},
300 { "Po", /* 163 */},
301 { "Cs", /* 164 */},
302 { "Ye", /* 165 */},
303 { "bb", /* 166 */},
304 { "sc", /* 167 */},
305 { "ad", /* 168 */},
306 { "co", /* 169 */},
307 { "Of", /* 170 */},
308 { "Fo", /* 171 */},
309 { "tno", /* 172 */},
310 { "-", "hy", /* 173 */},
311 { "rg", /* 174 */},
312 { "a-", /* 175 */},
313 { "de", /* 176 */},
314 { "t+-", /* 177 */},
315 { "S2", /* 178 */},
316 { "S3", /* 179 */},
317 { "aa", /* 180 */},
318 { "mc", /* 181 */},
319 { "ps", /* 182 */},
320 { "pc", /* 183 */},
321 { "ac", /* 184 */},
322 { "S1", /* 185 */},
323 { "Om", /* 186 */},
324 { "Fc", /* 187 */},
325 { "14", /* 188 */},
326 { "12", /* 189 */},
327 { "34", /* 190 */},
328 { "r?", /* 191 */},
329 { "`A", /* 192 */},
330 { "'A", /* 193 */},
331 { "^A", /* 194 */},
332 { "~A", /* 195 */},
333 { ":A", /* 196 */},
334 { "oA", /* 197 */},
335 { "AE", /* 198 */},
336 { ",C", /* 199 */},
337 { "`E", /* 200 */},
338 { "'E", /* 201 */},
339 { "^E", /* 202 */},
340 { ":E", /* 203 */},
341 { "`I", /* 204 */},
342 { "'I", /* 205 */},
343 { "^I", /* 206 */},
344 { ":I", /* 207 */},
345 { "-D", /* 208 */},
346 { "~N", /* 209 */},
347 { "`O", /* 210 */},
348 { "'O", /* 211 */},
349 { "^O", /* 212 */},
350 { "~O", /* 213 */},
351 { ":O", /* 214 */},
352 { "tmu", /* 215 */},
353 { "/O", /* 216 */},
354 { "`U", /* 217 */},
355 { "'U", /* 218 */},
356 { "^U", /* 219 */},
357 { ":U", /* 220 */},
358 { "'Y", /* 221 */},
359 { "TP", /* 222 */},
360 { "ss", /* 223 */},
361 { "`a", /* 224 */},
362 { "'a", /* 225 */},
363 { "^a", /* 226 */},
364 { "~a", /* 227 */},
365 { ":a", /* 228 */},
366 { "oa", /* 229 */},
367 { "ae", /* 230 */},
368 { ",c", /* 231 */},
369 { "`e", /* 232 */},
370 { "'e", /* 233 */},
371 { "^e", /* 234 */},
372 { ":e", /* 235 */},
373 { "`i", /* 236 */},
374 { "'i", /* 237 */},
375 { "^i", /* 238 */},
376 { ":i", /* 239 */},
377 { "Sd", /* 240 */},
378 { "~n", /* 241 */},
379 { "`o", /* 242 */},
380 { "'o", /* 243 */},
381 { "^o", /* 244 */},
382 { "~o", /* 245 */},
383 { ":o", /* 246 */},
384 { "tdi", /* 247 */},
385 { "/o", /* 248 */},
386 { "`u", /* 249 */},
387 { "'u", /* 250 */},
388 { "^u", /* 251 */},
389 { ":u", /* 252 */},
390 { "'y", /* 253 */},
391 { "Tp", /* 254 */},
392 { ":y", /* 255 */},
395 static DviCharNameMap Adobe_Symbol_map = {
396 "adobe-fontspecific",
399 { 0, /* 0 */},
400 { 0, /* 1 */},
401 { 0, /* 2 */},
402 { 0, /* 3 */},
403 { 0, /* 4 */},
404 { 0, /* 5 */},
405 { 0, /* 6 */},
406 { 0, /* 7 */},
407 { 0, /* 8 */},
408 { 0, /* 9 */},
409 { 0, /* 10 */},
410 { 0, /* 11 */},
411 { 0, /* 12 */},
412 { 0, /* 13 */},
413 { 0, /* 14 */},
414 { 0, /* 15 */},
415 { 0, /* 16 */},
416 { 0, /* 17 */},
417 { 0, /* 18 */},
418 { 0, /* 19 */},
419 { 0, /* 20 */},
420 { 0, /* 21 */},
421 { 0, /* 22 */},
422 { 0, /* 23 */},
423 { 0, /* 24 */},
424 { 0, /* 25 */},
425 { 0, /* 26 */},
426 { 0, /* 27 */},
427 { 0, /* 28 */},
428 { 0, /* 29 */},
429 { 0, /* 30 */},
430 { 0, /* 31 */},
431 { 0, /* 32 */},
432 { "!", /* 33 */},
433 { "fa", /* 34 */},
434 { "#", "sh", /* 35 */},
435 { "te", /* 36 */},
436 { "%", /* 37 */},
437 { "&", /* 38 */},
438 { "st", /* 39 */},
439 { "(", /* 40 */},
440 { ")", /* 41 */},
441 { "**", /* 42 */},
442 { "+", "pl", /* 43 */},
443 { ",", /* 44 */},
444 { "\\-", "mi", /* 45 */},
445 { ".", /* 46 */},
446 { "/", "sl", /* 47 */},
447 { "0", /* 48 */},
448 { "1", /* 49 */},
449 { "2", /* 50 */},
450 { "3", /* 51 */},
451 { "4", /* 52 */},
452 { "5", /* 53 */},
453 { "6", /* 54 */},
454 { "7", /* 55 */},
455 { "8", /* 56 */},
456 { "9", /* 57 */},
457 { ":", /* 58 */},
458 { ";", /* 59 */},
459 { "<", /* 60 */},
460 { "=", "eq", /* 61 */},
461 { ">", /* 62 */},
462 { "?", /* 63 */},
463 { "=~", /* 64 */},
464 { "*A", /* 65 */},
465 { "*B", /* 66 */},
466 { "*X", /* 67 */},
467 { "*D", /* 68 */},
468 { "*E", /* 69 */},
469 { "*F", /* 70 */},
470 { "*G", /* 71 */},
471 { "*Y", /* 72 */},
472 { "*I", /* 73 */},
473 { "+h", /* 74 */},
474 { "*K", /* 75 */},
475 { "*L", /* 76 */},
476 { "*M", /* 77 */},
477 { "*N", /* 78 */},
478 { "*O", /* 79 */},
479 { "*P", /* 80 */},
480 { "*H", /* 81 */},
481 { "*R", /* 82 */},
482 { "*S", /* 83 */},
483 { "*T", /* 84 */},
484 { 0, /* 85 */},
485 { "ts", /* 86 */},
486 { "*W", /* 87 */},
487 { "*C", /* 88 */},
488 { "*Q", /* 89 */},
489 { "*Z", /* 90 */},
490 { "[", "lB", /* 91 */},
491 { "tf", "3d", /* 92 */},
492 { "]", "rB", /* 93 */},
493 { "pp", /* 94 */},
494 { "_", /* 95 */},
495 { "radicalex", /* 96 */},
496 { "*a", /* 97 */},
497 { "*b", /* 98 */},
498 { "*x", /* 99 */},
499 { "*d", /* 100 */},
500 { "*e", /* 101 */},
501 { "*f", /* 102 */},
502 { "*g", /* 103 */},
503 { "*y", /* 104 */},
504 { "*i", /* 105 */},
505 { "+f", /* 106 */},
506 { "*k", /* 107 */},
507 { "*l", /* 108 */},
508 { "*m", /* 109 */},
509 { "*n", /* 110 */},
510 { "*o", /* 111 */},
511 { "*p", /* 112 */},
512 { "*h", /* 113 */},
513 { "*r", /* 114 */},
514 { "*s", /* 115 */},
515 { "*t", /* 116 */},
516 { "*u", /* 117 */},
517 { "+p", /* 118 */},
518 { "*w", /* 119 */},
519 { "*c", /* 120 */},
520 { "*q", /* 121 */},
521 { "*z", /* 122 */},
522 { "lC", "{", /* 123 */},
523 { "ba", "|", /* 124 */},
524 { "rC", "}", /* 125 */},
525 { "ap", /* 126 */},
526 { 0, /* 127 */},
527 { 0, /* 128 */},
528 { 0, /* 129 */},
529 { 0, /* 130 */},
530 { 0, /* 131 */},
531 { 0, /* 132 */},
532 { 0, /* 133 */},
533 { 0, /* 134 */},
534 { 0, /* 135 */},
535 { 0, /* 136 */},
536 { 0, /* 137 */},
537 { 0, /* 138 */},
538 { 0, /* 139 */},
539 { 0, /* 140 */},
540 { 0, /* 141 */},
541 { 0, /* 142 */},
542 { 0, /* 143 */},
543 { 0, /* 144 */},
544 { 0, /* 145 */},
545 { 0, /* 146 */},
546 { 0, /* 147 */},
547 { 0, /* 148 */},
548 { 0, /* 149 */},
549 { 0, /* 150 */},
550 { 0, /* 151 */},
551 { 0, /* 152 */},
552 { 0, /* 153 */},
553 { 0, /* 154 */},
554 { 0, /* 155 */},
555 { 0, /* 156 */},
556 { 0, /* 157 */},
557 { 0, /* 158 */},
558 { 0, /* 159 */},
559 { 0, /* 160 */},
560 { "*U", /* 161 */},
561 { "fm", /* 162 */},
562 { "<=", /* 163 */},
563 { "f/", /* 164 */},
564 { "if", /* 165 */},
565 { "Fn", /* 166 */},
566 { "CL", /* 167 */},
567 { "DI", /* 168 */},
568 { "HE", /* 169 */},
569 { "SP", /* 170 */},
570 { "<>", /* 171 */},
571 { "<-", /* 172 */},
572 { "ua", "arrowverttp", /* 173 */},
573 { "->", /* 174 */},
574 { "da", "arrowvertbt", /* 175 */},
575 { "de", /* 176 */},
576 { "+-", /* 177 */},
577 { "sd", /* 178 */},
578 { ">=", /* 179 */},
579 { "mu", /* 180 */},
580 { "pt", /* 181 */},
581 { "pd", /* 182 */},
582 { "bu", /* 183 */},
583 { "di", /* 184 */},
584 { "!=", /* 185 */},
585 { "==", /* 186 */},
586 { "~=", "~~", /* 187 */},
587 { 0, /* 188 */},
588 { "arrowvertex", /* 189 */},
589 { "an", /* 190 */},
590 { "CR", /* 191 */},
591 { "Ah", /* 192 */},
592 { "Im", /* 193 */},
593 { "Re", /* 194 */},
594 { "wp", /* 195 */},
595 { "c*", /* 196 */},
596 { "c+", /* 197 */},
597 { "es", /* 198 */},
598 { "ca", /* 199 */},
599 { "cu", /* 200 */},
600 { "sp", /* 201 */},
601 { "ip", /* 202 */},
602 { "nb", /* 203 */},
603 { "sb", /* 204 */},
604 { "ib", /* 205 */},
605 { "mo", /* 206 */},
606 { "nm", /* 207 */},
607 { "/_", /* 208 */},
608 { "gr", /* 209 */},
609 { "rg", /* 210 */},
610 { "co", /* 211 */},
611 { "tm", /* 212 */},
612 { 0, /* 213 */},
613 { "sr", "sqrt", /* 214 */},
614 { "md", /* 215 */},
615 { "no", /* 216 */},
616 { "AN", /* 217 */},
617 { "OR", /* 218 */},
618 { "hA", /* 219 */},
619 { "lA", /* 220 */},
620 { "uA", /* 221 */},
621 { "rA", /* 222 */},
622 { "dA", /* 223 */},
623 { "lz", /* 224 */},
624 { "la", /* 225 */},
625 { 0, /* 226 */},
626 { 0, /* 227 */},
627 { 0, /* 228 */},
628 { 0, /* 229 */},
629 { "parenlefttp", /* 230 */},
630 { "parenleftex", /* 231 */},
631 { "parenleftbt", /* 232 */},
632 { "bracketlefttp", "lc", /* 233 */},
633 { "bracketleftex", /* 234 */},
634 { "bracketleftbt", "lf", /* 235 */},
635 { "bracelefttp", "lt", /* 236 */},
636 { "braceleftmid", "lk", /* 237 */},
637 { "braceleftbt", "lb", /* 238 */},
638 { "bracerightex", "braceleftex", "braceex", "bv", /* 239 */},
639 { 0, /* 240 */},
640 { "ra", /* 241 */},
641 { "is", "integral", /* 242 */},
642 { 0, /* 243 */},
643 { 0, /* 244 */},
644 { 0, /* 245 */},
645 { "parenrighttp", /* 246 */},
646 { "parenrightex", /* 247 */},
647 { "parenrightbt", /* 248 */},
648 { "bracketrighttp", "rc", /* 249 */},
649 { "bracketrightex", /* 250 */},
650 { "bracketrightbt", "rf", /* 251 */},
651 { "bracerighttp", "rt", /* 252 */},
652 { "bracerightmid", "rk", /* 253 */},
653 { "bracerightbt", "rb", /* 254 */},
654 { 0, /* 255 */},
658 static void
659 load_standard_maps ()
661 standard_maps_loaded = 1;
662 DviRegisterMap (&ISO8859_1_map);
663 DviRegisterMap (&Adobe_Symbol_map);