X-Git-Url: https://git.octo.it/?p=rrdtool.git;a=blobdiff_plain;f=src%2Frrd_xport.c;h=ebe72aad40b28e6627d63851245cf4c84fa0daff;hp=a063c87766413744ed9fd5291ce3fa646a172b0b;hb=4e8787fdbff3ddd4044e19cf37b9e3a54b5ef0cb;hpb=ad6f3441d407ca0c82b86b481f697ca913844d54 diff --git a/src/rrd_xport.c b/src/rrd_xport.c index a063c87..ebe72aa 100644 --- a/src/rrd_xport.c +++ b/src/rrd_xport.c @@ -1,22 +1,23 @@ /**************************************************************************** - * RRDtool 1.2.23 Copyright by Tobi Oetiker, 1997-2007 + * RRDtool 1.4.3 Copyright by Tobi Oetiker, 1997-2010 **************************************************************************** * rrd_xport.c export RRD data ****************************************************************************/ #include +#include #include "rrd_tool.h" #include "rrd_graph.h" #include "rrd_xport.h" #include "unused.h" +#include "rrd_client.h" #if defined(_WIN32) && !defined(__CYGWIN__) && !defined(__CYGWIN32__) #include #include #endif - int rrd_xport( int, char **, @@ -35,10 +36,23 @@ int rrd_xport_fn( unsigned long *, unsigned long *, char ***, - rrd_value_t **); - + rrd_value_t **, + int); +/* helper function for buffer handling */ +typedef struct stringbuffer_t { + size_t allocated; + size_t len; + unsigned char* data; + FILE *file; +} stringbuffer_t; +int addToBuffer(stringbuffer_t *,char*,size_t); +void escapeJSON(char*,size_t); +int rrd_graph_xport(image_desc_t *); +int rrd_xport_format_xmljson(int,stringbuffer_t *,image_desc_t*,time_t, time_t, unsigned long, unsigned long, char**, rrd_value_t*); +int rrd_xport_format_sv(char,stringbuffer_t *,image_desc_t*,time_t, time_t, unsigned long, unsigned long, char**, rrd_value_t*); +int rrd_xport_format_addprints(int,stringbuffer_t *,image_desc_t *); int rrd_xport( int argc, @@ -53,17 +67,19 @@ int rrd_xport( char ***legend_v, /* legend entries */ rrd_value_t **data) { /* two dimensional array containing the data */ - image_desc_t im; time_t start_tmp = 0, end_tmp = 0; - struct rrd_time_value start_tv, end_tv; + rrd_time_value_t start_tv, end_tv; char *parsetime_error = NULL; + struct option long_options[] = { {"start", required_argument, 0, 's'}, {"end", required_argument, 0, 'e'}, {"maxrows", required_argument, 0, 'm'}, {"step", required_argument, 0, 261}, {"enumds", no_argument, 0, 262}, /* these are handled in the frontend ... */ + {"json", no_argument, 0, 263}, /* these are handled in the frontend ... */ + {"daemon", required_argument, 0, 'd'}, {0, 0, 0, 0} }; @@ -72,14 +88,17 @@ int rrd_xport( rrd_graph_init(&im); - parsetime("end-24h", &start_tv); - parsetime("now", &end_tv); + rrd_parsetime("end-24h", &start_tv); + rrd_parsetime("now", &end_tv); + + int enumds=0; + int json=0; while (1) { int option_index = 0; int opt; - opt = getopt_long(argc, argv, "s:e:m:", long_options, &option_index); + opt = getopt_long(argc, argv, "s:e:m:d:", long_options, &option_index); if (opt == EOF) break; @@ -89,15 +108,19 @@ int rrd_xport( im.step = atoi(optarg); break; case 262: + enumds=1; + break; + case 263: + json=1; break; case 's': - if ((parsetime_error = parsetime(optarg, &start_tv))) { + if ((parsetime_error = rrd_parsetime(optarg, &start_tv))) { rrd_set_error("start time: %s", parsetime_error); return -1; } break; case 'e': - if ((parsetime_error = parsetime(optarg, &end_tv))) { + if ((parsetime_error = rrd_parsetime(optarg, &end_tv))) { rrd_set_error("end time: %s", parsetime_error); return -1; } @@ -109,13 +132,31 @@ int rrd_xport( return -1; } break; + case 'd': + { + if (im.daemon_addr != NULL) + { + rrd_set_error ("You cannot specify --daemon " + "more than once."); + return (-1); + } + + im.daemon_addr = strdup(optarg); + if (im.daemon_addr == NULL) + { + rrd_set_error("strdup error"); + return -1; + } + break; + } + case '?': rrd_set_error("unknown option '%s'", argv[optind - 1]); return -1; } } - if (proc_start_end(&start_tv, &end_tv, &start_tmp, &end_tmp) == -1) { + if (rrd_proc_start_end(&start_tv, &end_tv, &start_tmp, &end_tmp) == -1) { return -1; } @@ -142,16 +183,33 @@ int rrd_xport( } if (im.gdes_c == 0) { - rrd_set_error("can't make a graph without contents"); + rrd_set_error("can't make an xport without contents"); im_free(&im); return (-1); } - if (rrd_xport_fn(&im, start, end, step, col_cnt, legend_v, data) == -1) { + { /* try to connect to rrdcached */ + int status = rrdc_connect(im.daemon_addr); + if (status != 0) return status; + } + + if (rrd_xport_fn(&im, start, end, step, col_cnt, legend_v, data,0) == -1) { im_free(&im); return -1; } + /* and create the export */ + if (!xsize) { + int flags=0; + if (json) { flags|=1; } + if (enumds) { flags|=4; } + stringbuffer_t buffer={0,0,NULL,stdout}; + rrd_xport_format_xmljson(flags,&buffer,&im, + *start, *end, *step, + *col_cnt, *legend_v, + *data); + } + im_free(&im); return 0; } @@ -167,24 +225,20 @@ int rrd_xport_fn( * will be changed to represent reality */ unsigned long *col_cnt, /* number of data columns in the result */ char ***legend_v, /* legend entries */ - rrd_value_t **data) + rrd_value_t **data, + int dolines) { /* two dimensional array containing the data */ int i = 0, j = 0; - unsigned long *ds_cnt; /* number of data sources in file */ - unsigned long col, dst_row, row_cnt; - rrd_value_t *srcptr, *dstptr; + unsigned long dst_row, row_cnt; + rrd_value_t *dstptr; - unsigned long nof_xports = 0; unsigned long xport_counter = 0; - unsigned long *ref_list; - rrd_value_t **srcptr_list; + int *ref_list; + long *step_list; + long *step_list_ptr; char **legend_list; - int ii = 0; - time_t start_tmp = 0; - time_t end_tmp = 0; - unsigned long step_tmp = 1; /* pull the data from the rrd files ... */ if (data_fetch(im) == -1) @@ -194,81 +248,99 @@ int rrd_xport_fn( if (data_calc(im) == -1) return -1; - /* how many xports? */ + /* how many xports or lines/AREA/STACK ? */ + *col_cnt = 0; for (i = 0; i < im->gdes_c; i++) { switch (im->gdes[i].gf) { + case GF_LINE: + case GF_AREA: + case GF_STACK: + (*col_cnt)+=dolines; + break; case GF_XPORT: - nof_xports++; + (*col_cnt)++; break; default: break; } } - - if (nof_xports == 0) { + if ((*col_cnt) == 0) { rrd_set_error("no XPORT found, nothing to do"); return -1; } /* a list of referenced gdes */ - ref_list = malloc(sizeof(int) * nof_xports); + ref_list = (int*)malloc(sizeof(int) * (*col_cnt)); if (ref_list == NULL) return -1; - /* a list to save pointers into each gdes data */ - srcptr_list = malloc(sizeof(srcptr) * nof_xports); - if (srcptr_list == NULL) { - free(ref_list); - return -1; - } - /* a list to save pointers to the column's legend entry */ /* this is a return value! */ - legend_list = malloc(sizeof(char *) * nof_xports); + legend_list = (char**)malloc(sizeof(char *) * (*col_cnt)); if (legend_list == NULL) { - free(srcptr_list); free(ref_list); return -1; } - /* find referenced gdes and save their index and */ - /* a pointer into their data */ + /* lets find the step size we have to use for xport */ + step_list = (long*)malloc(sizeof(long)*((*col_cnt)+1)); + step_list_ptr = step_list; + j = 0; for (i = 0; i < im->gdes_c; i++) { + /* decide if we need to handle the output */ + int handle=0; switch (im->gdes[i].gf) { + case GF_LINE: + case GF_AREA: + case GF_STACK: + handle=dolines; + break; case GF_XPORT: - ii = im->gdes[i].vidx; - if (xport_counter > nof_xports) { - rrd_set_error("too many xports: should not happen. Hmmm"); - free(srcptr_list); + handle=1; + break; + default: + handle=0; + break; + } + /* and now do the real work */ + if (handle) { + ref_list[xport_counter++] = i; + *step_list_ptr = im->gdes[im->gdes[i].vidx].step; + /* printf("%s:%lu\n",im->gdes[i].legend,*step_list_ptr); */ + step_list_ptr++; + + /* reserve room for one legend entry */ + if ((legend_list[j] = strdup(im->gdes[i].legend)) == NULL) { free(ref_list); + *data = NULL; + while (--j > -1) + free(legend_list[j]); free(legend_list); - return -1; + free(step_list); + rrd_set_error("malloc xport legend entry"); + return (-1); } - srcptr_list[xport_counter] = im->gdes[ii].data; - ref_list[xport_counter++] = i; - break; - default: - break; - } - } - start_tmp = im->gdes[0].start; - end_tmp = im->gdes[0].end; - step_tmp = im->gdes[0].step; - - /* fill some return values */ - *col_cnt = nof_xports; - *start = start_tmp; - *end = end_tmp; - *step = step_tmp; - - row_cnt = ((*end) - (*start)) / (*step); + if (im->gdes[i].legend == 0) + legend_list[j][0] = '\0'; + ++j; + } + } + *step_list_ptr=0; + /* find a common step */ + *step = lcd(step_list); + /* printf("step: %lu\n",*step); */ + free(step_list); + + *start = im->start - im->start % (*step); + *end = im->end - im->end % (*step) + (*step); + /* room for rearranged data */ /* this is a return value! */ + row_cnt = ((*end) - (*start)) / (*step); if (((*data) = - malloc((*col_cnt) * row_cnt * sizeof(rrd_value_t))) == NULL) { - free(srcptr_list); + (rrd_value_t*)malloc((*col_cnt) * row_cnt * sizeof(rrd_value_t))) == NULL) { free(ref_list); free(legend_list); rrd_set_error("malloc xport data area"); @@ -276,66 +348,752 @@ int rrd_xport_fn( } dstptr = (*data); - j = 0; - for (i = 0; i < im->gdes_c; i++) { - switch (im->gdes[i].gf) { - case GF_XPORT: - /* reserve room for one legend entry */ - /* is FMT_LEG_LEN + 5 the correct size? */ - if ((legend_list[j] = - malloc(sizeof(char) * (FMT_LEG_LEN + 5))) == NULL) { - free(srcptr_list); - free(ref_list); - free(*data); - *data = NULL; - while (--j > -1) - free(legend_list[j]); - free(legend_list); - rrd_set_error("malloc xport legend entry"); - return (-1); - } - - if (im->gdes[i].legend) - /* omit bounds check, should have the same size */ - strcpy(legend_list[j++], im->gdes[i].legend); - else - legend_list[j++][0] = '\0'; + /* fill data structure */ + for (dst_row = 0; (int) dst_row < (int) row_cnt; dst_row++) { + for (i = 0; i < (int) (*col_cnt); i++) { + long vidx = im->gdes[ref_list[i]].vidx; + time_t now = *start + dst_row * *step; + (*dstptr++) = im->gdes[vidx].data[(unsigned long) + floor((double) + (now - im->gdes[vidx].start) + /im->gdes[vidx].step) + * im->gdes[vidx].ds_cnt + + im->gdes[vidx].ds]; - break; - default: - break; } } - /* fill data structure */ - for (dst_row = 0; (int) dst_row < (int) row_cnt; dst_row++) { - for (i = 0; i < (int) nof_xports; i++) { - j = ref_list[i]; - ii = im->gdes[j].vidx; - ds_cnt = &im->gdes[ii].ds_cnt; + *legend_v = legend_list; + free(ref_list); + return 0; - srcptr = srcptr_list[i]; - for (col = 0; col < (*ds_cnt); col++) { - rrd_value_t newval = DNAN; +} - newval = srcptr[col]; +int rrd_graph_xport(image_desc_t *im) { + /* prepare the data for processing */ + unsigned long col_cnt=0; + time_t start=im->start; + time_t end=im->end; + unsigned long step=im->step; + char **legend_v=NULL; + rrd_value_t *data=NULL; + /* initialize buffer */ + stringbuffer_t buffer={0,0,NULL,NULL}; - if (im->gdes[ii].ds_namv && im->gdes[ii].ds_nam) { - if (strcmp(im->gdes[ii].ds_namv[col], im->gdes[ii].ds_nam) - == 0) - (*dstptr++) = newval; - } else { - (*dstptr++) = newval; - } + /* check if we have a supported ggraph format */ + switch (im->graph_type) { + /* allow the following to pass */ + case GTYPE_TIME: + case GTYPE_XY: + break; + default: + rrd_set_error("Not supported graph type"); + return -1; + } - } - srcptr_list[i] += (*ds_cnt); - } + /* if we write a file, then open it */ + if (strlen(im->graphfile)) { + buffer.file=fopen(im->graphfile,"w"); + } + + /* do the data processing */ + if (rrd_xport_fn(im,&start,&end,&step,&col_cnt,&legend_v,&data,1)) { return -1;} + + /* fill in some data */ + rrd_infoval_t info; + info.u_cnt = start; + grinfo_push(im, sprintf_alloc("graph_start"), RD_I_CNT, info); + info.u_cnt = end; + grinfo_push(im, sprintf_alloc("graph_end"), RD_I_CNT, info); + info.u_cnt = step; + grinfo_push(im, sprintf_alloc("graph_step"), RD_I_CNT, info); + + /* set locale */ + char *old_locale = setlocale(LC_NUMERIC,NULL); + setlocale(LC_NUMERIC, "C"); + + /* format it for output */ + int r=0; + switch(im->imgformat) { + case IF_XML: + r=rrd_xport_format_xmljson(2,&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + case IF_XMLENUM: + r=rrd_xport_format_xmljson(6,&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + case IF_JSON: + r=rrd_xport_format_xmljson(1,&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + case IF_JSONTIME: + r=rrd_xport_format_xmljson(3,&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + case IF_CSV: + r=rrd_xport_format_sv(',',&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + case IF_TSV: + r=rrd_xport_format_sv('\t',&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + case IF_SSV: + r=rrd_xport_format_sv(';',&buffer,im, start, end, step, col_cnt, legend_v, data); + break; + default: + break; + } + /* restore locale */ + setlocale(LC_NUMERIC, old_locale); + /* handle errors */ + if (r) { + /* free legend */ + for (unsigned long j = 0; j < col_cnt; j++) { + free(legend_v[j]); } + free(legend_v); + /* free data */ + free(data); + /* free the bufer */ + if (buffer.data) {free(buffer.data);} + /* close the file */ + if (buffer.file) {fclose(buffer.file);} + /* and return with error */ + return r; + } - *legend_v = legend_list; - free(srcptr_list); - free(ref_list); - return 0; + /* now do the cleanup */ + if (buffer.file) { + fclose(buffer.file); buffer.file=NULL; + im->rendered_image_size=0; + im->rendered_image=NULL; + } else { + im->rendered_image_size=buffer.len; + im->rendered_image=buffer.data; + } + + /* and print stuff */ + return print_calc(im); +} + +int addToBuffer(stringbuffer_t * sb,char* data,size_t len) { + /* if len <= 0 we assume a string and calculate the length ourself */ + if (len<=0) { len=strlen(data); } + /* if we have got a file, then take the shortcut */ + if (sb->file) { + sb->len+=len; + fwrite(data,len,1,sb->file); + return 0; + } + /* if buffer is 0, then initialize */ + if (! sb->data) { + /* make buffer a multiple of 8192 */ + sb->allocated+=8192; + sb->allocated-=(sb->allocated%8192); + /* and allocate it */ + sb->data=malloc(sb->allocated); + if (! sb->data) { + rrd_set_error("malloc issue"); + return 1; + } + /* and initialize the buffer */ + sb->len=0; + sb->data[0]=0; + } + /* and figure out if we need to extend the buffer */ + if (sb->len+len+1>=sb->allocated) { + /* add so many pages until we have a buffer big enough */ + while(sb->len+len+1>=sb->allocated) { + sb->allocated+=8192; + } + /* try to resize it */ + unsigned char* resized=(unsigned char*)realloc(sb->data,sb->allocated); + if (resized) { + sb->data=resized; + } else { + free(sb->data); + sb->data=NULL; + sb->allocated=0; + rrd_set_error("realloc issue"); + return -1; + } + } + /* and finally add to the buffer */ + memcpy(sb->data+sb->len,data,len); + sb->len+=len; + /* and 0 terminate it */ + sb->data[sb->len]=0; + /* and return */ + return 0; +} + +int rrd_xport_format_sv(char sep, stringbuffer_t *buffer,image_desc_t *im,time_t start, time_t end, unsigned long step, unsigned long col_cnt, char **legend_v, rrd_value_t* data) { + /* define the time format */ + char* timefmt=NULL; + if (im->xlab_user.minsec!=-1) { timefmt=im->xlab_user.stst; } + + /* row count */ + unsigned long row_cnt=(end-start)/step; + + /* estimate buffer size (to avoid multiple allocations) */ + buffer->allocated= + 1024 /* bytes of overhead /header/footer */ + +(12+19*col_cnt) /* 12 bytes overhead/line plus 19 bytes per column*/ + *(1+row_cnt) /* number of columns + 1 (for header) */ + ; + + char buf[256]; + + /* now start writing the header*/ + if (addToBuffer(buffer,"\"time\"",6)) { return 1; } + for(unsigned long i=0;ixlab_user.minsec!=-1) { timefmt=im->xlab_user.stst; } + + /* row count */ + unsigned long row_cnt=(end-start)/step; + + /* estimate buffer size (to avoid multiple allocations) */ + /* better estimates are needed here */ + buffer->allocated= + 1024 /* bytes of overhead /header/footer */ + +(12+19*col_cnt) /* 12 bytes overhead/line plus 19 bytes per column*/ + *(1+row_cnt) /* number of columns + 1 (for header) */ + ; + char buf[256]; + char dbuf[1024]; + + rrd_value_t *ptr = data; + if (json == 0){ + snprintf(buf,sizeof(buf), + "\n\n<%s>\n <%s>\n", + XML_ENCODING,ROOT_TAG,META_TAG); + addToBuffer(buffer,buf,0); + } + else { + addToBuffer(buffer,"{ \"about\": \"RRDtool graph JSON output\",\n \"meta\": {\n",0); + } + + /* calculate start time */ + if (timefmt) { + struct tm loc; + time_t ti=start+step; + localtime_r(&ti,&loc); + strftime(dbuf,sizeof(dbuf),timefmt,&loc); + if (json) { + snprintf(buf,sizeof(buf)," \"%s\": \"%s\",\n",META_START_TAG,dbuf); + } else { + snprintf(buf,sizeof(buf)," <%s>%s\n",META_START_TAG,dbuf,META_START_TAG); + } + } else { + if (json) { + snprintf(buf,sizeof(buf)," \"%s\": %lld,\n",META_START_TAG,(long long int)start+step); + } else { + snprintf(buf,sizeof(buf)," <%s>%lld\n",META_START_TAG,(long long int)start+step,META_START_TAG); + } + } + addToBuffer(buffer,buf,0); + + /* calculate end time */ + if (timefmt) { + struct tm loc; + time_t ti=end; + localtime_r(&ti,&loc); + strftime(dbuf,sizeof(dbuf),timefmt,&loc); + if (json) { + snprintf(buf,sizeof(buf)," \"%s\": \"%s\",\n",META_END_TAG,dbuf); + } else { + snprintf(buf,sizeof(buf)," <%s>%s\n",META_END_TAG,dbuf,META_END_TAG); + } + } else { + if (json) { + snprintf(buf,sizeof(buf)," \"%s\": %lld,\n",META_END_TAG,(long long int)end); + } else { + snprintf(buf,sizeof(buf)," <%s>%lld\n",META_END_TAG,(long long int)end,META_END_TAG); + } + } + addToBuffer(buffer,buf,0); + /* print other info */ + if (json) { + snprintf(buf,sizeof(buf)," \"%s\": %lld,\n",META_STEP_TAG,(long long int)step); + addToBuffer(buffer,buf,0); + } else { + snprintf(buf,sizeof(buf)," <%s>%lld\n",META_STEP_TAG,(long long int)step,META_STEP_TAG); + addToBuffer(buffer,buf,0); + snprintf(buf,sizeof(buf)," <%s>%lu\n",META_ROWS_TAG,row_cnt,META_ROWS_TAG); + addToBuffer(buffer,buf,0); + snprintf(buf,sizeof(buf)," <%s>%lu\n",META_COLS_TAG,col_cnt,META_COLS_TAG); + addToBuffer(buffer,buf,0); + } + + /* start legend */ + if (json){ + snprintf(buf,sizeof(buf)," \"%s\": [\n", LEGEND_TAG); + } + else { + snprintf(buf,sizeof(buf)," <%s>\n", LEGEND_TAG); + } + addToBuffer(buffer,buf,0); + /* add legend entries */ + for (unsigned long j = 0; j < col_cnt; j++) { + char *entry = legend_v[j]; + /* I do not know why the legend is "spaced", but let us skip it */ + while(isspace(*entry)){entry++;} + /* now output it */ + if (json){ + snprintf(buf,sizeof(buf)," \"%s\"", entry); + addToBuffer(buffer,buf,0); + if (j < col_cnt -1){ + addToBuffer(buffer,",",1); + } + addToBuffer(buffer,"\n",1); + } + else { + snprintf(buf,sizeof(buf)," <%s>%s\n", LEGEND_ENTRY_TAG, entry,LEGEND_ENTRY_TAG); + addToBuffer(buffer,buf,0); + } + } + /* end legend */ + if (json){ + snprintf(buf,sizeof(buf)," ],\n"); + } + else { + snprintf(buf,sizeof(buf)," \n", LEGEND_TAG); + } + addToBuffer(buffer,buf,0); + + /* add graphs and prints */ + if (rrd_xport_format_addprints(json,buffer,im)) {return -1;} + + /* if we have got a trailing , then kill it */ + if (buffer->data) { + if (buffer->data[buffer->len-2]==',') { + buffer->data[buffer->len-2]=buffer->data[buffer->len-1]; + buffer->len--; + } + } + + /* end meta */ + if (json){ + snprintf(buf,sizeof(buf)," },\n"); + } else { + snprintf(buf,sizeof(buf)," \n", META_TAG); + } + addToBuffer(buffer,buf,0); + + + /* start data */ + if (json){ + snprintf(buf,sizeof(buf)," \"%s\": [\n",DATA_TAG); + } else { + snprintf(buf,sizeof(buf)," <%s>\n", DATA_TAG); + } + addToBuffer(buffer,buf,0); + /* iterate over data */ + for (time_t ti = start + step; ti <= end; ti += step) { + if (timefmt) { + struct tm loc; + localtime_r(&ti,&loc); + strftime(dbuf,sizeof(dbuf),timefmt,&loc); + } else { + snprintf(dbuf,sizeof(dbuf),"%lld",(long long int)ti); + } + if (json){ + addToBuffer(buffer," [ ",0); + if(showtime){ + addToBuffer(buffer,"\"",1); + addToBuffer(buffer,dbuf,0); + addToBuffer(buffer,"\",",2); + } + } + else { + if (showtime) { + snprintf(buf,sizeof(buf), + " <%s><%s>%s", DATA_ROW_TAG,COL_TIME_TAG, dbuf, COL_TIME_TAG); + } else { + snprintf(buf,sizeof(buf), + " <%s>", DATA_ROW_TAG); + } + addToBuffer(buffer,buf,0); + } + for (unsigned long j = 0; j < col_cnt; j++) { + rrd_value_t newval = DNAN; + newval = *ptr; + if (json){ + if (isnan(newval)){ + addToBuffer(buffer,"null",0); + } else { + snprintf(buf,sizeof(buf),"%0.10e",newval); + addToBuffer(buffer,buf,0); + } + if (j < col_cnt -1){ + addToBuffer(buffer,", ",0); + } + } + else { + if (isnan(newval)) { + if (enumds) { + snprintf(buf,sizeof(buf),"<%s%lu>NaN", COL_DATA_TAG,j,COL_DATA_TAG,j); + } else { + snprintf(buf,sizeof(buf),"<%s>NaN", COL_DATA_TAG,COL_DATA_TAG); + } + } else { + if (enumds) { + snprintf(buf,sizeof(buf),"<%s%lu>%0.10e", COL_DATA_TAG,j,newval,COL_DATA_TAG,j); + } else { + snprintf(buf,sizeof(buf),"<%s>%0.10e", COL_DATA_TAG,newval,COL_DATA_TAG); + } + } + addToBuffer(buffer,buf,0); + } + ptr++; + } + if (json){ + addToBuffer(buffer,(ti < end ? " ],\n" : " ]\n"),0); + } + else { + snprintf(buf,sizeof(buf),"\n", DATA_ROW_TAG); + addToBuffer(buffer,buf,0); + } + } + /* end data */ + if (json){ + addToBuffer(buffer," ]\n",0); + } + else { + snprintf(buf,sizeof(buf)," \n",DATA_TAG); + addToBuffer(buffer,buf,0); + } + + /* end all */ + if (json){ + addToBuffer(buffer,"}\n",0); + } else { + snprintf(buf,sizeof(buf),"\n", ROOT_TAG); + addToBuffer(buffer,buf,0); + } + return 0; +} + +void escapeJSON(char* txt,size_t len) { + char *tmp=(char*)malloc(len+2); + size_t l=strlen(txt); + size_t pos=0; + /* now iterate over the chars */ + for(size_t i=0;(ixlab_user.minsec!=-1) { timefmt=im->xlab_user.stst; } + + /* define some other stuff based on flags */ + int json=0; + if (flags &1) { json=1; } + int showtime=0; + if (flags &2) { showtime=1;} + int enumds=0; + if (flags &4) { enumds=1;} + + /* define some values */ + time_t now = time(NULL); + struct tm tmvdef; + localtime_r(&now, &tmvdef); + double printval=DNAN; + + /* iterate over all fields and start the work writing to the correct buffers */ + for (long i = 0; i < im->gdes_c; i++) { + long vidx = im->gdes[i].vidx; + char* entry; + switch (im->gdes[i].gf) { + case GF_PRINT: + case GF_GPRINT: + /* PRINT and GPRINT can now print VDEF generated values. + * There's no need to do any calculations on them as these + * calculations were already made. + * we do not support the depreciated version here + */ + printval=DNAN; + /* decide to which buffer we print to*/ + stringbuffer_t *usebuffer=&gprints; + char* usetag="gprint"; + if (im->gdes[i].gf==GF_PRINT) { + usebuffer=&prints; + usetag="print"; + } + /* get the value */ + if (im->gdes[vidx].gf == GF_VDEF) { /* simply use vals */ + printval = im->gdes[vidx].vf.val; + localtime_r(&im->gdes[vidx].vf.when, &tmvdef); + } else { + int max_ii = ((im->gdes[vidx].end - im->gdes[vidx].start) + / im->gdes[vidx].step * im->gdes[vidx].ds_cnt); + printval = DNAN; + long validsteps = 0; + for (long ii = im->gdes[vidx].ds; + ii < max_ii; ii += im->gdes[vidx].ds_cnt) { + if (!finite(im->gdes[vidx].data[ii])) + continue; + if (isnan(printval)) { + printval = im->gdes[vidx].data[ii]; + validsteps++; + continue; + } + + switch (im->gdes[i].cf) { + case CF_HWPREDICT: + case CF_MHWPREDICT: + case CF_DEVPREDICT: + case CF_DEVSEASONAL: + case CF_SEASONAL: + case CF_AVERAGE: + validsteps++; + printval += im->gdes[vidx].data[ii]; + break; + case CF_MINIMUM: + printval = min(printval, im->gdes[vidx].data[ii]); + break; + case CF_FAILURES: + case CF_MAXIMUM: + printval = max(printval, im->gdes[vidx].data[ii]); + break; + case CF_LAST: + printval = im->gdes[vidx].data[ii]; + } + } + if (im->gdes[i].cf == CF_AVERAGE || im->gdes[i].cf > CF_LAST) { + if (validsteps > 1) { + printval = (printval / validsteps); + } + } + } + /* we handle PRINT and GPRINT the same - format now*/ + if (im->gdes[i].strftm) { + if (im->gdes[vidx].vf.never == 1) { + time_clean(buf, im->gdes[i].format); + } else { + strftime(dbuf,sizeof(dbuf), im->gdes[i].format, &tmvdef); + } + } else if (bad_format(im->gdes[i].format)) { + rrd_set_error + ("bad format for PRINT in \"%s'", im->gdes[i].format); + return -1; + } else { + snprintf(dbuf,sizeof(dbuf), im->gdes[i].format, printval,""); + } + /* print */ + if (json) { + escapeJSON(dbuf,sizeof(dbuf)); + snprintf(buf,sizeof(buf),",\n { \"%s\": \"%s\" }",usetag,dbuf); + } else { + snprintf(buf,sizeof(buf)," <%s>%s\n",usetag,dbuf,usetag); + } + addToBuffer(usebuffer,buf,0); + break; + case GF_COMMENT: + if (json) { + strncpy(dbuf,im->gdes[i].legend,sizeof(dbuf)); + escapeJSON(dbuf,sizeof(dbuf)); + snprintf(buf,sizeof(buf),",\n { \"comment\": \"%s\" }",dbuf); + } else { + snprintf(buf,sizeof(buf)," %s\n",im->gdes[i].legend); + } + addToBuffer(&gprints,buf,0); + break; + case GF_LINE: + entry = im->gdes[i].legend; + /* I do not know why the legend is "spaced", but let us skip it */ + while(isspace(*entry)){entry++;} + if (json) { + snprintf(buf,sizeof(buf),",\n { \"line\": \"%s\" }",entry); + } else { + snprintf(buf,sizeof(buf)," %s\n",entry); + } + addToBuffer(&gprints,buf,0); + break; + case GF_AREA: + if (json) { + snprintf(buf,sizeof(buf),",\n { \"area\": \"%s\" }",im->gdes[i].legend); + } else { + snprintf(buf,sizeof(buf)," %s\n",im->gdes[i].legend); + } + addToBuffer(&gprints,buf,0); + break; + case GF_STACK: + if (json) { + snprintf(buf,sizeof(buf),",\n { \"stack\": \"%s\" }",im->gdes[i].legend); + } else { + snprintf(buf,sizeof(buf)," %s\n",im->gdes[i].legend); + } + addToBuffer(&gprints,buf,0); + break; + case GF_TEXTALIGN: + val=""; + switch (im->gdes[i].txtalign) { + case TXA_LEFT: val="left"; break; + case TXA_RIGHT: val="right"; break; + case TXA_CENTER: val="center"; break; + case TXA_JUSTIFIED: val="justified"; break; + } + if (json) { + snprintf(buf,sizeof(buf),",\n { \"align\": \"%s\" }",val); + } else { + snprintf(buf,sizeof(buf)," %s\n",val); + } + addToBuffer(&gprints,buf,0); + break; + case GF_HRULE: + /* This does not work as expected - Tobi please help!!! */ + snprintf(dbuf,sizeof(dbuf),"%0.10e",im->gdes[i].vf.val); + /* and output it */ + if (json) { + snprintf(buf,sizeof(buf),",\n { \"hrule\": \"%s\" }",dbuf); + } else { + snprintf(buf,sizeof(buf)," %s\n",dbuf); + } + addToBuffer(&rules,buf,0); + break; + case GF_VRULE: + if (timefmt) { + struct tm loc; + localtime_r(&im->gdes[i].xrule,&loc); + strftime(dbuf,254,timefmt,&loc); + } else { + snprintf(dbuf,254,"%lld",(long long int)im->gdes[i].vf.when); + } + /* and output it */ + if (json) { + snprintf(buf,sizeof(buf),",\n { \"vrule\": \"%s\" }",dbuf); + } else { + snprintf(buf,sizeof(buf)," %s\n",dbuf); + } + addToBuffer(&rules,buf,0); + break; + default: + break; + } + } + /* now add prints */ + if (prints.len) { + if (json){ + snprintf(buf,sizeof(buf)," \"%s\": [\n","prints"); + addToBuffer(buffer,buf,0); + addToBuffer(buffer,(char*)prints.data+2,prints.len-2); + addToBuffer(buffer,"\n ],\n",0); + } else { + snprintf(buf,sizeof(buf)," <%s>\n", "prints"); + addToBuffer(buffer,buf,0); + addToBuffer(buffer,(char*)prints.data,prints.len); + snprintf(buf,sizeof(buf)," \n", "prints"); + addToBuffer(buffer,buf,0); + } + free(prints.data); + } + /* now add gprints */ + if (gprints.len) { + if (json){ + snprintf(buf,sizeof(buf)," \"%s\": [\n","gprints"); + addToBuffer(buffer,buf,0); + addToBuffer(buffer,(char*)gprints.data+2,gprints.len-2); + addToBuffer(buffer,"\n ],\n",0); + } else { + snprintf(buf,sizeof(buf)," <%s>\n", "gprints"); + addToBuffer(buffer,buf,0); + addToBuffer(buffer,(char*)gprints.data,gprints.len); + snprintf(buf,sizeof(buf)," \n", "gprints"); + addToBuffer(buffer,buf,0); + } + free(gprints.data); + } + /* now add rules */ + if (rules.len) { + if (json){ + snprintf(buf,sizeof(buf)," \"%s\": [\n","rules"); + addToBuffer(buffer,buf,0); + addToBuffer(buffer,(char*)rules.data+2,rules.len-2); + addToBuffer(buffer,"\n ],\n",0); + } else { + snprintf(buf,sizeof(buf)," <%s>\n", "rules"); + addToBuffer(buffer,buf,0); + addToBuffer(buffer,(char*)rules.data,rules.len); + snprintf(buf,sizeof(buf)," \n", "rules"); + addToBuffer(buffer,buf,0); + } + free(rules.data); + } + /* and return */ + return 0; }