t/unit/core/store_lookup_test.c

   1 /*
   2  * SysDB - t/unit/core/store_lookup_test.c
   3  * Copyright (C) 2014 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 "core/store.h"
  29 #include "core/store-private.h"
  30 #include "frontend/parser.h"
  31 #include "libsysdb_test.h"
  32
  33 #include <check.h>
  34 #include <string.h>
  35
  36 static void
  37 populate(void)
  38 {
  39         const char *hosts[] = { "a", "b", "c" };
  40
  41         struct {
  42                 const char *host;
  43                 const char *metric;
  44         } metrics[] = {
  45                 { "a", "m1" },
  46                 { "b", "m1" },
  47                 { "b", "m2" },
  48         };
  49
  50         struct {
  51                 const char *host;
  52                 const char *service;
  53         } services[] = {
  54                 { "a", "s1" },
  55                 { "a", "s2" },
  56                 { "b", "s1" },
  57                 { "b", "s3" },
  58         };
  59
  60         struct {
  61                 const char *host;
  62                 const char *name;
  63                 sdb_data_t  value;
  64         } attrs[] = {
  65                 { "a", "k1", { SDB_TYPE_STRING, { .string = "v1" } } },
  66                 { "a", "k2", { SDB_TYPE_INTEGER, { .integer = 123 } } },
  67         };
  68
  69         size_t i;
  70
  71         for (i = 0; i < SDB_STATIC_ARRAY_LEN(hosts); ++i) {
  72                 int status = sdb_store_host(hosts[i], 1);
  73                 fail_unless(status == 0,
  74                                 "sdb_store_host(%s, 1) = %d; expected: 0",
  75                                 hosts[i], status);
  76         }
  77
  78         for (i = 0; i < SDB_STATIC_ARRAY_LEN(metrics); ++i) {
  79                 int status = sdb_store_metric(metrics[i].host,
  80                                 metrics[i].metric, /* store */ NULL, 1);
  81                 fail_unless(status == 0,
  82                                 "sdb_store_metric(%s, %s, NULL, 1) = %d; expected: 0",
  83                                 metrics[i].host, metrics[i].metric, status);
  84         }
  85
  86         for (i = 0; i < SDB_STATIC_ARRAY_LEN(services); ++i) {
  87                 int status = sdb_store_service(services[i].host,
  88                                 services[i].service, 1);
  89                 fail_unless(status == 0,
  90                                 "sdb_store_service(%s, %s, 1) = %d; expected: 0",
  91                                 services[i].host, services[i].service, status);
  92         }
  93
  94         for (i = 0; i < SDB_STATIC_ARRAY_LEN(attrs); ++i) {
  95                 int status = sdb_store_attribute(attrs[i].host,
  96                                 attrs[i].name, &attrs[i].value, 1);
  97                 fail_unless(status == 0,
  98                                 "sdb_store_attribute(%s, %s, <val>, 1) = %d; expected: 0",
  99                                 attrs[i].host, attrs[i].name, status);
 100         }
 101 } /* populate */
 102
 103 START_TEST(test_store_match_name)
 104 {
 105         sdb_store_obj_t *obj;
 106
 107         struct {
 108                 int type;
 109                 const char *name;
 110                 _Bool re;
 111
 112                 int expected;
 113         } golden_data[] = {
 114                 { SDB_HOST,      NULL,   0, 1 },
 115                 { SDB_HOST,      NULL,   1, 1 },
 116                 { SDB_HOST,      "a",    0, 1 },
 117                 { SDB_HOST,      "a",    1, 1 },
 118                 { SDB_HOST,      "b",    0, 0 },
 119                 { SDB_HOST,      "b",    1, 0 },
 120                 { SDB_HOST,      "^a$",  1, 1 },
 121                 { SDB_HOST,      "^b$",  1, 0 },
 122                 { SDB_HOST,      "^a$",  0, 0 },
 123                 { SDB_HOST,      "^b$",  0, 0 },
 124                 { SDB_METRIC,    NULL,   0, 1 },
 125                 { SDB_METRIC,    NULL,   1, 1 },
 126                 { SDB_METRIC,    "m1",   0, 1 },
 127                 { SDB_METRIC,    "m1",   1, 1 },
 128                 { SDB_METRIC,    "^m1$", 1, 1 },
 129                 { SDB_METRIC,    "m",    1, 1 },
 130                 { SDB_METRIC,    "s",    1, 0 },
 131                 { SDB_METRIC,    "m2",   0, 0 },
 132                 { SDB_METRIC,    "x1",   0, 0 },
 133                 { SDB_METRIC,    "x1",   1, 0 },
 134                 { SDB_SERVICE,   NULL,   0, 1 },
 135                 { SDB_SERVICE,   NULL,   1, 1 },
 136                 { SDB_SERVICE,   "s1",   0, 1 },
 137                 { SDB_SERVICE,   "s2",   0, 1 },
 138                 { SDB_SERVICE,   "s3",   0, 0 },
 139                 { SDB_SERVICE,   "s4",   0, 0 },
 140                 { SDB_SERVICE,   "^s1$", 1, 1 },
 141                 { SDB_SERVICE,   "^s1$", 0, 0 },
 142                 { SDB_SERVICE,   "x1",   0, 0 },
 143                 { SDB_SERVICE,   "x1",   1, 0 },
 144                 { SDB_SERVICE,   "x",    1, 0 },
 145                 { SDB_ATTRIBUTE, NULL,   0, 1 },
 146                 { SDB_ATTRIBUTE, NULL,   1, 1 },
 147                 { SDB_ATTRIBUTE, "k1",   0, 1 },
 148                 { SDB_ATTRIBUTE, "k2",   0, 1 },
 149                 { SDB_ATTRIBUTE, "k3",   0, 0 },
 150                 { SDB_ATTRIBUTE, "k4",   0, 0 },
 151                 { SDB_ATTRIBUTE, "k",    1, 1 },
 152                 { SDB_ATTRIBUTE, "1",    1, 1 },
 153                 { SDB_ATTRIBUTE, "3",    1, 0 },
 154         };
 155
 156         size_t i;
 157
 158         obj = sdb_store_get_host("a");
 159         fail_unless(obj != NULL,
 160                         "sdb_store_get_host(a) = NULL; expected: <host>");
 161
 162         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 163                 sdb_store_matcher_t *m, *n;
 164                 char buf[1024];
 165                 int status;
 166
 167                 m = sdb_store_name_matcher(golden_data[i].type,
 168                                 golden_data[i].name, golden_data[i].re);
 169                 fail_unless(m != NULL,
 170                                 "sdb_store_service_matcher(%d, %s, %d) = NULL; "
 171                                 "expected: <matcher>", golden_data[i].type,
 172                                 golden_data[i].name, golden_data[i].re);
 173
 174                 status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 175                 fail_unless(status == golden_data[i].expected,
 176                                 "sdb_store_matcher_matches(%s, <host a>, NULL) = %d; "
 177                                 "expected: %d",
 178                                 sdb_store_matcher_tostring(m, buf, sizeof(buf)),
 179                                 status, golden_data[i].expected);
 180
 181                 n = sdb_store_inv_matcher(m);
 182                 fail_unless(n != NULL,
 183                                 "sdb_store_inv_matcher() = NULL; expected: <matcher>");
 184                 sdb_object_deref(SDB_OBJ(m));
 185
 186                 /* now match the inverted set of objects */
 187                 status = sdb_store_matcher_matches(n, obj, /* filter */ NULL);
 188                 fail_unless(status == !golden_data[i].expected,
 189                                 "sdb_store_matcher_matches(%s, <host a>, NULL) = %d; "
 190                                 "expected: %d",
 191                                 sdb_store_matcher_tostring(n, buf, sizeof(buf)),
 192                                 status, !golden_data[i].expected);
 193
 194                 sdb_object_deref(SDB_OBJ(n));
 195         }
 196
 197         sdb_object_deref(SDB_OBJ(obj));
 198 }
 199 END_TEST
 200
 201 START_TEST(test_store_match_attr)
 202 {
 203         sdb_store_obj_t *obj;
 204
 205         struct {
 206                 const char *attr_name;
 207                 const char *attr_value;
 208                 _Bool re;
 209
 210                 int expected;
 211         } golden_data[] = {
 212                 { "k1", NULL,   0, 1 },
 213                 { "k",  NULL,   1, 0 },
 214                 { "1",  NULL,   1, 0 },
 215                 { "k3", NULL,   0, 0 },
 216                 { "k3", NULL,   1, 0 },
 217                 { "k1", "v1",   0, 1 },
 218                 { "k1", "v1",   1, 1 },
 219                 { "k1", "^v1$", 1, 1 },
 220                 { "k1", "v",    1, 1 },
 221                 { "k1", "1",    1, 1 },
 222                 { "k1", "v2",   0, 0 },
 223                 { "k1", "v2",   1, 0 },
 224                 { "k",  "v1",   0, 0 },
 225                 { "k",  "v1",   1, 0 },
 226                 { "k3", "1",    0, 0 },
 227                 { "k3", "1",    1, 0 },
 228         };
 229
 230         size_t i;
 231
 232         obj = sdb_store_get_host("a");
 233         fail_unless(obj != NULL,
 234                         "sdb_store_get_host(a) = NULL; expected: <host>");
 235
 236         fail_unless(sdb_store_attr_matcher(NULL, "re", 0) == NULL,
 237                         "sdb_store_attr_matcher(NULL, \"re\", 0) = <m>; expected: NULL");
 238         fail_unless(sdb_store_attr_matcher(NULL, "re", 1) == NULL,
 239                         "sdb_store_attr_matcher(NULL, \"re\", 1) = <m>; expected: NULL");
 240
 241         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 242                 sdb_store_matcher_t *m, *n;
 243                 char buf[1024];
 244                 int status;
 245
 246                 m = sdb_store_attr_matcher(golden_data[i].attr_name,
 247                                 golden_data[i].attr_value, golden_data[i].re);
 248                 fail_unless(m != NULL,
 249                                 "sdb_store_attr_matcher() = NULL; expected: <matcher>");
 250
 251                 status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 252                 fail_unless(status == golden_data[i].expected,
 253                                 "sdb_store_matcher_matches({%s, <host a>, NULL) = %d; "
 254                                 "expected: %d",
 255                                 sdb_store_matcher_tostring(m, buf, sizeof(buf)),
 256                                 status, golden_data[i].expected);
 257
 258                 n = sdb_store_inv_matcher(m);
 259                 fail_unless(n != NULL,
 260                                 "sdb_store_inv_matcher() = NULL; expected: <matcher>");
 261                 sdb_object_deref(SDB_OBJ(m));
 262
 263                 /* now match the inverted set of objects */
 264                 status = sdb_store_matcher_matches(n, obj, /* filter */ NULL);
 265                 fail_unless(status == !golden_data[i].expected,
 266                                 "sdb_store_matcher_matches({%s, <host a>, NULL) = %d; "
 267                                 "expected: %d",
 268                                 sdb_store_matcher_tostring(n, buf, sizeof(buf)),
 269                                 status, !golden_data[i].expected);
 270
 271                 sdb_object_deref(SDB_OBJ(n));
 272         }
 273
 274         sdb_object_deref(SDB_OBJ(obj));
 275 }
 276 END_TEST
 277
 278 START_TEST(test_attr_cond)
 279 {
 280         sdb_store_obj_t *obj;
 281
 282         struct {
 283                 const char *attr;
 284                 const sdb_data_t value;
 285                 int expected_lt, expected_le, expected_eq, expected_ge, expected_gt;
 286         } golden_data[] = {
 287                 { "k1", { SDB_TYPE_STRING,  { .string  = "v1" } },  0, 1, 1, 1, 0 },
 288                 { "k1", { SDB_TYPE_STRING,  { .string  = "v2" } },  1, 1, 0, 0, 0 },
 289                 { "k1", { SDB_TYPE_STRING,  { .string  = "v0" } },  0, 0, 0, 1, 1 },
 290                 { "k2", { SDB_TYPE_INTEGER, { .integer = 123 } },   0, 1, 1, 1, 0 },
 291                 { "k2", { SDB_TYPE_INTEGER, { .integer = 124 } },   1, 1, 0, 0, 0 },
 292                 { "k2", { SDB_TYPE_INTEGER, { .integer = 122 } },   0, 0, 0, 1, 1 },
 293                 /* key does not exist */
 294                 { "k3", { SDB_TYPE_STRING,  { .string  = "v1" } },  0, 0, 0, 0, 0 },
 295                 { "k3", { SDB_TYPE_STRING,  { .string  = "123" } }, 0, 0, 0, 0, 0 },
 296                 { "k3", { SDB_TYPE_INTEGER, { .integer = 123 } },   0, 0, 0, 0, 0 },
 297                 /* type mismatch */
 298                 { "k1", { SDB_TYPE_INTEGER, { .integer = 0 } },     0, 0, 0, 0, 0 },
 299                 { "k2", { SDB_TYPE_STRING,  { .string  = "123" } }, 0, 0, 0, 0, 0 },
 300         };
 301
 302         int status;
 303         size_t i;
 304
 305         obj = sdb_store_get_host("a");
 306         fail_unless(obj != NULL,
 307                         "sdb_store_get_host(a) = NULL; expected: <host>");
 308
 309         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 310                 sdb_store_expr_t *expr;
 311                 sdb_store_cond_t *c;
 312                 char buf[1024];
 313                 size_t j;
 314
 315                 struct {
 316                         sdb_store_matcher_t *(*matcher)(sdb_store_cond_t *);
 317                         int expected;
 318                 } tests[] = {
 319                         { sdb_store_lt_matcher, golden_data[i].expected_lt },
 320                         { sdb_store_le_matcher, golden_data[i].expected_le },
 321                         { sdb_store_eq_matcher, golden_data[i].expected_eq },
 322                         { sdb_store_ge_matcher, golden_data[i].expected_ge },
 323                         { sdb_store_gt_matcher, golden_data[i].expected_gt },
 324                 };
 325
 326                 sdb_data_format(&golden_data[i].value,
 327                                 buf, sizeof(buf), SDB_UNQUOTED);
 328
 329                 expr = sdb_store_expr_constvalue(&golden_data[i].value);
 330                 fail_unless(expr != NULL,
 331                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 332                                 buf);
 333
 334                 c = sdb_store_attr_cond(golden_data[i].attr, expr);
 335                 sdb_object_deref(SDB_OBJ(expr));
 336                 fail_unless(c != NULL,
 337                                 "sdb_store_attr_cond(%s, expr{%s}) = NULL; expected: <cond>",
 338                                 golden_data[i].attr, buf);
 339
 340                 for (j = 0; j < SDB_STATIC_ARRAY_LEN(tests); ++j) {
 341                         sdb_store_matcher_t *m;
 342                         char m_str[1024];
 343
 344                         m = tests[j].matcher(c);
 345                         fail_unless(m != NULL,
 346                                         "sdb_store_<cond>_matcher() = NULL; expected: <matcher>");
 347
 348                         status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 349                         fail_unless(status == tests[j].expected,
 350                                         "sdb_store_matcher_matches(%s, <obj>, NULL) = %d; "
 351                                         "expected: %d",
 352                                         sdb_store_matcher_tostring(m, m_str, sizeof(m_str)),
 353                                         status, tests[j].expected);
 354
 355                         sdb_object_deref(SDB_OBJ(m));
 356                 }
 357
 358                 sdb_object_deref(SDB_OBJ(c));
 359         }
 360
 361         sdb_object_deref(SDB_OBJ(obj));
 362 }
 363 END_TEST
 364
 365 START_TEST(test_obj_cond)
 366 {
 367         struct {
 368                 const char *host;
 369                 int field;
 370                 const sdb_data_t value;
 371                 int expected_lt, expected_le, expected_eq, expected_ge, expected_gt;
 372         } golden_data[] = {
 373                 /* last-update = 1 for all objects */
 374                 { "a", SDB_FIELD_LAST_UPDATE,
 375                         { SDB_TYPE_DATETIME, { .datetime = 1 } }, 0, 1, 1, 1, 0 },
 376                 { "a", SDB_FIELD_LAST_UPDATE,
 377                         { SDB_TYPE_DATETIME, { .datetime = 2 } }, 1, 1, 0, 0, 0 },
 378                 { "a", SDB_FIELD_LAST_UPDATE,
 379                         { SDB_TYPE_DATETIME, { .datetime = 0 } }, 0, 0, 0, 1, 1 },
 380                 /* age > 0 for all objects */
 381                 { "a", SDB_FIELD_AGE,
 382                         { SDB_TYPE_DATETIME, { .datetime = 0 } }, 0, 0, 0, 1, 1 },
 383                 /* interval = 0 for all objects */
 384                 { "a", SDB_FIELD_INTERVAL,
 385                         { SDB_TYPE_DATETIME, { .datetime = 0 } }, 0, 1, 1, 1, 0 },
 386                 { "a", SDB_FIELD_INTERVAL,
 387                         { SDB_TYPE_DATETIME, { .datetime = 1 } }, 1, 1, 0, 0, 0 },
 388                 /* type mismatch */
 389                 { "a", SDB_FIELD_LAST_UPDATE,
 390                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 391                 { "a", SDB_FIELD_AGE,
 392                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 393                 { "a", SDB_FIELD_INTERVAL,
 394                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 395                 { "a", SDB_FIELD_BACKEND,
 396                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 397                 { "a", SDB_FIELD_BACKEND,
 398                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 399                 /* (64bit) integer value without zero-bytes */
 400                 { "a", SDB_FIELD_BACKEND,
 401                         { SDB_TYPE_INTEGER, { .integer = 0xffffffffffffffffL } },
 402                         0, 0, 0, 0, 0 },
 403         };
 404
 405         int status;
 406         size_t i;
 407
 408         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 409                 sdb_store_obj_t *obj;
 410                 sdb_store_expr_t *expr;
 411                 sdb_store_cond_t *c;
 412                 char buf[1024];
 413                 size_t j;
 414
 415                 struct {
 416                         sdb_store_matcher_t *(*matcher)(sdb_store_cond_t *);
 417                         int expected;
 418                 } tests[] = {
 419                         { sdb_store_lt_matcher, golden_data[i].expected_lt },
 420                         { sdb_store_le_matcher, golden_data[i].expected_le },
 421                         { sdb_store_eq_matcher, golden_data[i].expected_eq },
 422                         { sdb_store_ge_matcher, golden_data[i].expected_ge },
 423                         { sdb_store_gt_matcher, golden_data[i].expected_gt },
 424                 };
 425
 426                 obj = sdb_store_get_host(golden_data[i].host);
 427                 fail_unless(obj != NULL,
 428                                 "sdb_store_get_host(%s) = NULL; expected: <host>",
 429                                 golden_data[i].host);
 430
 431                 sdb_data_format(&golden_data[i].value,
 432                                 buf, sizeof(buf), SDB_UNQUOTED);
 433
 434                 expr = sdb_store_expr_constvalue(&golden_data[i].value);
 435                 fail_unless(expr != NULL,
 436                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 437                                 buf);
 438
 439                 c = sdb_store_obj_cond(golden_data[i].field, expr);
 440                 sdb_object_deref(SDB_OBJ(expr));
 441                 fail_unless(c != NULL,
 442                                 "sdb_store_obj_cond(%d, expr{%s}) = NULL; expected: <cond>",
 443                                 golden_data[i].field, buf);
 444
 445                 for (j = 0; j < SDB_STATIC_ARRAY_LEN(tests); ++j) {
 446                         sdb_store_matcher_t *m;
 447                         char m_str[1024];
 448
 449                         m = tests[j].matcher(c);
 450                         fail_unless(m != NULL,
 451                                         "sdb_store_<cond>_matcher() = NULL; expected: <matcher>");
 452
 453                         status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 454                         fail_unless(status == tests[j].expected,
 455                                         "sdb_store_matcher_matches(%s, <obj>, NULL) = %d; "
 456                                         "expected: %d",
 457                                         sdb_store_matcher_tostring(m, m_str, sizeof(m_str)),
 458                                         status, tests[j].expected);
 459
 460                         sdb_object_deref(SDB_OBJ(m));
 461                 }
 462
 463                 sdb_object_deref(SDB_OBJ(c));
 464                 sdb_object_deref(SDB_OBJ(obj));
 465         }
 466 }
 467 END_TEST
 468
 469 START_TEST(test_store_match_op)
 470 {
 471         sdb_store_obj_t *obj;
 472
 473         sdb_store_matcher_t *always = sdb_store_name_matcher(SDB_HOST, "a", 0);
 474         sdb_store_matcher_t *never = sdb_store_name_matcher(SDB_HOST, "z", 0);
 475
 476         struct {
 477                 const char *op;
 478                 sdb_store_matcher_t *left;
 479                 sdb_store_matcher_t *right;
 480                 int expected;
 481         } golden_data[] = {
 482                 { "OR",  always, always, 1 },
 483                 { "OR",  always, never,  1 },
 484                 { "OR",  never,  always, 1 },
 485                 { "OR",  never,  never,  0 },
 486                 { "AND", always, always, 1 },
 487                 { "AND", always, never,  0 },
 488                 { "AND", never,  always, 0 },
 489                 { "AND", never,  never,  0 },
 490         };
 491
 492         int status;
 493         size_t i;
 494
 495         obj = sdb_store_get_host("a");
 496
 497         status = sdb_store_matcher_matches(always, obj, /* filter */ NULL);
 498         fail_unless(status == 1,
 499                         "INTERNAL ERROR: 'always' did not match host");
 500         status = sdb_store_matcher_matches(never, obj, /* filter */ NULL);
 501         fail_unless(status == 0,
 502                         "INTERNAL ERROR: 'never' matches host");
 503
 504         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 505                 sdb_store_matcher_t *m;
 506
 507                 if (! strcmp(golden_data[i].op, "OR"))
 508                         m = sdb_store_dis_matcher(golden_data[i].left,
 509                                         golden_data[i].right);
 510                 else if (! strcmp(golden_data[i].op, "AND"))
 511                         m = sdb_store_con_matcher(golden_data[i].left,
 512                                         golden_data[i].right);
 513                 else {
 514                         fail("INTERNAL ERROR: unexpected operator %s", golden_data[i].op);
 515                         continue;
 516                 }
 517
 518 #define TO_NAME(v) (((v) == always) ? "always" \
 519                 : ((v) == never) ? "never" : "<unknown>")
 520
 521                 status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 522                 fail_unless(status == golden_data[i].expected,
 523                                 "%s(%s, %s, NULL) = %d; expected: %d", golden_data[i].op,
 524                                 TO_NAME(golden_data[i].left), TO_NAME(golden_data[i].right),
 525                                 status, golden_data[i].expected);
 526
 527 #undef TO_NAME
 528
 529                 sdb_object_deref(SDB_OBJ(m));
 530         }
 531
 532         sdb_object_deref(SDB_OBJ(always));
 533         sdb_object_deref(SDB_OBJ(never));
 534
 535         sdb_object_deref(SDB_OBJ(obj));
 536 }
 537 END_TEST
 538
 539 START_TEST(test_parse_cmp)
 540 {
 541         sdb_data_t hostname   = { SDB_TYPE_STRING,  { .string  = "hostname" } };
 542         sdb_data_t metricname = { SDB_TYPE_STRING,  { .string  = "metricname" } };
 543         sdb_data_t srvname    = { SDB_TYPE_STRING,  { .string  = "srvname" } };
 544         sdb_data_t attrname   = { SDB_TYPE_STRING,  { .string  = "attrname" } };
 545         sdb_data_t attrvalue  = { SDB_TYPE_INTEGER, { .integer = 4711 } };
 546
 547         sdb_store_matcher_t *check;
 548
 549         size_t i;
 550
 551         struct {
 552                 const char *obj_type;
 553                 const char *attr;
 554                 const char *op;
 555                 const sdb_data_t *value;
 556                 int expected;
 557         } golden_data[] = {
 558                 { "host",      NULL,   "=",  &hostname,   MATCHER_NAME },
 559                 { "host",      NULL,   "!=", &hostname,   MATCHER_NOT },
 560                 { "host",      NULL,   "=~", &hostname,   MATCHER_NAME },
 561                 { "host",      NULL,   "!~", &hostname,   MATCHER_NOT },
 562                 { "host",      "attr", "=",  &hostname,   -1 },
 563                 { "host",      "attr", "!=", &hostname,   -1 },
 564                 { "host",      "attr", "!=", &attrvalue,  -1 },
 565                 { "host",      "attr", "<=", &attrvalue,  -1 },
 566                 { "host",      NULL,   "&^", &hostname,   -1 },
 567                 { "host",      NULL,   "<",  &hostname,   -1 },
 568                 { "host",      NULL,   "<=", &hostname,   -1 },
 569                 { "host",      NULL,   ">=", &hostname,   -1 },
 570                 { "host",      NULL,   ">",  &hostname,   -1 },
 571                 { "host",      NULL,   "=",  NULL,        -1 },
 572                 { "metric",    NULL,   "=",  &metricname, MATCHER_NAME },
 573                 { "metric",    NULL,   "!=", &metricname, MATCHER_NOT },
 574                 { "metric",    NULL,   "=~", &metricname, MATCHER_NAME },
 575                 { "metric",    NULL,   "!~", &metricname, MATCHER_NOT },
 576                 { "metric",    "attr", "=",  &metricname, -1 },
 577                 { "metric",    "attr", "!=", &metricname, -1 },
 578                 { "metric",    "attr", "!=", &attrvalue,  -1 },
 579                 { "metric",    "attr", "<=", &attrvalue,  -1 },
 580                 { "metric",    NULL,   "&^", &metricname, -1 },
 581                 { "metric",    NULL,   "<",  &metricname, -1 },
 582                 { "metric",    NULL,   "<=", &metricname, -1 },
 583                 { "metric",    NULL,   ">=", &metricname, -1 },
 584                 { "metric",    NULL,   ">",  &metricname, -1 },
 585                 { "metric",    NULL,   "=",  NULL,        -1 },
 586                 { "service",   NULL,   "=",  &srvname,    MATCHER_NAME },
 587                 { "service",   NULL,   "!=", &srvname,    MATCHER_NOT },
 588                 { "service",   NULL,   "=~", &srvname,    MATCHER_NAME },
 589                 { "service",   NULL,   "!~", &srvname,    MATCHER_NOT },
 590                 { "service",   "attr", "=",  &srvname,    -1 },
 591                 { "service",   "attr", "!=", &srvname,    -1 },
 592                 { "service",   "attr", "!=", &attrvalue,  -1 },
 593                 { "service",   "attr", "<=", &attrvalue,  -1 },
 594                 { "service",   NULL,   "&^", &srvname,    -1 },
 595                 { "service",   NULL,   "<",  &srvname,    -1 },
 596                 { "service",   NULL,   "<=", &srvname,    -1 },
 597                 { "service",   NULL,   ">=", &srvname,    -1 },
 598                 { "service",   NULL,   ">",  &srvname,    -1 },
 599                 { "service",   NULL,   "=",  NULL,        -1 },
 600                 { "attribute", NULL,   "=",  &attrname,   MATCHER_NAME },
 601                 { "attribute", NULL,   "!=", &attrname,   MATCHER_NOT },
 602                 { "attribute", NULL,   "=~", &attrname,   MATCHER_NAME },
 603                 { "attribute", NULL,   "!~", &attrname,   MATCHER_NOT },
 604                 { "attribute", NULL,   "<",  &attrname,   -1 },
 605                 { "attribute", NULL,   "<=", &attrname,   -1 },
 606                 { "attribute", NULL,   ">=", &attrname,   -1 },
 607                 { "attribute", NULL,   ">",  &attrname,   -1 },
 608                 { "attribute", NULL,   "=",  NULL,        -1 },
 609                 { "attribute", "attr", "=",  &attrname,   MATCHER_ATTR },
 610                 { "attribute", "attr", "!=", &attrname,   MATCHER_NOT },
 611                 { "attribute", "attr", "=~", &attrname,   MATCHER_ATTR },
 612                 { "attribute", "attr", "!~", &attrname,   MATCHER_NOT },
 613                 { "attribute", "attr", "&^", &attrname,   -1 },
 614                 { "attribute", "attr", "<",  NULL,        -1 },
 615                 { "attribute", "attr", "<",  &attrname,   MATCHER_LT },
 616                 { "attribute", "attr", "<=", &attrname,   MATCHER_LE },
 617 /*              { "attribute", "attr", "=",  &attrname,   MATCHER_EQ }, */
 618                 { "attribute", "attr", ">=", &attrname,   MATCHER_GE },
 619                 { "attribute", "attr", ">",  &attrname,   MATCHER_GT },
 620                 { "attribute", "attr", "IS", NULL,        MATCHER_ISNULL },
 621                 { "attribute", "attr", "IS", &attrname,   -1 },
 622                 { "foo",       NULL,   "=",  &attrname,   -1 },
 623                 { "foo",       "attr", "=",  &attrname,   -1 },
 624         };
 625
 626         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 627                 sdb_store_expr_t *expr;
 628                 char buf[1024];
 629
 630                 if (sdb_data_format(golden_data[i].value,
 631                                         buf, sizeof(buf), SDB_UNQUOTED) < 0)
 632                         snprintf(buf, sizeof(buf), "ERR");
 633
 634                 expr = sdb_store_expr_constvalue(golden_data[i].value);
 635                 fail_unless(expr != NULL || golden_data[i].value == NULL,
 636                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 637                                 buf);
 638
 639                 check = sdb_store_matcher_parse_cmp(golden_data[i].obj_type,
 640                                 golden_data[i].attr, golden_data[i].op, expr);
 641                 sdb_object_deref(SDB_OBJ(expr));
 642
 643                 if (golden_data[i].expected == -1) {
 644                         fail_unless(check == NULL,
 645                                         "sdb_store_matcher_parse_cmp(%s, %s, %s, expr{%s}) = %p; "
 646                                         "expected: NULL", golden_data[i].obj_type,
 647                                         golden_data[i].attr, golden_data[i].op, buf, check);
 648                         continue;
 649                 }
 650
 651                 fail_unless(check != NULL,
 652                                 "sdb_store_matcher_parse_cmp(%s, %s, %s, %s) = %p; "
 653                                 "expected: NULL", golden_data[i].obj_type,
 654                                 golden_data[i].attr, golden_data[i].op, buf, check);
 655                 fail_unless(M(check)->type == golden_data[i].expected,
 656                                 "sdb_store_matcher_parse_cmp(%s, %s, %s, %s) returned matcher "
 657                                 "of type %d; expected: %d", golden_data[i].obj_type,
 658                                 golden_data[i].attr, golden_data[i].op, buf,
 659                                 M(check)->type, golden_data[i].expected);
 660
 661                 sdb_object_deref(SDB_OBJ(check));
 662         }
 663 }
 664 END_TEST
 665
 666 START_TEST(test_parse_field_cmp)
 667 {
 668         sdb_data_t datetime = { SDB_TYPE_DATETIME, { .datetime = 1 } };
 669         sdb_data_t string = { SDB_TYPE_STRING, { .string = "s" } };
 670
 671         struct {
 672                 const char *field;
 673                 const char *op;
 674                 const sdb_data_t *value;
 675                 int expected;
 676         } golden_data[] = {
 677                 { "last_update", "<",  &datetime, MATCHER_LT },
 678                 { "last_update", "<=", &datetime, MATCHER_LE },
 679                 { "last_update", "=",  &datetime, MATCHER_EQ },
 680                 { "last_update", ">=", &datetime, MATCHER_GE },
 681                 { "last_update", ">",  &datetime, MATCHER_GT },
 682                 { "last_update", "!=", &datetime, MATCHER_NOT },
 683                 { "age",         "<",  &datetime, MATCHER_LT },
 684                 { "age",         "<=", &datetime, MATCHER_LE },
 685                 { "age",         "=",  &datetime, MATCHER_EQ },
 686                 { "age",         ">=", &datetime, MATCHER_GE },
 687                 { "age",         ">",  &datetime, MATCHER_GT },
 688                 { "age",         "!=", &datetime, MATCHER_NOT },
 689                 { "interval",    "<",  &datetime, MATCHER_LT },
 690                 { "interval",    "<=", &datetime, MATCHER_LE },
 691                 { "interval",    "=",  &datetime, MATCHER_EQ },
 692                 { "interval",    ">=", &datetime, MATCHER_GE },
 693                 { "interval",    ">",  &datetime, MATCHER_GT },
 694                 { "interval",    "!=", &datetime, MATCHER_NOT },
 695                 { "backend",     "=",  &string,   MATCHER_EQ },
 696                 { "backend",     "!=", &string,   MATCHER_NOT },
 697                 /* the behavior for other operators on :backend
 698                  * is currently unspecified */
 699                 { "last_update", "=",  NULL,      -1 },
 700                 { "last_update", "IS", NULL,      -1 },
 701                 { "age",         "=",  NULL,      -1 },
 702                 { "interval",    "=",  NULL,      -1 },
 703                 { "backend",     "=",  NULL,      -1 },
 704                 { "backend",     "=~", &string,   -1 },
 705         };
 706
 707         size_t i;
 708
 709         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 710                 sdb_store_matcher_t *check;
 711                 sdb_store_expr_t *expr;
 712                 char buf[1024];
 713
 714                 if (sdb_data_format(golden_data[i].value,
 715                                         buf, sizeof(buf), SDB_UNQUOTED) < 0)
 716                         snprintf(buf, sizeof(buf), "ERR");
 717
 718                 expr = sdb_store_expr_constvalue(golden_data[i].value);
 719                 fail_unless(expr != NULL || golden_data[i].value == NULL,
 720                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 721                                 buf);
 722
 723                 check = sdb_store_matcher_parse_field_cmp(golden_data[i].field,
 724                                 golden_data[i].op, expr);
 725                 sdb_object_deref(SDB_OBJ(expr));
 726
 727                 if (golden_data[i].expected == -1) {
 728                         fail_unless(check == NULL,
 729                                         "sdb_store_matcher_parse_field_cmp(%s, %s, expr{%s}) = %p; "
 730                                         "expected: NULL", golden_data[i].field,
 731                                         golden_data[i].op, buf, check);
 732                         continue;
 733                 }
 734
 735                 fail_unless(check != NULL,
 736                                 "sdb_store_matcher_parse_field_cmp(%s, %s, %s) = %p; "
 737                                 "expected: NULL", golden_data[i].field,
 738                                 golden_data[i].op, buf, check);
 739                 fail_unless(M(check)->type == golden_data[i].expected,
 740                                 "sdb_store_matcher_parse_field_cmp(%s, %s, %s) returned "
 741                                 "matcher of type %d; expected: %d", golden_data[i].field,
 742                                 golden_data[i].op, buf, M(check)->type,
 743                                 golden_data[i].expected);
 744
 745                 sdb_object_deref(SDB_OBJ(check));
 746         }
 747 }
 748 END_TEST
 749
 750 static int
 751 scan_cb(sdb_store_obj_t *obj, void *user_data)
 752 {
 753         int *i = user_data;
 754
 755         fail_unless(obj != NULL,
 756                         "sdb_store_scan callback received NULL obj; expected: "
 757                         "<store base obj>");
 758         fail_unless(i != NULL,
 759                         "sdb_store_scan callback received NULL user_data; "
 760                         "expected: <pointer to data>");
 761
 762         ++(*i);
 763         return 0;
 764 } /* scan_cb */
 765
 766 START_TEST(test_scan)
 767 {
 768 #define PTR_RE "0x[0-9a-f]+"
 769         struct {
 770                 const char *query;
 771                 const char *filter;
 772                 int expected;
 773                 const char *tostring_re;
 774         } golden_data[] = {
 775                 { "host = 'a'", NULL,               1,
 776                         "OBJ\\[host\\]\\{ NAME\\{ 'a', \\(nil\\) \\} \\}" },
 777                 { "host = 'a'", "host = 'x'",       0, /* filter never matches */
 778                         "OBJ\\[host\\]\\{ NAME\\{ 'a', \\(nil\\) \\} \\}" },
 779                 { "host = 'a'",
 780                         "NOT attribute.x = ''",         1, /* filter always matches */
 781                         "OBJ\\[host\\]\\{ NAME\\{ 'a', \\(nil\\) \\} \\}" },
 782                 { "host =~ 'a|b'", NULL,            2,
 783                         "OBJ\\[host\\]\\{ NAME\\{ NULL, "PTR_RE" \\} \\}" },
 784                 { "host =~ 'host'", NULL,           0,
 785                         "OBJ\\[host\\]\\{ NAME\\{ NULL, "PTR_RE" \\} \\}" },
 786                 { "host =~ '.'", NULL,              3,
 787                         "OBJ\\[host\\]\\{ NAME\\{ NULL, "PTR_RE" \\} \\}" },
 788                 { "metric = 'm1'", NULL,            2,
 789                         "OBJ\\[metric\\]\\{ NAME\\{ 'm1', \\(nil\\) } \\}" },
 790                 { "metric= 'm1'", "host = 'x'",     0, /* filter never matches */
 791                         "OBJ\\[metric\\]\\{ NAME\\{ 'm1', \\(nil\\) } \\}" },
 792                 { "metric = 'm1'",
 793                         "NOT attribute.x = ''",         2, /* filter always matches */
 794                         "OBJ\\[metric\\]\\{ NAME\\{ 'm1', \\(nil\\) } \\}" },
 795                 { "metric =~ 'm'", NULL,            2,
 796                         "OBJ\\[metric\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}" },
 797                 { "metric !~ 'm'", NULL,            1,
 798                         "\\(NOT, OBJ\\[metric\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}\\)" },
 799                 { "metric =~ 'x'", NULL,            0,
 800                         "OBJ\\[metric\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}" },
 801                 { "service = 's1'", NULL,           2,
 802                         "OBJ\\[service\\]\\{ NAME\\{ 's1', \\(nil\\) } \\}" },
 803                 { "service = 's1'", "host = 'x'",   0, /* filter never matches */
 804                         "OBJ\\[service\\]\\{ NAME\\{ 's1', \\(nil\\) } \\}" },
 805                 { "service = 's1'",
 806                         "NOT attribute.x = ''",         2, /* filter always matches */
 807                         "OBJ\\[service\\]\\{ NAME\\{ 's1', \\(nil\\) } \\}" },
 808                 { "service =~ 's'", NULL,           2,
 809                         "OBJ\\[service\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}" },
 810                 { "service !~ 's'", NULL,           1,
 811                         "\\(NOT, OBJ\\[service\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}\\)" },
 812                 { "attribute = 'k1'", NULL,         1,
 813                         "OBJ\\[attribute\\]\\{ NAME\\{ 'k1', \\(nil\\) \\} " },
 814                 { "attribute = 'k1'", "host = 'x'", 0, /* filter never matches */
 815                         "OBJ\\[attribute\\]\\{ NAME\\{ 'k1', \\(nil\\) \\} " },
 816                 { "attribute = 'k1'",
 817                         "NOT attribute.x = ''",         1, /* filter always matches */
 818                         "OBJ\\[attribute\\]\\{ NAME\\{ 'k1', \\(nil\\) \\} " },
 819                 { "attribute = 'x'", NULL,          0,
 820                         "OBJ\\[attribute\\]\\{ NAME\\{ 'x', \\(nil\\) \\}" },
 821                 { "attribute.k1 = 'v1'", NULL,      1,
 822                         "ATTR\\[k1\\]\\{ VALUE\\{ 'v1', \\(nil\\) \\} \\}" },
 823                 { "attribute.k1 IS NULL", NULL,     2,
 824                         "\\(IS NULL, ATTR\\[k1\\]\\)" },
 825                 { "attribute.x1 IS NULL", NULL,     3,
 826                         "\\(IS NULL, ATTR\\[x1\\]\\)" },
 827                 { "attribute.k1 IS NOT NULL", NULL, 1,
 828                         "\\(NOT, \\(IS NULL, ATTR\\[k1\\]\\)\\)" },
 829                 { "attribute.x1 IS NOT NULL", NULL, 0,
 830                         "\\(NOT, \\(IS NULL, ATTR\\[x1\\]\\)\\)" },
 831                 { "attribute.k2 < 123", NULL,       0,
 832                         "ATTR\\[k2\\]\\{ < 123 \\}" },
 833                 { "attribute.k2 <= 123", NULL,      1,
 834                         "ATTR\\[k2\\]\\{ <= 123 \\}" },
 835                 { "attribute.k2 >= 123", NULL,      1,
 836                         "ATTR\\[k2\\]\\{ >= 123 \\}" },
 837                 { "attribute.k2 > 123", NULL,       0,
 838                         "ATTR\\[k2\\]\\{ > 123 \\}" },
 839                 { "attribute.k2 = 123", NULL,       1,
 840                         "ATTR\\[k2\\]\\{ = 123 \\}" },
 841                 { "attribute.k2 != 123", NULL,      2,
 842                         "\\(NOT, ATTR\\[k2\\]\\{ = 123 \\}\\)" },
 843                 { "attribute.k1 != 'v1'", NULL,     2,
 844                         "\\(NOT, ATTR\\[k1\\]\\{ VALUE\\{ 'v1', \\(nil\\) \\} \\}\\)" },
 845                 { "attribute.k1 != 'v2'", NULL,     3,
 846                         "\\(NOT, ATTR\\[k1\\]\\{ VALUE\\{ 'v2', \\(nil\\) \\} \\}\\)" },
 847                 { "attribute != 'x' "
 848                   "AND attribute.y !~ 'x'", NULL,   3,
 849                         "\\(AND, "
 850                                 "\\(NOT, OBJ\\[attribute\\]\\{ NAME\\{ 'x', \\(nil\\) \\} \\}\\), "
 851                                 "\\(NOT, ATTR\\[y\\]\\{ VALUE\\{ NULL, "PTR_RE" \\} \\}\\)\\)" },
 852         };
 853
 854         int check, n;
 855         size_t i;
 856
 857         n = 0;
 858         check = sdb_store_scan(/* matcher */ NULL, /* filter */ NULL,
 859                         scan_cb, &n);
 860         fail_unless(check == 0,
 861                         "sdb_store_scan() = %d; expected: 0", check);
 862         fail_unless(n == 3,
 863                         "sdb_store_scan called callback %d times; expected: 3", (int)n);
 864
 865         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 866                 sdb_store_matcher_t *m, *filter = NULL;
 867                 char buf[4096];
 868
 869                 m = sdb_fe_parse_matcher(golden_data[i].query, -1);
 870                 fail_unless(m != NULL,
 871                                 "sdb_fe_parse_matcher(%s, -1) = NULL; expected: <matcher>",
 872                                 golden_data[i].query);
 873
 874                 if (golden_data[i].filter) {
 875                         filter = sdb_fe_parse_matcher(golden_data[i].filter, -1);
 876                         fail_unless(filter != NULL,
 877                                         "sdb_fe_parse_matcher(%s, -1) = NULL; "
 878                                         "expected: <matcher>", golden_data[i].filter);
 879                 }
 880
 881                 fail_unless(sdb_regmatches(golden_data[i].tostring_re,
 882                                         sdb_store_matcher_tostring(m, buf, sizeof(buf))) == 0,
 883                                 "sdb_fe_parse_matcher(%s, -1) = %s; expected: %s",
 884                                 golden_data[i].query,
 885                                 sdb_store_matcher_tostring(m, buf, sizeof(buf)),
 886                                 golden_data[i].tostring_re);
 887
 888                 n = 0;
 889                 sdb_store_scan(m, filter, scan_cb, &n);
 890                 fail_unless(n == golden_data[i].expected,
 891                                 "sdb_store_scan(matcher{%s}, filter{%s}) found %d hosts; "
 892                                 "expected: %d", golden_data[i].query, golden_data[i].filter,
 893                                 n, golden_data[i].expected);
 894                 sdb_object_deref(SDB_OBJ(filter));
 895                 sdb_object_deref(SDB_OBJ(m));
 896         }
 897 }
 898 END_TEST
 899
 900 Suite *
 901 core_store_lookup_suite(void)
 902 {
 903         Suite *s = suite_create("core::store_lookup");
 904         TCase *tc;
 905
 906         tc = tcase_create("core");
 907         tcase_add_checked_fixture(tc, populate, sdb_store_clear);
 908         tcase_add_test(tc, test_store_match_name);
 909         tcase_add_test(tc, test_store_match_attr);
 910         tcase_add_test(tc, test_attr_cond);
 911         tcase_add_test(tc, test_obj_cond);
 912         tcase_add_test(tc, test_store_match_op);
 913         tcase_add_test(tc, test_parse_cmp);
 914         tcase_add_test(tc, test_parse_field_cmp);
 915         tcase_add_test(tc, test_scan);
 916         suite_add_tcase(s, tc);
 917
 918         return s;
 919 } /* core_store_lookup_suite */
 920
 921 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 922