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