1 /* $Id: mdoc_hash.c,v 1.18 2011/07/24 18:15:14 kristaps Exp $ */
2 /*
3 * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@bsd.lv>
4 *
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
8 *
9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16 */
17 #ifdef HAVE_CONFIG_H
18 #include "config.h"
19 #endif
20
21 #include <sys/types.h>
22
23 #include <assert.h>
24 #include <ctype.h>
25 #include <limits.h>
26 #include <stdlib.h>
27 #include <stdio.h>
28 #include <string.h>
29
30 #include "mdoc.h"
31 #include "mandoc.h"
32 #include "libmdoc.h"
33
34 static unsigned char table[27 * 12];
35
36 /*
37 * XXX - this hash has global scope, so if intended for use as a library
38 * with multiple callers, it will need re-invocation protection.
39 */
40 void
mdoc_hash_init(void)41 mdoc_hash_init(void)
42 {
43 int i, j, major;
44 const char *p;
45
46 memset(table, UCHAR_MAX, sizeof(table));
47
48 for (i = 0; i < (int)MDOC_MAX; i++) {
49 p = mdoc_macronames[i];
50
51 if (isalpha((unsigned char)p[1]))
52 major = 12 * (tolower((unsigned char)p[1]) - 97);
53 else
54 major = 12 * 26;
55
56 for (j = 0; j < 12; j++)
57 if (UCHAR_MAX == table[major + j]) {
58 table[major + j] = (unsigned char)i;
59 break;
60 }
61
62 assert(j < 12);
63 }
64 }
65
66 enum mdoct
mdoc_hash_find(const char * p)67 mdoc_hash_find(const char *p)
68 {
69 int major, i, j;
70
71 if (0 == p[0])
72 return(MDOC_MAX);
73 if ( ! isalpha((unsigned char)p[0]) && '%' != p[0])
74 return(MDOC_MAX);
75
76 if (isalpha((unsigned char)p[1]))
77 major = 12 * (tolower((unsigned char)p[1]) - 97);
78 else if ('1' == p[1])
79 major = 12 * 26;
80 else
81 return(MDOC_MAX);
82
83 if (p[2] && p[3])
84 return(MDOC_MAX);
85
86 for (j = 0; j < 12; j++) {
87 if (UCHAR_MAX == (i = table[major + j]))
88 break;
89 if (0 == strcmp(p, mdoc_macronames[i]))
90 return((enum mdoct)i);
91 }
92
93 return(MDOC_MAX);
94 }
95