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                 { "k1", { SDB_TYPE_STRING,  { .string  = "0" } },   0, 0, 0, 1, 1 },
 291                 { "k2", { SDB_TYPE_INTEGER, { .integer = 123 } },   0, 1, 1, 1, 0 },
 292                 { "k2", { SDB_TYPE_INTEGER, { .integer = 124 } },   1, 1, 0, 0, 0 },
 293                 { "k2", { SDB_TYPE_INTEGER, { .integer = 122 } },   0, 0, 0, 1, 1 },
 294                 /* key does not exist */
 295                 { "k3", { SDB_TYPE_STRING,  { .string  = "v1" } },  0, 0, 0, 0, 0 },
 296                 { "k3", { SDB_TYPE_STRING,  { .string  = "123" } }, 0, 0, 0, 0, 0 },
 297                 { "k3", { SDB_TYPE_INTEGER, { .integer = 123 } },   0, 0, 0, 0, 0 },
 298                 /* type mismatch */
 299                 { "k1", { SDB_TYPE_INTEGER, { .integer = 0 } },     0, 0, 0, 1, 1 },
 300                 { "k2", { SDB_TYPE_STRING,  { .string  = "123" } }, 0, 1, 1, 1, 0 },
 301         };
 302
 303         int status;
 304         size_t i;
 305
 306         obj = sdb_store_get_host("a");
 307         fail_unless(obj != NULL,
 308                         "sdb_store_get_host(a) = NULL; expected: <host>");
 309
 310         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 311                 sdb_store_expr_t *expr;
 312                 sdb_store_cond_t *c;
 313                 char buf[1024];
 314                 size_t j;
 315
 316                 struct {
 317                         sdb_store_matcher_t *(*matcher)(sdb_store_cond_t *);
 318                         int expected;
 319                 } tests[] = {
 320                         { sdb_store_lt_matcher, golden_data[i].expected_lt },
 321                         { sdb_store_le_matcher, golden_data[i].expected_le },
 322                         { sdb_store_eq_matcher, golden_data[i].expected_eq },
 323                         { sdb_store_ge_matcher, golden_data[i].expected_ge },
 324                         { sdb_store_gt_matcher, golden_data[i].expected_gt },
 325                 };
 326
 327                 sdb_data_format(&golden_data[i].value,
 328                                 buf, sizeof(buf), SDB_UNQUOTED);
 329
 330                 expr = sdb_store_expr_constvalue(&golden_data[i].value);
 331                 fail_unless(expr != NULL,
 332                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 333                                 buf);
 334
 335                 c = sdb_store_attr_cond(golden_data[i].attr, expr);
 336                 sdb_object_deref(SDB_OBJ(expr));
 337                 fail_unless(c != NULL,
 338                                 "sdb_store_attr_cond(%s, expr{%s}) = NULL; expected: <cond>",
 339                                 golden_data[i].attr, buf);
 340
 341                 for (j = 0; j < SDB_STATIC_ARRAY_LEN(tests); ++j) {
 342                         sdb_store_matcher_t *m;
 343                         char m_str[1024];
 344
 345                         m = tests[j].matcher(c);
 346                         fail_unless(m != NULL,
 347                                         "sdb_store_<cond>_matcher() = NULL; expected: <matcher>");
 348
 349                         status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 350                         fail_unless(status == tests[j].expected,
 351                                         "sdb_store_matcher_matches(%s, <obj>, NULL) = %d; "
 352                                         "expected: %d",
 353                                         sdb_store_matcher_tostring(m, m_str, sizeof(m_str)),
 354                                         status, tests[j].expected);
 355
 356                         sdb_object_deref(SDB_OBJ(m));
 357                 }
 358
 359                 sdb_object_deref(SDB_OBJ(c));
 360         }
 361
 362         sdb_object_deref(SDB_OBJ(obj));
 363 }
 364 END_TEST
 365
 366 START_TEST(test_obj_cond)
 367 {
 368         struct {
 369                 const char *host;
 370                 int field;
 371                 const sdb_data_t value;
 372                 int expected_lt, expected_le, expected_eq, expected_ge, expected_gt;
 373         } golden_data[] = {
 374                 /* last-update = 1 for all objects */
 375                 { "a", SDB_FIELD_LAST_UPDATE,
 376                         { SDB_TYPE_DATETIME, { .datetime = 1 } }, 0, 1, 1, 1, 0 },
 377                 { "a", SDB_FIELD_LAST_UPDATE,
 378                         { SDB_TYPE_DATETIME, { .datetime = 2 } }, 1, 1, 0, 0, 0 },
 379                 { "a", SDB_FIELD_LAST_UPDATE,
 380                         { SDB_TYPE_DATETIME, { .datetime = 0 } }, 0, 0, 0, 1, 1 },
 381                 /* age > 0 for all objects */
 382                 { "a", SDB_FIELD_AGE,
 383                         { SDB_TYPE_DATETIME, { .datetime = 0 } }, 0, 0, 0, 1, 1 },
 384                 /* interval = 0 for all objects */
 385                 { "a", SDB_FIELD_INTERVAL,
 386                         { SDB_TYPE_DATETIME, { .datetime = 0 } }, 0, 1, 1, 1, 0 },
 387                 { "a", SDB_FIELD_INTERVAL,
 388                         { SDB_TYPE_DATETIME, { .datetime = 1 } }, 1, 1, 0, 0, 0 },
 389                 /* type mismatch */
 390                 { "a", SDB_FIELD_LAST_UPDATE,
 391                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 392                 { "a", SDB_FIELD_AGE,
 393                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 394                 { "a", SDB_FIELD_INTERVAL,
 395                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 396                 { "a", SDB_FIELD_BACKEND,
 397                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 398                 { "a", SDB_FIELD_BACKEND,
 399                         { SDB_TYPE_INTEGER, { .integer = 0 } }, 0, 0, 0, 0, 0 },
 400                 /* (64bit) integer value without zero-bytes */
 401                 { "a", SDB_FIELD_BACKEND,
 402                         { SDB_TYPE_INTEGER, { .integer = 0xffffffffffffffffL } },
 403                         0, 0, 0, 0, 0 },
 404         };
 405
 406         int status;
 407         size_t i;
 408
 409         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 410                 sdb_store_obj_t *obj;
 411                 sdb_store_expr_t *expr;
 412                 sdb_store_cond_t *c;
 413                 char buf[1024];
 414                 size_t j;
 415
 416                 struct {
 417                         sdb_store_matcher_t *(*matcher)(sdb_store_cond_t *);
 418                         int expected;
 419                 } tests[] = {
 420                         { sdb_store_lt_matcher, golden_data[i].expected_lt },
 421                         { sdb_store_le_matcher, golden_data[i].expected_le },
 422                         { sdb_store_eq_matcher, golden_data[i].expected_eq },
 423                         { sdb_store_ge_matcher, golden_data[i].expected_ge },
 424                         { sdb_store_gt_matcher, golden_data[i].expected_gt },
 425                 };
 426
 427                 obj = sdb_store_get_host(golden_data[i].host);
 428                 fail_unless(obj != NULL,
 429                                 "sdb_store_get_host(%s) = NULL; expected: <host>",
 430                                 golden_data[i].host);
 431
 432                 sdb_data_format(&golden_data[i].value,
 433                                 buf, sizeof(buf), SDB_UNQUOTED);
 434
 435                 expr = sdb_store_expr_constvalue(&golden_data[i].value);
 436                 fail_unless(expr != NULL,
 437                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 438                                 buf);
 439
 440                 c = sdb_store_obj_cond(golden_data[i].field, expr);
 441                 sdb_object_deref(SDB_OBJ(expr));
 442                 fail_unless(c != NULL,
 443                                 "sdb_store_obj_cond(%d, expr{%s}) = NULL; expected: <cond>",
 444                                 golden_data[i].field, buf);
 445
 446                 for (j = 0; j < SDB_STATIC_ARRAY_LEN(tests); ++j) {
 447                         sdb_store_matcher_t *m;
 448                         char m_str[1024];
 449
 450                         m = tests[j].matcher(c);
 451                         fail_unless(m != NULL,
 452                                         "sdb_store_<cond>_matcher() = NULL; expected: <matcher>");
 453
 454                         status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 455                         fail_unless(status == tests[j].expected,
 456                                         "sdb_store_matcher_matches(%s, <obj>, NULL) = %d; "
 457                                         "expected: %d",
 458                                         sdb_store_matcher_tostring(m, m_str, sizeof(m_str)),
 459                                         status, tests[j].expected);
 460
 461                         sdb_object_deref(SDB_OBJ(m));
 462                 }
 463
 464                 sdb_object_deref(SDB_OBJ(c));
 465                 sdb_object_deref(SDB_OBJ(obj));
 466         }
 467 }
 468 END_TEST
 469
 470 START_TEST(test_store_match_op)
 471 {
 472         sdb_store_obj_t *obj;
 473
 474         sdb_store_matcher_t *always = sdb_store_name_matcher(SDB_HOST, "a", 0);
 475         sdb_store_matcher_t *never = sdb_store_name_matcher(SDB_HOST, "z", 0);
 476
 477         struct {
 478                 const char *op;
 479                 sdb_store_matcher_t *left;
 480                 sdb_store_matcher_t *right;
 481                 int expected;
 482         } golden_data[] = {
 483                 { "OR",  always, always, 1 },
 484                 { "OR",  always, never,  1 },
 485                 { "OR",  never,  always, 1 },
 486                 { "OR",  never,  never,  0 },
 487                 { "AND", always, always, 1 },
 488                 { "AND", always, never,  0 },
 489                 { "AND", never,  always, 0 },
 490                 { "AND", never,  never,  0 },
 491         };
 492
 493         int status;
 494         size_t i;
 495
 496         obj = sdb_store_get_host("a");
 497
 498         status = sdb_store_matcher_matches(always, obj, /* filter */ NULL);
 499         fail_unless(status == 1,
 500                         "INTERNAL ERROR: 'always' did not match host");
 501         status = sdb_store_matcher_matches(never, obj, /* filter */ NULL);
 502         fail_unless(status == 0,
 503                         "INTERNAL ERROR: 'never' matches host");
 504
 505         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 506                 sdb_store_matcher_t *m;
 507
 508                 if (! strcmp(golden_data[i].op, "OR"))
 509                         m = sdb_store_dis_matcher(golden_data[i].left,
 510                                         golden_data[i].right);
 511                 else if (! strcmp(golden_data[i].op, "AND"))
 512                         m = sdb_store_con_matcher(golden_data[i].left,
 513                                         golden_data[i].right);
 514                 else {
 515                         fail("INTERNAL ERROR: unexpected operator %s", golden_data[i].op);
 516                         continue;
 517                 }
 518
 519 #define TO_NAME(v) (((v) == always) ? "always" \
 520                 : ((v) == never) ? "never" : "<unknown>")
 521
 522                 status = sdb_store_matcher_matches(m, obj, /* filter */ NULL);
 523                 fail_unless(status == golden_data[i].expected,
 524                                 "%s(%s, %s, NULL) = %d; expected: %d", golden_data[i].op,
 525                                 TO_NAME(golden_data[i].left), TO_NAME(golden_data[i].right),
 526                                 status, golden_data[i].expected);
 527
 528 #undef TO_NAME
 529
 530                 sdb_object_deref(SDB_OBJ(m));
 531         }
 532
 533         sdb_object_deref(SDB_OBJ(always));
 534         sdb_object_deref(SDB_OBJ(never));
 535
 536         sdb_object_deref(SDB_OBJ(obj));
 537 }
 538 END_TEST
 539
 540 START_TEST(test_parse_cmp)
 541 {
 542         sdb_data_t hostname   = { SDB_TYPE_STRING,  { .string  = "hostname" } };
 543         sdb_data_t metricname = { SDB_TYPE_STRING,  { .string  = "metricname" } };
 544         sdb_data_t srvname    = { SDB_TYPE_STRING,  { .string  = "srvname" } };
 545         sdb_data_t attrname   = { SDB_TYPE_STRING,  { .string  = "attrname" } };
 546         sdb_data_t attrvalue  = { SDB_TYPE_INTEGER, { .integer = 4711 } };
 547
 548         sdb_store_matcher_t *check;
 549
 550         size_t i;
 551
 552         struct {
 553                 const char *obj_type;
 554                 const char *attr;
 555                 const char *op;
 556                 const sdb_data_t *value;
 557                 int expected;
 558         } golden_data[] = {
 559                 { "host",      NULL,   "=",  &hostname,   MATCHER_NAME },
 560                 { "host",      NULL,   "!=", &hostname,   MATCHER_NOT },
 561                 { "host",      NULL,   "=~", &hostname,   MATCHER_NAME },
 562                 { "host",      NULL,   "!~", &hostname,   MATCHER_NOT },
 563                 { "host",      "attr", "=",  &hostname,   -1 },
 564                 { "host",      "attr", "!=", &hostname,   -1 },
 565                 { "host",      "attr", "!=", &attrvalue,  -1 },
 566                 { "host",      "attr", "<=", &attrvalue,  -1 },
 567                 { "host",      NULL,   "&^", &hostname,   -1 },
 568                 { "host",      NULL,   "<",  &hostname,   -1 },
 569                 { "host",      NULL,   "<=", &hostname,   -1 },
 570                 { "host",      NULL,   ">=", &hostname,   -1 },
 571                 { "host",      NULL,   ">",  &hostname,   -1 },
 572                 { "host",      NULL,   "=",  NULL,        -1 },
 573                 { "metric",    NULL,   "=",  &metricname, MATCHER_NAME },
 574                 { "metric",    NULL,   "!=", &metricname, MATCHER_NOT },
 575                 { "metric",    NULL,   "=~", &metricname, MATCHER_NAME },
 576                 { "metric",    NULL,   "!~", &metricname, MATCHER_NOT },
 577                 { "metric",    "attr", "=",  &metricname, -1 },
 578                 { "metric",    "attr", "!=", &metricname, -1 },
 579                 { "metric",    "attr", "!=", &attrvalue,  -1 },
 580                 { "metric",    "attr", "<=", &attrvalue,  -1 },
 581                 { "metric",    NULL,   "&^", &metricname, -1 },
 582                 { "metric",    NULL,   "<",  &metricname, -1 },
 583                 { "metric",    NULL,   "<=", &metricname, -1 },
 584                 { "metric",    NULL,   ">=", &metricname, -1 },
 585                 { "metric",    NULL,   ">",  &metricname, -1 },
 586                 { "metric",    NULL,   "=",  NULL,        -1 },
 587                 { "service",   NULL,   "=",  &srvname,    MATCHER_NAME },
 588                 { "service",   NULL,   "!=", &srvname,    MATCHER_NOT },
 589                 { "service",   NULL,   "=~", &srvname,    MATCHER_NAME },
 590                 { "service",   NULL,   "!~", &srvname,    MATCHER_NOT },
 591                 { "service",   "attr", "=",  &srvname,    -1 },
 592                 { "service",   "attr", "!=", &srvname,    -1 },
 593                 { "service",   "attr", "!=", &attrvalue,  -1 },
 594                 { "service",   "attr", "<=", &attrvalue,  -1 },
 595                 { "service",   NULL,   "&^", &srvname,    -1 },
 596                 { "service",   NULL,   "<",  &srvname,    -1 },
 597                 { "service",   NULL,   "<=", &srvname,    -1 },
 598                 { "service",   NULL,   ">=", &srvname,    -1 },
 599                 { "service",   NULL,   ">",  &srvname,    -1 },
 600                 { "service",   NULL,   "=",  NULL,        -1 },
 601                 { "attribute", NULL,   "=",  &attrname,   MATCHER_NAME },
 602                 { "attribute", NULL,   "!=", &attrname,   MATCHER_NOT },
 603                 { "attribute", NULL,   "=~", &attrname,   MATCHER_NAME },
 604                 { "attribute", NULL,   "!~", &attrname,   MATCHER_NOT },
 605                 { "attribute", NULL,   "<",  &attrname,   -1 },
 606                 { "attribute", NULL,   "<=", &attrname,   -1 },
 607                 { "attribute", NULL,   ">=", &attrname,   -1 },
 608                 { "attribute", NULL,   ">",  &attrname,   -1 },
 609                 { "attribute", NULL,   "=",  NULL,        -1 },
 610                 { "attribute", "attr", "=",  &attrname,   MATCHER_ATTR },
 611                 { "attribute", "attr", "!=", &attrname,   MATCHER_NOT },
 612                 { "attribute", "attr", "=~", &attrname,   MATCHER_ATTR },
 613                 { "attribute", "attr", "!~", &attrname,   MATCHER_NOT },
 614                 { "attribute", "attr", "&^", &attrname,   -1 },
 615                 { "attribute", "attr", "<",  NULL,        -1 },
 616                 { "attribute", "attr", "<",  &attrname,   MATCHER_LT },
 617                 { "attribute", "attr", "<=", &attrname,   MATCHER_LE },
 618 /*              { "attribute", "attr", "=",  &attrname,   MATCHER_EQ }, */
 619                 { "attribute", "attr", ">=", &attrname,   MATCHER_GE },
 620                 { "attribute", "attr", ">",  &attrname,   MATCHER_GT },
 621                 { "attribute", "attr", "IS", NULL,        MATCHER_ISNULL },
 622                 { "attribute", "attr", "IS", &attrname,   -1 },
 623                 { "foo",       NULL,   "=",  &attrname,   -1 },
 624                 { "foo",       "attr", "=",  &attrname,   -1 },
 625         };
 626
 627         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 628                 sdb_store_expr_t *expr;
 629                 char buf[1024];
 630
 631                 if (sdb_data_format(golden_data[i].value,
 632                                         buf, sizeof(buf), SDB_UNQUOTED) < 0)
 633                         snprintf(buf, sizeof(buf), "ERR");
 634
 635                 expr = sdb_store_expr_constvalue(golden_data[i].value);
 636                 fail_unless(expr != NULL || golden_data[i].value == NULL,
 637                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 638                                 buf);
 639
 640                 check = sdb_store_matcher_parse_cmp(golden_data[i].obj_type,
 641                                 golden_data[i].attr, golden_data[i].op, expr);
 642                 sdb_object_deref(SDB_OBJ(expr));
 643
 644                 if (golden_data[i].expected == -1) {
 645                         fail_unless(check == NULL,
 646                                         "sdb_store_matcher_parse_cmp(%s, %s, %s, expr{%s}) = %p; "
 647                                         "expected: NULL", golden_data[i].obj_type,
 648                                         golden_data[i].attr, golden_data[i].op, buf, check);
 649                         continue;
 650                 }
 651
 652                 fail_unless(check != NULL,
 653                                 "sdb_store_matcher_parse_cmp(%s, %s, %s, %s) = %p; "
 654                                 "expected: NULL", golden_data[i].obj_type,
 655                                 golden_data[i].attr, golden_data[i].op, buf, check);
 656                 fail_unless(M(check)->type == golden_data[i].expected,
 657                                 "sdb_store_matcher_parse_cmp(%s, %s, %s, %s) returned matcher "
 658                                 "of type %d; expected: %d", golden_data[i].obj_type,
 659                                 golden_data[i].attr, golden_data[i].op, buf,
 660                                 M(check)->type, golden_data[i].expected);
 661
 662                 sdb_object_deref(SDB_OBJ(check));
 663         }
 664 }
 665 END_TEST
 666
 667 START_TEST(test_parse_field_cmp)
 668 {
 669         sdb_data_t datetime = { SDB_TYPE_DATETIME, { .datetime = 1 } };
 670         sdb_data_t string = { SDB_TYPE_STRING, { .string = "s" } };
 671
 672         struct {
 673                 const char *field;
 674                 const char *op;
 675                 const sdb_data_t *value;
 676                 int expected;
 677         } golden_data[] = {
 678                 { "last_update", "<",  &datetime, MATCHER_LT },
 679                 { "last_update", "<=", &datetime, MATCHER_LE },
 680                 { "last_update", "=",  &datetime, MATCHER_EQ },
 681                 { "last_update", ">=", &datetime, MATCHER_GE },
 682                 { "last_update", ">",  &datetime, MATCHER_GT },
 683                 { "last_update", "!=", &datetime, MATCHER_NOT },
 684                 { "age",         "<",  &datetime, MATCHER_LT },
 685                 { "age",         "<=", &datetime, MATCHER_LE },
 686                 { "age",         "=",  &datetime, MATCHER_EQ },
 687                 { "age",         ">=", &datetime, MATCHER_GE },
 688                 { "age",         ">",  &datetime, MATCHER_GT },
 689                 { "age",         "!=", &datetime, MATCHER_NOT },
 690                 { "interval",    "<",  &datetime, MATCHER_LT },
 691                 { "interval",    "<=", &datetime, MATCHER_LE },
 692                 { "interval",    "=",  &datetime, MATCHER_EQ },
 693                 { "interval",    ">=", &datetime, MATCHER_GE },
 694                 { "interval",    ">",  &datetime, MATCHER_GT },
 695                 { "interval",    "!=", &datetime, MATCHER_NOT },
 696                 { "backend",     "=",  &string,   MATCHER_EQ },
 697                 { "backend",     "!=", &string,   MATCHER_NOT },
 698                 /* the behavior for other operators on :backend
 699                  * is currently unspecified */
 700                 { "last_update", "=",  NULL,      -1 },
 701                 { "last_update", "IS", NULL,      -1 },
 702                 { "age",         "=",  NULL,      -1 },
 703                 { "interval",    "=",  NULL,      -1 },
 704                 { "backend",     "=",  NULL,      -1 },
 705                 { "backend",     "=~", &string,   -1 },
 706         };
 707
 708         size_t i;
 709
 710         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 711                 sdb_store_matcher_t *check;
 712                 sdb_store_expr_t *expr;
 713                 char buf[1024];
 714
 715                 if (sdb_data_format(golden_data[i].value,
 716                                         buf, sizeof(buf), SDB_UNQUOTED) < 0)
 717                         snprintf(buf, sizeof(buf), "ERR");
 718
 719                 expr = sdb_store_expr_constvalue(golden_data[i].value);
 720                 fail_unless(expr != NULL || golden_data[i].value == NULL,
 721                                 "sdb_store_expr_constvalue(%s) = NULL; expected: <expr>",
 722                                 buf);
 723
 724                 check = sdb_store_matcher_parse_field_cmp(golden_data[i].field,
 725                                 golden_data[i].op, expr);
 726                 sdb_object_deref(SDB_OBJ(expr));
 727
 728                 if (golden_data[i].expected == -1) {
 729                         fail_unless(check == NULL,
 730                                         "sdb_store_matcher_parse_field_cmp(%s, %s, expr{%s}) = %p; "
 731                                         "expected: NULL", golden_data[i].field,
 732                                         golden_data[i].op, buf, check);
 733                         continue;
 734                 }
 735
 736                 fail_unless(check != NULL,
 737                                 "sdb_store_matcher_parse_field_cmp(%s, %s, %s) = %p; "
 738                                 "expected: NULL", golden_data[i].field,
 739                                 golden_data[i].op, buf, check);
 740                 fail_unless(M(check)->type == golden_data[i].expected,
 741                                 "sdb_store_matcher_parse_field_cmp(%s, %s, %s) returned "
 742                                 "matcher of type %d; expected: %d", golden_data[i].field,
 743                                 golden_data[i].op, buf, M(check)->type,
 744                                 golden_data[i].expected);
 745
 746                 sdb_object_deref(SDB_OBJ(check));
 747         }
 748 }
 749 END_TEST
 750
 751 static int
 752 scan_cb(sdb_store_obj_t *obj, void *user_data)
 753 {
 754         int *i = user_data;
 755
 756         fail_unless(obj != NULL,
 757                         "sdb_store_scan callback received NULL obj; expected: "
 758                         "<store base obj>");
 759         fail_unless(i != NULL,
 760                         "sdb_store_scan callback received NULL user_data; "
 761                         "expected: <pointer to data>");
 762
 763         ++(*i);
 764         return 0;
 765 } /* scan_cb */
 766
 767 START_TEST(test_scan)
 768 {
 769 #define PTR_RE "0x[0-9a-f]+"
 770         struct {
 771                 const char *query;
 772                 const char *filter;
 773                 int expected;
 774                 const char *tostring_re;
 775         } golden_data[] = {
 776                 { "host = 'a'", NULL,               1,
 777                         "OBJ\\[host\\]\\{ NAME\\{ 'a', \\(nil\\) \\} \\}" },
 778                 { "host = 'a'", "host = 'x'",       0, /* filter never matches */
 779                         "OBJ\\[host\\]\\{ NAME\\{ 'a', \\(nil\\) \\} \\}" },
 780                 { "host = 'a'",
 781                         "NOT attribute.x = ''",         1, /* filter always matches */
 782                         "OBJ\\[host\\]\\{ NAME\\{ 'a', \\(nil\\) \\} \\}" },
 783                 { "host =~ 'a|b'", NULL,            2,
 784                         "OBJ\\[host\\]\\{ NAME\\{ NULL, "PTR_RE" \\} \\}" },
 785                 { "host =~ 'host'", NULL,           0,
 786                         "OBJ\\[host\\]\\{ NAME\\{ NULL, "PTR_RE" \\} \\}" },
 787                 { "host =~ '.'", NULL,              3,
 788                         "OBJ\\[host\\]\\{ NAME\\{ NULL, "PTR_RE" \\} \\}" },
 789                 { "metric = 'm1'", NULL,            2,
 790                         "OBJ\\[metric\\]\\{ NAME\\{ 'm1', \\(nil\\) } \\}" },
 791                 { "metric= 'm1'", "host = 'x'",     0, /* filter never matches */
 792                         "OBJ\\[metric\\]\\{ NAME\\{ 'm1', \\(nil\\) } \\}" },
 793                 { "metric = 'm1'",
 794                         "NOT attribute.x = ''",         2, /* filter always matches */
 795                         "OBJ\\[metric\\]\\{ NAME\\{ 'm1', \\(nil\\) } \\}" },
 796                 { "metric =~ 'm'", NULL,            2,
 797                         "OBJ\\[metric\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}" },
 798                 { "metric !~ 'm'", NULL,            1,
 799                         "\\(NOT, OBJ\\[metric\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}\\)" },
 800                 { "metric =~ 'x'", NULL,            0,
 801                         "OBJ\\[metric\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}" },
 802                 { "service = 's1'", NULL,           2,
 803                         "OBJ\\[service\\]\\{ NAME\\{ 's1', \\(nil\\) } \\}" },
 804                 { "service = 's1'", "host = 'x'",   0, /* filter never matches */
 805                         "OBJ\\[service\\]\\{ NAME\\{ 's1', \\(nil\\) } \\}" },
 806                 { "service = 's1'",
 807                         "NOT attribute.x = ''",         2, /* filter always matches */
 808                         "OBJ\\[service\\]\\{ NAME\\{ 's1', \\(nil\\) } \\}" },
 809                 { "service =~ 's'", NULL,           2,
 810                         "OBJ\\[service\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}" },
 811                 { "service !~ 's'", NULL,           1,
 812                         "\\(NOT, OBJ\\[service\\]\\{ NAME\\{ NULL, "PTR_RE" } \\}\\)" },
 813                 { "attribute = 'k1'", NULL,         1,
 814                         "OBJ\\[attribute\\]\\{ NAME\\{ 'k1', \\(nil\\) \\} " },
 815                 { "attribute = 'k1'", "host = 'x'", 0, /* filter never matches */
 816                         "OBJ\\[attribute\\]\\{ NAME\\{ 'k1', \\(nil\\) \\} " },
 817                 { "attribute = 'k1'",
 818                         "NOT attribute.x = ''",         1, /* filter always matches */
 819                         "OBJ\\[attribute\\]\\{ NAME\\{ 'k1', \\(nil\\) \\} " },
 820                 { "attribute = 'x'", NULL,          0,
 821                         "OBJ\\[attribute\\]\\{ NAME\\{ 'x', \\(nil\\) \\}" },
 822                 { "attribute.k1 = 'v1'", NULL,      1,
 823                         "ATTR\\[k1\\]\\{ VALUE\\{ 'v1', \\(nil\\) \\} \\}" },
 824                 { "attribute.k1 IS NULL", NULL,     2,
 825                         "\\(IS NULL, ATTR\\[k1\\]\\)" },
 826                 { "attribute.x1 IS NULL", NULL,     3,
 827                         "\\(IS NULL, ATTR\\[x1\\]\\)" },
 828                 { "attribute.k1 IS NOT NULL", NULL, 1,
 829                         "\\(NOT, \\(IS NULL, ATTR\\[k1\\]\\)\\)" },
 830                 { "attribute.x1 IS NOT NULL", NULL, 0,
 831                         "\\(NOT, \\(IS NULL, ATTR\\[x1\\]\\)\\)" },
 832                 { "attribute.k2 < 123", NULL,       0,
 833                         "ATTR\\[k2\\]\\{ < 123 \\}" },
 834                 { "attribute.k2 <= 123", NULL,      1,
 835                         "ATTR\\[k2\\]\\{ <= 123 \\}" },
 836                 { "attribute.k2 >= 123", NULL,      1,
 837                         "ATTR\\[k2\\]\\{ >= 123 \\}" },
 838                 { "attribute.k2 > 123", NULL,       0,
 839                         "ATTR\\[k2\\]\\{ > 123 \\}" },
 840                 { "attribute.k2 = 123", NULL,       1,
 841                         "ATTR\\[k2\\]\\{ = 123 \\}" },
 842                 { "attribute.k2 != 123", NULL,      2,
 843                         "\\(NOT, ATTR\\[k2\\]\\{ = 123 \\}\\)" },
 844                 { "attribute.k1 != 'v1'", NULL,     2,
 845                         "\\(NOT, ATTR\\[k1\\]\\{ VALUE\\{ 'v1', \\(nil\\) \\} \\}\\)" },
 846                 { "attribute.k1 != 'v2'", NULL,     3,
 847                         "\\(NOT, ATTR\\[k1\\]\\{ VALUE\\{ 'v2', \\(nil\\) \\} \\}\\)" },
 848                 { "attribute != 'x' "
 849                   "AND attribute.y !~ 'x'", NULL,   3,
 850                         "\\(AND, "
 851                                 "\\(NOT, OBJ\\[attribute\\]\\{ NAME\\{ 'x', \\(nil\\) \\} \\}\\), "
 852                                 "\\(NOT, ATTR\\[y\\]\\{ VALUE\\{ NULL, "PTR_RE" \\} \\}\\)\\)" },
 853         };
 854
 855         int check, n;
 856         size_t i;
 857
 858         n = 0;
 859         check = sdb_store_scan(/* matcher */ NULL, /* filter */ NULL,
 860                         scan_cb, &n);
 861         fail_unless(check == 0,
 862                         "sdb_store_scan() = %d; expected: 0", check);
 863         fail_unless(n == 3,
 864                         "sdb_store_scan called callback %d times; expected: 3", (int)n);
 865
 866         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 867                 sdb_store_matcher_t *m, *filter = NULL;
 868                 char buf[4096];
 869
 870                 m = sdb_fe_parse_matcher(golden_data[i].query, -1);
 871                 fail_unless(m != NULL,
 872                                 "sdb_fe_parse_matcher(%s, -1) = NULL; expected: <matcher>",
 873                                 golden_data[i].query);
 874
 875                 if (golden_data[i].filter) {
 876                         filter = sdb_fe_parse_matcher(golden_data[i].filter, -1);
 877                         fail_unless(filter != NULL,
 878                                         "sdb_fe_parse_matcher(%s, -1) = NULL; "
 879                                         "expected: <matcher>", golden_data[i].filter);
 880                 }
 881
 882                 fail_unless(sdb_regmatches(golden_data[i].tostring_re,
 883                                         sdb_store_matcher_tostring(m, buf, sizeof(buf))) == 0,
 884                                 "sdb_fe_parse_matcher(%s, -1) = %s; expected: %s",
 885                                 golden_data[i].query,
 886                                 sdb_store_matcher_tostring(m, buf, sizeof(buf)),
 887                                 golden_data[i].tostring_re);
 888
 889                 n = 0;
 890                 sdb_store_scan(m, filter, scan_cb, &n);
 891                 fail_unless(n == golden_data[i].expected,
 892                                 "sdb_store_scan(matcher{%s}, filter{%s}) found %d hosts; "
 893                                 "expected: %d", golden_data[i].query, golden_data[i].filter,
 894                                 n, golden_data[i].expected);
 895                 sdb_object_deref(SDB_OBJ(filter));
 896                 sdb_object_deref(SDB_OBJ(m));
 897         }
 898 }
 899 END_TEST
 900
 901 Suite *
 902 core_store_lookup_suite(void)
 903 {
 904         Suite *s = suite_create("core::store_lookup");
 905         TCase *tc;
 906
 907         tc = tcase_create("core");
 908         tcase_add_checked_fixture(tc, populate, sdb_store_clear);
 909         tcase_add_test(tc, test_store_match_name);
 910         tcase_add_test(tc, test_store_match_attr);
 911         tcase_add_test(tc, test_attr_cond);
 912         tcase_add_test(tc, test_obj_cond);
 913         tcase_add_test(tc, test_store_match_op);
 914         tcase_add_test(tc, test_parse_cmp);
 915         tcase_add_test(tc, test_parse_field_cmp);
 916         tcase_add_test(tc, test_scan);
 917         suite_add_tcase(s, tc);
 918
 919         return s;
 920 } /* core_store_lookup_suite */
 921
 922 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 923