116050ae060bcd2d9a8d3a22f22bb1263b5201b2
[project/firewall3.git] / main.c
1 /*
2  * firewall3 - 3rd OpenWrt UCI firewall implementation
3  *
4  *   Copyright (C) 2013 Jo-Philipp Wich <jow@openwrt.org>
5  *
6  * Permission to use, copy, modify, and/or distribute this software for any
7  * purpose with or without fee is hereby granted, provided that the above
8  * copyright notice and this permission notice appear in all copies.
9  *
10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17  */
18
19 #include <stdio.h>
20 #include <unistd.h>
21
22 #include "options.h"
23 #include "defaults.h"
24 #include "zones.h"
25 #include "rules.h"
26 #include "redirects.h"
27 #include "forwards.h"
28 #include "ipsets.h"
29 #include "includes.h"
30 #include "ubus.h"
31 #include "iptables.h"
32
33
34 static bool print_rules = false;
35
36 static struct fw3_state *run_state = NULL;
37 static struct fw3_state *cfg_state = NULL;
38
39
40 static bool
41 build_state(bool runtime)
42 {
43         struct fw3_state *state = NULL;
44         struct uci_package *p = NULL;
45         FILE *sf;
46
47         state = malloc(sizeof(*state));
48
49         if (!state)
50                 error("Out of memory");
51
52         memset(state, 0, sizeof(*state));
53         state->uci = uci_alloc_context();
54
55         if (!state->uci)
56                 error("Out of memory");
57
58         if (runtime)
59         {
60                 sf = fopen(FW3_STATEFILE, "r");
61
62                 if (sf)
63                 {
64                         uci_import(state->uci, sf, "fw3_state", &p, true);
65                         fclose(sf);
66                 }
67
68                 if (!p)
69                 {
70                         uci_free_context(state->uci);
71                         free(state);
72
73                         return false;
74                 }
75
76                 state->statefile = true;
77
78                 run_state = state;
79         }
80         else
81         {
82                 if (!fw3_ubus_connect())
83                         error("Failed to connect to ubus");
84
85                 if (uci_load(state->uci, "firewall", &p))
86                 {
87                         uci_perror(state->uci, NULL);
88                         error("Failed to load /etc/config/firewall");
89                 }
90
91                 if (!fw3_find_command("ipset"))
92                 {
93                         warn("Unable to locate ipset utility, disabling ipset support");
94                         state->disable_ipsets = true;
95                 }
96
97                 cfg_state = state;
98         }
99
100         fw3_load_defaults(state, p);
101         fw3_load_ipsets(state, p);
102         fw3_load_zones(state, p);
103         fw3_load_rules(state, p);
104         fw3_load_redirects(state, p);
105         fw3_load_forwards(state, p);
106         fw3_load_includes(state, p);
107
108         return true;
109 }
110
111 static void
112 free_state(struct fw3_state *state)
113 {
114         struct list_head *cur, *tmp;
115
116         list_for_each_safe(cur, tmp, &state->zones)
117                 fw3_free_zone((struct fw3_zone *)cur);
118
119         list_for_each_safe(cur, tmp, &state->rules)
120                 fw3_free_rule((struct fw3_rule *)cur);
121
122         list_for_each_safe(cur, tmp, &state->redirects)
123                 fw3_free_redirect((struct fw3_redirect *)cur);
124
125         list_for_each_safe(cur, tmp, &state->forwards)
126                 fw3_free_forward((struct fw3_forward *)cur);
127
128         list_for_each_safe(cur, tmp, &state->ipsets)
129                 fw3_free_ipset((struct fw3_ipset *)cur);
130
131         list_for_each_safe(cur, tmp, &state->includes)
132                 fw3_free_include((struct fw3_include *)cur);
133
134         uci_free_context(state->uci);
135
136         free(state);
137
138         fw3_ubus_disconnect();
139 }
140
141
142 static bool
143 family_running(enum fw3_family family)
144 {
145         return (run_state && has(run_state->defaults.flags, family, family));
146 }
147
148 static void
149 family_set(struct fw3_state *state, enum fw3_family family, bool set)
150 {
151         if (!state)
152                 return;
153
154         if (set)
155                 set(state->defaults.flags, family, family);
156         else
157                 del(state->defaults.flags, family, family);
158 }
159
160 static int
161 stop(bool complete)
162 {
163         FILE *ct;
164
165         int rv = 1;
166         enum fw3_family family;
167         enum fw3_table table;
168         struct fw3_ipt_handle *handle;
169
170         if (!complete && !run_state)
171         {
172                 warn("The firewall appears to be stopped. "
173                          "Use the 'flush' command to forcefully purge all rules.");
174
175                 return rv;
176         }
177
178         if (!print_rules && run_state)
179                 fw3_hotplug_zones(run_state, false);
180
181         for (family = FW3_FAMILY_V4; family <= FW3_FAMILY_V6; family++)
182         {
183                 if (!complete && !family_running(family))
184                         continue;
185
186                 for (table = FW3_TABLE_FILTER; table <= FW3_TABLE_RAW; table++)
187                 {
188                         if (!fw3_has_table(family == FW3_FAMILY_V6, fw3_flag_names[table]))
189                                 continue;
190
191                         if (!(handle = fw3_ipt_open(family, table)))
192                                 continue;
193
194                         info(" * %sing %s %s table", complete ? "Flush" : "Clear",
195                              fw3_flag_names[family], fw3_flag_names[table]);
196
197                         if (complete)
198                         {
199                                 fw3_flush_all(handle);
200                         }
201                         else if (run_state)
202                         {
203                                 fw3_flush_rules(handle, run_state, false);
204                                 fw3_flush_zones(handle, run_state, false);
205                         }
206
207                         fw3_ipt_commit(handle);
208                 }
209
210                 family_set(run_state, family, false);
211                 family_set(cfg_state, family, false);
212
213                 rv = 0;
214         }
215
216         if (run_state)
217         {
218                 if (fw3_command_pipe(false, "ipset", "-exist", "-"))
219                 {
220                         fw3_destroy_ipsets(run_state);
221                         fw3_command_close();
222                 }
223         }
224
225         if (complete && (ct = fopen("/proc/net/nf_conntrack", "w")) != NULL)
226         {
227                 info(" * Flushing conntrack table ...");
228
229                 fwrite("f\n", 2, 1, ct);
230                 fclose(ct);
231         }
232
233         if (!rv && run_state)
234                 fw3_write_statefile(run_state);
235
236         return rv;
237 }
238
239 static int
240 start(void)
241 {
242         int rv = 1;
243         enum fw3_family family;
244         enum fw3_table table;
245         struct fw3_ipt_handle *handle;
246
247         if (!print_rules)
248         {
249                 if (fw3_command_pipe(false, "ipset", "-exist", "-"))
250                 {
251                         fw3_create_ipsets(cfg_state);
252                         fw3_command_close();
253                 }
254         }
255
256         for (family = FW3_FAMILY_V4; family <= FW3_FAMILY_V6; family++)
257         {
258                 if (family == FW3_FAMILY_V6 && cfg_state->defaults.disable_ipv6)
259                         continue;
260
261                 if (!print_rules && family_running(family))
262                 {
263                         warn("The %s firewall appears to be started already. "
264                              "If it is indeed empty, remove the %s file and retry.",
265                              fw3_flag_names[family], FW3_STATEFILE);
266
267                         continue;
268                 }
269
270                 for (table = FW3_TABLE_FILTER; table <= FW3_TABLE_RAW; table++)
271                 {
272                         if (!fw3_has_table(family == FW3_FAMILY_V6, fw3_flag_names[table]))
273                                 continue;
274
275                         if (!(handle = fw3_ipt_open(family, table)))
276                                 continue;
277
278                         info(" * Populating %s %s table",
279                              fw3_flag_names[family], fw3_flag_names[table]);
280
281                         fw3_print_default_chains(handle, cfg_state, false);
282                         fw3_print_zone_chains(handle, cfg_state, false);
283                         fw3_print_default_head_rules(handle, cfg_state, false);
284                         fw3_print_rules(handle, cfg_state);
285                         fw3_print_redirects(handle, cfg_state);
286                         fw3_print_forwards(handle, cfg_state);
287                         fw3_print_zone_rules(handle, cfg_state, false);
288                         fw3_print_default_tail_rules(handle, cfg_state, false);
289
290                         if (!print_rules)
291                                 fw3_ipt_commit(handle);
292                 }
293
294                 //fw3_print_includes(cfg_state, family, false);
295
296                 family_set(run_state, family, true);
297                 family_set(cfg_state, family, true);
298
299                 rv = 0;
300         }
301
302         if (!rv)
303         {
304                 fw3_set_defaults(cfg_state);
305
306                 if (!print_rules)
307                 {
308                         fw3_run_includes(cfg_state, false);
309                         fw3_hotplug_zones(cfg_state, true);
310                         fw3_write_statefile(cfg_state);
311                 }
312         }
313
314         return rv;
315 }
316
317
318 static int
319 reload(void)
320 {
321         int rv = 1;
322         enum fw3_family family;
323         enum fw3_table table;
324         struct fw3_ipt_handle *handle;
325
326         if (!print_rules && run_state)
327                 fw3_hotplug_zones(run_state, false);
328
329         for (family = FW3_FAMILY_V4; family <= FW3_FAMILY_V6; family++)
330         {
331                 if (!family_running(family))
332                         goto start;
333
334                 for (table = FW3_TABLE_FILTER; table <= FW3_TABLE_RAW; table++)
335                 {
336                         if (!fw3_has_table(family == FW3_FAMILY_V6, fw3_flag_names[table]))
337                                 continue;
338
339                         if (!(handle = fw3_ipt_open(family, table)))
340                                 continue;
341
342                         info(" * Clearing %s %s table",
343                              fw3_flag_names[family], fw3_flag_names[table]);
344
345                         if (run_state)
346                         {
347                                 fw3_flush_rules(handle, run_state, true);
348                                 fw3_flush_zones(handle, run_state, true);
349                         }
350
351                         fw3_ipt_commit(handle);
352                 }
353
354                 family_set(run_state, family, false);
355                 family_set(cfg_state, family, false);
356
357 start:
358                 if (family == FW3_FAMILY_V6 && cfg_state->defaults.disable_ipv6)
359                         continue;
360
361                 for (table = FW3_TABLE_FILTER; table <= FW3_TABLE_RAW; table++)
362                 {
363                         if (!fw3_has_table(family == FW3_FAMILY_V6, fw3_flag_names[table]))
364                                 continue;
365
366                         if (!(handle = fw3_ipt_open(family, table)))
367                                 continue;
368
369                         info(" * Populating %s %s table",
370                              fw3_flag_names[family], fw3_flag_names[table]);
371
372                         fw3_print_default_chains(handle, cfg_state, true);
373                         fw3_print_zone_chains(handle, cfg_state, true);
374                         fw3_print_default_head_rules(handle, cfg_state, true);
375                         fw3_print_rules(handle, cfg_state);
376                         fw3_print_redirects(handle, cfg_state);
377                         fw3_print_forwards(handle, cfg_state);
378                         fw3_print_zone_rules(handle, cfg_state, true);
379                         fw3_print_default_tail_rules(handle, cfg_state, true);
380
381                         fw3_ipt_commit(handle);
382                 }
383
384                 //fw3_print_includes(cfg_state, family, true);
385
386                 family_set(run_state, family, true);
387                 family_set(cfg_state, family, true);
388
389                 rv = 0;
390         }
391
392         if (!rv)
393         {
394                 fw3_set_defaults(cfg_state);
395
396                 if (!print_rules)
397                 {
398                         fw3_run_includes(cfg_state, true);
399                         fw3_hotplug_zones(cfg_state, true);
400                         fw3_write_statefile(cfg_state);
401                 }
402         }
403
404         return rv;
405 }
406
407 static int
408 lookup_network(const char *net)
409 {
410         struct fw3_zone *z;
411         struct fw3_device *d;
412
413         list_for_each_entry(z, &cfg_state->zones, list)
414         {
415                 list_for_each_entry(d, &z->networks, list)
416                 {
417                         if (!strcmp(d->name, net))
418                         {
419                                 printf("%s\n", z->name);
420                                 return 0;
421                         }
422                 }
423         }
424
425         return 1;
426 }
427
428 static int
429 lookup_device(const char *dev)
430 {
431         struct fw3_zone *z;
432         struct fw3_device *d;
433
434         list_for_each_entry(z, &cfg_state->zones, list)
435         {
436                 list_for_each_entry(d, &z->devices, list)
437                 {
438                         if (!strcmp(d->name, dev))
439                         {
440                                 printf("%s\n", z->name);
441                                 return 0;
442                         }
443                 }
444         }
445
446         return 1;
447 }
448
449 static int
450 usage(void)
451 {
452         fprintf(stderr, "fw3 [-4] [-6] [-q] print\n");
453         fprintf(stderr, "fw3 [-q] {start|stop|flush|reload|restart}\n");
454         fprintf(stderr, "fw3 [-q] network {net}\n");
455         fprintf(stderr, "fw3 [-q] device {dev}\n");
456
457         return 1;
458 }
459
460
461 int main(int argc, char **argv)
462 {
463         int ch, rv = 1;
464         struct fw3_defaults *defs = NULL;
465         enum fw3_family use_family = FW3_FAMILY_ANY;
466
467         while ((ch = getopt(argc, argv, "46dqh")) != -1)
468         {
469                 switch (ch)
470                 {
471                 case '4':
472                         use_family = FW3_FAMILY_V4;
473                         break;
474
475                 case '6':
476                         use_family = FW3_FAMILY_V6;
477                         break;
478
479                 case 'd':
480                         fw3_pr_debug = true;
481                         break;
482
483                 case 'q':
484                         freopen("/dev/null", "w", stderr);
485                         break;
486
487                 case 'h':
488                         rv = usage();
489                         goto out;
490                 }
491         }
492
493         build_state(false);
494         build_state(true);
495         defs = &cfg_state->defaults;
496
497         if (optind >= argc)
498         {
499                 rv = usage();
500                 goto out;
501         }
502
503         if (!strcmp(argv[optind], "print"))
504         {
505                 if (use_family == FW3_FAMILY_ANY)
506                         use_family = FW3_FAMILY_V4;
507                 else if (use_family == FW3_FAMILY_V6 && defs->disable_ipv6)
508                         warn("IPv6 rules globally disabled in configuration");
509
510                 freopen("/dev/null", "w", stderr);
511
512                 cfg_state->disable_ipsets = true;
513                 print_rules = true;
514                 fw3_pr_debug = true;
515
516                 rv = start();
517         }
518         else if (!strcmp(argv[optind], "start"))
519         {
520                 if (fw3_lock())
521                 {
522                         rv = start();
523                         fw3_unlock();
524                 }
525         }
526         else if (!strcmp(argv[optind], "stop"))
527         {
528                 if (fw3_lock())
529                 {
530                         rv = stop(false);
531                         fw3_unlock();
532                 }
533         }
534         else if (!strcmp(argv[optind], "flush"))
535         {
536                 if (fw3_lock())
537                 {
538                         rv = stop(true);
539                         fw3_unlock();
540                 }
541         }
542         else if (!strcmp(argv[optind], "restart"))
543         {
544                 if (fw3_lock())
545                 {
546                         stop(true);
547                         rv = start();
548                         fw3_unlock();
549                 }
550         }
551         else if (!strcmp(argv[optind], "reload"))
552         {
553                 if (fw3_lock())
554                 {
555                         rv = reload();
556                         fw3_unlock();
557                 }
558         }
559         else if (!strcmp(argv[optind], "network") && (optind + 1) < argc)
560         {
561                 rv = lookup_network(argv[optind + 1]);
562         }
563         else if (!strcmp(argv[optind], "device") && (optind + 1) < argc)
564         {
565                 rv = lookup_device(argv[optind + 1]);
566         }
567         else
568         {
569                 rv = usage();
570         }
571
572 out:
573         if (cfg_state)
574                 free_state(cfg_state);
575
576         if (run_state)
577                 free_state(run_state);
578
579         return rv;
580 }