2 * firewall3 - 3rd OpenWrt UCI firewall implementation
4 * Copyright (C) 2013-2014 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] = {
88 const char *fw3_limit_units[__FW3_LIMIT_UNIT_MAX] = {
95 const char *fw3_ipset_method_names[__FW3_IPSET_METHOD_MAX] = {
102 const char *fw3_ipset_type_names[__FW3_IPSET_TYPE_MAX] = {
111 static const char *weekdays[] = {
121 static const char *include_types[] = {
126 static const char *reflection_sources[] = {
133 fw3_parse_bool(void *ptr, const char *val, bool is_list)
135 if (!strcmp(val, "true") || !strcmp(val, "yes") || !strcmp(val, "1"))
136 *((bool *)ptr) = true;
138 *((bool *)ptr) = false;
144 fw3_parse_int(void *ptr, const char *val, bool is_list)
147 int n = strtol(val, &e, 0);
158 fw3_parse_string(void *ptr, const char *val, bool is_list)
160 *((char **)ptr) = (char *)val;
165 fw3_parse_target(void *ptr, const char *val, bool is_list)
167 return parse_enum(ptr, val, &fw3_flag_names[FW3_FLAG_ACCEPT],
168 FW3_FLAG_ACCEPT, FW3_FLAG_MASQUERADE);
172 fw3_parse_limit(void *ptr, const char *val, bool is_list)
174 struct fw3_limit *limit = ptr;
175 enum fw3_limit_unit u = FW3_LIMIT_UNIT_SECOND;
181 limit->invert = true;
182 while (isspace(*++val));
185 n = strtol(val, &e, 10);
187 if (errno == ERANGE || errno == EINVAL)
190 if (*e && *e++ != '/')
196 if (!parse_enum(&u, e, fw3_limit_units, 0, FW3_LIMIT_UNIT_DAY))
206 fw3_parse_device(void *ptr, const char *val, bool is_list)
209 struct fw3_device dev = { };
215 put_value(ptr, &dev, sizeof(dev), is_list);
222 while (isspace(*++val));
225 if ((p = strchr(val, '@')) != NULL)
228 snprintf(dev.network, sizeof(dev.network), "%s", p);
232 snprintf(dev.name, sizeof(dev.name), "%s", val);
237 put_value(ptr, &dev, sizeof(dev), is_list);
242 fw3_parse_address(void *ptr, const char *val, bool is_list)
244 struct fw3_address addr = { };
247 char *p = NULL, *m = NULL, *s, *e;
253 while (isspace(*++val));
261 if ((m = strchr(s, '/')) != NULL)
263 else if ((p = strchr(s, '-')) != NULL)
266 if (inet_pton(AF_INET6, s, &v6))
268 addr.family = FW3_FAMILY_V6;
269 addr.address.v6 = v6;
271 if (m && !inet_pton(AF_INET6, m, &addr.mask.v6))
273 bits = strtol(m, &e, 10);
275 if ((*e != 0) || !fw3_bitlen2netmask(addr.family, bits, &v6))
282 if (!inet_pton(AF_INET6, p, &addr.mask.v6))
289 memset(addr.mask.v6.s6_addr, 0xFF, 16);
292 else if (inet_pton(AF_INET, s, &v4))
294 addr.family = FW3_FAMILY_V4;
295 addr.address.v4 = v4;
297 if (m && !inet_pton(AF_INET, m, &addr.mask.v4))
299 bits = strtol(m, &e, 10);
301 if ((*e != 0) || !fw3_bitlen2netmask(addr.family, bits, &v4))
308 if (!inet_pton(AF_INET, p, &addr.mask.v4))
315 addr.mask.v4.s_addr = 0xFFFFFFFF;
325 put_value(ptr, &addr, sizeof(addr), is_list);
334 fw3_parse_network(void *ptr, const char *val, bool is_list)
336 struct fw3_device dev = { };
337 struct fw3_address *addr, *tmp;
338 LIST_HEAD(addr_list);
340 if (!fw3_parse_address(ptr, val, is_list))
342 if (!fw3_parse_device(&dev, val, false))
345 fw3_ubus_address(&addr_list, dev.name);
346 list_for_each_entry(addr, &addr_list, list)
348 addr->invert = dev.invert;
349 addr->resolved = true;
354 list_splice_tail(&addr_list, ptr);
356 else if (!list_empty(&addr_list))
358 memcpy(ptr, list_first_entry(&addr_list, typeof(*addr), list),
361 list_for_each_entry_safe(addr, tmp, &addr_list, list)
370 fw3_parse_mac(void *ptr, const char *val, bool is_list)
372 struct fw3_mac addr = { };
373 struct ether_addr *mac;
378 while (isspace(*++val));
381 if ((mac = ether_aton(val)) != NULL)
386 put_value(ptr, &addr, sizeof(addr), is_list);
394 fw3_parse_port(void *ptr, const char *val, bool is_list)
396 struct fw3_port range = { };
404 while (isspace(*++val));
407 n = strtoul(val, &p, 10);
409 if (errno == ERANGE || errno == EINVAL)
412 if (*p && *p != '-' && *p != ':')
417 m = strtoul(++p, NULL, 10);
419 if (errno == ERANGE || errno == EINVAL || m < n)
432 put_value(ptr, &range, sizeof(range), is_list);
437 fw3_parse_family(void *ptr, const char *val, bool is_list)
439 if (!strcmp(val, "any"))
440 *((enum fw3_family *)ptr) = FW3_FAMILY_ANY;
441 else if (!strcmp(val, "inet") || strrchr(val, '4'))
442 *((enum fw3_family *)ptr) = FW3_FAMILY_V4;
443 else if (!strcmp(val, "inet6") || strrchr(val, '6'))
444 *((enum fw3_family *)ptr) = FW3_FAMILY_V6;
452 fw3_parse_icmptype(void *ptr, const char *val, bool is_list)
454 struct fw3_icmptype icmp = { };
460 for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v4); i++)
462 if (!strcmp(val, fw3_icmptype_list_v4[i].name))
464 icmp.type = fw3_icmptype_list_v4[i].type;
465 icmp.code_min = fw3_icmptype_list_v4[i].code_min;
466 icmp.code_max = fw3_icmptype_list_v4[i].code_max;
473 for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v6); i++)
475 if (!strcmp(val, fw3_icmptype_list_v6[i].name))
477 icmp.type6 = fw3_icmptype_list_v6[i].type;
478 icmp.code6_min = fw3_icmptype_list_v6[i].code_min;
479 icmp.code6_max = fw3_icmptype_list_v6[i].code_max;
488 i = strtoul(val, &p, 10);
490 if ((p == val) || (*p != '/' && *p != 0) || (i > 0xFF))
498 i = strtoul(val, &p, 10);
500 if ((p == val) || (*p != 0) || (i > 0xFF))
509 icmp.code_max = 0xFF;
512 icmp.type6 = icmp.type;
513 icmp.code6_min = icmp.code_max;
514 icmp.code6_max = icmp.code_max;
520 icmp.family = (v4 && v6) ? FW3_FAMILY_ANY
521 : (v6 ? FW3_FAMILY_V6 : FW3_FAMILY_V4);
523 put_value(ptr, &icmp, sizeof(icmp), is_list);
528 fw3_parse_protocol(void *ptr, const char *val, bool is_list)
530 struct fw3_protocol proto = { };
531 struct protoent *ent;
537 while (isspace(*++val));
540 if (!strcmp(val, "all"))
543 put_value(ptr, &proto, sizeof(proto), is_list);
546 else if (!strcmp(val, "icmpv6"))
550 else if (!strcmp(val, "tcpudp"))
553 if (put_value(ptr, &proto, sizeof(proto), is_list))
556 put_value(ptr, &proto, sizeof(proto), is_list);
562 ent = getprotobyname(val);
566 proto.protocol = ent->p_proto;
567 put_value(ptr, &proto, sizeof(proto), is_list);
571 proto.protocol = strtoul(val, &e, 10);
573 if ((e == val) || (*e != 0))
576 put_value(ptr, &proto, sizeof(proto), is_list);
581 fw3_parse_ipset_method(void *ptr, const char *val, bool is_list)
583 return parse_enum(ptr, val, &fw3_ipset_method_names[FW3_IPSET_METHOD_BITMAP],
584 FW3_IPSET_METHOD_BITMAP, FW3_IPSET_METHOD_LIST);
588 fw3_parse_ipset_datatype(void *ptr, const char *val, bool is_list)
590 struct fw3_ipset_datatype type = { };
594 if (!strncmp(val, "dest_", 5))
599 else if (!strncmp(val, "dst_", 4))
604 else if (!strncmp(val, "src_", 4))
610 if (parse_enum(&type.type, val, &fw3_ipset_type_names[FW3_IPSET_TYPE_IP],
611 FW3_IPSET_TYPE_IP, FW3_IPSET_TYPE_SET))
613 put_value(ptr, &type, sizeof(type), is_list);
621 fw3_parse_date(void *ptr, const char *val, bool is_list)
623 unsigned int year = 1970, mon = 1, day = 1, hour = 0, min = 0, sec = 0;
624 struct tm tm = { 0 };
627 year = strtoul(val, &p, 10);
628 if ((*p != '-' && *p) || year < 1970 || year > 2038)
633 mon = strtoul(++p, &p, 10);
634 if ((*p != '-' && *p) || mon > 12)
639 day = strtoul(++p, &p, 10);
640 if ((*p != 'T' && *p) || day > 31)
645 hour = strtoul(++p, &p, 10);
646 if ((*p != ':' && *p) || hour > 23)
651 min = strtoul(++p, &p, 10);
652 if ((*p != ':' && *p) || min > 59)
657 sec = strtoul(++p, &p, 10);
662 tm.tm_year = year - 1900;
669 if (mktime(&tm) >= 0)
671 *((struct tm *)ptr) = tm;
680 fw3_parse_time(void *ptr, const char *val, bool is_list)
682 unsigned int hour = 0, min = 0, sec = 0;
685 hour = strtoul(val, &p, 10);
686 if (*p != ':' || hour > 23)
689 min = strtoul(++p, &p, 10);
690 if ((*p != ':' && *p) || min > 59)
695 sec = strtoul(++p, &p, 10);
700 *((int *)ptr) = 60 * 60 * hour + 60 * min + sec;
708 fw3_parse_weekdays(void *ptr, const char *val, bool is_list)
715 setbit(*(uint8_t *)ptr, 0);
716 while (isspace(*++val));
719 if (!(s = strdup(val)))
722 for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
724 if (!parse_enum(&w, p, weekdays, 1, 7))
726 w = strtoul(p, &p, 10);
728 if (*p || w < 1 || w > 7)
735 setbit(*(uint8_t *)ptr, w);
743 fw3_parse_monthdays(void *ptr, const char *val, bool is_list)
750 setbit(*(uint32_t *)ptr, 0);
751 while (isspace(*++val));
754 if (!(s = strdup(val)))
757 for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
759 d = strtoul(p, &p, 10);
761 if (*p || d < 1 || d > 31)
767 setbit(*(uint32_t *)ptr, d);
775 fw3_parse_include_type(void *ptr, const char *val, bool is_list)
777 return parse_enum(ptr, val, include_types,
778 FW3_INC_TYPE_SCRIPT, FW3_INC_TYPE_RESTORE);
782 fw3_parse_reflection_source(void *ptr, const char *val, bool is_list)
784 return parse_enum(ptr, val, reflection_sources,
785 FW3_REFLECTION_INTERNAL, FW3_REFLECTION_EXTERNAL);
789 fw3_parse_mark(void *ptr, const char *val, bool is_list)
793 struct fw3_mark *m = ptr;
798 while (isspace(*++val));
801 if ((s = strchr(val, '/')) != NULL)
804 n = strtoul(val, &e, 0);
810 m->mask = 0xFFFFFFFF;
814 n = strtoul(s, &e, 0);
827 fw3_parse_setmatch(void *ptr, const char *val, bool is_list)
829 struct fw3_setmatch *m = ptr;
836 while (isspace(*++val));
839 if (!(s = strdup(val)))
842 if (!(p = strtok(s, " \t")))
848 strncpy(m->name, p, sizeof(m->name));
850 for (i = 0, p = strtok(NULL, " \t,");
852 i++, p = strtok(NULL, " \t,"))
854 if (!strncmp(p, "dest", 4) || !strncmp(p, "dst", 3))
856 else if (!strncmp(p, "src", 3))
867 fw3_parse_direction(void *ptr, const char *val, bool is_list)
872 if (!strcmp(val, "in") || !strcmp(val, "ingress"))
874 else if (!strcmp(val, "out") || !strcmp(val, "egress"))
884 fw3_parse_options(void *s, const struct fw3_option *opts,
885 struct uci_section *section)
889 struct uci_element *e, *l;
890 struct uci_option *o;
891 const struct fw3_option *opt;
892 struct list_head *dest;
895 uci_foreach_element(§ion->options, e)
897 o = uci_to_option(e);
900 for (opt = opts; opt->name; opt++)
905 if (strcmp(opt->name, e->name))
908 if (o->type == UCI_TYPE_LIST)
912 warn_elem(e, "must not be a list");
917 dest = (struct list_head *)((char *)s + opt->offset);
919 uci_foreach_element(&o->v.list, l)
924 if (!opt->parse(dest, l->name, true))
926 warn_elem(e, "has invalid value '%s'", l->name);
942 if (!opt->parse((char *)s + opt->offset, o->v.string, false))
944 warn_elem(e, "has invalid value '%s'", o->v.string);
950 dest = (struct list_head *)((char *)s + opt->offset);
952 for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
954 if (!opt->parse(dest, p, true))
956 warn_elem(e, "has invalid value '%s'", p);
969 warn_elem(e, "is unknown");
977 fw3_parse_blob_options(void *s, const struct fw3_option *opts,
980 char *p, *v, buf[16];
983 struct blob_attr *o, *e;
984 const struct fw3_option *opt;
985 struct list_head *dest;
988 blobmsg_for_each_attr(o, a, rem)
992 for (opt = opts; opt->name; opt++)
997 if (strcmp(opt->name, blobmsg_name(o)))
1000 if (blobmsg_type(o) == BLOBMSG_TYPE_ARRAY)
1002 if (!opt->elem_size)
1004 fprintf(stderr, "%s must not be a list\n", opt->name);
1009 dest = (struct list_head *)((char *)s + opt->offset);
1011 blobmsg_for_each_attr(e, o, erem)
1013 if (blobmsg_type(e) == BLOBMSG_TYPE_INT32) {
1014 snprintf(buf, sizeof(buf), "%d", blobmsg_get_u32(e));
1017 v = blobmsg_get_string(e);
1020 if (!opt->parse(dest, v, true))
1022 fprintf(stderr, "%s has invalid value '%s'\n", opt->name, v);
1031 if (blobmsg_type(o) == BLOBMSG_TYPE_INT32) {
1032 snprintf(buf, sizeof(buf), "%d", blobmsg_get_u32(o));
1035 v = blobmsg_get_string(o);
1041 if (!opt->elem_size)
1043 if (!opt->parse((char *)s + opt->offset, v, false))
1045 fprintf(stderr, "%s has invalid value '%s'\n", opt->name, v);
1051 dest = (struct list_head *)((char *)s + opt->offset);
1053 for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
1055 if (!opt->parse(dest, p, true))
1057 fprintf(stderr, "%s has invalid value '%s'\n", opt->name, p);
1070 fprintf(stderr, "%s is unknown\n", blobmsg_name(o));
1078 fw3_address_to_string(struct fw3_address *address, bool allow_invert, bool as_cidr)
1080 char *p, ip[INET6_ADDRSTRLEN];
1081 static char buf[INET6_ADDRSTRLEN * 2 + 2];
1085 if (address->invert && allow_invert)
1086 p += sprintf(p, "!");
1088 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1089 &address->address.v4, ip, sizeof(ip));
1091 p += sprintf(p, "%s", ip);
1095 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1096 &address->mask.v4, ip, sizeof(ip));
1098 p += sprintf(p, "-%s", ip);
1102 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1103 &address->mask.v4, ip, sizeof(ip));
1105 p += sprintf(p, "/%s", ip);
1109 p += sprintf(p, "/%u", fw3_netmask2bitlen(address->family,
1110 &address->mask.v6));