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
);