1 /* 2 * Copyright 1998 Massachusetts Institute of Technology 3 * 4 * Permission to use, copy, modify, and distribute this software and 5 * its documentation for any purpose and without fee is hereby 6 * granted, provided that both the above copyright notice and this 7 * permission notice appear in all copies, that both the above 8 * copyright notice and this permission notice appear in all 9 * supporting documentation, and that the name of M.I.T. not be used 10 * in advertising or publicity pertaining to distribution of the 11 * software without specific, written prior permission. M.I.T. makes 12 * no representations about the suitability of this software for any 13 * purpose. It is provided "as is" without express or implied 14 * warranty. 15 * 16 * THIS SOFTWARE IS PROVIDED BY M.I.T. ``AS IS''. M.I.T. DISCLAIMS 17 * ALL EXPRESS OR IMPLIED WARRANTIES WITH REGARD TO THIS SOFTWARE, 18 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF 19 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT 20 * SHALL M.I.T. BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 21 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 22 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF 23 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND 24 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 25 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT 26 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 * 29 * $FreeBSD: src/sys/net/if_vlan.c,v 1.15.2.13 2003/02/14 22:25:58 fenner Exp $ 30 * $DragonFly: src/sys/net/vlan/if_vlan.c,v 1.43 2008/11/22 04:00:53 sephe Exp $ 31 */ 32 33 /* 34 * if_vlan.c - pseudo-device driver for IEEE 802.1Q virtual LANs. 35 * Might be extended some day to also handle IEEE 802.1p priority 36 * tagging. This is sort of sneaky in the implementation, since 37 * we need to pretend to be enough of an Ethernet implementation 38 * to make arp work. The way we do this is by telling everyone 39 * that we are an Ethernet, and then catch the packets that 40 * ether_output() left on our output queue queue when it calls 41 * if_start(), rewrite them for use by the real outgoing interface, 42 * and ask it to send them. 43 */ 44 45 #ifndef NVLAN 46 #include "use_vlan.h" 47 #endif 48 #include "opt_inet.h" 49 50 #include <sys/param.h> 51 #include <sys/systm.h> 52 #include <sys/kernel.h> 53 #include <sys/malloc.h> 54 #include <sys/mbuf.h> 55 #include <sys/module.h> 56 #include <sys/queue.h> 57 #include <sys/socket.h> 58 #include <sys/sockio.h> 59 #include <sys/sysctl.h> 60 #include <sys/bus.h> 61 #include <sys/thread2.h> 62 63 #include <net/bpf.h> 64 #include <net/ethernet.h> 65 #include <net/if.h> 66 #include <net/if_arp.h> 67 #include <net/if_dl.h> 68 #include <net/if_types.h> 69 #include <net/ifq_var.h> 70 #include <net/if_clone.h> 71 #include <net/netmsg2.h> 72 73 #ifdef INET 74 #include <netinet/in.h> 75 #include <netinet/if_ether.h> 76 #endif 77 78 #include <net/vlan/if_vlan_var.h> 79 #include <net/vlan/if_vlan_ether.h> 80 81 struct ifvlan; 82 83 struct vlan_mc_entry { 84 struct ether_addr mc_addr; 85 SLIST_ENTRY(vlan_mc_entry) mc_entries; 86 }; 87 88 struct vlan_entry { 89 struct ifvlan *ifv; 90 LIST_ENTRY(vlan_entry) ifv_link; 91 }; 92 93 struct ifvlan { 94 struct arpcom ifv_ac; /* make this an interface */ 95 struct ifnet *ifv_p; /* parent inteface of this vlan */ 96 int ifv_pflags; /* special flags we have set on parent */ 97 struct ifv_linkmib { 98 int ifvm_parent; 99 uint16_t ifvm_proto; /* encapsulation ethertype */ 100 uint16_t ifvm_tag; /* tag to apply on packets leaving if */ 101 } ifv_mib; 102 SLIST_HEAD(, vlan_mc_entry) vlan_mc_listhead; 103 LIST_ENTRY(ifvlan) ifv_list; 104 struct vlan_entry ifv_entries[1]; 105 }; 106 #define ifv_if ifv_ac.ac_if 107 #define ifv_tag ifv_mib.ifvm_tag 108 109 struct vlan_trunk { 110 LIST_HEAD(, vlan_entry) vlan_list; 111 }; 112 113 struct netmsg_vlan { 114 struct netmsg nv_nmsg; 115 struct ifvlan *nv_ifv; 116 struct ifnet *nv_ifp_p; 117 const char *nv_parent_name; 118 uint16_t nv_vlantag; 119 }; 120 121 #define VLANNAME "vlan" 122 123 SYSCTL_DECL(_net_link); 124 SYSCTL_NODE(_net_link, IFT_L2VLAN, vlan, CTLFLAG_RW, 0, "IEEE 802.1Q VLAN"); 125 SYSCTL_NODE(_net_link_vlan, PF_LINK, link, CTLFLAG_RW, 0, "for consistency"); 126 127 static MALLOC_DEFINE(M_VLAN, "vlan", "802.1Q Virtual LAN Interface"); 128 static LIST_HEAD(, ifvlan) ifv_list; 129 130 static int vlan_clone_create(struct if_clone *, int, caddr_t); 131 static void vlan_clone_destroy(struct ifnet *); 132 static void vlan_ifdetach(void *, struct ifnet *); 133 134 static void vlan_init(void *); 135 static void vlan_start(struct ifnet *); 136 static int vlan_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *); 137 static void vlan_input(struct mbuf *); 138 139 static int vlan_setflags(struct ifvlan *, struct ifnet *, int); 140 static int vlan_setflag(struct ifvlan *, struct ifnet *, int, int, 141 int (*)(struct ifnet *, int)); 142 static int vlan_config_flags(struct ifvlan *ifv); 143 static void vlan_clrmulti(struct ifvlan *, struct ifnet *); 144 static int vlan_setmulti(struct ifvlan *, struct ifnet *); 145 static int vlan_config_multi(struct ifvlan *); 146 static int vlan_config(struct ifvlan *, const char *, uint16_t); 147 static int vlan_unconfig(struct ifvlan *); 148 static void vlan_link(struct ifvlan *, struct ifnet *); 149 static void vlan_unlink(struct ifvlan *, struct ifnet *); 150 151 static void vlan_config_dispatch(struct netmsg *); 152 static void vlan_unconfig_dispatch(struct netmsg *); 153 static void vlan_link_dispatch(struct netmsg *); 154 static void vlan_unlink_dispatch(struct netmsg *); 155 static void vlan_multi_dispatch(struct netmsg *); 156 static void vlan_flags_dispatch(struct netmsg *); 157 static void vlan_ifdetach_dispatch(struct netmsg *); 158 159 /* Special flags we should propagate to parent */ 160 static struct { 161 int flag; 162 int (*func)(struct ifnet *, int); 163 } vlan_pflags[] = { 164 { IFF_PROMISC, ifpromisc }, 165 { IFF_ALLMULTI, if_allmulti }, 166 { 0, NULL } 167 }; 168 169 static eventhandler_tag vlan_ifdetach_cookie; 170 static struct if_clone vlan_cloner = 171 IF_CLONE_INITIALIZER("vlan", vlan_clone_create, vlan_clone_destroy, 172 NVLAN, IF_MAXUNIT); 173 174 /* 175 * Handle IFF_* flags that require certain changes on the parent: 176 * if "set" is true, update parent's flags respective to our if_flags; 177 * if "set" is false, forcedly clear the flags set on parent. 178 */ 179 static int 180 vlan_setflags(struct ifvlan *ifv, struct ifnet *ifp_p, int set) 181 { 182 int error, i; 183 184 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 185 186 for (i = 0; vlan_pflags[i].func != NULL; i++) { 187 error = vlan_setflag(ifv, ifp_p, vlan_pflags[i].flag, 188 set, vlan_pflags[i].func); 189 if (error) 190 return error; 191 } 192 return 0; 193 } 194 195 /* Handle a reference counted flag that should be set on the parent as well */ 196 static int 197 vlan_setflag(struct ifvlan *ifv, struct ifnet *ifp_p, int flag, int set, 198 int (*func)(struct ifnet *, int)) 199 { 200 struct ifnet *ifp = &ifv->ifv_if; 201 int error, ifv_flag; 202 203 ASSERT_IFNET_NOT_SERIALIZED_ALL(ifp); 204 205 ifv_flag = set ? (ifp->if_flags & flag) : 0; 206 207 /* 208 * See if recorded parent's status is different from what 209 * we want it to be. If it is, flip it. We record parent's 210 * status in ifv_pflags so that we won't clear parent's flag 211 * we haven't set. In fact, we don't clear or set parent's 212 * flags directly, but get or release references to them. 213 * That's why we can be sure that recorded flags still are 214 * in accord with actual parent's flags. 215 */ 216 if (ifv_flag != (ifv->ifv_pflags & flag)) { 217 error = func(ifp_p, ifv_flag); 218 if (error) 219 return error; 220 ifv->ifv_pflags &= ~flag; 221 ifv->ifv_pflags |= ifv_flag; 222 } 223 return 0; 224 } 225 226 /* 227 * Program our multicast filter. What we're actually doing is 228 * programming the multicast filter of the parent. This has the 229 * side effect of causing the parent interface to receive multicast 230 * traffic that it doesn't really want, which ends up being discarded 231 * later by the upper protocol layers. Unfortunately, there's no way 232 * to avoid this: there really is only one physical interface. 233 */ 234 static int 235 vlan_setmulti(struct ifvlan *ifv, struct ifnet *ifp_p) 236 { 237 struct ifmultiaddr *ifma, *rifma = NULL; 238 struct vlan_mc_entry *mc = NULL; 239 struct sockaddr_dl sdl; 240 struct ifnet *ifp = &ifv->ifv_if; 241 242 ASSERT_IFNET_NOT_SERIALIZED_ALL(ifp); 243 244 /* 245 * First, remove any existing filter entries. 246 */ 247 vlan_clrmulti(ifv, ifp_p); 248 249 /* 250 * Now program new ones. 251 */ 252 bzero(&sdl, sizeof(sdl)); 253 sdl.sdl_len = sizeof(sdl); 254 sdl.sdl_family = AF_LINK; 255 sdl.sdl_index = ifp_p->if_index; 256 sdl.sdl_type = IFT_ETHER; 257 sdl.sdl_alen = ETHER_ADDR_LEN; 258 259 LIST_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) { 260 int error; 261 262 if (ifma->ifma_addr->sa_family != AF_LINK) 263 continue; 264 265 /* Save a copy */ 266 mc = kmalloc(sizeof(struct vlan_mc_entry), M_VLAN, M_WAITOK); 267 bcopy(LLADDR((struct sockaddr_dl *)ifma->ifma_addr), 268 &mc->mc_addr, ETHER_ADDR_LEN); 269 SLIST_INSERT_HEAD(&ifv->vlan_mc_listhead, mc, mc_entries); 270 271 /* Program the parent multicast filter */ 272 bcopy(LLADDR((struct sockaddr_dl *)ifma->ifma_addr), 273 LLADDR(&sdl), ETHER_ADDR_LEN); 274 error = if_addmulti(ifp_p, (struct sockaddr *)&sdl, &rifma); 275 if (error) 276 return error; 277 } 278 return 0; 279 } 280 281 static void 282 vlan_clrmulti(struct ifvlan *ifv, struct ifnet *ifp_p) 283 { 284 struct vlan_mc_entry *mc; 285 struct sockaddr_dl sdl; 286 287 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 288 289 bzero(&sdl, sizeof(sdl)); 290 sdl.sdl_len = sizeof(sdl); 291 sdl.sdl_family = AF_LINK; 292 sdl.sdl_index = ifp_p->if_index; 293 sdl.sdl_type = IFT_ETHER; 294 sdl.sdl_alen = ETHER_ADDR_LEN; 295 296 while ((mc = SLIST_FIRST(&ifv->vlan_mc_listhead)) != NULL) { 297 bcopy(&mc->mc_addr, LLADDR(&sdl), ETHER_ADDR_LEN); 298 if_delmulti(ifp_p, (struct sockaddr *)&sdl); /* ignore error */ 299 300 SLIST_REMOVE_HEAD(&ifv->vlan_mc_listhead, mc_entries); 301 kfree(mc, M_VLAN); 302 } 303 } 304 305 static int 306 vlan_modevent(module_t mod, int type, void *data) 307 { 308 switch (type) { 309 case MOD_LOAD: 310 LIST_INIT(&ifv_list); 311 vlan_input_p = vlan_input; 312 vlan_ifdetach_cookie = 313 EVENTHANDLER_REGISTER(ifnet_detach_event, 314 vlan_ifdetach, NULL, 315 EVENTHANDLER_PRI_ANY); 316 if_clone_attach(&vlan_cloner); 317 break; 318 319 case MOD_UNLOAD: 320 if_clone_detach(&vlan_cloner); 321 322 vlan_input_p = NULL; 323 /* 324 * Make that all protocol threads see vlan_input_p change. 325 */ 326 netmsg_service_sync(); 327 328 EVENTHANDLER_DEREGISTER(ifnet_detach_event, 329 vlan_ifdetach_cookie); 330 while (!LIST_EMPTY(&ifv_list)) 331 vlan_clone_destroy(&LIST_FIRST(&ifv_list)->ifv_if); 332 break; 333 } 334 return 0; 335 } 336 337 static moduledata_t vlan_mod = { 338 "if_vlan", 339 vlan_modevent, 340 0 341 }; 342 343 DECLARE_MODULE(if_vlan, vlan_mod, SI_SUB_PSEUDO, SI_ORDER_ANY); 344 345 static void 346 vlan_ifdetach_dispatch(struct netmsg *nmsg) 347 { 348 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 349 struct ifnet *ifp_p = vmsg->nv_ifp_p; 350 struct vlan_trunk *vlantrunks, *trunk; 351 struct vlan_entry *ifve; 352 353 vlantrunks = ifp_p->if_vlantrunks; 354 if (vlantrunks == NULL) 355 goto reply; 356 trunk = &vlantrunks[mycpuid]; 357 358 while (ifp_p->if_vlantrunks && 359 (ifve = LIST_FIRST(&trunk->vlan_list)) != NULL) 360 vlan_unconfig(ifve->ifv); 361 reply: 362 lwkt_replymsg(&nmsg->nm_lmsg, 0); 363 } 364 365 static void 366 vlan_ifdetach(void *arg __unused, struct ifnet *ifp) 367 { 368 struct netmsg_vlan vmsg; 369 struct netmsg *nmsg; 370 371 ASSERT_IFNET_NOT_SERIALIZED_ALL(ifp); 372 373 bzero(&vmsg, sizeof(vmsg)); 374 nmsg = &vmsg.nv_nmsg; 375 376 netmsg_init(nmsg, NULL, &curthread->td_msgport, 377 0, vlan_ifdetach_dispatch); 378 vmsg.nv_ifp_p = ifp; 379 380 lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0); 381 } 382 383 static int 384 vlan_clone_create(struct if_clone *ifc, int unit, caddr_t param __unused) 385 { 386 struct ifvlan *ifv; 387 struct ifnet *ifp; 388 int vlan_size, i; 389 390 vlan_size = sizeof(struct ifvlan) 391 + ((ncpus - 1) * sizeof(struct vlan_entry)); 392 ifv = kmalloc(vlan_size, M_VLAN, M_WAITOK | M_ZERO); 393 SLIST_INIT(&ifv->vlan_mc_listhead); 394 for (i = 0; i < ncpus; ++i) 395 ifv->ifv_entries[i].ifv = ifv; 396 397 crit_enter(); /* XXX not MP safe */ 398 LIST_INSERT_HEAD(&ifv_list, ifv, ifv_list); 399 crit_exit(); 400 401 ifp = &ifv->ifv_if; 402 ifp->if_softc = ifv; 403 if_initname(ifp, "vlan", unit); 404 /* NB: flags are not set here */ 405 ifp->if_linkmib = &ifv->ifv_mib; 406 ifp->if_linkmiblen = sizeof ifv->ifv_mib; 407 /* NB: mtu is not set here */ 408 409 ifp->if_init = vlan_init; 410 ifp->if_start = vlan_start; 411 ifp->if_ioctl = vlan_ioctl; 412 ifq_set_maxlen(&ifp->if_snd, ifqmaxlen); 413 ifq_set_ready(&ifp->if_snd); 414 ether_ifattach(ifp, ifv->ifv_ac.ac_enaddr, NULL); 415 /* Now undo some of the damage... */ 416 ifp->if_data.ifi_type = IFT_L2VLAN; 417 ifp->if_data.ifi_hdrlen = EVL_ENCAPLEN; 418 419 return (0); 420 } 421 422 static void 423 vlan_clone_destroy(struct ifnet *ifp) 424 { 425 struct ifvlan *ifv = ifp->if_softc; 426 427 crit_enter(); /* XXX not MP safe */ 428 LIST_REMOVE(ifv, ifv_list); 429 crit_exit(); 430 431 vlan_unconfig(ifv); 432 ether_ifdetach(ifp); 433 434 kfree(ifv, M_VLAN); 435 } 436 437 static void 438 vlan_init(void *xsc) 439 { 440 struct ifvlan *ifv = xsc; 441 struct ifnet *ifp = &ifv->ifv_if; 442 443 ASSERT_IFNET_SERIALIZED_ALL(ifp); 444 445 if (ifv->ifv_p != NULL) 446 ifp->if_flags |= IFF_RUNNING; 447 } 448 449 static void 450 vlan_start(struct ifnet *ifp) 451 { 452 struct ifvlan *ifv = ifp->if_softc; 453 struct ifnet *ifp_p = ifv->ifv_p; 454 struct mbuf *m; 455 456 ASSERT_IFNET_SERIALIZED_TX(ifp); 457 458 if (ifp_p == NULL) { 459 ifq_purge(&ifp->if_snd); 460 return; 461 } 462 463 if ((ifp->if_flags & IFF_RUNNING) == 0) 464 return; 465 466 for (;;) { 467 struct netmsg_packet *nmp; 468 struct netmsg *nmsg; 469 struct lwkt_port *port; 470 471 m = ifq_dequeue(&ifp->if_snd, NULL); 472 if (m == NULL) 473 break; 474 BPF_MTAP(ifp, m); 475 476 /* 477 * Do not run parent's if_start() if the parent is not up, 478 * or parent's driver will cause a system crash. 479 */ 480 if ((ifp_p->if_flags & (IFF_UP | IFF_RUNNING)) != 481 (IFF_UP | IFF_RUNNING)) { 482 m_freem(m); 483 ifp->if_data.ifi_collisions++; 484 continue; 485 } 486 487 /* 488 * We need some way to tell the interface where the packet 489 * came from so that it knows how to find the VLAN tag to 490 * use, so we set the ether_vlantag in the mbuf packet header 491 * to our vlan tag. We also set the M_VLANTAG flag in the 492 * mbuf to let the parent driver know that the ether_vlantag 493 * is really valid. 494 */ 495 m->m_pkthdr.ether_vlantag = ifv->ifv_tag; 496 m->m_flags |= M_VLANTAG; 497 498 nmp = &m->m_hdr.mh_netmsg; 499 nmsg = &nmp->nm_netmsg; 500 501 netmsg_init(nmsg, NULL, &netisr_apanic_rport, 502 0, vlan_start_dispatch); 503 nmp->nm_packet = m; 504 nmsg->nm_lmsg.u.ms_resultp = ifp_p; 505 506 port = cpu_portfn(ifp_p->if_index % ncpus /* XXX */); 507 lwkt_sendmsg(port, &nmp->nm_netmsg.nm_lmsg); 508 ifp->if_opackets++; 509 } 510 } 511 512 static void 513 vlan_input(struct mbuf *m) 514 { 515 struct ifvlan *ifv = NULL; 516 struct ifnet *rcvif; 517 struct vlan_trunk *vlantrunks; 518 struct vlan_entry *entry; 519 520 rcvif = m->m_pkthdr.rcvif; 521 KKASSERT(m->m_flags & M_VLANTAG); 522 523 vlantrunks = rcvif->if_vlantrunks; 524 if (vlantrunks == NULL) { 525 rcvif->if_noproto++; 526 m_freem(m); 527 return; 528 } 529 530 crit_enter(); /* XXX Necessary? */ 531 LIST_FOREACH(entry, &vlantrunks[mycpuid].vlan_list, ifv_link) { 532 if (entry->ifv->ifv_tag == 533 EVL_VLANOFTAG(m->m_pkthdr.ether_vlantag)) { 534 ifv = entry->ifv; 535 break; 536 } 537 } 538 crit_exit(); 539 540 /* 541 * Packet is discarded if: 542 * - no corresponding vlan(4) interface 543 * - vlan(4) interface has not been completely set up yet, 544 * or is being destroyed (ifv->ifv_p != rcvif) 545 */ 546 if (ifv == NULL || ifv->ifv_p != rcvif) { 547 rcvif->if_noproto++; 548 m_freem(m); 549 return; 550 } 551 552 /* 553 * Clear M_VLANTAG, before the packet is handed to 554 * vlan(4) interface 555 */ 556 m->m_flags &= ~M_VLANTAG; 557 558 ether_reinput_oncpu(&ifv->ifv_if, m, 1); 559 } 560 561 static void 562 vlan_link_dispatch(struct netmsg *nmsg) 563 { 564 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 565 struct ifvlan *ifv = vmsg->nv_ifv; 566 struct ifnet *ifp_p = vmsg->nv_ifp_p; 567 struct vlan_entry *entry; 568 struct vlan_trunk *vlantrunks, *trunk; 569 int cpu = mycpuid; 570 571 vlantrunks = ifp_p->if_vlantrunks; 572 KASSERT(vlantrunks != NULL, 573 ("vlan trunk has not been initialized yet\n")); 574 575 entry = &ifv->ifv_entries[cpu]; 576 trunk = &vlantrunks[cpu]; 577 578 crit_enter(); 579 LIST_INSERT_HEAD(&trunk->vlan_list, entry, ifv_link); 580 crit_exit(); 581 582 ifnet_forwardmsg(&nmsg->nm_lmsg, cpu + 1); 583 } 584 585 static void 586 vlan_link(struct ifvlan *ifv, struct ifnet *ifp_p) 587 { 588 struct netmsg_vlan vmsg; 589 struct netmsg *nmsg; 590 591 /* Assert in netisr0 */ 592 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 593 594 if (ifp_p->if_vlantrunks == NULL) { 595 struct vlan_trunk *vlantrunks; 596 int i; 597 598 vlantrunks = kmalloc(sizeof(*vlantrunks) * ncpus, M_VLAN, 599 M_WAITOK | M_ZERO); 600 for (i = 0; i < ncpus; ++i) 601 LIST_INIT(&vlantrunks[i].vlan_list); 602 603 ifp_p->if_vlantrunks = vlantrunks; 604 } 605 606 bzero(&vmsg, sizeof(vmsg)); 607 nmsg = &vmsg.nv_nmsg; 608 609 netmsg_init(nmsg, NULL, &curthread->td_msgport, 610 0, vlan_link_dispatch); 611 vmsg.nv_ifv = ifv; 612 vmsg.nv_ifp_p = ifp_p; 613 614 ifnet_domsg(&nmsg->nm_lmsg, 0); 615 } 616 617 static void 618 vlan_config_dispatch(struct netmsg *nmsg) 619 { 620 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 621 struct ifvlan *ifv; 622 struct ifnet *ifp_p, *ifp; 623 struct sockaddr_dl *sdl1, *sdl2; 624 int error; 625 626 /* Assert in netisr0 */ 627 628 ifp_p = ifunit(vmsg->nv_parent_name); 629 if (ifp_p == NULL) { 630 error = ENOENT; 631 goto reply; 632 } 633 634 if (ifp_p->if_data.ifi_type != IFT_ETHER) { 635 error = EPROTONOSUPPORT; 636 goto reply; 637 } 638 639 ifv = vmsg->nv_ifv; 640 ifp = &ifv->ifv_if; 641 642 if (ifv->ifv_p) { 643 error = EBUSY; 644 goto reply; 645 } 646 647 /* Link vlan into parent's vlantrunk */ 648 vlan_link(ifv, ifp_p); 649 650 ifnet_serialize_all(ifp); 651 652 ifv->ifv_tag = vmsg->nv_vlantag; 653 if (ifp_p->if_capenable & IFCAP_VLAN_MTU) 654 ifp->if_mtu = ifp_p->if_mtu; 655 else 656 ifp->if_mtu = ifp_p->if_data.ifi_mtu - EVL_ENCAPLEN; 657 658 /* 659 * Copy only a selected subset of flags from the parent. 660 * Other flags are none of our business. 661 */ 662 #define VLAN_INHERIT_FLAGS (IFF_BROADCAST | IFF_MULTICAST | \ 663 IFF_SIMPLEX | IFF_POINTOPOINT) 664 665 ifp->if_flags &= ~VLAN_INHERIT_FLAGS; 666 ifp->if_flags |= (ifp_p->if_flags & VLAN_INHERIT_FLAGS); 667 668 #undef VLAN_INHERIT_FLAGS 669 670 /* 671 * Set up our ``Ethernet address'' to reflect the underlying 672 * physical interface's. 673 */ 674 sdl1 = IF_LLSOCKADDR(ifp); 675 sdl2 = IF_LLSOCKADDR(ifp_p); 676 sdl1->sdl_type = IFT_ETHER; 677 sdl1->sdl_alen = ETHER_ADDR_LEN; 678 bcopy(LLADDR(sdl2), LLADDR(sdl1), ETHER_ADDR_LEN); 679 bcopy(LLADDR(sdl2), ifv->ifv_ac.ac_enaddr, ETHER_ADDR_LEN); 680 681 /* 682 * Release vlan's serializer before reprogramming parent's 683 * multicast filter to avoid possible dead lock. 684 */ 685 ifnet_deserialize_all(ifp); 686 687 /* 688 * Configure multicast addresses that may already be 689 * joined on the vlan device. 690 */ 691 vlan_setmulti(ifv, ifp_p); 692 693 /* 694 * Set flags on the parent, if necessary. 695 */ 696 vlan_setflags(ifv, ifp_p, 1); 697 698 /* 699 * Connect to parent after everything have been set up, 700 * so input/output could know that vlan is ready to go 701 */ 702 ifv->ifv_p = ifp_p; 703 error = 0; 704 reply: 705 lwkt_replymsg(&nmsg->nm_lmsg, error); 706 } 707 708 static int 709 vlan_config(struct ifvlan *ifv, const char *parent_name, uint16_t vlantag) 710 { 711 struct netmsg_vlan vmsg; 712 struct netmsg *nmsg; 713 714 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 715 716 bzero(&vmsg, sizeof(vmsg)); 717 nmsg = &vmsg.nv_nmsg; 718 719 netmsg_init(nmsg, NULL, &curthread->td_msgport, 720 0, vlan_config_dispatch); 721 vmsg.nv_ifv = ifv; 722 vmsg.nv_parent_name = parent_name; 723 vmsg.nv_vlantag = vlantag; 724 725 return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0); 726 } 727 728 static void 729 vlan_unlink_dispatch(struct netmsg *nmsg) 730 { 731 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 732 struct ifvlan *ifv = vmsg->nv_ifv; 733 struct vlan_entry *entry; 734 int cpu = mycpuid; 735 736 KASSERT(vmsg->nv_ifp_p->if_vlantrunks != NULL, 737 ("vlan trunk has not been initialized yet\n")); 738 entry = &ifv->ifv_entries[cpu]; 739 740 crit_enter(); 741 LIST_REMOVE(entry, ifv_link); 742 crit_exit(); 743 744 ifnet_forwardmsg(&nmsg->nm_lmsg, cpu + 1); 745 } 746 747 static void 748 vlan_unlink(struct ifvlan *ifv, struct ifnet *ifp_p) 749 { 750 struct vlan_trunk *vlantrunks = ifp_p->if_vlantrunks; 751 struct netmsg_vlan vmsg; 752 struct netmsg *nmsg; 753 754 /* Assert in netisr0 */ 755 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 756 757 KASSERT(ifp_p->if_vlantrunks != NULL, 758 ("vlan trunk has not been initialized yet\n")); 759 760 bzero(&vmsg, sizeof(vmsg)); 761 nmsg = &vmsg.nv_nmsg; 762 763 netmsg_init(nmsg, NULL, &curthread->td_msgport, 764 0, vlan_unlink_dispatch); 765 vmsg.nv_ifv = ifv; 766 vmsg.nv_ifp_p = ifp_p; 767 768 ifnet_domsg(&nmsg->nm_lmsg, 0); 769 770 crit_enter(); 771 if (LIST_EMPTY(&vlantrunks[mycpuid].vlan_list)) { 772 ifp_p->if_vlantrunks = NULL; 773 774 /* 775 * Make that all protocol threads see if_vlantrunks change. 776 */ 777 netmsg_service_sync(); 778 kfree(vlantrunks, M_VLAN); 779 } 780 crit_exit(); 781 } 782 783 static void 784 vlan_unconfig_dispatch(struct netmsg *nmsg) 785 { 786 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 787 struct sockaddr_dl *sdl; 788 struct ifvlan *ifv; 789 struct ifnet *ifp_p, *ifp; 790 int error; 791 792 /* Assert in netisr0 */ 793 794 ifv = vmsg->nv_ifv; 795 ifp = &ifv->ifv_if; 796 797 if (ifp->if_flags & IFF_UP) 798 if_down(ifp); 799 800 ifnet_serialize_all(ifp); 801 802 ifp->if_flags &= ~IFF_RUNNING; 803 804 /* 805 * Save parent ifnet pointer and disconnect from parent. 806 * 807 * This is done early in this function, so input/output could 808 * know that we are disconnecting. 809 */ 810 ifp_p = ifv->ifv_p; 811 ifv->ifv_p = NULL; 812 813 /* 814 * Release vlan's serializer before reprogramming parent's 815 * multicast filter to avoid possible dead lock. 816 */ 817 ifnet_deserialize_all(ifp); 818 819 if (ifp_p) { 820 /* 821 * Since the interface is being unconfigured, we need to 822 * empty the list of multicast groups that we may have joined 823 * while we were alive from the parent's list. 824 */ 825 vlan_clrmulti(ifv, ifp_p); 826 827 /* Clear parent's flags which was set by us. */ 828 vlan_setflags(ifv, ifp_p, 0); 829 } 830 831 ifnet_serialize_all(ifp); 832 833 ifp->if_mtu = ETHERMTU; 834 835 /* Clear our MAC address. */ 836 sdl = IF_LLSOCKADDR(ifp); 837 sdl->sdl_type = IFT_ETHER; 838 sdl->sdl_alen = ETHER_ADDR_LEN; 839 bzero(LLADDR(sdl), ETHER_ADDR_LEN); 840 bzero(ifv->ifv_ac.ac_enaddr, ETHER_ADDR_LEN); 841 842 ifnet_deserialize_all(ifp); 843 844 /* Unlink vlan from parent's vlantrunk */ 845 if (ifp_p != NULL && ifp_p->if_vlantrunks != NULL) 846 vlan_unlink(ifv, ifp_p); 847 848 error = 0; 849 lwkt_replymsg(&nmsg->nm_lmsg, error); 850 } 851 852 static int 853 vlan_unconfig(struct ifvlan *ifv) 854 { 855 struct netmsg_vlan vmsg; 856 struct netmsg *nmsg; 857 858 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 859 860 bzero(&vmsg, sizeof(vmsg)); 861 nmsg = &vmsg.nv_nmsg; 862 863 netmsg_init(nmsg, NULL, &curthread->td_msgport, 864 0, vlan_unconfig_dispatch); 865 vmsg.nv_ifv = ifv; 866 867 return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0); 868 } 869 870 static int 871 vlan_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data, struct ucred *cr) 872 { 873 struct ifvlan *ifv = ifp->if_softc; 874 struct ifreq *ifr = (struct ifreq *)data; 875 struct ifnet *ifp_p; 876 struct vlanreq vlr; 877 int error = 0; 878 879 ASSERT_IFNET_SERIALIZED_ALL(ifp); 880 881 switch (cmd) { 882 case SIOCGIFMEDIA: 883 ifp_p = ifv->ifv_p; 884 if (ifp_p != NULL) { 885 /* 886 * Release vlan interface's serializer to void 887 * possible dead lock. 888 */ 889 ifnet_deserialize_all(ifp); 890 891 ifnet_serialize_all(ifp_p); 892 error = ifp_p->if_ioctl(ifp_p, SIOCGIFMEDIA, data, cr); 893 ifnet_deserialize_all(ifp_p); 894 895 ifnet_serialize_all(ifp); 896 897 if (ifv->ifv_p == NULL && ifv->ifv_p != ifp_p) { 898 /* 899 * We are disconnected from the original 900 * parent interface or the parent interface 901 * is changed, after vlan interface's 902 * serializer is released. 903 */ 904 error = EINVAL; 905 } 906 907 /* Limit the result to the parent's current config. */ 908 if (error == 0) { 909 struct ifmediareq *ifmr; 910 911 ifmr = (struct ifmediareq *) data; 912 if (ifmr->ifm_count >= 1 && ifmr->ifm_ulist) { 913 ifmr->ifm_count = 1; 914 error = copyout(&ifmr->ifm_current, 915 ifmr->ifm_ulist, 916 sizeof(int)); 917 } 918 } 919 } else { 920 error = EINVAL; 921 } 922 break; 923 924 case SIOCSIFMEDIA: 925 error = EINVAL; 926 break; 927 928 case SIOCSETVLAN: 929 error = copyin(ifr->ifr_data, &vlr, sizeof vlr); 930 if (error) 931 break; 932 933 ifnet_deserialize_all(ifp); 934 if (vlr.vlr_parent[0] == '\0') 935 error = vlan_unconfig(ifv); 936 else 937 error = vlan_config(ifv, vlr.vlr_parent, vlr.vlr_tag); 938 ifnet_serialize_all(ifp); 939 break; 940 941 case SIOCGETVLAN: 942 bzero(&vlr, sizeof(vlr)); 943 if (ifv->ifv_p) { 944 strlcpy(vlr.vlr_parent, ifv->ifv_p->if_xname, 945 sizeof(vlr.vlr_parent)); 946 vlr.vlr_tag = ifv->ifv_tag; 947 } 948 error = copyout(&vlr, ifr->ifr_data, sizeof vlr); 949 break; 950 951 case SIOCSIFFLAGS: 952 if (ifp->if_flags & IFF_UP) 953 ifp->if_init(ifp); 954 else 955 ifp->if_flags &= ~IFF_RUNNING; 956 957 /* 958 * We should propagate selected flags to the parent, 959 * e.g., promiscuous mode. 960 */ 961 ifnet_deserialize_all(ifp); 962 error = vlan_config_flags(ifv); 963 ifnet_serialize_all(ifp); 964 break; 965 966 case SIOCADDMULTI: 967 case SIOCDELMULTI: 968 ifnet_deserialize_all(ifp); 969 error = vlan_config_multi(ifv); 970 ifnet_serialize_all(ifp); 971 break; 972 973 default: 974 error = ether_ioctl(ifp, cmd, data); 975 break; 976 } 977 return error; 978 } 979 980 static void 981 vlan_multi_dispatch(struct netmsg *nmsg) 982 { 983 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 984 struct ifvlan *ifv = vmsg->nv_ifv; 985 int error = 0; 986 987 /* 988 * If we don't have a parent, just remember the membership for 989 * when we do. 990 */ 991 if (ifv->ifv_p != NULL) 992 error = vlan_setmulti(ifv, ifv->ifv_p); 993 lwkt_replymsg(&nmsg->nm_lmsg, error); 994 } 995 996 static int 997 vlan_config_multi(struct ifvlan *ifv) 998 { 999 struct netmsg_vlan vmsg; 1000 struct netmsg *nmsg; 1001 1002 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 1003 1004 bzero(&vmsg, sizeof(vmsg)); 1005 nmsg = &vmsg.nv_nmsg; 1006 1007 netmsg_init(nmsg, NULL, &curthread->td_msgport, 1008 0, vlan_multi_dispatch); 1009 vmsg.nv_ifv = ifv; 1010 1011 return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0); 1012 } 1013 1014 static void 1015 vlan_flags_dispatch(struct netmsg *nmsg) 1016 { 1017 struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg; 1018 struct ifvlan *ifv = vmsg->nv_ifv; 1019 int error = 0; 1020 1021 /* 1022 * If we don't have a parent, just remember the flags for 1023 * when we do. 1024 */ 1025 if (ifv->ifv_p != NULL) 1026 error = vlan_setflags(ifv, ifv->ifv_p, 1); 1027 lwkt_replymsg(&nmsg->nm_lmsg, error); 1028 } 1029 1030 static int 1031 vlan_config_flags(struct ifvlan *ifv) 1032 { 1033 struct netmsg_vlan vmsg; 1034 struct netmsg *nmsg; 1035 1036 ASSERT_IFNET_NOT_SERIALIZED_ALL(&ifv->ifv_if); 1037 1038 bzero(&vmsg, sizeof(vmsg)); 1039 nmsg = &vmsg.nv_nmsg; 1040 1041 netmsg_init(nmsg, NULL, &curthread->td_msgport, 1042 0, vlan_flags_dispatch); 1043 vmsg.nv_ifv = ifv; 1044 1045 return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0); 1046 } 1047