Code

c6fb44446849f6fe0def7a2e2bc02bc7852a2cc9
[collection4.git] / src / graph.c
1 /**
2  * collection4 - graph.c
3  * Copyright (C) 2010  Florian octo Forster
4  * 
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2.1 of the License, or (at your option) any later version.
9  * 
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  * 
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this program; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin Street, Fifth Floor,
18  * Boston, MA  02110-1301  USA
19  *
20  * Authors:
21  *   Florian octo Forster <ff at octo.it>
22  **/
24 #include <stdlib.h>
25 #include <stdio.h>
26 #include <stdint.h>
27 #include <inttypes.h>
28 #include <string.h>
29 #include <time.h>
30 #include <errno.h>
31 #include <assert.h>
33 #include "graph.h"
34 #include "graph_ident.h"
35 #include "graph_instance.h"
36 #include "graph_list.h"
37 #include "graph_def.h"
38 #include "graph_config.h"
39 #include "common.h"
40 #include "filesystem.h"
41 #include "utils_cgi.h"
43 #include <fcgiapp.h>
44 #include <fcgi_stdio.h>
46 /*
47  * Data types
48  */
49 struct graph_config_s /* {{{ */
50 {
51   graph_ident_t *select;
53   char *title;
54   char *vertical_label;
55   _Bool show_zero;
57   graph_def_t *defs;
59   graph_instance_t **instances;
60   size_t instances_num;
61 }; /* }}} struct graph_config_s */
63 /*
64  * Private functions
65  */
67 /*
68  * Config functions
69  */
70 static graph_ident_t *graph_config_get_selector (const oconfig_item_t *ci) /* {{{ */
71 {
72   char *host = NULL;
73   char *plugin = NULL;
74   char *plugin_instance = NULL;
75   char *type = NULL;
76   char *type_instance = NULL;
77   graph_ident_t *ret;
78   int i;
80   for (i = 0; i < ci->children_num; i++)
81   {
82     oconfig_item_t *child;
84     child = ci->children + i;
86     if (strcasecmp ("Host", child->key) == 0)
87       graph_config_get_string (child, &host);
88     else if (strcasecmp ("Plugin", child->key) == 0)
89       graph_config_get_string (child, &plugin);
90     else if (strcasecmp ("PluginInstance", child->key) == 0)
91       graph_config_get_string (child, &plugin_instance);
92     else if (strcasecmp ("Type", child->key) == 0)
93       graph_config_get_string (child, &type);
94     else if (strcasecmp ("TypeInstance", child->key) == 0)
95       graph_config_get_string (child, &type_instance);
96     /* else: ignore all other directives here. */
97   } /* for */
99   ret = ident_create (host, plugin, plugin_instance, type, type_instance);
101   free (host);
102   free (plugin);
103   free (plugin_instance);
104   free (type);
105   free (type_instance);
107   return (ret);
108 } /* }}} int graph_config_get_selector */
110 /*
111  * Global functions
112  */
113 graph_config_t *graph_create (const graph_ident_t *selector) /* {{{ */
115   graph_config_t *cfg;
117   cfg = malloc (sizeof (*cfg));
118   if (cfg == NULL)
119     return (NULL);
120   memset (cfg, 0, sizeof (*cfg));
122   if (selector != NULL)
123     cfg->select = ident_clone (selector);
124   else
125     cfg->select = NULL;
127   cfg->title = NULL;
128   cfg->vertical_label = NULL;
129   cfg->defs = NULL;
130   cfg->instances = NULL;
132   return (cfg);
133 } /* }}} int graph_create */
135 void graph_destroy (graph_config_t *cfg) /* {{{ */
137   size_t i;
139   if (cfg == NULL)
140     return;
142   ident_destroy (cfg->select);
144   free (cfg->title);
145   free (cfg->vertical_label);
147   def_destroy (cfg->defs);
149   for (i = 0; i < cfg->instances_num; i++)
150     inst_destroy (cfg->instances[i]);
151   free (cfg->instances);
152 } /* }}} void graph_destroy */
154 int graph_config_add (const oconfig_item_t *ci) /* {{{ */
156   graph_ident_t *select;
157   graph_config_t *cfg = NULL;
158   int i;
160   select = graph_config_get_selector (ci);
161   if (select == NULL)
162     return (EINVAL);
164   cfg = graph_create (/* selector = */ NULL);
165   if (cfg == NULL)
166     return (ENOMEM);
168   cfg->select = select;
170   for (i = 0; i < ci->children_num; i++)
171   {
172     oconfig_item_t *child;
174     child = ci->children + i;
176     if (strcasecmp ("Title", child->key) == 0)
177       graph_config_get_string (child, &cfg->title);
178     else if (strcasecmp ("VerticalLabel", child->key) == 0)
179       graph_config_get_string (child, &cfg->vertical_label);
180     else if (strcasecmp ("ShowZero", child->key) == 0)
181       graph_config_get_bool (child, &cfg->show_zero);
182     else if (strcasecmp ("DEF", child->key) == 0)
183       def_config (cfg, child);
184   } /* for */
186   gl_add_graph (cfg);
188   return (0);
189 } /* }}} graph_config_add */
191 int graph_add_file (graph_config_t *cfg, const graph_ident_t *file) /* {{{ */
193   graph_instance_t *inst;
195   inst = graph_inst_find_matching (cfg, file);
196   if (inst == NULL)
197   {
198     graph_instance_t **tmp;
200     tmp = realloc (cfg->instances,
201         sizeof (*cfg->instances) * (cfg->instances_num + 1));
202     if (tmp == NULL)
203       return (ENOMEM);
204     cfg->instances = tmp;
206     inst = inst_create (cfg, file);
207     if (inst == NULL)
208       return (ENOMEM);
210     cfg->instances[cfg->instances_num] = inst;
211     cfg->instances_num++;
212   }
214   return (inst_add_file (inst, file));
215 } /* }}} int graph_add_file */
217 int graph_get_title (graph_config_t *cfg, /* {{{ */
218     char *buffer, size_t buffer_size)
220   if ((cfg == NULL) || (buffer == NULL) || (buffer_size < 1))
221     return (EINVAL);
223   if (cfg->title == NULL)
224     cfg->title = ident_to_string (cfg->select);
226   if (cfg->title == NULL)
227     return (ENOMEM);
229   strncpy (buffer, cfg->title, buffer_size);
230   buffer[buffer_size - 1] = 0;
232   return (0);
233 } /* }}} int graph_get_title */
235 int graph_get_params (graph_config_t *cfg, /* {{{ */
236     char *buffer, size_t buffer_size)
238   buffer[0] = 0;
240 #define COPY_FIELD(field) do {                                       \
241   const char *str = ident_get_##field (cfg->select);                 \
242   char uri_str[1024];                                                \
243   uri_escape_copy (uri_str, str, sizeof (uri_str));                  \
244   strlcat (buffer, #field, buffer_size);                             \
245   strlcat (buffer, "=", buffer_size);                                \
246   strlcat (buffer, uri_str, buffer_size);                            \
247 } while (0)
249   COPY_FIELD(host);
250   strlcat (buffer, ";", buffer_size);
251   COPY_FIELD(plugin);
252   strlcat (buffer, ";", buffer_size);
253   COPY_FIELD(plugin_instance);
254   strlcat (buffer, ";", buffer_size);
255   COPY_FIELD(type);
256   strlcat (buffer, ";", buffer_size);
257   COPY_FIELD(type_instance);
259 #undef COPY_FIELD
261   return (0);
262 } /* }}} int graph_get_params */
264 graph_ident_t *graph_get_selector (graph_config_t *cfg) /* {{{ */
266   if (cfg == NULL)
267     return (NULL);
269   return (ident_clone (cfg->select));
270 } /* }}} graph_ident_t *graph_get_selector */
272 graph_def_t *graph_get_defs (graph_config_t *cfg) /* {{{ */
274   if (cfg == NULL)
275     return (NULL);
277   return (cfg->defs);
278 } /* }}} graph_def_t *graph_get_defs */
280 int graph_add_def (graph_config_t *cfg, graph_def_t *def) /* {{{ */
282   graph_def_t *tmp;
284   if ((cfg == NULL) || (def == NULL))
285     return (EINVAL);
287   if (cfg->defs == NULL)
288   {
289     cfg->defs = def;
290     return (0);
291   }
293   /* Insert in reverse order. This makes the order in the config file and the
294    * order of the DEFs in the graph more natural. Really. */
295   tmp = cfg->defs;
296   cfg->defs = def;
297   return (def_append (cfg->defs, tmp));
298 } /* }}} int graph_add_def */
300 _Bool graph_ident_matches (graph_config_t *cfg, const graph_ident_t *ident) /* {{{ */
302 #if C4_DEBUG
303   if ((cfg == NULL) || (ident == NULL))
304     return (0);
305 #endif
307   return (ident_matches (cfg->select, ident));
308 } /* }}} _Bool graph_ident_matches */
310 _Bool graph_matches_ident (graph_config_t *cfg, /* {{{ */
311     const graph_ident_t *selector)
313 #if C4_DEBUG
314   if ((cfg == NULL) || (selector == NULL))
315     return (0);
316 #endif
318   return (ident_matches (selector, cfg->select));
319 } /* }}} _Bool graph_matches_ident */
321 _Bool graph_matches_field (graph_config_t *cfg, /* {{{ */
322     graph_ident_field_t field, const char *field_value)
324   const char *selector_value;
326   if ((cfg == NULL) || (field_value == NULL))
327     return (0);
329   selector_value = ident_get_field (cfg->select, field);
330   if (selector_value == NULL)
331     return (0);
333   if (IS_ALL (selector_value) || IS_ANY (selector_value))
334     return (1);
335   else if (strcasecmp (selector_value, field_value) == 0)
336     return (1);
338   return (0);
339 } /* }}} _Bool graph_matches_field */
341 int graph_inst_foreach (graph_config_t *cfg, /* {{{ */
342                 inst_callback_t cb, void *user_data)
344   size_t i;
345   int status;
347   for (i = 0; i < cfg->instances_num; i++)
348   {
349     status = (*cb) (cfg->instances[i], user_data);
350     if (status != 0)
351       return (status);
352   }
354   return (0);
355 } /* }}} int graph_inst_foreach */
357 graph_instance_t *graph_inst_find_exact (graph_config_t *cfg, /* {{{ */
358     graph_ident_t *ident)
360   size_t i;
362   if ((cfg == NULL) || (ident == NULL))
363     return (NULL);
365   for (i = 0; i < cfg->instances_num; i++)
366     if (inst_compare_ident (cfg->instances[i], ident) == 0)
367       return (cfg->instances[i]);
369   return (NULL);
370 } /* }}} graph_instance_t *graph_inst_find_exact */
372 graph_instance_t *graph_inst_find_matching (graph_config_t *cfg, /* {{{ */
373     const graph_ident_t *ident)
375   size_t i;
377   if ((cfg == NULL) || (ident == NULL))
378     return (NULL);
380   for (i = 0; i < cfg->instances_num; i++)
381     if (inst_ident_matches (cfg->instances[i], ident))
382       return (cfg->instances[i]);
384   return (NULL);
385 } /* }}} graph_instance_t *graph_inst_find_matching */
387 int graph_inst_find_all_matching (graph_config_t *cfg, /* {{{ */
388     const graph_ident_t *ident,
389     graph_inst_callback_t callback, void *user_data)
391   size_t i;
393   if ((cfg == NULL) || (ident == NULL) || (callback == NULL))
394     return (EINVAL);
396   for (i = 0; i < cfg->instances_num; i++)
397   {
398     int status;
400     if (!inst_matches_ident (cfg->instances[i], ident))
401       continue;
403     status = (*callback) (cfg, cfg->instances[i], user_data);
404     if (status != 0)
405       return (status);
406   }
408   return (0);
409 } /* }}} int graph_inst_find_all_matching */
411 /* When this function is called from graph_list, it will already have checked
412  * that the selector of the graph matches the field selections contained in
413  * the search_info_t. So if the graphs title matches, this means that the
414  * field selections and the search term(s) apply to the graph in general; thus
415  * we return all instances. Otherwise, use the somewhat expensive
416  * "search_graph_inst_matches" function to look for matching instances. */
417 int graph_search_inst (graph_config_t *cfg, search_info_t *si, /* {{{ */
418     graph_inst_callback_t cb,
419     void *user_data)
421   char title[1024];
422   int status;
423   size_t i;
425   if ((cfg == NULL) || (si == NULL) || (cb == NULL))
426     return (EINVAL);
428   status = graph_get_title (cfg, title, sizeof (title));
429   if (status != 0)
430   {
431     fprintf (stderr, "graph_search_inst: graph_get_title failed\n");
432     return (status);
433   }
434   strtolower (title);
436   if (search_graph_title_matches (si, title))
437   {
438     /* The title of the graph matches, so return all instances. */
439     for (i = 0; i < cfg->instances_num; i++)
440     {
441       status = (*cb) (cfg, cfg->instances[i], user_data);
442       if (status != 0)
443         return (status);
444     }
445   }
446   else
447   {
448     /* The title doesn't match, so use the more expensive
449      * "search_graph_inst_matches" to look for matching instances. Since part
450      * of the terms may match the title and other terms may match the
451      * instance, the title must be passed along to that function again. */
452     for (i = 0; i < cfg->instances_num; i++)
453     {
454       if (search_graph_inst_matches (si, cfg, cfg->instances[i], title))
455       {
456         status = (*cb) (cfg, cfg->instances[i], user_data);
457         if (status != 0)
458           return (status);
459       }
460     }
461   }
463   return (0);
464 } /* }}} int graph_search_inst */
466 int graph_search_inst_string (graph_config_t *cfg, const char *term, /* {{{ */
467     graph_inst_callback_t cb,
468     void *user_data)
470   char buffer[1024];
471   int status;
472   size_t i;
474   status = graph_get_title (cfg, buffer, sizeof (buffer));
475   if (status != 0)
476   {
477     fprintf (stderr, "graph_search_inst_string: graph_get_title failed\n");
478     return (status);
479   }
481   strtolower (buffer);
483   if (strstr (buffer, term) != NULL)
484   {
485     for (i = 0; i < cfg->instances_num; i++)
486     {
487       status = (*cb) (cfg, cfg->instances[i], user_data);
488       if (status != 0)
489         return (status);
490     }
491   }
492   else
493   {
494     for (i = 0; i < cfg->instances_num; i++)
495     {
496       if (inst_matches_string (cfg, cfg->instances[i], term))
497       {
498         status = (*cb) (cfg, cfg->instances[i], user_data);
499         if (status != 0)
500           return (status);
501       }
502     }
503   }
505   return (0);
506 } /* }}} int graph_search_inst_string */
508 int graph_inst_search_field (graph_config_t *cfg, /* {{{ */
509     graph_ident_field_t field, const char *field_value,
510     graph_inst_callback_t callback, void *user_data)
512   size_t i;
513   const char *selector_field;
514   _Bool need_check_instances = 0;
516   if ((cfg == NULL) || (field_value == NULL) || (callback == NULL))
517     return (EINVAL);
519   if (!graph_matches_field (cfg, field, field_value))
520     return (0);
522   selector_field = ident_get_field (cfg->select, field);
523   if (selector_field == NULL)
524     return (-1);
526   if (IS_ALL (selector_field) || IS_ANY (selector_field))
527     need_check_instances = 1;
529   for (i = 0; i < cfg->instances_num; i++)
530   {
531     int status;
533     if (need_check_instances
534         && !inst_matches_field (cfg->instances[i], field, field_value))
535       continue;
537     status = (*callback) (cfg, cfg->instances[i], user_data);
538     if (status != 0)
539       return (status);
540   }
542   return (0);
543 } /* }}} int graph_inst_search_field */
545 int graph_compare (graph_config_t *cfg, const graph_ident_t *ident) /* {{{ */
547   if ((cfg == NULL) || (ident == NULL))
548     return (0);
550   return (ident_compare (cfg->select, ident));
551 } /* }}} int graph_compare */
553 static int graph_sort_instances_cb (const void *v0, const void *v1) /* {{{ */
555   return (inst_compare (*(graph_instance_t * const *) v0,
556         *(graph_instance_t * const *) v1));
557 } /* }}} int graph_sort_instances_cb */
559 size_t graph_num_instances (graph_config_t *cfg) /* {{{ */
561   if (cfg == NULL)
562     return ((size_t) -1);
564   return (cfg->instances_num);
565 } /* }}} size_t graph_num_instances */
567 int graph_sort_instances (graph_config_t *cfg) /* {{{ */
569   if (cfg == NULL)
570     return (EINVAL);
572   if (cfg->instances_num < 2)
573     return (0);
575   qsort (cfg->instances, cfg->instances_num, sizeof (*cfg->instances),
576       graph_sort_instances_cb);
578   return (0);
579 } /* }}} int graph_sort_instances */
581 int graph_clear_instances (graph_config_t *cfg) /* {{{ */
583   size_t i;
585   if (cfg == NULL)
586     return (EINVAL);
588   for (i = 0; i < cfg->instances_num; i++)
589     inst_destroy (cfg->instances[i]);
590   free (cfg->instances);
591   cfg->instances = NULL;
592   cfg->instances_num = 0;
594   return (0);
595 } /* }}} int graph_clear_instances */
597 int graph_get_rrdargs (graph_config_t *cfg, graph_instance_t *inst, /* {{{ */
598     rrd_args_t *args)
600   if ((cfg == NULL) || (inst == NULL) || (args == NULL))
601     return (EINVAL);
603   if (cfg->title != NULL)
604   {
605     array_append (args->options, "-t");
606     array_append (args->options, cfg->title);
607   }
609   if (cfg->vertical_label != NULL)
610   {
611     array_append (args->options, "-v");
612     array_append (args->options, cfg->vertical_label);
613   }
615   if (cfg->show_zero)
616   {
617     array_append (args->options, "-l");
618     array_append (args->options, "0");
619   }
621   return (0);
622 } /* }}} int graph_get_rrdargs */
624 /* vim: set sw=2 sts=2 et fdm=marker : */