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