X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=src%2Fmemcached.c;h=a09f45ec6dae1a2e537fe986af7677f4130bd662;hb=1e74bb66c61d965c4aa261adfaf058f3356cff09;hp=5cfd823c1f2af936499320f3cc39a801c50889eb;hpb=a7afd4e00c2fe8f070a640a8dccdd3af673c8a2c;p=collectd.git diff --git a/src/memcached.c b/src/memcached.c index 5cfd823c..a09f45ec 100644 --- a/src/memcached.c +++ b/src/memcached.c @@ -1,7 +1,7 @@ /** * collectd - src/memcached.c, based on src/hddtemp.c * Copyright (C) 2007 Antony Dovgal - * Copyright (C) 2007-2010 Florian Forster + * Copyright (C) 2007-2012 Florian Forster * Copyright (C) 2009 Doug MacEachern * Copyright (C) 2009 Franck Lombardi * Copyright (C) 2012 Nicolas Szalay @@ -33,23 +33,15 @@ #include "plugin.h" #include "configfile.h" -# include -# include -# include -# include -# include -# include - -/* Hack to work around the missing define in AIX */ -#ifndef MSG_DONTWAIT -# define MSG_DONTWAIT MSG_NONBLOCK -#endif +#include +#include +#include +#include +#include #define MEMCACHED_DEF_HOST "127.0.0.1" #define MEMCACHED_DEF_PORT "11211" -#define MEMCACHED_RETRY_COUNT 100 - struct memcached_s { char *name; @@ -57,10 +49,9 @@ struct memcached_s char *host; char *port; }; - typedef struct memcached_s memcached_t; -static int memcached_read (user_data_t *user_data); +static _Bool memcached_have_instances = 0; static void memcached_free (memcached_t *st) { @@ -73,291 +64,193 @@ static void memcached_free (memcached_t *st) sfree (st->port); } -static int memcached_query_daemon (char *buffer, int buffer_size, user_data_t *user_data) +static int memcached_connect_unix (memcached_t *st) { + struct sockaddr_un serv_addr; int fd; - ssize_t status; - int buffer_fill; - int i = 0; - memcached_t *st; - st = user_data->data; - if (st->socket != NULL) { - struct sockaddr_un serv_addr; - - memset (&serv_addr, 0, sizeof (serv_addr)); - serv_addr.sun_family = AF_UNIX; - sstrncpy (serv_addr.sun_path, st->socket, - sizeof (serv_addr.sun_path)); - - /* create our socket descriptor */ - fd = socket (AF_UNIX, SOCK_STREAM, 0); - if (fd < 0) { - char errbuf[1024]; - ERROR ("memcached: unix socket: %s", sstrerror (errno, errbuf, - sizeof (errbuf))); - return -1; - } + memset (&serv_addr, 0, sizeof (serv_addr)); + serv_addr.sun_family = AF_UNIX; + sstrncpy (serv_addr.sun_path, st->socket, + sizeof (serv_addr.sun_path)); + + /* create our socket descriptor */ + fd = socket (AF_UNIX, SOCK_STREAM, 0); + if (fd < 0) + { + char errbuf[1024]; + ERROR ("memcached plugin: memcached_connect_unix: socket(2) failed: %s", + sstrerror (errno, errbuf, sizeof (errbuf))); + return (-1); } - else { - const char *host; - const char *port; - struct addrinfo ai_hints; - struct addrinfo *ai_list, *ai_ptr; - int ai_return = 0; + return (fd); +} /* int memcached_connect_unix */ - memset (&ai_hints, '\0', sizeof (ai_hints)); - ai_hints.ai_flags = 0; +static int memcached_connect_inet (memcached_t *st) +{ + char *host; + char *port; + + struct addrinfo ai_hints; + struct addrinfo *ai_list, *ai_ptr; + int status; + int fd = -1; + + memset (&ai_hints, 0, sizeof (ai_hints)); + ai_hints.ai_flags = 0; #ifdef AI_ADDRCONFIG - ai_hints.ai_flags |= AI_ADDRCONFIG; + ai_hints.ai_flags |= AI_ADDRCONFIG; #endif - ai_hints.ai_family = AF_UNSPEC; - ai_hints.ai_socktype = SOCK_STREAM; - ai_hints.ai_protocol = 0; + ai_hints.ai_family = AF_UNSPEC; + ai_hints.ai_socktype = SOCK_STREAM; + ai_hints.ai_protocol = 0; - host = (st->host != NULL) ? st->host : MEMCACHED_DEF_HOST; - port = (st->port != NULL) ? st->port : MEMCACHED_DEF_PORT; + host = (st->host != NULL) ? st->host : MEMCACHED_DEF_HOST; + port = (st->port != NULL) ? st->port : MEMCACHED_DEF_PORT; + + ai_list = NULL; + status = getaddrinfo (host, port, &ai_hints, &ai_list); + if (status != 0) + { + char errbuf[1024]; + ERROR ("memcached plugin: memcached_connect_inet: " + "getaddrinfo(%s,%s) failed: %s", + host, port, + (status == EAI_SYSTEM) + ? sstrerror (errno, errbuf, sizeof (errbuf)) + : gai_strerror (status)); + return (-1); + } - if ((ai_return = getaddrinfo (host, port, &ai_hints, &ai_list)) != 0) { + for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) + { + /* create our socket descriptor */ + fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype, ai_ptr->ai_protocol); + if (fd < 0) + { char errbuf[1024]; - ERROR ("memcached: getaddrinfo (%s, %s): %s", - host, port, - (ai_return == EAI_SYSTEM) - ? sstrerror (errno, errbuf, sizeof (errbuf)) - : gai_strerror (ai_return)); - return -1; + WARNING ("memcached plugin: memcached_connect_inet: " + "socket(2) failed: %s", + sstrerror (errno, errbuf, sizeof (errbuf))); + continue; } - for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) { - /* create our socket descriptor */ - fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype, ai_ptr->ai_protocol); - if (fd < 0) { - char errbuf[1024]; - ERROR ("memcached: socket: %s", sstrerror (errno, errbuf, sizeof (errbuf))); - continue; - } - - /* connect to the memcached daemon */ - status = (ssize_t) connect (fd, ai_ptr->ai_addr, ai_ptr->ai_addrlen); - if (status != 0) { - shutdown (fd, SHUT_RDWR); - close (fd); - fd = -1; - continue; - } - - /* A socket could be opened and connecting succeeded. We're - * done. */ - break; + /* connect to the memcached daemon */ + status = (int) connect (fd, ai_ptr->ai_addr, ai_ptr->ai_addrlen); + if (status != 0) + { + shutdown (fd, SHUT_RDWR); + close (fd); + fd = -1; + continue; } - freeaddrinfo (ai_list); + /* A socket could be opened and connecting succeeded. We're done. */ + break; } - if (fd < 0) { - ERROR ("memcached: Could not connect to daemon."); - return -1; - } + freeaddrinfo (ai_list); + return (fd); +} /* int memcached_connect_inet */ - if (send(fd, "stats\r\n", sizeof("stats\r\n") - 1, MSG_DONTWAIT) != (sizeof("stats\r\n") - 1)) { - ERROR ("memcached: Could not send command to the memcached daemon."); +static int memcached_connect (memcached_t *st) +{ + if (st->socket != NULL) + return (memcached_connect_unix (st)); + else + return (memcached_connect_inet (st)); +} + +static int memcached_query_daemon (char *buffer, size_t buffer_size, memcached_t *st) +{ + int fd = -1; + int status; + size_t buffer_fill; + + fd = memcached_connect (st); + if (fd < 0) { + ERROR ("memcached plugin: Instance \"%s\" could not connect to daemon.", + st->name); return -1; } + status = (int) swrite (fd, "stats\r\n", strlen ("stats\r\n")); + if (status != 0) { - struct pollfd p; - int status; - - memset (&p, 0, sizeof (p)); - p.fd = fd; - p.events = POLLIN | POLLERR | POLLHUP; - p.revents = 0; - - status = poll (&p, /* nfds = */ 1, - /* timeout = */ CDTIME_T_TO_MS (interval_g)); - if (status <= 0) - { - if (status == 0) - { - ERROR ("memcached: poll(2) timed out after %.3f seconds.", - CDTIME_T_TO_DOUBLE (interval_g)); - } - else - { - char errbuf[1024]; - ERROR ("memcached: poll(2) failed: %s", - sstrerror (errno, errbuf, sizeof (errbuf))); - } - shutdown (fd, SHUT_RDWR); - close (fd); - return (-1); - } + char errbuf[1024]; + ERROR ("memcached plugin: write(2) failed: %s", + sstrerror (errno, errbuf, sizeof (errbuf))); + shutdown(fd, SHUT_RDWR); + close (fd); + return (-1); } /* receive data from the memcached daemon */ - memset (buffer, '\0', buffer_size); + memset (buffer, 0, buffer_size); buffer_fill = 0; - while ((status = recv (fd, buffer + buffer_fill, buffer_size - buffer_fill, MSG_DONTWAIT)) != 0) { - if (i > MEMCACHED_RETRY_COUNT) { - ERROR("recv() timed out"); - break; - } - i++; - - if (status == -1) { + while ((status = (int) recv (fd, buffer + buffer_fill, + buffer_size - buffer_fill, /* flags = */ 0)) != 0) + { + char const end_token[5] = {'E', 'N', 'D', '\r', '\n'}; + if (status < 0) + { char errbuf[1024]; - if (errno == EAGAIN) { - continue; - } + if ((errno == EAGAIN) || (errno == EINTR)) + continue; ERROR ("memcached: Error reading from socket: %s", sstrerror (errno, errbuf, sizeof (errbuf))); shutdown(fd, SHUT_RDWR); close (fd); - return -1; + return (-1); } - buffer_fill += status; - if (buffer_fill > 3 && buffer[buffer_fill-5] == 'E' && buffer[buffer_fill-4] == 'N' && buffer[buffer_fill-3] == 'D') { - /* we got all the data */ + buffer_fill += (size_t) status; + if (buffer_fill > buffer_size) + { + buffer_fill = buffer_size; + WARNING ("memcached plugin: Message was truncated."); break; } - } - if (buffer_fill >= buffer_size) { - buffer[buffer_size - 1] = '\0'; - WARNING ("memcached: Message from memcached has been truncated."); - } else if (buffer_fill == 0) { - WARNING ("memcached: Peer has unexpectedly shut down the socket. " - "Buffer: `%s'", buffer); - shutdown(fd, SHUT_RDWR); - close(fd); - return -1; + /* If buffer ends in end_token, we have all the data. */ + if (memcmp (buffer + buffer_fill - sizeof (end_token), + end_token, sizeof (end_token)) == 0) + break; + } /* while (recv) */ + + status = 0; + if (buffer_fill == 0) + { + WARNING ("memcached plugin: No data returned by memcached."); + status = -1; } shutdown(fd, SHUT_RDWR); close(fd); - return 0; -} + return (status); +} /* int memcached_query_daemon */ -/* Configuration handling functiions - * - * - * Host foo.zomg.com - * Port "1234" - * - * - */ -static int config_add_instance(oconfig_item_t *ci) +static void memcached_init_vl (value_list_t *vl, memcached_t const *st) { - memcached_t *st; - int i; - int status; - - if ((ci->values_num != 1) - || (ci->values[0].type != OCONFIG_TYPE_STRING)) + sstrncpy (vl->plugin, "memcached", sizeof (vl->plugin)); + if (strcmp (st->name, "__legacy__") == 0) /* legacy mode */ { - WARNING ("memcached plugin: The `%s' config option " - "needs exactly one string argument.", ci->key); - return (-1); + sstrncpy (vl->host, hostname_g, sizeof (vl->host)); } - - st = (memcached_t *) malloc (sizeof (*st)); - if (st == NULL) - { - ERROR ("memcached plugin: malloc failed."); - return (-1); - } - - st->name = NULL; - st->socket = NULL; - st->host = NULL; - st->port = NULL; - memset (st, 0, sizeof (*st)); - - status = cf_util_get_string (ci, &st->name); - if (status != 0) - { - sfree (st); - return (status); - } - assert (st->name != NULL); - - for (i = 0; i < ci->children_num; i++) + else { - oconfig_item_t *child = ci->children + i; - - if (strcasecmp ("Socket", child->key) == 0) - status = cf_util_get_string (child, &st->socket); - else if (strcasecmp ("Host", child->key) == 0) - status = cf_util_get_string (child, &st->host); - else if (strcasecmp ("Port", child->key) == 0) - status = cf_util_get_service (child, &st->port); + if (st->socket != NULL) + sstrncpy (vl->host, hostname_g, sizeof (vl->host)); else - { - WARNING ("memcached plugin: Option `%s' not allowed here.", - child->key); - status = -1; - } - - if (status != 0) - break; + sstrncpy (vl->host, + (st->host != NULL) ? st->host : MEMCACHED_DEF_HOST, + sizeof (vl->host)); + sstrncpy (vl->plugin_instance, st->name, sizeof (vl->plugin_instance)); } - - if (status == 0) - { - user_data_t ud; - char callback_name[3*DATA_MAX_NAME_LEN]; - - memset (&ud, 0, sizeof (ud)); - ud.data = st; - ud.free_func = (void *) memcached_free; - - memset (callback_name, 0, sizeof (callback_name)); - ssnprintf (callback_name, sizeof (callback_name), - "memcached/%s/%s", - (st->host != NULL) ? st->host : MEMCACHED_DEF_HOST, - (st->port != NULL) ? st->port : MEMCACHED_DEF_PORT) - - status = plugin_register_complex_read (/* group = */ "memcached", - /* name = */ callback_name, - /* callback = */ memcached_read, - /* interval = */ NULL, - /* user_data = */ &ud); - } - - if (status != 0) - { - memcached_free(st); - return (-1); - } - - return (0); -} - -static int memcached_config (oconfig_item_t *ci) -{ - int status = 0; - int i; - - for (i = 0; i < ci->children_num; i++) - { - oconfig_item_t *child = ci->children + i; - - if (strcasecmp ("Instance", child->key) == 0) - config_add_instance (child); - else - WARNING ("memcached plugin: The configuration option " - "\"%s\" is not allowed here. Did you " - "forget to add an block " - "around the configuration?", - child->key); - } /* for (ci->children) */ - - return (status); } static void submit_derive (const char *type, const char *type_inst, @@ -365,15 +258,12 @@ static void submit_derive (const char *type, const char *type_inst, { value_t values[1]; value_list_t vl = VALUE_LIST_INIT; + memcached_init_vl (&vl, st); values[0].derive = value; vl.values = values; vl.values_len = 1; - sstrncpy (vl.host, hostname_g, sizeof (vl.host)); - sstrncpy (vl.plugin, "memcached", sizeof (vl.plugin)); - if (st->name != NULL) - sstrncpy (vl.plugin_instance, st->name, sizeof (vl.plugin_instance)); sstrncpy (vl.type, type, sizeof (vl.type)); if (type_inst != NULL) sstrncpy (vl.type_instance, type_inst, sizeof (vl.type_instance)); @@ -386,16 +276,13 @@ static void submit_derive2 (const char *type, const char *type_inst, { value_t values[2]; value_list_t vl = VALUE_LIST_INIT; + memcached_init_vl (&vl, st); values[0].derive = value0; values[1].derive = value1; vl.values = values; vl.values_len = 2; - sstrncpy (vl.host, hostname_g, sizeof (vl.host)); - sstrncpy (vl.plugin, "memcached", sizeof (vl.plugin)); - if (st->name != NULL) - sstrncpy (vl.plugin_instance, st->name, sizeof (vl.plugin_instance)); sstrncpy (vl.type, type, sizeof (vl.type)); if (type_inst != NULL) sstrncpy (vl.type_instance, type_inst, sizeof (vl.type_instance)); @@ -408,15 +295,12 @@ static void submit_gauge (const char *type, const char *type_inst, { value_t values[1]; value_list_t vl = VALUE_LIST_INIT; + memcached_init_vl (&vl, st); values[0].gauge = value; vl.values = values; vl.values_len = 1; - sstrncpy (vl.host, hostname_g, sizeof (vl.host)); - sstrncpy (vl.plugin, "memcached", sizeof (vl.plugin)); - if (st->name != NULL) - sstrncpy (vl.plugin_instance, st->name, sizeof (vl.plugin_instance)); sstrncpy (vl.type, type, sizeof (vl.type)); if (type_inst != NULL) sstrncpy (vl.type_instance, type_inst, sizeof (vl.type_instance)); @@ -429,16 +313,13 @@ static void submit_gauge2 (const char *type, const char *type_inst, { value_t values[2]; value_list_t vl = VALUE_LIST_INIT; + memcached_init_vl (&vl, st); values[0].gauge = value0; values[1].gauge = value1; vl.values = values; vl.values_len = 2; - sstrncpy (vl.host, hostname_g, sizeof (vl.host)); - sstrncpy (vl.plugin, "memcached", sizeof (vl.plugin)); - if (st->name != NULL) - sstrncpy (vl.plugin_instance, st->name, sizeof (vl.plugin_instance)); sstrncpy (vl.type, type, sizeof (vl.type)); if (type_inst != NULL) sstrncpy (vl.type_instance, type_inst, sizeof (vl.type_instance)); @@ -468,7 +349,7 @@ static int memcached_read (user_data_t *user_data) st = user_data->data; /* get data from daemon */ - if (memcached_query_daemon (buf, sizeof (buf), user_data) < 0) { + if (memcached_query_daemon (buf, sizeof (buf), st) < 0) { return -1; } @@ -605,9 +486,164 @@ static int memcached_read (user_data_t *user_data) } return 0; +} /* int memcached_read */ + +static int memcached_add_read_callback (memcached_t *st) +{ + user_data_t ud; + char callback_name[3*DATA_MAX_NAME_LEN]; + int status; + + memset (&ud, 0, sizeof (ud)); + ud.data = st; + ud.free_func = (void *) memcached_free; + + assert (st->name != NULL); + ssnprintf (callback_name, sizeof (callback_name), "memcached/%s", st->name); + + status = plugin_register_complex_read (/* group = */ "memcached", + /* name = */ callback_name, + /* callback = */ memcached_read, + /* interval = */ NULL, + /* user_data = */ &ud); + return (status); +} /* int memcached_add_read_callback */ + +/* Configuration handling functiions + * + * + * Host foo.zomg.com + * Port "1234" + * + * + */ +static int config_add_instance(oconfig_item_t *ci) +{ + memcached_t *st; + int i; + int status = 0; + + /* Disable automatic generation of default instance in the init callback. */ + memcached_have_instances = 1; + + st = malloc (sizeof (*st)); + if (st == NULL) + { + ERROR ("memcached plugin: malloc failed."); + return (-1); + } + + memset (st, 0, sizeof (*st)); + st->name = NULL; + st->socket = NULL; + st->host = NULL; + st->port = NULL; + + if (strcasecmp (ci->key, "Plugin") == 0) /* default instance */ + st->name = sstrdup ("__legacy__"); + else /* block */ + status = cf_util_get_string (ci, &st->name); + if (status != 0) + { + sfree (st); + return (status); + } + assert (st->name != NULL); + + for (i = 0; i < ci->children_num; i++) + { + oconfig_item_t *child = ci->children + i; + + if (strcasecmp ("Socket", child->key) == 0) + status = cf_util_get_string (child, &st->socket); + else if (strcasecmp ("Host", child->key) == 0) + status = cf_util_get_string (child, &st->host); + else if (strcasecmp ("Port", child->key) == 0) + status = cf_util_get_service (child, &st->port); + else + { + WARNING ("memcached plugin: Option `%s' not allowed here.", + child->key); + status = -1; + } + + if (status != 0) + break; + } + + if (status == 0) + status = memcached_add_read_callback (st); + + if (status != 0) + { + memcached_free(st); + return (-1); + } + + return (0); +} + +static int memcached_config (oconfig_item_t *ci) +{ + int status = 0; + _Bool have_instance_block = 0; + int i; + + for (i = 0; i < ci->children_num; i++) + { + oconfig_item_t *child = ci->children + i; + + if (strcasecmp ("Instance", child->key) == 0) + { + config_add_instance (child); + have_instance_block = 1; + } + else if (!have_instance_block) + { + /* Non-instance option: Assume legacy configuration (without + * blocks) and call config_add_instance() with the block. */ + return (config_add_instance (ci)); + } + else + WARNING ("memcached plugin: The configuration option " + "\"%s\" is not allowed here. Did you " + "forget to add an block " + "around the configuration?", + child->key); + } /* for (ci->children) */ + + return (status); } +static int memcached_init (void) +{ + memcached_t *st; + int status; + + if (memcached_have_instances) + return (0); + + /* No instances were configured, lets start a default instance. */ + st = malloc (sizeof (*st)); + if (st == NULL) + return (ENOMEM); + memset (st, 0, sizeof (*st)); + st->name = sstrdup ("__legacy__"); + st->socket = NULL; + st->host = NULL; + st->port = NULL; + + status = memcached_add_read_callback (st); + if (status == 0) + memcached_have_instances = 1; + else + memcached_free (st); + + return (status); +} /* int memcached_init */ + void module_register (void) { plugin_register_complex_config ("memcached", memcached_config); + plugin_register_init ("memcached", memcached_init); }