t/unit/frontend/parser_test.c

   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  */
  27
  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"
  33
  34 #include <check.h>
  35 #include <limits.h>
  36
  37 /*
  38  * tests
  39  */
  40
  41 START_TEST(test_parse)
  42 {
  43         struct {
  44                 const char *query;
  45                 int len;
  46                 int expected;
  47                 sdb_conn_state_t expected_cmd;
  48         } golden_data[] = {
  49                 /* empty commands */
  50                 { NULL,                  -1, -1, 0 },
  51                 { "",                    -1,  0, 0 },
  52                 { ";",                   -1,  0, 0 },
  53                 { ";;",                  -1,  0, 0 },
  54
  55                 /* valid commands */
  56                 { "FETCH host 'host'",   -1,  1, CONNECTION_FETCH  },
  57                 { "FETCH host 'host' FILTER "
  58                   "age > 60s",           -1,  1, CONNECTION_FETCH  },
  59
  60                 { "LIST hosts",          -1,  1, CONNECTION_LIST   },
  61                 { "LIST hosts -- foo",   -1,  1, CONNECTION_LIST   },
  62                 { "LIST hosts;",         -1,  1, CONNECTION_LIST   },
  63                 { "LIST hosts; INVALID", 11,  1, CONNECTION_LIST   },
  64                 { "LIST hosts FILTER "
  65                   "age > 60s",           -1,  1, CONNECTION_LIST   },
  66                 { "LIST services",       -1,  1, CONNECTION_LIST   },
  67                 { "LIST services FILTER "
  68                   "age > 60s",           -1,  1, CONNECTION_LIST   },
  69                 { "LIST metrics",        -1,  1, CONNECTION_LIST   },
  70                 { "LIST metrics FILTER "
  71                   "age > 60s",           -1,  1, CONNECTION_LIST   },
  72
  73                 { "LOOKUP hosts",        -1,  1, CONNECTION_LOOKUP },
  74                 { "LOOKUP hosts MATCHING "
  75                   "host = 'host'",       -1,  1, CONNECTION_LOOKUP },
  76                 { "LOOKUP hosts MATCHING NOT "
  77                   "host = 'host'",       -1,  1, CONNECTION_LOOKUP },
  78                 { "LOOKUP hosts MATCHING "
  79                   "host =~ 'p' AND "
  80                   "ANY service =~ 'p'",  -1,  1, CONNECTION_LOOKUP },
  81                 { "LOOKUP hosts MATCHING NOT "
  82                   "host =~ 'p' AND "
  83                   "ANY service =~ 'p'",  -1,  1, CONNECTION_LOOKUP },
  84                 { "LOOKUP hosts MATCHING "
  85                   "host =~ 'p' AND "
  86                   "ANY service =~ 'p' OR "
  87                   "ANY service =~ 'r'",  -1,  1, CONNECTION_LOOKUP },
  88                 { "LOOKUP hosts MATCHING NOT "
  89                   "host =~ 'p' AND "
  90                   "ANY service =~ 'p' OR "
  91                   "ANY service =~ 'r'",  -1,  1, CONNECTION_LOOKUP },
  92                 { "LOOKUP hosts MATCHING "
  93                   "host =~ 'p' "
  94                   "FILTER age > 1D",    -1,   1, CONNECTION_LOOKUP },
  95                 { "LOOKUP hosts MATCHING "
  96                   "host =~ 'p' "
  97                   "FILTER age > 1D AND "
  98                   "interval < 240s" ,   -1,   1, CONNECTION_LOOKUP },
  99                 { "LOOKUP hosts MATCHING "
 100                   "host =~ 'p' "
 101                   "FILTER NOT age>1D",  -1,   1, CONNECTION_LOOKUP },
 102                 { "LOOKUP hosts MATCHING "
 103                   "host =~ 'p' "
 104                   "FILTER age>"
 105                   "interval",           -1,   1, CONNECTION_LOOKUP },
 106
 107                 { "TIMESERIES 'host'.'metric' "
 108                   "START 2014-01-01 "
 109                   "END 2014-12-31 "
 110                   "23:59:59",            -1,  1, CONNECTION_TIMESERIES },
 111                 { "TIMESERIES 'host'.'metric' "
 112                   "START 2014-02-02 "
 113                   "14:02",               -1,  1, CONNECTION_TIMESERIES },
 114                 { "TIMESERIES 'host'.'metric' "
 115                   "END 2014-02-02",      -1,  1, CONNECTION_TIMESERIES },
 116                 { "TIMESERIES "
 117                   "'host'.'metric'",     -1,  1, CONNECTION_TIMESERIES },
 118
 119                 /* string constants */
 120                 { "LOOKUP hosts MATCHING "
 121                   "host = ''''",         -1,  1, CONNECTION_LOOKUP },
 122                 { "LOOKUP hosts MATCHING "
 123                   "host = '''foo'",      -1,  1, CONNECTION_LOOKUP },
 124                 { "LOOKUP hosts MATCHING "
 125                   "host = 'f''oo'",      -1,  1, CONNECTION_LOOKUP },
 126                 { "LOOKUP hosts MATCHING "
 127                   "host = 'foo'''",      -1,  1, CONNECTION_LOOKUP },
 128                 { "LOOKUP hosts MATCHING "
 129                   "host = '''",          -1, -1, 0 },
 130
 131                 /* numeric constants */
 132                 { "LOOKUP hosts MATCHING "
 133                   "attribute['foo'] = "
 134                   "1234",                -1,  1, CONNECTION_LOOKUP },
 135                 { "LOOKUP hosts MATCHING "
 136                   "attribute['foo'] != "
 137                   "+234",                -1,  1, CONNECTION_LOOKUP },
 138                 { "LOOKUP hosts MATCHING "
 139                   "attribute['foo'] < "
 140                   "-234",                -1,  1, CONNECTION_LOOKUP },
 141                 { "LOOKUP hosts MATCHING "
 142                   "attribute['foo'] > "
 143                   "12.4",                -1,  1, CONNECTION_LOOKUP },
 144                 { "LOOKUP hosts MATCHING "
 145                   "attribute['foo'] <= "
 146                   "12. + .3",            -1,  1, CONNECTION_LOOKUP },
 147                 { "LOOKUP hosts MATCHING "
 148                   "attribute['foo'] <= "
 149                   "'f' || 'oo'",         -1,  1, CONNECTION_LOOKUP },
 150                 { "LOOKUP hosts MATCHING "
 151                   "attribute['foo'] >= "
 152                   ".4",                  -1,  1, CONNECTION_LOOKUP },
 153                 { "LOOKUP hosts MATCHING "
 154                   "attribute['foo'] = "
 155                   "+12e3",               -1,  1, CONNECTION_LOOKUP },
 156                 { "LOOKUP hosts MATCHING "
 157                   "attribute['foo'] = "
 158                   "+12e-3",              -1,  1, CONNECTION_LOOKUP },
 159                 { "LOOKUP hosts MATCHING "
 160                   "attribute['foo'] = "
 161                   "-12e+3",              -1,  1, CONNECTION_LOOKUP },
 162
 163                 /* date, time, interval constants */
 164                 { "LOOKUP hosts MATCHING "
 165                   "attribute['foo'] = "
 166                   "1 Y 42D",             -1,  1, CONNECTION_LOOKUP },
 167                 { "LOOKUP hosts MATCHING "
 168                   "attribute['foo'] = "
 169                   "1s 42D",              -1,  1, CONNECTION_LOOKUP },
 170                 /*
 171                  * TODO: Something like 1Y42D should work as well but it doesn't since
 172                  * the scanner will tokenize it into {digit}{identifier} :-/
 173                  *
 174                 { "LOOKUP hosts MATCHING "
 175                   "attribute['foo'] = "
 176                   "1Y42D",               -1,  1, CONNECTION_LOOKUP },
 177                  */
 178
 179                 /* NULL */
 180                 { "LOOKUP hosts MATCHING "
 181                   "attribute['foo'] "
 182                   "IS NULL",             -1,  1, CONNECTION_LOOKUP },
 183                 { "LOOKUP hosts MATCHING "
 184                   "attribute['foo'] "
 185                   "IS NOT NULL",         -1,  1, CONNECTION_LOOKUP },
 186                 { "LOOKUP hosts MATCHING "
 187                   "NOT attribute['foo'] "
 188                   "IS NULL",             -1,  1, CONNECTION_LOOKUP },
 189                 { "LOOKUP hosts MATCHING "
 190                   "ANY service IS NULL", -1, -1, 0 },
 191
 192                 /* invalid numeric constants */
 193                 { "LOOKUP hosts MATCHING "
 194                   "attribute['foo'] = "
 195                   "+-12e+3",             -1, -1, 0 },
 196                 { "LOOKUP hosts MATCHING "
 197                   "attribute['foo'] = "
 198                   "-12e-+3",             -1, -1, 0 },
 199                 { "LOOKUP hosts MATCHING "
 200                   "attribute['foo'] = "
 201                   "e+3",                 -1, -1, 0 },
 202                 { "LOOKUP hosts MATCHING "
 203                   "attribute['foo'] = "
 204                   "3e",                  -1, -1, 0 },
 205                 /* following SQL standard, we don't support hex numbers */
 206                 { "LOOKUP hosts MATCHING "
 207                   "attribute['foo'] = "
 208                   "0x12",                -1, -1, 0 },
 209
 210                 /* invalid expressions */
 211                 { "LOOKUP hosts MATCHING "
 212                   "attribute['foo'] = "
 213                   "1.23 + 'foo'",        -1, -1, 0 },
 214                 { "LOOKUP hosts MATCHING "
 215                   "attr['foo'] = 1.23",  -1, -1, 0 },
 216                 { "LOOKUP hosts MATCHING "
 217                   "attr['foo'] IS NULL", -1, -1, 0 },
 218
 219                 /* comments */
 220                 { "/* some comment */",  -1,  0, 0 },
 221                 { "-- another comment",  -1,  0, 0 },
 222
 223                 /* syntax errors */
 224                 { "INVALID",             -1, -1, 0 },
 225                 { "FETCH host",          -1, -1, 0 },
 226                 { "FETCH 'host'",        -1, -1, 0 },
 227                 { "LIST hosts; INVALID", -1, -1, 0 },
 228                 { "/* some incomplete",  -1, -1, 0 },
 229
 230                 /* invalid commands */
 231                 { "LIST",                -1, -1, 0 },
 232                 { "LIST foo",            -1, -1, 0 },
 233                 { "LIST hosts MATCHING "
 234                   "host = 'host'",       -1, -1, 0 },
 235                 { "LIST foo FILTER "
 236                   "age > 60s",           -1, -1, 0 },
 237                 { "FETCH host 'host' MATCHING "
 238                   "host = 'host'",       -1, -1, 0 },
 239                 { "FETCH foo 'host'",    -1, -1, 0 },
 240                 { "FETCH foo 'host' FILTER "
 241                   "age > 60s",           -1, -1, 0 },
 242
 243                 { "LOOKUP foo",          -1, -1, 0 },
 244                 { "LOOKUP foo MATCHING "
 245                   "host = 'host'",       -1, -1, 0 },
 246                 { "LOOKUP foo FILTER "
 247                   "age > 60s",           -1, -1, 0 },
 248                 { "LOOKUP foo MATCHING "
 249                   "host = 'host' FILTER "
 250                   "age > 60s",           -1, -1, 0 },
 251                 { "LOOKUP hosts MATCHING "
 252                   "attribute['foo'] <= "
 253                   "f || 'oo'",           -1, -1, 0 },
 254                 { "LOOKUP hosts MATCHING "
 255                   "attribute['foo'] <= "
 256                   "'f' || oo",           -1, -1, 0 },
 257         };
 258
 259         size_t i;
 260         sdb_llist_t *check;
 261
 262         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 263                 sdb_object_t *obj;
 264                 _Bool ok;
 265
 266                 check = sdb_fe_parse(golden_data[i].query, golden_data[i].len);
 267                 if (golden_data[i].expected < 0)
 268                         ok = check == 0;
 269                 else
 270                         ok = sdb_llist_len(check) == (size_t)golden_data[i].expected;
 271
 272                 fail_unless(ok, "sdb_fe_parse(%s) = %p (len: %zu); expected: %d",
 273                                 golden_data[i].query, check, sdb_llist_len(check),
 274                                 golden_data[i].expected);
 275
 276                 if (! check)
 277                         continue;
 278
 279                 if ((! golden_data[i].expected_cmd)
 280                                 || (golden_data[i].expected <= 0)) {
 281                         sdb_llist_destroy(check);
 282                         continue;
 283                 }
 284
 285                 obj = sdb_llist_get(check, 0);
 286                 fail_unless(SDB_CONN_NODE(obj)->cmd == golden_data[i].expected_cmd,
 287                                 "sdb_fe_parse(%s)->cmd = %i; expected: %d",
 288                                 golden_data[i].query, SDB_CONN_NODE(obj)->cmd,
 289                                 golden_data[i].expected_cmd);
 290                 sdb_object_deref(obj);
 291                 sdb_llist_destroy(check);
 292         }
 293 }
 294 END_TEST
 295
 296 START_TEST(test_parse_matcher)
 297 {
 298         struct {
 299                 const char *expr;
 300                 int len;
 301                 int expected;
 302         } golden_data[] = {
 303                 /* empty expressions */
 304                 { NULL,                           -1, -1 },
 305                 { "",                             -1, -1 },
 306
 307                 /* match hosts by name */
 308                 { "host < 'localhost'",           -1,  MATCHER_LT },
 309                 { "host <= 'localhost'",          -1,  MATCHER_LE },
 310                 { "host = 'localhost'",           -1,  MATCHER_EQ },
 311                 { "host != 'localhost'",          -1,  MATCHER_NE },
 312                 { "host >= 'localhost'",          -1,  MATCHER_GE },
 313                 { "host > 'localhost'",           -1,  MATCHER_GT },
 314                 { "host =~ 'host'",               -1,  MATCHER_REGEX },
 315                 { "host !~ 'host'",               -1,  MATCHER_NREGEX },
 316                 { "host = 'localhost' -- foo",    -1,  MATCHER_EQ },
 317                 { "host = 'host' <garbage>",      13,  MATCHER_EQ },
 318                 { "host &^ 'localhost'",          -1,  -1 },
 319                 /* match hosts by service */
 320                 { "ANY service < 'name'",         -1,  MATCHER_ANY },
 321                 { "ANY service <= 'name'",        -1,  MATCHER_ANY },
 322                 { "ANY service = 'name'",         -1,  MATCHER_ANY },
 323                 { "ANY service != 'name'",        -1,  MATCHER_ANY },
 324                 { "ANY service >= 'name'",        -1,  MATCHER_ANY },
 325                 { "ANY service > 'name'",         -1,  MATCHER_ANY },
 326                 { "ANY service =~ 'pattern'",     -1,  MATCHER_ANY },
 327                 { "ANY service !~ 'pattern'",     -1,  MATCHER_ANY },
 328                 { "ANY service &^ 'name'",        -1,  -1 },
 329                 /* match hosts by metric */
 330                 { "ANY metric < 'name'",          -1,  MATCHER_ANY },
 331                 { "ANY metric <= 'name'",         -1,  MATCHER_ANY },
 332                 { "ANY metric = 'name'",          -1,  MATCHER_ANY },
 333                 { "ANY metric != 'name'",         -1,  MATCHER_ANY },
 334                 { "ANY metric >= 'name'",         -1,  MATCHER_ANY },
 335                 { "ANY metric > 'name'",          -1,  MATCHER_ANY },
 336                 { "ANY metric =~ 'pattern'",      -1,  MATCHER_ANY },
 337                 { "ANY metric !~ 'pattern'",      -1,  MATCHER_ANY },
 338                 /* match hosts by attribute */
 339                 { "ANY attribute < 'name'",       -1,  MATCHER_ANY },
 340                 { "ANY attribute <= 'name'",      -1,  MATCHER_ANY },
 341                 { "ANY attribute = 'name'",       -1,  MATCHER_ANY },
 342                 { "ANY attribute != 'name'",      -1,  MATCHER_ANY },
 343                 { "ANY attribute >= 'name'",      -1,  MATCHER_ANY },
 344                 { "ANY attribute > 'name'",       -1,  MATCHER_ANY },
 345                 { "ANY attribute =~ 'pattern'",   -1,  MATCHER_ANY },
 346                 { "ANY attribute !~ 'pattern'",   -1,  MATCHER_ANY },
 347                 { "ANY attribute &^ 'pattern'",   -1,  -1 },
 348                 /* composite expressions */
 349                 { "host =~ 'pattern' AND "
 350                   "ANY service =~ 'pattern'",     -1,  MATCHER_AND },
 351                 { "host =~ 'pattern' OR "
 352                   "ANY service =~ 'pattern'",     -1,  MATCHER_OR },
 353                 { "NOT host = 'host'",            -1,  MATCHER_NOT },
 354                 /* numeric expressions */
 355                 { "attribute['foo'] < 123",       -1,  MATCHER_LT },
 356                 { "attribute['foo'] <= 123",      -1,  MATCHER_LE },
 357                 { "attribute['foo'] = 123",       -1,  MATCHER_EQ },
 358                 { "attribute['foo'] >= 123",      -1,  MATCHER_GE },
 359                 { "attribute['foo'] > 123",       -1,  MATCHER_GT },
 360                 /* datetime expressions */
 361                 { "attribute['foo'] = "
 362                   "2014-08-16",                   -1,  MATCHER_EQ },
 363                 { "attribute['foo'] = "
 364                   "17:23",                        -1,  MATCHER_EQ },
 365                 { "attribute['foo'] = "
 366                   "17:23:53",                     -1,  MATCHER_EQ },
 367                 { "attribute['foo'] = "
 368                   "17:23:53.123",                 -1,  MATCHER_EQ },
 369                 { "attribute['foo'] = "
 370                   "17:23:53.123456789",           -1,  MATCHER_EQ },
 371                 { "attribute['foo'] = "
 372                   "2014-08-16 17:23",             -1,  MATCHER_EQ },
 373                 { "attribute['foo'] = "
 374                   "2014-08-16 17:23:53",          -1,  MATCHER_EQ },
 375                 /* NULL; while this is an implementation detail,
 376                  * IS NULL currently maps to an equality matcher */
 377                 { "attribute['foo'] IS NULL",     -1,  MATCHER_ISNULL },
 378                 { "attribute['foo'] IS NOT NULL", -1,  MATCHER_ISNNULL },
 379
 380                 /* object field matchers */
 381                 { "name < 'a'",                   -1,  MATCHER_LT },
 382                 { "name <= 'a'",                  -1,  MATCHER_LE },
 383                 { "name = 'a'",                   -1,  MATCHER_EQ },
 384                 { "name != 'a'",                  -1,  MATCHER_NE },
 385                 { "name >= 'a'",                  -1,  MATCHER_GE },
 386                 { "name > 'a'",                   -1,  MATCHER_GT },
 387                 { "last_update < 2014-10-01",     -1,  MATCHER_LT },
 388                 { "last_update <= 2014-10-01",    -1,  MATCHER_LE },
 389                 { "last_update = 2014-10-01",     -1,  MATCHER_EQ },
 390                 { "last_update != 2014-10-01",    -1,  MATCHER_NE },
 391                 { "last_update >= 2014-10-01",    -1,  MATCHER_GE },
 392                 { "last_update > 2014-10-01",     -1,  MATCHER_GT },
 393                 { "Last_Update >= 24D",           -1,  MATCHER_GE },
 394                 { "age < 20s",                    -1,  MATCHER_LT },
 395                 { "age <= 20s",                   -1,  MATCHER_LE },
 396                 { "age = 20s",                    -1,  MATCHER_EQ },
 397                 { "age != 20s",                   -1,  MATCHER_NE },
 398                 { "age >= 20s",                   -1,  MATCHER_GE },
 399                 { "age > 20s",                    -1,  MATCHER_GT },
 400                 { "AGE <= 1m",                    -1,  MATCHER_LE },
 401                 { "age > 1M",                     -1,  MATCHER_GT },
 402                 { "age != 20Y",                   -1,  MATCHER_NE },
 403                 { "age <= 2 * interval",          -1,  MATCHER_LE },
 404                 { "interval < 20s",               -1,  MATCHER_LT },
 405                 { "interval <= 20s",              -1,  MATCHER_LE },
 406                 { "interval = 20s",               -1,  MATCHER_EQ },
 407                 { "interval != 20s",              -1,  MATCHER_NE },
 408                 { "interval >= 20s",              -1,  MATCHER_GE },
 409                 { "interval > 20s",               -1,  MATCHER_GT },
 410                 { "'be' IN backend",              -1,  MATCHER_IN },
 411
 412                 /* check operator precedence */
 413                 { "host = 'name' OR "
 414                   "ANY service = 'name' AND "
 415                   "ANY attribute = 'name' OR "
 416                   "attribute['foo'] = 'bar'",     -1,  MATCHER_OR },
 417                 { "host = 'name' AND "
 418                   "ANY service = 'name' AND "
 419                   "ANY attribute = 'name' OR "
 420                   "attribute['foo'] = 'bar'",     -1,  MATCHER_OR },
 421                 { "host = 'name' AND "
 422                   "ANY service = 'name' OR "
 423                   "ANY attribute = 'name' AND "
 424                   "attribute['foo'] = 'bar'",     -1,  MATCHER_OR },
 425                 { "(host = 'name' OR "
 426                   "ANY service = 'name') AND "
 427                   "(ANY attribute = 'name' OR "
 428                   "attribute['foo'] = 'bar')",    -1,  MATCHER_AND },
 429                 { "NOT host = 'name' OR "
 430                   "ANY service = 'name'",         -1,  MATCHER_OR },
 431                 { "NOT host = 'name' OR "
 432                   "NOT ANY service = 'name'",     -1,  MATCHER_OR },
 433                 { "NOT (host = 'name' OR "
 434                   "NOT ANY service = 'name')",    -1,  MATCHER_NOT },
 435
 436                 /* syntax errors */
 437                 { "LIST",                         -1, -1 },
 438                 { "foo &^ bar",                   -1, -1 },
 439                 { "invalid",                      -1, -1 },
 440         };
 441
 442         size_t i;
 443
 444         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 445                 sdb_store_matcher_t *m;
 446                 m = sdb_fe_parse_matcher(golden_data[i].expr, golden_data[i].len);
 447
 448                 if (golden_data[i].expected < 0) {
 449                         fail_unless(m == NULL,
 450                                         "sdb_fe_parse_matcher(%s) = %p; expected: NULL",
 451                                         golden_data[i].expr, m);
 452                         continue;
 453                 }
 454
 455                 fail_unless(m != NULL, "sdb_fe_parse_matcher(%s) = NULL; "
 456                                 "expected: <matcher>", golden_data[i].expr);
 457                 fail_unless(M(m)->type == golden_data[i].expected,
 458                                 "sdb_fe_parse_matcher(%s) returned matcher of type %d; "
 459                                 "expected: %d", golden_data[i].expr, M(m)->type,
 460                                 golden_data[i].expected);
 461
 462                 sdb_object_deref(SDB_OBJ(m));
 463         }
 464 }
 465 END_TEST
 466
 467 START_TEST(test_parse_expr)
 468 {
 469         struct {
 470                 const char *expr;
 471                 int len;
 472                 int expected;
 473         } golden_data[] = {
 474                 /* empty expressions */
 475                 { NULL,                   -1, INT_MAX },
 476                 { "",                     -1, INT_MAX },
 477
 478                 /* constant expressions */
 479                 { "'localhost'",          -1, 0 },
 480                 { "123",                  -1, 0 },
 481                 { "2014-08-16",           -1, 0 },
 482                 { "17:23",                -1, 0 },
 483                 { "17:23:53",             -1, 0 },
 484                 { "17:23:53.123",         -1, 0 },
 485                 { "17:23:53.123456789",   -1, 0 },
 486                 { "2014-08-16 17:23",     -1, 0 },
 487                 { "2014-08-16 17:23:53",  -1, 0 },
 488                 { "10s",                  -1, 0 },
 489                 { "60m",                  -1, 0 },
 490                 { "10Y 24D 1h",           -1, 0 },
 491
 492                 { "123 + 456",            -1, 0 },
 493                 { "'foo' || 'bar'",       -1, 0 },
 494                 { "456 - 123",            -1, 0 },
 495                 { "1.2 * 3.4",            -1, 0 },
 496                 { "1.2 / 3.4",            -1, 0 },
 497                 { "5 % 2",                -1, 0 },
 498
 499                 /* queryable fields */
 500                 { "last_update",          -1, FIELD_VALUE },
 501                 { "AGE",                  -1, FIELD_VALUE },
 502                 { "interval",             -1, FIELD_VALUE },
 503                 { "Last_Update",          -1, FIELD_VALUE },
 504                 { "backend",              -1, FIELD_VALUE },
 505
 506                 /* attributes */
 507                 { "attribute['foo']",     -1, ATTR_VALUE },
 508
 509                 /* arithmetic expressions */
 510                 { "age + age",            -1, SDB_DATA_ADD },
 511                 { "age - age",            -1, SDB_DATA_SUB },
 512                 { "age * age",            -1, SDB_DATA_MUL },
 513                 { "age / age",            -1, SDB_DATA_DIV },
 514                 { "age % age",            -1, SDB_DATA_MOD },
 515                 { "age || age",           -1, SDB_DATA_CONCAT },
 516
 517                 /* operator precedence */
 518                 { "age + age * age",      -1, SDB_DATA_ADD },
 519                 { "age * age + age",      -1, SDB_DATA_ADD },
 520                 { "age + age - age",      -1, SDB_DATA_SUB },
 521                 { "age - age + age",      -1, SDB_DATA_ADD },
 522                 { "(age + age) * age",    -1, SDB_DATA_MUL },
 523                 { "age + (age * age)",    -1, SDB_DATA_ADD },
 524
 525                 /* syntax errors */
 526                 { "LIST",                 -1, INT_MAX },
 527                 { "foo &^ bar",           -1, INT_MAX },
 528                 { "invalid",              -1, INT_MAX },
 529         };
 530
 531         size_t i;
 532
 533         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 534                 sdb_store_expr_t *e;
 535                 e = sdb_fe_parse_expr(golden_data[i].expr, golden_data[i].len);
 536
 537                 if (golden_data[i].expected == INT_MAX) {
 538                         fail_unless(e == NULL,
 539                                         "sdb_fe_parse_expr(%s) = %p; expected: NULL",
 540                                         golden_data[i].expr, e);
 541                         continue;
 542                 }
 543
 544                 fail_unless(e != NULL, "sdb_fe_parse_expr(%s) = NULL; "
 545                                 "expected: <expr>", golden_data[i].expr);
 546                 fail_unless(e->type == golden_data[i].expected,
 547                                 "sdb_fe_parse_expr(%s) returned expression of type %d; "
 548                                 "expected: %d", golden_data[i].expr, e->type,
 549                                 golden_data[i].expected);
 550
 551                 sdb_object_deref(SDB_OBJ(e));
 552         }
 553 }
 554 END_TEST
 555
 556 Suite *
 557 fe_parser_suite(void)
 558 {
 559         Suite *s = suite_create("frontend::parser");
 560         TCase *tc;
 561
 562         tc = tcase_create("core");
 563         tcase_add_test(tc, test_parse);
 564         tcase_add_test(tc, test_parse_matcher);
 565         tcase_add_test(tc, test_parse_expr);
 566         suite_add_tcase(s, tc);
 567
 568         return s;
 569 } /* util_parser_suite */
 570
 571 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 572