X-Git-Url: https://git.tokkee.org/?p=sysdb.git;a=blobdiff_plain;f=src%2Fcore%2Fstore.c;h=9fb05dfdf72c8ff20a8a783ad9069746b7651878;hp=7e2602730d774cf83454775e79ff87f283b82677;hb=033aa984a8b4be78ced113a3715422841a48d9a8;hpb=cb0bc268297f6bc7ff1d409591edebb4dfbfca34 diff --git a/src/core/store.c b/src/core/store.c index 7e26027..9fb05df 100644 --- a/src/core/store.c +++ b/src/core/store.c @@ -25,8 +25,12 @@ * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ +#if HAVE_CONFIG_H +# include "config.h" +#endif /* HAVE_CONFIG_H */ + #include "sysdb.h" -#include "core/store.h" +#include "core/store-private.h" #include "core/plugin.h" #include "utils/error.h" #include "utils/llist.h" @@ -45,115 +49,101 @@ * private variables */ -static sdb_llist_t *obj_list = NULL; +static sdb_llist_t *host_list = NULL; static pthread_rwlock_t obj_lock = PTHREAD_RWLOCK_INITIALIZER; /* * private types */ -static sdb_type_t sdb_store_obj_type; +static sdb_type_t sdb_host_type; +static sdb_type_t sdb_service_type; static sdb_type_t sdb_attribute_type; -struct sdb_store_base { - sdb_object_t super; - - /* object type */ - int type; - - /* common meta information */ - sdb_time_t last_update; - sdb_store_base_t *parent; -}; -#define STORE_BASE(obj) ((sdb_store_base_t *)(obj)) -#define STORE_CONST_BASE(obj) ((const sdb_store_base_t *)(obj)) - -typedef struct { - sdb_store_base_t super; - - sdb_data_t value; -} sdb_attribute_t; -#define SDB_ATTR(obj) ((sdb_attribute_t *)(obj)) -#define SDB_CONST_ATTR(obj) ((const sdb_attribute_t *)(obj)) - -typedef struct { - sdb_store_base_t super; - - sdb_llist_t *children; - sdb_llist_t *attributes; -} sdb_store_obj_t; -#define SDB_STORE_OBJ(obj) ((sdb_store_obj_t *)(obj)) -#define SDB_CONST_STORE_OBJ(obj) ((const sdb_store_obj_t *)(obj)) - -enum { - SDB_HOST = 1, - SDB_SERVICE, - SDB_ATTRIBUTE, -}; -#define TYPE_TO_NAME(t) \ - (((t) == SDB_HOST) ? "host" \ - : ((t) == SDB_SERVICE) ? "service" \ - : ((t) == SDB_ATTRIBUTE) ? "attribute" : "unknown") - -/* shortcuts for accessing the sdb_store_obj_t attributes - * of inheriting objects */ -#define _last_update super.last_update - static int -store_base_init(sdb_object_t *obj, va_list ap) +store_obj_init(sdb_object_t *obj, va_list ap) { - sdb_store_base_t *sobj = STORE_BASE(obj); + sdb_store_obj_t *sobj = STORE_OBJ(obj); sobj->type = va_arg(ap, int); sobj->last_update = va_arg(ap, sdb_time_t); + sobj->interval = 0; sobj->parent = NULL; return 0; -} /* store_base_init */ +} /* store_obj_init */ static void -store_base_destroy(sdb_object_t *obj) +store_obj_destroy(sdb_object_t *obj) { - const sdb_store_base_t *sobj = STORE_CONST_BASE(obj); + const sdb_store_obj_t *sobj = STORE_CONST_OBJ(obj); if (sobj->parent) sdb_object_deref(SDB_OBJ(sobj->parent)); -} /* store_base_destroy */ +} /* store_obj_destroy */ static int -sdb_store_obj_init(sdb_object_t *obj, va_list ap) +sdb_host_init(sdb_object_t *obj, va_list ap) { - sdb_store_obj_t *sobj = SDB_STORE_OBJ(obj); + sdb_host_t *sobj = HOST(obj); int ret; /* this will consume the first argument (type) of ap */ - ret = store_base_init(obj, ap); + ret = store_obj_init(obj, ap); if (ret) return ret; - sobj->children = sdb_llist_create(); - if (! sobj->children) + sobj->services = sdb_llist_create(); + if (! sobj->services) return -1; sobj->attributes = sdb_llist_create(); if (! sobj->attributes) return -1; return 0; -} /* sdb_store_obj_init */ +} /* sdb_host_init */ static void -sdb_store_obj_destroy(sdb_object_t *obj) +sdb_host_destroy(sdb_object_t *obj) { - sdb_store_obj_t *sobj = SDB_STORE_OBJ(obj); + sdb_host_t *sobj = HOST(obj); + assert(obj); + + store_obj_destroy(obj); + + if (sobj->services) + sdb_llist_destroy(sobj->services); + if (sobj->attributes) + sdb_llist_destroy(sobj->attributes); +} /* sdb_host_destroy */ + +static int +sdb_service_init(sdb_object_t *obj, va_list ap) +{ + sdb_service_t *sobj = SVC(obj); + int ret; + + /* this will consume the first argument (type) of ap */ + ret = store_obj_init(obj, ap); + if (ret) + return ret; + + sobj->attributes = sdb_llist_create(); + if (! sobj->attributes) + return -1; + return 0; +} /* sdb_service_init */ +static void +sdb_service_destroy(sdb_object_t *obj) +{ + sdb_service_t *sobj = SVC(obj); assert(obj); - store_base_destroy(obj); + store_obj_destroy(obj); - if (sobj->children) - sdb_llist_destroy(sobj->children); if (sobj->attributes) sdb_llist_destroy(sobj->attributes); -} /* sdb_store_obj_destroy */ +} /* sdb_service_destroy */ static int sdb_attr_init(sdb_object_t *obj, va_list ap) @@ -163,13 +153,13 @@ sdb_attr_init(sdb_object_t *obj, va_list ap) /* this will consume the first two arguments * (type and last_update) of ap */ - ret = store_base_init(obj, ap); + ret = store_obj_init(obj, ap); if (ret) return ret; value = va_arg(ap, const sdb_data_t *); if (value) - if (sdb_data_copy(&SDB_ATTR(obj)->value, value)) + if (sdb_data_copy(&ATTR(obj)->value, value)) return -1; return 0; } /* sdb_attr_init */ @@ -179,20 +169,24 @@ sdb_attr_destroy(sdb_object_t *obj) { assert(obj); - store_base_destroy(obj); - sdb_data_free_datum(&SDB_ATTR(obj)->value); + store_obj_destroy(obj); + sdb_data_free_datum(&ATTR(obj)->value); } /* sdb_attr_destroy */ -static sdb_type_t sdb_store_obj_type = { - sizeof(sdb_store_obj_t), +static sdb_type_t sdb_host_type = { + sizeof(sdb_host_t), + sdb_host_init, + sdb_host_destroy +}; - sdb_store_obj_init, - sdb_store_obj_destroy +static sdb_type_t sdb_service_type = { + sizeof(sdb_service_t), + sdb_service_init, + sdb_service_destroy }; static sdb_type_t sdb_attribute_type = { sizeof(sdb_attribute_t), - sdb_attr_init, sdb_attr_destroy }; @@ -201,79 +195,41 @@ static sdb_type_t sdb_attribute_type = { * private helper functions */ -static sdb_store_obj_t * -store_lookup_in_list(sdb_llist_t *l, int type, const char *name) -{ - sdb_llist_iter_t *iter; - - if (! l) - return NULL; - - iter = sdb_llist_get_iter(l); - if (! iter) - return NULL; - - while (sdb_llist_iter_has_next(iter)) { - sdb_store_obj_t *sobj = SDB_STORE_OBJ(sdb_llist_iter_get_next(iter)); - assert(sobj); - - if ((STORE_BASE(sobj)->type == type) - && (! strcasecmp(SDB_OBJ(sobj)->name, name))) { - sdb_llist_iter_destroy(iter); - return sobj; - } - - /* don't lookups non-host types from hierarchical hosts */ - if ((type != SDB_HOST) && (STORE_BASE(sobj)->type == SDB_HOST)) - continue; - - sobj = store_lookup_in_list(sobj->children, type, name); - if (sobj) { - sdb_llist_iter_destroy(iter); - return sobj; - } - } - sdb_llist_iter_destroy(iter); - return NULL; -} /* store_lookup_in_list */ - -static sdb_store_obj_t * -store_lookup(int type, const char *name) +static sdb_host_t * +lookup_host(const char *name) { - return store_lookup_in_list(obj_list, type, name); -} /* store_lookup */ + return HOST(sdb_llist_search_by_name(host_list, name)); +} /* lookup_host */ /* The obj_lock has to be acquired before calling this function. */ static int -store_obj(int parent_type, const char *parent_name, - int type, const char *name, sdb_time_t last_update, - sdb_store_base_t **updated_obj) +store_obj(const char *hostname, int type, const char *name, + sdb_time_t last_update, sdb_store_obj_t **updated_obj) { - char *parent_cname = NULL, *cname = NULL; + char *host_cname = NULL, *cname = NULL; sdb_llist_t *parent_list; - sdb_store_base_t *old; + sdb_store_obj_t *old; int status = 0; if (last_update <= 0) last_update = sdb_gettime(); - assert((parent_type == 0) - || (parent_type == SDB_HOST) - || (parent_type == SDB_SERVICE)); assert((type == 0) || (type == SDB_HOST) || (type == SDB_SERVICE) || (type == SDB_ATTRIBUTE)); - if (parent_type == SDB_HOST) { - parent_cname = sdb_plugin_cname(strdup(parent_name)); - if (! parent_cname) { - sdb_log(SDB_LOG_ERR, "store: strdup failed"); + assert(hostname || (type == SDB_HOST)); + assert((! hostname) + || (type == SDB_SERVICE) + || (type == SDB_ATTRIBUTE)); + + if (! host_list) + if (! (host_list = sdb_llist_create())) return -1; - } - parent_name = parent_cname; - } + parent_list = host_list; + if (type == SDB_HOST) { cname = sdb_plugin_cname(strdup(name)); if (! cname) { @@ -283,84 +239,87 @@ store_obj(int parent_type, const char *parent_name, name = cname; } - if (! obj_list) { - if (! (obj_list = sdb_llist_create())) { - free(parent_cname); + if (hostname) { + sdb_host_t *host; + + host_cname = sdb_plugin_cname(strdup(hostname)); + if (! host_cname) { + sdb_log(SDB_LOG_ERR, "store: strdup failed"); free(cname); return -1; } - } - parent_list = obj_list; - - if (parent_type && parent_name) { - sdb_store_obj_t *parent; + hostname = host_cname; - parent = store_lookup(parent_type, parent_name); - if (! parent) { + host = lookup_host(hostname); + if (! host) { sdb_log(SDB_LOG_ERR, "store: Failed to store %s '%s' - " - "parent %s '%s' not found", TYPE_TO_NAME(type), name, - TYPE_TO_NAME(parent_type), parent_name); - free(parent_cname); + "host '%s' not found", SDB_STORE_TYPE_TO_NAME(type), + name, hostname); + free(host_cname); free(cname); return -1; } if (type == SDB_ATTRIBUTE) - parent_list = parent->attributes; + parent_list = host->attributes; else - parent_list = parent->children; + parent_list = host->services; } if (type == SDB_HOST) - /* make sure that each host is unique */ - old = STORE_BASE(store_lookup_in_list(obj_list, type, name)); - else if (type == SDB_ATTRIBUTE) - /* look into attributes of this host */ - old = STORE_BASE(sdb_llist_search_by_name(parent_list, name)); + old = STORE_OBJ(sdb_llist_search_by_name(host_list, name)); else - /* look into services assigned to this host (store_lookup_in_list - * does not look up services from hierarchical hosts) */ - old = STORE_BASE(store_lookup_in_list(parent_list, type, name)); + old = STORE_OBJ(sdb_llist_search_by_name(parent_list, name)); if (old) { if (old->last_update > last_update) { sdb_log(SDB_LOG_DEBUG, "store: Cannot update %s '%s' - " "value too old (%"PRIscTIME" < %"PRIscTIME")", - TYPE_TO_NAME(type), name, last_update, old->last_update); + SDB_STORE_TYPE_TO_NAME(type), name, + last_update, old->last_update); /* don't report an error; the object may be updated by multiple * backends */ status = 1; } else { + sdb_time_t interval = last_update - old->last_update; old->last_update = last_update; + if (interval) { + if (old->interval) + old->interval = (sdb_time_t)((0.9 * (double)old->interval) + + (0.1 * (double)interval)); + else + old->interval = interval; + } } if (updated_obj) *updated_obj = old; } else { - sdb_store_base_t *new; + sdb_store_obj_t *new; - if (type == SDB_ATTRIBUTE) + if (type == SDB_ATTRIBUTE) { /* the value will be updated by the caller */ - new = STORE_BASE(sdb_object_create(name, sdb_attribute_type, + new = STORE_OBJ(sdb_object_create(name, sdb_attribute_type, type, last_update, NULL)); - else - new = STORE_BASE(sdb_object_create(name, sdb_store_obj_type, - type, last_update)); + } + else { + sdb_type_t t; + t = type == SDB_HOST ? sdb_host_type : sdb_service_type; + new = STORE_OBJ(sdb_object_create(name, t, type, last_update)); + } if (! new) { char errbuf[1024]; sdb_log(SDB_LOG_ERR, "store: Failed to create %s '%s': %s", - TYPE_TO_NAME(type), name, + SDB_STORE_TYPE_TO_NAME(type), name, sdb_strerror(errno, errbuf, sizeof(errbuf))); - free(parent_cname); + free(host_cname); free(cname); return -1; } - /* TODO: insert type-aware; the current version works as long as we - * don't support to store hierarchical data */ status = sdb_llist_insert_sorted(parent_list, SDB_OBJ(new), sdb_object_cmp_by_name); @@ -370,7 +329,7 @@ store_obj(int parent_type, const char *parent_name, if (updated_obj) *updated_obj = new; } - free(parent_cname); + free(host_cname); free(cname); return status; } /* store_obj */ @@ -386,6 +345,7 @@ store_obj_tojson(sdb_llist_t *list, int type, sdb_strbuf_t *buf) { sdb_llist_iter_t *iter; char time_str[64]; + char interval_str[64]; assert((type == SDB_ATTRIBUTE) || (type == SDB_SERVICE)); @@ -395,28 +355,40 @@ store_obj_tojson(sdb_llist_t *list, int type, sdb_strbuf_t *buf) if (! iter) { char errbuf[1024]; sdb_log(SDB_LOG_ERR, "store: Failed to retrieve %ss: %s\n", - TYPE_TO_NAME(type), + SDB_STORE_TYPE_TO_NAME(type), sdb_strerror(errno, errbuf, sizeof(errbuf))); sdb_strbuf_append(buf, "{\"error\": \"failed to retrieve %ss: %s\"}", - TYPE_TO_NAME(type), errbuf); + SDB_STORE_TYPE_TO_NAME(type), errbuf); } /* has_next returns false if the iterator is NULL */ while (sdb_llist_iter_has_next(iter)) { - sdb_store_base_t *sobj = STORE_BASE(sdb_llist_iter_get_next(iter)); + sdb_store_obj_t *sobj = STORE_OBJ(sdb_llist_iter_get_next(iter)); assert(sobj); + assert(sobj->type == type); if (! sdb_strftime(time_str, sizeof(time_str), "%F %T %z", sobj->last_update)) snprintf(time_str, sizeof(time_str), ""); time_str[sizeof(time_str) - 1] = '\0'; + if (! sdb_strfinterval(interval_str, sizeof(interval_str), + sobj->interval)) + snprintf(interval_str, sizeof(interval_str), ""); + interval_str[sizeof(interval_str) - 1] = '\0'; + sdb_strbuf_append(buf, "{\"name\": \"%s\", ", SDB_OBJ(sobj)->name); - if (type == SDB_ATTRIBUTE) - /* XXX: this needs to be type-dependent */ - sdb_strbuf_append(buf, "\"value\": \"%s\", ", - SDB_ATTR(sobj)->value.data.string); - sdb_strbuf_append(buf, "\"last_update\": \"%s\"}", time_str); + if (sobj->type == SDB_ATTRIBUTE) { + char tmp[sdb_data_strlen(&ATTR(sobj)->value) + 1]; + sdb_data_format(&ATTR(sobj)->value, tmp, sizeof(tmp), + SDB_DOUBLE_QUOTED); + sdb_strbuf_append(buf, "\"value\": %s, \"last_update\": \"%s\", " + "\"update_interval\": \"%s\"}", tmp, time_str, + interval_str); + } + else + sdb_strbuf_append(buf, "\"last_update\": \"%s\", " + "\"update_interval\": \"%s\"}", time_str, interval_str); if (sdb_llist_iter_has_next(iter)) sdb_strbuf_append(buf, ","); @@ -430,6 +402,13 @@ store_obj_tojson(sdb_llist_t *list, int type, sdb_strbuf_t *buf) * public API */ +void +sdb_store_clear(void) +{ + sdb_llist_destroy(host_list); + host_list = NULL; +} /* sdb_store_clear */ + int sdb_store_host(const char *name, sdb_time_t last_update) { @@ -439,7 +418,7 @@ sdb_store_host(const char *name, sdb_time_t last_update) return -1; pthread_rwlock_wrlock(&obj_lock); - status = store_obj(/* parent = */ 0, NULL, + status = store_obj(/* hostname = */ NULL, /* stored object = */ SDB_HOST, name, last_update, /* updated_obj = */ NULL); pthread_rwlock_unlock(&obj_lock); @@ -449,29 +428,29 @@ sdb_store_host(const char *name, sdb_time_t last_update) _Bool sdb_store_has_host(const char *name) { - sdb_store_obj_t *host; + sdb_host_t *host; if (! name) return NULL; - host = store_lookup(SDB_HOST, name); + host = lookup_host(name); return host != NULL; } /* sdb_store_has_host */ -sdb_store_base_t * +sdb_store_obj_t * sdb_store_get_host(const char *name) { - sdb_store_obj_t *host; + sdb_host_t *host; if (! name) return NULL; - host = store_lookup(SDB_HOST, name); + host = lookup_host(name); if (! host) return NULL; sdb_object_ref(SDB_OBJ(host)); - return STORE_BASE(host); + return STORE_OBJ(host); } /* sdb_store_get_host */ int @@ -481,19 +460,20 @@ sdb_store_attribute(const char *hostname, { int status; - sdb_store_base_t *updated_attr = NULL; + sdb_store_obj_t *updated_attr = NULL; if ((! hostname) || (! key)) return -1; pthread_rwlock_wrlock(&obj_lock); - status = store_obj(/* parent = */ SDB_HOST, hostname, + status = store_obj(hostname, /* stored object = */ SDB_ATTRIBUTE, key, last_update, &updated_attr); if (status >= 0) { assert(updated_attr); - if (sdb_data_copy(&SDB_ATTR(updated_attr)->value, value)) { + sdb_data_free_datum(&ATTR(updated_attr)->value); + if (sdb_data_copy(&ATTR(updated_attr)->value, value)) { sdb_object_deref(SDB_OBJ(updated_attr)); status = -1; } @@ -513,7 +493,7 @@ sdb_store_service(const char *hostname, const char *name, return -1; pthread_rwlock_wrlock(&obj_lock); - status = store_obj(/* parent = */ SDB_HOST, hostname, + status = store_obj(hostname, /* stored object = */ SDB_SERVICE, name, last_update, /* updated obj = */ NULL); pthread_rwlock_unlock(&obj_lock); @@ -521,24 +501,30 @@ sdb_store_service(const char *hostname, const char *name, } /* sdb_store_service */ int -sdb_store_host_tojson(sdb_store_base_t *h, sdb_strbuf_t *buf, int flags) +sdb_store_host_tojson(sdb_store_obj_t *h, sdb_strbuf_t *buf, int flags) { - sdb_store_obj_t *host; + sdb_host_t *host; char time_str[64]; + char interval_str[64]; if ((! h) || (h->type != SDB_HOST) || (! buf)) return -1; - host = SDB_STORE_OBJ(h); + host = HOST(h); if (! sdb_strftime(time_str, sizeof(time_str), "%F %T %z", host->_last_update)) snprintf(time_str, sizeof(time_str), ""); time_str[sizeof(time_str) - 1] = '\0'; + if (! sdb_strfinterval(interval_str, sizeof(interval_str), + host->_interval)) + snprintf(interval_str, sizeof(interval_str), ""); + interval_str[sizeof(interval_str) - 1] = '\0'; + sdb_strbuf_append(buf, "{\"name\": \"%s\", " - "\"last_update\": \"%s\"", - SDB_OBJ(host)->name, time_str); + "\"last_update\": \"%s\", \"update_interval\": \"%s\"", + SDB_OBJ(host)->name, time_str, interval_str); if (! (flags & SDB_SKIP_ATTRIBUTES)) { sdb_strbuf_append(buf, ", \"attributes\": "); @@ -547,14 +533,13 @@ sdb_store_host_tojson(sdb_store_base_t *h, sdb_strbuf_t *buf, int flags) if (! (flags & SDB_SKIP_SERVICES)) { sdb_strbuf_append(buf, ", \"services\": "); - store_obj_tojson(host->children, SDB_SERVICE, buf); + store_obj_tojson(host->services, SDB_SERVICE, buf); } sdb_strbuf_append(buf, "}"); return 0; } /* sdb_store_host_tojson */ -/* TODO: actually support hierarchical data */ int sdb_store_tojson(sdb_strbuf_t *buf, int flags) { @@ -565,7 +550,7 @@ sdb_store_tojson(sdb_strbuf_t *buf, int flags) pthread_rwlock_rdlock(&obj_lock); - host_iter = sdb_llist_get_iter(obj_list); + host_iter = sdb_llist_get_iter(host_list); if (! host_iter) { pthread_rwlock_unlock(&obj_lock); return -1; @@ -574,7 +559,7 @@ sdb_store_tojson(sdb_strbuf_t *buf, int flags) sdb_strbuf_append(buf, "{\"hosts\":["); while (sdb_llist_iter_has_next(host_iter)) { - sdb_store_base_t *host = STORE_BASE(sdb_llist_iter_get_next(host_iter)); + sdb_store_obj_t *host = STORE_OBJ(sdb_llist_iter_get_next(host_iter)); assert(host); if (sdb_store_host_tojson(host, buf, flags)) @@ -591,5 +576,34 @@ sdb_store_tojson(sdb_strbuf_t *buf, int flags) return 0; } /* sdb_store_tojson */ +/* TODO: actually support hierarchical data */ +int +sdb_store_iterate(sdb_store_iter_cb cb, void *user_data) +{ + sdb_llist_iter_t *host_iter; + int status = 0; + + pthread_rwlock_rdlock(&obj_lock); + + host_iter = sdb_llist_get_iter(host_list); + if (! host_iter) + status = -1; + + /* has_next returns false if the iterator is NULL */ + while (sdb_llist_iter_has_next(host_iter)) { + sdb_store_obj_t *host = STORE_OBJ(sdb_llist_iter_get_next(host_iter)); + assert(host); + + if (cb(host, user_data)) { + status = -1; + break; + } + } + + sdb_llist_iter_destroy(host_iter); + pthread_rwlock_unlock(&obj_lock); + return status; +} /* sdb_store_iterate */ + /* vim: set tw=78 sw=4 ts=4 noexpandtab : */