Merge branch 'collectd-4.5' into collectd-4.6
[collectd.git] / src / target_set.c
1 /**
2  * collectd - src/target_set.c
3  * Copyright (C) 2008  Florian Forster
4  *
5  * This program is free software; you can redistribute it and/or modify it
6  * under the terms of the GNU General Public License as published by the
7  * Free Software Foundation; only version 2 of the License is applicable.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License along
15  * with this program; if not, write to the Free Software Foundation, Inc.,
16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
17  *
18  * Authors:
19  *   Florian Forster <octo at verplant.org>
20  **/
21
22 #include "collectd.h"
23 #include "common.h"
24 #include "filter_chain.h"
25
26 struct ts_data_s
27 {
28   char *host;
29   char *plugin;
30   char *plugin_instance;
31   /* char *type; */
32   char *type_instance;
33 };
34 typedef struct ts_data_s ts_data_t;
35
36 static char *ts_strdup (const char *orig) /* {{{ */
37 {
38   size_t sz;
39   char *dest;
40
41   if (orig == NULL)
42     return (NULL);
43
44   sz = strlen (orig) + 1;
45   dest = (char *) malloc (sz);
46   if (dest == NULL)
47     return (NULL);
48
49   memcpy (dest, orig, sz);
50
51   return (dest);
52 } /* }}} char *ts_strdup */
53
54 static int ts_config_add_string (char **dest, /* {{{ */
55     const oconfig_item_t *ci, int may_be_empty)
56 {
57   char *temp;
58
59   if (dest == NULL)
60     return (-EINVAL);
61
62   if ((ci->values_num != 1)
63       || (ci->values[0].type != OCONFIG_TYPE_STRING))
64   {
65     ERROR ("Target `set': The `%s' option requires exactly one string "
66         "argument.", ci->key);
67     return (-1);
68   }
69
70   if ((!may_be_empty) && (ci->values[0].value.string[0] == 0))
71   {
72     ERROR ("Target `set': The `%s' option does not accept empty strings.",
73         ci->key);
74     return (-1);
75   }
76
77   temp = ts_strdup (ci->values[0].value.string);
78   if (temp == NULL)
79   {
80     ERROR ("ts_config_add_string: ts_strdup failed.");
81     return (-1);
82   }
83
84   free (*dest);
85   *dest = temp;
86
87   return (0);
88 } /* }}} int ts_config_add_string */
89
90 static int ts_destroy (void **user_data) /* {{{ */
91 {
92   ts_data_t *data;
93
94   if (user_data == NULL)
95     return (-EINVAL);
96
97   data = *user_data;
98   if (data == NULL)
99     return (0);
100
101   free (data->host);
102   free (data->plugin);
103   free (data->plugin_instance);
104   /* free (data->type); */
105   free (data->type_instance);
106   free (data);
107
108   return (0);
109 } /* }}} int ts_destroy */
110
111 static int ts_create (const oconfig_item_t *ci, void **user_data) /* {{{ */
112 {
113   ts_data_t *data;
114   int status;
115   int i;
116
117   data = (ts_data_t *) malloc (sizeof (*data));
118   if (data == NULL)
119   {
120     ERROR ("ts_create: malloc failed.");
121     return (-ENOMEM);
122   }
123   memset (data, 0, sizeof (*data));
124
125   data->host = NULL;
126   data->plugin = NULL;
127   data->plugin_instance = NULL;
128   /* data->type = NULL; */
129   data->type_instance = NULL;
130
131   status = 0;
132   for (i = 0; i < ci->children_num; i++)
133   {
134     oconfig_item_t *child = ci->children + i;
135
136     if ((strcasecmp ("Host", child->key) == 0)
137         || (strcasecmp ("Hostname", child->key) == 0))
138       status = ts_config_add_string (&data->host, child,
139           /* may be empty = */ 0);
140     else if (strcasecmp ("Plugin", child->key) == 0)
141       status = ts_config_add_string (&data->plugin, child,
142           /* may be empty = */ 0);
143     else if (strcasecmp ("PluginInstance", child->key) == 0)
144       status = ts_config_add_string (&data->plugin_instance, child,
145           /* may be empty = */ 1);
146 #if 0
147     else if (strcasecmp ("Type", child->key) == 0)
148       status = ts_config_add_string (&data->type, child,
149           /* may be empty = */ 0);
150 #endif
151     else if (strcasecmp ("TypeInstance", child->key) == 0)
152       status = ts_config_add_string (&data->type_instance, child,
153           /* may be empty = */ 1);
154     else
155     {
156       ERROR ("Target `set': The `%s' configuration option is not understood "
157           "and will be ignored.", child->key);
158       status = 0;
159     }
160
161     if (status != 0)
162       break;
163   }
164
165   /* Additional sanity-checking */
166   while (status == 0)
167   {
168     if ((data->host == NULL)
169         && (data->plugin == NULL)
170         && (data->plugin_instance == NULL)
171         /* && (data->type == NULL) */
172         && (data->type_instance == NULL))
173     {
174       ERROR ("Target `set': You need to set at lease one of `Host', "
175           "`Plugin', `PluginInstance', `Type', or `TypeInstance'.");
176       status = -1;
177     }
178
179     break;
180   }
181
182   if (status != 0)
183   {
184     ts_destroy ((void *) &data);
185     return (status);
186   }
187
188   *user_data = data;
189   return (0);
190 } /* }}} int ts_create */
191
192 static int ts_invoke (const data_set_t *ds, value_list_t *vl, /* {{{ */
193     notification_meta_t __attribute__((unused)) **meta, void **user_data)
194 {
195   ts_data_t *data;
196
197   if ((ds == NULL) || (vl == NULL) || (user_data == NULL))
198     return (-EINVAL);
199
200   data = *user_data;
201   if (data == NULL)
202   {
203     ERROR ("Target `set': Invoke: `data' is NULL.");
204     return (-EINVAL);
205   }
206
207 #define SET_FIELD(f) if (data->f != NULL) { sstrncpy (vl->f, data->f, sizeof (vl->f)); }
208   SET_FIELD (host);
209   SET_FIELD (plugin);
210   SET_FIELD (plugin_instance);
211   /* SET_FIELD (type); */
212   SET_FIELD (type_instance);
213
214   return (FC_TARGET_CONTINUE);
215 } /* }}} int ts_invoke */
216
217 void module_register (void)
218 {
219         target_proc_t tproc;
220
221         memset (&tproc, 0, sizeof (tproc));
222         tproc.create  = ts_create;
223         tproc.destroy = ts_destroy;
224         tproc.invoke  = ts_invoke;
225         fc_register_target ("set", tproc);
226 } /* module_register */
227
228 /* vim: set sw=2 sts=2 tw=78 et fdm=marker : */
229