xref: /openbsd-src/sys/net/if_pflow.c (revision a5429850edcc9dd5646cc8ddb251ed22eba08b09)
1 /*	$OpenBSD: if_pflow.c,v 1.96 2022/08/12 16:38:50 mvs Exp $	*/
2 
3 /*
4  * Copyright (c) 2011 Florian Obser <florian@narrans.de>
5  * Copyright (c) 2011 Sebastian Benoit <benoit-lists@fb12.de>
6  * Copyright (c) 2008 Henning Brauer <henning@openbsd.org>
7  * Copyright (c) 2008 Joerg Goltermann <jg@osn.de>
8  *
9  * Permission to use, copy, modify, and distribute this software for any
10  * purpose with or without fee is hereby granted, provided that the above
11  * copyright notice and this permission notice appear in all copies.
12  *
13  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
14  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
15  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
16  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
17  * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER IN
18  * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
19  * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
20  */
21 
22 #include <sys/param.h>
23 #include <sys/malloc.h>
24 #include <sys/systm.h>
25 #include <sys/mbuf.h>
26 #include <sys/socket.h>
27 #include <sys/timeout.h>
28 #include <sys/ioctl.h>
29 #include <sys/kernel.h>
30 #include <sys/socket.h>
31 #include <sys/socketvar.h>
32 #include <sys/sysctl.h>
33 
34 #include <net/if.h>
35 #include <net/if_types.h>
36 #include <net/bpf.h>
37 #include <net/route.h>
38 #include <netinet/in.h>
39 #include <netinet/if_ether.h>
40 #include <netinet/tcp.h>
41 
42 #include <netinet/ip.h>
43 #include <netinet/ip_var.h>
44 #include <netinet/udp.h>
45 #include <netinet/udp_var.h>
46 #include <netinet/in_pcb.h>
47 
48 #include <net/pfvar.h>
49 #include <net/if_pflow.h>
50 
51 #include "bpfilter.h"
52 #include "pflow.h"
53 
54 #define PFLOW_MINMTU	\
55     (sizeof(struct pflow_header) + sizeof(struct pflow_flow))
56 
57 #ifdef PFLOWDEBUG
58 #define DPRINTF(x)	do { printf x ; } while (0)
59 #else
60 #define DPRINTF(x)
61 #endif
62 
63 SLIST_HEAD(, pflow_softc) pflowif_list;
64 struct pflowstats	 pflowstats;
65 
66 void	pflowattach(int);
67 int	pflow_output(struct ifnet *ifp, struct mbuf *m, struct sockaddr *dst,
68 	struct rtentry *rt);
69 void	pflow_output_process(void *);
70 int	pflow_clone_create(struct if_clone *, int);
71 int	pflow_clone_destroy(struct ifnet *);
72 int	pflow_set(struct pflow_softc *, struct pflowreq *);
73 void	pflow_init_timeouts(struct pflow_softc *);
74 int	pflow_calc_mtu(struct pflow_softc *, int, int);
75 void	pflow_setmtu(struct pflow_softc *, int);
76 int	pflowvalidsockaddr(const struct sockaddr *, int);
77 int	pflowioctl(struct ifnet *, u_long, caddr_t);
78 
79 struct mbuf	*pflow_get_mbuf(struct pflow_softc *, u_int16_t);
80 void	pflow_flush(struct pflow_softc *);
81 int	pflow_sendout_v5(struct pflow_softc *);
82 int	pflow_sendout_ipfix(struct pflow_softc *, sa_family_t);
83 int	pflow_sendout_ipfix_tmpl(struct pflow_softc *);
84 int	pflow_sendout_mbuf(struct pflow_softc *, struct mbuf *);
85 void	pflow_timeout(void *);
86 void	pflow_timeout6(void *);
87 void	pflow_timeout_tmpl(void *);
88 void	copy_flow_data(struct pflow_flow *, struct pflow_flow *,
89 	struct pf_state *, struct pf_state_key *, int, int);
90 void	copy_flow_ipfix_4_data(struct pflow_ipfix_flow4 *,
91 	struct pflow_ipfix_flow4 *, struct pf_state *, struct pf_state_key *,
92 	struct pflow_softc *, int, int);
93 void	copy_flow_ipfix_6_data(struct pflow_ipfix_flow6 *,
94 	struct pflow_ipfix_flow6 *, struct pf_state *, struct pf_state_key *,
95 	struct pflow_softc *, int, int);
96 int	pflow_pack_flow(struct pf_state *, struct pf_state_key *,
97 	struct pflow_softc *);
98 int	pflow_pack_flow_ipfix(struct pf_state *, struct pf_state_key *,
99 	struct pflow_softc *);
100 int	export_pflow_if(struct pf_state*, struct pf_state_key *,
101 	struct pflow_softc *);
102 int	copy_flow_to_m(struct pflow_flow *flow, struct pflow_softc *sc);
103 int	copy_flow_ipfix_4_to_m(struct pflow_ipfix_flow4 *flow,
104 	struct pflow_softc *sc);
105 int	copy_flow_ipfix_6_to_m(struct pflow_ipfix_flow6 *flow,
106 	struct pflow_softc *sc);
107 
108 struct if_clone	pflow_cloner =
109     IF_CLONE_INITIALIZER("pflow", pflow_clone_create,
110     pflow_clone_destroy);
111 
112 void
113 pflowattach(int npflow)
114 {
115 	SLIST_INIT(&pflowif_list);
116 	if_clone_attach(&pflow_cloner);
117 }
118 
119 int
120 pflow_output(struct ifnet *ifp, struct mbuf *m, struct sockaddr *dst,
121 	struct rtentry *rt)
122 {
123 	m_freem(m);	/* drop packet */
124 	return (EAFNOSUPPORT);
125 }
126 
127 void
128 pflow_output_process(void *arg)
129 {
130 	struct mbuf_list ml;
131 	struct pflow_softc *sc = arg;
132 	struct mbuf *m;
133 
134 	mq_delist(&sc->sc_outputqueue, &ml);
135 	KERNEL_LOCK();
136 	while ((m = ml_dequeue(&ml)) != NULL) {
137 		pflow_sendout_mbuf(sc, m);
138 	}
139 	KERNEL_UNLOCK();
140 }
141 
142 int
143 pflow_clone_create(struct if_clone *ifc, int unit)
144 {
145 	struct ifnet		*ifp;
146 	struct pflow_softc	*pflowif;
147 
148 	pflowif = malloc(sizeof(*pflowif), M_DEVBUF, M_WAITOK|M_ZERO);
149 	MGET(pflowif->send_nam, M_WAIT, MT_SONAME);
150 	pflowif->sc_version = PFLOW_PROTO_DEFAULT;
151 
152 	/* ipfix template init */
153 	bzero(&pflowif->sc_tmpl_ipfix,sizeof(pflowif->sc_tmpl_ipfix));
154 	pflowif->sc_tmpl_ipfix.set_header.set_id =
155 	    htons(PFLOW_IPFIX_TMPL_SET_ID);
156 	pflowif->sc_tmpl_ipfix.set_header.set_length =
157 	    htons(sizeof(struct pflow_ipfix_tmpl));
158 
159 	/* ipfix IPv4 template */
160 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.h.tmpl_id =
161 	    htons(PFLOW_IPFIX_TMPL_IPV4_ID);
162 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.h.field_count
163 	    = htons(PFLOW_IPFIX_TMPL_IPV4_FIELD_COUNT);
164 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.src_ip.field_id =
165 	    htons(PFIX_IE_sourceIPv4Address);
166 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.src_ip.len = htons(4);
167 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.dest_ip.field_id =
168 	    htons(PFIX_IE_destinationIPv4Address);
169 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.dest_ip.len = htons(4);
170 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.if_index_in.field_id =
171 	    htons(PFIX_IE_ingressInterface);
172 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.if_index_in.len = htons(4);
173 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.if_index_out.field_id =
174 	    htons(PFIX_IE_egressInterface);
175 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.if_index_out.len = htons(4);
176 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.packets.field_id =
177 	    htons(PFIX_IE_packetDeltaCount);
178 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.packets.len = htons(8);
179 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.octets.field_id =
180 	    htons(PFIX_IE_octetDeltaCount);
181 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.octets.len = htons(8);
182 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.start.field_id =
183 	    htons(PFIX_IE_flowStartMilliseconds);
184 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.start.len = htons(8);
185 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.finish.field_id =
186 	    htons(PFIX_IE_flowEndMilliseconds);
187 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.finish.len = htons(8);
188 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.src_port.field_id =
189 	    htons(PFIX_IE_sourceTransportPort);
190 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.src_port.len = htons(2);
191 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.dest_port.field_id =
192 	    htons(PFIX_IE_destinationTransportPort);
193 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.dest_port.len = htons(2);
194 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.tos.field_id =
195 	    htons(PFIX_IE_ipClassOfService);
196 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.tos.len = htons(1);
197 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.protocol.field_id =
198 	    htons(PFIX_IE_protocolIdentifier);
199 	pflowif->sc_tmpl_ipfix.ipv4_tmpl.protocol.len = htons(1);
200 
201 	/* ipfix IPv6 template */
202 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.h.tmpl_id =
203 	    htons(PFLOW_IPFIX_TMPL_IPV6_ID);
204 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.h.field_count =
205 	    htons(PFLOW_IPFIX_TMPL_IPV6_FIELD_COUNT);
206 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.src_ip.field_id =
207 	    htons(PFIX_IE_sourceIPv6Address);
208 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.src_ip.len = htons(16);
209 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.dest_ip.field_id =
210 	    htons(PFIX_IE_destinationIPv6Address);
211 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.dest_ip.len = htons(16);
212 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.if_index_in.field_id =
213 	    htons(PFIX_IE_ingressInterface);
214 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.if_index_in.len = htons(4);
215 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.if_index_out.field_id =
216 	    htons(PFIX_IE_egressInterface);
217 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.if_index_out.len = htons(4);
218 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.packets.field_id =
219 	    htons(PFIX_IE_packetDeltaCount);
220 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.packets.len = htons(8);
221 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.octets.field_id =
222 	    htons(PFIX_IE_octetDeltaCount);
223 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.octets.len = htons(8);
224 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.start.field_id =
225 	    htons(PFIX_IE_flowStartMilliseconds);
226 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.start.len = htons(8);
227 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.finish.field_id =
228 	    htons(PFIX_IE_flowEndMilliseconds);
229 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.finish.len = htons(8);
230 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.src_port.field_id =
231 	    htons(PFIX_IE_sourceTransportPort);
232 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.src_port.len = htons(2);
233 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.dest_port.field_id =
234 	    htons(PFIX_IE_destinationTransportPort);
235 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.dest_port.len = htons(2);
236 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.tos.field_id =
237 	    htons(PFIX_IE_ipClassOfService);
238 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.tos.len = htons(1);
239 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.protocol.field_id =
240 	    htons(PFIX_IE_protocolIdentifier);
241 	pflowif->sc_tmpl_ipfix.ipv6_tmpl.protocol.len = htons(1);
242 
243 	ifp = &pflowif->sc_if;
244 	snprintf(ifp->if_xname, sizeof ifp->if_xname, "pflow%d", unit);
245 	ifp->if_softc = pflowif;
246 	ifp->if_ioctl = pflowioctl;
247 	ifp->if_output = pflow_output;
248 	ifp->if_start = NULL;
249 	ifp->if_xflags = IFXF_CLONED;
250 	ifp->if_type = IFT_PFLOW;
251 	ifp->if_hdrlen = PFLOW_HDRLEN;
252 	ifp->if_flags = IFF_UP;
253 	ifp->if_flags &= ~IFF_RUNNING;	/* not running, need receiver */
254 	mq_init(&pflowif->sc_outputqueue, 8192, IPL_SOFTNET);
255 	pflow_setmtu(pflowif, ETHERMTU);
256 	pflow_init_timeouts(pflowif);
257 	if_attach(ifp);
258 	if_alloc_sadl(ifp);
259 
260 	task_set(&pflowif->sc_outputtask, pflow_output_process, pflowif);
261 
262 	/* Insert into list of pflows */
263 	NET_LOCK();
264 	SLIST_INSERT_HEAD(&pflowif_list, pflowif, sc_next);
265 	NET_UNLOCK();
266 	return (0);
267 }
268 
269 int
270 pflow_clone_destroy(struct ifnet *ifp)
271 {
272 	struct pflow_softc	*sc = ifp->if_softc;
273 	int			 error;
274 
275 	error = 0;
276 
277 	NET_LOCK();
278 	SLIST_REMOVE(&pflowif_list, sc, pflow_softc, sc_next);
279 	NET_UNLOCK();
280 
281 	if (timeout_initialized(&sc->sc_tmo))
282 		timeout_del(&sc->sc_tmo);
283 	if (timeout_initialized(&sc->sc_tmo6))
284 		timeout_del(&sc->sc_tmo6);
285 	if (timeout_initialized(&sc->sc_tmo_tmpl))
286 		timeout_del(&sc->sc_tmo_tmpl);
287 	pflow_flush(sc);
288 	task_del(net_tq(ifp->if_index), &sc->sc_outputtask);
289 	taskq_barrier(net_tq(ifp->if_index));
290 	mq_purge(&sc->sc_outputqueue);
291 	m_freem(sc->send_nam);
292 	if (sc->so != NULL) {
293 		error = soclose(sc->so, MSG_DONTWAIT);
294 		sc->so = NULL;
295 	}
296 	if (sc->sc_flowdst != NULL)
297 		free(sc->sc_flowdst, M_DEVBUF, sc->sc_flowdst->sa_len);
298 	if (sc->sc_flowsrc != NULL)
299 		free(sc->sc_flowsrc, M_DEVBUF, sc->sc_flowsrc->sa_len);
300 	if_detach(ifp);
301 	free(sc, M_DEVBUF, sizeof(*sc));
302 	return (error);
303 }
304 
305 int
306 pflowvalidsockaddr(const struct sockaddr *sa, int ignore_port)
307 {
308 	struct sockaddr_in6	*sin6;
309 	struct sockaddr_in	*sin;
310 
311 	if (sa == NULL)
312 		return (0);
313 	switch(sa->sa_family) {
314 	case AF_INET:
315 		sin = (struct sockaddr_in*) sa;
316 		return (sin->sin_addr.s_addr != INADDR_ANY &&
317 		    (ignore_port || sin->sin_port != 0));
318 	case AF_INET6:
319 		sin6 = (struct sockaddr_in6*) sa;
320 		return (!IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr) &&
321 		    (ignore_port || sin6->sin6_port != 0));
322 	default:
323 		return (0);
324 	}
325 }
326 
327 int
328 pflow_set(struct pflow_softc *sc, struct pflowreq *pflowr)
329 {
330 	struct proc		*p = curproc;
331 	struct socket		*so;
332 	struct sockaddr		*sa;
333 	int			 error = 0;
334 
335 	if (pflowr->addrmask & PFLOW_MASK_VERSION) {
336 		switch(pflowr->version) {
337 		case PFLOW_PROTO_5:
338 		case PFLOW_PROTO_10:
339 			break;
340 		default:
341 			return(EINVAL);
342 		}
343 	}
344 
345 	pflow_flush(sc);
346 
347 	if (pflowr->addrmask & PFLOW_MASK_DSTIP) {
348 		if (sc->sc_flowdst != NULL &&
349 		    sc->sc_flowdst->sa_family != pflowr->flowdst.ss_family) {
350 			free(sc->sc_flowdst, M_DEVBUF, sc->sc_flowdst->sa_len);
351 			sc->sc_flowdst = NULL;
352 			if (sc->so != NULL) {
353 				soclose(sc->so, MSG_DONTWAIT);
354 				sc->so = NULL;
355 			}
356 		}
357 
358 		switch (pflowr->flowdst.ss_family) {
359 		case AF_INET:
360 			if (sc->sc_flowdst == NULL) {
361 				if ((sc->sc_flowdst = malloc(
362 				    sizeof(struct sockaddr_in),
363 				    M_DEVBUF,  M_NOWAIT)) == NULL)
364 					return (ENOMEM);
365 			}
366 			memcpy(sc->sc_flowdst, &pflowr->flowdst,
367 			    sizeof(struct sockaddr_in));
368 			sc->sc_flowdst->sa_len = sizeof(struct
369 			    sockaddr_in);
370 			break;
371 		case AF_INET6:
372 			if (sc->sc_flowdst == NULL) {
373 				if ((sc->sc_flowdst = malloc(
374 				    sizeof(struct sockaddr_in6),
375 				    M_DEVBUF, M_NOWAIT)) == NULL)
376 					return (ENOMEM);
377 			}
378 			memcpy(sc->sc_flowdst, &pflowr->flowdst,
379 			    sizeof(struct sockaddr_in6));
380 			sc->sc_flowdst->sa_len = sizeof(struct
381 			    sockaddr_in6);
382 			break;
383 		default:
384 			break;
385 		}
386 
387 		if (sc->sc_flowdst != NULL) {
388 			sc->send_nam->m_len = sc->sc_flowdst->sa_len;
389 			sa = mtod(sc->send_nam, struct sockaddr *);
390 			memcpy(sa, sc->sc_flowdst, sc->sc_flowdst->sa_len);
391 		}
392 	}
393 
394 	if (pflowr->addrmask & PFLOW_MASK_SRCIP) {
395 		if (sc->sc_flowsrc != NULL)
396 			free(sc->sc_flowsrc, M_DEVBUF, sc->sc_flowsrc->sa_len);
397 		sc->sc_flowsrc = NULL;
398 		if (sc->so != NULL) {
399 			soclose(sc->so, MSG_DONTWAIT);
400 			sc->so = NULL;
401 		}
402 		switch(pflowr->flowsrc.ss_family) {
403 		case AF_INET:
404 			if ((sc->sc_flowsrc = malloc(
405 			    sizeof(struct sockaddr_in),
406 			    M_DEVBUF, M_NOWAIT)) == NULL)
407 				return (ENOMEM);
408 			memcpy(sc->sc_flowsrc, &pflowr->flowsrc,
409 			    sizeof(struct sockaddr_in));
410 			sc->sc_flowsrc->sa_len = sizeof(struct
411 			    sockaddr_in);
412 			break;
413 		case AF_INET6:
414 			if ((sc->sc_flowsrc = malloc(
415 			    sizeof(struct sockaddr_in6),
416 			    M_DEVBUF, M_NOWAIT)) == NULL)
417 				return (ENOMEM);
418 			memcpy(sc->sc_flowsrc, &pflowr->flowsrc,
419 			    sizeof(struct sockaddr_in6));
420 			sc->sc_flowsrc->sa_len = sizeof(struct
421 			    sockaddr_in6);
422 			break;
423 		default:
424 			break;
425 		}
426 	}
427 
428 	if (sc->so == NULL) {
429 		if (pflowvalidsockaddr(sc->sc_flowdst, 0)) {
430 			error = socreate(sc->sc_flowdst->sa_family,
431 			    &so, SOCK_DGRAM, 0);
432 			if (error)
433 				return (error);
434 			if (pflowvalidsockaddr(sc->sc_flowsrc, 1)) {
435 				struct mbuf *m;
436 
437 				MGET(m, M_WAIT, MT_SONAME);
438 				m->m_len = sc->sc_flowsrc->sa_len;
439 				sa = mtod(m, struct sockaddr *);
440 				memcpy(sa, sc->sc_flowsrc,
441 				    sc->sc_flowsrc->sa_len);
442 
443 				solock(so);
444 				error = sobind(so, m, p);
445 				sounlock(so);
446 				m_freem(m);
447 				if (error) {
448 					soclose(so, MSG_DONTWAIT);
449 					return (error);
450 				}
451 			}
452 			sc->so = so;
453 		}
454 	} else if (!pflowvalidsockaddr(sc->sc_flowdst, 0)) {
455 		soclose(sc->so, MSG_DONTWAIT);
456 		sc->so = NULL;
457 	}
458 
459 	/* error check is above */
460 	if (pflowr->addrmask & PFLOW_MASK_VERSION)
461 		sc->sc_version = pflowr->version;
462 
463 	pflow_setmtu(sc, ETHERMTU);
464 	pflow_init_timeouts(sc);
465 
466 	return (0);
467 }
468 
469 int
470 pflowioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
471 {
472 	struct proc		*p = curproc;
473 	struct pflow_softc	*sc = ifp->if_softc;
474 	struct ifreq		*ifr = (struct ifreq *)data;
475 	struct pflowreq		 pflowr;
476 	int			 error;
477 
478 	switch (cmd) {
479 	case SIOCSIFADDR:
480 	case SIOCSIFDSTADDR:
481 	case SIOCSIFFLAGS:
482 		if ((ifp->if_flags & IFF_UP) && sc->so != NULL) {
483 			ifp->if_flags |= IFF_RUNNING;
484 			sc->sc_gcounter=pflowstats.pflow_flows;
485 			/* send templates on startup */
486 			if (sc->sc_version == PFLOW_PROTO_10)
487 				pflow_sendout_ipfix_tmpl(sc);
488 		} else
489 			ifp->if_flags &= ~IFF_RUNNING;
490 		break;
491 	case SIOCSIFMTU:
492 		if (ifr->ifr_mtu < PFLOW_MINMTU)
493 			return (EINVAL);
494 		if (ifr->ifr_mtu > MCLBYTES)
495 			ifr->ifr_mtu = MCLBYTES;
496 		if (ifr->ifr_mtu < ifp->if_mtu)
497 			pflow_flush(sc);
498 		pflow_setmtu(sc, ifr->ifr_mtu);
499 		break;
500 
501 	case SIOCGETPFLOW:
502 		bzero(&pflowr, sizeof(pflowr));
503 
504 		if (sc->sc_flowsrc != NULL)
505 			memcpy(&pflowr.flowsrc, sc->sc_flowsrc,
506 			    sc->sc_flowsrc->sa_len);
507 		if (sc->sc_flowdst != NULL)
508 			memcpy(&pflowr.flowdst, sc->sc_flowdst,
509 			    sc->sc_flowdst->sa_len);
510 		pflowr.version = sc->sc_version;
511 
512 		if ((error = copyout(&pflowr, ifr->ifr_data,
513 		    sizeof(pflowr))))
514 			return (error);
515 		break;
516 
517 	case SIOCSETPFLOW:
518 		if ((error = suser(p)) != 0)
519 			return (error);
520 		if ((error = copyin(ifr->ifr_data, &pflowr,
521 		    sizeof(pflowr))))
522 			return (error);
523 
524 		/* XXXSMP breaks atomicity */
525 		NET_UNLOCK();
526 		error = pflow_set(sc, &pflowr);
527 		NET_LOCK();
528 		if (error != 0)
529 			return (error);
530 
531 		if ((ifp->if_flags & IFF_UP) && sc->so != NULL) {
532 			ifp->if_flags |= IFF_RUNNING;
533 			sc->sc_gcounter=pflowstats.pflow_flows;
534 			if (sc->sc_version == PFLOW_PROTO_10)
535 				pflow_sendout_ipfix_tmpl(sc);
536 		} else
537 			ifp->if_flags &= ~IFF_RUNNING;
538 
539 		break;
540 
541 	default:
542 		return (ENOTTY);
543 	}
544 	return (0);
545 }
546 
547 void
548 pflow_init_timeouts(struct pflow_softc *sc)
549 {
550 	switch (sc->sc_version) {
551 	case PFLOW_PROTO_5:
552 		if (timeout_initialized(&sc->sc_tmo6))
553 			timeout_del(&sc->sc_tmo6);
554 		if (timeout_initialized(&sc->sc_tmo_tmpl))
555 			timeout_del(&sc->sc_tmo_tmpl);
556 		if (!timeout_initialized(&sc->sc_tmo))
557 			timeout_set_proc(&sc->sc_tmo, pflow_timeout, sc);
558 		break;
559 	case PFLOW_PROTO_10:
560 		if (!timeout_initialized(&sc->sc_tmo_tmpl))
561 			timeout_set_proc(&sc->sc_tmo_tmpl, pflow_timeout_tmpl,
562 			    sc);
563 		if (!timeout_initialized(&sc->sc_tmo))
564 			timeout_set_proc(&sc->sc_tmo, pflow_timeout, sc);
565 		if (!timeout_initialized(&sc->sc_tmo6))
566 			timeout_set_proc(&sc->sc_tmo6, pflow_timeout6, sc);
567 
568 		timeout_add_sec(&sc->sc_tmo_tmpl, PFLOW_TMPL_TIMEOUT);
569 		break;
570 	default: /* NOTREACHED */
571 		break;
572 	}
573 }
574 
575 int
576 pflow_calc_mtu(struct pflow_softc *sc, int mtu, int hdrsz)
577 {
578 
579 	sc->sc_maxcount4 = (mtu - hdrsz -
580 	    sizeof(struct udpiphdr)) / sizeof(struct pflow_ipfix_flow4);
581 	sc->sc_maxcount6 = (mtu - hdrsz -
582 	    sizeof(struct udpiphdr)) / sizeof(struct pflow_ipfix_flow6);
583 	if (sc->sc_maxcount4 > PFLOW_MAXFLOWS)
584 		sc->sc_maxcount4 = PFLOW_MAXFLOWS;
585 	if (sc->sc_maxcount6 > PFLOW_MAXFLOWS)
586 		sc->sc_maxcount6 = PFLOW_MAXFLOWS;
587 	return (hdrsz + sizeof(struct udpiphdr) +
588 	    MIN(sc->sc_maxcount4 * sizeof(struct pflow_ipfix_flow4),
589 	    sc->sc_maxcount6 * sizeof(struct pflow_ipfix_flow6)));
590 }
591 
592 void
593 pflow_setmtu(struct pflow_softc *sc, int mtu_req)
594 {
595 	int	mtu;
596 
597 	mtu = mtu_req;
598 
599 	switch (sc->sc_version) {
600 	case PFLOW_PROTO_5:
601 		sc->sc_maxcount = (mtu - sizeof(struct pflow_header) -
602 		    sizeof(struct udpiphdr)) / sizeof(struct pflow_flow);
603 		if (sc->sc_maxcount > PFLOW_MAXFLOWS)
604 		    sc->sc_maxcount = PFLOW_MAXFLOWS;
605 		sc->sc_if.if_mtu = sizeof(struct pflow_header) +
606 		    sizeof(struct udpiphdr) +
607 		    sc->sc_maxcount * sizeof(struct pflow_flow);
608 		break;
609 	case PFLOW_PROTO_10:
610 		sc->sc_if.if_mtu =
611 		    pflow_calc_mtu(sc, mtu, sizeof(struct pflow_v10_header));
612 		break;
613 	default: /* NOTREACHED */
614 		break;
615 	}
616 }
617 
618 struct mbuf *
619 pflow_get_mbuf(struct pflow_softc *sc, u_int16_t set_id)
620 {
621 	struct pflow_set_header	 set_hdr;
622 	struct pflow_header	 h;
623 	struct mbuf		*m;
624 
625 	MGETHDR(m, M_DONTWAIT, MT_DATA);
626 	if (m == NULL) {
627 		pflowstats.pflow_onomem++;
628 		return (NULL);
629 	}
630 
631 	MCLGET(m, M_DONTWAIT);
632 	if ((m->m_flags & M_EXT) == 0) {
633 		m_free(m);
634 		pflowstats.pflow_onomem++;
635 		return (NULL);
636 	}
637 
638 	m->m_len = m->m_pkthdr.len = 0;
639 	m->m_pkthdr.ph_ifidx = 0;
640 
641 	if (sc == NULL)		/* get only a new empty mbuf */
642 		return (m);
643 
644 	switch (sc->sc_version) {
645 	case PFLOW_PROTO_5:
646 		/* populate pflow_header */
647 		h.reserved1 = 0;
648 		h.reserved2 = 0;
649 		h.count = 0;
650 		h.version = htons(PFLOW_PROTO_5);
651 		h.flow_sequence = htonl(sc->sc_gcounter);
652 		h.engine_type = PFLOW_ENGINE_TYPE;
653 		h.engine_id = PFLOW_ENGINE_ID;
654 		m_copyback(m, 0, PFLOW_HDRLEN, &h, M_NOWAIT);
655 
656 		sc->sc_count = 0;
657 		timeout_add_sec(&sc->sc_tmo, PFLOW_TIMEOUT);
658 		break;
659 	case PFLOW_PROTO_10:
660 		/* populate pflow_set_header */
661 		set_hdr.set_length = 0;
662 		set_hdr.set_id = htons(set_id);
663 		m_copyback(m, 0, PFLOW_SET_HDRLEN, &set_hdr, M_NOWAIT);
664 		break;
665 	default: /* NOTREACHED */
666 		break;
667 	}
668 
669 	return (m);
670 }
671 
672 void
673 copy_flow_data(struct pflow_flow *flow1, struct pflow_flow *flow2,
674     struct pf_state *st, struct pf_state_key *sk, int src, int dst)
675 {
676 	flow1->src_ip = flow2->dest_ip = sk->addr[src].v4.s_addr;
677 	flow1->src_port = flow2->dest_port = sk->port[src];
678 	flow1->dest_ip = flow2->src_ip = sk->addr[dst].v4.s_addr;
679 	flow1->dest_port = flow2->src_port = sk->port[dst];
680 
681 	flow1->dest_as = flow2->src_as =
682 	    flow1->src_as = flow2->dest_as = 0;
683 	flow1->if_index_in = htons(st->if_index_in);
684 	flow1->if_index_out = htons(st->if_index_out);
685 	flow2->if_index_in = htons(st->if_index_out);
686 	flow2->if_index_out = htons(st->if_index_in);
687 	flow1->dest_mask = flow2->src_mask =
688 	    flow1->src_mask = flow2->dest_mask = 0;
689 
690 	flow1->flow_packets = htonl(st->packets[0]);
691 	flow2->flow_packets = htonl(st->packets[1]);
692 	flow1->flow_octets = htonl(st->bytes[0]);
693 	flow2->flow_octets = htonl(st->bytes[1]);
694 
695 	/*
696 	 * Pretend the flow was created or expired when the machine came up
697 	 * when creation is in the future of the last time a package was seen
698 	 * or was created / expired before this machine came up due to pfsync.
699 	 */
700 	flow1->flow_start = flow2->flow_start = st->creation < 0 ||
701 	    st->creation > st->expire ? htonl(0) : htonl(st->creation * 1000);
702 	flow1->flow_finish = flow2->flow_finish = st->expire < 0 ? htonl(0) :
703 	    htonl(st->expire * 1000);
704 	flow1->tcp_flags = flow2->tcp_flags = 0;
705 	flow1->protocol = flow2->protocol = sk->proto;
706 	flow1->tos = flow2->tos = st->rule.ptr->tos;
707 }
708 
709 void
710 copy_flow_ipfix_4_data(struct pflow_ipfix_flow4 *flow1,
711     struct pflow_ipfix_flow4 *flow2, struct pf_state *st,
712     struct pf_state_key *sk, struct pflow_softc *sc, int src, int dst)
713 {
714 	flow1->src_ip = flow2->dest_ip = sk->addr[src].v4.s_addr;
715 	flow1->src_port = flow2->dest_port = sk->port[src];
716 	flow1->dest_ip = flow2->src_ip = sk->addr[dst].v4.s_addr;
717 	flow1->dest_port = flow2->src_port = sk->port[dst];
718 
719 	flow1->if_index_in = htonl(st->if_index_in);
720 	flow1->if_index_out = htonl(st->if_index_out);
721 	flow2->if_index_in = htonl(st->if_index_out);
722 	flow2->if_index_out = htonl(st->if_index_in);
723 
724 	flow1->flow_packets = htobe64(st->packets[0]);
725 	flow2->flow_packets = htobe64(st->packets[1]);
726 	flow1->flow_octets = htobe64(st->bytes[0]);
727 	flow2->flow_octets = htobe64(st->bytes[1]);
728 
729 	/*
730 	 * Pretend the flow was created when the machine came up when creation
731 	 * is in the future of the last time a package was seen due to pfsync.
732 	 */
733 	if (st->creation > st->expire)
734 		flow1->flow_start = flow2->flow_start = htobe64((gettime() -
735 		    getuptime())*1000);
736 	else
737 		flow1->flow_start = flow2->flow_start = htobe64((gettime() -
738 		    (getuptime() - st->creation))*1000);
739 	flow1->flow_finish = flow2->flow_finish = htobe64((gettime() -
740 	    (getuptime() - st->expire))*1000);
741 
742 	flow1->protocol = flow2->protocol = sk->proto;
743 	flow1->tos = flow2->tos = st->rule.ptr->tos;
744 }
745 
746 void
747 copy_flow_ipfix_6_data(struct pflow_ipfix_flow6 *flow1,
748     struct pflow_ipfix_flow6 *flow2, struct pf_state *st,
749     struct pf_state_key *sk, struct pflow_softc *sc, int src, int dst)
750 {
751 	bcopy(&sk->addr[src].v6, &flow1->src_ip, sizeof(flow1->src_ip));
752 	bcopy(&sk->addr[src].v6, &flow2->dest_ip, sizeof(flow2->dest_ip));
753 	flow1->src_port = flow2->dest_port = sk->port[src];
754 	bcopy(&sk->addr[dst].v6, &flow1->dest_ip, sizeof(flow1->dest_ip));
755 	bcopy(&sk->addr[dst].v6, &flow2->src_ip, sizeof(flow2->src_ip));
756 	flow1->dest_port = flow2->src_port = sk->port[dst];
757 
758 	flow1->if_index_in = htonl(st->if_index_in);
759 	flow1->if_index_out = htonl(st->if_index_out);
760 	flow2->if_index_in = htonl(st->if_index_out);
761 	flow2->if_index_out = htonl(st->if_index_in);
762 
763 	flow1->flow_packets = htobe64(st->packets[0]);
764 	flow2->flow_packets = htobe64(st->packets[1]);
765 	flow1->flow_octets = htobe64(st->bytes[0]);
766 	flow2->flow_octets = htobe64(st->bytes[1]);
767 
768 	/*
769 	 * Pretend the flow was created when the machine came up when creation
770 	 * is in the future of the last time a package was seen due to pfsync.
771 	 */
772 	if (st->creation > st->expire)
773 		flow1->flow_start = flow2->flow_start = htobe64((gettime() -
774 		    getuptime())*1000);
775 	else
776 		flow1->flow_start = flow2->flow_start = htobe64((gettime() -
777 		    (getuptime() - st->creation))*1000);
778 	flow1->flow_finish = flow2->flow_finish = htobe64((gettime() -
779 	    (getuptime() - st->expire))*1000);
780 
781 	flow1->protocol = flow2->protocol = sk->proto;
782 	flow1->tos = flow2->tos = st->rule.ptr->tos;
783 }
784 
785 int
786 export_pflow(struct pf_state *st)
787 {
788 	struct pflow_softc	*sc = NULL;
789 	struct pf_state_key	*sk;
790 
791 	sk = st->key[st->direction == PF_IN ? PF_SK_WIRE : PF_SK_STACK];
792 
793 	SLIST_FOREACH(sc, &pflowif_list, sc_next) {
794 		switch (sc->sc_version) {
795 		case PFLOW_PROTO_5:
796 			if( sk->af == AF_INET )
797 				export_pflow_if(st, sk, sc);
798 			break;
799 		case PFLOW_PROTO_10:
800 			if( sk->af == AF_INET || sk->af == AF_INET6 )
801 				export_pflow_if(st, sk, sc);
802 			break;
803 		default: /* NOTREACHED */
804 			break;
805 		}
806 	}
807 
808 	return (0);
809 }
810 
811 int
812 export_pflow_if(struct pf_state *st, struct pf_state_key *sk,
813     struct pflow_softc *sc)
814 {
815 	struct pf_state		 pfs_copy;
816 	struct ifnet		*ifp = &sc->sc_if;
817 	u_int64_t		 bytes[2];
818 	int			 ret = 0;
819 
820 	if (!(ifp->if_flags & IFF_RUNNING))
821 		return (0);
822 
823 	if (sc->sc_version == PFLOW_PROTO_10)
824 		return (pflow_pack_flow_ipfix(st, sk, sc));
825 
826 	/* PFLOW_PROTO_5 */
827 	if ((st->bytes[0] < (u_int64_t)PFLOW_MAXBYTES)
828 	    && (st->bytes[1] < (u_int64_t)PFLOW_MAXBYTES))
829 		return (pflow_pack_flow(st, sk, sc));
830 
831 	/* flow > PFLOW_MAXBYTES need special handling */
832 	bcopy(st, &pfs_copy, sizeof(pfs_copy));
833 	bytes[0] = pfs_copy.bytes[0];
834 	bytes[1] = pfs_copy.bytes[1];
835 
836 	while (bytes[0] > PFLOW_MAXBYTES) {
837 		pfs_copy.bytes[0] = PFLOW_MAXBYTES;
838 		pfs_copy.bytes[1] = 0;
839 
840 		if ((ret = pflow_pack_flow(&pfs_copy, sk, sc)) != 0)
841 			return (ret);
842 		if ((bytes[0] - PFLOW_MAXBYTES) > 0)
843 			bytes[0] -= PFLOW_MAXBYTES;
844 	}
845 
846 	while (bytes[1] > (u_int64_t)PFLOW_MAXBYTES) {
847 		pfs_copy.bytes[1] = PFLOW_MAXBYTES;
848 		pfs_copy.bytes[0] = 0;
849 
850 		if ((ret = pflow_pack_flow(&pfs_copy, sk, sc)) != 0)
851 			return (ret);
852 		if ((bytes[1] - PFLOW_MAXBYTES) > 0)
853 			bytes[1] -= PFLOW_MAXBYTES;
854 	}
855 
856 	pfs_copy.bytes[0] = bytes[0];
857 	pfs_copy.bytes[1] = bytes[1];
858 
859 	return (pflow_pack_flow(&pfs_copy, sk, sc));
860 }
861 
862 int
863 copy_flow_to_m(struct pflow_flow *flow, struct pflow_softc *sc)
864 {
865 	int		ret = 0;
866 
867 	if (sc->sc_mbuf == NULL) {
868 		if ((sc->sc_mbuf = pflow_get_mbuf(sc, 0)) == NULL)
869 			return (ENOBUFS);
870 	}
871 	m_copyback(sc->sc_mbuf, PFLOW_HDRLEN +
872 	    (sc->sc_count * sizeof(struct pflow_flow)),
873 	    sizeof(struct pflow_flow), flow, M_NOWAIT);
874 
875 	if (pflowstats.pflow_flows == sc->sc_gcounter)
876 		pflowstats.pflow_flows++;
877 	sc->sc_gcounter++;
878 	sc->sc_count++;
879 
880 	if (sc->sc_count >= sc->sc_maxcount)
881 		ret = pflow_sendout_v5(sc);
882 
883 	return(ret);
884 }
885 
886 int
887 copy_flow_ipfix_4_to_m(struct pflow_ipfix_flow4 *flow, struct pflow_softc *sc)
888 {
889 	int		ret = 0;
890 
891 	if (sc->sc_mbuf == NULL) {
892 		if ((sc->sc_mbuf =
893 		    pflow_get_mbuf(sc, PFLOW_IPFIX_TMPL_IPV4_ID)) == NULL) {
894 			return (ENOBUFS);
895 		}
896 		sc->sc_count4 = 0;
897 		timeout_add_sec(&sc->sc_tmo, PFLOW_TIMEOUT);
898 	}
899 	m_copyback(sc->sc_mbuf, PFLOW_SET_HDRLEN +
900 	    (sc->sc_count4 * sizeof(struct pflow_ipfix_flow4)),
901 	    sizeof(struct pflow_ipfix_flow4), flow, M_NOWAIT);
902 
903 	if (pflowstats.pflow_flows == sc->sc_gcounter)
904 		pflowstats.pflow_flows++;
905 	sc->sc_gcounter++;
906 	sc->sc_count4++;
907 
908 	if (sc->sc_count4 >= sc->sc_maxcount4)
909 		ret = pflow_sendout_ipfix(sc, AF_INET);
910 	return(ret);
911 }
912 
913 int
914 copy_flow_ipfix_6_to_m(struct pflow_ipfix_flow6 *flow, struct pflow_softc *sc)
915 {
916 	int		ret = 0;
917 
918 	if (sc->sc_mbuf6 == NULL) {
919 		if ((sc->sc_mbuf6 =
920 		    pflow_get_mbuf(sc, PFLOW_IPFIX_TMPL_IPV6_ID)) == NULL) {
921 			return (ENOBUFS);
922 		}
923 		sc->sc_count6 = 0;
924 		timeout_add_sec(&sc->sc_tmo6, PFLOW_TIMEOUT);
925 	}
926 	m_copyback(sc->sc_mbuf6, PFLOW_SET_HDRLEN +
927 	    (sc->sc_count6 * sizeof(struct pflow_ipfix_flow6)),
928 	    sizeof(struct pflow_ipfix_flow6), flow, M_NOWAIT);
929 
930 	if (pflowstats.pflow_flows == sc->sc_gcounter)
931 		pflowstats.pflow_flows++;
932 	sc->sc_gcounter++;
933 	sc->sc_count6++;
934 
935 	if (sc->sc_count6 >= sc->sc_maxcount6)
936 		ret = pflow_sendout_ipfix(sc, AF_INET6);
937 
938 	return(ret);
939 }
940 
941 int
942 pflow_pack_flow(struct pf_state *st, struct pf_state_key *sk,
943     struct pflow_softc *sc)
944 {
945 	struct pflow_flow	 flow1;
946 	struct pflow_flow	 flow2;
947 	int			 ret = 0;
948 
949 	bzero(&flow1, sizeof(flow1));
950 	bzero(&flow2, sizeof(flow2));
951 
952 	if (st->direction == PF_OUT)
953 		copy_flow_data(&flow1, &flow2, st, sk, 1, 0);
954 	else
955 		copy_flow_data(&flow1, &flow2, st, sk, 0, 1);
956 
957 	if (st->bytes[0] != 0) /* first flow from state */
958 		ret = copy_flow_to_m(&flow1, sc);
959 
960 	if (st->bytes[1] != 0) /* second flow from state */
961 		ret = copy_flow_to_m(&flow2, sc);
962 
963 	return (ret);
964 }
965 
966 int
967 pflow_pack_flow_ipfix(struct pf_state *st, struct pf_state_key *sk,
968     struct pflow_softc *sc)
969 {
970 	struct pflow_ipfix_flow4	 flow4_1, flow4_2;
971 	struct pflow_ipfix_flow6	 flow6_1, flow6_2;
972 	int				 ret = 0;
973 	if (sk->af == AF_INET) {
974 		bzero(&flow4_1, sizeof(flow4_1));
975 		bzero(&flow4_2, sizeof(flow4_2));
976 
977 		if (st->direction == PF_OUT)
978 			copy_flow_ipfix_4_data(&flow4_1, &flow4_2, st, sk, sc,
979 			    1, 0);
980 		else
981 			copy_flow_ipfix_4_data(&flow4_1, &flow4_2, st, sk, sc,
982 			    0, 1);
983 
984 		if (st->bytes[0] != 0) /* first flow from state */
985 			ret = copy_flow_ipfix_4_to_m(&flow4_1, sc);
986 
987 		if (st->bytes[1] != 0) /* second flow from state */
988 			ret = copy_flow_ipfix_4_to_m(&flow4_2, sc);
989 	} else if (sk->af == AF_INET6) {
990 		bzero(&flow6_1, sizeof(flow6_1));
991 		bzero(&flow6_2, sizeof(flow6_2));
992 
993 		if (st->direction == PF_OUT)
994 			copy_flow_ipfix_6_data(&flow6_1, &flow6_2, st, sk, sc,
995 			    1, 0);
996 		else
997 			copy_flow_ipfix_6_data(&flow6_1, &flow6_2, st, sk, sc,
998 			    0, 1);
999 
1000 		if (st->bytes[0] != 0) /* first flow from state */
1001 			ret = copy_flow_ipfix_6_to_m(&flow6_1, sc);
1002 
1003 		if (st->bytes[1] != 0) /* second flow from state */
1004 			ret = copy_flow_ipfix_6_to_m(&flow6_2, sc);
1005 	}
1006 	return (ret);
1007 }
1008 
1009 void
1010 pflow_timeout(void *v)
1011 {
1012 	struct pflow_softc	*sc = v;
1013 
1014 	switch (sc->sc_version) {
1015 	case PFLOW_PROTO_5:
1016 		pflow_sendout_v5(sc);
1017 		break;
1018 	case PFLOW_PROTO_10:
1019 		pflow_sendout_ipfix(sc, AF_INET);
1020 		break;
1021 	default: /* NOTREACHED */
1022 		break;
1023 	}
1024 }
1025 
1026 void
1027 pflow_timeout6(void *v)
1028 {
1029 	struct pflow_softc	*sc = v;
1030 
1031 	pflow_sendout_ipfix(sc, AF_INET6);
1032 }
1033 
1034 void
1035 pflow_timeout_tmpl(void *v)
1036 {
1037 	struct pflow_softc	*sc = v;
1038 
1039 	pflow_sendout_ipfix_tmpl(sc);
1040 }
1041 
1042 void
1043 pflow_flush(struct pflow_softc *sc)
1044 {
1045 	switch (sc->sc_version) {
1046 	case PFLOW_PROTO_5:
1047 		pflow_sendout_v5(sc);
1048 		break;
1049 	case PFLOW_PROTO_10:
1050 		pflow_sendout_ipfix(sc, AF_INET);
1051 		pflow_sendout_ipfix(sc, AF_INET6);
1052 		break;
1053 	default: /* NOTREACHED */
1054 		break;
1055 	}
1056 }
1057 
1058 int
1059 pflow_sendout_v5(struct pflow_softc *sc)
1060 {
1061 	struct mbuf		*m = sc->sc_mbuf;
1062 	struct pflow_header	*h;
1063 	struct ifnet		*ifp = &sc->sc_if;
1064 	struct timespec		tv;
1065 
1066 	timeout_del(&sc->sc_tmo);
1067 
1068 	if (m == NULL)
1069 		return (0);
1070 
1071 	sc->sc_mbuf = NULL;
1072 	if (!(ifp->if_flags & IFF_RUNNING)) {
1073 		m_freem(m);
1074 		return (0);
1075 	}
1076 
1077 	pflowstats.pflow_packets++;
1078 	h = mtod(m, struct pflow_header *);
1079 	h->count = htons(sc->sc_count);
1080 
1081 	/* populate pflow_header */
1082 	h->uptime_ms = htonl(getuptime() * 1000);
1083 
1084 	getnanotime(&tv);
1085 	h->time_sec = htonl(tv.tv_sec);			/* XXX 2038 */
1086 	h->time_nanosec = htonl(tv.tv_nsec);
1087 	if (mq_enqueue(&sc->sc_outputqueue, m) == 0)
1088 		task_add(net_tq(ifp->if_index), &sc->sc_outputtask);
1089 	return (0);
1090 }
1091 
1092 int
1093 pflow_sendout_ipfix(struct pflow_softc *sc, sa_family_t af)
1094 {
1095 	struct mbuf			*m;
1096 	struct pflow_v10_header		*h10;
1097 	struct pflow_set_header		*set_hdr;
1098 	struct ifnet			*ifp = &sc->sc_if;
1099 	u_int32_t			 count;
1100 	int				 set_length;
1101 
1102 	switch (af) {
1103 	case AF_INET:
1104 		m = sc->sc_mbuf;
1105 		timeout_del(&sc->sc_tmo);
1106 		if (m == NULL)
1107 			return (0);
1108 		sc->sc_mbuf = NULL;
1109 		count = sc->sc_count4;
1110 		set_length = sizeof(struct pflow_set_header)
1111 		    + sc->sc_count4 * sizeof(struct pflow_ipfix_flow4);
1112 		break;
1113 	case AF_INET6:
1114 		m = sc->sc_mbuf6;
1115 		timeout_del(&sc->sc_tmo6);
1116 		if (m == NULL)
1117 			return (0);
1118 		sc->sc_mbuf6 = NULL;
1119 		count = sc->sc_count6;
1120 		set_length = sizeof(struct pflow_set_header)
1121 		    + sc->sc_count6 * sizeof(struct pflow_ipfix_flow6);
1122 		break;
1123 	default:
1124 		unhandled_af(af);
1125 	}
1126 
1127 	if (!(ifp->if_flags & IFF_RUNNING)) {
1128 		m_freem(m);
1129 		return (0);
1130 	}
1131 
1132 	pflowstats.pflow_packets++;
1133 	set_hdr = mtod(m, struct pflow_set_header *);
1134 	set_hdr->set_length = htons(set_length);
1135 
1136 	/* populate pflow_header */
1137 	M_PREPEND(m, sizeof(struct pflow_v10_header), M_DONTWAIT);
1138 	if (m == NULL) {
1139 		pflowstats.pflow_onomem++;
1140 		return (ENOBUFS);
1141 	}
1142 	h10 = mtod(m, struct pflow_v10_header *);
1143 	h10->version = htons(PFLOW_PROTO_10);
1144 	h10->length = htons(PFLOW_IPFIX_HDRLEN + set_length);
1145 	h10->time_sec = htonl(gettime());		/* XXX 2038 */
1146 	h10->flow_sequence = htonl(sc->sc_sequence);
1147 	sc->sc_sequence += count;
1148 	h10->observation_dom = htonl(PFLOW_ENGINE_TYPE);
1149 	if (mq_enqueue(&sc->sc_outputqueue, m) == 0)
1150 		task_add(net_tq(ifp->if_index), &sc->sc_outputtask);
1151 	return (0);
1152 }
1153 
1154 int
1155 pflow_sendout_ipfix_tmpl(struct pflow_softc *sc)
1156 {
1157 	struct mbuf			*m;
1158 	struct pflow_v10_header		*h10;
1159 	struct ifnet			*ifp = &sc->sc_if;
1160 
1161 	timeout_del(&sc->sc_tmo_tmpl);
1162 
1163 	if (!(ifp->if_flags & IFF_RUNNING)) {
1164 		return (0);
1165 	}
1166 	m = pflow_get_mbuf(NULL, 0);
1167 	if (m == NULL)
1168 		return (0);
1169 	if (m_copyback(m, 0, sizeof(struct pflow_ipfix_tmpl),
1170 	    &sc->sc_tmpl_ipfix, M_NOWAIT)) {
1171 		m_freem(m);
1172 		return (0);
1173 	}
1174 	pflowstats.pflow_packets++;
1175 
1176 	/* populate pflow_header */
1177 	M_PREPEND(m, sizeof(struct pflow_v10_header), M_DONTWAIT);
1178 	if (m == NULL) {
1179 		pflowstats.pflow_onomem++;
1180 		return (ENOBUFS);
1181 	}
1182 	h10 = mtod(m, struct pflow_v10_header *);
1183 	h10->version = htons(PFLOW_PROTO_10);
1184 	h10->length = htons(PFLOW_IPFIX_HDRLEN + sizeof(struct
1185 	    pflow_ipfix_tmpl));
1186 	h10->time_sec = htonl(gettime());		/* XXX 2038 */
1187 	h10->flow_sequence = htonl(sc->sc_sequence);
1188 	h10->observation_dom = htonl(PFLOW_ENGINE_TYPE);
1189 
1190 	timeout_add_sec(&sc->sc_tmo_tmpl, PFLOW_TMPL_TIMEOUT);
1191 	if (mq_enqueue(&sc->sc_outputqueue, m) == 0)
1192 		task_add(net_tq(ifp->if_index), &sc->sc_outputtask);
1193 	return (0);
1194 }
1195 
1196 int
1197 pflow_sendout_mbuf(struct pflow_softc *sc, struct mbuf *m)
1198 {
1199 	sc->sc_if.if_opackets++;
1200 	sc->sc_if.if_obytes += m->m_pkthdr.len;
1201 
1202 	if (sc->so == NULL) {
1203 		m_freem(m);
1204 		return (EINVAL);
1205 	}
1206 	return (sosend(sc->so, sc->send_nam, NULL, m, NULL, 0));
1207 }
1208 
1209 int
1210 pflow_sysctl(int *name, u_int namelen, void *oldp, size_t *oldlenp,
1211     void *newp, size_t newlen)
1212 {
1213 	if (namelen != 1)
1214 		return (ENOTDIR);
1215 
1216 	switch (name[0]) {
1217 	case NET_PFLOW_STATS:
1218 		if (newp != NULL)
1219 			return (EPERM);
1220 		return (sysctl_struct(oldp, oldlenp, newp, newlen,
1221 		    &pflowstats, sizeof(pflowstats)));
1222 	default:
1223 		return (EOPNOTSUPP);
1224 	}
1225 	return (0);
1226 }
1227