1 /* SPDX-License-Identifier: BSD-3-Clause
2 * Copyright 2016, Olivier MATZ <zer0@droids-corp.org>
12 #include <ecoli_malloc.h>
13 #include <ecoli_log.h>
14 #include <ecoli_test.h>
15 #include <ecoli_strvec.h>
16 #include <ecoli_node.h>
17 #include <ecoli_parse.h>
18 #include <ecoli_complete.h>
19 #include <ecoli_node_str.h>
20 #include <ecoli_node_or.h>
21 #include <ecoli_node_many.h>
22 #include <ecoli_config.h>
23 #include <ecoli_node_once.h>
25 EC_LOG_TYPE_REGISTER(node_once);
29 struct ec_node *child;
33 count_node(struct ec_parse *parse, const struct ec_node *node)
35 struct ec_parse *child;
36 unsigned int count = 0;
41 if (ec_parse_get_node(parse) == node)
44 EC_PARSE_FOREACH_CHILD(child, parse)
45 count += count_node(child, node);
51 ec_node_once_parse(const struct ec_node *gen_node,
52 struct ec_parse *state,
53 const struct ec_strvec *strvec)
55 struct ec_node_once *node = (struct ec_node_once *)gen_node;
58 /* count the number of occurences of the node: if already parsed,
61 count = count_node(ec_parse_get_root(state), node->child);
63 return EC_PARSE_NOMATCH;
65 return ec_node_parse_child(node->child, state, strvec);
69 ec_node_once_complete(const struct ec_node *gen_node,
71 const struct ec_strvec *strvec)
73 struct ec_node_once *node = (struct ec_node_once *)gen_node;
74 struct ec_parse *parse = ec_comp_get_state(comp);
78 /* count the number of occurences of the node: if already parsed,
81 count = count_node(ec_parse_get_root(parse), node->child);
85 ret = ec_node_complete_child(node->child, comp, strvec);
92 static void ec_node_once_free_priv(struct ec_node *gen_node)
94 struct ec_node_once *node = (struct ec_node_once *)gen_node;
96 ec_node_free(node->child);
100 ec_node_once_get_children_count(const struct ec_node *gen_node)
102 struct ec_node_once *node = (struct ec_node_once *)gen_node;
110 ec_node_once_get_child(const struct ec_node *gen_node, size_t i,
111 struct ec_node **child, unsigned int *refs)
113 struct ec_node_once *node = (struct ec_node_once *)gen_node;
118 *child = node->child;
123 static const struct ec_config_schema ec_node_once_schema[] = {
126 .desc = "The child node.",
127 .type = EC_CONFIG_TYPE_NODE,
130 .type = EC_CONFIG_TYPE_NONE,
134 static int ec_node_once_set_config(struct ec_node *gen_node,
135 const struct ec_config *config)
137 struct ec_node_once *node = (struct ec_node_once *)gen_node;
138 const struct ec_config *child;
140 child = ec_config_dict_get(config, "child");
143 if (ec_config_get_type(child) != EC_CONFIG_TYPE_NODE) {
148 if (node->child != NULL)
149 ec_node_free(node->child);
150 node->child = ec_node_clone(child->node);
158 static struct ec_node_type ec_node_once_type = {
160 .schema = ec_node_once_schema,
161 .set_config = ec_node_once_set_config,
162 .parse = ec_node_once_parse,
163 .complete = ec_node_once_complete,
164 .size = sizeof(struct ec_node_once),
165 .free_priv = ec_node_once_free_priv,
166 .get_children_count = ec_node_once_get_children_count,
167 .get_child = ec_node_once_get_child,
170 EC_NODE_TYPE_REGISTER(ec_node_once_type);
173 ec_node_once_set_child(struct ec_node *gen_node, struct ec_node *child)
175 const struct ec_config *cur_config = NULL;
176 struct ec_config *config = NULL;
179 if (ec_node_check_type(gen_node, &ec_node_once_type) < 0)
182 cur_config = ec_node_get_config(gen_node);
183 if (cur_config == NULL)
184 config = ec_config_dict();
186 config = ec_config_dup(cur_config);
190 if (ec_config_dict_set(config, "child", ec_config_node(child)) < 0) {
191 child = NULL; /* freed */
194 child = NULL; /* freed */
196 ret = ec_node_set_config(gen_node, config);
197 config = NULL; /* freed */
204 ec_config_free(config);
209 struct ec_node *ec_node_once(const char *id, struct ec_node *child)
211 struct ec_node *gen_node = NULL;
216 gen_node = ec_node_from_type(&ec_node_once_type, id);
217 if (gen_node == NULL)
220 ec_node_once_set_child(gen_node, child);
230 /* LCOV_EXCL_START */
231 static int ec_node_once_testcase(void)
233 struct ec_node *node;
236 node = ec_node_many(EC_NO_ID,
238 ec_node_once(EC_NO_ID, ec_node_str(EC_NO_ID, "foo")),
239 ec_node_str(EC_NO_ID, "bar")
243 EC_LOG(EC_LOG_ERR, "cannot create node\n");
246 testres |= EC_TEST_CHECK_PARSE(node, 0);
247 testres |= EC_TEST_CHECK_PARSE(node, 1, "foo");
248 testres |= EC_TEST_CHECK_PARSE(node, 1, "bar");
249 testres |= EC_TEST_CHECK_PARSE(node, 2, "foo", "bar");
250 testres |= EC_TEST_CHECK_PARSE(node, 3, "foo", "bar", "bar");
251 testres |= EC_TEST_CHECK_PARSE(node, 3, "bar", "foo", "bar");
252 testres |= EC_TEST_CHECK_PARSE(node, 2, "bar", "foo", "foo");
253 testres |= EC_TEST_CHECK_PARSE(node, 1, "foo", "foo");
254 testres |= EC_TEST_CHECK_PARSE(node, 0, "foox");
256 testres |= EC_TEST_CHECK_COMPLETE(node,
258 "foo", "bar", EC_NODE_ENDLIST);
259 testres |= EC_TEST_CHECK_COMPLETE(node,
260 "f", EC_NODE_ENDLIST,
261 "foo", EC_NODE_ENDLIST);
262 testres |= EC_TEST_CHECK_COMPLETE(node,
263 "b", EC_NODE_ENDLIST,
264 "bar", EC_NODE_ENDLIST);
265 testres |= EC_TEST_CHECK_COMPLETE(node,
266 "foo", "", EC_NODE_ENDLIST,
267 "bar", EC_NODE_ENDLIST);
268 testres |= EC_TEST_CHECK_COMPLETE(node,
269 "bar", "", EC_NODE_ENDLIST,
270 "foo", "bar", EC_NODE_ENDLIST);
277 static struct ec_test ec_node_once_test = {
279 .test = ec_node_once_testcase,
282 EC_TEST_REGISTER(ec_node_once_test);