bsd/net/ether_inet6_pr_module.c

   1 /*
   2  * Copyright (c) 2000-2013 Apple Inc. All rights reserved.
   3  *
   4  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. The rights granted to you under the License
  10  * may not be used to create, or enable the creation or redistribution of,
  11  * unlawful or unlicensed copies of an Apple operating system, or to
  12  * circumvent, violate, or enable the circumvention or violation of, any
  13  * terms of an Apple operating system software license agreement.
  14  *
  15  * Please obtain a copy of the License at
  16  * http://www.opensource.apple.com/apsl/ and read it before using this file.
  17  *
  18  * The Original Code and all software distributed under the License are
  19  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  20  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  21  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  22  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  23  * Please see the License for the specific language governing rights and
  24  * limitations under the License.
  25  *
  26  * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  27  */
  28 /*
  29  * Copyright (c) 1982, 1989, 1993
  30  *      The Regents of the University of California.  All rights reserved.
  31  *
  32  * Redistribution and use in source and binary forms, with or without
  33  * modification, are permitted provided that the following conditions
  34  * are met:
  35  * 1. Redistributions of source code must retain the above copyright
  36  *    notice, this list of conditions and the following disclaimer.
  37  * 2. Redistributions in binary form must reproduce the above copyright
  38  *    notice, this list of conditions and the following disclaimer in the
  39  *    documentation and/or other materials provided with the distribution.
  40  * 3. All advertising materials mentioning features or use of this software
  41  *    must display the following acknowledgement:
  42  *      This product includes software developed by the University of
  43  *      California, Berkeley and its contributors.
  44  * 4. Neither the name of the University nor the names of its contributors
  45  *    may be used to endorse or promote products derived from this software
  46  *    without specific prior written permission.
  47  *
  48  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  49  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  50  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  51  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  52  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  53  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  54  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  55  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  56  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  57  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  58  * SUCH DAMAGE.
  59  *
  60  */
  61
  62 #include <sys/param.h>
  63 #include <sys/systm.h>
  64 #include <sys/kernel.h>
  65 #include <sys/malloc.h>
  66 #include <sys/mbuf.h>
  67 #include <sys/socket.h>
  68 #include <sys/sockio.h>
  69 #include <sys/sysctl.h>
  70 #include <sys/socketvar.h>
  71
  72 #include <net/dlil.h>
  73 #include <net/if.h>
  74 #include <net/route.h>
  75 #include <net/if_llc.h>
  76 #include <net/if_dl.h>
  77 #include <net/if_types.h>
  78 #include <net/ndrv.h>
  79 #include <net/kpi_protocol.h>
  80 #include <net/dlil.h>
  81
  82 #include <netinet/in.h>
  83 #include <netinet/in_var.h>
  84 #include <netinet/if_ether.h>
  85 #include <netinet/in_systm.h>
  86 #include <netinet/ip.h>
  87
  88 #include <netinet6/nd6.h>
  89 #include <netinet6/in6_ifattach.h>
  90 #include <netinet6/ip6_var.h>
  91
  92 /* #include "vlan.h" */
  93 #if NVLAN > 0
  94 #include <net/if_vlan_var.h>
  95 #endif /* NVLAN > 0 */
  96
  97 #include <net/ether_if_module.h>
  98
  99 static const u_char etherip6allnodes[ETHER_ADDR_LEN] =
 100 { 0x33, 0x33, 0, 0, 0, 1 };
 101
 102 /*
 103  * Process a received Ethernet packet;
 104  * the packet is in the mbuf chain m without
 105  * the ether header, which is provided separately.
 106  */
 107 static errno_t
 108 ether_inet6_input(ifnet_t ifp, protocol_family_t protocol,
 109     mbuf_t packet, char *header)
 110 {
 111 #pragma unused(ifp, protocol)
 112         struct ether_header *eh = (struct ether_header *)(void *)header;
 113         u_int16_t ether_type;
 114
 115         bcopy(&eh->ether_type, &ether_type, sizeof(ether_type));
 116
 117         if (ether_type == htons(ETHERTYPE_IPV6)) {
 118                 struct ifnet *mifp;
 119                 /*
 120                  * Trust the ifp in the mbuf, rather than ifproto's
 121                  * since the packet could have been injected via
 122                  * a dlil_input_packet_list() using an ifp that is
 123                  * different than the one where the packet really
 124                  * came from.
 125                  */
 126                 mifp = mbuf_pkthdr_rcvif(packet);
 127
 128                 /* Update L2 reachability record, if present (and not bcast) */
 129                 if (bcmp(eh->ether_shost, etherbroadcastaddr,
 130                     ETHER_ADDR_LEN) != 0) {
 131                         nd6_llreach_set_reachable(mifp, eh->ether_shost,
 132                             ETHER_ADDR_LEN);
 133                 }
 134
 135                 /* Save the Ethernet source address for all-nodes multicasts */
 136                 if (!bcmp(eh->ether_dhost, etherip6allnodes, ETHER_ADDR_LEN)) {
 137                         struct ip6aux *ip6a;
 138
 139                         ip6a = ip6_addaux(packet);
 140                         if (ip6a) {
 141                                 ip6a->ip6a_flags |= IP6A_HASEEN;
 142                                 bcopy(eh->ether_shost, ip6a->ip6a_ehsrc,
 143                                     ETHER_ADDR_LEN);
 144                         }
 145                 }
 146
 147                 if (proto_input(protocol, packet) != 0) {
 148                         m_freem(packet);
 149                 }
 150         } else {
 151                 m_freem(packet);
 152         }
 153
 154         return EJUSTRETURN;
 155 }
 156
 157 static errno_t
 158 ether_inet6_pre_output(ifnet_t ifp, protocol_family_t protocol_family,
 159     mbuf_t *m0, const struct sockaddr *dst_netaddr, void *route,
 160     char *type, char *edst)
 161 {
 162 #pragma unused(protocol_family)
 163         errno_t result;
 164         struct sockaddr_dl sdl;
 165         struct mbuf *m = *m0;
 166
 167         /*
 168          * Tell ether_frameout it's ok to loop packet if necessary
 169          */
 170         m->m_flags |= M_LOOP;
 171
 172         result = nd6_lookup_ipv6(ifp, (const struct sockaddr_in6 *)
 173             (uintptr_t)(size_t)dst_netaddr, &sdl, sizeof(sdl), route, *m0);
 174
 175         if (result == 0) {
 176                 u_int16_t ethertype_ipv6 = htons(ETHERTYPE_IPV6);
 177
 178                 bcopy(&ethertype_ipv6, type, sizeof(ethertype_ipv6));
 179                 bcopy(LLADDR(&sdl), edst, sdl.sdl_alen);
 180         }
 181
 182         return result;
 183 }
 184
 185 static int
 186 ether_inet6_resolve_multi(ifnet_t ifp, const struct sockaddr *proto_addr,
 187     struct sockaddr_dl *out_ll, size_t ll_len)
 188 {
 189         static const size_t minsize =
 190             offsetof(struct sockaddr_dl, sdl_data[0]) + ETHER_ADDR_LEN;
 191         const struct sockaddr_in6 *sin6 =
 192             (const struct sockaddr_in6 *)(uintptr_t)(size_t)proto_addr;
 193
 194         if (proto_addr->sa_family != AF_INET6) {
 195                 return EAFNOSUPPORT;
 196         }
 197
 198         if (proto_addr->sa_len < sizeof(struct sockaddr_in6)) {
 199                 return EINVAL;
 200         }
 201
 202         if (ll_len < minsize) {
 203                 return EMSGSIZE;
 204         }
 205
 206         bzero(out_ll, minsize);
 207         out_ll->sdl_len = minsize;
 208         out_ll->sdl_family = AF_LINK;
 209         out_ll->sdl_index = ifp->if_index;
 210         out_ll->sdl_type = IFT_ETHER;
 211         out_ll->sdl_nlen = 0;
 212         out_ll->sdl_alen = ETHER_ADDR_LEN;
 213         out_ll->sdl_slen = 0;
 214         ETHER_MAP_IPV6_MULTICAST(&sin6->sin6_addr, LLADDR(out_ll));
 215
 216         return 0;
 217 }
 218
 219 static errno_t
 220 ether_inet6_prmod_ioctl(ifnet_t ifp, protocol_family_t protocol_family,
 221     u_long command, void *data)
 222 {
 223 #pragma unused(protocol_family)
 224         int error = 0;
 225
 226         switch (command) {
 227         case SIOCSIFADDR:               /* struct ifaddr pointer */
 228                 /*
 229                  * Note: caller of ifnet_ioctl() passes in pointer to
 230                  * struct ifaddr as parameter to SIOCSIFADDR, for legacy
 231                  * reasons.
 232                  */
 233                 if ((ifp->if_flags & IFF_RUNNING) == 0) {
 234                         ifnet_set_flags(ifp, IFF_UP, IFF_UP);
 235                         ifnet_ioctl(ifp, 0, SIOCSIFFLAGS, NULL);
 236                 }
 237                 break;
 238
 239         case SIOCGIFADDR: {             /* struct ifreq */
 240                 struct ifreq *ifr = (struct ifreq *)(void *)data;
 241                 (void) ifnet_guarded_lladdr_copy_bytes(ifp,
 242                     ifr->ifr_addr.sa_data, ETHER_ADDR_LEN);
 243                 break;
 244         }
 245
 246         default:
 247                 error = EOPNOTSUPP;
 248                 break;
 249         }
 250         return error;
 251 }
 252
 253 errno_t
 254 ether_attach_inet6(struct ifnet *ifp, protocol_family_t protocol_family)
 255 {
 256 #pragma unused(protocol_family)
 257         struct ifnet_attach_proto_param proto;
 258         struct ifnet_demux_desc demux[1];
 259         u_short en_6native = htons(ETHERTYPE_IPV6);
 260         errno_t error;
 261
 262         bzero(&proto, sizeof(proto));
 263         demux[0].type = DLIL_DESC_ETYPE2;
 264         demux[0].data = &en_6native;
 265         demux[0].datalen = sizeof(en_6native);
 266         proto.demux_list = demux;
 267         proto.demux_count = 1;
 268         proto.input = ether_inet6_input;
 269         proto.pre_output = ether_inet6_pre_output;
 270         proto.ioctl = ether_inet6_prmod_ioctl;
 271         proto.resolve = ether_inet6_resolve_multi;
 272         error = ifnet_attach_protocol(ifp, protocol_family, &proto);
 273         if (error && error != EEXIST) {
 274                 printf("WARNING: %s can't attach ipv6 to %s\n", __func__,
 275                     if_name(ifp));
 276         }
 277
 278         return error;
 279 }
 280
 281 void
 282 ether_detach_inet6(struct ifnet *ifp, protocol_family_t protocol_family)
 283 {
 284         (void) ifnet_detach_protocol(ifp, protocol_family);
 285 }