1 /**
2 * collectd - src/gmond.c
3 * Copyright (C) 2009,2010 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_SYS_SOCKET_H
37 # include <sys/socket.h>
38 #endif
39 #if HAVE_NETDB_H
40 # include <netdb.h>
41 #endif
42 #if HAVE_NETINET_IN_H
43 # include <netinet/in.h>
44 #endif
45 #if HAVE_ARPA_INET_H
46 # include <arpa/inet.h>
47 #endif
48 #if HAVE_POLL_H
49 # include <poll.h>
50 #endif
52 #include <gm_protocol.h>
54 #ifndef IPV6_ADD_MEMBERSHIP
55 # ifdef IPV6_JOIN_GROUP
56 # define IPV6_ADD_MEMBERSHIP IPV6_JOIN_GROUP
57 # else
58 # error "Neither IP_ADD_MEMBERSHIP nor IPV6_JOIN_GROUP is defined"
59 # endif
60 #endif /* !IP_ADD_MEMBERSHIP */
62 #ifdef GANGLIA_MAX_MESSAGE_LEN
63 # define BUFF_SIZE GANGLIA_MAX_MESSAGE_LEN
64 #else
65 # define BUFF_SIZE 1400
66 #endif
68 struct socket_entry_s
69 {
70 int fd;
71 struct sockaddr_storage addr;
72 socklen_t addrlen;
73 };
74 typedef struct socket_entry_s socket_entry_t;
76 struct staging_entry_s
77 {
78 char key[2 * DATA_MAX_NAME_LEN];
79 value_list_t vl;
80 int flags;
81 };
82 typedef struct staging_entry_s staging_entry_t;
84 struct metric_map_s
85 {
86 char *ganglia_name;
87 char *type;
88 char *type_instance;
89 char *ds_name;
90 int ds_type;
91 size_t ds_index;
92 };
93 typedef struct metric_map_s metric_map_t;
95 #define MC_RECEIVE_GROUP_DEFAULT "239.2.11.71"
96 static char *mc_receive_group = NULL;
97 #define MC_RECEIVE_PORT_DEFAULT "8649"
98 static char *mc_receive_port = NULL;
100 static struct pollfd *mc_receive_sockets = NULL;
101 static size_t mc_receive_sockets_num = 0;
103 static socket_entry_t *mc_send_sockets = NULL;
104 static size_t mc_send_sockets_num = 0;
105 static pthread_mutex_t mc_send_sockets_lock = PTHREAD_MUTEX_INITIALIZER;
107 static int mc_receive_thread_loop = 0;
108 static int mc_receive_thread_running = 0;
109 static pthread_t mc_receive_thread_id;
111 static metric_map_t metric_map_default[] =
112 { /*---------------+-------------+-----------+-------------+------+-----*
113 * ganglia_name ! type ! type_inst ! data_source ! type ! idx *
114 *---------------+-------------+-----------+-------------+------+-----*/
115 { "load_one", "load", "", "shortterm", -1, -1 },
116 { "load_five", "load", "", "midterm", -1, -1 },
117 { "load_fifteen", "load", "", "longterm", -1, -1 },
118 { "cpu_user", "cpu", "user", "value", -1, -1 },
119 { "cpu_system", "cpu", "system", "value", -1, -1 },
120 { "cpu_idle", "cpu", "idle", "value", -1, -1 },
121 { "cpu_nice", "cpu", "nice", "value", -1, -1 },
122 { "cpu_wio", "cpu", "wait", "value", -1, -1 },
123 { "mem_free", "memory", "free", "value", -1, -1 },
124 { "mem_shared", "memory", "shared", "value", -1, -1 },
125 { "mem_buffers", "memory", "buffered", "value", -1, -1 },
126 { "mem_cached", "memory", "cached", "value", -1, -1 },
127 { "mem_total", "memory", "total", "value", -1, -1 },
128 { "bytes_in", "if_octets", "", "rx", -1, -1 },
129 { "bytes_out", "if_octets", "", "tx", -1, -1 },
130 { "pkts_in", "if_packets", "", "rx", -1, -1 },
131 { "pkts_out", "if_packets", "", "tx", -1, -1 }
132 };
133 static size_t metric_map_len_default = STATIC_ARRAY_SIZE (metric_map_default);
135 static metric_map_t *metric_map = NULL;
136 static size_t metric_map_len = 0;
138 static c_avl_tree_t *staging_tree;
139 static pthread_mutex_t staging_lock = PTHREAD_MUTEX_INITIALIZER;
141 static metric_map_t *metric_lookup (const char *key) /* {{{ */
142 {
143 metric_map_t *map;
144 size_t map_len;
145 size_t i;
147 /* Search the user-supplied table first.. */
148 map = metric_map;
149 map_len = metric_map_len;
150 for (i = 0; i < map_len; i++)
151 if (strcmp (map[i].ganglia_name, key) == 0)
152 break;
154 /* .. and fall back to the built-in table if nothing is found. */
155 if (i >= map_len)
156 {
157 map = metric_map_default;
158 map_len = metric_map_len_default;
160 for (i = 0; i < map_len; i++)
161 if (strcmp (map[i].ganglia_name, key) == 0)
162 break;
163 }
165 if (i >= map_len)
166 return (NULL);
168 /* Look up the DS type and ds_index. */
169 if (map[i].ds_type < 0) /* {{{ */
170 {
171 const data_set_t *ds;
173 ds = plugin_get_ds (map[i].type);
174 if (ds == NULL)
175 {
176 WARNING ("gmond plugin: Type not defined: %s", map[i].type);
177 return (NULL);
178 }
180 if ((map[i].ds_name == NULL) && (ds->ds_num != 1))
181 {
182 WARNING ("gmond plugin: No data source name defined for metric %s, "
183 "but type %s has more than one data source.",
184 map[i].ganglia_name, map[i].type);
185 return (NULL);
186 }
188 if (map[i].ds_name == NULL)
189 {
190 map[i].ds_index = 0;
191 }
192 else
193 {
194 size_t j;
196 for (j = 0; j < ds->ds_num; j++)
197 if (strcasecmp (ds->ds[j].name, map[i].ds_name) == 0)
198 break;
200 if (j >= ds->ds_num)
201 {
202 WARNING ("gmond plugin: There is no data source "
203 "named `%s' in type `%s'.",
204 map[i].ds_name, ds->type);
205 return (NULL);
206 }
207 map[i].ds_index = j;
208 }
210 map[i].ds_type = ds->ds[map[i].ds_index].type;
211 } /* }}} if ((map[i].ds_type < 0) || (map[i].ds_index < 0)) */
213 return (map + i);
214 } /* }}} metric_map_t *metric_lookup */
216 static int create_sockets (socket_entry_t **ret_sockets, /* {{{ */
217 size_t *ret_sockets_num,
218 const char *node, const char *service, int listen)
219 {
220 struct addrinfo ai_hints;
221 struct addrinfo *ai_list;
222 struct addrinfo *ai_ptr;
223 int ai_return;
225 socket_entry_t *sockets = NULL;
226 size_t sockets_num = 0;
228 int status;
230 if (*ret_sockets != NULL)
231 return (EINVAL);
233 memset (&ai_hints, 0, sizeof (ai_hints));
234 ai_hints.ai_flags = 0;
235 #ifdef AI_PASSIVE
236 ai_hints.ai_flags |= AI_PASSIVE;
237 #endif
238 #ifdef AI_ADDRCONFIG
239 ai_hints.ai_flags |= AI_ADDRCONFIG;
240 #endif
241 ai_hints.ai_family = AF_UNSPEC;
242 ai_hints.ai_socktype = SOCK_DGRAM;
243 ai_hints.ai_protocol = IPPROTO_UDP;
245 ai_return = getaddrinfo (node, service, &ai_hints, &ai_list);
246 if (ai_return != 0)
247 {
248 char errbuf[1024];
249 ERROR ("gmond plugin: getaddrinfo (%s, %s) failed: %s",
250 (node == NULL) ? "(null)" : node,
251 (service == NULL) ? "(null)" : service,
252 (ai_return == EAI_SYSTEM)
253 ? sstrerror (errno, errbuf, sizeof (errbuf))
254 : gai_strerror (ai_return));
255 return (-1);
256 }
258 for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) /* {{{ */
259 {
260 socket_entry_t *tmp;
262 tmp = realloc (sockets, (sockets_num + 1) * sizeof (*sockets));
263 if (tmp == NULL)
264 {
265 ERROR ("gmond plugin: realloc failed.");
266 continue;
267 }
268 sockets = tmp;
270 sockets[sockets_num].fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype,
271 ai_ptr->ai_protocol);
272 if (sockets[sockets_num].fd < 0)
273 {
274 char errbuf[1024];
275 ERROR ("gmond plugin: socket failed: %s",
276 sstrerror (errno, errbuf, sizeof (errbuf)));
277 continue;
278 }
280 assert (sizeof (sockets[sockets_num].addr) >= ai_ptr->ai_addrlen);
281 memcpy (&sockets[sockets_num].addr, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
282 sockets[sockets_num].addrlen = ai_ptr->ai_addrlen;
284 /* Sending socket: Open only one socket and don't bind it. */
285 if (listen == 0)
286 {
287 sockets_num++;
288 break;
289 }
290 else
291 {
292 int yes = 1;
294 setsockopt (sockets[sockets_num].fd, SOL_SOCKET, SO_REUSEADDR,
295 (void *) &yes, sizeof (yes));
296 }
298 status = bind (sockets[sockets_num].fd, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
299 if (status != 0)
300 {
301 char errbuf[1024];
302 ERROR ("gmond plugin: bind failed: %s",
303 sstrerror (errno, errbuf, sizeof (errbuf)));
304 close (sockets[sockets_num].fd);
305 continue;
306 }
308 if (ai_ptr->ai_family == AF_INET)
309 {
310 struct sockaddr_in *addr;
311 struct ip_mreq mreq;
312 int loop;
314 addr = (struct sockaddr_in *) ai_ptr->ai_addr;
316 if (!IN_MULTICAST (ntohl (addr->sin_addr.s_addr)))
317 {
318 sockets_num++;
319 continue;
320 }
322 loop = 1;
323 setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_MULTICAST_LOOP,
324 (void *) &loop, sizeof (loop));
326 memset (&mreq, 0, sizeof (mreq));
327 mreq.imr_multiaddr.s_addr = addr->sin_addr.s_addr;
328 mreq.imr_interface.s_addr = htonl (INADDR_ANY);
329 setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_ADD_MEMBERSHIP,
330 (void *) &mreq, sizeof (mreq));
331 } /* if (ai_ptr->ai_family == AF_INET) */
332 else if (ai_ptr->ai_family == AF_INET6)
333 {
334 struct sockaddr_in6 *addr;
335 struct ipv6_mreq mreq;
336 int loop;
338 addr = (struct sockaddr_in6 *) ai_ptr->ai_addr;
340 if (!IN6_IS_ADDR_MULTICAST (&addr->sin6_addr))
341 {
342 sockets_num++;
343 continue;
344 }
346 loop = 1;
347 setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_MULTICAST_LOOP,
348 (void *) &loop, sizeof (loop));
350 memset (&mreq, 0, sizeof (mreq));
351 memcpy (&mreq.ipv6mr_multiaddr,
352 &addr->sin6_addr, sizeof (addr->sin6_addr));
353 mreq.ipv6mr_interface = 0; /* any */
354 setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_ADD_MEMBERSHIP,
355 (void *) &mreq, sizeof (mreq));
356 } /* if (ai_ptr->ai_family == AF_INET6) */
358 sockets_num++;
359 } /* }}} for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) */
361 freeaddrinfo (ai_list);
363 if (sockets_num == 0)
364 {
365 sfree (sockets);
366 return (-1);
367 }
369 *ret_sockets = sockets;
370 *ret_sockets_num = sockets_num;
371 return (0);
372 } /* }}} int create_sockets */
374 static int request_meta_data (const char *host, const char *name) /* {{{ */
375 {
376 Ganglia_metadata_msg msg;
377 char buffer[BUFF_SIZE];
378 unsigned int buffer_size;
379 XDR xdr;
380 size_t i;
382 memset (&msg, 0, sizeof (msg));
384 msg.id = gmetadata_request;
385 msg.Ganglia_metadata_msg_u.grequest.metric_id.host = strdup (host);
386 msg.Ganglia_metadata_msg_u.grequest.metric_id.name = strdup (name);
388 if ((msg.Ganglia_metadata_msg_u.grequest.metric_id.host == NULL)
389 || (msg.Ganglia_metadata_msg_u.grequest.metric_id.name == NULL))
390 {
391 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
392 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
393 return (-1);
394 }
396 memset (buffer, 0, sizeof (buffer));
397 xdrmem_create (&xdr, buffer, sizeof (buffer), XDR_ENCODE);
399 if (!xdr_Ganglia_metadata_msg (&xdr, &msg))
400 {
401 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
402 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
403 return (-1);
404 }
406 buffer_size = xdr_getpos (&xdr);
408 DEBUG ("gmond plugin: Requesting meta data for %s/%s.",
409 host, name);
411 pthread_mutex_lock (&mc_send_sockets_lock);
412 for (i = 0; i < mc_send_sockets_num; i++)
413 sendto (mc_send_sockets[i].fd, buffer, (size_t) buffer_size,
414 /* flags = */ 0,
415 (struct sockaddr *) &mc_send_sockets[i].addr,
416 mc_send_sockets[i].addrlen);
417 pthread_mutex_unlock (&mc_send_sockets_lock);
419 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
420 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
421 return (0);
422 } /* }}} int request_meta_data */
424 static staging_entry_t *staging_entry_get (const char *host, /* {{{ */
425 const char *name,
426 const char *type, const char *type_instance,
427 int values_len)
428 {
429 char key[2 * DATA_MAX_NAME_LEN];
430 staging_entry_t *se;
431 int status;
433 if (staging_tree == NULL)
434 return (NULL);
436 ssnprintf (key, sizeof (key), "%s/%s/%s", host, type,
437 (type_instance != NULL) ? type_instance : "");
439 se = NULL;
440 status = c_avl_get (staging_tree, key, (void *) &se);
441 if (status == 0)
442 return (se);
444 /* insert new entry */
445 se = (staging_entry_t *) malloc (sizeof (*se));
446 if (se == NULL)
447 return (NULL);
448 memset (se, 0, sizeof (*se));
450 sstrncpy (se->key, key, sizeof (se->key));
451 se->flags = 0;
453 se->vl.values = (value_t *) calloc (values_len, sizeof (*se->vl.values));
454 if (se->vl.values == NULL)
455 {
456 sfree (se);
457 return (NULL);
458 }
459 se->vl.values_len = values_len;
461 se->vl.time = 0;
462 se->vl.interval = 0;
463 sstrncpy (se->vl.host, host, sizeof (se->vl.host));
464 sstrncpy (se->vl.plugin, "gmond", sizeof (se->vl.plugin));
465 sstrncpy (se->vl.type, type, sizeof (se->vl.type));
466 if (type_instance != NULL)
467 sstrncpy (se->vl.type_instance, type_instance,
468 sizeof (se->vl.type_instance));
470 status = c_avl_insert (staging_tree, se->key, se);
471 if (status != 0)
472 {
473 ERROR ("gmond plugin: c_avl_insert failed.");
474 sfree (se->vl.values);
475 sfree (se);
476 return (NULL);
477 }
479 return (se);
480 } /* }}} staging_entry_t *staging_entry_get */
482 static int staging_entry_submit (const char *host, const char *name, /* {{{ */
483 staging_entry_t *se)
484 {
485 value_list_t vl;
486 value_t values[se->vl.values_len];
488 if (se->vl.interval == 0)
489 {
490 /* No meta data has been received for this metric yet. */
491 se->flags = 0;
492 pthread_mutex_unlock (&staging_lock);
493 request_meta_data (host, name);
494 return (0);
495 }
497 se->flags = 0;
499 memcpy (values, se->vl.values, sizeof (values));
500 memcpy (&vl, &se->vl, sizeof (vl));
502 /* Unlock before calling `plugin_dispatch_values'.. */
503 pthread_mutex_unlock (&staging_lock);
505 vl.values = values;
507 plugin_dispatch_values (&vl);
509 return (0);
510 } /* }}} int staging_entry_submit */
512 static int staging_entry_update (const char *host, const char *name, /* {{{ */
513 const char *type, const char *type_instance,
514 size_t ds_index, int ds_type, value_t value)
515 {
516 const data_set_t *ds;
517 staging_entry_t *se;
519 ds = plugin_get_ds (type);
520 if (ds == NULL)
521 {
522 ERROR ("gmond plugin: Looking up type %s failed.", type);
523 return (-1);
524 }
526 if (ds->ds_num <= ds_index)
527 {
528 ERROR ("gmond plugin: Invalid index %zu: %s has only %zu data source(s).",
529 ds_index, ds->type, ds->ds_num);
530 return (-1);
531 }
533 pthread_mutex_lock (&staging_lock);
535 se = staging_entry_get (host, name, type, type_instance, ds->ds_num);
536 if (se == NULL)
537 {
538 pthread_mutex_unlock (&staging_lock);
539 ERROR ("gmond plugin: staging_entry_get failed.");
540 return (-1);
541 }
542 if (se->vl.values_len != ds->ds_num)
543 {
544 pthread_mutex_unlock (&staging_lock);
545 return (-1);
546 }
548 if (ds_type == DS_TYPE_COUNTER)
549 se->vl.values[ds_index].counter += value.counter;
550 else if (ds_type == DS_TYPE_GAUGE)
551 se->vl.values[ds_index].gauge = value.gauge;
552 else if (ds_type == DS_TYPE_DERIVE)
553 se->vl.values[ds_index].derive += value.derive;
554 else if (ds_type == DS_TYPE_ABSOLUTE)
555 se->vl.values[ds_index].absolute = value.absolute;
556 else
557 assert (23 == 42);
559 se->flags |= (0x01 << ds_index);
561 /* Check if all values have been set and submit if so. */
562 if (se->flags == ((0x01 << se->vl.values_len) - 1))
563 {
564 /* `staging_lock' is unlocked in `staging_entry_submit'. */
565 staging_entry_submit (host, name, se);
566 }
567 else
568 {
569 pthread_mutex_unlock (&staging_lock);
570 }
572 return (0);
573 } /* }}} int staging_entry_update */
575 static int mc_handle_value_msg (Ganglia_value_msg *msg) /* {{{ */
576 {
577 const char *host;
578 const char *name;
579 metric_map_t *map;
581 value_t value_counter;
582 value_t value_gauge;
583 value_t value_derive;
585 /* Fill in `host', `name', `value_counter', and `value_gauge' according to
586 * the value type, or return with an error. */
587 switch (msg->id) /* {{{ */
588 {
589 case gmetric_uint:
590 {
591 Ganglia_gmetric_uint msg_uint;
593 msg_uint = msg->Ganglia_value_msg_u.gu_int;
595 host = msg_uint.metric_id.host;
596 name = msg_uint.metric_id.name;
597 value_counter.counter = (counter_t) msg_uint.ui;
598 value_gauge.gauge = (gauge_t) msg_uint.ui;
599 value_derive.derive = (derive_t) msg_uint.ui;
600 break;
601 }
603 case gmetric_string:
604 {
605 Ganglia_gmetric_string msg_string;
606 int status;
608 msg_string = msg->Ganglia_value_msg_u.gstr;
610 host = msg_string.metric_id.host;
611 name = msg_string.metric_id.name;
613 status = parse_value (msg_string.str, &value_derive, DS_TYPE_DERIVE);
614 if (status != 0)
615 value_derive.derive = -1;
617 status = parse_value (msg_string.str, &value_gauge, DS_TYPE_GAUGE);
618 if (status != 0)
619 value_gauge.gauge = NAN;
621 status = parse_value (msg_string.str, &value_counter, DS_TYPE_COUNTER);
622 if (status != 0)
623 value_counter.counter = 0;
625 break;
626 }
628 case gmetric_float:
629 {
630 Ganglia_gmetric_float msg_float;
632 msg_float = msg->Ganglia_value_msg_u.gf;
634 host = msg_float.metric_id.host;
635 name = msg_float.metric_id.name;
636 value_counter.counter = (counter_t) msg_float.f;
637 value_gauge.gauge = (gauge_t) msg_float.f;
638 value_derive.derive = (derive_t) msg_float.f;
639 break;
640 }
642 case gmetric_double:
643 {
644 Ganglia_gmetric_double msg_double;
646 msg_double = msg->Ganglia_value_msg_u.gd;
648 host = msg_double.metric_id.host;
649 name = msg_double.metric_id.name;
650 value_counter.counter = (counter_t) msg_double.d;
651 value_gauge.gauge = (gauge_t) msg_double.d;
652 value_derive.derive = (derive_t) msg_double.d;
653 break;
654 }
655 default:
656 DEBUG ("gmond plugin: Value type not handled: %i", msg->id);
657 return (-1);
658 } /* }}} switch (msg->id) */
660 assert (host != NULL);
661 assert (name != NULL);
663 map = metric_lookup (name);
664 if (map != NULL)
665 {
666 value_t val_copy;
668 if ((map->ds_type == DS_TYPE_COUNTER)
669 || (map->ds_type == DS_TYPE_ABSOLUTE))
670 val_copy = value_counter;
671 else if (map->ds_type == DS_TYPE_GAUGE)
672 val_copy = value_gauge;
673 else if (map->ds_type == DS_TYPE_DERIVE)
674 val_copy = value_derive;
675 else
676 assert (23 == 42);
678 return (staging_entry_update (host, name,
679 map->type, map->type_instance,
680 map->ds_index, map->ds_type,
681 val_copy));
682 }
684 DEBUG ("gmond plugin: Cannot find a translation for %s.", name);
685 return (-1);
686 } /* }}} int mc_handle_value_msg */
688 static int mc_handle_metadata_msg (Ganglia_metadata_msg *msg) /* {{{ */
689 {
690 switch (msg->id)
691 {
692 case gmetadata_full:
693 {
694 Ganglia_metadatadef msg_meta;
695 staging_entry_t *se;
696 const data_set_t *ds;
697 metric_map_t *map;
699 msg_meta = msg->Ganglia_metadata_msg_u.gfull;
701 if (msg_meta.metric.tmax <= 0)
702 return (-1);
704 map = metric_lookup (msg_meta.metric_id.name);
705 if (map == NULL)
706 {
707 DEBUG ("gmond plugin: Not handling meta data %s.",
708 msg_meta.metric_id.name);
709 return (0);
710 }
712 ds = plugin_get_ds (map->type);
713 if (ds == NULL)
714 {
715 WARNING ("gmond plugin: Could not find data set %s.", map->type);
716 return (-1);
717 }
719 DEBUG ("gmond plugin: Received meta data for %s/%s.",
720 msg_meta.metric_id.host, msg_meta.metric_id.name);
722 pthread_mutex_lock (&staging_lock);
723 se = staging_entry_get (msg_meta.metric_id.host,
724 msg_meta.metric_id.name,
725 map->type, map->type_instance,
726 ds->ds_num);
727 if (se != NULL)
728 se->vl.interval = TIME_T_TO_CDTIME_T (msg_meta.metric.tmax);
729 pthread_mutex_unlock (&staging_lock);
731 if (se == NULL)
732 {
733 ERROR ("gmond plugin: staging_entry_get failed.");
734 return (-1);
735 }
737 break;
738 }
740 default:
741 {
742 return (-1);
743 }
744 }
746 return (0);
747 } /* }}} int mc_handle_metadata_msg */
749 static int mc_handle_metric (void *buffer, size_t buffer_size) /* {{{ */
750 {
751 XDR xdr;
752 Ganglia_msg_formats format;
754 xdrmem_create (&xdr, buffer, buffer_size, XDR_DECODE);
756 xdr_Ganglia_msg_formats (&xdr, &format);
757 xdr_setpos (&xdr, 0);
759 switch (format)
760 {
761 case gmetric_ushort:
762 case gmetric_short:
763 case gmetric_int:
764 case gmetric_uint:
765 case gmetric_string:
766 case gmetric_float:
767 case gmetric_double:
768 {
769 Ganglia_value_msg msg;
771 memset (&msg, 0, sizeof (msg));
772 if (xdr_Ganglia_value_msg (&xdr, &msg))
773 mc_handle_value_msg (&msg);
774 break;
775 }
777 case gmetadata_full:
778 case gmetadata_request:
779 {
780 Ganglia_metadata_msg msg;
781 memset (&msg, 0, sizeof (msg));
782 if (xdr_Ganglia_metadata_msg (&xdr, &msg))
783 mc_handle_metadata_msg (&msg);
784 break;
785 }
787 default:
788 DEBUG ("gmond plugin: Unknown format: %i", format);
789 return (-1);
790 } /* switch (format) */
793 return (0);
794 } /* }}} int mc_handle_metric */
796 static int mc_handle_socket (struct pollfd *p) /* {{{ */
797 {
798 char buffer[BUFF_SIZE];
799 ssize_t buffer_size;
801 if ((p->revents & (POLLIN | POLLPRI)) == 0)
802 {
803 p->revents = 0;
804 return (-1);
805 }
807 buffer_size = recv (p->fd, buffer, sizeof (buffer), /* flags = */ 0);
808 if (buffer_size <= 0)
809 {
810 char errbuf[1024];
811 ERROR ("gmond plugin: recv failed: %s",
812 sstrerror (errno, errbuf, sizeof (errbuf)));
813 p->revents = 0;
814 return (-1);
815 }
817 mc_handle_metric (buffer, (size_t) buffer_size);
818 return (0);
819 } /* }}} int mc_handle_socket */
821 static void *mc_receive_thread (void *arg) /* {{{ */
822 {
823 socket_entry_t *mc_receive_socket_entries;
824 int status;
825 size_t i;
827 mc_receive_socket_entries = NULL;
828 status = create_sockets (&mc_receive_socket_entries, &mc_receive_sockets_num,
829 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
830 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
831 /* listen = */ 1);
832 if (status != 0)
833 {
834 ERROR ("gmond plugin: create_sockets failed.");
835 return ((void *) -1);
836 }
838 mc_receive_sockets = (struct pollfd *) calloc (mc_receive_sockets_num,
839 sizeof (*mc_receive_sockets));
840 if (mc_receive_sockets == NULL)
841 {
842 ERROR ("gmond plugin: calloc failed.");
843 for (i = 0; i < mc_receive_sockets_num; i++)
844 close (mc_receive_socket_entries[i].fd);
845 free (mc_receive_socket_entries);
846 mc_receive_socket_entries = NULL;
847 mc_receive_sockets_num = 0;
848 return ((void *) -1);
849 }
851 for (i = 0; i < mc_receive_sockets_num; i++)
852 {
853 mc_receive_sockets[i].fd = mc_receive_socket_entries[i].fd;
854 mc_receive_sockets[i].events = POLLIN | POLLPRI;
855 mc_receive_sockets[i].revents = 0;
856 }
858 while (mc_receive_thread_loop != 0)
859 {
860 status = poll (mc_receive_sockets, mc_receive_sockets_num, -1);
861 if (status <= 0)
862 {
863 char errbuf[1024];
864 if (errno == EINTR)
865 continue;
866 ERROR ("gmond plugin: poll failed: %s",
867 sstrerror (errno, errbuf, sizeof (errbuf)));
868 break;
869 }
871 for (i = 0; i < mc_receive_sockets_num; i++)
872 {
873 if (mc_receive_sockets[i].revents != 0)
874 mc_handle_socket (mc_receive_sockets + i);
875 }
876 } /* while (mc_receive_thread_loop != 0) */
878 free (mc_receive_socket_entries);
879 return ((void *) 0);
880 } /* }}} void *mc_receive_thread */
882 static int mc_receive_thread_start (void) /* {{{ */
883 {
884 int status;
886 if (mc_receive_thread_running != 0)
887 return (-1);
889 mc_receive_thread_loop = 1;
891 status = plugin_thread_create (&mc_receive_thread_id, /* attr = */ NULL,
892 mc_receive_thread, /* args = */ NULL);
893 if (status != 0)
894 {
895 ERROR ("gmond plugin: Starting receive thread failed.");
896 mc_receive_thread_loop = 0;
897 return (-1);
898 }
900 mc_receive_thread_running = 1;
901 return (0);
902 } /* }}} int start_receive_thread */
904 static int mc_receive_thread_stop (void) /* {{{ */
905 {
906 if (mc_receive_thread_running == 0)
907 return (-1);
909 mc_receive_thread_loop = 0;
911 INFO ("gmond plugin: Stopping receive thread.");
912 pthread_kill (mc_receive_thread_id, SIGTERM);
913 pthread_join (mc_receive_thread_id, /* return value = */ NULL);
914 memset (&mc_receive_thread_id, 0, sizeof (mc_receive_thread_id));
916 mc_receive_thread_running = 0;
918 return (0);
919 } /* }}} int mc_receive_thread_stop */
921 /*
922 * Config:
923 *
924 * <Plugin gmond>
925 * MCReceiveFrom "239.2.11.71" "8649"
926 * <Metric "load_one">
927 * Type "load"
928 * [TypeInstance "foo"]
929 * [DataSource "bar"]
930 * </Metric>
931 * </Plugin>
932 */
933 static int gmond_config_set_string (oconfig_item_t *ci, char **str) /* {{{ */
934 {
935 char *tmp;
937 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
938 {
939 WARNING ("gmond plugin: The `%s' option needs "
940 "exactly one string argument.", ci->key);
941 return (-1);
942 }
944 tmp = strdup (ci->values[0].value.string);
945 if (tmp == NULL)
946 {
947 ERROR ("gmond plugin: strdup failed.");
948 return (-1);
949 }
951 sfree (*str);
952 *str = tmp;
953 return (0);
954 } /* }}} int gmond_config_set_string */
956 static int gmond_config_add_metric (oconfig_item_t *ci) /* {{{ */
957 {
958 metric_map_t *map;
959 int i;
961 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
962 {
963 WARNING ("gmond plugin: `Metric' blocks need "
964 "exactly one string argument.");
965 return (-1);
966 }
968 map = realloc (metric_map, (metric_map_len + 1) * sizeof (*metric_map));
969 if (map == NULL)
970 {
971 ERROR ("gmond plugin: realloc failed.");
972 return (-1);
973 }
974 metric_map = map;
975 map = metric_map + metric_map_len;
977 memset (map, 0, sizeof (*map));
978 map->type = NULL;
979 map->type_instance = NULL;
980 map->ds_name = NULL;
981 map->ds_type = -1;
982 map->ds_index = -1;
984 map->ganglia_name = strdup (ci->values[0].value.string);
985 if (map->ganglia_name == NULL)
986 {
987 ERROR ("gmond plugin: strdup failed.");
988 return (-1);
989 }
991 for (i = 0; i < ci->children_num; i++)
992 {
993 oconfig_item_t *child = ci->children + i;
994 if (strcasecmp ("Type", child->key) == 0)
995 gmond_config_set_string (child, &map->type);
996 else if (strcasecmp ("TypeInstance", child->key) == 0)
997 gmond_config_set_string (child, &map->type_instance);
998 else if (strcasecmp ("DataSource", child->key) == 0)
999 gmond_config_set_string (child, &map->ds_name);
1000 else
1001 {
1002 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1003 child->key);
1004 }
1005 }
1007 if (map->type == NULL)
1008 {
1009 ERROR ("gmond plugin: No type is set for metric %s.",
1010 map->ganglia_name);
1011 sfree (map->ganglia_name);
1012 sfree (map->type_instance);
1013 return (-1);
1014 }
1016 metric_map_len++;
1017 return (0);
1018 } /* }}} int gmond_config_add_metric */
1020 static int gmond_config_set_address (oconfig_item_t *ci, /* {{{ */
1021 char **ret_addr, char **ret_port)
1022 {
1023 char *addr;
1024 char *port;
1026 if ((ci->values_num != 1) && (ci->values_num != 2))
1027 {
1028 WARNING ("gmond plugin: The `%s' config option needs "
1029 "one or two string arguments.",
1030 ci->key);
1031 return (-1);
1032 }
1033 if ((ci->values[0].type != OCONFIG_TYPE_STRING)
1034 || ((ci->values_num == 2)
1035 && (ci->values[1].type != OCONFIG_TYPE_STRING)))
1036 {
1037 WARNING ("gmond plugin: The `%s' config option needs "
1038 "one or two string arguments.",
1039 ci->key);
1040 return (-1);
1041 }
1043 addr = strdup (ci->values[0].value.string);
1044 if (ci->values_num == 2)
1045 port = strdup (ci->values[1].value.string);
1046 else
1047 port = NULL;
1049 if ((addr == NULL) || ((ci->values_num == 2) && (port == NULL)))
1050 {
1051 ERROR ("gmond plugin: strdup failed.");
1052 sfree (addr);
1053 sfree (port);
1054 return (-1);
1055 }
1057 sfree (*ret_addr);
1058 sfree (*ret_port);
1060 *ret_addr = addr;
1061 *ret_port = port;
1063 return (0);
1064 } /* }}} int gmond_config_set_address */
1066 static int gmond_config (oconfig_item_t *ci) /* {{{ */
1067 {
1068 int i;
1070 for (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 ((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 size_t i;
1110 mc_receive_thread_stop ();
1112 pthread_mutex_lock (&mc_send_sockets_lock);
1113 for (i = 0; i < mc_send_sockets_num; i++)
1114 {
1115 close (mc_send_sockets[i].fd);
1116 mc_send_sockets[i].fd = -1;
1117 }
1118 sfree (mc_send_sockets);
1119 mc_send_sockets_num = 0;
1120 pthread_mutex_unlock (&mc_send_sockets_lock);
1123 return (0);
1124 } /* }}} int gmond_shutdown */
1126 void module_register (void)
1127 {
1128 plugin_register_complex_config ("gmond", gmond_config);
1129 plugin_register_init ("gmond", gmond_init);
1130 plugin_register_shutdown ("gmond", gmond_shutdown);
1131 }
1133 /* vim: set sw=2 sts=2 et fdm=marker : */