Code

Merge branch 'collectd-5.4' into collectd-5.5
[collectd.git] / src / collectd-tg.c
1 /**
2  * collectd-tg - src/collectd-tg.c
3  * Copyright (C) 2010-2012  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 Forster <octo at collectd.org>
25  **/
27 #if HAVE_CONFIG_H
28 # include "config.h"
29 #endif
31 #if !__GNUC__
32 # define __attribute__(x) /**/
33 #endif
35 #include <stdlib.h>
36 #include <unistd.h>
37 #include <stdio.h>
38 #include <string.h>
39 #include <time.h>
40 #include <signal.h>
41 #include <errno.h>
43 #include "utils_heap.h"
45 #include "libcollectdclient/collectd/client.h"
46 #include "libcollectdclient/collectd/network.h"
47 #include "libcollectdclient/collectd/network_buffer.h"
49 #define DEF_NUM_HOSTS    1000
50 #define DEF_NUM_PLUGINS    20
51 #define DEF_NUM_VALUES 100000
52 #define DEF_INTERVAL       10.0
54 static int conf_num_hosts = DEF_NUM_HOSTS;
55 static int conf_num_plugins = DEF_NUM_PLUGINS;
56 static int conf_num_values = DEF_NUM_VALUES;
57 static double conf_interval = DEF_INTERVAL;
58 static const char *conf_destination = NET_DEFAULT_V6_ADDR;
59 static const char *conf_service = NET_DEFAULT_PORT;
61 static lcc_network_t *net;
63 static c_heap_t *values_heap = NULL;
65 static struct sigaction sigint_action;
66 static struct sigaction sigterm_action;
68 static _Bool loop = 1;
70 __attribute__((noreturn))
71 static void exit_usage (int exit_status) /* {{{ */
72 {
73   fprintf ((exit_status == EXIT_FAILURE) ? stderr : stdout,
74       "collectd-tg -- collectd traffic generator\n"
75       "\n"
76       "  Usage: collectd-ng [OPTION]\n"
77       "\n"
78       "  Valid options:\n"
79       "    -n <number>    Number of value lists. (Default: %i)\n"
80       "    -H <number>    Number of hosts to emulate. (Default: %i)\n"
81       "    -p <number>    Number of plugins to emulate. (Default: %i)\n"
82       "    -i <seconds>   Interval of each value in seconds. (Default: %.3f)\n"
83       "    -d <dest>      Destination address of the network packets.\n"
84       "                   (Default: %s)\n"
85       "    -D <port>      Destination port of the network packets.\n"
86       "                   (Default: %s)\n"
87       "    -h             Print usage information (this output).\n"
88       "\n"
89       "Copyright (C) 2010-2012  Florian Forster\n"
90       "Licensed under the MIT license.\n",
91       DEF_NUM_VALUES, DEF_NUM_HOSTS, DEF_NUM_PLUGINS,
92       DEF_INTERVAL,
93       NET_DEFAULT_V6_ADDR, NET_DEFAULT_PORT);
94   exit (exit_status);
95 } /* }}} void exit_usage */
97 static void signal_handler (int signal) /* {{{ */
98 {
99   loop = 0;
100 } /* }}} void signal_handler */
102 static int compare_time (const void *v0, const void *v1) /* {{{ */
104   const lcc_value_list_t *vl0 = v0;
105   const lcc_value_list_t *vl1 = v1;
107   if (vl0->time < vl1->time)
108     return (-1);
109   else if (vl0->time > vl1->time)
110     return (1);
111   else
112     return (0);
113 } /* }}} int compare_time */
115 static int get_boundet_random (int min, int max) /* {{{ */
117   int range;
119   if (min >= max)
120     return (-1);
121   if (min == (max - 1))
122     return (min);
124   range = max - min;
126   return (min + ((int) (((double) range) * ((double) random ()) / (((double) RAND_MAX) + 1.0))));
127 } /* }}} int get_boundet_random */
129 static lcc_value_list_t *create_value_list (void) /* {{{ */
131   lcc_value_list_t *vl;
132   int host_num;
134   vl = malloc (sizeof (*vl));
135   if (vl == NULL)
136   {
137     fprintf (stderr, "malloc failed.\n");
138     return (NULL);
139   }
140   memset (vl, 0, sizeof (*vl));
142   vl->values = calloc (/* nmemb = */ 1, sizeof (*vl->values));
143   if (vl->values == NULL)
144   {
145     fprintf (stderr, "calloc failed.\n");
146     free (vl);
147     return (NULL);
148   }
150   vl->values_types = calloc (/* nmemb = */ 1, sizeof (*vl->values_types));
151   if (vl->values_types == NULL)
152   {
153     fprintf (stderr, "calloc failed.\n");
154     free (vl->values);
155     free (vl);
156     return (NULL);
157   }
159   vl->values_len = 1;
161   host_num = get_boundet_random (0, conf_num_hosts);
163   vl->interval = conf_interval;
164   vl->time = 1.0 + time (NULL)
165     + (host_num % (1 + (int) vl->interval));
167   if (get_boundet_random (0, 2) == 0)
168     vl->values_types[0] = LCC_TYPE_GAUGE;
169   else
170     vl->values_types[0] = LCC_TYPE_DERIVE;
172   snprintf (vl->identifier.host, sizeof (vl->identifier.host),
173       "host%04i", host_num);
174   snprintf (vl->identifier.plugin, sizeof (vl->identifier.plugin),
175       "plugin%03i", get_boundet_random (0, conf_num_plugins));
176   strncpy (vl->identifier.type,
177       (vl->values_types[0] == LCC_TYPE_GAUGE) ? "gauge" : "derive",
178       sizeof (vl->identifier.type));
179   vl->identifier.type[sizeof (vl->identifier.type) - 1] = 0;
180   snprintf (vl->identifier.type_instance, sizeof (vl->identifier.type_instance),
181       "ti%li", random ());
183   return (vl);
184 } /* }}} int create_value_list */
186 static void destroy_value_list (lcc_value_list_t *vl) /* {{{ */
188   if (vl == NULL)
189     return;
191   free (vl->values);
192   free (vl->values_types);
193   free (vl);
194 } /* }}} void destroy_value_list */
196 static int send_value (lcc_value_list_t *vl) /* {{{ */
198   int status;
200   if (vl->values_types[0] == LCC_TYPE_GAUGE)
201     vl->values[0].gauge = 100.0 * ((gauge_t) random ()) / (((gauge_t) RAND_MAX) + 1.0);
202   else
203     vl->values[0].derive += get_boundet_random (0, 100);
205   status = lcc_network_values_send (net, vl);
206   if (status != 0)
207     fprintf (stderr, "lcc_network_values_send failed with status %i.\n", status);
209   vl->time += vl->interval;
211   return (0);
212 } /* }}} int send_value */
214 static int get_integer_opt (const char *str, int *ret_value) /* {{{ */
216   char *endptr;
217   int tmp;
219   errno = 0;
220   endptr = NULL;
221   tmp = (int) strtol (str, &endptr, /* base = */ 0);
222   if (errno != 0)
223   {
224     fprintf (stderr, "Unable to parse option as a number: \"%s\": %s\n",
225         str, strerror (errno));
226     exit (EXIT_FAILURE);
227   }
228   else if (endptr == str)
229   {
230     fprintf (stderr, "Unable to parse option as a number: \"%s\"\n", str);
231     exit (EXIT_FAILURE);
232   }
233   else if (*endptr != 0)
234   {
235     fprintf (stderr, "Garbage after end of value: \"%s\"\n", str);
236     exit (EXIT_FAILURE);
237   }
239   *ret_value = tmp;
240   return (0);
241 } /* }}} int get_integer_opt */
243 static int get_double_opt (const char *str, double *ret_value) /* {{{ */
245   char *endptr;
246   double tmp;
248   errno = 0;
249   endptr = NULL;
250   tmp = strtod (str, &endptr);
251   if (errno != 0)
252   {
253     fprintf (stderr, "Unable to parse option as a number: \"%s\": %s\n",
254         str, strerror (errno));
255     exit (EXIT_FAILURE);
256   }
257   else if (endptr == str)
258   {
259     fprintf (stderr, "Unable to parse option as a number: \"%s\"\n", str);
260     exit (EXIT_FAILURE);
261   }
262   else if (*endptr != 0)
263   {
264     fprintf (stderr, "Garbage after end of value: \"%s\"\n", str);
265     exit (EXIT_FAILURE);
266   }
268   *ret_value = tmp;
269   return (0);
270 } /* }}} int get_double_opt */
272 static int read_options (int argc, char **argv) /* {{{ */
274   int opt;
276   while ((opt = getopt (argc, argv, "n:H:p:i:d:D:h")) != -1)
277   {
278     switch (opt)
279     {
280       case 'n':
281         get_integer_opt (optarg, &conf_num_values);
282         break;
284       case 'H':
285         get_integer_opt (optarg, &conf_num_hosts);
286         break;
288       case 'p':
289         get_integer_opt (optarg, &conf_num_plugins);
290         break;
292       case 'i':
293         get_double_opt (optarg, &conf_interval);
294         break;
296       case 'd':
297         conf_destination = optarg;
298         break;
300       case 'D':
301         conf_service = optarg;
302         break;
304       case 'h':
305         exit_usage (EXIT_SUCCESS);
307       default:
308         exit_usage (EXIT_FAILURE);
309     } /* switch (opt) */
310   } /* while (getopt) */
312   return (0);
313 } /* }}} int read_options */
315 int main (int argc, char **argv) /* {{{ */
317   int i;
318   time_t last_time;
319   int values_sent = 0;
321   read_options (argc, argv);
323   sigint_action.sa_handler = signal_handler;
324   sigaction (SIGINT, &sigint_action, /* old = */ NULL);
326   sigterm_action.sa_handler = signal_handler;
327   sigaction (SIGTERM, &sigterm_action, /* old = */ NULL);
330   values_heap = c_heap_create (compare_time);
331   if (values_heap == NULL)
332   {
333     fprintf (stderr, "c_heap_create failed.\n");
334     exit (EXIT_FAILURE);
335   }
337   net = lcc_network_create ();
338   if (net == NULL)
339   {
340     fprintf (stderr, "lcc_network_create failed.\n");
341     exit (EXIT_FAILURE);
342   }
343   else
344   {
345     lcc_server_t *srv;
346     
347     srv = lcc_server_create (net, conf_destination, conf_service);
348     if (srv == NULL)
349     {
350       fprintf (stderr, "lcc_server_create failed.\n");
351       exit (EXIT_FAILURE);
352     }
354     lcc_server_set_ttl (srv, 42);
355 #if 0
356     lcc_server_set_security_level (srv, ENCRYPT,
357         "admin", "password1");
358 #endif
359   }
361   fprintf (stdout, "Creating %i values ... ", conf_num_values);
362   fflush (stdout);
363   for (i = 0; i < conf_num_values; i++)
364   {
365     lcc_value_list_t *vl;
367     vl = create_value_list ();
368     if (vl == NULL)
369     {
370       fprintf (stderr, "create_value_list failed.\n");
371       exit (EXIT_FAILURE);
372     }
374     c_heap_insert (values_heap, vl);
375   }
376   fprintf (stdout, "done\n");
378   last_time = 0;
379   while (loop)
380   {
381     lcc_value_list_t *vl = c_heap_get_root (values_heap);
383     if (vl == NULL)
384       break;
386     if (vl->time != last_time)
387     {
388       printf ("%i values have been sent.\n", values_sent);
390       /* Check if we need to sleep */
391       time_t now = time (NULL);
393       while (now < vl->time)
394       {
395         /* 1 / 100 second */
396         struct timespec ts = { 0, 10000000 };
397         nanosleep (&ts, /* remaining = */ NULL);
398         now = time (NULL);
400         if (!loop)
401           break;
402       }
403       last_time = vl->time;
404     }
406     send_value (vl);
407     values_sent++;
409     c_heap_insert (values_heap, vl);
410   }
412   fprintf (stdout, "Shutting down.\n");
413   fflush (stdout);
415   while (42)
416   {
417     lcc_value_list_t *vl = c_heap_get_root (values_heap);
418     if (vl == NULL)
419       break;
420     destroy_value_list (vl);
421   }
422   c_heap_destroy (values_heap);
424   lcc_network_destroy (net);
425   exit (EXIT_SUCCESS);
426   return (0);
427 } /* }}} int main */
429 /* vim: set sw=2 sts=2 et fdm=marker : */