src/graph_list.[ch]: Implement "gl_search".
[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  **/
23
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>
32
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"
42
43 #include <fcgiapp.h>
44 #include <fcgi_stdio.h>
45
46 /*
47  * Data types
48  */
49 struct graph_config_s /* {{{ */
50 {
51   graph_ident_t *select;
52
53   char *title;
54   char *vertical_label;
55   _Bool show_zero;
56
57   graph_def_t *defs;
58
59   graph_instance_t **instances;
60   size_t instances_num;
61 }; /* }}} struct graph_config_s */
62
63 /*
64  * Private functions
65  */
66
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;
79
80   for (i = 0; i < ci->children_num; i++)
81   {
82     oconfig_item_t *child;
83
84     child = ci->children + i;
85
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 */
98
99   ret = ident_create (host, plugin, plugin_instance, type, type_instance);
100
101   free (host);
102   free (plugin);
103   free (plugin_instance);
104   free (type);
105   free (type_instance);
106
107   return (ret);
108 } /* }}} int graph_config_get_selector */
109
110 /*
111  * Global functions
112  */
113 graph_config_t *graph_create (const graph_ident_t *selector) /* {{{ */
114 {
115   graph_config_t *cfg;
116
117   cfg = malloc (sizeof (*cfg));
118   if (cfg == NULL)
119     return (NULL);
120   memset (cfg, 0, sizeof (*cfg));
121
122   if (selector != NULL)
123     cfg->select = ident_clone (selector);
124   else
125     cfg->select = NULL;
126
127   cfg->title = NULL;
128   cfg->vertical_label = NULL;
129   cfg->defs = NULL;
130   cfg->instances = NULL;
131
132   return (cfg);
133 } /* }}} int graph_create */
134
135 void graph_destroy (graph_config_t *cfg) /* {{{ */
136 {
137   size_t i;
138
139   if (cfg == NULL)
140     return;
141
142   ident_destroy (cfg->select);
143
144   free (cfg->title);
145   free (cfg->vertical_label);
146
147   def_destroy (cfg->defs);
148
149   for (i = 0; i < cfg->instances_num; i++)
150     inst_destroy (cfg->instances[i]);
151   free (cfg->instances);
152 } /* }}} void graph_destroy */
153
154 int graph_config_add (const oconfig_item_t *ci) /* {{{ */
155 {
156   graph_ident_t *select;
157   graph_config_t *cfg = NULL;
158   int i;
159
160   select = graph_config_get_selector (ci);
161   if (select == NULL)
162     return (EINVAL);
163
164   cfg = graph_create (/* selector = */ NULL);
165   if (cfg == NULL)
166     return (ENOMEM);
167
168   cfg->select = select;
169
170   for (i = 0; i < ci->children_num; i++)
171   {
172     oconfig_item_t *child;
173
174     child = ci->children + i;
175
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 */
185
186   gl_add_graph (cfg);
187
188   return (0);
189 } /* }}} graph_config_add */
190
191 int graph_add_file (graph_config_t *cfg, const graph_ident_t *file) /* {{{ */
192 {
193   graph_instance_t *inst;
194
195   inst = graph_inst_find_matching (cfg, file);
196   if (inst == NULL)
197   {
198     graph_instance_t **tmp;
199
200     tmp = realloc (cfg->instances,
201         sizeof (*cfg->instances) * (cfg->instances_num + 1));
202     if (tmp == NULL)
203       return (ENOMEM);
204     cfg->instances = tmp;
205
206     inst = inst_create (cfg, file);
207     if (inst == NULL)
208       return (ENOMEM);
209
210     cfg->instances[cfg->instances_num] = inst;
211     cfg->instances_num++;
212   }
213
214   return (inst_add_file (inst, file));
215 } /* }}} int graph_add_file */
216
217 int graph_get_title (graph_config_t *cfg, /* {{{ */
218     char *buffer, size_t buffer_size)
219 {
220   if ((cfg == NULL) || (buffer == NULL) || (buffer_size < 1))
221     return (EINVAL);
222
223   if (cfg->title == NULL)
224     cfg->title = ident_to_string (cfg->select);
225
226   if (cfg->title == NULL)
227     return (ENOMEM);
228
229   strncpy (buffer, cfg->title, buffer_size);
230   buffer[buffer_size - 1] = 0;
231
232   return (0);
233 } /* }}} int graph_get_title */
234
235 int graph_get_params (graph_config_t *cfg, /* {{{ */
236     char *buffer, size_t buffer_size)
237 {
238   buffer[0] = 0;
239
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)
248
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);
258
259 #undef COPY_FIELD
260
261   return (0);
262 } /* }}} int graph_get_params */
263
264 graph_ident_t *graph_get_selector (graph_config_t *cfg) /* {{{ */
265 {
266   if (cfg == NULL)
267     return (NULL);
268
269   return (ident_clone (cfg->select));
270 } /* }}} graph_ident_t *graph_get_selector */
271
272 graph_def_t *graph_get_defs (graph_config_t *cfg) /* {{{ */
273 {
274   if (cfg == NULL)
275     return (NULL);
276
277   return (cfg->defs);
278 } /* }}} graph_def_t *graph_get_defs */
279
280 int graph_add_def (graph_config_t *cfg, graph_def_t *def) /* {{{ */
281 {
282   graph_def_t *tmp;
283
284   if ((cfg == NULL) || (def == NULL))
285     return (EINVAL);
286
287   if (cfg->defs == NULL)
288   {
289     cfg->defs = def;
290     return (0);
291   }
292
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 */
299
300 _Bool graph_ident_matches (graph_config_t *cfg, const graph_ident_t *ident) /* {{{ */
301 {
302 #if C4_DEBUG
303   if ((cfg == NULL) || (ident == NULL))
304     return (0);
305 #endif
306
307   return (ident_matches (cfg->select, ident));
308 } /* }}} _Bool graph_ident_matches */
309
310 _Bool graph_matches_ident (graph_config_t *cfg, /* {{{ */
311     const graph_ident_t *selector)
312 {
313 #if C4_DEBUG
314   if ((cfg == NULL) || (selector == NULL))
315     return (0);
316 #endif
317
318   return (ident_matches (selector, cfg->select));
319 } /* }}} _Bool graph_matches_ident */
320
321 _Bool graph_matches_field (graph_config_t *cfg, /* {{{ */
322     graph_ident_field_t field, const char *field_value)
323 {
324   const char *selector_value;
325
326   if ((cfg == NULL) || (field_value == NULL))
327     return (0);
328
329   selector_value = ident_get_field (cfg->select, field);
330   if (selector_value == NULL)
331     return (0);
332
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);
337
338   return (0);
339 } /* }}} _Bool graph_matches_field */
340
341 int graph_inst_foreach (graph_config_t *cfg, /* {{{ */
342                 inst_callback_t cb, void *user_data)
343 {
344   size_t i;
345   int status;
346
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   }
353
354   return (0);
355 } /* }}} int graph_inst_foreach */
356
357 graph_instance_t *graph_inst_find_exact (graph_config_t *cfg, /* {{{ */
358     graph_ident_t *ident)
359 {
360   size_t i;
361
362   if ((cfg == NULL) || (ident == NULL))
363     return (NULL);
364
365   for (i = 0; i < cfg->instances_num; i++)
366     if (inst_compare_ident (cfg->instances[i], ident) == 0)
367       return (cfg->instances[i]);
368
369   return (NULL);
370 } /* }}} graph_instance_t *graph_inst_find_exact */
371
372 graph_instance_t *graph_inst_find_matching (graph_config_t *cfg, /* {{{ */
373     const graph_ident_t *ident)
374 {
375   size_t i;
376
377   if ((cfg == NULL) || (ident == NULL))
378     return (NULL);
379
380   for (i = 0; i < cfg->instances_num; i++)
381     if (inst_ident_matches (cfg->instances[i], ident))
382       return (cfg->instances[i]);
383
384   return (NULL);
385 } /* }}} graph_instance_t *graph_inst_find_matching */
386
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)
390 {
391   size_t i;
392
393   if ((cfg == NULL) || (ident == NULL) || (callback == NULL))
394     return (EINVAL);
395
396   for (i = 0; i < cfg->instances_num; i++)
397   {
398     int status;
399
400     if (!inst_matches_ident (cfg->instances[i], ident))
401       continue;
402
403     status = (*callback) (cfg, cfg->instances[i], user_data);
404     if (status != 0)
405       return (status);
406   }
407
408   return (0);
409 } /* }}} int graph_inst_find_all_matching */
410
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)
420 {
421   char title[1024];
422   int status;
423   size_t i;
424
425   if ((cfg == NULL) || (si == NULL) || (cb == NULL))
426     return (EINVAL);
427
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);
435
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   }
462
463   return (0);
464 } /* }}} int graph_search_inst */
465
466 int graph_search_inst_string (graph_config_t *cfg, const char *term, /* {{{ */
467     graph_inst_callback_t cb,
468     void *user_data)
469 {
470   char buffer[1024];
471   int status;
472   size_t i;
473
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   }
480
481   strtolower (buffer);
482
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   }
504
505   return (0);
506 } /* }}} int graph_search_inst_string */
507
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)
511 {
512   size_t i;
513   const char *selector_field;
514   _Bool need_check_instances = 0;
515
516   if ((cfg == NULL) || (field_value == NULL) || (callback == NULL))
517     return (EINVAL);
518
519   if (!graph_matches_field (cfg, field, field_value))
520     return (0);
521
522   selector_field = ident_get_field (cfg->select, field);
523   if (selector_field == NULL)
524     return (-1);
525
526   if (IS_ALL (selector_field) || IS_ANY (selector_field))
527     need_check_instances = 1;
528
529   for (i = 0; i < cfg->instances_num; i++)
530   {
531     int status;
532
533     if (need_check_instances
534         && !inst_matches_field (cfg->instances[i], field, field_value))
535       continue;
536
537     status = (*callback) (cfg, cfg->instances[i], user_data);
538     if (status != 0)
539       return (status);
540   }
541
542   return (0);
543 } /* }}} int graph_inst_search_field */
544
545 int graph_compare (graph_config_t *cfg, const graph_ident_t *ident) /* {{{ */
546 {
547   if ((cfg == NULL) || (ident == NULL))
548     return (0);
549
550   return (ident_compare (cfg->select, ident));
551 } /* }}} int graph_compare */
552
553 static int graph_sort_instances_cb (const void *v0, const void *v1) /* {{{ */
554 {
555   return (inst_compare (*(graph_instance_t * const *) v0,
556         *(graph_instance_t * const *) v1));
557 } /* }}} int graph_sort_instances_cb */
558
559 size_t graph_num_instances (graph_config_t *cfg) /* {{{ */
560 {
561   if (cfg == NULL)
562     return ((size_t) -1);
563
564   return (cfg->instances_num);
565 } /* }}} size_t graph_num_instances */
566
567 int graph_sort_instances (graph_config_t *cfg) /* {{{ */
568 {
569   if (cfg == NULL)
570     return (EINVAL);
571
572   if (cfg->instances_num < 2)
573     return (0);
574
575   qsort (cfg->instances, cfg->instances_num, sizeof (*cfg->instances),
576       graph_sort_instances_cb);
577
578   return (0);
579 } /* }}} int graph_sort_instances */
580
581 int graph_clear_instances (graph_config_t *cfg) /* {{{ */
582 {
583   size_t i;
584
585   if (cfg == NULL)
586     return (EINVAL);
587
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;
593
594   return (0);
595 } /* }}} int graph_clear_instances */
596
597 int graph_get_rrdargs (graph_config_t *cfg, graph_instance_t *inst, /* {{{ */
598     rrd_args_t *args)
599 {
600   if ((cfg == NULL) || (inst == NULL) || (args == NULL))
601     return (EINVAL);
602
603   if (cfg->title != NULL)
604   {
605     array_append (args->options, "-t");
606     array_append (args->options, cfg->title);
607   }
608
609   if (cfg->vertical_label != NULL)
610   {
611     array_append (args->options, "-v");
612     array_append (args->options, cfg->vertical_label);
613   }
614
615   if (cfg->show_zero)
616   {
617     array_append (args->options, "-l");
618     array_append (args->options, "0");
619   }
620
621   return (0);
622 } /* }}} int graph_get_rrdargs */
623
624 /* vim: set sw=2 sts=2 et fdm=marker : */