1 /*
2 * SysDB - t/unit/frontend/parser_test.c
3 * Copyright (C) 2013 Sebastian 'tokkee' Harl <sh@tokkee.org>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
16 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
17 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
18 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
19 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 */
28 #include "frontend/connection.h"
29 #include "frontend/parser.h"
30 #include "core/store-private.h"
31 #include "core/object.h"
32 #include "libsysdb_test.h"
34 #include <check.h>
36 /*
37 * tests
38 */
40 START_TEST(test_parse)
41 {
42 struct {
43 const char *query;
44 int len;
45 int expected;
46 sdb_conn_state_t expected_cmd;
47 } golden_data[] = {
48 /* empty commands */
49 { NULL, -1, -1, 0 },
50 { "", -1, 0, 0 },
51 { ";", -1, 0, 0 },
52 { ";;", -1, 0, 0 },
54 /* valid commands */
55 { "FETCH 'host'", -1, 1, CONNECTION_FETCH },
56 { "LIST", -1, 1, CONNECTION_LIST },
57 { "LIST -- comment", -1, 1, CONNECTION_LIST },
58 { "LIST;", -1, 1, CONNECTION_LIST },
59 { "LIST; INVALID", 5, 1, CONNECTION_LIST },
61 { "LOOKUP hosts MATCHING "
62 "host = 'host'", -1, 1, CONNECTION_LOOKUP },
63 { "LOOKUP hosts MATCHING NOT "
64 "host = 'host'", -1, 1, CONNECTION_LOOKUP },
65 { "LOOKUP hosts MATCHING "
66 "host =~ 'p' AND "
67 "service =~ 'p'", -1, 1, CONNECTION_LOOKUP },
68 { "LOOKUP hosts MATCHING NOT "
69 "host =~ 'p' AND "
70 "service =~ 'p'", -1, 1, CONNECTION_LOOKUP },
71 { "LOOKUP hosts MATCHING "
72 "host =~ 'p' AND "
73 "service =~ 'p' OR "
74 "service =~ 'r'", -1, 1, CONNECTION_LOOKUP },
75 { "LOOKUP hosts MATCHING NOT "
76 "host =~ 'p' AND "
77 "service =~ 'p' OR "
78 "service =~ 'r'", -1, 1, CONNECTION_LOOKUP },
79 { "LOOKUP hosts MATCHING "
80 "host =~ 'p' "
81 "FILTER :age > 1D", -1, 1, CONNECTION_LOOKUP },
82 { "LOOKUP hosts MATCHING "
83 "host =~ 'p' "
84 "FILTER :age > 1D AND "
85 ":interval < 240s" , -1, 1, CONNECTION_LOOKUP },
86 { "LOOKUP hosts MATCHING "
87 "host =~ 'p' "
88 "FILTER NOT :age>1D", -1, 1, CONNECTION_LOOKUP },
89 { "LOOKUP hosts MATCHING "
90 "host =~ 'p' "
91 "FILTER :age>"
92 ":interval", -1, 1, CONNECTION_LOOKUP },
94 /* numeric constants */
95 { "LOOKUP hosts MATCHING "
96 "attribute.foo = "
97 "1234", -1, 1, CONNECTION_LOOKUP },
98 { "LOOKUP hosts MATCHING "
99 "attribute.foo != "
100 "+234", -1, 1, CONNECTION_LOOKUP },
101 { "LOOKUP hosts MATCHING "
102 "attribute.foo < "
103 "-234", -1, 1, CONNECTION_LOOKUP },
104 { "LOOKUP hosts MATCHING "
105 "attribute.foo > "
106 "12.4", -1, 1, CONNECTION_LOOKUP },
107 { "LOOKUP hosts MATCHING "
108 "attribute.foo <= "
109 "12. + .3", -1, 1, CONNECTION_LOOKUP },
110 { "LOOKUP hosts MATCHING "
111 "attribute.foo >= "
112 ".4", -1, 1, CONNECTION_LOOKUP },
113 { "LOOKUP hosts MATCHING "
114 "attribute.foo = "
115 "+12e3", -1, 1, CONNECTION_LOOKUP },
116 { "LOOKUP hosts MATCHING "
117 "attribute.foo = "
118 "+12e-3", -1, 1, CONNECTION_LOOKUP },
119 { "LOOKUP hosts MATCHING "
120 "attribute.foo = "
121 "-12e+3", -1, 1, CONNECTION_LOOKUP },
123 /* date, time, interval constants */
124 { "LOOKUP hosts MATCHING "
125 "attribute.foo = "
126 "1 Y 42D", -1, 1, CONNECTION_LOOKUP },
127 { "LOOKUP hosts MATCHING "
128 "attribute.foo = "
129 "1s 42D", -1, 1, CONNECTION_LOOKUP },
130 /*
131 * TODO: Something like 1Y42D should work as well but it doesn't since
132 * the scanner will tokenize it into {digit}{identifier} :-/
133 *
134 { "LOOKUP hosts MATCHING "
135 "attribute.foo = "
136 "1Y42D", -1, 1, CONNECTION_LOOKUP },
137 */
139 /* NULL */
140 { "LOOKUP hosts MATCHING "
141 "attribute.foo "
142 "IS NULL", -1, 1, CONNECTION_LOOKUP },
143 { "LOOKUP hosts MATCHING "
144 "attribute.foo "
145 "IS NOT NULL", -1, 1, CONNECTION_LOOKUP },
146 { "LOOKUP hosts MATCHING "
147 "NOT attribute.foo "
148 "IS NULL", -1, 1, CONNECTION_LOOKUP },
149 { "LOOKUP hosts MATCHING "
150 "host IS NULL", -1, -1, 0 },
151 { "LOOKUP hosts MATCHING "
152 "service IS NULL", -1, -1, 0 },
154 /* invalid numeric constants */
155 { "LOOKUP hosts MATCHING "
156 "attribute.foo = "
157 "+-12e+3", -1, -1, 0 },
158 { "LOOKUP hosts MATCHING "
159 "attribute.foo = "
160 "-12e-+3", -1, -1, 0 },
161 { "LOOKUP hosts MATCHING "
162 "attribute.foo = "
163 "e+3", -1, -1, 0 },
164 { "LOOKUP hosts MATCHING "
165 "attribute.foo = "
166 "3e", -1, -1, 0 },
167 /* following SQL standard, we don't support hex numbers */
168 { "LOOKUP hosts MATCHING "
169 "attribute.foo = "
170 "0x12", -1, -1, 0 },
172 /* invalid expressions */
173 { "LOOKUP hosts MATCHING "
174 "attribute.foo = "
175 "1.23 + 'foo'", -1, -1, 0 },
177 /* comments */
178 { "/* some comment */", -1, 0, 0 },
179 { "-- another comment", -1, 0, 0 },
181 /* syntax errors */
182 { "INVALID", -1, -1, 0 },
183 { "FETCH host", -1, -1, 0 },
184 { "LIST; INVALID", 8, -1, 0 },
185 { "/* some incomplete", -1, -1, 0 },
187 { "LOOKUP hosts", -1, -1, 0 },
188 { "LOOKUP foo MATCHING "
189 "host = 'host'", -1, -1, 0 },
190 };
192 size_t i;
193 sdb_llist_t *check;
195 for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
196 sdb_object_t *obj;
197 _Bool ok;
199 check = sdb_fe_parse(golden_data[i].query, golden_data[i].len);
200 if (golden_data[i].expected < 0)
201 ok = check == 0;
202 else
203 ok = sdb_llist_len(check) == (size_t)golden_data[i].expected;
205 fail_unless(ok, "sdb_fe_parse(%s) = %p (len: %zu); expected: %d",
206 golden_data[i].query, check, sdb_llist_len(check),
207 golden_data[i].expected);
209 if (! check)
210 continue;
212 if ((! golden_data[i].expected_cmd)
213 || (golden_data[i].expected <= 0)) {
214 sdb_llist_destroy(check);
215 continue;
216 }
218 obj = sdb_llist_get(check, 0);
219 fail_unless(SDB_CONN_NODE(obj)->cmd == golden_data[i].expected_cmd,
220 "sdb_fe_parse(%s)->cmd = %i; expected: %d",
221 golden_data[i].query, SDB_CONN_NODE(obj)->cmd,
222 golden_data[i].expected_cmd);
223 sdb_object_deref(obj);
224 sdb_llist_destroy(check);
225 }
226 }
227 END_TEST
229 START_TEST(test_parse_matcher)
230 {
231 struct {
232 const char *expr;
233 int len;
234 int expected;
235 } golden_data[] = {
236 /* empty expressions */
237 { NULL, -1, -1 },
238 { "", -1, -1 },
240 /* valid expressions */
241 { "host = 'localhost'", -1, MATCHER_NAME },
242 { "host != 'localhost'", -1, MATCHER_NOT },
243 { "host =~ 'host'", -1, MATCHER_NAME },
244 { "host !~ 'host'", -1, MATCHER_NOT },
245 { "host = 'localhost' -- foo", -1, MATCHER_NAME },
246 { "host = 'host' <garbage>", 13, MATCHER_NAME },
247 /* match hosts by service */
248 { "service = 'name'", -1, MATCHER_NAME },
249 { "service != 'name'", -1, MATCHER_NOT },
250 { "service =~ 'pattern'", -1, MATCHER_NAME },
251 { "service !~ 'pattern'", -1, MATCHER_NOT },
252 /* match hosts by attribute */
253 { "attribute = 'name'", -1, MATCHER_NAME },
254 { "attribute != 'name'", -1, MATCHER_NOT },
255 { "attribute =~ 'pattern'", -1, MATCHER_NAME },
256 { "attribute !~ 'pattern'", -1, MATCHER_NOT },
257 /* composite expressions */
258 { "host =~ 'pattern' AND "
259 "service =~ 'pattern'", -1, MATCHER_AND },
260 { "host =~ 'pattern' OR "
261 "service =~ 'pattern'", -1, MATCHER_OR },
262 { "NOT host = 'host'", -1, MATCHER_NOT },
263 /* numeric expressions */
264 { "attribute.foo < 123", -1, MATCHER_LT },
265 { "attribute.foo <= 123", -1, MATCHER_LE },
266 { "attribute.foo = 123", -1, MATCHER_EQ },
267 { "attribute.foo >= 123", -1, MATCHER_GE },
268 { "attribute.foo > 123", -1, MATCHER_GT },
269 /* NULL; while this is an implementation detail,
270 * IS NULL currently maps to an equality matcher */
271 { "attribute.foo IS NULL", -1, MATCHER_ISNULL },
272 { "attribute.foo IS NOT NULL", -1, MATCHER_NOT },
274 /* object field matchers */
275 { ":last_update < 10s", -1, MATCHER_LT },
276 { ":AGE <= 1m", -1, MATCHER_LE },
277 { ":interval = 10h", -1, MATCHER_EQ },
278 { ":Last_Update >= 24D", -1, MATCHER_GE },
279 { ":age > 1M", -1, MATCHER_GT },
280 { ":age != 20Y", -1, MATCHER_NOT },
281 { ":backend != 'be'", -1, MATCHER_NOT },
282 { ":age <= 2 * :interval", -1, MATCHER_LE },
284 /* check operator precedence */
285 { "host = 'name' OR "
286 "service = 'name' AND "
287 "attribute = 'name' OR "
288 "attribute.foo = 'bar'", -1, MATCHER_OR },
289 { "host = 'name' AND "
290 "service = 'name' AND "
291 "attribute = 'name' OR "
292 "attribute.foo = 'bar'", -1, MATCHER_OR },
293 { "host = 'name' AND "
294 "service = 'name' OR "
295 "attribute = 'name' AND "
296 "attribute.foo = 'bar'", -1, MATCHER_OR },
297 { "(host = 'name' OR "
298 "service = 'name') AND "
299 "(attribute = 'name' OR "
300 "attribute.foo = 'bar')", -1, MATCHER_AND },
301 { "NOT host = 'name' OR "
302 "service = 'name'", -1, MATCHER_OR },
303 { "NOT host = 'name' OR "
304 "NOT service = 'name'", -1, MATCHER_OR },
305 { "NOT (host = 'name' OR "
306 "NOT service = 'name')", -1, MATCHER_NOT },
308 /* syntax errors */
309 { "LIST", -1, -1 },
310 { "foo &^ bar", -1, -1 },
311 };
313 size_t i;
315 for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
316 sdb_store_matcher_t *m;
317 m = sdb_fe_parse_matcher(golden_data[i].expr, golden_data[i].len);
319 if (golden_data[i].expected < 0) {
320 fail_unless(m == NULL,
321 "sdb_fe_parse_matcher(%s) = %p; expected: NULL",
322 golden_data[i].expr, m);
323 continue;
324 }
326 fail_unless(m != NULL, "sdb_fe_parse_matcher(%s) = NULL; "
327 "expected: <matcher>", golden_data[i].expr);
328 fail_unless(M(m)->type == golden_data[i].expected,
329 "sdb_fe_parse_matcher(%s) returned matcher of type %d; "
330 "expected: %d", golden_data[i].expr, M(m)->type,
331 golden_data[i].expected);
333 sdb_object_deref(SDB_OBJ(m));
334 }
335 }
336 END_TEST
338 Suite *
339 fe_parser_suite(void)
340 {
341 Suite *s = suite_create("frontend::parser");
342 TCase *tc;
344 tc = tcase_create("core");
345 tcase_add_test(tc, test_parse);
346 tcase_add_test(tc, test_parse_matcher);
347 suite_add_tcase(s, tc);
349 return s;
350 } /* util_parser_suite */
352 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */