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 { "FETCH 'host' FILTER "
57 "host = 'host'", -1, 1, CONNECTION_FETCH },
59 { "LIST hosts", -1, 1, CONNECTION_LIST },
60 { "LIST hosts -- foo", -1, 1, CONNECTION_LIST },
61 { "LIST hosts;", -1, 1, CONNECTION_LIST },
62 { "LIST hosts; INVALID", 11, 1, CONNECTION_LIST },
63 { "LIST hosts FILTER "
64 "host = 'host'", -1, 1, CONNECTION_LIST },
66 { "LOOKUP hosts", -1, 1, CONNECTION_LOOKUP },
67 { "LOOKUP hosts MATCHING "
68 "host = 'host'", -1, 1, CONNECTION_LOOKUP },
69 { "LOOKUP hosts MATCHING NOT "
70 "host = 'host'", -1, 1, CONNECTION_LOOKUP },
71 { "LOOKUP hosts MATCHING "
72 "host =~ 'p' AND "
73 "service =~ 'p'", -1, 1, CONNECTION_LOOKUP },
74 { "LOOKUP hosts MATCHING NOT "
75 "host =~ 'p' AND "
76 "service =~ 'p'", -1, 1, CONNECTION_LOOKUP },
77 { "LOOKUP hosts MATCHING "
78 "host =~ 'p' AND "
79 "service =~ 'p' OR "
80 "service =~ 'r'", -1, 1, CONNECTION_LOOKUP },
81 { "LOOKUP hosts MATCHING NOT "
82 "host =~ 'p' AND "
83 "service =~ 'p' OR "
84 "service =~ 'r'", -1, 1, CONNECTION_LOOKUP },
85 { "LOOKUP hosts MATCHING "
86 "host =~ 'p' "
87 "FILTER :age > 1D", -1, 1, CONNECTION_LOOKUP },
88 { "LOOKUP hosts MATCHING "
89 "host =~ 'p' "
90 "FILTER :age > 1D AND "
91 ":interval < 240s" , -1, 1, CONNECTION_LOOKUP },
92 { "LOOKUP hosts MATCHING "
93 "host =~ 'p' "
94 "FILTER NOT :age>1D", -1, 1, CONNECTION_LOOKUP },
95 { "LOOKUP hosts MATCHING "
96 "host =~ 'p' "
97 "FILTER :age>"
98 ":interval", -1, 1, CONNECTION_LOOKUP },
100 /* numeric constants */
101 { "LOOKUP hosts MATCHING "
102 "attribute.foo = "
103 "1234", -1, 1, CONNECTION_LOOKUP },
104 { "LOOKUP hosts MATCHING "
105 "attribute.foo != "
106 "+234", -1, 1, CONNECTION_LOOKUP },
107 { "LOOKUP hosts MATCHING "
108 "attribute.foo < "
109 "-234", -1, 1, CONNECTION_LOOKUP },
110 { "LOOKUP hosts MATCHING "
111 "attribute.foo > "
112 "12.4", -1, 1, CONNECTION_LOOKUP },
113 { "LOOKUP hosts MATCHING "
114 "attribute.foo <= "
115 "12. + .3", -1, 1, CONNECTION_LOOKUP },
116 { "LOOKUP hosts MATCHING "
117 "attribute.foo >= "
118 ".4", -1, 1, CONNECTION_LOOKUP },
119 { "LOOKUP hosts MATCHING "
120 "attribute.foo = "
121 "+12e3", -1, 1, CONNECTION_LOOKUP },
122 { "LOOKUP hosts MATCHING "
123 "attribute.foo = "
124 "+12e-3", -1, 1, CONNECTION_LOOKUP },
125 { "LOOKUP hosts MATCHING "
126 "attribute.foo = "
127 "-12e+3", -1, 1, CONNECTION_LOOKUP },
129 /* date, time, interval constants */
130 { "LOOKUP hosts MATCHING "
131 "attribute.foo = "
132 "1 Y 42D", -1, 1, CONNECTION_LOOKUP },
133 { "LOOKUP hosts MATCHING "
134 "attribute.foo = "
135 "1s 42D", -1, 1, CONNECTION_LOOKUP },
136 /*
137 * TODO: Something like 1Y42D should work as well but it doesn't since
138 * the scanner will tokenize it into {digit}{identifier} :-/
139 *
140 { "LOOKUP hosts MATCHING "
141 "attribute.foo = "
142 "1Y42D", -1, 1, CONNECTION_LOOKUP },
143 */
145 /* NULL */
146 { "LOOKUP hosts MATCHING "
147 "attribute.foo "
148 "IS NULL", -1, 1, CONNECTION_LOOKUP },
149 { "LOOKUP hosts MATCHING "
150 "attribute.foo "
151 "IS NOT NULL", -1, 1, CONNECTION_LOOKUP },
152 { "LOOKUP hosts MATCHING "
153 "NOT attribute.foo "
154 "IS NULL", -1, 1, CONNECTION_LOOKUP },
155 { "LOOKUP hosts MATCHING "
156 "host IS NULL", -1, -1, 0 },
157 { "LOOKUP hosts MATCHING "
158 "service IS NULL", -1, -1, 0 },
160 /* invalid numeric constants */
161 { "LOOKUP hosts MATCHING "
162 "attribute.foo = "
163 "+-12e+3", -1, -1, 0 },
164 { "LOOKUP hosts MATCHING "
165 "attribute.foo = "
166 "-12e-+3", -1, -1, 0 },
167 { "LOOKUP hosts MATCHING "
168 "attribute.foo = "
169 "e+3", -1, -1, 0 },
170 { "LOOKUP hosts MATCHING "
171 "attribute.foo = "
172 "3e", -1, -1, 0 },
173 /* following SQL standard, we don't support hex numbers */
174 { "LOOKUP hosts MATCHING "
175 "attribute.foo = "
176 "0x12", -1, -1, 0 },
178 /* invalid expressions */
179 { "LOOKUP hosts MATCHING "
180 "attribute.foo = "
181 "1.23 + 'foo'", -1, -1, 0 },
183 /* comments */
184 { "/* some comment */", -1, 0, 0 },
185 { "-- another comment", -1, 0, 0 },
187 /* syntax errors */
188 { "INVALID", -1, -1, 0 },
189 { "FETCH host", -1, -1, 0 },
190 { "LIST; INVALID", 8, -1, 0 },
191 { "/* some incomplete", -1, -1, 0 },
193 { "LIST", -1, -1, 0 },
194 { "LIST MATCHING "
195 "host = 'host'", -1, -1, 0 },
196 { "FETCH 'host' MATCHING "
197 "host = 'host'", -1, -1, 0 },
199 { "LOOKUP foo", -1, -1, 0 },
200 { "LOOKUP foo MATCHING "
201 "host = 'host'", -1, -1, 0 },
202 { "LOOKUP foo FILTER "
203 "host = 'host'", -1, -1, 0 },
204 { "LOOKUP foo MATCHING "
205 "host = 'host' FILTER "
206 "host = 'host'", -1, -1, 0 },
207 };
209 size_t i;
210 sdb_llist_t *check;
212 for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
213 sdb_object_t *obj;
214 _Bool ok;
216 check = sdb_fe_parse(golden_data[i].query, golden_data[i].len);
217 if (golden_data[i].expected < 0)
218 ok = check == 0;
219 else
220 ok = sdb_llist_len(check) == (size_t)golden_data[i].expected;
222 fail_unless(ok, "sdb_fe_parse(%s) = %p (len: %zu); expected: %d",
223 golden_data[i].query, check, sdb_llist_len(check),
224 golden_data[i].expected);
226 if (! check)
227 continue;
229 if ((! golden_data[i].expected_cmd)
230 || (golden_data[i].expected <= 0)) {
231 sdb_llist_destroy(check);
232 continue;
233 }
235 obj = sdb_llist_get(check, 0);
236 fail_unless(SDB_CONN_NODE(obj)->cmd == golden_data[i].expected_cmd,
237 "sdb_fe_parse(%s)->cmd = %i; expected: %d",
238 golden_data[i].query, SDB_CONN_NODE(obj)->cmd,
239 golden_data[i].expected_cmd);
240 sdb_object_deref(obj);
241 sdb_llist_destroy(check);
242 }
243 }
244 END_TEST
246 START_TEST(test_parse_matcher)
247 {
248 struct {
249 const char *expr;
250 int len;
251 int expected;
252 } golden_data[] = {
253 /* empty expressions */
254 { NULL, -1, -1 },
255 { "", -1, -1 },
257 /* valid expressions */
258 { "host = 'localhost'", -1, MATCHER_NAME },
259 { "host != 'localhost'", -1, MATCHER_NOT },
260 { "host =~ 'host'", -1, MATCHER_NAME },
261 { "host !~ 'host'", -1, MATCHER_NOT },
262 { "host = 'localhost' -- foo", -1, MATCHER_NAME },
263 { "host = 'host' <garbage>", 13, MATCHER_NAME },
264 /* match hosts by service */
265 { "service = 'name'", -1, MATCHER_NAME },
266 { "service != 'name'", -1, MATCHER_NOT },
267 { "service =~ 'pattern'", -1, MATCHER_NAME },
268 { "service !~ 'pattern'", -1, MATCHER_NOT },
269 /* match hosts by attribute */
270 { "attribute = 'name'", -1, MATCHER_NAME },
271 { "attribute != 'name'", -1, MATCHER_NOT },
272 { "attribute =~ 'pattern'", -1, MATCHER_NAME },
273 { "attribute !~ 'pattern'", -1, MATCHER_NOT },
274 /* composite expressions */
275 { "host =~ 'pattern' AND "
276 "service =~ 'pattern'", -1, MATCHER_AND },
277 { "host =~ 'pattern' OR "
278 "service =~ 'pattern'", -1, MATCHER_OR },
279 { "NOT host = 'host'", -1, MATCHER_NOT },
280 /* numeric expressions */
281 { "attribute.foo < 123", -1, MATCHER_LT },
282 { "attribute.foo <= 123", -1, MATCHER_LE },
283 { "attribute.foo = 123", -1, MATCHER_EQ },
284 { "attribute.foo >= 123", -1, MATCHER_GE },
285 { "attribute.foo > 123", -1, MATCHER_GT },
286 /* NULL; while this is an implementation detail,
287 * IS NULL currently maps to an equality matcher */
288 { "attribute.foo IS NULL", -1, MATCHER_ISNULL },
289 { "attribute.foo IS NOT NULL", -1, MATCHER_NOT },
291 /* object field matchers */
292 { ":last_update < 10s", -1, MATCHER_LT },
293 { ":AGE <= 1m", -1, MATCHER_LE },
294 { ":interval = 10h", -1, MATCHER_EQ },
295 { ":Last_Update >= 24D", -1, MATCHER_GE },
296 { ":age > 1M", -1, MATCHER_GT },
297 { ":age != 20Y", -1, MATCHER_NOT },
298 { ":backend != 'be'", -1, MATCHER_NOT },
299 { ":age <= 2 * :interval", -1, MATCHER_LE },
301 /* check operator precedence */
302 { "host = 'name' OR "
303 "service = 'name' AND "
304 "attribute = 'name' OR "
305 "attribute.foo = 'bar'", -1, MATCHER_OR },
306 { "host = 'name' AND "
307 "service = 'name' AND "
308 "attribute = 'name' OR "
309 "attribute.foo = 'bar'", -1, MATCHER_OR },
310 { "host = 'name' AND "
311 "service = 'name' OR "
312 "attribute = 'name' AND "
313 "attribute.foo = 'bar'", -1, MATCHER_OR },
314 { "(host = 'name' OR "
315 "service = 'name') AND "
316 "(attribute = 'name' OR "
317 "attribute.foo = 'bar')", -1, MATCHER_AND },
318 { "NOT host = 'name' OR "
319 "service = 'name'", -1, MATCHER_OR },
320 { "NOT host = 'name' OR "
321 "NOT service = 'name'", -1, MATCHER_OR },
322 { "NOT (host = 'name' OR "
323 "NOT service = 'name')", -1, MATCHER_NOT },
325 /* syntax errors */
326 { "LIST", -1, -1 },
327 { "foo &^ bar", -1, -1 },
328 };
330 size_t i;
332 for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
333 sdb_store_matcher_t *m;
334 m = sdb_fe_parse_matcher(golden_data[i].expr, golden_data[i].len);
336 if (golden_data[i].expected < 0) {
337 fail_unless(m == NULL,
338 "sdb_fe_parse_matcher(%s) = %p; expected: NULL",
339 golden_data[i].expr, m);
340 continue;
341 }
343 fail_unless(m != NULL, "sdb_fe_parse_matcher(%s) = NULL; "
344 "expected: <matcher>", golden_data[i].expr);
345 fail_unless(M(m)->type == golden_data[i].expected,
346 "sdb_fe_parse_matcher(%s) returned matcher of type %d; "
347 "expected: %d", golden_data[i].expr, M(m)->type,
348 golden_data[i].expected);
350 sdb_object_deref(SDB_OBJ(m));
351 }
352 }
353 END_TEST
355 Suite *
356 fe_parser_suite(void)
357 {
358 Suite *s = suite_create("frontend::parser");
359 TCase *tc;
361 tc = tcase_create("core");
362 tcase_add_test(tc, test_parse);
363 tcase_add_test(tc, test_parse_matcher);
364 suite_add_tcase(s, tc);
366 return s;
367 } /* util_parser_suite */
369 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */