The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/bsd/netinet6/nd6_nbr.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*      $FreeBSD: src/sys/netinet6/nd6_nbr.c,v 1.4.2.4 2001/07/06 05:32:25 sumikawa Exp $       */
    2 /*      $KAME: nd6_nbr.c,v 1.64 2001/05/17 03:48:30 itojun Exp $        */
    3 
    4 /*
    5  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
    6  * All rights reserved.
    7  *
    8  * Redistribution and use in source and binary forms, with or without
    9  * modification, are permitted provided that the following conditions
   10  * are met:
   11  * 1. Redistributions of source code must retain the above copyright
   12  *    notice, this list of conditions and the following disclaimer.
   13  * 2. Redistributions in binary form must reproduce the above copyright
   14  *    notice, this list of conditions and the following disclaimer in the
   15  *    documentation and/or other materials provided with the distribution.
   16  * 3. Neither the name of the project nor the names of its contributors
   17  *    may be used to endorse or promote products derived from this software
   18  *    without specific prior written permission.
   19  *
   20  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
   21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
   24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   30  * SUCH DAMAGE.
   31  */
   32 
   33 #include <sys/param.h>
   34 #include <sys/systm.h>
   35 #include <sys/malloc.h>
   36 #include <sys/mbuf.h>
   37 #include <sys/socket.h>
   38 #include <sys/sockio.h>
   39 #include <sys/time.h>
   40 #include <sys/kernel.h>
   41 #include <sys/errno.h>
   42 #include <sys/syslog.h>
   43 #include <kern/queue.h>
   44 
   45 #include <net/if.h>
   46 #include <net/if_types.h>
   47 #include <net/if_dl.h>
   48 #include <net/route.h>
   49 
   50 #include <netinet/in.h>
   51 #include <netinet/in_var.h>
   52 #include <netinet6/in6_var.h>
   53 #include <netinet/ip6.h>
   54 #include <netinet6/ip6_var.h>
   55 #include <netinet6/nd6.h>
   56 #include <netinet/icmp6.h>
   57 
   58 #if IPSEC
   59 #include <netinet6/ipsec.h>
   60 #if INET6
   61 #include <netinet6/ipsec6.h>
   62 #endif
   63 extern int ipsec_bypass;
   64 #endif
   65 
   66 #include <net/net_osdep.h>
   67 
   68 #define SDL(s) ((struct sockaddr_dl *)s)
   69 
   70 struct dadq;
   71 static struct dadq *nd6_dad_find __P((struct ifaddr *));
   72 #ifndef __APPLE__
   73 static void nd6_dad_starttimer __P((struct dadq *, int));
   74 static void nd6_dad_stoptimer __P((struct dadq *));
   75 #else
   76 void nd6_dad_stoptimer __P((struct ifaddr *));
   77 #endif
   78 static void nd6_dad_timer __P((struct ifaddr *));
   79 static void nd6_dad_timer_funnel __P((struct ifaddr *));
   80 static void nd6_dad_ns_output __P((struct dadq *, struct ifaddr *));
   81 static void nd6_dad_ns_input __P((struct ifaddr *));
   82 static void nd6_dad_na_input __P((struct ifaddr *));
   83 
   84 static int dad_ignore_ns = 0;   /* ignore NS in DAD - specwise incorrect*/
   85 static int dad_maxtry = 15;     /* max # of *tries* to transmit DAD packet */
   86 
   87 /*
   88  * Input an Neighbor Solicitation Message.
   89  *
   90  * Based on RFC 2461
   91  * Based on RFC 2462 (duplicated address detection)
   92  */
   93 void
   94 nd6_ns_input(m, off, icmp6len)
   95         struct mbuf *m;
   96         int off, icmp6len;
   97 {
   98         struct ifnet *ifp = m->m_pkthdr.rcvif;
   99         struct ip6_hdr *ip6 = mtod(m, struct ip6_hdr *);
  100         struct nd_neighbor_solicit *nd_ns;
  101         struct in6_addr saddr6 = ip6->ip6_src;
  102         struct in6_addr daddr6 = ip6->ip6_dst;
  103         struct in6_addr taddr6;
  104         struct in6_addr myaddr6;
  105         char *lladdr = NULL;
  106         struct ifaddr *ifa;
  107         int lladdrlen = 0;
  108         int anycast = 0, proxy = 0, tentative = 0;
  109         int tlladdr;
  110         union nd_opts ndopts;
  111         struct sockaddr_dl *proxydl = NULL;
  112 
  113 #ifndef PULLDOWN_TEST
  114         IP6_EXTHDR_CHECK(m, off, icmp6len,);
  115         nd_ns = (struct nd_neighbor_solicit *)((caddr_t)ip6 + off);
  116 #else
  117         IP6_EXTHDR_GET(nd_ns, struct nd_neighbor_solicit *, m, off, icmp6len);
  118         if (nd_ns == NULL) {
  119                 icmp6stat.icp6s_tooshort++;
  120                 return;
  121         }
  122 #endif
  123         ip6 = mtod(m, struct ip6_hdr *); /* adjust pointer for safety */
  124         taddr6 = nd_ns->nd_ns_target;
  125 
  126         if (ip6->ip6_hlim != 255) {
  127                 nd6log((LOG_ERR,
  128                     "nd6_ns_input: invalid hlim (%d) from %s to %s on %s\n",
  129                     ip6->ip6_hlim, ip6_sprintf(&ip6->ip6_src),
  130                     ip6_sprintf(&ip6->ip6_dst), if_name(ifp)));
  131                 goto bad;
  132         }
  133 
  134         if (IN6_IS_ADDR_UNSPECIFIED(&saddr6)) {
  135                 /* dst has to be solicited node multicast address. */
  136                 if (daddr6.s6_addr16[0] == IPV6_ADDR_INT16_MLL
  137                     /* don't check ifindex portion */
  138                     && daddr6.s6_addr32[1] == 0
  139                     && daddr6.s6_addr32[2] == IPV6_ADDR_INT32_ONE
  140                     && daddr6.s6_addr8[12] == 0xff) {
  141                         ; /* good */
  142                 } else {
  143                         nd6log((LOG_INFO, "nd6_ns_input: bad DAD packet "
  144                                 "(wrong ip6 dst)\n"));
  145                         goto bad;
  146                 }
  147         }
  148 
  149         if (IN6_IS_ADDR_MULTICAST(&taddr6)) {
  150                 nd6log((LOG_INFO, "nd6_ns_input: bad NS target (multicast)\n"));
  151                 goto bad;
  152         }
  153 
  154         if (IN6_IS_SCOPE_LINKLOCAL(&taddr6))
  155                 taddr6.s6_addr16[1] = htons(ifp->if_index);
  156 
  157         icmp6len -= sizeof(*nd_ns);
  158         nd6_option_init(nd_ns + 1, icmp6len, &ndopts);
  159         if (nd6_options(&ndopts) < 0) {
  160                 nd6log((LOG_INFO,
  161                     "nd6_ns_input: invalid ND option, ignored\n"));
  162                 /* nd6_options have incremented stats */
  163                 goto freeit;
  164         }
  165 
  166         if (ndopts.nd_opts_src_lladdr) {
  167                 lladdr = (char *)(ndopts.nd_opts_src_lladdr + 1);
  168                 lladdrlen = ndopts.nd_opts_src_lladdr->nd_opt_len << 3;
  169         }
  170         
  171         if (IN6_IS_ADDR_UNSPECIFIED(&ip6->ip6_src) && lladdr) {
  172                 nd6log((LOG_INFO, "nd6_ns_input: bad DAD packet "
  173                     "(link-layer address option)\n"));
  174                 goto bad;
  175         }
  176 
  177         /*
  178          * Attaching target link-layer address to the NA?
  179          * (RFC 2461 7.2.4)
  180          *
  181          * NS IP dst is unicast/anycast                 MUST NOT add
  182          * NS IP dst is solicited-node multicast        MUST add
  183          *
  184          * In implementation, we add target link-layer address by default.
  185          * We do not add one in MUST NOT cases.
  186          */
  187 #if 0 /* too much! */
  188         ifa = (struct ifaddr *)in6ifa_ifpwithaddr(ifp, &daddr6);
  189         if (ifa && (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_ANYCAST))
  190                 tlladdr = 0;
  191         else
  192 #endif
  193         if (!IN6_IS_ADDR_MULTICAST(&daddr6))
  194                 tlladdr = 0;
  195         else
  196                 tlladdr = 1;
  197 
  198         /*
  199          * Target address (taddr6) must be either:
  200          * (1) Valid unicast/anycast address for my receiving interface,
  201          * (2) Unicast address for which I'm offering proxy service, or
  202          * (3) "tentative" address on which DAD is being performed.
  203          */
  204         /* (1) and (3) check. */
  205         ifa = (struct ifaddr *)in6ifa_ifpwithaddr(ifp, &taddr6);
  206 
  207         /* (2) check. */
  208         if (!ifa) {
  209                 struct rtentry *rt;
  210                 struct sockaddr_in6 tsin6;
  211 
  212                 bzero(&tsin6, sizeof tsin6);            
  213                 tsin6.sin6_len = sizeof(struct sockaddr_in6);
  214                 tsin6.sin6_family = AF_INET6;
  215                 tsin6.sin6_addr = taddr6;
  216 
  217                 rt = rtalloc1((struct sockaddr *)&tsin6, 0, 0);
  218                 if (rt && (rt->rt_flags & RTF_ANNOUNCE) != 0 &&
  219                     rt->rt_gateway->sa_family == AF_LINK) {
  220                         /*
  221                          * proxy NDP for single entry
  222                          */
  223                         ifa = (struct ifaddr *)in6ifa_ifpforlinklocal(ifp,
  224                                 IN6_IFF_NOTREADY|IN6_IFF_ANYCAST);
  225                         if (ifa) {
  226                                 proxy = 1;
  227                                 proxydl = SDL(rt->rt_gateway);
  228                         }
  229                 }
  230                 if (rt)
  231                         rtfree(rt);
  232         }
  233         if (!ifa) {
  234                 /*
  235                  * We've got an NS packet, and we don't have that adddress
  236                  * assigned for us.  We MUST silently ignore it.
  237                  * See RFC2461 7.2.3.
  238                  */
  239                 goto freeit;
  240         }
  241         myaddr6 = *IFA_IN6(ifa);
  242         anycast = ((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_ANYCAST;
  243         tentative = ((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_TENTATIVE;
  244         if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DUPLICATED)
  245                 goto freeit;
  246 
  247         if (lladdr && ((ifp->if_addrlen + 2 + 7) & ~7) != lladdrlen) {
  248                 nd6log((LOG_INFO,
  249                     "nd6_ns_input: lladdrlen mismatch for %s "
  250                     "(if %d, NS packet %d)\n",
  251                         ip6_sprintf(&taddr6), ifp->if_addrlen, lladdrlen - 2));
  252                 goto bad;
  253         }
  254 
  255         if (IN6_ARE_ADDR_EQUAL(&myaddr6, &saddr6)) {
  256                 nd6log((LOG_INFO,
  257                         "nd6_ns_input: duplicate IP6 address %s\n",
  258                         ip6_sprintf(&saddr6)));
  259                 goto freeit;
  260         }
  261 
  262         /*
  263          * We have neighbor solicitation packet, with target address equals to
  264          * one of my tentative address.
  265          *
  266          * src addr     how to process?
  267          * ---          ---
  268          * multicast    of course, invalid (rejected in ip6_input)
  269          * unicast      somebody is doing address resolution -> ignore
  270          * unspec       dup address detection
  271          *
  272          * The processing is defined in RFC 2462.
  273          */
  274         if (tentative) {
  275                 /*
  276                  * If source address is unspecified address, it is for
  277                  * duplicated address detection.
  278                  *
  279                  * If not, the packet is for addess resolution;
  280                  * silently ignore it.
  281                  */
  282                 if (IN6_IS_ADDR_UNSPECIFIED(&saddr6))
  283                         nd6_dad_ns_input(ifa);
  284 
  285                 goto freeit;
  286         }
  287 
  288         /*
  289          * If the source address is unspecified address, entries must not
  290          * be created or updated.
  291          * It looks that sender is performing DAD.  Output NA toward
  292          * all-node multicast address, to tell the sender that I'm using
  293          * the address.
  294          * S bit ("solicited") must be zero.
  295          */
  296         if (IN6_IS_ADDR_UNSPECIFIED(&saddr6)) {
  297                 saddr6 = in6addr_linklocal_allnodes;
  298                 saddr6.s6_addr16[1] = htons(ifp->if_index);
  299                 nd6_na_output(ifp, &saddr6, &taddr6,
  300                               ((anycast || proxy || !tlladdr)
  301                                       ? 0 : ND_NA_FLAG_OVERRIDE)
  302                                 | (ip6_forwarding ? ND_NA_FLAG_ROUTER : 0),
  303                               tlladdr, (struct sockaddr *)proxydl);
  304                 goto freeit;
  305         }
  306 
  307         nd6_cache_lladdr(ifp, &saddr6, lladdr, lladdrlen, ND_NEIGHBOR_SOLICIT, 0);
  308 
  309         nd6_na_output(ifp, &saddr6, &taddr6,
  310                       ((anycast || proxy || !tlladdr) ? 0 : ND_NA_FLAG_OVERRIDE)
  311                         | (ip6_forwarding ? ND_NA_FLAG_ROUTER : 0)
  312                         | ND_NA_FLAG_SOLICITED,
  313                       tlladdr, (struct sockaddr *)proxydl);
  314  freeit:
  315         m_freem(m);
  316         return;
  317 
  318  bad:
  319         nd6log((LOG_ERR, "nd6_ns_input: src=%s\n", ip6_sprintf(&saddr6)));
  320         nd6log((LOG_ERR, "nd6_ns_input: dst=%s\n", ip6_sprintf(&daddr6)));
  321         nd6log((LOG_ERR, "nd6_ns_input: tgt=%s\n", ip6_sprintf(&taddr6)));
  322         icmp6stat.icp6s_badns++;
  323         m_freem(m);
  324 }
  325 
  326 /*
  327  * Output an Neighbor Solicitation Message. Caller specifies:
  328  *      - ICMP6 header source IP6 address
  329  *      - ND6 header target IP6 address
  330  *      - ND6 header source datalink address
  331  *
  332  * Based on RFC 2461
  333  * Based on RFC 2462 (duplicated address detection)
  334  */
  335 void
  336 nd6_ns_output(ifp, daddr6, taddr6, ln, dad)
  337         struct ifnet *ifp;
  338         const struct in6_addr *daddr6, *taddr6;
  339         struct llinfo_nd6 *ln;  /* for source address determination */
  340         int dad;        /* duplicated address detection */
  341 {
  342         struct mbuf *m;
  343         struct ip6_hdr *ip6;
  344         struct nd_neighbor_solicit *nd_ns;
  345         struct in6_ifaddr *ia = NULL;
  346         struct ip6_moptions im6o;
  347         int icmp6len;
  348         int maxlen;
  349         caddr_t mac;
  350         struct ifnet *outif = NULL;
  351         
  352         if (IN6_IS_ADDR_MULTICAST(taddr6))
  353                 return;
  354 
  355         /* estimate the size of message */
  356         maxlen = sizeof(*ip6) + sizeof(*nd_ns);
  357         maxlen += (sizeof(struct nd_opt_hdr) + ifp->if_addrlen + 7) & ~7;
  358         if (max_linkhdr + maxlen >= MCLBYTES) {
  359 #if DIAGNOSTIC
  360                 printf("nd6_ns_output: max_linkhdr + maxlen >= MCLBYTES "
  361                     "(%d + %d > %d)\n", max_linkhdr, maxlen, MCLBYTES);
  362 #endif
  363                 return;
  364         }
  365 
  366         MGETHDR(m, M_DONTWAIT, MT_DATA);
  367         if (m && max_linkhdr + maxlen >= MHLEN) {
  368                 MCLGET(m, M_DONTWAIT);
  369                 if ((m->m_flags & M_EXT) == 0) {
  370                         m_free(m);
  371                         m = NULL;
  372                 }
  373         }
  374         if (m == NULL)
  375                 return;
  376         m->m_pkthdr.rcvif = NULL;
  377 
  378         if (daddr6 == NULL || IN6_IS_ADDR_MULTICAST(daddr6)) {
  379                 m->m_flags |= M_MCAST;
  380                 im6o.im6o_multicast_ifp = ifp;
  381                 im6o.im6o_multicast_hlim = 255;
  382                 im6o.im6o_multicast_loop = 0;
  383         }
  384 
  385         icmp6len = sizeof(*nd_ns);
  386         m->m_pkthdr.len = m->m_len = sizeof(*ip6) + icmp6len;
  387         m->m_data += max_linkhdr;       /* or MH_ALIGN() equivalent? */
  388 
  389         /* fill neighbor solicitation packet */
  390         ip6 = mtod(m, struct ip6_hdr *);
  391         ip6->ip6_flow = 0;
  392         ip6->ip6_vfc &= ~IPV6_VERSION_MASK;
  393         ip6->ip6_vfc |= IPV6_VERSION;
  394         /* ip6->ip6_plen will be set later */
  395         ip6->ip6_nxt = IPPROTO_ICMPV6;
  396         ip6->ip6_hlim = 255;
  397         if (daddr6)
  398                 ip6->ip6_dst = *daddr6;
  399         else {
  400                 ip6->ip6_dst.s6_addr16[0] = IPV6_ADDR_INT16_MLL;
  401                 ip6->ip6_dst.s6_addr16[1] = htons(ifp->if_index);
  402                 ip6->ip6_dst.s6_addr32[1] = 0;
  403                 ip6->ip6_dst.s6_addr32[2] = IPV6_ADDR_INT32_ONE;
  404                 ip6->ip6_dst.s6_addr32[3] = taddr6->s6_addr32[3];
  405                 ip6->ip6_dst.s6_addr8[12] = 0xff;
  406         }
  407         if (!dad) {
  408 #if 0   /* KAME way, exact address scope match */
  409                 /*
  410                  * Select a source whose scope is the same as that of the dest.
  411                  * Typically, the dest is link-local solicitation multicast
  412                  * (i.e. neighbor discovery) or link-local/global unicast
  413                  * (i.e. neighbor un-reachability detection).
  414                  */
  415                 ia = in6_ifawithifp(ifp, &ip6->ip6_dst);
  416                 if (ia == NULL) {
  417                         m_freem(m);
  418                         return;
  419                 }
  420                 ip6->ip6_src = ia->ia_addr.sin6_addr;
  421 #else   /* spec-wise correct */
  422                 /*
  423                  * RFC2461 7.2.2:
  424                  * "If the source address of the packet prompting the
  425                  * solicitation is the same as one of the addresses assigned
  426                  * to the outgoing interface, that address SHOULD be placed
  427                  * in the IP Source Address of the outgoing solicitation.
  428                  * Otherwise, any one of the addresses assigned to the
  429                  * interface should be used."
  430                  *
  431                  * We use the source address for the prompting packet
  432                  * (saddr6), if:
  433                  * - saddr6 is given from the caller (by giving "ln"), and
  434                  * - saddr6 belongs to the outgoing interface.
  435                  * Otherwise, we perform a scope-wise match.
  436                  */
  437                 struct ip6_hdr *hip6;           /* hold ip6 */
  438                 struct in6_addr *saddr6;
  439 
  440                 if (ln && ln->ln_hold) {
  441                         hip6 = mtod(ln->ln_hold, struct ip6_hdr *);
  442                         /* XXX pullup? */
  443                         if (sizeof(*hip6) < ln->ln_hold->m_len)
  444                                 saddr6 = &hip6->ip6_src;
  445                         else
  446                                 saddr6 = NULL;
  447                 } else
  448                         saddr6 = NULL;
  449                 if (saddr6 && in6ifa_ifpwithaddr(ifp, saddr6))
  450                         bcopy(saddr6, &ip6->ip6_src, sizeof(*saddr6));
  451                 else {
  452                         ia = in6_ifawithifp(ifp, &ip6->ip6_dst);
  453                         if (ia == NULL) {
  454                                 if (ln && ln->ln_hold)
  455                                         m_freem(ln->ln_hold);
  456                                 ln->ln_hold = NULL;
  457                                 m_freem(m);
  458                                 return;
  459                         }
  460                         ip6->ip6_src = ia->ia_addr.sin6_addr;
  461                 }
  462 #endif
  463         } else {
  464                 /*
  465                  * Source address for DAD packet must always be IPv6
  466                  * unspecified address. (0::0)
  467                  */
  468                 bzero(&ip6->ip6_src, sizeof(ip6->ip6_src));
  469         }
  470         nd_ns = (struct nd_neighbor_solicit *)(ip6 + 1);
  471         nd_ns->nd_ns_type = ND_NEIGHBOR_SOLICIT;
  472         nd_ns->nd_ns_code = 0;
  473         nd_ns->nd_ns_reserved = 0;
  474         nd_ns->nd_ns_target = *taddr6;
  475 
  476         if (IN6_IS_SCOPE_LINKLOCAL(&nd_ns->nd_ns_target))
  477                 nd_ns->nd_ns_target.s6_addr16[1] = 0;
  478 
  479         /*
  480          * Add source link-layer address option.
  481          *
  482          *                              spec            implementation
  483          *                              ---             ---
  484          * DAD packet                   MUST NOT        do not add the option
  485          * there's no link layer address:
  486          *                              impossible      do not add the option
  487          * there's link layer address:
  488          *      Multicast NS            MUST add one    add the option
  489          *      Unicast NS              SHOULD add one  add the option
  490          */
  491         if (!dad && (mac = nd6_ifptomac(ifp))) {
  492                 int optlen = sizeof(struct nd_opt_hdr) + ifp->if_addrlen;
  493                 struct nd_opt_hdr *nd_opt = (struct nd_opt_hdr *)(nd_ns + 1);
  494                 /* 8 byte alignments... */
  495                 optlen = (optlen + 7) & ~7;
  496                 
  497                 m->m_pkthdr.len += optlen;
  498                 m->m_len += optlen;
  499                 icmp6len += optlen;
  500                 bzero((caddr_t)nd_opt, optlen);
  501                 nd_opt->nd_opt_type = ND_OPT_SOURCE_LINKADDR;
  502                 nd_opt->nd_opt_len = optlen >> 3;
  503                 bcopy(mac, (caddr_t)(nd_opt + 1), ifp->if_addrlen);
  504         }
  505 
  506         ip6->ip6_plen = htons((u_short)icmp6len);
  507         nd_ns->nd_ns_cksum = 0;
  508         nd_ns->nd_ns_cksum
  509                 = in6_cksum(m, IPPROTO_ICMPV6, sizeof(*ip6), icmp6len);
  510 
  511 #if IPSEC
  512         /* Don't lookup socket */
  513         if (ipsec_bypass == 0)
  514                 (void)ipsec_setsocket(m, NULL);
  515 #endif
  516         ip6_output(m, NULL, NULL, dad ? IPV6_DADOUTPUT : 0, &im6o, &outif);
  517         if (outif) {
  518                 icmp6_ifstat_inc(outif, ifs6_out_msg);
  519                 icmp6_ifstat_inc(outif, ifs6_out_neighborsolicit);
  520         }
  521         icmp6stat.icp6s_outhist[ND_NEIGHBOR_SOLICIT]++;
  522 }
  523 
  524 /*
  525  * Neighbor advertisement input handling.
  526  *
  527  * Based on RFC 2461
  528  * Based on RFC 2462 (duplicated address detection)
  529  *
  530  * the following items are not implemented yet:
  531  * - proxy advertisement delay rule (RFC2461 7.2.8, last paragraph, SHOULD)
  532  * - anycast advertisement delay rule (RFC2461 7.2.7, SHOULD)
  533  */
  534 void
  535 nd6_na_input(m, off, icmp6len)
  536         struct mbuf *m;
  537         int off, icmp6len;
  538 {
  539         struct ifnet *ifp = m->m_pkthdr.rcvif;
  540         struct ip6_hdr *ip6 = mtod(m, struct ip6_hdr *);
  541         struct nd_neighbor_advert *nd_na;
  542 #if 0
  543         struct in6_addr saddr6 = ip6->ip6_src;
  544 #endif
  545         struct in6_addr daddr6 = ip6->ip6_dst;
  546         struct in6_addr taddr6;
  547         int flags;
  548         int is_router;
  549         int is_solicited;
  550         int is_override;
  551         char *lladdr = NULL;
  552         int lladdrlen = 0;
  553         struct ifaddr *ifa;
  554         struct llinfo_nd6 *ln;
  555         struct rtentry *rt;
  556         struct sockaddr_dl *sdl;
  557         union nd_opts ndopts;
  558 
  559         if (ip6->ip6_hlim != 255) {
  560                 nd6log((LOG_ERR,
  561                     "nd6_na_input: invalid hlim (%d) from %s to %s on %s\n",
  562                     ip6->ip6_hlim, ip6_sprintf(&ip6->ip6_src),
  563                     ip6_sprintf(&ip6->ip6_dst), if_name(ifp)));
  564                 goto bad;
  565         }
  566 
  567 #ifndef PULLDOWN_TEST
  568         IP6_EXTHDR_CHECK(m, off, icmp6len,);
  569         nd_na = (struct nd_neighbor_advert *)((caddr_t)ip6 + off);
  570 #else
  571         IP6_EXTHDR_GET(nd_na, struct nd_neighbor_advert *, m, off, icmp6len);
  572         if (nd_na == NULL) {
  573                 icmp6stat.icp6s_tooshort++;
  574                 return;
  575         }
  576 #endif
  577         taddr6 = nd_na->nd_na_target;
  578         flags = nd_na->nd_na_flags_reserved;
  579         is_router = ((flags & ND_NA_FLAG_ROUTER) != 0);
  580         is_solicited = ((flags & ND_NA_FLAG_SOLICITED) != 0);
  581         is_override = ((flags & ND_NA_FLAG_OVERRIDE) != 0);
  582 
  583         if (IN6_IS_SCOPE_LINKLOCAL(&taddr6))
  584                 taddr6.s6_addr16[1] = htons(ifp->if_index);
  585 
  586         if (IN6_IS_ADDR_MULTICAST(&taddr6)) {
  587                 nd6log((LOG_ERR,
  588                     "nd6_na_input: invalid target address %s\n",
  589                     ip6_sprintf(&taddr6)));
  590                 goto bad;
  591         }
  592         if (IN6_IS_ADDR_MULTICAST(&daddr6))
  593                 if (is_solicited) {
  594                         nd6log((LOG_ERR,
  595                             "nd6_na_input: a solicited adv is multicasted\n"));
  596                         goto bad;
  597                 }
  598 
  599         icmp6len -= sizeof(*nd_na);
  600         nd6_option_init(nd_na + 1, icmp6len, &ndopts);
  601         if (nd6_options(&ndopts) < 0) {
  602                 nd6log((LOG_INFO,
  603                     "nd6_na_input: invalid ND option, ignored\n"));
  604                 /* nd6_options have incremented stats */
  605                 goto freeit;
  606         }
  607 
  608         if (ndopts.nd_opts_tgt_lladdr) {
  609                 lladdr = (char *)(ndopts.nd_opts_tgt_lladdr + 1);
  610                 lladdrlen = ndopts.nd_opts_tgt_lladdr->nd_opt_len << 3;
  611         }
  612 
  613         ifa = (struct ifaddr *)in6ifa_ifpwithaddr(ifp, &taddr6);
  614 
  615         /*
  616          * Target address matches one of my interface address.
  617          *
  618          * If my address is tentative, this means that there's somebody
  619          * already using the same address as mine.  This indicates DAD failure.
  620          * This is defined in RFC 2462.
  621          *
  622          * Otherwise, process as defined in RFC 2461.
  623          */
  624         if (ifa
  625          && (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_TENTATIVE)) {
  626                 nd6_dad_na_input(ifa);
  627                 goto freeit;
  628         }
  629 
  630         /* Just for safety, maybe unnecessary. */
  631         if (ifa) {
  632                 log(LOG_ERR,
  633                     "nd6_na_input: duplicate IP6 address %s\n",
  634                     ip6_sprintf(&taddr6));
  635                 goto freeit;
  636         }
  637 
  638         if (lladdr && ((ifp->if_addrlen + 2 + 7) & ~7) != lladdrlen) {
  639                 nd6log((LOG_INFO,
  640                     "nd6_na_input: lladdrlen mismatch for %s "
  641                     "(if %d, NA packet %d)\n",
  642                         ip6_sprintf(&taddr6), ifp->if_addrlen, lladdrlen - 2));
  643                 goto bad;
  644         }
  645 
  646         /*
  647          * If no neighbor cache entry is found, NA SHOULD silently be discarded.
  648          */
  649         rt = nd6_lookup(&taddr6, 0, ifp);
  650         if ((rt == NULL) ||
  651            ((ln = (struct llinfo_nd6 *)rt->rt_llinfo) == NULL) ||
  652            ((sdl = SDL(rt->rt_gateway)) == NULL))
  653                 goto freeit;
  654 
  655         if (ln->ln_state == ND6_LLINFO_INCOMPLETE) {
  656                 /*
  657                  * If the link-layer has address, and no lladdr option came,
  658                  * discard the packet.
  659                  */
  660                 if (ifp->if_addrlen && !lladdr)
  661                         goto freeit;
  662 
  663                 /*
  664                  * Record link-layer address, and update the state.
  665                  */
  666                 sdl->sdl_alen = ifp->if_addrlen;
  667                 bcopy(lladdr, LLADDR(sdl), ifp->if_addrlen);
  668                 if (is_solicited) {
  669                         ln->ln_state = ND6_LLINFO_REACHABLE;
  670                         ln->ln_byhint = 0;
  671                         if (ln->ln_expire)
  672                                 ln->ln_expire = time_second +
  673                                     nd_ifinfo[rt->rt_ifp->if_index].reachable;
  674                 } else {
  675                         ln->ln_state = ND6_LLINFO_STALE;
  676                         ln->ln_expire = time_second + nd6_gctimer;
  677                 }
  678                 if ((ln->ln_router = is_router) != 0) {
  679                         /*
  680                          * This means a router's state has changed from
  681                          * non-reachable to probably reachable, and might
  682                          * affect the status of associated prefixes..
  683                          */
  684                         pfxlist_onlink_check();
  685                 }
  686         } else {
  687                 int llchange;
  688 
  689                 /*
  690                  * Check if the link-layer address has changed or not.
  691                  */
  692                 if (!lladdr)
  693                         llchange = 0;
  694                 else {
  695                         if (sdl->sdl_alen) {
  696                                 if (bcmp(lladdr, LLADDR(sdl), ifp->if_addrlen))
  697                                         llchange = 1;
  698                                 else
  699                                         llchange = 0;
  700                         } else
  701                                 llchange = 1;
  702                 }
  703 
  704                 /*
  705                  * This is VERY complex.  Look at it with care.
  706                  *
  707                  * override solicit lladdr llchange     action
  708                  *                                      (L: record lladdr)
  709                  *
  710                  *      0       0       n       --      (2c)
  711                  *      0       0       y       n       (2b) L
  712                  *      0       0       y       y       (1)    REACHABLE->STALE
  713                  *      0       1       n       --      (2c)   *->REACHABLE
  714                  *      0       1       y       n       (2b) L *->REACHABLE
  715                  *      0       1       y       y       (1)    REACHABLE->STALE
  716                  *      1       0       n       --      (2a)
  717                  *      1       0       y       n       (2a) L
  718                  *      1       0       y       y       (2a) L *->STALE
  719                  *      1       1       n       --      (2a)   *->REACHABLE
  720                  *      1       1       y       n       (2a) L *->REACHABLE
  721                  *      1       1       y       y       (2a) L *->REACHABLE
  722                  */
  723                 if (!is_override && (lladdr && llchange)) {        /* (1) */
  724                         /*
  725                          * If state is REACHABLE, make it STALE.
  726                          * no other updates should be done.
  727                          */
  728                         if (ln->ln_state == ND6_LLINFO_REACHABLE) {
  729                                 ln->ln_state = ND6_LLINFO_STALE;
  730                                 ln->ln_expire = time_second + nd6_gctimer;
  731                         }
  732                         goto freeit;
  733                 } else if (is_override                             /* (2a) */
  734                         || (!is_override && (lladdr && !llchange)) /* (2b) */
  735                         || !lladdr) {                              /* (2c) */
  736                         /*
  737                          * Update link-local address, if any.
  738                          */
  739                         if (lladdr) {
  740                                 sdl->sdl_alen = ifp->if_addrlen;
  741                                 bcopy(lladdr, LLADDR(sdl), ifp->if_addrlen);
  742                         }
  743 
  744                         /*
  745                          * If solicited, make the state REACHABLE.
  746                          * If not solicited and the link-layer address was
  747                          * changed, make it STALE.
  748                          */
  749                         if (is_solicited) {
  750                                 ln->ln_state = ND6_LLINFO_REACHABLE;
  751                                 ln->ln_byhint = 0;
  752                                 if (ln->ln_expire) {
  753                                         ln->ln_expire = time_second +
  754                                             nd_ifinfo[ifp->if_index].reachable;
  755                                 }
  756                         } else {
  757                                 if (lladdr && llchange) {
  758                                         ln->ln_state = ND6_LLINFO_STALE;
  759                                         ln->ln_expire = time_second + nd6_gctimer;
  760                                 }
  761                         }
  762                 }
  763 
  764                 if (ln->ln_router && !is_router) {
  765                         /*
  766                          * The peer dropped the router flag.
  767                          * Remove the sender from the Default Router List and
  768                          * update the Destination Cache entries.
  769                          */
  770                         struct nd_defrouter *dr;
  771                         struct in6_addr *in6;
  772                         int s;
  773 
  774                         in6 = &((struct sockaddr_in6 *)rt_key(rt))->sin6_addr;
  775 
  776                         /*
  777                          * Lock to protect the default router list.
  778                          * XXX: this might be unnecessary, since this function
  779                          * is only called under the network software interrupt
  780                          * context.  However, we keep it just for safety.  
  781                          */
  782                         s = splnet();
  783                         dr = defrouter_lookup(in6, rt->rt_ifp);
  784                         if (dr)
  785                                 defrtrlist_del(dr);
  786                         else if (!ip6_forwarding && (ip6_accept_rtadv || (rt->rt_ifp->if_eflags & IFEF_ACCEPT_RTADVD))) {
  787                                 /*
  788                                  * Even if the neighbor is not in the default
  789                                  * router list, the neighbor may be used
  790                                  * as a next hop for some destinations
  791                                  * (e.g. redirect case). So we must
  792                                  * call rt6_flush explicitly.
  793                                  */
  794                                 rt6_flush(&ip6->ip6_src, rt->rt_ifp);
  795                         }
  796                         splx(s);
  797                 }
  798                 ln->ln_router = is_router;
  799         }
  800         rt->rt_flags &= ~RTF_REJECT;
  801         ln->ln_asked = 0;
  802         if (ln->ln_hold) {
  803                 /*
  804                  * we assume ifp is not a loopback here, so just set the 2nd
  805                  * argument as the 1st one.
  806                  */
  807                 nd6_output(ifp, ifp, ln->ln_hold,
  808                            (struct sockaddr_in6 *)rt_key(rt), rt);
  809                 ln->ln_hold = 0;
  810         }
  811 
  812  freeit:
  813         m_freem(m);
  814         return;
  815 
  816  bad:
  817         icmp6stat.icp6s_badna++;
  818         m_freem(m);
  819 }
  820 
  821 /*
  822  * Neighbor advertisement output handling.
  823  *
  824  * Based on RFC 2461
  825  *
  826  * the following items are not implemented yet:
  827  * - proxy advertisement delay rule (RFC2461 7.2.8, last paragraph, SHOULD)
  828  * - anycast advertisement delay rule (RFC2461 7.2.7, SHOULD)
  829  */
  830 void
  831 nd6_na_output(ifp, daddr6, taddr6, flags, tlladdr, sdl0)
  832         struct ifnet *ifp;
  833         const struct in6_addr *daddr6, *taddr6;
  834         u_long flags;
  835         int tlladdr;            /* 1 if include target link-layer address */
  836         struct sockaddr *sdl0;  /* sockaddr_dl (= proxy NA) or NULL */
  837 {
  838         struct mbuf *m;
  839         struct ip6_hdr *ip6;
  840         struct nd_neighbor_advert *nd_na;
  841         struct in6_ifaddr *ia = NULL;
  842         struct ip6_moptions im6o;
  843         int icmp6len;
  844         int maxlen;
  845         caddr_t mac = NULL;
  846         struct ifnet *outif = NULL;
  847 
  848         /* estimate the size of message */
  849         maxlen = sizeof(*ip6) + sizeof(*nd_na);
  850         maxlen += (sizeof(struct nd_opt_hdr) + ifp->if_addrlen + 7) & ~7;
  851         if (max_linkhdr + maxlen >= MCLBYTES) {
  852 #if DIAGNOSTIC
  853                 printf("nd6_na_output: max_linkhdr + maxlen >= MCLBYTES "
  854                     "(%d + %d > %d)\n", max_linkhdr, maxlen, MCLBYTES);
  855 #endif
  856                 return;
  857         }
  858 
  859         MGETHDR(m, M_DONTWAIT, MT_DATA);
  860         if (m && max_linkhdr + maxlen >= MHLEN) {
  861                 MCLGET(m, M_DONTWAIT);
  862                 if ((m->m_flags & M_EXT) == 0) {
  863                         m_free(m);
  864                         m = NULL;
  865                 }
  866         }
  867         if (m == NULL)
  868                 return;
  869         m->m_pkthdr.rcvif = NULL;
  870 
  871         if (IN6_IS_ADDR_MULTICAST(daddr6)) {
  872                 m->m_flags |= M_MCAST;
  873                 im6o.im6o_multicast_ifp = ifp;
  874                 im6o.im6o_multicast_hlim = 255;
  875                 im6o.im6o_multicast_loop = 0;
  876         }
  877 
  878         icmp6len = sizeof(*nd_na);
  879         m->m_pkthdr.len = m->m_len = sizeof(struct ip6_hdr) + icmp6len;
  880         m->m_data += max_linkhdr;       /* or MH_ALIGN() equivalent? */
  881 
  882         /* fill neighbor advertisement packet */
  883         ip6 = mtod(m, struct ip6_hdr *);
  884         ip6->ip6_flow = 0;
  885         ip6->ip6_vfc &= ~IPV6_VERSION_MASK;
  886         ip6->ip6_vfc |= IPV6_VERSION;
  887         ip6->ip6_nxt = IPPROTO_ICMPV6;
  888         ip6->ip6_hlim = 255;
  889         if (IN6_IS_ADDR_UNSPECIFIED(daddr6)) {
  890                 /* reply to DAD */
  891                 ip6->ip6_dst.s6_addr16[0] = IPV6_ADDR_INT16_MLL;
  892                 ip6->ip6_dst.s6_addr16[1] = htons(ifp->if_index);
  893                 ip6->ip6_dst.s6_addr32[1] = 0;
  894                 ip6->ip6_dst.s6_addr32[2] = 0;
  895                 ip6->ip6_dst.s6_addr32[3] = IPV6_ADDR_INT32_ONE;
  896                 flags &= ~ND_NA_FLAG_SOLICITED;
  897         } else
  898                 ip6->ip6_dst = *daddr6;
  899 
  900         /*
  901          * Select a source whose scope is the same as that of the dest.
  902          */
  903         ia = in6_ifawithifp(ifp, &ip6->ip6_dst);
  904         if (ia == NULL) {
  905                 m_freem(m);
  906                 return;
  907         }
  908         ip6->ip6_src = ia->ia_addr.sin6_addr;
  909         nd_na = (struct nd_neighbor_advert *)(ip6 + 1);
  910         nd_na->nd_na_type = ND_NEIGHBOR_ADVERT;
  911         nd_na->nd_na_code = 0;
  912         nd_na->nd_na_target = *taddr6;
  913         if (IN6_IS_SCOPE_LINKLOCAL(&nd_na->nd_na_target))
  914                 nd_na->nd_na_target.s6_addr16[1] = 0;
  915 
  916         /*
  917          * "tlladdr" indicates NS's condition for adding tlladdr or not.
  918          * see nd6_ns_input() for details.
  919          * Basically, if NS packet is sent to unicast/anycast addr,
  920          * target lladdr option SHOULD NOT be included.
  921          */
  922         if (tlladdr) {
  923                 /*
  924                  * sdl0 != NULL indicates proxy NA.  If we do proxy, use
  925                  * lladdr in sdl0.  If we are not proxying (sending NA for
  926                  * my address) use lladdr configured for the interface.
  927                  */
  928                 if (sdl0 == NULL)
  929                         mac = nd6_ifptomac(ifp);
  930                 else if (sdl0->sa_family == AF_LINK) {
  931                         struct sockaddr_dl *sdl;
  932                         sdl = (struct sockaddr_dl *)sdl0;
  933                         if (sdl->sdl_alen == ifp->if_addrlen)
  934                                 mac = LLADDR(sdl);
  935                 }
  936         }
  937         if (tlladdr && mac) {
  938                 int optlen = sizeof(struct nd_opt_hdr) + ifp->if_addrlen;
  939                 struct nd_opt_hdr *nd_opt = (struct nd_opt_hdr *)(nd_na + 1);
  940                 
  941                 /* roundup to 8 bytes alignment! */
  942                 optlen = (optlen + 7) & ~7;
  943 
  944                 m->m_pkthdr.len += optlen;
  945                 m->m_len += optlen;
  946                 icmp6len += optlen;
  947                 bzero((caddr_t)nd_opt, optlen);
  948                 nd_opt->nd_opt_type = ND_OPT_TARGET_LINKADDR;
  949                 nd_opt->nd_opt_len = optlen >> 3;
  950                 bcopy(mac, (caddr_t)(nd_opt + 1), ifp->if_addrlen);
  951         } else
  952                 flags &= ~ND_NA_FLAG_OVERRIDE;
  953 
  954         ip6->ip6_plen = htons((u_short)icmp6len);
  955         nd_na->nd_na_flags_reserved = flags;
  956         nd_na->nd_na_cksum = 0;
  957         nd_na->nd_na_cksum =
  958                 in6_cksum(m, IPPROTO_ICMPV6, sizeof(struct ip6_hdr), icmp6len);
  959 
  960 #if IPSEC
  961         /* Don't lookup socket */
  962         if (ipsec_bypass == 0)
  963                 (void)ipsec_setsocket(m, NULL);
  964 #endif
  965         ip6_output(m, NULL, NULL, 0, &im6o, &outif);
  966         if (outif) {
  967                 icmp6_ifstat_inc(outif, ifs6_out_msg);
  968                 icmp6_ifstat_inc(outif, ifs6_out_neighboradvert);
  969         }
  970         icmp6stat.icp6s_outhist[ND_NEIGHBOR_ADVERT]++;
  971 }
  972 
  973 caddr_t
  974 nd6_ifptomac(ifp)
  975         struct ifnet *ifp;
  976 {
  977         switch (ifp->if_type) {
  978         case IFT_ARCNET:
  979         case IFT_ETHER:
  980         case IFT_FDDI:
  981         case IFT_IEEE1394:
  982 #if IFT_L2VLAN
  983         case IFT_L2VLAN:
  984 #endif
  985 #if IFT_IEEE80211
  986         case IFT_IEEE80211:
  987 #endif
  988                 return ((caddr_t)(ifp + 1));
  989                 break;
  990         default:
  991                 return NULL;
  992         }
  993 }
  994 
  995 TAILQ_HEAD(dadq_head, dadq);
  996 struct dadq {
  997         TAILQ_ENTRY(dadq) dad_list;
  998         struct ifaddr *dad_ifa;
  999         int dad_count;          /* max NS to send */
 1000         int dad_ns_tcount;      /* # of trials to send NS */
 1001         int dad_ns_ocount;      /* NS sent so far */
 1002         int dad_ns_icount;
 1003         int dad_na_icount;
 1004 };
 1005 
 1006 static struct dadq_head dadq;
 1007 static int dad_init = 0;
 1008 
 1009 static struct dadq *
 1010 nd6_dad_find(ifa)
 1011         struct ifaddr *ifa;
 1012 {
 1013         struct dadq *dp;
 1014 
 1015         for (dp = dadq.tqh_first; dp; dp = dp->dad_list.tqe_next) {
 1016                 if (dp->dad_ifa == ifa)
 1017                         return dp;
 1018         }
 1019         return NULL;
 1020 }
 1021 
 1022 #ifdef  __APPLE__
 1023 void
 1024 nd6_dad_stoptimer(ifa)
 1025         struct ifaddr *ifa;
 1026 {
 1027 
 1028         untimeout((void (*) __P((void *)))nd6_dad_timer_funnel, (void *)ifa);
 1029 }
 1030 #else
 1031 static void
 1032 nd6_dad_starttimer(dp, ticks)
 1033         struct dadq *dp;
 1034         int ticks;
 1035 {
 1036 
 1037         callout_reset(&dp->dad_timer_ch, ticks,
 1038             (void (*) __P((void *)))nd6_dad_timer, (void *)dp->dad_ifa);
 1039 }
 1040 
 1041 static void
 1042 nd6_dad_stoptimer(dp)
 1043         struct dadq *dp;
 1044 {
 1045 
 1046         callout_stop(&dp->dad_timer_ch);
 1047 }
 1048 #endif
 1049 
 1050 /*
 1051  * Start Duplicated Address Detection (DAD) for specified interface address.
 1052  */
 1053 void
 1054 nd6_dad_start(ifa, tick)
 1055         struct ifaddr *ifa;
 1056         int *tick;      /* minimum delay ticks for IFF_UP event */
 1057 {
 1058         struct in6_ifaddr *ia = (struct in6_ifaddr *)ifa;
 1059         struct dadq *dp;
 1060 
 1061         if (!dad_init) {
 1062                 TAILQ_INIT(&dadq);
 1063                 dad_init++;
 1064         }
 1065 
 1066         /*
 1067          * If we don't need DAD, don't do it.
 1068          * There are several cases:
 1069          * - DAD is disabled (ip6_dad_count == 0)
 1070          * - the interface address is anycast
 1071          */
 1072         if (!(ia->ia6_flags & IN6_IFF_TENTATIVE)) {
 1073                 log(LOG_DEBUG,
 1074                         "nd6_dad_start: called with non-tentative address "
 1075                         "%s(%s)\n",
 1076                         ip6_sprintf(&ia->ia_addr.sin6_addr),
 1077                         ifa->ifa_ifp ? if_name(ifa->ifa_ifp) : "???");
 1078                 return;
 1079         }
 1080         if (ia->ia6_flags & IN6_IFF_ANYCAST) {
 1081                 ia->ia6_flags &= ~IN6_IFF_TENTATIVE;
 1082                 return;
 1083         }
 1084         if (!ip6_dad_count) {
 1085                 ia->ia6_flags &= ~IN6_IFF_TENTATIVE;
 1086                 return;
 1087         }
 1088         if (!ifa->ifa_ifp)
 1089                 panic("nd6_dad_start: ifa->ifa_ifp == NULL");
 1090         if (!(ifa->ifa_ifp->if_flags & IFF_UP))
 1091                 return;
 1092         if (nd6_dad_find(ifa) != NULL) {
 1093                 /* DAD already in progress */
 1094                 return;
 1095         }
 1096 
 1097         dp = _MALLOC(sizeof(*dp), M_IP6NDP, M_NOWAIT);
 1098         if (dp == NULL) {
 1099                 log(LOG_ERR, "nd6_dad_start: memory allocation failed for "
 1100                         "%s(%s)\n",
 1101                         ip6_sprintf(&ia->ia_addr.sin6_addr),
 1102                         ifa->ifa_ifp ? if_name(ifa->ifa_ifp) : "???");
 1103                 return;
 1104         }
 1105         bzero(dp, sizeof(*dp));
 1106         TAILQ_INSERT_TAIL(&dadq, (struct dadq *)dp, dad_list);
 1107 
 1108         nd6log((LOG_DEBUG, "%s: starting DAD for %s\n", if_name(ifa->ifa_ifp),
 1109             ip6_sprintf(&ia->ia_addr.sin6_addr)));
 1110 
 1111         /*
 1112          * Send NS packet for DAD, ip6_dad_count times.
 1113          * Note that we must delay the first transmission, if this is the
 1114          * first packet to be sent from the interface after interface
 1115          * (re)initialization.
 1116          */
 1117         dp->dad_ifa = ifa;
 1118         ifaref(ifa);    /*just for safety*/
 1119         dp->dad_count = ip6_dad_count;
 1120         dp->dad_ns_icount = dp->dad_na_icount = 0;
 1121         dp->dad_ns_ocount = dp->dad_ns_tcount = 0;
 1122         if (tick == NULL) {
 1123                 nd6_dad_ns_output(dp, ifa);
 1124                 timeout((void (*) __P((void *)))nd6_dad_timer_funnel, (void *)ifa,
 1125                         nd_ifinfo[ifa->ifa_ifp->if_index].retrans * hz / 1000);
 1126         } else {
 1127                 int ntick;
 1128 
 1129                 if (*tick == 0)
 1130                         ntick = random() % (MAX_RTR_SOLICITATION_DELAY * hz);
 1131                 else
 1132                         ntick = *tick + random() % (hz / 2);
 1133                 *tick = ntick;
 1134                 timeout((void (*) __P((void *)))nd6_dad_timer_funnel, (void *)ifa,
 1135                         ntick);
 1136         }
 1137 }
 1138 
 1139 /*
 1140  * terminate DAD unconditionally.  used for address removals.
 1141  */
 1142 void
 1143 nd6_dad_stop(ifa)
 1144         struct ifaddr *ifa;
 1145 {
 1146         struct dadq *dp;
 1147 
 1148         if (!dad_init)
 1149                 return;
 1150         dp = nd6_dad_find(ifa);
 1151         if (!dp) {
 1152                 /* DAD wasn't started yet */
 1153                 return;
 1154         }
 1155 
 1156         untimeout((void (*) __P((void *)))nd6_dad_timer_funnel, (void *)ifa);
 1157 
 1158         TAILQ_REMOVE(&dadq, (struct dadq *)dp, dad_list);
 1159         FREE(dp, M_IP6NDP);
 1160         dp = NULL;
 1161         ifafree(ifa);
 1162 }
 1163 
 1164 
 1165 static void     
 1166 nd6_dad_timer_funnel(ifa)
 1167         struct ifaddr *ifa;
 1168 {
 1169                 
 1170 #ifdef __APPLE__
 1171         boolean_t       funnel_state;
 1172         funnel_state = thread_funnel_set(network_flock, TRUE);
 1173 #endif  
 1174         nd6_dad_timer(ifa);
 1175 #ifdef __APPLE__
 1176         (void) thread_funnel_set(network_flock, FALSE);
 1177 #endif
 1178 
 1179 } 
 1180 
 1181 static void
 1182 nd6_dad_timer(ifa)
 1183         struct ifaddr *ifa;
 1184 {
 1185         int s;
 1186         struct in6_ifaddr *ia = (struct in6_ifaddr *)ifa;
 1187         struct dadq *dp;
 1188 
 1189         s = splnet();           /* XXX */
 1190 
 1191         /* Sanity check */
 1192         if (ia == NULL) {
 1193                 log(LOG_ERR, "nd6_dad_timer: called with null parameter\n");
 1194                 goto done;
 1195         }
 1196         dp = nd6_dad_find(ifa);
 1197         if (dp == NULL) {
 1198                 log(LOG_ERR, "nd6_dad_timer: DAD structure not found\n");
 1199                 goto done;
 1200         }
 1201         if (ia->ia6_flags & IN6_IFF_DUPLICATED) {
 1202                 log(LOG_ERR, "nd6_dad_timer: called with duplicated address "
 1203                         "%s(%s)\n",
 1204                         ip6_sprintf(&ia->ia_addr.sin6_addr),
 1205                         ifa->ifa_ifp ? if_name(ifa->ifa_ifp) : "???");
 1206                 goto done;
 1207         }
 1208         if ((ia->ia6_flags & IN6_IFF_TENTATIVE) == 0) {
 1209                 log(LOG_ERR, "nd6_dad_timer: called with non-tentative address "
 1210                         "%s(%s)\n",
 1211                         ip6_sprintf(&ia->ia_addr.sin6_addr),
 1212                         ifa->ifa_ifp ? if_name(ifa->ifa_ifp) : "???");
 1213                 goto done;
 1214         }
 1215 
 1216         /* timeouted with IFF_{RUNNING,UP} check */
 1217         if (dp->dad_ns_tcount > dad_maxtry) {
 1218                 nd6log((LOG_INFO, "%s: could not run DAD, driver problem?\n",
 1219                         if_name(ifa->ifa_ifp)));
 1220 
 1221                 TAILQ_REMOVE(&dadq, (struct dadq *)dp, dad_list);
 1222                 FREE(dp, M_IP6NDP);
 1223                 dp = NULL;
 1224                 ifafree(ifa);
 1225                 goto done;
 1226         }
 1227 
 1228         /* Need more checks? */
 1229         if (dp->dad_ns_ocount < dp->dad_count) {
 1230                 /*
 1231                  * We have more NS to go.  Send NS packet for DAD.
 1232                  */
 1233                 nd6_dad_ns_output(dp, ifa);
 1234                 timeout((void (*) __P((void *)))nd6_dad_timer_funnel, (void *)ifa,
 1235                         nd_ifinfo[ifa->ifa_ifp->if_index].retrans * hz / 1000);
 1236         } else {
 1237                 /*
 1238                  * We have transmitted sufficient number of DAD packets.
 1239                  * See what we've got.
 1240                  */
 1241                 int duplicate;
 1242 
 1243                 duplicate = 0;
 1244 
 1245                 if (dp->dad_na_icount) {
 1246                         /*
 1247                          * the check is in nd6_dad_na_input(),
 1248                          * but just in case
 1249                          */
 1250                         duplicate++;
 1251                 }
 1252 
 1253                 if (dp->dad_ns_icount) {
 1254 #if 0 /* heuristics */
 1255                         /*
 1256                          * if
 1257                          * - we have sent many(?) DAD NS, and
 1258                          * - the number of NS we sent equals to the
 1259                          *   number of NS we've got, and
 1260                          * - we've got no NA
 1261                          * we may have a faulty network card/driver which
 1262                          * loops back multicasts to myself.
 1263                          */
 1264                         if (3 < dp->dad_count
 1265                          && dp->dad_ns_icount == dp->dad_count
 1266                          && dp->dad_na_icount == 0) {
 1267                                 log(LOG_INFO, "DAD questionable for %s(%s): "
 1268                                         "network card loops back multicast?\n",
 1269                                         ip6_sprintf(&ia->ia_addr.sin6_addr),
 1270                                         if_name(ifa->ifa_ifp));
 1271                                 /* XXX consider it a duplicate or not? */
 1272                                 /* duplicate++; */
 1273                         } else {
 1274                                 /* We've seen NS, means DAD has failed. */
 1275                                 duplicate++;
 1276                         }
 1277 #else
 1278                         /* We've seen NS, means DAD has failed. */
 1279                         duplicate++;
 1280 #endif
 1281                 }
 1282 
 1283                 if (duplicate) {
 1284                         /* (*dp) will be freed in nd6_dad_duplicated() */
 1285                         dp = NULL;
 1286                         nd6_dad_duplicated(ifa);
 1287                 } else {
 1288                         /*
 1289                          * We are done with DAD.  No NA came, no NS came.
 1290                          * duplicated address found.
 1291                          */
 1292                         ia->ia6_flags &= ~IN6_IFF_TENTATIVE;
 1293 
 1294                         nd6log((LOG_DEBUG,
 1295                             "%s: DAD complete for %s - no duplicates found\n",
 1296                             if_name(ifa->ifa_ifp),
 1297                             ip6_sprintf(&ia->ia_addr.sin6_addr)));
 1298 
 1299                         TAILQ_REMOVE(&dadq, (struct dadq *)dp, dad_list);
 1300                         FREE(dp, M_IP6NDP);
 1301                         dp = NULL;
 1302                         ifafree(ifa);
 1303                 }
 1304         }
 1305 
 1306 done:
 1307         splx(s);
 1308 }
 1309 
 1310 void
 1311 nd6_dad_duplicated(ifa)
 1312         struct ifaddr *ifa;
 1313 {
 1314         struct in6_ifaddr *ia = (struct in6_ifaddr *)ifa;
 1315         struct dadq *dp;
 1316 
 1317         dp = nd6_dad_find(ifa);
 1318         if (dp == NULL) {
 1319                 log(LOG_ERR, "nd6_dad_duplicated: DAD structure not found\n");
 1320                 return;
 1321         }
 1322 
 1323         log(LOG_ERR, "%s: DAD detected duplicate IPv6 address %s: "
 1324             "NS in/out=%d/%d, NA in=%d\n",
 1325             if_name(ifa->ifa_ifp), ip6_sprintf(&ia->ia_addr.sin6_addr),
 1326             dp->dad_ns_icount, dp->dad_ns_ocount, dp->dad_na_icount);
 1327 
 1328         ia->ia6_flags &= ~IN6_IFF_TENTATIVE;
 1329         ia->ia6_flags |= IN6_IFF_DUPLICATED;
 1330 
 1331         /* We are done with DAD, with duplicated address found. (failure) */
 1332         untimeout((void (*) __P((void *)))nd6_dad_timer_funnel, (void *)ifa);
 1333 
 1334 
 1335         log(LOG_ERR, "%s: DAD complete for %s - duplicate found\n",
 1336             if_name(ifa->ifa_ifp), ip6_sprintf(&ia->ia_addr.sin6_addr));
 1337         log(LOG_ERR, "%s: manual intervention required\n",
 1338             if_name(ifa->ifa_ifp));
 1339 
 1340         TAILQ_REMOVE(&dadq, (struct dadq *)dp, dad_list);
 1341         FREE(dp, M_IP6NDP);
 1342         dp = NULL;
 1343         ifafree(ifa);
 1344 }
 1345 
 1346 static void
 1347 nd6_dad_ns_output(dp, ifa)
 1348         struct dadq *dp;
 1349         struct ifaddr *ifa;
 1350 {
 1351         struct in6_ifaddr *ia = (struct in6_ifaddr *)ifa;
 1352         struct ifnet *ifp = ifa->ifa_ifp;
 1353 
 1354         dp->dad_ns_tcount++;
 1355         if ((ifp->if_flags & IFF_UP) == 0) {
 1356 #if 0
 1357                 printf("%s: interface down?\n", if_name(ifp));
 1358 #endif
 1359                 return;
 1360         }
 1361         if ((ifp->if_flags & IFF_RUNNING) == 0) {
 1362 #if 0
 1363                 printf("%s: interface not running?\n", if_name(ifp));
 1364 #endif
 1365                 return;
 1366         }
 1367 
 1368         dp->dad_ns_ocount++;
 1369         nd6_ns_output(ifp, NULL, &ia->ia_addr.sin6_addr, NULL, 1);
 1370 }
 1371 
 1372 static void
 1373 nd6_dad_ns_input(ifa)
 1374         struct ifaddr *ifa;
 1375 {
 1376         struct in6_ifaddr *ia;
 1377         struct ifnet *ifp;
 1378         const struct in6_addr *taddr6;
 1379         struct dadq *dp;
 1380         int duplicate;
 1381 
 1382         if (!ifa)
 1383                 panic("ifa == NULL in nd6_dad_ns_input");
 1384 
 1385         ia = (struct in6_ifaddr *)ifa;
 1386         ifp = ifa->ifa_ifp;
 1387         taddr6 = &ia->ia_addr.sin6_addr;
 1388         duplicate = 0;
 1389         dp = nd6_dad_find(ifa);
 1390 
 1391         /* Quickhack - completely ignore DAD NS packets */
 1392         if (dad_ignore_ns) {
 1393                 nd6log((LOG_INFO,
 1394                     "nd6_dad_ns_input: ignoring DAD NS packet for "
 1395                     "address %s(%s)\n", ip6_sprintf(taddr6),
 1396                     if_name(ifa->ifa_ifp)));
 1397                 return;
 1398         }
 1399 
 1400         /*
 1401          * if I'm yet to start DAD, someone else started using this address
 1402          * first.  I have a duplicate and you win.
 1403          */
 1404         if (!dp || dp->dad_ns_ocount == 0)
 1405                 duplicate++;
 1406 
 1407         /* XXX more checks for loopback situation - see nd6_dad_timer too */
 1408 
 1409         if (duplicate) {
 1410                 dp = NULL;      /* will be freed in nd6_dad_duplicated() */
 1411                 nd6_dad_duplicated(ifa);
 1412         } else {
 1413                 /*
 1414                  * not sure if I got a duplicate.
 1415                  * increment ns count and see what happens.
 1416                  */
 1417                 if (dp)
 1418                         dp->dad_ns_icount++;
 1419         }
 1420 }
 1421 
 1422 static void
 1423 nd6_dad_na_input(ifa)
 1424         struct ifaddr *ifa;
 1425 {
 1426         struct dadq *dp;
 1427 
 1428         if (!ifa)
 1429                 panic("ifa == NULL in nd6_dad_na_input");
 1430 
 1431         dp = nd6_dad_find(ifa);
 1432         if (dp)
 1433                 dp->dad_na_icount++;
 1434 
 1435         /* remove the address. */
 1436         nd6_dad_duplicated(ifa);
 1437 }

Cache object: 397ec9b9fb80196b586f0b5ac978315b


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.