src/rrdset.c

   1 #define NETDATA_RRD_INTERNALS 1
   2 #include "common.h"
   3
   4 #define RRD_DEFAULT_GAP_INTERPOLATIONS 1
   5
   6 void rrdset_check_rdlock_int(RRDSET *st, const char *file, const char *function, const unsigned long line) {
   7     debug(D_RRD_CALLS, "Checking read lock on chart '%s'", st->id);
   8
   9     int ret = pthread_rwlock_trywrlock(&st->rrdset_rwlock);
  10     if(ret == 0)
  11         fatal("RRDSET '%s' should be read-locked, but it is not, at function %s() at line %lu of file '%s'", st->id, function, line, file);
  12 }
  13
  14 void rrdset_check_wrlock_int(RRDSET *st, const char *file, const char *function, const unsigned long line) {
  15     debug(D_RRD_CALLS, "Checking write lock on chart '%s'", st->id);
  16
  17     int ret = pthread_rwlock_tryrdlock(&st->rrdset_rwlock);
  18     if(ret == 0)
  19         fatal("RRDSET '%s' should be write-locked, but it is not, at function %s() at line %lu of file '%s'", st->id, function, line, file);
  20 }
  21
  22
  23 // ----------------------------------------------------------------------------
  24 // RRDSET index
  25
  26 int rrdset_compare(void* a, void* b) {
  27     if(((RRDSET *)a)->hash < ((RRDSET *)b)->hash) return -1;
  28     else if(((RRDSET *)a)->hash > ((RRDSET *)b)->hash) return 1;
  29     else return strcmp(((RRDSET *)a)->id, ((RRDSET *)b)->id);
  30 }
  31
  32 static RRDSET *rrdset_index_find(RRDHOST *host, const char *id, uint32_t hash) {
  33     RRDSET tmp;
  34     strncpyz(tmp.id, id, RRD_ID_LENGTH_MAX);
  35     tmp.hash = (hash)?hash:simple_hash(tmp.id);
  36
  37     return (RRDSET *)avl_search_lock(&(host->rrdset_root_index), (avl *) &tmp);
  38 }
  39
  40 // ----------------------------------------------------------------------------
  41 // RRDSET name index
  42
  43 #define rrdset_from_avlname(avlname_ptr) ((RRDSET *)((avlname_ptr) - offsetof(RRDSET, avlname)))
  44
  45 int rrdset_compare_name(void* a, void* b) {
  46     RRDSET *A = rrdset_from_avlname(a);
  47     RRDSET *B = rrdset_from_avlname(b);
  48
  49     // fprintf(stderr, "COMPARING: %s with %s\n", A->name, B->name);
  50
  51     if(A->hash_name < B->hash_name) return -1;
  52     else if(A->hash_name > B->hash_name) return 1;
  53     else return strcmp(A->name, B->name);
  54 }
  55
  56 RRDSET *rrdset_index_add_name(RRDHOST *host, RRDSET *st) {
  57     void *result;
  58     // fprintf(stderr, "ADDING: %s (name: %s)\n", st->id, st->name);
  59     result = avl_insert_lock(&host->rrdset_root_index_name, (avl *) (&st->avlname));
  60     if(result) return rrdset_from_avlname(result);
  61     return NULL;
  62 }
  63
  64 RRDSET *rrdset_index_del_name(RRDHOST *host, RRDSET *st) {
  65     void *result;
  66     // fprintf(stderr, "DELETING: %s (name: %s)\n", st->id, st->name);
  67     result = (RRDSET *)avl_remove_lock(&((host)->rrdset_root_index_name), (avl *)(&st->avlname));
  68     if(result) return rrdset_from_avlname(result);
  69     return NULL;
  70 }
  71
  72
  73 // ----------------------------------------------------------------------------
  74 // RRDSET - find charts
  75
  76 static inline RRDSET *rrdset_index_find_name(RRDHOST *host, const char *name, uint32_t hash) {
  77     void *result = NULL;
  78     RRDSET tmp;
  79     tmp.name = name;
  80     tmp.hash_name = (hash)?hash:simple_hash(tmp.name);
  81
  82     // fprintf(stderr, "SEARCHING: %s\n", name);
  83     result = avl_search_lock(&host->rrdset_root_index_name, (avl *) (&(tmp.avlname)));
  84     if(result) {
  85         RRDSET *st = rrdset_from_avlname(result);
  86         if(strcmp(st->magic, RRDSET_MAGIC))
  87             error("Search for RRDSET %s returned an invalid RRDSET %s (name %s)", name, st->id, st->name);
  88
  89         // fprintf(stderr, "FOUND: %s\n", name);
  90         return rrdset_from_avlname(result);
  91     }
  92     // fprintf(stderr, "NOT FOUND: %s\n", name);
  93     return NULL;
  94 }
  95
  96 inline RRDSET *rrdset_find(RRDHOST *host, const char *id) {
  97     debug(D_RRD_CALLS, "rrdset_find() for chart '%s' in host '%s'", id, host->hostname);
  98     RRDSET *st = rrdset_index_find(host, id, 0);
  99     return(st);
 100 }
 101
 102 inline RRDSET *rrdset_find_bytype(RRDHOST *host, const char *type, const char *id) {
 103     debug(D_RRD_CALLS, "rrdset_find_bytype() for chart '%s.%s' in host '%s'", type, id, host->hostname);
 104
 105     char buf[RRD_ID_LENGTH_MAX + 1];
 106     strncpyz(buf, type, RRD_ID_LENGTH_MAX - 1);
 107     strcat(buf, ".");
 108     int len = (int) strlen(buf);
 109     strncpyz(&buf[len], id, (size_t) (RRD_ID_LENGTH_MAX - len));
 110
 111     return(rrdset_find(host, buf));
 112 }
 113
 114 inline RRDSET *rrdset_find_byname(RRDHOST *host, const char *name) {
 115     debug(D_RRD_CALLS, "rrdset_find_byname() for chart '%s' in host '%s'", name, host->hostname);
 116     RRDSET *st = rrdset_index_find_name(host, name, 0);
 117     return(st);
 118 }
 119
 120 // ----------------------------------------------------------------------------
 121 // RRDSET - rename charts
 122
 123 char *rrdset_strncpyz_name(char *to, const char *from, size_t length) {
 124     char c, *p = to;
 125
 126     while (length-- && (c = *from++)) {
 127         if(c != '.' && !isalnum(c))
 128             c = '_';
 129
 130         *p++ = c;
 131     }
 132
 133     *p = '\0';
 134
 135     return to;
 136 }
 137
 138 void rrdset_set_name(RRDSET *st, const char *name) {
 139     if(unlikely(st->name && !strcmp(st->name, name)))
 140         return;
 141
 142     debug(D_RRD_CALLS, "rrdset_set_name() old: %s, new: %s", st->name, name);
 143
 144     char b[CONFIG_MAX_VALUE + 1];
 145     char n[RRD_ID_LENGTH_MAX + 1];
 146
 147     snprintfz(n, RRD_ID_LENGTH_MAX, "%s.%s", st->type, name);
 148     rrdset_strncpyz_name(b, n, CONFIG_MAX_VALUE);
 149
 150     if(st->name) {
 151         rrdset_index_del_name(st->rrdhost, st);
 152         st->name = config_set_default(st->config_section, "name", b);
 153         st->hash_name = simple_hash(st->name);
 154         rrdsetvar_rename_all(st);
 155     }
 156     else {
 157         st->name = config_get(st->config_section, "name", b);
 158         st->hash_name = simple_hash(st->name);
 159     }
 160
 161     rrdset_wrlock(st);
 162     RRDDIM *rd;
 163     rrddim_foreach_write(rd, st)
 164         rrddimvar_rename_all(rd);
 165     rrdset_unlock(st);
 166
 167     if(unlikely(rrdset_index_add_name(st->rrdhost, st) != st))
 168         error("RRDSET: INTERNAL ERROR: attempted to index duplicate chart name '%s'", st->name);
 169 }
 170
 171
 172 // ----------------------------------------------------------------------------
 173 // RRDSET - reset a chart
 174
 175 void rrdset_reset(RRDSET *st) {
 176     debug(D_RRD_CALLS, "rrdset_reset() %s", st->name);
 177
 178     st->last_collected_time.tv_sec = 0;
 179     st->last_collected_time.tv_usec = 0;
 180     st->last_updated.tv_sec = 0;
 181     st->last_updated.tv_usec = 0;
 182     st->current_entry = 0;
 183     st->counter = 0;
 184     st->counter_done = 0;
 185
 186     RRDDIM *rd;
 187     rrddim_foreach_read(rd, st) {
 188         rd->last_collected_time.tv_sec = 0;
 189         rd->last_collected_time.tv_usec = 0;
 190         rd->counter = 0;
 191         memset(rd->values, 0, rd->entries * sizeof(storage_number));
 192     }
 193 }
 194
 195 // ----------------------------------------------------------------------------
 196 // RRDSET - helpers for rrdset_create()
 197
 198 inline long align_entries_to_pagesize(long entries) {
 199     if(central_netdata_to_push_data)
 200         return entries;
 201
 202     if(entries < 5) entries = 5;
 203     if(entries > RRD_HISTORY_ENTRIES_MAX) entries = RRD_HISTORY_ENTRIES_MAX;
 204
 205     long page = (size_t)sysconf(_SC_PAGESIZE);
 206     long size = sizeof(RRDDIM) + entries * sizeof(storage_number);
 207     if(size % page) {
 208         size -= (size % page);
 209         size += page;
 210
 211         long n = (size - sizeof(RRDDIM)) / sizeof(storage_number);
 212         return n;
 213     }
 214
 215     return entries;
 216 }
 217
 218 static inline void timeval_align(struct timeval *tv, int update_every) {
 219     tv->tv_sec -= tv->tv_sec % update_every;
 220     tv->tv_usec = 500000;
 221 }
 222
 223 // ----------------------------------------------------------------------------
 224 // RRDSET - free a chart
 225
 226 void rrdset_free(RRDSET *st) {
 227     if(unlikely(!st)) return;
 228
 229     rrdhost_check_wrlock(st->rrdhost);  // make sure we have a write lock on the host
 230     rrdset_wrlock(st);                  // lock this RRDSET
 231
 232     // ------------------------------------------------------------------------
 233     // free its children structures
 234
 235     while(st->variables)  rrdsetvar_free(st->variables);
 236     while(st->alarms)     rrdsetcalc_unlink(st->alarms);
 237     while(st->dimensions) rrddim_free(st, st->dimensions);
 238
 239     rrdfamily_free(st->rrdhost, st->rrdfamily);
 240
 241     // ------------------------------------------------------------------------
 242     // remove it from the indexes
 243
 244     if(unlikely(rrdset_index_del(st->rrdhost, st) != st))
 245         error("RRDSET: INTERNAL ERROR: attempt to remove from index chart '%s', removed a different chart.", st->id);
 246
 247     rrdset_index_del_name(st->rrdhost, st);
 248
 249     // ------------------------------------------------------------------------
 250     // unlink it from the host
 251
 252     if(st == st->rrdhost->rrdset_root) {
 253         st->rrdhost->rrdset_root = st->next;
 254     }
 255     else {
 256         // find the previous one
 257         RRDSET *s;
 258         for(s = st->rrdhost->rrdset_root; s && s->next != st ; s = s->next) ;
 259
 260         // bypass it
 261         if(s) s->next = st->next;
 262         else error("Request to free RRDSET '%s': cannot find it under host '%s'", st->id, st->rrdhost->hostname);
 263     }
 264
 265     rrdset_unlock(st);
 266
 267     // ------------------------------------------------------------------------
 268     // free it
 269
 270     // free directly allocated members
 271     freez(st->config_section);
 272
 273     if(st->rrd_memory_mode == RRD_MEMORY_MODE_SAVE || st->rrd_memory_mode == RRD_MEMORY_MODE_MAP) {
 274         debug(D_RRD_CALLS, "Unmapping stats '%s'.", st->name);
 275         munmap(st, st->memsize);
 276     }
 277     else
 278         freez(st);
 279 }
 280
 281 // ----------------------------------------------------------------------------
 282 // RRDSET - create a chart
 283
 284 RRDSET *rrdset_create(RRDHOST *host, const char *type, const char *id, const char *name, const char *family
 285                       , const char *context, const char *title, const char *units, long priority
 286                       , int update_every, RRDSET_TYPE chart_type) {
 287
 288     if(!type || !type[0]) {
 289         fatal("Cannot create rrd stats without a type.");
 290         return NULL;
 291     }
 292
 293     if(!id || !id[0]) {
 294         fatal("Cannot create rrd stats without an id.");
 295         return NULL;
 296     }
 297
 298     // ------------------------------------------------------------------------
 299     // check if it already exists
 300
 301     char fullid[RRD_ID_LENGTH_MAX + 1];
 302     snprintfz(fullid, RRD_ID_LENGTH_MAX, "%s.%s", type, id);
 303
 304     RRDSET *st = rrdset_find(host, fullid);
 305     if(st) {
 306         debug(D_RRD_CALLS, "RRDSET '%s', already exists.", fullid);
 307         return st;
 308     }
 309
 310     char fullfilename[FILENAME_MAX + 1];
 311
 312     // ------------------------------------------------------------------------
 313     // compose the config_section for this chart
 314
 315     char config_section[RRD_ID_LENGTH_MAX + 1];
 316     if(host == localhost)
 317         strcpy(config_section, fullid);
 318     else
 319         snprintfz(config_section, RRD_ID_LENGTH_MAX, "%s/%s", host->machine_guid, fullid);
 320
 321     // ------------------------------------------------------------------------
 322     // get the options from the config, we need to create it
 323
 324     long rentries = config_get_number(config_section, "history", host->rrd_history_entries);
 325     long entries = align_entries_to_pagesize(rentries);
 326     if(entries != rentries) entries = config_set_number(config_section, "history", entries);
 327
 328     int enabled = config_get_boolean(config_section, "enabled", 1);
 329     if(!enabled) entries = 5;
 330
 331     unsigned long size = sizeof(RRDSET);
 332     char *cache_dir = rrdset_cache_dir(host, fullid, config_section);
 333
 334     // ------------------------------------------------------------------------
 335     // load it or allocate it
 336
 337     debug(D_RRD_CALLS, "Creating RRD_STATS for '%s.%s'.", type, id);
 338
 339     snprintfz(fullfilename, FILENAME_MAX, "%s/main.db", cache_dir);
 340     if(host->rrd_memory_mode != RRD_MEMORY_MODE_RAM) {
 341         st = (RRDSET *) mymmap(fullfilename, size, ((host->rrd_memory_mode == RRD_MEMORY_MODE_MAP) ? MAP_SHARED : MAP_PRIVATE), 0);
 342         if(st) {
 343             memset(&st->avl, 0, sizeof(avl));
 344             memset(&st->avlname, 0, sizeof(avl));
 345             memset(&st->variables_root_index, 0, sizeof(avl_tree_lock));
 346             memset(&st->dimensions_index, 0, sizeof(avl_tree_lock));
 347             memset(&st->rrdset_rwlock, 0, sizeof(pthread_rwlock_t));
 348
 349             st->name = NULL;
 350             st->type = NULL;
 351             st->family = NULL;
 352             st->context = NULL;
 353             st->title = NULL;
 354             st->units = NULL;
 355             st->dimensions = NULL;
 356             st->next = NULL;
 357             st->variables = NULL;
 358             st->alarms = NULL;
 359             st->flags = 0x00000000;
 360
 361             if(strcmp(st->magic, RRDSET_MAGIC) != 0) {
 362                 errno = 0;
 363                 info("Initializing file %s.", fullfilename);
 364                 memset(st, 0, size);
 365             }
 366             else if(strcmp(st->id, fullid) != 0) {
 367                 errno = 0;
 368                 error("File %s contents are not for chart %s. Clearing it.", fullfilename, fullid);
 369                 // munmap(st, size);
 370                 // st = NULL;
 371                 memset(st, 0, size);
 372             }
 373             else if(st->memsize != size || st->entries != entries) {
 374                 errno = 0;
 375                 error("File %s does not have the desired size. Clearing it.", fullfilename);
 376                 memset(st, 0, size);
 377             }
 378             else if(st->update_every != update_every) {
 379                 errno = 0;
 380                 error("File %s does not have the desired update frequency. Clearing it.", fullfilename);
 381                 memset(st, 0, size);
 382             }
 383             else if((now_realtime_sec() - st->last_updated.tv_sec) > update_every * entries) {
 384                 errno = 0;
 385                 error("File %s is too old. Clearing it.", fullfilename);
 386                 memset(st, 0, size);
 387             }
 388
 389             // make sure the database is aligned
 390             if(st->last_updated.tv_sec)
 391                 timeval_align(&st->last_updated, update_every);
 392
 393             // make sure we have the right memory mode
 394             // even if we cleared the memory
 395             st->rrd_memory_mode = host->rrd_memory_mode;
 396         }
 397     }
 398
 399     if(unlikely(!st)) {
 400         st = callocz(1, size);
 401         st->rrd_memory_mode = RRD_MEMORY_MODE_RAM;
 402     }
 403
 404     st->config_section = strdup(config_section);
 405     st->rrdhost = host;
 406     st->memsize = size;
 407     st->entries = entries;
 408     st->update_every = update_every;
 409
 410     if(st->current_entry >= st->entries) st->current_entry = 0;
 411
 412     strcpy(st->cache_filename, fullfilename);
 413     strcpy(st->magic, RRDSET_MAGIC);
 414
 415     strcpy(st->id, fullid);
 416     st->hash = simple_hash(st->id);
 417
 418     st->cache_dir = cache_dir;
 419
 420     st->chart_type = rrdset_type_id(config_get(st->config_section, "chart type", rrdset_type_name(chart_type)));
 421     st->type       = config_get(st->config_section, "type", type);
 422     st->family     = config_get(st->config_section, "family", family?family:st->type);
 423     st->units      = config_get(st->config_section, "units", units?units:"");
 424
 425     st->context    = config_get(st->config_section, "context", context?context:st->id);
 426     st->hash_context = simple_hash(st->context);
 427
 428     st->priority = config_get_number(st->config_section, "priority", priority);
 429     if(enabled)
 430         rrdset_flag_set(st, RRDSET_FLAG_ENABLED);
 431     else
 432         rrdset_flag_clear(st, RRDSET_FLAG_ENABLED);
 433
 434     rrdset_flag_clear(st, RRDSET_FLAG_DETAIL);
 435     rrdset_flag_clear(st, RRDSET_FLAG_DEBUG);
 436
 437     // if(!strcmp(st->id, "disk_util.dm-0")) {
 438     //     st->debug = 1;
 439     //     error("enabled debugging for '%s'", st->id);
 440     // }
 441     // else error("not enabled debugging for '%s'", st->id);
 442
 443     st->green = NAN;
 444     st->red = NAN;
 445
 446     st->last_collected_time.tv_sec = 0;
 447     st->last_collected_time.tv_usec = 0;
 448     st->counter_done = 0;
 449
 450     st->gap_when_lost_iterations_above = (int) (
 451             config_get_number(st->config_section, "gap when lost iterations above", RRD_DEFAULT_GAP_INTERPOLATIONS) + 2);
 452
 453     avl_init_lock(&st->dimensions_index, rrddim_compare);
 454     avl_init_lock(&st->variables_root_index, rrdvar_compare);
 455
 456     pthread_rwlock_init(&st->rrdset_rwlock, NULL);
 457     rrdhost_wrlock(host);
 458
 459     if(name && *name) rrdset_set_name(st, name);
 460     else rrdset_set_name(st, id);
 461
 462     {
 463         char varvalue[CONFIG_MAX_VALUE + 1];
 464         char varvalue2[CONFIG_MAX_VALUE + 1];
 465         snprintfz(varvalue, CONFIG_MAX_VALUE, "%s (%s)", title?title:"", st->name);
 466         json_escape_string(varvalue2, varvalue, sizeof(varvalue2));
 467         st->title = config_get(st->config_section, "title", varvalue2);
 468     }
 469
 470     st->rrdfamily = rrdfamily_create(host, st->family);
 471
 472     st->next = host->rrdset_root;
 473     host->rrdset_root = st;
 474
 475     if(host->health_enabled) {
 476         rrdsetvar_create(st, "last_collected_t", RRDVAR_TYPE_TIME_T, &st->last_collected_time.tv_sec, 0);
 477         rrdsetvar_create(st, "collected_total_raw", RRDVAR_TYPE_TOTAL, &st->last_collected_total, 0);
 478         rrdsetvar_create(st, "green", RRDVAR_TYPE_CALCULATED, &st->green, 0);
 479         rrdsetvar_create(st, "red", RRDVAR_TYPE_CALCULATED, &st->red, 0);
 480         rrdsetvar_create(st, "update_every", RRDVAR_TYPE_INT, &st->update_every, 0);
 481     }
 482
 483     if(unlikely(rrdset_index_add(host, st) != st))
 484         error("RRDSET: INTERNAL ERROR: attempt to index duplicate chart '%s'", st->id);
 485
 486     rrdsetcalc_link_matching(st);
 487     rrdcalctemplate_link_matching(st);
 488
 489     rrdhost_unlock(host);
 490
 491     return(st);
 492 }
 493
 494
 495 // ----------------------------------------------------------------------------
 496 // RRDSET - data collection iteration control
 497
 498 inline void rrdset_next_usec_unfiltered(RRDSET *st, usec_t microseconds) {
 499
 500     if(unlikely(!st->last_collected_time.tv_sec)) {
 501         // the first entry
 502         microseconds = st->update_every * USEC_PER_SEC;
 503     }
 504     else if(unlikely(!microseconds)) {
 505         // no dt given by the plugin
 506         struct timeval now;
 507         now_realtime_timeval(&now);
 508         microseconds = dt_usec(&now, &st->last_collected_time);
 509     }
 510
 511     st->usec_since_last_update = microseconds;
 512 }
 513
 514 inline void rrdset_next_usec(RRDSET *st, usec_t microseconds) {
 515     struct timeval now;
 516     now_realtime_timeval(&now);
 517
 518     if(unlikely(!st->last_collected_time.tv_sec)) {
 519         // the first entry
 520         microseconds = st->update_every * USEC_PER_SEC;
 521     }
 522     else if(unlikely(!microseconds)) {
 523         // no dt given by the plugin
 524         microseconds = dt_usec(&now, &st->last_collected_time);
 525     }
 526     else {
 527         // microseconds has the time since the last collection
 528 //#ifdef NETDATA_INTERNAL_CHECKS
 529 //        usec_t now_usec = timeval_usec(&now);
 530 //        usec_t last_usec = timeval_usec(&st->last_collected_time);
 531 //#endif
 532         susec_t since_last_usec = dt_usec_signed(&now, &st->last_collected_time);
 533
 534         if(unlikely(since_last_usec < 0)) {
 535             // oops! the database is in the future
 536             error("Database for chart '%s' on host '%s' is %lld microseconds in the future.", st->id, st->rrdhost->hostname, -since_last_usec);
 537             memcpy(&st->last_collected_time, &now, sizeof(struct timeval));
 538             st->last_collected_time.tv_sec -= st->update_every;
 539
 540             memcpy(&st->last_updated, &now, sizeof(struct timeval));
 541             timeval_align(&st->last_updated, st->update_every);
 542             st->last_updated.tv_sec -= st->update_every;
 543
 544             microseconds = st->update_every * USEC_PER_SEC;
 545             since_last_usec = st->update_every * USEC_PER_SEC;
 546         }
 547
 548         // verify the microseconds given is good
 549         if(unlikely(microseconds > (usec_t)since_last_usec)) {
 550             debug(D_RRD_CALLS, "dt %llu usec given is too big - it leads %llu usec to the future, for chart '%s' (%s).", microseconds, microseconds - (usec_t)since_last_usec, st->name, st->id);
 551
 552 //#ifdef NETDATA_INTERNAL_CHECKS
 553 //            if(unlikely(last_usec + microseconds > now_usec + 1000))
 554 //                error("dt %llu usec given is too big - it leads %llu usec to the future, for chart '%s' (%s).", microseconds, microseconds - (usec_t)since_last_usec, st->name, st->id);
 555 //#endif
 556
 557             microseconds = (usec_t)since_last_usec;
 558         }
 559         else if(unlikely(microseconds < (usec_t)since_last_usec * 0.8)) {
 560             debug(D_RRD_CALLS, "dt %llu usec given is too small - expected %llu usec up to -20%%, for chart '%s' (%s).", microseconds, (usec_t)since_last_usec, st->name, st->id);
 561
 562 //#ifdef NETDATA_INTERNAL_CHECKS
 563 //            error("dt %llu usec given is too small - expected %llu usec up to -20%%, for chart '%s' (%s).", microseconds, (usec_t)since_last_usec, st->name, st->id);
 564 //#endif
 565             microseconds = (usec_t)since_last_usec;
 566         }
 567     }
 568     debug(D_RRD_CALLS, "rrdset_next_usec() for chart %s with microseconds %llu", st->name, microseconds);
 569
 570     if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 571         debug(D_RRD_STATS, "%s: NEXT: %llu microseconds", st->name, microseconds);
 572
 573     st->usec_since_last_update = microseconds;
 574 }
 575
 576
 577 // ----------------------------------------------------------------------------
 578 // RRDSET - process the collected values for all dimensions of a chart
 579
 580 static inline void rrdset_init_last_collected_time(RRDSET *st) {
 581     now_realtime_timeval(&st->last_collected_time);
 582     timeval_align(&st->last_collected_time, st->update_every);
 583 }
 584
 585 static inline usec_t rrdset_update_last_collected_time(RRDSET *st) {
 586     usec_t last_collect_ut = st->last_collected_time.tv_sec * USEC_PER_SEC + st->last_collected_time.tv_usec;
 587     usec_t ut = last_collect_ut + st->usec_since_last_update;
 588     st->last_collected_time.tv_sec = (time_t) (ut / USEC_PER_SEC);
 589     st->last_collected_time.tv_usec = (suseconds_t) (ut % USEC_PER_SEC);
 590     return last_collect_ut;
 591 }
 592
 593 static inline void rrdset_init_last_updated_time(RRDSET *st) {
 594     // copy the last collected time to last updated time
 595     memcpy(&st->last_updated, &st->last_collected_time, sizeof(struct timeval));
 596     timeval_align(&st->last_updated, st->update_every);
 597     st->last_updated.tv_usec = 0;
 598 }
 599
 600 static inline void rrdset_done_push_int(RRDSET *st) {
 601     if(unlikely(!st->last_collected_time.tv_sec)) {
 602         // it is the first entry
 603         // set the last_collected_time to now
 604         rrdset_init_last_collected_time(st);
 605     }
 606     else {
 607         // it is not the first entry
 608         // calculate the proper last_collected_time, using usec_since_last_update
 609         rrdset_update_last_collected_time(st);
 610     }
 611
 612     rrdset_done_push(st);
 613
 614     st->counter++;
 615     st->counter_done++;
 616 }
 617
 618 void rrdset_done(RRDSET *st) {
 619     if(unlikely(netdata_exit)) return;
 620
 621     if(unlikely(central_netdata_to_push_data)) {
 622         rrdset_done_push_int(st);
 623         return;
 624     }
 625
 626     debug(D_RRD_CALLS, "rrdset_done() for chart %s", st->name);
 627
 628     RRDDIM *rd;
 629
 630     int
 631             pthreadoldcancelstate;  // store the old cancelable pthread state, to restore it at the end
 632
 633     char
 634             store_this_entry = 1,   // boolean: 1 = store this entry, 0 = don't store this entry
 635             first_entry = 0;        // boolean: 1 = this is the first entry seen for this chart, 0 = all other entries
 636
 637     unsigned int
 638             stored_entries = 0;     // the number of entries we have stored in the db, during this call to rrdset_done()
 639
 640     usec_t
 641             last_collect_ut,        // the timestamp in microseconds, of the last collected value
 642             now_collect_ut,         // the timestamp in microseconds, of this collected value (this is NOW)
 643             last_stored_ut,         // the timestamp in microseconds, of the last stored entry in the db
 644             next_store_ut,          // the timestamp in microseconds, of the next entry to store in the db
 645             update_every_ut = st->update_every * USEC_PER_SEC; // st->update_every in microseconds
 646
 647     if(unlikely(pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, &pthreadoldcancelstate) != 0))
 648         error("Cannot set pthread cancel state to DISABLE.");
 649
 650     // a read lock is OK here
 651     rrdset_rdlock(st);
 652
 653 /*
 654     // enable the chart, if it was disabled
 655     if(unlikely(rrd_delete_unupdated_dimensions) && !st->enabled)
 656         st->enabled = 1;
 657 */
 658
 659     // check if the chart has a long time to be updated
 660     if(unlikely(st->usec_since_last_update > st->entries * update_every_ut)) {
 661         info("%s: took too long to be updated (%0.3Lf secs). Resetting it.", st->name, (long double)(st->usec_since_last_update / 1000000.0));
 662         rrdset_reset(st);
 663         st->usec_since_last_update = update_every_ut;
 664         first_entry = 1;
 665     }
 666
 667     if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 668         debug(D_RRD_STATS, "%s: microseconds since last update: %llu", st->name, st->usec_since_last_update);
 669
 670     // set last_collected_time
 671     if(unlikely(!st->last_collected_time.tv_sec)) {
 672         // it is the first entry
 673         // set the last_collected_time to now
 674         rrdset_init_last_collected_time(st);
 675
 676         last_collect_ut = st->last_collected_time.tv_sec * USEC_PER_SEC + st->last_collected_time.tv_usec - update_every_ut;
 677
 678         // the first entry should not be stored
 679         store_this_entry = 0;
 680         first_entry = 1;
 681
 682         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 683             debug(D_RRD_STATS, "%s: has not set last_collected_time. Setting it now. Will not store the next entry.", st->name);
 684     }
 685     else {
 686         // it is not the first entry
 687         // calculate the proper last_collected_time, using usec_since_last_update
 688         last_collect_ut = rrdset_update_last_collected_time(st);
 689     }
 690
 691     // if this set has not been updated in the past
 692     // we fake the last_update time to be = now - usec_since_last_update
 693     if(unlikely(!st->last_updated.tv_sec)) {
 694         // it has never been updated before
 695         // set a fake last_updated, in the past using usec_since_last_update
 696         rrdset_init_last_updated_time(st);
 697
 698         // the first entry should not be stored
 699         store_this_entry = 0;
 700         first_entry = 1;
 701
 702         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 703             debug(D_RRD_STATS, "%s: initializing last_updated to last_collected_time - %llu microseconds. Will not store the next entry.", st->name, st->usec_since_last_update);
 704     }
 705
 706     // check if we will re-write the entire data set
 707     if(unlikely(dt_usec(&st->last_collected_time, &st->last_updated) > st->entries * update_every_ut)) {
 708         info("%s: too old data (last updated at %ld.%ld, last collected at %ld.%ld). Resetting it. Will not store the next entry.", st->name, st->last_updated.tv_sec, st->last_updated.tv_usec, st->last_collected_time.tv_sec, st->last_collected_time.tv_usec);
 709         rrdset_reset(st);
 710         rrdset_init_last_updated_time(st);
 711
 712         st->usec_since_last_update = update_every_ut;
 713
 714         // the first entry should not be stored
 715         store_this_entry = 0;
 716         first_entry = 1;
 717     }
 718
 719     // these are the 3 variables that will help us in interpolation
 720     // last_stored_ut = the last time we added a value to the storage
 721     // now_collect_ut = the time the current value has been collected
 722     // next_store_ut  = the time of the next interpolation point
 723     last_stored_ut = st->last_updated.tv_sec * USEC_PER_SEC + st->last_updated.tv_usec;
 724     now_collect_ut = st->last_collected_time.tv_sec * USEC_PER_SEC + st->last_collected_time.tv_usec;
 725     next_store_ut  = (st->last_updated.tv_sec + st->update_every) * USEC_PER_SEC;
 726
 727     if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG))) {
 728         debug(D_RRD_STATS, "%s: last_collect_ut = %0.3Lf (last collection time)", st->name, (long double)last_collect_ut/1000000.0);
 729         debug(D_RRD_STATS, "%s: now_collect_ut  = %0.3Lf (current collection time)", st->name, (long double)now_collect_ut/1000000.0);
 730         debug(D_RRD_STATS, "%s: last_stored_ut  = %0.3Lf (last updated time)", st->name, (long double)last_stored_ut/1000000.0);
 731         debug(D_RRD_STATS, "%s: next_store_ut   = %0.3Lf (next interpolation point)", st->name, (long double)next_store_ut/1000000.0);
 732     }
 733
 734     if(unlikely(!st->counter_done)) {
 735         store_this_entry = 0;
 736         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 737             debug(D_RRD_STATS, "%s: Will not store the next entry.", st->name);
 738     }
 739     st->counter_done++;
 740
 741     // calculate totals and count the dimensions
 742     int dimensions = 0;
 743     st->collected_total = 0;
 744     rrddim_foreach_read(rd, st) {
 745         dimensions++;
 746         if(likely(rrddim_flag_check(rd, RRDDIM_FLAG_UPDATED)))
 747             st->collected_total += rd->collected_value;
 748     }
 749
 750     uint32_t storage_flags = SN_EXISTS;
 751
 752     // process all dimensions to calculate their values
 753     // based on the collected figures only
 754     // at this stage we do not interpolate anything
 755     rrddim_foreach_read(rd, st) {
 756
 757         if(unlikely(!rrddim_flag_check(rd, RRDDIM_FLAG_UPDATED))) {
 758             rd->calculated_value = 0;
 759             continue;
 760         }
 761
 762         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 763             debug(D_RRD_STATS, "%s/%s: START "
 764                     " last_collected_value = " COLLECTED_NUMBER_FORMAT
 765                     " collected_value = " COLLECTED_NUMBER_FORMAT
 766                     " last_calculated_value = " CALCULATED_NUMBER_FORMAT
 767                     " calculated_value = " CALCULATED_NUMBER_FORMAT
 768                                       , st->id, rd->name
 769                                       , rd->last_collected_value
 770                                       , rd->collected_value
 771                                       , rd->last_calculated_value
 772                                       , rd->calculated_value
 773             );
 774
 775         switch(rd->algorithm) {
 776             case RRD_ALGORITHM_ABSOLUTE:
 777                 rd->calculated_value = (calculated_number)rd->collected_value
 778                                        * (calculated_number)rd->multiplier
 779                                        / (calculated_number)rd->divisor;
 780
 781                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 782                     debug(D_RRD_STATS, "%s/%s: CALC ABS/ABS-NO-IN "
 783                             CALCULATED_NUMBER_FORMAT " = "
 784                             COLLECTED_NUMBER_FORMAT
 785                             " * " CALCULATED_NUMBER_FORMAT
 786                             " / " CALCULATED_NUMBER_FORMAT
 787                           , st->id, rd->name
 788                           , rd->calculated_value
 789                           , rd->collected_value
 790                           , (calculated_number)rd->multiplier
 791                           , (calculated_number)rd->divisor
 792                     );
 793                 break;
 794
 795             case RRD_ALGORITHM_PCENT_OVER_ROW_TOTAL:
 796                 if(unlikely(!st->collected_total))
 797                     rd->calculated_value = 0;
 798                 else
 799                     // the percentage of the current value
 800                     // over the total of all dimensions
 801                     rd->calculated_value =
 802                             (calculated_number)100
 803                             * (calculated_number)rd->collected_value
 804                             / (calculated_number)st->collected_total;
 805
 806                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 807                     debug(D_RRD_STATS, "%s/%s: CALC PCENT-ROW "
 808                             CALCULATED_NUMBER_FORMAT " = 100"
 809                                     " * " COLLECTED_NUMBER_FORMAT
 810                             " / " COLLECTED_NUMBER_FORMAT
 811                           , st->id, rd->name
 812                           , rd->calculated_value
 813                           , rd->collected_value
 814                           , st->collected_total
 815                     );
 816                 break;
 817
 818             case RRD_ALGORITHM_INCREMENTAL:
 819                 if(unlikely(rd->counter <= 1)) {
 820                     rd->calculated_value = 0;
 821                     continue;
 822                 }
 823
 824                 // if the new is smaller than the old (an overflow, or reset), set the old equal to the new
 825                 // to reset the calculation (it will give zero as the calculation for this second)
 826                 if(unlikely(rd->last_collected_value > rd->collected_value)) {
 827                     debug(D_RRD_STATS, "%s.%s: RESET or OVERFLOW. Last collected value = " COLLECTED_NUMBER_FORMAT ", current = " COLLECTED_NUMBER_FORMAT
 828                           , st->name, rd->name
 829                           , rd->last_collected_value
 830                           , rd->collected_value);
 831
 832                     if(!(rrddim_flag_check(rd, RRDDIM_FLAG_DONT_DETECT_RESETS_OR_OVERFLOWS)))
 833                         storage_flags = SN_EXISTS_RESET;
 834
 835                     rd->last_collected_value = rd->collected_value;
 836                 }
 837
 838                 rd->calculated_value +=
 839                         (calculated_number)(rd->collected_value - rd->last_collected_value)
 840                         * (calculated_number)rd->multiplier
 841                         / (calculated_number)rd->divisor;
 842
 843                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 844                     debug(D_RRD_STATS, "%s/%s: CALC INC PRE "
 845                             CALCULATED_NUMBER_FORMAT " = ("
 846                             COLLECTED_NUMBER_FORMAT " - " COLLECTED_NUMBER_FORMAT
 847                             ")"
 848                                     " * " CALCULATED_NUMBER_FORMAT
 849                             " / " CALCULATED_NUMBER_FORMAT
 850                           , st->id, rd->name
 851                           , rd->calculated_value
 852                           , rd->collected_value, rd->last_collected_value
 853                           , (calculated_number)rd->multiplier
 854                           , (calculated_number)rd->divisor
 855                     );
 856                 break;
 857
 858             case RRD_ALGORITHM_PCENT_OVER_DIFF_TOTAL:
 859                 if(unlikely(rd->counter <= 1)) {
 860                     rd->calculated_value = 0;
 861                     continue;
 862                 }
 863
 864                 // if the new is smaller than the old (an overflow, or reset), set the old equal to the new
 865                 // to reset the calculation (it will give zero as the calculation for this second)
 866                 if(unlikely(rd->last_collected_value > rd->collected_value)) {
 867                     debug(D_RRD_STATS, "%s.%s: RESET or OVERFLOW. Last collected value = " COLLECTED_NUMBER_FORMAT ", current = " COLLECTED_NUMBER_FORMAT
 868                           , st->name, rd->name
 869                           , rd->last_collected_value
 870                           , rd->collected_value);
 871
 872                     if(!(rrddim_flag_check(rd, RRDDIM_FLAG_DONT_DETECT_RESETS_OR_OVERFLOWS)))
 873                         storage_flags = SN_EXISTS_RESET;
 874
 875                     rd->last_collected_value = rd->collected_value;
 876                 }
 877
 878                 // the percentage of the current increment
 879                 // over the increment of all dimensions together
 880                 if(unlikely(st->collected_total == st->last_collected_total))
 881                     rd->calculated_value = 0;
 882                 else
 883                     rd->calculated_value =
 884                             (calculated_number)100
 885                             * (calculated_number)(rd->collected_value - rd->last_collected_value)
 886                             / (calculated_number)(st->collected_total - st->last_collected_total);
 887
 888                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 889                     debug(D_RRD_STATS, "%s/%s: CALC PCENT-DIFF "
 890                             CALCULATED_NUMBER_FORMAT " = 100"
 891                                     " * (" COLLECTED_NUMBER_FORMAT " - " COLLECTED_NUMBER_FORMAT ")"
 892                                     " / (" COLLECTED_NUMBER_FORMAT " - " COLLECTED_NUMBER_FORMAT ")"
 893                           , st->id, rd->name
 894                           , rd->calculated_value
 895                           , rd->collected_value, rd->last_collected_value
 896                           , st->collected_total, st->last_collected_total
 897                     );
 898                 break;
 899
 900             default:
 901                 // make the default zero, to make sure
 902                 // it gets noticed when we add new types
 903                 rd->calculated_value = 0;
 904
 905                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 906                     debug(D_RRD_STATS, "%s/%s: CALC "
 907                             CALCULATED_NUMBER_FORMAT " = 0"
 908                           , st->id, rd->name
 909                           , rd->calculated_value
 910                     );
 911                 break;
 912         }
 913
 914         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 915             debug(D_RRD_STATS, "%s/%s: PHASE2 "
 916                     " last_collected_value = " COLLECTED_NUMBER_FORMAT
 917                     " collected_value = " COLLECTED_NUMBER_FORMAT
 918                     " last_calculated_value = " CALCULATED_NUMBER_FORMAT
 919                     " calculated_value = " CALCULATED_NUMBER_FORMAT
 920                                       , st->id, rd->name
 921                                       , rd->last_collected_value
 922                                       , rd->collected_value
 923                                       , rd->last_calculated_value
 924                                       , rd->calculated_value
 925             );
 926
 927     }
 928
 929     // at this point we have all the calculated values ready
 930     // it is now time to interpolate values on a second boundary
 931
 932     if(unlikely(now_collect_ut < next_store_ut)) {
 933         // this is collected in the same interpolation point
 934
 935         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 936             debug(D_RRD_STATS, "%s: THIS IS IN THE SAME INTERPOLATION POINT", st->name);
 937
 938 //#ifdef NETDATA_INTERNAL_CHECKS
 939 //        info("%s is collected in the same interpolation point: short by %llu microseconds", st->name, next_store_ut - now_collect_ut);
 940 //#endif
 941     }
 942
 943     usec_t first_ut = last_stored_ut;
 944     long long iterations = (now_collect_ut - last_stored_ut) / (update_every_ut);
 945     if((now_collect_ut % (update_every_ut)) == 0) iterations++;
 946
 947     for( ; next_store_ut <= now_collect_ut ; last_collect_ut = next_store_ut, next_store_ut += update_every_ut, iterations-- ) {
 948 //#ifdef NETDATA_INTERNAL_CHECKS
 949 //        if(iterations < 0) { error("%s: iterations calculation wrapped! first_ut = %llu, last_stored_ut = %llu, next_store_ut = %llu, now_collect_ut = %llu", st->name, first_ut, last_stored_ut, next_store_ut, now_collect_ut); }
 950 //#endif
 951
 952         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG))) {
 953             debug(D_RRD_STATS, "%s: last_stored_ut = %0.3Lf (last updated time)", st->name, (long double)last_stored_ut/1000000.0);
 954             debug(D_RRD_STATS, "%s: next_store_ut  = %0.3Lf (next interpolation point)", st->name, (long double)next_store_ut/1000000.0);
 955         }
 956
 957         st->last_updated.tv_sec = (time_t) (next_store_ut / USEC_PER_SEC);
 958         st->last_updated.tv_usec = 0;
 959
 960         rrddim_foreach_read(rd, st) {
 961             calculated_number new_value;
 962
 963             switch(rd->algorithm) {
 964                 case RRD_ALGORITHM_INCREMENTAL:
 965                     new_value = (calculated_number)
 966                             (      rd->calculated_value
 967                                    * (calculated_number)(next_store_ut - last_collect_ut)
 968                                    / (calculated_number)(now_collect_ut - last_collect_ut)
 969                             );
 970
 971                     if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 972                         debug(D_RRD_STATS, "%s/%s: CALC2 INC "
 973                                 CALCULATED_NUMBER_FORMAT " = "
 974                                 CALCULATED_NUMBER_FORMAT
 975                                 " * %llu"
 976                                         " / %llu"
 977                               , st->id, rd->name
 978                               , new_value
 979                               , rd->calculated_value
 980                               , (next_store_ut - last_stored_ut)
 981                               , (now_collect_ut - last_stored_ut)
 982                         );
 983
 984                     rd->calculated_value -= new_value;
 985                     new_value += rd->last_calculated_value;
 986                     rd->last_calculated_value = 0;
 987                     new_value /= (calculated_number)st->update_every;
 988
 989                     if(unlikely(next_store_ut - last_stored_ut < update_every_ut)) {
 990                         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
 991                             debug(D_RRD_STATS, "%s/%s: COLLECTION POINT IS SHORT " CALCULATED_NUMBER_FORMAT " - EXTRAPOLATING",
 992                                     st->id, rd->name
 993                                   , (calculated_number)(next_store_ut - last_stored_ut)
 994                             );
 995                         new_value = new_value * (calculated_number)(st->update_every * 1000000) / (calculated_number)(next_store_ut - last_stored_ut);
 996                     }
 997                     break;
 998
 999                 case RRD_ALGORITHM_ABSOLUTE:
1000                 case RRD_ALGORITHM_PCENT_OVER_ROW_TOTAL:
1001                 case RRD_ALGORITHM_PCENT_OVER_DIFF_TOTAL:
1002                 default:
1003                     if(iterations == 1) {
1004                         // this is the last iteration
1005                         // do not interpolate
1006                         // just show the calculated value
1007
1008                         new_value = rd->calculated_value;
1009                     }
1010                     else {
1011                         // we have missed an update
1012                         // interpolate in the middle values
1013
1014                         new_value = (calculated_number)
1015                                 (   (     (rd->calculated_value - rd->last_calculated_value)
1016                                           * (calculated_number)(next_store_ut - last_collect_ut)
1017                                           / (calculated_number)(now_collect_ut - last_collect_ut)
1018                                     )
1019                                     +  rd->last_calculated_value
1020                                 );
1021
1022                         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1023                             debug(D_RRD_STATS, "%s/%s: CALC2 DEF "
1024                                     CALCULATED_NUMBER_FORMAT " = ((("
1025                                             "(" CALCULATED_NUMBER_FORMAT " - " CALCULATED_NUMBER_FORMAT ")"
1026                                             " * %llu"
1027                                             " / %llu) + " CALCULATED_NUMBER_FORMAT
1028                                   , st->id, rd->name
1029                                   , new_value
1030                                   , rd->calculated_value, rd->last_calculated_value
1031                                   , (next_store_ut - first_ut)
1032                                   , (now_collect_ut - first_ut), rd->last_calculated_value
1033                             );
1034                     }
1035                     break;
1036             }
1037
1038             if(unlikely(!store_this_entry)) {
1039                 rd->values[st->current_entry] = pack_storage_number(0, SN_NOT_EXISTS);
1040                 continue;
1041             }
1042
1043             if(likely(rrddim_flag_check(rd, RRDDIM_FLAG_UPDATED) && rd->counter > 1 && iterations < st->gap_when_lost_iterations_above)) {
1044                 rd->values[st->current_entry] = pack_storage_number(new_value, storage_flags );
1045                 rd->last_stored_value = new_value;
1046
1047                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1048                     debug(D_RRD_STATS, "%s/%s: STORE[%ld] "
1049                             CALCULATED_NUMBER_FORMAT " = " CALCULATED_NUMBER_FORMAT
1050                           , st->id, rd->name
1051                           , st->current_entry
1052                           , unpack_storage_number(rd->values[st->current_entry]), new_value
1053                     );
1054             }
1055             else {
1056                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1057                     debug(D_RRD_STATS, "%s/%s: STORE[%ld] = NON EXISTING "
1058                           , st->id, rd->name
1059                           , st->current_entry
1060                     );
1061                 rd->values[st->current_entry] = pack_storage_number(0, SN_NOT_EXISTS);
1062                 rd->last_stored_value = NAN;
1063             }
1064
1065             stored_entries++;
1066
1067             if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG))) {
1068                 calculated_number t1 = new_value * (calculated_number)rd->multiplier / (calculated_number)rd->divisor;
1069                 calculated_number t2 = unpack_storage_number(rd->values[st->current_entry]);
1070                 calculated_number accuracy = accuracy_loss(t1, t2);
1071                 debug(D_RRD_STATS, "%s/%s: UNPACK[%ld] = " CALCULATED_NUMBER_FORMAT " FLAGS=0x%08x (original = " CALCULATED_NUMBER_FORMAT ", accuracy loss = " CALCULATED_NUMBER_FORMAT "%%%s)"
1072                       , st->id, rd->name
1073                       , st->current_entry
1074                       , t2
1075                       , get_storage_number_flags(rd->values[st->current_entry])
1076                       , t1
1077                       , accuracy
1078                       , (accuracy > ACCURACY_LOSS) ? " **TOO BIG** " : ""
1079                 );
1080
1081                 rd->collected_volume += t1;
1082                 rd->stored_volume += t2;
1083                 accuracy = accuracy_loss(rd->collected_volume, rd->stored_volume);
1084                 debug(D_RRD_STATS, "%s/%s: VOLUME[%ld] = " CALCULATED_NUMBER_FORMAT ", calculated  = " CALCULATED_NUMBER_FORMAT ", accuracy loss = " CALCULATED_NUMBER_FORMAT "%%%s"
1085                       , st->id, rd->name
1086                       , st->current_entry
1087                       , rd->stored_volume
1088                       , rd->collected_volume
1089                       , accuracy
1090                       , (accuracy > ACCURACY_LOSS) ? " **TOO BIG** " : ""
1091                 );
1092
1093             }
1094         }
1095         // reset the storage flags for the next point, if any;
1096         storage_flags = SN_EXISTS;
1097
1098         st->counter++;
1099         st->current_entry = ((st->current_entry + 1) >= st->entries) ? 0 : st->current_entry + 1;
1100         last_stored_ut = next_store_ut;
1101     }
1102
1103     st->last_collected_total  = st->collected_total;
1104
1105     rrddim_foreach_read(rd, st) {
1106         if(unlikely(!rrddim_flag_check(rd, RRDDIM_FLAG_UPDATED)))
1107             continue;
1108
1109         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1110             debug(D_RRD_STATS, "%s/%s: setting last_collected_value (old: " COLLECTED_NUMBER_FORMAT ") to last_collected_value (new: " COLLECTED_NUMBER_FORMAT ")", st->id, rd->name, rd->last_collected_value, rd->collected_value);
1111
1112         rd->last_collected_value = rd->collected_value;
1113
1114         switch(rd->algorithm) {
1115             case RRD_ALGORITHM_INCREMENTAL:
1116                 if(unlikely(!first_entry)) {
1117                     if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1118                         debug(D_RRD_STATS, "%s/%s: setting last_calculated_value (old: " CALCULATED_NUMBER_FORMAT ") to last_calculated_value (new: " CALCULATED_NUMBER_FORMAT ")", st->id, rd->name, rd->last_calculated_value + rd->calculated_value, rd->calculated_value);
1119                     rd->last_calculated_value += rd->calculated_value;
1120                 }
1121                 else {
1122                     if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1123                         debug(D_RRD_STATS, "%s: THIS IS THE FIRST POINT", st->name);
1124                 }
1125                 break;
1126
1127             case RRD_ALGORITHM_ABSOLUTE:
1128             case RRD_ALGORITHM_PCENT_OVER_ROW_TOTAL:
1129             case RRD_ALGORITHM_PCENT_OVER_DIFF_TOTAL:
1130                 if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1131                     debug(D_RRD_STATS, "%s/%s: setting last_calculated_value (old: " CALCULATED_NUMBER_FORMAT ") to last_calculated_value (new: " CALCULATED_NUMBER_FORMAT ")", st->id, rd->name, rd->last_calculated_value, rd->calculated_value);
1132                 rd->last_calculated_value = rd->calculated_value;
1133                 break;
1134         }
1135
1136         rd->calculated_value = 0;
1137         rd->collected_value = 0;
1138         rrddim_flag_clear(rd, RRDDIM_FLAG_UPDATED);
1139
1140         if(unlikely(rrdset_flag_check(st, RRDSET_FLAG_DEBUG)))
1141             debug(D_RRD_STATS, "%s/%s: END "
1142                     " last_collected_value = " COLLECTED_NUMBER_FORMAT
1143                     " collected_value = " COLLECTED_NUMBER_FORMAT
1144                     " last_calculated_value = " CALCULATED_NUMBER_FORMAT
1145                     " calculated_value = " CALCULATED_NUMBER_FORMAT
1146                                       , st->id, rd->name
1147                                       , rd->last_collected_value
1148                                       , rd->collected_value
1149                                       , rd->last_calculated_value
1150                                       , rd->calculated_value
1151             );
1152     }
1153
1154     // ALL DONE ABOUT THE DATA UPDATE
1155     // --------------------------------------------------------------------
1156
1157 /*
1158     // find if there are any obsolete dimensions (not updated recently)
1159     if(unlikely(rrd_delete_unupdated_dimensions)) {
1160
1161         for( rd = st->dimensions; likely(rd) ; rd = rd->next )
1162             if((rd->last_collected_time.tv_sec + (rrd_delete_unupdated_dimensions * st->update_every)) < st->last_collected_time.tv_sec)
1163                 break;
1164
1165         if(unlikely(rd)) {
1166             RRDDIM *last;
1167             // there is dimension to free
1168             // upgrade our read lock to a write lock
1169             pthread_rwlock_unlock(&st->rrdset_rwlock);
1170             pthread_rwlock_wrlock(&st->rrdset_rwlock);
1171
1172             for( rd = st->dimensions, last = NULL ; likely(rd) ; ) {
1173                 // remove it only it is not updated in rrd_delete_unupdated_dimensions seconds
1174
1175                 if(unlikely((rd->last_collected_time.tv_sec + (rrd_delete_unupdated_dimensions * st->update_every)) < st->last_collected_time.tv_sec)) {
1176                     info("Removing obsolete dimension '%s' (%s) of '%s' (%s).", rd->name, rd->id, st->name, st->id);
1177
1178                     if(unlikely(!last)) {
1179                         st->dimensions = rd->next;
1180                         rd->next = NULL;
1181                         rrddim_free(st, rd);
1182                         rd = st->dimensions;
1183                         continue;
1184                     }
1185                     else {
1186                         last->next = rd->next;
1187                         rd->next = NULL;
1188                         rrddim_free(st, rd);
1189                         rd = last->next;
1190                         continue;
1191                     }
1192                 }
1193
1194                 last = rd;
1195                 rd = rd->next;
1196             }
1197
1198             if(unlikely(!st->dimensions)) {
1199                 info("Disabling chart %s (%s) since it does not have any dimensions", st->name, st->id);
1200                 st->enabled = 0;
1201             }
1202         }
1203     }
1204 */
1205
1206     rrdset_unlock(st);
1207
1208     if(unlikely(pthread_setcancelstate(pthreadoldcancelstate, NULL) != 0))
1209         error("Cannot set pthread cancel state to RESTORE (%d).", pthreadoldcancelstate);
1210 }
1211