add XXX for later
[protos/libecoli.git] / lib / ecoli_node_int.c
index db7de48..9b56e22 100644 (file)
@@ -15,8 +15,9 @@
 #include <ecoli_malloc.h>
 #include <ecoli_strvec.h>
 #include <ecoli_node.h>
-#include <ecoli_parsed.h>
-#include <ecoli_completed.h>
+#include <ecoli_config.h>
+#include <ecoli_parse.h>
+#include <ecoli_complete.h>
 #include <ecoli_node_int.h>
 #include <ecoli_test.h>
 
@@ -39,10 +40,12 @@ struct ec_node_int_uint {
        unsigned int base;
 };
 
+/* XXX to utils.c ? */
 static int parse_llint(struct ec_node_int_uint *node, const char *str,
        int64_t *val)
 {
        char *endptr;
+       int save_errno = errno;
 
        errno = 0;
        *val = strtoll(str, &endptr, node->base);
@@ -51,15 +54,22 @@ static int parse_llint(struct ec_node_int_uint *node, const char *str,
                        (errno != 0 && *val == 0))
                return -1;
 
-       if (node->check_min && *val < node->min)
+       if (node->check_min && *val < node->min) {
+               errno = ERANGE;
                return -1;
+       }
 
-       if (node->check_max && *val > node->max)
+       if (node->check_max && *val > node->max) {
+               errno = ERANGE;
                return -1;
+       }
 
-       if (*endptr != 0)
+       if (*endptr != 0) {
+               errno = EINVAL;
                return -1;
+       }
 
+       errno = save_errno;
        return 0;
 }
 
@@ -67,6 +77,7 @@ static int parse_ullint(struct ec_node_int_uint *node, const char *str,
                        uint64_t *val)
 {
        char *endptr;
+       int save_errno = errno;
 
        /* since a negative input is silently converted to a positive
         * one by strtoull(), first check that it is positive */
@@ -89,11 +100,12 @@ static int parse_ullint(struct ec_node_int_uint *node, const char *str,
        if (*endptr != 0)
                return -1;
 
+       errno = save_errno;
        return 0;
 }
 
 static int ec_node_int_uint_parse(const struct ec_node *gen_node,
-                       struct ec_parsed *state,
+                       struct ec_parse *state,
                        const struct ec_strvec *strvec)
 {
        struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
@@ -104,15 +116,15 @@ static int ec_node_int_uint_parse(const struct ec_node *gen_node,
        (void)state;
 
        if (ec_strvec_len(strvec) == 0)
-               return EC_PARSED_NOMATCH;
+               return EC_PARSE_NOMATCH;
 
        str = ec_strvec_val(strvec, 0);
        if (node->is_signed) {
                if (parse_llint(node, str, &i64) < 0)
-                       return EC_PARSED_NOMATCH;
+                       return EC_PARSE_NOMATCH;
        } else {
                if (parse_ullint(node, str, &u64) < 0)
-                       return EC_PARSED_NOMATCH;
+                       return EC_PARSE_NOMATCH;
        }
        return 1;
 }
@@ -127,170 +139,229 @@ ec_node_uint_init_priv(struct ec_node *gen_node)
        return 0;
 }
 
-static struct ec_node_type ec_node_int_type = {
-       .name = "int",
-       .parse = ec_node_int_uint_parse,
-       .complete = ec_node_default_complete,
-       .size = sizeof(struct ec_node_int_uint),
-       .init_priv = ec_node_uint_init_priv,
+static const struct ec_config_schema ec_node_int_schema[] = {
+       {
+               .key = "min",
+               .desc = "The minimum valid value (included).",
+               .type = EC_CONFIG_TYPE_INT64,
+       },
+       {
+               .key = "max",
+               .desc = "The maximum valid value (included).",
+               .type = EC_CONFIG_TYPE_INT64,
+       },
+       {
+               .key = "base",
+               .desc = "The base to use. If unset or 0, try to guess.",
+               .type = EC_CONFIG_TYPE_UINT64,
+       },
+       {
+               .type = EC_CONFIG_TYPE_NONE,
+       },
 };
 
-EC_NODE_TYPE_REGISTER(ec_node_int_type);
-
-struct ec_node *ec_node_int(const char *id, int64_t min,
-       int64_t max, unsigned int base)
+static int ec_node_int_set_config(struct ec_node *gen_node,
+                               const struct ec_config *config)
 {
-       struct ec_node *gen_node = NULL;
+       struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
+       const struct ec_config *min_value = NULL;
+       const struct ec_config *max_value = NULL;
+       const struct ec_config *base_value = NULL;
+       char *s = NULL;
 
-       gen_node = __ec_node(&ec_node_int_type, id);
-       if (gen_node == NULL)
-               return NULL;
+       min_value = ec_config_dict_get(config, "min");
+       max_value = ec_config_dict_get(config, "max");
+       base_value = ec_config_dict_get(config, "base");
 
-       if (ec_node_int_set_limits(gen_node, min, max) < 0)
-               goto fail;
-       if (ec_node_int_set_base(gen_node, base) < 0)
+       if (min_value && max_value && min_value->i64 > max_value->i64) {
+               errno = EINVAL;
                goto fail;
+       }
 
-       return gen_node;
+       if (min_value != NULL) {
+               node->check_min = true;
+               node->min = min_value->i64;
+       } else {
+               node->check_min = false;
+       }
+       if (max_value != NULL) {
+               node->check_max = true;
+               node->max = max_value->i64;
+       } else {
+               node->check_min = false;
+       }
+       if (base_value != NULL)
+               node->base = base_value->u64;
+       else
+               node->base = 0;
+
+       return 0;
 
 fail:
-       ec_node_free(gen_node);
-       return NULL;
+       ec_free(s);
+       return -1;
 }
 
-static struct ec_node_type ec_node_uint_type = {
-       .name = "uint",
+static struct ec_node_type ec_node_int_type = {
+       .name = "int",
+       .schema = ec_node_int_schema,
+       .set_config = ec_node_int_set_config,
        .parse = ec_node_int_uint_parse,
-       .complete = ec_node_default_complete,
+       .complete = ec_node_complete_unknown,
        .size = sizeof(struct ec_node_int_uint),
+       .init_priv = ec_node_uint_init_priv,
 };
 
-EC_NODE_TYPE_REGISTER(ec_node_uint_type);
+EC_NODE_TYPE_REGISTER(ec_node_int_type);
 
-struct ec_node *ec_node_uint(const char *id, uint64_t min,
-       uint64_t max, unsigned int base)
+struct ec_node *ec_node_int(const char *id, int64_t min,
+       int64_t max, unsigned int base)
 {
+       struct ec_config *config = NULL;
        struct ec_node *gen_node = NULL;
+       int ret;
 
-       gen_node = __ec_node(&ec_node_uint_type, id);
+       gen_node = ec_node_from_type(&ec_node_int_type, id);
        if (gen_node == NULL)
                return NULL;
 
-       if (ec_node_uint_set_limits(gen_node, min, max) < 0)
+       config = ec_config_dict();
+       if (config == NULL)
                goto fail;
-       if (ec_node_uint_set_base(gen_node, base) < 0)
+
+       ret = ec_config_dict_set(config, "min", ec_config_i64(min));
+       if (ret < 0)
+               goto fail;
+       ret = ec_config_dict_set(config, "max", ec_config_i64(max));
+       if (ret < 0)
+               goto fail;
+       ret = ec_config_dict_set(config, "base", ec_config_u64(base));
+       if (ret < 0)
+               goto fail;
+
+       ret = ec_node_set_config(gen_node, config);
+       config = NULL;
+       if (ret < 0)
                goto fail;
 
        return gen_node;
 
 fail:
+       ec_config_free(config);
        ec_node_free(gen_node);
        return NULL;
 }
 
-int ec_node_int_disable_limits(struct ec_node *gen_node)
-{
-       struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
-       int ret;
-
-       ret = ec_node_check_type(gen_node, &ec_node_int_type);
-       if (ret < 0)
-               return ret;
-
-       node->check_min = false;
-       node->check_max = false;
-
-       return 0;
-}
+static const struct ec_config_schema ec_node_uint_schema[] = {
+       {
+               .key = "min",
+               .desc = "The minimum valid value (included).",
+               .type = EC_CONFIG_TYPE_UINT64,
+       },
+       {
+               .key = "max",
+               .desc = "The maximum valid value (included).",
+               .type = EC_CONFIG_TYPE_UINT64,
+       },
+       {
+               .key = "base",
+               .desc = "The base to use. If unset or 0, try to guess.",
+               .type = EC_CONFIG_TYPE_UINT64,
+       },
+       {
+               .type = EC_CONFIG_TYPE_NONE,
+       },
+};
 
-int ec_node_int_set_limits(struct ec_node *gen_node, int64_t min,
-                       int64_t max)
+static int ec_node_uint_set_config(struct ec_node *gen_node,
+                               const struct ec_config *config)
 {
        struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
-       int ret;
+       const struct ec_config *min_value = NULL;
+       const struct ec_config *max_value = NULL;
+       const struct ec_config *base_value = NULL;
+       char *s = NULL;
 
-       ret = ec_node_check_type(gen_node, &ec_node_int_type);
-       if (ret < 0)
-               return ret;
+       min_value = ec_config_dict_get(config, "min");
+       max_value = ec_config_dict_get(config, "max");
+       base_value = ec_config_dict_get(config, "base");
 
-       if (min > max) {
+       if (min_value && max_value && min_value->u64 > max_value->u64) {
                errno = EINVAL;
-               return -1;
+               goto fail;
        }
 
-       node->check_min = true;
-       node->min = min;
-       node->check_max = true;
-       node->max = max;
-
-       return 0;
-}
-
-int ec_node_int_set_base(struct ec_node *gen_node, unsigned int base)
-{
-       struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
-       int ret;
-
-       ret = ec_node_check_type(gen_node, &ec_node_int_type);
-       if (ret < 0)
-               return ret;
-
-       node->base = base;
+       if (min_value != NULL) {
+               node->check_min = true;
+               node->min = min_value->u64;
+       } else {
+               node->check_min = false;
+       }
+       if (max_value != NULL) {
+               node->check_max = true;
+               node->max = max_value->u64;
+       } else {
+               node->check_min = false;
+       }
+       if (base_value != NULL)
+               node->base = base_value->u64;
+       else
+               node->base = 0;
 
        return 0;
 
+fail:
+       ec_free(s);
+       return -1;
 }
 
-int ec_node_uint_disable_limits(struct ec_node *gen_node)
-{
-       struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
-       int ret;
-
-       ret = ec_node_check_type(gen_node, &ec_node_uint_type);
-       if (ret < 0)
-               return ret;
-
-       node->check_min = false;
-       node->check_max = false;
+static struct ec_node_type ec_node_uint_type = {
+       .name = "uint",
+       .schema = ec_node_uint_schema,
+       .set_config = ec_node_uint_set_config,
+       .parse = ec_node_int_uint_parse,
+       .complete = ec_node_complete_unknown,
+       .size = sizeof(struct ec_node_int_uint),
+};
 
-       return 0;
-}
+EC_NODE_TYPE_REGISTER(ec_node_uint_type);
 
-int ec_node_uint_set_limits(struct ec_node *gen_node, uint64_t min,
-                       uint64_t max)
+struct ec_node *ec_node_uint(const char *id, uint64_t min,
+       uint64_t max, unsigned int base)
 {
-       struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
+       struct ec_config *config = NULL;
+       struct ec_node *gen_node = NULL;
        int ret;
 
-       ret = ec_node_check_type(gen_node, &ec_node_uint_type);
-       if (ret < 0)
-               return ret;
-
-       if (min > max) {
-               errno = EINVAL;
-               return -1;
-       }
-
-       node->check_min = true;
-       node->min = min;
-       node->check_max = true;
-       node->max = max;
+       gen_node = ec_node_from_type(&ec_node_uint_type, id);
+       if (gen_node == NULL)
+               return NULL;
 
-       return 0;
-}
+       config = ec_config_dict();
+       if (config == NULL)
+               goto fail;
 
-int ec_node_uint_set_base(struct ec_node *gen_node, unsigned int base)
-{
-       struct ec_node_int_uint *node = (struct ec_node_int_uint *)gen_node;
-       int ret;
+       ret = ec_config_dict_set(config, "min", ec_config_u64(min));
+       if (ret < 0)
+               goto fail;
+       ret = ec_config_dict_set(config, "max", ec_config_u64(max));
+       if (ret < 0)
+               goto fail;
+       ret = ec_config_dict_set(config, "base", ec_config_u64(base));
+       if (ret < 0)
+               goto fail;
 
-       ret = ec_node_check_type(gen_node, &ec_node_uint_type);
+       ret = ec_node_set_config(gen_node, config);
+       config = NULL;
        if (ret < 0)
-               return ret;
+               goto fail;
 
-       node->base = base;
+       return gen_node;
 
-       return 0;
+fail:
+       ec_config_free(config);
+       ec_node_free(gen_node);
+       return NULL;
 }
 
 int ec_node_int_getval(const struct ec_node *gen_node, const char *str,
@@ -328,10 +399,10 @@ int ec_node_uint_getval(const struct ec_node *gen_node, const char *str,
 /* LCOV_EXCL_START */
 static int ec_node_int_testcase(void)
 {
-       struct ec_parsed *p;
+       struct ec_parse *p;
        struct ec_node *node;
        const char *s;
-       int testres = 0, ret;
+       int testres = 0;
        uint64_t u64;
        int64_t i64;
 
@@ -351,23 +422,20 @@ static int ec_node_int_testcase(void)
        testres |= EC_TEST_CHECK_PARSE(node, -1, "zzz");
        testres |= EC_TEST_CHECK_PARSE(node, -1, "0x100000000000000000");
        testres |= EC_TEST_CHECK_PARSE(node, -1, "4r");
-       ret = ec_node_uint_disable_limits(node);
-       testres |= EC_TEST_CHECK(ret == 0, "cannot disable limits");
-       testres |= EC_TEST_CHECK_PARSE(node, 1, "0");
 
        p = ec_node_parse(node, "1");
-       s = ec_strvec_val(ec_parsed_strvec(p), 0);
+       s = ec_strvec_val(ec_parse_strvec(p), 0);
        testres |= EC_TEST_CHECK(s != NULL &&
                ec_node_uint_getval(node, s, &u64) == 0 &&
                u64 == 1, "bad integer value");
-       ec_parsed_free(p);
+       ec_parse_free(p);
 
        p = ec_node_parse(node, "10");
-       s = ec_strvec_val(ec_parsed_strvec(p), 0);
+       s = ec_strvec_val(ec_parse_strvec(p), 0);
        testres |= EC_TEST_CHECK(s != NULL &&
                ec_node_uint_getval(node, s, &u64) == 0 &&
                u64 == 10, "bad integer value");
-       ec_parsed_free(p);
+       ec_parse_free(p);
        ec_node_free(node);
 
        node = ec_node_int(EC_NO_ID, -1, LLONG_MAX, 16);
@@ -383,16 +451,13 @@ static int ec_node_int_testcase(void)
        testres |= EC_TEST_CHECK_PARSE(node, -1, "-2");
        testres |= EC_TEST_CHECK_PARSE(node, -1, "zzz");
        testres |= EC_TEST_CHECK_PARSE(node, -1, "4r");
-       ret = ec_node_int_disable_limits(node);
-       testres |= EC_TEST_CHECK(ret == 0, "cannot disable limits");
-       testres |= EC_TEST_CHECK_PARSE(node, 1, "-2");
 
        p = ec_node_parse(node, "10");
-       s = ec_strvec_val(ec_parsed_strvec(p), 0);
+       s = ec_strvec_val(ec_parse_strvec(p), 0);
        testres |= EC_TEST_CHECK(s != NULL &&
                ec_node_int_getval(node, s, &i64) == 0 &&
                i64 == 16, "bad integer value");
-       ec_parsed_free(p);
+       ec_parse_free(p);
        ec_node_free(node);
 
        node = ec_node_int(EC_NO_ID, LLONG_MIN, 0, 10);