t/unit/frontend/parser_test.c

   1 /*
   2  * SysDB - t/unit/frontend/parser_test.c
   3  * Copyright (C) 2013-2015 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                 /* FETCH commands */
  56                 { "FETCH host 'host'",   -1,  1, SDB_CONNECTION_FETCH  },
  57                 { "FETCH host 'host' FILTER "
  58                   "age > 60s",           -1,  1, SDB_CONNECTION_FETCH  },
  59                 { "FETCH service "
  60                   "'host'.'service'",    -1,  1, SDB_CONNECTION_FETCH  },
  61                 { "FETCH metric "
  62                   "'host'.'metric'",     -1,  1, SDB_CONNECTION_FETCH  },
  63
  64                 /* LIST commands */
  65                 { "LIST hosts",          -1,  1, SDB_CONNECTION_LIST   },
  66                 { "LIST hosts -- foo",   -1,  1, SDB_CONNECTION_LIST   },
  67                 { "LIST hosts;",         -1,  1, SDB_CONNECTION_LIST   },
  68                 { "LIST hosts; INVALID", 11,  1, SDB_CONNECTION_LIST   },
  69                 { "LIST hosts FILTER "
  70                   "age > 60s",           -1,  1, SDB_CONNECTION_LIST   },
  71                 { "LIST services",       -1,  1, SDB_CONNECTION_LIST   },
  72                 { "LIST services FILTER "
  73                   "age > 60s",           -1,  1, SDB_CONNECTION_LIST   },
  74                 { "LIST metrics",        -1,  1, SDB_CONNECTION_LIST   },
  75                 { "LIST metrics FILTER "
  76                   "age > 60s",           -1,  1, SDB_CONNECTION_LIST   },
  77
  78                 /* LOOKUP commands */
  79                 { "LOOKUP hosts",        -1,  1, SDB_CONNECTION_LOOKUP },
  80                 { "LOOKUP hosts MATCHING "
  81                   "name = 'host'",       -1,  1, SDB_CONNECTION_LOOKUP },
  82                 { "LOOKUP hosts MATCHING NOT "
  83                   "name = 'host'",       -1,  1, SDB_CONNECTION_LOOKUP },
  84                 { "LOOKUP hosts MATCHING "
  85                   "name =~ 'p' AND "
  86                   "ANY service =~ 'p'",  -1,  1, SDB_CONNECTION_LOOKUP },
  87                 { "LOOKUP hosts MATCHING NOT "
  88                   "name =~ 'p' AND "
  89                   "ANY service =~ 'p'",  -1,  1, SDB_CONNECTION_LOOKUP },
  90                 { "LOOKUP hosts MATCHING "
  91                   "name =~ 'p' AND "
  92                   "ANY service =~ 'p' OR "
  93                   "ANY service =~ 'r'",  -1,  1, SDB_CONNECTION_LOOKUP },
  94                 { "LOOKUP hosts MATCHING NOT "
  95                   "name =~ 'p' AND "
  96                   "ANY service =~ 'p' OR "
  97                   "ANY service =~ 'r'",  -1,  1, SDB_CONNECTION_LOOKUP },
  98                 { "LOOKUP hosts MATCHING "
  99                   "name =~ 'p' "
 100                   "FILTER age > 1D",    -1,   1, SDB_CONNECTION_LOOKUP },
 101                 { "LOOKUP hosts MATCHING "
 102                   "name =~ 'p' "
 103                   "FILTER age > 1D AND "
 104                   "interval < 240s" ,   -1,   1, SDB_CONNECTION_LOOKUP },
 105                 { "LOOKUP hosts MATCHING "
 106                   "name =~ 'p' "
 107                   "FILTER NOT age>1D",  -1,   1, SDB_CONNECTION_LOOKUP },
 108                 { "LOOKUP hosts MATCHING "
 109                   "name =~ 'p' "
 110                   "FILTER age>"
 111                   "interval",           -1,   1, SDB_CONNECTION_LOOKUP },
 112                 { "LOOKUP hosts MATCHING "
 113                   "host.name =~ 'p'",   -1,   1, SDB_CONNECTION_LOOKUP },
 114                 { "LOOKUP services",    -1,   1, SDB_CONNECTION_LOOKUP },
 115                 { "LOOKUP services MATCHING ANY "
 116                   "attribute =~ 'a'",   -1,   1, SDB_CONNECTION_LOOKUP },
 117                 { "LOOKUP services MATCHING "
 118                   "host.name = 'p'",    -1,   1, SDB_CONNECTION_LOOKUP },
 119                 { "LOOKUP services MATCHING "
 120                   "service.name = 'p'", -1,   1, SDB_CONNECTION_LOOKUP },
 121                 { "LOOKUP metrics",     -1,   1, SDB_CONNECTION_LOOKUP },
 122                 { "LOOKUP metrics MATCHING ANY "
 123                   "attribute =~ 'a'",   -1,   1, SDB_CONNECTION_LOOKUP },
 124                 { "LOOKUP metrics MATCHING "
 125                   "host.name = 'p'",    -1,   1, SDB_CONNECTION_LOOKUP },
 126                 { "LOOKUP metrics MATCHING "
 127                   "metric.name = 'p'",  -1,   1, SDB_CONNECTION_LOOKUP },
 128
 129                 /* TIMESERIES commands */
 130                 { "TIMESERIES 'host'.'metric' "
 131                   "START 2014-01-01 "
 132                   "END 2014-12-31 "
 133                   "23:59:59",            -1,  1, SDB_CONNECTION_TIMESERIES },
 134                 { "TIMESERIES 'host'.'metric' "
 135                   "START 2014-02-02 "
 136                   "14:02",               -1,  1, SDB_CONNECTION_TIMESERIES },
 137                 { "TIMESERIES 'host'.'metric' "
 138                   "END 2014-02-02",      -1,  1, SDB_CONNECTION_TIMESERIES },
 139                 { "TIMESERIES "
 140                   "'host'.'metric'",     -1,  1, SDB_CONNECTION_TIMESERIES },
 141
 142                 /* STORE commands */
 143                 { "STORE host 'host'",   -1,  1, SDB_CONNECTION_STORE_HOST },
 144                 { "STORE host 'host' "
 145                   "LAST UPDATE "
 146                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_HOST },
 147                 { "STORE host attribute "
 148                   "'host'.'key' 123",    -1,  1, SDB_CONNECTION_STORE_ATTRIBUTE },
 149                 { "STORE host attribute "
 150                   "'host'.'key' 123 "
 151                   "LAST UPDATE "
 152                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_ATTRIBUTE },
 153                 { "STORE service "
 154                   "'host'.'svc'",        -1,  1, SDB_CONNECTION_STORE_SERVICE },
 155                 { "STORE service "
 156                   "'host'.'svc' "
 157                   "LAST UPDATE "
 158                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_SERVICE },
 159                 { "STORE service attribute "
 160                   "'host'.'svc'.'key' "
 161                   "123",                 -1,  1, SDB_CONNECTION_STORE_ATTRIBUTE },
 162                 { "STORE service attribute "
 163                   "'host'.'svc'.'key' "
 164                   "123 "
 165                   "LAST UPDATE "
 166                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_ATTRIBUTE },
 167                 { "STORE metric "
 168                   "'host'.'metric'",     -1,  1, SDB_CONNECTION_STORE_METRIC },
 169                 { "STORE metric "
 170                   "'host'.'metric' "
 171                   "LAST UPDATE "
 172                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_METRIC },
 173                 { "STORE metric "
 174                   "'host'.'metric' "
 175                   "STORE 'typ' 'id' "
 176                   "LAST UPDATE "
 177                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_METRIC },
 178                 { "STORE metric attribute "
 179                   "'host'.'metric'.'key' "
 180                   "123",                 -1,  1, SDB_CONNECTION_STORE_ATTRIBUTE },
 181                 { "STORE metric attribute "
 182                   "'host'.'metric'.'key' "
 183                   "123 "
 184                   "LAST UPDATE "
 185                   "2015-02-01",          -1,  1, SDB_CONNECTION_STORE_ATTRIBUTE },
 186
 187                 /* string constants */
 188                 { "LOOKUP hosts MATCHING "
 189                   "name = ''''",         -1,  1, SDB_CONNECTION_LOOKUP },
 190                 { "LOOKUP hosts MATCHING "
 191                   "name = '''foo'",      -1,  1, SDB_CONNECTION_LOOKUP },
 192                 { "LOOKUP hosts MATCHING "
 193                   "name = 'f''oo'",      -1,  1, SDB_CONNECTION_LOOKUP },
 194                 { "LOOKUP hosts MATCHING "
 195                   "name = 'foo'''",      -1,  1, SDB_CONNECTION_LOOKUP },
 196                 { "LOOKUP hosts MATCHING "
 197                   "name = '''",          -1, -1, 0 },
 198
 199                 /* numeric constants */
 200                 { "LOOKUP hosts MATCHING "
 201                   "attribute['foo'] = "
 202                   "1234",                -1,  1, SDB_CONNECTION_LOOKUP },
 203                 { "LOOKUP hosts MATCHING "
 204                   "attribute['foo'] != "
 205                   "+234",                -1,  1, SDB_CONNECTION_LOOKUP },
 206                 { "LOOKUP hosts MATCHING "
 207                   "attribute['foo'] < "
 208                   "-234",                -1,  1, SDB_CONNECTION_LOOKUP },
 209                 { "LOOKUP hosts MATCHING "
 210                   "attribute['foo'] > "
 211                   "12.4",                -1,  1, SDB_CONNECTION_LOOKUP },
 212                 { "LOOKUP hosts MATCHING "
 213                   "attribute['foo'] <= "
 214                   "12. + .3",            -1,  1, SDB_CONNECTION_LOOKUP },
 215                 { "LOOKUP hosts MATCHING "
 216                   "attribute['foo'] <= "
 217                   "'f' || 'oo'",         -1,  1, SDB_CONNECTION_LOOKUP },
 218                 { "LOOKUP hosts MATCHING "
 219                   "attribute['foo'] >= "
 220                   ".4",                  -1,  1, SDB_CONNECTION_LOOKUP },
 221                 { "LOOKUP hosts MATCHING "
 222                   "attribute['foo'] = "
 223                   "+12e3",               -1,  1, SDB_CONNECTION_LOOKUP },
 224                 { "LOOKUP hosts MATCHING "
 225                   "attribute['foo'] = "
 226                   "+12e-3",              -1,  1, SDB_CONNECTION_LOOKUP },
 227                 { "LOOKUP hosts MATCHING "
 228                   "attribute['foo'] = "
 229                   "-12e+3",              -1,  1, SDB_CONNECTION_LOOKUP },
 230
 231                 /* date, time, interval constants */
 232                 { "LOOKUP hosts MATCHING "
 233                   "attribute['foo'] = "
 234                   "1 Y 42D",             -1,  1, SDB_CONNECTION_LOOKUP },
 235                 { "LOOKUP hosts MATCHING "
 236                   "attribute['foo'] = "
 237                   "1s 42D",              -1,  1, SDB_CONNECTION_LOOKUP },
 238                 /*
 239                  * TODO: Something like 1Y42D should work as well but it doesn't since
 240                  * the scanner will tokenize it into {digit}{identifier} :-/
 241                  *
 242                 { "LOOKUP hosts MATCHING "
 243                   "attribute['foo'] = "
 244                   "1Y42D",               -1,  1, SDB_CONNECTION_LOOKUP },
 245                  */
 246
 247                 /* array constants */
 248                 { "LOOKUP hosts MATCHING "
 249                   "backend = ['foo']",   -1,  1, SDB_CONNECTION_LOOKUP },
 250                 { "LOOKUP hosts MATCHING "
 251                   "backend = ['a','b']", -1,  1, SDB_CONNECTION_LOOKUP },
 252
 253                 /* NULL */
 254                 { "LOOKUP hosts MATCHING "
 255                   "attribute['foo'] "
 256                   "IS NULL",             -1,  1, SDB_CONNECTION_LOOKUP },
 257                 { "LOOKUP hosts MATCHING "
 258                   "attribute['foo'] "
 259                   "IS NOT NULL",         -1,  1, SDB_CONNECTION_LOOKUP },
 260                 { "LOOKUP hosts MATCHING "
 261                   "NOT attribute['foo'] "
 262                   "IS NULL",             -1,  1, SDB_CONNECTION_LOOKUP },
 263                 { "LOOKUP hosts MATCHING "
 264                   "ANY service IS NULL", -1, -1, 0 },
 265
 266                 /* invalid numeric constants */
 267                 { "LOOKUP hosts MATCHING "
 268                   "attribute['foo'] = "
 269                   "+-12e+3",             -1, -1, 0 },
 270                 { "LOOKUP hosts MATCHING "
 271                   "attribute['foo'] = "
 272                   "-12e-+3",             -1, -1, 0 },
 273                 { "LOOKUP hosts MATCHING "
 274                   "attribute['foo'] = "
 275                   "e+3",                 -1, -1, 0 },
 276                 { "LOOKUP hosts MATCHING "
 277                   "attribute['foo'] = "
 278                   "3e",                  -1, -1, 0 },
 279                 /* following SQL standard, we don't support hex numbers */
 280                 { "LOOKUP hosts MATCHING "
 281                   "attribute['foo'] = "
 282                   "0x12",                -1, -1, 0 },
 283
 284                 /* invalid expressions */
 285                 { "LOOKUP hosts MATCHING "
 286                   "attribute['foo'] = "
 287                   "1.23 + 'foo'",        -1, -1, 0 },
 288                 { "LOOKUP hosts MATCHING "
 289                   "attr['foo'] = 1.23",  -1, -1, 0 },
 290                 { "LOOKUP hosts MATCHING "
 291                   "attr['foo'] IS NULL", -1, -1, 0 },
 292
 293                 /* comments */
 294                 { "/* some comment */",  -1,  0, 0 },
 295                 { "-- another comment",  -1,  0, 0 },
 296
 297                 /* syntax errors */
 298                 { "INVALID",             -1, -1, 0 },
 299                 { "FETCH host",          -1, -1, 0 },
 300                 { "FETCH 'host'",        -1, -1, 0 },
 301                 { "LIST hosts; INVALID", -1, -1, 0 },
 302                 { "/* some incomplete",  -1, -1, 0 },
 303
 304                 /* invalid LIST commands */
 305                 { "LIST",                -1, -1, 0 },
 306                 { "LIST foo",            -1, -1, 0 },
 307                 { "LIST hosts MATCHING "
 308                   "name = 'host'",       -1, -1, 0 },
 309                 { "LIST foo FILTER "
 310                   "age > 60s",           -1, -1, 0 },
 311
 312                 /* invalid FETCH commands */
 313                 { "FETCH host 'host' MATCHING "
 314                   "name = 'host'",       -1, -1, 0 },
 315                 { "FETCH service 'host'",-1, -1, 0 },
 316                 { "FETCH metric 'host'", -1, -1, 0 },
 317                 { "FETCH host "
 318                   "'host'.'localhost'",  -1, -1, 0 },
 319                 { "FETCH foo 'host'",    -1, -1, 0 },
 320                 { "FETCH foo 'host' FILTER "
 321                   "age > 60s",           -1, -1, 0 },
 322
 323                 /* invalid LOOKUP commands */
 324                 { "LOOKUP foo",          -1, -1, 0 },
 325                 { "LOOKUP foo MATCHING "
 326                   "name = 'host'",       -1, -1, 0 },
 327                 { "LOOKUP foo FILTER "
 328                   "age > 60s",           -1, -1, 0 },
 329                 { "LOOKUP foo MATCHING "
 330                   "name = 'host' FILTER "
 331                   "age > 60s",           -1, -1, 0 },
 332                 { "LOOKUP hosts MATCHING "
 333                   "attribute['foo'] <= "
 334                   "f || 'oo'",           -1, -1, 0 },
 335                 { "LOOKUP hosts MATCHING "
 336                   "attribute['foo'] <= "
 337                   "'f' || oo",           -1, -1, 0 },
 338                 { "LOOKUP hosts MATCHING "
 339                   "ANY host = 'host'",   -1, -1, 0 },
 340                 { "LOOKUP hosts MATCHING "
 341                   "service.name = 's'",  -1, -1, 0 },
 342                 { "LOOKUP services MATCHING "
 343                   "ANY host = 'host'",   -1, -1, 0 },
 344                 { "LOOKUP services MATCHING "
 345                   "ANY service = 'svc'", -1, -1, 0 },
 346                 { "LOOKUP services MATCHING "
 347                   "ANY metric = 'm'",    -1, -1, 0 },
 348                 { "LOOKUP services MATCHING "
 349                   "metric.name = 'm'",   -1, -1, 0 },
 350                 { "LOOKUP metrics MATCHING "
 351                   "ANY host = 'host'",   -1, -1, 0 },
 352                 { "LOOKUP metrics MATCHING "
 353                   "ANY service = 'svc'", -1, -1, 0 },
 354                 { "LOOKUP metrics MATCHING "
 355                   "ANY metric = 'm'",    -1, -1, 0 },
 356                 { "LOOKUP metrics MATCHING "
 357                   "service.name = 'm'",  -1, -1, 0 },
 358
 359                 /* invalid STORE commands */
 360                 { "STORE host "
 361                   "'obj'.'host'",        -1, -1, 0 },
 362                 { "STORE host attribute "
 363                   ".'key' 123",          -1, -1, 0 },
 364                 { "STORE host attribute "
 365                   "'o'.'h'.'key' 123",   -1, -1, 0 },
 366                 { "STORE service 'svc'", -1, -1, 0 },
 367                 { "STORE service "
 368                   "'host'.'svc' "
 369                   "STORE 'typ' 'id' "
 370                   "LAST UPDATE "
 371                   "2015-02-01",          -1, -1, 0 },
 372                 { "STORE service attribute "
 373                   "'svc'.'key' 123",     -1, -1, 0 },
 374                 { "STORE metric 'm'",    -1, -1, 0 },
 375                 { "STORE metric "
 376                   "'host'.'metric' "
 377                   "STORE 'typ'.'id' "
 378                   "LAST UPDATE "
 379                   "2015-02-01",          -1, -1, 0 },
 380                 { "STORE metric attribute "
 381                   "'metric'.'key' 123",  -1, -1, 0 },
 382         };
 383
 384         sdb_strbuf_t *errbuf = sdb_strbuf_create(64);
 385         sdb_llist_t *check;
 386
 387         size_t i;
 388
 389         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 390                 sdb_object_t *obj;
 391                 _Bool ok;
 392
 393                 check = sdb_fe_parse(golden_data[i].query,
 394                                 golden_data[i].len, errbuf);
 395                 if (golden_data[i].expected < 0)
 396                         ok = check == 0;
 397                 else
 398                         ok = sdb_llist_len(check) == (size_t)golden_data[i].expected;
 399
 400                 fail_unless(ok, "sdb_fe_parse(%s) = %p (len: %zu); expected: %d "
 401                                 "(parser error: %s)", golden_data[i].query, check,
 402                                 sdb_llist_len(check), golden_data[i].expected,
 403                                 sdb_strbuf_string(errbuf));
 404
 405                 if (! check)
 406                         continue;
 407
 408                 if ((! golden_data[i].expected_cmd)
 409                                 || (golden_data[i].expected <= 0)) {
 410                         sdb_llist_destroy(check);
 411                         continue;
 412                 }
 413
 414                 obj = sdb_llist_get(check, 0);
 415                 fail_unless(SDB_CONN_NODE(obj)->cmd == golden_data[i].expected_cmd,
 416                                 "sdb_fe_parse(%s)->cmd = %i; expected: %d",
 417                                 golden_data[i].query, SDB_CONN_NODE(obj)->cmd,
 418                                 golden_data[i].expected_cmd);
 419                 sdb_object_deref(obj);
 420                 sdb_llist_destroy(check);
 421         }
 422
 423         sdb_strbuf_destroy(errbuf);
 424 }
 425 END_TEST
 426
 427 START_TEST(test_parse_matcher)
 428 {
 429         struct {
 430                 const char *expr;
 431                 int len;
 432                 int expected;
 433         } golden_data[] = {
 434                 /* empty expressions */
 435                 { NULL,                           -1, -1 },
 436                 { "",                             -1, -1 },
 437
 438                 /* match hosts by name */
 439                 { "name < 'localhost'",           -1,  MATCHER_LT },
 440                 { "name <= 'localhost'",          -1,  MATCHER_LE },
 441                 { "name = 'localhost'",           -1,  MATCHER_EQ },
 442                 { "name != 'localhost'",          -1,  MATCHER_NE },
 443                 { "name >= 'localhost'",          -1,  MATCHER_GE },
 444                 { "name > 'localhost'",           -1,  MATCHER_GT },
 445                 { "name =~ 'host'",               -1,  MATCHER_REGEX },
 446                 { "name !~ 'host'",               -1,  MATCHER_NREGEX },
 447                 { "name = 'localhost' -- foo",    -1,  MATCHER_EQ },
 448                 { "name = 'host' <garbage>",      13,  MATCHER_EQ },
 449                 { "name &^ 'localhost'",          -1,  -1 },
 450                 /* match by backend */
 451                 { "ANY backend < 'be'",           -1,  MATCHER_ANY },
 452                 { "ANY backend <= 'be'",          -1,  MATCHER_ANY },
 453                 { "ANY backend = 'be'",           -1,  MATCHER_ANY },
 454                 { "ANY backend != 'be'",          -1,  MATCHER_ANY },
 455                 { "ANY backend >= 'be'",          -1,  MATCHER_ANY },
 456                 { "ANY backend > 'be'",           -1,  MATCHER_ANY },
 457                 { "ALL backend < 'be'",           -1,  MATCHER_ALL },
 458                 { "ALL backend <= 'be'",          -1,  MATCHER_ALL },
 459                 { "ALL backend = 'be'",           -1,  MATCHER_ALL },
 460                 { "ALL backend != 'be'",          -1,  MATCHER_ALL },
 461                 { "ALL backend >= 'be'",          -1,  MATCHER_ALL },
 462                 { "ALL backend > 'be'",           -1,  MATCHER_ALL },
 463                 { "ANY backend &^ 'be'",          -1,  -1 },
 464                 /* match hosts by service */
 465                 { "ANY service < 'name'",         -1,  MATCHER_ANY },
 466                 { "ANY service <= 'name'",        -1,  MATCHER_ANY },
 467                 { "ANY service = 'name'",         -1,  MATCHER_ANY },
 468                 { "ANY service != 'name'",        -1,  MATCHER_ANY },
 469                 { "ANY service >= 'name'",        -1,  MATCHER_ANY },
 470                 { "ANY service > 'name'",         -1,  MATCHER_ANY },
 471                 { "ANY service =~ 'pattern'",     -1,  MATCHER_ANY },
 472                 { "ANY service !~ 'pattern'",     -1,  MATCHER_ANY },
 473                 { "ANY service &^ 'name'",        -1,  -1 },
 474                 { "ALL service < 'name'",         -1,  MATCHER_ALL },
 475                 { "ALL service <= 'name'",        -1,  MATCHER_ALL },
 476                 { "ALL service = 'name'",         -1,  MATCHER_ALL },
 477                 { "ALL service != 'name'",        -1,  MATCHER_ALL },
 478                 { "ALL service >= 'name'",        -1,  MATCHER_ALL },
 479                 { "ALL service > 'name'",         -1,  MATCHER_ALL },
 480                 { "ALL service =~ 'pattern'",     -1,  MATCHER_ALL },
 481                 { "ALL service !~ 'pattern'",     -1,  MATCHER_ALL },
 482                 { "ALL service &^ 'name'",        -1,  -1 },
 483                 /* match hosts by metric */
 484                 { "ANY metric < 'name'",          -1,  MATCHER_ANY },
 485                 { "ANY metric <= 'name'",         -1,  MATCHER_ANY },
 486                 { "ANY metric = 'name'",          -1,  MATCHER_ANY },
 487                 { "ANY metric != 'name'",         -1,  MATCHER_ANY },
 488                 { "ANY metric >= 'name'",         -1,  MATCHER_ANY },
 489                 { "ANY metric > 'name'",          -1,  MATCHER_ANY },
 490                 { "ANY metric =~ 'pattern'",      -1,  MATCHER_ANY },
 491                 { "ANY metric !~ 'pattern'",      -1,  MATCHER_ANY },
 492                 { "ANY metric &^ 'pattern'",      -1,  -1 },
 493                 { "ALL metric < 'name'",          -1,  MATCHER_ALL },
 494                 { "ALL metric <= 'name'",         -1,  MATCHER_ALL },
 495                 { "ALL metric = 'name'",          -1,  MATCHER_ALL },
 496                 { "ALL metric != 'name'",         -1,  MATCHER_ALL },
 497                 { "ALL metric >= 'name'",         -1,  MATCHER_ALL },
 498                 { "ALL metric > 'name'",          -1,  MATCHER_ALL },
 499                 { "ALL metric =~ 'pattern'",      -1,  MATCHER_ALL },
 500                 { "ALL metric !~ 'pattern'",      -1,  MATCHER_ALL },
 501                 { "ALL metric &^ 'pattern'",      -1,  -1 },
 502                 /* match hosts by attribute */
 503                 { "ANY attribute < 'name'",       -1,  MATCHER_ANY },
 504                 { "ANY attribute <= 'name'",      -1,  MATCHER_ANY },
 505                 { "ANY attribute = 'name'",       -1,  MATCHER_ANY },
 506                 { "ANY attribute != 'name'",      -1,  MATCHER_ANY },
 507                 { "ANY attribute >= 'name'",      -1,  MATCHER_ANY },
 508                 { "ANY attribute > 'name'",       -1,  MATCHER_ANY },
 509                 { "ANY attribute =~ 'pattern'",   -1,  MATCHER_ANY },
 510                 { "ANY attribute !~ 'pattern'",   -1,  MATCHER_ANY },
 511                 { "ANY attribute &^ 'pattern'",   -1,  -1 },
 512                 { "ALL attribute < 'name'",       -1,  MATCHER_ALL },
 513                 { "ALL attribute <= 'name'",      -1,  MATCHER_ALL },
 514                 { "ALL attribute = 'name'",       -1,  MATCHER_ALL },
 515                 { "ALL attribute != 'name'",      -1,  MATCHER_ALL },
 516                 { "ALL attribute >= 'name'",      -1,  MATCHER_ALL },
 517                 { "ALL attribute > 'name'",       -1,  MATCHER_ALL },
 518                 { "ALL attribute =~ 'pattern'",   -1,  MATCHER_ALL },
 519                 { "ALL attribute !~ 'pattern'",   -1,  MATCHER_ALL },
 520                 { "ALL attribute &^ 'pattern'",   -1,  -1 },
 521                 /* composite expressions */
 522                 { "name =~ 'pattern' AND "
 523                   "ANY service =~ 'pattern'",     -1,  MATCHER_AND },
 524                 { "name =~ 'pattern' OR "
 525                   "ANY service =~ 'pattern'",     -1,  MATCHER_OR },
 526                 { "NOT name = 'host'",            -1,  MATCHER_NOT },
 527                 /* numeric expressions */
 528                 { "attribute['foo'] < 123",       -1,  MATCHER_LT },
 529                 { "attribute['foo'] <= 123",      -1,  MATCHER_LE },
 530                 { "attribute['foo'] = 123",       -1,  MATCHER_EQ },
 531                 { "attribute['foo'] >= 123",      -1,  MATCHER_GE },
 532                 { "attribute['foo'] > 123",       -1,  MATCHER_GT },
 533                 /* datetime expressions */
 534                 { "attribute['foo'] = "
 535                   "2014-08-16",                   -1,  MATCHER_EQ },
 536                 { "attribute['foo'] = "
 537                   "17:23",                        -1,  MATCHER_EQ },
 538                 { "attribute['foo'] = "
 539                   "17:23:53",                     -1,  MATCHER_EQ },
 540                 { "attribute['foo'] = "
 541                   "17:23:53.123",                 -1,  MATCHER_EQ },
 542                 { "attribute['foo'] = "
 543                   "17:23:53.123456789",           -1,  MATCHER_EQ },
 544                 { "attribute['foo'] = "
 545                   "2014-08-16 17:23",             -1,  MATCHER_EQ },
 546                 { "attribute['foo'] = "
 547                   "2014-08-16 17:23:53",          -1,  MATCHER_EQ },
 548                 /* NULL; while this is an implementation detail,
 549                  * IS NULL currently maps to an equality matcher */
 550                 { "attribute['foo'] IS NULL",     -1,  MATCHER_ISNULL },
 551                 { "attribute['foo'] IS NOT NULL", -1,  MATCHER_ISNNULL },
 552                 /* array expressions */
 553                 { "backend < ['a']",              -1,  MATCHER_LT },
 554                 { "backend <= ['a']",             -1,  MATCHER_LE },
 555                 { "backend = ['a']",              -1,  MATCHER_EQ },
 556                 { "backend != ['a']",             -1,  MATCHER_NE },
 557                 { "backend >= ['a']",             -1,  MATCHER_GE },
 558                 { "backend > ['a']",              -1,  MATCHER_GT },
 559                 { "backend &^ ['a']",             -1,  -1 },
 560
 561                 /* object field matchers */
 562                 { "name < 'a'",                   -1,  MATCHER_LT },
 563                 { "name <= 'a'",                  -1,  MATCHER_LE },
 564                 { "name = 'a'",                   -1,  MATCHER_EQ },
 565                 { "name != 'a'",                  -1,  MATCHER_NE },
 566                 { "name >= 'a'",                  -1,  MATCHER_GE },
 567                 { "name > 'a'",                   -1,  MATCHER_GT },
 568                 { "last_update < 2014-10-01",     -1,  MATCHER_LT },
 569                 { "last_update <= 2014-10-01",    -1,  MATCHER_LE },
 570                 { "last_update = 2014-10-01",     -1,  MATCHER_EQ },
 571                 { "last_update != 2014-10-01",    -1,  MATCHER_NE },
 572                 { "last_update >= 2014-10-01",    -1,  MATCHER_GE },
 573                 { "last_update > 2014-10-01",     -1,  MATCHER_GT },
 574                 { "Last_Update >= 24D",           -1,  MATCHER_GE },
 575                 { "age < 20s",                    -1,  MATCHER_LT },
 576                 { "age <= 20s",                   -1,  MATCHER_LE },
 577                 { "age = 20s",                    -1,  MATCHER_EQ },
 578                 { "age != 20s",                   -1,  MATCHER_NE },
 579                 { "age >= 20s",                   -1,  MATCHER_GE },
 580                 { "age > 20s",                    -1,  MATCHER_GT },
 581                 { "AGE <= 1m",                    -1,  MATCHER_LE },
 582                 { "age > 1M",                     -1,  MATCHER_GT },
 583                 { "age != 20Y",                   -1,  MATCHER_NE },
 584                 { "age <= 2 * interval",          -1,  MATCHER_LE },
 585                 { "interval < 20s",               -1,  MATCHER_LT },
 586                 { "interval <= 20s",              -1,  MATCHER_LE },
 587                 { "interval = 20s",               -1,  MATCHER_EQ },
 588                 { "interval != 20s",              -1,  MATCHER_NE },
 589                 { "interval >= 20s",              -1,  MATCHER_GE },
 590                 { "interval > 20s",               -1,  MATCHER_GT },
 591                 { "'be' IN backend",              -1,  MATCHER_IN },
 592
 593                 /* check operator precedence */
 594                 { "name = 'name' OR "
 595                   "ANY service = 'name' AND "
 596                   "ANY attribute = 'name' OR "
 597                   "attribute['foo'] = 'bar'",     -1,  MATCHER_OR },
 598                 { "name = 'name' AND "
 599                   "ANY service = 'name' AND "
 600                   "ANY attribute = 'name' OR "
 601                   "attribute['foo'] = 'bar'",     -1,  MATCHER_OR },
 602                 { "name = 'name' AND "
 603                   "ANY service = 'name' OR "
 604                   "ANY attribute = 'name' AND "
 605                   "attribute['foo'] = 'bar'",     -1,  MATCHER_OR },
 606                 { "(name = 'name' OR "
 607                   "ANY service = 'name') AND "
 608                   "(ANY attribute = 'name' OR "
 609                   "attribute['foo'] = 'bar')",    -1,  MATCHER_AND },
 610                 { "NOT name = 'name' OR "
 611                   "ANY service = 'name'",         -1,  MATCHER_OR },
 612                 { "NOT name = 'name' OR "
 613                   "NOT ANY service = 'name'",     -1,  MATCHER_OR },
 614                 { "NOT (name = 'name' OR "
 615                   "NOT ANY service = 'name')",    -1,  MATCHER_NOT },
 616
 617                 /* syntax errors */
 618                 { "LIST",                         -1, -1 },
 619                 { "foo &^ bar",                   -1, -1 },
 620                 { "invalid",                      -1, -1 },
 621         };
 622
 623         sdb_strbuf_t *errbuf = sdb_strbuf_create(64);
 624         size_t i;
 625
 626         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 627                 sdb_store_matcher_t *m;
 628                 m = sdb_fe_parse_matcher(golden_data[i].expr,
 629                                 golden_data[i].len, errbuf);
 630
 631                 if (golden_data[i].expected < 0) {
 632                         fail_unless(m == NULL,
 633                                         "sdb_fe_parse_matcher(%s) = %p; expected: NULL",
 634                                         golden_data[i].expr, m);
 635                         continue;
 636                 }
 637
 638                 fail_unless(m != NULL, "sdb_fe_parse_matcher(%s) = NULL; "
 639                                 "expected: <matcher> (parser error: %s)",
 640                                 golden_data[i].expr, sdb_strbuf_string(errbuf));
 641                 fail_unless(M(m)->type == golden_data[i].expected,
 642                                 "sdb_fe_parse_matcher(%s) returned matcher of type %d; "
 643                                 "expected: %d", golden_data[i].expr, M(m)->type,
 644                                 golden_data[i].expected);
 645
 646                 sdb_object_deref(SDB_OBJ(m));
 647         }
 648
 649         sdb_strbuf_destroy(errbuf);
 650 }
 651 END_TEST
 652
 653 START_TEST(test_parse_expr)
 654 {
 655         struct {
 656                 const char *expr;
 657                 int len;
 658                 int expected;
 659         } golden_data[] = {
 660                 /* empty expressions */
 661                 { NULL,                   -1, INT_MAX },
 662                 { "",                     -1, INT_MAX },
 663
 664                 /* constant expressions */
 665                 { "'localhost'",          -1, 0 },
 666                 { "123",                  -1, 0 },
 667                 { "2014-08-16",           -1, 0 },
 668                 { "17:23",                -1, 0 },
 669                 { "17:23:53",             -1, 0 },
 670                 { "17:23:53.123",         -1, 0 },
 671                 { "17:23:53.123456789",   -1, 0 },
 672                 { "2014-08-16 17:23",     -1, 0 },
 673                 { "2014-08-16 17:23:53",  -1, 0 },
 674                 { "10s",                  -1, 0 },
 675                 { "60m",                  -1, 0 },
 676                 { "10Y 24D 1h",           -1, 0 },
 677
 678                 { "123 + 456",            -1, 0 },
 679                 { "'foo' || 'bar'",       -1, 0 },
 680                 { "456 - 123",            -1, 0 },
 681                 { "1.2 * 3.4",            -1, 0 },
 682                 { "1.2 / 3.4",            -1, 0 },
 683                 { "5 % 2",                -1, 0 },
 684
 685                 /* queryable fields */
 686                 { "last_update",          -1, FIELD_VALUE },
 687                 { "AGE",                  -1, FIELD_VALUE },
 688                 { "interval",             -1, FIELD_VALUE },
 689                 { "Last_Update",          -1, FIELD_VALUE },
 690                 { "backend",              -1, FIELD_VALUE },
 691
 692                 /* attributes */
 693                 { "attribute['foo']",     -1, ATTR_VALUE },
 694
 695                 /* arithmetic expressions */
 696                 { "age + age",            -1, SDB_DATA_ADD },
 697                 { "age - age",            -1, SDB_DATA_SUB },
 698                 { "age * age",            -1, SDB_DATA_MUL },
 699                 { "age / age",            -1, SDB_DATA_DIV },
 700                 { "age % age",            -1, SDB_DATA_MOD },
 701                 { "age || age",           -1, SDB_DATA_CONCAT },
 702
 703                 /* operator precedence */
 704                 { "age + age * age",      -1, SDB_DATA_ADD },
 705                 { "age * age + age",      -1, SDB_DATA_ADD },
 706                 { "age + age - age",      -1, SDB_DATA_SUB },
 707                 { "age - age + age",      -1, SDB_DATA_ADD },
 708                 { "(age + age) * age",    -1, SDB_DATA_MUL },
 709                 { "age + (age * age)",    -1, SDB_DATA_ADD },
 710
 711                 /* syntax errors */
 712                 { "LIST",                 -1, INT_MAX },
 713                 { "foo &^ bar",           -1, INT_MAX },
 714                 { "invalid",              -1, INT_MAX },
 715         };
 716
 717         sdb_strbuf_t *errbuf = sdb_strbuf_create(64);
 718         size_t i;
 719
 720         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 721                 sdb_store_expr_t *e;
 722                 e = sdb_fe_parse_expr(golden_data[i].expr,
 723                                 golden_data[i].len, errbuf);
 724
 725                 if (golden_data[i].expected == INT_MAX) {
 726                         fail_unless(e == NULL,
 727                                         "sdb_fe_parse_expr(%s) = %p; expected: NULL",
 728                                         golden_data[i].expr, e);
 729                         continue;
 730                 }
 731
 732                 fail_unless(e != NULL, "sdb_fe_parse_expr(%s) = NULL; "
 733                                 "expected: <expr> (parser error: %s)",
 734                                 golden_data[i].expr, sdb_strbuf_string(errbuf));
 735                 fail_unless(e->type == golden_data[i].expected,
 736                                 "sdb_fe_parse_expr(%s) returned expression of type %d; "
 737                                 "expected: %d", golden_data[i].expr, e->type,
 738                                 golden_data[i].expected);
 739
 740                 sdb_object_deref(SDB_OBJ(e));
 741         }
 742
 743         sdb_strbuf_destroy(errbuf);
 744 }
 745 END_TEST
 746
 747 Suite *
 748 fe_parser_suite(void)
 749 {
 750         Suite *s = suite_create("frontend::parser");
 751         TCase *tc;
 752
 753         tc = tcase_create("core");
 754         tcase_add_test(tc, test_parse);
 755         tcase_add_test(tc, test_parse_matcher);
 756         tcase_add_test(tc, test_parse_expr);
 757         suite_add_tcase(s, tc);
 758
 759         return s;
 760 } /* util_parser_suite */
 761
 762 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 763