1 /**
2 * collectd - src/gmond.c
3 * Copyright (C) 2009-2015 Florian octo Forster
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
22 *
23 * Authors:
24 * Florian octo Forster <octo at collectd.org>
25 **/
27 #include "collectd.h"
29 #include "plugin.h"
30 #include "common.h"
31 #include "configfile.h"
32 #include "utils_avltree.h"
34 #if HAVE_NETDB_H
35 # include <netdb.h>
36 #endif
37 #if HAVE_NETINET_IN_H
38 # include <netinet/in.h>
39 #endif
40 #if HAVE_ARPA_INET_H
41 # include <arpa/inet.h>
42 #endif
43 #if HAVE_POLL_H
44 # include <poll.h>
45 #endif
47 #include <gm_protocol.h>
49 #ifndef IPV6_ADD_MEMBERSHIP
50 # ifdef IPV6_JOIN_GROUP
51 # define IPV6_ADD_MEMBERSHIP IPV6_JOIN_GROUP
52 # else
53 # error "Neither IP_ADD_MEMBERSHIP nor IPV6_JOIN_GROUP is defined"
54 # endif
55 #endif /* !IP_ADD_MEMBERSHIP */
57 #ifdef GANGLIA_MAX_MESSAGE_LEN
58 # define BUFF_SIZE GANGLIA_MAX_MESSAGE_LEN
59 #else
60 # define BUFF_SIZE 1400
61 #endif
63 struct socket_entry_s
64 {
65 int fd;
66 struct sockaddr_storage addr;
67 socklen_t addrlen;
68 };
69 typedef struct socket_entry_s socket_entry_t;
71 struct staging_entry_s
72 {
73 char key[2 * DATA_MAX_NAME_LEN];
74 value_list_t vl;
75 int flags;
76 };
77 typedef struct staging_entry_s staging_entry_t;
79 struct metric_map_s
80 {
81 char *ganglia_name;
82 char *type;
83 char *type_instance;
84 char *ds_name;
85 int ds_type;
86 size_t ds_index;
87 };
88 typedef struct metric_map_s metric_map_t;
90 #define MC_RECEIVE_GROUP_DEFAULT "239.2.11.71"
91 static char *mc_receive_group = NULL;
92 #define MC_RECEIVE_PORT_DEFAULT "8649"
93 static char *mc_receive_port = NULL;
95 static struct pollfd *mc_receive_sockets = NULL;
96 static size_t mc_receive_sockets_num = 0;
98 static socket_entry_t *mc_send_sockets = NULL;
99 static size_t mc_send_sockets_num = 0;
100 static pthread_mutex_t mc_send_sockets_lock = PTHREAD_MUTEX_INITIALIZER;
102 static int mc_receive_thread_loop = 0;
103 static int mc_receive_thread_running = 0;
104 static pthread_t mc_receive_thread_id;
106 static metric_map_t metric_map_default[] =
107 { /*---------------+-------------+-----------+-------------+------+-----*
108 * ganglia_name ! type ! type_inst ! data_source ! type ! idx *
109 *---------------+-------------+-----------+-------------+------+-----*/
110 { "load_one", "load", "", "shortterm", -1, -1 },
111 { "load_five", "load", "", "midterm", -1, -1 },
112 { "load_fifteen", "load", "", "longterm", -1, -1 },
113 { "cpu_user", "cpu", "user", "value", -1, -1 },
114 { "cpu_system", "cpu", "system", "value", -1, -1 },
115 { "cpu_idle", "cpu", "idle", "value", -1, -1 },
116 { "cpu_nice", "cpu", "nice", "value", -1, -1 },
117 { "cpu_wio", "cpu", "wait", "value", -1, -1 },
118 { "mem_free", "memory", "free", "value", -1, -1 },
119 { "mem_shared", "memory", "shared", "value", -1, -1 },
120 { "mem_buffers", "memory", "buffered", "value", -1, -1 },
121 { "mem_cached", "memory", "cached", "value", -1, -1 },
122 { "mem_total", "memory", "total", "value", -1, -1 },
123 { "bytes_in", "if_octets", "", "rx", -1, -1 },
124 { "bytes_out", "if_octets", "", "tx", -1, -1 },
125 { "pkts_in", "if_packets", "", "rx", -1, -1 },
126 { "pkts_out", "if_packets", "", "tx", -1, -1 }
127 };
128 static size_t metric_map_len_default = STATIC_ARRAY_SIZE (metric_map_default);
130 static metric_map_t *metric_map = NULL;
131 static size_t metric_map_len = 0;
133 static c_avl_tree_t *staging_tree;
134 static pthread_mutex_t staging_lock = PTHREAD_MUTEX_INITIALIZER;
136 static metric_map_t *metric_lookup (const char *key) /* {{{ */
137 {
138 metric_map_t *map;
139 size_t map_len;
140 size_t i;
142 /* Search the user-supplied table first.. */
143 map = metric_map;
144 map_len = metric_map_len;
145 for (i = 0; i < map_len; i++)
146 if (strcmp (map[i].ganglia_name, key) == 0)
147 break;
149 /* .. and fall back to the built-in table if nothing is found. */
150 if (i >= map_len)
151 {
152 map = metric_map_default;
153 map_len = metric_map_len_default;
155 for (i = 0; i < map_len; i++)
156 if (strcmp (map[i].ganglia_name, key) == 0)
157 break;
158 }
160 if (i >= map_len)
161 return (NULL);
163 /* Look up the DS type and ds_index. */
164 if (map[i].ds_type < 0) /* {{{ */
165 {
166 const data_set_t *ds;
168 ds = plugin_get_ds (map[i].type);
169 if (ds == NULL)
170 {
171 WARNING ("gmond plugin: Type not defined: %s", map[i].type);
172 return (NULL);
173 }
175 if ((map[i].ds_name == NULL) && (ds->ds_num != 1))
176 {
177 WARNING ("gmond plugin: No data source name defined for metric %s, "
178 "but type %s has more than one data source.",
179 map[i].ganglia_name, map[i].type);
180 return (NULL);
181 }
183 if (map[i].ds_name == NULL)
184 {
185 map[i].ds_index = 0;
186 }
187 else
188 {
189 size_t j;
191 for (j = 0; j < ds->ds_num; j++)
192 if (strcasecmp (ds->ds[j].name, map[i].ds_name) == 0)
193 break;
195 if (j >= ds->ds_num)
196 {
197 WARNING ("gmond plugin: There is no data source "
198 "named `%s' in type `%s'.",
199 map[i].ds_name, ds->type);
200 return (NULL);
201 }
202 map[i].ds_index = j;
203 }
205 map[i].ds_type = ds->ds[map[i].ds_index].type;
206 } /* }}} if ((map[i].ds_type < 0) || (map[i].ds_index < 0)) */
208 return (map + i);
209 } /* }}} metric_map_t *metric_lookup */
211 static int create_sockets (socket_entry_t **ret_sockets, /* {{{ */
212 size_t *ret_sockets_num,
213 const char *node, const char *service, int listen)
214 {
215 struct addrinfo *ai_list;
216 int ai_return;
218 socket_entry_t *sockets = NULL;
219 size_t sockets_num = 0;
221 int status;
223 if (*ret_sockets != NULL)
224 return (EINVAL);
226 struct addrinfo ai_hints = {
227 .ai_family = AF_UNSPEC,
228 .ai_flags = AI_ADDRCONFIG | AI_PASSIVE,
229 .ai_protocol = IPPROTO_UDP,
230 .ai_socktype = SOCK_DGRAM
231 };
233 ai_return = getaddrinfo (node, service, &ai_hints, &ai_list);
234 if (ai_return != 0)
235 {
236 char errbuf[1024];
237 ERROR ("gmond plugin: getaddrinfo (%s, %s) failed: %s",
238 (node == NULL) ? "(null)" : node,
239 (service == NULL) ? "(null)" : service,
240 (ai_return == EAI_SYSTEM)
241 ? sstrerror (errno, errbuf, sizeof (errbuf))
242 : gai_strerror (ai_return));
243 return (-1);
244 }
246 for (struct addrinfo *ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) /* {{{ */
247 {
248 socket_entry_t *tmp;
250 tmp = realloc (sockets, (sockets_num + 1) * sizeof (*sockets));
251 if (tmp == NULL)
252 {
253 ERROR ("gmond plugin: realloc failed.");
254 continue;
255 }
256 sockets = tmp;
258 sockets[sockets_num].fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype,
259 ai_ptr->ai_protocol);
260 if (sockets[sockets_num].fd < 0)
261 {
262 char errbuf[1024];
263 ERROR ("gmond plugin: socket failed: %s",
264 sstrerror (errno, errbuf, sizeof (errbuf)));
265 continue;
266 }
268 assert (sizeof (sockets[sockets_num].addr) >= ai_ptr->ai_addrlen);
269 memcpy (&sockets[sockets_num].addr, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
270 sockets[sockets_num].addrlen = ai_ptr->ai_addrlen;
272 /* Sending socket: Open only one socket and don't bind it. */
273 if (listen == 0)
274 {
275 sockets_num++;
276 break;
277 }
278 else
279 {
280 int yes = 1;
282 status = setsockopt (sockets[sockets_num].fd, SOL_SOCKET, SO_REUSEADDR,
283 (void *) &yes, sizeof (yes));
284 if (status != 0)
285 {
286 char errbuf[1024];
287 WARNING ("gmond plugin: setsockopt(2) failed: %s",
288 sstrerror (errno, errbuf, sizeof (errbuf)));
289 }
290 }
292 status = bind (sockets[sockets_num].fd, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
293 if (status != 0)
294 {
295 char errbuf[1024];
296 ERROR ("gmond plugin: bind failed: %s",
297 sstrerror (errno, errbuf, sizeof (errbuf)));
298 close (sockets[sockets_num].fd);
299 continue;
300 }
302 if (ai_ptr->ai_family == AF_INET)
303 {
304 struct sockaddr_in *addr;
305 int loop;
307 addr = (struct sockaddr_in *) ai_ptr->ai_addr;
309 if (!IN_MULTICAST (ntohl (addr->sin_addr.s_addr)))
310 {
311 sockets_num++;
312 continue;
313 }
315 loop = 1;
316 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_MULTICAST_LOOP,
317 (void *) &loop, sizeof (loop));
318 if (status != 0)
319 {
320 char errbuf[1024];
321 WARNING ("gmond plugin: setsockopt(2) failed: %s",
322 sstrerror (errno, errbuf, sizeof (errbuf)));
323 }
325 struct ip_mreq mreq = {
326 .imr_multiaddr.s_addr = addr->sin_addr.s_addr,
327 .imr_interface.s_addr = htonl (INADDR_ANY)
328 };
330 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_ADD_MEMBERSHIP,
331 (void *) &mreq, sizeof (mreq));
332 if (status != 0)
333 {
334 char errbuf[1024];
335 WARNING ("gmond plugin: setsockopt(2) failed: %s",
336 sstrerror (errno, errbuf, sizeof (errbuf)));
337 }
338 } /* if (ai_ptr->ai_family == AF_INET) */
339 else if (ai_ptr->ai_family == AF_INET6)
340 {
341 struct sockaddr_in6 *addr;
342 int loop;
344 addr = (struct sockaddr_in6 *) ai_ptr->ai_addr;
346 if (!IN6_IS_ADDR_MULTICAST (&addr->sin6_addr))
347 {
348 sockets_num++;
349 continue;
350 }
352 loop = 1;
353 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_MULTICAST_LOOP,
354 (void *) &loop, sizeof (loop));
355 if (status != 0)
356 {
357 char errbuf[1024];
358 WARNING ("gmond plugin: setsockopt(2) failed: %s",
359 sstrerror (errno, errbuf, sizeof (errbuf)));
360 }
362 struct ipv6_mreq mreq = {
363 .ipv6mr_interface = 0 /* any */
364 };
366 memcpy (&mreq.ipv6mr_multiaddr,
367 &addr->sin6_addr, sizeof (addr->sin6_addr));
368 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_ADD_MEMBERSHIP,
369 (void *) &mreq, sizeof (mreq));
370 if (status != 0)
371 {
372 char errbuf[1024];
373 WARNING ("gmond plugin: setsockopt(2) failed: %s",
374 sstrerror (errno, errbuf, sizeof (errbuf)));
375 }
376 } /* if (ai_ptr->ai_family == AF_INET6) */
378 sockets_num++;
379 } /* }}} for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) */
381 freeaddrinfo (ai_list);
383 if (sockets_num == 0)
384 {
385 sfree (sockets);
386 return (-1);
387 }
389 *ret_sockets = sockets;
390 *ret_sockets_num = sockets_num;
391 return (0);
392 } /* }}} int create_sockets */
394 static int request_meta_data (const char *host, const char *name) /* {{{ */
395 {
396 Ganglia_metadata_msg msg = { 0 };
397 char buffer[BUFF_SIZE] = { 0 };
398 unsigned int buffer_size;
399 XDR xdr;
401 msg.id = gmetadata_request;
402 msg.Ganglia_metadata_msg_u.grequest.metric_id.host = strdup (host);
403 msg.Ganglia_metadata_msg_u.grequest.metric_id.name = strdup (name);
405 if ((msg.Ganglia_metadata_msg_u.grequest.metric_id.host == NULL)
406 || (msg.Ganglia_metadata_msg_u.grequest.metric_id.name == NULL))
407 {
408 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
409 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
410 return (-1);
411 }
413 xdrmem_create (&xdr, buffer, sizeof (buffer), XDR_ENCODE);
415 if (!xdr_Ganglia_metadata_msg (&xdr, &msg))
416 {
417 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
418 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
419 return (-1);
420 }
422 buffer_size = xdr_getpos (&xdr);
424 DEBUG ("gmond plugin: Requesting meta data for %s/%s.",
425 host, name);
427 pthread_mutex_lock (&mc_send_sockets_lock);
428 for (size_t i = 0; i < mc_send_sockets_num; i++)
429 {
430 ssize_t status = sendto (mc_send_sockets[i].fd, buffer, (size_t) buffer_size,
431 /* flags = */ 0,
432 (struct sockaddr *) &mc_send_sockets[i].addr,
433 mc_send_sockets[i].addrlen);
434 if (status == -1)
435 {
436 char errbuf[1024];
437 ERROR ("gmond plugin: sendto(2) failed: %s",
438 sstrerror (errno, errbuf, sizeof (errbuf)));
439 continue;
440 }
441 }
442 pthread_mutex_unlock (&mc_send_sockets_lock);
444 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
445 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
446 return (0);
447 } /* }}} int request_meta_data */
449 static staging_entry_t *staging_entry_get (const char *host, /* {{{ */
450 const char *name,
451 const char *type, const char *type_instance,
452 int values_len)
453 {
454 char key[2 * DATA_MAX_NAME_LEN];
455 staging_entry_t *se;
456 int status;
458 if (staging_tree == NULL)
459 return (NULL);
461 ssnprintf (key, sizeof (key), "%s/%s/%s", host, type,
462 (type_instance != NULL) ? type_instance : "");
464 se = NULL;
465 status = c_avl_get (staging_tree, key, (void *) &se);
466 if (status == 0)
467 return (se);
469 /* insert new entry */
470 se = calloc (1, sizeof (*se));
471 if (se == NULL)
472 return (NULL);
474 sstrncpy (se->key, key, sizeof (se->key));
475 se->flags = 0;
477 se->vl.values = (value_t *) calloc (values_len, sizeof (*se->vl.values));
478 if (se->vl.values == NULL)
479 {
480 sfree (se);
481 return (NULL);
482 }
483 se->vl.values_len = values_len;
485 se->vl.time = 0;
486 se->vl.interval = 0;
487 sstrncpy (se->vl.host, host, sizeof (se->vl.host));
488 sstrncpy (se->vl.plugin, "gmond", sizeof (se->vl.plugin));
489 sstrncpy (se->vl.type, type, sizeof (se->vl.type));
490 if (type_instance != NULL)
491 sstrncpy (se->vl.type_instance, type_instance,
492 sizeof (se->vl.type_instance));
494 status = c_avl_insert (staging_tree, se->key, se);
495 if (status != 0)
496 {
497 ERROR ("gmond plugin: c_avl_insert failed.");
498 sfree (se->vl.values);
499 sfree (se);
500 return (NULL);
501 }
503 return (se);
504 } /* }}} staging_entry_t *staging_entry_get */
506 static int staging_entry_update (const char *host, const char *name, /* {{{ */
507 const char *type, const char *type_instance,
508 size_t ds_index, int ds_type, value_t value)
509 {
510 const data_set_t *ds;
511 staging_entry_t *se;
513 ds = plugin_get_ds (type);
514 if (ds == NULL)
515 {
516 ERROR ("gmond plugin: Looking up type %s failed.", type);
517 return (-1);
518 }
520 if (ds->ds_num <= ds_index)
521 {
522 ERROR ("gmond plugin: Invalid index %zu: %s has only %zu data source(s).",
523 ds_index, ds->type, ds->ds_num);
524 return (-1);
525 }
527 pthread_mutex_lock (&staging_lock);
529 se = staging_entry_get (host, name, type, type_instance, ds->ds_num);
530 if (se == NULL)
531 {
532 pthread_mutex_unlock (&staging_lock);
533 ERROR ("gmond plugin: staging_entry_get failed.");
534 return (-1);
535 }
536 if (se->vl.values_len != ds->ds_num)
537 {
538 pthread_mutex_unlock (&staging_lock);
539 return (-1);
540 }
542 if (ds_type == DS_TYPE_COUNTER)
543 se->vl.values[ds_index].counter += value.counter;
544 else if (ds_type == DS_TYPE_GAUGE)
545 se->vl.values[ds_index].gauge = value.gauge;
546 else if (ds_type == DS_TYPE_DERIVE)
547 se->vl.values[ds_index].derive += value.derive;
548 else if (ds_type == DS_TYPE_ABSOLUTE)
549 se->vl.values[ds_index].absolute = value.absolute;
550 else
551 assert (23 == 42);
553 se->flags |= (0x01 << ds_index);
555 /* Check if all data sources have been set. If not, return here. */
556 if (se->flags != ((0x01 << se->vl.values_len) - 1))
557 {
558 pthread_mutex_unlock (&staging_lock);
559 return (0);
560 }
562 /* Check if the interval of this metric is known. If not, request meta data
563 * and return. */
564 if (se->vl.interval == 0)
565 {
566 /* No meta data has been received for this metric yet. */
567 se->flags = 0;
568 pthread_mutex_unlock (&staging_lock);
570 request_meta_data (host, name);
571 return (0);
572 }
574 plugin_dispatch_values (&se->vl);
576 se->flags = 0;
577 pthread_mutex_unlock (&staging_lock);
579 return (0);
580 } /* }}} int staging_entry_update */
582 static int mc_handle_value_msg (Ganglia_value_msg *msg) /* {{{ */
583 {
584 const char *host;
585 const char *name;
586 metric_map_t *map;
588 value_t value_counter;
589 value_t value_gauge;
590 value_t value_derive;
592 /* Fill in `host', `name', `value_counter', and `value_gauge' according to
593 * the value type, or return with an error. */
594 switch (msg->id) /* {{{ */
595 {
596 case gmetric_uint:
597 {
598 Ganglia_gmetric_uint msg_uint;
600 msg_uint = msg->Ganglia_value_msg_u.gu_int;
602 host = msg_uint.metric_id.host;
603 name = msg_uint.metric_id.name;
604 value_counter.counter = (counter_t) msg_uint.ui;
605 value_gauge.gauge = (gauge_t) msg_uint.ui;
606 value_derive.derive = (derive_t) msg_uint.ui;
607 break;
608 }
610 case gmetric_string:
611 {
612 Ganglia_gmetric_string msg_string;
613 int status;
615 msg_string = msg->Ganglia_value_msg_u.gstr;
617 host = msg_string.metric_id.host;
618 name = msg_string.metric_id.name;
620 status = parse_value (msg_string.str, &value_derive, DS_TYPE_DERIVE);
621 if (status != 0)
622 value_derive.derive = -1;
624 status = parse_value (msg_string.str, &value_gauge, DS_TYPE_GAUGE);
625 if (status != 0)
626 value_gauge.gauge = NAN;
628 status = parse_value (msg_string.str, &value_counter, DS_TYPE_COUNTER);
629 if (status != 0)
630 value_counter.counter = 0;
632 break;
633 }
635 case gmetric_float:
636 {
637 Ganglia_gmetric_float msg_float;
639 msg_float = msg->Ganglia_value_msg_u.gf;
641 host = msg_float.metric_id.host;
642 name = msg_float.metric_id.name;
643 value_counter.counter = (counter_t) msg_float.f;
644 value_gauge.gauge = (gauge_t) msg_float.f;
645 value_derive.derive = (derive_t) msg_float.f;
646 break;
647 }
649 case gmetric_double:
650 {
651 Ganglia_gmetric_double msg_double;
653 msg_double = msg->Ganglia_value_msg_u.gd;
655 host = msg_double.metric_id.host;
656 name = msg_double.metric_id.name;
657 value_counter.counter = (counter_t) msg_double.d;
658 value_gauge.gauge = (gauge_t) msg_double.d;
659 value_derive.derive = (derive_t) msg_double.d;
660 break;
661 }
662 default:
663 DEBUG ("gmond plugin: Value type not handled: %i", msg->id);
664 return (-1);
665 } /* }}} switch (msg->id) */
667 assert (host != NULL);
668 assert (name != NULL);
670 map = metric_lookup (name);
671 if (map != NULL)
672 {
673 value_t val_copy;
675 if ((map->ds_type == DS_TYPE_COUNTER)
676 || (map->ds_type == DS_TYPE_ABSOLUTE))
677 val_copy = value_counter;
678 else if (map->ds_type == DS_TYPE_GAUGE)
679 val_copy = value_gauge;
680 else if (map->ds_type == DS_TYPE_DERIVE)
681 val_copy = value_derive;
682 else
683 assert (23 == 42);
685 return (staging_entry_update (host, name,
686 map->type, map->type_instance,
687 map->ds_index, map->ds_type,
688 val_copy));
689 }
691 DEBUG ("gmond plugin: Cannot find a translation for %s.", name);
692 return (-1);
693 } /* }}} int mc_handle_value_msg */
695 static int mc_handle_metadata_msg (Ganglia_metadata_msg *msg) /* {{{ */
696 {
697 switch (msg->id)
698 {
699 case gmetadata_full:
700 {
701 Ganglia_metadatadef msg_meta;
702 staging_entry_t *se;
703 const data_set_t *ds;
704 metric_map_t *map;
706 msg_meta = msg->Ganglia_metadata_msg_u.gfull;
708 if (msg_meta.metric.tmax == 0)
709 return (-1);
711 map = metric_lookup (msg_meta.metric_id.name);
712 if (map == NULL)
713 {
714 DEBUG ("gmond plugin: Not handling meta data %s.",
715 msg_meta.metric_id.name);
716 return (0);
717 }
719 ds = plugin_get_ds (map->type);
720 if (ds == NULL)
721 {
722 WARNING ("gmond plugin: Could not find data set %s.", map->type);
723 return (-1);
724 }
726 DEBUG ("gmond plugin: Received meta data for %s/%s.",
727 msg_meta.metric_id.host, msg_meta.metric_id.name);
729 pthread_mutex_lock (&staging_lock);
730 se = staging_entry_get (msg_meta.metric_id.host,
731 msg_meta.metric_id.name,
732 map->type, map->type_instance,
733 ds->ds_num);
734 if (se != NULL)
735 se->vl.interval = TIME_T_TO_CDTIME_T (msg_meta.metric.tmax);
736 pthread_mutex_unlock (&staging_lock);
738 if (se == NULL)
739 {
740 ERROR ("gmond plugin: staging_entry_get failed.");
741 return (-1);
742 }
744 break;
745 }
747 default:
748 {
749 return (-1);
750 }
751 }
753 return (0);
754 } /* }}} int mc_handle_metadata_msg */
756 static int mc_handle_metric (void *buffer, size_t buffer_size) /* {{{ */
757 {
758 XDR xdr;
759 Ganglia_msg_formats format;
761 xdrmem_create (&xdr, buffer, buffer_size, XDR_DECODE);
763 xdr_Ganglia_msg_formats (&xdr, &format);
764 xdr_setpos (&xdr, 0);
766 switch (format)
767 {
768 case gmetric_ushort:
769 case gmetric_short:
770 case gmetric_int:
771 case gmetric_uint:
772 case gmetric_string:
773 case gmetric_float:
774 case gmetric_double:
775 {
776 Ganglia_value_msg msg = { 0 };
778 if (xdr_Ganglia_value_msg (&xdr, &msg))
779 mc_handle_value_msg (&msg);
780 break;
781 }
783 case gmetadata_full:
784 case gmetadata_request:
785 {
786 Ganglia_metadata_msg msg = { 0 };
787 if (xdr_Ganglia_metadata_msg (&xdr, &msg))
788 mc_handle_metadata_msg (&msg);
789 break;
790 }
792 default:
793 DEBUG ("gmond plugin: Unknown format: %i", format);
794 return (-1);
795 } /* switch (format) */
798 return (0);
799 } /* }}} int mc_handle_metric */
801 static int mc_handle_socket (struct pollfd *p) /* {{{ */
802 {
803 char buffer[BUFF_SIZE];
804 ssize_t buffer_size;
806 if ((p->revents & (POLLIN | POLLPRI)) == 0)
807 {
808 p->revents = 0;
809 return (-1);
810 }
812 buffer_size = recv (p->fd, buffer, sizeof (buffer), /* flags = */ 0);
813 if (buffer_size <= 0)
814 {
815 char errbuf[1024];
816 ERROR ("gmond plugin: recv failed: %s",
817 sstrerror (errno, errbuf, sizeof (errbuf)));
818 p->revents = 0;
819 return (-1);
820 }
822 mc_handle_metric (buffer, (size_t) buffer_size);
823 return (0);
824 } /* }}} int mc_handle_socket */
826 static void *mc_receive_thread (void *arg) /* {{{ */
827 {
828 socket_entry_t *mc_receive_socket_entries;
829 int status;
831 mc_receive_socket_entries = NULL;
832 status = create_sockets (&mc_receive_socket_entries, &mc_receive_sockets_num,
833 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
834 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
835 /* listen = */ 1);
836 if (status != 0)
837 {
838 ERROR ("gmond plugin: create_sockets failed.");
839 return ((void *) -1);
840 }
842 mc_receive_sockets = (struct pollfd *) calloc (mc_receive_sockets_num,
843 sizeof (*mc_receive_sockets));
844 if (mc_receive_sockets == NULL)
845 {
846 ERROR ("gmond plugin: calloc failed.");
847 for (size_t i = 0; i < mc_receive_sockets_num; i++)
848 close (mc_receive_socket_entries[i].fd);
849 free (mc_receive_socket_entries);
850 mc_receive_socket_entries = NULL;
851 mc_receive_sockets_num = 0;
852 return ((void *) -1);
853 }
855 for (size_t i = 0; i < mc_receive_sockets_num; i++)
856 {
857 mc_receive_sockets[i].fd = mc_receive_socket_entries[i].fd;
858 mc_receive_sockets[i].events = POLLIN | POLLPRI;
859 mc_receive_sockets[i].revents = 0;
860 }
862 while (mc_receive_thread_loop != 0)
863 {
864 status = poll (mc_receive_sockets, mc_receive_sockets_num, -1);
865 if (status <= 0)
866 {
867 char errbuf[1024];
868 if (errno == EINTR)
869 continue;
870 ERROR ("gmond plugin: poll failed: %s",
871 sstrerror (errno, errbuf, sizeof (errbuf)));
872 break;
873 }
875 for (size_t i = 0; i < mc_receive_sockets_num; i++)
876 {
877 if (mc_receive_sockets[i].revents != 0)
878 mc_handle_socket (mc_receive_sockets + i);
879 }
880 } /* while (mc_receive_thread_loop != 0) */
882 free (mc_receive_socket_entries);
883 return ((void *) 0);
884 } /* }}} void *mc_receive_thread */
886 static int mc_receive_thread_start (void) /* {{{ */
887 {
888 int status;
890 if (mc_receive_thread_running != 0)
891 return (-1);
893 mc_receive_thread_loop = 1;
895 status = plugin_thread_create (&mc_receive_thread_id, /* attr = */ NULL,
896 mc_receive_thread, /* args = */ NULL);
897 if (status != 0)
898 {
899 ERROR ("gmond plugin: Starting receive thread failed.");
900 mc_receive_thread_loop = 0;
901 return (-1);
902 }
904 mc_receive_thread_running = 1;
905 return (0);
906 } /* }}} int start_receive_thread */
908 static int mc_receive_thread_stop (void) /* {{{ */
909 {
910 if (mc_receive_thread_running == 0)
911 return (-1);
913 mc_receive_thread_loop = 0;
915 INFO ("gmond plugin: Stopping receive thread.");
916 pthread_kill (mc_receive_thread_id, SIGTERM);
917 pthread_join (mc_receive_thread_id, /* return value = */ NULL);
918 memset (&mc_receive_thread_id, 0, sizeof (mc_receive_thread_id));
920 mc_receive_thread_running = 0;
922 return (0);
923 } /* }}} int mc_receive_thread_stop */
925 /*
926 * Config:
927 *
928 * <Plugin gmond>
929 * MCReceiveFrom "239.2.11.71" "8649"
930 * <Metric "load_one">
931 * Type "load"
932 * [TypeInstance "foo"]
933 * [DataSource "bar"]
934 * </Metric>
935 * </Plugin>
936 */
937 static int gmond_config_set_string (oconfig_item_t *ci, char **str) /* {{{ */
938 {
939 char *tmp;
941 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
942 {
943 WARNING ("gmond plugin: The `%s' option needs "
944 "exactly one string argument.", ci->key);
945 return (-1);
946 }
948 tmp = strdup (ci->values[0].value.string);
949 if (tmp == NULL)
950 {
951 ERROR ("gmond plugin: strdup failed.");
952 return (-1);
953 }
955 sfree (*str);
956 *str = tmp;
957 return (0);
958 } /* }}} int gmond_config_set_string */
960 static int gmond_config_add_metric (oconfig_item_t *ci) /* {{{ */
961 {
962 metric_map_t *map;
964 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
965 {
966 WARNING ("gmond plugin: `Metric' blocks need "
967 "exactly one string argument.");
968 return (-1);
969 }
971 map = realloc (metric_map, (metric_map_len + 1) * sizeof (*metric_map));
972 if (map == NULL)
973 {
974 ERROR ("gmond plugin: realloc failed.");
975 return (-1);
976 }
977 metric_map = map;
978 map = metric_map + metric_map_len;
980 memset (map, 0, sizeof (*map));
981 map->type = NULL;
982 map->type_instance = NULL;
983 map->ds_name = NULL;
984 map->ds_type = -1;
985 map->ds_index = -1;
987 map->ganglia_name = strdup (ci->values[0].value.string);
988 if (map->ganglia_name == NULL)
989 {
990 ERROR ("gmond plugin: strdup failed.");
991 return (-1);
992 }
994 for (int i = 0; i < ci->children_num; i++)
995 {
996 oconfig_item_t *child = ci->children + i;
997 if (strcasecmp ("Type", child->key) == 0)
998 gmond_config_set_string (child, &map->type);
999 else if (strcasecmp ("TypeInstance", child->key) == 0)
1000 gmond_config_set_string (child, &map->type_instance);
1001 else if (strcasecmp ("DataSource", child->key) == 0)
1002 gmond_config_set_string (child, &map->ds_name);
1003 else
1004 {
1005 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1006 child->key);
1007 }
1008 }
1010 if (map->type == NULL)
1011 {
1012 ERROR ("gmond plugin: No type is set for metric %s.",
1013 map->ganglia_name);
1014 sfree (map->ganglia_name);
1015 sfree (map->type_instance);
1016 return (-1);
1017 }
1019 metric_map_len++;
1020 return (0);
1021 } /* }}} int gmond_config_add_metric */
1023 static int gmond_config_set_address (oconfig_item_t *ci, /* {{{ */
1024 char **ret_addr, char **ret_port)
1025 {
1026 char *addr;
1027 char *port;
1029 if ((ci->values_num != 1) && (ci->values_num != 2))
1030 {
1031 WARNING ("gmond plugin: The `%s' config option needs "
1032 "one or two string arguments.",
1033 ci->key);
1034 return (-1);
1035 }
1036 if ((ci->values[0].type != OCONFIG_TYPE_STRING)
1037 || ((ci->values_num == 2)
1038 && (ci->values[1].type != OCONFIG_TYPE_STRING)))
1039 {
1040 WARNING ("gmond plugin: The `%s' config option needs "
1041 "one or two string arguments.",
1042 ci->key);
1043 return (-1);
1044 }
1046 addr = strdup (ci->values[0].value.string);
1047 if (ci->values_num == 2)
1048 port = strdup (ci->values[1].value.string);
1049 else
1050 port = NULL;
1052 if ((addr == NULL) || ((ci->values_num == 2) && (port == NULL)))
1053 {
1054 ERROR ("gmond plugin: strdup failed.");
1055 sfree (addr);
1056 sfree (port);
1057 return (-1);
1058 }
1060 sfree (*ret_addr);
1061 sfree (*ret_port);
1063 *ret_addr = addr;
1064 *ret_port = port;
1066 return (0);
1067 } /* }}} int gmond_config_set_address */
1069 static int gmond_config (oconfig_item_t *ci) /* {{{ */
1070 {
1071 for (int i = 0; i < ci->children_num; i++)
1072 {
1073 oconfig_item_t *child = ci->children + i;
1074 if (strcasecmp ("MCReceiveFrom", child->key) == 0)
1075 gmond_config_set_address (child, &mc_receive_group, &mc_receive_port);
1076 else if (strcasecmp ("Metric", child->key) == 0)
1077 gmond_config_add_metric (child);
1078 else
1079 {
1080 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1081 child->key);
1082 }
1083 }
1085 return (0);
1086 } /* }}} int gmond_config */
1088 static int gmond_init (void) /* {{{ */
1089 {
1090 create_sockets (&mc_send_sockets, &mc_send_sockets_num,
1091 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
1092 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
1093 /* listen = */ 0);
1095 staging_tree = c_avl_create ((int (*) (const void *, const void *)) strcmp);
1096 if (staging_tree == NULL)
1097 {
1098 ERROR ("gmond plugin: c_avl_create failed.");
1099 return (-1);
1100 }
1102 mc_receive_thread_start ();
1104 return (0);
1105 } /* }}} int gmond_init */
1107 static int gmond_shutdown (void) /* {{{ */
1108 {
1109 mc_receive_thread_stop ();
1111 pthread_mutex_lock (&mc_send_sockets_lock);
1112 for (size_t i = 0; i < mc_send_sockets_num; i++)
1113 {
1114 close (mc_send_sockets[i].fd);
1115 mc_send_sockets[i].fd = -1;
1116 }
1117 sfree (mc_send_sockets);
1118 mc_send_sockets_num = 0;
1119 pthread_mutex_unlock (&mc_send_sockets_lock);
1122 return (0);
1123 } /* }}} int gmond_shutdown */
1125 void module_register (void)
1126 {
1127 plugin_register_complex_config ("gmond", gmond_config);
1128 plugin_register_init ("gmond", gmond_init);
1129 plugin_register_shutdown ("gmond", gmond_shutdown);
1130 }
1132 /* vim: set sw=2 sts=2 et fdm=marker : */