t/unit/core/store_test.c

   1 /*
   2  * SysDB - t/unit/core/store_test.c
   3  * Copyright (C) 2013 Sebastian 'tokkee' Harl <sh@tokkee.org>
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  16  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  17  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  18  * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
  19  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  20  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  21  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  22  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  23  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  24  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  25  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 #include "core/store.h"
  29 #include "core/store-private.h"
  30 #include "libsysdb_test.h"
  31
  32 #include <check.h>
  33 #include <string.h>
  34
  35 static void
  36 populate(void)
  37 {
  38         sdb_data_t datum;
  39
  40         sdb_store_host("h1", 1);
  41         sdb_store_host("h2", 3);
  42
  43         datum.type = SDB_TYPE_STRING;
  44         datum.data.string = "v1";
  45         sdb_store_attribute("h1", "k1", &datum, 1);
  46         datum.data.string = "v2";
  47         sdb_store_attribute("h1", "k2", &datum, 2);
  48         datum.data.string = "v3";
  49         sdb_store_attribute("h1", "k3", &datum, 2);
  50
  51         /* make sure that older updates don't overwrite existing values */
  52         datum.data.string = "fail";
  53         sdb_store_attribute("h1", "k2", &datum, 1);
  54         sdb_store_attribute("h1", "k3", &datum, 2);
  55
  56         sdb_store_metric("h1", "m1", /* store */ NULL, 2);
  57         sdb_store_metric("h1", "m2", /* store */ NULL, 1);
  58
  59         sdb_store_service("h2", "s1", 1);
  60         sdb_store_service("h2", "s2", 2);
  61
  62         datum.type = SDB_TYPE_INTEGER;
  63         datum.data.integer = 42;
  64         sdb_store_metric_attr("h1", "m1", "k3", &datum, 2);
  65
  66         datum.data.integer = 123;
  67         sdb_store_service_attr("h2", "s2", "k1", &datum, 2);
  68         datum.data.integer = 4711;
  69         sdb_store_service_attr("h2", "s2", "k2", &datum, 1);
  70
  71         /* don't overwrite k1 */
  72         datum.data.integer = 666;
  73         sdb_store_service_attr("h2", "s2", "k1", &datum, 2);
  74 } /* populate */
  75
  76 START_TEST(test_store_host)
  77 {
  78         struct {
  79                 const char *name;
  80                 sdb_time_t  last_update;
  81                 int         expected;
  82         } golden_data[] = {
  83                 { "a", 1, 0 },
  84                 { "a", 2, 0 },
  85                 { "a", 1, 1 },
  86                 { "b", 1, 0 },
  87                 { "b", 1, 1 },
  88                 { "A", 1, 1 }, /* case-insensitive */
  89                 { "A", 3, 0 },
  90         };
  91
  92         struct {
  93                 const char *name;
  94                 _Bool       has;
  95         } golden_hosts[] = {
  96                 { "a", 1 == 1 },
  97                 { "b", 1 == 1 },
  98                 { "c", 0 == 1 },
  99                 { "A", 1 == 1 },
 100         };
 101
 102         size_t i;
 103
 104         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 105                 int status;
 106
 107                 status = sdb_store_host(golden_data[i].name,
 108                                 golden_data[i].last_update);
 109                 fail_unless(status == golden_data[i].expected,
 110                                 "sdb_store_host(%s, %d) = %d; expected: %d",
 111                                 golden_data[i].name, (int)golden_data[i].last_update,
 112                                 status, golden_data[i].expected);
 113         }
 114
 115         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_hosts); ++i) {
 116                 _Bool has;
 117
 118                 has = sdb_store_has_host(golden_hosts[i].name);
 119                 fail_unless(has == golden_hosts[i].has,
 120                                 "sdb_store_has_host(%s) = %d; expected: %d",
 121                                 golden_hosts[i].name, has, golden_hosts[i].has);
 122         }
 123 }
 124 END_TEST
 125
 126 START_TEST(test_store_get_host)
 127 {
 128         char *golden_hosts[] = { "a", "b", "c" };
 129         char *unknown_hosts[] = { "x", "y", "z" };
 130         size_t i;
 131
 132         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_hosts); ++i) {
 133                 int status = sdb_store_host(golden_hosts[i], 1);
 134                 fail_unless(status >= 0,
 135                                 "sdb_store_host(%s) = %d; expected: >=0",
 136                                 golden_hosts[i], status);
 137         }
 138
 139         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_hosts); ++i) {
 140                 sdb_store_obj_t *sobj1, *sobj2;
 141                 int ref_cnt;
 142
 143                 fail_unless(sdb_store_has_host(golden_hosts[i]),
 144                                 "sdb_store_has_host(%s) = FALSE; expected: TRUE",
 145                                 golden_hosts[i]);
 146
 147                 sobj1 = sdb_store_get_host(golden_hosts[i]);
 148                 fail_unless(sobj1 != NULL,
 149                                 "sdb_store_get_host(%s) = NULL; expected: <host>",
 150                                 golden_hosts[i]);
 151                 ref_cnt = SDB_OBJ(sobj1)->ref_cnt;
 152
 153                 fail_unless(ref_cnt > 1,
 154                                 "sdb_store_get_host(%s) did not increment ref count: "
 155                                 "got: %d; expected: >1", golden_hosts[i], ref_cnt);
 156
 157                 sobj2 = sdb_store_get_host(golden_hosts[i]);
 158                 fail_unless(sobj2 != NULL,
 159                                 "sdb_store_get_host(%s) = NULL; expected: <host>",
 160                                 golden_hosts[i]);
 161
 162                 fail_unless(sobj1 == sobj2,
 163                                 "sdb_store_get_host(%s) returned different objects "
 164                                 "in successive calls", golden_hosts[i]);
 165                 fail_unless(SDB_OBJ(sobj2)->ref_cnt == ref_cnt + 1,
 166                                 "sdb_store_get_hosts(%s) did not increment ref count "
 167                                 "(first call: %d; second call: %d)",
 168                                 golden_hosts[i], ref_cnt, SDB_OBJ(sobj2)->ref_cnt);
 169
 170                 sdb_object_deref(SDB_OBJ(sobj1));
 171                 sdb_object_deref(SDB_OBJ(sobj2));
 172         }
 173         for (i = 0; i < SDB_STATIC_ARRAY_LEN(unknown_hosts); ++i) {
 174                 sdb_store_obj_t *sobj;
 175
 176                 fail_unless(!sdb_store_has_host(unknown_hosts[i]),
 177                                 "sdb_store_has_host(%s) = TRUE; expected: FALSE",
 178                                 unknown_hosts[i]);
 179
 180                 sobj = sdb_store_get_host(unknown_hosts[i]);
 181                 fail_unless(!sobj, "sdb_store_get_host(%s) = <host:%s>; expected: NULL",
 182                                 unknown_hosts[i], sobj ? SDB_OBJ(sobj)->name : "NULL");
 183         }
 184 }
 185 END_TEST
 186
 187 START_TEST(test_store_attr)
 188 {
 189         struct {
 190                 const char *host;
 191                 const char *key;
 192                 char       *value;
 193                 sdb_time_t  last_update;
 194                 int         expected;
 195         } golden_data[] = {
 196                 { "k", "k",  "v",  1, -1 },
 197                 { "k", "k",  "v",  1, -1 }, /* retry to ensure the host is not created */
 198                 { "l", "k1", "v1", 1,  0 },
 199                 { "l", "k1", "v2", 2,  0 },
 200                 { "l", "k1", "v3", 2,  1 },
 201                 { "l", "k2", "v1", 1,  0 },
 202                 { "m", "k",  "v1", 1,  0 },
 203                 { "m", "k",  "v2", 1,  1 },
 204         };
 205
 206         size_t i;
 207
 208         sdb_store_host("l", 1);
 209         sdb_store_host("m", 1);
 210         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 211                 sdb_data_t datum;
 212                 int status;
 213
 214                 /* XXX: test other types as well */
 215                 datum.type = SDB_TYPE_STRING;
 216                 datum.data.string = golden_data[i].value;
 217
 218                 status = sdb_store_attribute(golden_data[i].host,
 219                                 golden_data[i].key, &datum,
 220                                 golden_data[i].last_update);
 221                 fail_unless(status == golden_data[i].expected,
 222                                 "sdb_store_attribute(%s, %s, %s, %d) = %d; expected: %d",
 223                                 golden_data[i].host, golden_data[i].key, golden_data[i].value,
 224                                 golden_data[i].last_update, status, golden_data[i].expected);
 225         }
 226 }
 227 END_TEST
 228
 229 START_TEST(test_store_metric)
 230 {
 231         sdb_metric_store_t store1 = { "dummy-type1", "dummy-id1" };
 232         sdb_metric_store_t store2 = { "dummy-type2", "dummy-id2" };
 233
 234         struct {
 235                 const char *host;
 236                 const char *metric;
 237                 sdb_metric_store_t *store;
 238                 sdb_time_t  last_update;
 239                 int         expected;
 240         } golden_data[] = {
 241                 { "k", "m",  NULL,    1, -1 },
 242                 { "k", "m",  NULL,    1, -1 }, /* retry to ensure the host is not created */
 243                 { "k", "m",  &store1, 1, -1 },
 244                 { "l", "m1", NULL,    1,  0 },
 245                 { "l", "m1", &store1, 2,  0 },
 246                 { "l", "m1", &store1, 3,  0 },
 247                 { "l", "m1", NULL,    3,  1 },
 248                 { "l", "m2", &store1, 1,  0 },
 249                 { "l", "m2", &store2, 2,  0 },
 250                 { "l", "m2", NULL,    3,  0 },
 251                 { "m", "m",  &store1, 1,  0 },
 252                 { "m", "m",  NULL,    2,  0 },
 253                 { "m", "m",  NULL,    2,  1 },
 254                 { "m", "m",  &store1, 3,  0 },
 255                 { "m", "m",  &store2, 4,  0 },
 256                 { "m", "m",  NULL,    5,  0 },
 257         };
 258
 259         size_t i;
 260
 261         sdb_store_host("m", 1);
 262         sdb_store_host("l", 1);
 263         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 264                 int status;
 265
 266                 status = sdb_store_metric(golden_data[i].host,
 267                                 golden_data[i].metric, golden_data[i].store,
 268                                 golden_data[i].last_update);
 269                 fail_unless(status == golden_data[i].expected,
 270                                 "sdb_store_metric(%s, %s, %p, %d) = %d; expected: %d",
 271                                 golden_data[i].host, golden_data[i].metric,
 272                                 golden_data[i].store, golden_data[i].last_update,
 273                                 status, golden_data[i].expected);
 274         }
 275 }
 276 END_TEST
 277
 278 START_TEST(test_store_metric_attr)
 279 {
 280         struct {
 281                 const char *host;
 282                 const char *metric;
 283                 const char *attr;
 284                 const sdb_data_t value;
 285                 sdb_time_t  last_update;
 286                 int expected;
 287         } golden_data[] = {
 288                 { "k", "m1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 289                 /* retry, it should still fail */
 290                 { "k", "m1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 291                 { "l", "mX", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 292                 /* retry, it should still fail */
 293                 { "l", "mX", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 294                 { "l", "m1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 295                 { "l", "m1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  1 },
 296                 { "l", "m1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 2,  0 },
 297                 { "l", "m1", "a2", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 298                 { "l", "m1", "a2", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  1 },
 299                 { "l", "m2", "a2", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 300                 { "m", "m1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 301         };
 302
 303         size_t i;
 304
 305         sdb_store_host("m", 1);
 306         sdb_store_host("l", 1);
 307         sdb_store_metric("m", "m1", NULL, 1);
 308         sdb_store_metric("l", "m1", NULL, 1);
 309         sdb_store_metric("l", "m2", NULL, 1);
 310
 311         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 312                 int status;
 313
 314                 status = sdb_store_metric_attr(golden_data[i].host,
 315                                 golden_data[i].metric, golden_data[i].attr,
 316                                 &golden_data[i].value, golden_data[i].last_update);
 317                 fail_unless(status == golden_data[i].expected,
 318                                 "sdb_store_metric_attr(%s, %s, %s, %d, %d) = %d; "
 319                                 "expected: %d", golden_data[i].host, golden_data[i].metric,
 320                                 golden_data[i].attr, golden_data[i].value.data.integer,
 321                                 golden_data[i].last_update, status, golden_data[i].expected);
 322         }
 323 }
 324 END_TEST
 325
 326 START_TEST(test_store_service)
 327 {
 328         struct {
 329                 const char *host;
 330                 const char *svc;
 331                 sdb_time_t  last_update;
 332                 int         expected;
 333         } golden_data[] = {
 334                 { "k", "s",  1, -1 },
 335                 { "k", "s",  1, -1 }, /* retry to ensure the host is not created */
 336                 { "l", "s1", 1,  0 },
 337                 { "l", "s1", 2,  0 },
 338                 { "l", "s1", 2,  1 },
 339                 { "l", "s2", 1,  0 },
 340                 { "m", "s",  1,  0 },
 341                 { "m", "s",  1,  1 },
 342         };
 343
 344         size_t i;
 345
 346         sdb_store_host("m", 1);
 347         sdb_store_host("l", 1);
 348         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 349                 int status;
 350
 351                 status = sdb_store_service(golden_data[i].host,
 352                                 golden_data[i].svc, golden_data[i].last_update);
 353                 fail_unless(status == golden_data[i].expected,
 354                                 "sdb_store_service(%s, %s, %d) = %d; expected: %d",
 355                                 golden_data[i].host, golden_data[i].svc,
 356                                 golden_data[i].last_update, status, golden_data[i].expected);
 357         }
 358 }
 359 END_TEST
 360
 361 START_TEST(test_store_service_attr)
 362 {
 363         struct {
 364                 const char *host;
 365                 const char *svc;
 366                 const char *attr;
 367                 const sdb_data_t value;
 368                 sdb_time_t  last_update;
 369                 int expected;
 370         } golden_data[] = {
 371                 { "k", "s1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 372                 /* retry, it should still fail */
 373                 { "k", "s1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 374                 { "l", "sX", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 375                 /* retry, it should still fail */
 376                 { "l", "sX", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1, -1 },
 377                 { "l", "s1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 378                 { "l", "s1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  1 },
 379                 { "l", "s1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 2,  0 },
 380                 { "l", "s1", "a2", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 381                 { "l", "s1", "a2", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  1 },
 382                 { "l", "s2", "a2", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 383                 { "m", "s1", "a1", { SDB_TYPE_INTEGER, { .integer = 123 } }, 1,  0 },
 384         };
 385
 386         size_t i;
 387
 388         sdb_store_host("m", 1);
 389         sdb_store_host("l", 1);
 390         sdb_store_service("m", "s1", 1);
 391         sdb_store_service("l", "s1", 1);
 392         sdb_store_service("l", "s2", 1);
 393
 394         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 395                 int status;
 396
 397                 status = sdb_store_service_attr(golden_data[i].host,
 398                                 golden_data[i].svc, golden_data[i].attr,
 399                                 &golden_data[i].value, golden_data[i].last_update);
 400                 fail_unless(status == golden_data[i].expected,
 401                                 "sdb_store_service_attr(%s, %s, %s, %d, %d) = %d; "
 402                                 "expected: %d", golden_data[i].host, golden_data[i].svc,
 403                                 golden_data[i].attr, golden_data[i].value.data.integer,
 404                                 golden_data[i].last_update, status, golden_data[i].expected);
 405         }
 406 }
 407 END_TEST
 408
 409 static void
 410 verify_json_output(sdb_strbuf_t *buf, const char *expected,
 411                 sdb_store_matcher_t *filter, int flags)
 412 {
 413         int pos;
 414         size_t len1, len2;
 415         size_t i;
 416
 417         len1 = strlen(sdb_strbuf_string(buf));
 418         len2 = strlen(expected);
 419
 420         pos = -1;
 421         if (len1 != len2)
 422                 pos = (int)(len1 <= len2 ? len1 : len2);
 423
 424         for (i = 0; i < (len1 <= len2 ? len1 : len2); ++i) {
 425                 if (sdb_strbuf_string(buf)[i] != expected[i]) {
 426                         pos = (int)i;
 427                         break;
 428                 }
 429         }
 430
 431         fail_unless(pos == -1,
 432                         "sdb_store_tojson(<buf>, %p, %x) returned unexpected result\n"
 433                         "         got: %s\n              %*s\n    expected: %s",
 434                         filter, flags, sdb_strbuf_string(buf), pos + 1, "^",
 435                         expected);
 436 } /* verify_json_output */
 437
 438 START_TEST(test_store_tojson)
 439 {
 440         sdb_strbuf_t *buf;
 441         size_t i;
 442
 443         struct {
 444                 struct {
 445                         sdb_store_matcher_t *(*m)(sdb_store_cond_t *);
 446                         int field;
 447                         sdb_data_t value;
 448                 } filter;
 449                 int flags;
 450                 const char *expected;
 451         } golden_data[] = {
 452                 { { NULL, 0, SDB_DATA_INIT }, 0,
 453                         "["
 454                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 455                                         "\"update_interval\": \"0s\", \"backends\": [], "
 456                                         "\"attributes\": ["
 457                                                 "{\"name\": \"k1\", \"value\": \"v1\", "
 458                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 459                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 460                                                 "{\"name\": \"k2\", \"value\": \"v2\", "
 461                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 462                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 463                                                 "{\"name\": \"k3\", \"value\": \"v3\", "
 464                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 465                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 466                                         "], "
 467                                         "\"metrics\": ["
 468                                                 "{\"name\": \"m1\", "
 469                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 470                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 471                                                         "\"attributes\": ["
 472                                                                 "{\"name\": \"k3\", \"value\": 42, "
 473                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 474                                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 475                                                         "]},"
 476                                                 "{\"name\": \"m2\", "
 477                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 478                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 479                                                         "\"attributes\": []}"
 480                                         "], "
 481                                         "\"services\": []},"
 482                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 483                                         "\"update_interval\": \"0s\", \"backends\": [], "
 484                                         "\"attributes\": [], "
 485                                         "\"metrics\": [], "
 486                                         "\"services\": ["
 487                                                 "{\"name\": \"s1\", "
 488                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 489                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 490                                                         "\"attributes\": []},"
 491                                                 "{\"name\": \"s2\", "
 492                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 493                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 494                                                         "\"attributes\": ["
 495                                                                 "{\"name\": \"k1\", \"value\": 123, "
 496                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 497                                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 498                                                                 "{\"name\": \"k2\", \"value\": 4711, "
 499                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 500                                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 501                                                         "]}"
 502                                         "]}"
 503                         "]" },
 504                 { { NULL, 0, SDB_DATA_INIT }, SDB_SKIP_SERVICES,
 505                         "["
 506                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 507                                         "\"update_interval\": \"0s\", \"backends\": [], "
 508                                         "\"attributes\": ["
 509                                                 "{\"name\": \"k1\", \"value\": \"v1\", "
 510                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 511                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 512                                                 "{\"name\": \"k2\", \"value\": \"v2\", "
 513                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 514                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 515                                                 "{\"name\": \"k3\", \"value\": \"v3\", "
 516                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 517                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 518                                         "], "
 519                                         "\"metrics\": ["
 520                                                 "{\"name\": \"m1\", "
 521                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 522                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 523                                                         "\"attributes\": ["
 524                                                                 "{\"name\": \"k3\", \"value\": 42, "
 525                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 526                                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 527                                                         "]},"
 528                                                 "{\"name\": \"m2\", "
 529                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 530                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 531                                                         "\"attributes\": []}"
 532                                         "]},"
 533                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 534                                         "\"update_interval\": \"0s\", \"backends\": [], "
 535                                         "\"attributes\": [], "
 536                                         "\"metrics\": []}"
 537                         "]" },
 538                 { { NULL, 0, SDB_DATA_INIT }, SDB_SKIP_METRICS,
 539                         "["
 540                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 541                                         "\"update_interval\": \"0s\", \"backends\": [], "
 542                                         "\"attributes\": ["
 543                                                 "{\"name\": \"k1\", \"value\": \"v1\", "
 544                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 545                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 546                                                 "{\"name\": \"k2\", \"value\": \"v2\", "
 547                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 548                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 549                                                 "{\"name\": \"k3\", \"value\": \"v3\", "
 550                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 551                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 552                                         "], "
 553                                         "\"services\": []},"
 554                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 555                                         "\"update_interval\": \"0s\", \"backends\": [], "
 556                                         "\"attributes\": [], "
 557                                         "\"services\": ["
 558                                                 "{\"name\": \"s1\", "
 559                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 560                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 561                                                         "\"attributes\": []},"
 562                                                 "{\"name\": \"s2\", "
 563                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 564                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 565                                                         "\"attributes\": ["
 566                                                                 "{\"name\": \"k1\", \"value\": 123, "
 567                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 568                                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 569                                                                 "{\"name\": \"k2\", \"value\": 4711, "
 570                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 571                                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 572                                                         "]}"
 573                                         "]}"
 574                         "]" },
 575                 { { NULL, 0, SDB_DATA_INIT }, SDB_SKIP_ATTRIBUTES,
 576                         "["
 577                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 578                                         "\"update_interval\": \"0s\", \"backends\": [], "
 579                                         "\"metrics\": ["
 580                                                 "{\"name\": \"m1\", "
 581                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 582                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 583                                                 "{\"name\": \"m2\", "
 584                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 585                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 586                                         "], "
 587                                         "\"services\": []},"
 588                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 589                                         "\"update_interval\": \"0s\", \"backends\": [], "
 590                                         "\"metrics\": [], "
 591                                         "\"services\": ["
 592                                                 "{\"name\": \"s1\", "
 593                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 594                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 595                                                 "{\"name\": \"s2\", "
 596                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 597                                                         "\"update_interval\": \"0s\", \"backends\": []}"
 598                                         "]}"
 599                         "]" },
 600                 { { NULL, 0, SDB_DATA_INIT }, SDB_SKIP_ALL,
 601                         "["
 602                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 603                                         "\"update_interval\": \"0s\", \"backends\": []},"
 604                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 605                                         "\"update_interval\": \"0s\", \"backends\": []}"
 606                         "]" },
 607                 { { sdb_store_eq_matcher, SDB_FIELD_NAME,
 608                                 { SDB_TYPE_STRING, { .string = "h1" } } }, 0,
 609                         "["
 610                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 611                                         "\"update_interval\": \"0s\", \"backends\": [], "
 612                                         "\"attributes\": [], \"metrics\": [], \"services\": []}"
 613                         "]" },
 614                 { { sdb_store_gt_matcher, SDB_FIELD_LAST_UPDATE,
 615                                 { SDB_TYPE_DATETIME, { .datetime = 1 } } }, 0,
 616                         "["
 617                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 618                                         "\"update_interval\": \"0s\", \"backends\": [], "
 619                                         "\"attributes\": [], "
 620                                         "\"metrics\": [], "
 621                                         "\"services\": ["
 622                                                 "{\"name\": \"s2\", "
 623                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 624                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 625                                                         "\"attributes\": ["
 626                                                                 "{\"name\": \"k1\", \"value\": 123, "
 627                                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 628                                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 629                                                         "]}"
 630                                         "]}"
 631                         "]" },
 632                 { { sdb_store_le_matcher, SDB_FIELD_LAST_UPDATE,
 633                                 { SDB_TYPE_DATETIME, { .datetime = 1 } } }, 0,
 634                         "["
 635                                 "{\"name\": \"h1\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 636                                         "\"update_interval\": \"0s\", \"backends\": [], "
 637                                         "\"attributes\": ["
 638                                                 "{\"name\": \"k1\", \"value\": \"v1\", "
 639                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 640                                                         "\"update_interval\": \"0s\", \"backends\": []},"
 641                                         "], "
 642                                         "\"metrics\": ["
 643                                                 "{\"name\": \"m2\", "
 644                                                         "\"last_update\": \"1970-01-01 00:00:00 +0000\", "
 645                                                         "\"update_interval\": \"0s\", \"backends\": [], "
 646                                                         "\"attributes\": []}"
 647                                         "], "
 648                                         "\"services\": []}"
 649                         "]" },
 650                 { { sdb_store_ge_matcher, SDB_FIELD_LAST_UPDATE,
 651                                 { SDB_TYPE_DATETIME, { .datetime = 3 } } }, 0,
 652                         "["
 653                                 "{\"name\": \"h2\", \"last_update\": \"1970-01-01 00:00:00 +0000\", "
 654                                         "\"update_interval\": \"0s\", \"backends\": [], "
 655                                         "\"attributes\": [], "
 656                                         "\"metrics\": [], "
 657                                         "\"services\": []}"
 658                         "]" },
 659         };
 660
 661         buf = sdb_strbuf_create(0);
 662         fail_unless(buf != NULL, "INTERNAL ERROR: failed to create string buffer");
 663         populate();
 664
 665         for (i = 0; i < SDB_STATIC_ARRAY_LEN(golden_data); ++i) {
 666                 sdb_store_matcher_t *filter = NULL;
 667                 int status;
 668
 669                 sdb_strbuf_clear(buf);
 670
 671                 if (golden_data[i].filter.m) {
 672                         sdb_store_expr_t *expr;
 673                         sdb_store_cond_t *c = NULL;
 674
 675                         expr = sdb_store_expr_constvalue(&golden_data[i].filter.value);
 676                         fail_unless(expr != NULL,
 677                                         "INTERNAL ERROR: sdb_store_expr_constvalue() = NULL");
 678                         c = sdb_store_obj_cond(golden_data[i].filter.field, expr);
 679                         sdb_object_deref(SDB_OBJ(expr));
 680                         fail_unless(c != NULL,
 681                                         "INTERNAL ERROR: sdb_store_obj_cond() = NULL");
 682                         filter = golden_data[i].filter.m(c);
 683                         sdb_object_deref(SDB_OBJ(c));
 684                         fail_unless(filter != NULL,
 685                                         "INTERNAL ERROR: sdb_store_*_matcher() = NULL");
 686                 }
 687
 688                 status = sdb_store_tojson(buf, filter, golden_data[i].flags);
 689                 fail_unless(status == 0,
 690                                 "sdb_store_tojson(<buf>, %p, %x) = %d; expected: 0",
 691                                 filter, golden_data[i].flags, status);
 692
 693                 verify_json_output(buf, golden_data[i].expected,
 694                                 filter, golden_data[i].flags);
 695                 sdb_object_deref(SDB_OBJ(filter));
 696         }
 697         sdb_strbuf_destroy(buf);
 698 }
 699 END_TEST
 700
 701 START_TEST(test_get_field)
 702 {
 703         sdb_store_obj_t *host;
 704         sdb_data_t value = SDB_DATA_INIT;
 705         int check;
 706
 707         sdb_store_host("host", 10);
 708         sdb_store_host("host", 20);
 709
 710         host = sdb_store_get_host("host");
 711         fail_unless(host != NULL,
 712                         "INTERNAL ERROR: store doesn't have host after adding it");
 713
 714         check = sdb_store_get_field(NULL, 0, NULL);
 715         fail_unless(check < 0,
 716                         "sdb_store_get_field(NULL, 0, NULL) = %d; expected: <0");
 717         check = sdb_store_get_field(NULL, SDB_FIELD_LAST_UPDATE, NULL);
 718         fail_unless(check < 0,
 719                         "sdb_store_get_field(NULL, SDB_FIELD_LAST_UPDATE, NULL) = %d; "
 720                         "expected: <0");
 721         check = sdb_store_get_field(NULL, SDB_FIELD_LAST_UPDATE, &value);
 722         fail_unless(check < 0,
 723                         "sdb_store_get_field(NULL, SDB_FIELD_LAST_UPDATE, <value>) = %d; "
 724                         "expected: <0");
 725
 726         check = sdb_store_get_field(host, SDB_FIELD_LAST_UPDATE, NULL);
 727         fail_unless(check == 0,
 728                         "sdb_store_get_field(<host>, SDB_FIELD_LAST_UPDATE, NULL) = %d; "
 729                         "expected: 0");
 730         /* 'name' is dynamically allocated; make sure it's not leaked even
 731          * if there is no result parameter */
 732         check = sdb_store_get_field(host, SDB_FIELD_NAME, NULL);
 733         fail_unless(check == 0,
 734                         "sdb_store_get_field(<host>, SDB_FIELD_LAST_UPDATE, NULL) = %d; "
 735                         "expected: 0");
 736
 737         check = sdb_store_get_field(host, SDB_FIELD_NAME, &value);
 738         fail_unless(check == 0,
 739                         "sdb_store_get_field(<host>, SDB_FIELD_NAME, <value>) = "
 740                         "%d; expected: 0");
 741         fail_unless((value.type == SDB_TYPE_STRING)
 742                         && (! strcmp(value.data.string, "host")),
 743                         "sdb_store_get_field(<host>, SDB_FIELD_NAME, <value>) "
 744                         "returned value {%d, %s}; expected {%d, host}",
 745                         value.type, value.data.string, SDB_TYPE_STRING);
 746         sdb_data_free_datum(&value);
 747
 748         check = sdb_store_get_field(host, SDB_FIELD_LAST_UPDATE, &value);
 749         fail_unless(check == 0,
 750                         "sdb_store_get_field(<host>, SDB_FIELD_LAST_UPDATE, <value>) = "
 751                         "%d; expected: 0");
 752         fail_unless((value.type == SDB_TYPE_DATETIME)
 753                         && (value.data.datetime == 20),
 754                         "sdb_store_get_field(<host>, SDB_FIELD_LAST_UPDATE, <value>) "
 755                         "returned value {%d, %lu}; expected {%d, 20}",
 756                         value.type, value.data.datetime, SDB_TYPE_DATETIME);
 757
 758         check = sdb_store_get_field(host, SDB_FIELD_AGE, &value);
 759         fail_unless(check == 0,
 760                         "sdb_store_get_field(<host>, SDB_FIELD_AGE, <value>) = "
 761                         "%d; expected: 0");
 762         /* let's assume we're at least in year 1980 ;-) */
 763         fail_unless((value.type == SDB_TYPE_DATETIME)
 764                         && (value.data.datetime > 10L * SDB_INTERVAL_YEAR),
 765                         "sdb_store_get_field(<host>, SDB_FIELD_AGE, <value>) "
 766                         "returned value {%d, %lu}; expected {%d, >%lu}",
 767                         value.type, value.data.datetime,
 768                         SDB_TYPE_DATETIME, 10L * SDB_INTERVAL_YEAR);
 769
 770         check = sdb_store_get_field(host, SDB_FIELD_INTERVAL, &value);
 771         fail_unless(check == 0,
 772                         "sdb_store_get_field(<host>, SDB_FIELD_INTERVAL, <value>) = "
 773                         "%d; expected: 0");
 774         fail_unless((value.type == SDB_TYPE_DATETIME)
 775                         && (value.data.datetime == 10),
 776                         "sdb_store_get_field(<host>, SDB_FIELD_INTERVAL, <value>) "
 777                         "returned value {%d, %lu}; expected {%d, 10}",
 778                         value.type, value.data.datetime, SDB_TYPE_DATETIME);
 779
 780         check = sdb_store_get_field(host, SDB_FIELD_BACKEND, &value);
 781         fail_unless(check == 0,
 782                         "sdb_store_get_field(<host>, SDB_FIELD_BACKEND, <value>) = "
 783                         "%d; expected: 0");
 784         /* there are no backends in this test */
 785         fail_unless((value.type == (SDB_TYPE_ARRAY | SDB_TYPE_STRING))
 786                         && (value.data.array.length == 0)
 787                         && (value.data.array.values == NULL),
 788                         "sdb_store_get_field(<host>, SDB_FIELD_BACKEND, <value>) "
 789                         "returned value {%d, %lu, %p}; expected {%d, 0, NULL}",
 790                         value.type, value.data.array.length, value.data.array.values,
 791                         SDB_TYPE_ARRAY | SDB_TYPE_STRING);
 792 }
 793 END_TEST
 794
 795 START_TEST(test_interval)
 796 {
 797         sdb_store_obj_t *host;
 798
 799         /* 10 us interval */
 800         sdb_store_host("host", 10);
 801         sdb_store_host("host", 20);
 802         sdb_store_host("host", 30);
 803         sdb_store_host("host", 40);
 804
 805         host = sdb_store_get_host("host");
 806         fail_unless(host != NULL,
 807                         "INTERNAL ERROR: store doesn't have host after adding it");
 808
 809         fail_unless(host->interval == 10,
 810                         "sdb_store_host() did not calculate interval correctly: "
 811                         "got: %"PRIsdbTIME"; expected: %"PRIsdbTIME, host->interval, 10);
 812
 813         /* multiple updates for the same timestamp don't modify the interval */
 814         sdb_store_host("host", 40);
 815         sdb_store_host("host", 40);
 816         sdb_store_host("host", 40);
 817         sdb_store_host("host", 40);
 818
 819         fail_unless(host->interval == 10,
 820                         "sdb_store_host() changed interval when doing multiple updates "
 821                         "using the same timestamp; got: %"PRIsdbTIME"; "
 822                         "expected: %"PRIsdbTIME, host->interval, 10);
 823
 824         /* multiple updates using an timestamp don't modify the interval */
 825         sdb_store_host("host", 20);
 826         sdb_store_host("host", 20);
 827         sdb_store_host("host", 20);
 828         sdb_store_host("host", 20);
 829
 830         fail_unless(host->interval == 10,
 831                         "sdb_store_host() changed interval when doing multiple updates "
 832                         "using an old timestamp; got: %"PRIsdbTIME"; expected: %"PRIsdbTIME,
 833                         host->interval, 10);
 834
 835         /* new interval: 20 us */
 836         sdb_store_host("host", 60);
 837         fail_unless(host->interval == 11,
 838                         "sdb_store_host() did not calculate interval correctly: "
 839                         "got: %"PRIsdbTIME"; expected: %"PRIsdbTIME, host->interval, 11);
 840
 841         /* new interval: 40 us */
 842         sdb_store_host("host", 100);
 843         fail_unless(host->interval == 13,
 844                         "sdb_store_host() did not calculate interval correctly: "
 845                         "got: %"PRIsdbTIME"; expected: %"PRIsdbTIME, host->interval, 11);
 846
 847         sdb_object_deref(SDB_OBJ(host));
 848 }
 849 END_TEST
 850
 851 static int
 852 iter_incr(sdb_store_obj_t *obj, void *user_data)
 853 {
 854         intptr_t *i = user_data;
 855
 856         fail_unless(obj != NULL,
 857                         "sdb_store_iterate callback received NULL obj; expected: "
 858                         "<store base obj>");
 859         fail_unless(i != NULL,
 860                         "sdb_store_iterate callback received NULL user_data; "
 861                         "expected: <pointer to data>");
 862
 863         ++(*i);
 864         return 0;
 865 } /* iter_incr */
 866
 867 static int
 868 iter_error(sdb_store_obj_t *obj, void *user_data)
 869 {
 870         intptr_t *i = user_data;
 871
 872         fail_unless(obj != NULL,
 873                         "sdb_store_iterate callback received NULL obj; expected: "
 874                         "<store base obj>");
 875         fail_unless(i != NULL,
 876                         "sdb_store_iterate callback received NULL user_data; "
 877                         "expected: <pointer to data>");
 878
 879         ++(*i);
 880         return -1;
 881 } /* iter_error */
 882
 883 START_TEST(test_iterate)
 884 {
 885         intptr_t i = 0;
 886         int check;
 887
 888         /* empty store */
 889         check = sdb_store_iterate(iter_incr, &i);
 890         fail_unless(check == -1,
 891                         "sdb_store_iterate(), empty store = %d; expected: -1", check);
 892         fail_unless(i == 0,
 893                         "sdb_store_iterate called callback %d times; expected: 0", (int)i);
 894
 895         populate();
 896
 897         check = sdb_store_iterate(iter_incr, &i);
 898         fail_unless(check == 0,
 899                         "sdb_store_iterate() = %d; expected: 0", check);
 900         fail_unless(i == 2,
 901                         "sdb_store_iterate called callback %d times; expected: 1", (int)i);
 902
 903         i = 0;
 904         check = sdb_store_iterate(iter_error, &i);
 905         fail_unless(check == -1,
 906                         "sdb_store_iterate(), error callback = %d; expected: -1", check);
 907         fail_unless(i == 1,
 908                         "sdb_store_iterate called callback %d times "
 909                         "(callback returned error); expected: 1", (int)i);
 910 }
 911 END_TEST
 912
 913 Suite *
 914 core_store_suite(void)
 915 {
 916         Suite *s = suite_create("core::store");
 917         TCase *tc;
 918
 919         tc = tcase_create("core");
 920         tcase_add_test(tc, test_store_tojson);
 921         tcase_add_test(tc, test_store_host);
 922         tcase_add_test(tc, test_store_get_host);
 923         tcase_add_test(tc, test_store_attr);
 924         tcase_add_test(tc, test_store_metric);
 925         tcase_add_test(tc, test_store_metric_attr);
 926         tcase_add_test(tc, test_store_service);
 927         tcase_add_test(tc, test_store_service_attr);
 928         tcase_add_test(tc, test_get_field);
 929         tcase_add_test(tc, test_interval);
 930         tcase_add_test(tc, test_iterate);
 931         tcase_add_unchecked_fixture(tc, NULL, sdb_store_clear);
 932         suite_add_tcase(s, tc);
 933
 934         return s;
 935 } /* core_store_suite */
 936
 937 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 938