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