2 * collectd - src/target_set.c
3 * Copyright (C) 2008 Florian Forster
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:
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
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.
24 * Florian Forster <octo at collectd.org>
30 #include "filter_chain.h"
31 #include "meta_data.h"
32 #include "utils_subst.h"
37 struct ts_key_list_s *next;
39 typedef struct ts_key_list_s ts_key_list_t;
41 static void ts_key_list_free (ts_key_list_t *l) /* {{{ */
49 ts_key_list_free (l->next);
52 } /* }}} void ts_name_list_free */
58 char *plugin_instance;
62 ts_key_list_t *meta_delete;
64 typedef struct ts_data_s ts_data_t;
66 static int ts_util_get_key_and_string_wo_strdup (const oconfig_item_t *ci, char **ret_key, char **ret_string) /* {{{ */
68 if ((ci->values_num != 2)
69 || (ci->values[0].type != OCONFIG_TYPE_STRING)
70 || (ci->values[1].type != OCONFIG_TYPE_STRING))
72 ERROR ("ts_util_get_key_and_string_wo_strdup: The %s option requires "
73 "exactly two string arguments.", ci->key);
77 *ret_key = ci->values[0].value.string;
78 *ret_string = ci->values[1].value.string;
81 } /* }}} int ts_util_get_key_and_string_wo_strdup */
83 static int ts_config_add_string (char **dest, /* {{{ */
84 const oconfig_item_t *ci, int may_be_empty)
89 status = cf_util_get_string (ci, &tmp);
93 if (!may_be_empty && (strlen (tmp) == 0))
95 ERROR ("Target `set': The `%s' option does not accept empty strings.",
103 } /* }}} int ts_config_add_string */
105 static int ts_config_add_meta (meta_data_t **dest, /* {{{ */
106 const oconfig_item_t *ci, int may_be_empty)
112 status = ts_util_get_key_and_string_wo_strdup (ci, &key, &string);
116 if (strlen (key) == 0)
118 ERROR ("Target `set': The `%s' option does not accept empty string as "
119 "first argument.", ci->key);
123 if (!may_be_empty && (strlen (string) == 0))
125 ERROR ("Target `set': The `%s' option does not accept empty string as "
126 "second argument.", ci->key);
132 /* Create a new meta_data_t */
133 if ((*dest = meta_data_create()) == NULL)
135 ERROR ("Target `set': failed to create a meta data for `%s'.", ci->key);
140 return (meta_data_add_string (*dest, key, string));
141 } /* }}} int ts_config_add_meta */
143 static int ts_config_add_meta_delete (ts_key_list_t **dest, /* {{{ */
144 const oconfig_item_t *ci)
146 ts_key_list_t *entry = NULL;
148 if ((ci->values_num != 1)
149 || (ci->values[0].type != OCONFIG_TYPE_STRING))
151 ERROR ("ts_config_add_meta_delete: The %s option requires "
152 "exactly one string argument.", ci->key);
156 if (strlen (ci->values[0].value.string) == 0)
158 ERROR ("Target `set': The `%s' option does not accept empty string as "
159 "first argument.", ci->key);
163 entry = calloc (1, sizeof (*entry));
166 ERROR ("ts_config_add_meta_delete: calloc failed.");
170 entry->key = sstrdup (ci->values[0].value.string);
175 } /* }}} int ts_config_add_meta_delete */
177 static void ts_subst (char *dest, size_t size, const char *string, /* {{{ */
178 const value_list_t *vl)
180 char temp[DATA_MAX_NAME_LEN];
184 /* Initialize the field with the template. */
185 sstrncpy (dest, string, size);
187 #define REPLACE_FIELD(t, v) \
188 if (subst_string (temp, sizeof (temp), dest, t, v) != NULL) \
189 sstrncpy (dest, temp, size);
190 REPLACE_FIELD ("%{host}", vl->host);
191 REPLACE_FIELD ("%{plugin}", vl->plugin);
192 REPLACE_FIELD ("%{plugin_instance}", vl->plugin_instance);
193 REPLACE_FIELD ("%{type}", vl->type);
194 REPLACE_FIELD ("%{type_instance}", vl->type_instance);
196 meta_entries = meta_data_toc (vl->meta, &meta_toc);
197 for (int i = 0; i < meta_entries; i++)
199 char meta_name[DATA_MAX_NAME_LEN];
200 char value_str[DATA_MAX_NAME_LEN];
202 const char *key = meta_toc[i];
204 ssnprintf (meta_name, sizeof (meta_name), "%%{meta:%s}", key);
206 meta_type = meta_data_type (vl->meta, key);
212 if (meta_data_get_string (vl->meta, key, &meta_value))
214 ERROR ("Target `set': Unable to get string metadata value `%s'.",
218 sstrncpy (value_str, meta_value, sizeof (value_str));
221 case MD_TYPE_SIGNED_INT:
224 if (meta_data_get_signed_int (vl->meta, key, &meta_value))
226 ERROR ("Target `set': Unable to get signed int metadata value "
230 ssnprintf (value_str, sizeof (value_str), "%"PRIi64, meta_value);
233 case MD_TYPE_UNSIGNED_INT:
236 if (meta_data_get_unsigned_int (vl->meta, key, &meta_value))
238 ERROR ("Target `set': Unable to get unsigned int metadata value "
242 ssnprintf (value_str, sizeof (value_str), "%"PRIu64, meta_value);
248 if (meta_data_get_double (vl->meta, key, &meta_value))
250 ERROR ("Target `set': Unable to get double metadata value `%s'.",
254 ssnprintf (value_str, sizeof (value_str), GAUGE_FORMAT, meta_value);
257 case MD_TYPE_BOOLEAN:
260 if (meta_data_get_boolean (vl->meta, key, &meta_value))
262 ERROR ("Target `set': Unable to get boolean metadata value `%s'.",
266 sstrncpy (value_str, meta_value ? "true" : "false",
271 ERROR ("Target `set': Unable to retrieve metadata type for `%s'.",
276 REPLACE_FIELD (meta_name, value_str);
278 } /* }}} int ts_subst */
280 static int ts_destroy (void **user_data) /* {{{ */
284 if (user_data == NULL)
293 free (data->plugin_instance);
294 /* free (data->type); */
295 free (data->type_instance);
296 meta_data_destroy(data->meta);
297 ts_key_list_free (data->meta_delete);
301 } /* }}} int ts_destroy */
303 static int ts_create (const oconfig_item_t *ci, void **user_data) /* {{{ */
308 data = calloc (1, sizeof (*data));
311 ERROR ("ts_create: calloc failed.");
317 data->plugin_instance = NULL;
318 /* data->type = NULL; */
319 data->type_instance = NULL;
321 data->meta_delete = NULL;
324 for (int i = 0; i < ci->children_num; i++)
326 oconfig_item_t *child = ci->children + i;
328 if ((strcasecmp ("Host", child->key) == 0)
329 || (strcasecmp ("Hostname", child->key) == 0))
330 status = ts_config_add_string (&data->host, child,
331 /* may be empty = */ 0);
332 else if (strcasecmp ("Plugin", child->key) == 0)
333 status = ts_config_add_string (&data->plugin, child,
334 /* may be empty = */ 0);
335 else if (strcasecmp ("PluginInstance", child->key) == 0)
336 status = ts_config_add_string (&data->plugin_instance, child,
337 /* may be empty = */ 1);
339 else if (strcasecmp ("Type", child->key) == 0)
340 status = ts_config_add_string (&data->type, child,
341 /* may be empty = */ 0);
343 else if (strcasecmp ("TypeInstance", child->key) == 0)
344 status = ts_config_add_string (&data->type_instance, child,
345 /* may be empty = */ 1);
346 else if (strcasecmp ("MetaData", child->key) == 0)
347 status = ts_config_add_meta (&data->meta, child,
348 /* may be empty = */ 1);
349 else if (strcasecmp ("DeleteMetaData", child->key) == 0)
350 status = ts_config_add_meta_delete (&data->meta_delete, child);
353 ERROR ("Target `set': The `%s' configuration option is not understood "
354 "and will be ignored.", child->key);
362 /* Additional sanity-checking */
365 if ((data->host == NULL)
366 && (data->plugin == NULL)
367 && (data->plugin_instance == NULL)
368 /* && (data->type == NULL) */
369 && (data->type_instance == NULL)
370 && (data->meta == NULL)
371 && (data->meta_delete == NULL))
373 ERROR ("Target `set': You need to set at least one of `Host', "
374 "`Plugin', `PluginInstance', `TypeInstance', "
375 "`MetaData', or `DeleteMetaData'.");
379 if (data->meta != NULL)
381 /* If data->meta_delete is NULL, this loop is a no-op. */
382 for (ts_key_list_t *l=data->meta_delete; l != NULL; l = l->next)
384 if (meta_data_type (data->meta, l->key) != 0)
386 /* MetaData and DeleteMetaData for the same key. */
387 ERROR ("Target `set': Can only have one of `MetaData' or "
388 "`DeleteMetaData' for any given key.");
399 ts_destroy ((void *) &data);
405 } /* }}} int ts_create */
407 static int ts_invoke (const data_set_t *ds, value_list_t *vl, /* {{{ */
408 notification_meta_t __attribute__((unused)) **meta, void **user_data)
412 meta_data_t *new_meta = NULL;
414 if ((ds == NULL) || (vl == NULL) || (user_data == NULL))
420 ERROR ("Target `set': Invoke: `data' is NULL.");
426 if (data->meta != NULL)
428 char temp[DATA_MAX_NAME_LEN*2];
432 if ((new_meta = meta_data_create()) == NULL)
434 ERROR ("Target `set': failed to create replacement metadata.");
438 meta_entries = meta_data_toc (data->meta, &meta_toc);
439 for (int i = 0; i < meta_entries; i++)
441 const char *key = meta_toc[i];
445 status = meta_data_get_string (data->meta, key, &string);
448 ERROR ("Target `set': Unable to get replacement metadata value `%s'.",
453 ts_subst (temp, sizeof (temp), string, &orig);
455 DEBUG ("target_set: ts_invoke: setting metadata value for key `%s': "
458 status = meta_data_add_string (new_meta, key, temp);
462 ERROR ("Target `set': Unable to set metadata value `%s'.", key);
468 #define SUBST_FIELD(f) \
469 if (data->f != NULL) { \
470 ts_subst (vl->f, sizeof (vl->f), data->f, &orig); \
471 DEBUG ("target_set: ts_invoke: setting "#f": `%s'.", vl->f); \
474 SUBST_FIELD (plugin);
475 SUBST_FIELD (plugin_instance);
476 /* SUBST_FIELD (type); */
477 SUBST_FIELD (type_instance);
479 /* Need to merge the metadata in now, because of the shallow copy. */
480 if (new_meta != NULL)
482 meta_data_clone_merge(&(vl->meta), new_meta);
483 meta_data_destroy(new_meta);
486 /* If data->meta_delete is NULL, this loop is a no-op. */
487 for (ts_key_list_t *l=data->meta_delete; l != NULL; l = l->next)
489 DEBUG ("target_set: ts_invoke: deleting metadata value for key `%s'.",
491 meta_data_delete(vl->meta, l->key);
494 return (FC_TARGET_CONTINUE);
495 } /* }}} int ts_invoke */
497 void module_register (void)
499 target_proc_t tproc = { 0 };
501 tproc.create = ts_create;
502 tproc.destroy = ts_destroy;
503 tproc.invoke = ts_invoke;
504 fc_register_target ("set", tproc);
505 } /* module_register */
507 /* vim: set sw=2 sts=2 tw=78 et fdm=marker : */