1/*	$OpenBSD: if_trunk.c,v 1.30 2007/01/31 06:20:19 reyk Exp $	*/
2
3/*
4 * Copyright (c) 2005, 2006 Reyk Floeter <reyk@openbsd.org>
5 * Copyright (c) 2007 Andrew Thompson <thompsa@FreeBSD.org>
6 * Copyright (c) 2014, 2016 Marcelo Araujo <araujo@FreeBSD.org>
7 *
8 * Permission to use, copy, modify, and distribute this software for any
9 * purpose with or without fee is hereby granted, provided that the above
10 * copyright notice and this permission notice appear in all copies.
11 *
12 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
13 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
14 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
15 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
16 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19 */
20
21#include <sys/cdefs.h>
22__FBSDID("$FreeBSD: releng/11.0/sys/net/if_lagg.c 302054 2016-06-21 13:48:49Z bz $");
23
24#include "opt_inet.h"
25#include "opt_inet6.h"
26
27#include <sys/param.h>
28#include <sys/kernel.h>
29#include <sys/malloc.h>
30#include <sys/mbuf.h>
31#include <sys/queue.h>
32#include <sys/socket.h>
33#include <sys/sockio.h>
34#include <sys/sysctl.h>
35#include <sys/module.h>
36#include <sys/priv.h>
37#include <sys/systm.h>
38#include <sys/proc.h>
39#include <sys/lock.h>
40#include <sys/rmlock.h>
41#include <sys/taskqueue.h>
42#include <sys/eventhandler.h>
43
44#include <net/ethernet.h>
45#include <net/if.h>
46#include <net/if_clone.h>
47#include <net/if_arp.h>
48#include <net/if_dl.h>
49#include <net/if_media.h>
50#include <net/if_types.h>
51#include <net/if_var.h>
52#include <net/bpf.h>
53#include <net/vnet.h>
54
55#if defined(INET) || defined(INET6)
56#include <netinet/in.h>
57#include <netinet/ip.h>
58#endif
59#ifdef INET
60#include <netinet/in_systm.h>
61#include <netinet/if_ether.h>
62#endif
63
64#ifdef INET6
65#include <netinet/ip6.h>
66#include <netinet6/in6_var.h>
67#include <netinet6/in6_ifattach.h>
68#endif
69
70#include <net/if_vlan_var.h>
71#include <net/if_lagg.h>
72#include <net/ieee8023ad_lacp.h>
73
74/* Special flags we should propagate to the lagg ports. */
75static struct {
76	int flag;
77	int (*func)(struct ifnet *, int);
78} lagg_pflags[] = {
79	{IFF_PROMISC, ifpromisc},
80	{IFF_ALLMULTI, if_allmulti},
81	{0, NULL}
82};
83
84VNET_DEFINE(SLIST_HEAD(__trhead, lagg_softc), lagg_list); /* list of laggs */
85#define	V_lagg_list	VNET(lagg_list)
86static VNET_DEFINE(struct mtx, lagg_list_mtx);
87#define	V_lagg_list_mtx	VNET(lagg_list_mtx)
88#define	LAGG_LIST_LOCK_INIT(x)		mtx_init(&V_lagg_list_mtx, \
89					"if_lagg list", NULL, MTX_DEF)
90#define	LAGG_LIST_LOCK_DESTROY(x)	mtx_destroy(&V_lagg_list_mtx)
91#define	LAGG_LIST_LOCK(x)		mtx_lock(&V_lagg_list_mtx)
92#define	LAGG_LIST_UNLOCK(x)		mtx_unlock(&V_lagg_list_mtx)
93eventhandler_tag	lagg_detach_cookie = NULL;
94
95static int	lagg_clone_create(struct if_clone *, int, caddr_t);
96static void	lagg_clone_destroy(struct ifnet *);
97static VNET_DEFINE(struct if_clone *, lagg_cloner);
98#define	V_lagg_cloner	VNET(lagg_cloner)
99static const char laggname[] = "lagg";
100
101static void	lagg_lladdr(struct lagg_softc *, uint8_t *);
102static void	lagg_capabilities(struct lagg_softc *);
103static void	lagg_port_lladdr(struct lagg_port *, uint8_t *, lagg_llqtype);
104static void	lagg_port_setlladdr(void *, int);
105static int	lagg_port_create(struct lagg_softc *, struct ifnet *);
106static int	lagg_port_destroy(struct lagg_port *, int);
107static struct mbuf *lagg_input(struct ifnet *, struct mbuf *);
108static void	lagg_linkstate(struct lagg_softc *);
109static void	lagg_port_state(struct ifnet *, int);
110static int	lagg_port_ioctl(struct ifnet *, u_long, caddr_t);
111static int	lagg_port_output(struct ifnet *, struct mbuf *,
112		    const struct sockaddr *, struct route *);
113static void	lagg_port_ifdetach(void *arg __unused, struct ifnet *);
114#ifdef LAGG_PORT_STACKING
115static int	lagg_port_checkstacking(struct lagg_softc *);
116#endif
117static void	lagg_port2req(struct lagg_port *, struct lagg_reqport *);
118static void	lagg_init(void *);
119static void	lagg_stop(struct lagg_softc *);
120static int	lagg_ioctl(struct ifnet *, u_long, caddr_t);
121static int	lagg_ether_setmulti(struct lagg_softc *);
122static int	lagg_ether_cmdmulti(struct lagg_port *, int);
123static	int	lagg_setflag(struct lagg_port *, int, int,
124		    int (*func)(struct ifnet *, int));
125static	int	lagg_setflags(struct lagg_port *, int status);
126static uint64_t lagg_get_counter(struct ifnet *ifp, ift_counter cnt);
127static int	lagg_transmit(struct ifnet *, struct mbuf *);
128static void	lagg_qflush(struct ifnet *);
129static int	lagg_media_change(struct ifnet *);
130static void	lagg_media_status(struct ifnet *, struct ifmediareq *);
131static struct lagg_port *lagg_link_active(struct lagg_softc *,
132	    struct lagg_port *);
133
134/* Simple round robin */
135static void	lagg_rr_attach(struct lagg_softc *);
136static int	lagg_rr_start(struct lagg_softc *, struct mbuf *);
137static struct mbuf *lagg_rr_input(struct lagg_softc *, struct lagg_port *,
138		    struct mbuf *);
139
140/* Active failover */
141static int	lagg_fail_start(struct lagg_softc *, struct mbuf *);
142static struct mbuf *lagg_fail_input(struct lagg_softc *, struct lagg_port *,
143		    struct mbuf *);
144
145/* Loadbalancing */
146static void	lagg_lb_attach(struct lagg_softc *);
147static void	lagg_lb_detach(struct lagg_softc *);
148static int	lagg_lb_port_create(struct lagg_port *);
149static void	lagg_lb_port_destroy(struct lagg_port *);
150static int	lagg_lb_start(struct lagg_softc *, struct mbuf *);
151static struct mbuf *lagg_lb_input(struct lagg_softc *, struct lagg_port *,
152		    struct mbuf *);
153static int	lagg_lb_porttable(struct lagg_softc *, struct lagg_port *);
154
155/* Broadcast */
156static int    lagg_bcast_start(struct lagg_softc *, struct mbuf *);
157static struct mbuf *lagg_bcast_input(struct lagg_softc *, struct lagg_port *,
158		    struct mbuf *);
159
160/* 802.3ad LACP */
161static void	lagg_lacp_attach(struct lagg_softc *);
162static void	lagg_lacp_detach(struct lagg_softc *);
163static int	lagg_lacp_start(struct lagg_softc *, struct mbuf *);
164static struct mbuf *lagg_lacp_input(struct lagg_softc *, struct lagg_port *,
165		    struct mbuf *);
166static void	lagg_lacp_lladdr(struct lagg_softc *);
167
168/* lagg protocol table */
169static const struct lagg_proto {
170	lagg_proto	pr_num;
171	void		(*pr_attach)(struct lagg_softc *);
172	void		(*pr_detach)(struct lagg_softc *);
173	int		(*pr_start)(struct lagg_softc *, struct mbuf *);
174	struct mbuf *	(*pr_input)(struct lagg_softc *, struct lagg_port *,
175			    struct mbuf *);
176	int		(*pr_addport)(struct lagg_port *);
177	void		(*pr_delport)(struct lagg_port *);
178	void		(*pr_linkstate)(struct lagg_port *);
179	void 		(*pr_init)(struct lagg_softc *);
180	void 		(*pr_stop)(struct lagg_softc *);
181	void 		(*pr_lladdr)(struct lagg_softc *);
182	void		(*pr_request)(struct lagg_softc *, void *);
183	void		(*pr_portreq)(struct lagg_port *, void *);
184} lagg_protos[] = {
185    {
186	.pr_num = LAGG_PROTO_NONE
187    },
188    {
189	.pr_num = LAGG_PROTO_ROUNDROBIN,
190	.pr_attach = lagg_rr_attach,
191	.pr_start = lagg_rr_start,
192	.pr_input = lagg_rr_input,
193    },
194    {
195	.pr_num = LAGG_PROTO_FAILOVER,
196	.pr_start = lagg_fail_start,
197	.pr_input = lagg_fail_input,
198    },
199    {
200	.pr_num = LAGG_PROTO_LOADBALANCE,
201	.pr_attach = lagg_lb_attach,
202	.pr_detach = lagg_lb_detach,
203	.pr_start = lagg_lb_start,
204	.pr_input = lagg_lb_input,
205	.pr_addport = lagg_lb_port_create,
206	.pr_delport = lagg_lb_port_destroy,
207    },
208    {
209	.pr_num = LAGG_PROTO_LACP,
210	.pr_attach = lagg_lacp_attach,
211	.pr_detach = lagg_lacp_detach,
212	.pr_start = lagg_lacp_start,
213	.pr_input = lagg_lacp_input,
214	.pr_addport = lacp_port_create,
215	.pr_delport = lacp_port_destroy,
216	.pr_linkstate = lacp_linkstate,
217	.pr_init = lacp_init,
218	.pr_stop = lacp_stop,
219	.pr_lladdr = lagg_lacp_lladdr,
220	.pr_request = lacp_req,
221	.pr_portreq = lacp_portreq,
222    },
223    {
224	.pr_num = LAGG_PROTO_BROADCAST,
225	.pr_start = lagg_bcast_start,
226	.pr_input = lagg_bcast_input,
227    },
228};
229
230SYSCTL_DECL(_net_link);
231SYSCTL_NODE(_net_link, OID_AUTO, lagg, CTLFLAG_RW, 0,
232    "Link Aggregation");
233
234/* Allow input on any failover links */
235static VNET_DEFINE(int, lagg_failover_rx_all);
236#define	V_lagg_failover_rx_all	VNET(lagg_failover_rx_all)
237SYSCTL_INT(_net_link_lagg, OID_AUTO, failover_rx_all, CTLFLAG_RW | CTLFLAG_VNET,
238    &VNET_NAME(lagg_failover_rx_all), 0,
239    "Accept input from any interface in a failover lagg");
240
241/* Default value for using flowid */
242static VNET_DEFINE(int, def_use_flowid) = 1;
243#define	V_def_use_flowid	VNET(def_use_flowid)
244SYSCTL_INT(_net_link_lagg, OID_AUTO, default_use_flowid, CTLFLAG_RWTUN,
245    &VNET_NAME(def_use_flowid), 0,
246    "Default setting for using flow id for load sharing");
247
248/* Default value for flowid shift */
249static VNET_DEFINE(int, def_flowid_shift) = 16;
250#define	V_def_flowid_shift	VNET(def_flowid_shift)
251SYSCTL_INT(_net_link_lagg, OID_AUTO, default_flowid_shift, CTLFLAG_RWTUN,
252    &VNET_NAME(def_flowid_shift), 0,
253    "Default setting for flowid shift for load sharing");
254
255static void
256vnet_lagg_init(const void *unused __unused)
257{
258
259	LAGG_LIST_LOCK_INIT();
260	SLIST_INIT(&V_lagg_list);
261	V_lagg_cloner = if_clone_simple(laggname, lagg_clone_create,
262	    lagg_clone_destroy, 0);
263}
264VNET_SYSINIT(vnet_lagg_init, SI_SUB_PROTO_IFATTACHDOMAIN, SI_ORDER_ANY,
265    vnet_lagg_init, NULL);
266
267static void
268vnet_lagg_uninit(const void *unused __unused)
269{
270
271	if_clone_detach(V_lagg_cloner);
272	LAGG_LIST_LOCK_DESTROY();
273}
274VNET_SYSUNINIT(vnet_lagg_uninit, SI_SUB_INIT_IF, SI_ORDER_ANY,
275    vnet_lagg_uninit, NULL);
276
277static int
278lagg_modevent(module_t mod, int type, void *data)
279{
280
281	switch (type) {
282	case MOD_LOAD:
283		lagg_input_p = lagg_input;
284		lagg_linkstate_p = lagg_port_state;
285		lagg_detach_cookie = EVENTHANDLER_REGISTER(
286		    ifnet_departure_event, lagg_port_ifdetach, NULL,
287		    EVENTHANDLER_PRI_ANY);
288		break;
289	case MOD_UNLOAD:
290		EVENTHANDLER_DEREGISTER(ifnet_departure_event,
291		    lagg_detach_cookie);
292		lagg_input_p = NULL;
293		lagg_linkstate_p = NULL;
294		break;
295	default:
296		return (EOPNOTSUPP);
297	}
298	return (0);
299}
300
301static moduledata_t lagg_mod = {
302	"if_lagg",
303	lagg_modevent,
304	0
305};
306
307DECLARE_MODULE(if_lagg, lagg_mod, SI_SUB_PSEUDO, SI_ORDER_ANY);
308MODULE_VERSION(if_lagg, 1);
309
310static void
311lagg_proto_attach(struct lagg_softc *sc, lagg_proto pr)
312{
313
314	KASSERT(sc->sc_proto == LAGG_PROTO_NONE, ("%s: sc %p has proto",
315	    __func__, sc));
316
317	if (sc->sc_ifflags & IFF_DEBUG)
318		if_printf(sc->sc_ifp, "using proto %u\n", pr);
319
320	if (lagg_protos[pr].pr_attach != NULL)
321		lagg_protos[pr].pr_attach(sc);
322	sc->sc_proto = pr;
323}
324
325static void
326lagg_proto_detach(struct lagg_softc *sc)
327{
328	lagg_proto pr;
329
330	LAGG_WLOCK_ASSERT(sc);
331
332	pr = sc->sc_proto;
333	sc->sc_proto = LAGG_PROTO_NONE;
334
335	if (lagg_protos[pr].pr_detach != NULL)
336		lagg_protos[pr].pr_detach(sc);
337	else
338		LAGG_WUNLOCK(sc);
339}
340
341static int
342lagg_proto_start(struct lagg_softc *sc, struct mbuf *m)
343{
344
345	return (lagg_protos[sc->sc_proto].pr_start(sc, m));
346}
347
348static struct mbuf *
349lagg_proto_input(struct lagg_softc *sc, struct lagg_port *lp, struct mbuf *m)
350{
351
352	return (lagg_protos[sc->sc_proto].pr_input(sc, lp, m));
353}
354
355static int
356lagg_proto_addport(struct lagg_softc *sc, struct lagg_port *lp)
357{
358
359	if (lagg_protos[sc->sc_proto].pr_addport == NULL)
360		return (0);
361	else
362		return (lagg_protos[sc->sc_proto].pr_addport(lp));
363}
364
365static void
366lagg_proto_delport(struct lagg_softc *sc, struct lagg_port *lp)
367{
368
369	if (lagg_protos[sc->sc_proto].pr_delport != NULL)
370		lagg_protos[sc->sc_proto].pr_delport(lp);
371}
372
373static void
374lagg_proto_linkstate(struct lagg_softc *sc, struct lagg_port *lp)
375{
376
377	if (lagg_protos[sc->sc_proto].pr_linkstate != NULL)
378		lagg_protos[sc->sc_proto].pr_linkstate(lp);
379}
380
381static void
382lagg_proto_init(struct lagg_softc *sc)
383{
384
385	if (lagg_protos[sc->sc_proto].pr_init != NULL)
386		lagg_protos[sc->sc_proto].pr_init(sc);
387}
388
389static void
390lagg_proto_stop(struct lagg_softc *sc)
391{
392
393	if (lagg_protos[sc->sc_proto].pr_stop != NULL)
394		lagg_protos[sc->sc_proto].pr_stop(sc);
395}
396
397static void
398lagg_proto_lladdr(struct lagg_softc *sc)
399{
400
401	if (lagg_protos[sc->sc_proto].pr_lladdr != NULL)
402		lagg_protos[sc->sc_proto].pr_lladdr(sc);
403}
404
405static void
406lagg_proto_request(struct lagg_softc *sc, void *v)
407{
408
409	if (lagg_protos[sc->sc_proto].pr_request != NULL)
410		lagg_protos[sc->sc_proto].pr_request(sc, v);
411}
412
413static void
414lagg_proto_portreq(struct lagg_softc *sc, struct lagg_port *lp, void *v)
415{
416
417	if (lagg_protos[sc->sc_proto].pr_portreq != NULL)
418		lagg_protos[sc->sc_proto].pr_portreq(lp, v);
419}
420
421/*
422 * This routine is run via an vlan
423 * config EVENT
424 */
425static void
426lagg_register_vlan(void *arg, struct ifnet *ifp, u_int16_t vtag)
427{
428	struct lagg_softc *sc = ifp->if_softc;
429	struct lagg_port *lp;
430	struct rm_priotracker tracker;
431
432	if (ifp->if_softc !=  arg)   /* Not our event */
433		return;
434
435	LAGG_RLOCK(sc, &tracker);
436	if (!SLIST_EMPTY(&sc->sc_ports)) {
437		SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
438			EVENTHANDLER_INVOKE(vlan_config, lp->lp_ifp, vtag);
439	}
440	LAGG_RUNLOCK(sc, &tracker);
441}
442
443/*
444 * This routine is run via an vlan
445 * unconfig EVENT
446 */
447static void
448lagg_unregister_vlan(void *arg, struct ifnet *ifp, u_int16_t vtag)
449{
450	struct lagg_softc *sc = ifp->if_softc;
451	struct lagg_port *lp;
452	struct rm_priotracker tracker;
453
454	if (ifp->if_softc !=  arg)   /* Not our event */
455		return;
456
457	LAGG_RLOCK(sc, &tracker);
458	if (!SLIST_EMPTY(&sc->sc_ports)) {
459		SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
460			EVENTHANDLER_INVOKE(vlan_unconfig, lp->lp_ifp, vtag);
461	}
462	LAGG_RUNLOCK(sc, &tracker);
463}
464
465static int
466lagg_clone_create(struct if_clone *ifc, int unit, caddr_t params)
467{
468	struct lagg_softc *sc;
469	struct ifnet *ifp;
470	static const u_char eaddr[6];	/* 00:00:00:00:00:00 */
471
472	sc = malloc(sizeof(*sc), M_DEVBUF, M_WAITOK|M_ZERO);
473	ifp = sc->sc_ifp = if_alloc(IFT_ETHER);
474	if (ifp == NULL) {
475		free(sc, M_DEVBUF);
476		return (ENOSPC);
477	}
478
479	if (V_def_use_flowid)
480		sc->sc_opts |= LAGG_OPT_USE_FLOWID;
481	sc->flowid_shift = V_def_flowid_shift;
482
483	/* Hash all layers by default */
484	sc->sc_flags = MBUF_HASHFLAG_L2|MBUF_HASHFLAG_L3|MBUF_HASHFLAG_L4;
485
486	lagg_proto_attach(sc, LAGG_PROTO_DEFAULT);
487
488	LAGG_LOCK_INIT(sc);
489	SLIST_INIT(&sc->sc_ports);
490	TASK_INIT(&sc->sc_lladdr_task, 0, lagg_port_setlladdr, sc);
491
492	/* Initialise pseudo media types */
493	ifmedia_init(&sc->sc_media, 0, lagg_media_change,
494	    lagg_media_status);
495	ifmedia_add(&sc->sc_media, IFM_ETHER | IFM_AUTO, 0, NULL);
496	ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_AUTO);
497
498	if_initname(ifp, laggname, unit);
499	ifp->if_softc = sc;
500	ifp->if_transmit = lagg_transmit;
501	ifp->if_qflush = lagg_qflush;
502	ifp->if_init = lagg_init;
503	ifp->if_ioctl = lagg_ioctl;
504	ifp->if_get_counter = lagg_get_counter;
505	ifp->if_flags = IFF_SIMPLEX | IFF_BROADCAST | IFF_MULTICAST;
506	ifp->if_capenable = ifp->if_capabilities = IFCAP_HWSTATS;
507
508	/*
509	 * Attach as an ordinary ethernet device, children will be attached
510	 * as special device IFT_IEEE8023ADLAG.
511	 */
512	ether_ifattach(ifp, eaddr);
513
514	sc->vlan_attach = EVENTHANDLER_REGISTER(vlan_config,
515		lagg_register_vlan, sc, EVENTHANDLER_PRI_FIRST);
516	sc->vlan_detach = EVENTHANDLER_REGISTER(vlan_unconfig,
517		lagg_unregister_vlan, sc, EVENTHANDLER_PRI_FIRST);
518
519	/* Insert into the global list of laggs */
520	LAGG_LIST_LOCK();
521	SLIST_INSERT_HEAD(&V_lagg_list, sc, sc_entries);
522	LAGG_LIST_UNLOCK();
523
524	return (0);
525}
526
527static void
528lagg_clone_destroy(struct ifnet *ifp)
529{
530	struct lagg_softc *sc = (struct lagg_softc *)ifp->if_softc;
531	struct lagg_port *lp;
532
533	LAGG_WLOCK(sc);
534
535	lagg_stop(sc);
536	ifp->if_flags &= ~IFF_UP;
537
538	EVENTHANDLER_DEREGISTER(vlan_config, sc->vlan_attach);
539	EVENTHANDLER_DEREGISTER(vlan_unconfig, sc->vlan_detach);
540
541	/* Shutdown and remove lagg ports */
542	while ((lp = SLIST_FIRST(&sc->sc_ports)) != NULL)
543		lagg_port_destroy(lp, 1);
544	/* Unhook the aggregation protocol */
545	lagg_proto_detach(sc);
546	LAGG_UNLOCK_ASSERT(sc);
547
548	ifmedia_removeall(&sc->sc_media);
549	ether_ifdetach(ifp);
550	if_free(ifp);
551
552	LAGG_LIST_LOCK();
553	SLIST_REMOVE(&V_lagg_list, sc, lagg_softc, sc_entries);
554	LAGG_LIST_UNLOCK();
555
556	taskqueue_drain(taskqueue_swi, &sc->sc_lladdr_task);
557	LAGG_LOCK_DESTROY(sc);
558	free(sc, M_DEVBUF);
559}
560
561/*
562 * Set link-layer address on the lagg interface itself.
563 *
564 * Set noinline to be dtrace-friendly
565 */
566static __noinline void
567lagg_lladdr(struct lagg_softc *sc, uint8_t *lladdr)
568{
569	struct ifnet *ifp = sc->sc_ifp;
570	struct lagg_port lp;
571
572	if (memcmp(lladdr, IF_LLADDR(ifp), ETHER_ADDR_LEN) == 0)
573		return;
574
575	LAGG_WLOCK_ASSERT(sc);
576	/*
577	 * Set the link layer address on the lagg interface.
578	 * lagg_proto_lladdr() notifies the MAC change to
579	 * the aggregation protocol.  iflladdr_event handler which
580	 * may trigger gratuitous ARPs for INET will be handled in
581	 * a taskqueue.
582	 */
583	bcopy(lladdr, IF_LLADDR(ifp), ETHER_ADDR_LEN);
584	lagg_proto_lladdr(sc);
585
586	/*
587	 * Send notification request for lagg interface
588	 * itself. Note that new lladdr is already set.
589	 */
590	bzero(&lp, sizeof(lp));
591	lp.lp_ifp = sc->sc_ifp;
592	lp.lp_softc = sc;
593
594	/* Do not request lladdr change */
595	lagg_port_lladdr(&lp, lladdr, LAGG_LLQTYPE_VIRT);
596}
597
598static void
599lagg_capabilities(struct lagg_softc *sc)
600{
601	struct lagg_port *lp;
602	int cap = ~0, ena = ~0;
603	u_long hwa = ~0UL;
604	struct ifnet_hw_tsomax hw_tsomax;
605
606	LAGG_WLOCK_ASSERT(sc);
607
608	memset(&hw_tsomax, 0, sizeof(hw_tsomax));
609
610	/* Get capabilities from the lagg ports */
611	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
612		cap &= lp->lp_ifp->if_capabilities;
613		ena &= lp->lp_ifp->if_capenable;
614		hwa &= lp->lp_ifp->if_hwassist;
615		if_hw_tsomax_common(lp->lp_ifp, &hw_tsomax);
616	}
617	cap = (cap == ~0 ? 0 : cap);
618	ena = (ena == ~0 ? 0 : ena);
619	hwa = (hwa == ~0 ? 0 : hwa);
620
621	if (sc->sc_ifp->if_capabilities != cap ||
622	    sc->sc_ifp->if_capenable != ena ||
623	    sc->sc_ifp->if_hwassist != hwa ||
624	    if_hw_tsomax_update(sc->sc_ifp, &hw_tsomax) != 0) {
625		sc->sc_ifp->if_capabilities = cap;
626		sc->sc_ifp->if_capenable = ena;
627		sc->sc_ifp->if_hwassist = hwa;
628		getmicrotime(&sc->sc_ifp->if_lastchange);
629
630		if (sc->sc_ifflags & IFF_DEBUG)
631			if_printf(sc->sc_ifp,
632			    "capabilities 0x%08x enabled 0x%08x\n", cap, ena);
633	}
634}
635
636/*
637 * Enqueue interface lladdr notification.
638 * If request is already queued, it is updated.
639 * If setting lladdr is also desired, @do_change has to be set to 1.
640 *
641 * Set noinline to be dtrace-friendly
642 */
643static __noinline void
644lagg_port_lladdr(struct lagg_port *lp, uint8_t *lladdr, lagg_llqtype llq_type)
645{
646	struct lagg_softc *sc = lp->lp_softc;
647	struct ifnet *ifp = lp->lp_ifp;
648	struct lagg_llq *llq;
649
650	LAGG_WLOCK_ASSERT(sc);
651
652	/*
653	 * Do not enqueue requests where lladdr is the same for
654	 * "physical" interfaces (e.g. ports in lagg)
655	 */
656	if (llq_type == LAGG_LLQTYPE_PHYS &&
657	    memcmp(IF_LLADDR(ifp), lladdr, ETHER_ADDR_LEN) == 0)
658		return;
659
660	/* Check to make sure its not already queued to be changed */
661	SLIST_FOREACH(llq, &sc->sc_llq_head, llq_entries) {
662		if (llq->llq_ifp == ifp) {
663			/* Update lladdr, it may have changed */
664			bcopy(lladdr, llq->llq_lladdr, ETHER_ADDR_LEN);
665			return;
666		}
667	}
668
669	llq = malloc(sizeof(struct lagg_llq), M_DEVBUF, M_NOWAIT | M_ZERO);
670	if (llq == NULL)	/* XXX what to do */
671		return;
672
673	llq->llq_ifp = ifp;
674	llq->llq_type = llq_type;
675	bcopy(lladdr, llq->llq_lladdr, ETHER_ADDR_LEN);
676	/* XXX: We should insert to tail */
677	SLIST_INSERT_HEAD(&sc->sc_llq_head, llq, llq_entries);
678
679	taskqueue_enqueue(taskqueue_swi, &sc->sc_lladdr_task);
680}
681
682/*
683 * Set the interface MAC address from a taskqueue to avoid a LOR.
684 *
685 * Set noinline to be dtrace-friendly
686 */
687static __noinline void
688lagg_port_setlladdr(void *arg, int pending)
689{
690	struct lagg_softc *sc = (struct lagg_softc *)arg;
691	struct lagg_llq *llq, *head;
692	struct ifnet *ifp;
693
694	/* Grab a local reference of the queue and remove it from the softc */
695	LAGG_WLOCK(sc);
696	head = SLIST_FIRST(&sc->sc_llq_head);
697	SLIST_FIRST(&sc->sc_llq_head) = NULL;
698	LAGG_WUNLOCK(sc);
699
700	/*
701	 * Traverse the queue and set the lladdr on each ifp. It is safe to do
702	 * unlocked as we have the only reference to it.
703	 */
704	for (llq = head; llq != NULL; llq = head) {
705		ifp = llq->llq_ifp;
706
707		CURVNET_SET(ifp->if_vnet);
708
709		/*
710		 * Set the link layer address on the laggport interface.
711		 * Note that if_setlladdr() or iflladdr_event handler
712		 * may result in arp transmission / lltable updates.
713		 */
714		if (llq->llq_type == LAGG_LLQTYPE_PHYS)
715			if_setlladdr(ifp, llq->llq_lladdr,
716			    ETHER_ADDR_LEN);
717		else
718			EVENTHANDLER_INVOKE(iflladdr_event, ifp);
719		CURVNET_RESTORE();
720		head = SLIST_NEXT(llq, llq_entries);
721		free(llq, M_DEVBUF);
722	}
723}
724
725static int
726lagg_port_create(struct lagg_softc *sc, struct ifnet *ifp)
727{
728	struct lagg_softc *sc_ptr;
729	struct lagg_port *lp, *tlp;
730	int error, i;
731	uint64_t *pval;
732
733	LAGG_WLOCK_ASSERT(sc);
734
735	/* Limit the maximal number of lagg ports */
736	if (sc->sc_count >= LAGG_MAX_PORTS)
737		return (ENOSPC);
738
739	/* Check if port has already been associated to a lagg */
740	if (ifp->if_lagg != NULL) {
741		/* Port is already in the current lagg? */
742		lp = (struct lagg_port *)ifp->if_lagg;
743		if (lp->lp_softc == sc)
744			return (EEXIST);
745		return (EBUSY);
746	}
747
748	/* XXX Disallow non-ethernet interfaces (this should be any of 802) */
749	if (ifp->if_type != IFT_ETHER && ifp->if_type != IFT_L2VLAN)
750		return (EPROTONOSUPPORT);
751
752	/* Allow the first Ethernet member to define the MTU */
753	if (SLIST_EMPTY(&sc->sc_ports))
754		sc->sc_ifp->if_mtu = ifp->if_mtu;
755	else if (sc->sc_ifp->if_mtu != ifp->if_mtu) {
756		if_printf(sc->sc_ifp, "invalid MTU for %s\n",
757		    ifp->if_xname);
758		return (EINVAL);
759	}
760
761	if ((lp = malloc(sizeof(struct lagg_port),
762	    M_DEVBUF, M_NOWAIT|M_ZERO)) == NULL)
763		return (ENOMEM);
764
765	/* Check if port is a stacked lagg */
766	LAGG_LIST_LOCK();
767	SLIST_FOREACH(sc_ptr, &V_lagg_list, sc_entries) {
768		if (ifp == sc_ptr->sc_ifp) {
769			LAGG_LIST_UNLOCK();
770			free(lp, M_DEVBUF);
771			return (EINVAL);
772			/* XXX disable stacking for the moment, its untested */
773#ifdef LAGG_PORT_STACKING
774			lp->lp_flags |= LAGG_PORT_STACK;
775			if (lagg_port_checkstacking(sc_ptr) >=
776			    LAGG_MAX_STACKING) {
777				LAGG_LIST_UNLOCK();
778				free(lp, M_DEVBUF);
779				return (E2BIG);
780			}
781#endif
782		}
783	}
784	LAGG_LIST_UNLOCK();
785
786	/* Change the interface type */
787	lp->lp_iftype = ifp->if_type;
788	ifp->if_type = IFT_IEEE8023ADLAG;
789	ifp->if_lagg = lp;
790	lp->lp_ioctl = ifp->if_ioctl;
791	ifp->if_ioctl = lagg_port_ioctl;
792	lp->lp_output = ifp->if_output;
793	ifp->if_output = lagg_port_output;
794
795	lp->lp_ifp = ifp;
796	lp->lp_softc = sc;
797
798	/* Save port link layer address */
799	bcopy(IF_LLADDR(ifp), lp->lp_lladdr, ETHER_ADDR_LEN);
800
801	if (SLIST_EMPTY(&sc->sc_ports)) {
802		sc->sc_primary = lp;
803		/* First port in lagg. Update/notify lagg lladdress */
804		lagg_lladdr(sc, IF_LLADDR(ifp));
805	} else {
806
807		/*
808		 * Update link layer address for this port and
809		 * send notifications to other subsystems.
810		 */
811		lagg_port_lladdr(lp, IF_LLADDR(sc->sc_ifp), LAGG_LLQTYPE_PHYS);
812	}
813
814	/*
815	 * Insert into the list of ports.
816	 * Keep ports sorted by if_index. It is handy, when configuration
817	 * is predictable and `ifconfig laggN create ...` command
818	 * will lead to the same result each time.
819	 */
820	SLIST_FOREACH(tlp, &sc->sc_ports, lp_entries) {
821		if (tlp->lp_ifp->if_index < ifp->if_index && (
822		    SLIST_NEXT(tlp, lp_entries) == NULL ||
823		    SLIST_NEXT(tlp, lp_entries)->lp_ifp->if_index >
824		    ifp->if_index))
825			break;
826	}
827	if (tlp != NULL)
828		SLIST_INSERT_AFTER(tlp, lp, lp_entries);
829	else
830		SLIST_INSERT_HEAD(&sc->sc_ports, lp, lp_entries);
831	sc->sc_count++;
832
833	/* Update lagg capabilities */
834	lagg_capabilities(sc);
835	lagg_linkstate(sc);
836
837	/* Read port counters */
838	pval = lp->port_counters.val;
839	for (i = 0; i < IFCOUNTERS; i++, pval++)
840		*pval = ifp->if_get_counter(ifp, i);
841	/* Add multicast addresses and interface flags to this port */
842	lagg_ether_cmdmulti(lp, 1);
843	lagg_setflags(lp, 1);
844
845	if ((error = lagg_proto_addport(sc, lp)) != 0) {
846		/* Remove the port, without calling pr_delport. */
847		lagg_port_destroy(lp, 0);
848		return (error);
849	}
850
851	return (0);
852}
853
854#ifdef LAGG_PORT_STACKING
855static int
856lagg_port_checkstacking(struct lagg_softc *sc)
857{
858	struct lagg_softc *sc_ptr;
859	struct lagg_port *lp;
860	int m = 0;
861
862	LAGG_WLOCK_ASSERT(sc);
863
864	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
865		if (lp->lp_flags & LAGG_PORT_STACK) {
866			sc_ptr = (struct lagg_softc *)lp->lp_ifp->if_softc;
867			m = MAX(m, lagg_port_checkstacking(sc_ptr));
868		}
869	}
870
871	return (m + 1);
872}
873#endif
874
875static int
876lagg_port_destroy(struct lagg_port *lp, int rundelport)
877{
878	struct lagg_softc *sc = lp->lp_softc;
879	struct lagg_port *lp_ptr, *lp0;
880	struct lagg_llq *llq;
881	struct ifnet *ifp = lp->lp_ifp;
882	uint64_t *pval, vdiff;
883	int i;
884
885	LAGG_WLOCK_ASSERT(sc);
886
887	if (rundelport)
888		lagg_proto_delport(sc, lp);
889
890	/*
891	 * Remove multicast addresses and interface flags from this port and
892	 * reset the MAC address, skip if the interface is being detached.
893	 */
894	if (!lp->lp_detaching) {
895		lagg_ether_cmdmulti(lp, 0);
896		lagg_setflags(lp, 0);
897		lagg_port_lladdr(lp, lp->lp_lladdr, LAGG_LLQTYPE_PHYS);
898	}
899
900	/* Restore interface */
901	ifp->if_type = lp->lp_iftype;
902	ifp->if_ioctl = lp->lp_ioctl;
903	ifp->if_output = lp->lp_output;
904	ifp->if_lagg = NULL;
905
906	/* Update detached port counters */
907	pval = lp->port_counters.val;
908	for (i = 0; i < IFCOUNTERS; i++, pval++) {
909		vdiff = ifp->if_get_counter(ifp, i) - *pval;
910		sc->detached_counters.val[i] += vdiff;
911	}
912
913	/* Finally, remove the port from the lagg */
914	SLIST_REMOVE(&sc->sc_ports, lp, lagg_port, lp_entries);
915	sc->sc_count--;
916
917	/* Update the primary interface */
918	if (lp == sc->sc_primary) {
919		uint8_t lladdr[ETHER_ADDR_LEN];
920
921		if ((lp0 = SLIST_FIRST(&sc->sc_ports)) == NULL) {
922			bzero(&lladdr, ETHER_ADDR_LEN);
923		} else {
924			bcopy(lp0->lp_lladdr,
925			    lladdr, ETHER_ADDR_LEN);
926		}
927		lagg_lladdr(sc, lladdr);
928
929		/* Mark lp0 as new primary */
930		sc->sc_primary = lp0;
931
932		/*
933		 * Enqueue lladdr update/notification for each port
934		 * (new primary needs update as well, to switch from
935		 * old lladdr to its 'real' one).
936		 */
937		SLIST_FOREACH(lp_ptr, &sc->sc_ports, lp_entries)
938			lagg_port_lladdr(lp_ptr, lladdr, LAGG_LLQTYPE_PHYS);
939	}
940
941	/* Remove any pending lladdr changes from the queue */
942	if (lp->lp_detaching) {
943		SLIST_FOREACH(llq, &sc->sc_llq_head, llq_entries) {
944			if (llq->llq_ifp == ifp) {
945				SLIST_REMOVE(&sc->sc_llq_head, llq, lagg_llq,
946				    llq_entries);
947				free(llq, M_DEVBUF);
948				break;	/* Only appears once */
949			}
950		}
951	}
952
953	if (lp->lp_ifflags)
954		if_printf(ifp, "%s: lp_ifflags unclean\n", __func__);
955
956	free(lp, M_DEVBUF);
957
958	/* Update lagg capabilities */
959	lagg_capabilities(sc);
960	lagg_linkstate(sc);
961
962	return (0);
963}
964
965static int
966lagg_port_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
967{
968	struct lagg_reqport *rp = (struct lagg_reqport *)data;
969	struct lagg_softc *sc;
970	struct lagg_port *lp = NULL;
971	int error = 0;
972	struct rm_priotracker tracker;
973
974	/* Should be checked by the caller */
975	if (ifp->if_type != IFT_IEEE8023ADLAG ||
976	    (lp = ifp->if_lagg) == NULL || (sc = lp->lp_softc) == NULL)
977		goto fallback;
978
979	switch (cmd) {
980	case SIOCGLAGGPORT:
981		if (rp->rp_portname[0] == '\0' ||
982		    ifunit(rp->rp_portname) != ifp) {
983			error = EINVAL;
984			break;
985		}
986
987		LAGG_RLOCK(sc, &tracker);
988		if ((lp = ifp->if_lagg) == NULL || lp->lp_softc != sc) {
989			error = ENOENT;
990			LAGG_RUNLOCK(sc, &tracker);
991			break;
992		}
993
994		lagg_port2req(lp, rp);
995		LAGG_RUNLOCK(sc, &tracker);
996		break;
997
998	case SIOCSIFCAP:
999		if (lp->lp_ioctl == NULL) {
1000			error = EINVAL;
1001			break;
1002		}
1003		error = (*lp->lp_ioctl)(ifp, cmd, data);
1004		if (error)
1005			break;
1006
1007		/* Update lagg interface capabilities */
1008		LAGG_WLOCK(sc);
1009		lagg_capabilities(sc);
1010		LAGG_WUNLOCK(sc);
1011		break;
1012
1013	case SIOCSIFMTU:
1014		/* Do not allow the MTU to be changed once joined */
1015		error = EINVAL;
1016		break;
1017
1018	default:
1019		goto fallback;
1020	}
1021
1022	return (error);
1023
1024fallback:
1025	if (lp->lp_ioctl != NULL)
1026		return ((*lp->lp_ioctl)(ifp, cmd, data));
1027
1028	return (EINVAL);
1029}
1030
1031/*
1032 * Requests counter @cnt data.
1033 *
1034 * Counter value is calculated the following way:
1035 * 1) for each port, sum  difference between current and "initial" measurements.
1036 * 2) add lagg logical interface counters.
1037 * 3) add data from detached_counters array.
1038 *
1039 * We also do the following things on ports attach/detach:
1040 * 1) On port attach we store all counters it has into port_counter array.
1041 * 2) On port detach we add the different between "initial" and
1042 *   current counters data to detached_counters array.
1043 */
1044static uint64_t
1045lagg_get_counter(struct ifnet *ifp, ift_counter cnt)
1046{
1047	struct lagg_softc *sc;
1048	struct lagg_port *lp;
1049	struct ifnet *lpifp;
1050	struct rm_priotracker tracker;
1051	uint64_t newval, oldval, vsum;
1052
1053	/* Revise this when we've got non-generic counters. */
1054	KASSERT(cnt < IFCOUNTERS, ("%s: invalid cnt %d", __func__, cnt));
1055
1056	sc = (struct lagg_softc *)ifp->if_softc;
1057	LAGG_RLOCK(sc, &tracker);
1058
1059	vsum = 0;
1060	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1061		/* Saved attached value */
1062		oldval = lp->port_counters.val[cnt];
1063		/* current value */
1064		lpifp = lp->lp_ifp;
1065		newval = lpifp->if_get_counter(lpifp, cnt);
1066		/* Calculate diff and save new */
1067		vsum += newval - oldval;
1068	}
1069
1070	/*
1071	 * Add counter data which might be added by upper
1072	 * layer protocols operating on logical interface.
1073	 */
1074	vsum += if_get_counter_default(ifp, cnt);
1075
1076	/*
1077	 * Add counter data from detached ports counters
1078	 */
1079	vsum += sc->detached_counters.val[cnt];
1080
1081	LAGG_RUNLOCK(sc, &tracker);
1082
1083	return (vsum);
1084}
1085
1086/*
1087 * For direct output to child ports.
1088 */
1089static int
1090lagg_port_output(struct ifnet *ifp, struct mbuf *m,
1091	const struct sockaddr *dst, struct route *ro)
1092{
1093	struct lagg_port *lp = ifp->if_lagg;
1094
1095	switch (dst->sa_family) {
1096		case pseudo_AF_HDRCMPLT:
1097		case AF_UNSPEC:
1098			return ((*lp->lp_output)(ifp, m, dst, ro));
1099	}
1100
1101	/* drop any other frames */
1102	m_freem(m);
1103	return (ENETDOWN);
1104}
1105
1106static void
1107lagg_port_ifdetach(void *arg __unused, struct ifnet *ifp)
1108{
1109	struct lagg_port *lp;
1110	struct lagg_softc *sc;
1111
1112	if ((lp = ifp->if_lagg) == NULL)
1113		return;
1114	/* If the ifnet is just being renamed, don't do anything. */
1115	if (ifp->if_flags & IFF_RENAMING)
1116		return;
1117
1118	sc = lp->lp_softc;
1119
1120	LAGG_WLOCK(sc);
1121	lp->lp_detaching = 1;
1122	lagg_port_destroy(lp, 1);
1123	LAGG_WUNLOCK(sc);
1124}
1125
1126static void
1127lagg_port2req(struct lagg_port *lp, struct lagg_reqport *rp)
1128{
1129	struct lagg_softc *sc = lp->lp_softc;
1130
1131	strlcpy(rp->rp_ifname, sc->sc_ifname, sizeof(rp->rp_ifname));
1132	strlcpy(rp->rp_portname, lp->lp_ifp->if_xname, sizeof(rp->rp_portname));
1133	rp->rp_prio = lp->lp_prio;
1134	rp->rp_flags = lp->lp_flags;
1135	lagg_proto_portreq(sc, lp, &rp->rp_psc);
1136
1137	/* Add protocol specific flags */
1138	switch (sc->sc_proto) {
1139		case LAGG_PROTO_FAILOVER:
1140			if (lp == sc->sc_primary)
1141				rp->rp_flags |= LAGG_PORT_MASTER;
1142			if (lp == lagg_link_active(sc, sc->sc_primary))
1143				rp->rp_flags |= LAGG_PORT_ACTIVE;
1144			break;
1145
1146		case LAGG_PROTO_ROUNDROBIN:
1147		case LAGG_PROTO_LOADBALANCE:
1148		case LAGG_PROTO_BROADCAST:
1149			if (LAGG_PORTACTIVE(lp))
1150				rp->rp_flags |= LAGG_PORT_ACTIVE;
1151			break;
1152
1153		case LAGG_PROTO_LACP:
1154			/* LACP has a different definition of active */
1155			if (lacp_isactive(lp))
1156				rp->rp_flags |= LAGG_PORT_ACTIVE;
1157			if (lacp_iscollecting(lp))
1158				rp->rp_flags |= LAGG_PORT_COLLECTING;
1159			if (lacp_isdistributing(lp))
1160				rp->rp_flags |= LAGG_PORT_DISTRIBUTING;
1161			break;
1162	}
1163
1164}
1165
1166static void
1167lagg_init(void *xsc)
1168{
1169	struct lagg_softc *sc = (struct lagg_softc *)xsc;
1170	struct ifnet *ifp = sc->sc_ifp;
1171	struct lagg_port *lp;
1172
1173	if (ifp->if_drv_flags & IFF_DRV_RUNNING)
1174		return;
1175
1176	LAGG_WLOCK(sc);
1177
1178	ifp->if_drv_flags |= IFF_DRV_RUNNING;
1179
1180	/*
1181	 * Update the port lladdrs if needed.
1182	 * This might be if_setlladdr() notification
1183	 * that lladdr has been changed.
1184	 */
1185	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
1186		lagg_port_lladdr(lp, IF_LLADDR(ifp), LAGG_LLQTYPE_PHYS);
1187
1188	lagg_proto_init(sc);
1189
1190	LAGG_WUNLOCK(sc);
1191}
1192
1193static void
1194lagg_stop(struct lagg_softc *sc)
1195{
1196	struct ifnet *ifp = sc->sc_ifp;
1197
1198	LAGG_WLOCK_ASSERT(sc);
1199
1200	if ((ifp->if_drv_flags & IFF_DRV_RUNNING) == 0)
1201		return;
1202
1203	ifp->if_drv_flags &= ~IFF_DRV_RUNNING;
1204
1205	lagg_proto_stop(sc);
1206}
1207
1208static int
1209lagg_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
1210{
1211	struct lagg_softc *sc = (struct lagg_softc *)ifp->if_softc;
1212	struct lagg_reqall *ra = (struct lagg_reqall *)data;
1213	struct lagg_reqopts *ro = (struct lagg_reqopts *)data;
1214	struct lagg_reqport *rp = (struct lagg_reqport *)data, rpbuf;
1215	struct lagg_reqflags *rf = (struct lagg_reqflags *)data;
1216	struct ifreq *ifr = (struct ifreq *)data;
1217	struct lagg_port *lp;
1218	struct ifnet *tpif;
1219	struct thread *td = curthread;
1220	char *buf, *outbuf;
1221	int count, buflen, len, error = 0;
1222	struct rm_priotracker tracker;
1223
1224	bzero(&rpbuf, sizeof(rpbuf));
1225
1226	switch (cmd) {
1227	case SIOCGLAGG:
1228		LAGG_RLOCK(sc, &tracker);
1229		count = 0;
1230		SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
1231			count++;
1232		buflen = count * sizeof(struct lagg_reqport);
1233		LAGG_RUNLOCK(sc, &tracker);
1234
1235		outbuf = malloc(buflen, M_TEMP, M_WAITOK | M_ZERO);
1236
1237		LAGG_RLOCK(sc, &tracker);
1238		ra->ra_proto = sc->sc_proto;
1239		lagg_proto_request(sc, &ra->ra_psc);
1240		count = 0;
1241		buf = outbuf;
1242		len = min(ra->ra_size, buflen);
1243		SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1244			if (len < sizeof(rpbuf))
1245				break;
1246
1247			lagg_port2req(lp, &rpbuf);
1248			memcpy(buf, &rpbuf, sizeof(rpbuf));
1249			count++;
1250			buf += sizeof(rpbuf);
1251			len -= sizeof(rpbuf);
1252		}
1253		LAGG_RUNLOCK(sc, &tracker);
1254		ra->ra_ports = count;
1255		ra->ra_size = count * sizeof(rpbuf);
1256		error = copyout(outbuf, ra->ra_port, ra->ra_size);
1257		free(outbuf, M_TEMP);
1258		break;
1259	case SIOCSLAGG:
1260		error = priv_check(td, PRIV_NET_LAGG);
1261		if (error)
1262			break;
1263		if (ra->ra_proto >= LAGG_PROTO_MAX) {
1264			error = EPROTONOSUPPORT;
1265			break;
1266		}
1267
1268		LAGG_WLOCK(sc);
1269		lagg_proto_detach(sc);
1270		LAGG_UNLOCK_ASSERT(sc);
1271		lagg_proto_attach(sc, ra->ra_proto);
1272		break;
1273	case SIOCGLAGGOPTS:
1274		ro->ro_opts = sc->sc_opts;
1275		if (sc->sc_proto == LAGG_PROTO_LACP) {
1276			struct lacp_softc *lsc;
1277
1278			lsc = (struct lacp_softc *)sc->sc_psc;
1279			if (lsc->lsc_debug.lsc_tx_test != 0)
1280				ro->ro_opts |= LAGG_OPT_LACP_TXTEST;
1281			if (lsc->lsc_debug.lsc_rx_test != 0)
1282				ro->ro_opts |= LAGG_OPT_LACP_RXTEST;
1283			if (lsc->lsc_strict_mode != 0)
1284				ro->ro_opts |= LAGG_OPT_LACP_STRICT;
1285			if (lsc->lsc_fast_timeout != 0)
1286				ro->ro_opts |= LAGG_OPT_LACP_TIMEOUT;
1287
1288			ro->ro_active = sc->sc_active;
1289		} else {
1290			ro->ro_active = 0;
1291			SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
1292				ro->ro_active += LAGG_PORTACTIVE(lp);
1293		}
1294		ro->ro_bkt = sc->sc_bkt;
1295		ro->ro_flapping = sc->sc_flapping;
1296		ro->ro_flowid_shift = sc->flowid_shift;
1297		break;
1298	case SIOCSLAGGOPTS:
1299		if (sc->sc_proto == LAGG_PROTO_ROUNDROBIN) {
1300			if (ro->ro_bkt == 0)
1301				sc->sc_bkt = 1; // Minimum 1 packet per iface.
1302			else
1303				sc->sc_bkt = ro->ro_bkt;
1304		}
1305		error = priv_check(td, PRIV_NET_LAGG);
1306		if (error)
1307			break;
1308		if (ro->ro_opts == 0)
1309			break;
1310		/*
1311		 * Set options.  LACP options are stored in sc->sc_psc,
1312		 * not in sc_opts.
1313		 */
1314		int valid, lacp;
1315
1316		switch (ro->ro_opts) {
1317		case LAGG_OPT_USE_FLOWID:
1318		case -LAGG_OPT_USE_FLOWID:
1319		case LAGG_OPT_FLOWIDSHIFT:
1320			valid = 1;
1321			lacp = 0;
1322			break;
1323		case LAGG_OPT_LACP_TXTEST:
1324		case -LAGG_OPT_LACP_TXTEST:
1325		case LAGG_OPT_LACP_RXTEST:
1326		case -LAGG_OPT_LACP_RXTEST:
1327		case LAGG_OPT_LACP_STRICT:
1328		case -LAGG_OPT_LACP_STRICT:
1329		case LAGG_OPT_LACP_TIMEOUT:
1330		case -LAGG_OPT_LACP_TIMEOUT:
1331			valid = lacp = 1;
1332			break;
1333		default:
1334			valid = lacp = 0;
1335			break;
1336		}
1337
1338		LAGG_WLOCK(sc);
1339
1340		if (valid == 0 ||
1341		    (lacp == 1 && sc->sc_proto != LAGG_PROTO_LACP)) {
1342			/* Invalid combination of options specified. */
1343			error = EINVAL;
1344			LAGG_WUNLOCK(sc);
1345			break;	/* Return from SIOCSLAGGOPTS. */
1346		}
1347		/*
1348		 * Store new options into sc->sc_opts except for
1349		 * FLOWIDSHIFT and LACP options.
1350		 */
1351		if (lacp == 0) {
1352			if (ro->ro_opts == LAGG_OPT_FLOWIDSHIFT)
1353				sc->flowid_shift = ro->ro_flowid_shift;
1354			else if (ro->ro_opts > 0)
1355				sc->sc_opts |= ro->ro_opts;
1356			else
1357				sc->sc_opts &= ~ro->ro_opts;
1358		} else {
1359			struct lacp_softc *lsc;
1360			struct lacp_port *lp;
1361
1362			lsc = (struct lacp_softc *)sc->sc_psc;
1363
1364			switch (ro->ro_opts) {
1365			case LAGG_OPT_LACP_TXTEST:
1366				lsc->lsc_debug.lsc_tx_test = 1;
1367				break;
1368			case -LAGG_OPT_LACP_TXTEST:
1369				lsc->lsc_debug.lsc_tx_test = 0;
1370				break;
1371			case LAGG_OPT_LACP_RXTEST:
1372				lsc->lsc_debug.lsc_rx_test = 1;
1373				break;
1374			case -LAGG_OPT_LACP_RXTEST:
1375				lsc->lsc_debug.lsc_rx_test = 0;
1376				break;
1377			case LAGG_OPT_LACP_STRICT:
1378				lsc->lsc_strict_mode = 1;
1379				break;
1380			case -LAGG_OPT_LACP_STRICT:
1381				lsc->lsc_strict_mode = 0;
1382				break;
1383			case LAGG_OPT_LACP_TIMEOUT:
1384				LACP_LOCK(lsc);
1385        			LIST_FOREACH(lp, &lsc->lsc_ports, lp_next)
1386                        		lp->lp_state |= LACP_STATE_TIMEOUT;
1387				LACP_UNLOCK(lsc);
1388				lsc->lsc_fast_timeout = 1;
1389				break;
1390			case -LAGG_OPT_LACP_TIMEOUT:
1391				LACP_LOCK(lsc);
1392        			LIST_FOREACH(lp, &lsc->lsc_ports, lp_next)
1393                        		lp->lp_state &= ~LACP_STATE_TIMEOUT;
1394				LACP_UNLOCK(lsc);
1395				lsc->lsc_fast_timeout = 0;
1396				break;
1397			}
1398		}
1399		LAGG_WUNLOCK(sc);
1400		break;
1401	case SIOCGLAGGFLAGS:
1402		rf->rf_flags = 0;
1403		LAGG_RLOCK(sc, &tracker);
1404		if (sc->sc_flags & MBUF_HASHFLAG_L2)
1405			rf->rf_flags |= LAGG_F_HASHL2;
1406		if (sc->sc_flags & MBUF_HASHFLAG_L3)
1407			rf->rf_flags |= LAGG_F_HASHL3;
1408		if (sc->sc_flags & MBUF_HASHFLAG_L4)
1409			rf->rf_flags |= LAGG_F_HASHL4;
1410		LAGG_RUNLOCK(sc, &tracker);
1411		break;
1412	case SIOCSLAGGHASH:
1413		error = priv_check(td, PRIV_NET_LAGG);
1414		if (error)
1415			break;
1416		if ((rf->rf_flags & LAGG_F_HASHMASK) == 0) {
1417			error = EINVAL;
1418			break;
1419		}
1420		LAGG_WLOCK(sc);
1421		sc->sc_flags = 0;
1422		if (rf->rf_flags & LAGG_F_HASHL2)
1423			sc->sc_flags |= MBUF_HASHFLAG_L2;
1424		if (rf->rf_flags & LAGG_F_HASHL3)
1425			sc->sc_flags |= MBUF_HASHFLAG_L3;
1426		if (rf->rf_flags & LAGG_F_HASHL4)
1427			sc->sc_flags |= MBUF_HASHFLAG_L4;
1428		LAGG_WUNLOCK(sc);
1429		break;
1430	case SIOCGLAGGPORT:
1431		if (rp->rp_portname[0] == '\0' ||
1432		    (tpif = ifunit(rp->rp_portname)) == NULL) {
1433			error = EINVAL;
1434			break;
1435		}
1436
1437		LAGG_RLOCK(sc, &tracker);
1438		if ((lp = (struct lagg_port *)tpif->if_lagg) == NULL ||
1439		    lp->lp_softc != sc) {
1440			error = ENOENT;
1441			LAGG_RUNLOCK(sc, &tracker);
1442			break;
1443		}
1444
1445		lagg_port2req(lp, rp);
1446		LAGG_RUNLOCK(sc, &tracker);
1447		break;
1448	case SIOCSLAGGPORT:
1449		error = priv_check(td, PRIV_NET_LAGG);
1450		if (error)
1451			break;
1452		if (rp->rp_portname[0] == '\0' ||
1453		    (tpif = ifunit(rp->rp_portname)) == NULL) {
1454			error = EINVAL;
1455			break;
1456		}
1457#ifdef INET6
1458		/*
1459		 * A laggport interface should not have inet6 address
1460		 * because two interfaces with a valid link-local
1461		 * scope zone must not be merged in any form.  This
1462		 * restriction is needed to prevent violation of
1463		 * link-local scope zone.  Attempts to add a laggport
1464		 * interface which has inet6 addresses triggers
1465		 * removal of all inet6 addresses on the member
1466		 * interface.
1467		 */
1468		if (in6ifa_llaonifp(tpif)) {
1469			in6_ifdetach(tpif);
1470				if_printf(sc->sc_ifp,
1471				    "IPv6 addresses on %s have been removed "
1472				    "before adding it as a member to prevent "
1473				    "IPv6 address scope violation.\n",
1474				    tpif->if_xname);
1475		}
1476#endif
1477		LAGG_WLOCK(sc);
1478		error = lagg_port_create(sc, tpif);
1479		LAGG_WUNLOCK(sc);
1480		break;
1481	case SIOCSLAGGDELPORT:
1482		error = priv_check(td, PRIV_NET_LAGG);
1483		if (error)
1484			break;
1485		if (rp->rp_portname[0] == '\0' ||
1486		    (tpif = ifunit(rp->rp_portname)) == NULL) {
1487			error = EINVAL;
1488			break;
1489		}
1490
1491		LAGG_WLOCK(sc);
1492		if ((lp = (struct lagg_port *)tpif->if_lagg) == NULL ||
1493		    lp->lp_softc != sc) {
1494			error = ENOENT;
1495			LAGG_WUNLOCK(sc);
1496			break;
1497		}
1498
1499		error = lagg_port_destroy(lp, 1);
1500		LAGG_WUNLOCK(sc);
1501		break;
1502	case SIOCSIFFLAGS:
1503		/* Set flags on ports too */
1504		LAGG_WLOCK(sc);
1505		SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1506			lagg_setflags(lp, 1);
1507		}
1508		LAGG_WUNLOCK(sc);
1509
1510		if (!(ifp->if_flags & IFF_UP) &&
1511		    (ifp->if_drv_flags & IFF_DRV_RUNNING)) {
1512			/*
1513			 * If interface is marked down and it is running,
1514			 * then stop and disable it.
1515			 */
1516			LAGG_WLOCK(sc);
1517			lagg_stop(sc);
1518			LAGG_WUNLOCK(sc);
1519		} else if ((ifp->if_flags & IFF_UP) &&
1520		    !(ifp->if_drv_flags & IFF_DRV_RUNNING)) {
1521			/*
1522			 * If interface is marked up and it is stopped, then
1523			 * start it.
1524			 */
1525			(*ifp->if_init)(sc);
1526		}
1527		break;
1528	case SIOCADDMULTI:
1529	case SIOCDELMULTI:
1530		LAGG_WLOCK(sc);
1531		error = lagg_ether_setmulti(sc);
1532		LAGG_WUNLOCK(sc);
1533		break;
1534	case SIOCSIFMEDIA:
1535	case SIOCGIFMEDIA:
1536		error = ifmedia_ioctl(ifp, ifr, &sc->sc_media, cmd);
1537		break;
1538
1539	case SIOCSIFCAP:
1540	case SIOCSIFMTU:
1541		/* Do not allow the MTU or caps to be directly changed */
1542		error = EINVAL;
1543		break;
1544
1545	default:
1546		error = ether_ioctl(ifp, cmd, data);
1547		break;
1548	}
1549	return (error);
1550}
1551
1552static int
1553lagg_ether_setmulti(struct lagg_softc *sc)
1554{
1555	struct lagg_port *lp;
1556
1557	LAGG_WLOCK_ASSERT(sc);
1558
1559	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1560		/* First, remove any existing filter entries. */
1561		lagg_ether_cmdmulti(lp, 0);
1562		/* copy all addresses from the lagg interface to the port */
1563		lagg_ether_cmdmulti(lp, 1);
1564	}
1565	return (0);
1566}
1567
1568static int
1569lagg_ether_cmdmulti(struct lagg_port *lp, int set)
1570{
1571	struct lagg_softc *sc = lp->lp_softc;
1572	struct ifnet *ifp = lp->lp_ifp;
1573	struct ifnet *scifp = sc->sc_ifp;
1574	struct lagg_mc *mc;
1575	struct ifmultiaddr *ifma;
1576	int error;
1577
1578	LAGG_WLOCK_ASSERT(sc);
1579
1580	if (set) {
1581		IF_ADDR_WLOCK(scifp);
1582		TAILQ_FOREACH(ifma, &scifp->if_multiaddrs, ifma_link) {
1583			if (ifma->ifma_addr->sa_family != AF_LINK)
1584				continue;
1585			mc = malloc(sizeof(struct lagg_mc), M_DEVBUF, M_NOWAIT);
1586			if (mc == NULL) {
1587				IF_ADDR_WUNLOCK(scifp);
1588				return (ENOMEM);
1589			}
1590			bcopy(ifma->ifma_addr, &mc->mc_addr,
1591			    ifma->ifma_addr->sa_len);
1592			mc->mc_addr.sdl_index = ifp->if_index;
1593			mc->mc_ifma = NULL;
1594			SLIST_INSERT_HEAD(&lp->lp_mc_head, mc, mc_entries);
1595		}
1596		IF_ADDR_WUNLOCK(scifp);
1597		SLIST_FOREACH (mc, &lp->lp_mc_head, mc_entries) {
1598			error = if_addmulti(ifp,
1599			    (struct sockaddr *)&mc->mc_addr, &mc->mc_ifma);
1600			if (error)
1601				return (error);
1602		}
1603	} else {
1604		while ((mc = SLIST_FIRST(&lp->lp_mc_head)) != NULL) {
1605			SLIST_REMOVE(&lp->lp_mc_head, mc, lagg_mc, mc_entries);
1606			if (mc->mc_ifma && !lp->lp_detaching)
1607				if_delmulti_ifma(mc->mc_ifma);
1608			free(mc, M_DEVBUF);
1609		}
1610	}
1611	return (0);
1612}
1613
1614/* Handle a ref counted flag that should be set on the lagg port as well */
1615static int
1616lagg_setflag(struct lagg_port *lp, int flag, int status,
1617    int (*func)(struct ifnet *, int))
1618{
1619	struct lagg_softc *sc = lp->lp_softc;
1620	struct ifnet *scifp = sc->sc_ifp;
1621	struct ifnet *ifp = lp->lp_ifp;
1622	int error;
1623
1624	LAGG_WLOCK_ASSERT(sc);
1625
1626	status = status ? (scifp->if_flags & flag) : 0;
1627	/* Now "status" contains the flag value or 0 */
1628
1629	/*
1630	 * See if recorded ports status is different from what
1631	 * we want it to be.  If it is, flip it.  We record ports
1632	 * status in lp_ifflags so that we won't clear ports flag
1633	 * we haven't set.  In fact, we don't clear or set ports
1634	 * flags directly, but get or release references to them.
1635	 * That's why we can be sure that recorded flags still are
1636	 * in accord with actual ports flags.
1637	 */
1638	if (status != (lp->lp_ifflags & flag)) {
1639		error = (*func)(ifp, status);
1640		if (error)
1641			return (error);
1642		lp->lp_ifflags &= ~flag;
1643		lp->lp_ifflags |= status;
1644	}
1645	return (0);
1646}
1647
1648/*
1649 * Handle IFF_* flags that require certain changes on the lagg port
1650 * if "status" is true, update ports flags respective to the lagg
1651 * if "status" is false, forcedly clear the flags set on port.
1652 */
1653static int
1654lagg_setflags(struct lagg_port *lp, int status)
1655{
1656	int error, i;
1657
1658	for (i = 0; lagg_pflags[i].flag; i++) {
1659		error = lagg_setflag(lp, lagg_pflags[i].flag,
1660		    status, lagg_pflags[i].func);
1661		if (error)
1662			return (error);
1663	}
1664	return (0);
1665}
1666
1667static int
1668lagg_transmit(struct ifnet *ifp, struct mbuf *m)
1669{
1670	struct lagg_softc *sc = (struct lagg_softc *)ifp->if_softc;
1671	int error, len, mcast;
1672	struct rm_priotracker tracker;
1673
1674	len = m->m_pkthdr.len;
1675	mcast = (m->m_flags & (M_MCAST | M_BCAST)) ? 1 : 0;
1676
1677	LAGG_RLOCK(sc, &tracker);
1678	/* We need a Tx algorithm and at least one port */
1679	if (sc->sc_proto == LAGG_PROTO_NONE || sc->sc_count == 0) {
1680		LAGG_RUNLOCK(sc, &tracker);
1681		m_freem(m);
1682		if_inc_counter(ifp, IFCOUNTER_OERRORS, 1);
1683		return (ENXIO);
1684	}
1685
1686	ETHER_BPF_MTAP(ifp, m);
1687
1688	error = lagg_proto_start(sc, m);
1689	LAGG_RUNLOCK(sc, &tracker);
1690
1691	if (error != 0)
1692		if_inc_counter(ifp, IFCOUNTER_OERRORS, 1);
1693
1694	return (error);
1695}
1696
1697/*
1698 * The ifp->if_qflush entry point for lagg(4) is no-op.
1699 */
1700static void
1701lagg_qflush(struct ifnet *ifp __unused)
1702{
1703}
1704
1705static struct mbuf *
1706lagg_input(struct ifnet *ifp, struct mbuf *m)
1707{
1708	struct lagg_port *lp = ifp->if_lagg;
1709	struct lagg_softc *sc = lp->lp_softc;
1710	struct ifnet *scifp = sc->sc_ifp;
1711	struct rm_priotracker tracker;
1712
1713	LAGG_RLOCK(sc, &tracker);
1714	if ((scifp->if_drv_flags & IFF_DRV_RUNNING) == 0 ||
1715	    (lp->lp_flags & LAGG_PORT_DISABLED) ||
1716	    sc->sc_proto == LAGG_PROTO_NONE) {
1717		LAGG_RUNLOCK(sc, &tracker);
1718		m_freem(m);
1719		return (NULL);
1720	}
1721
1722	ETHER_BPF_MTAP(scifp, m);
1723
1724	if (lp->lp_detaching != 0) {
1725		m_freem(m);
1726		m = NULL;
1727	} else
1728		m = lagg_proto_input(sc, lp, m);
1729
1730	if (m != NULL) {
1731		if (scifp->if_flags & IFF_MONITOR) {
1732			m_freem(m);
1733			m = NULL;
1734		}
1735	}
1736
1737	LAGG_RUNLOCK(sc, &tracker);
1738	return (m);
1739}
1740
1741static int
1742lagg_media_change(struct ifnet *ifp)
1743{
1744	struct lagg_softc *sc = (struct lagg_softc *)ifp->if_softc;
1745
1746	if (sc->sc_ifflags & IFF_DEBUG)
1747		printf("%s\n", __func__);
1748
1749	/* Ignore */
1750	return (0);
1751}
1752
1753static void
1754lagg_media_status(struct ifnet *ifp, struct ifmediareq *imr)
1755{
1756	struct lagg_softc *sc = (struct lagg_softc *)ifp->if_softc;
1757	struct lagg_port *lp;
1758	struct rm_priotracker tracker;
1759
1760	imr->ifm_status = IFM_AVALID;
1761	imr->ifm_active = IFM_ETHER | IFM_AUTO;
1762
1763	LAGG_RLOCK(sc, &tracker);
1764	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1765		if (LAGG_PORTACTIVE(lp))
1766			imr->ifm_status |= IFM_ACTIVE;
1767	}
1768	LAGG_RUNLOCK(sc, &tracker);
1769}
1770
1771static void
1772lagg_linkstate(struct lagg_softc *sc)
1773{
1774	struct lagg_port *lp;
1775	int new_link = LINK_STATE_DOWN;
1776	uint64_t speed;
1777
1778	/* Our link is considered up if at least one of our ports is active */
1779	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1780		if (lp->lp_ifp->if_link_state == LINK_STATE_UP) {
1781			new_link = LINK_STATE_UP;
1782			break;
1783		}
1784	}
1785	if_link_state_change(sc->sc_ifp, new_link);
1786
1787	/* Update if_baudrate to reflect the max possible speed */
1788	switch (sc->sc_proto) {
1789		case LAGG_PROTO_FAILOVER:
1790			sc->sc_ifp->if_baudrate = sc->sc_primary != NULL ?
1791			    sc->sc_primary->lp_ifp->if_baudrate : 0;
1792			break;
1793		case LAGG_PROTO_ROUNDROBIN:
1794		case LAGG_PROTO_LOADBALANCE:
1795		case LAGG_PROTO_BROADCAST:
1796			speed = 0;
1797			SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
1798				speed += lp->lp_ifp->if_baudrate;
1799			sc->sc_ifp->if_baudrate = speed;
1800			break;
1801		case LAGG_PROTO_LACP:
1802			/* LACP updates if_baudrate itself */
1803			break;
1804	}
1805}
1806
1807static void
1808lagg_port_state(struct ifnet *ifp, int state)
1809{
1810	struct lagg_port *lp = (struct lagg_port *)ifp->if_lagg;
1811	struct lagg_softc *sc = NULL;
1812
1813	if (lp != NULL)
1814		sc = lp->lp_softc;
1815	if (sc == NULL)
1816		return;
1817
1818	LAGG_WLOCK(sc);
1819	lagg_linkstate(sc);
1820	lagg_proto_linkstate(sc, lp);
1821	LAGG_WUNLOCK(sc);
1822}
1823
1824struct lagg_port *
1825lagg_link_active(struct lagg_softc *sc, struct lagg_port *lp)
1826{
1827	struct lagg_port *lp_next, *rval = NULL;
1828	// int new_link = LINK_STATE_DOWN;
1829
1830	LAGG_RLOCK_ASSERT(sc);
1831	/*
1832	 * Search a port which reports an active link state.
1833	 */
1834
1835	if (lp == NULL)
1836		goto search;
1837	if (LAGG_PORTACTIVE(lp)) {
1838		rval = lp;
1839		goto found;
1840	}
1841	if ((lp_next = SLIST_NEXT(lp, lp_entries)) != NULL &&
1842	    LAGG_PORTACTIVE(lp_next)) {
1843		rval = lp_next;
1844		goto found;
1845	}
1846
1847search:
1848	SLIST_FOREACH(lp_next, &sc->sc_ports, lp_entries) {
1849		if (LAGG_PORTACTIVE(lp_next)) {
1850			rval = lp_next;
1851			goto found;
1852		}
1853	}
1854
1855found:
1856	if (rval != NULL) {
1857		/*
1858		 * The IEEE 802.1D standard assumes that a lagg with
1859		 * multiple ports is always full duplex. This is valid
1860		 * for load sharing laggs and if at least two links
1861		 * are active. Unfortunately, checking the latter would
1862		 * be too expensive at this point.
1863		 XXX
1864		if ((sc->sc_capabilities & IFCAP_LAGG_FULLDUPLEX) &&
1865		    (sc->sc_count > 1))
1866			new_link = LINK_STATE_FULL_DUPLEX;
1867		else
1868			new_link = rval->lp_link_state;
1869		 */
1870	}
1871
1872	return (rval);
1873}
1874
1875int
1876lagg_enqueue(struct ifnet *ifp, struct mbuf *m)
1877{
1878
1879	return (ifp->if_transmit)(ifp, m);
1880}
1881
1882/*
1883 * Simple round robin aggregation
1884 */
1885static void
1886lagg_rr_attach(struct lagg_softc *sc)
1887{
1888	sc->sc_capabilities = IFCAP_LAGG_FULLDUPLEX;
1889	sc->sc_seq = 0;
1890	sc->sc_bkt_count = sc->sc_bkt;
1891}
1892
1893static int
1894lagg_rr_start(struct lagg_softc *sc, struct mbuf *m)
1895{
1896	struct lagg_port *lp;
1897	uint32_t p;
1898
1899	if (sc->sc_bkt_count == 0 && sc->sc_bkt > 0)
1900		sc->sc_bkt_count = sc->sc_bkt;
1901
1902	if (sc->sc_bkt > 0) {
1903		atomic_subtract_int(&sc->sc_bkt_count, 1);
1904	if (atomic_cmpset_int(&sc->sc_bkt_count, 0, sc->sc_bkt))
1905		p = atomic_fetchadd_32(&sc->sc_seq, 1);
1906	else
1907		p = sc->sc_seq;
1908	} else
1909		p = atomic_fetchadd_32(&sc->sc_seq, 1);
1910
1911	p %= sc->sc_count;
1912	lp = SLIST_FIRST(&sc->sc_ports);
1913
1914	while (p--)
1915		lp = SLIST_NEXT(lp, lp_entries);
1916
1917	/*
1918	 * Check the port's link state. This will return the next active
1919	 * port if the link is down or the port is NULL.
1920	 */
1921	if ((lp = lagg_link_active(sc, lp)) == NULL) {
1922		m_freem(m);
1923		return (ENETDOWN);
1924	}
1925
1926	/* Send mbuf */
1927	return (lagg_enqueue(lp->lp_ifp, m));
1928}
1929
1930static struct mbuf *
1931lagg_rr_input(struct lagg_softc *sc, struct lagg_port *lp, struct mbuf *m)
1932{
1933	struct ifnet *ifp = sc->sc_ifp;
1934
1935	/* Just pass in the packet to our lagg device */
1936	m->m_pkthdr.rcvif = ifp;
1937
1938	return (m);
1939}
1940
1941/*
1942 * Broadcast mode
1943 */
1944static int
1945lagg_bcast_start(struct lagg_softc *sc, struct mbuf *m)
1946{
1947	int active_ports = 0;
1948	int errors = 0;
1949	int ret;
1950	struct lagg_port *lp, *last = NULL;
1951	struct mbuf *m0;
1952
1953	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries) {
1954		if (!LAGG_PORTACTIVE(lp))
1955			continue;
1956
1957		active_ports++;
1958
1959		if (last != NULL) {
1960			m0 = m_copym(m, 0, M_COPYALL, M_NOWAIT);
1961			if (m0 == NULL) {
1962				ret = ENOBUFS;
1963				errors++;
1964				break;
1965			}
1966
1967			ret = lagg_enqueue(last->lp_ifp, m0);
1968			if (ret != 0)
1969				errors++;
1970		}
1971		last = lp;
1972	}
1973	if (last == NULL) {
1974		m_freem(m);
1975		return (ENOENT);
1976	}
1977	if ((last = lagg_link_active(sc, last)) == NULL) {
1978		m_freem(m);
1979		return (ENETDOWN);
1980	}
1981
1982	ret = lagg_enqueue(last->lp_ifp, m);
1983	if (ret != 0)
1984		errors++;
1985
1986	if (errors == 0)
1987		return (ret);
1988
1989	return (0);
1990}
1991
1992static struct mbuf*
1993lagg_bcast_input(struct lagg_softc *sc, struct lagg_port *lp, struct mbuf *m)
1994{
1995	struct ifnet *ifp = sc->sc_ifp;
1996
1997	/* Just pass in the packet to our lagg device */
1998	m->m_pkthdr.rcvif = ifp;
1999	return (m);
2000}
2001
2002/*
2003 * Active failover
2004 */
2005static int
2006lagg_fail_start(struct lagg_softc *sc, struct mbuf *m)
2007{
2008	struct lagg_port *lp;
2009
2010	/* Use the master port if active or the next available port */
2011	if ((lp = lagg_link_active(sc, sc->sc_primary)) == NULL) {
2012		m_freem(m);
2013		return (ENETDOWN);
2014	}
2015
2016	/* Send mbuf */
2017	return (lagg_enqueue(lp->lp_ifp, m));
2018}
2019
2020static struct mbuf *
2021lagg_fail_input(struct lagg_softc *sc, struct lagg_port *lp, struct mbuf *m)
2022{
2023	struct ifnet *ifp = sc->sc_ifp;
2024	struct lagg_port *tmp_tp;
2025
2026	if (lp == sc->sc_primary || V_lagg_failover_rx_all) {
2027		m->m_pkthdr.rcvif = ifp;
2028		return (m);
2029	}
2030
2031	if (!LAGG_PORTACTIVE(sc->sc_primary)) {
2032		tmp_tp = lagg_link_active(sc, sc->sc_primary);
2033		/*
2034		 * If tmp_tp is null, we've received a packet when all
2035		 * our links are down. Weird, but process it anyways.
2036		 */
2037		if ((tmp_tp == NULL || tmp_tp == lp)) {
2038			m->m_pkthdr.rcvif = ifp;
2039			return (m);
2040		}
2041	}
2042
2043	m_freem(m);
2044	return (NULL);
2045}
2046
2047/*
2048 * Loadbalancing
2049 */
2050static void
2051lagg_lb_attach(struct lagg_softc *sc)
2052{
2053	struct lagg_port *lp;
2054	struct lagg_lb *lb;
2055
2056	lb = malloc(sizeof(struct lagg_lb), M_DEVBUF, M_WAITOK | M_ZERO);
2057
2058	sc->sc_capabilities = IFCAP_LAGG_FULLDUPLEX;
2059
2060	lb->lb_key = m_ether_tcpip_hash_init();
2061	sc->sc_psc = lb;
2062
2063	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
2064		lagg_lb_port_create(lp);
2065}
2066
2067static void
2068lagg_lb_detach(struct lagg_softc *sc)
2069{
2070	struct lagg_lb *lb;
2071
2072	lb = (struct lagg_lb *)sc->sc_psc;
2073	LAGG_WUNLOCK(sc);
2074	if (lb != NULL)
2075		free(lb, M_DEVBUF);
2076}
2077
2078static int
2079lagg_lb_porttable(struct lagg_softc *sc, struct lagg_port *lp)
2080{
2081	struct lagg_lb *lb = (struct lagg_lb *)sc->sc_psc;
2082	struct lagg_port *lp_next;
2083	int i = 0;
2084
2085	bzero(&lb->lb_ports, sizeof(lb->lb_ports));
2086	SLIST_FOREACH(lp_next, &sc->sc_ports, lp_entries) {
2087		if (lp_next == lp)
2088			continue;
2089		if (i >= LAGG_MAX_PORTS)
2090			return (EINVAL);
2091		if (sc->sc_ifflags & IFF_DEBUG)
2092			printf("%s: port %s at index %d\n",
2093			    sc->sc_ifname, lp_next->lp_ifp->if_xname, i);
2094		lb->lb_ports[i++] = lp_next;
2095	}
2096
2097	return (0);
2098}
2099
2100static int
2101lagg_lb_port_create(struct lagg_port *lp)
2102{
2103	struct lagg_softc *sc = lp->lp_softc;
2104	return (lagg_lb_porttable(sc, NULL));
2105}
2106
2107static void
2108lagg_lb_port_destroy(struct lagg_port *lp)
2109{
2110	struct lagg_softc *sc = lp->lp_softc;
2111	lagg_lb_porttable(sc, lp);
2112}
2113
2114static int
2115lagg_lb_start(struct lagg_softc *sc, struct mbuf *m)
2116{
2117	struct lagg_lb *lb = (struct lagg_lb *)sc->sc_psc;
2118	struct lagg_port *lp = NULL;
2119	uint32_t p = 0;
2120
2121	if ((sc->sc_opts & LAGG_OPT_USE_FLOWID) &&
2122	    M_HASHTYPE_GET(m) != M_HASHTYPE_NONE)
2123		p = m->m_pkthdr.flowid >> sc->flowid_shift;
2124	else
2125		p = m_ether_tcpip_hash(sc->sc_flags, m, lb->lb_key);
2126	p %= sc->sc_count;
2127	lp = lb->lb_ports[p];
2128
2129	/*
2130	 * Check the port's link state. This will return the next active
2131	 * port if the link is down or the port is NULL.
2132	 */
2133	if ((lp = lagg_link_active(sc, lp)) == NULL) {
2134		m_freem(m);
2135		return (ENETDOWN);
2136	}
2137
2138	/* Send mbuf */
2139	return (lagg_enqueue(lp->lp_ifp, m));
2140}
2141
2142static struct mbuf *
2143lagg_lb_input(struct lagg_softc *sc, struct lagg_port *lp, struct mbuf *m)
2144{
2145	struct ifnet *ifp = sc->sc_ifp;
2146
2147	/* Just pass in the packet to our lagg device */
2148	m->m_pkthdr.rcvif = ifp;
2149
2150	return (m);
2151}
2152
2153/*
2154 * 802.3ad LACP
2155 */
2156static void
2157lagg_lacp_attach(struct lagg_softc *sc)
2158{
2159	struct lagg_port *lp;
2160
2161	lacp_attach(sc);
2162	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
2163		lacp_port_create(lp);
2164}
2165
2166static void
2167lagg_lacp_detach(struct lagg_softc *sc)
2168{
2169	struct lagg_port *lp;
2170	void *psc;
2171
2172	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
2173		lacp_port_destroy(lp);
2174
2175	psc = sc->sc_psc;
2176	sc->sc_psc = NULL;
2177	LAGG_WUNLOCK(sc);
2178
2179	lacp_detach(psc);
2180}
2181
2182static void
2183lagg_lacp_lladdr(struct lagg_softc *sc)
2184{
2185	struct lagg_port *lp;
2186
2187	/* purge all the lacp ports */
2188	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
2189		lacp_port_destroy(lp);
2190
2191	/* add them back in */
2192	SLIST_FOREACH(lp, &sc->sc_ports, lp_entries)
2193		lacp_port_create(lp);
2194}
2195
2196static int
2197lagg_lacp_start(struct lagg_softc *sc, struct mbuf *m)
2198{
2199	struct lagg_port *lp;
2200
2201	lp = lacp_select_tx_port(sc, m);
2202	if (lp == NULL) {
2203		m_freem(m);
2204		return (ENETDOWN);
2205	}
2206
2207	/* Send mbuf */
2208	return (lagg_enqueue(lp->lp_ifp, m));
2209}
2210
2211static struct mbuf *
2212lagg_lacp_input(struct lagg_softc *sc, struct lagg_port *lp, struct mbuf *m)
2213{
2214	struct ifnet *ifp = sc->sc_ifp;
2215	struct ether_header *eh;
2216	u_short etype;
2217
2218	eh = mtod(m, struct ether_header *);
2219	etype = ntohs(eh->ether_type);
2220
2221	/* Tap off LACP control messages */
2222	if ((m->m_flags & M_VLANTAG) == 0 && etype == ETHERTYPE_SLOW) {
2223		m = lacp_input(lp, m);
2224		if (m == NULL)
2225			return (NULL);
2226	}
2227
2228	/*
2229	 * If the port is not collecting or not in the active aggregator then
2230	 * free and return.
2231	 */
2232	if (lacp_iscollecting(lp) == 0 || lacp_isactive(lp) == 0) {
2233		m_freem(m);
2234		return (NULL);
2235	}
2236
2237	m->m_pkthdr.rcvif = ifp;
2238	return (m);
2239}
2240
2241