+ /* 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;i<col_cnt;i++) {
+ /* strip leading spaces */
+ char *t=legend_v[i]; while (isspace(*t)) { t++;}
+ /* and print it */
+ snprintf(buf,255,"%c\"%s\"",sep,t);
+ if (addToBuffer(buffer,buf,0)) { return 1;}
+ }
+ if (addToBuffer(buffer,"\r\n",2)) { return 1; }
+ /* and now write the data */
+ rrd_value_t *ptr=data;
+ for(time_t ti=start+step;ti<end;ti+=step) {
+ /* write time */
+ if (timefmt) {
+ struct tm loc;
+ localtime_r(&ti,&loc);
+ strftime(buf,254,timefmt,&loc);
+ } else {
+ snprintf(buf,254,"%lld",(long long int)ti);
+ }
+ if (addToBuffer(buffer,buf,0)) { return 1; }
+ /* write the columns */
+ for(unsigned long i=0;i<col_cnt;i++) {
+ /* get the value */
+ rrd_value_t v=*ptr;ptr++;
+ /* and print it */
+ if (isnan(v)) {
+ snprintf(buf,255,"%c\"NaN\"",sep);
+ } else {
+ snprintf(buf,255,"%c\"%0.10e\"",sep,v);
+ }
+ if (addToBuffer(buffer,buf,0)) { return 1;}
+ }
+ /* and add a newline */
+ if (addToBuffer(buffer,"\r\n",2)) { return 1; }
+ }
+
+ /* and return OK */
+ return 0;
+}
+
+int rrd_xport_format_xmljson(int flags,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 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 the time format */
+ char* timefmt=NULL;
+ /* unfortunatley we have to do it this way,
+ as when no --x-graph argument is given,
+ then the xlab_user is not in a clean state (e.g. zero-filled) */
+ 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) */
+ /* 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),
+ "<?xml version=\"1.0\" encoding=\"%s\"?>\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</%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</%s>\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</%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</%s>\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</%s>\n",META_STEP_TAG,(long long int)step,META_STEP_TAG);
+ addToBuffer(buffer,buf,0);
+ snprintf(buf,sizeof(buf)," <%s>%lu</%s>\n",META_ROWS_TAG,row_cnt,META_ROWS_TAG);
+ addToBuffer(buffer,buf,0);
+ snprintf(buf,sizeof(buf)," <%s>%lu</%s>\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</%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)," </%s>\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)," </%s>\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</%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</%s%lu>", COL_DATA_TAG,j,COL_DATA_TAG,j);