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"
28 #include "plugin.h"
29 #include "common.h"
30 #include "configfile.h"
31 #include "utils_avltree.h"
33 #if HAVE_PTHREAD_H
34 # include <pthread.h>
35 #endif
36 #if HAVE_NETDB_H
37 # include <netdb.h>
38 #endif
39 #if HAVE_NETINET_IN_H
40 # include <netinet/in.h>
41 #endif
42 #if HAVE_ARPA_INET_H
43 # include <arpa/inet.h>
44 #endif
45 #if HAVE_POLL_H
46 # include <poll.h>
47 #endif
49 #include <gm_protocol.h>
51 #ifndef IPV6_ADD_MEMBERSHIP
52 # ifdef IPV6_JOIN_GROUP
53 # define IPV6_ADD_MEMBERSHIP IPV6_JOIN_GROUP
54 # else
55 # error "Neither IP_ADD_MEMBERSHIP nor IPV6_JOIN_GROUP is defined"
56 # endif
57 #endif /* !IP_ADD_MEMBERSHIP */
59 #ifdef GANGLIA_MAX_MESSAGE_LEN
60 # define BUFF_SIZE GANGLIA_MAX_MESSAGE_LEN
61 #else
62 # define BUFF_SIZE 1400
63 #endif
65 struct socket_entry_s
66 {
67 int fd;
68 struct sockaddr_storage addr;
69 socklen_t addrlen;
70 };
71 typedef struct socket_entry_s socket_entry_t;
73 struct staging_entry_s
74 {
75 char key[2 * DATA_MAX_NAME_LEN];
76 value_list_t vl;
77 int flags;
78 };
79 typedef struct staging_entry_s staging_entry_t;
81 struct metric_map_s
82 {
83 char *ganglia_name;
84 char *type;
85 char *type_instance;
86 char *ds_name;
87 int ds_type;
88 size_t ds_index;
89 };
90 typedef struct metric_map_s metric_map_t;
92 #define MC_RECEIVE_GROUP_DEFAULT "239.2.11.71"
93 static char *mc_receive_group = NULL;
94 #define MC_RECEIVE_PORT_DEFAULT "8649"
95 static char *mc_receive_port = NULL;
97 static struct pollfd *mc_receive_sockets = NULL;
98 static size_t mc_receive_sockets_num = 0;
100 static socket_entry_t *mc_send_sockets = NULL;
101 static size_t mc_send_sockets_num = 0;
102 static pthread_mutex_t mc_send_sockets_lock = PTHREAD_MUTEX_INITIALIZER;
104 static int mc_receive_thread_loop = 0;
105 static int mc_receive_thread_running = 0;
106 static pthread_t mc_receive_thread_id;
108 static metric_map_t metric_map_default[] =
109 { /*---------------+-------------+-----------+-------------+------+-----*
110 * ganglia_name ! type ! type_inst ! data_source ! type ! idx *
111 *---------------+-------------+-----------+-------------+------+-----*/
112 { "load_one", "load", "", "shortterm", -1, -1 },
113 { "load_five", "load", "", "midterm", -1, -1 },
114 { "load_fifteen", "load", "", "longterm", -1, -1 },
115 { "cpu_user", "cpu", "user", "value", -1, -1 },
116 { "cpu_system", "cpu", "system", "value", -1, -1 },
117 { "cpu_idle", "cpu", "idle", "value", -1, -1 },
118 { "cpu_nice", "cpu", "nice", "value", -1, -1 },
119 { "cpu_wio", "cpu", "wait", "value", -1, -1 },
120 { "mem_free", "memory", "free", "value", -1, -1 },
121 { "mem_shared", "memory", "shared", "value", -1, -1 },
122 { "mem_buffers", "memory", "buffered", "value", -1, -1 },
123 { "mem_cached", "memory", "cached", "value", -1, -1 },
124 { "mem_total", "memory", "total", "value", -1, -1 },
125 { "bytes_in", "if_octets", "", "rx", -1, -1 },
126 { "bytes_out", "if_octets", "", "tx", -1, -1 },
127 { "pkts_in", "if_packets", "", "rx", -1, -1 },
128 { "pkts_out", "if_packets", "", "tx", -1, -1 }
129 };
130 static size_t metric_map_len_default = STATIC_ARRAY_SIZE (metric_map_default);
132 static metric_map_t *metric_map = NULL;
133 static size_t metric_map_len = 0;
135 static c_avl_tree_t *staging_tree;
136 static pthread_mutex_t staging_lock = PTHREAD_MUTEX_INITIALIZER;
138 static metric_map_t *metric_lookup (const char *key) /* {{{ */
139 {
140 metric_map_t *map;
141 size_t map_len;
142 size_t i;
144 /* Search the user-supplied table first.. */
145 map = metric_map;
146 map_len = metric_map_len;
147 for (i = 0; i < map_len; i++)
148 if (strcmp (map[i].ganglia_name, key) == 0)
149 break;
151 /* .. and fall back to the built-in table if nothing is found. */
152 if (i >= map_len)
153 {
154 map = metric_map_default;
155 map_len = metric_map_len_default;
157 for (i = 0; i < map_len; i++)
158 if (strcmp (map[i].ganglia_name, key) == 0)
159 break;
160 }
162 if (i >= map_len)
163 return (NULL);
165 /* Look up the DS type and ds_index. */
166 if (map[i].ds_type < 0) /* {{{ */
167 {
168 const data_set_t *ds;
170 ds = plugin_get_ds (map[i].type);
171 if (ds == NULL)
172 {
173 WARNING ("gmond plugin: Type not defined: %s", map[i].type);
174 return (NULL);
175 }
177 if ((map[i].ds_name == NULL) && (ds->ds_num != 1))
178 {
179 WARNING ("gmond plugin: No data source name defined for metric %s, "
180 "but type %s has more than one data source.",
181 map[i].ganglia_name, map[i].type);
182 return (NULL);
183 }
185 if (map[i].ds_name == NULL)
186 {
187 map[i].ds_index = 0;
188 }
189 else
190 {
191 size_t j;
193 for (j = 0; j < ds->ds_num; j++)
194 if (strcasecmp (ds->ds[j].name, map[i].ds_name) == 0)
195 break;
197 if (j >= ds->ds_num)
198 {
199 WARNING ("gmond plugin: There is no data source "
200 "named `%s' in type `%s'.",
201 map[i].ds_name, ds->type);
202 return (NULL);
203 }
204 map[i].ds_index = j;
205 }
207 map[i].ds_type = ds->ds[map[i].ds_index].type;
208 } /* }}} if ((map[i].ds_type < 0) || (map[i].ds_index < 0)) */
210 return (map + i);
211 } /* }}} metric_map_t *metric_lookup */
213 static int create_sockets (socket_entry_t **ret_sockets, /* {{{ */
214 size_t *ret_sockets_num,
215 const char *node, const char *service, int listen)
216 {
217 struct addrinfo ai_hints;
218 struct addrinfo *ai_list;
219 struct addrinfo *ai_ptr;
220 int ai_return;
222 socket_entry_t *sockets = NULL;
223 size_t sockets_num = 0;
225 int status;
227 if (*ret_sockets != NULL)
228 return (EINVAL);
230 memset (&ai_hints, 0, sizeof (ai_hints));
231 ai_hints.ai_flags = 0;
232 #ifdef AI_PASSIVE
233 ai_hints.ai_flags |= AI_PASSIVE;
234 #endif
235 #ifdef AI_ADDRCONFIG
236 ai_hints.ai_flags |= AI_ADDRCONFIG;
237 #endif
238 ai_hints.ai_family = AF_UNSPEC;
239 ai_hints.ai_socktype = SOCK_DGRAM;
240 ai_hints.ai_protocol = IPPROTO_UDP;
242 ai_return = getaddrinfo (node, service, &ai_hints, &ai_list);
243 if (ai_return != 0)
244 {
245 char errbuf[1024];
246 ERROR ("gmond plugin: getaddrinfo (%s, %s) failed: %s",
247 (node == NULL) ? "(null)" : node,
248 (service == NULL) ? "(null)" : service,
249 (ai_return == EAI_SYSTEM)
250 ? sstrerror (errno, errbuf, sizeof (errbuf))
251 : gai_strerror (ai_return));
252 return (-1);
253 }
255 for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) /* {{{ */
256 {
257 socket_entry_t *tmp;
259 tmp = realloc (sockets, (sockets_num + 1) * sizeof (*sockets));
260 if (tmp == NULL)
261 {
262 ERROR ("gmond plugin: realloc failed.");
263 continue;
264 }
265 sockets = tmp;
267 sockets[sockets_num].fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype,
268 ai_ptr->ai_protocol);
269 if (sockets[sockets_num].fd < 0)
270 {
271 char errbuf[1024];
272 ERROR ("gmond plugin: socket failed: %s",
273 sstrerror (errno, errbuf, sizeof (errbuf)));
274 continue;
275 }
277 assert (sizeof (sockets[sockets_num].addr) >= ai_ptr->ai_addrlen);
278 memcpy (&sockets[sockets_num].addr, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
279 sockets[sockets_num].addrlen = ai_ptr->ai_addrlen;
281 /* Sending socket: Open only one socket and don't bind it. */
282 if (listen == 0)
283 {
284 sockets_num++;
285 break;
286 }
287 else
288 {
289 int yes = 1;
291 status = setsockopt (sockets[sockets_num].fd, SOL_SOCKET, SO_REUSEADDR,
292 (void *) &yes, sizeof (yes));
293 if (status != 0)
294 {
295 char errbuf[1024];
296 WARNING ("gmond plugin: setsockopt(2) failed: %s",
297 sstrerror (errno, errbuf, sizeof (errbuf)));
298 }
299 }
301 status = bind (sockets[sockets_num].fd, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
302 if (status != 0)
303 {
304 char errbuf[1024];
305 ERROR ("gmond plugin: bind failed: %s",
306 sstrerror (errno, errbuf, sizeof (errbuf)));
307 close (sockets[sockets_num].fd);
308 continue;
309 }
311 if (ai_ptr->ai_family == AF_INET)
312 {
313 struct sockaddr_in *addr;
314 struct ip_mreq mreq;
315 int loop;
317 addr = (struct sockaddr_in *) ai_ptr->ai_addr;
319 if (!IN_MULTICAST (ntohl (addr->sin_addr.s_addr)))
320 {
321 sockets_num++;
322 continue;
323 }
325 loop = 1;
326 setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_MULTICAST_LOOP,
327 (void *) &loop, sizeof (loop));
329 memset (&mreq, 0, sizeof (mreq));
330 mreq.imr_multiaddr.s_addr = addr->sin_addr.s_addr;
331 mreq.imr_interface.s_addr = htonl (INADDR_ANY);
332 setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_ADD_MEMBERSHIP,
333 (void *) &mreq, sizeof (mreq));
334 } /* if (ai_ptr->ai_family == AF_INET) */
335 else if (ai_ptr->ai_family == AF_INET6)
336 {
337 struct sockaddr_in6 *addr;
338 struct ipv6_mreq mreq;
339 int loop;
341 addr = (struct sockaddr_in6 *) ai_ptr->ai_addr;
343 if (!IN6_IS_ADDR_MULTICAST (&addr->sin6_addr))
344 {
345 sockets_num++;
346 continue;
347 }
349 loop = 1;
350 setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_MULTICAST_LOOP,
351 (void *) &loop, sizeof (loop));
353 memset (&mreq, 0, sizeof (mreq));
354 memcpy (&mreq.ipv6mr_multiaddr,
355 &addr->sin6_addr, sizeof (addr->sin6_addr));
356 mreq.ipv6mr_interface = 0; /* any */
357 setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_ADD_MEMBERSHIP,
358 (void *) &mreq, sizeof (mreq));
359 } /* if (ai_ptr->ai_family == AF_INET6) */
361 sockets_num++;
362 } /* }}} for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) */
364 freeaddrinfo (ai_list);
366 if (sockets_num == 0)
367 {
368 sfree (sockets);
369 return (-1);
370 }
372 *ret_sockets = sockets;
373 *ret_sockets_num = sockets_num;
374 return (0);
375 } /* }}} int create_sockets */
377 static int request_meta_data (const char *host, const char *name) /* {{{ */
378 {
379 Ganglia_metadata_msg msg;
380 char buffer[BUFF_SIZE];
381 unsigned int buffer_size;
382 XDR xdr;
383 size_t i;
385 memset (&msg, 0, sizeof (msg));
387 msg.id = gmetadata_request;
388 msg.Ganglia_metadata_msg_u.grequest.metric_id.host = strdup (host);
389 msg.Ganglia_metadata_msg_u.grequest.metric_id.name = strdup (name);
391 if ((msg.Ganglia_metadata_msg_u.grequest.metric_id.host == NULL)
392 || (msg.Ganglia_metadata_msg_u.grequest.metric_id.name == NULL))
393 {
394 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
395 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
396 return (-1);
397 }
399 memset (buffer, 0, sizeof (buffer));
400 xdrmem_create (&xdr, buffer, sizeof (buffer), XDR_ENCODE);
402 if (!xdr_Ganglia_metadata_msg (&xdr, &msg))
403 {
404 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
405 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
406 return (-1);
407 }
409 buffer_size = xdr_getpos (&xdr);
411 DEBUG ("gmond plugin: Requesting meta data for %s/%s.",
412 host, name);
414 pthread_mutex_lock (&mc_send_sockets_lock);
415 for (i = 0; i < mc_send_sockets_num; i++)
416 {
417 ssize_t status = sendto (mc_send_sockets[i].fd, buffer, (size_t) buffer_size,
418 /* flags = */ 0,
419 (struct sockaddr *) &mc_send_sockets[i].addr,
420 mc_send_sockets[i].addrlen);
421 if (status == -1)
422 {
423 char errbuf[1024];
424 ERROR ("gmond plugin: sendto(2) failed: %s",
425 sstrerror (errno, errbuf, sizeof (errbuf)));
426 continue;
427 }
428 }
429 pthread_mutex_unlock (&mc_send_sockets_lock);
431 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
432 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
433 return (0);
434 } /* }}} int request_meta_data */
436 static staging_entry_t *staging_entry_get (const char *host, /* {{{ */
437 const char *name,
438 const char *type, const char *type_instance,
439 int values_len)
440 {
441 char key[2 * DATA_MAX_NAME_LEN];
442 staging_entry_t *se;
443 int status;
445 if (staging_tree == NULL)
446 return (NULL);
448 ssnprintf (key, sizeof (key), "%s/%s/%s", host, type,
449 (type_instance != NULL) ? type_instance : "");
451 se = NULL;
452 status = c_avl_get (staging_tree, key, (void *) &se);
453 if (status == 0)
454 return (se);
456 /* insert new entry */
457 se = calloc (1, sizeof (*se));
458 if (se == NULL)
459 return (NULL);
461 sstrncpy (se->key, key, sizeof (se->key));
462 se->flags = 0;
464 se->vl.values = (value_t *) calloc (values_len, sizeof (*se->vl.values));
465 if (se->vl.values == NULL)
466 {
467 sfree (se);
468 return (NULL);
469 }
470 se->vl.values_len = values_len;
472 se->vl.time = 0;
473 se->vl.interval = 0;
474 sstrncpy (se->vl.host, host, sizeof (se->vl.host));
475 sstrncpy (se->vl.plugin, "gmond", sizeof (se->vl.plugin));
476 sstrncpy (se->vl.type, type, sizeof (se->vl.type));
477 if (type_instance != NULL)
478 sstrncpy (se->vl.type_instance, type_instance,
479 sizeof (se->vl.type_instance));
481 status = c_avl_insert (staging_tree, se->key, se);
482 if (status != 0)
483 {
484 ERROR ("gmond plugin: c_avl_insert failed.");
485 sfree (se->vl.values);
486 sfree (se);
487 return (NULL);
488 }
490 return (se);
491 } /* }}} staging_entry_t *staging_entry_get */
493 static int staging_entry_update (const char *host, const char *name, /* {{{ */
494 const char *type, const char *type_instance,
495 size_t ds_index, int ds_type, value_t value)
496 {
497 const data_set_t *ds;
498 staging_entry_t *se;
500 ds = plugin_get_ds (type);
501 if (ds == NULL)
502 {
503 ERROR ("gmond plugin: Looking up type %s failed.", type);
504 return (-1);
505 }
507 if (ds->ds_num <= ds_index)
508 {
509 ERROR ("gmond plugin: Invalid index %zu: %s has only %zu data source(s).",
510 ds_index, ds->type, ds->ds_num);
511 return (-1);
512 }
514 pthread_mutex_lock (&staging_lock);
516 se = staging_entry_get (host, name, type, type_instance, ds->ds_num);
517 if (se == NULL)
518 {
519 pthread_mutex_unlock (&staging_lock);
520 ERROR ("gmond plugin: staging_entry_get failed.");
521 return (-1);
522 }
523 if (se->vl.values_len != ds->ds_num)
524 {
525 pthread_mutex_unlock (&staging_lock);
526 return (-1);
527 }
529 if (ds_type == DS_TYPE_COUNTER)
530 se->vl.values[ds_index].counter += value.counter;
531 else if (ds_type == DS_TYPE_GAUGE)
532 se->vl.values[ds_index].gauge = value.gauge;
533 else if (ds_type == DS_TYPE_DERIVE)
534 se->vl.values[ds_index].derive += value.derive;
535 else if (ds_type == DS_TYPE_ABSOLUTE)
536 se->vl.values[ds_index].absolute = value.absolute;
537 else
538 assert (23 == 42);
540 se->flags |= (0x01 << ds_index);
542 /* Check if all data sources have been set. If not, return here. */
543 if (se->flags != ((0x01 << se->vl.values_len) - 1))
544 {
545 pthread_mutex_unlock (&staging_lock);
546 return (0);
547 }
549 /* Check if the interval of this metric is known. If not, request meta data
550 * and return. */
551 if (se->vl.interval == 0)
552 {
553 /* No meta data has been received for this metric yet. */
554 se->flags = 0;
555 pthread_mutex_unlock (&staging_lock);
557 request_meta_data (host, name);
558 return (0);
559 }
561 plugin_dispatch_values (&se->vl);
563 se->flags = 0;
564 pthread_mutex_unlock (&staging_lock);
566 return (0);
567 } /* }}} int staging_entry_update */
569 static int mc_handle_value_msg (Ganglia_value_msg *msg) /* {{{ */
570 {
571 const char *host;
572 const char *name;
573 metric_map_t *map;
575 value_t value_counter;
576 value_t value_gauge;
577 value_t value_derive;
579 /* Fill in `host', `name', `value_counter', and `value_gauge' according to
580 * the value type, or return with an error. */
581 switch (msg->id) /* {{{ */
582 {
583 case gmetric_uint:
584 {
585 Ganglia_gmetric_uint msg_uint;
587 msg_uint = msg->Ganglia_value_msg_u.gu_int;
589 host = msg_uint.metric_id.host;
590 name = msg_uint.metric_id.name;
591 value_counter.counter = (counter_t) msg_uint.ui;
592 value_gauge.gauge = (gauge_t) msg_uint.ui;
593 value_derive.derive = (derive_t) msg_uint.ui;
594 break;
595 }
597 case gmetric_string:
598 {
599 Ganglia_gmetric_string msg_string;
600 int status;
602 msg_string = msg->Ganglia_value_msg_u.gstr;
604 host = msg_string.metric_id.host;
605 name = msg_string.metric_id.name;
607 status = parse_value (msg_string.str, &value_derive, DS_TYPE_DERIVE);
608 if (status != 0)
609 value_derive.derive = -1;
611 status = parse_value (msg_string.str, &value_gauge, DS_TYPE_GAUGE);
612 if (status != 0)
613 value_gauge.gauge = NAN;
615 status = parse_value (msg_string.str, &value_counter, DS_TYPE_COUNTER);
616 if (status != 0)
617 value_counter.counter = 0;
619 break;
620 }
622 case gmetric_float:
623 {
624 Ganglia_gmetric_float msg_float;
626 msg_float = msg->Ganglia_value_msg_u.gf;
628 host = msg_float.metric_id.host;
629 name = msg_float.metric_id.name;
630 value_counter.counter = (counter_t) msg_float.f;
631 value_gauge.gauge = (gauge_t) msg_float.f;
632 value_derive.derive = (derive_t) msg_float.f;
633 break;
634 }
636 case gmetric_double:
637 {
638 Ganglia_gmetric_double msg_double;
640 msg_double = msg->Ganglia_value_msg_u.gd;
642 host = msg_double.metric_id.host;
643 name = msg_double.metric_id.name;
644 value_counter.counter = (counter_t) msg_double.d;
645 value_gauge.gauge = (gauge_t) msg_double.d;
646 value_derive.derive = (derive_t) msg_double.d;
647 break;
648 }
649 default:
650 DEBUG ("gmond plugin: Value type not handled: %i", msg->id);
651 return (-1);
652 } /* }}} switch (msg->id) */
654 assert (host != NULL);
655 assert (name != NULL);
657 map = metric_lookup (name);
658 if (map != NULL)
659 {
660 value_t val_copy;
662 if ((map->ds_type == DS_TYPE_COUNTER)
663 || (map->ds_type == DS_TYPE_ABSOLUTE))
664 val_copy = value_counter;
665 else if (map->ds_type == DS_TYPE_GAUGE)
666 val_copy = value_gauge;
667 else if (map->ds_type == DS_TYPE_DERIVE)
668 val_copy = value_derive;
669 else
670 assert (23 == 42);
672 return (staging_entry_update (host, name,
673 map->type, map->type_instance,
674 map->ds_index, map->ds_type,
675 val_copy));
676 }
678 DEBUG ("gmond plugin: Cannot find a translation for %s.", name);
679 return (-1);
680 } /* }}} int mc_handle_value_msg */
682 static int mc_handle_metadata_msg (Ganglia_metadata_msg *msg) /* {{{ */
683 {
684 switch (msg->id)
685 {
686 case gmetadata_full:
687 {
688 Ganglia_metadatadef msg_meta;
689 staging_entry_t *se;
690 const data_set_t *ds;
691 metric_map_t *map;
693 msg_meta = msg->Ganglia_metadata_msg_u.gfull;
695 if (msg_meta.metric.tmax <= 0)
696 return (-1);
698 map = metric_lookup (msg_meta.metric_id.name);
699 if (map == NULL)
700 {
701 DEBUG ("gmond plugin: Not handling meta data %s.",
702 msg_meta.metric_id.name);
703 return (0);
704 }
706 ds = plugin_get_ds (map->type);
707 if (ds == NULL)
708 {
709 WARNING ("gmond plugin: Could not find data set %s.", map->type);
710 return (-1);
711 }
713 DEBUG ("gmond plugin: Received meta data for %s/%s.",
714 msg_meta.metric_id.host, msg_meta.metric_id.name);
716 pthread_mutex_lock (&staging_lock);
717 se = staging_entry_get (msg_meta.metric_id.host,
718 msg_meta.metric_id.name,
719 map->type, map->type_instance,
720 ds->ds_num);
721 if (se != NULL)
722 se->vl.interval = TIME_T_TO_CDTIME_T (msg_meta.metric.tmax);
723 pthread_mutex_unlock (&staging_lock);
725 if (se == NULL)
726 {
727 ERROR ("gmond plugin: staging_entry_get failed.");
728 return (-1);
729 }
731 break;
732 }
734 default:
735 {
736 return (-1);
737 }
738 }
740 return (0);
741 } /* }}} int mc_handle_metadata_msg */
743 static int mc_handle_metric (void *buffer, size_t buffer_size) /* {{{ */
744 {
745 XDR xdr;
746 Ganglia_msg_formats format;
748 xdrmem_create (&xdr, buffer, buffer_size, XDR_DECODE);
750 xdr_Ganglia_msg_formats (&xdr, &format);
751 xdr_setpos (&xdr, 0);
753 switch (format)
754 {
755 case gmetric_ushort:
756 case gmetric_short:
757 case gmetric_int:
758 case gmetric_uint:
759 case gmetric_string:
760 case gmetric_float:
761 case gmetric_double:
762 {
763 Ganglia_value_msg msg;
765 memset (&msg, 0, sizeof (msg));
766 if (xdr_Ganglia_value_msg (&xdr, &msg))
767 mc_handle_value_msg (&msg);
768 break;
769 }
771 case gmetadata_full:
772 case gmetadata_request:
773 {
774 Ganglia_metadata_msg msg;
775 memset (&msg, 0, sizeof (msg));
776 if (xdr_Ganglia_metadata_msg (&xdr, &msg))
777 mc_handle_metadata_msg (&msg);
778 break;
779 }
781 default:
782 DEBUG ("gmond plugin: Unknown format: %i", format);
783 return (-1);
784 } /* switch (format) */
787 return (0);
788 } /* }}} int mc_handle_metric */
790 static int mc_handle_socket (struct pollfd *p) /* {{{ */
791 {
792 char buffer[BUFF_SIZE];
793 ssize_t buffer_size;
795 if ((p->revents & (POLLIN | POLLPRI)) == 0)
796 {
797 p->revents = 0;
798 return (-1);
799 }
801 buffer_size = recv (p->fd, buffer, sizeof (buffer), /* flags = */ 0);
802 if (buffer_size <= 0)
803 {
804 char errbuf[1024];
805 ERROR ("gmond plugin: recv failed: %s",
806 sstrerror (errno, errbuf, sizeof (errbuf)));
807 p->revents = 0;
808 return (-1);
809 }
811 mc_handle_metric (buffer, (size_t) buffer_size);
812 return (0);
813 } /* }}} int mc_handle_socket */
815 static void *mc_receive_thread (void *arg) /* {{{ */
816 {
817 socket_entry_t *mc_receive_socket_entries;
818 int status;
819 size_t i;
821 mc_receive_socket_entries = NULL;
822 status = create_sockets (&mc_receive_socket_entries, &mc_receive_sockets_num,
823 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
824 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
825 /* listen = */ 1);
826 if (status != 0)
827 {
828 ERROR ("gmond plugin: create_sockets failed.");
829 return ((void *) -1);
830 }
832 mc_receive_sockets = (struct pollfd *) calloc (mc_receive_sockets_num,
833 sizeof (*mc_receive_sockets));
834 if (mc_receive_sockets == NULL)
835 {
836 ERROR ("gmond plugin: calloc failed.");
837 for (i = 0; i < mc_receive_sockets_num; i++)
838 close (mc_receive_socket_entries[i].fd);
839 free (mc_receive_socket_entries);
840 mc_receive_socket_entries = NULL;
841 mc_receive_sockets_num = 0;
842 return ((void *) -1);
843 }
845 for (i = 0; i < mc_receive_sockets_num; i++)
846 {
847 mc_receive_sockets[i].fd = mc_receive_socket_entries[i].fd;
848 mc_receive_sockets[i].events = POLLIN | POLLPRI;
849 mc_receive_sockets[i].revents = 0;
850 }
852 while (mc_receive_thread_loop != 0)
853 {
854 status = poll (mc_receive_sockets, mc_receive_sockets_num, -1);
855 if (status <= 0)
856 {
857 char errbuf[1024];
858 if (errno == EINTR)
859 continue;
860 ERROR ("gmond plugin: poll failed: %s",
861 sstrerror (errno, errbuf, sizeof (errbuf)));
862 break;
863 }
865 for (i = 0; i < mc_receive_sockets_num; i++)
866 {
867 if (mc_receive_sockets[i].revents != 0)
868 mc_handle_socket (mc_receive_sockets + i);
869 }
870 } /* while (mc_receive_thread_loop != 0) */
872 free (mc_receive_socket_entries);
873 return ((void *) 0);
874 } /* }}} void *mc_receive_thread */
876 static int mc_receive_thread_start (void) /* {{{ */
877 {
878 int status;
880 if (mc_receive_thread_running != 0)
881 return (-1);
883 mc_receive_thread_loop = 1;
885 status = plugin_thread_create (&mc_receive_thread_id, /* attr = */ NULL,
886 mc_receive_thread, /* args = */ NULL);
887 if (status != 0)
888 {
889 ERROR ("gmond plugin: Starting receive thread failed.");
890 mc_receive_thread_loop = 0;
891 return (-1);
892 }
894 mc_receive_thread_running = 1;
895 return (0);
896 } /* }}} int start_receive_thread */
898 static int mc_receive_thread_stop (void) /* {{{ */
899 {
900 if (mc_receive_thread_running == 0)
901 return (-1);
903 mc_receive_thread_loop = 0;
905 INFO ("gmond plugin: Stopping receive thread.");
906 pthread_kill (mc_receive_thread_id, SIGTERM);
907 pthread_join (mc_receive_thread_id, /* return value = */ NULL);
908 memset (&mc_receive_thread_id, 0, sizeof (mc_receive_thread_id));
910 mc_receive_thread_running = 0;
912 return (0);
913 } /* }}} int mc_receive_thread_stop */
915 /*
916 * Config:
917 *
918 * <Plugin gmond>
919 * MCReceiveFrom "239.2.11.71" "8649"
920 * <Metric "load_one">
921 * Type "load"
922 * [TypeInstance "foo"]
923 * [DataSource "bar"]
924 * </Metric>
925 * </Plugin>
926 */
927 static int gmond_config_set_string (oconfig_item_t *ci, char **str) /* {{{ */
928 {
929 char *tmp;
931 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
932 {
933 WARNING ("gmond plugin: The `%s' option needs "
934 "exactly one string argument.", ci->key);
935 return (-1);
936 }
938 tmp = strdup (ci->values[0].value.string);
939 if (tmp == NULL)
940 {
941 ERROR ("gmond plugin: strdup failed.");
942 return (-1);
943 }
945 sfree (*str);
946 *str = tmp;
947 return (0);
948 } /* }}} int gmond_config_set_string */
950 static int gmond_config_add_metric (oconfig_item_t *ci) /* {{{ */
951 {
952 metric_map_t *map;
953 int i;
955 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
956 {
957 WARNING ("gmond plugin: `Metric' blocks need "
958 "exactly one string argument.");
959 return (-1);
960 }
962 map = realloc (metric_map, (metric_map_len + 1) * sizeof (*metric_map));
963 if (map == NULL)
964 {
965 ERROR ("gmond plugin: realloc failed.");
966 return (-1);
967 }
968 metric_map = map;
969 map = metric_map + metric_map_len;
971 memset (map, 0, sizeof (*map));
972 map->type = NULL;
973 map->type_instance = NULL;
974 map->ds_name = NULL;
975 map->ds_type = -1;
976 map->ds_index = -1;
978 map->ganglia_name = strdup (ci->values[0].value.string);
979 if (map->ganglia_name == NULL)
980 {
981 ERROR ("gmond plugin: strdup failed.");
982 return (-1);
983 }
985 for (i = 0; i < ci->children_num; i++)
986 {
987 oconfig_item_t *child = ci->children + i;
988 if (strcasecmp ("Type", child->key) == 0)
989 gmond_config_set_string (child, &map->type);
990 else if (strcasecmp ("TypeInstance", child->key) == 0)
991 gmond_config_set_string (child, &map->type_instance);
992 else if (strcasecmp ("DataSource", child->key) == 0)
993 gmond_config_set_string (child, &map->ds_name);
994 else
995 {
996 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
997 child->key);
998 }
999 }
1001 if (map->type == NULL)
1002 {
1003 ERROR ("gmond plugin: No type is set for metric %s.",
1004 map->ganglia_name);
1005 sfree (map->ganglia_name);
1006 sfree (map->type_instance);
1007 return (-1);
1008 }
1010 metric_map_len++;
1011 return (0);
1012 } /* }}} int gmond_config_add_metric */
1014 static int gmond_config_set_address (oconfig_item_t *ci, /* {{{ */
1015 char **ret_addr, char **ret_port)
1016 {
1017 char *addr;
1018 char *port;
1020 if ((ci->values_num != 1) && (ci->values_num != 2))
1021 {
1022 WARNING ("gmond plugin: The `%s' config option needs "
1023 "one or two string arguments.",
1024 ci->key);
1025 return (-1);
1026 }
1027 if ((ci->values[0].type != OCONFIG_TYPE_STRING)
1028 || ((ci->values_num == 2)
1029 && (ci->values[1].type != OCONFIG_TYPE_STRING)))
1030 {
1031 WARNING ("gmond plugin: The `%s' config option needs "
1032 "one or two string arguments.",
1033 ci->key);
1034 return (-1);
1035 }
1037 addr = strdup (ci->values[0].value.string);
1038 if (ci->values_num == 2)
1039 port = strdup (ci->values[1].value.string);
1040 else
1041 port = NULL;
1043 if ((addr == NULL) || ((ci->values_num == 2) && (port == NULL)))
1044 {
1045 ERROR ("gmond plugin: strdup failed.");
1046 sfree (addr);
1047 sfree (port);
1048 return (-1);
1049 }
1051 sfree (*ret_addr);
1052 sfree (*ret_port);
1054 *ret_addr = addr;
1055 *ret_port = port;
1057 return (0);
1058 } /* }}} int gmond_config_set_address */
1060 static int gmond_config (oconfig_item_t *ci) /* {{{ */
1061 {
1062 int i;
1064 for (i = 0; i < ci->children_num; i++)
1065 {
1066 oconfig_item_t *child = ci->children + i;
1067 if (strcasecmp ("MCReceiveFrom", child->key) == 0)
1068 gmond_config_set_address (child, &mc_receive_group, &mc_receive_port);
1069 else if (strcasecmp ("Metric", child->key) == 0)
1070 gmond_config_add_metric (child);
1071 else
1072 {
1073 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1074 child->key);
1075 }
1076 }
1078 return (0);
1079 } /* }}} int gmond_config */
1081 static int gmond_init (void) /* {{{ */
1082 {
1083 create_sockets (&mc_send_sockets, &mc_send_sockets_num,
1084 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
1085 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
1086 /* listen = */ 0);
1088 staging_tree = c_avl_create ((void *) strcmp);
1089 if (staging_tree == NULL)
1090 {
1091 ERROR ("gmond plugin: c_avl_create failed.");
1092 return (-1);
1093 }
1095 mc_receive_thread_start ();
1097 return (0);
1098 } /* }}} int gmond_init */
1100 static int gmond_shutdown (void) /* {{{ */
1101 {
1102 size_t i;
1104 mc_receive_thread_stop ();
1106 pthread_mutex_lock (&mc_send_sockets_lock);
1107 for (i = 0; i < mc_send_sockets_num; i++)
1108 {
1109 close (mc_send_sockets[i].fd);
1110 mc_send_sockets[i].fd = -1;
1111 }
1112 sfree (mc_send_sockets);
1113 mc_send_sockets_num = 0;
1114 pthread_mutex_unlock (&mc_send_sockets_lock);
1117 return (0);
1118 } /* }}} int gmond_shutdown */
1120 void module_register (void)
1121 {
1122 plugin_register_complex_config ("gmond", gmond_config);
1123 plugin_register_init ("gmond", gmond_init);
1124 plugin_register_shutdown ("gmond", gmond_shutdown);
1125 }
1127 /* vim: set sw=2 sts=2 et fdm=marker : */