sys/net/vlan/if_vlan.c

   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.41 2008/09/23 11:50:11 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         struct  ifv_linkmib {
  97                 int     ifvm_parent;
  98                 uint16_t ifvm_proto; /* encapsulation ethertype */
  99                 uint16_t ifvm_tag; /* tag to apply on packets leaving if */
 100         }       ifv_mib;
 101         SLIST_HEAD(, vlan_mc_entry) vlan_mc_listhead;
 102         LIST_ENTRY(ifvlan) ifv_list;
 103         struct vlan_entry ifv_entries[1];
 104 };
 105 #define ifv_if  ifv_ac.ac_if
 106 #define ifv_tag ifv_mib.ifvm_tag
 107
 108 struct vlan_trunk {
 109         LIST_HEAD(, vlan_entry) vlan_list;
 110 };
 111
 112 struct netmsg_vlan {
 113         struct netmsg   nv_nmsg;
 114         struct ifvlan   *nv_ifv;
 115         struct ifnet    *nv_ifp_p;
 116         const char      *nv_parent_name;
 117         uint16_t        nv_vlantag;
 118 };
 119
 120 #define VLANNAME        "vlan"
 121
 122 SYSCTL_DECL(_net_link);
 123 SYSCTL_NODE(_net_link, IFT_L2VLAN, vlan, CTLFLAG_RW, 0, "IEEE 802.1Q VLAN");
 124 SYSCTL_NODE(_net_link_vlan, PF_LINK, link, CTLFLAG_RW, 0, "for consistency");
 125
 126 static MALLOC_DEFINE(M_VLAN, "vlan", "802.1Q Virtual LAN Interface");
 127 static LIST_HEAD(, ifvlan) ifv_list;
 128
 129 static int      vlan_clone_create(struct if_clone *, int);
 130 static void     vlan_clone_destroy(struct ifnet *);
 131 static void     vlan_ifdetach(void *, struct ifnet *);
 132
 133 static void     vlan_init(void *);
 134 static void     vlan_start(struct ifnet *);
 135 static int      vlan_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *);
 136 static void     vlan_input(struct mbuf *);
 137
 138 static void     vlan_clrmulti(struct ifvlan *, struct ifnet *);
 139 static int      vlan_setmulti(struct ifvlan *, struct ifnet *);
 140 static int      vlan_config_multi(struct ifvlan *);
 141 static int      vlan_config(struct ifvlan *, const char *, uint16_t);
 142 static int      vlan_unconfig(struct ifvlan *);
 143 static void     vlan_link(struct ifvlan *, struct ifnet *);
 144 static void     vlan_unlink(struct ifvlan *, struct ifnet *);
 145
 146 static void     vlan_config_dispatch(struct netmsg *);
 147 static void     vlan_unconfig_dispatch(struct netmsg *);
 148 static void     vlan_link_dispatch(struct netmsg *);
 149 static void     vlan_unlink_dispatch(struct netmsg *);
 150 static void     vlan_multi_dispatch(struct netmsg *);
 151 static void     vlan_ifdetach_dispatch(struct netmsg *);
 152
 153 static eventhandler_tag vlan_ifdetach_cookie;
 154 static struct if_clone vlan_cloner =
 155         IF_CLONE_INITIALIZER("vlan", vlan_clone_create, vlan_clone_destroy,
 156                              NVLAN, IF_MAXUNIT);
 157
 158 /*
 159  * Program our multicast filter. What we're actually doing is
 160  * programming the multicast filter of the parent. This has the
 161  * side effect of causing the parent interface to receive multicast
 162  * traffic that it doesn't really want, which ends up being discarded
 163  * later by the upper protocol layers. Unfortunately, there's no way
 164  * to avoid this: there really is only one physical interface.
 165  */
 166 static int
 167 vlan_setmulti(struct ifvlan *ifv, struct ifnet *ifp_p)
 168 {
 169         struct ifmultiaddr *ifma, *rifma = NULL;
 170         struct vlan_mc_entry *mc = NULL;
 171         struct sockaddr_dl sdl;
 172         struct ifnet *ifp = &ifv->ifv_if;
 173
 174         ASSERT_NOT_SERIALIZED(ifp->if_serializer);
 175
 176         /*
 177          * First, remove any existing filter entries.
 178          */
 179         vlan_clrmulti(ifv, ifp_p);
 180
 181         /*
 182          * Now program new ones.
 183          */
 184         bzero(&sdl, sizeof(sdl));
 185         sdl.sdl_len = sizeof(sdl);
 186         sdl.sdl_family = AF_LINK;
 187         sdl.sdl_index = ifp_p->if_index;
 188         sdl.sdl_type = IFT_ETHER;
 189         sdl.sdl_alen = ETHER_ADDR_LEN;
 190
 191         LIST_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
 192                 int error;
 193
 194                 if (ifma->ifma_addr->sa_family != AF_LINK)
 195                         continue;
 196
 197                 /* Save a copy */
 198                 mc = kmalloc(sizeof(struct vlan_mc_entry), M_VLAN, M_WAITOK);
 199                 bcopy(LLADDR((struct sockaddr_dl *)ifma->ifma_addr),
 200                       &mc->mc_addr, ETHER_ADDR_LEN);
 201                 SLIST_INSERT_HEAD(&ifv->vlan_mc_listhead, mc, mc_entries);
 202
 203                 /* Program the parent multicast filter */
 204                 bcopy(LLADDR((struct sockaddr_dl *)ifma->ifma_addr),
 205                       LLADDR(&sdl), ETHER_ADDR_LEN);
 206                 error = if_addmulti(ifp_p, (struct sockaddr *)&sdl, &rifma);
 207                 if (error)
 208                         return error;
 209         }
 210         return 0;
 211 }
 212
 213 static void
 214 vlan_clrmulti(struct ifvlan *ifv, struct ifnet *ifp_p)
 215 {
 216         struct vlan_mc_entry *mc;
 217         struct sockaddr_dl sdl;
 218
 219         ASSERT_NOT_SERIALIZED(ifv->ifv_if.if_serializer);
 220
 221         bzero(&sdl, sizeof(sdl));
 222         sdl.sdl_len = sizeof(sdl);
 223         sdl.sdl_family = AF_LINK;
 224         sdl.sdl_index = ifp_p->if_index;
 225         sdl.sdl_type = IFT_ETHER;
 226         sdl.sdl_alen = ETHER_ADDR_LEN;
 227
 228         while ((mc = SLIST_FIRST(&ifv->vlan_mc_listhead)) != NULL) {
 229                 bcopy(&mc->mc_addr, LLADDR(&sdl), ETHER_ADDR_LEN);
 230                 if_delmulti(ifp_p, (struct sockaddr *)&sdl); /* ignore error */
 231
 232                 SLIST_REMOVE_HEAD(&ifv->vlan_mc_listhead, mc_entries);
 233                 kfree(mc, M_VLAN);
 234         }
 235 }
 236
 237 static int
 238 vlan_modevent(module_t mod, int type, void *data)
 239 {
 240         switch (type) {
 241         case MOD_LOAD:
 242                 LIST_INIT(&ifv_list);
 243                 vlan_input_p = vlan_input;
 244                 vlan_ifdetach_cookie =
 245                 EVENTHANDLER_REGISTER(ifnet_detach_event,
 246                                       vlan_ifdetach, NULL,
 247                                       EVENTHANDLER_PRI_ANY);
 248                 if_clone_attach(&vlan_cloner);
 249                 break;
 250
 251         case MOD_UNLOAD:
 252                 if_clone_detach(&vlan_cloner);
 253
 254                 vlan_input_p = NULL;
 255                 /*
 256                  * Make that all protocol threads see vlan_input_p change.
 257                  */
 258                 netmsg_service_sync();
 259
 260                 EVENTHANDLER_DEREGISTER(ifnet_detach_event,
 261                                         vlan_ifdetach_cookie);
 262                 while (!LIST_EMPTY(&ifv_list))
 263                         vlan_clone_destroy(&LIST_FIRST(&ifv_list)->ifv_if);
 264                 break;
 265         }
 266         return 0;
 267 }
 268
 269 static moduledata_t vlan_mod = {
 270         "if_vlan",
 271         vlan_modevent,
 272         0
 273 };
 274
 275 DECLARE_MODULE(if_vlan, vlan_mod, SI_SUB_PSEUDO, SI_ORDER_ANY);
 276
 277 static void
 278 vlan_ifdetach_dispatch(struct netmsg *nmsg)
 279 {
 280         struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg;
 281         struct ifnet *ifp_p = vmsg->nv_ifp_p;
 282         struct vlan_trunk *vlantrunks, *trunk;
 283         struct vlan_entry *ifve;
 284
 285         vlantrunks = ifp_p->if_vlantrunks;
 286         if (vlantrunks == NULL)
 287                 goto reply;
 288         trunk = &vlantrunks[mycpuid];
 289
 290         while (ifp_p->if_vlantrunks &&
 291                (ifve = LIST_FIRST(&trunk->vlan_list)) != NULL)
 292                 vlan_unconfig(ifve->ifv);
 293 reply:
 294         lwkt_replymsg(&nmsg->nm_lmsg, 0);
 295 }
 296
 297 static void
 298 vlan_ifdetach(void *arg __unused, struct ifnet *ifp)
 299 {
 300         struct netmsg_vlan vmsg;
 301         struct netmsg *nmsg;
 302
 303         ASSERT_NOT_SERIALIZED(ifp->if_serializer);
 304
 305         bzero(&vmsg, sizeof(vmsg));
 306         nmsg = &vmsg.nv_nmsg;
 307
 308         netmsg_init(nmsg, &curthread->td_msgport, 0, vlan_ifdetach_dispatch);
 309         vmsg.nv_ifp_p = ifp;
 310
 311         lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0);
 312 }
 313
 314 static int
 315 vlan_clone_create(struct if_clone *ifc, int unit)
 316 {
 317         struct ifvlan *ifv;
 318         struct ifnet *ifp;
 319         int vlan_size, i;
 320
 321         vlan_size = sizeof(struct ifvlan)
 322                   + ((ncpus - 1) * sizeof(struct vlan_entry));
 323         ifv = kmalloc(vlan_size, M_VLAN, M_WAITOK | M_ZERO);
 324         SLIST_INIT(&ifv->vlan_mc_listhead);
 325         for (i = 0; i < ncpus; ++i)
 326                 ifv->ifv_entries[i].ifv = ifv;
 327
 328         crit_enter();   /* XXX not MP safe */
 329         LIST_INSERT_HEAD(&ifv_list, ifv, ifv_list);
 330         crit_exit();
 331
 332         ifp = &ifv->ifv_if;
 333         ifp->if_softc = ifv;
 334         if_initname(ifp, "vlan", unit);
 335         /* NB: flags are not set here */
 336         ifp->if_linkmib = &ifv->ifv_mib;
 337         ifp->if_linkmiblen = sizeof ifv->ifv_mib;
 338         /* NB: mtu is not set here */
 339
 340         ifp->if_init = vlan_init;
 341         ifp->if_start = vlan_start;
 342         ifp->if_ioctl = vlan_ioctl;
 343         ifq_set_maxlen(&ifp->if_snd, ifqmaxlen);
 344         ifq_set_ready(&ifp->if_snd);
 345         ether_ifattach(ifp, ifv->ifv_ac.ac_enaddr, NULL);
 346         /* Now undo some of the damage... */
 347         ifp->if_data.ifi_type = IFT_L2VLAN;
 348         ifp->if_data.ifi_hdrlen = EVL_ENCAPLEN;
 349
 350         return (0);
 351 }
 352
 353 static void
 354 vlan_clone_destroy(struct ifnet *ifp)
 355 {
 356         struct ifvlan *ifv = ifp->if_softc;
 357
 358         crit_enter();   /* XXX not MP safe */
 359         LIST_REMOVE(ifv, ifv_list);
 360         crit_exit();
 361
 362         vlan_unconfig(ifv);
 363         ether_ifdetach(ifp);
 364
 365         kfree(ifv, M_VLAN);
 366 }
 367
 368 static void
 369 vlan_init(void *xsc)
 370 {
 371         struct ifvlan *ifv = xsc;
 372         struct ifnet *ifp = &ifv->ifv_if;
 373
 374         ASSERT_SERIALIZED(ifp->if_serializer);
 375
 376         if (ifv->ifv_p != NULL)
 377                 ifp->if_flags |= IFF_RUNNING;
 378 }
 379
 380 static void
 381 vlan_start(struct ifnet *ifp)
 382 {
 383         struct ifvlan *ifv = ifp->if_softc;
 384         struct ifnet *ifp_p = ifv->ifv_p;
 385         struct mbuf *m;
 386
 387         ASSERT_SERIALIZED(ifp->if_serializer);
 388
 389         if (ifp_p == NULL) {
 390                 ifq_purge(&ifp->if_snd);
 391                 return;
 392         }
 393
 394         if ((ifp->if_flags & IFF_RUNNING) == 0)
 395                 return;
 396
 397         for (;;) {
 398                 struct netmsg_packet *nmp;
 399                 struct netmsg *nmsg;
 400                 struct lwkt_port *port;
 401
 402                 m = ifq_dequeue(&ifp->if_snd, NULL);
 403                 if (m == NULL)
 404                         break;
 405                 BPF_MTAP(ifp, m);
 406
 407                 /*
 408                  * Do not run parent's if_start() if the parent is not up,
 409                  * or parent's driver will cause a system crash.
 410                  */
 411                 if ((ifp_p->if_flags & (IFF_UP | IFF_RUNNING)) !=
 412                     (IFF_UP | IFF_RUNNING)) {
 413                         m_freem(m);
 414                         ifp->if_data.ifi_collisions++;
 415                         continue;
 416                 }
 417
 418                 /*
 419                  * We need some way to tell the interface where the packet
 420                  * came from so that it knows how to find the VLAN tag to
 421                  * use, so we set the ether_vlantag in the mbuf packet header
 422                  * to our vlan tag.  We also set the M_VLANTAG flag in the
 423                  * mbuf to let the parent driver know that the ether_vlantag
 424                  * is really valid.
 425                  */
 426                 m->m_pkthdr.ether_vlantag = ifv->ifv_tag;
 427                 m->m_flags |= M_VLANTAG;
 428
 429                 nmp = &m->m_hdr.mh_netmsg;
 430                 nmsg = &nmp->nm_netmsg;
 431
 432                 netmsg_init(nmsg, &netisr_apanic_rport, 0, vlan_start_dispatch);
 433                 nmp->nm_packet = m;
 434                 nmsg->nm_lmsg.u.ms_resultp = ifp_p;
 435
 436                 port = cpu_portfn(ifp_p->if_index % ncpus /* XXX */);
 437                 lwkt_sendmsg(port, &nmp->nm_netmsg.nm_lmsg);
 438                 ifp->if_opackets++;
 439         }
 440 }
 441
 442 static void
 443 vlan_input(struct mbuf *m)
 444 {
 445         struct ifvlan *ifv = NULL;
 446         struct ifnet *rcvif, *ifp;
 447         struct vlan_trunk *vlantrunks;
 448         struct vlan_entry *entry;
 449
 450         rcvif = m->m_pkthdr.rcvif;
 451         KKASSERT(m->m_flags & M_VLANTAG);
 452
 453         vlantrunks = rcvif->if_vlantrunks;
 454         if (vlantrunks == NULL) {
 455                 rcvif->if_noproto++;
 456                 m_freem(m);
 457                 return;
 458         }
 459
 460         crit_enter();   /* XXX Necessary? */
 461         LIST_FOREACH(entry, &vlantrunks[mycpuid].vlan_list, ifv_link) {
 462                 if (entry->ifv->ifv_tag ==
 463                     EVL_VLANOFTAG(m->m_pkthdr.ether_vlantag)) {
 464                         ifv = entry->ifv;
 465                         break;
 466                 }
 467         }
 468         crit_exit();
 469
 470         /*
 471          * Packet is discarded if:
 472          * - no corresponding vlan(4) interface
 473          * - vlan(4) interface has not been completely set up yet,
 474          *   or is being destroyed (ifv->ifv_p != rcvif)
 475          * - vlan(4) interface is not brought up
 476          */
 477         if (ifv == NULL || ifv->ifv_p != rcvif ||
 478             (ifv->ifv_if.if_flags & IFF_UP) == 0) {
 479                 rcvif->if_noproto++;
 480                 m_freem(m);
 481                 return;
 482         }
 483         ifp = &ifv->ifv_if;
 484
 485         /*
 486          * Clear M_VLANTAG, before the packet is handed to
 487          * vlan(4) interface
 488          */
 489         m->m_flags &= ~M_VLANTAG;
 490
 491         /* Change receiving interface */
 492         m->m_pkthdr.rcvif = ifp;
 493
 494         /* Update statistics */
 495         ifp->if_ipackets++;
 496         ifp->if_ibytes += m->m_pkthdr.len;
 497         if (m->m_flags & (M_MCAST | M_BCAST))
 498                 ifp->if_imcasts++;
 499
 500         BPF_MTAP(ifp, m);
 501
 502         if (ifp->if_flags & IFF_MONITOR) {
 503                 /*
 504                  * Interface marked for monitoring; discard packet.
 505                  */
 506                 m_freem(m);
 507                 return;
 508         }
 509         ether_input_oncpu(ifp, m);
 510 }
 511
 512 static void
 513 vlan_link_dispatch(struct netmsg *nmsg)
 514 {
 515         struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg;
 516         struct ifvlan *ifv = vmsg->nv_ifv;
 517         struct ifnet *ifp_p = vmsg->nv_ifp_p;
 518         struct vlan_entry *entry;
 519         struct vlan_trunk *vlantrunks, *trunk;
 520         int cpu = mycpuid;
 521
 522         vlantrunks = ifp_p->if_vlantrunks;
 523         KASSERT(vlantrunks != NULL,
 524                 ("vlan trunk has not been initialized yet\n"));
 525
 526         entry = &ifv->ifv_entries[cpu];
 527         trunk = &vlantrunks[cpu];
 528
 529         crit_enter();
 530         LIST_INSERT_HEAD(&trunk->vlan_list, entry, ifv_link);
 531         crit_exit();
 532
 533         ifnet_forwardmsg(&nmsg->nm_lmsg, cpu + 1);
 534 }
 535
 536 static void
 537 vlan_link(struct ifvlan *ifv, struct ifnet *ifp_p)
 538 {
 539         struct netmsg_vlan vmsg;
 540         struct netmsg *nmsg;
 541
 542         /* Assert in netisr0 */
 543         ASSERT_NOT_SERIALIZED(ifv->ifv_if.if_serializer);
 544
 545         if (ifp_p->if_vlantrunks == NULL) {
 546                 struct vlan_trunk *vlantrunks;
 547                 int i;
 548
 549                 vlantrunks = kmalloc(sizeof(*vlantrunks) * ncpus, M_VLAN,
 550                                      M_WAITOK | M_ZERO);
 551                 for (i = 0; i < ncpus; ++i)
 552                         LIST_INIT(&vlantrunks[i].vlan_list);
 553
 554                 ifp_p->if_vlantrunks = vlantrunks;
 555         }
 556
 557         bzero(&vmsg, sizeof(vmsg));
 558         nmsg = &vmsg.nv_nmsg;
 559
 560         netmsg_init(nmsg, &curthread->td_msgport, 0, vlan_link_dispatch);
 561         vmsg.nv_ifv = ifv;
 562         vmsg.nv_ifp_p = ifp_p;
 563
 564         ifnet_domsg(&nmsg->nm_lmsg, 0);
 565 }
 566
 567 static void
 568 vlan_config_dispatch(struct netmsg *nmsg)
 569 {
 570         struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg;
 571         struct ifvlan *ifv;
 572         struct ifnet *ifp_p, *ifp;
 573         struct sockaddr_dl *sdl1, *sdl2;
 574         int error;
 575
 576         /* Assert in netisr0 */
 577
 578         ifp_p = ifunit(vmsg->nv_parent_name);
 579         if (ifp_p == NULL) {
 580                 error = ENOENT;
 581                 goto reply;
 582         }
 583
 584         if (ifp_p->if_data.ifi_type != IFT_ETHER) {
 585                 error = EPROTONOSUPPORT;
 586                 goto reply;
 587         }
 588
 589         ifv = vmsg->nv_ifv;
 590         ifp = &ifv->ifv_if;
 591
 592         if (ifv->ifv_p) {
 593                 error = EBUSY;
 594                 goto reply;
 595         }
 596
 597         /* Link vlan into parent's vlantrunk */
 598         vlan_link(ifv, ifp_p);
 599
 600         lwkt_serialize_enter(ifp->if_serializer);
 601
 602         ifv->ifv_tag = vmsg->nv_vlantag;
 603         if (ifp_p->if_capenable & IFCAP_VLAN_MTU)
 604                 ifp->if_mtu = ifp_p->if_mtu;
 605         else
 606                 ifp->if_mtu = ifp_p->if_data.ifi_mtu - EVL_ENCAPLEN;
 607
 608         /*
 609          * Copy only a selected subset of flags from the parent.
 610          * Other flags are none of our business.
 611          */
 612         ifp->if_flags = (ifp_p->if_flags &
 613             (IFF_BROADCAST | IFF_MULTICAST | IFF_SIMPLEX | IFF_POINTOPOINT));
 614
 615         /*
 616          * Set up our ``Ethernet address'' to reflect the underlying
 617          * physical interface's.
 618          */
 619         sdl1 = IF_LLSOCKADDR(ifp);
 620         sdl2 = IF_LLSOCKADDR(ifp_p);
 621         sdl1->sdl_type = IFT_ETHER;
 622         sdl1->sdl_alen = ETHER_ADDR_LEN;
 623         bcopy(LLADDR(sdl2), LLADDR(sdl1), ETHER_ADDR_LEN);
 624         bcopy(LLADDR(sdl2), ifv->ifv_ac.ac_enaddr, ETHER_ADDR_LEN);
 625
 626         /*
 627          * Release vlan's serializer before reprogramming parent's
 628          * multicast filter to avoid possible dead lock.
 629          */
 630         lwkt_serialize_exit(ifp->if_serializer);
 631
 632         /*
 633          * Configure multicast addresses that may already be
 634          * joined on the vlan device.
 635          */
 636         vlan_setmulti(ifv, ifp_p);
 637
 638         /*
 639          * Connect to parent after everything have been set up,
 640          * so input/output could know that vlan is ready to go
 641          */
 642         ifv->ifv_p = ifp_p;
 643         error = 0;
 644 reply:
 645         lwkt_replymsg(&nmsg->nm_lmsg, error);
 646 }
 647
 648 static int
 649 vlan_config(struct ifvlan *ifv, const char *parent_name, uint16_t vlantag)
 650 {
 651         struct netmsg_vlan vmsg;
 652         struct netmsg *nmsg;
 653
 654         ASSERT_NOT_SERIALIZED(ifv->ifv_if.if_serializer);
 655
 656         bzero(&vmsg, sizeof(vmsg));
 657         nmsg = &vmsg.nv_nmsg;
 658
 659         netmsg_init(nmsg, &curthread->td_msgport, 0, vlan_config_dispatch);
 660         vmsg.nv_ifv = ifv;
 661         vmsg.nv_parent_name = parent_name;
 662         vmsg.nv_vlantag = vlantag;
 663
 664         return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0);
 665 }
 666
 667 static void
 668 vlan_unlink_dispatch(struct netmsg *nmsg)
 669 {
 670         struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg;
 671         struct ifvlan *ifv = vmsg->nv_ifv;
 672         struct vlan_entry *entry;
 673         int cpu = mycpuid;
 674
 675         KASSERT(vmsg->nv_ifp_p->if_vlantrunks != NULL,
 676                 ("vlan trunk has not been initialized yet\n"));
 677         entry = &ifv->ifv_entries[cpu];
 678
 679         crit_enter();
 680         LIST_REMOVE(entry, ifv_link);
 681         crit_exit();
 682
 683         ifnet_forwardmsg(&nmsg->nm_lmsg, cpu + 1);
 684 }
 685
 686 static void
 687 vlan_unlink(struct ifvlan *ifv, struct ifnet *ifp_p)
 688 {
 689         struct vlan_trunk *vlantrunks = ifp_p->if_vlantrunks;
 690         struct netmsg_vlan vmsg;
 691         struct netmsg *nmsg;
 692
 693         /* Assert in netisr0 */
 694         ASSERT_NOT_SERIALIZED(ifv->ifv_if.if_serializer);
 695
 696         KASSERT(ifp_p->if_vlantrunks != NULL,
 697                 ("vlan trunk has not been initialized yet\n"));
 698
 699         bzero(&vmsg, sizeof(vmsg));
 700         nmsg = &vmsg.nv_nmsg;
 701
 702         netmsg_init(nmsg, &curthread->td_msgport, 0, vlan_unlink_dispatch);
 703         vmsg.nv_ifv = ifv;
 704         vmsg.nv_ifp_p = ifp_p;
 705
 706         ifnet_domsg(&nmsg->nm_lmsg, 0);
 707
 708         crit_enter();
 709         if (LIST_EMPTY(&vlantrunks[mycpuid].vlan_list)) {
 710                 ifp_p->if_vlantrunks = NULL;
 711
 712                 /*
 713                  * Make that all protocol threads see if_vlantrunks change.
 714                  */
 715                 netmsg_service_sync();
 716                 kfree(vlantrunks, M_VLAN);
 717         }
 718         crit_exit();
 719 }
 720
 721 static void
 722 vlan_unconfig_dispatch(struct netmsg *nmsg)
 723 {
 724         struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg;
 725         struct sockaddr_dl *sdl;
 726         struct ifvlan *ifv;
 727         struct ifnet *ifp_p, *ifp;
 728         int error;
 729
 730         /* Assert in netisr0 */
 731
 732         ifv = vmsg->nv_ifv;
 733         ifp = &ifv->ifv_if;
 734
 735         if (ifp->if_flags & IFF_UP)
 736                 if_down(ifp);
 737
 738         lwkt_serialize_enter(ifp->if_serializer);
 739
 740         ifp->if_flags &= ~IFF_RUNNING;
 741
 742         /*
 743          * Save parent ifnet pointer and disconnect from parent.
 744          *
 745          * This is done early in this function, so input/output could
 746          * know that we are disconnecting.
 747          */
 748         ifp_p = ifv->ifv_p;
 749         ifv->ifv_p = NULL;
 750
 751         /*
 752          * Release vlan's serializer before reprogramming parent's
 753          * multicast filter to avoid possible dead lock.
 754          */
 755         lwkt_serialize_exit(ifp->if_serializer);
 756
 757         if (ifp_p) {
 758                 /*
 759                  * Since the interface is being unconfigured, we need to
 760                  * empty the list of multicast groups that we may have joined
 761                  * while we were alive from the parent's list.
 762                  */
 763                 vlan_clrmulti(ifv, ifp_p);
 764         }
 765
 766         lwkt_serialize_enter(ifp->if_serializer);
 767
 768         ifp->if_mtu = ETHERMTU;
 769
 770         /* Clear our MAC address. */
 771         sdl = IF_LLSOCKADDR(ifp);
 772         sdl->sdl_type = IFT_ETHER;
 773         sdl->sdl_alen = ETHER_ADDR_LEN;
 774         bzero(LLADDR(sdl), ETHER_ADDR_LEN);
 775         bzero(ifv->ifv_ac.ac_enaddr, ETHER_ADDR_LEN);
 776
 777         lwkt_serialize_exit(ifp->if_serializer);
 778
 779         /* Unlink vlan from parent's vlantrunk */
 780         if (ifp_p != NULL && ifp_p->if_vlantrunks != NULL)
 781                 vlan_unlink(ifv, ifp_p);
 782
 783         error = 0;
 784         lwkt_replymsg(&nmsg->nm_lmsg, error);
 785 }
 786
 787 static int
 788 vlan_unconfig(struct ifvlan *ifv)
 789 {
 790         struct netmsg_vlan vmsg;
 791         struct netmsg *nmsg;
 792
 793         ASSERT_NOT_SERIALIZED(ifv->ifv_if.if_serializer);
 794
 795         bzero(&vmsg, sizeof(vmsg));
 796         nmsg = &vmsg.nv_nmsg;
 797
 798         netmsg_init(nmsg, &curthread->td_msgport, 0, vlan_unconfig_dispatch);
 799         vmsg.nv_ifv = ifv;
 800
 801         return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0);
 802 }
 803
 804 static int
 805 vlan_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data, struct ucred *cr)
 806 {
 807         struct ifvlan *ifv = ifp->if_softc;
 808         struct ifreq *ifr = (struct ifreq *)data;
 809         struct ifnet *ifp_p;
 810         struct vlanreq vlr;
 811         int error = 0;
 812
 813         ASSERT_SERIALIZED(ifp->if_serializer);
 814
 815         switch (cmd) {
 816         case SIOCGIFMEDIA:
 817                 ifp_p = ifv->ifv_p;
 818                 if (ifp_p != NULL) {
 819                         /*
 820                          * Release vlan interface's serializer to void
 821                          * possible dead lock.
 822                          */
 823                         lwkt_serialize_exit(ifp->if_serializer);
 824
 825                         lwkt_serialize_enter(ifp_p->if_serializer);
 826                         error = ifp_p->if_ioctl(ifp_p, SIOCGIFMEDIA, data, cr);
 827                         lwkt_serialize_exit(ifp_p->if_serializer);
 828
 829                         lwkt_serialize_enter(ifp->if_serializer);
 830
 831                         if (ifv->ifv_p == NULL && ifv->ifv_p != ifp_p) {
 832                                 /*
 833                                  * We are disconnected from the original
 834                                  * parent interface or the parent interface
 835                                  * is changed, after vlan interface's
 836                                  * serializer is released.
 837                                  */
 838                                 error = EINVAL;
 839                         }
 840
 841                         /* Limit the result to the parent's current config. */
 842                         if (error == 0) {
 843                                 struct ifmediareq *ifmr;
 844
 845                                 ifmr = (struct ifmediareq *) data;
 846                                 if (ifmr->ifm_count >= 1 && ifmr->ifm_ulist) {
 847                                         ifmr->ifm_count = 1;
 848                                         error = copyout(&ifmr->ifm_current,
 849                                                 ifmr->ifm_ulist,
 850                                                 sizeof(int));
 851                                 }
 852                         }
 853                 } else {
 854                         error = EINVAL;
 855                 }
 856                 break;
 857
 858         case SIOCSIFMEDIA:
 859                 error = EINVAL;
 860                 break;
 861
 862         case SIOCSETVLAN:
 863                 error = copyin(ifr->ifr_data, &vlr, sizeof vlr);
 864                 if (error)
 865                         break;
 866
 867                 lwkt_serialize_exit(ifp->if_serializer);
 868                 if (vlr.vlr_parent[0] == '\0')
 869                         error = vlan_unconfig(ifv);
 870                 else
 871                         error = vlan_config(ifv, vlr.vlr_parent, vlr.vlr_tag);
 872                 lwkt_serialize_enter(ifp->if_serializer);
 873                 break;
 874
 875         case SIOCGETVLAN:
 876                 bzero(&vlr, sizeof(vlr));
 877                 if (ifv->ifv_p) {
 878                         strlcpy(vlr.vlr_parent, ifv->ifv_p->if_xname,
 879                             sizeof(vlr.vlr_parent));
 880                         vlr.vlr_tag = ifv->ifv_tag;
 881                 }
 882                 error = copyout(&vlr, ifr->ifr_data, sizeof vlr);
 883                 break;
 884
 885         case SIOCSIFFLAGS:
 886                 if (ifp->if_flags & IFF_UP)
 887                         ifp->if_init(ifp);
 888                 else
 889                         ifp->if_flags &= ~IFF_RUNNING;
 890
 891                 /*
 892                  * We don't support promiscuous mode
 893                  * right now because it would require help from the
 894                  * underlying drivers, which hasn't been implemented.
 895                  */
 896                 if (ifr->ifr_flags & IFF_PROMISC) {
 897                         ifp->if_flags &= ~IFF_PROMISC;
 898                         error = EINVAL;
 899                 }
 900                 break;
 901
 902         case SIOCADDMULTI:
 903         case SIOCDELMULTI:
 904                 lwkt_serialize_exit(ifp->if_serializer);
 905                 error = vlan_config_multi(ifv);
 906                 lwkt_serialize_enter(ifp->if_serializer);
 907                 break;
 908
 909         default:
 910                 error = ether_ioctl(ifp, cmd, data);
 911                 break;
 912         }
 913         return error;
 914 }
 915
 916 static void
 917 vlan_multi_dispatch(struct netmsg *nmsg)
 918 {
 919         struct netmsg_vlan *vmsg = (struct netmsg_vlan *)nmsg;
 920         struct ifvlan *ifv = vmsg->nv_ifv;
 921         int error = 0;
 922
 923         /*
 924          * If we don't have a parent, just remember the membership for
 925          * when we do.
 926          */
 927         if (ifv->ifv_p != NULL)
 928                 error = vlan_setmulti(ifv, ifv->ifv_p);
 929         lwkt_replymsg(&nmsg->nm_lmsg, error);
 930 }
 931
 932 static int
 933 vlan_config_multi(struct ifvlan *ifv)
 934 {
 935         struct netmsg_vlan vmsg;
 936         struct netmsg *nmsg;
 937
 938         ASSERT_NOT_SERIALIZED(ifv->ifv_if.if_serializer);
 939
 940         bzero(&vmsg, sizeof(vmsg));
 941         nmsg = &vmsg.nv_nmsg;
 942
 943         netmsg_init(nmsg, &curthread->td_msgport, 0, vlan_multi_dispatch);
 944         vmsg.nv_ifv = ifv;
 945
 946         return lwkt_domsg(cpu_portfn(0), &nmsg->nm_lmsg, 0);
 947 }