]> arthur.barton.de Git - netdata.git/blob - src/rrd2json.c
made all charts update the legend on chart update; added easy-pie-chart (not active...
[netdata.git] / src / rrd2json.c
1 #ifdef HAVE_CONFIG_H
2 #include <config.h>
3 #endif
4 #include <pthread.h>
5 #include <sys/time.h>
6 #include <stdlib.h>
7 #include <string.h>
8
9 #include "log.h"
10 #include "common.h"
11 #include "rrd2json.h"
12
13 #define HOSTNAME_MAX 1024
14 char *hostname = "unknown";
15
16 void rrd_stats_api_v1_chart(RRDSET *st, BUFFER *wb)
17 {
18         pthread_rwlock_rdlock(&st->rwlock);
19
20         buffer_sprintf(wb,
21                 "\t\t{\n"
22                 "\t\t\t\"id\": \"%s\",\n"
23                 "\t\t\t\"name\": \"%s\",\n"
24                 "\t\t\t\"type\": \"%s\",\n"
25                 "\t\t\t\"family\": \"%s\",\n"
26                 "\t\t\t\"title\": \"%s\",\n"
27                 "\t\t\t\"priority\": %ld,\n"
28                 "\t\t\t\"enabled\": %s,\n"
29                 "\t\t\t\"units\": \"%s\",\n"
30                 "\t\t\t\"data_url\": \"/api/v1/data?chart=%s\",\n"
31                 "\t\t\t\"chart_type\": \"%s\",\n"
32                 "\t\t\t\"duration\": %ld,\n"
33                 "\t\t\t\"first_entry\": %lu,\n"
34                 "\t\t\t\"last_entry\": %lu,\n"
35                 "\t\t\t\"update_every\": %d,\n"
36                 "\t\t\t\"dimensions\": {\n"
37                 , st->id
38                 , st->name
39                 , st->type
40                 , st->family
41                 , st->title
42                 , st->priority
43                 , st->enabled?"true":"false"
44                 , st->units
45                 , st->name
46                 , rrdset_type_name(st->chart_type)
47                 , st->entries * st->update_every
48                 , rrdset_first_entry_t(st)
49                 , rrdset_last_entry_t(st)
50                 , st->update_every
51                 );
52
53         unsigned long memory = st->memsize;
54
55         int c = 0;
56         RRDDIM *rd;
57         for(rd = st->dimensions; rd ; rd = rd->next) {
58                 if(rd->flags & RRDDIM_FLAG_HIDDEN) continue;
59
60                 memory += rd->memsize;
61
62                 buffer_sprintf(wb,
63                         "%s"
64                         "\t\t\t\t\"%s\": { \"name\": \"%s\" }"
65                         , c?",\n":""
66                         , rd->id
67                         , rd->name
68                         );
69
70                 c++;
71         }
72
73         buffer_sprintf(wb,
74                 "\n\t\t\t}\n"
75                 "\t\t}"
76                 );
77
78         pthread_rwlock_unlock(&st->rwlock);
79 }
80
81 void rrd_stats_api_v1_charts(BUFFER *wb)
82 {
83         long c;
84         RRDSET *st;
85
86         buffer_sprintf(wb, "{\n"
87                    "\t\"hostname\": \"%s\""
88                 ",\n\t\"update_every\": %d"
89                 ",\n\t\"history\": %d"
90                 ",\n\t\"charts\": {"
91                 , hostname
92                 , rrd_update_every
93                 , rrd_default_history_entries
94                 );
95
96         pthread_rwlock_rdlock(&rrdset_root_rwlock);
97         for(st = rrdset_root, c = 0; st ; st = st->next) {
98                 if(st->enabled) {
99                         if(c) buffer_strcat(wb, ",");
100                         buffer_strcat(wb, "\n\t\t\"");
101                         buffer_strcat(wb, st->id);
102                         buffer_strcat(wb, "\": ");
103                         rrd_stats_api_v1_chart(st, wb);
104                         c++;
105                 }
106         }
107         pthread_rwlock_unlock(&rrdset_root_rwlock);
108
109         buffer_strcat(wb, "\n\t}\n}\n");
110 }
111
112
113 unsigned long rrd_stats_one_json(RRDSET *st, char *options, BUFFER *wb)
114 {
115         time_t now = time(NULL);
116
117         pthread_rwlock_rdlock(&st->rwlock);
118
119         buffer_sprintf(wb,
120                 "\t\t{\n"
121                 "\t\t\t\"id\": \"%s\",\n"
122                 "\t\t\t\"name\": \"%s\",\n"
123                 "\t\t\t\"type\": \"%s\",\n"
124                 "\t\t\t\"family\": \"%s\",\n"
125                 "\t\t\t\"title\": \"%s\",\n"
126                 "\t\t\t\"priority\": %ld,\n"
127                 "\t\t\t\"enabled\": %d,\n"
128                 "\t\t\t\"units\": \"%s\",\n"
129                 "\t\t\t\"url\": \"/data/%s/%s\",\n"
130                 "\t\t\t\"chart_type\": \"%s\",\n"
131                 "\t\t\t\"counter\": %ld,\n"
132                 "\t\t\t\"entries\": %ld,\n"
133                 "\t\t\t\"first_entry_t\": %lu,\n"
134                 "\t\t\t\"last_entry\": %ld,\n"
135                 "\t\t\t\"last_entry_t\": %lu,\n"
136                 "\t\t\t\"last_entry_secs_ago\": %lu,\n"
137                 "\t\t\t\"update_every\": %d,\n"
138                 "\t\t\t\"isdetail\": %d,\n"
139                 "\t\t\t\"usec_since_last_update\": %llu,\n"
140                 "\t\t\t\"collected_total\": " TOTAL_NUMBER_FORMAT ",\n"
141                 "\t\t\t\"last_collected_total\": " TOTAL_NUMBER_FORMAT ",\n"
142                 "\t\t\t\"dimensions\": [\n"
143                 , st->id
144                 , st->name
145                 , st->type
146                 , st->family
147                 , st->title
148                 , st->priority
149                 , st->enabled
150                 , st->units
151                 , st->name, options?options:""
152                 , rrdset_type_name(st->chart_type)
153                 , st->counter
154                 , st->entries
155                 , rrdset_first_entry_t(st)
156                 , rrdset_last_slot(st)
157                 , rrdset_last_entry_t(st)
158                 , (now < rrdset_last_entry_t(st)) ? (time_t)0 : now - rrdset_last_entry_t(st)
159                 , st->update_every
160                 , st->isdetail
161                 , st->usec_since_last_update
162                 , st->collected_total
163                 , st->last_collected_total
164                 );
165
166         unsigned long memory = st->memsize;
167
168         RRDDIM *rd;
169         for(rd = st->dimensions; rd ; rd = rd->next) {
170
171                 memory += rd->memsize;
172
173                 buffer_sprintf(wb,
174                         "\t\t\t\t{\n"
175                         "\t\t\t\t\t\"id\": \"%s\",\n"
176                         "\t\t\t\t\t\"name\": \"%s\",\n"
177                         "\t\t\t\t\t\"entries\": %ld,\n"
178                         "\t\t\t\t\t\"isHidden\": %d,\n"
179                         "\t\t\t\t\t\"algorithm\": \"%s\",\n"
180                         "\t\t\t\t\t\"multiplier\": %ld,\n"
181                         "\t\t\t\t\t\"divisor\": %ld,\n"
182                         "\t\t\t\t\t\"last_entry_t\": %lu,\n"
183                         "\t\t\t\t\t\"collected_value\": " COLLECTED_NUMBER_FORMAT ",\n"
184                         "\t\t\t\t\t\"calculated_value\": " CALCULATED_NUMBER_FORMAT ",\n"
185                         "\t\t\t\t\t\"last_collected_value\": " COLLECTED_NUMBER_FORMAT ",\n"
186                         "\t\t\t\t\t\"last_calculated_value\": " CALCULATED_NUMBER_FORMAT ",\n"
187                         "\t\t\t\t\t\"memory\": %lu\n"
188                         "\t\t\t\t}%s\n"
189                         , rd->id
190                         , rd->name
191                         , rd->entries
192                         , (rd->flags & RRDDIM_FLAG_HIDDEN)?1:0
193                         , rrddim_algorithm_name(rd->algorithm)
194                         , rd->multiplier
195                         , rd->divisor
196                         , rd->last_collected_time.tv_sec
197                         , rd->collected_value
198                         , rd->calculated_value
199                         , rd->last_collected_value
200                         , rd->last_calculated_value
201                         , rd->memsize
202                         , rd->next?",":""
203                         );
204         }
205
206         buffer_sprintf(wb,
207                 "\t\t\t],\n"
208                 "\t\t\t\"memory\" : %lu\n"
209                 "\t\t}"
210                 , memory
211                 );
212
213         pthread_rwlock_unlock(&st->rwlock);
214         return memory;
215 }
216
217 #define RRD_GRAPH_JSON_HEADER "{\n\t\"charts\": [\n"
218 #define RRD_GRAPH_JSON_FOOTER "\n\t]\n}\n"
219
220 void rrd_stats_graph_json(RRDSET *st, char *options, BUFFER *wb)
221 {
222         buffer_strcat(wb, RRD_GRAPH_JSON_HEADER);
223         rrd_stats_one_json(st, options, wb);
224         buffer_strcat(wb, RRD_GRAPH_JSON_FOOTER);
225 }
226
227 void rrd_stats_all_json(BUFFER *wb)
228 {
229         unsigned long memory = 0;
230         long c;
231         RRDSET *st;
232
233         buffer_strcat(wb, RRD_GRAPH_JSON_HEADER);
234
235         pthread_rwlock_rdlock(&rrdset_root_rwlock);
236         for(st = rrdset_root, c = 0; st ; st = st->next) {
237                 if(st->enabled) {
238                         if(c) buffer_strcat(wb, ",\n");
239                         memory += rrd_stats_one_json(st, NULL, wb);
240                         c++;
241                 }
242         }
243         pthread_rwlock_unlock(&rrdset_root_rwlock);
244
245         buffer_sprintf(wb, "\n\t],\n"
246                 "\t\"hostname\": \"%s\",\n"
247                 "\t\"update_every\": %d,\n"
248                 "\t\"history\": %d,\n"
249                 "\t\"memory\": %lu\n"
250                 "}\n"
251                 , hostname
252                 , rrd_update_every
253                 , rrd_default_history_entries
254                 , memory
255                 );
256 }
257
258
259
260 // ----------------------------------------------------------------------------
261
262 // RRDR options
263 #define RRDR_EMPTY      0x01 // the dimension contains / the value is empty (null)
264 #define RRDR_RESET      0x02 // the dimension contains / the value is reset
265 #define RRDR_HIDDEN     0x04 // the dimension contains / the value is hidden
266 #define RRDR_NONZERO    0x08 // the dimension contains / the value is non-zero
267
268
269 typedef struct rrdresult {
270         RRDSET *st;                     // the chart this result refers to
271
272         int d;                                  // the number of dimensions
273         int n;                                  // the number of values in the arrays
274         int rows;                       // the number of rows used
275
276         uint8_t *od;                    // the options for the dimensions
277
278         time_t *t;                              // array of n timestamps
279         calculated_number *v;   // array n x d values
280         uint8_t *o;                             // array n x d options
281
282         int c;                                  // current line ( -1 ~ n ), ( -1 = none, use rrdr_rows() to get number of rows )
283
284         int group;                              // how many collected values were grouped for each row
285         int update_every;               // what is the suggested update frequency in seconds
286
287         calculated_number min;
288         calculated_number max;
289
290         time_t before;
291         time_t after;
292
293         int has_st_lock;                // if st is read locked by us
294 } RRDR;
295
296 #define rrdr_rows(r) ((r)->rows)
297
298 /*
299 static void rrdr_dump(RRDR *r)
300 {
301         long c, i;
302         RRDDIM *d;
303
304         fprintf(stderr, "\nCHART %s (%s)\n", r->st->id, r->st->name);
305
306         for(c = 0, d = r->st->dimensions; d ;c++, d = d->next) {
307                 fprintf(stderr, "DIMENSION %s (%s), %s%s%s%s\n"
308                                 , d->id
309                                 , d->name
310                                 , (r->od[c] & RRDR_EMPTY)?"EMPTY ":""
311                                 , (r->od[c] & RRDR_RESET)?"RESET ":""
312                                 , (r->od[c] & RRDR_HIDDEN)?"HIDDEN ":""
313                                 , (r->od[c] & RRDR_NONZERO)?"NONZERO ":""
314                                 );
315         }
316
317         if(r->rows <= 0) {
318                 fprintf(stderr, "RRDR does not have any values in it.\n");
319                 return;
320         }
321
322         fprintf(stderr, "RRDR includes %d values in it:\n", r->rows);
323
324         // for each line in the array
325         for(i = 0; i < r->rows ;i++) {
326                 calculated_number *cn = &r->v[ i * r->d ];
327                 uint8_t *co = &r->o[ i * r->d ];
328
329                 // print the id and the timestamp of the line
330                 fprintf(stderr, "%ld %ld ", i + 1, r->t[i]);
331
332                 // for each dimension
333                 for(c = 0, d = r->st->dimensions; d ;c++, d = d->next) {
334                         if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
335                         if(unlikely(!(r->od[c] & RRDR_NONZERO))) continue;
336
337                         if(co[c] & RRDR_EMPTY)
338                                 fprintf(stderr, "null ");
339                         else
340                                 fprintf(stderr, CALCULATED_NUMBER_FORMAT " %s%s%s%s "
341                                         , cn[c]
342                                         , (co[c] & RRDR_EMPTY)?"E":" "
343                                         , (co[c] & RRDR_RESET)?"R":" "
344                                         , (co[c] & RRDR_HIDDEN)?"H":" "
345                                         , (co[c] & RRDR_NONZERO)?"N":" "
346                                         );
347                 }
348
349                 fprintf(stderr, "\n");
350         }
351 }
352 */
353
354 void rrdr_disable_not_selected_dimensions(RRDR *r, const char *dims)
355 {
356         char b[strlen(dims) + 1];
357         char *o = b, *tok;
358         strcpy(o, dims);
359
360         long c;
361         RRDDIM *d;
362
363         // disable all of them
364         for(c = 0, d = r->st->dimensions; d ;c++, d = d->next)
365                 r->od[c] |= RRDR_HIDDEN;
366
367         while(o && *o && (tok = mystrsep(&o, ", |"))) {
368                 if(!*tok) continue;
369
370                 // find it and enable it
371                 for(c = 0, d = r->st->dimensions; d ;c++, d = d->next) {
372                         if(!strcmp(d->name, tok)) {
373                                 r->od[c] &= ~RRDR_HIDDEN;
374                         }
375                 }
376         }
377 }
378
379 void rrdr_buffer_print_format(BUFFER *wb, uint32_t format)
380 {
381         switch(format) {
382         case DATASOURCE_JSON:
383                 buffer_strcat(wb, DATASOURCE_FORMAT_JSON);
384                 break;
385
386         case DATASOURCE_DATATABLE_JSON:
387                 buffer_strcat(wb, DATASOURCE_FORMAT_DATATABLE_JSON);
388                 break;
389
390         case DATASOURCE_DATATABLE_JSONP:
391                 buffer_strcat(wb, DATASOURCE_FORMAT_DATATABLE_JSONP);
392                 break;
393
394         case DATASOURCE_JSONP:
395                 buffer_strcat(wb, DATASOURCE_FORMAT_JSONP);
396                 break;
397
398         case DATASOURCE_SSV:
399                 buffer_strcat(wb, DATASOURCE_FORMAT_SSV);
400                 break;
401
402         case DATASOURCE_CSV:
403                 buffer_strcat(wb, DATASOURCE_FORMAT_CSV);
404                 break;
405
406         case DATASOURCE_TSV:
407                 buffer_strcat(wb, DATASOURCE_FORMAT_TSV);
408                 break;
409
410         case DATASOURCE_HTML:
411                 buffer_strcat(wb, DATASOURCE_FORMAT_HTML);
412                 break;
413
414         case DATASOURCE_JS_ARRAY:
415                 buffer_strcat(wb, DATASOURCE_FORMAT_JS_ARRAY);
416                 break;
417
418         case DATASOURCE_SSV_COMMA:
419                 buffer_strcat(wb, DATASOURCE_FORMAT_SSV_COMMA);
420                 break;
421
422         default:
423                 buffer_strcat(wb, "unknown");
424                 break;
425         }
426 }
427
428 void rrdr_json_wrapper_begin(RRDR *r, BUFFER *wb, uint32_t format, uint32_t options, int string_value)
429 {
430         //info("JSONWRAPPER(): %s: BEGIN", r->st->id);
431         char kq[2] = "",                                        // key quote
432                 sq[2] = "";                                             // string quote
433
434         if( options & RRDR_OPTION_GOOGLE_JSON ) {
435                 kq[0] = '\0';
436                 sq[0] = '\'';
437         }
438         else {
439                 kq[0] = '"';
440                 sq[0] = '"';
441         }
442
443         buffer_sprintf(wb, "{\n"
444                         "       %sid%s: %s%s%s,\n"
445                         "       %sname%s: %s%s%s,\n"
446                         "       %sview_update_every%s: %d,\n"
447                         "       %supdate_every%s: %d,\n"
448                         "       %sfirst_entry_t%s: %u, \n"
449                         "       %slast_entry_t%s: %u, \n"
450                         "       %smin%s: "
451                         , kq, kq, sq, r->st->id, sq
452                         , kq, kq, sq, r->st->name, sq
453                         , kq, kq, r->update_every
454                         , kq, kq, r->st->update_every
455                         , kq, kq, rrdset_first_entry_t(r->st)
456                         , kq, kq, rrdset_last_entry_t(r->st)
457                         , kq, kq);
458
459         buffer_rrd_value(wb, r->min);
460         buffer_sprintf(wb, ",\n %smax%s: ", kq, kq);
461         buffer_rrd_value(wb, r->max);
462         buffer_sprintf(wb, ",\n"
463                         "       %sbefore%s: %u,\n"
464                         "       %safter%s: %u,\n"
465                         "       %sdimension_names%s: ["
466                         , kq, kq, r->before
467                         , kq, kq, r->after
468                         , kq, kq);
469
470
471         long c, i;
472         RRDDIM *rd;
473         for(c = 0, i = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
474                 if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
475                 if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
476
477                 if(i) buffer_strcat(wb, ", ");
478                 buffer_strcat(wb, sq);
479                 buffer_strcat(wb, rd->name);
480                 buffer_strcat(wb, sq);
481                 i++;
482         }
483         buffer_sprintf(wb, "],\n"
484                         "       %sdimension_ids%s: ["
485                         , kq, kq);
486
487         for(c = 0, i = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
488                 if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
489                 if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
490
491                 if(i) buffer_strcat(wb, ", ");
492                 buffer_strcat(wb, sq);
493                 buffer_strcat(wb, rd->id);
494                 buffer_strcat(wb, sq);
495                 i++;
496         }
497         buffer_sprintf(wb, "],\n"
498                         "       %slatest_values%s: ["
499                         , kq, kq);
500
501         for(c = 0, i = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
502                 if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
503                 if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
504
505                 if(i) buffer_strcat(wb, ", ");
506                 i++;
507
508                 storage_number n = rd->values[rrdset_last_slot(r->st)];
509
510                 if(!does_storage_number_exist(n))
511                         buffer_strcat(wb, "null");
512                 else
513                         buffer_rrd_value(wb, unpack_storage_number(n));
514         }
515         buffer_sprintf(wb, "],\n"
516                         "       %sresult_latest_values%s: ["
517                         , kq, kq);
518
519         if(rrdr_rows(r)) {
520                 for(c = 0, i = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
521                         if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
522                         if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
523
524                         if(i) buffer_strcat(wb, ", ");
525                         i++;
526
527                         calculated_number *cn = &r->v[ (0) * r->d ];
528                         uint8_t *co = &r->o[ (0) * r->d ];
529
530                         if(co[c] & RRDR_EMPTY)
531                                 buffer_strcat(wb, "null");
532                         else
533                                 buffer_rrd_value(wb, cn[c]);
534                 }
535         }
536         buffer_sprintf(wb, "],\n"
537                         "       %sdimensions%s: %d,\n"
538                         "       %spoints%s: %d,\n"
539                         "       %sformat%s: %s"
540                         , kq, kq, i
541                         , kq, kq, rrdr_rows(r)
542                         , kq, kq, sq
543                         );
544
545         rrdr_buffer_print_format(wb, format);
546
547         buffer_sprintf(wb, "%s,\n"
548                         "       %sresult%s: "
549                         , sq
550                         , kq, kq
551                         );
552
553         if(string_value) buffer_strcat(wb, sq);
554         //info("JSONWRAPPER(): %s: END", r->st->id);
555 }
556
557 void rrdr_json_wrapper_end(RRDR *r, BUFFER *wb, uint32_t format, uint32_t options, int string_value)
558 {
559         if(r) {;}
560         if(format) {;}
561
562         char sq[2] = "";                                                // string quote
563
564         if( options & RRDR_OPTION_GOOGLE_JSON )
565                 sq[0] = '\'';
566         else
567                 sq[0] = '"';
568
569         if(string_value) buffer_strcat(wb, sq);
570         buffer_strcat(wb, "\n}\n");
571 }
572
573 #define JSON_DATES_JS 1
574 #define JSON_DATES_TIMESTAMP 2
575
576 static void rrdr2json(RRDR *r, BUFFER *wb, uint32_t options, int datatable)
577 {
578         //info("RRD2JSON(): %s: BEGIN", r->st->id);
579         int row_annotations = 0, dates = JSON_DATES_JS, dates_with_new = 0;
580         char kq[2] = "",                                        // key quote
581                 sq[2] = "",                                             // string quote
582                 pre_label[101] = "",                    // before each label
583                 post_label[101] = "",                   // after each label
584                 pre_date[101] = "",                             // the beginning of line, to the date
585                 post_date[101] = "",                    // closing the date
586                 pre_value[101] = "",                    // before each value
587                 post_value[101] = "",                   // after each value
588                 post_line[101] = "",                    // at the end of each row
589                 normal_annotation[201] = "",    // default row annotation
590                 overflow_annotation[201] = "",  // overflow row annotation
591                 data_begin[101] = "",                   // between labels and values
592                 finish[101] = "";                               // at the end of everything
593
594         if(datatable) {
595                 dates = JSON_DATES_JS;
596                 if( options & RRDR_OPTION_GOOGLE_JSON ) {
597                         kq[0] = '\0';
598                         sq[0] = '\'';
599                 }
600                 else {
601                         kq[0] = '"';
602                         sq[0] = '"';
603                 }
604                 row_annotations = 1;
605                 snprintf(pre_date,   100, "             {%sc%s:[{%sv%s:%s", kq, kq, kq, kq, sq);
606                 snprintf(post_date,  100, "%s}", sq);
607                 snprintf(pre_label,  100, ",\n          {%sid%s:%s%s,%slabel%s:%s", kq, kq, sq, sq, kq, kq, sq);
608                 snprintf(post_label, 100, "%s,%spattern%s:%s%s,%stype%s:%snumber%s}", sq, kq, kq, sq, sq, kq, kq, sq, sq);
609                 snprintf(pre_value,  100, ",{%sv%s:", kq, kq);
610                 snprintf(post_value, 100, "}");
611                 snprintf(post_line,  100, "]}");
612                 snprintf(data_begin, 100, "\n   ],\n    %srows%s:\n     [\n", kq, kq);
613                 snprintf(finish,     100, "\n   ]\n}\n");
614
615                 snprintf(overflow_annotation, 200, ",{%sv%s:%sRESET OR OVERFLOW%s},{%sv%s:%sThe counters have been wrapped.%s}", kq, kq, sq, sq, kq, kq, sq, sq);
616                 snprintf(normal_annotation,   200, ",{%sv%s:null},{%sv%s:null}", kq, kq, kq, kq);
617
618                 buffer_sprintf(wb, "{\n %scols%s:\n     [\n", kq, kq, kq, kq);
619                 buffer_sprintf(wb, "            {%sid%s:%s%s,%slabel%s:%stime%s,%spattern%s:%s%s,%stype%s:%sdatetime%s},\n", kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq);
620                 buffer_sprintf(wb, "            {%sid%s:%s%s,%slabel%s:%s%s,%spattern%s:%s%s,%stype%s:%sstring%s,%sp%s:{%srole%s:%sannotation%s}},\n", kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, kq, kq, sq, sq);
621                 buffer_sprintf(wb, "            {%sid%s:%s%s,%slabel%s:%s%s,%spattern%s:%s%s,%stype%s:%sstring%s,%sp%s:{%srole%s:%sannotationText%s}}", kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, kq, kq, sq, sq);
622
623                 // remove the valueobjects flag
624                 // google wants its own keys
625                 if(options & RRDR_OPTION_OBJECTSROWS)
626                         options &= ~RRDR_OPTION_OBJECTSROWS;
627         }
628         else {
629                 kq[0] = '"';
630                 sq[0] = '"';
631                 if((options & RRDR_OPTION_SECONDS) || (options & RRDR_OPTION_MILLISECONDS)) {
632                         dates = JSON_DATES_TIMESTAMP;
633                         dates_with_new = 0;
634                 }
635                 else {
636                         dates = JSON_DATES_JS;
637                         dates_with_new = 1;
638                 }
639                 if( options & RRDR_OPTION_OBJECTSROWS )
640                         snprintf(pre_date,   100, "             { ");
641                 else
642                         snprintf(pre_date,   100, "             [ ");
643                 snprintf(pre_label,  100, ", \"");
644                 snprintf(post_label, 100, "\"");
645                 snprintf(pre_value,  100, ", ");
646                 if( options & RRDR_OPTION_OBJECTSROWS )
647                         snprintf(post_line,  100, "}");
648                 else
649                         snprintf(post_line,  100, "]");
650                 snprintf(data_begin, 100, "],\n %sdata%s:\n     [\n", kq, kq);
651                 snprintf(finish,     100, "\n   ]\n}\n");
652
653                 buffer_sprintf(wb, "{\n %slabels%s: [", kq, kq);
654                 buffer_sprintf(wb, "%stime%s", sq, sq);
655         }
656
657         // -------------------------------------------------------------------------
658         // print the JSON header
659
660         long c, i;
661         RRDDIM *rd;
662
663         // print the header lines
664         for(c = 0, i = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
665                 if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
666                 if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
667
668                 buffer_strcat(wb, pre_label);
669                 buffer_strcat(wb, rd->name);
670                 buffer_strcat(wb, post_label);
671                 i++;
672         }
673         if(!i) {
674                 buffer_strcat(wb, pre_label);
675                 buffer_strcat(wb, "no data");
676                 buffer_strcat(wb, post_label);
677         }
678
679         // print the begin of row data
680         buffer_strcat(wb, data_begin);
681
682         // if all dimensions are hidden, print a null
683         if(!i) {
684                 buffer_strcat(wb, finish);
685                 return;
686         }
687
688         long start = 0, end = rrdr_rows(r), step = 1;
689         if((options & RRDR_OPTION_REVERSED)) {
690                 start = rrdr_rows(r) - 1;
691                 end = -1;
692                 step = -1;
693         }
694
695         // for each line in the array
696         for(i = start; i != end ;i += step) {
697                 calculated_number *cn = &r->v[ i * r->d ];
698                 uint8_t *co = &r->o[ i * r->d ];
699
700                 time_t now = r->t[i];
701
702                 if(dates == JSON_DATES_JS) {
703                         // generate the local date time
704                         struct tm tmbuf, *tm = localtime_r(&now, &tmbuf);
705                         if(!tm) { error("localtime_r() failed."); continue; }
706
707                         if(likely(i != start)) buffer_strcat(wb, ",\n");
708                         buffer_strcat(wb, pre_date);
709
710                         if( options & RRDR_OPTION_OBJECTSROWS )
711                                 buffer_sprintf(wb, "%stime%s: ", kq, kq);
712
713                         if(dates_with_new)
714                                 buffer_strcat(wb, "new ");
715
716                         buffer_jsdate(wb, tm->tm_year + 1900, tm->tm_mon, tm->tm_mday, tm->tm_hour, tm->tm_min, tm->tm_sec);
717
718                         buffer_strcat(wb, post_date);
719
720                         if(row_annotations) {
721                                 // google supports one annotation per row
722                                 int annotation_found = 0;
723                                 for(c = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
724                                         if(co[c] & RRDR_RESET) {
725                                                 buffer_strcat(wb, overflow_annotation);
726                                                 annotation_found = 1;
727                                                 break;
728                                         }
729                                 }
730                                 if(!annotation_found)
731                                         buffer_strcat(wb, normal_annotation);
732                         }
733                 }
734                 else {
735                         // print the timestamp of the line
736                         if(likely(i != start)) buffer_strcat(wb, ",\n");
737                         buffer_strcat(wb, pre_date);
738
739                         if( options & RRDR_OPTION_OBJECTSROWS )
740                                 buffer_sprintf(wb, "%stime%s: ", kq, kq);
741
742                         buffer_rrd_value(wb, (calculated_number)r->t[i]);
743                         // in ms
744                         if(options & RRDR_OPTION_MILLISECONDS) buffer_strcat(wb, "000");
745
746                         buffer_strcat(wb, post_date);
747                 }
748
749                 // for each dimension
750                 for(c = 0, rd = r->st->dimensions; rd ;c++, rd = rd->next) {
751                         if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
752                         if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
753
754                         calculated_number n = cn[c];
755
756                         buffer_strcat(wb, pre_value);
757
758                         if( options & RRDR_OPTION_OBJECTSROWS )
759                                 buffer_sprintf(wb, "%s%s%s: ", kq, rd->name, kq);
760
761                         if(co[c] & RRDR_EMPTY) {
762                                 if(options & RRDR_OPTION_NULL2ZERO)
763                                         buffer_strcat(wb, "0");
764                                 else
765                                         buffer_strcat(wb, "null");
766                         }
767                         else if((options & RRDR_OPTION_ABSOLUTE))
768                                 buffer_rrd_value(wb, (n<0)?-n:n);
769                         else
770                                 buffer_rrd_value(wb, n);
771
772                         buffer_strcat(wb, post_value);
773                 }
774
775                 buffer_strcat(wb, post_line);
776         }
777
778         buffer_strcat(wb, finish);
779         //info("RRD2JSON(): %s: END", r->st->id);
780 }
781
782 static void rrdr2csv(RRDR *r, BUFFER *wb, uint32_t options, const char *startline, const char *separator, const char *endline)
783 {
784         //info("RRD2CSV(): %s: BEGIN", r->st->id);
785         long c, i;
786         RRDDIM *d;
787
788         // print the csv header
789         for(c = 0, i = 0, d = r->st->dimensions; d ;c++, d = d->next) {
790                 if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
791                 if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
792
793                 if(!i) {
794                         buffer_strcat(wb, startline);
795                         buffer_strcat(wb, "time");
796                 }
797                 buffer_strcat(wb, separator);
798                 buffer_strcat(wb, d->name);
799                 i++;
800         }
801         buffer_strcat(wb, endline);
802
803         if(!i) {
804                 // no dimensions present
805                 return;
806         }
807
808         long start = 0, end = rrdr_rows(r), step = 1;
809         if((options & RRDR_OPTION_REVERSED)) {
810                 start = rrdr_rows(r) - 1;
811                 end = -1;
812                 step = -1;
813         }
814
815         // for each line in the array
816         for(i = start; i != end ;i += step) {
817                 calculated_number *cn = &r->v[ i * r->d ];
818                 uint8_t *co = &r->o[ i * r->d ];
819
820                 buffer_strcat(wb, startline);
821
822                 time_t now = r->t[i];
823
824                 if((options & RRDR_OPTION_SECONDS) || (options & RRDR_OPTION_MILLISECONDS)) {
825                         // print the timestamp of the line
826                         buffer_rrd_value(wb, (calculated_number)now);
827                         // in ms
828                         if(options & RRDR_OPTION_MILLISECONDS) buffer_strcat(wb, "000");
829                 }
830                 else {
831                         // generate the local date time
832                         struct tm tmbuf, *tm = localtime_r(&now, &tmbuf);
833                         if(!tm) { error("localtime() failed."); continue; }
834                         buffer_date(wb, tm->tm_year + 1900, tm->tm_mon, tm->tm_mday, tm->tm_hour, tm->tm_min, tm->tm_sec);
835                 }
836
837                 // for each dimension
838                 for(c = 0, d = r->st->dimensions; d ;c++, d = d->next) {
839                         if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
840                         if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
841
842                         buffer_strcat(wb, separator);
843
844                         calculated_number n = cn[c];
845
846                         if(co[c] & RRDR_EMPTY) {
847                                 if(options & RRDR_OPTION_NULL2ZERO)
848                                         buffer_strcat(wb, "0");
849                                 else
850                                         buffer_strcat(wb, "null");
851                         }
852                         else if((options & RRDR_OPTION_ABSOLUTE))
853                                 buffer_rrd_value(wb, (n<0)?-n:n);
854                         else
855                                 buffer_rrd_value(wb, n);
856                 }
857
858                 buffer_strcat(wb, endline);
859         }
860         //info("RRD2CSV(): %s: END", r->st->id);
861 }
862
863 static void rrdr2ssv(RRDR *r, BUFFER *wb, uint32_t options, const char *prefix, const char *separator, const char *suffix)
864 {
865         //info("RRD2SSV(): %s: BEGIN", r->st->id);
866         long c, i;
867         RRDDIM *d;
868
869         buffer_strcat(wb, prefix);
870         long start = 0, end = rrdr_rows(r), step = 1;
871         if((options & RRDR_OPTION_REVERSED)) {
872                 start = rrdr_rows(r) - 1;
873                 end = -1;
874                 step = -1;
875         }
876
877         // for each line in the array
878         for(i = start; i != end ;i += step) {
879
880                 calculated_number *cn = &r->v[ i * r->d ];
881                 uint8_t *co = &r->o[ i * r->d ];
882
883                 calculated_number sum = 0, min = 0, max = 0;
884                 int all_null = 1, init = 1;
885
886                 // for each dimension
887                 for(c = 0, d = r->st->dimensions; d ;c++, d = d->next) {
888                         if(unlikely(r->od[c] & RRDR_HIDDEN)) continue;
889                         if(unlikely((options & RRDR_OPTION_NONZERO) && !(r->od[c] & RRDR_NONZERO))) continue;
890
891                         calculated_number n = cn[c];
892
893                         if(unlikely(init)) {
894                                 if(n > 0) {
895                                         min = 0;
896                                         max = n;
897                                 }
898                                 else {
899                                         min = n;
900                                         max = 0;
901                                 }
902                                 init = 0;
903                         }
904
905                         if(likely(!(co[c] & RRDR_EMPTY))) {
906                                 all_null = 0;
907                                 if((options & RRDR_OPTION_ABSOLUTE) && n < 0) n = -n;
908                                 sum += n;
909                         }
910
911                         if(n < min) min = n;
912                         if(n > max) max = n;
913                 }
914
915                 if(likely(i != start))
916                         buffer_strcat(wb, separator);
917
918                 if(all_null) {
919                         if(options & RRDR_OPTION_NULL2ZERO)
920                                 buffer_strcat(wb, "0");
921                         else
922                                 buffer_strcat(wb, "null");
923                 }
924                 else if(options & RRDR_OPTION_MIN2MAX)
925                         buffer_rrd_value(wb, max - min);
926                 else
927                         buffer_rrd_value(wb, sum);
928         }
929         buffer_strcat(wb, suffix);
930         //info("RRD2SSV(): %s: END", r->st->id);
931 }
932
933 inline static calculated_number *rrdr_line_values(RRDR *r)
934 {
935         return &r->v[ r->c * r->d ];
936 }
937
938 inline static uint8_t *rrdr_line_options(RRDR *r)
939 {
940         return &r->o[ r->c * r->d ];
941 }
942
943 inline static int rrdr_line_init(RRDR *r, time_t t)
944 {
945         r->c++;
946
947         if(unlikely(r->c >= r->n)) {
948                 error("requested to step above RRDR size for chart %s", r->st->name);
949                 r->c = r->n - 1;
950         }
951
952         // save the time
953         r->t[r->c] = t;
954
955         return 1;
956 }
957
958 inline static void rrdr_lock_rrdset(RRDR *r) {
959         if(unlikely(!r)) {
960                 error("NULL value given!");
961                 return;
962         }
963
964         pthread_rwlock_rdlock(&r->st->rwlock);
965         r->has_st_lock = 1;
966 }
967
968 inline static void rrdr_unlock_rrdset(RRDR *r) {
969         if(unlikely(!r)) {
970                 error("NULL value given!");
971                 return;
972         }
973
974         if(likely(r->has_st_lock)) {
975                 pthread_rwlock_unlock(&r->st->rwlock);
976                 r->has_st_lock = 0;
977         }
978 }
979
980 inline static void rrdr_free(RRDR *r)
981 {
982         if(unlikely(!r)) {
983                 error("NULL value given!");
984                 return;
985         }
986
987         rrdr_unlock_rrdset(r);
988         if(likely(r->t)) free(r->t);
989         if(likely(r->v)) free(r->v);
990         if(likely(r->o)) free(r->o);
991         if(likely(r->od)) free(r->od);
992         free(r);
993 }
994
995 inline void rrdr_done(RRDR *r)
996 {
997         r->rows = r->c + 1;
998         r->c = 0;
999 }
1000
1001 static RRDR *rrdr_create(RRDSET *st, int n)
1002 {
1003         if(unlikely(!st)) {
1004                 error("NULL value given!");
1005                 return NULL;
1006         }
1007
1008         RRDR *r = calloc(1, sizeof(RRDR));
1009         if(unlikely(!r)) goto cleanup;
1010
1011         r->st = st;
1012
1013         rrdr_lock_rrdset(r);
1014
1015         RRDDIM *rd;
1016         for(rd = st->dimensions ; rd ; rd = rd->next) r->d++;
1017
1018         r->n = n;
1019
1020         r->t = malloc(n * sizeof(time_t));
1021         if(unlikely(!r->t)) goto cleanup;
1022
1023         r->v = malloc(n * r->d * sizeof(calculated_number));
1024         if(unlikely(!r->v)) goto cleanup;
1025
1026         r->o = malloc(n * r->d * sizeof(uint8_t));
1027         if(unlikely(!r->o)) goto cleanup;
1028
1029         r->od = malloc(r->d * sizeof(uint8_t));
1030         if(unlikely(!r->od)) goto cleanup;
1031
1032         r->c = -1;
1033
1034         r->group = 1;
1035         r->update_every = 1;
1036
1037         return r;
1038
1039 cleanup:
1040         error("Cannot allocate RRDR memory for %d entries", n);
1041         if(likely(r)) rrdr_free(r);
1042         return NULL;
1043 }
1044
1045 RRDR *rrd2rrdr(RRDSET *st, long points, long long after, long long before, int group_method)
1046 {
1047         int debug = st->debug;
1048
1049         time_t first_entry_t = rrdset_first_entry_t(st);
1050         time_t last_entry_t = rrdset_last_entry_t(st);
1051
1052         if(before == 0 && after == 0) {
1053                 before = last_entry_t;
1054                 after = first_entry_t;
1055         }
1056
1057         // allow relative for before and after
1058         if(before <= st->update_every * st->entries)
1059                 before = last_entry_t + before;
1060
1061         if(after <= st->update_every * st->entries)
1062                 after = last_entry_t + after;
1063
1064         // make sure they are within our timeframe
1065         if(before > last_entry_t) before = last_entry_t;
1066         if(before < first_entry_t) before = first_entry_t;
1067
1068         if(after > last_entry_t) after = last_entry_t;
1069         if(after < first_entry_t) after = first_entry_t;
1070
1071         // check if they are upside down
1072         if(after > before) {
1073                 time_t tmp = before;
1074                 before = after;
1075                 after = tmp;
1076         }
1077
1078         // the duration of the chart
1079         time_t duration = before - after;
1080         long available_points = duration / st->update_every;
1081
1082         if(duration <= 0 || available_points <= 0)
1083                 return rrdr_create(st, 1);
1084
1085         // check the wanted points
1086         if(points < 0) points = -points;
1087         if(points > available_points) points = available_points;
1088         if(points == 0) points = available_points;
1089
1090         // calculate proper grouping of source data
1091         long group = available_points / points;
1092         if(group <= 0) group = 1;
1093
1094         // round group to the closest integer
1095         if(available_points % points > points / 2) group++;
1096
1097         time_t after_new = after - (after % (group * st->update_every));
1098         time_t before_new = before - (before % (group * st->update_every));
1099         long points_new = (before_new - after_new) / st->update_every / group;
1100
1101         // find the starting and ending slots in our round robin db
1102         long    start_at_slot = rrdset_time2slot(st, before_new),
1103                         stop_at_slot = rrdset_time2slot(st, after_new);
1104
1105 #ifdef NETDATA_INTERNAL_CHECKS
1106         if(after_new < first_entry_t) {
1107                 error("after_new %u is too small, minimum %u", after_new, first_entry_t);
1108         }
1109         if(after_new > last_entry_t) {
1110                 error("after_new %u is too big, maximum %u", after_new, last_entry_t);
1111         }
1112         if(before_new < first_entry_t) {
1113                 error("before_new %u is too small, minimum %u", before_new, first_entry_t);
1114         }
1115         if(before_new > last_entry_t) {
1116                 error("before_new %u is too big, maximum %u", before_new, last_entry_t);
1117         }
1118         if(start_at_slot < 0 || start_at_slot >= st->entries) {
1119                 error("start_at_slot is invalid %ld, expected %ld to %ld", start_at_slot, 0, st->entries - 1);
1120         }
1121         if(stop_at_slot < 0 || stop_at_slot >= st->entries) {
1122                 error("stop_at_slot is invalid %ld, expected %ld to %ld", stop_at_slot, 0, st->entries - 1);
1123         }
1124         if(points_new > (before_new - after_new) / group / st->update_every + 1) {
1125                 error("points_new %ld is more than points %ld", points_new, (before_new - after_new) / group / st->update_every + 1);
1126         }
1127 #endif
1128
1129         //info("RRD2RRDR(): %s: wanted %ld points, got %ld - group=%ld, wanted duration=%u, got %u - wanted %ld - %ld, got %ld - %ld", st->id, points, points_new, group, before - after, before_new - after_new, after, before, after_new, before_new);
1130
1131         after = after_new;
1132         before = before_new;
1133         duration = before - after;
1134         points = points_new;
1135
1136         // Now we have:
1137         // before = the end time of the calculation
1138         // after = the start time of the calculation
1139         // duration = the duration of the calculation
1140         // group = the number of source points to aggregate / group together
1141         // method = the method of grouping source points
1142         // points = the number of points to generate
1143
1144
1145         // -------------------------------------------------------------------------
1146         // initialize our result set
1147
1148         RRDR *r = rrdr_create(st, points);
1149         if(!r) return NULL;
1150         if(!r->d) return r;
1151
1152         // find how many dimensions we have
1153         long dimensions = r->d;
1154
1155
1156         // -------------------------------------------------------------------------
1157         // checks for debugging
1158
1159         if(debug) debug(D_RRD_STATS, "INFO %s first_t: %lu, last_t: %lu, all_duration: %lu, after: %lu, before: %lu, duration: %lu, points: %ld, group: %ld"
1160                         , st->id
1161                         , first_entry_t
1162                         , last_entry_t
1163                         , last_entry_t - first_entry_t
1164                         , after
1165                         , before
1166                         , duration
1167                         , points
1168                         , group
1169                         );
1170
1171
1172         // -------------------------------------------------------------------------
1173         // temp arrays for keeping values per dimension
1174
1175         calculated_number       group_values[dimensions]; // keep sums when grouping
1176         long                            group_counts[dimensions]; // keep the number of values added to group_values
1177         uint8_t                         group_options[dimensions];
1178         uint8_t                         found_non_zero[dimensions];
1179
1180
1181         // initialize them
1182         RRDDIM *rd;
1183         long c;
1184         for( rd = st->dimensions, c = 0 ; rd && c < dimensions ; rd = rd->next, c++) {
1185                 group_values[c] = 0;
1186                 group_counts[c] = 0;
1187                 group_options[c] = 0;
1188                 found_non_zero[c] = 0;
1189         }
1190
1191
1192         // -------------------------------------------------------------------------
1193         // the main loop
1194
1195         time_t  now = rrdset_slot2time(st, start_at_slot),
1196                         dt = st->update_every,
1197                         group_start_t = 0;
1198
1199         if(unlikely(debug)) debug(D_RRD_STATS, "BEGIN %s after_t: %lu (stop_at_t: %ld), before_t: %lu (start_at_t: %ld), start_t(now): %lu, current_entry: %ld, entries: %ld"
1200                         , st->id
1201                         , after
1202                         , stop_at_slot
1203                         , before
1204                         , start_at_slot
1205                         , now
1206                         , st->current_entry
1207                         , st->entries
1208                         );
1209
1210         r->group = group;
1211         r->update_every = group * st->update_every;
1212         r->before = now;
1213         r->after = now;
1214
1215         //info("RRD2RRDR(): %s: STARTING", st->id);
1216
1217         long slot = start_at_slot, counter = 0, stop_now = 0, added = 0, group_count = 0, add_this = 0;
1218         for(; !stop_now ; now -= dt, slot--, counter++) {
1219                 if(unlikely(slot < 0)) slot = st->entries - 1;
1220                 if(unlikely(slot == stop_at_slot)) stop_now = counter;
1221
1222                 if(unlikely(debug)) debug(D_RRD_STATS, "ROW %s slot: %ld, entries_counter: %ld, group_count: %ld, added: %ld, now: %lu, %s %s"
1223                                 , st->id
1224                                 , slot
1225                                 , counter
1226                                 , group_count + 1
1227                                 , added
1228                                 , now
1229                                 , (group_count + 1 == group)?"PRINT":"  -  "
1230                                 , (now >= after && now <= before)?"RANGE":"  -  "
1231                                 );
1232
1233                 // make sure we return data in the proper time range
1234                 if(unlikely(now > before)) continue;
1235                 if(unlikely(now < after)) break;
1236
1237                 if(unlikely(group_count == 0)) {
1238                         group_start_t = now;
1239                 }
1240                 group_count++;
1241
1242                 if(unlikely(group_count == group)) {
1243                         if(unlikely(added >= points)) break;
1244                         add_this = 1;
1245                 }
1246
1247                 // do the calculations
1248                 for(rd = st->dimensions, c = 0 ; rd && c < dimensions ; rd = rd->next, c++) {
1249                         storage_number n = rd->values[slot];
1250                         if(unlikely(!does_storage_number_exist(n))) continue;
1251
1252                         group_counts[c]++;
1253
1254                         calculated_number value = unpack_storage_number(n);
1255                         if(likely(value != 0.0)) {
1256                                 group_options[c] |= RRDR_NONZERO;
1257                                 found_non_zero[c] = 1;
1258                         }
1259
1260                         if(unlikely(did_storage_number_reset(n)))
1261                                 group_options[c] |= RRDR_RESET;
1262
1263                         switch(group_method) {
1264                                 case GROUP_MAX:
1265                                         if(unlikely(abs(value) > abs(group_values[c])))
1266                                                 group_values[c] = value;
1267                                         break;
1268
1269                                 default:
1270                                 case GROUP_SUM:
1271                                 case GROUP_AVERAGE:
1272                                         group_values[c] += value;
1273                                         break;
1274                         }
1275                 }
1276
1277                 // added it
1278                 if(unlikely(add_this)) {
1279                         if(unlikely(!rrdr_line_init(r, group_start_t))) break;
1280
1281                         r->after = now;
1282
1283                         calculated_number *cn = rrdr_line_values(r);
1284                         uint8_t *co = rrdr_line_options(r);
1285
1286                         for(rd = st->dimensions, c = 0 ; likely(rd && c < dimensions) ; rd = rd->next, c++) {
1287
1288                                 // update the dimension options
1289                                 if(likely(found_non_zero[c])) r->od[c] |= RRDR_NONZERO;
1290                                 if(unlikely(rd->flags & RRDDIM_FLAG_HIDDEN)) r->od[c] |= RRDR_HIDDEN;
1291
1292                                 // store the specific point options
1293                                 co[c] = group_options[c];
1294
1295                                 // store the value
1296                                 if(unlikely(group_counts[c] == 0)) {
1297                                         cn[c] = 0.0;
1298                                         co[c] |= RRDR_EMPTY;
1299                                 }
1300                                 else if(unlikely(group_method == GROUP_AVERAGE)) {
1301                                         cn[c] = group_values[c] / group_counts[c];
1302                                 }
1303                                 else {
1304                                         cn[c] = group_values[c];
1305                                 }
1306
1307                                 if(cn[c] < r->min) r->min = cn[c];
1308                                 if(cn[c] > r->max) r->max = cn[c];
1309
1310                                 // reset them for the next loop
1311                                 group_values[c] = 0;
1312                                 group_counts[c] = 0;
1313                                 group_options[c] = 0;
1314                         }
1315
1316                         added++;
1317                         group_count = 0;
1318                         add_this = 0;
1319                 }
1320         }
1321
1322         rrdr_done(r);
1323         //info("RRD2RRDR(): %s: END %ld loops made, %ld points generated", st->id, counter, rrdr_rows(r));
1324         //error("SHIFT: %s: wanted %ld points, got %ld", st->id, points, rrdr_rows(r));
1325         return r;
1326 }
1327
1328 int rrd2format(RRDSET *st, BUFFER *wb, BUFFER *dimensions, uint32_t format, long points, long long after, long long before, int group_method, uint32_t options, time_t *latest_timestamp)
1329 {
1330         RRDR *r = rrd2rrdr(st, points, after, before, group_method);
1331         if(!r) {
1332                 buffer_strcat(wb, "Cannot generate output with these parameters on this chart.");
1333                 return 500;
1334         }
1335
1336         if(dimensions)
1337                 rrdr_disable_not_selected_dimensions(r, buffer_tostring(dimensions));
1338
1339         if(latest_timestamp && rrdr_rows(r) > 0)
1340                 *latest_timestamp = r->before;
1341
1342         switch(format) {
1343         case DATASOURCE_SSV:
1344                 if(options & RRDR_OPTION_JSON_WRAP) {
1345                         wb->contenttype = CT_APPLICATION_JSON;
1346                         rrdr_json_wrapper_begin(r, wb, format, options, 1);
1347                         rrdr2ssv(r, wb, options, "", " ", "");
1348                         rrdr_json_wrapper_end(r, wb, format, options, 1);
1349                 }
1350                 else {
1351                         wb->contenttype = CT_TEXT_PLAIN;
1352                         rrdr2ssv(r, wb, options, "", " ", "");
1353                 }
1354                 break;
1355
1356         case DATASOURCE_SSV_COMMA:
1357                 if(options & RRDR_OPTION_JSON_WRAP) {
1358                         wb->contenttype = CT_APPLICATION_JSON;
1359                         rrdr_json_wrapper_begin(r, wb, format, options, 1);
1360                         rrdr2ssv(r, wb, options, "", ",", "");
1361                         rrdr_json_wrapper_end(r, wb, format, options, 1);
1362                 }
1363                 else {
1364                         wb->contenttype = CT_TEXT_PLAIN;
1365                         rrdr2ssv(r, wb, options, "", ",", "");
1366                 }
1367                 break;
1368
1369         case DATASOURCE_JS_ARRAY:
1370                 if(options & RRDR_OPTION_JSON_WRAP) {
1371                         wb->contenttype = CT_APPLICATION_JSON;
1372                         rrdr_json_wrapper_begin(r, wb, format, options, 0);
1373                         rrdr2ssv(r, wb, options, "[", ",", "]");
1374                         rrdr_json_wrapper_end(r, wb, format, options, 0);
1375                 }
1376                 else {
1377                         wb->contenttype = CT_APPLICATION_JSON;
1378                         rrdr2ssv(r, wb, options, "[", ",", "]");
1379                 }
1380                 break;
1381
1382         case DATASOURCE_CSV:
1383                 if(options & RRDR_OPTION_JSON_WRAP) {
1384                         wb->contenttype = CT_APPLICATION_JSON;
1385                         rrdr_json_wrapper_begin(r, wb, format, options, 1);
1386                         rrdr2csv(r, wb, options, "", ",", "\\n");
1387                         rrdr_json_wrapper_end(r, wb, format, options, 1);
1388                 }
1389                 else {
1390                         wb->contenttype = CT_TEXT_PLAIN;
1391                         rrdr2csv(r, wb, options, "", ",", "\r\n");
1392                 }
1393                 break;
1394
1395         case DATASOURCE_TSV:
1396                 if(options & RRDR_OPTION_JSON_WRAP) {
1397                         wb->contenttype = CT_APPLICATION_JSON;
1398                         rrdr_json_wrapper_begin(r, wb, format, options, 1);
1399                         rrdr2csv(r, wb, options, "", "\t", "\\n");
1400                         rrdr_json_wrapper_end(r, wb, format, options, 1);
1401                 }
1402                 else {
1403                         wb->contenttype = CT_TEXT_PLAIN;
1404                         rrdr2csv(r, wb, options, "", "\t", "\r\n");
1405                 }
1406                 break;
1407
1408         case DATASOURCE_HTML:
1409                 if(options & RRDR_OPTION_JSON_WRAP) {
1410                         wb->contenttype = CT_APPLICATION_JSON;
1411                         rrdr_json_wrapper_begin(r, wb, format, options, 1);
1412                         buffer_strcat(wb, "<html>\\n<center>\\n<table border=\\\"0\\\" cellpadding=\\\"5\\\" cellspacing=\\\"5\\\">\\n");
1413                         rrdr2csv(r, wb, options, "<tr><td>", "</td><td>", "</td></tr>\\n");
1414                         buffer_strcat(wb, "</table>\\n</center>\\n</html>\\n");
1415                         rrdr_json_wrapper_end(r, wb, format, options, 1);
1416                 }
1417                 else {
1418                         wb->contenttype = CT_TEXT_HTML;
1419                         buffer_strcat(wb, "<html>\n<center>\n<table border=\"0\" cellpadding=\"5\" cellspacing=\"5\">\n");
1420                         rrdr2csv(r, wb, options, "<tr><td>", "</td><td>", "</td></tr>\n");
1421                         buffer_strcat(wb, "</table>\n</center>\n</html>\n");
1422                 }
1423                 break;
1424
1425         case DATASOURCE_DATATABLE_JSONP:
1426                 wb->contenttype = CT_APPLICATION_X_JAVASCRIPT;
1427
1428                 if(options & RRDR_OPTION_JSON_WRAP)
1429                         rrdr_json_wrapper_begin(r, wb, format, options, 0);
1430
1431                 rrdr2json(r, wb, options, 1);
1432
1433                 if(options & RRDR_OPTION_JSON_WRAP)
1434                         rrdr_json_wrapper_end(r, wb, format, options, 0);
1435                 break;
1436
1437         case DATASOURCE_DATATABLE_JSON:
1438                 wb->contenttype = CT_APPLICATION_JSON;
1439
1440                 if(options & RRDR_OPTION_JSON_WRAP)
1441                         rrdr_json_wrapper_begin(r, wb, format, options, 0);
1442
1443                 rrdr2json(r, wb, options, 1);
1444
1445                 if(options & RRDR_OPTION_JSON_WRAP)
1446                         rrdr_json_wrapper_end(r, wb, format, options, 0);
1447                 break;
1448
1449         case DATASOURCE_JSONP:
1450                 wb->contenttype = CT_APPLICATION_X_JAVASCRIPT;
1451                 if(options & RRDR_OPTION_JSON_WRAP)
1452                         rrdr_json_wrapper_begin(r, wb, format, options, 0);
1453
1454                 rrdr2json(r, wb, options, 0);
1455
1456                 if(options & RRDR_OPTION_JSON_WRAP)
1457                         rrdr_json_wrapper_end(r, wb, format, options, 0);
1458                 break;
1459
1460         case DATASOURCE_JSON:
1461         default:
1462                 wb->contenttype = CT_APPLICATION_JSON;
1463
1464                 if(options & RRDR_OPTION_JSON_WRAP)
1465                         rrdr_json_wrapper_begin(r, wb, format, options, 0);
1466
1467                 rrdr2json(r, wb, options, 0);
1468
1469                 if(options & RRDR_OPTION_JSON_WRAP)
1470                         rrdr_json_wrapper_end(r, wb, format, options, 0);
1471                 break;
1472         }
1473
1474         rrdr_free(r);
1475         return 200;
1476 }
1477
1478 unsigned long rrd_stats_json(int type, RRDSET *st, BUFFER *wb, int points, int group, int group_method, time_t after, time_t before, int only_non_zero)
1479 {
1480         int c;
1481         pthread_rwlock_rdlock(&st->rwlock);
1482
1483
1484         // -------------------------------------------------------------------------
1485         // switch from JSON to google JSON
1486
1487         char kq[2] = "\"";
1488         char sq[2] = "\"";
1489         switch(type) {
1490                 case DATASOURCE_DATATABLE_JSON:
1491                 case DATASOURCE_DATATABLE_JSONP:
1492                         kq[0] = '\0';
1493                         sq[0] = '\'';
1494                         break;
1495
1496                 case DATASOURCE_JSON:
1497                 default:
1498                         break;
1499         }
1500
1501
1502         // -------------------------------------------------------------------------
1503         // validate the parameters
1504
1505         if(points < 1) points = 1;
1506         if(group < 1) group = 1;
1507
1508         if(before == 0 || before > rrdset_last_entry_t(st)) before = rrdset_last_entry_t(st);
1509         if(after  == 0 || after < rrdset_first_entry_t(st)) after = rrdset_first_entry_t(st);
1510
1511         // ---
1512
1513         // our return value (the last timestamp printed)
1514         // this is required to detect re-transmit in google JSONP
1515         time_t last_timestamp = 0;
1516
1517
1518         // -------------------------------------------------------------------------
1519         // find how many dimensions we have
1520
1521         int dimensions = 0;
1522         RRDDIM *rd;
1523         for( rd = st->dimensions ; rd ; rd = rd->next) dimensions++;
1524         if(!dimensions) {
1525                 pthread_rwlock_unlock(&st->rwlock);
1526                 buffer_strcat(wb, "No dimensions yet.");
1527                 return 0;
1528         }
1529
1530
1531         // -------------------------------------------------------------------------
1532         // prepare various strings, to speed up the loop
1533
1534         char overflow_annotation[201]; snprintf(overflow_annotation, 200, ",{%sv%s:%sRESET OR OVERFLOW%s},{%sv%s:%sThe counters have been wrapped.%s}", kq, kq, sq, sq, kq, kq, sq, sq);
1535         char normal_annotation[201];   snprintf(normal_annotation,   200, ",{%sv%s:null},{%sv%s:null}", kq, kq, kq, kq);
1536         char pre_date[51];             snprintf(pre_date,             50, "             {%sc%s:[{%sv%s:%s", kq, kq, kq, kq, sq);
1537         char post_date[21];            snprintf(post_date,            20, "%s}", sq);
1538         char pre_value[21];            snprintf(pre_value,            20, ",{%sv%s:", kq, kq);
1539         char post_value[21];           snprintf(post_value,           20, "}");
1540
1541
1542         // -------------------------------------------------------------------------
1543         // checks for debugging
1544
1545         if(st->debug) {
1546                 debug(D_RRD_STATS, "%s first_entry_t = %lu, last_entry_t = %lu, duration = %lu, after = %lu, before = %lu, duration = %lu, entries_to_show = %lu, group = %lu"
1547                         , st->id
1548                         , rrdset_first_entry_t(st)
1549                         , rrdset_last_entry_t(st)
1550                         , rrdset_last_entry_t(st) - rrdset_first_entry_t(st)
1551                         , after
1552                         , before
1553                         , before - after
1554                         , points
1555                         , group
1556                         );
1557
1558                 if(before < after)
1559                         debug(D_RRD_STATS, "WARNING: %s The newest value in the database (%lu) is earlier than the oldest (%lu)", st->name, before, after);
1560
1561                 if((before - after) > st->entries * st->update_every)
1562                         debug(D_RRD_STATS, "WARNING: %s The time difference between the oldest and the newest entries (%lu) is higher than the capacity of the database (%lu)", st->name, before - after, st->entries * st->update_every);
1563         }
1564
1565
1566         // -------------------------------------------------------------------------
1567         // temp arrays for keeping values per dimension
1568
1569         calculated_number group_values[dimensions]; // keep sums when grouping
1570         int               print_hidden[dimensions]; // keep hidden flags
1571         int               found_non_zero[dimensions];
1572         int               found_non_existing[dimensions];
1573
1574         // initialize them
1575         for( rd = st->dimensions, c = 0 ; rd && c < dimensions ; rd = rd->next, c++) {
1576                 group_values[c] = 0;
1577                 print_hidden[c] = (rd->flags & RRDDIM_FLAG_HIDDEN)?1:0;
1578                 found_non_zero[c] = 0;
1579                 found_non_existing[c] = 0;
1580         }
1581
1582
1583         // error("OLD: points=%d after=%d before=%d group=%d, duration=%d", entries_to_show, before - (st->update_every * group * entries_to_show), before, group, before - after + 1);
1584         // rrd2array(st, entries_to_show, before - (st->update_every * group * entries_to_show), before, group_method, only_non_zero);
1585         // rrd2rrdr(st, entries_to_show, before - (st->update_every * group * entries_to_show), before, group_method);
1586
1587         // -------------------------------------------------------------------------
1588         // remove dimensions that contain only zeros
1589
1590         int max_loop = 1;
1591         if(only_non_zero) max_loop = 2;
1592
1593         for(; max_loop ; max_loop--) {
1594
1595                 // -------------------------------------------------------------------------
1596                 // print the JSON header
1597
1598                 buffer_sprintf(wb, "{\n %scols%s:\n     [\n", kq, kq);
1599                 buffer_sprintf(wb, "            {%sid%s:%s%s,%slabel%s:%stime%s,%spattern%s:%s%s,%stype%s:%sdatetime%s},\n", kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq);
1600                 buffer_sprintf(wb, "            {%sid%s:%s%s,%slabel%s:%s%s,%spattern%s:%s%s,%stype%s:%sstring%s,%sp%s:{%srole%s:%sannotation%s}},\n", kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, kq, kq, sq, sq);
1601                 buffer_sprintf(wb, "            {%sid%s:%s%s,%slabel%s:%s%s,%spattern%s:%s%s,%stype%s:%sstring%s,%sp%s:{%srole%s:%sannotationText%s}}", kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, sq, sq, kq, kq, kq, kq, sq, sq);
1602
1603                 // print the header for each dimension
1604                 // and update the print_hidden array for the dimensions that should be hidden
1605                 int pc = 0;
1606                 for( rd = st->dimensions, c = 0 ; rd && c < dimensions ; rd = rd->next, c++) {
1607                         if(!print_hidden[c]) {
1608                                 pc++;
1609                                 buffer_sprintf(wb, ",\n         {%sid%s:%s%s,%slabel%s:%s%s%s,%spattern%s:%s%s,%stype%s:%snumber%s}", kq, kq, sq, sq, kq, kq, sq, rd->name, sq, kq, kq, sq, sq, kq, kq, sq, sq);
1610                         }
1611                 }
1612                 if(!pc) {
1613                         buffer_sprintf(wb, ",\n         {%sid%s:%s%s,%slabel%s:%s%s%s,%spattern%s:%s%s,%stype%s:%snumber%s}", kq, kq, sq, sq, kq, kq, sq, "no data", sq, kq, kq, sq, sq, kq, kq, sq, sq);
1614                 }
1615
1616                 // print the begin of row data
1617                 buffer_sprintf(wb, "\n  ],\n    %srows%s:\n     [\n", kq, kq);
1618
1619
1620                 // -------------------------------------------------------------------------
1621                 // the main loop
1622
1623                 int annotate_reset = 0;
1624                 int annotation_count = 0;
1625
1626                 long    t = rrdset_time2slot(st, before),
1627                                 stop_at_t = rrdset_time2slot(st, after),
1628                                 stop_now = 0;
1629
1630                 t -= t % group;
1631
1632                 time_t  now = rrdset_slot2time(st, t),
1633                                 dt = st->update_every;
1634
1635                 long count = 0, printed = 0, group_count = 0;
1636                 last_timestamp = 0;
1637
1638                 if(st->debug) debug(D_RRD_STATS, "%s: REQUEST after:%lu before:%lu, points:%d, group:%d, CHART cur:%ld first: %lu last:%lu, CALC start_t:%ld, stop_t:%ld"
1639                                         , st->id
1640                                         , after
1641                                         , before
1642                                         , points
1643                                         , group
1644                                         , st->current_entry
1645                                         , rrdset_first_entry_t(st)
1646                                         , rrdset_last_entry_t(st)
1647                                         , t
1648                                         , stop_at_t
1649                                         );
1650
1651                 long counter = 0;
1652                 for(; !stop_now ; now -= dt, t--, counter++) {
1653                         if(t < 0) t = st->entries - 1;
1654                         if(t == stop_at_t) stop_now = counter;
1655
1656                         int print_this = 0;
1657
1658                         if(st->debug) debug(D_RRD_STATS, "%s t = %ld, count = %ld, group_count = %ld, printed = %ld, now = %lu, %s %s"
1659                                         , st->id
1660                                         , t
1661                                         , count + 1
1662                                         , group_count + 1
1663                                         , printed
1664                                         , now
1665                                         , (group_count + 1 == group)?"PRINT":"  -  "
1666                                         , (now >= after && now <= before)?"RANGE":"  -  "
1667                                         );
1668
1669
1670                         // make sure we return data in the proper time range
1671                         if(now > before) continue;
1672                         if(now < after) break;
1673
1674                         //if(rrdset_slot2time(st, t) != now)
1675                         //      error("%s: slot=%ld, now=%ld, slot2time=%ld, diff=%ld, last_entry_t=%ld, rrdset_last_slot=%ld", st->id, t, now, rrdset_slot2time(st,t), now - rrdset_slot2time(st,t), rrdset_last_entry_t(st), rrdset_last_slot(st));
1676
1677                         count++;
1678                         group_count++;
1679
1680                         // check if we have to print this now
1681                         if(group_count == group) {
1682                                 if(printed >= points) {
1683                                         // debug(D_RRD_STATS, "Already printed all rows. Stopping.");
1684                                         break;
1685                                 }
1686
1687                                 // generate the local date time
1688                                 struct tm tmbuf, *tm = localtime_r(&now, &tmbuf);
1689                                 if(!tm) { error("localtime() failed."); continue; }
1690                                 if(now > last_timestamp) last_timestamp = now;
1691
1692                                 if(printed) buffer_strcat(wb, "]},\n");
1693                                 buffer_strcat(wb, pre_date);
1694                                 buffer_jsdate(wb, tm->tm_year + 1900, tm->tm_mon, tm->tm_mday, tm->tm_hour, tm->tm_min, tm->tm_sec);
1695                                 buffer_strcat(wb, post_date);
1696
1697                                 print_this = 1;
1698                         }
1699
1700                         // do the calculations
1701                         for(rd = st->dimensions, c = 0 ; rd && c < dimensions ; rd = rd->next, c++) {
1702                                 storage_number n = rd->values[t];
1703                                 calculated_number value = unpack_storage_number(n);
1704
1705                                 if(!does_storage_number_exist(n)) {
1706                                         value = 0.0;
1707                                         found_non_existing[c]++;
1708                                 }
1709                                 if(did_storage_number_reset(n)) annotate_reset = 1;
1710
1711                                 switch(group_method) {
1712                                         case GROUP_MAX:
1713                                                 if(abs(value) > abs(group_values[c])) group_values[c] = value;
1714                                                 break;
1715
1716                                         case GROUP_SUM:
1717                                                 group_values[c] += value;
1718                                                 break;
1719
1720                                         default:
1721                                         case GROUP_AVERAGE:
1722                                                 group_values[c] += value;
1723                                                 if(print_this) group_values[c] /= ( group_count - found_non_existing[c] );
1724                                                 break;
1725                                 }
1726                         }
1727
1728                         if(print_this) {
1729                                 if(annotate_reset) {
1730                                         annotation_count++;
1731                                         buffer_strcat(wb, overflow_annotation);
1732                                         annotate_reset = 0;
1733                                 }
1734                                 else
1735                                         buffer_strcat(wb, normal_annotation);
1736
1737                                 pc = 0;
1738                                 for(c = 0 ; c < dimensions ; c++) {
1739                                         if(found_non_existing[c] == group_count) {
1740                                                 // all entries are non-existing
1741                                                 pc++;
1742                                                 buffer_strcat(wb, pre_value);
1743                                                 buffer_strcat(wb, "null");
1744                                                 buffer_strcat(wb, post_value);
1745                                         }
1746                                         else if(!print_hidden[c]) {
1747                                                 pc++;
1748                                                 buffer_strcat(wb, pre_value);
1749                                                 buffer_rrd_value(wb, group_values[c]);
1750                                                 buffer_strcat(wb, post_value);
1751
1752                                                 if(group_values[c]) found_non_zero[c]++;
1753                                         }
1754
1755                                         // reset them for the next loop
1756                                         group_values[c] = 0;
1757                                         found_non_existing[c] = 0;
1758                                 }
1759
1760                                 // if all dimensions are hidden, print a null
1761                                 if(!pc) {
1762                                         buffer_strcat(wb, pre_value);
1763                                         buffer_strcat(wb, "null");
1764                                         buffer_strcat(wb, post_value);
1765                                 }
1766
1767                                 printed++;
1768                                 group_count = 0;
1769                         }
1770                 }
1771
1772                 if(printed) buffer_strcat(wb, "]}");
1773                 buffer_strcat(wb, "\n   ]\n}\n");
1774
1775                 if(only_non_zero && max_loop > 1) {
1776                         int changed = 0;
1777                         for(rd = st->dimensions, c = 0 ; rd && c < dimensions ; rd = rd->next, c++) {
1778                                 group_values[c] = 0;
1779                                 found_non_existing[c] = 0;
1780
1781                                 if(!print_hidden[c] && !found_non_zero[c]) {
1782                                         changed = 1;
1783                                         print_hidden[c] = 1;
1784                                 }
1785                         }
1786
1787                         if(changed) buffer_flush(wb);
1788                         else break;
1789                 }
1790                 else break;
1791
1792         } // max_loop
1793
1794         debug(D_RRD_STATS, "RRD_STATS_JSON: %s total %ld bytes", st->name, wb->len);
1795
1796         pthread_rwlock_unlock(&st->rwlock);
1797         return last_timestamp;
1798 }