Move the timeseries serialize to the timeseries module.

[sysdb.git] / src / core / timeseries.c

diff --git a/src/core/timeseries.c b/src/core/timeseries.c
index 48da7f8dab9e47a4ad12b77f8df65bf39fc117bc..2c5537dbc5838528ec60b15994c4a029777f1ecd 100644 (file)
--- a/src/core/timeseries.c
+++ b/src/core/timeseries.c
@@ -33,11 +33,54 @@
 #include "core/timeseries.h"
 
 #include <stdlib.h>
+#include <string.h>
+#include <math.h>
 
 /*
  * public API
  */
 
+sdb_timeseries_t *
+sdb_timeseries_create(size_t data_names_len, const char * const *data_names,
+               size_t data_len)
+{
+       sdb_timeseries_t *ts;
+       size_t i;
+
+       ts = calloc(1, sizeof(*ts));
+       if (! ts)
+               return NULL;
+
+       ts->data = calloc(data_names_len, sizeof(*ts->data));
+       if (! ts->data) {
+               sdb_timeseries_destroy(ts);
+               return NULL;
+       }
+       ts->data_names_len = data_names_len;
+       for (i = 0; i < data_names_len; ++i) {
+               ts->data[i] = calloc(data_len, sizeof(**ts->data));
+               if (! ts->data[i]) {
+                       sdb_timeseries_destroy(ts);
+                       return NULL;
+               }
+       }
+       ts->data_len = data_len;
+
+       ts->data_names = calloc(data_names_len, sizeof(*ts->data_names));
+       if (! ts->data_names) {
+               sdb_timeseries_destroy(ts);
+               return NULL;
+       }
+       for (i = 0; i < data_names_len; ++i) {
+               ts->data_names[i] = strdup(data_names[i]);
+               if (! ts->data_names[i]) {
+                       sdb_timeseries_destroy(ts);
+                       return NULL;
+               }
+       }
+       return ts;
+} /* sdb_timeseries_create */
+
 void
 sdb_timeseries_destroy(sdb_timeseries_t *ts)
 {
@@ -46,21 +89,82 @@ sdb_timeseries_destroy(sdb_timeseries_t *ts)
        if (! ts)
                return;
 
-       if (ts->data)
+       if (ts->data) {
+               for (i = 0; i < ts->data_names_len; ++i) {
+                       if (ts->data[i])
+                               free(ts->data[i]);
+                       ts->data[i] = NULL;
+               }
                free(ts->data);
+       }
        ts->data = NULL;
        ts->data_len = 0;
 
-       for (i = 0; i < ts->data_names_len; ++i) {
-               if (ts->data_names[i])
-                       free(ts->data_names[i]);
-               ts->data_names[i] = NULL;
-       }
-       if (ts->data_names)
+       if (ts->data_names) {
+               for (i = 0; i < ts->data_names_len; ++i) {
+                       if (ts->data_names[i])
+                               free(ts->data_names[i]);
+                       ts->data_names[i] = NULL;
+               }
                free(ts->data_names);
+       }
        ts->data_names = NULL;
        ts->data_names_len = 0;
+       free(ts);
 } /* sdb_timeseries_destroy */
 
+int
+sdb_timeseries_tojson(sdb_timeseries_t *ts, sdb_strbuf_t *buf)
+{
+       char start_str[64];
+       char end_str[64];
+
+       size_t i;
+
+       if ((! ts) || (! buf))
+               return -1;
+
+       /* TODO: make time format configurable */
+       if (! sdb_strftime(start_str, sizeof(start_str), ts->start))
+               snprintf(start_str, sizeof(start_str), "<error>");
+       start_str[sizeof(start_str) - 1] = '\0';
+       if (! sdb_strftime(end_str, sizeof(end_str), ts->end))
+               snprintf(end_str, sizeof(end_str), "<error>");
+       end_str[sizeof(end_str) - 1] = '\0';
+
+       sdb_strbuf_append(buf, "{\"start\": \"%s\", \"end\": \"%s\", \"data\": {",
+                       start_str, end_str);
+
+       for (i = 0; i < ts->data_names_len; ++i) {
+               size_t j;
+               sdb_strbuf_append(buf, "\"%s\": [", ts->data_names[i]);
+
+               for (j = 0; j < ts->data_len; ++j) {
+                       char time_str[64];
+
+                       if (! sdb_strftime(time_str, sizeof(time_str), ts->data[i][j].timestamp))
+                               snprintf(time_str, sizeof(time_str), "<error>");
+                       time_str[sizeof(time_str) - 1] = '\0';
+
+                       /* Some GNU libc versions may print '-nan' which we dont' want */
+                       if (isnan(ts->data[i][j].value))
+                               sdb_strbuf_append(buf, "{\"timestamp\": \"%s\", "
+                                               "\"value\": \"nan\"}", time_str);
+                       else
+                               sdb_strbuf_append(buf, "{\"timestamp\": \"%s\", "
+                                               "\"value\": \"%f\"}", time_str, ts->data[i][j].value);
+
+                       if (j < ts->data_len - 1)
+                               sdb_strbuf_append(buf, ",");
+               }
+
+               if (i < ts->data_names_len - 1)
+                       sdb_strbuf_append(buf, "],");
+               else
+                       sdb_strbuf_append(buf, "]");
+       }
+       sdb_strbuf_append(buf, "}}");
+       return 0;
+} /* sdb_timeseries_tojson */
 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */