X-Git-Url: http://git.droids-corp.org/?a=blobdiff_plain;f=libecoli%2Fecoli_config.c;fp=libecoli%2Fecoli_config.c;h=0000000000000000000000000000000000000000;hb=18d03456d96f7a086a2ccc82ce97fcf056848d90;hp=66d92325589f432e4dc1685b1eab7a1fd1870bb4;hpb=a1571d413d2acac5d4a4fbdf2e50b2d1a6da3aa6;p=protos%2Flibecoli.git diff --git a/libecoli/ecoli_config.c b/libecoli/ecoli_config.c deleted file mode 100644 index 66d9232..0000000 --- a/libecoli/ecoli_config.c +++ /dev/null @@ -1,1172 +0,0 @@ -/* SPDX-License-Identifier: BSD-3-Clause - * Copyright 2018, Olivier MATZ - */ - -#include -#include -#include -#include -#include - -#include -#include -#include -#include -#include -#include -#include - -EC_LOG_TYPE_REGISTER(config); - -const char *ec_config_reserved_keys[] = { - "id", - "attrs", - "help", - "type", -}; - -static int -__ec_config_dump(FILE *out, const char *key, const struct ec_config *config, - size_t indent); -static int -ec_config_dict_validate(const struct ec_keyval *dict, - const struct ec_config_schema *schema); - -bool -ec_config_key_is_reserved(const char *name) -{ - size_t i; - - for (i = 0; i < EC_COUNT_OF(ec_config_reserved_keys); i++) { - if (!strcmp(name, ec_config_reserved_keys[i])) - return true; - } - return false; -} - -/* return ec_value type as a string */ -static const char * -ec_config_type_str(enum ec_config_type type) -{ - switch (type) { - case EC_CONFIG_TYPE_BOOL: return "bool"; - case EC_CONFIG_TYPE_INT64: return "int64"; - case EC_CONFIG_TYPE_UINT64: return "uint64"; - case EC_CONFIG_TYPE_STRING: return "string"; - case EC_CONFIG_TYPE_NODE: return "node"; - case EC_CONFIG_TYPE_LIST: return "list"; - case EC_CONFIG_TYPE_DICT: return "dict"; - default: return "unknown"; - } -} - -static size_t -ec_config_schema_len(const struct ec_config_schema *schema) -{ - size_t i; - - if (schema == NULL) - return 0; - for (i = 0; schema[i].type != EC_CONFIG_TYPE_NONE; i++) - ; - return i; -} - -static int -__ec_config_schema_validate(const struct ec_config_schema *schema, - enum ec_config_type type) -{ - size_t i, j; - int ret; - - if (type == EC_CONFIG_TYPE_LIST) { - if (schema[0].key != NULL) { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, "list schema key must be NULL\n"); - return -1; - } - } else if (type == EC_CONFIG_TYPE_DICT) { - for (i = 0; schema[i].type != EC_CONFIG_TYPE_NONE; i++) { - if (schema[i].key == NULL) { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, - "dict schema key should not be NULL\n"); - return -1; - } - } - } else { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, "invalid schema type\n"); - return -1; - } - - for (i = 0; schema[i].type != EC_CONFIG_TYPE_NONE; i++) { - if (schema[i].key != NULL && - ec_config_key_is_reserved(schema[i].key)) { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, - "key name <%s> is reserved\n", schema[i].key); - return -1; - } - /* check for duplicate name if more than one element */ - for (j = i + 1; schema[j].type != EC_CONFIG_TYPE_NONE; j++) { - if (!strcmp(schema[i].key, schema[j].key)) { - errno = EEXIST; - EC_LOG(EC_LOG_ERR, - "duplicate key <%s> in schema\n", - schema[i].key); - return -1; - } - } - - switch (schema[i].type) { - case EC_CONFIG_TYPE_BOOL: - case EC_CONFIG_TYPE_INT64: - case EC_CONFIG_TYPE_UINT64: - case EC_CONFIG_TYPE_STRING: - case EC_CONFIG_TYPE_NODE: - if (schema[i].subschema != NULL || ec_config_schema_len( - schema[i].subschema) != 0) { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, - "key <%s> should not have subtype/subschema\n", - schema[i].key); - return -1; - } - break; - case EC_CONFIG_TYPE_LIST: - if (schema[i].subschema == NULL || ec_config_schema_len( - schema[i].subschema) != 1) { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, - "key <%s> must have subschema of length 1\n", - schema[i].key); - return -1; - } - break; - case EC_CONFIG_TYPE_DICT: - if (schema[i].subschema == NULL || ec_config_schema_len( - schema[i].subschema) == 0) { - errno = EINVAL; - EC_LOG(EC_LOG_ERR, - "key <%s> must have subschema\n", - schema[i].key); - return -1; - } - break; - default: - EC_LOG(EC_LOG_ERR, "invalid type for key <%s>\n", - schema[i].key); - errno = EINVAL; - return -1; - } - - if (schema[i].subschema == NULL) - continue; - - ret = __ec_config_schema_validate(schema[i].subschema, - schema[i].type); - if (ret < 0) { - EC_LOG(EC_LOG_ERR, "cannot parse subschema %s%s\n", - schema[i].key ? "key=" : "", - schema[i].key ? : ""); - return ret; - } - } - - return 0; -} - -int -ec_config_schema_validate(const struct ec_config_schema *schema) -{ - return __ec_config_schema_validate(schema, EC_CONFIG_TYPE_DICT); -} - -static void -__ec_config_schema_dump(FILE *out, const struct ec_config_schema *schema, - size_t indent) -{ - size_t i; - - for (i = 0; schema[i].type != EC_CONFIG_TYPE_NONE; i++) { - fprintf(out, "%*s" "%s%s%stype=%s desc='%s'\n", - (int)indent * 4, "", - schema[i].key ? "key=": "", - schema[i].key ? : "", - schema[i].key ? " ": "", - ec_config_type_str(schema[i].type), - schema[i].desc); - if (schema[i].subschema == NULL) - continue; - __ec_config_schema_dump(out, schema[i].subschema, - indent + 1); - } -} - -void -ec_config_schema_dump(FILE *out, const struct ec_config_schema *schema) -{ - fprintf(out, "------------------- schema dump:\n"); - - if (schema == NULL) { - fprintf(out, "no schema\n"); - return; - } - - __ec_config_schema_dump(out, schema, 0); -} - -enum ec_config_type ec_config_get_type(const struct ec_config *config) -{ - return config->type; -} - -struct ec_config * -ec_config_bool(bool boolean) -{ - struct ec_config *value = NULL; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - return NULL; - - value->type = EC_CONFIG_TYPE_BOOL; - value->boolean = boolean; - - return value; -} - -struct ec_config * -ec_config_i64(int64_t i64) -{ - struct ec_config *value = NULL; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - return NULL; - - value->type = EC_CONFIG_TYPE_INT64; - value->i64 = i64; - - return value; -} - -struct ec_config * -ec_config_u64(uint64_t u64) -{ - struct ec_config *value = NULL; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - return NULL; - - value->type = EC_CONFIG_TYPE_UINT64; - value->u64 = u64; - - return value; -} - -/* duplicate string */ -struct ec_config * -ec_config_string(const char *string) -{ - struct ec_config *value = NULL; - char *s = NULL; - - if (string == NULL) - goto fail; - - s = ec_strdup(string); - if (s == NULL) - goto fail; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - goto fail; - - value->type = EC_CONFIG_TYPE_STRING; - value->string = s; - - return value; - -fail: - ec_free(value); - ec_free(s); - return NULL; -} - -/* "consume" the node */ -struct ec_config * -ec_config_node(struct ec_node *node) -{ - struct ec_config *value = NULL; - - if (node == NULL) - goto fail; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - goto fail; - - value->type = EC_CONFIG_TYPE_NODE; - value->node = node; - - return value; - -fail: - ec_node_free(node); - ec_free(value); - return NULL; -} - -struct ec_config * -ec_config_dict(void) -{ - struct ec_config *value = NULL; - struct ec_keyval *dict = NULL; - - dict = ec_keyval(); - if (dict == NULL) - goto fail; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - goto fail; - - value->type = EC_CONFIG_TYPE_DICT; - value->dict = dict; - - return value; - -fail: - ec_keyval_free(dict); - ec_free(value); - return NULL; -} - -struct ec_config * -ec_config_list(void) -{ - struct ec_config *value = NULL; - - value = ec_calloc(1, sizeof(*value)); - if (value == NULL) - return NULL; - - value->type = EC_CONFIG_TYPE_LIST; - TAILQ_INIT(&value->list); - - return value; -} - -ssize_t ec_config_count(const struct ec_config *config) -{ - const struct ec_config *child; - ssize_t n; - - switch (config->type) { - case EC_CONFIG_TYPE_LIST: - n = 0; - TAILQ_FOREACH(child, &config->list, next) - n++; - return n; - case EC_CONFIG_TYPE_DICT: - // XXX todo - default: - errno = EINVAL; - return -1; - } -} - -const struct ec_config_schema * -ec_config_schema_lookup(const struct ec_config_schema *schema, - const char *key) -{ - size_t i; - - for (i = 0; schema[i].type != EC_CONFIG_TYPE_NONE; i++) { - if (!strcmp(key, schema[i].key)) - return &schema[i]; - } - - errno = ENOENT; - return NULL; -} - -enum ec_config_type -ec_config_schema_type(const struct ec_config_schema *schema_elt) -{ - return schema_elt->type; -} - -const struct ec_config_schema * -ec_config_schema_sub(const struct ec_config_schema *schema_elt) -{ - return schema_elt->subschema; -} - -void -ec_config_free(struct ec_config *value) -{ - if (value == NULL) - return; - - switch (value->type) { - case EC_CONFIG_TYPE_STRING: - ec_free(value->string); - break; - case EC_CONFIG_TYPE_NODE: - ec_node_free(value->node); - break; - case EC_CONFIG_TYPE_LIST: - while (!TAILQ_EMPTY(&value->list)) { - struct ec_config *v; - v = TAILQ_FIRST(&value->list); - TAILQ_REMOVE(&value->list, v, next); - ec_config_free(v); - } - break; - case EC_CONFIG_TYPE_DICT: - ec_keyval_free(value->dict); - break; - default: - break; - } - - ec_free(value); -} - -static int -ec_config_list_cmp(const struct ec_config_list *list1, - const struct ec_config_list *list2) -{ - const struct ec_config *v1, *v2; - - for (v1 = TAILQ_FIRST(list1), v2 = TAILQ_FIRST(list2); - v1 != NULL && v2 != NULL; - v1 = TAILQ_NEXT(v1, next), v2 = TAILQ_NEXT(v2, next)) { - if (ec_config_cmp(v1, v2)) - return -1; - } - if (v1 != NULL || v2 != NULL) - return -1; - - return 0; -} - -/* XXX -> ec_keyval_cmp() */ -static int -ec_config_dict_cmp(const struct ec_keyval *d1, - const struct ec_keyval *d2) -{ - const struct ec_config *v1, *v2; - struct ec_keyval_iter *iter = NULL; - const char *key; - - if (ec_keyval_len(d1) != ec_keyval_len(d2)) - return -1; - - for (iter = ec_keyval_iter(d1); - ec_keyval_iter_valid(iter); - ec_keyval_iter_next(iter)) { - key = ec_keyval_iter_get_key(iter); - v1 = ec_keyval_iter_get_val(iter); - v2 = ec_keyval_get(d2, key); - - if (ec_config_cmp(v1, v2)) - goto fail; - } - - ec_keyval_iter_free(iter); - return 0; - -fail: - ec_keyval_iter_free(iter); - return -1; -} - -int -ec_config_cmp(const struct ec_config *value1, - const struct ec_config *value2) -{ - if (value1 == NULL || value2 == NULL) { - errno = EINVAL; - return -1; - } - - if (value1->type != value2->type) - return -1; - - switch (value1->type) { - case EC_CONFIG_TYPE_BOOL: - if (value1->boolean == value2->boolean) - return 0; - case EC_CONFIG_TYPE_INT64: - if (value1->i64 == value2->i64) - return 0; - case EC_CONFIG_TYPE_UINT64: - if (value1->u64 == value2->u64) - return 0; - case EC_CONFIG_TYPE_STRING: - if (!strcmp(value1->string, value2->string)) - return 0; - case EC_CONFIG_TYPE_NODE: - if (value1->node == value2->node) - return 0; - case EC_CONFIG_TYPE_LIST: - return ec_config_list_cmp(&value1->list, &value2->list); - case EC_CONFIG_TYPE_DICT: - return ec_config_dict_cmp(value1->dict, value2->dict); - default: - break; - } - - return -1; -} - -static int -ec_config_list_validate(const struct ec_config_list *list, - const struct ec_config_schema *sch) -{ - const struct ec_config *value; - - TAILQ_FOREACH(value, list, next) { - if (value->type != sch->type) { - errno = EBADMSG; - return -1; - } - - if (value->type == EC_CONFIG_TYPE_LIST) { - if (ec_config_list_validate(&value->list, - sch->subschema) < 0) - return -1; - } else if (value->type == EC_CONFIG_TYPE_DICT) { - if (ec_config_dict_validate(value->dict, - sch->subschema) < 0) - return -1; - } - } - - return 0; -} - -static int -ec_config_dict_validate(const struct ec_keyval *dict, - const struct ec_config_schema *schema) -{ - const struct ec_config *value; - struct ec_keyval_iter *iter = NULL; - const struct ec_config_schema *sch; - const char *key; - - for (iter = ec_keyval_iter(dict); - ec_keyval_iter_valid(iter); - ec_keyval_iter_next(iter)) { - - key = ec_keyval_iter_get_key(iter); - value = ec_keyval_iter_get_val(iter); - sch = ec_config_schema_lookup(schema, key); - if (sch == NULL || sch->type != value->type) { - errno = EBADMSG; - goto fail; - } - if (value->type == EC_CONFIG_TYPE_LIST) { - if (ec_config_list_validate(&value->list, - sch->subschema) < 0) - goto fail; - } else if (value->type == EC_CONFIG_TYPE_DICT) { - if (ec_config_dict_validate(value->dict, - sch->subschema) < 0) - goto fail; - } - } - - ec_keyval_iter_free(iter); - return 0; - -fail: - ec_keyval_iter_free(iter); - return -1; -} - -int -ec_config_validate(const struct ec_config *dict, - const struct ec_config_schema *schema) -{ - if (dict->type != EC_CONFIG_TYPE_DICT || schema == NULL) { - errno = EINVAL; - goto fail; - } - - if (ec_config_dict_validate(dict->dict, schema) < 0) - goto fail; - - return 0 -; -fail: - return -1; -} - -struct ec_config * -ec_config_dict_get(const struct ec_config *config, const char *key) -{ - if (config == NULL) { - errno = EINVAL; - return NULL; - } - - if (config->type != EC_CONFIG_TYPE_DICT) { - errno = EINVAL; - return NULL; - } - - return ec_keyval_get(config->dict, key); -} - -struct ec_config * -ec_config_list_first(struct ec_config *list) -{ - if (list == NULL || list->type != EC_CONFIG_TYPE_LIST) { - errno = EINVAL; - return NULL; - } - - return TAILQ_FIRST(&list->list); -} - -struct ec_config * -ec_config_list_next(struct ec_config *list, struct ec_config *config) -{ - (void)list; - return TAILQ_NEXT(config, next); -} - -/* value is consumed */ -int ec_config_dict_set(struct ec_config *config, const char *key, - struct ec_config *value) -{ - void (*free_cb)(struct ec_config *) = ec_config_free; - - if (config == NULL || key == NULL || value == NULL) { - errno = EINVAL; - goto fail; - } - if (config->type != EC_CONFIG_TYPE_DICT) { - errno = EINVAL; - goto fail; - } - - return ec_keyval_set(config->dict, key, value, - (void (*)(void *))free_cb); - -fail: - ec_config_free(value); - return -1; -} - -int ec_config_dict_del(struct ec_config *config, const char *key) -{ - if (config == NULL || key == NULL) { - errno = EINVAL; - return -1; - } - if (config->type != EC_CONFIG_TYPE_DICT) { - errno = EINVAL; - return -1; - } - - return ec_keyval_del(config->dict, key); -} - -/* value is consumed */ -int -ec_config_list_add(struct ec_config *list, - struct ec_config *value) -{ - if (list == NULL || list->type != EC_CONFIG_TYPE_LIST || value == NULL) { - errno = EINVAL; - goto fail; - } - - TAILQ_INSERT_TAIL(&list->list, value, next); - - return 0; - -fail: - ec_config_free(value); - return -1; -} - -int ec_config_list_del(struct ec_config *list, struct ec_config *config) -{ - if (list == NULL || list->type != EC_CONFIG_TYPE_LIST) { - errno = EINVAL; - return -1; - } - - TAILQ_REMOVE(&list->list, config, next); - ec_config_free(config); - return 0; -} - -static struct ec_config * -ec_config_list_dup(const struct ec_config_list *list) -{ - struct ec_config *dup = NULL, *v, *value; - - dup = ec_config_list(); - if (dup == NULL) - goto fail; - - TAILQ_FOREACH(v, list, next) { - value = ec_config_dup(v); - if (value == NULL) - goto fail; - if (ec_config_list_add(dup, value) < 0) - goto fail; - } - - return dup; - -fail: - ec_config_free(dup); - return NULL; -} - -static struct ec_config * -ec_config_dict_dup(const struct ec_keyval *dict) -{ - struct ec_config *dup = NULL, *value; - struct ec_keyval_iter *iter = NULL; - const char *key; - - dup = ec_config_dict(); - if (dup == NULL) - goto fail; - - for (iter = ec_keyval_iter(dict); - ec_keyval_iter_valid(iter); - ec_keyval_iter_next(iter)) { - key = ec_keyval_iter_get_key(iter); - value = ec_config_dup(ec_keyval_iter_get_val(iter)); - if (value == NULL) - goto fail; - if (ec_config_dict_set(dup, key, value) < 0) - goto fail; - } - ec_keyval_iter_free(iter); - - return dup; - -fail: - ec_config_free(dup); - ec_keyval_iter_free(iter); - return NULL; -} - -struct ec_config * -ec_config_dup(const struct ec_config *config) -{ - if (config == NULL) { - errno = EINVAL; - return NULL; - } - - switch (config->type) { - case EC_CONFIG_TYPE_BOOL: - return ec_config_bool(config->boolean); - case EC_CONFIG_TYPE_INT64: - return ec_config_i64(config->i64); - case EC_CONFIG_TYPE_UINT64: - return ec_config_u64(config->u64); - case EC_CONFIG_TYPE_STRING: - return ec_config_string(config->string); - case EC_CONFIG_TYPE_NODE: - return ec_config_node(ec_node_clone(config->node)); - case EC_CONFIG_TYPE_LIST: - return ec_config_list_dup(&config->list); - case EC_CONFIG_TYPE_DICT: - return ec_config_dict_dup(config->dict); - default: - errno = EINVAL; - break; - } - - return NULL; -} - -static int -ec_config_list_dump(FILE *out, const char *key, - const struct ec_config_list *list, size_t indent) -{ - const struct ec_config *v; - - fprintf(out, "%*s" "%s%s%stype=list\n", (int)indent * 4, "", - key ? "key=": "", - key ? key: "", - key ? " ": ""); - - TAILQ_FOREACH(v, list, next) { - if (__ec_config_dump(out, NULL, v, indent + 1) < 0) - return -1; - } - - return 0; -} - -static int -ec_config_dict_dump(FILE *out, const char *key, const struct ec_keyval *dict, - size_t indent) -{ - const struct ec_config *value; - struct ec_keyval_iter *iter; - const char *k; - - fprintf(out, "%*s" "%s%s%stype=dict\n", (int)indent * 4, "", - key ? "key=": "", - key ? key: "", - key ? " ": ""); - - for (iter = ec_keyval_iter(dict); - ec_keyval_iter_valid(iter); - ec_keyval_iter_next(iter)) { - k = ec_keyval_iter_get_key(iter); - value = ec_keyval_iter_get_val(iter); - if (__ec_config_dump(out, k, value, indent + 1) < 0) - goto fail; - } - ec_keyval_iter_free(iter); - return 0; - -fail: - ec_keyval_iter_free(iter); - return -1; -} - -static int -__ec_config_dump(FILE *out, const char *key, const struct ec_config *value, - size_t indent) -{ - char *val_str = NULL; - - switch (value->type) { - case EC_CONFIG_TYPE_BOOL: - if (value->boolean) - ec_asprintf(&val_str, "true"); - else - ec_asprintf(&val_str, "false"); - break; - case EC_CONFIG_TYPE_INT64: - ec_asprintf(&val_str, "%"PRIu64, value->u64); - break; - case EC_CONFIG_TYPE_UINT64: - ec_asprintf(&val_str, "%"PRIi64, value->i64); - break; - case EC_CONFIG_TYPE_STRING: - ec_asprintf(&val_str, "%s", value->string); - break; - case EC_CONFIG_TYPE_NODE: - ec_asprintf(&val_str, "%p", value->node); - break; - case EC_CONFIG_TYPE_LIST: - return ec_config_list_dump(out, key, &value->list, indent); - case EC_CONFIG_TYPE_DICT: - return ec_config_dict_dump(out, key, value->dict, indent); - default: - errno = EINVAL; - break; - } - - /* errno is already set on error */ - if (val_str == NULL) - goto fail; - - fprintf(out, "%*s" "%s%s%stype=%s val=%s\n", (int)indent * 4, "", - key ? "key=": "", - key ? key: "", - key ? " ": "", - ec_config_type_str(value->type), val_str); - - ec_free(val_str); - return 0; - -fail: - ec_free(val_str); - return -1; -} - -void -ec_config_dump(FILE *out, const struct ec_config *config) -{ - fprintf(out, "------------------- config dump:\n"); - - if (config == NULL) { - fprintf(out, "no config\n"); - return; - } - - if (__ec_config_dump(out, NULL, config, 0) < 0) - fprintf(out, "error while dumping\n"); -} - -/* LCOV_EXCL_START */ -static const struct ec_config_schema sch_intlist_elt[] = { - { - .desc = "This is a description for int", - .type = EC_CONFIG_TYPE_INT64, - }, - { - .type = EC_CONFIG_TYPE_NONE, - }, -}; - -static const struct ec_config_schema sch_dict[] = { - { - .key = "my_int", - .desc = "This is a description for int", - .type = EC_CONFIG_TYPE_INT64, - }, - { - .key = "my_int2", - .desc = "This is a description for int2", - .type = EC_CONFIG_TYPE_INT64, - }, - { - .type = EC_CONFIG_TYPE_NONE, - }, -}; - -static const struct ec_config_schema sch_dictlist_elt[] = { - { - .desc = "This is a description for dict", - .type = EC_CONFIG_TYPE_DICT, - .subschema = sch_dict, - }, - { - .type = EC_CONFIG_TYPE_NONE, - }, -}; - -static const struct ec_config_schema sch_baseconfig[] = { - { - .key = "my_bool", - .desc = "This is a description for bool", - .type = EC_CONFIG_TYPE_BOOL, - }, - { - .key = "my_int", - .desc = "This is a description for int", - .type = EC_CONFIG_TYPE_INT64, - }, - { - .key = "my_string", - .desc = "This is a description for string", - .type = EC_CONFIG_TYPE_STRING, - }, - { - .key = "my_node", - .desc = "This is a description for node", - .type = EC_CONFIG_TYPE_NODE, - }, - { - .key = "my_intlist", - .desc = "This is a description for list", - .type = EC_CONFIG_TYPE_LIST, - .subschema = sch_intlist_elt, - }, - { - .key = "my_dictlist", - .desc = "This is a description for list", - .type = EC_CONFIG_TYPE_LIST, - .subschema = sch_dictlist_elt, - }, - { - .type = EC_CONFIG_TYPE_NONE, - }, -}; - -static int ec_config_testcase(void) -{ - struct ec_node *node = NULL; - struct ec_keyval *dict = NULL; - const struct ec_config *value = NULL; - struct ec_config *config = NULL, *config2 = NULL; - struct ec_config *list = NULL, *subconfig = NULL; - struct ec_config *list_, *config_; - int testres = 0; - int ret; - - testres |= EC_TEST_CHECK(ec_config_key_is_reserved("id"), - "'id' should be reserved"); - testres |= EC_TEST_CHECK(!ec_config_key_is_reserved("foo"), - "'foo' should not be reserved"); - - node = ec_node("empty", EC_NO_ID); - if (node == NULL) - goto fail; - - if (ec_config_schema_validate(sch_baseconfig) < 0) { - EC_LOG(EC_LOG_ERR, "invalid config schema\n"); - goto fail; - } - - ec_config_schema_dump(stdout, sch_baseconfig); - - config = ec_config_dict(); - if (config == NULL) - goto fail; - - ret = ec_config_dict_set(config, "my_bool", ec_config_bool(true)); - testres |= EC_TEST_CHECK(ret == 0, "cannot set boolean"); - value = ec_config_dict_get(config, "my_bool"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_BOOL && - value->boolean == true, - "unexpected boolean value"); - - ret = ec_config_dict_set(config, "my_int", ec_config_i64(1234)); - testres |= EC_TEST_CHECK(ret == 0, "cannot set int"); - value = ec_config_dict_get(config, "my_int"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_INT64 && - value->i64 == 1234, - "unexpected int value"); - - testres |= EC_TEST_CHECK( - ec_config_validate(config, sch_baseconfig) == 0, - "cannot validate config\n"); - - ret = ec_config_dict_set(config, "my_string", ec_config_string("toto")); - testres |= EC_TEST_CHECK(ret == 0, "cannot set string"); - value = ec_config_dict_get(config, "my_string"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_STRING && - !strcmp(value->string, "toto"), - "unexpected string value"); - - list = ec_config_list(); - if (list == NULL) - goto fail; - - subconfig = ec_config_dict(); - if (subconfig == NULL) - goto fail; - - ret = ec_config_dict_set(subconfig, "my_int", ec_config_i64(1)); - testres |= EC_TEST_CHECK(ret == 0, "cannot set int"); - value = ec_config_dict_get(subconfig, "my_int"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_INT64 && - value->i64 == 1, - "unexpected int value"); - - ret = ec_config_dict_set(subconfig, "my_int2", ec_config_i64(2)); - testres |= EC_TEST_CHECK(ret == 0, "cannot set int"); - value = ec_config_dict_get(subconfig, "my_int2"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_INT64 && - value->i64 == 2, - "unexpected int value"); - - testres |= EC_TEST_CHECK( - ec_config_validate(subconfig, sch_dict) == 0, - "cannot validate subconfig\n"); - - ret = ec_config_list_add(list, subconfig); - subconfig = NULL; /* freed */ - testres |= EC_TEST_CHECK(ret == 0, "cannot add in list"); - - subconfig = ec_config_dict(); - if (subconfig == NULL) - goto fail; - - ret = ec_config_dict_set(subconfig, "my_int", ec_config_i64(3)); - testres |= EC_TEST_CHECK(ret == 0, "cannot set int"); - value = ec_config_dict_get(subconfig, "my_int"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_INT64 && - value->i64 == 3, - "unexpected int value"); - - ret = ec_config_dict_set(subconfig, "my_int2", ec_config_i64(4)); - testres |= EC_TEST_CHECK(ret == 0, "cannot set int"); - value = ec_config_dict_get(subconfig, "my_int2"); - testres |= EC_TEST_CHECK( - value != NULL && - value->type == EC_CONFIG_TYPE_INT64 && - value->i64 == 4, - "unexpected int value"); - - testres |= EC_TEST_CHECK( - ec_config_validate(subconfig, sch_dict) == 0, - "cannot validate subconfig\n"); - - ret = ec_config_list_add(list, subconfig); - subconfig = NULL; /* freed */ - testres |= EC_TEST_CHECK(ret == 0, "cannot add in list"); - - ret = ec_config_dict_set(config, "my_dictlist", list); - list = NULL; - testres |= EC_TEST_CHECK(ret == 0, "cannot set list"); - - testres |= EC_TEST_CHECK( - ec_config_validate(config, sch_baseconfig) == 0, - "cannot validate config\n"); - - list_ = ec_config_dict_get(config, "my_dictlist"); - for (config_ = ec_config_list_first(list_); config_ != NULL; - config_ = ec_config_list_next(list_, config_)) { - ec_config_dump(stdout, config_); - } - - ec_config_dump(stdout, config); - - config2 = ec_config_dup(config); - testres |= EC_TEST_CHECK(config2 != NULL, "cannot duplicate config"); - testres |= EC_TEST_CHECK( - ec_config_cmp(config, config2) == 0, - "fail to compare config"); - ec_config_free(config2); - config2 = NULL; - - /* remove the first element */ - ec_config_list_del(list_, ec_config_list_first(list_)); - testres |= EC_TEST_CHECK( - ec_config_validate(config, sch_baseconfig) == 0, - "cannot validate config\n"); - - ec_config_dump(stdout, config); - - ec_config_free(list); - ec_config_free(subconfig); - ec_config_free(config); - ec_keyval_free(dict); - ec_node_free(node); - - return testres; - -fail: - ec_config_free(list); - ec_config_free(subconfig); - ec_config_free(config); - ec_config_free(config2); - ec_keyval_free(dict); - ec_node_free(node); - - return -1; -} -/* LCOV_EXCL_STOP */ - -static struct ec_test ec_config_test = { - .name = "config", - .test = ec_config_testcase, -}; - -EC_TEST_REGISTER(ec_config_test);