src/utils_format_json.c

   1 /**
   2  * collectd - src/utils_format_json.c
   3  * Copyright (C) 2009  Florian octo Forster
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the
   7  * Free Software Foundation; only version 2 of the License is applicable.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  17  *
  18  * Authors:
  19  *   Florian octo Forster <octo at verplant.org>
  20  **/
  21
  22 #include "collectd.h"
  23 #include "plugin.h"
  24 #include "common.h"
  25
  26 #include "utils_format_json.h"
  27
  28 static int escape_string (char *buffer, size_t buffer_size, /* {{{ */
  29     const char *string)
  30 {
  31   size_t src_pos;
  32   size_t dst_pos;
  33
  34   if ((buffer == NULL) || (string == NULL))
  35     return (-EINVAL);
  36
  37   if (buffer_size < 3)
  38     return (-ENOMEM);
  39
  40   dst_pos = 0;
  41
  42 #define BUFFER_ADD(c) do { \
  43   if (dst_pos >= (buffer_size - 1)) { \
  44     buffer[buffer_size - 1] = 0; \
  45     return (-ENOMEM); \
  46   } \
  47   buffer[dst_pos] = (c); \
  48   dst_pos++; \
  49 } while (0)
  50
  51   /* Escape special characters */
  52   BUFFER_ADD ('"');
  53   for (src_pos = 0; string[src_pos] != 0; src_pos++)
  54   {
  55     if ((string[src_pos] == '"')
  56         || (string[src_pos] == '\\'))
  57     {
  58       BUFFER_ADD ('\\');
  59       BUFFER_ADD (string[src_pos]);
  60     }
  61     else if (string[src_pos] <= 0x001F)
  62       BUFFER_ADD ('?');
  63     else
  64       BUFFER_ADD (string[src_pos]);
  65   } /* for */
  66   BUFFER_ADD ('"');
  67   buffer[dst_pos] = 0;
  68
  69 #undef BUFFER_ADD
  70
  71   return (0);
  72 } /* }}} int buffer_add_string */
  73
  74 static int values_to_json (char *buffer, size_t buffer_size, /* {{{ */
  75                 const data_set_t *ds, const value_list_t *vl)
  76 {
  77   size_t offset = 0;
  78   int i;
  79
  80   memset (buffer, 0, buffer_size);
  81
  82 #define BUFFER_ADD(...) do { \
  83   int status; \
  84   status = ssnprintf (buffer + offset, buffer_size - offset, \
  85       __VA_ARGS__); \
  86   if (status < 1) \
  87     return (-1); \
  88   else if (((size_t) status) >= (buffer_size - offset)) \
  89     return (-ENOMEM); \
  90   else \
  91   offset += ((size_t) status); \
  92 } while (0)
  93
  94   BUFFER_ADD ("[");
  95   for (i = 0; i < ds->ds_num; i++)
  96   {
  97     if (i > 0)
  98       BUFFER_ADD (",");
  99
 100     if (ds->ds[i].type == DS_TYPE_GAUGE)
 101       BUFFER_ADD ("%g", vl->values[i].gauge);
 102     else if (ds->ds[i].type == DS_TYPE_COUNTER)
 103       BUFFER_ADD ("%llu", vl->values[i].counter);
 104     else if (ds->ds[i].type == DS_TYPE_DERIVE)
 105       BUFFER_ADD ("%"PRIi64, vl->values[i].derive);
 106     else if (ds->ds[i].type == DS_TYPE_ABSOLUTE)
 107       BUFFER_ADD ("%"PRIu64, vl->values[i].absolute);
 108     else
 109     {
 110       ERROR ("format_json: Unknown data source type: %i",
 111           ds->ds[i].type);
 112       return (-1);
 113     }
 114   } /* for ds->ds_num */
 115   BUFFER_ADD ("]");
 116
 117 #undef BUFFER_ADD
 118
 119   DEBUG ("format_json: values_to_json: buffer = %s;", buffer);
 120
 121   return (0);
 122 } /* }}} int values_to_json */
 123
 124 static int value_list_to_json (char *buffer, size_t buffer_size, /* {{{ */
 125                 const data_set_t *ds, const value_list_t *vl)
 126 {
 127   char temp[512];
 128   size_t offset = 0;
 129   int status;
 130
 131   memset (buffer, 0, buffer_size);
 132
 133 #define BUFFER_ADD(...) do { \
 134   status = ssnprintf (buffer + offset, buffer_size - offset, \
 135       __VA_ARGS__); \
 136   if (status < 1) \
 137     return (-1); \
 138   else if (((size_t) status) >= (buffer_size - offset)) \
 139     return (-ENOMEM); \
 140   else \
 141     offset += ((size_t) status); \
 142 } while (0)
 143
 144   /* All value lists have a leading comma. The first one will be replaced with
 145    * a square bracket in `format_json_finalize'. */
 146   BUFFER_ADD (",{");
 147
 148   status = values_to_json (temp, sizeof (temp), ds, vl);
 149   if (status != 0)
 150     return (status);
 151   BUFFER_ADD ("\"values\":%s", temp);
 152
 153   BUFFER_ADD (",\"time\":%lu", (unsigned long) vl->time);
 154   BUFFER_ADD (",\"interval\":%i", vl->interval);
 155
 156 #define BUFFER_ADD_KEYVAL(key, value) do { \
 157   status = escape_string (temp, sizeof (temp), (value)); \
 158   if (status != 0) \
 159     return (status); \
 160   BUFFER_ADD (",\"%s\":%s", (key), temp); \
 161 } while (0)
 162
 163   BUFFER_ADD_KEYVAL ("host", vl->host);
 164   BUFFER_ADD_KEYVAL ("plugin", vl->plugin);
 165   BUFFER_ADD_KEYVAL ("plugin_instance", vl->plugin_instance);
 166   BUFFER_ADD_KEYVAL ("type", vl->type);
 167   BUFFER_ADD_KEYVAL ("type_instance", vl->type_instance);
 168
 169   BUFFER_ADD ("}");
 170
 171 #undef BUFFER_ADD_KEYVAL
 172 #undef BUFFER_ADD
 173
 174   DEBUG ("format_json: value_list_to_json: buffer = %s;", buffer);
 175
 176   return (0);
 177 } /* }}} int value_list_to_json */
 178
 179 static int format_json_value_list_nocheck (char *buffer, /* {{{ */
 180     size_t *ret_buffer_fill, size_t *ret_buffer_free,
 181     const data_set_t *ds, const value_list_t *vl,
 182     size_t temp_size)
 183 {
 184   char temp[temp_size];
 185   int status;
 186
 187   status = value_list_to_json (temp, sizeof (temp), ds, vl);
 188   if (status != 0)
 189     return (status);
 190   temp_size = strlen (temp);
 191
 192   memcpy (buffer + (*ret_buffer_fill), temp, temp_size + 1);
 193   (*ret_buffer_fill) += temp_size;
 194   (*ret_buffer_free) -= temp_size;
 195
 196   return (0);
 197 } /* }}} int format_json_value_list_nocheck */
 198
 199 int format_json_initialize (char *buffer, /* {{{ */
 200     size_t *ret_buffer_fill, size_t *ret_buffer_free)
 201 {
 202   size_t buffer_fill;
 203   size_t buffer_free;
 204
 205   if ((buffer == NULL) || (ret_buffer_fill == NULL) || (ret_buffer_free == NULL))
 206     return (-EINVAL);
 207
 208   buffer_fill = *ret_buffer_fill;
 209   buffer_free = *ret_buffer_free;
 210
 211   buffer_free = buffer_fill + buffer_free;
 212   buffer_fill = 0;
 213
 214   if (buffer_free < 3)
 215     return (-ENOMEM);
 216
 217   memset (buffer, 0, buffer_free);
 218   *ret_buffer_fill = buffer_fill;
 219   *ret_buffer_free = buffer_free;
 220
 221   return (0);
 222 } /* }}} int format_json_initialize */
 223
 224 int format_json_finalize (char *buffer, /* {{{ */
 225     size_t *ret_buffer_fill, size_t *ret_buffer_free)
 226 {
 227   size_t pos;
 228
 229   if ((buffer == NULL) || (ret_buffer_fill == NULL) || (ret_buffer_free == NULL))
 230     return (-EINVAL);
 231
 232   if (*ret_buffer_free < 2)
 233     return (-ENOMEM);
 234
 235   /* Replace the leading comma added in `value_list_to_json' with a square
 236    * bracket. */
 237   if (buffer[0] != ',')
 238     return (-EINVAL);
 239   buffer[0] = '[';
 240
 241   pos = *ret_buffer_fill;
 242   buffer[pos] = ']';
 243   buffer[pos+1] = 0;
 244
 245   (*ret_buffer_fill)++;
 246   (*ret_buffer_free)--;
 247
 248   return (0);
 249 } /* }}} int format_json_finalize */
 250
 251 int format_json_value_list (char *buffer, /* {{{ */
 252     size_t *ret_buffer_fill, size_t *ret_buffer_free,
 253     const data_set_t *ds, const value_list_t *vl)
 254 {
 255   if ((buffer == NULL)
 256       || (ret_buffer_fill == NULL) || (ret_buffer_free == NULL)
 257       || (ds == NULL) || (vl == NULL))
 258     return (-EINVAL);
 259
 260   if (*ret_buffer_free < 3)
 261     return (-ENOMEM);
 262
 263   return (format_json_value_list_nocheck (buffer,
 264         ret_buffer_fill, ret_buffer_free, ds, vl,
 265         (*ret_buffer_free) - 2));
 266 } /* }}} int format_json_value_list */
 267
 268 /* vim: set sw=2 sts=2 et fdm=marker : */