#include <string.h>
#include <assert.h>
#include <stdarg.h>
+#include <errno.h>
#include <ecoli_malloc.h>
#include <ecoli_log.h>
struct ec_node *child;
};
-static struct ec_parsed *ec_node_many_parse(const struct ec_node *gen_node,
- const struct ec_strvec *strvec)
+static int ec_node_many_parse(const struct ec_node *gen_node,
+ struct ec_parsed *state,
+ const struct ec_strvec *strvec)
{
struct ec_node_many *node = (struct ec_node_many *)gen_node;
- struct ec_parsed *parsed, *child_parsed;
- struct ec_strvec *match_strvec;
+ struct ec_parsed *child_parsed;
struct ec_strvec *childvec = NULL;
- size_t off = 0, len, count;
-
- parsed = ec_parsed();
- if (parsed == NULL)
- goto fail;
+ size_t off = 0, count;
+ int ret;
for (count = 0; node->max == 0 || count < node->max; count++) {
childvec = ec_strvec_ndup(strvec, off,
ec_strvec_len(strvec) - off);
- if (childvec == NULL)
- goto fail;
-
- child_parsed = ec_node_parse_strvec(node->child, childvec);
- if (child_parsed == NULL)
+ if (childvec == NULL) {
+ ret = -ENOMEM;
goto fail;
+ }
+ ret = ec_node_parse_child(node->child, state, childvec);
ec_strvec_free(childvec);
childvec = NULL;
- if (!ec_parsed_matches(child_parsed)) {
- ec_parsed_free(child_parsed);
+ if (ret == EC_PARSED_NOMATCH)
break;
- }
-
- ec_parsed_add_child(parsed, child_parsed);
+ else if (ret < 0)
+ goto fail;
/* it matches an empty strvec, no need to continue */
- len = ec_parsed_len(child_parsed);
- if (len == 0) {
+ if (ret == 0) {
+ child_parsed = ec_parsed_get_last_child(state);
+ ec_parsed_del_child(state, child_parsed);
ec_parsed_free(child_parsed);
break;
}
- off += len;
+ off += ret;
}
if (count < node->min) {
- ec_parsed_free_children(parsed);
- return parsed;
+ ec_parsed_free_children(state);
+ return EC_PARSED_NOMATCH;
}
- match_strvec = ec_strvec_ndup(strvec, 0, off);
- if (match_strvec == NULL)
- goto fail;
-
- ec_parsed_set_match(parsed, gen_node, match_strvec);
-
- return parsed;
+ return off;
fail:
ec_strvec_free(childvec);
- ec_parsed_free(parsed);
- return NULL;
+ return ret;
}
-#if 0 //XXX missing node_many_complete
-static struct ec_completed *ec_node_many_complete(const struct ec_node *gen_node,
- const struct ec_strvec *strvec)
+static int
+__ec_node_many_complete(struct ec_node_many *node, unsigned int max,
+ struct ec_completed *completed,
+ struct ec_parsed *parsed,
+ const struct ec_strvec *strvec)
{
- struct ec_node_many *node = (struct ec_node_many *)gen_node;
- struct ec_completed *completed, *child_completed;
- struct ec_strvec *childvec;
- struct ec_parsed *parsed;
- size_t len = 0;
+ struct ec_strvec *childvec = NULL;
unsigned int i;
+ int ret;
- completed = ec_completed();
- if (completed == NULL)
- return NULL;
+ /* first, try to complete with the child node */
+ ret = ec_node_complete_child(node->child, completed, parsed, strvec);
+ if (ret < 0)
+ goto fail;
- if (node->len == 0)
- return completed;
+ /* we're done, we reached the max number of nodes */
+ if (max == 1)
+ return 0;
- for (i = 0; i < node->len; i++) {
- childvec = ec_strvec_ndup(strvec, len,
- ec_strvec_len(strvec) - len);
- if (childvec == NULL)
- goto fail; // XXX fail ?
+ /* if there is a maximum, decrease it before recursion */
+ if (max != 0)
+ max--;
- child_completed = ec_node_complete_strvec(node->table[i],
- childvec);
- if (child_completed == NULL)
+ /* then, if the node matches the beginning of the strvec, try to
+ * complete the rest */
+ for (i = 0; i < ec_strvec_len(strvec); i++) {
+ childvec = ec_strvec_ndup(strvec, 0, i);
+ if (childvec == NULL)
goto fail;
- ec_completed_merge(completed, child_completed);
-
- parsed = ec_node_parse_strvec(node->table[i], childvec);
- if (parsed == NULL)
+ ret = ec_node_parse_child(node->child, parsed, childvec);
+ if (ret < 0 && ret != EC_PARSED_NOMATCH)
goto fail;
ec_strvec_free(childvec);
childvec = NULL;
- if (!ec_parsed_matches(parsed)) {
- ec_parsed_free(parsed);
- break;
+ if ((unsigned int)ret != i) {
+ if (ret != EC_PARSED_NOMATCH)
+ ec_parsed_del_last_child(parsed);
+ continue;
}
- len += ec_strvec_len(parsed->strvec);
- ec_parsed_free(parsed);
+ childvec = ec_strvec_ndup(strvec, i, ec_strvec_len(strvec) - i);
+ if (childvec == NULL) {
+ ec_parsed_del_last_child(parsed);
+ goto fail;
+ }
+
+ ret = __ec_node_many_complete(node, max, completed,
+ parsed, childvec);
+ ec_parsed_del_last_child(parsed);
+ ec_strvec_free(childvec);
+ childvec = NULL;
+
+ if (ret < 0)
+ goto fail;
}
- return completed;
+ return 0;
fail:
ec_strvec_free(childvec);
- ec_completed_free(completed);
- return NULL;
+ return -1;
+}
+
+static int
+ec_node_many_complete(const struct ec_node *gen_node,
+ struct ec_completed *completed,
+ struct ec_parsed *parsed,
+ const struct ec_strvec *strvec)
+{
+ struct ec_node_many *node = (struct ec_node_many *)gen_node;
+
+ return __ec_node_many_complete(node, node->max, completed,
+ parsed, strvec);
}
-#endif
static void ec_node_many_free_priv(struct ec_node *gen_node)
{
static struct ec_node_type ec_node_many_type = {
.name = "many",
.parse = ec_node_many_parse,
- .complete = ec_node_default_complete,
-//XXX .complete = ec_node_many_complete,
+ .complete = ec_node_many_complete,
.size = sizeof(struct ec_node_many),
.free_priv = ec_node_many_free_priv,
};
return &node->gen;
}
+/* LCOV_EXCL_START */
static int ec_node_many_testcase(void)
{
struct ec_node *node;
ec_log(EC_LOG_ERR, "cannot create node\n");
return -1;
}
+ ret |= EC_TEST_CHECK_PARSE(node, 0);
ret |= EC_TEST_CHECK_PARSE(node, 0, "bar");
ret |= EC_TEST_CHECK_PARSE(node, 1, "foo", "bar");
ret |= EC_TEST_CHECK_PARSE(node, 2, "foo", "foo", "bar");
ec_node_free(node);
/* test completion */
- /* XXX */
+ node = ec_node_many(NULL, ec_node_str(NULL, "foo"), 2, 4);
+ if (node == NULL) {
+ ec_log(EC_LOG_ERR, "cannot create node\n");
+ return -1;
+ }
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "", EC_NODE_ENDLIST,
+ "foo", EC_NODE_ENDLIST,
+ "foo");
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "f", EC_NODE_ENDLIST,
+ "oo", EC_NODE_ENDLIST,
+ "oo");
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "foo", EC_NODE_ENDLIST,
+ "", EC_NODE_ENDLIST,
+ "");
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "foo", "", EC_NODE_ENDLIST,
+ "foo", EC_NODE_ENDLIST,
+ "foo");
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "foo", "foo", "", EC_NODE_ENDLIST,
+ "foo", EC_NODE_ENDLIST,
+ "foo");
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "foo", "foo", "foo", "", EC_NODE_ENDLIST,
+ "foo", EC_NODE_ENDLIST,
+ "foo");
+ ret |= EC_TEST_CHECK_COMPLETE(node,
+ "foo", "foo", "foo", "foo", "", EC_NODE_ENDLIST,
+ EC_NODE_ENDLIST,
+ "");
+ ec_node_free(node);
return ret;
}
+/* LCOV_EXCL_STOP */
static struct ec_test ec_node_many_test = {
- .name = "many",
+ .name = "node_many",
.test = ec_node_many_testcase,
};