Merge branch 'collectd-5.5'
[collectd.git] / src / write_kafka.c
1 /**
2  * collectd - src/write_kafka.c
3  * Copyright (C) 2014       Pierre-Yves Ritschard
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  *   Pierre-Yves Ritschard <pyr at spootnik.org>
25  */
26
27 #include "collectd.h"
28 #include "plugin.h"
29 #include "common.h"
30 #include "configfile.h"
31 #include "utils_cache.h"
32 #include "utils_cmd_putval.h"
33 #include "utils_format_graphite.h"
34 #include "utils_format_json.h"
35 #include "utils_crc32.h"
36
37 #include <stdint.h>
38 #include <librdkafka/rdkafka.h>
39 #include <pthread.h>
40 #include <zlib.h>
41 #include <errno.h>
42
43 struct kafka_topic_context {
44 #define KAFKA_FORMAT_JSON        0
45 #define KAFKA_FORMAT_COMMAND     1
46 #define KAFKA_FORMAT_GRAPHITE    2
47     uint8_t                      format;
48     unsigned int                 graphite_flags;
49     _Bool                        store_rates;
50     rd_kafka_topic_conf_t       *conf;
51     rd_kafka_topic_t            *topic;
52     rd_kafka_conf_t             *kafka_conf;
53     rd_kafka_t                  *kafka;
54     char                        *key;
55     char                        *prefix;
56     char                        *postfix;
57     char                         escape_char;
58     char                        *topic_name;
59     pthread_mutex_t              lock;
60 };
61
62 static int kafka_handle(struct kafka_topic_context *);
63 static int kafka_write(const data_set_t *, const value_list_t *, user_data_t *);
64 static int32_t kafka_partition(const rd_kafka_topic_t *, const void *, size_t,
65                                int32_t, void *, void *);
66
67 #if defined HAVE_LIBRDKAFKA_LOGGER || defined HAVE_LIBRDKAFKA_LOG_CB
68 static void kafka_log(const rd_kafka_t *, int, const char *, const char *);
69
70 static void kafka_log(const rd_kafka_t *rkt, int level,
71                       const char *fac, const char *msg)
72 {
73     plugin_log(level, "%s", msg);
74 }
75 #endif
76
77 static int32_t kafka_partition(const rd_kafka_topic_t *rkt,
78                                const void *keydata, size_t keylen,
79                                int32_t partition_cnt, void *p, void *m)
80 {
81     uint32_t key = *((uint32_t *)keydata );
82     uint32_t target = key % partition_cnt;
83     int32_t  i = partition_cnt;
84
85     while (--i > 0 && !rd_kafka_topic_partition_available(rkt, target)) {
86         target = (target + 1) % partition_cnt;
87     }
88     return target;
89 }
90
91 static int kafka_handle(struct kafka_topic_context *ctx) /* {{{ */
92 {
93     char                         errbuf[1024];
94     rd_kafka_conf_t             *conf;
95     rd_kafka_topic_conf_t       *topic_conf;
96
97     if (ctx->kafka != NULL && ctx->topic != NULL)
98         return(0);
99
100     if (ctx->kafka == NULL) {
101         if ((conf = rd_kafka_conf_dup(ctx->kafka_conf)) == NULL) {
102             ERROR("write_kafka plugin: cannot duplicate kafka config");
103             return(1);
104         }
105
106         if ((ctx->kafka = rd_kafka_new(RD_KAFKA_PRODUCER, conf,
107                                     errbuf, sizeof(errbuf))) == NULL) {
108             ERROR("write_kafka plugin: cannot create kafka handle.");
109             return 1;
110         }
111
112         rd_kafka_conf_destroy(ctx->kafka_conf);
113         ctx->kafka_conf = NULL;
114
115         INFO ("write_kafka plugin: created KAFKA handle : %s", rd_kafka_name(ctx->kafka));
116
117 #if defined(HAVE_LIBRDKAFKA_LOGGER) && !defined(HAVE_LIBRDKAFKA_LOG_CB)
118         rd_kafka_set_logger(ctx->kafka, kafka_log);
119 #endif
120     }
121
122     if (ctx->topic == NULL ) {
123         if ((topic_conf = rd_kafka_topic_conf_dup(ctx->conf)) == NULL) {
124             ERROR("write_kafka plugin: cannot duplicate kafka topic config");
125             return 1;
126         }
127
128         if ((ctx->topic = rd_kafka_topic_new(ctx->kafka, ctx->topic_name,
129                                             topic_conf)) == NULL) {
130             ERROR("write_kafka plugin: cannot create topic : %s\n",
131             rd_kafka_err2str(rd_kafka_errno2err(errno)));
132             return errno;
133         }
134
135         rd_kafka_topic_conf_destroy(ctx->conf);
136         ctx->conf = NULL;
137
138         INFO ("write_kafka plugin: handle created for topic : %s", rd_kafka_topic_name(ctx->topic));
139     }
140
141     return(0);
142
143 } /* }}} int kafka_handle */
144
145 static int kafka_write(const data_set_t *ds, /* {{{ */
146           const value_list_t *vl,
147           user_data_t *ud)
148 {
149     int      status = 0;
150     void    *key;
151     size_t   keylen = 0;
152     char     buffer[8192];
153     size_t   bfree = sizeof(buffer);
154     size_t   bfill = 0;
155     size_t   blen = 0;
156     struct   kafka_topic_context  *ctx = ud->data;
157
158     if ((ds == NULL) || (vl == NULL) || (ctx == NULL))
159         return EINVAL;
160
161     pthread_mutex_lock (&ctx->lock);
162     status = kafka_handle(ctx);
163     pthread_mutex_unlock (&ctx->lock);
164     if( status != 0 )
165         return status;
166
167     bzero(buffer, sizeof(buffer));
168
169     switch (ctx->format) {
170     case KAFKA_FORMAT_COMMAND:
171         status = create_putval(buffer, sizeof(buffer), ds, vl);
172         if (status != 0) {
173             ERROR("write_kafka plugin: create_putval failed with status %i.",
174                   status);
175             return status;
176         }
177         blen = strlen(buffer);
178         break;
179     case KAFKA_FORMAT_JSON:
180         format_json_initialize(buffer, &bfill, &bfree);
181         format_json_value_list(buffer, &bfill, &bfree, ds, vl,
182                                ctx->store_rates);
183         format_json_finalize(buffer, &bfill, &bfree);
184         blen = strlen(buffer);
185         break;
186     case KAFKA_FORMAT_GRAPHITE:
187         status = format_graphite(buffer, sizeof(buffer), ds, vl,
188                                  ctx->prefix, ctx->postfix, ctx->escape_char,
189                                  ctx->graphite_flags);
190         if (status != 0) {
191             ERROR("write_kafka plugin: format_graphite failed with status %i.",
192                   status);
193             return status;
194         }
195         blen = strlen(buffer);
196         break;
197     default:
198         ERROR("write_kafka plugin: invalid format %i.", ctx->format);
199         return -1;
200     }
201
202     key = ctx->key;
203     if (key != NULL)
204         keylen = strlen (key);
205     else
206         keylen = 0;
207
208     rd_kafka_produce(ctx->topic, RD_KAFKA_PARTITION_UA,
209                      RD_KAFKA_MSG_F_COPY, buffer, blen,
210                      key, keylen, NULL);
211
212     return status;
213 } /* }}} int kafka_write */
214
215 static void kafka_topic_context_free(void *p) /* {{{ */
216 {
217     struct kafka_topic_context *ctx = p;
218
219     if (ctx == NULL)
220         return;
221
222     if (ctx->topic_name != NULL)
223         sfree(ctx->topic_name);
224     if (ctx->topic != NULL)
225         rd_kafka_topic_destroy(ctx->topic);
226     if (ctx->conf != NULL)
227         rd_kafka_topic_conf_destroy(ctx->conf);
228     if (ctx->kafka_conf != NULL)
229         rd_kafka_conf_destroy(ctx->kafka_conf);
230     if (ctx->kafka != NULL)
231         rd_kafka_destroy(ctx->kafka);
232
233     sfree(ctx);
234 } /* }}} void kafka_topic_context_free */
235
236 static void kafka_config_topic(rd_kafka_conf_t *conf, oconfig_item_t *ci) /* {{{ */
237 {
238     int                          status;
239     int                          i;
240     struct kafka_topic_context  *tctx;
241     char                        *key = NULL;
242     char                        *val;
243     char                         callback_name[DATA_MAX_NAME_LEN];
244     char                         errbuf[1024];
245     user_data_t                  ud;
246     oconfig_item_t              *child;
247     rd_kafka_conf_res_t          ret;
248
249     if ((tctx = calloc(1, sizeof (*tctx))) == NULL) {
250         ERROR ("write_kafka plugin: calloc failed.");
251         return;
252     }
253
254     tctx->escape_char = '.';
255     tctx->store_rates = 1;
256     tctx->format = KAFKA_FORMAT_JSON;
257     tctx->key = NULL;
258
259     if ((tctx->kafka_conf = rd_kafka_conf_dup(conf)) == NULL) {
260         sfree(tctx);
261         ERROR("write_kafka plugin: cannot allocate memory for kafka config");
262         return;
263     }
264
265 #ifdef HAVE_LIBRDKAFKA_LOG_CB
266     rd_kafka_conf_set_log_cb(tctx->kafka_conf, kafka_log);
267 #endif
268
269     if ((tctx->conf = rd_kafka_topic_conf_new()) == NULL) {
270         rd_kafka_conf_destroy(tctx->kafka_conf);
271         sfree(tctx);
272         ERROR ("write_kafka plugin: cannot create topic configuration.");
273         return;
274     }
275
276     if (ci->values_num != 1) {
277         WARNING("kafka topic name needed.");
278         goto errout;
279     }
280
281     if (ci->values[0].type != OCONFIG_TYPE_STRING) {
282         WARNING("kafka topic needs a string argument.");
283         goto errout;
284     }
285
286     if ((tctx->topic_name = strdup(ci->values[0].value.string)) == NULL) {
287         ERROR("write_kafka plugin: cannot copy topic name.");
288         goto errout;
289     }
290
291     for (i = 0; i < ci->children_num; i++) {
292         /*
293          * The code here could be simplified but makes room
294          * for easy adding of new options later on.
295          */
296         child = &ci->children[i];
297         status = 0;
298
299         if (strcasecmp ("Property", child->key) == 0) {
300             if (child->values_num != 2) {
301                 WARNING("kafka properties need both a key and a value.");
302                 goto errout;
303             }
304             if (child->values[0].type != OCONFIG_TYPE_STRING ||
305                 child->values[1].type != OCONFIG_TYPE_STRING) {
306                 WARNING("kafka properties needs string arguments.");
307                 goto errout;
308             }
309             key = child->values[0].value.string;
310             val = child->values[1].value.string;
311             ret = rd_kafka_topic_conf_set(tctx->conf,key, val,
312                                           errbuf, sizeof(errbuf));
313             if (ret != RD_KAFKA_CONF_OK) {
314                 WARNING("cannot set kafka topic property %s to %s: %s.",
315                         key, val, errbuf);
316                 goto errout;
317             }
318
319         } else if (strcasecmp ("Key", child->key) == 0)  {
320             cf_util_get_string (child, &tctx->key);
321             assert (tctx->key != NULL);
322         } else if (strcasecmp ("Format", child->key) == 0) {
323             status = cf_util_get_string(child, &key);
324             if (status != 0)
325                 goto errout;
326
327             assert(key != NULL);
328
329             if (strcasecmp(key, "Command") == 0) {
330                 tctx->format = KAFKA_FORMAT_COMMAND;
331
332             } else if (strcasecmp(key, "Graphite") == 0) {
333                 tctx->format = KAFKA_FORMAT_GRAPHITE;
334
335             } else if (strcasecmp(key, "Json") == 0) {
336                 tctx->format = KAFKA_FORMAT_JSON;
337
338             } else {
339                 WARNING ("write_kafka plugin: Invalid format string: %s",
340                          key);
341             }
342
343             sfree(key);
344
345         } else if (strcasecmp ("StoreRates", child->key) == 0) {
346             status = cf_util_get_boolean (child, &tctx->store_rates);
347             (void) cf_util_get_flag (child, &tctx->graphite_flags,
348                                      GRAPHITE_STORE_RATES);
349
350         } else if (strcasecmp ("GraphiteSeparateInstances", child->key) == 0) {
351             status = cf_util_get_flag (child, &tctx->graphite_flags,
352                                        GRAPHITE_SEPARATE_INSTANCES);
353
354         } else if (strcasecmp ("GraphiteAlwaysAppendDS", child->key) == 0) {
355             status = cf_util_get_flag (child, &tctx->graphite_flags,
356                                        GRAPHITE_ALWAYS_APPEND_DS);
357
358         } else if (strcasecmp ("GraphitePrefix", child->key) == 0) {
359             status = cf_util_get_string (child, &tctx->prefix);
360         } else if (strcasecmp ("GraphitePostfix", child->key) == 0) {
361             status = cf_util_get_string (child, &tctx->postfix);
362         } else if (strcasecmp ("GraphiteEscapeChar", child->key) == 0) {
363             char *tmp_buff = NULL;
364             status = cf_util_get_string (child, &tmp_buff);
365             if (strlen (tmp_buff) > 1)
366                 WARNING ("write_kafka plugin: The option \"GraphiteEscapeChar\" handles "
367                         "only one character. Others will be ignored.");
368             tctx->escape_char = tmp_buff[0];
369             sfree (tmp_buff);
370         } else {
371             WARNING ("write_kafka plugin: Invalid directive: %s.", child->key);
372         }
373
374         if (status != 0)
375             break;
376     }
377
378     rd_kafka_topic_conf_set_partitioner_cb(tctx->conf, kafka_partition);
379     rd_kafka_topic_conf_set_opaque(tctx->conf, tctx);
380
381     ssnprintf(callback_name, sizeof(callback_name),
382               "write_kafka/%s", tctx->topic_name);
383
384     ud.data = tctx;
385     ud.free_func = kafka_topic_context_free;
386
387     status = plugin_register_write (callback_name, kafka_write, &ud);
388     if (status != 0) {
389         WARNING ("write_kafka plugin: plugin_register_write (\"%s\") "
390                 "failed with status %i.",
391                 callback_name, status);
392         goto errout;
393     }
394
395     pthread_mutex_init (&tctx->lock, /* attr = */ NULL);
396
397     return;
398  errout:
399     if (tctx->topic_name != NULL)
400         free(tctx->topic_name);
401     if (tctx->conf != NULL)
402         rd_kafka_topic_conf_destroy(tctx->conf);
403     if (tctx->kafka_conf != NULL)
404         rd_kafka_conf_destroy(tctx->kafka_conf);
405     sfree(tctx);
406 } /* }}} int kafka_config_topic */
407
408 static int kafka_config(oconfig_item_t *ci) /* {{{ */
409 {
410     int                          i;
411     oconfig_item_t              *child;
412     rd_kafka_conf_t             *conf;
413     rd_kafka_conf_res_t          ret;
414     char                         errbuf[1024];
415
416     if ((conf = rd_kafka_conf_new()) == NULL) {
417         WARNING("cannot allocate kafka configuration.");
418         return -1;
419     }
420     for (i = 0; i < ci->children_num; i++)  {
421         child = &ci->children[i];
422
423         if (strcasecmp("Topic", child->key) == 0) {
424             kafka_config_topic (conf, child);
425         } else if (strcasecmp(child->key, "Property") == 0) {
426             char *key = NULL;
427             char *val = NULL;
428
429             if (child->values_num != 2) {
430                 WARNING("kafka properties need both a key and a value.");
431                 goto errout;
432             }
433             if (child->values[0].type != OCONFIG_TYPE_STRING ||
434                 child->values[1].type != OCONFIG_TYPE_STRING) {
435                 WARNING("kafka properties needs string arguments.");
436                 goto errout;
437             }
438             if ((key = strdup(child->values[0].value.string)) == NULL) {
439                 WARNING("cannot allocate memory for attribute key.");
440                 goto errout;
441             }
442             if ((val = strdup(child->values[1].value.string)) == NULL) {
443                 WARNING("cannot allocate memory for attribute value.");
444                 sfree(key);
445                 goto errout;
446             }
447             ret = rd_kafka_conf_set(conf, key, val, errbuf, sizeof(errbuf));
448             if (ret != RD_KAFKA_CONF_OK) {
449                 WARNING("cannot set kafka property %s to %s: %s",
450                         key, val, errbuf);
451                 sfree(key);
452                 sfree(val);
453                 goto errout;
454             }
455             sfree(key);
456             sfree(val);
457         } else {
458             WARNING ("write_kafka plugin: Ignoring unknown "
459                  "configuration option \"%s\" at top level.",
460                  child->key);
461         }
462     }
463     if (conf != NULL)
464         rd_kafka_conf_destroy(conf);
465     return (0);
466  errout:
467     if (conf != NULL)
468         rd_kafka_conf_destroy(conf);
469     return -1;
470 } /* }}} int kafka_config */
471
472 void module_register(void)
473 {
474     plugin_register_complex_config ("write_kafka", kafka_config);
475 }