2 * firewall3 - 3rd OpenWrt UCI firewall implementation
4 * Copyright (C) 2013 Jo-Philipp Wich <jow@openwrt.org>
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.
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.
24 put_value(void *ptr, void *val, int elem_size, bool is_list)
30 copy = malloc(elem_size);
35 memcpy(copy, val, elem_size);
36 list_add_tail((struct list_head *)copy, (struct list_head *)ptr);
40 memcpy(ptr, val, elem_size);
45 parse_enum(void *ptr, const char *val, const char **values, int min, int max)
47 int i, l = strlen(val);
51 for (i = 0; i <= (max - min); i++)
53 if (!strncasecmp(val, values[i], l))
55 *((int *)ptr) = min + i;
65 const char *fw3_flag_names[__FW3_FLAG_MAX] = {
87 const char *fw3_limit_units[__FW3_LIMIT_UNIT_MAX] = {
94 const char *fw3_ipset_method_names[__FW3_IPSET_METHOD_MAX] = {
101 const char *fw3_ipset_type_names[__FW3_IPSET_TYPE_MAX] = {
110 static const char *weekdays[] = {
120 static const char *include_types[] = {
125 static const char *reflection_sources[] = {
132 fw3_parse_bool(void *ptr, const char *val, bool is_list)
134 if (!strcmp(val, "true") || !strcmp(val, "yes") || !strcmp(val, "1"))
135 *((bool *)ptr) = true;
137 *((bool *)ptr) = false;
143 fw3_parse_int(void *ptr, const char *val, bool is_list)
146 int n = strtol(val, &e, 0);
157 fw3_parse_string(void *ptr, const char *val, bool is_list)
159 *((char **)ptr) = (char *)val;
164 fw3_parse_target(void *ptr, const char *val, bool is_list)
166 return parse_enum(ptr, val, &fw3_flag_names[FW3_FLAG_ACCEPT],
167 FW3_FLAG_ACCEPT, FW3_FLAG_SNAT);
171 fw3_parse_limit(void *ptr, const char *val, bool is_list)
173 struct fw3_limit *limit = ptr;
174 enum fw3_limit_unit u = FW3_LIMIT_UNIT_SECOND;
180 limit->invert = true;
181 while (isspace(*++val));
184 n = strtol(val, &e, 10);
186 if (errno == ERANGE || errno == EINVAL)
189 if (*e && *e++ != '/')
195 if (!parse_enum(&u, e, fw3_limit_units, 0, FW3_LIMIT_UNIT_DAY))
205 fw3_parse_device(void *ptr, const char *val, bool is_list)
208 struct fw3_device dev = { };
214 put_value(ptr, &dev, sizeof(dev), is_list);
221 while (isspace(*++val));
224 if ((p = strchr(val, '@')) != NULL)
227 snprintf(dev.network, sizeof(dev.network), "%s", p);
231 snprintf(dev.name, sizeof(dev.name), "%s", val);
236 put_value(ptr, &dev, sizeof(dev), is_list);
241 fw3_parse_address(void *ptr, const char *val, bool is_list)
243 struct fw3_address addr = { };
252 while (isspace(*++val));
260 if ((p = strchr(s, '/')) != NULL)
263 m = strtoul(p, &e, 10);
265 if ((e == p) || (*e != 0))
267 if (strchr(s, ':') || !inet_pton(AF_INET, p, &v4))
273 for (i = 0, m = 32; !(v4.s_addr & 1) && (i < 32); i++)
280 else if ((p = strchr(s, '-')) != NULL)
284 if (inet_pton(AF_INET6, p, &v6))
286 addr.family = FW3_FAMILY_V6;
287 addr.address2.v6 = v6;
290 else if (inet_pton(AF_INET, p, &v4))
292 addr.family = FW3_FAMILY_V4;
293 addr.address2.v4 = v4;
303 if (inet_pton(AF_INET6, s, &v6))
305 addr.family = FW3_FAMILY_V6;
306 addr.address.v6 = v6;
307 addr.mask = (m >= 0) ? m : 128;
309 else if (inet_pton(AF_INET, s, &v4))
311 addr.family = FW3_FAMILY_V4;
312 addr.address.v4 = v4;
313 addr.mask = (m >= 0) ? m : 32;
323 put_value(ptr, &addr, sizeof(addr), is_list);
328 fw3_parse_network(void *ptr, const char *val, bool is_list)
330 struct fw3_device dev = { };
331 struct fw3_address *addr;
332 struct list_head *addr_list;
334 if (!fw3_parse_address(ptr, val, is_list))
336 if (!fw3_parse_device(&dev, val, false))
339 addr_list = fw3_ubus_address(dev.name);
343 list_for_each_entry(addr, addr_list, list)
345 addr->invert = dev.invert;
346 addr->resolved = true;
348 if (!put_value(ptr, addr, sizeof(*addr), is_list))
352 fw3_free_list(addr_list);
360 fw3_parse_mac(void *ptr, const char *val, bool is_list)
362 struct fw3_mac addr = { };
363 struct ether_addr *mac;
368 while (isspace(*++val));
371 if ((mac = ether_aton(val)) != NULL)
376 put_value(ptr, &addr, sizeof(addr), is_list);
384 fw3_parse_port(void *ptr, const char *val, bool is_list)
386 struct fw3_port range = { };
394 while (isspace(*++val));
397 n = strtoul(val, &p, 10);
399 if (errno == ERANGE || errno == EINVAL)
402 if (*p && *p != '-' && *p != ':')
407 m = strtoul(++p, NULL, 10);
409 if (errno == ERANGE || errno == EINVAL || m < n)
422 put_value(ptr, &range, sizeof(range), is_list);
427 fw3_parse_family(void *ptr, const char *val, bool is_list)
429 if (!strcmp(val, "any"))
430 *((enum fw3_family *)ptr) = FW3_FAMILY_ANY;
431 else if (!strcmp(val, "inet") || strrchr(val, '4'))
432 *((enum fw3_family *)ptr) = FW3_FAMILY_V4;
433 else if (!strcmp(val, "inet6") || strrchr(val, '6'))
434 *((enum fw3_family *)ptr) = FW3_FAMILY_V6;
442 fw3_parse_icmptype(void *ptr, const char *val, bool is_list)
444 struct fw3_icmptype icmp = { };
450 for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v4); i++)
452 if (!strcmp(val, fw3_icmptype_list_v4[i].name))
454 icmp.type = fw3_icmptype_list_v4[i].type;
455 icmp.code_min = fw3_icmptype_list_v4[i].code_min;
456 icmp.code_max = fw3_icmptype_list_v4[i].code_max;
463 for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v6); i++)
465 if (!strcmp(val, fw3_icmptype_list_v6[i].name))
467 icmp.type6 = fw3_icmptype_list_v6[i].type;
468 icmp.code6_min = fw3_icmptype_list_v6[i].code_min;
469 icmp.code6_max = fw3_icmptype_list_v6[i].code_max;
478 i = strtoul(val, &p, 10);
480 if ((p == val) || (*p != '/' && *p != 0) || (i > 0xFF))
488 i = strtoul(val, &p, 10);
490 if ((p == val) || (*p != 0) || (i > 0xFF))
499 icmp.code_max = 0xFF;
502 icmp.type6 = icmp.type;
503 icmp.code6_min = icmp.code_max;
504 icmp.code6_max = icmp.code_max;
510 icmp.family = (v4 && v6) ? FW3_FAMILY_ANY
511 : (v6 ? FW3_FAMILY_V6 : FW3_FAMILY_V4);
513 put_value(ptr, &icmp, sizeof(icmp), is_list);
518 fw3_parse_protocol(void *ptr, const char *val, bool is_list)
520 struct fw3_protocol proto = { };
521 struct protoent *ent;
527 while (isspace(*++val));
530 if (!strcmp(val, "all"))
533 put_value(ptr, &proto, sizeof(proto), is_list);
536 else if (!strcmp(val, "icmpv6"))
540 else if (!strcmp(val, "tcpudp"))
543 if (put_value(ptr, &proto, sizeof(proto), is_list))
546 put_value(ptr, &proto, sizeof(proto), is_list);
552 ent = getprotobyname(val);
556 proto.protocol = ent->p_proto;
557 put_value(ptr, &proto, sizeof(proto), is_list);
561 proto.protocol = strtoul(val, &e, 10);
563 if ((e == val) || (*e != 0))
566 put_value(ptr, &proto, sizeof(proto), is_list);
571 fw3_parse_ipset_method(void *ptr, const char *val, bool is_list)
573 return parse_enum(ptr, val, &fw3_ipset_method_names[FW3_IPSET_METHOD_BITMAP],
574 FW3_IPSET_METHOD_BITMAP, FW3_IPSET_METHOD_LIST);
578 fw3_parse_ipset_datatype(void *ptr, const char *val, bool is_list)
580 struct fw3_ipset_datatype type = { };
584 if (!strncmp(val, "dest_", 5))
589 else if (!strncmp(val, "dst_", 4))
594 else if (!strncmp(val, "src_", 4))
600 if (parse_enum(&type.type, val, &fw3_ipset_type_names[FW3_IPSET_TYPE_IP],
601 FW3_IPSET_TYPE_IP, FW3_IPSET_TYPE_SET))
603 put_value(ptr, &type, sizeof(type), is_list);
611 fw3_parse_date(void *ptr, const char *val, bool is_list)
613 unsigned int year = 1970, mon = 1, day = 1, hour = 0, min = 0, sec = 0;
614 struct tm tm = { 0 };
617 year = strtoul(val, &p, 10);
618 if ((*p != '-' && *p) || year < 1970 || year > 2038)
623 mon = strtoul(++p, &p, 10);
624 if ((*p != '-' && *p) || mon > 12)
629 day = strtoul(++p, &p, 10);
630 if ((*p != 'T' && *p) || day > 31)
635 hour = strtoul(++p, &p, 10);
636 if ((*p != ':' && *p) || hour > 23)
641 min = strtoul(++p, &p, 10);
642 if ((*p != ':' && *p) || min > 59)
647 sec = strtoul(++p, &p, 10);
652 tm.tm_year = year - 1900;
659 if (mktime(&tm) >= 0)
661 *((struct tm *)ptr) = tm;
670 fw3_parse_time(void *ptr, const char *val, bool is_list)
672 unsigned int hour = 0, min = 0, sec = 0;
675 hour = strtoul(val, &p, 10);
676 if (*p != ':' || hour > 23)
679 min = strtoul(++p, &p, 10);
680 if ((*p != ':' && *p) || min > 59)
685 sec = strtoul(++p, &p, 10);
690 *((int *)ptr) = 60 * 60 * hour + 60 * min + sec;
698 fw3_parse_weekdays(void *ptr, const char *val, bool is_list)
705 setbit(*(uint8_t *)ptr, 0);
706 while (isspace(*++val));
709 if (!(s = strdup(val)))
712 for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
714 if (!parse_enum(&w, p, weekdays, 1, 7))
716 w = strtoul(p, &p, 10);
718 if (*p || w < 1 || w > 7)
725 setbit(*(uint8_t *)ptr, w);
733 fw3_parse_monthdays(void *ptr, const char *val, bool is_list)
740 setbit(*(uint32_t *)ptr, 0);
741 while (isspace(*++val));
744 if (!(s = strdup(val)))
747 for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
749 d = strtoul(p, &p, 10);
751 if (*p || d < 1 || d > 31)
757 setbit(*(uint32_t *)ptr, d);
765 fw3_parse_include_type(void *ptr, const char *val, bool is_list)
767 return parse_enum(ptr, val, include_types,
768 FW3_INC_TYPE_SCRIPT, FW3_INC_TYPE_RESTORE);
772 fw3_parse_reflection_source(void *ptr, const char *val, bool is_list)
774 return parse_enum(ptr, val, reflection_sources,
775 FW3_REFLECTION_INTERNAL, FW3_REFLECTION_EXTERNAL);
779 fw3_parse_mark(void *ptr, const char *val, bool is_list)
783 struct fw3_mark *m = ptr;
788 while (isspace(*++val));
791 if ((s = strchr(val, '/')) != NULL)
794 n = strtoul(val, &e, 0);
800 m->mask = 0xFFFFFFFF;
804 n = strtoul(s, &e, 0);
817 fw3_parse_setmatch(void *ptr, const char *val, bool is_list)
819 struct fw3_setmatch *m = ptr;
826 while (isspace(*++val));
829 if (!(s = strdup(val)))
832 if (!(p = strtok(s, " \t")))
838 strncpy(m->name, p, sizeof(m->name));
840 for (i = 0, p = strtok(NULL, " \t,");
842 i++, p = strtok(NULL, " \t,"))
844 if (!strncmp(p, "dest", 4) || !strncmp(p, "dst", 3))
846 else if (!strncmp(p, "src", 3))
858 fw3_parse_options(void *s, const struct fw3_option *opts,
859 struct uci_section *section)
863 struct uci_element *e, *l;
864 struct uci_option *o;
865 const struct fw3_option *opt;
866 struct list_head *dest;
869 uci_foreach_element(§ion->options, e)
871 o = uci_to_option(e);
874 for (opt = opts; opt->name; opt++)
879 if (strcmp(opt->name, e->name))
882 if (o->type == UCI_TYPE_LIST)
886 warn_elem(e, "must not be a list");
891 dest = (struct list_head *)((char *)s + opt->offset);
893 uci_foreach_element(&o->v.list, l)
898 if (!opt->parse(dest, l->name, true))
900 warn_elem(e, "has invalid value '%s'", l->name);
916 if (!opt->parse((char *)s + opt->offset, o->v.string, false))
918 warn_elem(e, "has invalid value '%s'", o->v.string);
924 dest = (struct list_head *)((char *)s + opt->offset);
926 for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
928 if (!opt->parse(dest, p, true))
930 warn_elem(e, "has invalid value '%s'", p);
943 warn_elem(e, "is unknown");
951 fw3_address_to_string(struct fw3_address *address, bool allow_invert)
953 char *p, ip[INET6_ADDRSTRLEN];
954 static char buf[INET6_ADDRSTRLEN * 2 + 2];
958 if (address->invert && allow_invert)
959 p += sprintf(p, "!");
961 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
962 &address->address.v4, ip, sizeof(ip));
964 p += sprintf(p, "%s", ip);
968 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
969 &address->address2.v4, ip, sizeof(ip));
971 p += sprintf(p, "-%s", ip);
975 p += sprintf(p, "/%u", address->mask);