81 h ^= h >> 15; |
83 h ^= h >> 15; |
82 |
84 |
83 return h; |
85 return h; |
84 } |
86 } |
85 |
87 |
|
88 static void cx_hash_map_clear(struct cx_map_s *map) { |
|
89 struct cx_hash_map_s *hash_map = (struct cx_hash_map_s *) map; |
|
90 cx_for_n(i, hash_map->bucket_count) { |
|
91 struct cx_hash_map_element_s *elem = hash_map->buckets[i]; |
|
92 if (elem != NULL) { |
|
93 do { |
|
94 struct cx_hash_map_element_s *next = elem->next; |
|
95 // free the key data |
|
96 cxFree(map->allocator, elem->key.data); |
|
97 // free the node |
|
98 cxFree(map->allocator, elem); |
|
99 // proceed |
|
100 elem = next; |
|
101 } while (elem != NULL); |
|
102 |
|
103 // do not leave a dangling pointer |
|
104 hash_map->buckets[i] = NULL; |
|
105 } |
|
106 } |
|
107 map->size = 0; |
|
108 } |
|
109 |
|
110 static void cx_hash_map_destructor(struct cx_map_s *map) { |
|
111 struct cx_hash_map_s *hash_map = (struct cx_hash_map_s *) map; |
|
112 |
|
113 // free the buckets |
|
114 cx_hash_map_clear(map); |
|
115 cxFree(map->allocator, hash_map->buckets); |
|
116 |
|
117 // free the map structure |
|
118 cxFree(map->allocator, map); |
|
119 } |
|
120 |
|
121 static int cx_hash_map_put( |
|
122 CxMap *map, |
|
123 CxDataPtr key, |
|
124 void *value |
|
125 ) { |
|
126 struct cx_hash_map_s *hash_map = (struct cx_hash_map_s *) map; |
|
127 CxAllocator *allocator = map->allocator; |
|
128 |
|
129 unsigned hash = cx_hash_map_murmur(key.data, key.len); |
|
130 |
|
131 size_t slot = hash % hash_map->bucket_count; |
|
132 struct cx_hash_map_element_s *elm = hash_map->buckets[slot]; |
|
133 struct cx_hash_map_element_s *prev = NULL; |
|
134 |
|
135 while (elm != NULL && elm->key.hash < hash) { |
|
136 prev = elm; |
|
137 elm = elm->next; |
|
138 } |
|
139 |
|
140 if (elm == NULL || elm->key.hash != hash) { |
|
141 struct cx_hash_map_element_s *e = cxMalloc(allocator, sizeof(struct cx_hash_map_element_s)); |
|
142 if (e == NULL) { |
|
143 return -1; |
|
144 } |
|
145 |
|
146 // write the value |
|
147 // TODO: depending on future map features, we may want to copy here |
|
148 e->data = value; |
|
149 |
|
150 // copy the key |
|
151 void *kd = cxMalloc(allocator, key.len); |
|
152 if (kd == NULL) { |
|
153 return -1; |
|
154 } |
|
155 memcpy(kd, key.data, key.len); |
|
156 e->key.data = kd; |
|
157 e->key.len = key.len; |
|
158 e->key.hash = hash; |
|
159 |
|
160 // insert the element into the linked list |
|
161 if (prev == NULL) { |
|
162 hash_map->buckets[slot] = e; |
|
163 } else { |
|
164 prev->next = e; |
|
165 } |
|
166 e->next = elm; |
|
167 |
|
168 // increase the size |
|
169 map->size++; |
|
170 } else { |
|
171 // (elem != NULL && elem->key.hash == hash) - overwrite value of existing element |
|
172 elm->data = value; |
|
173 } |
|
174 |
|
175 return 0; |
|
176 } |
86 |
177 |
87 /** |
178 /** |
88 * Creates a hash map key based on the given data. |
179 * Helper function to avoid code duplication. |
89 * |
180 * |
90 * This function implicitly computes the hash. |
181 * @param map the map |
91 * |
182 * @param key the key to look up |
92 * @attention The data will be copied to the key structure. |
183 * @param remove flag indicating whether the looked up entry shall be removed |
93 * |
184 * @return the value corresponding to the key or \c NULL |
94 * @param data the data for the key |
|
95 * @return the computed key |
|
96 */ |
185 */ |
97 static struct cx_hash_map_key_s cx_hash_map_key(CxDataPtr data) { |
186 static void *cx_hash_map_get_remove( |
98 unsigned char *target = malloc(data.len); |
187 CxMap *map, |
99 memcpy(target, data.data, data.len); |
188 CxDataPtr key, |
100 struct cx_hash_map_key_s key; |
189 bool remove |
101 key.data.data = target; |
190 ) { |
102 key.data.len = data.len; |
191 struct cx_hash_map_s *hash_map = (struct cx_hash_map_s *) map; |
103 key.hash = cx_hash_map_murmur(target, data.len); |
192 |
104 return key; |
193 unsigned hash = cx_hash_map_murmur(key.data, key.len); |
105 } |
194 |
|
195 size_t slot = hash % hash_map->bucket_count; |
|
196 struct cx_hash_map_element_s *elm = hash_map->buckets[slot]; |
|
197 struct cx_hash_map_element_s *prev = NULL; |
|
198 while (elm && elm->key.hash <= hash) { |
|
199 if (elm->key.hash == hash && elm->key.len == key.len) { |
|
200 if (memcmp(elm->key.data, key.data, key.len) == 0) { |
|
201 void *data = elm->data; |
|
202 if (remove) { |
|
203 // unlink |
|
204 if (prev) { |
|
205 prev->next = elm->next; |
|
206 } else { |
|
207 hash_map->buckets[slot] = elm->next; |
|
208 } |
|
209 // free element |
|
210 cxFree(map->allocator, elm->key.data); |
|
211 cxFree(map->allocator, elm); |
|
212 // decrease size |
|
213 map->size--; |
|
214 } |
|
215 return data; |
|
216 } |
|
217 } |
|
218 prev = elm; |
|
219 elm = prev->next; |
|
220 } |
|
221 |
|
222 return NULL; |
|
223 } |
|
224 |
|
225 static void *cx_hash_map_get( |
|
226 CxMap const *map, |
|
227 CxDataPtr key |
|
228 ) { |
|
229 // we can safely cast, because we know when remove=false, the map stays untouched |
|
230 return cx_hash_map_get_remove((CxMap *) map, key, false); |
|
231 } |
|
232 |
|
233 static void *cx_hash_map_remove( |
|
234 CxMap *map, |
|
235 CxDataPtr key |
|
236 ) { |
|
237 return cx_hash_map_get_remove(map, key, true); |
|
238 } |
|
239 |
|
240 static CxIterator cx_hash_map_iterator(CxMap const *map) { |
|
241 CxIterator iter; |
|
242 // TODO: initialize iter |
|
243 return iter; |
|
244 } |
|
245 |
|
246 static CxIterator cx_hash_map_iterator_keys(CxMap const *map) { |
|
247 CxIterator iter; |
|
248 // TODO: initialize iter |
|
249 return iter; |
|
250 } |
|
251 |
|
252 static CxIterator cx_hash_map_iterator_values(CxMap const *map) { |
|
253 CxIterator iter; |
|
254 // TODO: initialize iter |
|
255 return iter; |
|
256 } |
|
257 |
|
258 static cx_map_class cx_hash_map_class = { |
|
259 cx_hash_map_destructor, |
|
260 cx_hash_map_clear, |
|
261 cx_hash_map_put, |
|
262 cx_hash_map_get, |
|
263 cx_hash_map_remove, |
|
264 cx_hash_map_iterator, |
|
265 cx_hash_map_iterator_keys, |
|
266 cx_hash_map_iterator_values, |
|
267 }; |
|
268 |
|
269 CxMap *cxHashMapCreate( |
|
270 CxAllocator *allocator, |
|
271 size_t buckets |
|
272 ) { |
|
273 if (buckets == 0) { |
|
274 // implementation defined default |
|
275 buckets = 16; |
|
276 } |
|
277 |
|
278 struct cx_hash_map_s *map = cxMalloc(allocator, sizeof(struct cx_hash_map_s)); |
|
279 if (map == NULL) return NULL; |
|
280 |
|
281 // initialize hash map members |
|
282 map->bucket_count = buckets; |
|
283 map->buckets = cxCalloc(allocator, buckets, sizeof(struct cx_hash_map_element_s *)); |
|
284 if (map->buckets == NULL) { |
|
285 cxFree(allocator, map); |
|
286 return NULL; |
|
287 } |
|
288 |
|
289 // initialize base members |
|
290 map->base.cl = &cx_hash_map_class; |
|
291 map->base.allocator = allocator; |
|
292 map->base.size = 0; |
|
293 |
|
294 return (CxMap *) map; |
|
295 } |