1 /**
2 * collectd - src/gmond.c
3 * Copyright (C) 2009,2010 Florian octo Forster
4 *
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the
7 * Free Software Foundation; only version 2 of the License is applicable.
8 *
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License along
15 * with this program; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
17 *
18 * Authors:
19 * Florian octo Forster <octo at collectd.org>
20 **/
22 #include "collectd.h"
23 #include "plugin.h"
24 #include "common.h"
25 #include "configfile.h"
26 #include "utils_avltree.h"
28 #if HAVE_PTHREAD_H
29 # include <pthread.h>
30 #endif
31 #if HAVE_SYS_SOCKET_H
32 # include <sys/socket.h>
33 #endif
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 int 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) || (map[i].ds_index < 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 int 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_hints;
216 struct addrinfo *ai_list;
217 struct addrinfo *ai_ptr;
218 int ai_return;
220 socket_entry_t *sockets = NULL;
221 size_t sockets_num = 0;
223 int status;
225 if (*ret_sockets != NULL)
226 return (EINVAL);
228 memset (&ai_hints, 0, sizeof (ai_hints));
229 ai_hints.ai_flags = 0;
230 #ifdef AI_PASSIVE
231 ai_hints.ai_flags |= AI_PASSIVE;
232 #endif
233 #ifdef AI_ADDRCONFIG
234 ai_hints.ai_flags |= AI_ADDRCONFIG;
235 #endif
236 ai_hints.ai_family = AF_UNSPEC;
237 ai_hints.ai_socktype = SOCK_DGRAM;
238 ai_hints.ai_protocol = IPPROTO_UDP;
240 ai_return = getaddrinfo (node, service, &ai_hints, &ai_list);
241 if (ai_return != 0)
242 {
243 char errbuf[1024];
244 ERROR ("gmond plugin: getaddrinfo (%s, %s) failed: %s",
245 (node == NULL) ? "(null)" : node,
246 (service == NULL) ? "(null)" : service,
247 (ai_return == EAI_SYSTEM)
248 ? sstrerror (errno, errbuf, sizeof (errbuf))
249 : gai_strerror (ai_return));
250 return (-1);
251 }
253 for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) /* {{{ */
254 {
255 socket_entry_t *tmp;
257 tmp = realloc (sockets, (sockets_num + 1) * sizeof (*sockets));
258 if (tmp == NULL)
259 {
260 ERROR ("gmond plugin: realloc failed.");
261 continue;
262 }
263 sockets = tmp;
265 sockets[sockets_num].fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype,
266 ai_ptr->ai_protocol);
267 if (sockets[sockets_num].fd < 0)
268 {
269 char errbuf[1024];
270 ERROR ("gmond plugin: socket failed: %s",
271 sstrerror (errno, errbuf, sizeof (errbuf)));
272 continue;
273 }
275 assert (sizeof (sockets[sockets_num].addr) >= ai_ptr->ai_addrlen);
276 memcpy (&sockets[sockets_num].addr, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
277 sockets[sockets_num].addrlen = ai_ptr->ai_addrlen;
279 /* Sending socket: Open only one socket and don't bind it. */
280 if (listen == 0)
281 {
282 sockets_num++;
283 break;
284 }
285 else
286 {
287 int yes = 1;
289 status = setsockopt (sockets[sockets_num].fd, SOL_SOCKET, SO_REUSEADDR,
290 (void *) &yes, sizeof (yes));
291 if (status != 0)
292 {
293 char errbuf[1024];
294 WARNING ("gmond plugin: setsockopt(2) failed: %s",
295 sstrerror (errno, errbuf, sizeof (errbuf)));
296 }
297 }
299 status = bind (sockets[sockets_num].fd, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
300 if (status != 0)
301 {
302 char errbuf[1024];
303 ERROR ("gmond plugin: bind failed: %s",
304 sstrerror (errno, errbuf, sizeof (errbuf)));
305 close (sockets[sockets_num].fd);
306 continue;
307 }
309 if (ai_ptr->ai_family == AF_INET)
310 {
311 struct sockaddr_in *addr;
312 struct ip_mreq mreq;
313 int loop;
315 addr = (struct sockaddr_in *) ai_ptr->ai_addr;
317 if (!IN_MULTICAST (ntohl (addr->sin_addr.s_addr)))
318 {
319 sockets_num++;
320 continue;
321 }
323 loop = 1;
324 setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_MULTICAST_LOOP,
325 (void *) &loop, sizeof (loop));
327 memset (&mreq, 0, sizeof (mreq));
328 mreq.imr_multiaddr.s_addr = addr->sin_addr.s_addr;
329 mreq.imr_interface.s_addr = htonl (INADDR_ANY);
330 setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_ADD_MEMBERSHIP,
331 (void *) &mreq, sizeof (mreq));
332 } /* if (ai_ptr->ai_family == AF_INET) */
333 else if (ai_ptr->ai_family == AF_INET6)
334 {
335 struct sockaddr_in6 *addr;
336 struct ipv6_mreq mreq;
337 int loop;
339 addr = (struct sockaddr_in6 *) ai_ptr->ai_addr;
341 if (!IN6_IS_ADDR_MULTICAST (&addr->sin6_addr))
342 {
343 sockets_num++;
344 continue;
345 }
347 loop = 1;
348 setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_MULTICAST_LOOP,
349 (void *) &loop, sizeof (loop));
351 memset (&mreq, 0, sizeof (mreq));
352 memcpy (&mreq.ipv6mr_multiaddr,
353 &addr->sin6_addr, sizeof (addr->sin6_addr));
354 mreq.ipv6mr_interface = 0; /* any */
355 setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_ADD_MEMBERSHIP,
356 (void *) &mreq, sizeof (mreq));
357 } /* if (ai_ptr->ai_family == AF_INET6) */
359 sockets_num++;
360 } /* }}} for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) */
362 freeaddrinfo (ai_list);
364 if (sockets_num == 0)
365 {
366 sfree (sockets);
367 return (-1);
368 }
370 *ret_sockets = sockets;
371 *ret_sockets_num = sockets_num;
372 return (0);
373 } /* }}} int create_sockets */
375 static int request_meta_data (const char *host, const char *name) /* {{{ */
376 {
377 Ganglia_metadata_msg msg;
378 char buffer[BUFF_SIZE];
379 unsigned int buffer_size;
380 XDR xdr;
381 size_t i;
383 memset (&msg, 0, sizeof (msg));
385 msg.id = gmetadata_request;
386 msg.Ganglia_metadata_msg_u.grequest.metric_id.host = strdup (host);
387 msg.Ganglia_metadata_msg_u.grequest.metric_id.name = strdup (name);
389 if ((msg.Ganglia_metadata_msg_u.grequest.metric_id.host == NULL)
390 || (msg.Ganglia_metadata_msg_u.grequest.metric_id.name == NULL))
391 {
392 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
393 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
394 return (-1);
395 }
397 memset (buffer, 0, sizeof (buffer));
398 xdrmem_create (&xdr, buffer, sizeof (buffer), XDR_ENCODE);
400 if (!xdr_Ganglia_metadata_msg (&xdr, &msg))
401 {
402 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
403 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
404 return (-1);
405 }
407 buffer_size = xdr_getpos (&xdr);
409 DEBUG ("gmond plugin: Requesting meta data for %s/%s.",
410 host, name);
412 pthread_mutex_lock (&mc_send_sockets_lock);
413 for (i = 0; i < mc_send_sockets_num; i++)
414 {
415 ssize_t status = sendto (mc_send_sockets[i].fd, buffer, (size_t) buffer_size,
416 /* flags = */ 0,
417 (struct sockaddr *) &mc_send_sockets[i].addr,
418 mc_send_sockets[i].addrlen);
419 if (status == -1)
420 {
421 char errbuf[1024];
422 ERROR ("gmond plugin: sendto(2) failed: %s",
423 sstrerror (errno, errbuf, sizeof (errbuf)));
424 continue;
425 }
426 }
427 pthread_mutex_unlock (&mc_send_sockets_lock);
429 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
430 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
431 return (0);
432 } /* }}} int request_meta_data */
434 static staging_entry_t *staging_entry_get (const char *host, /* {{{ */
435 const char *name,
436 const char *type, const char *type_instance,
437 int values_len)
438 {
439 char key[2 * DATA_MAX_NAME_LEN];
440 staging_entry_t *se;
441 int status;
443 if (staging_tree == NULL)
444 return (NULL);
446 ssnprintf (key, sizeof (key), "%s/%s/%s", host, type,
447 (type_instance != NULL) ? type_instance : "");
449 se = NULL;
450 status = c_avl_get (staging_tree, key, (void *) &se);
451 if (status == 0)
452 return (se);
454 /* insert new entry */
455 se = (staging_entry_t *) malloc (sizeof (*se));
456 if (se == NULL)
457 return (NULL);
458 memset (se, 0, sizeof (*se));
460 sstrncpy (se->key, key, sizeof (se->key));
461 se->flags = 0;
463 se->vl.values = (value_t *) calloc (values_len, sizeof (*se->vl.values));
464 if (se->vl.values == NULL)
465 {
466 sfree (se);
467 return (NULL);
468 }
469 se->vl.values_len = values_len;
471 se->vl.time = 0;
472 se->vl.interval = 0;
473 sstrncpy (se->vl.host, host, sizeof (se->vl.host));
474 sstrncpy (se->vl.plugin, "gmond", sizeof (se->vl.plugin));
475 sstrncpy (se->vl.type, type, sizeof (se->vl.type));
476 if (type_instance != NULL)
477 sstrncpy (se->vl.type_instance, type_instance,
478 sizeof (se->vl.type_instance));
480 status = c_avl_insert (staging_tree, se->key, se);
481 if (status != 0)
482 {
483 ERROR ("gmond plugin: c_avl_insert failed.");
484 sfree (se->vl.values);
485 sfree (se);
486 return (NULL);
487 }
489 return (se);
490 } /* }}} staging_entry_t *staging_entry_get */
492 static int staging_entry_submit (const char *host, const char *name, /* {{{ */
493 staging_entry_t *se)
494 {
495 value_list_t vl;
496 value_t values[se->vl.values_len];
498 if (se->vl.interval == 0)
499 {
500 /* No meta data has been received for this metric yet. */
501 se->flags = 0;
502 pthread_mutex_unlock (&staging_lock);
503 request_meta_data (host, name);
504 return (0);
505 }
507 se->flags = 0;
509 memcpy (values, se->vl.values, sizeof (values));
510 memcpy (&vl, &se->vl, sizeof (vl));
512 /* Unlock before calling `plugin_dispatch_values'.. */
513 pthread_mutex_unlock (&staging_lock);
515 vl.values = values;
517 plugin_dispatch_values (&vl);
519 return (0);
520 } /* }}} int staging_entry_submit */
522 static int staging_entry_update (const char *host, const char *name, /* {{{ */
523 const char *type, const char *type_instance,
524 int ds_index, int ds_type, value_t value)
525 {
526 const data_set_t *ds;
527 staging_entry_t *se;
529 ds = plugin_get_ds (type);
530 if (ds == NULL)
531 {
532 ERROR ("gmond plugin: Looking up type %s failed.", type);
533 return (-1);
534 }
536 if (ds->ds_num <= ds_index)
537 {
538 ERROR ("gmond plugin: Invalid index %i: %s has only %i data source(s).",
539 ds_index, ds->type, ds->ds_num);
540 return (-1);
541 }
543 pthread_mutex_lock (&staging_lock);
545 se = staging_entry_get (host, name, type, type_instance, ds->ds_num);
546 if (se == NULL)
547 {
548 pthread_mutex_unlock (&staging_lock);
549 ERROR ("gmond plugin: staging_entry_get failed.");
550 return (-1);
551 }
552 if (se->vl.values_len != ds->ds_num)
553 {
554 pthread_mutex_unlock (&staging_lock);
555 return (-1);
556 }
558 if (ds_type == DS_TYPE_COUNTER)
559 se->vl.values[ds_index].counter += value.counter;
560 else if (ds_type == DS_TYPE_GAUGE)
561 se->vl.values[ds_index].gauge = value.gauge;
562 else if (ds_type == DS_TYPE_DERIVE)
563 se->vl.values[ds_index].derive += value.derive;
564 else if (ds_type == DS_TYPE_ABSOLUTE)
565 se->vl.values[ds_index].absolute = value.absolute;
566 else
567 assert (23 == 42);
569 se->flags |= (0x01 << ds_index);
571 /* Check if all values have been set and submit if so. */
572 if (se->flags == ((0x01 << se->vl.values_len) - 1))
573 {
574 /* `staging_lock' is unlocked in `staging_entry_submit'. */
575 staging_entry_submit (host, name, se);
576 }
577 else
578 {
579 pthread_mutex_unlock (&staging_lock);
580 }
582 return (0);
583 } /* }}} int staging_entry_update */
585 static int mc_handle_value_msg (Ganglia_value_msg *msg) /* {{{ */
586 {
587 const char *host;
588 const char *name;
589 metric_map_t *map;
591 value_t value_counter;
592 value_t value_gauge;
593 value_t value_derive;
595 /* Fill in `host', `name', `value_counter', and `value_gauge' according to
596 * the value type, or return with an error. */
597 switch (msg->id) /* {{{ */
598 {
599 case gmetric_uint:
600 {
601 Ganglia_gmetric_uint msg_uint;
603 msg_uint = msg->Ganglia_value_msg_u.gu_int;
605 host = msg_uint.metric_id.host;
606 name = msg_uint.metric_id.name;
607 value_counter.counter = (counter_t) msg_uint.ui;
608 value_gauge.gauge = (gauge_t) msg_uint.ui;
609 value_derive.derive = (derive_t) msg_uint.ui;
610 break;
611 }
613 case gmetric_string:
614 {
615 Ganglia_gmetric_string msg_string;
616 int status;
618 msg_string = msg->Ganglia_value_msg_u.gstr;
620 host = msg_string.metric_id.host;
621 name = msg_string.metric_id.name;
623 status = parse_value (msg_string.str, &value_derive, DS_TYPE_DERIVE);
624 if (status != 0)
625 value_derive.derive = -1;
627 status = parse_value (msg_string.str, &value_gauge, DS_TYPE_GAUGE);
628 if (status != 0)
629 value_gauge.gauge = NAN;
631 status = parse_value (msg_string.str, &value_counter, DS_TYPE_COUNTER);
632 if (status != 0)
633 value_counter.counter = 0;
635 break;
636 }
638 case gmetric_float:
639 {
640 Ganglia_gmetric_float msg_float;
642 msg_float = msg->Ganglia_value_msg_u.gf;
644 host = msg_float.metric_id.host;
645 name = msg_float.metric_id.name;
646 value_counter.counter = (counter_t) msg_float.f;
647 value_gauge.gauge = (gauge_t) msg_float.f;
648 value_derive.derive = (derive_t) msg_float.f;
649 break;
650 }
652 case gmetric_double:
653 {
654 Ganglia_gmetric_double msg_double;
656 msg_double = msg->Ganglia_value_msg_u.gd;
658 host = msg_double.metric_id.host;
659 name = msg_double.metric_id.name;
660 value_counter.counter = (counter_t) msg_double.d;
661 value_gauge.gauge = (gauge_t) msg_double.d;
662 value_derive.derive = (derive_t) msg_double.d;
663 break;
664 }
665 default:
666 DEBUG ("gmond plugin: Value type not handled: %i", msg->id);
667 return (-1);
668 } /* }}} switch (msg->id) */
670 assert (host != NULL);
671 assert (name != NULL);
673 map = metric_lookup (name);
674 if (map != NULL)
675 {
676 value_t val_copy;
678 if ((map->ds_type == DS_TYPE_COUNTER)
679 || (map->ds_type == DS_TYPE_ABSOLUTE))
680 val_copy = value_counter;
681 else if (map->ds_type == DS_TYPE_GAUGE)
682 val_copy = value_gauge;
683 else if (map->ds_type == DS_TYPE_DERIVE)
684 val_copy = value_derive;
685 else
686 assert (23 == 42);
688 return (staging_entry_update (host, name,
689 map->type, map->type_instance,
690 map->ds_index, map->ds_type,
691 val_copy));
692 }
694 DEBUG ("gmond plugin: Cannot find a translation for %s.", name);
695 return (-1);
696 } /* }}} int mc_handle_value_msg */
698 static int mc_handle_metadata_msg (Ganglia_metadata_msg *msg) /* {{{ */
699 {
700 switch (msg->id)
701 {
702 case gmetadata_full:
703 {
704 Ganglia_metadatadef msg_meta;
705 staging_entry_t *se;
706 const data_set_t *ds;
707 metric_map_t *map;
709 msg_meta = msg->Ganglia_metadata_msg_u.gfull;
711 if (msg_meta.metric.tmax <= 0)
712 return (-1);
714 map = metric_lookup (msg_meta.metric_id.name);
715 if (map == NULL)
716 {
717 DEBUG ("gmond plugin: Not handling meta data %s.",
718 msg_meta.metric_id.name);
719 return (0);
720 }
722 ds = plugin_get_ds (map->type);
723 if (ds == NULL)
724 {
725 WARNING ("gmond plugin: Could not find data set %s.", map->type);
726 return (-1);
727 }
729 DEBUG ("gmond plugin: Received meta data for %s/%s.",
730 msg_meta.metric_id.host, msg_meta.metric_id.name);
732 pthread_mutex_lock (&staging_lock);
733 se = staging_entry_get (msg_meta.metric_id.host,
734 msg_meta.metric_id.name,
735 map->type, map->type_instance,
736 ds->ds_num);
737 if (se != NULL)
738 se->vl.interval = TIME_T_TO_CDTIME_T (msg_meta.metric.tmax);
739 pthread_mutex_unlock (&staging_lock);
741 if (se == NULL)
742 {
743 ERROR ("gmond plugin: staging_entry_get failed.");
744 return (-1);
745 }
747 break;
748 }
750 default:
751 {
752 return (-1);
753 }
754 }
756 return (0);
757 } /* }}} int mc_handle_metadata_msg */
759 static int mc_handle_metric (void *buffer, size_t buffer_size) /* {{{ */
760 {
761 XDR xdr;
762 Ganglia_msg_formats format;
764 xdrmem_create (&xdr, buffer, buffer_size, XDR_DECODE);
766 xdr_Ganglia_msg_formats (&xdr, &format);
767 xdr_setpos (&xdr, 0);
769 switch (format)
770 {
771 case gmetric_ushort:
772 case gmetric_short:
773 case gmetric_int:
774 case gmetric_uint:
775 case gmetric_string:
776 case gmetric_float:
777 case gmetric_double:
778 {
779 Ganglia_value_msg msg;
781 memset (&msg, 0, sizeof (msg));
782 if (xdr_Ganglia_value_msg (&xdr, &msg))
783 mc_handle_value_msg (&msg);
784 break;
785 }
787 case gmetadata_full:
788 case gmetadata_request:
789 {
790 Ganglia_metadata_msg msg;
791 memset (&msg, 0, sizeof (msg));
792 if (xdr_Ganglia_metadata_msg (&xdr, &msg))
793 mc_handle_metadata_msg (&msg);
794 break;
795 }
797 default:
798 DEBUG ("gmond plugin: Unknown format: %i", format);
799 return (-1);
800 } /* switch (format) */
803 return (0);
804 } /* }}} int mc_handle_metric */
806 static int mc_handle_socket (struct pollfd *p) /* {{{ */
807 {
808 char buffer[BUFF_SIZE];
809 ssize_t buffer_size;
811 if ((p->revents & (POLLIN | POLLPRI)) == 0)
812 {
813 p->revents = 0;
814 return (-1);
815 }
817 buffer_size = recv (p->fd, buffer, sizeof (buffer), /* flags = */ 0);
818 if (buffer_size <= 0)
819 {
820 char errbuf[1024];
821 ERROR ("gmond plugin: recv failed: %s",
822 sstrerror (errno, errbuf, sizeof (errbuf)));
823 p->revents = 0;
824 return (-1);
825 }
827 mc_handle_metric (buffer, (size_t) buffer_size);
828 return (0);
829 } /* }}} int mc_handle_socket */
831 static void *mc_receive_thread (void *arg) /* {{{ */
832 {
833 socket_entry_t *mc_receive_socket_entries;
834 int status;
835 size_t i;
837 mc_receive_socket_entries = NULL;
838 status = create_sockets (&mc_receive_socket_entries, &mc_receive_sockets_num,
839 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
840 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
841 /* listen = */ 1);
842 if (status != 0)
843 {
844 ERROR ("gmond plugin: create_sockets failed.");
845 return ((void *) -1);
846 }
848 mc_receive_sockets = (struct pollfd *) calloc (mc_receive_sockets_num,
849 sizeof (*mc_receive_sockets));
850 if (mc_receive_sockets == NULL)
851 {
852 ERROR ("gmond plugin: calloc failed.");
853 for (i = 0; i < mc_receive_sockets_num; i++)
854 close (mc_receive_socket_entries[i].fd);
855 free (mc_receive_socket_entries);
856 mc_receive_socket_entries = NULL;
857 mc_receive_sockets_num = 0;
858 return ((void *) -1);
859 }
861 for (i = 0; i < mc_receive_sockets_num; i++)
862 {
863 mc_receive_sockets[i].fd = mc_receive_socket_entries[i].fd;
864 mc_receive_sockets[i].events = POLLIN | POLLPRI;
865 mc_receive_sockets[i].revents = 0;
866 }
868 while (mc_receive_thread_loop != 0)
869 {
870 status = poll (mc_receive_sockets, mc_receive_sockets_num, -1);
871 if (status <= 0)
872 {
873 char errbuf[1024];
874 if (errno == EINTR)
875 continue;
876 ERROR ("gmond plugin: poll failed: %s",
877 sstrerror (errno, errbuf, sizeof (errbuf)));
878 break;
879 }
881 for (i = 0; i < mc_receive_sockets_num; i++)
882 {
883 if (mc_receive_sockets[i].revents != 0)
884 mc_handle_socket (mc_receive_sockets + i);
885 }
886 } /* while (mc_receive_thread_loop != 0) */
888 free (mc_receive_socket_entries);
889 return ((void *) 0);
890 } /* }}} void *mc_receive_thread */
892 static int mc_receive_thread_start (void) /* {{{ */
893 {
894 int status;
896 if (mc_receive_thread_running != 0)
897 return (-1);
899 mc_receive_thread_loop = 1;
901 status = plugin_thread_create (&mc_receive_thread_id, /* attr = */ NULL,
902 mc_receive_thread, /* args = */ NULL);
903 if (status != 0)
904 {
905 ERROR ("gmond plugin: Starting receive thread failed.");
906 mc_receive_thread_loop = 0;
907 return (-1);
908 }
910 mc_receive_thread_running = 1;
911 return (0);
912 } /* }}} int start_receive_thread */
914 static int mc_receive_thread_stop (void) /* {{{ */
915 {
916 if (mc_receive_thread_running == 0)
917 return (-1);
919 mc_receive_thread_loop = 0;
921 INFO ("gmond plugin: Stopping receive thread.");
922 pthread_kill (mc_receive_thread_id, SIGTERM);
923 pthread_join (mc_receive_thread_id, /* return value = */ NULL);
924 memset (&mc_receive_thread_id, 0, sizeof (mc_receive_thread_id));
926 mc_receive_thread_running = 0;
928 return (0);
929 } /* }}} int mc_receive_thread_stop */
931 /*
932 * Config:
933 *
934 * <Plugin gmond>
935 * MCReceiveFrom "239.2.11.71" "8649"
936 * <Metric "load_one">
937 * Type "load"
938 * [TypeInstance "foo"]
939 * [DataSource "bar"]
940 * </Metric>
941 * </Plugin>
942 */
943 static int gmond_config_set_string (oconfig_item_t *ci, char **str) /* {{{ */
944 {
945 char *tmp;
947 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
948 {
949 WARNING ("gmond plugin: The `%s' option needs "
950 "exactly one string argument.", ci->key);
951 return (-1);
952 }
954 tmp = strdup (ci->values[0].value.string);
955 if (tmp == NULL)
956 {
957 ERROR ("gmond plugin: strdup failed.");
958 return (-1);
959 }
961 sfree (*str);
962 *str = tmp;
963 return (0);
964 } /* }}} int gmond_config_set_string */
966 static int gmond_config_add_metric (oconfig_item_t *ci) /* {{{ */
967 {
968 metric_map_t *map;
969 int i;
971 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
972 {
973 WARNING ("gmond plugin: `Metric' blocks need "
974 "exactly one string argument.");
975 return (-1);
976 }
978 map = realloc (metric_map, (metric_map_len + 1) * sizeof (*metric_map));
979 if (map == NULL)
980 {
981 ERROR ("gmond plugin: realloc failed.");
982 return (-1);
983 }
984 metric_map = map;
985 map = metric_map + metric_map_len;
987 memset (map, 0, sizeof (*map));
988 map->type = NULL;
989 map->type_instance = NULL;
990 map->ds_name = NULL;
991 map->ds_type = -1;
992 map->ds_index = -1;
994 map->ganglia_name = strdup (ci->values[0].value.string);
995 if (map->ganglia_name == NULL)
996 {
997 ERROR ("gmond plugin: strdup failed.");
998 return (-1);
999 }
1001 for (i = 0; i < ci->children_num; i++)
1002 {
1003 oconfig_item_t *child = ci->children + i;
1004 if (strcasecmp ("Type", child->key) == 0)
1005 gmond_config_set_string (child, &map->type);
1006 else if (strcasecmp ("TypeInstance", child->key) == 0)
1007 gmond_config_set_string (child, &map->type_instance);
1008 else if (strcasecmp ("DataSource", child->key) == 0)
1009 gmond_config_set_string (child, &map->ds_name);
1010 else
1011 {
1012 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1013 child->key);
1014 }
1015 }
1017 if (map->type == NULL)
1018 {
1019 ERROR ("gmond plugin: No type is set for metric %s.",
1020 map->ganglia_name);
1021 sfree (map->ganglia_name);
1022 sfree (map->type_instance);
1023 return (-1);
1024 }
1026 metric_map_len++;
1027 return (0);
1028 } /* }}} int gmond_config_add_metric */
1030 static int gmond_config_set_address (oconfig_item_t *ci, /* {{{ */
1031 char **ret_addr, char **ret_port)
1032 {
1033 char *addr;
1034 char *port;
1036 if ((ci->values_num != 1) && (ci->values_num != 2))
1037 {
1038 WARNING ("gmond plugin: The `%s' config option needs "
1039 "one or two string arguments.",
1040 ci->key);
1041 return (-1);
1042 }
1043 if ((ci->values[0].type != OCONFIG_TYPE_STRING)
1044 || ((ci->values_num == 2)
1045 && (ci->values[1].type != OCONFIG_TYPE_STRING)))
1046 {
1047 WARNING ("gmond plugin: The `%s' config option needs "
1048 "one or two string arguments.",
1049 ci->key);
1050 return (-1);
1051 }
1053 addr = strdup (ci->values[0].value.string);
1054 if (ci->values_num == 2)
1055 port = strdup (ci->values[1].value.string);
1056 else
1057 port = NULL;
1059 if ((addr == NULL) || ((ci->values_num == 2) && (port == NULL)))
1060 {
1061 ERROR ("gmond plugin: strdup failed.");
1062 sfree (addr);
1063 sfree (port);
1064 return (-1);
1065 }
1067 sfree (*ret_addr);
1068 sfree (*ret_port);
1070 *ret_addr = addr;
1071 *ret_port = port;
1073 return (0);
1074 } /* }}} int gmond_config_set_address */
1076 static int gmond_config (oconfig_item_t *ci) /* {{{ */
1077 {
1078 int i;
1080 for (i = 0; i < ci->children_num; i++)
1081 {
1082 oconfig_item_t *child = ci->children + i;
1083 if (strcasecmp ("MCReceiveFrom", child->key) == 0)
1084 gmond_config_set_address (child, &mc_receive_group, &mc_receive_port);
1085 else if (strcasecmp ("Metric", child->key) == 0)
1086 gmond_config_add_metric (child);
1087 else
1088 {
1089 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1090 child->key);
1091 }
1092 }
1094 return (0);
1095 } /* }}} int gmond_config */
1097 static int gmond_init (void) /* {{{ */
1098 {
1099 create_sockets (&mc_send_sockets, &mc_send_sockets_num,
1100 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
1101 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
1102 /* listen = */ 0);
1104 staging_tree = c_avl_create ((void *) strcmp);
1105 if (staging_tree == NULL)
1106 {
1107 ERROR ("gmond plugin: c_avl_create failed.");
1108 return (-1);
1109 }
1111 mc_receive_thread_start ();
1113 return (0);
1114 } /* }}} int gmond_init */
1116 static int gmond_shutdown (void) /* {{{ */
1117 {
1118 size_t i;
1120 mc_receive_thread_stop ();
1122 pthread_mutex_lock (&mc_send_sockets_lock);
1123 for (i = 0; i < mc_send_sockets_num; i++)
1124 {
1125 close (mc_send_sockets[i].fd);
1126 mc_send_sockets[i].fd = -1;
1127 }
1128 sfree (mc_send_sockets);
1129 mc_send_sockets_num = 0;
1130 pthread_mutex_unlock (&mc_send_sockets_lock);
1133 return (0);
1134 } /* }}} int gmond_shutdown */
1136 void module_register (void)
1137 {
1138 plugin_register_complex_config ("gmond", gmond_config);
1139 plugin_register_init ("gmond", gmond_init);
1140 plugin_register_shutdown ("gmond", gmond_shutdown);
1141 }
1143 /* vim: set sw=2 sts=2 et fdm=marker : */