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_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_hints;
215 struct addrinfo *ai_list;
216 struct addrinfo *ai_ptr;
217 int ai_return;
219 socket_entry_t *sockets = NULL;
220 size_t sockets_num = 0;
222 int status;
224 if (*ret_sockets != NULL)
225 return (EINVAL);
227 memset (&ai_hints, 0, sizeof (ai_hints));
228 ai_hints.ai_flags = 0;
229 #ifdef AI_PASSIVE
230 ai_hints.ai_flags |= AI_PASSIVE;
231 #endif
232 #ifdef AI_ADDRCONFIG
233 ai_hints.ai_flags |= AI_ADDRCONFIG;
234 #endif
235 ai_hints.ai_family = AF_UNSPEC;
236 ai_hints.ai_socktype = SOCK_DGRAM;
237 ai_hints.ai_protocol = IPPROTO_UDP;
239 ai_return = getaddrinfo (node, service, &ai_hints, &ai_list);
240 if (ai_return != 0)
241 {
242 char errbuf[1024];
243 ERROR ("gmond plugin: getaddrinfo (%s, %s) failed: %s",
244 (node == NULL) ? "(null)" : node,
245 (service == NULL) ? "(null)" : service,
246 (ai_return == EAI_SYSTEM)
247 ? sstrerror (errno, errbuf, sizeof (errbuf))
248 : gai_strerror (ai_return));
249 return (-1);
250 }
252 for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) /* {{{ */
253 {
254 socket_entry_t *tmp;
256 tmp = realloc (sockets, (sockets_num + 1) * sizeof (*sockets));
257 if (tmp == NULL)
258 {
259 ERROR ("gmond plugin: realloc failed.");
260 continue;
261 }
262 sockets = tmp;
264 sockets[sockets_num].fd = socket (ai_ptr->ai_family, ai_ptr->ai_socktype,
265 ai_ptr->ai_protocol);
266 if (sockets[sockets_num].fd < 0)
267 {
268 char errbuf[1024];
269 ERROR ("gmond plugin: socket failed: %s",
270 sstrerror (errno, errbuf, sizeof (errbuf)));
271 continue;
272 }
274 assert (sizeof (sockets[sockets_num].addr) >= ai_ptr->ai_addrlen);
275 memcpy (&sockets[sockets_num].addr, ai_ptr->ai_addr, ai_ptr->ai_addrlen);
276 sockets[sockets_num].addrlen = ai_ptr->ai_addrlen;
278 /* Sending socket: Open only one socket and don't bind it. */
279 if (listen == 0)
280 {
281 sockets_num++;
282 break;
283 }
284 else
285 {
286 int yes = 1;
288 status = setsockopt (sockets[sockets_num].fd, SOL_SOCKET, SO_REUSEADDR,
289 (void *) &yes, sizeof (yes));
290 if (status != 0)
291 {
292 char errbuf[1024];
293 WARNING ("gmond plugin: setsockopt(2) failed: %s",
294 sstrerror (errno, errbuf, sizeof (errbuf)));
295 }
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 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_MULTICAST_LOOP,
324 (void *) &loop, sizeof (loop));
325 if (status != 0)
326 {
327 char errbuf[1024];
328 WARNING ("gmond plugin: setsockopt(2) failed: %s",
329 sstrerror (errno, errbuf, sizeof (errbuf)));
330 }
332 memset (&mreq, 0, sizeof (mreq));
333 mreq.imr_multiaddr.s_addr = addr->sin_addr.s_addr;
334 mreq.imr_interface.s_addr = htonl (INADDR_ANY);
336 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IP, IP_ADD_MEMBERSHIP,
337 (void *) &mreq, sizeof (mreq));
338 if (status != 0)
339 {
340 char errbuf[1024];
341 WARNING ("gmond plugin: setsockopt(2) failed: %s",
342 sstrerror (errno, errbuf, sizeof (errbuf)));
343 }
344 } /* if (ai_ptr->ai_family == AF_INET) */
345 else if (ai_ptr->ai_family == AF_INET6)
346 {
347 struct sockaddr_in6 *addr;
348 struct ipv6_mreq mreq;
349 int loop;
351 addr = (struct sockaddr_in6 *) ai_ptr->ai_addr;
353 if (!IN6_IS_ADDR_MULTICAST (&addr->sin6_addr))
354 {
355 sockets_num++;
356 continue;
357 }
359 loop = 1;
360 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_MULTICAST_LOOP,
361 (void *) &loop, sizeof (loop));
362 if (status != 0)
363 {
364 char errbuf[1024];
365 WARNING ("gmond plugin: setsockopt(2) failed: %s",
366 sstrerror (errno, errbuf, sizeof (errbuf)));
367 }
369 memset (&mreq, 0, sizeof (mreq));
370 memcpy (&mreq.ipv6mr_multiaddr,
371 &addr->sin6_addr, sizeof (addr->sin6_addr));
372 mreq.ipv6mr_interface = 0; /* any */
373 status = setsockopt (sockets[sockets_num].fd, IPPROTO_IPV6, IPV6_ADD_MEMBERSHIP,
374 (void *) &mreq, sizeof (mreq));
375 if (status != 0)
376 {
377 char errbuf[1024];
378 WARNING ("gmond plugin: setsockopt(2) failed: %s",
379 sstrerror (errno, errbuf, sizeof (errbuf)));
380 }
381 } /* if (ai_ptr->ai_family == AF_INET6) */
383 sockets_num++;
384 } /* }}} for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next) */
386 freeaddrinfo (ai_list);
388 if (sockets_num == 0)
389 {
390 sfree (sockets);
391 return (-1);
392 }
394 *ret_sockets = sockets;
395 *ret_sockets_num = sockets_num;
396 return (0);
397 } /* }}} int create_sockets */
399 static int request_meta_data (const char *host, const char *name) /* {{{ */
400 {
401 Ganglia_metadata_msg msg;
402 char buffer[BUFF_SIZE];
403 unsigned int buffer_size;
404 XDR xdr;
405 size_t i;
407 memset (&msg, 0, sizeof (msg));
409 msg.id = gmetadata_request;
410 msg.Ganglia_metadata_msg_u.grequest.metric_id.host = strdup (host);
411 msg.Ganglia_metadata_msg_u.grequest.metric_id.name = strdup (name);
413 if ((msg.Ganglia_metadata_msg_u.grequest.metric_id.host == NULL)
414 || (msg.Ganglia_metadata_msg_u.grequest.metric_id.name == NULL))
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 memset (buffer, 0, sizeof (buffer));
422 xdrmem_create (&xdr, buffer, sizeof (buffer), XDR_ENCODE);
424 if (!xdr_Ganglia_metadata_msg (&xdr, &msg))
425 {
426 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
427 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
428 return (-1);
429 }
431 buffer_size = xdr_getpos (&xdr);
433 DEBUG ("gmond plugin: Requesting meta data for %s/%s.",
434 host, name);
436 pthread_mutex_lock (&mc_send_sockets_lock);
437 for (i = 0; i < mc_send_sockets_num; i++)
438 {
439 ssize_t status = sendto (mc_send_sockets[i].fd, buffer, (size_t) buffer_size,
440 /* flags = */ 0,
441 (struct sockaddr *) &mc_send_sockets[i].addr,
442 mc_send_sockets[i].addrlen);
443 if (status == -1)
444 {
445 char errbuf[1024];
446 ERROR ("gmond plugin: sendto(2) failed: %s",
447 sstrerror (errno, errbuf, sizeof (errbuf)));
448 continue;
449 }
450 }
451 pthread_mutex_unlock (&mc_send_sockets_lock);
453 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.host);
454 sfree (msg.Ganglia_metadata_msg_u.grequest.metric_id.name);
455 return (0);
456 } /* }}} int request_meta_data */
458 static staging_entry_t *staging_entry_get (const char *host, /* {{{ */
459 const char *name,
460 const char *type, const char *type_instance,
461 int values_len)
462 {
463 char key[2 * DATA_MAX_NAME_LEN];
464 staging_entry_t *se;
465 int status;
467 if (staging_tree == NULL)
468 return (NULL);
470 ssnprintf (key, sizeof (key), "%s/%s/%s", host, type,
471 (type_instance != NULL) ? type_instance : "");
473 se = NULL;
474 status = c_avl_get (staging_tree, key, (void *) &se);
475 if (status == 0)
476 return (se);
478 /* insert new entry */
479 se = calloc (1, sizeof (*se));
480 if (se == NULL)
481 return (NULL);
483 sstrncpy (se->key, key, sizeof (se->key));
484 se->flags = 0;
486 se->vl.values = (value_t *) calloc (values_len, sizeof (*se->vl.values));
487 if (se->vl.values == NULL)
488 {
489 sfree (se);
490 return (NULL);
491 }
492 se->vl.values_len = values_len;
494 se->vl.time = 0;
495 se->vl.interval = 0;
496 sstrncpy (se->vl.host, host, sizeof (se->vl.host));
497 sstrncpy (se->vl.plugin, "gmond", sizeof (se->vl.plugin));
498 sstrncpy (se->vl.type, type, sizeof (se->vl.type));
499 if (type_instance != NULL)
500 sstrncpy (se->vl.type_instance, type_instance,
501 sizeof (se->vl.type_instance));
503 status = c_avl_insert (staging_tree, se->key, se);
504 if (status != 0)
505 {
506 ERROR ("gmond plugin: c_avl_insert failed.");
507 sfree (se->vl.values);
508 sfree (se);
509 return (NULL);
510 }
512 return (se);
513 } /* }}} staging_entry_t *staging_entry_get */
515 static int staging_entry_update (const char *host, const char *name, /* {{{ */
516 const char *type, const char *type_instance,
517 size_t ds_index, int ds_type, value_t value)
518 {
519 const data_set_t *ds;
520 staging_entry_t *se;
522 ds = plugin_get_ds (type);
523 if (ds == NULL)
524 {
525 ERROR ("gmond plugin: Looking up type %s failed.", type);
526 return (-1);
527 }
529 if (ds->ds_num <= ds_index)
530 {
531 ERROR ("gmond plugin: Invalid index %zu: %s has only %zu data source(s).",
532 ds_index, ds->type, ds->ds_num);
533 return (-1);
534 }
536 pthread_mutex_lock (&staging_lock);
538 se = staging_entry_get (host, name, type, type_instance, ds->ds_num);
539 if (se == NULL)
540 {
541 pthread_mutex_unlock (&staging_lock);
542 ERROR ("gmond plugin: staging_entry_get failed.");
543 return (-1);
544 }
545 if (se->vl.values_len != ds->ds_num)
546 {
547 pthread_mutex_unlock (&staging_lock);
548 return (-1);
549 }
551 if (ds_type == DS_TYPE_COUNTER)
552 se->vl.values[ds_index].counter += value.counter;
553 else if (ds_type == DS_TYPE_GAUGE)
554 se->vl.values[ds_index].gauge = value.gauge;
555 else if (ds_type == DS_TYPE_DERIVE)
556 se->vl.values[ds_index].derive += value.derive;
557 else if (ds_type == DS_TYPE_ABSOLUTE)
558 se->vl.values[ds_index].absolute = value.absolute;
559 else
560 assert (23 == 42);
562 se->flags |= (0x01 << ds_index);
564 /* Check if all data sources have been set. If not, return here. */
565 if (se->flags != ((0x01 << se->vl.values_len) - 1))
566 {
567 pthread_mutex_unlock (&staging_lock);
568 return (0);
569 }
571 /* Check if the interval of this metric is known. If not, request meta data
572 * and return. */
573 if (se->vl.interval == 0)
574 {
575 /* No meta data has been received for this metric yet. */
576 se->flags = 0;
577 pthread_mutex_unlock (&staging_lock);
579 request_meta_data (host, name);
580 return (0);
581 }
583 plugin_dispatch_values (&se->vl);
585 se->flags = 0;
586 pthread_mutex_unlock (&staging_lock);
588 return (0);
589 } /* }}} int staging_entry_update */
591 static int mc_handle_value_msg (Ganglia_value_msg *msg) /* {{{ */
592 {
593 const char *host;
594 const char *name;
595 metric_map_t *map;
597 value_t value_counter;
598 value_t value_gauge;
599 value_t value_derive;
601 /* Fill in `host', `name', `value_counter', and `value_gauge' according to
602 * the value type, or return with an error. */
603 switch (msg->id) /* {{{ */
604 {
605 case gmetric_uint:
606 {
607 Ganglia_gmetric_uint msg_uint;
609 msg_uint = msg->Ganglia_value_msg_u.gu_int;
611 host = msg_uint.metric_id.host;
612 name = msg_uint.metric_id.name;
613 value_counter.counter = (counter_t) msg_uint.ui;
614 value_gauge.gauge = (gauge_t) msg_uint.ui;
615 value_derive.derive = (derive_t) msg_uint.ui;
616 break;
617 }
619 case gmetric_string:
620 {
621 Ganglia_gmetric_string msg_string;
622 int status;
624 msg_string = msg->Ganglia_value_msg_u.gstr;
626 host = msg_string.metric_id.host;
627 name = msg_string.metric_id.name;
629 status = parse_value (msg_string.str, &value_derive, DS_TYPE_DERIVE);
630 if (status != 0)
631 value_derive.derive = -1;
633 status = parse_value (msg_string.str, &value_gauge, DS_TYPE_GAUGE);
634 if (status != 0)
635 value_gauge.gauge = NAN;
637 status = parse_value (msg_string.str, &value_counter, DS_TYPE_COUNTER);
638 if (status != 0)
639 value_counter.counter = 0;
641 break;
642 }
644 case gmetric_float:
645 {
646 Ganglia_gmetric_float msg_float;
648 msg_float = msg->Ganglia_value_msg_u.gf;
650 host = msg_float.metric_id.host;
651 name = msg_float.metric_id.name;
652 value_counter.counter = (counter_t) msg_float.f;
653 value_gauge.gauge = (gauge_t) msg_float.f;
654 value_derive.derive = (derive_t) msg_float.f;
655 break;
656 }
658 case gmetric_double:
659 {
660 Ganglia_gmetric_double msg_double;
662 msg_double = msg->Ganglia_value_msg_u.gd;
664 host = msg_double.metric_id.host;
665 name = msg_double.metric_id.name;
666 value_counter.counter = (counter_t) msg_double.d;
667 value_gauge.gauge = (gauge_t) msg_double.d;
668 value_derive.derive = (derive_t) msg_double.d;
669 break;
670 }
671 default:
672 DEBUG ("gmond plugin: Value type not handled: %i", msg->id);
673 return (-1);
674 } /* }}} switch (msg->id) */
676 assert (host != NULL);
677 assert (name != NULL);
679 map = metric_lookup (name);
680 if (map != NULL)
681 {
682 value_t val_copy;
684 if ((map->ds_type == DS_TYPE_COUNTER)
685 || (map->ds_type == DS_TYPE_ABSOLUTE))
686 val_copy = value_counter;
687 else if (map->ds_type == DS_TYPE_GAUGE)
688 val_copy = value_gauge;
689 else if (map->ds_type == DS_TYPE_DERIVE)
690 val_copy = value_derive;
691 else
692 assert (23 == 42);
694 return (staging_entry_update (host, name,
695 map->type, map->type_instance,
696 map->ds_index, map->ds_type,
697 val_copy));
698 }
700 DEBUG ("gmond plugin: Cannot find a translation for %s.", name);
701 return (-1);
702 } /* }}} int mc_handle_value_msg */
704 static int mc_handle_metadata_msg (Ganglia_metadata_msg *msg) /* {{{ */
705 {
706 switch (msg->id)
707 {
708 case gmetadata_full:
709 {
710 Ganglia_metadatadef msg_meta;
711 staging_entry_t *se;
712 const data_set_t *ds;
713 metric_map_t *map;
715 msg_meta = msg->Ganglia_metadata_msg_u.gfull;
717 if (msg_meta.metric.tmax <= 0)
718 return (-1);
720 map = metric_lookup (msg_meta.metric_id.name);
721 if (map == NULL)
722 {
723 DEBUG ("gmond plugin: Not handling meta data %s.",
724 msg_meta.metric_id.name);
725 return (0);
726 }
728 ds = plugin_get_ds (map->type);
729 if (ds == NULL)
730 {
731 WARNING ("gmond plugin: Could not find data set %s.", map->type);
732 return (-1);
733 }
735 DEBUG ("gmond plugin: Received meta data for %s/%s.",
736 msg_meta.metric_id.host, msg_meta.metric_id.name);
738 pthread_mutex_lock (&staging_lock);
739 se = staging_entry_get (msg_meta.metric_id.host,
740 msg_meta.metric_id.name,
741 map->type, map->type_instance,
742 ds->ds_num);
743 if (se != NULL)
744 se->vl.interval = TIME_T_TO_CDTIME_T (msg_meta.metric.tmax);
745 pthread_mutex_unlock (&staging_lock);
747 if (se == NULL)
748 {
749 ERROR ("gmond plugin: staging_entry_get failed.");
750 return (-1);
751 }
753 break;
754 }
756 default:
757 {
758 return (-1);
759 }
760 }
762 return (0);
763 } /* }}} int mc_handle_metadata_msg */
765 static int mc_handle_metric (void *buffer, size_t buffer_size) /* {{{ */
766 {
767 XDR xdr;
768 Ganglia_msg_formats format;
770 xdrmem_create (&xdr, buffer, buffer_size, XDR_DECODE);
772 xdr_Ganglia_msg_formats (&xdr, &format);
773 xdr_setpos (&xdr, 0);
775 switch (format)
776 {
777 case gmetric_ushort:
778 case gmetric_short:
779 case gmetric_int:
780 case gmetric_uint:
781 case gmetric_string:
782 case gmetric_float:
783 case gmetric_double:
784 {
785 Ganglia_value_msg msg;
787 memset (&msg, 0, sizeof (msg));
788 if (xdr_Ganglia_value_msg (&xdr, &msg))
789 mc_handle_value_msg (&msg);
790 break;
791 }
793 case gmetadata_full:
794 case gmetadata_request:
795 {
796 Ganglia_metadata_msg msg;
797 memset (&msg, 0, sizeof (msg));
798 if (xdr_Ganglia_metadata_msg (&xdr, &msg))
799 mc_handle_metadata_msg (&msg);
800 break;
801 }
803 default:
804 DEBUG ("gmond plugin: Unknown format: %i", format);
805 return (-1);
806 } /* switch (format) */
809 return (0);
810 } /* }}} int mc_handle_metric */
812 static int mc_handle_socket (struct pollfd *p) /* {{{ */
813 {
814 char buffer[BUFF_SIZE];
815 ssize_t buffer_size;
817 if ((p->revents & (POLLIN | POLLPRI)) == 0)
818 {
819 p->revents = 0;
820 return (-1);
821 }
823 buffer_size = recv (p->fd, buffer, sizeof (buffer), /* flags = */ 0);
824 if (buffer_size <= 0)
825 {
826 char errbuf[1024];
827 ERROR ("gmond plugin: recv failed: %s",
828 sstrerror (errno, errbuf, sizeof (errbuf)));
829 p->revents = 0;
830 return (-1);
831 }
833 mc_handle_metric (buffer, (size_t) buffer_size);
834 return (0);
835 } /* }}} int mc_handle_socket */
837 static void *mc_receive_thread (void *arg) /* {{{ */
838 {
839 socket_entry_t *mc_receive_socket_entries;
840 int status;
841 size_t i;
843 mc_receive_socket_entries = NULL;
844 status = create_sockets (&mc_receive_socket_entries, &mc_receive_sockets_num,
845 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
846 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
847 /* listen = */ 1);
848 if (status != 0)
849 {
850 ERROR ("gmond plugin: create_sockets failed.");
851 return ((void *) -1);
852 }
854 mc_receive_sockets = (struct pollfd *) calloc (mc_receive_sockets_num,
855 sizeof (*mc_receive_sockets));
856 if (mc_receive_sockets == NULL)
857 {
858 ERROR ("gmond plugin: calloc failed.");
859 for (i = 0; i < mc_receive_sockets_num; i++)
860 close (mc_receive_socket_entries[i].fd);
861 free (mc_receive_socket_entries);
862 mc_receive_socket_entries = NULL;
863 mc_receive_sockets_num = 0;
864 return ((void *) -1);
865 }
867 for (i = 0; i < mc_receive_sockets_num; i++)
868 {
869 mc_receive_sockets[i].fd = mc_receive_socket_entries[i].fd;
870 mc_receive_sockets[i].events = POLLIN | POLLPRI;
871 mc_receive_sockets[i].revents = 0;
872 }
874 while (mc_receive_thread_loop != 0)
875 {
876 status = poll (mc_receive_sockets, mc_receive_sockets_num, -1);
877 if (status <= 0)
878 {
879 char errbuf[1024];
880 if (errno == EINTR)
881 continue;
882 ERROR ("gmond plugin: poll failed: %s",
883 sstrerror (errno, errbuf, sizeof (errbuf)));
884 break;
885 }
887 for (i = 0; i < mc_receive_sockets_num; i++)
888 {
889 if (mc_receive_sockets[i].revents != 0)
890 mc_handle_socket (mc_receive_sockets + i);
891 }
892 } /* while (mc_receive_thread_loop != 0) */
894 free (mc_receive_socket_entries);
895 return ((void *) 0);
896 } /* }}} void *mc_receive_thread */
898 static int mc_receive_thread_start (void) /* {{{ */
899 {
900 int status;
902 if (mc_receive_thread_running != 0)
903 return (-1);
905 mc_receive_thread_loop = 1;
907 status = plugin_thread_create (&mc_receive_thread_id, /* attr = */ NULL,
908 mc_receive_thread, /* args = */ NULL);
909 if (status != 0)
910 {
911 ERROR ("gmond plugin: Starting receive thread failed.");
912 mc_receive_thread_loop = 0;
913 return (-1);
914 }
916 mc_receive_thread_running = 1;
917 return (0);
918 } /* }}} int start_receive_thread */
920 static int mc_receive_thread_stop (void) /* {{{ */
921 {
922 if (mc_receive_thread_running == 0)
923 return (-1);
925 mc_receive_thread_loop = 0;
927 INFO ("gmond plugin: Stopping receive thread.");
928 pthread_kill (mc_receive_thread_id, SIGTERM);
929 pthread_join (mc_receive_thread_id, /* return value = */ NULL);
930 memset (&mc_receive_thread_id, 0, sizeof (mc_receive_thread_id));
932 mc_receive_thread_running = 0;
934 return (0);
935 } /* }}} int mc_receive_thread_stop */
937 /*
938 * Config:
939 *
940 * <Plugin gmond>
941 * MCReceiveFrom "239.2.11.71" "8649"
942 * <Metric "load_one">
943 * Type "load"
944 * [TypeInstance "foo"]
945 * [DataSource "bar"]
946 * </Metric>
947 * </Plugin>
948 */
949 static int gmond_config_set_string (oconfig_item_t *ci, char **str) /* {{{ */
950 {
951 char *tmp;
953 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
954 {
955 WARNING ("gmond plugin: The `%s' option needs "
956 "exactly one string argument.", ci->key);
957 return (-1);
958 }
960 tmp = strdup (ci->values[0].value.string);
961 if (tmp == NULL)
962 {
963 ERROR ("gmond plugin: strdup failed.");
964 return (-1);
965 }
967 sfree (*str);
968 *str = tmp;
969 return (0);
970 } /* }}} int gmond_config_set_string */
972 static int gmond_config_add_metric (oconfig_item_t *ci) /* {{{ */
973 {
974 metric_map_t *map;
975 int i;
977 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
978 {
979 WARNING ("gmond plugin: `Metric' blocks need "
980 "exactly one string argument.");
981 return (-1);
982 }
984 map = realloc (metric_map, (metric_map_len + 1) * sizeof (*metric_map));
985 if (map == NULL)
986 {
987 ERROR ("gmond plugin: realloc failed.");
988 return (-1);
989 }
990 metric_map = map;
991 map = metric_map + metric_map_len;
993 memset (map, 0, sizeof (*map));
994 map->type = NULL;
995 map->type_instance = NULL;
996 map->ds_name = NULL;
997 map->ds_type = -1;
998 map->ds_index = -1;
1000 map->ganglia_name = strdup (ci->values[0].value.string);
1001 if (map->ganglia_name == NULL)
1002 {
1003 ERROR ("gmond plugin: strdup failed.");
1004 return (-1);
1005 }
1007 for (i = 0; i < ci->children_num; i++)
1008 {
1009 oconfig_item_t *child = ci->children + i;
1010 if (strcasecmp ("Type", child->key) == 0)
1011 gmond_config_set_string (child, &map->type);
1012 else if (strcasecmp ("TypeInstance", child->key) == 0)
1013 gmond_config_set_string (child, &map->type_instance);
1014 else if (strcasecmp ("DataSource", child->key) == 0)
1015 gmond_config_set_string (child, &map->ds_name);
1016 else
1017 {
1018 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1019 child->key);
1020 }
1021 }
1023 if (map->type == NULL)
1024 {
1025 ERROR ("gmond plugin: No type is set for metric %s.",
1026 map->ganglia_name);
1027 sfree (map->ganglia_name);
1028 sfree (map->type_instance);
1029 return (-1);
1030 }
1032 metric_map_len++;
1033 return (0);
1034 } /* }}} int gmond_config_add_metric */
1036 static int gmond_config_set_address (oconfig_item_t *ci, /* {{{ */
1037 char **ret_addr, char **ret_port)
1038 {
1039 char *addr;
1040 char *port;
1042 if ((ci->values_num != 1) && (ci->values_num != 2))
1043 {
1044 WARNING ("gmond plugin: The `%s' config option needs "
1045 "one or two string arguments.",
1046 ci->key);
1047 return (-1);
1048 }
1049 if ((ci->values[0].type != OCONFIG_TYPE_STRING)
1050 || ((ci->values_num == 2)
1051 && (ci->values[1].type != OCONFIG_TYPE_STRING)))
1052 {
1053 WARNING ("gmond plugin: The `%s' config option needs "
1054 "one or two string arguments.",
1055 ci->key);
1056 return (-1);
1057 }
1059 addr = strdup (ci->values[0].value.string);
1060 if (ci->values_num == 2)
1061 port = strdup (ci->values[1].value.string);
1062 else
1063 port = NULL;
1065 if ((addr == NULL) || ((ci->values_num == 2) && (port == NULL)))
1066 {
1067 ERROR ("gmond plugin: strdup failed.");
1068 sfree (addr);
1069 sfree (port);
1070 return (-1);
1071 }
1073 sfree (*ret_addr);
1074 sfree (*ret_port);
1076 *ret_addr = addr;
1077 *ret_port = port;
1079 return (0);
1080 } /* }}} int gmond_config_set_address */
1082 static int gmond_config (oconfig_item_t *ci) /* {{{ */
1083 {
1084 int i;
1086 for (i = 0; i < ci->children_num; i++)
1087 {
1088 oconfig_item_t *child = ci->children + i;
1089 if (strcasecmp ("MCReceiveFrom", child->key) == 0)
1090 gmond_config_set_address (child, &mc_receive_group, &mc_receive_port);
1091 else if (strcasecmp ("Metric", child->key) == 0)
1092 gmond_config_add_metric (child);
1093 else
1094 {
1095 WARNING ("gmond plugin: Unknown configuration option `%s' ignored.",
1096 child->key);
1097 }
1098 }
1100 return (0);
1101 } /* }}} int gmond_config */
1103 static int gmond_init (void) /* {{{ */
1104 {
1105 create_sockets (&mc_send_sockets, &mc_send_sockets_num,
1106 (mc_receive_group != NULL) ? mc_receive_group : MC_RECEIVE_GROUP_DEFAULT,
1107 (mc_receive_port != NULL) ? mc_receive_port : MC_RECEIVE_PORT_DEFAULT,
1108 /* listen = */ 0);
1110 staging_tree = c_avl_create ((void *) strcmp);
1111 if (staging_tree == NULL)
1112 {
1113 ERROR ("gmond plugin: c_avl_create failed.");
1114 return (-1);
1115 }
1117 mc_receive_thread_start ();
1119 return (0);
1120 } /* }}} int gmond_init */
1122 static int gmond_shutdown (void) /* {{{ */
1123 {
1124 size_t i;
1126 mc_receive_thread_stop ();
1128 pthread_mutex_lock (&mc_send_sockets_lock);
1129 for (i = 0; i < mc_send_sockets_num; i++)
1130 {
1131 close (mc_send_sockets[i].fd);
1132 mc_send_sockets[i].fd = -1;
1133 }
1134 sfree (mc_send_sockets);
1135 mc_send_sockets_num = 0;
1136 pthread_mutex_unlock (&mc_send_sockets_lock);
1139 return (0);
1140 } /* }}} int gmond_shutdown */
1142 void module_register (void)
1143 {
1144 plugin_register_complex_config ("gmond", gmond_config);
1145 plugin_register_init ("gmond", gmond_init);
1146 plugin_register_shutdown ("gmond", gmond_shutdown);
1147 }
1149 /* vim: set sw=2 sts=2 et fdm=marker : */