2 * firewall3 - 3rd OpenWrt UCI firewall implementation
4 * Copyright (C) 2013-2014 Jo-Philipp Wich <jo@mein.io>
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
] = {
90 const char *fw3_reject_code_names
[__FW3_REJECT_CODE_MAX
] = {
96 const char *fw3_limit_units
[__FW3_LIMIT_UNIT_MAX
] = {
103 const char *fw3_ipset_method_names
[__FW3_IPSET_METHOD_MAX
] = {
110 const char *fw3_ipset_type_names
[__FW3_IPSET_TYPE_MAX
] = {
119 static const char *weekdays
[] = {
129 static const char *include_types
[] = {
134 static const char *reflection_sources
[] = {
139 static const struct { const char *name
; uint8_t dscp
; } dscp_classes
[] = {
167 fw3_parse_bool(void *ptr
, const char *val
, bool is_list
)
169 if (!strcmp(val
, "true") || !strcmp(val
, "yes") || !strcmp(val
, "1"))
170 *((bool *)ptr
) = true;
172 *((bool *)ptr
) = false;
178 fw3_parse_int(void *ptr
, const char *val
, bool is_list
)
181 int n
= strtol(val
, &e
, 0);
192 fw3_parse_string(void *ptr
, const char *val
, bool is_list
)
194 *((char **)ptr
) = (char *)val
;
199 fw3_parse_target(void *ptr
, const char *val
, bool is_list
)
201 return parse_enum(ptr
, val
, &fw3_flag_names
[FW3_FLAG_ACCEPT
],
202 FW3_FLAG_ACCEPT
, FW3_FLAG_MASQUERADE
);
206 fw3_parse_reject_code(void *ptr
, const char *val
, bool is_list
)
208 return parse_enum(ptr
, val
, &fw3_reject_code_names
[FW3_REJECT_CODE_TCP_RESET
],
209 FW3_REJECT_CODE_TCP_RESET
, FW3_REJECT_CODE_ADM_PROHIBITED
);
213 fw3_parse_limit(void *ptr
, const char *val
, bool is_list
)
215 struct fw3_limit
*limit
= ptr
;
216 enum fw3_limit_unit u
= FW3_LIMIT_UNIT_SECOND
;
222 limit
->invert
= true;
223 while (isspace(*++val
));
226 n
= strtol(val
, &e
, 10);
228 if (errno
== ERANGE
|| errno
== EINVAL
)
231 if (*e
&& *e
++ != '/')
237 if (!parse_enum(&u
, e
, fw3_limit_units
, 0, FW3_LIMIT_UNIT_DAY
))
247 fw3_parse_device(void *ptr
, const char *val
, bool is_list
)
250 struct fw3_device dev
= { };
256 put_value(ptr
, &dev
, sizeof(dev
), is_list
);
263 while (isspace(*++val
));
266 if ((p
= strchr(val
, '@')) != NULL
)
269 snprintf(dev
.network
, sizeof(dev
.network
), "%s", p
);
273 snprintf(dev
.name
, sizeof(dev
.name
), "%s", val
);
278 put_value(ptr
, &dev
, sizeof(dev
), is_list
);
283 fw3_parse_address(void *ptr
, const char *val
, bool is_list
)
285 struct fw3_address addr
= { };
288 char *p
= NULL
, *m
= NULL
, *s
, *e
;
294 while (isspace(*++val
));
302 if ((m
= strchr(s
, '/')) != NULL
)
304 else if ((p
= strchr(s
, '-')) != NULL
)
307 if (inet_pton(AF_INET6
, s
, &v6
))
309 addr
.family
= FW3_FAMILY_V6
;
310 addr
.address
.v6
= v6
;
314 if (!inet_pton(AF_INET6
, m
, &v6
))
316 bits
= strtol(m
, &e
, 10);
318 if ((*e
!= 0) || !fw3_bitlen2netmask(addr
.family
, bits
, &v6
))
326 if (!inet_pton(AF_INET6
, p
, &addr
.mask
.v6
))
333 memset(addr
.mask
.v6
.s6_addr
, 0xFF, 16);
336 else if (inet_pton(AF_INET
, s
, &v4
))
338 addr
.family
= FW3_FAMILY_V4
;
339 addr
.address
.v4
= v4
;
343 if (!inet_pton(AF_INET
, m
, &v4
))
345 bits
= strtol(m
, &e
, 10);
347 if ((*e
!= 0) || !fw3_bitlen2netmask(addr
.family
, bits
, &v4
))
355 if (!inet_pton(AF_INET
, p
, &addr
.mask
.v4
))
362 addr
.mask
.v4
.s_addr
= 0xFFFFFFFF;
372 put_value(ptr
, &addr
, sizeof(addr
), is_list
);
381 fw3_parse_network(void *ptr
, const char *val
, bool is_list
)
383 struct fw3_device dev
= { };
384 struct fw3_address
*addr
, *tmp
;
385 LIST_HEAD(addr_list
);
388 if (!fw3_parse_address(ptr
, val
, is_list
))
390 if (!fw3_parse_device(&dev
, val
, false))
393 n_addrs
= fw3_ubus_address(&addr_list
, dev
.name
);
395 list_for_each_entry(addr
, &addr_list
, list
)
397 addr
->invert
= dev
.invert
;
398 addr
->resolved
= true;
401 /* add an empty address member with .set = false, .resolved = true
402 * to signal resolving failure to callers */
405 tmp
= fw3_alloc(sizeof(*tmp
));
406 tmp
->resolved
= true;
408 list_add_tail(&tmp
->list
, &addr_list
);
413 list_splice_tail(&addr_list
, ptr
);
415 else if (!list_empty(&addr_list
))
417 memcpy(ptr
, list_first_entry(&addr_list
, typeof(*addr
), list
),
420 list_for_each_entry_safe(addr
, tmp
, &addr_list
, list
)
429 fw3_parse_mac(void *ptr
, const char *val
, bool is_list
)
431 struct fw3_mac addr
= { };
432 struct ether_addr
*mac
;
437 while (isspace(*++val
));
440 if ((mac
= ether_aton(val
)) != NULL
)
445 put_value(ptr
, &addr
, sizeof(addr
), is_list
);
453 fw3_parse_port(void *ptr
, const char *val
, bool is_list
)
455 struct fw3_port range
= { };
463 while (isspace(*++val
));
466 n
= strtoul(val
, &p
, 10);
468 if (errno
== ERANGE
|| errno
== EINVAL
)
471 if (*p
&& *p
!= '-' && *p
!= ':')
476 m
= strtoul(++p
, NULL
, 10);
478 if (errno
== ERANGE
|| errno
== EINVAL
|| m
< n
)
491 put_value(ptr
, &range
, sizeof(range
), is_list
);
496 fw3_parse_family(void *ptr
, const char *val
, bool is_list
)
498 if (!strcmp(val
, "any") || !strcmp(val
, "*"))
499 *((enum fw3_family
*)ptr
) = FW3_FAMILY_ANY
;
500 else if (!strcmp(val
, "inet") || strrchr(val
, '4'))
501 *((enum fw3_family
*)ptr
) = FW3_FAMILY_V4
;
502 else if (!strcmp(val
, "inet6") || strrchr(val
, '6'))
503 *((enum fw3_family
*)ptr
) = FW3_FAMILY_V6
;
511 fw3_parse_icmptype(void *ptr
, const char *val
, bool is_list
)
513 struct fw3_icmptype icmp
= { };
519 for (i
= 0; i
< ARRAY_SIZE(fw3_icmptype_list_v4
); i
++)
521 if (!strcmp(val
, fw3_icmptype_list_v4
[i
].name
))
523 icmp
.type
= fw3_icmptype_list_v4
[i
].type
;
524 icmp
.code_min
= fw3_icmptype_list_v4
[i
].code_min
;
525 icmp
.code_max
= fw3_icmptype_list_v4
[i
].code_max
;
532 for (i
= 0; i
< ARRAY_SIZE(fw3_icmptype_list_v6
); i
++)
534 if (!strcmp(val
, fw3_icmptype_list_v6
[i
].name
))
536 icmp
.type6
= fw3_icmptype_list_v6
[i
].type
;
537 icmp
.code6_min
= fw3_icmptype_list_v6
[i
].code_min
;
538 icmp
.code6_max
= fw3_icmptype_list_v6
[i
].code_max
;
547 i
= strtoul(val
, &p
, 10);
549 if ((p
== val
) || (*p
!= '/' && *p
!= 0) || (i
> 0xFF))
557 i
= strtoul(val
, &p
, 10);
559 if ((p
== val
) || (*p
!= 0) || (i
> 0xFF))
568 icmp
.code_max
= 0xFF;
571 icmp
.type6
= icmp
.type
;
572 icmp
.code6_min
= icmp
.code_min
;
573 icmp
.code6_max
= icmp
.code_max
;
579 icmp
.family
= (v4
&& v6
) ? FW3_FAMILY_ANY
580 : (v6
? FW3_FAMILY_V6
: FW3_FAMILY_V4
);
582 put_value(ptr
, &icmp
, sizeof(icmp
), is_list
);
587 fw3_parse_protocol(void *ptr
, const char *val
, bool is_list
)
589 struct fw3_protocol proto
= { };
590 struct protoent
*ent
;
596 while (isspace(*++val
));
599 if (!strcmp(val
, "all") || !strcmp(val
, "any") || !strcmp(val
, "*"))
602 put_value(ptr
, &proto
, sizeof(proto
), is_list
);
605 else if (!strcmp(val
, "icmpv6"))
609 else if (!strcmp(val
, "tcpudp"))
612 if (put_value(ptr
, &proto
, sizeof(proto
), is_list
))
615 put_value(ptr
, &proto
, sizeof(proto
), is_list
);
621 ent
= getprotobyname(val
);
625 proto
.protocol
= ent
->p_proto
;
626 put_value(ptr
, &proto
, sizeof(proto
), is_list
);
630 proto
.protocol
= strtoul(val
, &e
, 10);
632 if ((e
== val
) || (*e
!= 0))
635 put_value(ptr
, &proto
, sizeof(proto
), is_list
);
640 fw3_parse_ipset_method(void *ptr
, const char *val
, bool is_list
)
642 return parse_enum(ptr
, val
, &fw3_ipset_method_names
[FW3_IPSET_METHOD_BITMAP
],
643 FW3_IPSET_METHOD_BITMAP
, FW3_IPSET_METHOD_LIST
);
647 fw3_parse_ipset_datatype(void *ptr
, const char *val
, bool is_list
)
649 struct fw3_ipset_datatype type
= { };
653 if (!strncmp(val
, "dest_", 5))
658 else if (!strncmp(val
, "dst_", 4))
663 else if (!strncmp(val
, "src_", 4))
669 if (parse_enum(&type
.type
, val
, &fw3_ipset_type_names
[FW3_IPSET_TYPE_IP
],
670 FW3_IPSET_TYPE_IP
, FW3_IPSET_TYPE_SET
))
672 put_value(ptr
, &type
, sizeof(type
), is_list
);
680 fw3_parse_date(void *ptr
, const char *val
, bool is_list
)
682 unsigned int year
= 1970, mon
= 1, day
= 1, hour
= 0, min
= 0, sec
= 0;
683 struct tm tm
= { 0 };
687 year
= strtoul(val
, &p
, 10);
688 if ((*p
!= '-' && *p
) || year
< 1970 || year
> 2038)
693 mon
= strtoul(++p
, &p
, 10);
694 if ((*p
!= '-' && *p
) || mon
> 12)
699 day
= strtoul(++p
, &p
, 10);
700 if ((*p
!= 'T' && *p
) || day
> 31)
705 hour
= strtoul(++p
, &p
, 10);
706 if ((*p
!= ':' && *p
) || hour
> 23)
711 min
= strtoul(++p
, &p
, 10);
712 if ((*p
!= ':' && *p
) || min
> 59)
717 sec
= strtoul(++p
, &p
, 10);
722 tm
.tm_year
= year
- 1900;
729 ts
= mktime(&tm
) - timezone
;
733 gmtime_r(&ts
, (struct tm
*)ptr
);
742 fw3_parse_time(void *ptr
, const char *val
, bool is_list
)
744 unsigned int hour
= 0, min
= 0, sec
= 0;
747 hour
= strtoul(val
, &p
, 10);
748 if (*p
!= ':' || hour
> 23)
751 min
= strtoul(++p
, &p
, 10);
752 if ((*p
!= ':' && *p
) || min
> 59)
757 sec
= strtoul(++p
, &p
, 10);
762 *((int *)ptr
) = 60 * 60 * hour
+ 60 * min
+ sec
;
770 fw3_parse_weekdays(void *ptr
, const char *val
, bool is_list
)
777 fw3_setbit(*(uint8_t *)ptr
, 0);
778 while (isspace(*++val
));
781 if (!(s
= strdup(val
)))
784 for (p
= strtok(s
, " \t"); p
; p
= strtok(NULL
, " \t"))
786 if (!parse_enum(&w
, p
, weekdays
, 1, 7))
788 w
= strtoul(p
, &p
, 10);
790 if (*p
|| w
< 1 || w
> 7)
797 fw3_setbit(*(uint8_t *)ptr
, w
);
805 fw3_parse_monthdays(void *ptr
, const char *val
, bool is_list
)
812 fw3_setbit(*(uint32_t *)ptr
, 0);
813 while (isspace(*++val
));
816 if (!(s
= strdup(val
)))
819 for (p
= strtok(s
, " \t"); p
; p
= strtok(NULL
, " \t"))
821 d
= strtoul(p
, &p
, 10);
823 if (*p
|| d
< 1 || d
> 31)
829 fw3_setbit(*(uint32_t *)ptr
, d
);
837 fw3_parse_include_type(void *ptr
, const char *val
, bool is_list
)
839 return parse_enum(ptr
, val
, include_types
,
840 FW3_INC_TYPE_SCRIPT
, FW3_INC_TYPE_RESTORE
);
844 fw3_parse_reflection_source(void *ptr
, const char *val
, bool is_list
)
846 return parse_enum(ptr
, val
, reflection_sources
,
847 FW3_REFLECTION_INTERNAL
, FW3_REFLECTION_EXTERNAL
);
851 fw3_parse_mark(void *ptr
, const char *val
, bool is_list
)
855 struct fw3_mark
*m
= ptr
;
860 while (isspace(*++val
));
863 if ((s
= strchr(val
, '/')) != NULL
)
866 n
= strtoul(val
, &e
, 0);
872 m
->mask
= 0xFFFFFFFF;
876 n
= strtoul(s
, &e
, 0);
889 fw3_parse_dscp(void *ptr
, const char *val
, bool is_list
)
893 struct fw3_dscp
*d
= ptr
;
898 while (isspace(*++val
));
901 for (n
= 0; n
< sizeof(dscp_classes
) / sizeof(dscp_classes
[0]); n
++)
903 if (strcmp(dscp_classes
[n
].name
, val
))
907 d
->dscp
= dscp_classes
[n
].dscp
;
911 n
= strtoul(val
, &e
, 0);
913 if (e
== val
|| *e
|| n
> 0x3F)
922 fw3_parse_setmatch(void *ptr
, const char *val
, bool is_list
)
924 struct fw3_setmatch
*m
= ptr
;
931 while (isspace(*++val
));
934 if (!(s
= strdup(val
)))
937 if (!(p
= strtok(s
, " \t")))
943 snprintf(m
->name
, sizeof(m
->name
), "%s", p
);
945 for (i
= 0, p
= strtok(NULL
, " \t,");
947 i
++, p
= strtok(NULL
, " \t,"))
949 if (!strncmp(p
, "dest", 4) || !strncmp(p
, "dst", 3))
951 else if (!strncmp(p
, "src", 3))
962 fw3_parse_direction(void *ptr
, const char *val
, bool is_list
)
967 if (!strcmp(val
, "in") || !strcmp(val
, "ingress"))
969 else if (!strcmp(val
, "out") || !strcmp(val
, "egress"))
978 fw3_parse_cthelper(void *ptr
, const char *val
, bool is_list
)
980 struct fw3_cthelpermatch m
= { };
985 while (isspace(*++val
));
991 snprintf(m
.name
, sizeof(m
.name
), "%s", val
);
992 put_value(ptr
, &m
, sizeof(m
), is_list
);
1000 fw3_parse_setentry(void *ptr
, const char *val
, bool is_list
)
1002 struct fw3_setentry e
= { };
1005 put_value(ptr
, &e
, sizeof(e
), is_list
);
1012 fw3_parse_options(void *s
, const struct fw3_option
*opts
,
1013 struct uci_section
*section
)
1017 struct uci_element
*e
, *l
;
1018 struct uci_option
*o
;
1019 const struct fw3_option
*opt
;
1020 struct list_head
*dest
;
1023 uci_foreach_element(§ion
->options
, e
)
1025 o
= uci_to_option(e
);
1028 for (opt
= opts
; opt
->name
; opt
++)
1033 if (strcmp(opt
->name
, e
->name
))
1036 if (o
->type
== UCI_TYPE_LIST
)
1038 if (!opt
->elem_size
)
1040 warn_elem(e
, "must not be a list");
1045 dest
= (struct list_head
*)((char *)s
+ opt
->offset
);
1047 uci_foreach_element(&o
->v
.list
, l
)
1052 if (!opt
->parse(dest
, l
->name
, true))
1054 warn_elem(e
, "has invalid value '%s'", l
->name
);
1068 if (!opt
->elem_size
)
1070 if (!opt
->parse((char *)s
+ opt
->offset
, o
->v
.string
, false))
1072 warn_elem(e
, "has invalid value '%s'", o
->v
.string
);
1079 dest
= (struct list_head
*)((char *)s
+ opt
->offset
);
1081 for (p
= strtok(v
, " \t"); p
!= NULL
; p
= strtok(NULL
, " \t"))
1083 /* If we encounter a sole "!" token, assume that it
1084 * is meant to be part of the next token, so silently
1085 * skip it and remember the state... */
1086 if (!strcmp(p
, "!"))
1092 /* The previous token was a sole "!", rewind pointer
1093 * back by one byte to precede the value with an
1094 * exclamation mark which effectively turns
1095 * ("!", "foo") into ("!foo") */
1102 if (!opt
->parse(dest
, p
, true))
1104 warn_elem(e
, "has invalid value '%s'", p
);
1110 /* The last token was a sole "!" without any subsequent
1111 * text, so pass it to the option parser as-is. */
1112 if (inv
&& !opt
->parse(dest
, "!", true))
1114 warn_elem(e
, "has invalid value '%s'", p
);
1125 warn_elem(e
, "is unknown");
1133 fw3_parse_blob_options(void *s
, const struct fw3_option
*opts
,
1134 struct blob_attr
*a
, const char *name
)
1136 char *p
, *v
, buf
[16];
1139 struct blob_attr
*o
, *e
;
1140 const struct fw3_option
*opt
;
1141 struct list_head
*dest
;
1144 blobmsg_for_each_attr(o
, a
, rem
)
1148 for (opt
= opts
; opt
->name
; opt
++)
1153 if (strcmp(opt
->name
, blobmsg_name(o
)))
1156 if (blobmsg_type(o
) == BLOBMSG_TYPE_ARRAY
)
1158 if (!opt
->elem_size
)
1160 fprintf(stderr
, "%s: '%s' must not be a list\n",
1167 dest
= (struct list_head
*)((char *)s
+ opt
->offset
);
1169 blobmsg_for_each_attr(e
, o
, erem
)
1171 if (blobmsg_type(e
) == BLOBMSG_TYPE_INT32
) {
1172 snprintf(buf
, sizeof(buf
), "%d", blobmsg_get_u32(e
));
1174 } else if (blobmsg_type(o
) == BLOBMSG_TYPE_BOOL
) {
1175 snprintf(buf
, sizeof(buf
), "%d", blobmsg_get_bool(o
));
1178 v
= blobmsg_get_string(e
);
1181 if (!opt
->parse(dest
, v
, true))
1183 fprintf(stderr
, "%s: '%s' has invalid value '%s'\n",
1184 name
, opt
->name
, v
);
1193 if (blobmsg_type(o
) == BLOBMSG_TYPE_INT32
) {
1194 snprintf(buf
, sizeof(buf
), "%d", blobmsg_get_u32(o
));
1196 } else if (blobmsg_type(o
) == BLOBMSG_TYPE_BOOL
) {
1197 snprintf(buf
, sizeof(buf
), "%d", blobmsg_get_bool(o
));
1200 v
= blobmsg_get_string(o
);
1206 if (!opt
->elem_size
)
1208 if (!opt
->parse((char *)s
+ opt
->offset
, v
, false))
1210 fprintf(stderr
, "%s: '%s' has invalid value '%s'\n",
1211 name
, opt
->name
, v
);
1217 dest
= (struct list_head
*)((char *)s
+ opt
->offset
);
1219 for (p
= strtok(v
, " \t"); p
!= NULL
; p
= strtok(NULL
, " \t"))
1221 if (!opt
->parse(dest
, p
, true))
1223 fprintf(stderr
, "%s: '%s' has invalid value '%s'\n",
1224 name
, opt
->name
, p
);
1236 if (!known
&& strcmp(blobmsg_name(o
), "type"))
1237 fprintf(stderr
, "%s: '%s' is unknown\n", name
, blobmsg_name(o
));
1245 fw3_address_to_string(struct fw3_address
*address
, bool allow_invert
, bool as_cidr
)
1247 char *p
, ip
[INET6_ADDRSTRLEN
];
1248 static char buf
[INET6_ADDRSTRLEN
* 2 + 2];
1249 size_t rem
= sizeof(buf
);
1254 if (address
->invert
&& allow_invert
) {
1260 inet_ntop(address
->family
== FW3_FAMILY_V4
? AF_INET
: AF_INET6
,
1261 &address
->address
.v4
, ip
, sizeof(ip
));
1263 len
= snprintf(p
, rem
, "%s", ip
);
1265 if (len
< 0 || len
>= rem
)
1273 inet_ntop(address
->family
== FW3_FAMILY_V4
? AF_INET
: AF_INET6
,
1274 &address
->mask
.v4
, ip
, sizeof(ip
));
1276 snprintf(p
, rem
, "-%s", ip
);
1280 inet_ntop(address
->family
== FW3_FAMILY_V4
? AF_INET
: AF_INET6
,
1281 &address
->mask
.v4
, ip
, sizeof(ip
));
1283 snprintf(p
, rem
, "/%s", ip
);
1287 snprintf(p
, rem
, "/%u",
1288 fw3_netmask2bitlen(address
->family
, &address
->mask
.v6
));