Catalli's threaded switch
[sliver-openvswitch.git] / lib / shash.c
1 /*
2  * Copyright (c) 2009, 2010 Nicira Networks.
3  *
4  * Licensed under the Apache License, Version 2.0 (the "License");
5  * you may not use this file except in compliance with the License.
6  * You may obtain a copy of the License at:
7  *
8  *     http://www.apache.org/licenses/LICENSE-2.0
9  *
10  * Unless required by applicable law or agreed to in writing, software
11  * distributed under the License is distributed on an "AS IS" BASIS,
12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13  * See the License for the specific language governing permissions and
14  * limitations under the License.
15  */
16
17 #include <config.h>
18 #include "shash.h"
19 #include <assert.h>
20 #include "hash.h"
21
22 static struct shash_node *shash_find__(const struct shash *,
23                                        const char *name, size_t hash);
24
25 static size_t
26 hash_name(const char *name)
27 {
28     return hash_string(name, 0);
29 }
30
31 void
32 shash_init(struct shash *sh)
33 {
34     hmap_init(&sh->map);
35 }
36
37 void
38 shash_destroy(struct shash *sh)
39 {
40     if (sh) {
41         shash_clear(sh);
42         hmap_destroy(&sh->map);
43     }
44 }
45
46 /* Like shash_destroy(), but also free() each node's 'data'. */
47 void
48 shash_destroy_free_data(struct shash *sh)
49 {
50     if (sh) {
51         shash_clear_free_data(sh);
52         hmap_destroy(&sh->map);
53     }
54 }
55
56 void
57 shash_swap(struct shash *a, struct shash *b)
58 {
59     hmap_swap(&a->map, &b->map);
60 }
61
62 void
63 shash_moved(struct shash *sh)
64 {
65     hmap_moved(&sh->map);
66 }
67
68 void
69 shash_clear(struct shash *sh)
70 {
71     struct shash_node *node, *next;
72
73     SHASH_FOR_EACH_SAFE (node, next, sh) {
74         hmap_remove(&sh->map, &node->node);
75         free(node->name);
76         free(node);
77     }
78 }
79
80 /* Like shash_clear(), but also free() each node's 'data'. */
81 void
82 shash_clear_free_data(struct shash *sh)
83 {
84     struct shash_node *node, *next;
85
86     SHASH_FOR_EACH_SAFE (node, next, sh) {
87         hmap_remove(&sh->map, &node->node);
88         free(node->data);
89         free(node->name);
90         free(node);
91     }
92 }
93
94 bool
95 shash_is_empty(const struct shash *shash)
96 {
97     return hmap_is_empty(&shash->map);
98 }
99
100 size_t
101 shash_count(const struct shash *shash)
102 {
103     return hmap_count(&shash->map);
104 }
105
106 static struct shash_node *
107 shash_add_nocopy__(struct shash *sh, char *name, const void *data, size_t hash)
108 {
109     struct shash_node *node = xmalloc(sizeof *node);
110     node->name = name;
111     node->data = (void *) data;
112     hmap_insert(&sh->map, &node->node, hash);
113     return node;
114 }
115
116 /* It is the caller's responsibility to avoid duplicate names, if that is
117  * desirable. */
118 struct shash_node *
119 shash_add_nocopy(struct shash *sh, char *name, const void *data)
120 {
121     return shash_add_nocopy__(sh, name, data, hash_name(name));
122 }
123
124 /* It is the caller's responsibility to avoid duplicate names, if that is
125  * desirable. */
126 struct shash_node *
127 shash_add(struct shash *sh, const char *name, const void *data)
128 {
129     return shash_add_nocopy(sh, xstrdup(name), data);
130 }
131
132 bool
133 shash_add_once(struct shash *sh, const char *name, const void *data)
134 {
135     if (!shash_find(sh, name)) {
136         shash_add(sh, name, data);
137         return true;
138     } else {
139         return false;
140     }
141 }
142
143 void
144 shash_add_assert(struct shash *sh, const char *name, const void *data)
145 {
146     bool added OVS_UNUSED = shash_add_once(sh, name, data);
147     assert(added);
148 }
149
150 /* Searches for 'name' in 'sh'.  If it does not already exist, adds it along
151  * with 'data' and returns NULL.  If it does already exist, replaces its data
152  * by 'data' and returns the data that it formerly contained. */
153 void *
154 shash_replace(struct shash *sh, const char *name, const void *data)
155 {
156     size_t hash = hash_name(name);
157     struct shash_node *node;
158
159     node = shash_find__(sh, name, hash);
160     if (!node) {
161         shash_add_nocopy__(sh, xstrdup(name), data, hash);
162         return NULL;
163     } else {
164         void *old_data = node->data;
165         node->data = (void *) data;
166         return old_data;
167     }
168 }
169
170 void
171 shash_delete(struct shash *sh, struct shash_node *node)
172 {
173     hmap_remove(&sh->map, &node->node);
174     free(node->name);
175     free(node);
176 }
177
178 static struct shash_node *
179 shash_find__(const struct shash *sh, const char *name, size_t hash)
180 {
181     struct shash_node *node;
182
183     HMAP_FOR_EACH_WITH_HASH (node, struct shash_node, node, hash, &sh->map) {
184         if (!strcmp(node->name, name)) {
185             return node;
186         }
187     }
188     return NULL;
189 }
190
191 /* If there are duplicates, returns a random element. */
192 struct shash_node *
193 shash_find(const struct shash *sh, const char *name)
194 {
195     return shash_find__(sh, name, hash_name(name));
196 }
197
198 void *
199 shash_find_data(const struct shash *sh, const char *name)
200 {
201     struct shash_node *node = shash_find(sh, name);
202     return node ? node->data : NULL;
203 }
204
205 void *
206 shash_find_and_delete(struct shash *sh, const char *name)
207 {
208     struct shash_node *node = shash_find(sh, name);
209     if (node) {
210         void *data = node->data;
211         shash_delete(sh, node);
212         return data;
213     } else {
214         return NULL;
215     }
216 }
217
218 void *
219 shash_find_and_delete_assert(struct shash *sh, const char *name)
220 {
221     void *data = shash_find_and_delete(sh, name);
222     assert(data != NULL);
223     return data;
224 }
225
226 struct shash_node *
227 shash_first(const struct shash *shash)
228 {
229     struct hmap_node *node = hmap_first(&shash->map);
230     return node ? CONTAINER_OF(node, struct shash_node, node) : NULL;
231 }
232
233 static int
234 compare_nodes_by_name(const void *a_, const void *b_)
235 {
236     const struct shash_node *const *a = a_;
237     const struct shash_node *const *b = b_;
238     return strcmp((*a)->name, (*b)->name);
239 }
240
241 const struct shash_node **
242 shash_sort(const struct shash *sh)
243 {
244     if (shash_is_empty(sh)) {
245         return NULL;
246     } else {
247         const struct shash_node **nodes;
248         struct shash_node *node;
249         size_t i, n;
250
251         n = shash_count(sh);
252         nodes = xmalloc(n * sizeof *nodes);
253         i = 0;
254         SHASH_FOR_EACH (node, sh) {
255             nodes[i++] = node;
256         }
257         assert(i == n);
258
259         qsort(nodes, n, sizeof *nodes, compare_nodes_by_name);
260
261         return nodes;
262     }
263 }
264
265 /* Returns true if 'a' and 'b' contain the same keys (regardless of their
266  * values), false otherwise. */
267 bool
268 shash_equal_keys(const struct shash *a, const struct shash *b)
269 {
270     struct shash_node *node;
271
272     if (hmap_count(&a->map) != hmap_count(&b->map)) {
273         return false;
274     }
275     SHASH_FOR_EACH (node, a) {
276         if (!shash_find(b, node->name)) {
277             return false;
278         }
279     }
280     return true;
281 }
282
283 /* Chooses and returns a randomly selected node from 'sh', which must not be
284  * empty.
285  *
286  * I wouldn't depend on this algorithm to be fair, since I haven't analyzed it.
287  * But it does at least ensure that any node in 'sh' can be chosen. */
288 struct shash_node *
289 shash_random_node(struct shash *sh)
290 {
291     return CONTAINER_OF(hmap_random_node(&sh->map), struct shash_node, node);
292 }