Code

pyvalues.c: remove unneccesary semicolon
[collectd.git] / src / target_set.c
1 /**
2  * collectd - src/target_set.c
3  * Copyright (C) 2008       Florian 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 #include "collectd.h"
28 #include "common.h"
29 #include "filter_chain.h"
31 struct ts_data_s
32 {
33   char *host;
34   char *plugin;
35   char *plugin_instance;
36   /* char *type; */
37   char *type_instance;
38   meta_data_t *meta;
39 };
40 typedef struct ts_data_s ts_data_t;
42 int ts_util_get_key_and_string_wo_strdup (const oconfig_item_t *ci, char **ret_key, char **ret_string) /* {{{ */
43 {
44   if ((ci->values_num != 2)
45       || (ci->values[0].type != OCONFIG_TYPE_STRING)
46       || (ci->values[1].type != OCONFIG_TYPE_STRING))
47   {
48     ERROR ("ts_util_get_key_and_string_wo_strdup: The %s option requires "
49         "exactly two string argument.", ci->key);
50     return (-1);
51   }
53   *ret_key = ci->values[0].value.string;
54   *ret_string = ci->values[1].value.string;
56   return (0);
57 } /* }}} int ts_util_get_key_and_string_wo_strdup */
59 static int ts_config_add_string (char **dest, /* {{{ */
60     const oconfig_item_t *ci, int may_be_empty)
61 {
62   char *tmp = NULL;
63   int status;
65   status = cf_util_get_string (ci, &tmp);
66   if (status != 0)
67     return (status);
69   if (!may_be_empty && (strlen (tmp) == 0))
70   {
71     ERROR ("Target `set': The `%s' option does not accept empty strings.",
72         ci->key);
73     sfree (tmp);
74     return (-1);
75   }
77   *dest = tmp;
78   return (0);
79 } /* }}} int ts_config_add_string */
81 static int ts_config_add_meta (meta_data_t **dest, /* {{{ */
82     const oconfig_item_t *ci, int may_be_empty)
83 {
84   char *key = NULL;
85   char *string = NULL;
86   int status;
88   status = ts_util_get_key_and_string_wo_strdup (ci, &key, &string);
89   if (status != 0)
90     return (status);
92   if (strlen (key) == 0)
93   {
94     ERROR ("Target `set': The `%s' option does not accept empty string as first argument.",
95         ci->key);
96     return (-1);
97   }
99   if (!may_be_empty && (strlen (string) == 0))
100   {
101     ERROR ("Target `set': The `%s' option does not accept empty string as second argument.",
102         ci->key);
103     return (-1);
104   }
106   if ((*dest) == NULL)
107   {
108     // Create a new meta_data_t
109     if ((*dest = meta_data_create()) == NULL)
110     {
111       ERROR ("Target `set': failed to create a meta data for `%s'.", ci->key);
112       return (-1);
113     }
114   }
116   return (meta_data_add_string (*dest, key, string));
117 } /* }}} int ts_config_add_meta */
119 static int ts_destroy (void **user_data) /* {{{ */
121   ts_data_t *data;
123   if (user_data == NULL)
124     return (-EINVAL);
126   data = *user_data;
127   if (data == NULL)
128     return (0);
130   free (data->host);
131   free (data->plugin);
132   free (data->plugin_instance);
133   /* free (data->type); */
134   free (data->type_instance);
135   meta_data_destroy(data->meta);
136   free (data);
138   return (0);
139 } /* }}} int ts_destroy */
141 static int ts_create (const oconfig_item_t *ci, void **user_data) /* {{{ */
143   ts_data_t *data;
144   int status;
145   int i;
147   data = calloc (1, sizeof (*data));
148   if (data == NULL)
149   {
150     ERROR ("ts_create: calloc failed.");
151     return (-ENOMEM);
152   }
154   data->host = NULL;
155   data->plugin = NULL;
156   data->plugin_instance = NULL;
157   /* data->type = NULL; */
158   data->type_instance = NULL;
159   data->meta = NULL;
161   status = 0;
162   for (i = 0; i < ci->children_num; i++)
163   {
164     oconfig_item_t *child = ci->children + i;
166     if ((strcasecmp ("Host", child->key) == 0)
167         || (strcasecmp ("Hostname", child->key) == 0))
168       status = ts_config_add_string (&data->host, child,
169           /* may be empty = */ 0);
170     else if (strcasecmp ("Plugin", child->key) == 0)
171       status = ts_config_add_string (&data->plugin, child,
172           /* may be empty = */ 0);
173     else if (strcasecmp ("PluginInstance", child->key) == 0)
174       status = ts_config_add_string (&data->plugin_instance, child,
175           /* may be empty = */ 1);
176 #if 0
177     else if (strcasecmp ("Type", child->key) == 0)
178       status = ts_config_add_string (&data->type, child,
179           /* may be empty = */ 0);
180 #endif
181     else if (strcasecmp ("TypeInstance", child->key) == 0)
182       status = ts_config_add_string (&data->type_instance, child,
183           /* may be empty = */ 1);
184     else if (strcasecmp ("MetaDataSet", child->key) == 0)
185       status = ts_config_add_meta (&data->meta, child,
186           /* may be empty = */ 1);
187     else
188     {
189       ERROR ("Target `set': The `%s' configuration option is not understood "
190           "and will be ignored.", child->key);
191       status = 0;
192     }
194     if (status != 0)
195       break;
196   }
198   /* Additional sanity-checking */
199   while (status == 0)
200   {
201     if ((data->host == NULL)
202         && (data->plugin == NULL)
203         && (data->plugin_instance == NULL)
204         /* && (data->type == NULL) */
205         && (data->type_instance == NULL)
206         && (data->meta == NULL))
207     {
208       ERROR ("Target `set': You need to set at least one of `Host', "
209           "`Plugin', `PluginInstance', `TypeInstance', "
210           "`MetaDataSet' or `MetaDataEval'.");
211       status = -1;
212     }
214     break;
215   }
217   if (status != 0)
218   {
219     ts_destroy ((void *) &data);
220     return (status);
221   }
223   *user_data = data;
224   return (0);
225 } /* }}} int ts_create */
227 static int ts_invoke (const data_set_t *ds, value_list_t *vl, /* {{{ */
228     notification_meta_t __attribute__((unused)) **meta, void **user_data)
230   ts_data_t *data;
232   if ((ds == NULL) || (vl == NULL) || (user_data == NULL))
233     return (-EINVAL);
235   data = *user_data;
236   if (data == NULL)
237   {
238     ERROR ("Target `set': Invoke: `data' is NULL.");
239     return (-EINVAL);
240   }
242   if (data->meta != NULL)
243   {
244     meta_data_clone_merge(&(vl->meta), data->meta);
245   }
247 #define SET_FIELD(f) if (data->f != NULL) { sstrncpy (vl->f, data->f, sizeof (vl->f)); }
248   SET_FIELD (host);
249   SET_FIELD (plugin);
250   SET_FIELD (plugin_instance);
251   /* SET_FIELD (type); */
252   SET_FIELD (type_instance);
254   return (FC_TARGET_CONTINUE);
255 } /* }}} int ts_invoke */
257 void module_register (void)
259         target_proc_t tproc;
261         memset (&tproc, 0, sizeof (tproc));
262         tproc.create  = ts_create;
263         tproc.destroy = ts_destroy;
264         tproc.invoke  = ts_invoke;
265         fc_register_target ("set", tproc);
266 } /* module_register */
268 /* vim: set sw=2 sts=2 tw=78 et fdm=marker : */