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 static const char *limit_units[] = {
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)
145 int n = strtol(val, NULL, 0);
147 if (errno == ERANGE || errno == EINVAL)
156 fw3_parse_string(void *ptr, const char *val, bool is_list)
158 *((char **)ptr) = (char *)val;
163 fw3_parse_target(void *ptr, const char *val, bool is_list)
165 return parse_enum(ptr, val, &fw3_flag_names[FW3_FLAG_ACCEPT],
166 FW3_FLAG_ACCEPT, FW3_FLAG_SNAT);
170 fw3_parse_limit(void *ptr, const char *val, bool is_list)
172 struct fw3_limit *limit = ptr;
173 enum fw3_limit_unit u = FW3_LIMIT_UNIT_SECOND;
179 limit->invert = true;
180 while (isspace(*++val));
183 n = strtol(val, &e, 10);
185 if (errno == ERANGE || errno == EINVAL)
188 if (*e && *e++ != '/')
194 if (!parse_enum(&u, e, limit_units, 0, FW3_LIMIT_UNIT_DAY))
204 fw3_parse_device(void *ptr, const char *val, bool is_list)
206 struct fw3_device dev = { };
212 put_value(ptr, &dev, sizeof(dev), is_list);
219 while (isspace(*++val));
223 snprintf(dev.name, sizeof(dev.name), "%s", val);
228 put_value(ptr, &dev, sizeof(dev), is_list);
233 fw3_parse_address(void *ptr, const char *val, bool is_list)
235 struct fw3_address addr = { };
244 while (isspace(*++val));
252 if ((p = strchr(s, '/')) != NULL)
255 m = strtoul(p, &e, 10);
257 if ((e == p) || (*e != 0))
259 if (strchr(s, ':') || !inet_pton(AF_INET, p, &v4))
265 for (i = 0, m = 32; !(v4.s_addr & 1) && (i < 32); i++)
272 else if ((p = strchr(s, '-')) != NULL)
276 if (inet_pton(AF_INET6, p, &v6))
278 addr.family = FW3_FAMILY_V6;
279 addr.address2.v6 = v6;
282 else if (inet_pton(AF_INET, p, &v4))
284 addr.family = FW3_FAMILY_V4;
285 addr.address2.v4 = v4;
295 if (inet_pton(AF_INET6, s, &v6))
297 addr.family = FW3_FAMILY_V6;
298 addr.address.v6 = v6;
299 addr.mask = (m >= 0) ? m : 128;
301 else if (inet_pton(AF_INET, s, &v4))
303 addr.family = FW3_FAMILY_V4;
304 addr.address.v4 = v4;
305 addr.mask = (m >= 0) ? m : 32;
315 put_value(ptr, &addr, sizeof(addr), is_list);
320 fw3_parse_network(void *ptr, const char *val, bool is_list)
322 struct fw3_device dev = { };
323 struct fw3_address *addr;
324 struct list_head *addr_list;
326 if (!fw3_parse_address(ptr, val, is_list))
328 if (!fw3_parse_device(&dev, val, false))
331 addr_list = fw3_ubus_address(dev.name);
335 list_for_each_entry(addr, addr_list, list)
337 addr->invert = dev.invert;
339 if (!put_value(ptr, addr, sizeof(*addr), is_list))
343 fw3_ubus_address_free(addr_list);
351 fw3_parse_mac(void *ptr, const char *val, bool is_list)
353 struct fw3_mac addr = { };
354 struct ether_addr *mac;
359 while (isspace(*++val));
362 if ((mac = ether_aton(val)) != NULL)
367 put_value(ptr, &addr, sizeof(addr), is_list);
375 fw3_parse_port(void *ptr, const char *val, bool is_list)
377 struct fw3_port range = { };
385 while (isspace(*++val));
388 n = strtoul(val, &p, 10);
390 if (errno == ERANGE || errno == EINVAL)
393 if (*p && *p != '-' && *p != ':')
398 m = strtoul(++p, NULL, 10);
400 if (errno == ERANGE || errno == EINVAL || m < n)
413 put_value(ptr, &range, sizeof(range), is_list);
418 fw3_parse_family(void *ptr, const char *val, bool is_list)
420 if (!strcmp(val, "any"))
421 *((enum fw3_family *)ptr) = FW3_FAMILY_ANY;
422 else if (!strcmp(val, "inet") || strrchr(val, '4'))
423 *((enum fw3_family *)ptr) = FW3_FAMILY_V4;
424 else if (!strcmp(val, "inet6") || strrchr(val, '6'))
425 *((enum fw3_family *)ptr) = FW3_FAMILY_V6;
433 fw3_parse_icmptype(void *ptr, const char *val, bool is_list)
435 struct fw3_icmptype icmp = { };
441 for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v4); i++)
443 if (!strcmp(val, fw3_icmptype_list_v4[i].name))
445 icmp.type = fw3_icmptype_list_v4[i].type;
446 icmp.code_min = fw3_icmptype_list_v4[i].code_min;
447 icmp.code_max = fw3_icmptype_list_v4[i].code_max;
454 for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v6); i++)
456 if (!strcmp(val, fw3_icmptype_list_v6[i].name))
458 icmp.type6 = fw3_icmptype_list_v6[i].type;
459 icmp.code6_min = fw3_icmptype_list_v6[i].code_min;
460 icmp.code6_max = fw3_icmptype_list_v6[i].code_max;
469 i = strtoul(val, &p, 10);
471 if ((p == val) || (*p != '/' && *p != 0) || (i > 0xFF))
479 i = strtoul(val, &p, 10);
481 if ((p == val) || (*p != 0) || (i > 0xFF))
490 icmp.code_max = 0xFF;
493 icmp.type6 = icmp.type;
494 icmp.code6_min = icmp.code_max;
495 icmp.code6_max = icmp.code_max;
501 icmp.family = (v4 && v6) ? FW3_FAMILY_ANY
502 : (v6 ? FW3_FAMILY_V6 : FW3_FAMILY_V4);
504 put_value(ptr, &icmp, sizeof(icmp), is_list);
509 fw3_parse_protocol(void *ptr, const char *val, bool is_list)
511 struct fw3_protocol proto = { };
512 struct protoent *ent;
517 while (isspace(*++val));
520 if (!strcmp(val, "all"))
523 put_value(ptr, &proto, sizeof(proto), is_list);
526 else if (!strcmp(val, "icmpv6"))
530 else if (!strcmp(val, "tcpudp"))
533 if (put_value(ptr, &proto, sizeof(proto), is_list))
536 put_value(ptr, &proto, sizeof(proto), is_list);
542 ent = getprotobyname(val);
546 proto.protocol = ent->p_proto;
547 put_value(ptr, &proto, sizeof(proto), is_list);
551 proto.protocol = strtoul(val, NULL, 10);
553 if (errno == ERANGE || errno == EINVAL)
556 put_value(ptr, &proto, sizeof(proto), is_list);
561 fw3_parse_ipset_method(void *ptr, const char *val, bool is_list)
563 return parse_enum(ptr, val, &fw3_ipset_method_names[FW3_IPSET_METHOD_BITMAP],
564 FW3_IPSET_METHOD_BITMAP, FW3_IPSET_METHOD_LIST);
568 fw3_parse_ipset_datatype(void *ptr, const char *val, bool is_list)
570 struct fw3_ipset_datatype type = { };
572 if (!strncmp(val, "dest_", 5))
577 else if (!strncmp(val, "dst_", 4))
582 else if (!strncmp(val, "src_", 4))
588 if (parse_enum(&type.type, val, &fw3_ipset_type_names[FW3_IPSET_TYPE_IP],
589 FW3_IPSET_TYPE_IP, FW3_IPSET_TYPE_SET))
591 put_value(ptr, &type, sizeof(type), is_list);
599 fw3_parse_date(void *ptr, const char *val, bool is_list)
601 unsigned int year = 1970, mon = 1, day = 1, hour = 0, min = 0, sec = 0;
602 struct tm tm = { 0 };
605 year = strtoul(val, &p, 10);
606 if ((*p != '-' && *p) || year < 1970 || year > 2038)
611 mon = strtoul(++p, &p, 10);
612 if ((*p != '-' && *p) || mon > 12)
617 day = strtoul(++p, &p, 10);
618 if ((*p != 'T' && *p) || day > 31)
623 hour = strtoul(++p, &p, 10);
624 if ((*p != ':' && *p) || hour > 23)
629 min = strtoul(++p, &p, 10);
630 if ((*p != ':' && *p) || min > 59)
635 sec = strtoul(++p, &p, 10);
640 tm.tm_year = year - 1900;
647 if (mktime(&tm) >= 0)
649 *((struct tm *)ptr) = tm;
658 fw3_parse_time(void *ptr, const char *val, bool is_list)
660 unsigned int hour = 0, min = 0, sec = 0;
663 hour = strtoul(val, &p, 10);
664 if (*p != ':' || hour > 23)
667 min = strtoul(++p, &p, 10);
668 if ((*p != ':' && *p) || min > 59)
673 sec = strtoul(++p, &p, 10);
678 *((int *)ptr) = 60 * 60 * hour + 60 * min + sec;
686 fw3_parse_weekdays(void *ptr, const char *val, bool is_list)
693 setbit(*(uint8_t *)ptr, 0);
694 while (isspace(*++val));
697 if (!(s = strdup(val)))
700 for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
702 if (!parse_enum(&w, p, weekdays, 1, 7))
704 w = strtoul(p, &p, 10);
706 if (*p || w < 1 || w > 7)
713 setbit(*(uint8_t *)ptr, w);
721 fw3_parse_monthdays(void *ptr, const char *val, bool is_list)
728 setbit(*(uint32_t *)ptr, 0);
729 while (isspace(*++val));
732 if (!(s = strdup(val)))
735 for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
737 d = strtoul(p, &p, 10);
739 if (*p || d < 1 || d > 31)
745 setbit(*(uint32_t *)ptr, d);
753 fw3_parse_include_type(void *ptr, const char *val, bool is_list)
755 return parse_enum(ptr, val, include_types,
756 FW3_INC_TYPE_SCRIPT, FW3_INC_TYPE_RESTORE);
760 fw3_parse_reflection_source(void *ptr, const char *val, bool is_list)
762 return parse_enum(ptr, val, reflection_sources,
763 FW3_REFLECTION_INTERNAL, FW3_REFLECTION_EXTERNAL);
767 fw3_parse_mark(void *ptr, const char *val, bool is_list)
771 struct fw3_mark *m = ptr;
776 while (isspace(*++val));
779 if ((s = strchr(val, '/')) != NULL)
782 n = strtoul(val, &e, 0);
788 m->mask = 0xFFFFFFFF;
792 n = strtoul(s, &e, 0);
806 fw3_parse_options(void *s, const struct fw3_option *opts,
807 struct uci_section *section)
811 struct uci_element *e, *l;
812 struct uci_option *o;
813 const struct fw3_option *opt;
814 struct list_head *dest;
816 uci_foreach_element(§ion->options, e)
818 o = uci_to_option(e);
821 for (opt = opts; opt->name; opt++)
826 if (strcmp(opt->name, e->name))
829 if (o->type == UCI_TYPE_LIST)
833 warn_elem(e, "must not be a list");
837 dest = (struct list_head *)((char *)s + opt->offset);
839 uci_foreach_element(&o->v.list, l)
844 if (!opt->parse(dest, l->name, true))
846 warn_elem(e, "has invalid value '%s'", l->name);
861 if (!opt->parse((char *)s + opt->offset, o->v.string, false))
862 warn_elem(e, "has invalid value '%s'", o->v.string);
866 dest = (struct list_head *)((char *)s + opt->offset);
868 for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
870 if (!opt->parse(dest, p, true))
872 warn_elem(e, "has invalid value '%s'", p);
884 warn_elem(e, "is unknown");
890 fw3_format_in_out(struct fw3_device *in, struct fw3_device *out)
893 fw3_pr(" %s-i %s", in->invert ? "! " : "", in->name);
895 if (out && !out->any)
896 fw3_pr(" %s-o %s", out->invert ? "! " : "", out->name);
900 fw3_address_to_string(struct fw3_address *address, bool allow_invert)
902 char *p, ip[INET6_ADDRSTRLEN];
903 static char buf[INET6_ADDRSTRLEN * 2 + 2];
907 if (address->invert && allow_invert)
908 p += sprintf(p, "!");
910 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
911 &address->address.v4, ip, sizeof(ip));
913 p += sprintf(p, "%s", ip);
917 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
918 &address->address2.v4, ip, sizeof(ip));
920 p += sprintf(p, "-%s", ip);
924 p += sprintf(p, "/%u", address->mask);
931 fw3_format_src_dest(struct fw3_address *src, struct fw3_address *dest)
933 if ((src && src->range) || (dest && dest->range))
934 fw3_pr(" -m iprange");
938 fw3_pr(" %s%s %s", src->invert ? "! " : "",
939 src->range ? "--src-range" : "-s",
940 fw3_address_to_string(src, false));
943 if (dest && dest->set)
945 fw3_pr(" %s%s %s", dest->invert ? "! " : "",
946 dest->range ? "--dst-range" : "-d",
947 fw3_address_to_string(dest, false));
952 fw3_format_sport_dport(struct fw3_port *sp, struct fw3_port *dp)
956 if (sp->port_min == sp->port_max)
957 fw3_pr(" %s--sport %u", sp->invert ? "! " : "", sp->port_min);
959 fw3_pr(" %s--sport %u:%u",
960 sp->invert ? "! " : "", sp->port_min, sp->port_max);
965 if (dp->port_min == dp->port_max)
966 fw3_pr(" %s--dport %u", dp->invert ? "! " : "", dp->port_min);
968 fw3_pr(" %s--dport %u:%u",
969 dp->invert ? "! " : "", dp->port_min, dp->port_max);
974 fw3_format_mac(struct fw3_mac *mac)
979 fw3_pr(" -m mac %s--mac-source %s",
980 mac->invert ? "! " : "", ether_ntoa(&mac->mac));
984 fw3_format_protocol(struct fw3_protocol *proto, enum fw3_family family)
991 pr = proto->protocol;
993 if (pr == 1 && family == FW3_FAMILY_V6)
999 fw3_pr(" %s-p %u", proto->invert ? "! " : "", pr);
1003 fw3_format_icmptype(struct fw3_icmptype *icmp, enum fw3_family family)
1008 if (family != FW3_FAMILY_V6)
1010 if (icmp->code_min == 0 && icmp->code_max == 0xFF)
1011 fw3_pr(" %s--icmp-type %u", icmp->invert ? "! " : "", icmp->type);
1013 fw3_pr(" %s--icmp-type %u/%u",
1014 icmp->invert ? "! " : "", icmp->type, icmp->code_min);
1018 if (icmp->code6_min == 0 && icmp->code6_max == 0xFF)
1019 fw3_pr(" %s--icmpv6-type %u", icmp->invert ? "! " : "", icmp->type6);
1021 fw3_pr(" %s--icmpv6-type %u/%u",
1022 icmp->invert ? "! " : "", icmp->type6, icmp->code6_min);
1027 fw3_format_limit(struct fw3_limit *limit)
1032 if (limit->rate > 0)
1034 fw3_pr(" -m limit %s--limit %u/%s",
1035 limit->invert ? "! " : "",
1036 limit->rate, limit_units[limit->unit]);
1038 if (limit->burst > 0)
1039 fw3_pr(" --limit-burst %u", limit->burst);
1044 fw3_format_ipset(struct fw3_ipset *ipset, bool invert)
1047 const char *name = NULL;
1048 struct fw3_ipset_datatype *type;
1053 if (ipset->external && *ipset->external)
1054 name = ipset->external;
1058 fw3_pr(" -m set %s--match-set %s", invert ? "! " : "", name);
1060 list_for_each_entry(type, &ipset->datatypes, list)
1062 fw3_pr("%c%s", first ? ' ' : ',', type->dest ? "dst" : "src");
1068 fw3_format_time(struct fw3_time *time)
1071 struct tm empty = { 0 };
1072 char buf[sizeof("9999-99-99T23:59:59\0")];
1073 bool d1 = memcmp(&time->datestart, &empty, sizeof(empty));
1074 bool d2 = memcmp(&time->datestop, &empty, sizeof(empty));
1077 if (!d1 && !d2 && !time->timestart && !time->timestop &&
1078 !(time->monthdays & 0xFFFFFFFE) && !(time->weekdays & 0xFE))
1090 strftime(buf, sizeof(buf), "%Y-%m-%dT%H:%M:%S", &time->datestart);
1091 fw3_pr(" --datestart %s", buf);
1096 strftime(buf, sizeof(buf), "%Y-%m-%dT%H:%M:%S", &time->datestop);
1097 fw3_pr(" --datestop %s", buf);
1100 if (time->timestart)
1102 fw3_pr(" --timestart %02d:%02d:%02d",
1103 time->timestart / 3600,
1104 time->timestart % 3600 / 60,
1105 time->timestart % 60);
1110 fw3_pr(" --timestop %02d:%02d:%02d",
1111 time->timestop / 3600,
1112 time->timestop % 3600 / 60,
1113 time->timestop % 60);
1116 if (time->monthdays & 0xFFFFFFFE)
1118 fw3_pr(" %s--monthdays", hasbit(time->monthdays, 0) ? "! " : "");
1120 for (i = 1, first = true; i < 32; i++)
1122 if (hasbit(time->monthdays, i))
1124 fw3_pr("%c%u", first ? ' ' : ',', i);
1130 if (time->weekdays & 0xFE)
1132 fw3_pr(" %s--weekdays", hasbit(time->weekdays, 0) ? "! " : "");
1134 for (i = 1, first = true; i < 8; i++)
1136 if (hasbit(time->weekdays, i))
1138 fw3_pr("%c%u", first ? ' ' : ',', i);
1146 fw3_format_mark(struct fw3_mark *mark)
1151 fw3_pr(" -m mark %s--mark 0x%x", mark->invert ? "! " : "", mark->mark);
1153 if (mark->mask < 0xFFFFFFFF)
1154 fw3_pr("/0x%x", mark->mask);
1158 __fw3_format_comment(const char *comment, ...)
1164 if (!comment || !*comment)
1167 fw3_pr(" -m comment --comment \"");
1171 va_start(ap, comment);
1197 c = va_arg(ap, const char *);
1207 fw3_format_extra(const char *extra)
1209 if (!extra || !*extra)
1212 fw3_pr(" %s", extra);