#include "utils_cache.h"
#include "utils_parse_option.h"
+#if HAVE_PTHREAD_H
+# include <pthread.h>
+#endif
+
#include <curl/curl.h>
/*
*/
static const char *config_keys[] =
{
- "Location", "User", "Password"
+ "URL", "User", "Password"
};
static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
char *pass;
char *credentials;
-static int http_init_curl(CURL *curl, char curl_errbuf[])
-{
- struct curl_slist *headers=NULL;
-
- curl_easy_setopt (curl, CURLOPT_USERAGENT, PACKAGE_NAME"/"PACKAGE_VERSION);
+CURL *curl;
+char curl_errbuf[CURL_ERROR_SIZE];
- headers = curl_slist_append(headers, "Accept: text/csv");
- headers = curl_slist_append(headers, "Content-Type: text/csv");
- curl_easy_setopt (curl, CURLOPT_HTTPHEADER, headers);
+#define SEND_BUFFER_SIZE 4096
+static char send_buffer[SEND_BUFFER_SIZE];
+static int send_buffer_fill;
- curl_easy_setopt (curl, CURLOPT_FORBID_REUSE, 1);
+static pthread_mutex_t send_lock = PTHREAD_MUTEX_INITIALIZER;
- curl_easy_setopt (curl, CURLOPT_ERRORBUFFER, curl_errbuf);
- curl_easy_setopt (curl, CURLOPT_URL, location);
+static int http_init(void) /* {{{ */
+{
- if (user != NULL)
- {
- size_t credentials_size;
+ curl = curl_easy_init ();
- credentials_size = strlen (user) + 2;
- if (pass != NULL)
- credentials_size += strlen (pass);
+ if (curl == NULL)
+ {
+ ERROR ("curl plugin: curl_easy_init failed.");
+ return (-1);
+ }
- credentials = (char *) malloc (credentials_size);
- if (credentials == NULL)
- {
- ERROR ("curl plugin: malloc failed.");
- return (-1);
- }
+ struct curl_slist *headers=NULL;
- ssnprintf (credentials, credentials_size, "%s:%s",
- user, (pass == NULL) ? "" : pass);
- curl_easy_setopt (curl, CURLOPT_USERPWD, credentials);
- curl_easy_setopt (curl, CURLOPT_HTTPAUTH, CURLAUTH_DIGEST);
- }
+ curl_easy_setopt (curl, CURLOPT_USERAGENT, PACKAGE_NAME"/"PACKAGE_VERSION);
- return (0);
-}
+ headers = curl_slist_append(headers, "Accept: */*");
+ headers = curl_slist_append(headers, "Content-Type: text/plain");
+ curl_easy_setopt (curl, CURLOPT_HTTPHEADER, headers);
-static int http_init(void)
-{
- return (0);
-}
+ curl_easy_setopt (curl, CURLOPT_ERRORBUFFER, curl_errbuf);
+ curl_easy_setopt (curl, CURLOPT_URL, location);
-static int value_list_to_string (char *buffer, int buffer_len,
- const data_set_t *ds, const value_list_t *vl, int index)
-{
- int offset = 0;
- int status;
- gauge_t *rates = NULL;
-
- assert (0 == strcmp (ds->type, vl->type));
-
- memset (buffer, '\0', buffer_len);
-
- if ((ds->ds[index].type != DS_TYPE_COUNTER)
- && (ds->ds[index].type != DS_TYPE_GAUGE))
- return (-1);
-
- if (ds->ds[index].type == DS_TYPE_COUNTER)
- {
- if (rates == NULL)
- rates = uc_get_rate (ds, vl);
- if (rates == NULL)
- {
- WARNING ("http plugin: "
- "uc_get_rate failed.");
- return (-1);
- }
- if (isnan(rates[index]))
- {
- /* dont output */
- return (-1);
- }
- status = ssnprintf (buffer + offset,
- buffer_len - offset,
- "%lf", rates[index]);
- }
- else /* if (ds->ds[index].type == DS_TYPE_GAUGE) */
- {
- status = ssnprintf (buffer + offset, buffer_len - offset,
- "%lf", vl->values[index].gauge);
- }
-
- if ((status < 1) || (status >= (buffer_len - offset)))
- {
- sfree (rates);
- return (-1);
- }
-
- offset += status;
-
- sfree (rates);
- return (0);
-} /* int value_list_to_string */
-
-static int value_list_to_timestamp (char *buffer, int buffer_len,
- const data_set_t *ds, const value_list_t *vl)
-{
- int offset = 0;
- int status;
+ if (user != NULL)
+ {
+ size_t credentials_size;
- assert (0 == strcmp (ds->type, vl->type));
+ credentials_size = strlen (user) + 2;
+ if (pass != NULL)
+ credentials_size += strlen (pass);
- memset (buffer, '\0', buffer_len);
+ credentials = (char *) malloc (credentials_size);
+ if (credentials == NULL)
+ {
+ ERROR ("curl plugin: malloc failed.");
+ return (-1);
+ }
- status = ssnprintf (buffer, buffer_len, "%u", (unsigned int) vl->time);
- if ((status < 1) || (status >= buffer_len))
- return (-1);
- offset = status;
+ ssnprintf (credentials, credentials_size, "%s:%s",
+ user, (pass == NULL) ? "" : pass);
+ curl_easy_setopt (curl, CURLOPT_USERPWD, credentials);
+ curl_easy_setopt (curl, CURLOPT_HTTPAUTH, CURLAUTH_DIGEST);
+ }
- return (0);
-} /* int value_list_to_timestamp */
+ return (0);
+} /* }}} */
-static int value_list_to_metric_name (char *buffer, int buffer_len,
- const data_set_t *ds, const value_list_t *vl)
+static int http_value_list_to_string (char *buffer, int buffer_len, /* {{{ */
+ const data_set_t *ds, const value_list_t *vl)
+{
+ int offset = 0;
+ int status;
+ int i;
+
+ assert (0 == strcmp (ds->type, vl->type));
+
+ memset (buffer, '\0', buffer_len);
+
+ for (i = 0; i < ds->ds_num; i++)
+ {
+ if ((ds->ds[i].type != DS_TYPE_COUNTER)
+ && (ds->ds[i].type != DS_TYPE_GAUGE)
+ && (ds->ds[i].type != DS_TYPE_DERIVE)
+ && (ds->ds[i].type != DS_TYPE_ABSOLUTE))
+ return (-1);
+
+ status = -1;
+ if (ds->ds[i].type == DS_TYPE_GAUGE)
+ {
+ status = ssnprintf (buffer + offset, buffer_len - offset,
+ ":%lf", vl->values[i].gauge);
+ }
+ else if ((ds->ds[i].type == DS_TYPE_COUNTER)
+ || (ds->ds[i].type == DS_TYPE_ABSOLUTE))
+ {
+ status = ssnprintf (buffer + offset,
+ buffer_len - offset,
+ ":%"PRIu64,
+ (ds->ds[i].type == DS_TYPE_COUNTER)
+ ? vl->values[i].counter
+ : vl->values[i].absolute);
+ }
+ else if (ds->ds[i].type == DS_TYPE_DERIVE)
+ {
+ status = ssnprintf (buffer + offset,
+ buffer_len - offset,
+ ":%"PRIi64,
+ vl->values[i].derive);
+ }
+
+ if ((status < 1) || (status >= (buffer_len - offset)))
+ return (-1);
+
+ offset += status;
+ } /* for ds->ds_num */
+
+ return (0);
+} /* }}} int http_value_list_to_string */
+
+static int http_config (const char *key, const char *value) /* {{{ */
{
- int offset = 0;
- int status;
-
- assert (0 == strcmp (ds->type, vl->type));
-
- /* hostname */
- status = ssnprintf (buffer + offset, buffer_len - offset,
- "%s", vl->host);
- if ((status < 1) || (status >= buffer_len - offset))
- return (-1);
- offset += status;
-
- /* plugin */
- status = ssnprintf (buffer + offset, buffer_len - offset,
- ",%s", vl->plugin);
- if ((status < 1) || (status >= buffer_len - offset))
- return (-1);
- offset += status;
-
- /* plugin_instance */
- if (strlen (vl->plugin_instance) > 0)
- {
- status = ssnprintf (buffer + offset, buffer_len - offset,
- ",%s", vl->plugin_instance);
- if ((status < 1) || (status >= buffer_len - offset))
- return (-1);
- offset += status;
- }
-
- /* type (if its the same as plugin, don't bother repeating it */
- if (0 != strcmp (vl->type, vl->plugin))
- {
- status = ssnprintf (buffer + offset, buffer_len - offset,
- ",%s", vl->type);
- if ((status < 1) || (status >= buffer_len - offset))
- return (-1);
- offset += status;
- }
-
- /* type_instance */
- if (strlen (vl->type_instance) > 0)
- {
- status = ssnprintf (buffer + offset, buffer_len - offset,
- ",%s", vl->type_instance);
- if ((status < 1) || (status >= buffer_len - offset))
- return (-1);
- offset += status;
- }
-
- return (offset);
-} /* int value_list_to_metric_name */
-
-static int http_config (const char *key, const char *value)
+ if (strcasecmp ("URL", key) == 0)
+ {
+ if (location != NULL)
+ free (location);
+ location = strdup (value);
+ if (location != NULL)
+ {
+ int len = strlen (location);
+ while ((len > 0) && (location[len - 1] == '/'))
+ {
+ len--;
+ location[len] = '\0';
+ }
+ if (len <= 0)
+ {
+ free (location);
+ location = NULL;
+ }
+ }
+ }
+ else if (strcasecmp ("User", key) == 0)
+ {
+ if (user != NULL)
+ free (user);
+ user = strdup (value);
+ if (user != NULL)
+ {
+ int len = strlen (user);
+ while ((len > 0) && (user[len - 1] == '/'))
+ {
+ len--;
+ user[len] = '\0';
+ }
+ if (len <= 0)
+ {
+ free (user);
+ user = NULL;
+ }
+ }
+ }
+ else if (strcasecmp ("Password", key) == 0)
+ {
+ if (pass != NULL)
+ free (pass);
+ pass = strdup (value);
+ if (pass != NULL)
+ {
+ int len = strlen (pass);
+ while ((len > 0) && (pass[len - 1] == '/'))
+ {
+ len--;
+ pass[len] = '\0';
+ }
+ if (len <= 0)
+ {
+ free (pass);
+ pass = NULL;
+ }
+ }
+ }
+ else
+ {
+ return (-1);
+ }
+ return (0);
+} /* }}} int http_config */
+
+static void http_init_buffer (void) /* {{{ */
+{
+ memset (send_buffer, 0, sizeof (send_buffer));
+ send_buffer_fill = 0;
+} /* }}} http_init_buffer */
+
+static int http_send_buffer (char *buffer) /* {{{ */
{
- if (strcasecmp ("Location", key) == 0)
- {
- if (location != NULL)
- free (location);
- location = strdup (value);
- if (location != NULL)
- {
- int len = strlen (location);
- while ((len > 0) && (location[len - 1] == '/'))
- {
- len--;
- location[len] = '\0';
- }
- if (len <= 0)
- {
- free (location);
- location = NULL;
- }
- }
- }
- else if (strcasecmp ("User", key) == 0)
- {
- if (user != NULL)
- free (user);
- user = strdup (value);
- if (user != NULL)
- {
- int len = strlen (user);
- while ((len > 0) && (user[len - 1] == '/'))
- {
- len--;
- user[len] = '\0';
- }
- if (len <= 0)
- {
- free (user);
- user = NULL;
- }
- }
- }
- else if (strcasecmp ("Password", key) == 0)
- {
- if (pass != NULL)
- free (pass);
- pass = strdup (value);
- if (pass != NULL)
- {
- int len = strlen (pass);
- while ((len > 0) && (pass[len - 1] == '/'))
- {
- len--;
- pass[len] = '\0';
- }
- if (len <= 0)
- {
- free (pass);
- pass = NULL;
- }
- }
- }
- else
- {
- return (-1);
- }
- return (0);
-} /* int http_config */
-
-static int http_write (const data_set_t *ds, const value_list_t *vl,
- user_data_t __attribute__((unused)) *user_data)
+ int status = 0;
+ curl_easy_setopt (curl, CURLOPT_POSTFIELDS, buffer);
+ //status = curl_easy_perform (curl);
+ if (status != 0)
+ {
+ ERROR ("http plugin: curl_easy_perform failed with staus %i: %s",
+ status, curl_errbuf);
+ }
+ return (status);
+} /* }}} http_send_buffer */
+
+static int http_flush_buffer (void) /* {{{ */
{
- CURL *curl;
- char curl_errbuf[CURL_ERROR_SIZE];
+ int status = 0;
+ DEBUG ("http plugin: flushing buffer:\n%s", send_buffer);
- char metric_name[512];
- int metric_prefix_len;
- char value[512];
- char timestamp[512];
+ status = http_send_buffer (send_buffer);
+ http_init_buffer ();
- char csv_buffer[10240];
+ return (status);
+} /* }}} http_flush_buffer */
- int status;
- int offset = 0;
- int i;
+static int http_write (const data_set_t *ds, const value_list_t *vl, /* {{{ */
+ user_data_t __attribute__((unused)) *user_data)
+{
+
+ char key[1024];
+ char values[512];
- if (0 != strcmp (ds->type, vl->type)) {
- ERROR ("http plugin: DS type does not match value list type");
- return -1;
- }
+ int status;
- curl = curl_easy_init ();
- if (curl == NULL)
- {
- ERROR ("curl plugin: curl_easy_init failed.");
- return (-1);
- }
+ if (0 != strcmp (ds->type, vl->type)) {
+ ERROR ("http plugin: DS type does not match value list type");
+ return -1;
+ }
- http_init_curl(curl, curl_errbuf);
+ status = format_name( key, sizeof(key), vl->host, vl->plugin,
+ vl->plugin_instance, vl->type, vl->type_instance );
- metric_prefix_len = value_list_to_metric_name (metric_name,
- sizeof (metric_name), ds, vl);
-
- if (metric_prefix_len == -1)
- return (-1);
+ if (status != 0) {
+ ERROR ("http plugin: error with format_name");
+ return (status);
+ }
- DEBUG ("http plugin: http_write: metric_name = %s;", metric_name);
+ status = http_value_list_to_string (values, sizeof (values), ds, vl);
- if (value_list_to_timestamp (timestamp, sizeof (timestamp), ds, vl) != 0)
- return (-1);
+ if (status != 0) {
+ ERROR ("http plugin: error with http_value_list_to_string");
+ return (status);
+ }
- for (i = 0; i < ds->ds_num; i++)
- {
- if (value_list_to_string (value, sizeof (value), ds, vl, i) != 0)
- return (-1);
+ pthread_mutex_lock (&send_lock);
- ssnprintf(metric_name + metric_prefix_len, sizeof (metric_name) - metric_prefix_len,
- ",%s", ds->ds[i].name);
+ status = ssnprintf (send_buffer + send_buffer_fill, sizeof (send_buffer) - send_buffer_fill,
+ "PUTVAL %s interval=%i %u%s\n",
+ key, interval_g, vl->time, values);
+ send_buffer_fill += status;
- escape_string (metric_name, sizeof (metric_name));
+ if ((sizeof (send_buffer) - send_buffer_fill) < (sizeof(key) + sizeof(values)))
+ {
+ status = http_flush_buffer();
+ if (status != 0)
+ return status;
- status = ssnprintf (csv_buffer + offset, sizeof (csv_buffer) - offset,
- "\"%s\",%s,%s\n",
- metric_name, timestamp, value);
- offset += status;
+ }
- } /* for */
+ pthread_mutex_unlock (&send_lock);
- printf(csv_buffer);
- curl_easy_setopt (curl, CURLOPT_POSTFIELDS, csv_buffer);
- status = curl_easy_perform (curl);
- if (status != 0)
- {
- ERROR ("curl plugin: curl_easy_perform failed with staus %i: %s",
- status, curl_errbuf);
- return (-1);
- }
+ return (0);
- return (0);
+} /* }}} int http_write */
-} /* int http_write */
+static int http_shutdown (void) /* {{{ */
+{
+ http_flush_buffer();
+ curl_easy_cleanup(curl);
+ return (0);
+}
-void module_register (void)
+void module_register (void) /* {{{ */
{
- plugin_register_init("http", http_init);
- plugin_register_config ("http", http_config,
- config_keys, config_keys_num);
- plugin_register_write ("http", http_write, /* user_data = */ NULL);
-} /* void module_register */
+ plugin_register_init("http", http_init);
+ plugin_register_config ("http", http_config,
+ config_keys, config_keys_num);
+ plugin_register_write ("http", http_write, /* user_data = */ NULL);
+ plugin_register_shutdown("http", http_shutdown);
+} /* }}} void module_register */
+
+/* vim: set fdm=marker sw=8 ts=8 tw=78 : */