10 #include "dictionary.h"
12 // ----------------------------------------------------------------------------
15 static int name_value_iterator(avl *a) { if(a) {}; return 0; }
17 static int name_value_compare(void* a, void* b) {
18 if(((NAME_VALUE *)a)->hash < ((NAME_VALUE *)b)->hash) return -1;
19 else if(((NAME_VALUE *)a)->hash > ((NAME_VALUE *)b)->hash) return 1;
20 else return strcmp(((NAME_VALUE *)a)->name, ((NAME_VALUE *)b)->name);
23 #define name_value_index_add(dict, cv) avl_insert(&((dict)->values_index), (avl *)(cv))
24 #define name_value_index_del(dict, cv) avl_remove(&((dict)->values_index), (avl *)(cv))
26 static NAME_VALUE *dictionary_name_value_index_find(DICTIONARY *dict, const char *name, uint32_t hash) {
27 NAME_VALUE *result = NULL, tmp;
28 tmp.hash = (hash)?hash:simple_hash(name);
29 tmp.name = (char *)name;
31 avl_search(&(dict->values_index), (avl *)&tmp, name_value_iterator, (avl **)&result);
35 // ----------------------------------------------------------------------------
37 static NAME_VALUE *dictionary_name_value_create(DICTIONARY *dict, const char *name, void *value, size_t value_len) {
38 debug(D_DICTIONARY, "Creating name value entry for name '%s', value '%s'.", name, value);
40 NAME_VALUE *nv = calloc(1, sizeof(NAME_VALUE));
41 if(!nv) fatal("Cannot allocate name_value of size %z", sizeof(NAME_VALUE));
43 nv->name = strdup(name);
44 if(!nv->name) fatal("Cannot allocate name_value.name of size %z", strlen(name));
45 nv->hash = simple_hash(nv->name);
47 nv->value = malloc(value_len);
48 if(!nv->value) fatal("Cannot allocate name_value.value of size %z", value_len);
49 memcpy(nv->value, value, value_len);
52 pthread_rwlock_wrlock(&dict->rwlock);
53 nv->next = dict->values;
55 pthread_rwlock_unlock(&dict->rwlock);
58 name_value_index_add(dict, nv);
63 static void dictionary_name_value_destroy(DICTIONARY *dict, NAME_VALUE *nv) {
64 debug(D_DICTIONARY, "Destroying name value entry for name '%s'.", nv->name);
66 pthread_rwlock_wrlock(&dict->rwlock);
67 if(dict->values == nv) dict->values = nv->next;
69 NAME_VALUE *n = dict->values;
70 while(n && n->next && n->next != nv) nv = nv->next;
71 if(!n || n->next != nv) fatal("Cannot find name_value with name '%s' in dictionary.", nv->name);
75 pthread_rwlock_unlock(&dict->rwlock);
81 // ----------------------------------------------------------------------------
83 DICTIONARY *dictionary_create(void) {
84 debug(D_DICTIONARY, "Creating dictionary.");
86 DICTIONARY *dict = calloc(1, sizeof(DICTIONARY));
87 if(!dict) fatal("Cannot allocate DICTIONARY");
89 dict->values_index.compar = name_value_compare;
90 pthread_rwlock_init(&dict->rwlock, NULL);
95 void dictionary_destroy(DICTIONARY *dict) {
96 debug(D_DICTIONARY, "Destroying dictionary.");
98 pthread_rwlock_wrlock(&dict->rwlock);
99 while(dict->values) dictionary_name_value_destroy(dict, dict->values);
100 pthread_rwlock_unlock(&dict->rwlock);
105 // ----------------------------------------------------------------------------
107 void *dictionary_set(DICTIONARY *dict, const char *name, void *value, size_t value_len) {
108 debug(D_DICTIONARY, "SET dictionary entry with name '%s'.", name);
110 pthread_rwlock_rdlock(&dict->rwlock);
111 NAME_VALUE *nv = dictionary_name_value_index_find(dict, name, 0);
112 pthread_rwlock_unlock(&dict->rwlock);
114 debug(D_DICTIONARY, "Dictionary entry with name '%s' not found. Creating a new one.", name);
115 nv = dictionary_name_value_create(dict, name, value, value_len);
116 if(!nv) fatal("Cannot create name_value.");
120 debug(D_DICTIONARY, "Dictionary entry with name '%s' found. Changing its value.", name);
121 pthread_rwlock_wrlock(&dict->rwlock);
122 void *old = nv->value;
123 nv->value = malloc(value_len);
124 if(!nv->value) fatal("Cannot allocate value of size %z", value_len);
125 memcpy(nv->value, value, value_len);
126 pthread_rwlock_unlock(&dict->rwlock);
133 void *dictionary_get(DICTIONARY *dict, const char *name) {
134 debug(D_DICTIONARY, "GET dictionary entry with name '%s'.", name);
136 pthread_rwlock_rdlock(&dict->rwlock);
137 NAME_VALUE *nv = dictionary_name_value_index_find(dict, name, 0);
138 pthread_rwlock_unlock(&dict->rwlock);
140 debug(D_DICTIONARY, "Not found dictionary entry with name '%s'.", name);
144 debug(D_DICTIONARY, "Found dictionary entry with name '%s'.", name);