src/threshold.c

   1 /**
   2  * collectd - src/threshold.c
   3  * Copyright (C) 2007-2010  Florian Forster
   4  * Copyright (C) 2008-2009  Sebastian Harl
   5  * Copyright (C) 2009       Andrés J. Díaz
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the
   9  * Free Software Foundation; only version 2 of the License is applicable.
  10  *
  11  * This program is distributed in the hope that it will be useful, but
  12  * WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License along
  17  * with this program; if not, write to the Free Software Foundation, Inc.,
  18  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  19  *
  20  * Author:
  21  *   Florian octo Forster <octo at collectd.org>
  22  *   Sebastian Harl <sh at tokkee.org>
  23  *   Andrés J. Díaz <ajdiaz at connectical.com>
  24  **/
  25
  26 #include "collectd.h"
  27
  28 #include "common.h"
  29 #include "plugin.h"
  30 #include "utils_avltree.h"
  31 #include "utils_cache.h"
  32 #include "utils_threshold.h"
  33
  34 /*
  35  * Threshold management
  36  * ====================
  37  * The following functions add, delete, search, etc. configured thresholds to
  38  * the underlying AVL trees.
  39  */
  40
  41 /*
  42  * int ut_threshold_add
  43  *
  44  * Adds a threshold configuration to the list of thresholds. The threshold_t
  45  * structure is copied and may be destroyed after this call. Returns zero on
  46  * success, non-zero otherwise.
  47  */
  48 static int ut_threshold_add(const threshold_t *th) { /* {{{ */
  49   char name[6 * DATA_MAX_NAME_LEN];
  50   char *name_copy;
  51   threshold_t *th_copy;
  52   threshold_t *th_ptr;
  53   int status = 0;
  54
  55   if (format_name(name, sizeof(name), th->host, th->plugin, th->plugin_instance,
  56                   th->type, th->type_instance) != 0) {
  57     ERROR("ut_threshold_add: format_name failed.");
  58     return (-1);
  59   }
  60
  61   name_copy = strdup(name);
  62   if (name_copy == NULL) {
  63     ERROR("ut_threshold_add: strdup failed.");
  64     return (-1);
  65   }
  66
  67   th_copy = malloc(sizeof(*th_copy));
  68   if (th_copy == NULL) {
  69     sfree(name_copy);
  70     ERROR("ut_threshold_add: malloc failed.");
  71     return (-1);
  72   }
  73   memcpy(th_copy, th, sizeof(threshold_t));
  74
  75   DEBUG("ut_threshold_add: Adding entry `%s'", name);
  76
  77   pthread_mutex_lock(&threshold_lock);
  78
  79   th_ptr = threshold_get(th->host, th->plugin, th->plugin_instance, th->type,
  80                          th->type_instance);
  81
  82   while ((th_ptr != NULL) && (th_ptr->next != NULL))
  83     th_ptr = th_ptr->next;
  84
  85   if (th_ptr == NULL) /* no such threshold yet */
  86   {
  87     status = c_avl_insert(threshold_tree, name_copy, th_copy);
  88   } else /* th_ptr points to the last threshold in the list */
  89   {
  90     th_ptr->next = th_copy;
  91     /* name_copy isn't needed */
  92     sfree(name_copy);
  93   }
  94
  95   pthread_mutex_unlock(&threshold_lock);
  96
  97   if (status != 0) {
  98     ERROR("ut_threshold_add: c_avl_insert (%s) failed.", name);
  99     sfree(name_copy);
 100     sfree(th_copy);
 101   }
 102
 103   return (status);
 104 } /* }}} int ut_threshold_add */
 105
 106 /*
 107  * Configuration
 108  * =============
 109  * The following approximately two hundred functions are used to handle the
 110  * configuration and fill the threshold list.
 111  * {{{ */
 112 static int ut_config_type_datasource(threshold_t *th, oconfig_item_t *ci) {
 113   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING)) {
 114     WARNING("threshold values: The `DataSource' option needs exactly one "
 115             "string argument.");
 116     return (-1);
 117   }
 118
 119   sstrncpy(th->data_source, ci->values[0].value.string,
 120            sizeof(th->data_source));
 121
 122   return (0);
 123 } /* int ut_config_type_datasource */
 124
 125 static int ut_config_type_instance(threshold_t *th, oconfig_item_t *ci) {
 126   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING)) {
 127     WARNING("threshold values: The `Instance' option needs exactly one "
 128             "string argument.");
 129     return (-1);
 130   }
 131
 132   sstrncpy(th->type_instance, ci->values[0].value.string,
 133            sizeof(th->type_instance));
 134
 135   return (0);
 136 } /* int ut_config_type_instance */
 137
 138 static int ut_config_type_max(threshold_t *th, oconfig_item_t *ci) {
 139   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_NUMBER)) {
 140     WARNING("threshold values: The `%s' option needs exactly one "
 141             "number argument.",
 142             ci->key);
 143     return (-1);
 144   }
 145
 146   if (strcasecmp(ci->key, "WarningMax") == 0)
 147     th->warning_max = ci->values[0].value.number;
 148   else
 149     th->failure_max = ci->values[0].value.number;
 150
 151   return (0);
 152 } /* int ut_config_type_max */
 153
 154 static int ut_config_type_min(threshold_t *th, oconfig_item_t *ci) {
 155   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_NUMBER)) {
 156     WARNING("threshold values: The `%s' option needs exactly one "
 157             "number argument.",
 158             ci->key);
 159     return (-1);
 160   }
 161
 162   if (strcasecmp(ci->key, "WarningMin") == 0)
 163     th->warning_min = ci->values[0].value.number;
 164   else
 165     th->failure_min = ci->values[0].value.number;
 166
 167   return (0);
 168 } /* int ut_config_type_min */
 169
 170 static int ut_config_type_hits(threshold_t *th, oconfig_item_t *ci) {
 171   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_NUMBER)) {
 172     WARNING("threshold values: The `%s' option needs exactly one "
 173             "number argument.",
 174             ci->key);
 175     return (-1);
 176   }
 177
 178   th->hits = ci->values[0].value.number;
 179
 180   return (0);
 181 } /* int ut_config_type_hits */
 182
 183 static int ut_config_type_hysteresis(threshold_t *th, oconfig_item_t *ci) {
 184   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_NUMBER)) {
 185     WARNING("threshold values: The `%s' option needs exactly one "
 186             "number argument.",
 187             ci->key);
 188     return (-1);
 189   }
 190
 191   th->hysteresis = ci->values[0].value.number;
 192
 193   return (0);
 194 } /* int ut_config_type_hysteresis */
 195
 196 static int ut_config_type(const threshold_t *th_orig, oconfig_item_t *ci) {
 197   threshold_t th;
 198   int status = 0;
 199
 200   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING)) {
 201     WARNING("threshold values: The `Type' block needs exactly one string "
 202             "argument.");
 203     return (-1);
 204   }
 205
 206   if (ci->children_num < 1) {
 207     WARNING("threshold values: The `Type' block needs at least one option.");
 208     return (-1);
 209   }
 210
 211   memcpy(&th, th_orig, sizeof(th));
 212   sstrncpy(th.type, ci->values[0].value.string, sizeof(th.type));
 213
 214   th.warning_min = NAN;
 215   th.warning_max = NAN;
 216   th.failure_min = NAN;
 217   th.failure_max = NAN;
 218   th.hits = 0;
 219   th.hysteresis = 0;
 220   th.flags = UT_FLAG_INTERESTING; /* interesting by default */
 221
 222   for (int i = 0; i < ci->children_num; i++) {
 223     oconfig_item_t *option = ci->children + i;
 224
 225     if (strcasecmp("Instance", option->key) == 0)
 226       status = ut_config_type_instance(&th, option);
 227     else if (strcasecmp("DataSource", option->key) == 0)
 228       status = ut_config_type_datasource(&th, option);
 229     else if ((strcasecmp("WarningMax", option->key) == 0) ||
 230              (strcasecmp("FailureMax", option->key) == 0))
 231       status = ut_config_type_max(&th, option);
 232     else if ((strcasecmp("WarningMin", option->key) == 0) ||
 233              (strcasecmp("FailureMin", option->key) == 0))
 234       status = ut_config_type_min(&th, option);
 235     else if (strcasecmp("Interesting", option->key) == 0)
 236       status = cf_util_get_flag(option, &th.flags, UT_FLAG_INTERESTING);
 237     else if (strcasecmp("Invert", option->key) == 0)
 238       status = cf_util_get_flag(option, &th.flags, UT_FLAG_INVERT);
 239     else if (strcasecmp("Persist", option->key) == 0)
 240       status = cf_util_get_flag(option, &th.flags, UT_FLAG_PERSIST);
 241     else if (strcasecmp("PersistOK", option->key) == 0)
 242       status = cf_util_get_flag(option, &th.flags, UT_FLAG_PERSIST_OK);
 243     else if (strcasecmp("Percentage", option->key) == 0)
 244       status = cf_util_get_flag(option, &th.flags, UT_FLAG_PERCENTAGE);
 245     else if (strcasecmp("Hits", option->key) == 0)
 246       status = ut_config_type_hits(&th, option);
 247     else if (strcasecmp("Hysteresis", option->key) == 0)
 248       status = ut_config_type_hysteresis(&th, option);
 249     else {
 250       WARNING("threshold values: Option `%s' not allowed inside a `Type' "
 251               "block.",
 252               option->key);
 253       status = -1;
 254     }
 255
 256     if (status != 0)
 257       break;
 258   }
 259
 260   if (status == 0) {
 261     status = ut_threshold_add(&th);
 262   }
 263
 264   return (status);
 265 } /* int ut_config_type */
 266
 267 static int ut_config_plugin_instance(threshold_t *th, oconfig_item_t *ci) {
 268   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING)) {
 269     WARNING("threshold values: The `Instance' option needs exactly one "
 270             "string argument.");
 271     return (-1);
 272   }
 273
 274   sstrncpy(th->plugin_instance, ci->values[0].value.string,
 275            sizeof(th->plugin_instance));
 276
 277   return (0);
 278 } /* int ut_config_plugin_instance */
 279
 280 static int ut_config_plugin(const threshold_t *th_orig, oconfig_item_t *ci) {
 281   threshold_t th;
 282   int status = 0;
 283
 284   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING)) {
 285     WARNING("threshold values: The `Plugin' block needs exactly one string "
 286             "argument.");
 287     return (-1);
 288   }
 289
 290   if (ci->children_num < 1) {
 291     WARNING("threshold values: The `Plugin' block needs at least one nested "
 292             "block.");
 293     return (-1);
 294   }
 295
 296   memcpy(&th, th_orig, sizeof(th));
 297   sstrncpy(th.plugin, ci->values[0].value.string, sizeof(th.plugin));
 298
 299   for (int i = 0; i < ci->children_num; i++) {
 300     oconfig_item_t *option = ci->children + i;
 301
 302     if (strcasecmp("Type", option->key) == 0)
 303       status = ut_config_type(&th, option);
 304     else if (strcasecmp("Instance", option->key) == 0)
 305       status = ut_config_plugin_instance(&th, option);
 306     else {
 307       WARNING("threshold values: Option `%s' not allowed inside a `Plugin' "
 308               "block.",
 309               option->key);
 310       status = -1;
 311     }
 312
 313     if (status != 0)
 314       break;
 315   }
 316
 317   return (status);
 318 } /* int ut_config_plugin */
 319
 320 static int ut_config_host(const threshold_t *th_orig, oconfig_item_t *ci) {
 321   threshold_t th;
 322   int status = 0;
 323
 324   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING)) {
 325     WARNING("threshold values: The `Host' block needs exactly one string "
 326             "argument.");
 327     return (-1);
 328   }
 329
 330   if (ci->children_num < 1) {
 331     WARNING("threshold values: The `Host' block needs at least one nested "
 332             "block.");
 333     return (-1);
 334   }
 335
 336   memcpy(&th, th_orig, sizeof(th));
 337   sstrncpy(th.host, ci->values[0].value.string, sizeof(th.host));
 338
 339   for (int i = 0; i < ci->children_num; i++) {
 340     oconfig_item_t *option = ci->children + i;
 341
 342     if (strcasecmp("Type", option->key) == 0)
 343       status = ut_config_type(&th, option);
 344     else if (strcasecmp("Plugin", option->key) == 0)
 345       status = ut_config_plugin(&th, option);
 346     else {
 347       WARNING("threshold values: Option `%s' not allowed inside a `Host' "
 348               "block.",
 349               option->key);
 350       status = -1;
 351     }
 352
 353     if (status != 0)
 354       break;
 355   }
 356
 357   return (status);
 358 } /* int ut_config_host */
 359   /*
 360    * End of the functions used to configure threshold values.
 361    */
 362 /* }}} */
 363
 364 /*
 365  * int ut_report_state
 366  *
 367  * Checks if the `state' differs from the old state and creates a notification
 368  * if appropriate.
 369  * Does not fail.
 370  */
 371 static int ut_report_state(const data_set_t *ds, const value_list_t *vl,
 372                            const threshold_t *th, const gauge_t *values,
 373                            int ds_index, int state) { /* {{{ */
 374   int state_old;
 375   notification_t n;
 376
 377   char *buf;
 378   size_t bufsize;
 379
 380   int status;
 381
 382   /* Check if hits matched */
 383   if ((th->hits != 0)) {
 384     int hits = uc_get_hits(ds, vl);
 385     /* STATE_OKAY resets hits unless PERSIST_OK flag is set. Hits resets if
 386      * threshold is hit. */
 387     if (((state == STATE_OKAY) && ((th->flags & UT_FLAG_PERSIST_OK) == 0)) ||
 388         (hits > th->hits)) {
 389       DEBUG("ut_report_state: reset uc_get_hits = 0");
 390       uc_set_hits(ds, vl, 0); /* reset hit counter and notify */
 391     } else {
 392       DEBUG("ut_report_state: th->hits = %d, uc_get_hits = %d", th->hits,
 393             uc_get_hits(ds, vl));
 394       (void)uc_inc_hits(ds, vl, 1); /* increase hit counter */
 395       return (0);
 396     }
 397   } /* end check hits */
 398
 399   state_old = uc_get_state(ds, vl);
 400
 401   /* If the state didn't change, report if `persistent' is specified. If the
 402    * state is `okay', then only report if `persist_ok` flag is set. */
 403   if (state == state_old) {
 404     if ((th->flags & UT_FLAG_PERSIST) == 0)
 405       return (0);
 406     else if ((state == STATE_OKAY) && ((th->flags & UT_FLAG_PERSIST_OK) == 0))
 407       return (0);
 408   }
 409
 410   if (state != state_old)
 411     uc_set_state(ds, vl, state);
 412
 413   NOTIFICATION_INIT_VL(&n, vl);
 414
 415   buf = n.message;
 416   bufsize = sizeof(n.message);
 417
 418   if (state == STATE_OKAY)
 419     n.severity = NOTIF_OKAY;
 420   else if (state == STATE_WARNING)
 421     n.severity = NOTIF_WARNING;
 422   else
 423     n.severity = NOTIF_FAILURE;
 424
 425   n.time = vl->time;
 426
 427   status = ssnprintf(buf, bufsize, "Host %s, plugin %s", vl->host, vl->plugin);
 428   buf += status;
 429   bufsize -= status;
 430
 431   if (vl->plugin_instance[0] != '\0') {
 432     status = ssnprintf(buf, bufsize, " (instance %s)", vl->plugin_instance);
 433     buf += status;
 434     bufsize -= status;
 435   }
 436
 437   status = ssnprintf(buf, bufsize, " type %s", vl->type);
 438   buf += status;
 439   bufsize -= status;
 440
 441   if (vl->type_instance[0] != '\0') {
 442     status = ssnprintf(buf, bufsize, " (instance %s)", vl->type_instance);
 443     buf += status;
 444     bufsize -= status;
 445   }
 446
 447   plugin_notification_meta_add_string(&n, "DataSource", ds->ds[ds_index].name);
 448   plugin_notification_meta_add_double(&n, "CurrentValue", values[ds_index]);
 449   plugin_notification_meta_add_double(&n, "WarningMin", th->warning_min);
 450   plugin_notification_meta_add_double(&n, "WarningMax", th->warning_max);
 451   plugin_notification_meta_add_double(&n, "FailureMin", th->failure_min);
 452   plugin_notification_meta_add_double(&n, "FailureMax", th->failure_max);
 453
 454   /* Send an okay notification */
 455   if (state == STATE_OKAY) {
 456     if (state_old == STATE_MISSING)
 457       ssnprintf(buf, bufsize, ": Value is no longer missing.");
 458     else
 459       ssnprintf(buf, bufsize, ": All data sources are within range again. "
 460                               "Current value of \"%s\" is %f.",
 461                 ds->ds[ds_index].name, values[ds_index]);
 462   } else {
 463     double min;
 464     double max;
 465
 466     min = (state == STATE_ERROR) ? th->failure_min : th->warning_min;
 467     max = (state == STATE_ERROR) ? th->failure_max : th->warning_max;
 468
 469     if (th->flags & UT_FLAG_INVERT) {
 470       if (!isnan(min) && !isnan(max)) {
 471         ssnprintf(buf, bufsize,
 472                   ": Data source \"%s\" is currently "
 473                   "%f. That is within the %s region of %f%s and %f%s.",
 474                   ds->ds[ds_index].name, values[ds_index],
 475                   (state == STATE_ERROR) ? "failure" : "warning", min,
 476                   ((th->flags & UT_FLAG_PERCENTAGE) != 0) ? "%" : "", max,
 477                   ((th->flags & UT_FLAG_PERCENTAGE) != 0) ? "%" : "");
 478       } else {
 479         ssnprintf(buf, bufsize, ": Data source \"%s\" is currently "
 480                                 "%f. That is %s the %s threshold of %f%s.",
 481                   ds->ds[ds_index].name, values[ds_index],
 482                   isnan(min) ? "below" : "above",
 483                   (state == STATE_ERROR) ? "failure" : "warning",
 484                   isnan(min) ? max : min,
 485                   ((th->flags & UT_FLAG_PERCENTAGE) != 0) ? "%" : "");
 486       }
 487     } else if (th->flags & UT_FLAG_PERCENTAGE) {
 488       gauge_t value;
 489       gauge_t sum;
 490
 491       sum = 0.0;
 492       for (size_t i = 0; i < vl->values_len; i++) {
 493         if (isnan(values[i]))
 494           continue;
 495
 496         sum += values[i];
 497       }
 498
 499       if (sum == 0.0)
 500         value = NAN;
 501       else
 502         value = 100.0 * values[ds_index] / sum;
 503
 504       ssnprintf(buf, bufsize,
 505                 ": Data source \"%s\" is currently "
 506                 "%g (%.2f%%). That is %s the %s threshold of %.2f%%.",
 507                 ds->ds[ds_index].name, values[ds_index], value,
 508                 (value < min) ? "below" : "above",
 509                 (state == STATE_ERROR) ? "failure" : "warning",
 510                 (value < min) ? min : max);
 511     } else /* is not inverted */
 512     {
 513       ssnprintf(buf, bufsize, ": Data source \"%s\" is currently "
 514                               "%f. That is %s the %s threshold of %f.",
 515                 ds->ds[ds_index].name, values[ds_index],
 516                 (values[ds_index] < min) ? "below" : "above",
 517                 (state == STATE_ERROR) ? "failure" : "warning",
 518                 (values[ds_index] < min) ? min : max);
 519     }
 520   }
 521
 522   plugin_dispatch_notification(&n);
 523
 524   plugin_notification_meta_free(n.meta);
 525   return (0);
 526 } /* }}} int ut_report_state */
 527
 528 /*
 529  * int ut_check_one_data_source
 530  *
 531  * Checks one data source against the given threshold configuration. If the
 532  * `DataSource' option is set in the threshold, and the name does NOT match,
 533  * `okay' is returned. If the threshold does match, its failure and warning
 534  * min and max values are checked and `failure' or `warning' is returned if
 535  * appropriate.
 536  * Does not fail.
 537  */
 538 static int ut_check_one_data_source(
 539     const data_set_t *ds, const value_list_t __attribute__((unused)) * vl,
 540     const threshold_t *th, const gauge_t *values, int ds_index) { /* {{{ */
 541   const char *ds_name;
 542   int is_warning = 0;
 543   int is_failure = 0;
 544   int prev_state = STATE_OKAY;
 545
 546   /* check if this threshold applies to this data source */
 547   if (ds != NULL) {
 548     ds_name = ds->ds[ds_index].name;
 549     if ((th->data_source[0] != 0) && (strcmp(ds_name, th->data_source) != 0))
 550       return (STATE_OKAY);
 551   }
 552
 553   if ((th->flags & UT_FLAG_INVERT) != 0) {
 554     is_warning--;
 555     is_failure--;
 556   }
 557
 558   /* XXX: This is an experimental code, not optimized, not fast, not reliable,
 559    * and probably, do not work as you expect. Enjoy! :D */
 560   if (th->hysteresis > 0) {
 561     prev_state = uc_get_state(ds, vl);
 562     /* The purpose of hysteresis is elliminating flapping state when the value
 563      * oscilates around the thresholds. In other words, what is important is
 564      * the previous state; if the new value would trigger a transition, make
 565      * sure that we artificially widen the range which is considered to apply
 566      * for the previous state, and only trigger the notification if the value
 567      * is outside of this expanded range.
 568      *
 569      * There is no hysteresis for the OKAY state.
 570      * */
 571     gauge_t hysteresis_for_warning = 0, hysteresis_for_failure = 0;
 572     switch (prev_state) {
 573     case STATE_ERROR:
 574       hysteresis_for_failure = th->hysteresis;
 575       break;
 576     case STATE_WARNING:
 577       hysteresis_for_warning = th->hysteresis;
 578       break;
 579     case STATE_OKAY:
 580       /* do nothing -- the hysteresis only applies to the non-normal states */
 581       break;
 582     }
 583
 584     if ((!isnan(th->failure_min) &&
 585          (th->failure_min + hysteresis_for_failure > values[ds_index])) ||
 586         (!isnan(th->failure_max) &&
 587          (th->failure_max - hysteresis_for_failure < values[ds_index])))
 588       is_failure++;
 589
 590     if ((!isnan(th->warning_min) &&
 591          (th->warning_min + hysteresis_for_warning > values[ds_index])) ||
 592         (!isnan(th->warning_max) &&
 593          (th->warning_max - hysteresis_for_warning < values[ds_index])))
 594       is_warning++;
 595
 596   } else { /* no hysteresis */
 597     if ((!isnan(th->failure_min) && (th->failure_min > values[ds_index])) ||
 598         (!isnan(th->failure_max) && (th->failure_max < values[ds_index])))
 599       is_failure++;
 600
 601     if ((!isnan(th->warning_min) && (th->warning_min > values[ds_index])) ||
 602         (!isnan(th->warning_max) && (th->warning_max < values[ds_index])))
 603       is_warning++;
 604   }
 605
 606   if (is_failure != 0)
 607     return (STATE_ERROR);
 608
 609   if (is_warning != 0)
 610     return (STATE_WARNING);
 611
 612   return (STATE_OKAY);
 613 } /* }}} int ut_check_one_data_source */
 614
 615 /*
 616  * int ut_check_one_threshold
 617  *
 618  * Checks all data sources of a value list against the given threshold, using
 619  * the ut_check_one_data_source function above. Returns the worst status,
 620  * which is `okay' if nothing has failed.
 621  * Returns less than zero if the data set doesn't have any data sources.
 622  */
 623 static int ut_check_one_threshold(const data_set_t *ds, const value_list_t *vl,
 624                                   const threshold_t *th, const gauge_t *values,
 625                                   int *ret_ds_index) { /* {{{ */
 626   int ret = -1;
 627   int ds_index = -1;
 628   gauge_t values_copy[ds->ds_num];
 629
 630   memcpy(values_copy, values, sizeof(values_copy));
 631
 632   if ((th->flags & UT_FLAG_PERCENTAGE) != 0) {
 633     int num = 0;
 634     gauge_t sum = 0.0;
 635
 636     if (ds->ds_num == 1) {
 637       WARNING(
 638           "ut_check_one_threshold: The %s type has only one data "
 639           "source, but you have configured to check this as a percentage. "
 640           "That doesn't make much sense, because the percentage will always "
 641           "be 100%%!",
 642           ds->type);
 643     }
 644
 645     /* Prepare `sum' and `num'. */
 646     for (size_t i = 0; i < ds->ds_num; i++)
 647       if (!isnan(values[i])) {
 648         num++;
 649         sum += values[i];
 650       }
 651
 652     if ((num == 0)       /* All data sources are undefined. */
 653         || (sum == 0.0)) /* Sum is zero, cannot calculate percentage. */
 654     {
 655       for (size_t i = 0; i < ds->ds_num; i++)
 656         values_copy[i] = NAN;
 657     } else /* We can actually calculate the percentage. */
 658     {
 659       for (size_t i = 0; i < ds->ds_num; i++)
 660         values_copy[i] = 100.0 * values[i] / sum;
 661     }
 662   } /* if (UT_FLAG_PERCENTAGE) */
 663
 664   for (size_t i = 0; i < ds->ds_num; i++) {
 665     int status;
 666
 667     status = ut_check_one_data_source(ds, vl, th, values_copy, i);
 668     if (ret < status) {
 669       ret = status;
 670       ds_index = i;
 671     }
 672   } /* for (ds->ds_num) */
 673
 674   if (ret_ds_index != NULL)
 675     *ret_ds_index = ds_index;
 676
 677   return (ret);
 678 } /* }}} int ut_check_one_threshold */
 679
 680 /*
 681  * int ut_check_threshold
 682  *
 683  * Gets a list of matching thresholds and searches for the worst status by one
 684  * of the thresholds. Then reports that status using the ut_report_state
 685  * function above.
 686  * Returns zero on success and if no threshold has been configured. Returns
 687  * less than zero on failure.
 688  */
 689 static int ut_check_threshold(const data_set_t *ds, const value_list_t *vl,
 690                               __attribute__((unused))
 691                               user_data_t *ud) { /* {{{ */
 692   threshold_t *th;
 693   gauge_t *values;
 694   int status;
 695
 696   int worst_state = -1;
 697   threshold_t *worst_th = NULL;
 698   int worst_ds_index = -1;
 699
 700   if (threshold_tree == NULL)
 701     return (0);
 702
 703   /* Is this lock really necessary? So far, thresholds are only inserted at
 704    * startup. -octo */
 705   pthread_mutex_lock(&threshold_lock);
 706   th = threshold_search(vl);
 707   pthread_mutex_unlock(&threshold_lock);
 708   if (th == NULL)
 709     return (0);
 710
 711   DEBUG("ut_check_threshold: Found matching threshold(s)");
 712
 713   values = uc_get_rate(ds, vl);
 714   if (values == NULL)
 715     return (0);
 716
 717   while (th != NULL) {
 718     int ds_index = -1;
 719
 720     status = ut_check_one_threshold(ds, vl, th, values, &ds_index);
 721     if (status < 0) {
 722       ERROR("ut_check_threshold: ut_check_one_threshold failed.");
 723       sfree(values);
 724       return (-1);
 725     }
 726
 727     if (worst_state < status) {
 728       worst_state = status;
 729       worst_th = th;
 730       worst_ds_index = ds_index;
 731     }
 732
 733     th = th->next;
 734   } /* while (th) */
 735
 736   status =
 737       ut_report_state(ds, vl, worst_th, values, worst_ds_index, worst_state);
 738   if (status != 0) {
 739     ERROR("ut_check_threshold: ut_report_state failed.");
 740     sfree(values);
 741     return (-1);
 742   }
 743
 744   sfree(values);
 745
 746   return (0);
 747 } /* }}} int ut_check_threshold */
 748
 749 /*
 750  * int ut_missing
 751  *
 752  * This function is called whenever a value goes "missing".
 753  */
 754 static int ut_missing(const value_list_t *vl,
 755                       __attribute__((unused)) user_data_t *ud) { /* {{{ */
 756   threshold_t *th;
 757   cdtime_t missing_time;
 758   char identifier[6 * DATA_MAX_NAME_LEN];
 759   notification_t n;
 760   cdtime_t now;
 761
 762   if (threshold_tree == NULL)
 763     return (0);
 764
 765   th = threshold_search(vl);
 766   /* dispatch notifications for "interesting" values only */
 767   if ((th == NULL) || ((th->flags & UT_FLAG_INTERESTING) == 0))
 768     return (0);
 769
 770   now = cdtime();
 771   missing_time = now - vl->time;
 772   FORMAT_VL(identifier, sizeof(identifier), vl);
 773
 774   NOTIFICATION_INIT_VL(&n, vl);
 775   ssnprintf(n.message, sizeof(n.message),
 776             "%s has not been updated for %.3f seconds.", identifier,
 777             CDTIME_T_TO_DOUBLE(missing_time));
 778   n.time = now;
 779
 780   plugin_dispatch_notification(&n);
 781
 782   return (0);
 783 } /* }}} int ut_missing */
 784
 785 static int ut_config(oconfig_item_t *ci) { /* {{{ */
 786   int status = 0;
 787   int old_size = c_avl_size(threshold_tree);
 788
 789   if (threshold_tree == NULL) {
 790     threshold_tree = c_avl_create((int (*)(const void *, const void *))strcmp);
 791     if (threshold_tree == NULL) {
 792       ERROR("ut_config: c_avl_create failed.");
 793       return (-1);
 794     }
 795   }
 796
 797   threshold_t th = {
 798       .warning_min = NAN,
 799       .warning_max = NAN,
 800       .failure_min = NAN,
 801       .failure_max = NAN,
 802       .flags = UT_FLAG_INTERESTING /* interesting by default */
 803   };
 804
 805   for (int i = 0; i < ci->children_num; i++) {
 806     oconfig_item_t *option = ci->children + i;
 807
 808     if (strcasecmp("Type", option->key) == 0)
 809       status = ut_config_type(&th, option);
 810     else if (strcasecmp("Plugin", option->key) == 0)
 811       status = ut_config_plugin(&th, option);
 812     else if (strcasecmp("Host", option->key) == 0)
 813       status = ut_config_host(&th, option);
 814     else {
 815       WARNING("threshold values: Option `%s' not allowed here.", option->key);
 816       status = -1;
 817     }
 818
 819     if (status != 0)
 820       break;
 821   }
 822
 823   /* register callbacks if this is the first time we see a valid config */
 824   if ((old_size == 0) && (c_avl_size(threshold_tree) > 0)) {
 825     plugin_register_missing("threshold", ut_missing,
 826                             /* user data = */ NULL);
 827     plugin_register_write("threshold", ut_check_threshold,
 828                           /* user data = */ NULL);
 829   }
 830
 831   return (status);
 832 } /* }}} int um_config */
 833
 834 void module_register(void) {
 835   plugin_register_complex_config("threshold", ut_config);
 836 }
 837
 838 /* vim: set sw=2 ts=8 sts=2 tw=78 et fdm=marker : */