Code

Merge branch 'collectd-5.0'
[collectd.git] / src / iptables.c
1 /**
2  * collectd - src/iptables.c
3  * Copyright (C) 2007       Sjoerd van der Berg
4  * Copyright (C) 2007-2010  Florian octo Forster
5  * Copyright (C) 2009       Marco Chiappero
6  *
7  * This program is free software; you can redistribute it and/or modify it
8  * under the terms of the GNU General Public License as published by the
9  * Free Software Foundation; either version 2 of the License, or (at your
10  * option) any later version.
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  *  Sjoerd van der Berg <harekiet at users.sourceforge.net>
23  *  Florian Forster <octo at collectd.org>
24  *  Marco Chiappero <marco at absence.it>
25  **/
27 #include "collectd.h"
28 #include "common.h"
29 #include "plugin.h"
30 #include "configfile.h"
32 #include <sys/socket.h>
34 #include <libiptc/libiptc.h>
35 #include <libiptc/libip6tc.h>
37 /*
38  * iptc_handle_t was available before libiptc was officially available as a
39  * shared library. Note, that when the shared lib was introduced, the API and
40  * ABI have changed slightly:
41  * 'iptc_handle_t' used to be 'struct iptc_handle *' and most functions used
42  * 'iptc_handle_t *' as an argument. Now, most functions use 'struct
43  * iptc_handle *' (thus removing one level of pointer indirection).
44  *
45  * HAVE_IPTC_HANDLE_T is used to determine which API ought to be used. While
46  * this is somewhat hacky, I didn't find better way to solve that :-/
47  * -tokkee
48  */
49 #ifndef HAVE_IPTC_HANDLE_T
50 typedef struct iptc_handle iptc_handle_t;
51 #endif
52 #ifndef HAVE_IP6TC_HANDLE_T
53 typedef struct ip6tc_handle ip6tc_handle_t;
54 #endif
56 /*
57  * (Module-)Global variables
58  */
60 /*
61  * Config format should be `Chain table chainname',
62  * e. g. `Chain mangle incoming'
63  */
64 static const char *config_keys[] =
65 {
66         "Chain",
67         "Chain6"
68 };
69 static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
70 /*
71     Each table/chain combo that will be queried goes into this list
72 */
74 enum protocol_version_e
75 {
76     IPV4,
77     IPV6
78 };
79 typedef enum protocol_version_e protocol_version_t;
81 #ifndef XT_TABLE_MAXNAMELEN
82 # define XT_TABLE_MAXNAMELEN 32
83 #endif
84 typedef struct {
85     protocol_version_t ip_version;
86     char table[XT_TABLE_MAXNAMELEN];
87     char chain[XT_TABLE_MAXNAMELEN];
88     union
89     {
90         int   num;
91         char *comment;
92     } rule;
93     enum
94     {
95         RTYPE_NUM,
96         RTYPE_COMMENT,
97         RTYPE_COMMENT_ALL
98     } rule_type;
99     char name[64];
100 } ip_chain_t;
102 static ip_chain_t **chain_list = NULL;
103 static int chain_num = 0;
105 static int iptables_config (const char *key, const char *value)
107         /* int ip_value; */
108         protocol_version_t ip_version = 0;
110         if (strcasecmp (key, "Chain") == 0)
111                 ip_version = IPV4;
112         else if (strcasecmp (key, "Chain6") == 0)
113                 ip_version = IPV6;
115         if (( ip_version == IPV4 ) || ( ip_version == IPV6 ))
116         {
117                 ip_chain_t temp, *final, **list;
118                 char *table;
119                 int   table_len;
120                 char *chain;
121                 int   chain_len;
123                 char *value_copy;
124                 char *fields[4];
125                 int   fields_num;
126                 
127                 memset (&temp, 0, sizeof (temp));
129                 value_copy = strdup (value);
130                 if (value_copy == NULL)
131                 {
132                     char errbuf[1024];
133                     ERROR ("strdup failed: %s",
134                             sstrerror (errno, errbuf, sizeof (errbuf)));
135                     return (1);
136                 }
138                 /*
139                  *  Time to fill the temp element
140                  *  Examine value string, it should look like:
141                  *  Chain[6] <table> <chain> [<comment|num> [name]]
142                  */
144                 /* set IPv4 or IPv6 */
145                 temp.ip_version = ip_version;
147                 /* Chain <table> <chain> [<comment|num> [name]] */
148                 fields_num = strsplit (value_copy, fields, 4);
149                 if (fields_num < 2)
150                 {
151                     free (value_copy);
152                     return (1);
153                 }
155                 table = fields[0];
156                 chain = fields[1];
158                 table_len = strlen (table) + 1;
159                 if ((unsigned int)table_len > sizeof(temp.table))
160                 {
161                         ERROR ("Table `%s' too long.", table);
162                         free (value_copy);
163                         return (1);
164                 }
165                 sstrncpy (temp.table, table, table_len);
167                 chain_len = strlen (chain) + 1;
168                 if ((unsigned int)chain_len > sizeof(temp.chain))
169                 {
170                         ERROR ("Chain `%s' too long.", chain);
171                         free (value_copy);
172                         return (1);
173                 }
174                 sstrncpy (temp.chain, chain, chain_len);
176                 if (fields_num >= 3)
177                 {
178                     char *comment = fields[2];
179                     int   rule = atoi (comment);
181                     if (rule)
182                     {
183                         temp.rule.num = rule;
184                         temp.rule_type = RTYPE_NUM;
185                     }
186                     else
187                     {
188                         temp.rule.comment = strdup (comment);
189                         if (temp.rule.comment == NULL)
190                         {
191                             free (value_copy);
192                             return (1);
193                         }
194                         temp.rule_type = RTYPE_COMMENT;
195                     }
196                 }
197                 else
198                 {
199                     temp.rule_type = RTYPE_COMMENT_ALL;
200                 }
202                 if (fields_num >= 4)
203                     sstrncpy (temp.name, fields[3], sizeof (temp.name));
205                 free (value_copy);
206                 value_copy = NULL;
207                 table = NULL;
208                 chain = NULL;
210                 list = (ip_chain_t **) realloc (chain_list, (chain_num + 1) * sizeof (ip_chain_t *));
211                 if (list == NULL)
212                 {
213                     char errbuf[1024];
214                     ERROR ("realloc failed: %s",
215                             sstrerror (errno, errbuf, sizeof (errbuf)));
216                     return (1);
217                 }
219                 chain_list = list;
220                 final = (ip_chain_t *) malloc( sizeof(temp) );
221                 if (final == NULL) 
222                 {
223                     char errbuf[1024];
224                     ERROR ("malloc failed: %s",
225                             sstrerror (errno, errbuf, sizeof (errbuf)));
226                     return (1);
227                 }
228                 memcpy (final, &temp, sizeof (temp));
229                 chain_list[chain_num] = final;
230                 chain_num++;
232                 DEBUG ("Chain #%i: table = %s; chain = %s;", chain_num, final->table, final->chain);
233         }
234         else 
235         {
236                 return (-1);
237         }
239         return (0);
240 } /* int iptables_config */
242 static int submit6_match (const struct ip6t_entry_match *match,
243                 const struct ip6t_entry *entry,
244                 const ip_chain_t *chain,
245                 int rule_num)
247     int status;
248     value_t values[1];
249     value_list_t vl = VALUE_LIST_INIT;
251     /* Select the rules to collect */
252     if (chain->rule_type == RTYPE_NUM)
253     {
254         if (chain->rule.num != rule_num)
255             return (0);
256     }
257     else
258     {
259         if (strcmp (match->u.user.name, "comment") != 0)
260             return (0);
261         if ((chain->rule_type == RTYPE_COMMENT)
262                 && (strcmp (chain->rule.comment, (char *) match->data) != 0))
263             return (0);
264     }
266     vl.values = values;
267     vl.values_len = 1;
268     sstrncpy (vl.host, hostname_g, sizeof (vl.host));
269     sstrncpy (vl.plugin, "ip6tables", sizeof (vl.plugin));
271     status = ssnprintf (vl.plugin_instance, sizeof (vl.plugin_instance),
272             "%s-%s", chain->table, chain->chain);
273     if ((status < 1) || ((unsigned int)status >= sizeof (vl.plugin_instance)))
274         return (0);
276     if (chain->name[0] != '\0')
277     {
278         sstrncpy (vl.type_instance, chain->name, sizeof (vl.type_instance));
279     }
280     else
281     {
282         if (chain->rule_type == RTYPE_NUM)
283             ssnprintf (vl.type_instance, sizeof (vl.type_instance),
284                     "%i", chain->rule.num);
285         else
286             sstrncpy (vl.type_instance, (char *) match->data,
287                     sizeof (vl.type_instance));
288     }
290     sstrncpy (vl.type, "ipt_bytes", sizeof (vl.type));
291     values[0].derive = (derive_t) entry->counters.bcnt;
292     plugin_dispatch_values (&vl);
294     sstrncpy (vl.type, "ipt_packets", sizeof (vl.type));
295     values[0].derive = (derive_t) entry->counters.pcnt;
296     plugin_dispatch_values (&vl);
298     return (0);
299 } /* int submit_match */
302 /* This needs to return `int' for IPT_MATCH_ITERATE to work. */
303 static int submit_match (const struct ipt_entry_match *match,
304                 const struct ipt_entry *entry,
305                 const ip_chain_t *chain,
306                 int rule_num) 
308     int status;
309     value_t values[1];
310     value_list_t vl = VALUE_LIST_INIT;
312     /* Select the rules to collect */
313     if (chain->rule_type == RTYPE_NUM)
314     {
315         if (chain->rule.num != rule_num)
316             return (0);
317     }
318     else
319     {
320         if (strcmp (match->u.user.name, "comment") != 0)
321             return (0);
322         if ((chain->rule_type == RTYPE_COMMENT)
323                 && (strcmp (chain->rule.comment, (char *) match->data) != 0))
324             return (0);
325     }
327     vl.values = values;
328     vl.values_len = 1;
329     sstrncpy (vl.host, hostname_g, sizeof (vl.host));
330     sstrncpy (vl.plugin, "iptables", sizeof (vl.plugin));
332     status = ssnprintf (vl.plugin_instance, sizeof (vl.plugin_instance),
333             "%s-%s", chain->table, chain->chain);
334     if ((status < 1) || ((unsigned int)status >= sizeof (vl.plugin_instance)))
335         return (0);
337     if (chain->name[0] != '\0')
338     {
339         sstrncpy (vl.type_instance, chain->name, sizeof (vl.type_instance));
340     }
341     else
342     {
343         if (chain->rule_type == RTYPE_NUM)
344             ssnprintf (vl.type_instance, sizeof (vl.type_instance),
345                     "%i", chain->rule.num);
346         else
347             sstrncpy (vl.type_instance, (char *) match->data,
348                     sizeof (vl.type_instance));
349     }
351     sstrncpy (vl.type, "ipt_bytes", sizeof (vl.type));
352     values[0].derive = (derive_t) entry->counters.bcnt;
353     plugin_dispatch_values (&vl);
355     sstrncpy (vl.type, "ipt_packets", sizeof (vl.type));
356     values[0].derive = (derive_t) entry->counters.pcnt;
357     plugin_dispatch_values (&vl);
359     return (0);
360 } /* int submit_match */
363 /* ipv6 submit_chain */
364 static void submit6_chain( ip6tc_handle_t *handle, ip_chain_t *chain )
366     const struct ip6t_entry *entry;
367     int rule_num;
369     /* Find first rule for chain and use the iterate macro */
370     entry = ip6tc_first_rule( chain->chain, handle );
371     if (entry == NULL)
372     {
373         DEBUG ("ip6tc_first_rule failed: %s", ip6tc_strerror (errno));
374         return;
375     }
377     rule_num = 1;
378     while (entry)
379     {
380         if (chain->rule_type == RTYPE_NUM)
381         {
382             submit6_match (NULL, entry, chain, rule_num);
383         }
384         else
385         {
386             IP6T_MATCH_ITERATE( entry, submit6_match, entry, chain, rule_num );
387         }
389         entry = ip6tc_next_rule( entry, handle );
390         rule_num++;
391     } /* while (entry) */
395 /* ipv4 submit_chain */
396 static void submit_chain( iptc_handle_t *handle, ip_chain_t *chain )
398     const struct ipt_entry *entry;
399     int rule_num;
401     /* Find first rule for chain and use the iterate macro */    
402     entry = iptc_first_rule( chain->chain, handle );
403     if (entry == NULL)
404     {
405         DEBUG ("iptc_first_rule failed: %s", iptc_strerror (errno));
406         return;
407     }
409     rule_num = 1;
410     while (entry)
411     {
412         if (chain->rule_type == RTYPE_NUM)
413         {
414             submit_match (NULL, entry, chain, rule_num);
415         }
416         else
417         {
418             IPT_MATCH_ITERATE( entry, submit_match, entry, chain, rule_num );
419         }
421         entry = iptc_next_rule( entry, handle );
422         rule_num++;
423     } /* while (entry) */
427 static int iptables_read (void)
429     int i;
430     int num_failures = 0;
431     ip_chain_t *chain;
433     /* Init the iptc handle structure and query the correct table */    
434     for (i = 0; i < chain_num; i++)
435     {
436         chain = chain_list[i];
437         
438         if (!chain)
439         {
440             DEBUG ("iptables plugin: chain == NULL");
441             continue;
442         }
444         if ( chain->ip_version == IPV4 )
445         {
446 #ifdef HAVE_IPTC_HANDLE_T
447                 iptc_handle_t _handle;
448                 iptc_handle_t *handle = &_handle;
450                 *handle = iptc_init (chain->table);
451 #else
452                 iptc_handle_t *handle;
453                 handle = iptc_init (chain->table);
454 #endif
456                 if (!handle)
457                 {
458                         ERROR ("iptables plugin: iptc_init (%s) failed: %s",
459                                 chain->table, iptc_strerror (errno));
460                         num_failures++;
461                         continue;
462                 }
464                 submit_chain (handle, chain);
465                 iptc_free (handle);
466         }
467         else if ( chain->ip_version == IPV6 )
468         {
469 #ifdef HAVE_IP6TC_HANDLE_T
470                 ip6tc_handle_t _handle;
471                 ip6tc_handle_t *handle = &_handle;
473                 *handle = ip6tc_init (chain->table);
474 #else
475                 ip6tc_handle_t *handle;
476                 handle = ip6tc_init (chain->table);
477 #endif
479                 if (!handle)
480                 {
481                         ERROR ("iptables plugin: ip6tc_init (%s) failed: %s",
482                                 chain->table, ip6tc_strerror (errno));
483                         num_failures++;
484                         continue;
485                 }
487                 submit6_chain (handle, chain);
488                 ip6tc_free (handle);
489         }
490         else num_failures++;
492     } /* for (i = 0 .. chain_num) */
494     return ((num_failures < chain_num) ? 0 : -1);
495 } /* int iptables_read */
497 static int iptables_shutdown (void)
499     int i;
501     for (i = 0; i < chain_num; i++)
502     {
503         if ((chain_list[i] != NULL) && (chain_list[i]->rule_type == RTYPE_COMMENT))
504         {
505             sfree (chain_list[i]->rule.comment);
506         }
507         sfree (chain_list[i]);
508     }
509     sfree (chain_list);
511     return (0);
512 } /* int iptables_shutdown */
514 void module_register (void)
516     plugin_register_config ("iptables", iptables_config,
517             config_keys, config_keys_num);
518     plugin_register_read ("iptables", iptables_read);
519     plugin_register_shutdown ("iptables", iptables_shutdown);
520 } /* void module_register */
522 /*
523  * vim:shiftwidth=4:softtabstop=4:tabstop=8
524  */