2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
4 * Copyright (c) 2017-2018 Yandex LLC
5 * Copyright (c) 2017-2018 Andrey V. Elsukov <ae@FreeBSD.org>
6 * Copyright (c) 2002 Luigi Rizzo, Universita` di Pisa
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/cdefs.h>
31 __FBSDID("$FreeBSD$");
34 #include "opt_inet6.h"
37 #error IPFIREWALL requires INET.
40 #include <sys/param.h>
41 #include <sys/systm.h>
44 #include <sys/kernel.h>
47 #include <sys/queue.h>
48 #include <sys/rmlock.h>
50 #include <sys/socket.h>
51 #include <sys/sysctl.h>
52 #include <sys/syslog.h>
53 #include <net/ethernet.h>
55 #include <net/if_var.h>
59 #include <netinet/in.h>
60 #include <netinet/ip.h>
61 #include <netinet/ip_var.h>
62 #include <netinet/ip_fw.h>
63 #include <netinet/tcp_var.h>
64 #include <netinet/udp.h>
66 #include <netinet/ip6.h> /* IN6_ARE_ADDR_EQUAL */
68 #include <netinet6/in6_var.h>
69 #include <netinet6/ip6_var.h>
70 #include <netinet6/scope6_var.h>
73 #include <netpfil/ipfw/ip_fw_private.h>
75 #include <machine/in_cksum.h> /* XXX for in_cksum */
78 #include <security/mac/mac_framework.h>
82 * Description of dynamic states.
84 * Dynamic states are stored in lists accessed through a hash tables
85 * whose size is curr_dyn_buckets. This value can be modified through
86 * the sysctl variable dyn_buckets.
88 * Currently there are four tables: dyn_ipv4, dyn_ipv6, dyn_ipv4_parent,
89 * and dyn_ipv6_parent.
91 * When a packet is received, its address fields hashed, then matched
92 * against the entries in the corresponding list by addr_type.
93 * Dynamic states can be used for different purposes:
95 * + enforcing limits on the number of sessions;
96 * + in-kernel NAT (not implemented yet)
98 * The lifetime of dynamic states is regulated by dyn_*_lifetime,
99 * measured in seconds and depending on the flags.
101 * The total number of dynamic states is equal to UMA zone items count.
102 * The max number of dynamic states is dyn_max. When we reach
103 * the maximum number of rules we do not create anymore. This is
104 * done to avoid consuming too much memory, but also too much
105 * time when searching on each packet (ideally, we should try instead
106 * to put a limit on the length of the list on each bucket...).
108 * Each state holds a pointer to the parent ipfw rule so we know what
109 * action to perform. Dynamic rules are removed when the parent rule is
112 * There are some limitations with dynamic rules -- we do not
113 * obey the 'randomized match', and we do not do multiple
114 * passes through the firewall. XXX check the latter!!!
117 /* By default use jenkins hash function */
118 #define IPFIREWALL_JENKINSHASH
120 #define DYN_COUNTER_INC(d, dir, pktlen) do { \
121 (d)->pcnt_ ## dir++; \
122 (d)->bcnt_ ## dir += pktlen; \
126 void *parent; /* pointer to parent rule */
127 uint32_t chain_id; /* cached ruleset id */
128 uint32_t f_pos; /* cached rule index */
130 uint32_t hashval; /* hash value used for hash resize */
131 uint16_t fibnum; /* fib used to send keepalives */
133 uint8_t set; /* parent rule set number */
134 uint16_t rulenum; /* parent rule number */
135 uint32_t ruleid; /* parent rule id */
137 uint32_t state; /* TCP session state and flags */
138 uint32_t ack_fwd; /* most recent ACKs in forward */
139 uint32_t ack_rev; /* and reverse direction (used */
140 /* to generate keepalives) */
141 uint32_t sync; /* synchronization time */
142 uint32_t expire; /* expire time */
144 uint64_t pcnt_fwd; /* bytes counter in forward */
145 uint64_t bcnt_fwd; /* packets counter in forward */
146 uint64_t pcnt_rev; /* bytes counter in reverse */
147 uint64_t bcnt_rev; /* packets counter in reverse */
150 #define DPARENT_COUNT_DEC(p) do { \
151 MPASS(p->count > 0); \
152 ck_pr_dec_32(&(p)->count); \
154 #define DPARENT_COUNT_INC(p) ck_pr_inc_32(&(p)->count)
155 #define DPARENT_COUNT(p) ck_pr_load_32(&(p)->count)
157 void *parent; /* pointer to parent rule */
158 uint32_t count; /* number of linked states */
160 uint8_t set; /* parent rule set number */
161 uint16_t rulenum; /* parent rule number */
162 uint32_t ruleid; /* parent rule id */
163 uint32_t hashval; /* hash value used for hash resize */
164 uint32_t expire; /* expire time */
167 struct dyn_ipv4_state {
168 uint8_t type; /* State type */
169 uint8_t proto; /* UL Protocol */
170 uint16_t kidx; /* named object index */
171 uint16_t sport, dport; /* ULP source and destination ports */
172 in_addr_t src, dst; /* IPv4 source and destination */
175 struct dyn_data *data;
176 struct dyn_parent *limit;
178 CK_SLIST_ENTRY(dyn_ipv4_state) entry;
179 SLIST_ENTRY(dyn_ipv4_state) expired;
181 CK_SLIST_HEAD(dyn_ipv4ck_slist, dyn_ipv4_state);
182 VNET_DEFINE_STATIC(struct dyn_ipv4ck_slist *, dyn_ipv4);
183 VNET_DEFINE_STATIC(struct dyn_ipv4ck_slist *, dyn_ipv4_parent);
185 SLIST_HEAD(dyn_ipv4_slist, dyn_ipv4_state);
186 VNET_DEFINE_STATIC(struct dyn_ipv4_slist, dyn_expired_ipv4);
187 #define V_dyn_ipv4 VNET(dyn_ipv4)
188 #define V_dyn_ipv4_parent VNET(dyn_ipv4_parent)
189 #define V_dyn_expired_ipv4 VNET(dyn_expired_ipv4)
192 struct dyn_ipv6_state {
193 uint8_t type; /* State type */
194 uint8_t proto; /* UL Protocol */
195 uint16_t kidx; /* named object index */
196 uint16_t sport, dport; /* ULP source and destination ports */
197 struct in6_addr src, dst; /* IPv6 source and destination */
198 uint32_t zoneid; /* IPv6 scope zone id */
200 struct dyn_data *data;
201 struct dyn_parent *limit;
203 CK_SLIST_ENTRY(dyn_ipv6_state) entry;
204 SLIST_ENTRY(dyn_ipv6_state) expired;
206 CK_SLIST_HEAD(dyn_ipv6ck_slist, dyn_ipv6_state);
207 VNET_DEFINE_STATIC(struct dyn_ipv6ck_slist *, dyn_ipv6);
208 VNET_DEFINE_STATIC(struct dyn_ipv6ck_slist *, dyn_ipv6_parent);
210 SLIST_HEAD(dyn_ipv6_slist, dyn_ipv6_state);
211 VNET_DEFINE_STATIC(struct dyn_ipv6_slist, dyn_expired_ipv6);
212 #define V_dyn_ipv6 VNET(dyn_ipv6)
213 #define V_dyn_ipv6_parent VNET(dyn_ipv6_parent)
214 #define V_dyn_expired_ipv6 VNET(dyn_expired_ipv6)
218 * Per-CPU pointer indicates that specified state is currently in use
219 * and must not be reclaimed by expiration callout.
221 static void **dyn_hp_cache;
222 DPCPU_DEFINE_STATIC(void *, dyn_hp);
223 #define DYNSTATE_GET(cpu) ck_pr_load_ptr(DPCPU_ID_PTR((cpu), dyn_hp))
224 #define DYNSTATE_PROTECT(v) ck_pr_store_ptr(DPCPU_PTR(dyn_hp), (v))
225 #define DYNSTATE_RELEASE() DYNSTATE_PROTECT(NULL)
226 #define DYNSTATE_CRITICAL_ENTER() critical_enter()
227 #define DYNSTATE_CRITICAL_EXIT() do { \
228 DYNSTATE_RELEASE(); \
233 * We keep two version numbers, one is updated when new entry added to
234 * the list. Second is updated when an entry deleted from the list.
235 * Versions are updated under bucket lock.
237 * Bucket "add" version number is used to know, that in the time between
238 * state lookup (i.e. ipfw_dyn_lookup_state()) and the followed state
239 * creation (i.e. ipfw_dyn_install_state()) another concurrent thread did
240 * not install some state in this bucket. Using this info we can avoid
241 * additional state lookup, because we are sure that we will not install
244 * Also doing the tracking of bucket "del" version during lookup we can
245 * be sure, that state entry was not unlinked and freed in time between
246 * we read the state pointer and protect it with hazard pointer.
248 * An entry unlinked from CK list keeps unchanged until it is freed.
249 * Unlinked entries are linked into expired lists using "expired" field.
253 * dyn_expire_lock is used to protect access to dyn_expired_xxx lists.
254 * dyn_bucket_lock is used to get write access to lists in specific bucket.
255 * Currently one dyn_bucket_lock is used for all ipv4, ipv4_parent, ipv6,
256 * and ipv6_parent lists.
258 VNET_DEFINE_STATIC(struct mtx, dyn_expire_lock);
259 VNET_DEFINE_STATIC(struct mtx *, dyn_bucket_lock);
260 #define V_dyn_expire_lock VNET(dyn_expire_lock)
261 #define V_dyn_bucket_lock VNET(dyn_bucket_lock)
264 * Bucket's add/delete generation versions.
266 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv4_add);
267 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv4_del);
268 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv4_parent_add);
269 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv4_parent_del);
270 #define V_dyn_ipv4_add VNET(dyn_ipv4_add)
271 #define V_dyn_ipv4_del VNET(dyn_ipv4_del)
272 #define V_dyn_ipv4_parent_add VNET(dyn_ipv4_parent_add)
273 #define V_dyn_ipv4_parent_del VNET(dyn_ipv4_parent_del)
276 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv6_add);
277 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv6_del);
278 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv6_parent_add);
279 VNET_DEFINE_STATIC(uint32_t *, dyn_ipv6_parent_del);
280 #define V_dyn_ipv6_add VNET(dyn_ipv6_add)
281 #define V_dyn_ipv6_del VNET(dyn_ipv6_del)
282 #define V_dyn_ipv6_parent_add VNET(dyn_ipv6_parent_add)
283 #define V_dyn_ipv6_parent_del VNET(dyn_ipv6_parent_del)
286 #define DYN_BUCKET(h, b) ((h) & (b - 1))
287 #define DYN_BUCKET_VERSION(b, v) ck_pr_load_32(&V_dyn_ ## v[(b)])
288 #define DYN_BUCKET_VERSION_BUMP(b, v) ck_pr_inc_32(&V_dyn_ ## v[(b)])
290 #define DYN_BUCKET_LOCK_INIT(lock, b) \
291 mtx_init(&lock[(b)], "IPFW dynamic bucket", NULL, MTX_DEF)
292 #define DYN_BUCKET_LOCK_DESTROY(lock, b) mtx_destroy(&lock[(b)])
293 #define DYN_BUCKET_LOCK(b) mtx_lock(&V_dyn_bucket_lock[(b)])
294 #define DYN_BUCKET_UNLOCK(b) mtx_unlock(&V_dyn_bucket_lock[(b)])
295 #define DYN_BUCKET_ASSERT(b) mtx_assert(&V_dyn_bucket_lock[(b)], MA_OWNED)
297 #define DYN_EXPIRED_LOCK_INIT() \
298 mtx_init(&V_dyn_expire_lock, "IPFW expired states list", NULL, MTX_DEF)
299 #define DYN_EXPIRED_LOCK_DESTROY() mtx_destroy(&V_dyn_expire_lock)
300 #define DYN_EXPIRED_LOCK() mtx_lock(&V_dyn_expire_lock)
301 #define DYN_EXPIRED_UNLOCK() mtx_unlock(&V_dyn_expire_lock)
303 VNET_DEFINE_STATIC(uint32_t, dyn_buckets_max);
304 VNET_DEFINE_STATIC(uint32_t, curr_dyn_buckets);
305 VNET_DEFINE_STATIC(struct callout, dyn_timeout);
306 #define V_dyn_buckets_max VNET(dyn_buckets_max)
307 #define V_curr_dyn_buckets VNET(curr_dyn_buckets)
308 #define V_dyn_timeout VNET(dyn_timeout)
310 /* Maximum length of states chain in a bucket */
311 VNET_DEFINE_STATIC(uint32_t, curr_max_length);
312 #define V_curr_max_length VNET(curr_max_length)
314 VNET_DEFINE_STATIC(uint32_t, dyn_keep_states);
315 #define V_dyn_keep_states VNET(dyn_keep_states)
317 VNET_DEFINE_STATIC(uma_zone_t, dyn_data_zone);
318 VNET_DEFINE_STATIC(uma_zone_t, dyn_parent_zone);
319 VNET_DEFINE_STATIC(uma_zone_t, dyn_ipv4_zone);
321 VNET_DEFINE_STATIC(uma_zone_t, dyn_ipv6_zone);
322 #define V_dyn_ipv6_zone VNET(dyn_ipv6_zone)
324 #define V_dyn_data_zone VNET(dyn_data_zone)
325 #define V_dyn_parent_zone VNET(dyn_parent_zone)
326 #define V_dyn_ipv4_zone VNET(dyn_ipv4_zone)
329 * Timeouts for various events in handing dynamic rules.
331 VNET_DEFINE_STATIC(uint32_t, dyn_ack_lifetime);
332 VNET_DEFINE_STATIC(uint32_t, dyn_syn_lifetime);
333 VNET_DEFINE_STATIC(uint32_t, dyn_fin_lifetime);
334 VNET_DEFINE_STATIC(uint32_t, dyn_rst_lifetime);
335 VNET_DEFINE_STATIC(uint32_t, dyn_udp_lifetime);
336 VNET_DEFINE_STATIC(uint32_t, dyn_short_lifetime);
338 #define V_dyn_ack_lifetime VNET(dyn_ack_lifetime)
339 #define V_dyn_syn_lifetime VNET(dyn_syn_lifetime)
340 #define V_dyn_fin_lifetime VNET(dyn_fin_lifetime)
341 #define V_dyn_rst_lifetime VNET(dyn_rst_lifetime)
342 #define V_dyn_udp_lifetime VNET(dyn_udp_lifetime)
343 #define V_dyn_short_lifetime VNET(dyn_short_lifetime)
346 * Keepalives are sent if dyn_keepalive is set. They are sent every
347 * dyn_keepalive_period seconds, in the last dyn_keepalive_interval
348 * seconds of lifetime of a rule.
349 * dyn_rst_lifetime and dyn_fin_lifetime should be strictly lower
350 * than dyn_keepalive_period.
352 #define DYN_KEEPALIVE_MAXQ 512
353 VNET_DEFINE_STATIC(uint32_t, dyn_keepalive_interval);
354 VNET_DEFINE_STATIC(uint32_t, dyn_keepalive_period);
355 VNET_DEFINE_STATIC(uint32_t, dyn_keepalive);
356 VNET_DEFINE_STATIC(time_t, dyn_keepalive_last);
358 #define V_dyn_keepalive_interval VNET(dyn_keepalive_interval)
359 #define V_dyn_keepalive_period VNET(dyn_keepalive_period)
360 #define V_dyn_keepalive VNET(dyn_keepalive)
361 #define V_dyn_keepalive_last VNET(dyn_keepalive_last)
363 VNET_DEFINE_STATIC(uint32_t, dyn_max); /* max # of dynamic states */
364 VNET_DEFINE_STATIC(uint32_t, dyn_count); /* number of states */
365 VNET_DEFINE_STATIC(uint32_t, dyn_parent_max); /* max # of parent states */
366 VNET_DEFINE_STATIC(uint32_t, dyn_parent_count); /* number of parent states */
368 #define V_dyn_max VNET(dyn_max)
369 #define V_dyn_count VNET(dyn_count)
370 #define V_dyn_parent_max VNET(dyn_parent_max)
371 #define V_dyn_parent_count VNET(dyn_parent_count)
373 #define DYN_COUNT_DEC(name) do { \
374 MPASS((V_ ## name) > 0); \
375 ck_pr_dec_32(&(V_ ## name)); \
377 #define DYN_COUNT_INC(name) ck_pr_inc_32(&(V_ ## name))
378 #define DYN_COUNT(name) ck_pr_load_32(&(V_ ## name))
380 static time_t last_log; /* Log ratelimiting */
383 * Get/set maximum number of dynamic states in given VNET instance.
386 sysctl_dyn_max(SYSCTL_HANDLER_ARGS)
392 error = sysctl_handle_32(oidp, &nstates, 0, req);
393 /* Read operation or some error */
394 if ((error != 0) || (req->newptr == NULL))
398 uma_zone_set_max(V_dyn_data_zone, V_dyn_max);
403 sysctl_dyn_parent_max(SYSCTL_HANDLER_ARGS)
408 nstates = V_dyn_parent_max;
409 error = sysctl_handle_32(oidp, &nstates, 0, req);
410 /* Read operation or some error */
411 if ((error != 0) || (req->newptr == NULL))
414 V_dyn_parent_max = nstates;
415 uma_zone_set_max(V_dyn_parent_zone, V_dyn_parent_max);
420 sysctl_dyn_buckets(SYSCTL_HANDLER_ARGS)
425 nbuckets = V_dyn_buckets_max;
426 error = sysctl_handle_32(oidp, &nbuckets, 0, req);
427 /* Read operation or some error */
428 if ((error != 0) || (req->newptr == NULL))
432 V_dyn_buckets_max = 1 << fls(nbuckets - 1);
438 SYSCTL_DECL(_net_inet_ip_fw);
440 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_count,
441 CTLFLAG_VNET | CTLFLAG_RD, &VNET_NAME(dyn_count), 0,
442 "Current number of dynamic states.");
443 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_parent_count,
444 CTLFLAG_VNET | CTLFLAG_RD, &VNET_NAME(dyn_parent_count), 0,
445 "Current number of parent states. ");
446 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, curr_dyn_buckets,
447 CTLFLAG_VNET | CTLFLAG_RD, &VNET_NAME(curr_dyn_buckets), 0,
448 "Current number of buckets for states hash table.");
449 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, curr_max_length,
450 CTLFLAG_VNET | CTLFLAG_RD, &VNET_NAME(curr_max_length), 0,
451 "Current maximum length of states chains in hash buckets.");
452 SYSCTL_PROC(_net_inet_ip_fw, OID_AUTO, dyn_buckets,
453 CTLFLAG_VNET | CTLTYPE_U32 | CTLFLAG_RW, 0, 0, sysctl_dyn_buckets,
454 "IU", "Max number of buckets for dynamic states hash table.");
455 SYSCTL_PROC(_net_inet_ip_fw, OID_AUTO, dyn_max,
456 CTLFLAG_VNET | CTLTYPE_U32 | CTLFLAG_RW, 0, 0, sysctl_dyn_max,
457 "IU", "Max number of dynamic states.");
458 SYSCTL_PROC(_net_inet_ip_fw, OID_AUTO, dyn_parent_max,
459 CTLFLAG_VNET | CTLTYPE_U32 | CTLFLAG_RW, 0, 0, sysctl_dyn_parent_max,
460 "IU", "Max number of parent dynamic states.");
461 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_ack_lifetime,
462 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_ack_lifetime), 0,
463 "Lifetime of dynamic states for TCP ACK.");
464 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_syn_lifetime,
465 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_syn_lifetime), 0,
466 "Lifetime of dynamic states for TCP SYN.");
467 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_fin_lifetime,
468 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_fin_lifetime), 0,
469 "Lifetime of dynamic states for TCP FIN.");
470 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_rst_lifetime,
471 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_rst_lifetime), 0,
472 "Lifetime of dynamic states for TCP RST.");
473 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_udp_lifetime,
474 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_udp_lifetime), 0,
475 "Lifetime of dynamic states for UDP.");
476 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_short_lifetime,
477 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_short_lifetime), 0,
478 "Lifetime of dynamic states for other situations.");
479 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_keepalive,
480 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_keepalive), 0,
481 "Enable keepalives for dynamic states.");
482 SYSCTL_U32(_net_inet_ip_fw, OID_AUTO, dyn_keep_states,
483 CTLFLAG_VNET | CTLFLAG_RW, &VNET_NAME(dyn_keep_states), 0,
484 "Do not flush dynamic states on rule deletion");
487 #ifdef IPFIREWALL_DYNDEBUG
488 #define DYN_DEBUG(fmt, ...) do { \
489 printf("%s: " fmt "\n", __func__, __VA_ARGS__); \
492 #define DYN_DEBUG(fmt, ...)
493 #endif /* !IPFIREWALL_DYNDEBUG */
496 /* Functions to work with IPv6 states */
497 static struct dyn_ipv6_state *dyn_lookup_ipv6_state(
498 const struct ipfw_flow_id *, uint32_t, const void *,
499 struct ipfw_dyn_info *, int);
500 static int dyn_lookup_ipv6_state_locked(const struct ipfw_flow_id *,
501 uint32_t, const void *, int, uint32_t, uint16_t);
502 static struct dyn_ipv6_state *dyn_alloc_ipv6_state(
503 const struct ipfw_flow_id *, uint32_t, uint16_t, uint8_t);
504 static int dyn_add_ipv6_state(void *, uint32_t, uint16_t, uint8_t,
505 const struct ipfw_flow_id *, uint32_t, const void *, int, uint32_t,
506 struct ipfw_dyn_info *, uint16_t, uint16_t, uint8_t);
507 static void dyn_export_ipv6_state(const struct dyn_ipv6_state *,
510 static uint32_t dyn_getscopeid(const struct ip_fw_args *);
511 static void dyn_make_keepalive_ipv6(struct mbuf *, const struct in6_addr *,
512 const struct in6_addr *, uint32_t, uint32_t, uint32_t, uint16_t,
514 static void dyn_enqueue_keepalive_ipv6(struct mbufq *,
515 const struct dyn_ipv6_state *);
516 static void dyn_send_keepalive_ipv6(struct ip_fw_chain *);
518 static struct dyn_ipv6_state *dyn_lookup_ipv6_parent(
519 const struct ipfw_flow_id *, uint32_t, const void *, uint32_t, uint16_t,
521 static struct dyn_ipv6_state *dyn_lookup_ipv6_parent_locked(
522 const struct ipfw_flow_id *, uint32_t, const void *, uint32_t, uint16_t,
524 static struct dyn_ipv6_state *dyn_add_ipv6_parent(void *, uint32_t, uint16_t,
525 uint8_t, const struct ipfw_flow_id *, uint32_t, uint32_t, uint32_t,
529 /* Functions to work with limit states */
530 static void *dyn_get_parent_state(const struct ipfw_flow_id *, uint32_t,
531 struct ip_fw *, uint32_t, uint32_t, uint16_t);
532 static struct dyn_ipv4_state *dyn_lookup_ipv4_parent(
533 const struct ipfw_flow_id *, const void *, uint32_t, uint16_t, uint32_t);
534 static struct dyn_ipv4_state *dyn_lookup_ipv4_parent_locked(
535 const struct ipfw_flow_id *, const void *, uint32_t, uint16_t, uint32_t);
536 static struct dyn_parent *dyn_alloc_parent(void *, uint32_t, uint16_t,
538 static struct dyn_ipv4_state *dyn_add_ipv4_parent(void *, uint32_t, uint16_t,
539 uint8_t, const struct ipfw_flow_id *, uint32_t, uint32_t, uint16_t);
541 static void dyn_tick(void *);
542 static void dyn_expire_states(struct ip_fw_chain *, ipfw_range_tlv *);
543 static void dyn_free_states(struct ip_fw_chain *);
544 static void dyn_export_parent(const struct dyn_parent *, uint16_t,
546 static void dyn_export_data(const struct dyn_data *, uint16_t, uint8_t,
548 static uint32_t dyn_update_tcp_state(struct dyn_data *,
549 const struct ipfw_flow_id *, const struct tcphdr *, int);
550 static void dyn_update_proto_state(struct dyn_data *,
551 const struct ipfw_flow_id *, const void *, int, int);
553 /* Functions to work with IPv4 states */
554 struct dyn_ipv4_state *dyn_lookup_ipv4_state(const struct ipfw_flow_id *,
555 const void *, struct ipfw_dyn_info *, int);
556 static int dyn_lookup_ipv4_state_locked(const struct ipfw_flow_id *,
557 const void *, int, uint32_t, uint16_t);
558 static struct dyn_ipv4_state *dyn_alloc_ipv4_state(
559 const struct ipfw_flow_id *, uint16_t, uint8_t);
560 static int dyn_add_ipv4_state(void *, uint32_t, uint16_t, uint8_t,
561 const struct ipfw_flow_id *, const void *, int, uint32_t,
562 struct ipfw_dyn_info *, uint16_t, uint16_t, uint8_t);
563 static void dyn_export_ipv4_state(const struct dyn_ipv4_state *,
567 * Named states support.
569 static char *default_state_name = "default";
570 struct dyn_state_obj {
571 struct named_object no;
575 #define DYN_STATE_OBJ(ch, cmd) \
576 ((struct dyn_state_obj *)SRV_OBJECT(ch, (cmd)->arg1))
578 * Classifier callback.
579 * Return 0 if opcode contains object that should be referenced
583 dyn_classify(ipfw_insn *cmd, uint16_t *puidx, uint8_t *ptype)
586 DYN_DEBUG("opcode %d, arg1 %d", cmd->opcode, cmd->arg1);
587 /* Don't rewrite "check-state any" */
588 if (cmd->arg1 == 0 &&
589 cmd->opcode == O_CHECK_STATE)
598 dyn_update(ipfw_insn *cmd, uint16_t idx)
602 DYN_DEBUG("opcode %d, arg1 %d", cmd->opcode, cmd->arg1);
606 dyn_findbyname(struct ip_fw_chain *ch, struct tid_info *ti,
607 struct named_object **pno)
612 DYN_DEBUG("uidx %d", ti->uidx);
614 if (ti->tlvs == NULL)
616 /* Search ntlv in the buffer provided by user */
617 ntlv = ipfw_find_name_tlv_type(ti->tlvs, ti->tlen, ti->uidx,
618 IPFW_TLV_STATE_NAME);
623 name = default_state_name;
625 * Search named object with corresponding name.
626 * Since states objects are global - ignore the set value
627 * and use zero instead.
629 *pno = ipfw_objhash_lookup_name_type(CHAIN_TO_SRV(ch), 0,
630 IPFW_TLV_STATE_NAME, name);
632 * We always return success here.
633 * The caller will check *pno and mark object as unresolved,
634 * then it will automatically create "default" object.
639 static struct named_object *
640 dyn_findbykidx(struct ip_fw_chain *ch, uint16_t idx)
643 DYN_DEBUG("kidx %d", idx);
644 return (ipfw_objhash_lookup_kidx(CHAIN_TO_SRV(ch), idx));
648 dyn_create(struct ip_fw_chain *ch, struct tid_info *ti,
651 struct namedobj_instance *ni;
652 struct dyn_state_obj *obj;
653 struct named_object *no;
657 DYN_DEBUG("uidx %d", ti->uidx);
659 if (ti->tlvs == NULL)
661 ntlv = ipfw_find_name_tlv_type(ti->tlvs, ti->tlen, ti->uidx,
662 IPFW_TLV_STATE_NAME);
667 name = default_state_name;
669 ni = CHAIN_TO_SRV(ch);
670 obj = malloc(sizeof(*obj), M_IPFW, M_WAITOK | M_ZERO);
671 obj->no.name = obj->name;
672 obj->no.etlv = IPFW_TLV_STATE_NAME;
673 strlcpy(obj->name, name, sizeof(obj->name));
676 no = ipfw_objhash_lookup_name_type(ni, 0,
677 IPFW_TLV_STATE_NAME, name);
680 * Object is already created.
681 * Just return its kidx and bump refcount.
687 DYN_DEBUG("\tfound kidx %d", *pkidx);
690 if (ipfw_objhash_alloc_idx(ni, &obj->no.kidx) != 0) {
691 DYN_DEBUG("\talloc_idx failed for %s", name);
696 ipfw_objhash_add(ni, &obj->no);
697 SRV_OBJECT(ch, obj->no.kidx) = obj;
699 *pkidx = obj->no.kidx;
701 DYN_DEBUG("\tcreated kidx %d", *pkidx);
706 dyn_destroy(struct ip_fw_chain *ch, struct named_object *no)
708 struct dyn_state_obj *obj;
710 IPFW_UH_WLOCK_ASSERT(ch);
712 KASSERT(no->refcnt == 1,
713 ("Destroying object '%s' (type %u, idx %u) with refcnt %u",
714 no->name, no->etlv, no->kidx, no->refcnt));
715 DYN_DEBUG("kidx %d", no->kidx);
716 obj = SRV_OBJECT(ch, no->kidx);
717 SRV_OBJECT(ch, no->kidx) = NULL;
718 ipfw_objhash_del(CHAIN_TO_SRV(ch), no);
719 ipfw_objhash_free_idx(CHAIN_TO_SRV(ch), no->kidx);
724 static struct opcode_obj_rewrite dyn_opcodes[] = {
726 O_KEEP_STATE, IPFW_TLV_STATE_NAME,
727 dyn_classify, dyn_update,
728 dyn_findbyname, dyn_findbykidx,
729 dyn_create, dyn_destroy
732 O_CHECK_STATE, IPFW_TLV_STATE_NAME,
733 dyn_classify, dyn_update,
734 dyn_findbyname, dyn_findbykidx,
735 dyn_create, dyn_destroy
738 O_PROBE_STATE, IPFW_TLV_STATE_NAME,
739 dyn_classify, dyn_update,
740 dyn_findbyname, dyn_findbykidx,
741 dyn_create, dyn_destroy
744 O_LIMIT, IPFW_TLV_STATE_NAME,
745 dyn_classify, dyn_update,
746 dyn_findbyname, dyn_findbykidx,
747 dyn_create, dyn_destroy
752 * IMPORTANT: the hash function for dynamic rules must be commutative
753 * in source and destination (ip,port), because rules are bidirectional
754 * and we want to find both in the same bucket.
756 #ifndef IPFIREWALL_JENKINSHASH
757 static __inline uint32_t
758 hash_packet(const struct ipfw_flow_id *id)
763 if (IS_IP6_FLOW_ID(id))
764 i = ntohl((id->dst_ip6.__u6_addr.__u6_addr32[2]) ^
765 (id->dst_ip6.__u6_addr.__u6_addr32[3]) ^
766 (id->src_ip6.__u6_addr.__u6_addr32[2]) ^
767 (id->src_ip6.__u6_addr.__u6_addr32[3]));
770 i = (id->dst_ip) ^ (id->src_ip);
771 i ^= (id->dst_port) ^ (id->src_port);
775 static __inline uint32_t
776 hash_parent(const struct ipfw_flow_id *id, const void *rule)
779 return (hash_packet(id) ^ ((uintptr_t)rule));
782 #else /* IPFIREWALL_JENKINSHASH */
784 VNET_DEFINE_STATIC(uint32_t, dyn_hashseed);
785 #define V_dyn_hashseed VNET(dyn_hashseed)
788 addrcmp4(const struct ipfw_flow_id *id)
791 if (id->src_ip < id->dst_ip)
793 if (id->src_ip > id->dst_ip)
795 if (id->src_port <= id->dst_port)
802 addrcmp6(const struct ipfw_flow_id *id)
806 ret = memcmp(&id->src_ip6, &id->dst_ip6, sizeof(struct in6_addr));
811 if (id->src_port <= id->dst_port)
816 static __inline uint32_t
817 hash_packet6(const struct ipfw_flow_id *id)
820 struct in6_addr addr[2];
824 if (addrcmp6(id) == 0) {
825 t6.addr[0] = id->src_ip6;
826 t6.addr[1] = id->dst_ip6;
827 t6.port[0] = id->src_port;
828 t6.port[1] = id->dst_port;
830 t6.addr[0] = id->dst_ip6;
831 t6.addr[1] = id->src_ip6;
832 t6.port[0] = id->dst_port;
833 t6.port[1] = id->src_port;
835 return (jenkins_hash32((const uint32_t *)&t6,
836 sizeof(t6) / sizeof(uint32_t), V_dyn_hashseed));
840 static __inline uint32_t
841 hash_packet(const struct ipfw_flow_id *id)
848 if (IS_IP4_FLOW_ID(id)) {
849 /* All fields are in host byte order */
850 if (addrcmp4(id) == 0) {
851 t4.addr[0] = id->src_ip;
852 t4.addr[1] = id->dst_ip;
853 t4.port[0] = id->src_port;
854 t4.port[1] = id->dst_port;
856 t4.addr[0] = id->dst_ip;
857 t4.addr[1] = id->src_ip;
858 t4.port[0] = id->dst_port;
859 t4.port[1] = id->src_port;
861 return (jenkins_hash32((const uint32_t *)&t4,
862 sizeof(t4) / sizeof(uint32_t), V_dyn_hashseed));
865 if (IS_IP6_FLOW_ID(id))
866 return (hash_packet6(id));
871 static __inline uint32_t
872 hash_parent(const struct ipfw_flow_id *id, const void *rule)
875 return (jenkins_hash32((const uint32_t *)&rule,
876 sizeof(rule) / sizeof(uint32_t), hash_packet(id)));
878 #endif /* IPFIREWALL_JENKINSHASH */
881 * Print customizable flow id description via log(9) facility.
884 print_dyn_rule_flags(const struct ipfw_flow_id *id, int dyn_type,
885 int log_flags, char *prefix, char *postfix)
889 char src[INET6_ADDRSTRLEN], dst[INET6_ADDRSTRLEN];
891 char src[INET_ADDRSTRLEN], dst[INET_ADDRSTRLEN];
895 if (IS_IP6_FLOW_ID(id)) {
896 ip6_sprintf(src, &id->src_ip6);
897 ip6_sprintf(dst, &id->dst_ip6);
901 da.s_addr = htonl(id->src_ip);
902 inet_ntop(AF_INET, &da, src, sizeof(src));
903 da.s_addr = htonl(id->dst_ip);
904 inet_ntop(AF_INET, &da, dst, sizeof(dst));
906 log(log_flags, "ipfw: %s type %d %s %d -> %s %d, %d %s\n",
907 prefix, dyn_type, src, id->src_port, dst,
908 id->dst_port, V_dyn_count, postfix);
911 #define print_dyn_rule(id, dtype, prefix, postfix) \
912 print_dyn_rule_flags(id, dtype, LOG_DEBUG, prefix, postfix)
914 #define TIME_LEQ(a,b) ((int)((a)-(b)) <= 0)
915 #define TIME_LE(a,b) ((int)((a)-(b)) < 0)
916 #define _SEQ_GE(a,b) ((int)((a)-(b)) >= 0)
917 #define BOTH_SYN (TH_SYN | (TH_SYN << 8))
918 #define BOTH_FIN (TH_FIN | (TH_FIN << 8))
919 #define TCP_FLAGS (TH_FLAGS | (TH_FLAGS << 8))
920 #define ACK_FWD 0x00010000 /* fwd ack seen */
921 #define ACK_REV 0x00020000 /* rev ack seen */
922 #define ACK_BOTH (ACK_FWD | ACK_REV)
925 dyn_update_tcp_state(struct dyn_data *data, const struct ipfw_flow_id *pkt,
926 const struct tcphdr *tcp, int dir)
928 uint32_t ack, expire;
932 expire = data->expire;
933 old = state = data->state;
934 th_flags = pkt->_flags & (TH_FIN | TH_SYN | TH_RST);
935 state |= (dir == MATCH_FORWARD) ? th_flags: (th_flags << 8);
936 switch (state & TCP_FLAGS) {
937 case TH_SYN: /* opening */
938 expire = time_uptime + V_dyn_syn_lifetime;
941 case BOTH_SYN: /* move to established */
942 case BOTH_SYN | TH_FIN: /* one side tries to close */
943 case BOTH_SYN | (TH_FIN << 8):
946 ack = ntohl(tcp->th_ack);
947 if (dir == MATCH_FORWARD) {
948 if (data->ack_fwd == 0 ||
949 _SEQ_GE(ack, data->ack_fwd)) {
951 if (data->ack_fwd != ack)
952 ck_pr_store_32(&data->ack_fwd, ack);
955 if (data->ack_rev == 0 ||
956 _SEQ_GE(ack, data->ack_rev)) {
958 if (data->ack_rev != ack)
959 ck_pr_store_32(&data->ack_rev, ack);
962 if ((state & ACK_BOTH) == ACK_BOTH) {
964 * Set expire time to V_dyn_ack_lifetime only if
965 * we got ACKs for both directions.
966 * We use XOR here to avoid possible state
967 * overwriting in concurrent thread.
969 expire = time_uptime + V_dyn_ack_lifetime;
970 ck_pr_xor_32(&data->state, ACK_BOTH);
971 } else if ((data->state & ACK_BOTH) != (state & ACK_BOTH))
972 ck_pr_or_32(&data->state, state & ACK_BOTH);
975 case BOTH_SYN | BOTH_FIN: /* both sides closed */
976 if (V_dyn_fin_lifetime >= V_dyn_keepalive_period)
977 V_dyn_fin_lifetime = V_dyn_keepalive_period - 1;
978 expire = time_uptime + V_dyn_fin_lifetime;
982 if (V_dyn_rst_lifetime >= V_dyn_keepalive_period)
983 V_dyn_rst_lifetime = V_dyn_keepalive_period - 1;
984 expire = time_uptime + V_dyn_rst_lifetime;
986 /* Save TCP state if it was changed */
987 if ((state & TCP_FLAGS) != (old & TCP_FLAGS))
988 ck_pr_or_32(&data->state, state & TCP_FLAGS);
993 * Update ULP specific state.
994 * For TCP we keep sequence numbers and flags. For other protocols
995 * currently we update only expire time. Packets and bytes counters
996 * are also updated here.
999 dyn_update_proto_state(struct dyn_data *data, const struct ipfw_flow_id *pkt,
1000 const void *ulp, int pktlen, int dir)
1004 /* NOTE: we are in critical section here. */
1005 switch (pkt->proto) {
1007 case IPPROTO_UDPLITE:
1008 expire = time_uptime + V_dyn_udp_lifetime;
1011 expire = dyn_update_tcp_state(data, pkt, ulp, dir);
1014 expire = time_uptime + V_dyn_short_lifetime;
1017 * Expiration timer has the per-second granularity, no need to update
1018 * it every time when state is matched.
1020 if (data->expire != expire)
1021 ck_pr_store_32(&data->expire, expire);
1023 if (dir == MATCH_FORWARD)
1024 DYN_COUNTER_INC(data, fwd, pktlen);
1026 DYN_COUNTER_INC(data, rev, pktlen);
1030 * Lookup IPv4 state.
1031 * Must be called in critical section.
1033 struct dyn_ipv4_state *
1034 dyn_lookup_ipv4_state(const struct ipfw_flow_id *pkt, const void *ulp,
1035 struct ipfw_dyn_info *info, int pktlen)
1037 struct dyn_ipv4_state *s;
1038 uint32_t version, bucket;
1040 bucket = DYN_BUCKET(info->hashval, V_curr_dyn_buckets);
1041 info->version = DYN_BUCKET_VERSION(bucket, ipv4_add);
1043 version = DYN_BUCKET_VERSION(bucket, ipv4_del);
1044 CK_SLIST_FOREACH(s, &V_dyn_ipv4[bucket], entry) {
1045 DYNSTATE_PROTECT(s);
1046 if (version != DYN_BUCKET_VERSION(bucket, ipv4_del))
1048 if (s->proto != pkt->proto)
1050 if (info->kidx != 0 && s->kidx != info->kidx)
1052 if (s->sport == pkt->src_port && s->dport == pkt->dst_port &&
1053 s->src == pkt->src_ip && s->dst == pkt->dst_ip) {
1054 info->direction = MATCH_FORWARD;
1057 if (s->sport == pkt->dst_port && s->dport == pkt->src_port &&
1058 s->src == pkt->dst_ip && s->dst == pkt->src_ip) {
1059 info->direction = MATCH_REVERSE;
1065 dyn_update_proto_state(s->data, pkt, ulp, pktlen,
1071 * Lookup IPv4 state.
1072 * Simplifed version is used to check that matching state doesn't exist.
1075 dyn_lookup_ipv4_state_locked(const struct ipfw_flow_id *pkt,
1076 const void *ulp, int pktlen, uint32_t bucket, uint16_t kidx)
1078 struct dyn_ipv4_state *s;
1082 DYN_BUCKET_ASSERT(bucket);
1083 CK_SLIST_FOREACH(s, &V_dyn_ipv4[bucket], entry) {
1084 if (s->proto != pkt->proto ||
1087 if (s->sport == pkt->src_port &&
1088 s->dport == pkt->dst_port &&
1089 s->src == pkt->src_ip && s->dst == pkt->dst_ip) {
1090 dir = MATCH_FORWARD;
1093 if (s->sport == pkt->dst_port && s->dport == pkt->src_port &&
1094 s->src == pkt->dst_ip && s->dst == pkt->src_ip) {
1095 dir = MATCH_REVERSE;
1100 dyn_update_proto_state(s->data, pkt, ulp, pktlen, dir);
1104 struct dyn_ipv4_state *
1105 dyn_lookup_ipv4_parent(const struct ipfw_flow_id *pkt, const void *rule,
1106 uint32_t ruleid, uint16_t rulenum, uint32_t hashval)
1108 struct dyn_ipv4_state *s;
1109 uint32_t version, bucket;
1111 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1113 version = DYN_BUCKET_VERSION(bucket, ipv4_parent_del);
1114 CK_SLIST_FOREACH(s, &V_dyn_ipv4_parent[bucket], entry) {
1115 DYNSTATE_PROTECT(s);
1116 if (version != DYN_BUCKET_VERSION(bucket, ipv4_parent_del))
1119 * NOTE: we do not need to check kidx, because parent rule
1120 * can not create states with different kidx.
1121 * And parent rule always created for forward direction.
1123 if (s->limit->parent == rule &&
1124 s->limit->ruleid == ruleid &&
1125 s->limit->rulenum == rulenum &&
1126 s->proto == pkt->proto &&
1127 s->sport == pkt->src_port &&
1128 s->dport == pkt->dst_port &&
1129 s->src == pkt->src_ip && s->dst == pkt->dst_ip) {
1130 if (s->limit->expire != time_uptime +
1131 V_dyn_short_lifetime)
1132 ck_pr_store_32(&s->limit->expire,
1133 time_uptime + V_dyn_short_lifetime);
1140 static struct dyn_ipv4_state *
1141 dyn_lookup_ipv4_parent_locked(const struct ipfw_flow_id *pkt,
1142 const void *rule, uint32_t ruleid, uint16_t rulenum, uint32_t bucket)
1144 struct dyn_ipv4_state *s;
1146 DYN_BUCKET_ASSERT(bucket);
1147 CK_SLIST_FOREACH(s, &V_dyn_ipv4_parent[bucket], entry) {
1148 if (s->limit->parent == rule &&
1149 s->limit->ruleid == ruleid &&
1150 s->limit->rulenum == rulenum &&
1151 s->proto == pkt->proto &&
1152 s->sport == pkt->src_port &&
1153 s->dport == pkt->dst_port &&
1154 s->src == pkt->src_ip && s->dst == pkt->dst_ip)
1163 dyn_getscopeid(const struct ip_fw_args *args)
1167 * If source or destination address is an scopeid address, we need
1168 * determine the scope zone id to resolve address scope ambiguity.
1170 if (IN6_IS_ADDR_LINKLOCAL(&args->f_id.src_ip6) ||
1171 IN6_IS_ADDR_LINKLOCAL(&args->f_id.dst_ip6)) {
1172 MPASS(args->oif != NULL ||
1173 args->m->m_pkthdr.rcvif != NULL);
1174 return (in6_getscopezone(args->oif != NULL ? args->oif:
1175 args->m->m_pkthdr.rcvif, IPV6_ADDR_SCOPE_LINKLOCAL));
1181 * Lookup IPv6 state.
1182 * Must be called in critical section.
1184 static struct dyn_ipv6_state *
1185 dyn_lookup_ipv6_state(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1186 const void *ulp, struct ipfw_dyn_info *info, int pktlen)
1188 struct dyn_ipv6_state *s;
1189 uint32_t version, bucket;
1191 bucket = DYN_BUCKET(info->hashval, V_curr_dyn_buckets);
1192 info->version = DYN_BUCKET_VERSION(bucket, ipv6_add);
1194 version = DYN_BUCKET_VERSION(bucket, ipv6_del);
1195 CK_SLIST_FOREACH(s, &V_dyn_ipv6[bucket], entry) {
1196 DYNSTATE_PROTECT(s);
1197 if (version != DYN_BUCKET_VERSION(bucket, ipv6_del))
1199 if (s->proto != pkt->proto || s->zoneid != zoneid)
1201 if (info->kidx != 0 && s->kidx != info->kidx)
1203 if (s->sport == pkt->src_port && s->dport == pkt->dst_port &&
1204 IN6_ARE_ADDR_EQUAL(&s->src, &pkt->src_ip6) &&
1205 IN6_ARE_ADDR_EQUAL(&s->dst, &pkt->dst_ip6)) {
1206 info->direction = MATCH_FORWARD;
1209 if (s->sport == pkt->dst_port && s->dport == pkt->src_port &&
1210 IN6_ARE_ADDR_EQUAL(&s->src, &pkt->dst_ip6) &&
1211 IN6_ARE_ADDR_EQUAL(&s->dst, &pkt->src_ip6)) {
1212 info->direction = MATCH_REVERSE;
1217 dyn_update_proto_state(s->data, pkt, ulp, pktlen,
1223 * Lookup IPv6 state.
1224 * Simplifed version is used to check that matching state doesn't exist.
1227 dyn_lookup_ipv6_state_locked(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1228 const void *ulp, int pktlen, uint32_t bucket, uint16_t kidx)
1230 struct dyn_ipv6_state *s;
1234 DYN_BUCKET_ASSERT(bucket);
1235 CK_SLIST_FOREACH(s, &V_dyn_ipv6[bucket], entry) {
1236 if (s->proto != pkt->proto || s->kidx != kidx ||
1237 s->zoneid != zoneid)
1239 if (s->sport == pkt->src_port && s->dport == pkt->dst_port &&
1240 IN6_ARE_ADDR_EQUAL(&s->src, &pkt->src_ip6) &&
1241 IN6_ARE_ADDR_EQUAL(&s->dst, &pkt->dst_ip6)) {
1242 dir = MATCH_FORWARD;
1245 if (s->sport == pkt->dst_port && s->dport == pkt->src_port &&
1246 IN6_ARE_ADDR_EQUAL(&s->src, &pkt->dst_ip6) &&
1247 IN6_ARE_ADDR_EQUAL(&s->dst, &pkt->src_ip6)) {
1248 dir = MATCH_REVERSE;
1253 dyn_update_proto_state(s->data, pkt, ulp, pktlen, dir);
1257 static struct dyn_ipv6_state *
1258 dyn_lookup_ipv6_parent(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1259 const void *rule, uint32_t ruleid, uint16_t rulenum, uint32_t hashval)
1261 struct dyn_ipv6_state *s;
1262 uint32_t version, bucket;
1264 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1266 version = DYN_BUCKET_VERSION(bucket, ipv6_parent_del);
1267 CK_SLIST_FOREACH(s, &V_dyn_ipv6_parent[bucket], entry) {
1268 DYNSTATE_PROTECT(s);
1269 if (version != DYN_BUCKET_VERSION(bucket, ipv6_parent_del))
1272 * NOTE: we do not need to check kidx, because parent rule
1273 * can not create states with different kidx.
1274 * Also parent rule always created for forward direction.
1276 if (s->limit->parent == rule &&
1277 s->limit->ruleid == ruleid &&
1278 s->limit->rulenum == rulenum &&
1279 s->proto == pkt->proto &&
1280 s->sport == pkt->src_port &&
1281 s->dport == pkt->dst_port && s->zoneid == zoneid &&
1282 IN6_ARE_ADDR_EQUAL(&s->src, &pkt->src_ip6) &&
1283 IN6_ARE_ADDR_EQUAL(&s->dst, &pkt->dst_ip6)) {
1284 if (s->limit->expire != time_uptime +
1285 V_dyn_short_lifetime)
1286 ck_pr_store_32(&s->limit->expire,
1287 time_uptime + V_dyn_short_lifetime);
1294 static struct dyn_ipv6_state *
1295 dyn_lookup_ipv6_parent_locked(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1296 const void *rule, uint32_t ruleid, uint16_t rulenum, uint32_t bucket)
1298 struct dyn_ipv6_state *s;
1300 DYN_BUCKET_ASSERT(bucket);
1301 CK_SLIST_FOREACH(s, &V_dyn_ipv6_parent[bucket], entry) {
1302 if (s->limit->parent == rule &&
1303 s->limit->ruleid == ruleid &&
1304 s->limit->rulenum == rulenum &&
1305 s->proto == pkt->proto &&
1306 s->sport == pkt->src_port &&
1307 s->dport == pkt->dst_port && s->zoneid == zoneid &&
1308 IN6_ARE_ADDR_EQUAL(&s->src, &pkt->src_ip6) &&
1309 IN6_ARE_ADDR_EQUAL(&s->dst, &pkt->dst_ip6))
1318 * Lookup dynamic state.
1319 * pkt - filled by ipfw_chk() ipfw_flow_id;
1320 * ulp - determined by ipfw_chk() upper level protocol header;
1321 * dyn_info - info about matched state to return back;
1322 * Returns pointer to state's parent rule and dyn_info. If there is
1323 * no state, NULL is returned.
1324 * On match ipfw_dyn_lookup() updates state's counters.
1327 ipfw_dyn_lookup_state(const struct ip_fw_args *args, const void *ulp,
1328 int pktlen, const ipfw_insn *cmd, struct ipfw_dyn_info *info)
1330 struct dyn_data *data;
1333 IPFW_RLOCK_ASSERT(&V_layer3_chain);
1337 info->kidx = cmd->arg1;
1338 info->direction = MATCH_NONE;
1339 info->hashval = hash_packet(&args->f_id);
1341 DYNSTATE_CRITICAL_ENTER();
1342 if (IS_IP4_FLOW_ID(&args->f_id)) {
1343 struct dyn_ipv4_state *s;
1345 s = dyn_lookup_ipv4_state(&args->f_id, ulp, info, pktlen);
1348 * Dynamic states are created using the same 5-tuple,
1349 * so it is assumed, that parent rule for O_LIMIT
1350 * state has the same address family.
1353 if (s->type == O_LIMIT) {
1355 rule = s->limit->parent;
1357 rule = data->parent;
1361 else if (IS_IP6_FLOW_ID(&args->f_id)) {
1362 struct dyn_ipv6_state *s;
1364 s = dyn_lookup_ipv6_state(&args->f_id, dyn_getscopeid(args),
1368 if (s->type == O_LIMIT) {
1370 rule = s->limit->parent;
1372 rule = data->parent;
1378 * If cached chain id is the same, we can avoid rule index
1379 * lookup. Otherwise do lookup and update chain_id and f_pos.
1380 * It is safe even if there is concurrent thread that want
1381 * update the same state, because chain->id can be changed
1382 * only under IPFW_WLOCK().
1384 if (data->chain_id != V_layer3_chain.id) {
1385 data->f_pos = ipfw_find_rule(&V_layer3_chain,
1386 data->rulenum, data->ruleid);
1388 * Check that found state has not orphaned.
1389 * When chain->id being changed the parent
1390 * rule can be deleted. If found rule doesn't
1391 * match the parent pointer, consider this
1392 * result as MATCH_NONE and return NULL.
1394 * This will lead to creation of new similar state
1395 * that will be added into head of this bucket.
1396 * And the state that we currently have matched
1397 * should be deleted by dyn_expire_states().
1399 * In case when dyn_keep_states is enabled, return
1400 * pointer to default rule and corresponding f_pos
1402 * XXX: In this case we lose the cache efficiency,
1403 * since f_pos is not cached, because it seems
1404 * there is no easy way to atomically switch
1405 * all fields related to parent rule of given
1408 if (V_layer3_chain.map[data->f_pos] == rule) {
1409 data->chain_id = V_layer3_chain.id;
1410 info->f_pos = data->f_pos;
1411 } else if (V_dyn_keep_states != 0) {
1412 rule = V_layer3_chain.default_rule;
1413 info->f_pos = V_layer3_chain.n_rules - 1;
1416 info->direction = MATCH_NONE;
1417 DYN_DEBUG("rule %p [%u, %u] is considered "
1418 "invalid in data %p", rule, data->ruleid,
1419 data->rulenum, data);
1420 /* info->f_pos doesn't matter here. */
1423 info->f_pos = data->f_pos;
1425 DYNSTATE_CRITICAL_EXIT();
1428 * Return MATCH_NONE if parent rule is in disabled set.
1429 * This will lead to creation of new similar state that
1430 * will be added into head of this bucket.
1432 * XXXAE: we need to be able update state's set when parent
1433 * rule set is changed.
1435 if (rule != NULL && (V_set_disable & (1 << rule->set))) {
1437 info->direction = MATCH_NONE;
1443 static struct dyn_parent *
1444 dyn_alloc_parent(void *parent, uint32_t ruleid, uint16_t rulenum,
1445 uint8_t set, uint32_t hashval)
1447 struct dyn_parent *limit;
1449 limit = uma_zalloc(V_dyn_parent_zone, M_NOWAIT | M_ZERO);
1450 if (limit == NULL) {
1451 if (last_log != time_uptime) {
1452 last_log = time_uptime;
1454 "ipfw: Cannot allocate parent dynamic state, "
1455 "consider increasing "
1456 "net.inet.ip.fw.dyn_parent_max\n");
1461 limit->parent = parent;
1462 limit->ruleid = ruleid;
1463 limit->rulenum = rulenum;
1465 limit->hashval = hashval;
1466 limit->expire = time_uptime + V_dyn_short_lifetime;
1470 static struct dyn_data *
1471 dyn_alloc_dyndata(void *parent, uint32_t ruleid, uint16_t rulenum,
1472 uint8_t set, const struct ipfw_flow_id *pkt, const void *ulp, int pktlen,
1473 uint32_t hashval, uint16_t fibnum)
1475 struct dyn_data *data;
1477 data = uma_zalloc(V_dyn_data_zone, M_NOWAIT | M_ZERO);
1479 if (last_log != time_uptime) {
1480 last_log = time_uptime;
1482 "ipfw: Cannot allocate dynamic state, "
1483 "consider increasing net.inet.ip.fw.dyn_max\n");
1488 data->parent = parent;
1489 data->ruleid = ruleid;
1490 data->rulenum = rulenum;
1492 data->fibnum = fibnum;
1493 data->hashval = hashval;
1494 data->expire = time_uptime + V_dyn_syn_lifetime;
1495 dyn_update_proto_state(data, pkt, ulp, pktlen, MATCH_FORWARD);
1499 static struct dyn_ipv4_state *
1500 dyn_alloc_ipv4_state(const struct ipfw_flow_id *pkt, uint16_t kidx,
1503 struct dyn_ipv4_state *s;
1505 s = uma_zalloc(V_dyn_ipv4_zone, M_NOWAIT | M_ZERO);
1511 s->proto = pkt->proto;
1512 s->sport = pkt->src_port;
1513 s->dport = pkt->dst_port;
1514 s->src = pkt->src_ip;
1515 s->dst = pkt->dst_ip;
1520 * Add IPv4 parent state.
1521 * Returns pointer to parent state. When it is not NULL we are in
1522 * critical section and pointer protected by hazard pointer.
1523 * When some error occurs, it returns NULL and exit from critical section
1526 static struct dyn_ipv4_state *
1527 dyn_add_ipv4_parent(void *rule, uint32_t ruleid, uint16_t rulenum,
1528 uint8_t set, const struct ipfw_flow_id *pkt, uint32_t hashval,
1529 uint32_t version, uint16_t kidx)
1531 struct dyn_ipv4_state *s;
1532 struct dyn_parent *limit;
1535 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1536 DYN_BUCKET_LOCK(bucket);
1537 if (version != DYN_BUCKET_VERSION(bucket, ipv4_parent_add)) {
1539 * Bucket version has been changed since last lookup,
1540 * do lookup again to be sure that state does not exist.
1542 s = dyn_lookup_ipv4_parent_locked(pkt, rule, ruleid,
1546 * Simultaneous thread has already created this
1547 * state. Just return it.
1549 DYNSTATE_CRITICAL_ENTER();
1550 DYNSTATE_PROTECT(s);
1551 DYN_BUCKET_UNLOCK(bucket);
1556 limit = dyn_alloc_parent(rule, ruleid, rulenum, set, hashval);
1557 if (limit == NULL) {
1558 DYN_BUCKET_UNLOCK(bucket);
1562 s = dyn_alloc_ipv4_state(pkt, kidx, O_LIMIT_PARENT);
1564 DYN_BUCKET_UNLOCK(bucket);
1565 uma_zfree(V_dyn_parent_zone, limit);
1570 CK_SLIST_INSERT_HEAD(&V_dyn_ipv4_parent[bucket], s, entry);
1571 DYN_COUNT_INC(dyn_parent_count);
1572 DYN_BUCKET_VERSION_BUMP(bucket, ipv4_parent_add);
1573 DYNSTATE_CRITICAL_ENTER();
1574 DYNSTATE_PROTECT(s);
1575 DYN_BUCKET_UNLOCK(bucket);
1580 dyn_add_ipv4_state(void *parent, uint32_t ruleid, uint16_t rulenum,
1581 uint8_t set, const struct ipfw_flow_id *pkt, const void *ulp, int pktlen,
1582 uint32_t hashval, struct ipfw_dyn_info *info, uint16_t fibnum,
1583 uint16_t kidx, uint8_t type)
1585 struct dyn_ipv4_state *s;
1589 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1590 DYN_BUCKET_LOCK(bucket);
1591 if (info->direction == MATCH_UNKNOWN ||
1592 info->kidx != kidx ||
1593 info->hashval != hashval ||
1594 info->version != DYN_BUCKET_VERSION(bucket, ipv4_add)) {
1596 * Bucket version has been changed since last lookup,
1597 * do lookup again to be sure that state does not exist.
1599 if (dyn_lookup_ipv4_state_locked(pkt, ulp, pktlen,
1600 bucket, kidx) != 0) {
1601 DYN_BUCKET_UNLOCK(bucket);
1606 data = dyn_alloc_dyndata(parent, ruleid, rulenum, set, pkt, ulp,
1607 pktlen, hashval, fibnum);
1609 DYN_BUCKET_UNLOCK(bucket);
1613 s = dyn_alloc_ipv4_state(pkt, kidx, type);
1615 DYN_BUCKET_UNLOCK(bucket);
1616 uma_zfree(V_dyn_data_zone, data);
1621 CK_SLIST_INSERT_HEAD(&V_dyn_ipv4[bucket], s, entry);
1622 DYN_COUNT_INC(dyn_count);
1623 DYN_BUCKET_VERSION_BUMP(bucket, ipv4_add);
1624 DYN_BUCKET_UNLOCK(bucket);
1629 static struct dyn_ipv6_state *
1630 dyn_alloc_ipv6_state(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1631 uint16_t kidx, uint8_t type)
1633 struct dyn_ipv6_state *s;
1635 s = uma_zalloc(V_dyn_ipv6_zone, M_NOWAIT | M_ZERO);
1642 s->proto = pkt->proto;
1643 s->sport = pkt->src_port;
1644 s->dport = pkt->dst_port;
1645 s->src = pkt->src_ip6;
1646 s->dst = pkt->dst_ip6;
1651 * Add IPv6 parent state.
1652 * Returns pointer to parent state. When it is not NULL we are in
1653 * critical section and pointer protected by hazard pointer.
1654 * When some error occurs, it return NULL and exit from critical section
1657 static struct dyn_ipv6_state *
1658 dyn_add_ipv6_parent(void *rule, uint32_t ruleid, uint16_t rulenum,
1659 uint8_t set, const struct ipfw_flow_id *pkt, uint32_t zoneid,
1660 uint32_t hashval, uint32_t version, uint16_t kidx)
1662 struct dyn_ipv6_state *s;
1663 struct dyn_parent *limit;
1666 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1667 DYN_BUCKET_LOCK(bucket);
1668 if (version != DYN_BUCKET_VERSION(bucket, ipv6_parent_add)) {
1670 * Bucket version has been changed since last lookup,
1671 * do lookup again to be sure that state does not exist.
1673 s = dyn_lookup_ipv6_parent_locked(pkt, zoneid, rule, ruleid,
1677 * Simultaneous thread has already created this
1678 * state. Just return it.
1680 DYNSTATE_CRITICAL_ENTER();
1681 DYNSTATE_PROTECT(s);
1682 DYN_BUCKET_UNLOCK(bucket);
1687 limit = dyn_alloc_parent(rule, ruleid, rulenum, set, hashval);
1688 if (limit == NULL) {
1689 DYN_BUCKET_UNLOCK(bucket);
1693 s = dyn_alloc_ipv6_state(pkt, zoneid, kidx, O_LIMIT_PARENT);
1695 DYN_BUCKET_UNLOCK(bucket);
1696 uma_zfree(V_dyn_parent_zone, limit);
1701 CK_SLIST_INSERT_HEAD(&V_dyn_ipv6_parent[bucket], s, entry);
1702 DYN_COUNT_INC(dyn_parent_count);
1703 DYN_BUCKET_VERSION_BUMP(bucket, ipv6_parent_add);
1704 DYNSTATE_CRITICAL_ENTER();
1705 DYNSTATE_PROTECT(s);
1706 DYN_BUCKET_UNLOCK(bucket);
1711 dyn_add_ipv6_state(void *parent, uint32_t ruleid, uint16_t rulenum,
1712 uint8_t set, const struct ipfw_flow_id *pkt, uint32_t zoneid,
1713 const void *ulp, int pktlen, uint32_t hashval, struct ipfw_dyn_info *info,
1714 uint16_t fibnum, uint16_t kidx, uint8_t type)
1716 struct dyn_ipv6_state *s;
1717 struct dyn_data *data;
1720 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1721 DYN_BUCKET_LOCK(bucket);
1722 if (info->direction == MATCH_UNKNOWN ||
1723 info->kidx != kidx ||
1724 info->hashval != hashval ||
1725 info->version != DYN_BUCKET_VERSION(bucket, ipv6_add)) {
1727 * Bucket version has been changed since last lookup,
1728 * do lookup again to be sure that state does not exist.
1730 if (dyn_lookup_ipv6_state_locked(pkt, zoneid, ulp, pktlen,
1731 bucket, kidx) != 0) {
1732 DYN_BUCKET_UNLOCK(bucket);
1737 data = dyn_alloc_dyndata(parent, ruleid, rulenum, set, pkt, ulp,
1738 pktlen, hashval, fibnum);
1740 DYN_BUCKET_UNLOCK(bucket);
1744 s = dyn_alloc_ipv6_state(pkt, zoneid, kidx, type);
1746 DYN_BUCKET_UNLOCK(bucket);
1747 uma_zfree(V_dyn_data_zone, data);
1752 CK_SLIST_INSERT_HEAD(&V_dyn_ipv6[bucket], s, entry);
1753 DYN_COUNT_INC(dyn_count);
1754 DYN_BUCKET_VERSION_BUMP(bucket, ipv6_add);
1755 DYN_BUCKET_UNLOCK(bucket);
1761 dyn_get_parent_state(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1762 struct ip_fw *rule, uint32_t hashval, uint32_t limit, uint16_t kidx)
1765 struct dyn_parent *p;
1767 uint32_t bucket, version;
1771 bucket = DYN_BUCKET(hashval, V_curr_dyn_buckets);
1772 DYNSTATE_CRITICAL_ENTER();
1773 if (IS_IP4_FLOW_ID(pkt)) {
1774 struct dyn_ipv4_state *s;
1776 version = DYN_BUCKET_VERSION(bucket, ipv4_parent_add);
1777 s = dyn_lookup_ipv4_parent(pkt, rule, rule->id,
1778 rule->rulenum, bucket);
1781 * Exit from critical section because dyn_add_parent()
1782 * will acquire bucket lock.
1784 DYNSTATE_CRITICAL_EXIT();
1786 s = dyn_add_ipv4_parent(rule, rule->id,
1787 rule->rulenum, rule->set, pkt, hashval,
1791 /* Now we are in critical section again. */
1797 else if (IS_IP6_FLOW_ID(pkt)) {
1798 struct dyn_ipv6_state *s;
1800 version = DYN_BUCKET_VERSION(bucket, ipv6_parent_add);
1801 s = dyn_lookup_ipv6_parent(pkt, zoneid, rule, rule->id,
1802 rule->rulenum, bucket);
1805 * Exit from critical section because dyn_add_parent()
1806 * can acquire bucket mutex.
1808 DYNSTATE_CRITICAL_EXIT();
1810 s = dyn_add_ipv6_parent(rule, rule->id,
1811 rule->rulenum, rule->set, pkt, zoneid, hashval,
1815 /* Now we are in critical section again. */
1822 DYNSTATE_CRITICAL_EXIT();
1826 /* Check the limit */
1827 if (DPARENT_COUNT(p) >= limit) {
1828 DYNSTATE_CRITICAL_EXIT();
1829 if (V_fw_verbose && last_log != time_uptime) {
1830 last_log = time_uptime;
1831 snprintf(sbuf, sizeof(sbuf), "%u drop session",
1833 print_dyn_rule_flags(pkt, O_LIMIT,
1834 LOG_SECURITY | LOG_DEBUG, sbuf,
1835 "too many entries");
1840 /* Take new session into account. */
1841 DPARENT_COUNT_INC(p);
1843 * We must exit from critical section because the following code
1844 * can acquire bucket mutex.
1845 * We rely on the the 'count' field. The state will not expire
1846 * until it has some child states, i.e. 'count' field is not zero.
1847 * Return state pointer, it will be used by child states as parent.
1849 DYNSTATE_CRITICAL_EXIT();
1854 dyn_install_state(const struct ipfw_flow_id *pkt, uint32_t zoneid,
1855 uint16_t fibnum, const void *ulp, int pktlen, void *rule,
1856 uint32_t ruleid, uint16_t rulenum, uint8_t set,
1857 struct ipfw_dyn_info *info, uint32_t limit, uint16_t limit_mask,
1858 uint16_t kidx, uint8_t type)
1860 struct ipfw_flow_id id;
1861 uint32_t hashval, parent_hashval;
1864 MPASS(type == O_LIMIT || type == O_KEEP_STATE);
1866 if (type == O_LIMIT) {
1867 /* Create masked flow id and calculate bucket */
1868 id.addr_type = pkt->addr_type;
1869 id.proto = pkt->proto;
1870 id.fib = fibnum; /* unused */
1871 id.src_port = (limit_mask & DYN_SRC_PORT) ?
1873 id.dst_port = (limit_mask & DYN_DST_PORT) ?
1875 if (IS_IP4_FLOW_ID(pkt)) {
1876 id.src_ip = (limit_mask & DYN_SRC_ADDR) ?
1878 id.dst_ip = (limit_mask & DYN_DST_ADDR) ?
1882 else if (IS_IP6_FLOW_ID(pkt)) {
1883 if (limit_mask & DYN_SRC_ADDR)
1884 id.src_ip6 = pkt->src_ip6;
1886 memset(&id.src_ip6, 0, sizeof(id.src_ip6));
1887 if (limit_mask & DYN_DST_ADDR)
1888 id.dst_ip6 = pkt->dst_ip6;
1890 memset(&id.dst_ip6, 0, sizeof(id.dst_ip6));
1894 return (EAFNOSUPPORT);
1896 parent_hashval = hash_parent(&id, rule);
1897 rule = dyn_get_parent_state(&id, zoneid, rule, parent_hashval,
1901 if (V_fw_verbose && last_log != time_uptime) {
1902 last_log = time_uptime;
1903 snprintf(sbuf, sizeof(sbuf),
1904 "%u drop session", rule->rulenum);
1905 print_dyn_rule_flags(pkt, O_LIMIT,
1906 LOG_SECURITY | LOG_DEBUG, sbuf,
1907 "too many entries");
1913 * Limit is not reached, create new state.
1914 * Now rule points to parent state.
1918 hashval = hash_packet(pkt);
1919 if (IS_IP4_FLOW_ID(pkt))
1920 ret = dyn_add_ipv4_state(rule, ruleid, rulenum, set, pkt,
1921 ulp, pktlen, hashval, info, fibnum, kidx, type);
1923 else if (IS_IP6_FLOW_ID(pkt))
1924 ret = dyn_add_ipv6_state(rule, ruleid, rulenum, set, pkt,
1925 zoneid, ulp, pktlen, hashval, info, fibnum, kidx, type);
1930 if (type == O_LIMIT) {
1933 * We failed to create child state for O_LIMIT
1934 * opcode. Since we already counted it in the parent,
1935 * we must revert counter back. The 'rule' points to
1936 * parent state, use it to get dyn_parent.
1938 * XXXAE: it should be safe to use 'rule' pointer
1939 * without extra lookup, parent state is referenced
1940 * and should not be freed.
1942 if (IS_IP4_FLOW_ID(&id))
1944 ((struct dyn_ipv4_state *)rule)->limit);
1946 else if (IS_IP6_FLOW_ID(&id))
1948 ((struct dyn_ipv6_state *)rule)->limit);
1953 * EEXIST means that simultaneous thread has created this
1954 * state. Consider this as success.
1956 * XXXAE: should we invalidate 'info' content here?
1964 * Install dynamic state.
1965 * chain - ipfw's instance;
1966 * rule - the parent rule that installs the state;
1967 * cmd - opcode that installs the state;
1968 * args - ipfw arguments;
1969 * ulp - upper level protocol header;
1970 * pktlen - packet length;
1971 * info - dynamic state lookup info;
1972 * tablearg - tablearg id.
1974 * Returns non-zero value (failure) if state is not installed because
1975 * of errors or because session limitations are enforced.
1978 ipfw_dyn_install_state(struct ip_fw_chain *chain, struct ip_fw *rule,
1979 const ipfw_insn_limit *cmd, const struct ip_fw_args *args,
1980 const void *ulp, int pktlen, struct ipfw_dyn_info *info,
1984 uint16_t limit_mask;
1986 if (cmd->o.opcode == O_LIMIT) {
1987 limit = IP_FW_ARG_TABLEARG(chain, cmd->conn_limit, limit);
1988 limit_mask = cmd->limit_mask;
1993 return (dyn_install_state(&args->f_id,
1995 IS_IP6_FLOW_ID(&args->f_id) ? dyn_getscopeid(args):
1997 0, M_GETFIB(args->m), ulp, pktlen, rule, rule->id, rule->rulenum,
1998 rule->set, info, limit, limit_mask, cmd->o.arg1, cmd->o.opcode));
2002 * Free safe to remove state entries from expired lists.
2005 dyn_free_states(struct ip_fw_chain *chain)
2007 struct dyn_ipv4_state *s4, *s4n;
2009 struct dyn_ipv6_state *s6, *s6n;
2011 int cached_count, i;
2014 * We keep pointers to objects that are in use on each CPU
2015 * in the per-cpu dyn_hp pointer. When object is going to be
2016 * removed, first of it is unlinked from the corresponding
2017 * list. This leads to changing of dyn_bucket_xxx_delver version.
2018 * Unlinked objects is placed into corresponding dyn_expired_xxx
2019 * list. Reader that is going to dereference object pointer checks
2020 * dyn_bucket_xxx_delver version before and after storing pointer
2021 * into dyn_hp. If version is the same, the object is protected
2022 * from freeing and it is safe to dereference. Othervise reader
2023 * tries to iterate list again from the beginning, but this object
2024 * now unlinked and thus will not be accessible.
2026 * Copy dyn_hp pointers for each CPU into dyn_hp_cache array.
2027 * It does not matter that some pointer can be changed in
2028 * time while we are copying. We need to check, that objects
2029 * removed in the previous pass are not in use. And if dyn_hp
2030 * pointer does not contain it in the time when we are copying,
2031 * it will not appear there, because it is already unlinked.
2032 * And for new pointers we will not free objects that will be
2033 * unlinked in this pass.
2037 dyn_hp_cache[cached_count] = DYNSTATE_GET(i);
2038 if (dyn_hp_cache[cached_count] != NULL)
2043 * Free expired states that are safe to free.
2044 * Check each entry from previous pass in the dyn_expired_xxx
2045 * list, if pointer to the object is in the dyn_hp_cache array,
2046 * keep it until next pass. Otherwise it is safe to free the
2049 * XXXAE: optimize this to use SLIST_REMOVE_AFTER.
2051 #define DYN_FREE_STATES(s, next, name) do { \
2052 s = SLIST_FIRST(&V_dyn_expired_ ## name); \
2053 while (s != NULL) { \
2054 next = SLIST_NEXT(s, expired); \
2055 for (i = 0; i < cached_count; i++) \
2056 if (dyn_hp_cache[i] == s) \
2058 if (i == cached_count) { \
2059 if (s->type == O_LIMIT_PARENT && \
2060 s->limit->count != 0) { \
2064 SLIST_REMOVE(&V_dyn_expired_ ## name, \
2065 s, dyn_ ## name ## _state, expired); \
2066 if (s->type == O_LIMIT_PARENT) \
2067 uma_zfree(V_dyn_parent_zone, s->limit); \
2069 uma_zfree(V_dyn_data_zone, s->data); \
2070 uma_zfree(V_dyn_ ## name ## _zone, s); \
2077 * Protect access to expired lists with DYN_EXPIRED_LOCK.
2078 * Userland can invoke ipfw_expire_dyn_states() to delete
2079 * specific states, this will lead to modification of expired
2082 * XXXAE: do we need DYN_EXPIRED_LOCK? We can just use
2083 * IPFW_UH_WLOCK to protect access to these lists.
2086 DYN_FREE_STATES(s4, s4n, ipv4);
2088 DYN_FREE_STATES(s6, s6n, ipv6);
2090 DYN_EXPIRED_UNLOCK();
2091 #undef DYN_FREE_STATES
2095 * Returns 1 when state is matched by specified range, otherwise returns 0.
2098 dyn_match_range(uint16_t rulenum, uint8_t set, const ipfw_range_tlv *rt)
2102 /* flush all states */
2103 if (rt->flags & IPFW_RCFLAG_ALL)
2105 if ((rt->flags & IPFW_RCFLAG_SET) != 0 && set != rt->set)
2107 if ((rt->flags & IPFW_RCFLAG_RANGE) != 0 &&
2108 (rulenum < rt->start_rule || rulenum > rt->end_rule))
2114 dyn_match_ipv4_state(struct dyn_ipv4_state *s, const ipfw_range_tlv *rt)
2117 if (s->type == O_LIMIT_PARENT)
2118 return (dyn_match_range(s->limit->rulenum,
2119 s->limit->set, rt));
2121 if (s->type == O_LIMIT)
2122 return (dyn_match_range(s->data->rulenum, s->data->set, rt));
2124 if (V_dyn_keep_states == 0 &&
2125 dyn_match_range(s->data->rulenum, s->data->set, rt))
2133 dyn_match_ipv6_state(struct dyn_ipv6_state *s, const ipfw_range_tlv *rt)
2136 if (s->type == O_LIMIT_PARENT)
2137 return (dyn_match_range(s->limit->rulenum,
2138 s->limit->set, rt));
2140 if (s->type == O_LIMIT)
2141 return (dyn_match_range(s->data->rulenum, s->data->set, rt));
2143 if (V_dyn_keep_states == 0 &&
2144 dyn_match_range(s->data->rulenum, s->data->set, rt))
2152 * Unlink expired entries from states lists.
2153 * @rt can be used to specify the range of states for deletion.
2156 dyn_expire_states(struct ip_fw_chain *chain, ipfw_range_tlv *rt)
2158 struct dyn_ipv4_slist expired_ipv4;
2160 struct dyn_ipv6_slist expired_ipv6;
2161 struct dyn_ipv6_state *s6, *s6n, *s6p;
2163 struct dyn_ipv4_state *s4, *s4n, *s4p;
2164 int bucket, removed, length, max_length;
2167 * Unlink expired states from each bucket.
2168 * With acquired bucket lock iterate entries of each lists:
2169 * ipv4, ipv4_parent, ipv6, and ipv6_parent. Check expired time
2170 * and unlink entry from the list, link entry into temporary
2171 * expired_xxx lists then bump "del" bucket version.
2173 * When an entry is removed, corresponding states counter is
2174 * decremented. If entry has O_LIMIT type, parent's reference
2175 * counter is decremented.
2177 * NOTE: this function can be called from userspace context
2178 * when user deletes rules. In this case all matched states
2179 * will be forcedly unlinked. O_LIMIT_PARENT states will be kept
2180 * in the expired lists until reference counter become zero.
2182 #define DYN_UNLINK_STATES(s, prev, next, exp, af, name, extra) do { \
2186 s = CK_SLIST_FIRST(&V_dyn_ ## name [bucket]); \
2187 while (s != NULL) { \
2188 next = CK_SLIST_NEXT(s, entry); \
2189 if ((TIME_LEQ((s)->exp, time_uptime) && extra) || \
2190 (rt != NULL && dyn_match_ ## af ## _state(s, rt))) {\
2192 CK_SLIST_REMOVE_AFTER(prev, entry); \
2194 CK_SLIST_REMOVE_HEAD( \
2195 &V_dyn_ ## name [bucket], entry); \
2197 SLIST_INSERT_HEAD(&expired_ ## af, s, expired); \
2198 if (s->type == O_LIMIT_PARENT) \
2199 DYN_COUNT_DEC(dyn_parent_count); \
2201 DYN_COUNT_DEC(dyn_count); \
2202 if (s->type == O_LIMIT) { \
2203 s = s->data->parent; \
2204 DPARENT_COUNT_DEC(s->limit); \
2214 DYN_BUCKET_VERSION_BUMP(bucket, name ## _del); \
2215 if (length > max_length) \
2216 max_length = length; \
2219 SLIST_INIT(&expired_ipv4);
2221 SLIST_INIT(&expired_ipv6);
2224 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
2225 DYN_BUCKET_LOCK(bucket);
2226 DYN_UNLINK_STATES(s4, s4p, s4n, data->expire, ipv4, ipv4, 1);
2227 DYN_UNLINK_STATES(s4, s4p, s4n, limit->expire, ipv4,
2228 ipv4_parent, (s4->limit->count == 0));
2230 DYN_UNLINK_STATES(s6, s6p, s6n, data->expire, ipv6, ipv6, 1);
2231 DYN_UNLINK_STATES(s6, s6p, s6n, limit->expire, ipv6,
2232 ipv6_parent, (s6->limit->count == 0));
2234 DYN_BUCKET_UNLOCK(bucket);
2236 /* Update curr_max_length for statistics. */
2237 V_curr_max_length = max_length;
2239 * Concatenate temporary lists with global expired lists.
2242 SLIST_CONCAT(&V_dyn_expired_ipv4, &expired_ipv4,
2243 dyn_ipv4_state, expired);
2245 SLIST_CONCAT(&V_dyn_expired_ipv6, &expired_ipv6,
2246 dyn_ipv6_state, expired);
2248 DYN_EXPIRED_UNLOCK();
2249 #undef DYN_UNLINK_STATES
2250 #undef DYN_UNREF_STATES
2253 static struct mbuf *
2254 dyn_mgethdr(int len, uint16_t fibnum)
2258 m = m_gethdr(M_NOWAIT, MT_DATA);
2262 mac_netinet_firewall_send(m);
2264 M_SETFIB(m, fibnum);
2265 m->m_data += max_linkhdr;
2266 m->m_flags |= M_SKIP_FIREWALL;
2267 m->m_len = m->m_pkthdr.len = len;
2268 bzero(m->m_data, len);
2273 dyn_make_keepalive_ipv4(struct mbuf *m, in_addr_t src, in_addr_t dst,
2274 uint32_t seq, uint32_t ack, uint16_t sport, uint16_t dport)
2279 ip = mtod(m, struct ip *);
2281 ip->ip_hl = sizeof(*ip) >> 2;
2282 ip->ip_tos = IPTOS_LOWDELAY;
2283 ip->ip_len = htons(m->m_len);
2284 ip->ip_off |= htons(IP_DF);
2285 ip->ip_ttl = V_ip_defttl;
2286 ip->ip_p = IPPROTO_TCP;
2287 ip->ip_src.s_addr = htonl(src);
2288 ip->ip_dst.s_addr = htonl(dst);
2290 tcp = mtodo(m, sizeof(struct ip));
2291 tcp->th_sport = htons(sport);
2292 tcp->th_dport = htons(dport);
2293 tcp->th_off = sizeof(struct tcphdr) >> 2;
2294 tcp->th_seq = htonl(seq);
2295 tcp->th_ack = htonl(ack);
2296 tcp->th_flags = TH_ACK;
2297 tcp->th_sum = in_pseudo(ip->ip_src.s_addr, ip->ip_dst.s_addr,
2298 htons(sizeof(struct tcphdr) + IPPROTO_TCP));
2300 m->m_pkthdr.csum_data = offsetof(struct tcphdr, th_sum);
2301 m->m_pkthdr.csum_flags = CSUM_TCP;
2305 dyn_enqueue_keepalive_ipv4(struct mbufq *q, const struct dyn_ipv4_state *s)
2309 if ((s->data->state & ACK_FWD) == 0 && s->data->ack_fwd > 0) {
2310 m = dyn_mgethdr(sizeof(struct ip) + sizeof(struct tcphdr),
2313 dyn_make_keepalive_ipv4(m, s->dst, s->src,
2314 s->data->ack_fwd - 1, s->data->ack_rev,
2315 s->dport, s->sport);
2316 if (mbufq_enqueue(q, m)) {
2318 log(LOG_DEBUG, "ipfw: limit for IPv4 "
2319 "keepalive queue is reached.\n");
2325 if ((s->data->state & ACK_REV) == 0 && s->data->ack_rev > 0) {
2326 m = dyn_mgethdr(sizeof(struct ip) + sizeof(struct tcphdr),
2329 dyn_make_keepalive_ipv4(m, s->src, s->dst,
2330 s->data->ack_rev - 1, s->data->ack_fwd,
2331 s->sport, s->dport);
2332 if (mbufq_enqueue(q, m)) {
2334 log(LOG_DEBUG, "ipfw: limit for IPv4 "
2335 "keepalive queue is reached.\n");
2343 * Prepare and send keep-alive packets.
2346 dyn_send_keepalive_ipv4(struct ip_fw_chain *chain)
2350 struct dyn_ipv4_state *s;
2353 mbufq_init(&q, DYN_KEEPALIVE_MAXQ);
2354 IPFW_UH_RLOCK(chain);
2356 * It is safe to not use hazard pointer and just do lockless
2357 * access to the lists, because states entries can not be deleted
2358 * while we hold IPFW_UH_RLOCK.
2360 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
2361 CK_SLIST_FOREACH(s, &V_dyn_ipv4[bucket], entry) {
2363 * Only established TCP connections that will
2364 * become expired withing dyn_keepalive_interval.
2366 if (s->proto != IPPROTO_TCP ||
2367 (s->data->state & BOTH_SYN) != BOTH_SYN ||
2368 TIME_LEQ(time_uptime + V_dyn_keepalive_interval,
2371 dyn_enqueue_keepalive_ipv4(&q, s);
2374 IPFW_UH_RUNLOCK(chain);
2375 while ((m = mbufq_dequeue(&q)) != NULL)
2376 ip_output(m, NULL, NULL, 0, NULL, NULL);
2381 dyn_make_keepalive_ipv6(struct mbuf *m, const struct in6_addr *src,
2382 const struct in6_addr *dst, uint32_t zoneid, uint32_t seq, uint32_t ack,
2383 uint16_t sport, uint16_t dport)
2386 struct ip6_hdr *ip6;
2388 ip6 = mtod(m, struct ip6_hdr *);
2389 ip6->ip6_vfc |= IPV6_VERSION;
2390 ip6->ip6_plen = htons(sizeof(struct tcphdr));
2391 ip6->ip6_nxt = IPPROTO_TCP;
2392 ip6->ip6_hlim = IPV6_DEFHLIM;
2393 ip6->ip6_src = *src;
2394 if (IN6_IS_ADDR_LINKLOCAL(src))
2395 ip6->ip6_src.s6_addr16[1] = htons(zoneid & 0xffff);
2396 ip6->ip6_dst = *dst;
2397 if (IN6_IS_ADDR_LINKLOCAL(dst))
2398 ip6->ip6_dst.s6_addr16[1] = htons(zoneid & 0xffff);
2400 tcp = mtodo(m, sizeof(struct ip6_hdr));
2401 tcp->th_sport = htons(sport);
2402 tcp->th_dport = htons(dport);
2403 tcp->th_off = sizeof(struct tcphdr) >> 2;
2404 tcp->th_seq = htonl(seq);
2405 tcp->th_ack = htonl(ack);
2406 tcp->th_flags = TH_ACK;
2407 tcp->th_sum = in6_cksum_pseudo(ip6, sizeof(struct tcphdr),
2410 m->m_pkthdr.csum_data = offsetof(struct tcphdr, th_sum);
2411 m->m_pkthdr.csum_flags = CSUM_TCP_IPV6;
2415 dyn_enqueue_keepalive_ipv6(struct mbufq *q, const struct dyn_ipv6_state *s)
2419 if ((s->data->state & ACK_FWD) == 0 && s->data->ack_fwd > 0) {
2420 m = dyn_mgethdr(sizeof(struct ip6_hdr) +
2421 sizeof(struct tcphdr), s->data->fibnum);
2423 dyn_make_keepalive_ipv6(m, &s->dst, &s->src,
2424 s->zoneid, s->data->ack_fwd - 1, s->data->ack_rev,
2425 s->dport, s->sport);
2426 if (mbufq_enqueue(q, m)) {
2428 log(LOG_DEBUG, "ipfw: limit for IPv6 "
2429 "keepalive queue is reached.\n");
2435 if ((s->data->state & ACK_REV) == 0 && s->data->ack_rev > 0) {
2436 m = dyn_mgethdr(sizeof(struct ip6_hdr) +
2437 sizeof(struct tcphdr), s->data->fibnum);
2439 dyn_make_keepalive_ipv6(m, &s->src, &s->dst,
2440 s->zoneid, s->data->ack_rev - 1, s->data->ack_fwd,
2441 s->sport, s->dport);
2442 if (mbufq_enqueue(q, m)) {
2444 log(LOG_DEBUG, "ipfw: limit for IPv6 "
2445 "keepalive queue is reached.\n");
2453 dyn_send_keepalive_ipv6(struct ip_fw_chain *chain)
2457 struct dyn_ipv6_state *s;
2460 mbufq_init(&q, DYN_KEEPALIVE_MAXQ);
2461 IPFW_UH_RLOCK(chain);
2463 * It is safe to not use hazard pointer and just do lockless
2464 * access to the lists, because states entries can not be deleted
2465 * while we hold IPFW_UH_RLOCK.
2467 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
2468 CK_SLIST_FOREACH(s, &V_dyn_ipv6[bucket], entry) {
2470 * Only established TCP connections that will
2471 * become expired withing dyn_keepalive_interval.
2473 if (s->proto != IPPROTO_TCP ||
2474 (s->data->state & BOTH_SYN) != BOTH_SYN ||
2475 TIME_LEQ(time_uptime + V_dyn_keepalive_interval,
2478 dyn_enqueue_keepalive_ipv6(&q, s);
2481 IPFW_UH_RUNLOCK(chain);
2482 while ((m = mbufq_dequeue(&q)) != NULL)
2483 ip6_output(m, NULL, NULL, 0, NULL, NULL, NULL);
2488 dyn_grow_hashtable(struct ip_fw_chain *chain, uint32_t new)
2491 struct dyn_ipv6ck_slist *ipv6, *ipv6_parent;
2492 uint32_t *ipv6_add, *ipv6_del, *ipv6_parent_add, *ipv6_parent_del;
2493 struct dyn_ipv6_state *s6;
2495 struct dyn_ipv4ck_slist *ipv4, *ipv4_parent;
2496 uint32_t *ipv4_add, *ipv4_del, *ipv4_parent_add, *ipv4_parent_del;
2497 struct dyn_ipv4_state *s4;
2498 struct mtx *bucket_lock;
2502 MPASS(powerof2(new));
2503 DYN_DEBUG("grow hash size %u -> %u", V_curr_dyn_buckets, new);
2505 * Allocate and initialize new lists.
2506 * XXXAE: on memory pressure this can disable callout timer.
2508 bucket_lock = malloc(new * sizeof(struct mtx), M_IPFW,
2510 ipv4 = malloc(new * sizeof(struct dyn_ipv4ck_slist), M_IPFW,
2512 ipv4_parent = malloc(new * sizeof(struct dyn_ipv4ck_slist), M_IPFW,
2514 ipv4_add = malloc(new * sizeof(uint32_t), M_IPFW, M_WAITOK | M_ZERO);
2515 ipv4_del = malloc(new * sizeof(uint32_t), M_IPFW, M_WAITOK | M_ZERO);
2516 ipv4_parent_add = malloc(new * sizeof(uint32_t), M_IPFW,
2518 ipv4_parent_del = malloc(new * sizeof(uint32_t), M_IPFW,
2521 ipv6 = malloc(new * sizeof(struct dyn_ipv6ck_slist), M_IPFW,
2523 ipv6_parent = malloc(new * sizeof(struct dyn_ipv6ck_slist), M_IPFW,
2525 ipv6_add = malloc(new * sizeof(uint32_t), M_IPFW, M_WAITOK | M_ZERO);
2526 ipv6_del = malloc(new * sizeof(uint32_t), M_IPFW, M_WAITOK | M_ZERO);
2527 ipv6_parent_add = malloc(new * sizeof(uint32_t), M_IPFW,
2529 ipv6_parent_del = malloc(new * sizeof(uint32_t), M_IPFW,
2532 for (bucket = 0; bucket < new; bucket++) {
2533 DYN_BUCKET_LOCK_INIT(bucket_lock, bucket);
2534 CK_SLIST_INIT(&ipv4[bucket]);
2535 CK_SLIST_INIT(&ipv4_parent[bucket]);
2537 CK_SLIST_INIT(&ipv6[bucket]);
2538 CK_SLIST_INIT(&ipv6_parent[bucket]);
2542 #define DYN_RELINK_STATES(s, hval, i, head, ohead) do { \
2543 while ((s = CK_SLIST_FIRST(&V_dyn_ ## ohead[i])) != NULL) { \
2544 CK_SLIST_REMOVE_HEAD(&V_dyn_ ## ohead[i], entry); \
2545 CK_SLIST_INSERT_HEAD(&head[DYN_BUCKET(s->hval, new)], \
2550 * Prevent rules changing from userland.
2552 IPFW_UH_WLOCK(chain);
2554 * Hold traffic processing until we finish resize to
2555 * prevent access to states lists.
2558 /* Re-link all dynamic states */
2559 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
2560 DYN_RELINK_STATES(s4, data->hashval, bucket, ipv4, ipv4);
2561 DYN_RELINK_STATES(s4, limit->hashval, bucket, ipv4_parent,
2564 DYN_RELINK_STATES(s6, data->hashval, bucket, ipv6, ipv6);
2565 DYN_RELINK_STATES(s6, limit->hashval, bucket, ipv6_parent,
2570 #define DYN_SWAP_PTR(old, new, tmp) do { \
2576 DYN_SWAP_PTR(V_dyn_bucket_lock, bucket_lock, tmp);
2577 DYN_SWAP_PTR(V_dyn_ipv4, ipv4, tmp);
2578 DYN_SWAP_PTR(V_dyn_ipv4_parent, ipv4_parent, tmp);
2579 DYN_SWAP_PTR(V_dyn_ipv4_add, ipv4_add, tmp);
2580 DYN_SWAP_PTR(V_dyn_ipv4_parent_add, ipv4_parent_add, tmp);
2581 DYN_SWAP_PTR(V_dyn_ipv4_del, ipv4_del, tmp);
2582 DYN_SWAP_PTR(V_dyn_ipv4_parent_del, ipv4_parent_del, tmp);
2585 DYN_SWAP_PTR(V_dyn_ipv6, ipv6, tmp);
2586 DYN_SWAP_PTR(V_dyn_ipv6_parent, ipv6_parent, tmp);
2587 DYN_SWAP_PTR(V_dyn_ipv6_add, ipv6_add, tmp);
2588 DYN_SWAP_PTR(V_dyn_ipv6_parent_add, ipv6_parent_add, tmp);
2589 DYN_SWAP_PTR(V_dyn_ipv6_del, ipv6_del, tmp);
2590 DYN_SWAP_PTR(V_dyn_ipv6_parent_del, ipv6_parent_del, tmp);
2592 bucket = V_curr_dyn_buckets;
2593 V_curr_dyn_buckets = new;
2595 IPFW_WUNLOCK(chain);
2596 IPFW_UH_WUNLOCK(chain);
2598 /* Release old resources */
2599 while (bucket-- != 0)
2600 DYN_BUCKET_LOCK_DESTROY(bucket_lock, bucket);
2601 free(bucket_lock, M_IPFW);
2603 free(ipv4_parent, M_IPFW);
2604 free(ipv4_add, M_IPFW);
2605 free(ipv4_parent_add, M_IPFW);
2606 free(ipv4_del, M_IPFW);
2607 free(ipv4_parent_del, M_IPFW);
2610 free(ipv6_parent, M_IPFW);
2611 free(ipv6_add, M_IPFW);
2612 free(ipv6_parent_add, M_IPFW);
2613 free(ipv6_del, M_IPFW);
2614 free(ipv6_parent_del, M_IPFW);
2619 * This function is used to perform various maintenance
2620 * on dynamic hash lists. Currently it is called every second.
2623 dyn_tick(void *vnetx)
2627 CURVNET_SET((struct vnet *)vnetx);
2629 * First free states unlinked in previous passes.
2631 dyn_free_states(&V_layer3_chain);
2633 * Now unlink others expired states.
2634 * We use IPFW_UH_WLOCK to avoid concurrent call of
2635 * dyn_expire_states(). It is the only function that does
2636 * deletion of state entries from states lists.
2638 IPFW_UH_WLOCK(&V_layer3_chain);
2639 dyn_expire_states(&V_layer3_chain, NULL);
2640 IPFW_UH_WUNLOCK(&V_layer3_chain);
2642 * Send keepalives if they are enabled and the time has come.
2644 if (V_dyn_keepalive != 0 &&
2645 V_dyn_keepalive_last + V_dyn_keepalive_period <= time_uptime) {
2646 V_dyn_keepalive_last = time_uptime;
2647 dyn_send_keepalive_ipv4(&V_layer3_chain);
2649 dyn_send_keepalive_ipv6(&V_layer3_chain);
2653 * Check if we need to resize the hash:
2654 * if current number of states exceeds number of buckets in hash,
2655 * and dyn_buckets_max permits to grow the number of buckets, then
2656 * do it. Grow hash size to the minimum power of 2 which is bigger
2657 * than current states count.
2659 if (V_curr_dyn_buckets < V_dyn_buckets_max &&
2660 (V_curr_dyn_buckets < V_dyn_count / 2 || (
2661 V_curr_dyn_buckets < V_dyn_count && V_curr_max_length > 8))) {
2662 buckets = 1 << fls(V_dyn_count);
2663 if (buckets > V_dyn_buckets_max)
2664 buckets = V_dyn_buckets_max;
2665 dyn_grow_hashtable(&V_layer3_chain, buckets);
2668 callout_reset_on(&V_dyn_timeout, hz, dyn_tick, vnetx, 0);
2673 ipfw_expire_dyn_states(struct ip_fw_chain *chain, ipfw_range_tlv *rt)
2676 * Do not perform any checks if we currently have no dynamic states
2678 if (V_dyn_count == 0)
2681 IPFW_UH_WLOCK_ASSERT(chain);
2682 dyn_expire_states(chain, rt);
2686 * Returns size of dynamic states in legacy format
2692 return ((V_dyn_count + V_dyn_parent_count) * sizeof(ipfw_dyn_rule));
2696 * Returns number of dynamic states.
2697 * Used by dump format v1 (current).
2700 ipfw_dyn_get_count(void)
2703 return (V_dyn_count + V_dyn_parent_count);
2707 * Check if rule contains at least one dynamic opcode.
2709 * Returns 1 if such opcode is found, 0 otherwise.
2712 ipfw_is_dyn_rule(struct ip_fw *rule)
2720 for ( ; l > 0 ; l -= cmdlen, cmd += cmdlen) {
2721 cmdlen = F_LEN(cmd);
2723 switch (cmd->opcode) {
2736 dyn_export_parent(const struct dyn_parent *p, uint16_t kidx,
2740 dst->dyn_type = O_LIMIT_PARENT;
2742 dst->count = (uint16_t)DPARENT_COUNT(p);
2743 dst->expire = TIME_LEQ(p->expire, time_uptime) ? 0:
2744 p->expire - time_uptime;
2746 /* 'rule' is used to pass up the rule number and set */
2747 memcpy(&dst->rule, &p->rulenum, sizeof(p->rulenum));
2748 /* store set number into high word of dst->rule pointer. */
2749 memcpy((char *)&dst->rule + sizeof(p->rulenum), &p->set,
2759 dst->bucket = p->hashval;
2761 * The legacy userland code will interpret a NULL here as a marker
2762 * for the last dynamic rule.
2764 dst->next = (ipfw_dyn_rule *)1;
2768 dyn_export_data(const struct dyn_data *data, uint16_t kidx, uint8_t type,
2772 dst->dyn_type = type;
2774 dst->pcnt = data->pcnt_fwd + data->pcnt_rev;
2775 dst->bcnt = data->bcnt_fwd + data->bcnt_rev;
2776 dst->expire = TIME_LEQ(data->expire, time_uptime) ? 0:
2777 data->expire - time_uptime;
2779 /* 'rule' is used to pass up the rule number and set */
2780 memcpy(&dst->rule, &data->rulenum, sizeof(data->rulenum));
2781 /* store set number into high word of dst->rule pointer. */
2782 memcpy((char *)&dst->rule + sizeof(data->rulenum), &data->set,
2787 dst->state = data->state;
2788 dst->ack_fwd = data->ack_fwd;
2789 dst->ack_rev = data->ack_rev;
2791 dst->bucket = data->hashval;
2793 * The legacy userland code will interpret a NULL here as a marker
2794 * for the last dynamic rule.
2796 dst->next = (ipfw_dyn_rule *)1;
2800 dyn_export_ipv4_state(const struct dyn_ipv4_state *s, ipfw_dyn_rule *dst)
2804 case O_LIMIT_PARENT:
2805 dyn_export_parent(s->limit, s->kidx, dst);
2808 dyn_export_data(s->data, s->kidx, s->type, dst);
2811 dst->id.dst_ip = s->dst;
2812 dst->id.src_ip = s->src;
2813 dst->id.dst_port = s->dport;
2814 dst->id.src_port = s->sport;
2815 dst->id.fib = s->data->fibnum;
2816 dst->id.proto = s->proto;
2818 dst->id.addr_type = 4;
2820 memset(&dst->id.dst_ip6, 0, sizeof(dst->id.dst_ip6));
2821 memset(&dst->id.src_ip6, 0, sizeof(dst->id.src_ip6));
2822 dst->id.flow_id6 = dst->id.extra = 0;
2827 dyn_export_ipv6_state(const struct dyn_ipv6_state *s, ipfw_dyn_rule *dst)
2831 case O_LIMIT_PARENT:
2832 dyn_export_parent(s->limit, s->kidx, dst);
2835 dyn_export_data(s->data, s->kidx, s->type, dst);
2838 dst->id.src_ip6 = s->src;
2839 dst->id.dst_ip6 = s->dst;
2840 dst->id.dst_port = s->dport;
2841 dst->id.src_port = s->sport;
2842 dst->id.fib = s->data->fibnum;
2843 dst->id.proto = s->proto;
2845 dst->id.addr_type = 6;
2847 dst->id.dst_ip = dst->id.src_ip = 0;
2848 dst->id.flow_id6 = dst->id.extra = 0;
2853 * Fills the buffer given by @sd with dynamic states.
2854 * Used by dump format v1 (current).
2856 * Returns 0 on success.
2859 ipfw_dump_states(struct ip_fw_chain *chain, struct sockopt_data *sd)
2862 struct dyn_ipv6_state *s6;
2864 struct dyn_ipv4_state *s4;
2865 ipfw_obj_dyntlv *dst, *last;
2866 ipfw_obj_ctlv *ctlv;
2869 if (V_dyn_count == 0)
2873 * IPFW_UH_RLOCK garantees that another userland request
2874 * and callout thread will not delete entries from states
2877 IPFW_UH_RLOCK_ASSERT(chain);
2879 ctlv = (ipfw_obj_ctlv *)ipfw_get_sopt_space(sd, sizeof(*ctlv));
2882 ctlv->head.type = IPFW_TLV_DYNSTATE_LIST;
2883 ctlv->objsize = sizeof(ipfw_obj_dyntlv);
2886 #define DYN_EXPORT_STATES(s, af, h, b) \
2887 CK_SLIST_FOREACH(s, &V_dyn_ ## h[b], entry) { \
2888 dst = (ipfw_obj_dyntlv *)ipfw_get_sopt_space(sd, \
2889 sizeof(ipfw_obj_dyntlv)); \
2892 dyn_export_ ## af ## _state(s, &dst->state); \
2893 dst->head.length = sizeof(ipfw_obj_dyntlv); \
2894 dst->head.type = IPFW_TLV_DYN_ENT; \
2898 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
2899 DYN_EXPORT_STATES(s4, ipv4, ipv4_parent, bucket);
2900 DYN_EXPORT_STATES(s4, ipv4, ipv4, bucket);
2902 DYN_EXPORT_STATES(s6, ipv6, ipv6_parent, bucket);
2903 DYN_EXPORT_STATES(s6, ipv6, ipv6, bucket);
2907 /* mark last dynamic rule */
2909 last->head.flags = IPFW_DF_LAST; /* XXX: unused */
2911 #undef DYN_EXPORT_STATES
2915 * Fill given buffer with dynamic states (legacy format).
2916 * IPFW_UH_RLOCK has to be held while calling.
2919 ipfw_get_dynamic(struct ip_fw_chain *chain, char **pbp, const char *ep)
2922 struct dyn_ipv6_state *s6;
2924 struct dyn_ipv4_state *s4;
2925 ipfw_dyn_rule *p, *last = NULL;
2929 if (V_dyn_count == 0)
2933 IPFW_UH_RLOCK_ASSERT(chain);
2935 #define DYN_EXPORT_STATES(s, af, head, b) \
2936 CK_SLIST_FOREACH(s, &V_dyn_ ## head[b], entry) { \
2937 if (bp + sizeof(*p) > ep) \
2939 p = (ipfw_dyn_rule *)bp; \
2940 dyn_export_ ## af ## _state(s, p); \
2945 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
2946 DYN_EXPORT_STATES(s4, ipv4, ipv4_parent, bucket);
2947 DYN_EXPORT_STATES(s4, ipv4, ipv4, bucket);
2949 DYN_EXPORT_STATES(s6, ipv6, ipv6_parent, bucket);
2950 DYN_EXPORT_STATES(s6, ipv6, ipv6, bucket);
2954 if (last != NULL) /* mark last dynamic rule */
2957 #undef DYN_EXPORT_STATES
2961 ipfw_dyn_init(struct ip_fw_chain *chain)
2964 #ifdef IPFIREWALL_JENKINSHASH
2965 V_dyn_hashseed = arc4random();
2967 V_dyn_max = 16384; /* max # of states */
2968 V_dyn_parent_max = 4096; /* max # of parent states */
2969 V_dyn_buckets_max = 8192; /* must be power of 2 */
2971 V_dyn_ack_lifetime = 300;
2972 V_dyn_syn_lifetime = 20;
2973 V_dyn_fin_lifetime = 1;
2974 V_dyn_rst_lifetime = 1;
2975 V_dyn_udp_lifetime = 10;
2976 V_dyn_short_lifetime = 5;
2978 V_dyn_keepalive_interval = 20;
2979 V_dyn_keepalive_period = 5;
2980 V_dyn_keepalive = 1; /* send keepalives */
2981 V_dyn_keepalive_last = time_uptime;
2983 V_dyn_data_zone = uma_zcreate("IPFW dynamic states data",
2984 sizeof(struct dyn_data), NULL, NULL, NULL, NULL,
2986 uma_zone_set_max(V_dyn_data_zone, V_dyn_max);
2988 V_dyn_parent_zone = uma_zcreate("IPFW parent dynamic states",
2989 sizeof(struct dyn_parent), NULL, NULL, NULL, NULL,
2991 uma_zone_set_max(V_dyn_parent_zone, V_dyn_parent_max);
2993 SLIST_INIT(&V_dyn_expired_ipv4);
2995 V_dyn_ipv4_parent = NULL;
2996 V_dyn_ipv4_zone = uma_zcreate("IPFW IPv4 dynamic states",
2997 sizeof(struct dyn_ipv4_state), NULL, NULL, NULL, NULL,
3001 SLIST_INIT(&V_dyn_expired_ipv6);
3003 V_dyn_ipv6_parent = NULL;
3004 V_dyn_ipv6_zone = uma_zcreate("IPFW IPv6 dynamic states",
3005 sizeof(struct dyn_ipv6_state), NULL, NULL, NULL, NULL,
3009 /* Initialize buckets. */
3010 V_curr_dyn_buckets = 0;
3011 V_dyn_bucket_lock = NULL;
3012 dyn_grow_hashtable(chain, 256);
3014 if (IS_DEFAULT_VNET(curvnet))
3015 dyn_hp_cache = malloc(mp_ncpus * sizeof(void *), M_IPFW,
3018 DYN_EXPIRED_LOCK_INIT();
3019 callout_init(&V_dyn_timeout, 1);
3020 callout_reset(&V_dyn_timeout, hz, dyn_tick, curvnet);
3021 IPFW_ADD_OBJ_REWRITER(IS_DEFAULT_VNET(curvnet), dyn_opcodes);
3025 ipfw_dyn_uninit(int pass)
3028 struct dyn_ipv6_state *s6;
3030 struct dyn_ipv4_state *s4;
3034 callout_drain(&V_dyn_timeout);
3037 IPFW_DEL_OBJ_REWRITER(IS_DEFAULT_VNET(curvnet), dyn_opcodes);
3038 DYN_EXPIRED_LOCK_DESTROY();
3040 #define DYN_FREE_STATES_FORCED(CK, s, af, name, en) do { \
3041 while ((s = CK ## SLIST_FIRST(&V_dyn_ ## name)) != NULL) { \
3042 CK ## SLIST_REMOVE_HEAD(&V_dyn_ ## name, en); \
3043 if (s->type == O_LIMIT_PARENT) \
3044 uma_zfree(V_dyn_parent_zone, s->limit); \
3046 uma_zfree(V_dyn_data_zone, s->data); \
3047 uma_zfree(V_dyn_ ## af ## _zone, s); \
3050 for (bucket = 0; bucket < V_curr_dyn_buckets; bucket++) {
3051 DYN_BUCKET_LOCK_DESTROY(V_dyn_bucket_lock, bucket);
3053 DYN_FREE_STATES_FORCED(CK_, s4, ipv4, ipv4[bucket], entry);
3054 DYN_FREE_STATES_FORCED(CK_, s4, ipv4, ipv4_parent[bucket],
3057 DYN_FREE_STATES_FORCED(CK_, s6, ipv6, ipv6[bucket], entry);
3058 DYN_FREE_STATES_FORCED(CK_, s6, ipv6, ipv6_parent[bucket],
3062 DYN_FREE_STATES_FORCED(, s4, ipv4, expired_ipv4, expired);
3064 DYN_FREE_STATES_FORCED(, s6, ipv6, expired_ipv6, expired);
3066 #undef DYN_FREE_STATES_FORCED
3068 uma_zdestroy(V_dyn_ipv4_zone);
3069 uma_zdestroy(V_dyn_data_zone);
3070 uma_zdestroy(V_dyn_parent_zone);
3072 uma_zdestroy(V_dyn_ipv6_zone);
3073 free(V_dyn_ipv6, M_IPFW);
3074 free(V_dyn_ipv6_parent, M_IPFW);
3075 free(V_dyn_ipv6_add, M_IPFW);
3076 free(V_dyn_ipv6_parent_add, M_IPFW);
3077 free(V_dyn_ipv6_del, M_IPFW);
3078 free(V_dyn_ipv6_parent_del, M_IPFW);
3080 free(V_dyn_bucket_lock, M_IPFW);
3081 free(V_dyn_ipv4, M_IPFW);
3082 free(V_dyn_ipv4_parent, M_IPFW);
3083 free(V_dyn_ipv4_add, M_IPFW);
3084 free(V_dyn_ipv4_parent_add, M_IPFW);
3085 free(V_dyn_ipv4_del, M_IPFW);
3086 free(V_dyn_ipv4_parent_del, M_IPFW);
3087 if (IS_DEFAULT_VNET(curvnet))
3088 free(dyn_hp_cache, M_IPFW);