]> git.xonotic.org Git - xonotic/gmqcc.git/blob - typedef.c
Count file lines
[xonotic/gmqcc.git] / typedef.c
1 /*
2  * Copyright (C) 2012 
3  *      Dale Weiler
4  *
5  * Permission is hereby granted, free of charge, to any person obtaining a copy of
6  * this software and associated documentation files (the "Software"), to deal in
7  * the Software without restriction, including without limitation the rights to
8  * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
9  * of the Software, and to permit persons to whom the Software is furnished to do
10  * so, subject to the following conditions:
11  *
12  * The above copyright notice and this permission notice shall be included in all
13  * copies or substantial portions of the Software.
14  *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21  * SOFTWARE.
22  */
23 #include <string.h>
24 #include <stdint.h> /* replace if stdint.h doesn't exist! */
25 #include <limits.h>
26 #include "gmqcc.h"
27 static typedef_node *typedef_table[1024];
28
29 void typedef_init() {
30         int i;
31         for(i = 0; i < sizeof(typedef_table)/sizeof(*typedef_table); i++)
32                 typedef_table[i] = NULL;
33 }
34
35 unsigned int typedef_hash(const char *s) {
36         unsigned int hash = 0;
37         unsigned int size = strlen(s);
38         unsigned int iter;
39         
40         for (iter = 0; iter < size; iter++) {
41                 hash += s[iter];
42                 hash += (hash << 10);
43                 hash ^= (hash >> 6);
44         }
45         hash += (hash << 3);
46         hash ^= (hash >> 11);
47         hash += (hash << 15);
48         
49         return hash % 1024;
50 }
51
52 typedef_node *typedef_find(const char *s) {
53         unsigned int  hash = typedef_hash(s);
54         typedef_node *find = typedef_table[hash];
55         return find;
56 }
57
58 void typedef_clear() {
59         int i;
60         for(i = 1024; i > 0; i--) {
61                 if(typedef_table[i]) {
62                         mem_d(typedef_table[i]->name);
63                         mem_d(typedef_table[i]);
64                 }
65         }
66 }
67
68 int typedef_add(const char *from, const char *to) {
69         unsigned int  hash = typedef_hash(to);
70         typedef_node *find = typedef_table[hash];
71         
72         if (find)
73                 return error(ERROR_PARSE, "typedef for %s already exists or conflicts\n", to);
74         
75         /* check if the type exists first */
76         if (strncmp(from, "float",  sizeof("float"))  == 0 ||
77             strncmp(from, "vector", sizeof("vector")) == 0 ||
78             strncmp(from, "string", sizeof("string")) == 0 ||
79             strncmp(from, "entity", sizeof("entity")) == 0 ||
80             strncmp(from, "void",   sizeof("void"))   == 0) {
81                 
82                 typedef_table[hash]       = mem_a(sizeof(typedef_node));
83                 typedef_table[hash]->name = util_strdup(from);
84                 return -100;
85         } else {
86                 /* search the typedefs for it (typedef-a-typedef?) */
87                 typedef_node *find = typedef_table[typedef_hash(from)];
88                 if (find) {
89                         typedef_table[hash]       = mem_a(sizeof(typedef_node));
90                         typedef_table[hash]->name = util_strdup(find->name);
91                         return -100;
92                 }
93         }
94         return error(ERROR_PARSE, "cannot typedef `%s` (not a type)\n", from);
95 }