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