2 * Copyright (c) 2016, Olivier MATZ <zer0@droids-corp.org>
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions are met:
7 * * Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * * Redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution.
12 * * Neither the name of the University of California, Berkeley nor the
13 * names of its contributors may be used to endorse or promote products
14 * derived from this software without specific prior written permission.
16 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND ANY
17 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
18 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
19 * DISCLAIMED. IN NO EVENT SHALL THE REGENTS AND CONTRIBUTORS BE LIABLE FOR ANY
20 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
21 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
23 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
25 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 #include <ecoli_log.h>
35 #include <ecoli_malloc.h>
36 #include <ecoli_test.h>
37 #include <ecoli_strvec.h>
39 #include <ecoli_tk_re.h>
47 static struct ec_parsed_tk *ec_tk_re_parse(const struct ec_tk *gen_tk,
48 const struct ec_strvec *strvec)
50 struct ec_tk_re *tk = (struct ec_tk_re *)gen_tk;
51 struct ec_strvec *match_strvec;
52 struct ec_parsed_tk *parsed_tk = NULL;
56 parsed_tk = ec_parsed_tk_new();
57 if (parsed_tk == NULL)
60 if (ec_strvec_len(strvec) == 0)
63 str = ec_strvec_val(strvec, 0);
64 if (regexec(&tk->re, str, 1, &pos, 0) != 0)
66 if (pos.rm_so != 0 || pos.rm_eo != (int)strlen(str))
69 match_strvec = ec_strvec_ndup(strvec, 0, 1);
70 if (match_strvec == NULL)
73 ec_parsed_tk_set_match(parsed_tk, gen_tk, match_strvec);
78 ec_parsed_tk_free(parsed_tk);
82 static void ec_tk_re_free_priv(struct ec_tk *gen_tk)
84 struct ec_tk_re *tk = (struct ec_tk_re *)gen_tk;
90 static struct ec_tk_type ec_tk_re_type = {
92 .parse = ec_tk_re_parse,
93 .complete = ec_tk_default_complete,
94 .free_priv = ec_tk_re_free_priv,
97 EC_TK_TYPE_REGISTER(ec_tk_re_type);
99 struct ec_tk *ec_tk_re_new(const char *id)
101 struct ec_tk *gen_tk = NULL;
103 gen_tk = ec_tk_new(id, &ec_tk_re_type, sizeof(struct ec_tk_re));
110 int ec_tk_re_set_regexp(struct ec_tk *gen_tk, const char *str)
112 struct ec_tk_re *tk = (struct ec_tk_re *)gen_tk;
117 if (tk->re_str != NULL) // XXX allow to replace
121 tk->re_str = ec_strdup(str);
122 if (tk->re_str == NULL)
126 if (regcomp(&tk->re, tk->re_str, REG_EXTENDED) != 0)
136 struct ec_tk *ec_tk_re(const char *id, const char *re_str)
138 struct ec_tk *gen_tk = NULL;
140 gen_tk = ec_tk_re_new(id);
144 if (ec_tk_re_set_regexp(gen_tk, re_str) < 0)
154 static int ec_tk_re_testcase(void)
159 tk = ec_tk_re(NULL, "fo+|bar");
161 ec_log(EC_LOG_ERR, "cannot create tk\n");
164 ret |= EC_TEST_CHECK_TK_PARSE(tk, 1, "foo");
165 ret |= EC_TEST_CHECK_TK_PARSE(tk, 1, "foo", "bar");
166 ret |= EC_TEST_CHECK_TK_PARSE(tk, 1, "bar");
167 ret |= EC_TEST_CHECK_TK_PARSE(tk, -1, "foobar");
168 ret |= EC_TEST_CHECK_TK_PARSE(tk, -1, " foo");
169 ret |= EC_TEST_CHECK_TK_PARSE(tk, -1, "");
175 static struct ec_test ec_tk_re_test = {
177 .test = ec_tk_re_testcase,
180 EC_TEST_REGISTER(ec_tk_re_test);