Merge branch 'collectd-5.7' into collectd-5.8
[collectd.git] / src / netlink.c
1 /**
2  * collectd - src/netlink.c
3  * Copyright (C) 2007-2010  Florian octo Forster
4  * Copyright (C) 2008-2012  Sebastian Harl
5  * Copyright (C) 2013       Andreas Henriksson
6  * Copyright (C) 2013       Marc Fournier
7  *
8  * This program is free software; you can redistribute it and/or modify it
9  * under the terms of the GNU General Public License as published by the
10  * Free Software Foundation; only version 2 of the License is applicable.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License along
18  * with this program; if not, write to the Free Software Foundation, Inc.,
19  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
20  *
21  * Authors:
22  *   Florian octo Forster <octo at collectd.org>
23  *   Sebastian Harl <sh at tokkee.org>
24  *   Andreas Henriksson <andreas at fatal.se>
25  *   Marc Fournier <marc.fournier at camptocamp.com>
26  **/
27
28 #include "collectd.h"
29
30 #include "common.h"
31 #include "plugin.h"
32
33 #include <asm/types.h>
34
35 #include <linux/netlink.h>
36 #include <linux/rtnetlink.h>
37 #if HAVE_LINUX_GEN_STATS_H
38 #include <linux/gen_stats.h>
39 #endif
40 #if HAVE_LINUX_PKT_SCHED_H
41 #include <linux/pkt_sched.h>
42 #endif
43
44 #include <libmnl/libmnl.h>
45
46 struct ir_link_stats_storage_s {
47
48   uint64_t rx_packets;
49   uint64_t tx_packets;
50   uint64_t rx_bytes;
51   uint64_t tx_bytes;
52   uint64_t rx_errors;
53   uint64_t tx_errors;
54
55   uint64_t rx_dropped;
56   uint64_t tx_dropped;
57   uint64_t multicast;
58   uint64_t collisions;
59
60   uint64_t rx_length_errors;
61   uint64_t rx_over_errors;
62   uint64_t rx_crc_errors;
63   uint64_t rx_frame_errors;
64   uint64_t rx_fifo_errors;
65   uint64_t rx_missed_errors;
66
67   uint64_t tx_aborted_errors;
68   uint64_t tx_carrier_errors;
69   uint64_t tx_fifo_errors;
70   uint64_t tx_heartbeat_errors;
71   uint64_t tx_window_errors;
72 };
73
74 union ir_link_stats_u {
75   struct rtnl_link_stats *stats32;
76 #ifdef HAVE_RTNL_LINK_STATS64
77   struct rtnl_link_stats64 *stats64;
78 #endif
79 };
80
81 typedef struct ir_ignorelist_s {
82   char *device;
83   char *type;
84   char *inst;
85   struct ir_ignorelist_s *next;
86 } ir_ignorelist_t;
87
88 struct qos_stats {
89   struct gnet_stats_basic *bs;
90   struct gnet_stats_queue *qs;
91 };
92
93 static int ir_ignorelist_invert = 1;
94 static ir_ignorelist_t *ir_ignorelist_head = NULL;
95
96 static struct mnl_socket *nl;
97
98 static char **iflist = NULL;
99 static size_t iflist_len = 0;
100
101 static const char *config_keys[] = {"Interface", "VerboseInterface",
102                                     "QDisc",     "Class",
103                                     "Filter",    "IgnoreSelected"};
104 static int config_keys_num = STATIC_ARRAY_SIZE(config_keys);
105
106 static int add_ignorelist(const char *dev, const char *type, const char *inst) {
107   ir_ignorelist_t *entry;
108
109   entry = calloc(1, sizeof(*entry));
110   if (entry == NULL)
111     return -1;
112
113   if (strcasecmp(dev, "All") != 0) {
114     entry->device = strdup(dev);
115     if (entry->device == NULL) {
116       sfree(entry);
117       return -1;
118     }
119   }
120
121   entry->type = strdup(type);
122   if (entry->type == NULL) {
123     sfree(entry->device);
124     sfree(entry);
125     return -1;
126   }
127
128   if (inst != NULL) {
129     entry->inst = strdup(inst);
130     if (entry->inst == NULL) {
131       sfree(entry->type);
132       sfree(entry->device);
133       sfree(entry);
134       return -1;
135     }
136   }
137
138   entry->next = ir_ignorelist_head;
139   ir_ignorelist_head = entry;
140
141   return 0;
142 } /* int add_ignorelist */
143
144 /*
145  * Checks wether a data set should be ignored. Returns `true' is the value
146  * should be ignored, `false' otherwise.
147  */
148 static int check_ignorelist(const char *dev, const char *type,
149                             const char *type_instance) {
150   assert((dev != NULL) && (type != NULL));
151
152   if (ir_ignorelist_head == NULL)
153     return ir_ignorelist_invert ? 0 : 1;
154
155   for (ir_ignorelist_t *i = ir_ignorelist_head; i != NULL; i = i->next) {
156     /* i->device == NULL  =>  match all devices */
157     if ((i->device != NULL) && (strcasecmp(i->device, dev) != 0))
158       continue;
159
160     if (strcasecmp(i->type, type) != 0)
161       continue;
162
163     if ((i->inst != NULL) && (type_instance != NULL) &&
164         (strcasecmp(i->inst, type_instance) != 0))
165       continue;
166
167     DEBUG("netlink plugin: check_ignorelist: "
168           "(dev = %s; type = %s; inst = %s) matched "
169           "(dev = %s; type = %s; inst = %s)",
170           dev, type, type_instance == NULL ? "(nil)" : type_instance,
171           i->device == NULL ? "(nil)" : i->device, i->type,
172           i->inst == NULL ? "(nil)" : i->inst);
173
174     return ir_ignorelist_invert ? 0 : 1;
175   } /* for i */
176
177   return ir_ignorelist_invert;
178 } /* int check_ignorelist */
179
180 static void submit_one(const char *dev, const char *type,
181                        const char *type_instance, derive_t value) {
182   value_list_t vl = VALUE_LIST_INIT;
183
184   vl.values = &(value_t){.derive = value};
185   vl.values_len = 1;
186   sstrncpy(vl.plugin, "netlink", sizeof(vl.plugin));
187   sstrncpy(vl.plugin_instance, dev, sizeof(vl.plugin_instance));
188   sstrncpy(vl.type, type, sizeof(vl.type));
189
190   if (type_instance != NULL)
191     sstrncpy(vl.type_instance, type_instance, sizeof(vl.type_instance));
192
193   plugin_dispatch_values(&vl);
194 } /* void submit_one */
195
196 static void submit_two(const char *dev, const char *type,
197                        const char *type_instance, derive_t rx, derive_t tx) {
198   value_list_t vl = VALUE_LIST_INIT;
199   value_t values[] = {
200       {.derive = rx}, {.derive = tx},
201   };
202
203   vl.values = values;
204   vl.values_len = STATIC_ARRAY_SIZE(values);
205   sstrncpy(vl.plugin, "netlink", sizeof(vl.plugin));
206   sstrncpy(vl.plugin_instance, dev, sizeof(vl.plugin_instance));
207   sstrncpy(vl.type, type, sizeof(vl.type));
208
209   if (type_instance != NULL)
210     sstrncpy(vl.type_instance, type_instance, sizeof(vl.type_instance));
211
212   plugin_dispatch_values(&vl);
213 } /* void submit_two */
214
215 static int update_iflist(struct ifinfomsg *msg, const char *dev) {
216   /* Update the `iflist'. It's used to know which interfaces exist and query
217    * them later for qdiscs and classes. */
218   if ((msg->ifi_index >= 0) && ((size_t)msg->ifi_index >= iflist_len)) {
219     char **temp;
220
221     temp = realloc(iflist, (msg->ifi_index + 1) * sizeof(char *));
222     if (temp == NULL) {
223       ERROR("netlink plugin: update_iflist: realloc failed.");
224       return -1;
225     }
226
227     memset(temp + iflist_len, '\0',
228            (msg->ifi_index + 1 - iflist_len) * sizeof(char *));
229     iflist = temp;
230     iflist_len = msg->ifi_index + 1;
231   }
232   if ((iflist[msg->ifi_index] == NULL) ||
233       (strcmp(iflist[msg->ifi_index], dev) != 0)) {
234     sfree(iflist[msg->ifi_index]);
235     iflist[msg->ifi_index] = strdup(dev);
236   }
237
238   return 0;
239 } /* int update_iflist */
240
241 static void check_ignorelist_and_submit(const char *dev,
242                                         struct ir_link_stats_storage_s *stats) {
243
244   if (check_ignorelist(dev, "interface", NULL) == 0) {
245     submit_two(dev, "if_octets", NULL, stats->rx_bytes, stats->tx_bytes);
246     submit_two(dev, "if_packets", NULL, stats->rx_packets, stats->tx_packets);
247     submit_two(dev, "if_errors", NULL, stats->rx_errors, stats->tx_errors);
248   } else {
249     DEBUG("netlink plugin: Ignoring %s/interface.", dev);
250   }
251
252   if (check_ignorelist(dev, "if_detail", NULL) == 0) {
253     submit_two(dev, "if_dropped", NULL, stats->rx_dropped, stats->tx_dropped);
254     submit_one(dev, "if_multicast", NULL, stats->multicast);
255     submit_one(dev, "if_collisions", NULL, stats->collisions);
256
257     submit_one(dev, "if_rx_errors", "length", stats->rx_length_errors);
258     submit_one(dev, "if_rx_errors", "over", stats->rx_over_errors);
259     submit_one(dev, "if_rx_errors", "crc", stats->rx_crc_errors);
260     submit_one(dev, "if_rx_errors", "frame", stats->rx_frame_errors);
261     submit_one(dev, "if_rx_errors", "fifo", stats->rx_fifo_errors);
262     submit_one(dev, "if_rx_errors", "missed", stats->rx_missed_errors);
263
264     submit_one(dev, "if_tx_errors", "aborted", stats->tx_aborted_errors);
265     submit_one(dev, "if_tx_errors", "carrier", stats->tx_carrier_errors);
266     submit_one(dev, "if_tx_errors", "fifo", stats->tx_fifo_errors);
267     submit_one(dev, "if_tx_errors", "heartbeat", stats->tx_heartbeat_errors);
268     submit_one(dev, "if_tx_errors", "window", stats->tx_window_errors);
269   } else {
270     DEBUG("netlink plugin: Ignoring %s/if_detail.", dev);
271   }
272
273 } /* void check_ignorelist_and_submit */
274
275 #define COPY_RTNL_LINK_VALUE(dst_stats, src_stats, value_name)                 \
276   (dst_stats)->value_name = (src_stats)->value_name
277
278 #define COPY_RTNL_LINK_STATS(dst_stats, src_stats)                             \
279   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_packets);                      \
280   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_packets);                      \
281   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_bytes);                        \
282   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_bytes);                        \
283   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_errors);                       \
284   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_errors);                       \
285   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_dropped);                      \
286   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_dropped);                      \
287   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, multicast);                       \
288   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, collisions);                      \
289   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_length_errors);                \
290   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_over_errors);                  \
291   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_crc_errors);                   \
292   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_frame_errors);                 \
293   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_fifo_errors);                  \
294   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, rx_missed_errors);                \
295   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_aborted_errors);               \
296   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_carrier_errors);               \
297   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_fifo_errors);                  \
298   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_heartbeat_errors);             \
299   COPY_RTNL_LINK_VALUE(dst_stats, src_stats, tx_window_errors)
300
301 #ifdef HAVE_RTNL_LINK_STATS64
302 static void check_ignorelist_and_submit64(const char *dev,
303                                           struct rtnl_link_stats64 *stats) {
304   struct ir_link_stats_storage_s s;
305
306   COPY_RTNL_LINK_STATS(&s, stats);
307
308   check_ignorelist_and_submit(dev, &s);
309 }
310 #endif
311
312 static void check_ignorelist_and_submit32(const char *dev,
313                                           struct rtnl_link_stats *stats) {
314   struct ir_link_stats_storage_s s;
315
316   COPY_RTNL_LINK_STATS(&s, stats);
317
318   check_ignorelist_and_submit(dev, &s);
319 }
320
321 static int link_filter_cb(const struct nlmsghdr *nlh,
322                           void *args __attribute__((unused))) {
323   struct ifinfomsg *ifm = mnl_nlmsg_get_payload(nlh);
324   struct nlattr *attr;
325   const char *dev = NULL;
326   union ir_link_stats_u stats;
327
328   if (nlh->nlmsg_type != RTM_NEWLINK) {
329     ERROR("netlink plugin: link_filter_cb: Don't know how to handle type %i.",
330           nlh->nlmsg_type);
331     return MNL_CB_ERROR;
332   }
333
334   /* Scan attribute list for device name. */
335   mnl_attr_for_each(attr, nlh, sizeof(*ifm)) {
336     if (mnl_attr_get_type(attr) != IFLA_IFNAME)
337       continue;
338
339     if (mnl_attr_validate(attr, MNL_TYPE_STRING) < 0) {
340       ERROR("netlink plugin: link_filter_cb: IFLA_IFNAME mnl_attr_validate "
341             "failed.");
342       return MNL_CB_ERROR;
343     }
344
345     dev = mnl_attr_get_str(attr);
346     if (update_iflist(ifm, dev) < 0)
347       return MNL_CB_ERROR;
348     break;
349   }
350
351   if (dev == NULL) {
352     ERROR("netlink plugin: link_filter_cb: dev == NULL");
353     return MNL_CB_ERROR;
354   }
355 #ifdef HAVE_RTNL_LINK_STATS64
356   mnl_attr_for_each(attr, nlh, sizeof(*ifm)) {
357     if (mnl_attr_get_type(attr) != IFLA_STATS64)
358       continue;
359
360     uint16_t attr_len = mnl_attr_get_payload_len(attr);
361     if (attr_len < sizeof(*stats.stats64)) {
362       ERROR("netlink plugin: link_filter_cb: IFLA_STATS64 attribute has "
363             "insufficient data.");
364       return MNL_CB_ERROR;
365     }
366     stats.stats64 = mnl_attr_get_payload(attr);
367
368     check_ignorelist_and_submit64(dev, stats.stats64);
369
370     return MNL_CB_OK;
371   }
372 #endif
373   mnl_attr_for_each(attr, nlh, sizeof(*ifm)) {
374     if (mnl_attr_get_type(attr) != IFLA_STATS)
375       continue;
376
377     uint16_t attr_len = mnl_attr_get_payload_len(attr);
378     if (attr_len < sizeof(*stats.stats32)) {
379       ERROR("netlink plugin: link_filter_cb: IFLA_STATS attribute has "
380             "insufficient data.");
381       return MNL_CB_ERROR;
382     }
383     stats.stats32 = mnl_attr_get_payload(attr);
384
385     check_ignorelist_and_submit32(dev, stats.stats32);
386
387     return MNL_CB_OK;
388   }
389
390   DEBUG("netlink plugin: link_filter: No statistics for interface %s.", dev);
391   return MNL_CB_OK;
392
393 } /* int link_filter_cb */
394
395 #if HAVE_TCA_STATS2
396 static int qos_attr_cb(const struct nlattr *attr, void *data) {
397   struct qos_stats *q_stats = (struct qos_stats *)data;
398
399   /* skip unsupported attribute in user-space */
400   if (mnl_attr_type_valid(attr, TCA_STATS_MAX) < 0)
401     return MNL_CB_OK;
402
403   if (mnl_attr_get_type(attr) == TCA_STATS_BASIC) {
404     if (mnl_attr_validate2(attr, MNL_TYPE_UNSPEC, sizeof(*q_stats->bs)) < 0) {
405       char errbuf[1024];
406       ERROR("netlink plugin: qos_attr_cb: TCA_STATS_BASIC mnl_attr_validate2 "
407             "failed: %s",
408             sstrerror(errno, errbuf, sizeof(errbuf)));
409       return MNL_CB_ERROR;
410     }
411     q_stats->bs = mnl_attr_get_payload(attr);
412     return MNL_CB_OK;
413   }
414
415   if (mnl_attr_get_type(attr) == TCA_STATS_QUEUE) {
416     if (mnl_attr_validate2(attr, MNL_TYPE_UNSPEC, sizeof(*q_stats->qs)) < 0) {
417       ERROR("netlink plugin: qos_attr_cb: TCA_STATS_QUEUE mnl_attr_validate2 "
418             "failed.");
419       return MNL_CB_ERROR;
420     }
421     q_stats->qs = mnl_attr_get_payload(attr);
422     return MNL_CB_OK;
423   }
424
425   return MNL_CB_OK;
426 } /* qos_attr_cb */
427 #endif
428
429 static int qos_filter_cb(const struct nlmsghdr *nlh, void *args) {
430   struct tcmsg *tm = mnl_nlmsg_get_payload(nlh);
431   struct nlattr *attr;
432
433   int wanted_ifindex = *((int *)args);
434
435   const char *dev;
436   const char *kind = NULL;
437
438   /* char *type_instance; */
439   const char *tc_type;
440   char tc_inst[DATA_MAX_NAME_LEN];
441
442   _Bool stats_submitted = 0;
443
444   if (nlh->nlmsg_type == RTM_NEWQDISC)
445     tc_type = "qdisc";
446   else if (nlh->nlmsg_type == RTM_NEWTCLASS)
447     tc_type = "class";
448   else if (nlh->nlmsg_type == RTM_NEWTFILTER)
449     tc_type = "filter";
450   else {
451     ERROR("netlink plugin: qos_filter_cb: Don't know how to handle type %i.",
452           nlh->nlmsg_type);
453     return MNL_CB_ERROR;
454   }
455
456   if (tm->tcm_ifindex != wanted_ifindex) {
457     DEBUG("netlink plugin: qos_filter_cb: Got %s for interface #%i, "
458           "but expected #%i.",
459           tc_type, tm->tcm_ifindex, wanted_ifindex);
460     return MNL_CB_OK;
461   }
462
463   if ((tm->tcm_ifindex >= 0) && ((size_t)tm->tcm_ifindex >= iflist_len)) {
464     ERROR("netlink plugin: qos_filter_cb: tm->tcm_ifindex = %i "
465           ">= iflist_len = %zu",
466           tm->tcm_ifindex, iflist_len);
467     return MNL_CB_ERROR;
468   }
469
470   dev = iflist[tm->tcm_ifindex];
471   if (dev == NULL) {
472     ERROR("netlink plugin: qos_filter_cb: iflist[%i] == NULL", tm->tcm_ifindex);
473     return MNL_CB_ERROR;
474   }
475
476   mnl_attr_for_each(attr, nlh, sizeof(*tm)) {
477     if (mnl_attr_get_type(attr) != TCA_KIND)
478       continue;
479
480     if (mnl_attr_validate(attr, MNL_TYPE_STRING) < 0) {
481       ERROR(
482           "netlink plugin: qos_filter_cb: TCA_KIND mnl_attr_validate failed.");
483       return MNL_CB_ERROR;
484     }
485
486     kind = mnl_attr_get_str(attr);
487     break;
488   }
489
490   if (kind == NULL) {
491     ERROR("netlink plugin: qos_filter_cb: kind == NULL");
492     return -1;
493   }
494
495   { /* The ID */
496     uint32_t numberic_id;
497
498     numberic_id = tm->tcm_handle;
499     if (strcmp(tc_type, "filter") == 0)
500       numberic_id = tm->tcm_parent;
501
502     snprintf(tc_inst, sizeof(tc_inst), "%s-%x:%x", kind, numberic_id >> 16,
503              numberic_id & 0x0000FFFF);
504   }
505
506   DEBUG("netlink plugin: qos_filter_cb: got %s for %s (%i).", tc_type, dev,
507         tm->tcm_ifindex);
508
509   if (check_ignorelist(dev, tc_type, tc_inst))
510     return MNL_CB_OK;
511
512 #if HAVE_TCA_STATS2
513   mnl_attr_for_each(attr, nlh, sizeof(*tm)) {
514     struct qos_stats q_stats;
515
516     memset(&q_stats, 0x0, sizeof(q_stats));
517
518     if (mnl_attr_get_type(attr) != TCA_STATS2)
519       continue;
520
521     if (mnl_attr_validate(attr, MNL_TYPE_NESTED) < 0) {
522       ERROR("netlink plugin: qos_filter_cb: TCA_STATS2 mnl_attr_validate "
523             "failed.");
524       return MNL_CB_ERROR;
525     }
526
527     mnl_attr_parse_nested(attr, qos_attr_cb, &q_stats);
528
529     if (q_stats.bs != NULL || q_stats.qs != NULL) {
530       char type_instance[DATA_MAX_NAME_LEN];
531
532       stats_submitted = 1;
533
534       snprintf(type_instance, sizeof(type_instance), "%s-%s", tc_type, tc_inst);
535
536       if (q_stats.bs != NULL) {
537         submit_one(dev, "ipt_bytes", type_instance, q_stats.bs->bytes);
538         submit_one(dev, "ipt_packets", type_instance, q_stats.bs->packets);
539       }
540       if (q_stats.qs != NULL) {
541         submit_one(dev, "if_tx_dropped", type_instance, q_stats.qs->drops);
542       }
543     }
544
545     break;
546   }
547 #endif /* TCA_STATS2 */
548
549 #if HAVE_TCA_STATS
550   mnl_attr_for_each(attr, nlh, sizeof(*tm)) {
551     struct tc_stats *ts = NULL;
552
553     if (mnl_attr_get_type(attr) != TCA_STATS)
554       continue;
555
556     if (mnl_attr_validate2(attr, MNL_TYPE_UNSPEC, sizeof(*ts)) < 0) {
557       char errbuf[1024];
558       ERROR("netlink plugin: qos_filter_cb: TCA_STATS mnl_attr_validate2 "
559             "failed: %s",
560             sstrerror(errno, errbuf, sizeof(errbuf)));
561       return MNL_CB_ERROR;
562     }
563     ts = mnl_attr_get_payload(attr);
564
565     if (!stats_submitted && ts != NULL) {
566       char type_instance[DATA_MAX_NAME_LEN];
567
568       snprintf(type_instance, sizeof(type_instance), "%s-%s", tc_type, tc_inst);
569
570       submit_one(dev, "ipt_bytes", type_instance, ts->bytes);
571       submit_one(dev, "ipt_packets", type_instance, ts->packets);
572     }
573
574     break;
575   }
576
577 #endif /* TCA_STATS */
578
579 #if !(HAVE_TCA_STATS && HAVE_TCA_STATS2)
580   DEBUG("netlink plugin: qos_filter_cb: Have neither TCA_STATS2 nor "
581         "TCA_STATS.");
582 #endif
583
584   return MNL_CB_OK;
585 } /* int qos_filter_cb */
586
587 static int ir_config(const char *key, const char *value) {
588   char *new_val;
589   char *fields[8];
590   int fields_num;
591   int status = 1;
592
593   new_val = strdup(value);
594   if (new_val == NULL)
595     return -1;
596
597   fields_num = strsplit(new_val, fields, STATIC_ARRAY_SIZE(fields));
598   if ((fields_num < 1) || (fields_num > 8)) {
599     sfree(new_val);
600     return -1;
601   }
602
603   if ((strcasecmp(key, "Interface") == 0) ||
604       (strcasecmp(key, "VerboseInterface") == 0)) {
605     if (fields_num != 1) {
606       ERROR("netlink plugin: Invalid number of fields for option "
607             "`%s'. Got %i, expected 1.",
608             key, fields_num);
609       status = -1;
610     } else {
611       add_ignorelist(fields[0], "interface", NULL);
612       if (strcasecmp(key, "VerboseInterface") == 0)
613         add_ignorelist(fields[0], "if_detail", NULL);
614       status = 0;
615     }
616   } else if ((strcasecmp(key, "QDisc") == 0) ||
617              (strcasecmp(key, "Class") == 0) ||
618              (strcasecmp(key, "Filter") == 0)) {
619     if ((fields_num < 1) || (fields_num > 2)) {
620       ERROR("netlink plugin: Invalid number of fields for option "
621             "`%s'. Got %i, expected 1 or 2.",
622             key, fields_num);
623       return -1;
624     } else {
625       add_ignorelist(fields[0], key, (fields_num == 2) ? fields[1] : NULL);
626       status = 0;
627     }
628   } else if (strcasecmp(key, "IgnoreSelected") == 0) {
629     if (fields_num != 1) {
630       ERROR("netlink plugin: Invalid number of fields for option "
631             "`IgnoreSelected'. Got %i, expected 1.",
632             fields_num);
633       status = -1;
634     } else {
635       if (IS_TRUE(fields[0]))
636         ir_ignorelist_invert = 0;
637       else
638         ir_ignorelist_invert = 1;
639       status = 0;
640     }
641   }
642
643   sfree(new_val);
644
645   return status;
646 } /* int ir_config */
647
648 static int ir_init(void) {
649   nl = mnl_socket_open(NETLINK_ROUTE);
650   if (nl == NULL) {
651     ERROR("netlink plugin: ir_init: mnl_socket_open failed.");
652     return -1;
653   }
654
655   if (mnl_socket_bind(nl, 0, MNL_SOCKET_AUTOPID) < 0) {
656     ERROR("netlink plugin: ir_init: mnl_socket_bind failed.");
657     return -1;
658   }
659
660   return 0;
661 } /* int ir_init */
662
663 static int ir_read(void) {
664   char buf[MNL_SOCKET_BUFFER_SIZE];
665   struct nlmsghdr *nlh;
666   struct rtgenmsg *rt;
667   int ret;
668   unsigned int seq, portid;
669
670   static const int type_id[] = {RTM_GETQDISC, RTM_GETTCLASS, RTM_GETTFILTER};
671   static const char *type_name[] = {"qdisc", "class", "filter"};
672
673   portid = mnl_socket_get_portid(nl);
674
675   nlh = mnl_nlmsg_put_header(buf);
676   nlh->nlmsg_type = RTM_GETLINK;
677   nlh->nlmsg_flags = NLM_F_REQUEST | NLM_F_DUMP;
678   nlh->nlmsg_seq = seq = time(NULL);
679   rt = mnl_nlmsg_put_extra_header(nlh, sizeof(*rt));
680   rt->rtgen_family = AF_PACKET;
681
682   if (mnl_socket_sendto(nl, nlh, nlh->nlmsg_len) < 0) {
683     ERROR("netlink plugin: ir_read: rtnl_wilddump_request failed.");
684     return -1;
685   }
686
687   ret = mnl_socket_recvfrom(nl, buf, sizeof(buf));
688   while (ret > 0) {
689     ret = mnl_cb_run(buf, ret, seq, portid, link_filter_cb, NULL);
690     if (ret <= MNL_CB_STOP)
691       break;
692     ret = mnl_socket_recvfrom(nl, buf, sizeof(buf));
693   }
694   if (ret < 0) {
695     char errbuf[1024];
696     ERROR("netlink plugin: ir_read: mnl_socket_recvfrom failed: %s",
697           sstrerror(errno, errbuf, sizeof(errbuf)));
698     return (-1);
699   }
700
701   /* `link_filter_cb' will update `iflist' which is used here to iterate
702    * over all interfaces. */
703   for (size_t ifindex = 1; ifindex < iflist_len; ifindex++) {
704     struct tcmsg *tm;
705
706     if (iflist[ifindex] == NULL)
707       continue;
708
709     for (size_t type_index = 0; type_index < STATIC_ARRAY_SIZE(type_id);
710          type_index++) {
711       if (check_ignorelist(iflist[ifindex], type_name[type_index], NULL)) {
712         DEBUG("netlink plugin: ir_read: check_ignorelist (%s, %s, (nil)) "
713               "== TRUE",
714               iflist[ifindex], type_name[type_index]);
715         continue;
716       }
717
718       DEBUG("netlink plugin: ir_read: querying %s from %s (%zu).",
719             type_name[type_index], iflist[ifindex], ifindex);
720
721       nlh = mnl_nlmsg_put_header(buf);
722       nlh->nlmsg_type = type_id[type_index];
723       nlh->nlmsg_flags = NLM_F_REQUEST | NLM_F_DUMP;
724       nlh->nlmsg_seq = seq = time(NULL);
725       tm = mnl_nlmsg_put_extra_header(nlh, sizeof(*tm));
726       tm->tcm_family = AF_PACKET;
727       tm->tcm_ifindex = ifindex;
728
729       if (mnl_socket_sendto(nl, nlh, nlh->nlmsg_len) < 0) {
730         ERROR("netlink plugin: ir_read: mnl_socket_sendto failed.");
731         continue;
732       }
733
734       ret = mnl_socket_recvfrom(nl, buf, sizeof(buf));
735       while (ret > 0) {
736         ret = mnl_cb_run(buf, ret, seq, portid, qos_filter_cb, &ifindex);
737         if (ret <= MNL_CB_STOP)
738           break;
739         ret = mnl_socket_recvfrom(nl, buf, sizeof(buf));
740       }
741       if (ret < 0) {
742         char errbuf[1024];
743         ERROR("netlink plugin: ir_read: mnl_socket_recvfrom failed: %s",
744               sstrerror(errno, errbuf, sizeof(errbuf)));
745         continue;
746       }
747     } /* for (type_index) */
748   }   /* for (if_index) */
749
750   return 0;
751 } /* int ir_read */
752
753 static int ir_shutdown(void) {
754   if (nl) {
755     mnl_socket_close(nl);
756     nl = NULL;
757   }
758
759   return 0;
760 } /* int ir_shutdown */
761
762 void module_register(void) {
763   plugin_register_config("netlink", ir_config, config_keys, config_keys_num);
764   plugin_register_init("netlink", ir_init);
765   plugin_register_read("netlink", ir_read);
766   plugin_register_shutdown("netlink", ir_shutdown);
767 } /* void module_register */