1 /*-
2 * Copyright (c) 2002 Michael Shalayeff
3 * Copyright (c) 2012 Gleb Smirnoff <glebius@FreeBSD.org>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR OR HIS RELATIVES BE LIABLE FOR ANY DIRECT,
19 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
20 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
21 * SERVICES; LOSS OF MIND, USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
23 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
24 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
25 * THE POSSIBILITY OF SUCH DAMAGE.
26 */
27
28 /*-
29 * Copyright (c) 2009 David Gwynne <dlg@openbsd.org>
30 *
31 * Permission to use, copy, modify, and distribute this software for any
32 * purpose with or without fee is hereby granted, provided that the above
33 * copyright notice and this permission notice appear in all copies.
34 *
35 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
36 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
37 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
38 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
39 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
40 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
41 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
42 */
43
44 /*
45 * $OpenBSD: if_pfsync.c,v 1.110 2009/02/24 05:39:19 dlg Exp $
46 *
47 * Revisions picked from OpenBSD after revision 1.110 import:
48 * 1.119 - don't m_copydata() beyond the len of mbuf in pfsync_input()
49 * 1.118, 1.124, 1.148, 1.149, 1.151, 1.171 - fixes to bulk updates
50 * 1.120, 1.175 - use monotonic time_uptime
51 * 1.122 - reduce number of updates for non-TCP sessions
52 * 1.125, 1.127 - rewrite merge or stale processing
53 * 1.128 - cleanups
54 * 1.146 - bzero() mbuf before sparsely filling it with data
55 * 1.170 - SIOCSIFMTU checks
56 * 1.126, 1.142 - deferred packets processing
57 * 1.173 - correct expire time processing
58 */
59
60 #include <sys/cdefs.h>
61 __FBSDID("$FreeBSD: releng/11.0/sys/netpfil/pf/if_pfsync.c 302160 2016-06-23 22:31:44Z bz $");
62
63 #include "opt_inet.h"
64 #include "opt_inet6.h"
65 #include "opt_pf.h"
66
67 #include <sys/param.h>
68 #include <sys/bus.h>
69 #include <sys/endian.h>
70 #include <sys/interrupt.h>
71 #include <sys/kernel.h>
72 #include <sys/lock.h>
73 #include <sys/mbuf.h>
74 #include <sys/module.h>
75 #include <sys/mutex.h>
76 #include <sys/priv.h>
77 #include <sys/protosw.h>
78 #include <sys/socket.h>
79 #include <sys/sockio.h>
80 #include <sys/sysctl.h>
81 #include <sys/syslog.h>
82
83 #include <net/bpf.h>
84 #include <net/if.h>
85 #include <net/if_var.h>
86 #include <net/if_clone.h>
87 #include <net/if_types.h>
88 #include <net/vnet.h>
89 #include <net/pfvar.h>
90 #include <net/if_pfsync.h>
91
92 #include <netinet/if_ether.h>
93 #include <netinet/in.h>
94 #include <netinet/in_var.h>
95 #include <netinet/ip.h>
96 #include <netinet/ip_carp.h>
97 #include <netinet/ip_var.h>
98 #include <netinet/tcp.h>
99 #include <netinet/tcp_fsm.h>
100 #include <netinet/tcp_seq.h>
101
102 #define PFSYNC_MINPKT ( \
103 sizeof(struct ip) + \
104 sizeof(struct pfsync_header) + \
105 sizeof(struct pfsync_subheader) )
106
107 struct pfsync_pkt {
108 struct ip *ip;
109 struct in_addr src;
110 u_int8_t flags;
111 };
112
113 static int pfsync_upd_tcp(struct pf_state *, struct pfsync_state_peer *,
114 struct pfsync_state_peer *);
115 static int pfsync_in_clr(struct pfsync_pkt *, struct mbuf *, int, int);
116 static int pfsync_in_ins(struct pfsync_pkt *, struct mbuf *, int, int);
117 static int pfsync_in_iack(struct pfsync_pkt *, struct mbuf *, int, int);
118 static int pfsync_in_upd(struct pfsync_pkt *, struct mbuf *, int, int);
119 static int pfsync_in_upd_c(struct pfsync_pkt *, struct mbuf *, int, int);
120 static int pfsync_in_ureq(struct pfsync_pkt *, struct mbuf *, int, int);
121 static int pfsync_in_del(struct pfsync_pkt *, struct mbuf *, int, int);
122 static int pfsync_in_del_c(struct pfsync_pkt *, struct mbuf *, int, int);
123 static int pfsync_in_bus(struct pfsync_pkt *, struct mbuf *, int, int);
124 static int pfsync_in_tdb(struct pfsync_pkt *, struct mbuf *, int, int);
125 static int pfsync_in_eof(struct pfsync_pkt *, struct mbuf *, int, int);
126 static int pfsync_in_error(struct pfsync_pkt *, struct mbuf *, int, int);
127
128 static int (*pfsync_acts[])(struct pfsync_pkt *, struct mbuf *, int, int) = {
129 pfsync_in_clr, /* PFSYNC_ACT_CLR */
130 pfsync_in_ins, /* PFSYNC_ACT_INS */
131 pfsync_in_iack, /* PFSYNC_ACT_INS_ACK */
132 pfsync_in_upd, /* PFSYNC_ACT_UPD */
133 pfsync_in_upd_c, /* PFSYNC_ACT_UPD_C */
134 pfsync_in_ureq, /* PFSYNC_ACT_UPD_REQ */
135 pfsync_in_del, /* PFSYNC_ACT_DEL */
136 pfsync_in_del_c, /* PFSYNC_ACT_DEL_C */
137 pfsync_in_error, /* PFSYNC_ACT_INS_F */
138 pfsync_in_error, /* PFSYNC_ACT_DEL_F */
139 pfsync_in_bus, /* PFSYNC_ACT_BUS */
140 pfsync_in_tdb, /* PFSYNC_ACT_TDB */
141 pfsync_in_eof /* PFSYNC_ACT_EOF */
142 };
143
144 struct pfsync_q {
145 void (*write)(struct pf_state *, void *);
146 size_t len;
147 u_int8_t action;
148 };
149
150 /* we have one of these for every PFSYNC_S_ */
151 static void pfsync_out_state(struct pf_state *, void *);
152 static void pfsync_out_iack(struct pf_state *, void *);
153 static void pfsync_out_upd_c(struct pf_state *, void *);
154 static void pfsync_out_del(struct pf_state *, void *);
155
156 static struct pfsync_q pfsync_qs[] = {
157 { pfsync_out_state, sizeof(struct pfsync_state), PFSYNC_ACT_INS },
158 { pfsync_out_iack, sizeof(struct pfsync_ins_ack), PFSYNC_ACT_INS_ACK },
159 { pfsync_out_state, sizeof(struct pfsync_state), PFSYNC_ACT_UPD },
160 { pfsync_out_upd_c, sizeof(struct pfsync_upd_c), PFSYNC_ACT_UPD_C },
161 { pfsync_out_del, sizeof(struct pfsync_del_c), PFSYNC_ACT_DEL_C }
162 };
163
164 static void pfsync_q_ins(struct pf_state *, int);
165 static void pfsync_q_del(struct pf_state *);
166
167 static void pfsync_update_state(struct pf_state *);
168
169 struct pfsync_upd_req_item {
170 TAILQ_ENTRY(pfsync_upd_req_item) ur_entry;
171 struct pfsync_upd_req ur_msg;
172 };
173
174 struct pfsync_deferral {
175 struct pfsync_softc *pd_sc;
176 TAILQ_ENTRY(pfsync_deferral) pd_entry;
177 u_int pd_refs;
178 struct callout pd_tmo;
179
180 struct pf_state *pd_st;
181 struct mbuf *pd_m;
182 };
183
184 struct pfsync_softc {
185 /* Configuration */
186 struct ifnet *sc_ifp;
187 struct ifnet *sc_sync_if;
188 struct ip_moptions sc_imo;
189 struct in_addr sc_sync_peer;
190 uint32_t sc_flags;
191 #define PFSYNCF_OK 0x00000001
192 #define PFSYNCF_DEFER 0x00000002
193 #define PFSYNCF_PUSH 0x00000004
194 uint8_t sc_maxupdates;
195 struct ip sc_template;
196 struct callout sc_tmo;
197 struct mtx sc_mtx;
198
199 /* Queued data */
200 size_t sc_len;
201 TAILQ_HEAD(, pf_state) sc_qs[PFSYNC_S_COUNT];
202 TAILQ_HEAD(, pfsync_upd_req_item) sc_upd_req_list;
203 TAILQ_HEAD(, pfsync_deferral) sc_deferrals;
204 u_int sc_deferred;
205 void *sc_plus;
206 size_t sc_pluslen;
207
208 /* Bulk update info */
209 struct mtx sc_bulk_mtx;
210 uint32_t sc_ureq_sent;
211 int sc_bulk_tries;
212 uint32_t sc_ureq_received;
213 int sc_bulk_hashid;
214 uint64_t sc_bulk_stateid;
215 uint32_t sc_bulk_creatorid;
216 struct callout sc_bulk_tmo;
217 struct callout sc_bulkfail_tmo;
218 };
219
220 #define PFSYNC_LOCK(sc) mtx_lock(&(sc)->sc_mtx)
221 #define PFSYNC_UNLOCK(sc) mtx_unlock(&(sc)->sc_mtx)
222 #define PFSYNC_LOCK_ASSERT(sc) mtx_assert(&(sc)->sc_mtx, MA_OWNED)
223
224 #define PFSYNC_BLOCK(sc) mtx_lock(&(sc)->sc_bulk_mtx)
225 #define PFSYNC_BUNLOCK(sc) mtx_unlock(&(sc)->sc_bulk_mtx)
226 #define PFSYNC_BLOCK_ASSERT(sc) mtx_assert(&(sc)->sc_bulk_mtx, MA_OWNED)
227
228 static const char pfsyncname[] = "pfsync";
229 static MALLOC_DEFINE(M_PFSYNC, pfsyncname, "pfsync(4) data");
230 static VNET_DEFINE(struct pfsync_softc *, pfsyncif) = NULL;
231 #define V_pfsyncif VNET(pfsyncif)
232 static VNET_DEFINE(void *, pfsync_swi_cookie) = NULL;
233 #define V_pfsync_swi_cookie VNET(pfsync_swi_cookie)
234 static VNET_DEFINE(struct pfsyncstats, pfsyncstats);
235 #define V_pfsyncstats VNET(pfsyncstats)
236 static VNET_DEFINE(int, pfsync_carp_adj) = CARP_MAXSKEW;
237 #define V_pfsync_carp_adj VNET(pfsync_carp_adj)
238
239 static void pfsync_timeout(void *);
240 static void pfsync_push(struct pfsync_softc *);
241 static void pfsyncintr(void *);
242 static int pfsync_multicast_setup(struct pfsync_softc *, struct ifnet *,
243 void *);
244 static void pfsync_multicast_cleanup(struct pfsync_softc *);
245 static void pfsync_pointers_init(void);
246 static void pfsync_pointers_uninit(void);
247 static int pfsync_init(void);
248 static void pfsync_uninit(void);
249
250 SYSCTL_NODE(_net, OID_AUTO, pfsync, CTLFLAG_RW, 0, "PFSYNC");
251 SYSCTL_STRUCT(_net_pfsync, OID_AUTO, stats, CTLFLAG_VNET | CTLFLAG_RW,
252 &VNET_NAME(pfsyncstats), pfsyncstats,
253 "PFSYNC statistics (struct pfsyncstats, net/if_pfsync.h)");
254 SYSCTL_INT(_net_pfsync, OID_AUTO, carp_demotion_factor, CTLFLAG_RW,
255 &VNET_NAME(pfsync_carp_adj), 0, "pfsync's CARP demotion factor adjustment");
256
257 static int pfsync_clone_create(struct if_clone *, int, caddr_t);
258 static void pfsync_clone_destroy(struct ifnet *);
259 static int pfsync_alloc_scrub_memory(struct pfsync_state_peer *,
260 struct pf_state_peer *);
261 static int pfsyncoutput(struct ifnet *, struct mbuf *,
262 const struct sockaddr *, struct route *);
263 static int pfsyncioctl(struct ifnet *, u_long, caddr_t);
264
265 static int pfsync_defer(struct pf_state *, struct mbuf *);
266 static void pfsync_undefer(struct pfsync_deferral *, int);
267 static void pfsync_undefer_state(struct pf_state *, int);
268 static void pfsync_defer_tmo(void *);
269
270 static void pfsync_request_update(u_int32_t, u_int64_t);
271 static void pfsync_update_state_req(struct pf_state *);
272
273 static void pfsync_drop(struct pfsync_softc *);
274 static void pfsync_sendout(int);
275 static void pfsync_send_plus(void *, size_t);
276
277 static void pfsync_bulk_start(void);
278 static void pfsync_bulk_status(u_int8_t);
279 static void pfsync_bulk_update(void *);
280 static void pfsync_bulk_fail(void *);
281
282 #ifdef IPSEC
283 static void pfsync_update_net_tdb(struct pfsync_tdb *);
284 #endif
285
286 #define PFSYNC_MAX_BULKTRIES 12
287
288 VNET_DEFINE(struct if_clone *, pfsync_cloner);
289 #define V_pfsync_cloner VNET(pfsync_cloner)
290
291 static int
292 pfsync_clone_create(struct if_clone *ifc, int unit, caddr_t param)
293 {
294 struct pfsync_softc *sc;
295 struct ifnet *ifp;
296 int q;
297
298 if (unit != 0)
299 return (EINVAL);
300
301 sc = malloc(sizeof(struct pfsync_softc), M_PFSYNC, M_WAITOK | M_ZERO);
302 sc->sc_flags |= PFSYNCF_OK;
303
304 for (q = 0; q < PFSYNC_S_COUNT; q++)
305 TAILQ_INIT(&sc->sc_qs[q]);
306
307 TAILQ_INIT(&sc->sc_upd_req_list);
308 TAILQ_INIT(&sc->sc_deferrals);
309
310 sc->sc_len = PFSYNC_MINPKT;
311 sc->sc_maxupdates = 128;
312
313 ifp = sc->sc_ifp = if_alloc(IFT_PFSYNC);
314 if (ifp == NULL) {
315 free(sc, M_PFSYNC);
316 return (ENOSPC);
317 }
318 if_initname(ifp, pfsyncname, unit);
319 ifp->if_softc = sc;
320 ifp->if_ioctl = pfsyncioctl;
321 ifp->if_output = pfsyncoutput;
322 ifp->if_type = IFT_PFSYNC;
323 ifp->if_snd.ifq_maxlen = ifqmaxlen;
324 ifp->if_hdrlen = sizeof(struct pfsync_header);
325 ifp->if_mtu = ETHERMTU;
326 mtx_init(&sc->sc_mtx, pfsyncname, NULL, MTX_DEF);
327 mtx_init(&sc->sc_bulk_mtx, "pfsync bulk", NULL, MTX_DEF);
328 callout_init(&sc->sc_tmo, 1);
329 callout_init_mtx(&sc->sc_bulk_tmo, &sc->sc_bulk_mtx, 0);
330 callout_init_mtx(&sc->sc_bulkfail_tmo, &sc->sc_bulk_mtx, 0);
331
332 if_attach(ifp);
333
334 bpfattach(ifp, DLT_PFSYNC, PFSYNC_HDRLEN);
335
336 V_pfsyncif = sc;
337
338 return (0);
339 }
340
341 static void
342 pfsync_clone_destroy(struct ifnet *ifp)
343 {
344 struct pfsync_softc *sc = ifp->if_softc;
345
346 /*
347 * At this stage, everything should have already been
348 * cleared by pfsync_uninit(), and we have only to
349 * drain callouts.
350 */
351 while (sc->sc_deferred > 0) {
352 struct pfsync_deferral *pd = TAILQ_FIRST(&sc->sc_deferrals);
353
354 TAILQ_REMOVE(&sc->sc_deferrals, pd, pd_entry);
355 sc->sc_deferred--;
356 if (callout_stop(&pd->pd_tmo) > 0) {
357 pf_release_state(pd->pd_st);
358 m_freem(pd->pd_m);
359 free(pd, M_PFSYNC);
360 } else {
361 pd->pd_refs++;
362 callout_drain(&pd->pd_tmo);
363 free(pd, M_PFSYNC);
364 }
365 }
366
367 callout_drain(&sc->sc_tmo);
368 callout_drain(&sc->sc_bulkfail_tmo);
369 callout_drain(&sc->sc_bulk_tmo);
370
371 if (!(sc->sc_flags & PFSYNCF_OK) && carp_demote_adj_p)
372 (*carp_demote_adj_p)(-V_pfsync_carp_adj, "pfsync destroy");
373 bpfdetach(ifp);
374 if_detach(ifp);
375
376 pfsync_drop(sc);
377
378 if_free(ifp);
379 if (sc->sc_imo.imo_membership)
380 pfsync_multicast_cleanup(sc);
381 mtx_destroy(&sc->sc_mtx);
382 mtx_destroy(&sc->sc_bulk_mtx);
383 free(sc, M_PFSYNC);
384
385 V_pfsyncif = NULL;
386 }
387
388 static int
389 pfsync_alloc_scrub_memory(struct pfsync_state_peer *s,
390 struct pf_state_peer *d)
391 {
392 if (s->scrub.scrub_flag && d->scrub == NULL) {
393 d->scrub = uma_zalloc(V_pf_state_scrub_z, M_NOWAIT | M_ZERO);
394 if (d->scrub == NULL)
395 return (ENOMEM);
396 }
397
398 return (0);
399 }
400
401
402 static int
403 pfsync_state_import(struct pfsync_state *sp, u_int8_t flags)
404 {
405 struct pfsync_softc *sc = V_pfsyncif;
406 #ifndef __NO_STRICT_ALIGNMENT
407 struct pfsync_state_key key[2];
408 #endif
409 struct pfsync_state_key *kw, *ks;
410 struct pf_state *st = NULL;
411 struct pf_state_key *skw = NULL, *sks = NULL;
412 struct pf_rule *r = NULL;
413 struct pfi_kif *kif;
414 int error;
415
416 PF_RULES_RASSERT();
417
418 if (sp->creatorid == 0) {
419 if (V_pf_status.debug >= PF_DEBUG_MISC)
420 printf("%s: invalid creator id: %08x\n", __func__,
421 ntohl(sp->creatorid));
422 return (EINVAL);
423 }
424
425 if ((kif = pfi_kif_find(sp->ifname)) == NULL) {
426 if (V_pf_status.debug >= PF_DEBUG_MISC)
427 printf("%s: unknown interface: %s\n", __func__,
428 sp->ifname);
429 if (flags & PFSYNC_SI_IOCTL)
430 return (EINVAL);
431 return (0); /* skip this state */
432 }
433
434 /*
435 * If the ruleset checksums match or the state is coming from the ioctl,
436 * it's safe to associate the state with the rule of that number.
437 */
438 if (sp->rule != htonl(-1) && sp->anchor == htonl(-1) &&
439 (flags & (PFSYNC_SI_IOCTL | PFSYNC_SI_CKSUM)) && ntohl(sp->rule) <
440 pf_main_ruleset.rules[PF_RULESET_FILTER].active.rcount)
441 r = pf_main_ruleset.rules[
442 PF_RULESET_FILTER].active.ptr_array[ntohl(sp->rule)];
443 else
444 r = &V_pf_default_rule;
445
446 if ((r->max_states &&
447 counter_u64_fetch(r->states_cur) >= r->max_states))
448 goto cleanup;
449
450 /*
451 * XXXGL: consider M_WAITOK in ioctl path after.
452 */
453 if ((st = uma_zalloc(V_pf_state_z, M_NOWAIT | M_ZERO)) == NULL)
454 goto cleanup;
455
456 if ((skw = uma_zalloc(V_pf_state_key_z, M_NOWAIT)) == NULL)
457 goto cleanup;
458
459 #ifndef __NO_STRICT_ALIGNMENT
460 bcopy(&sp->key, key, sizeof(struct pfsync_state_key) * 2);
461 kw = &key[PF_SK_WIRE];
462 ks = &key[PF_SK_STACK];
463 #else
464 kw = &sp->key[PF_SK_WIRE];
465 ks = &sp->key[PF_SK_STACK];
466 #endif
467
468 if (PF_ANEQ(&kw->addr[0], &ks->addr[0], sp->af) ||
469 PF_ANEQ(&kw->addr[1], &ks->addr[1], sp->af) ||
470 kw->port[0] != ks->port[0] ||
471 kw->port[1] != ks->port[1]) {
472 sks = uma_zalloc(V_pf_state_key_z, M_NOWAIT);
473 if (sks == NULL)
474 goto cleanup;
475 } else
476 sks = skw;
477
478 /* allocate memory for scrub info */
479 if (pfsync_alloc_scrub_memory(&sp->src, &st->src) ||
480 pfsync_alloc_scrub_memory(&sp->dst, &st->dst))
481 goto cleanup;
482
483 /* Copy to state key(s). */
484 skw->addr[0] = kw->addr[0];
485 skw->addr[1] = kw->addr[1];
486 skw->port[0] = kw->port[0];
487 skw->port[1] = kw->port[1];
488 skw->proto = sp->proto;
489 skw->af = sp->af;
490 if (sks != skw) {
491 sks->addr[0] = ks->addr[0];
492 sks->addr[1] = ks->addr[1];
493 sks->port[0] = ks->port[0];
494 sks->port[1] = ks->port[1];
495 sks->proto = sp->proto;
496 sks->af = sp->af;
497 }
498
499 /* copy to state */
500 bcopy(&sp->rt_addr, &st->rt_addr, sizeof(st->rt_addr));
501 st->creation = time_uptime - ntohl(sp->creation);
502 st->expire = time_uptime;
503 if (sp->expire) {
504 uint32_t timeout;
505
506 timeout = r->timeout[sp->timeout];
507 if (!timeout)
508 timeout = V_pf_default_rule.timeout[sp->timeout];
509
510 /* sp->expire may have been adaptively scaled by export. */
511 st->expire -= timeout - ntohl(sp->expire);
512 }
513
514 st->direction = sp->direction;
515 st->log = sp->log;
516 st->timeout = sp->timeout;
517 st->state_flags = sp->state_flags;
518
519 st->id = sp->id;
520 st->creatorid = sp->creatorid;
521 pf_state_peer_ntoh(&sp->src, &st->src);
522 pf_state_peer_ntoh(&sp->dst, &st->dst);
523
524 st->rule.ptr = r;
525 st->nat_rule.ptr = NULL;
526 st->anchor.ptr = NULL;
527 st->rt_kif = NULL;
528
529 st->pfsync_time = time_uptime;
530 st->sync_state = PFSYNC_S_NONE;
531
532 if (!(flags & PFSYNC_SI_IOCTL))
533 st->state_flags |= PFSTATE_NOSYNC;
534
535 if ((error = pf_state_insert(kif, skw, sks, st)) != 0)
536 goto cleanup_state;
537
538 /* XXX when we have nat_rule/anchors, use STATE_INC_COUNTERS */
539 counter_u64_add(r->states_cur, 1);
540 counter_u64_add(r->states_tot, 1);
541
542 if (!(flags & PFSYNC_SI_IOCTL)) {
543 st->state_flags &= ~PFSTATE_NOSYNC;
544 if (st->state_flags & PFSTATE_ACK) {
545 pfsync_q_ins(st, PFSYNC_S_IACK);
546 pfsync_push(sc);
547 }
548 }
549 st->state_flags &= ~PFSTATE_ACK;
550 PF_STATE_UNLOCK(st);
551
552 return (0);
553
554 cleanup:
555 error = ENOMEM;
556 if (skw == sks)
557 sks = NULL;
558 if (skw != NULL)
559 uma_zfree(V_pf_state_key_z, skw);
560 if (sks != NULL)
561 uma_zfree(V_pf_state_key_z, sks);
562
563 cleanup_state: /* pf_state_insert() frees the state keys. */
564 if (st) {
565 if (st->dst.scrub)
566 uma_zfree(V_pf_state_scrub_z, st->dst.scrub);
567 if (st->src.scrub)
568 uma_zfree(V_pf_state_scrub_z, st->src.scrub);
569 uma_zfree(V_pf_state_z, st);
570 }
571 return (error);
572 }
573
574 static int
575 pfsync_input(struct mbuf **mp, int *offp __unused, int proto __unused)
576 {
577 struct pfsync_softc *sc = V_pfsyncif;
578 struct pfsync_pkt pkt;
579 struct mbuf *m = *mp;
580 struct ip *ip = mtod(m, struct ip *);
581 struct pfsync_header *ph;
582 struct pfsync_subheader subh;
583
584 int offset, len;
585 int rv;
586 uint16_t count;
587
588 *mp = NULL;
589 V_pfsyncstats.pfsyncs_ipackets++;
590
591 /* Verify that we have a sync interface configured. */
592 if (!sc || !sc->sc_sync_if || !V_pf_status.running ||
593 (sc->sc_ifp->if_drv_flags & IFF_DRV_RUNNING) == 0)
594 goto done;
595
596 /* verify that the packet came in on the right interface */
597 if (sc->sc_sync_if != m->m_pkthdr.rcvif) {
598 V_pfsyncstats.pfsyncs_badif++;
599 goto done;
600 }
601
602 if_inc_counter(sc->sc_ifp, IFCOUNTER_IPACKETS, 1);
603 if_inc_counter(sc->sc_ifp, IFCOUNTER_IBYTES, m->m_pkthdr.len);
604 /* verify that the IP TTL is 255. */
605 if (ip->ip_ttl != PFSYNC_DFLTTL) {
606 V_pfsyncstats.pfsyncs_badttl++;
607 goto done;
608 }
609
610 offset = ip->ip_hl << 2;
611 if (m->m_pkthdr.len < offset + sizeof(*ph)) {
612 V_pfsyncstats.pfsyncs_hdrops++;
613 goto done;
614 }
615
616 if (offset + sizeof(*ph) > m->m_len) {
617 if (m_pullup(m, offset + sizeof(*ph)) == NULL) {
618 V_pfsyncstats.pfsyncs_hdrops++;
619 return (IPPROTO_DONE);
620 }
621 ip = mtod(m, struct ip *);
622 }
623 ph = (struct pfsync_header *)((char *)ip + offset);
624
625 /* verify the version */
626 if (ph->version != PFSYNC_VERSION) {
627 V_pfsyncstats.pfsyncs_badver++;
628 goto done;
629 }
630
631 len = ntohs(ph->len) + offset;
632 if (m->m_pkthdr.len < len) {
633 V_pfsyncstats.pfsyncs_badlen++;
634 goto done;
635 }
636
637 /* Cheaper to grab this now than having to mess with mbufs later */
638 pkt.ip = ip;
639 pkt.src = ip->ip_src;
640 pkt.flags = 0;
641
642 /*
643 * Trusting pf_chksum during packet processing, as well as seeking
644 * in interface name tree, require holding PF_RULES_RLOCK().
645 */
646 PF_RULES_RLOCK();
647 if (!bcmp(&ph->pfcksum, &V_pf_status.pf_chksum, PF_MD5_DIGEST_LENGTH))
648 pkt.flags |= PFSYNC_SI_CKSUM;
649
650 offset += sizeof(*ph);
651 while (offset <= len - sizeof(subh)) {
652 m_copydata(m, offset, sizeof(subh), (caddr_t)&subh);
653 offset += sizeof(subh);
654
655 if (subh.action >= PFSYNC_ACT_MAX) {
656 V_pfsyncstats.pfsyncs_badact++;
657 PF_RULES_RUNLOCK();
658 goto done;
659 }
660
661 count = ntohs(subh.count);
662 V_pfsyncstats.pfsyncs_iacts[subh.action] += count;
663 rv = (*pfsync_acts[subh.action])(&pkt, m, offset, count);
664 if (rv == -1) {
665 PF_RULES_RUNLOCK();
666 return (IPPROTO_DONE);
667 }
668
669 offset += rv;
670 }
671 PF_RULES_RUNLOCK();
672
673 done:
674 m_freem(m);
675 return (IPPROTO_DONE);
676 }
677
678 static int
679 pfsync_in_clr(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
680 {
681 struct pfsync_clr *clr;
682 struct mbuf *mp;
683 int len = sizeof(*clr) * count;
684 int i, offp;
685 u_int32_t creatorid;
686
687 mp = m_pulldown(m, offset, len, &offp);
688 if (mp == NULL) {
689 V_pfsyncstats.pfsyncs_badlen++;
690 return (-1);
691 }
692 clr = (struct pfsync_clr *)(mp->m_data + offp);
693
694 for (i = 0; i < count; i++) {
695 creatorid = clr[i].creatorid;
696
697 if (clr[i].ifname[0] != '\0' &&
698 pfi_kif_find(clr[i].ifname) == NULL)
699 continue;
700
701 for (int i = 0; i <= pf_hashmask; i++) {
702 struct pf_idhash *ih = &V_pf_idhash[i];
703 struct pf_state *s;
704 relock:
705 PF_HASHROW_LOCK(ih);
706 LIST_FOREACH(s, &ih->states, entry) {
707 if (s->creatorid == creatorid) {
708 s->state_flags |= PFSTATE_NOSYNC;
709 pf_unlink_state(s, PF_ENTER_LOCKED);
710 goto relock;
711 }
712 }
713 PF_HASHROW_UNLOCK(ih);
714 }
715 }
716
717 return (len);
718 }
719
720 static int
721 pfsync_in_ins(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
722 {
723 struct mbuf *mp;
724 struct pfsync_state *sa, *sp;
725 int len = sizeof(*sp) * count;
726 int i, offp;
727
728 mp = m_pulldown(m, offset, len, &offp);
729 if (mp == NULL) {
730 V_pfsyncstats.pfsyncs_badlen++;
731 return (-1);
732 }
733 sa = (struct pfsync_state *)(mp->m_data + offp);
734
735 for (i = 0; i < count; i++) {
736 sp = &sa[i];
737
738 /* Check for invalid values. */
739 if (sp->timeout >= PFTM_MAX ||
740 sp->src.state > PF_TCPS_PROXY_DST ||
741 sp->dst.state > PF_TCPS_PROXY_DST ||
742 sp->direction > PF_OUT ||
743 (sp->af != AF_INET && sp->af != AF_INET6)) {
744 if (V_pf_status.debug >= PF_DEBUG_MISC)
745 printf("%s: invalid value\n", __func__);
746 V_pfsyncstats.pfsyncs_badval++;
747 continue;
748 }
749
750 if (pfsync_state_import(sp, pkt->flags) == ENOMEM)
751 /* Drop out, but process the rest of the actions. */
752 break;
753 }
754
755 return (len);
756 }
757
758 static int
759 pfsync_in_iack(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
760 {
761 struct pfsync_ins_ack *ia, *iaa;
762 struct pf_state *st;
763
764 struct mbuf *mp;
765 int len = count * sizeof(*ia);
766 int offp, i;
767
768 mp = m_pulldown(m, offset, len, &offp);
769 if (mp == NULL) {
770 V_pfsyncstats.pfsyncs_badlen++;
771 return (-1);
772 }
773 iaa = (struct pfsync_ins_ack *)(mp->m_data + offp);
774
775 for (i = 0; i < count; i++) {
776 ia = &iaa[i];
777
778 st = pf_find_state_byid(ia->id, ia->creatorid);
779 if (st == NULL)
780 continue;
781
782 if (st->state_flags & PFSTATE_ACK) {
783 PFSYNC_LOCK(V_pfsyncif);
784 pfsync_undefer_state(st, 0);
785 PFSYNC_UNLOCK(V_pfsyncif);
786 }
787 PF_STATE_UNLOCK(st);
788 }
789 /*
790 * XXX this is not yet implemented, but we know the size of the
791 * message so we can skip it.
792 */
793
794 return (count * sizeof(struct pfsync_ins_ack));
795 }
796
797 static int
798 pfsync_upd_tcp(struct pf_state *st, struct pfsync_state_peer *src,
799 struct pfsync_state_peer *dst)
800 {
801 int sync = 0;
802
803 PF_STATE_LOCK_ASSERT(st);
804
805 /*
806 * The state should never go backwards except
807 * for syn-proxy states. Neither should the
808 * sequence window slide backwards.
809 */
810 if ((st->src.state > src->state &&
811 (st->src.state < PF_TCPS_PROXY_SRC ||
812 src->state >= PF_TCPS_PROXY_SRC)) ||
813
814 (st->src.state == src->state &&
815 SEQ_GT(st->src.seqlo, ntohl(src->seqlo))))
816 sync++;
817 else
818 pf_state_peer_ntoh(src, &st->src);
819
820 if ((st->dst.state > dst->state) ||
821
822 (st->dst.state >= TCPS_SYN_SENT &&
823 SEQ_GT(st->dst.seqlo, ntohl(dst->seqlo))))
824 sync++;
825 else
826 pf_state_peer_ntoh(dst, &st->dst);
827
828 return (sync);
829 }
830
831 static int
832 pfsync_in_upd(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
833 {
834 struct pfsync_softc *sc = V_pfsyncif;
835 struct pfsync_state *sa, *sp;
836 struct pf_state *st;
837 int sync;
838
839 struct mbuf *mp;
840 int len = count * sizeof(*sp);
841 int offp, i;
842
843 mp = m_pulldown(m, offset, len, &offp);
844 if (mp == NULL) {
845 V_pfsyncstats.pfsyncs_badlen++;
846 return (-1);
847 }
848 sa = (struct pfsync_state *)(mp->m_data + offp);
849
850 for (i = 0; i < count; i++) {
851 sp = &sa[i];
852
853 /* check for invalid values */
854 if (sp->timeout >= PFTM_MAX ||
855 sp->src.state > PF_TCPS_PROXY_DST ||
856 sp->dst.state > PF_TCPS_PROXY_DST) {
857 if (V_pf_status.debug >= PF_DEBUG_MISC) {
858 printf("pfsync_input: PFSYNC_ACT_UPD: "
859 "invalid value\n");
860 }
861 V_pfsyncstats.pfsyncs_badval++;
862 continue;
863 }
864
865 st = pf_find_state_byid(sp->id, sp->creatorid);
866 if (st == NULL) {
867 /* insert the update */
868 if (pfsync_state_import(sp, 0))
869 V_pfsyncstats.pfsyncs_badstate++;
870 continue;
871 }
872
873 if (st->state_flags & PFSTATE_ACK) {
874 PFSYNC_LOCK(sc);
875 pfsync_undefer_state(st, 1);
876 PFSYNC_UNLOCK(sc);
877 }
878
879 if (st->key[PF_SK_WIRE]->proto == IPPROTO_TCP)
880 sync = pfsync_upd_tcp(st, &sp->src, &sp->dst);
881 else {
882 sync = 0;
883
884 /*
885 * Non-TCP protocol state machine always go
886 * forwards
887 */
888 if (st->src.state > sp->src.state)
889 sync++;
890 else
891 pf_state_peer_ntoh(&sp->src, &st->src);
892 if (st->dst.state > sp->dst.state)
893 sync++;
894 else
895 pf_state_peer_ntoh(&sp->dst, &st->dst);
896 }
897 if (sync < 2) {
898 pfsync_alloc_scrub_memory(&sp->dst, &st->dst);
899 pf_state_peer_ntoh(&sp->dst, &st->dst);
900 st->expire = time_uptime;
901 st->timeout = sp->timeout;
902 }
903 st->pfsync_time = time_uptime;
904
905 if (sync) {
906 V_pfsyncstats.pfsyncs_stale++;
907
908 pfsync_update_state(st);
909 PF_STATE_UNLOCK(st);
910 PFSYNC_LOCK(sc);
911 pfsync_push(sc);
912 PFSYNC_UNLOCK(sc);
913 continue;
914 }
915 PF_STATE_UNLOCK(st);
916 }
917
918 return (len);
919 }
920
921 static int
922 pfsync_in_upd_c(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
923 {
924 struct pfsync_softc *sc = V_pfsyncif;
925 struct pfsync_upd_c *ua, *up;
926 struct pf_state *st;
927 int len = count * sizeof(*up);
928 int sync;
929 struct mbuf *mp;
930 int offp, i;
931
932 mp = m_pulldown(m, offset, len, &offp);
933 if (mp == NULL) {
934 V_pfsyncstats.pfsyncs_badlen++;
935 return (-1);
936 }
937 ua = (struct pfsync_upd_c *)(mp->m_data + offp);
938
939 for (i = 0; i < count; i++) {
940 up = &ua[i];
941
942 /* check for invalid values */
943 if (up->timeout >= PFTM_MAX ||
944 up->src.state > PF_TCPS_PROXY_DST ||
945 up->dst.state > PF_TCPS_PROXY_DST) {
946 if (V_pf_status.debug >= PF_DEBUG_MISC) {
947 printf("pfsync_input: "
948 "PFSYNC_ACT_UPD_C: "
949 "invalid value\n");
950 }
951 V_pfsyncstats.pfsyncs_badval++;
952 continue;
953 }
954
955 st = pf_find_state_byid(up->id, up->creatorid);
956 if (st == NULL) {
957 /* We don't have this state. Ask for it. */
958 PFSYNC_LOCK(sc);
959 pfsync_request_update(up->creatorid, up->id);
960 PFSYNC_UNLOCK(sc);
961 continue;
962 }
963
964 if (st->state_flags & PFSTATE_ACK) {
965 PFSYNC_LOCK(sc);
966 pfsync_undefer_state(st, 1);
967 PFSYNC_UNLOCK(sc);
968 }
969
970 if (st->key[PF_SK_WIRE]->proto == IPPROTO_TCP)
971 sync = pfsync_upd_tcp(st, &up->src, &up->dst);
972 else {
973 sync = 0;
974
975 /*
976 * Non-TCP protocol state machine always go
977 * forwards
978 */
979 if (st->src.state > up->src.state)
980 sync++;
981 else
982 pf_state_peer_ntoh(&up->src, &st->src);
983 if (st->dst.state > up->dst.state)
984 sync++;
985 else
986 pf_state_peer_ntoh(&up->dst, &st->dst);
987 }
988 if (sync < 2) {
989 pfsync_alloc_scrub_memory(&up->dst, &st->dst);
990 pf_state_peer_ntoh(&up->dst, &st->dst);
991 st->expire = time_uptime;
992 st->timeout = up->timeout;
993 }
994 st->pfsync_time = time_uptime;
995
996 if (sync) {
997 V_pfsyncstats.pfsyncs_stale++;
998
999 pfsync_update_state(st);
1000 PF_STATE_UNLOCK(st);
1001 PFSYNC_LOCK(sc);
1002 pfsync_push(sc);
1003 PFSYNC_UNLOCK(sc);
1004 continue;
1005 }
1006 PF_STATE_UNLOCK(st);
1007 }
1008
1009 return (len);
1010 }
1011
1012 static int
1013 pfsync_in_ureq(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1014 {
1015 struct pfsync_upd_req *ur, *ura;
1016 struct mbuf *mp;
1017 int len = count * sizeof(*ur);
1018 int i, offp;
1019
1020 struct pf_state *st;
1021
1022 mp = m_pulldown(m, offset, len, &offp);
1023 if (mp == NULL) {
1024 V_pfsyncstats.pfsyncs_badlen++;
1025 return (-1);
1026 }
1027 ura = (struct pfsync_upd_req *)(mp->m_data + offp);
1028
1029 for (i = 0; i < count; i++) {
1030 ur = &ura[i];
1031
1032 if (ur->id == 0 && ur->creatorid == 0)
1033 pfsync_bulk_start();
1034 else {
1035 st = pf_find_state_byid(ur->id, ur->creatorid);
1036 if (st == NULL) {
1037 V_pfsyncstats.pfsyncs_badstate++;
1038 continue;
1039 }
1040 if (st->state_flags & PFSTATE_NOSYNC) {
1041 PF_STATE_UNLOCK(st);
1042 continue;
1043 }
1044
1045 pfsync_update_state_req(st);
1046 PF_STATE_UNLOCK(st);
1047 }
1048 }
1049
1050 return (len);
1051 }
1052
1053 static int
1054 pfsync_in_del(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1055 {
1056 struct mbuf *mp;
1057 struct pfsync_state *sa, *sp;
1058 struct pf_state *st;
1059 int len = count * sizeof(*sp);
1060 int offp, i;
1061
1062 mp = m_pulldown(m, offset, len, &offp);
1063 if (mp == NULL) {
1064 V_pfsyncstats.pfsyncs_badlen++;
1065 return (-1);
1066 }
1067 sa = (struct pfsync_state *)(mp->m_data + offp);
1068
1069 for (i = 0; i < count; i++) {
1070 sp = &sa[i];
1071
1072 st = pf_find_state_byid(sp->id, sp->creatorid);
1073 if (st == NULL) {
1074 V_pfsyncstats.pfsyncs_badstate++;
1075 continue;
1076 }
1077 st->state_flags |= PFSTATE_NOSYNC;
1078 pf_unlink_state(st, PF_ENTER_LOCKED);
1079 }
1080
1081 return (len);
1082 }
1083
1084 static int
1085 pfsync_in_del_c(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1086 {
1087 struct mbuf *mp;
1088 struct pfsync_del_c *sa, *sp;
1089 struct pf_state *st;
1090 int len = count * sizeof(*sp);
1091 int offp, i;
1092
1093 mp = m_pulldown(m, offset, len, &offp);
1094 if (mp == NULL) {
1095 V_pfsyncstats.pfsyncs_badlen++;
1096 return (-1);
1097 }
1098 sa = (struct pfsync_del_c *)(mp->m_data + offp);
1099
1100 for (i = 0; i < count; i++) {
1101 sp = &sa[i];
1102
1103 st = pf_find_state_byid(sp->id, sp->creatorid);
1104 if (st == NULL) {
1105 V_pfsyncstats.pfsyncs_badstate++;
1106 continue;
1107 }
1108
1109 st->state_flags |= PFSTATE_NOSYNC;
1110 pf_unlink_state(st, PF_ENTER_LOCKED);
1111 }
1112
1113 return (len);
1114 }
1115
1116 static int
1117 pfsync_in_bus(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1118 {
1119 struct pfsync_softc *sc = V_pfsyncif;
1120 struct pfsync_bus *bus;
1121 struct mbuf *mp;
1122 int len = count * sizeof(*bus);
1123 int offp;
1124
1125 PFSYNC_BLOCK(sc);
1126
1127 /* If we're not waiting for a bulk update, who cares. */
1128 if (sc->sc_ureq_sent == 0) {
1129 PFSYNC_BUNLOCK(sc);
1130 return (len);
1131 }
1132
1133 mp = m_pulldown(m, offset, len, &offp);
1134 if (mp == NULL) {
1135 PFSYNC_BUNLOCK(sc);
1136 V_pfsyncstats.pfsyncs_badlen++;
1137 return (-1);
1138 }
1139 bus = (struct pfsync_bus *)(mp->m_data + offp);
1140
1141 switch (bus->status) {
1142 case PFSYNC_BUS_START:
1143 callout_reset(&sc->sc_bulkfail_tmo, 4 * hz +
1144 V_pf_limits[PF_LIMIT_STATES].limit /
1145 ((sc->sc_ifp->if_mtu - PFSYNC_MINPKT) /
1146 sizeof(struct pfsync_state)),
1147 pfsync_bulk_fail, sc);
1148 if (V_pf_status.debug >= PF_DEBUG_MISC)
1149 printf("pfsync: received bulk update start\n");
1150 break;
1151
1152 case PFSYNC_BUS_END:
1153 if (time_uptime - ntohl(bus->endtime) >=
1154 sc->sc_ureq_sent) {
1155 /* that's it, we're happy */
1156 sc->sc_ureq_sent = 0;
1157 sc->sc_bulk_tries = 0;
1158 callout_stop(&sc->sc_bulkfail_tmo);
1159 if (!(sc->sc_flags & PFSYNCF_OK) && carp_demote_adj_p)
1160 (*carp_demote_adj_p)(-V_pfsync_carp_adj,
1161 "pfsync bulk done");
1162 sc->sc_flags |= PFSYNCF_OK;
1163 if (V_pf_status.debug >= PF_DEBUG_MISC)
1164 printf("pfsync: received valid "
1165 "bulk update end\n");
1166 } else {
1167 if (V_pf_status.debug >= PF_DEBUG_MISC)
1168 printf("pfsync: received invalid "
1169 "bulk update end: bad timestamp\n");
1170 }
1171 break;
1172 }
1173 PFSYNC_BUNLOCK(sc);
1174
1175 return (len);
1176 }
1177
1178 static int
1179 pfsync_in_tdb(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1180 {
1181 int len = count * sizeof(struct pfsync_tdb);
1182
1183 #if defined(IPSEC)
1184 struct pfsync_tdb *tp;
1185 struct mbuf *mp;
1186 int offp;
1187 int i;
1188 int s;
1189
1190 mp = m_pulldown(m, offset, len, &offp);
1191 if (mp == NULL) {
1192 V_pfsyncstats.pfsyncs_badlen++;
1193 return (-1);
1194 }
1195 tp = (struct pfsync_tdb *)(mp->m_data + offp);
1196
1197 for (i = 0; i < count; i++)
1198 pfsync_update_net_tdb(&tp[i]);
1199 #endif
1200
1201 return (len);
1202 }
1203
1204 #if defined(IPSEC)
1205 /* Update an in-kernel tdb. Silently fail if no tdb is found. */
1206 static void
1207 pfsync_update_net_tdb(struct pfsync_tdb *pt)
1208 {
1209 struct tdb *tdb;
1210 int s;
1211
1212 /* check for invalid values */
1213 if (ntohl(pt->spi) <= SPI_RESERVED_MAX ||
1214 (pt->dst.sa.sa_family != AF_INET &&
1215 pt->dst.sa.sa_family != AF_INET6))
1216 goto bad;
1217
1218 tdb = gettdb(pt->spi, &pt->dst, pt->sproto);
1219 if (tdb) {
1220 pt->rpl = ntohl(pt->rpl);
1221 pt->cur_bytes = (unsigned long long)be64toh(pt->cur_bytes);
1222
1223 /* Neither replay nor byte counter should ever decrease. */
1224 if (pt->rpl < tdb->tdb_rpl ||
1225 pt->cur_bytes < tdb->tdb_cur_bytes) {
1226 goto bad;
1227 }
1228
1229 tdb->tdb_rpl = pt->rpl;
1230 tdb->tdb_cur_bytes = pt->cur_bytes;
1231 }
1232 return;
1233
1234 bad:
1235 if (V_pf_status.debug >= PF_DEBUG_MISC)
1236 printf("pfsync_insert: PFSYNC_ACT_TDB_UPD: "
1237 "invalid value\n");
1238 V_pfsyncstats.pfsyncs_badstate++;
1239 return;
1240 }
1241 #endif
1242
1243
1244 static int
1245 pfsync_in_eof(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1246 {
1247 /* check if we are at the right place in the packet */
1248 if (offset != m->m_pkthdr.len)
1249 V_pfsyncstats.pfsyncs_badlen++;
1250
1251 /* we're done. free and let the caller return */
1252 m_freem(m);
1253 return (-1);
1254 }
1255
1256 static int
1257 pfsync_in_error(struct pfsync_pkt *pkt, struct mbuf *m, int offset, int count)
1258 {
1259 V_pfsyncstats.pfsyncs_badact++;
1260
1261 m_freem(m);
1262 return (-1);
1263 }
1264
1265 static int
1266 pfsyncoutput(struct ifnet *ifp, struct mbuf *m, const struct sockaddr *dst,
1267 struct route *rt)
1268 {
1269 m_freem(m);
1270 return (0);
1271 }
1272
1273 /* ARGSUSED */
1274 static int
1275 pfsyncioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
1276 {
1277 struct pfsync_softc *sc = ifp->if_softc;
1278 struct ifreq *ifr = (struct ifreq *)data;
1279 struct pfsyncreq pfsyncr;
1280 int error;
1281
1282 switch (cmd) {
1283 case SIOCSIFFLAGS:
1284 PFSYNC_LOCK(sc);
1285 if (ifp->if_flags & IFF_UP) {
1286 ifp->if_drv_flags |= IFF_DRV_RUNNING;
1287 PFSYNC_UNLOCK(sc);
1288 pfsync_pointers_init();
1289 } else {
1290 ifp->if_drv_flags &= ~IFF_DRV_RUNNING;
1291 PFSYNC_UNLOCK(sc);
1292 pfsync_pointers_uninit();
1293 }
1294 break;
1295 case SIOCSIFMTU:
1296 if (!sc->sc_sync_if ||
1297 ifr->ifr_mtu <= PFSYNC_MINPKT ||
1298 ifr->ifr_mtu > sc->sc_sync_if->if_mtu)
1299 return (EINVAL);
1300 if (ifr->ifr_mtu < ifp->if_mtu) {
1301 PFSYNC_LOCK(sc);
1302 if (sc->sc_len > PFSYNC_MINPKT)
1303 pfsync_sendout(1);
1304 PFSYNC_UNLOCK(sc);
1305 }
1306 ifp->if_mtu = ifr->ifr_mtu;
1307 break;
1308 case SIOCGETPFSYNC:
1309 bzero(&pfsyncr, sizeof(pfsyncr));
1310 PFSYNC_LOCK(sc);
1311 if (sc->sc_sync_if) {
1312 strlcpy(pfsyncr.pfsyncr_syncdev,
1313 sc->sc_sync_if->if_xname, IFNAMSIZ);
1314 }
1315 pfsyncr.pfsyncr_syncpeer = sc->sc_sync_peer;
1316 pfsyncr.pfsyncr_maxupdates = sc->sc_maxupdates;
1317 pfsyncr.pfsyncr_defer = (PFSYNCF_DEFER ==
1318 (sc->sc_flags & PFSYNCF_DEFER));
1319 PFSYNC_UNLOCK(sc);
1320 return (copyout(&pfsyncr, ifr->ifr_data, sizeof(pfsyncr)));
1321
1322 case SIOCSETPFSYNC:
1323 {
1324 struct ip_moptions *imo = &sc->sc_imo;
1325 struct ifnet *sifp;
1326 struct ip *ip;
1327 void *mship = NULL;
1328
1329 if ((error = priv_check(curthread, PRIV_NETINET_PF)) != 0)
1330 return (error);
1331 if ((error = copyin(ifr->ifr_data, &pfsyncr, sizeof(pfsyncr))))
1332 return (error);
1333
1334 if (pfsyncr.pfsyncr_maxupdates > 255)
1335 return (EINVAL);
1336
1337 if (pfsyncr.pfsyncr_syncdev[0] == 0)
1338 sifp = NULL;
1339 else if ((sifp = ifunit_ref(pfsyncr.pfsyncr_syncdev)) == NULL)
1340 return (EINVAL);
1341
1342 if (sifp != NULL && (
1343 pfsyncr.pfsyncr_syncpeer.s_addr == 0 ||
1344 pfsyncr.pfsyncr_syncpeer.s_addr ==
1345 htonl(INADDR_PFSYNC_GROUP)))
1346 mship = malloc((sizeof(struct in_multi *) *
1347 IP_MIN_MEMBERSHIPS), M_PFSYNC, M_WAITOK | M_ZERO);
1348
1349 PFSYNC_LOCK(sc);
1350 if (pfsyncr.pfsyncr_syncpeer.s_addr == 0)
1351 sc->sc_sync_peer.s_addr = htonl(INADDR_PFSYNC_GROUP);
1352 else
1353 sc->sc_sync_peer.s_addr =
1354 pfsyncr.pfsyncr_syncpeer.s_addr;
1355
1356 sc->sc_maxupdates = pfsyncr.pfsyncr_maxupdates;
1357 if (pfsyncr.pfsyncr_defer) {
1358 sc->sc_flags |= PFSYNCF_DEFER;
1359 pfsync_defer_ptr = pfsync_defer;
1360 } else {
1361 sc->sc_flags &= ~PFSYNCF_DEFER;
1362 pfsync_defer_ptr = NULL;
1363 }
1364
1365 if (sifp == NULL) {
1366 if (sc->sc_sync_if)
1367 if_rele(sc->sc_sync_if);
1368 sc->sc_sync_if = NULL;
1369 if (imo->imo_membership)
1370 pfsync_multicast_cleanup(sc);
1371 PFSYNC_UNLOCK(sc);
1372 break;
1373 }
1374
1375 if (sc->sc_len > PFSYNC_MINPKT &&
1376 (sifp->if_mtu < sc->sc_ifp->if_mtu ||
1377 (sc->sc_sync_if != NULL &&
1378 sifp->if_mtu < sc->sc_sync_if->if_mtu) ||
1379 sifp->if_mtu < MCLBYTES - sizeof(struct ip)))
1380 pfsync_sendout(1);
1381
1382 if (imo->imo_membership)
1383 pfsync_multicast_cleanup(sc);
1384
1385 if (sc->sc_sync_peer.s_addr == htonl(INADDR_PFSYNC_GROUP)) {
1386 error = pfsync_multicast_setup(sc, sifp, mship);
1387 if (error) {
1388 if_rele(sifp);
1389 free(mship, M_PFSYNC);
1390 return (error);
1391 }
1392 }
1393 if (sc->sc_sync_if)
1394 if_rele(sc->sc_sync_if);
1395 sc->sc_sync_if = sifp;
1396
1397 ip = &sc->sc_template;
1398 bzero(ip, sizeof(*ip));
1399 ip->ip_v = IPVERSION;
1400 ip->ip_hl = sizeof(sc->sc_template) >> 2;
1401 ip->ip_tos = IPTOS_LOWDELAY;
1402 /* len and id are set later. */
1403 ip->ip_off = htons(IP_DF);
1404 ip->ip_ttl = PFSYNC_DFLTTL;
1405 ip->ip_p = IPPROTO_PFSYNC;
1406 ip->ip_src.s_addr = INADDR_ANY;
1407 ip->ip_dst.s_addr = sc->sc_sync_peer.s_addr;
1408
1409 /* Request a full state table update. */
1410 if ((sc->sc_flags & PFSYNCF_OK) && carp_demote_adj_p)
1411 (*carp_demote_adj_p)(V_pfsync_carp_adj,
1412 "pfsync bulk start");
1413 sc->sc_flags &= ~PFSYNCF_OK;
1414 if (V_pf_status.debug >= PF_DEBUG_MISC)
1415 printf("pfsync: requesting bulk update\n");
1416 pfsync_request_update(0, 0);
1417 PFSYNC_UNLOCK(sc);
1418 PFSYNC_BLOCK(sc);
1419 sc->sc_ureq_sent = time_uptime;
1420 callout_reset(&sc->sc_bulkfail_tmo, 5 * hz, pfsync_bulk_fail,
1421 sc);
1422 PFSYNC_BUNLOCK(sc);
1423
1424 break;
1425 }
1426 default:
1427 return (ENOTTY);
1428 }
1429
1430 return (0);
1431 }
1432
1433 static void
1434 pfsync_out_state(struct pf_state *st, void *buf)
1435 {
1436 struct pfsync_state *sp = buf;
1437
1438 pfsync_state_export(sp, st);
1439 }
1440
1441 static void
1442 pfsync_out_iack(struct pf_state *st, void *buf)
1443 {
1444 struct pfsync_ins_ack *iack = buf;
1445
1446 iack->id = st->id;
1447 iack->creatorid = st->creatorid;
1448 }
1449
1450 static void
1451 pfsync_out_upd_c(struct pf_state *st, void *buf)
1452 {
1453 struct pfsync_upd_c *up = buf;
1454
1455 bzero(up, sizeof(*up));
1456 up->id = st->id;
1457 pf_state_peer_hton(&st->src, &up->src);
1458 pf_state_peer_hton(&st->dst, &up->dst);
1459 up->creatorid = st->creatorid;
1460 up->timeout = st->timeout;
1461 }
1462
1463 static void
1464 pfsync_out_del(struct pf_state *st, void *buf)
1465 {
1466 struct pfsync_del_c *dp = buf;
1467
1468 dp->id = st->id;
1469 dp->creatorid = st->creatorid;
1470 st->state_flags |= PFSTATE_NOSYNC;
1471 }
1472
1473 static void
1474 pfsync_drop(struct pfsync_softc *sc)
1475 {
1476 struct pf_state *st, *next;
1477 struct pfsync_upd_req_item *ur;
1478 int q;
1479
1480 for (q = 0; q < PFSYNC_S_COUNT; q++) {
1481 if (TAILQ_EMPTY(&sc->sc_qs[q]))
1482 continue;
1483
1484 TAILQ_FOREACH_SAFE(st, &sc->sc_qs[q], sync_list, next) {
1485 KASSERT(st->sync_state == q,
1486 ("%s: st->sync_state == q",
1487 __func__));
1488 st->sync_state = PFSYNC_S_NONE;
1489 pf_release_state(st);
1490 }
1491 TAILQ_INIT(&sc->sc_qs[q]);
1492 }
1493
1494 while ((ur = TAILQ_FIRST(&sc->sc_upd_req_list)) != NULL) {
1495 TAILQ_REMOVE(&sc->sc_upd_req_list, ur, ur_entry);
1496 free(ur, M_PFSYNC);
1497 }
1498
1499 sc->sc_plus = NULL;
1500 sc->sc_len = PFSYNC_MINPKT;
1501 }
1502
1503 static void
1504 pfsync_sendout(int schedswi)
1505 {
1506 struct pfsync_softc *sc = V_pfsyncif;
1507 struct ifnet *ifp = sc->sc_ifp;
1508 struct mbuf *m;
1509 struct ip *ip;
1510 struct pfsync_header *ph;
1511 struct pfsync_subheader *subh;
1512 struct pf_state *st;
1513 struct pfsync_upd_req_item *ur;
1514 int offset;
1515 int q, count = 0;
1516
1517 KASSERT(sc != NULL, ("%s: null sc", __func__));
1518 KASSERT(sc->sc_len > PFSYNC_MINPKT,
1519 ("%s: sc_len %zu", __func__, sc->sc_len));
1520 PFSYNC_LOCK_ASSERT(sc);
1521
1522 if (ifp->if_bpf == NULL && sc->sc_sync_if == NULL) {
1523 pfsync_drop(sc);
1524 return;
1525 }
1526
1527 m = m_get2(max_linkhdr + sc->sc_len, M_NOWAIT, MT_DATA, M_PKTHDR);
1528 if (m == NULL) {
1529 if_inc_counter(sc->sc_ifp, IFCOUNTER_OERRORS, 1);
1530 V_pfsyncstats.pfsyncs_onomem++;
1531 return;
1532 }
1533 m->m_data += max_linkhdr;
1534 m->m_len = m->m_pkthdr.len = sc->sc_len;
1535
1536 /* build the ip header */
1537 ip = (struct ip *)m->m_data;
1538 bcopy(&sc->sc_template, ip, sizeof(*ip));
1539 offset = sizeof(*ip);
1540
1541 ip->ip_len = htons(m->m_pkthdr.len);
1542 ip_fillid(ip);
1543
1544 /* build the pfsync header */
1545 ph = (struct pfsync_header *)(m->m_data + offset);
1546 bzero(ph, sizeof(*ph));
1547 offset += sizeof(*ph);
1548
1549 ph->version = PFSYNC_VERSION;
1550 ph->len = htons(sc->sc_len - sizeof(*ip));
1551 bcopy(V_pf_status.pf_chksum, ph->pfcksum, PF_MD5_DIGEST_LENGTH);
1552
1553 /* walk the queues */
1554 for (q = 0; q < PFSYNC_S_COUNT; q++) {
1555 if (TAILQ_EMPTY(&sc->sc_qs[q]))
1556 continue;
1557
1558 subh = (struct pfsync_subheader *)(m->m_data + offset);
1559 offset += sizeof(*subh);
1560
1561 count = 0;
1562 TAILQ_FOREACH(st, &sc->sc_qs[q], sync_list) {
1563 KASSERT(st->sync_state == q,
1564 ("%s: st->sync_state == q",
1565 __func__));
1566 /*
1567 * XXXGL: some of write methods do unlocked reads
1568 * of state data :(
1569 */
1570 pfsync_qs[q].write(st, m->m_data + offset);
1571 offset += pfsync_qs[q].len;
1572 st->sync_state = PFSYNC_S_NONE;
1573 pf_release_state(st);
1574 count++;
1575 }
1576 TAILQ_INIT(&sc->sc_qs[q]);
1577
1578 bzero(subh, sizeof(*subh));
1579 subh->action = pfsync_qs[q].action;
1580 subh->count = htons(count);
1581 V_pfsyncstats.pfsyncs_oacts[pfsync_qs[q].action] += count;
1582 }
1583
1584 if (!TAILQ_EMPTY(&sc->sc_upd_req_list)) {
1585 subh = (struct pfsync_subheader *)(m->m_data + offset);
1586 offset += sizeof(*subh);
1587
1588 count = 0;
1589 while ((ur = TAILQ_FIRST(&sc->sc_upd_req_list)) != NULL) {
1590 TAILQ_REMOVE(&sc->sc_upd_req_list, ur, ur_entry);
1591
1592 bcopy(&ur->ur_msg, m->m_data + offset,
1593 sizeof(ur->ur_msg));
1594 offset += sizeof(ur->ur_msg);
1595 free(ur, M_PFSYNC);
1596 count++;
1597 }
1598
1599 bzero(subh, sizeof(*subh));
1600 subh->action = PFSYNC_ACT_UPD_REQ;
1601 subh->count = htons(count);
1602 V_pfsyncstats.pfsyncs_oacts[PFSYNC_ACT_UPD_REQ] += count;
1603 }
1604
1605 /* has someone built a custom region for us to add? */
1606 if (sc->sc_plus != NULL) {
1607 bcopy(sc->sc_plus, m->m_data + offset, sc->sc_pluslen);
1608 offset += sc->sc_pluslen;
1609
1610 sc->sc_plus = NULL;
1611 }
1612
1613 subh = (struct pfsync_subheader *)(m->m_data + offset);
1614 offset += sizeof(*subh);
1615
1616 bzero(subh, sizeof(*subh));
1617 subh->action = PFSYNC_ACT_EOF;
1618 subh->count = htons(1);
1619 V_pfsyncstats.pfsyncs_oacts[PFSYNC_ACT_EOF]++;
1620
1621 /* we're done, let's put it on the wire */
1622 if (ifp->if_bpf) {
1623 m->m_data += sizeof(*ip);
1624 m->m_len = m->m_pkthdr.len = sc->sc_len - sizeof(*ip);
1625 BPF_MTAP(ifp, m);
1626 m->m_data -= sizeof(*ip);
1627 m->m_len = m->m_pkthdr.len = sc->sc_len;
1628 }
1629
1630 if (sc->sc_sync_if == NULL) {
1631 sc->sc_len = PFSYNC_MINPKT;
1632 m_freem(m);
1633 return;
1634 }
1635
1636 if_inc_counter(sc->sc_ifp, IFCOUNTER_OPACKETS, 1);
1637 if_inc_counter(sc->sc_ifp, IFCOUNTER_OBYTES, m->m_pkthdr.len);
1638 sc->sc_len = PFSYNC_MINPKT;
1639
1640 if (!_IF_QFULL(&sc->sc_ifp->if_snd))
1641 _IF_ENQUEUE(&sc->sc_ifp->if_snd, m);
1642 else {
1643 m_freem(m);
1644 if_inc_counter(sc->sc_ifp, IFCOUNTER_OQDROPS, 1);
1645 }
1646 if (schedswi)
1647 swi_sched(V_pfsync_swi_cookie, 0);
1648 }
1649
1650 static void
1651 pfsync_insert_state(struct pf_state *st)
1652 {
1653 struct pfsync_softc *sc = V_pfsyncif;
1654
1655 if (st->state_flags & PFSTATE_NOSYNC)
1656 return;
1657
1658 if ((st->rule.ptr->rule_flag & PFRULE_NOSYNC) ||
1659 st->key[PF_SK_WIRE]->proto == IPPROTO_PFSYNC) {
1660 st->state_flags |= PFSTATE_NOSYNC;
1661 return;
1662 }
1663
1664 KASSERT(st->sync_state == PFSYNC_S_NONE,
1665 ("%s: st->sync_state %u", __func__, st->sync_state));
1666
1667 PFSYNC_LOCK(sc);
1668 if (sc->sc_len == PFSYNC_MINPKT)
1669 callout_reset(&sc->sc_tmo, 1 * hz, pfsync_timeout, V_pfsyncif);
1670
1671 pfsync_q_ins(st, PFSYNC_S_INS);
1672 PFSYNC_UNLOCK(sc);
1673
1674 st->sync_updates = 0;
1675 }
1676
1677 static int
1678 pfsync_defer(struct pf_state *st, struct mbuf *m)
1679 {
1680 struct pfsync_softc *sc = V_pfsyncif;
1681 struct pfsync_deferral *pd;
1682
1683 if (m->m_flags & (M_BCAST|M_MCAST))
1684 return (0);
1685
1686 PFSYNC_LOCK(sc);
1687
1688 if (sc == NULL || !(sc->sc_ifp->if_flags & IFF_DRV_RUNNING) ||
1689 !(sc->sc_flags & PFSYNCF_DEFER)) {
1690 PFSYNC_UNLOCK(sc);
1691 return (0);
1692 }
1693
1694 if (sc->sc_deferred >= 128)
1695 pfsync_undefer(TAILQ_FIRST(&sc->sc_deferrals), 0);
1696
1697 pd = malloc(sizeof(*pd), M_PFSYNC, M_NOWAIT);
1698 if (pd == NULL)
1699 return (0);
1700 sc->sc_deferred++;
1701
1702 m->m_flags |= M_SKIP_FIREWALL;
1703 st->state_flags |= PFSTATE_ACK;
1704
1705 pd->pd_sc = sc;
1706 pd->pd_refs = 0;
1707 pd->pd_st = st;
1708 pf_ref_state(st);
1709 pd->pd_m = m;
1710
1711 TAILQ_INSERT_TAIL(&sc->sc_deferrals, pd, pd_entry);
1712 callout_init_mtx(&pd->pd_tmo, &sc->sc_mtx, CALLOUT_RETURNUNLOCKED);
1713 callout_reset(&pd->pd_tmo, 10, pfsync_defer_tmo, pd);
1714
1715 pfsync_push(sc);
1716
1717 return (1);
1718 }
1719
1720 static void
1721 pfsync_undefer(struct pfsync_deferral *pd, int drop)
1722 {
1723 struct pfsync_softc *sc = pd->pd_sc;
1724 struct mbuf *m = pd->pd_m;
1725 struct pf_state *st = pd->pd_st;
1726
1727 PFSYNC_LOCK_ASSERT(sc);
1728
1729 TAILQ_REMOVE(&sc->sc_deferrals, pd, pd_entry);
1730 sc->sc_deferred--;
1731 pd->pd_st->state_flags &= ~PFSTATE_ACK; /* XXX: locking! */
1732 free(pd, M_PFSYNC);
1733 pf_release_state(st);
1734
1735 if (drop)
1736 m_freem(m);
1737 else {
1738 _IF_ENQUEUE(&sc->sc_ifp->if_snd, m);
1739 pfsync_push(sc);
1740 }
1741 }
1742
1743 static void
1744 pfsync_defer_tmo(void *arg)
1745 {
1746 struct pfsync_deferral *pd = arg;
1747 struct pfsync_softc *sc = pd->pd_sc;
1748 struct mbuf *m = pd->pd_m;
1749 struct pf_state *st = pd->pd_st;
1750
1751 PFSYNC_LOCK_ASSERT(sc);
1752
1753 CURVNET_SET(m->m_pkthdr.rcvif->if_vnet);
1754
1755 TAILQ_REMOVE(&sc->sc_deferrals, pd, pd_entry);
1756 sc->sc_deferred--;
1757 pd->pd_st->state_flags &= ~PFSTATE_ACK; /* XXX: locking! */
1758 if (pd->pd_refs == 0)
1759 free(pd, M_PFSYNC);
1760 PFSYNC_UNLOCK(sc);
1761
1762 ip_output(m, NULL, NULL, 0, NULL, NULL);
1763
1764 pf_release_state(st);
1765
1766 CURVNET_RESTORE();
1767 }
1768
1769 static void
1770 pfsync_undefer_state(struct pf_state *st, int drop)
1771 {
1772 struct pfsync_softc *sc = V_pfsyncif;
1773 struct pfsync_deferral *pd;
1774
1775 PFSYNC_LOCK_ASSERT(sc);
1776
1777 TAILQ_FOREACH(pd, &sc->sc_deferrals, pd_entry) {
1778 if (pd->pd_st == st) {
1779 if (callout_stop(&pd->pd_tmo) > 0)
1780 pfsync_undefer(pd, drop);
1781 return;
1782 }
1783 }
1784
1785 panic("%s: unable to find deferred state", __func__);
1786 }
1787
1788 static void
1789 pfsync_update_state(struct pf_state *st)
1790 {
1791 struct pfsync_softc *sc = V_pfsyncif;
1792 int sync = 0;
1793
1794 PF_STATE_LOCK_ASSERT(st);
1795 PFSYNC_LOCK(sc);
1796
1797 if (st->state_flags & PFSTATE_ACK)
1798 pfsync_undefer_state(st, 0);
1799 if (st->state_flags & PFSTATE_NOSYNC) {
1800 if (st->sync_state != PFSYNC_S_NONE)
1801 pfsync_q_del(st);
1802 PFSYNC_UNLOCK(sc);
1803 return;
1804 }
1805
1806 if (sc->sc_len == PFSYNC_MINPKT)
1807 callout_reset(&sc->sc_tmo, 1 * hz, pfsync_timeout, V_pfsyncif);
1808
1809 switch (st->sync_state) {
1810 case PFSYNC_S_UPD_C:
1811 case PFSYNC_S_UPD:
1812 case PFSYNC_S_INS:
1813 /* we're already handling it */
1814
1815 if (st->key[PF_SK_WIRE]->proto == IPPROTO_TCP) {
1816 st->sync_updates++;
1817 if (st->sync_updates >= sc->sc_maxupdates)
1818 sync = 1;
1819 }
1820 break;
1821
1822 case PFSYNC_S_IACK:
1823 pfsync_q_del(st);
1824 case PFSYNC_S_NONE:
1825 pfsync_q_ins(st, PFSYNC_S_UPD_C);
1826 st->sync_updates = 0;
1827 break;
1828
1829 default:
1830 panic("%s: unexpected sync state %d", __func__, st->sync_state);
1831 }
1832
1833 if (sync || (time_uptime - st->pfsync_time) < 2)
1834 pfsync_push(sc);
1835
1836 PFSYNC_UNLOCK(sc);
1837 }
1838
1839 static void
1840 pfsync_request_update(u_int32_t creatorid, u_int64_t id)
1841 {
1842 struct pfsync_softc *sc = V_pfsyncif;
1843 struct pfsync_upd_req_item *item;
1844 size_t nlen = sizeof(struct pfsync_upd_req);
1845
1846 PFSYNC_LOCK_ASSERT(sc);
1847
1848 /*
1849 * This code does a bit to prevent multiple update requests for the
1850 * same state being generated. It searches current subheader queue,
1851 * but it doesn't lookup into queue of already packed datagrams.
1852 */
1853 TAILQ_FOREACH(item, &sc->sc_upd_req_list, ur_entry)
1854 if (item->ur_msg.id == id &&
1855 item->ur_msg.creatorid == creatorid)
1856 return;
1857
1858 item = malloc(sizeof(*item), M_PFSYNC, M_NOWAIT);
1859 if (item == NULL)
1860 return; /* XXX stats */
1861
1862 item->ur_msg.id = id;
1863 item->ur_msg.creatorid = creatorid;
1864
1865 if (TAILQ_EMPTY(&sc->sc_upd_req_list))
1866 nlen += sizeof(struct pfsync_subheader);
1867
1868 if (sc->sc_len + nlen > sc->sc_ifp->if_mtu) {
1869 pfsync_sendout(1);
1870
1871 nlen = sizeof(struct pfsync_subheader) +
1872 sizeof(struct pfsync_upd_req);
1873 }
1874
1875 TAILQ_INSERT_TAIL(&sc->sc_upd_req_list, item, ur_entry);
1876 sc->sc_len += nlen;
1877 }
1878
1879 static void
1880 pfsync_update_state_req(struct pf_state *st)
1881 {
1882 struct pfsync_softc *sc = V_pfsyncif;
1883
1884 PF_STATE_LOCK_ASSERT(st);
1885 PFSYNC_LOCK(sc);
1886
1887 if (st->state_flags & PFSTATE_NOSYNC) {
1888 if (st->sync_state != PFSYNC_S_NONE)
1889 pfsync_q_del(st);
1890 PFSYNC_UNLOCK(sc);
1891 return;
1892 }
1893
1894 switch (st->sync_state) {
1895 case PFSYNC_S_UPD_C:
1896 case PFSYNC_S_IACK:
1897 pfsync_q_del(st);
1898 case PFSYNC_S_NONE:
1899 pfsync_q_ins(st, PFSYNC_S_UPD);
1900 pfsync_push(sc);
1901 break;
1902
1903 case PFSYNC_S_INS:
1904 case PFSYNC_S_UPD:
1905 case PFSYNC_S_DEL:
1906 /* we're already handling it */
1907 break;
1908
1909 default:
1910 panic("%s: unexpected sync state %d", __func__, st->sync_state);
1911 }
1912
1913 PFSYNC_UNLOCK(sc);
1914 }
1915
1916 static void
1917 pfsync_delete_state(struct pf_state *st)
1918 {
1919 struct pfsync_softc *sc = V_pfsyncif;
1920
1921 PFSYNC_LOCK(sc);
1922 if (st->state_flags & PFSTATE_ACK)
1923 pfsync_undefer_state(st, 1);
1924 if (st->state_flags & PFSTATE_NOSYNC) {
1925 if (st->sync_state != PFSYNC_S_NONE)
1926 pfsync_q_del(st);
1927 PFSYNC_UNLOCK(sc);
1928 return;
1929 }
1930
1931 if (sc->sc_len == PFSYNC_MINPKT)
1932 callout_reset(&sc->sc_tmo, 1 * hz, pfsync_timeout, V_pfsyncif);
1933
1934 switch (st->sync_state) {
1935 case PFSYNC_S_INS:
1936 /* We never got to tell the world so just forget about it. */
1937 pfsync_q_del(st);
1938 break;
1939
1940 case PFSYNC_S_UPD_C:
1941 case PFSYNC_S_UPD:
1942 case PFSYNC_S_IACK:
1943 pfsync_q_del(st);
1944 /* FALLTHROUGH to putting it on the del list */
1945
1946 case PFSYNC_S_NONE:
1947 pfsync_q_ins(st, PFSYNC_S_DEL);
1948 break;
1949
1950 default:
1951 panic("%s: unexpected sync state %d", __func__, st->sync_state);
1952 }
1953 PFSYNC_UNLOCK(sc);
1954 }
1955
1956 static void
1957 pfsync_clear_states(u_int32_t creatorid, const char *ifname)
1958 {
1959 struct pfsync_softc *sc = V_pfsyncif;
1960 struct {
1961 struct pfsync_subheader subh;
1962 struct pfsync_clr clr;
1963 } __packed r;
1964
1965 bzero(&r, sizeof(r));
1966
1967 r.subh.action = PFSYNC_ACT_CLR;
1968 r.subh.count = htons(1);
1969 V_pfsyncstats.pfsyncs_oacts[PFSYNC_ACT_CLR]++;
1970
1971 strlcpy(r.clr.ifname, ifname, sizeof(r.clr.ifname));
1972 r.clr.creatorid = creatorid;
1973
1974 PFSYNC_LOCK(sc);
1975 pfsync_send_plus(&r, sizeof(r));
1976 PFSYNC_UNLOCK(sc);
1977 }
1978
1979 static void
1980 pfsync_q_ins(struct pf_state *st, int q)
1981 {
1982 struct pfsync_softc *sc = V_pfsyncif;
1983 size_t nlen = pfsync_qs[q].len;
1984
1985 PFSYNC_LOCK_ASSERT(sc);
1986
1987 KASSERT(st->sync_state == PFSYNC_S_NONE,
1988 ("%s: st->sync_state %u", __func__, st->sync_state));
1989 KASSERT(sc->sc_len >= PFSYNC_MINPKT, ("pfsync pkt len is too low %zu",
1990 sc->sc_len));
1991
1992 if (TAILQ_EMPTY(&sc->sc_qs[q]))
1993 nlen += sizeof(struct pfsync_subheader);
1994
1995 if (sc->sc_len + nlen > sc->sc_ifp->if_mtu) {
1996 pfsync_sendout(1);
1997
1998 nlen = sizeof(struct pfsync_subheader) + pfsync_qs[q].len;
1999 }
2000
2001 sc->sc_len += nlen;
2002 TAILQ_INSERT_TAIL(&sc->sc_qs[q], st, sync_list);
2003 st->sync_state = q;
2004 pf_ref_state(st);
2005 }
2006
2007 static void
2008 pfsync_q_del(struct pf_state *st)
2009 {
2010 struct pfsync_softc *sc = V_pfsyncif;
2011 int q = st->sync_state;
2012
2013 PFSYNC_LOCK_ASSERT(sc);
2014 KASSERT(st->sync_state != PFSYNC_S_NONE,
2015 ("%s: st->sync_state != PFSYNC_S_NONE", __func__));
2016
2017 sc->sc_len -= pfsync_qs[q].len;
2018 TAILQ_REMOVE(&sc->sc_qs[q], st, sync_list);
2019 st->sync_state = PFSYNC_S_NONE;
2020 pf_release_state(st);
2021
2022 if (TAILQ_EMPTY(&sc->sc_qs[q]))
2023 sc->sc_len -= sizeof(struct pfsync_subheader);
2024 }
2025
2026 static void
2027 pfsync_bulk_start(void)
2028 {
2029 struct pfsync_softc *sc = V_pfsyncif;
2030
2031 if (V_pf_status.debug >= PF_DEBUG_MISC)
2032 printf("pfsync: received bulk update request\n");
2033
2034 PFSYNC_BLOCK(sc);
2035
2036 sc->sc_ureq_received = time_uptime;
2037 sc->sc_bulk_hashid = 0;
2038 sc->sc_bulk_stateid = 0;
2039 pfsync_bulk_status(PFSYNC_BUS_START);
2040 callout_reset(&sc->sc_bulk_tmo, 1, pfsync_bulk_update, sc);
2041 PFSYNC_BUNLOCK(sc);
2042 }
2043
2044 static void
2045 pfsync_bulk_update(void *arg)
2046 {
2047 struct pfsync_softc *sc = arg;
2048 struct pf_state *s;
2049 int i, sent = 0;
2050
2051 PFSYNC_BLOCK_ASSERT(sc);
2052 CURVNET_SET(sc->sc_ifp->if_vnet);
2053
2054 /*
2055 * Start with last state from previous invocation.
2056 * It may had gone, in this case start from the
2057 * hash slot.
2058 */
2059 s = pf_find_state_byid(sc->sc_bulk_stateid, sc->sc_bulk_creatorid);
2060
2061 if (s != NULL)
2062 i = PF_IDHASH(s);
2063 else
2064 i = sc->sc_bulk_hashid;
2065
2066 for (; i <= pf_hashmask; i++) {
2067 struct pf_idhash *ih = &V_pf_idhash[i];
2068
2069 if (s != NULL)
2070 PF_HASHROW_ASSERT(ih);
2071 else {
2072 PF_HASHROW_LOCK(ih);
2073 s = LIST_FIRST(&ih->states);
2074 }
2075
2076 for (; s; s = LIST_NEXT(s, entry)) {
2077
2078 if (sent > 1 && (sc->sc_ifp->if_mtu - sc->sc_len) <
2079 sizeof(struct pfsync_state)) {
2080 /* We've filled a packet. */
2081 sc->sc_bulk_hashid = i;
2082 sc->sc_bulk_stateid = s->id;
2083 sc->sc_bulk_creatorid = s->creatorid;
2084 PF_HASHROW_UNLOCK(ih);
2085 callout_reset(&sc->sc_bulk_tmo, 1,
2086 pfsync_bulk_update, sc);
2087 goto full;
2088 }
2089
2090 if (s->sync_state == PFSYNC_S_NONE &&
2091 s->timeout < PFTM_MAX &&
2092 s->pfsync_time <= sc->sc_ureq_received) {
2093 pfsync_update_state_req(s);
2094 sent++;
2095 }
2096 }
2097 PF_HASHROW_UNLOCK(ih);
2098 }
2099
2100 /* We're done. */
2101 pfsync_bulk_status(PFSYNC_BUS_END);
2102
2103 full:
2104 CURVNET_RESTORE();
2105 }
2106
2107 static void
2108 pfsync_bulk_status(u_int8_t status)
2109 {
2110 struct {
2111 struct pfsync_subheader subh;
2112 struct pfsync_bus bus;
2113 } __packed r;
2114
2115 struct pfsync_softc *sc = V_pfsyncif;
2116
2117 bzero(&r, sizeof(r));
2118
2119 r.subh.action = PFSYNC_ACT_BUS;
2120 r.subh.count = htons(1);
2121 V_pfsyncstats.pfsyncs_oacts[PFSYNC_ACT_BUS]++;
2122
2123 r.bus.creatorid = V_pf_status.hostid;
2124 r.bus.endtime = htonl(time_uptime - sc->sc_ureq_received);
2125 r.bus.status = status;
2126
2127 PFSYNC_LOCK(sc);
2128 pfsync_send_plus(&r, sizeof(r));
2129 PFSYNC_UNLOCK(sc);
2130 }
2131
2132 static void
2133 pfsync_bulk_fail(void *arg)
2134 {
2135 struct pfsync_softc *sc = arg;
2136
2137 CURVNET_SET(sc->sc_ifp->if_vnet);
2138
2139 PFSYNC_BLOCK_ASSERT(sc);
2140
2141 if (sc->sc_bulk_tries++ < PFSYNC_MAX_BULKTRIES) {
2142 /* Try again */
2143 callout_reset(&sc->sc_bulkfail_tmo, 5 * hz,
2144 pfsync_bulk_fail, V_pfsyncif);
2145 PFSYNC_LOCK(sc);
2146 pfsync_request_update(0, 0);
2147 PFSYNC_UNLOCK(sc);
2148 } else {
2149 /* Pretend like the transfer was ok. */
2150 sc->sc_ureq_sent = 0;
2151 sc->sc_bulk_tries = 0;
2152 PFSYNC_LOCK(sc);
2153 if (!(sc->sc_flags & PFSYNCF_OK) && carp_demote_adj_p)
2154 (*carp_demote_adj_p)(-V_pfsync_carp_adj,
2155 "pfsync bulk fail");
2156 sc->sc_flags |= PFSYNCF_OK;
2157 PFSYNC_UNLOCK(sc);
2158 if (V_pf_status.debug >= PF_DEBUG_MISC)
2159 printf("pfsync: failed to receive bulk update\n");
2160 }
2161
2162 CURVNET_RESTORE();
2163 }
2164
2165 static void
2166 pfsync_send_plus(void *plus, size_t pluslen)
2167 {
2168 struct pfsync_softc *sc = V_pfsyncif;
2169
2170 PFSYNC_LOCK_ASSERT(sc);
2171
2172 if (sc->sc_len + pluslen > sc->sc_ifp->if_mtu)
2173 pfsync_sendout(1);
2174
2175 sc->sc_plus = plus;
2176 sc->sc_len += (sc->sc_pluslen = pluslen);
2177
2178 pfsync_sendout(1);
2179 }
2180
2181 static void
2182 pfsync_timeout(void *arg)
2183 {
2184 struct pfsync_softc *sc = arg;
2185
2186 CURVNET_SET(sc->sc_ifp->if_vnet);
2187 PFSYNC_LOCK(sc);
2188 pfsync_push(sc);
2189 PFSYNC_UNLOCK(sc);
2190 CURVNET_RESTORE();
2191 }
2192
2193 static void
2194 pfsync_push(struct pfsync_softc *sc)
2195 {
2196
2197 PFSYNC_LOCK_ASSERT(sc);
2198
2199 sc->sc_flags |= PFSYNCF_PUSH;
2200 swi_sched(V_pfsync_swi_cookie, 0);
2201 }
2202
2203 static void
2204 pfsyncintr(void *arg)
2205 {
2206 struct pfsync_softc *sc = arg;
2207 struct mbuf *m, *n;
2208
2209 CURVNET_SET(sc->sc_ifp->if_vnet);
2210
2211 PFSYNC_LOCK(sc);
2212 if ((sc->sc_flags & PFSYNCF_PUSH) && sc->sc_len > PFSYNC_MINPKT) {
2213 pfsync_sendout(0);
2214 sc->sc_flags &= ~PFSYNCF_PUSH;
2215 }
2216 _IF_DEQUEUE_ALL(&sc->sc_ifp->if_snd, m);
2217 PFSYNC_UNLOCK(sc);
2218
2219 for (; m != NULL; m = n) {
2220
2221 n = m->m_nextpkt;
2222 m->m_nextpkt = NULL;
2223
2224 /*
2225 * We distinguish between a deferral packet and our
2226 * own pfsync packet based on M_SKIP_FIREWALL
2227 * flag. This is XXX.
2228 */
2229 if (m->m_flags & M_SKIP_FIREWALL)
2230 ip_output(m, NULL, NULL, 0, NULL, NULL);
2231 else if (ip_output(m, NULL, NULL, IP_RAWOUTPUT, &sc->sc_imo,
2232 NULL) == 0)
2233 V_pfsyncstats.pfsyncs_opackets++;
2234 else
2235 V_pfsyncstats.pfsyncs_oerrors++;
2236 }
2237 CURVNET_RESTORE();
2238 }
2239
2240 static int
2241 pfsync_multicast_setup(struct pfsync_softc *sc, struct ifnet *ifp, void *mship)
2242 {
2243 struct ip_moptions *imo = &sc->sc_imo;
2244 int error;
2245
2246 if (!(ifp->if_flags & IFF_MULTICAST))
2247 return (EADDRNOTAVAIL);
2248
2249 imo->imo_membership = (struct in_multi **)mship;
2250 imo->imo_max_memberships = IP_MIN_MEMBERSHIPS;
2251 imo->imo_multicast_vif = -1;
2252
2253 if ((error = in_joingroup(ifp, &sc->sc_sync_peer, NULL,
2254 &imo->imo_membership[0])) != 0) {
2255 imo->imo_membership = NULL;
2256 return (error);
2257 }
2258 imo->imo_num_memberships++;
2259 imo->imo_multicast_ifp = ifp;
2260 imo->imo_multicast_ttl = PFSYNC_DFLTTL;
2261 imo->imo_multicast_loop = 0;
2262
2263 return (0);
2264 }
2265
2266 static void
2267 pfsync_multicast_cleanup(struct pfsync_softc *sc)
2268 {
2269 struct ip_moptions *imo = &sc->sc_imo;
2270
2271 in_leavegroup(imo->imo_membership[0], NULL);
2272 free(imo->imo_membership, M_PFSYNC);
2273 imo->imo_membership = NULL;
2274 imo->imo_multicast_ifp = NULL;
2275 }
2276
2277 #ifdef INET
2278 extern struct domain inetdomain;
2279 static struct protosw in_pfsync_protosw = {
2280 .pr_type = SOCK_RAW,
2281 .pr_domain = &inetdomain,
2282 .pr_protocol = IPPROTO_PFSYNC,
2283 .pr_flags = PR_ATOMIC|PR_ADDR,
2284 .pr_input = pfsync_input,
2285 .pr_output = rip_output,
2286 .pr_ctloutput = rip_ctloutput,
2287 .pr_usrreqs = &rip_usrreqs
2288 };
2289 #endif
2290
2291 static void
2292 pfsync_pointers_init()
2293 {
2294
2295 PF_RULES_WLOCK();
2296 pfsync_state_import_ptr = pfsync_state_import;
2297 pfsync_insert_state_ptr = pfsync_insert_state;
2298 pfsync_update_state_ptr = pfsync_update_state;
2299 pfsync_delete_state_ptr = pfsync_delete_state;
2300 pfsync_clear_states_ptr = pfsync_clear_states;
2301 pfsync_defer_ptr = pfsync_defer;
2302 PF_RULES_WUNLOCK();
2303 }
2304
2305 static void
2306 pfsync_pointers_uninit()
2307 {
2308
2309 PF_RULES_WLOCK();
2310 pfsync_state_import_ptr = NULL;
2311 pfsync_insert_state_ptr = NULL;
2312 pfsync_update_state_ptr = NULL;
2313 pfsync_delete_state_ptr = NULL;
2314 pfsync_clear_states_ptr = NULL;
2315 pfsync_defer_ptr = NULL;
2316 PF_RULES_WUNLOCK();
2317 }
2318
2319 static void
2320 vnet_pfsync_init(const void *unused __unused)
2321 {
2322 int error;
2323
2324 V_pfsync_cloner = if_clone_simple(pfsyncname,
2325 pfsync_clone_create, pfsync_clone_destroy, 1);
2326 error = swi_add(NULL, pfsyncname, pfsyncintr, V_pfsyncif,
2327 SWI_NET, INTR_MPSAFE, &V_pfsync_swi_cookie);
2328 if (error) {
2329 if_clone_detach(V_pfsync_cloner);
2330 log(LOG_INFO, "swi_add() failed in %s\n", __func__);
2331 }
2332 }
2333 VNET_SYSINIT(vnet_pfsync_init, SI_SUB_PROTO_FIREWALL, SI_ORDER_ANY,
2334 vnet_pfsync_init, NULL);
2335
2336 static void
2337 vnet_pfsync_uninit(const void *unused __unused)
2338 {
2339
2340 if_clone_detach(V_pfsync_cloner);
2341 swi_remove(V_pfsync_swi_cookie);
2342 }
2343 /*
2344 * Detach after pf is gone; otherwise we might touch pfsync memory
2345 * from within pf after freeing pfsync.
2346 */
2347 VNET_SYSUNINIT(vnet_pfsync_uninit, SI_SUB_INIT_IF, SI_ORDER_SECOND,
2348 vnet_pfsync_uninit, NULL);
2349
2350 static int
2351 pfsync_init()
2352 {
2353 #ifdef INET
2354 int error;
2355
2356 error = pf_proto_register(PF_INET, &in_pfsync_protosw);
2357 if (error)
2358 return (error);
2359 error = ipproto_register(IPPROTO_PFSYNC);
2360 if (error) {
2361 pf_proto_unregister(PF_INET, IPPROTO_PFSYNC, SOCK_RAW);
2362 return (error);
2363 }
2364 #endif
2365 pfsync_pointers_init();
2366
2367 return (0);
2368 }
2369
2370 static void
2371 pfsync_uninit()
2372 {
2373
2374 pfsync_pointers_uninit();
2375
2376 #ifdef INET
2377 ipproto_unregister(IPPROTO_PFSYNC);
2378 pf_proto_unregister(PF_INET, IPPROTO_PFSYNC, SOCK_RAW);
2379 #endif
2380 }
2381
2382 static int
2383 pfsync_modevent(module_t mod, int type, void *data)
2384 {
2385 int error = 0;
2386
2387 switch (type) {
2388 case MOD_LOAD:
2389 error = pfsync_init();
2390 break;
2391 case MOD_QUIESCE:
2392 /*
2393 * Module should not be unloaded due to race conditions.
2394 */
2395 error = EBUSY;
2396 break;
2397 case MOD_UNLOAD:
2398 pfsync_uninit();
2399 break;
2400 default:
2401 error = EINVAL;
2402 break;
2403 }
2404
2405 return (error);
2406 }
2407
2408 static moduledata_t pfsync_mod = {
2409 pfsyncname,
2410 pfsync_modevent,
2411 0
2412 };
2413
2414 #define PFSYNC_MODVER 1
2415
2416 /* Stay on FIREWALL as we depend on pf being initialized and on inetdomain. */
2417 DECLARE_MODULE(pfsync, pfsync_mod, SI_SUB_PROTO_FIREWALL, SI_ORDER_ANY);
2418 MODULE_VERSION(pfsync, PFSYNC_MODVER);
2419 MODULE_DEPEND(pfsync, pf, PF_MODVER, PF_MODVER, PF_MODVER);
Cache object: eceeb38ff8136e7de1e6b0e9bbbab383
|