FreeBSD/Linux Kernel Cross Reference
sys/netinet6/in6.c
1 /*-
2 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the project nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 *
29 * $KAME: in6.c,v 1.259 2002/01/21 11:37:50 keiichi Exp $
30 */
31
32 /*-
33 * Copyright (c) 1982, 1986, 1991, 1993
34 * The Regents of the University of California. All rights reserved.
35 *
36 * Redistribution and use in source and binary forms, with or without
37 * modification, are permitted provided that the following conditions
38 * are met:
39 * 1. Redistributions of source code must retain the above copyright
40 * notice, this list of conditions and the following disclaimer.
41 * 2. Redistributions in binary form must reproduce the above copyright
42 * notice, this list of conditions and the following disclaimer in the
43 * documentation and/or other materials provided with the distribution.
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 * @(#)in.c 8.2 (Berkeley) 11/15/93
61 */
62
63 #include <sys/cdefs.h>
64 __FBSDID("$FreeBSD: releng/11.2/sys/netinet6/in6.c 333624 2018-05-15 09:40:52Z hselasky $");
65
66 #include "opt_compat.h"
67 #include "opt_inet.h"
68 #include "opt_inet6.h"
69
70 #include <sys/param.h>
71 #include <sys/eventhandler.h>
72 #include <sys/errno.h>
73 #include <sys/jail.h>
74 #include <sys/malloc.h>
75 #include <sys/socket.h>
76 #include <sys/socketvar.h>
77 #include <sys/sockio.h>
78 #include <sys/systm.h>
79 #include <sys/priv.h>
80 #include <sys/proc.h>
81 #include <sys/time.h>
82 #include <sys/kernel.h>
83 #include <sys/lock.h>
84 #include <sys/rmlock.h>
85 #include <sys/syslog.h>
86
87 #include <net/if.h>
88 #include <net/if_var.h>
89 #include <net/if_types.h>
90 #include <net/route.h>
91 #include <net/if_dl.h>
92 #include <net/vnet.h>
93
94 #include <netinet/in.h>
95 #include <netinet/in_var.h>
96 #include <net/if_llatbl.h>
97 #include <netinet/if_ether.h>
98 #include <netinet/in_systm.h>
99 #include <netinet/ip.h>
100 #include <netinet/in_pcb.h>
101 #include <netinet/ip_carp.h>
102
103 #include <netinet/ip6.h>
104 #include <netinet6/ip6_var.h>
105 #include <netinet6/nd6.h>
106 #include <netinet6/mld6_var.h>
107 #include <netinet6/ip6_mroute.h>
108 #include <netinet6/in6_ifattach.h>
109 #include <netinet6/scope6_var.h>
110 #include <netinet6/in6_fib.h>
111 #include <netinet6/in6_pcb.h>
112
113 VNET_DECLARE(int, icmp6_nodeinfo_oldmcprefix);
114 #define V_icmp6_nodeinfo_oldmcprefix VNET(icmp6_nodeinfo_oldmcprefix)
115
116 /*
117 * Definitions of some costant IP6 addresses.
118 */
119 const struct in6_addr in6addr_any = IN6ADDR_ANY_INIT;
120 const struct in6_addr in6addr_loopback = IN6ADDR_LOOPBACK_INIT;
121 const struct in6_addr in6addr_nodelocal_allnodes =
122 IN6ADDR_NODELOCAL_ALLNODES_INIT;
123 const struct in6_addr in6addr_linklocal_allnodes =
124 IN6ADDR_LINKLOCAL_ALLNODES_INIT;
125 const struct in6_addr in6addr_linklocal_allrouters =
126 IN6ADDR_LINKLOCAL_ALLROUTERS_INIT;
127 const struct in6_addr in6addr_linklocal_allv2routers =
128 IN6ADDR_LINKLOCAL_ALLV2ROUTERS_INIT;
129
130 const struct in6_addr in6mask0 = IN6MASK0;
131 const struct in6_addr in6mask32 = IN6MASK32;
132 const struct in6_addr in6mask64 = IN6MASK64;
133 const struct in6_addr in6mask96 = IN6MASK96;
134 const struct in6_addr in6mask128 = IN6MASK128;
135
136 const struct sockaddr_in6 sa6_any =
137 { sizeof(sa6_any), AF_INET6, 0, 0, IN6ADDR_ANY_INIT, 0 };
138
139 static int in6_notify_ifa(struct ifnet *, struct in6_ifaddr *,
140 struct in6_aliasreq *, int);
141 static void in6_unlink_ifa(struct in6_ifaddr *, struct ifnet *);
142
143 static int in6_validate_ifra(struct ifnet *, struct in6_aliasreq *,
144 struct in6_ifaddr *, int);
145 static struct in6_ifaddr *in6_alloc_ifa(struct ifnet *,
146 struct in6_aliasreq *, int flags);
147 static int in6_update_ifa_internal(struct ifnet *, struct in6_aliasreq *,
148 struct in6_ifaddr *, int, int);
149 static int in6_broadcast_ifa(struct ifnet *, struct in6_aliasreq *,
150 struct in6_ifaddr *, int);
151
152 #define ifa2ia6(ifa) ((struct in6_ifaddr *)(ifa))
153 #define ia62ifa(ia6) (&((ia6)->ia_ifa))
154
155
156 void
157 in6_newaddrmsg(struct in6_ifaddr *ia, int cmd)
158 {
159 struct sockaddr_dl gateway;
160 struct sockaddr_in6 mask, addr;
161 struct rtentry rt;
162 int fibnum;
163
164 /*
165 * initialize for rtmsg generation
166 */
167 bzero(&gateway, sizeof(gateway));
168 gateway.sdl_len = sizeof(gateway);
169 gateway.sdl_family = AF_LINK;
170
171 bzero(&rt, sizeof(rt));
172 rt.rt_gateway = (struct sockaddr *)&gateway;
173 memcpy(&mask, &ia->ia_prefixmask, sizeof(ia->ia_prefixmask));
174 memcpy(&addr, &ia->ia_addr, sizeof(ia->ia_addr));
175 rt_mask(&rt) = (struct sockaddr *)&mask;
176 rt_key(&rt) = (struct sockaddr *)&addr;
177 rt.rt_flags = RTF_HOST | RTF_STATIC;
178 if (cmd == RTM_ADD)
179 rt.rt_flags |= RTF_UP;
180 fibnum = V_rt_add_addr_allfibs ? RT_ALL_FIBS : ia62ifa(ia)->ifa_ifp->if_fib;
181 /* Announce arrival of local address to this FIB. */
182 rt_newaddrmsg_fib(cmd, &ia->ia_ifa, 0, &rt, fibnum);
183 }
184
185 int
186 in6_mask2len(struct in6_addr *mask, u_char *lim0)
187 {
188 int x = 0, y;
189 u_char *lim = lim0, *p;
190
191 /* ignore the scope_id part */
192 if (lim0 == NULL || lim0 - (u_char *)mask > sizeof(*mask))
193 lim = (u_char *)mask + sizeof(*mask);
194 for (p = (u_char *)mask; p < lim; x++, p++) {
195 if (*p != 0xff)
196 break;
197 }
198 y = 0;
199 if (p < lim) {
200 for (y = 0; y < 8; y++) {
201 if ((*p & (0x80 >> y)) == 0)
202 break;
203 }
204 }
205
206 /*
207 * when the limit pointer is given, do a stricter check on the
208 * remaining bits.
209 */
210 if (p < lim) {
211 if (y != 0 && (*p & (0x00ff >> y)) != 0)
212 return (-1);
213 for (p = p + 1; p < lim; p++)
214 if (*p != 0)
215 return (-1);
216 }
217
218 return x * 8 + y;
219 }
220
221 #ifdef COMPAT_FREEBSD32
222 struct in6_ndifreq32 {
223 char ifname[IFNAMSIZ];
224 uint32_t ifindex;
225 };
226 #define SIOCGDEFIFACE32_IN6 _IOWR('i', 86, struct in6_ndifreq32)
227 #endif
228
229 int
230 in6_control(struct socket *so, u_long cmd, caddr_t data,
231 struct ifnet *ifp, struct thread *td)
232 {
233 struct in6_ifreq *ifr = (struct in6_ifreq *)data;
234 struct in6_ifaddr *ia = NULL;
235 struct in6_aliasreq *ifra = (struct in6_aliasreq *)data;
236 struct sockaddr_in6 *sa6;
237 int carp_attached = 0;
238 int error;
239 u_long ocmd = cmd;
240
241 /*
242 * Compat to make pre-10.x ifconfig(8) operable.
243 */
244 if (cmd == OSIOCAIFADDR_IN6)
245 cmd = SIOCAIFADDR_IN6;
246
247 switch (cmd) {
248 case SIOCGETSGCNT_IN6:
249 case SIOCGETMIFCNT_IN6:
250 /*
251 * XXX mrt_ioctl has a 3rd, unused, FIB argument in route.c.
252 * We cannot see how that would be needed, so do not adjust the
253 * KPI blindly; more likely should clean up the IPv4 variant.
254 */
255 return (mrt6_ioctl ? mrt6_ioctl(cmd, data) : EOPNOTSUPP);
256 }
257
258 switch (cmd) {
259 case SIOCAADDRCTL_POLICY:
260 case SIOCDADDRCTL_POLICY:
261 if (td != NULL) {
262 error = priv_check(td, PRIV_NETINET_ADDRCTRL6);
263 if (error)
264 return (error);
265 }
266 return (in6_src_ioctl(cmd, data));
267 }
268
269 if (ifp == NULL)
270 return (EOPNOTSUPP);
271
272 switch (cmd) {
273 case SIOCSNDFLUSH_IN6:
274 case SIOCSPFXFLUSH_IN6:
275 case SIOCSRTRFLUSH_IN6:
276 case SIOCSDEFIFACE_IN6:
277 case SIOCSIFINFO_FLAGS:
278 case SIOCSIFINFO_IN6:
279 if (td != NULL) {
280 error = priv_check(td, PRIV_NETINET_ND6);
281 if (error)
282 return (error);
283 }
284 /* FALLTHROUGH */
285 case OSIOCGIFINFO_IN6:
286 case SIOCGIFINFO_IN6:
287 case SIOCGNBRINFO_IN6:
288 case SIOCGDEFIFACE_IN6:
289 return (nd6_ioctl(cmd, data, ifp));
290
291 #ifdef COMPAT_FREEBSD32
292 case SIOCGDEFIFACE32_IN6:
293 {
294 struct in6_ndifreq ndif;
295 struct in6_ndifreq32 *ndif32;
296
297 error = nd6_ioctl(SIOCGDEFIFACE_IN6, (caddr_t)&ndif,
298 ifp);
299 if (error)
300 return (error);
301 ndif32 = (struct in6_ndifreq32 *)data;
302 ndif32->ifindex = ndif.ifindex;
303 return (0);
304 }
305 #endif
306 }
307
308 switch (cmd) {
309 case SIOCSIFPREFIX_IN6:
310 case SIOCDIFPREFIX_IN6:
311 case SIOCAIFPREFIX_IN6:
312 case SIOCCIFPREFIX_IN6:
313 case SIOCSGIFPREFIX_IN6:
314 case SIOCGIFPREFIX_IN6:
315 log(LOG_NOTICE,
316 "prefix ioctls are now invalidated. "
317 "please use ifconfig.\n");
318 return (EOPNOTSUPP);
319 }
320
321 switch (cmd) {
322 case SIOCSSCOPE6:
323 if (td != NULL) {
324 error = priv_check(td, PRIV_NETINET_SCOPE6);
325 if (error)
326 return (error);
327 }
328 /* FALLTHROUGH */
329 case SIOCGSCOPE6:
330 case SIOCGSCOPE6DEF:
331 return (scope6_ioctl(cmd, data, ifp));
332 }
333
334 /*
335 * Find address for this interface, if it exists.
336 *
337 * In netinet code, we have checked ifra_addr in SIOCSIF*ADDR operation
338 * only, and used the first interface address as the target of other
339 * operations (without checking ifra_addr). This was because netinet
340 * code/API assumed at most 1 interface address per interface.
341 * Since IPv6 allows a node to assign multiple addresses
342 * on a single interface, we almost always look and check the
343 * presence of ifra_addr, and reject invalid ones here.
344 * It also decreases duplicated code among SIOC*_IN6 operations.
345 */
346 switch (cmd) {
347 case SIOCAIFADDR_IN6:
348 case SIOCSIFPHYADDR_IN6:
349 sa6 = &ifra->ifra_addr;
350 break;
351 case SIOCSIFADDR_IN6:
352 case SIOCGIFADDR_IN6:
353 case SIOCSIFDSTADDR_IN6:
354 case SIOCSIFNETMASK_IN6:
355 case SIOCGIFDSTADDR_IN6:
356 case SIOCGIFNETMASK_IN6:
357 case SIOCDIFADDR_IN6:
358 case SIOCGIFPSRCADDR_IN6:
359 case SIOCGIFPDSTADDR_IN6:
360 case SIOCGIFAFLAG_IN6:
361 case SIOCSNDFLUSH_IN6:
362 case SIOCSPFXFLUSH_IN6:
363 case SIOCSRTRFLUSH_IN6:
364 case SIOCGIFALIFETIME_IN6:
365 case SIOCGIFSTAT_IN6:
366 case SIOCGIFSTAT_ICMP6:
367 sa6 = &ifr->ifr_addr;
368 break;
369 case SIOCSIFADDR:
370 case SIOCSIFBRDADDR:
371 case SIOCSIFDSTADDR:
372 case SIOCSIFNETMASK:
373 /*
374 * Although we should pass any non-INET6 ioctl requests
375 * down to driver, we filter some legacy INET requests.
376 * Drivers trust SIOCSIFADDR et al to come from an already
377 * privileged layer, and do not perform any credentials
378 * checks or input validation.
379 */
380 return (EINVAL);
381 default:
382 sa6 = NULL;
383 break;
384 }
385 if (sa6 && sa6->sin6_family == AF_INET6) {
386 if (sa6->sin6_scope_id != 0)
387 error = sa6_embedscope(sa6, 0);
388 else
389 error = in6_setscope(&sa6->sin6_addr, ifp, NULL);
390 if (error != 0)
391 return (error);
392 if (td != NULL && (error = prison_check_ip6(td->td_ucred,
393 &sa6->sin6_addr)) != 0)
394 return (error);
395 ia = in6ifa_ifpwithaddr(ifp, &sa6->sin6_addr);
396 } else
397 ia = NULL;
398
399 switch (cmd) {
400 case SIOCSIFADDR_IN6:
401 case SIOCSIFDSTADDR_IN6:
402 case SIOCSIFNETMASK_IN6:
403 /*
404 * Since IPv6 allows a node to assign multiple addresses
405 * on a single interface, SIOCSIFxxx ioctls are deprecated.
406 */
407 /* we decided to obsolete this command (20000704) */
408 error = EINVAL;
409 goto out;
410
411 case SIOCDIFADDR_IN6:
412 /*
413 * for IPv4, we look for existing in_ifaddr here to allow
414 * "ifconfig if0 delete" to remove the first IPv4 address on
415 * the interface. For IPv6, as the spec allows multiple
416 * interface address from the day one, we consider "remove the
417 * first one" semantics to be not preferable.
418 */
419 if (ia == NULL) {
420 error = EADDRNOTAVAIL;
421 goto out;
422 }
423 /* FALLTHROUGH */
424 case SIOCAIFADDR_IN6:
425 /*
426 * We always require users to specify a valid IPv6 address for
427 * the corresponding operation.
428 */
429 if (ifra->ifra_addr.sin6_family != AF_INET6 ||
430 ifra->ifra_addr.sin6_len != sizeof(struct sockaddr_in6)) {
431 error = EAFNOSUPPORT;
432 goto out;
433 }
434
435 if (td != NULL) {
436 error = priv_check(td, (cmd == SIOCDIFADDR_IN6) ?
437 PRIV_NET_DELIFADDR : PRIV_NET_ADDIFADDR);
438 if (error)
439 goto out;
440 }
441 /* FALLTHROUGH */
442 case SIOCGIFSTAT_IN6:
443 case SIOCGIFSTAT_ICMP6:
444 if (ifp->if_afdata[AF_INET6] == NULL) {
445 error = EPFNOSUPPORT;
446 goto out;
447 }
448 break;
449
450 case SIOCGIFADDR_IN6:
451 /* This interface is basically deprecated. use SIOCGIFCONF. */
452 /* FALLTHROUGH */
453 case SIOCGIFAFLAG_IN6:
454 case SIOCGIFNETMASK_IN6:
455 case SIOCGIFDSTADDR_IN6:
456 case SIOCGIFALIFETIME_IN6:
457 /* must think again about its semantics */
458 if (ia == NULL) {
459 error = EADDRNOTAVAIL;
460 goto out;
461 }
462 break;
463 }
464
465 switch (cmd) {
466 case SIOCGIFADDR_IN6:
467 ifr->ifr_addr = ia->ia_addr;
468 if ((error = sa6_recoverscope(&ifr->ifr_addr)) != 0)
469 goto out;
470 break;
471
472 case SIOCGIFDSTADDR_IN6:
473 if ((ifp->if_flags & IFF_POINTOPOINT) == 0) {
474 error = EINVAL;
475 goto out;
476 }
477 /*
478 * XXX: should we check if ifa_dstaddr is NULL and return
479 * an error?
480 */
481 ifr->ifr_dstaddr = ia->ia_dstaddr;
482 if ((error = sa6_recoverscope(&ifr->ifr_dstaddr)) != 0)
483 goto out;
484 break;
485
486 case SIOCGIFNETMASK_IN6:
487 ifr->ifr_addr = ia->ia_prefixmask;
488 break;
489
490 case SIOCGIFAFLAG_IN6:
491 ifr->ifr_ifru.ifru_flags6 = ia->ia6_flags;
492 break;
493
494 case SIOCGIFSTAT_IN6:
495 COUNTER_ARRAY_COPY(((struct in6_ifextra *)
496 ifp->if_afdata[AF_INET6])->in6_ifstat,
497 &ifr->ifr_ifru.ifru_stat,
498 sizeof(struct in6_ifstat) / sizeof(uint64_t));
499 break;
500
501 case SIOCGIFSTAT_ICMP6:
502 COUNTER_ARRAY_COPY(((struct in6_ifextra *)
503 ifp->if_afdata[AF_INET6])->icmp6_ifstat,
504 &ifr->ifr_ifru.ifru_icmp6stat,
505 sizeof(struct icmp6_ifstat) / sizeof(uint64_t));
506 break;
507
508 case SIOCGIFALIFETIME_IN6:
509 ifr->ifr_ifru.ifru_lifetime = ia->ia6_lifetime;
510 if (ia->ia6_lifetime.ia6t_vltime != ND6_INFINITE_LIFETIME) {
511 time_t maxexpire;
512 struct in6_addrlifetime *retlt =
513 &ifr->ifr_ifru.ifru_lifetime;
514
515 /*
516 * XXX: adjust expiration time assuming time_t is
517 * signed.
518 */
519 maxexpire = (-1) &
520 ~((time_t)1 << ((sizeof(maxexpire) * 8) - 1));
521 if (ia->ia6_lifetime.ia6t_vltime <
522 maxexpire - ia->ia6_updatetime) {
523 retlt->ia6t_expire = ia->ia6_updatetime +
524 ia->ia6_lifetime.ia6t_vltime;
525 } else
526 retlt->ia6t_expire = maxexpire;
527 }
528 if (ia->ia6_lifetime.ia6t_pltime != ND6_INFINITE_LIFETIME) {
529 time_t maxexpire;
530 struct in6_addrlifetime *retlt =
531 &ifr->ifr_ifru.ifru_lifetime;
532
533 /*
534 * XXX: adjust expiration time assuming time_t is
535 * signed.
536 */
537 maxexpire = (-1) &
538 ~((time_t)1 << ((sizeof(maxexpire) * 8) - 1));
539 if (ia->ia6_lifetime.ia6t_pltime <
540 maxexpire - ia->ia6_updatetime) {
541 retlt->ia6t_preferred = ia->ia6_updatetime +
542 ia->ia6_lifetime.ia6t_pltime;
543 } else
544 retlt->ia6t_preferred = maxexpire;
545 }
546 break;
547
548 case SIOCAIFADDR_IN6:
549 {
550 struct nd_prefixctl pr0;
551 struct nd_prefix *pr;
552
553 /*
554 * first, make or update the interface address structure,
555 * and link it to the list.
556 */
557 if ((error = in6_update_ifa(ifp, ifra, ia, 0)) != 0)
558 goto out;
559 if (ia != NULL)
560 ifa_free(&ia->ia_ifa);
561 if ((ia = in6ifa_ifpwithaddr(ifp, &ifra->ifra_addr.sin6_addr))
562 == NULL) {
563 /*
564 * this can happen when the user specify the 0 valid
565 * lifetime.
566 */
567 break;
568 }
569
570 if (cmd == ocmd && ifra->ifra_vhid > 0) {
571 if (carp_attach_p != NULL)
572 error = (*carp_attach_p)(&ia->ia_ifa,
573 ifra->ifra_vhid);
574 else
575 error = EPROTONOSUPPORT;
576 if (error)
577 goto out;
578 else
579 carp_attached = 1;
580 }
581
582 /*
583 * then, make the prefix on-link on the interface.
584 * XXX: we'd rather create the prefix before the address, but
585 * we need at least one address to install the corresponding
586 * interface route, so we configure the address first.
587 */
588
589 /*
590 * convert mask to prefix length (prefixmask has already
591 * been validated in in6_update_ifa().
592 */
593 bzero(&pr0, sizeof(pr0));
594 pr0.ndpr_ifp = ifp;
595 pr0.ndpr_plen = in6_mask2len(&ifra->ifra_prefixmask.sin6_addr,
596 NULL);
597 if (pr0.ndpr_plen == 128) {
598 /* we don't need to install a host route. */
599 goto aifaddr_out;
600 }
601 pr0.ndpr_prefix = ifra->ifra_addr;
602 /* apply the mask for safety. */
603 IN6_MASK_ADDR(&pr0.ndpr_prefix.sin6_addr,
604 &ifra->ifra_prefixmask.sin6_addr);
605
606 /*
607 * XXX: since we don't have an API to set prefix (not address)
608 * lifetimes, we just use the same lifetimes as addresses.
609 * The (temporarily) installed lifetimes can be overridden by
610 * later advertised RAs (when accept_rtadv is non 0), which is
611 * an intended behavior.
612 */
613 pr0.ndpr_raf_onlink = 1; /* should be configurable? */
614 pr0.ndpr_raf_auto =
615 ((ifra->ifra_flags & IN6_IFF_AUTOCONF) != 0);
616 pr0.ndpr_vltime = ifra->ifra_lifetime.ia6t_vltime;
617 pr0.ndpr_pltime = ifra->ifra_lifetime.ia6t_pltime;
618
619 /* add the prefix if not yet. */
620 if ((pr = nd6_prefix_lookup(&pr0)) == NULL) {
621 /*
622 * nd6_prelist_add will install the corresponding
623 * interface route.
624 */
625 if ((error = nd6_prelist_add(&pr0, NULL, &pr)) != 0) {
626 if (carp_attached)
627 (*carp_detach_p)(&ia->ia_ifa);
628 goto out;
629 }
630 }
631
632 /* relate the address to the prefix */
633 if (ia->ia6_ndpr == NULL) {
634 ia->ia6_ndpr = pr;
635 pr->ndpr_addrcnt++;
636
637 /*
638 * If this is the first autoconf address from the
639 * prefix, create a temporary address as well
640 * (when required).
641 */
642 if ((ia->ia6_flags & IN6_IFF_AUTOCONF) &&
643 V_ip6_use_tempaddr && pr->ndpr_addrcnt == 1) {
644 int e;
645 if ((e = in6_tmpifadd(ia, 1, 0)) != 0) {
646 log(LOG_NOTICE, "in6_control: failed "
647 "to create a temporary address, "
648 "errno=%d\n", e);
649 }
650 }
651 }
652 nd6_prefix_rele(pr);
653
654 /*
655 * this might affect the status of autoconfigured addresses,
656 * that is, this address might make other addresses detached.
657 */
658 pfxlist_onlink_check();
659
660 aifaddr_out:
661 /*
662 * Try to clear the flag when a new IPv6 address is added
663 * onto an IFDISABLED interface and it succeeds.
664 */
665 if (ND_IFINFO(ifp)->flags & ND6_IFF_IFDISABLED) {
666 struct in6_ndireq nd;
667
668 memset(&nd, 0, sizeof(nd));
669 nd.ndi.flags = ND_IFINFO(ifp)->flags;
670 nd.ndi.flags &= ~ND6_IFF_IFDISABLED;
671 if (nd6_ioctl(SIOCSIFINFO_FLAGS, (caddr_t)&nd, ifp) < 0)
672 log(LOG_NOTICE, "SIOCAIFADDR_IN6: "
673 "SIOCSIFINFO_FLAGS for -ifdisabled "
674 "failed.");
675 /*
676 * Ignore failure of clearing the flag intentionally.
677 * The failure means address duplication was detected.
678 */
679 }
680 break;
681 }
682
683 case SIOCDIFADDR_IN6:
684 {
685 struct nd_prefix *pr;
686
687 /*
688 * If the address being deleted is the only one that owns
689 * the corresponding prefix, expire the prefix as well.
690 * XXX: theoretically, we don't have to worry about such
691 * relationship, since we separate the address management
692 * and the prefix management. We do this, however, to provide
693 * as much backward compatibility as possible in terms of
694 * the ioctl operation.
695 * Note that in6_purgeaddr() will decrement ndpr_addrcnt.
696 */
697 pr = ia->ia6_ndpr;
698 in6_purgeaddr(&ia->ia_ifa);
699 if (pr != NULL && pr->ndpr_addrcnt == 0) {
700 ND6_WLOCK();
701 nd6_prefix_unlink(pr, NULL);
702 ND6_WUNLOCK();
703 nd6_prefix_del(pr);
704 }
705 EVENTHANDLER_INVOKE(ifaddr_event, ifp);
706 break;
707 }
708
709 default:
710 if (ifp->if_ioctl == NULL) {
711 error = EOPNOTSUPP;
712 goto out;
713 }
714 error = (*ifp->if_ioctl)(ifp, cmd, data);
715 goto out;
716 }
717
718 error = 0;
719 out:
720 if (ia != NULL)
721 ifa_free(&ia->ia_ifa);
722 return (error);
723 }
724
725
726 /*
727 * Join necessary multicast groups. Factored out from in6_update_ifa().
728 * This entire work should only be done once, for the default FIB.
729 */
730 static int
731 in6_update_ifa_join_mc(struct ifnet *ifp, struct in6_aliasreq *ifra,
732 struct in6_ifaddr *ia, int flags, struct in6_multi **in6m_sol)
733 {
734 char ip6buf[INET6_ADDRSTRLEN];
735 struct in6_addr mltaddr;
736 struct in6_multi_mship *imm;
737 int delay, error;
738
739 KASSERT(in6m_sol != NULL, ("%s: in6m_sol is NULL", __func__));
740
741 /* Join solicited multicast addr for new host id. */
742 bzero(&mltaddr, sizeof(struct in6_addr));
743 mltaddr.s6_addr32[0] = IPV6_ADDR_INT32_MLL;
744 mltaddr.s6_addr32[2] = htonl(1);
745 mltaddr.s6_addr32[3] = ifra->ifra_addr.sin6_addr.s6_addr32[3];
746 mltaddr.s6_addr8[12] = 0xff;
747 if ((error = in6_setscope(&mltaddr, ifp, NULL)) != 0) {
748 /* XXX: should not happen */
749 log(LOG_ERR, "%s: in6_setscope failed\n", __func__);
750 goto cleanup;
751 }
752 delay = error = 0;
753 if ((flags & IN6_IFAUPDATE_DADDELAY)) {
754 /*
755 * We need a random delay for DAD on the address being
756 * configured. It also means delaying transmission of the
757 * corresponding MLD report to avoid report collision.
758 * [RFC 4861, Section 6.3.7]
759 */
760 delay = arc4random() % (MAX_RTR_SOLICITATION_DELAY * hz);
761 }
762 imm = in6_joingroup(ifp, &mltaddr, &error, delay);
763 if (imm == NULL) {
764 nd6log((LOG_WARNING, "%s: in6_joingroup failed for %s on %s "
765 "(errno=%d)\n", __func__, ip6_sprintf(ip6buf, &mltaddr),
766 if_name(ifp), error));
767 goto cleanup;
768 }
769 LIST_INSERT_HEAD(&ia->ia6_memberships, imm, i6mm_chain);
770 *in6m_sol = imm->i6mm_maddr;
771
772 /*
773 * Join link-local all-nodes address.
774 */
775 mltaddr = in6addr_linklocal_allnodes;
776 if ((error = in6_setscope(&mltaddr, ifp, NULL)) != 0)
777 goto cleanup; /* XXX: should not fail */
778
779 imm = in6_joingroup(ifp, &mltaddr, &error, 0);
780 if (imm == NULL) {
781 nd6log((LOG_WARNING, "%s: in6_joingroup failed for %s on %s "
782 "(errno=%d)\n", __func__, ip6_sprintf(ip6buf, &mltaddr),
783 if_name(ifp), error));
784 goto cleanup;
785 }
786 LIST_INSERT_HEAD(&ia->ia6_memberships, imm, i6mm_chain);
787
788 /*
789 * Join node information group address.
790 */
791 delay = 0;
792 if ((flags & IN6_IFAUPDATE_DADDELAY)) {
793 /*
794 * The spec does not say anything about delay for this group,
795 * but the same logic should apply.
796 */
797 delay = arc4random() % (MAX_RTR_SOLICITATION_DELAY * hz);
798 }
799 if (in6_nigroup(ifp, NULL, -1, &mltaddr) == 0) {
800 /* XXX jinmei */
801 imm = in6_joingroup(ifp, &mltaddr, &error, delay);
802 if (imm == NULL)
803 nd6log((LOG_WARNING,
804 "%s: in6_joingroup failed for %s on %s "
805 "(errno=%d)\n", __func__, ip6_sprintf(ip6buf,
806 &mltaddr), if_name(ifp), error));
807 /* XXX not very fatal, go on... */
808 else
809 LIST_INSERT_HEAD(&ia->ia6_memberships, imm, i6mm_chain);
810 }
811 if (V_icmp6_nodeinfo_oldmcprefix &&
812 in6_nigroup_oldmcprefix(ifp, NULL, -1, &mltaddr) == 0) {
813 imm = in6_joingroup(ifp, &mltaddr, &error, delay);
814 if (imm == NULL)
815 nd6log((LOG_WARNING,
816 "%s: in6_joingroup failed for %s on %s "
817 "(errno=%d)\n", __func__, ip6_sprintf(ip6buf,
818 &mltaddr), if_name(ifp), error));
819 /* XXX not very fatal, go on... */
820 else
821 LIST_INSERT_HEAD(&ia->ia6_memberships, imm, i6mm_chain);
822 }
823
824 /*
825 * Join interface-local all-nodes address.
826 * (ff01::1%ifN, and ff01::%ifN/32)
827 */
828 mltaddr = in6addr_nodelocal_allnodes;
829 if ((error = in6_setscope(&mltaddr, ifp, NULL)) != 0)
830 goto cleanup; /* XXX: should not fail */
831
832 imm = in6_joingroup(ifp, &mltaddr, &error, 0);
833 if (imm == NULL) {
834 nd6log((LOG_WARNING, "%s: in6_joingroup failed for %s on %s "
835 "(errno=%d)\n", __func__, ip6_sprintf(ip6buf,
836 &mltaddr), if_name(ifp), error));
837 goto cleanup;
838 }
839 LIST_INSERT_HEAD(&ia->ia6_memberships, imm, i6mm_chain);
840
841 cleanup:
842 return (error);
843 }
844
845 /*
846 * Update parameters of an IPv6 interface address.
847 * If necessary, a new entry is created and linked into address chains.
848 * This function is separated from in6_control().
849 */
850 int
851 in6_update_ifa(struct ifnet *ifp, struct in6_aliasreq *ifra,
852 struct in6_ifaddr *ia, int flags)
853 {
854 int error, hostIsNew = 0;
855
856 if ((error = in6_validate_ifra(ifp, ifra, ia, flags)) != 0)
857 return (error);
858
859 if (ia == NULL) {
860 hostIsNew = 1;
861 if ((ia = in6_alloc_ifa(ifp, ifra, flags)) == NULL)
862 return (ENOBUFS);
863 }
864
865 error = in6_update_ifa_internal(ifp, ifra, ia, hostIsNew, flags);
866 if (error != 0) {
867 if (hostIsNew != 0) {
868 in6_unlink_ifa(ia, ifp);
869 ifa_free(&ia->ia_ifa);
870 }
871 return (error);
872 }
873
874 if (hostIsNew)
875 error = in6_broadcast_ifa(ifp, ifra, ia, flags);
876
877 return (error);
878 }
879
880 /*
881 * Fill in basic IPv6 address request info.
882 */
883 void
884 in6_prepare_ifra(struct in6_aliasreq *ifra, const struct in6_addr *addr,
885 const struct in6_addr *mask)
886 {
887
888 memset(ifra, 0, sizeof(struct in6_aliasreq));
889
890 ifra->ifra_addr.sin6_family = AF_INET6;
891 ifra->ifra_addr.sin6_len = sizeof(struct sockaddr_in6);
892 if (addr != NULL)
893 ifra->ifra_addr.sin6_addr = *addr;
894
895 ifra->ifra_prefixmask.sin6_family = AF_INET6;
896 ifra->ifra_prefixmask.sin6_len = sizeof(struct sockaddr_in6);
897 if (mask != NULL)
898 ifra->ifra_prefixmask.sin6_addr = *mask;
899 }
900
901 static int
902 in6_validate_ifra(struct ifnet *ifp, struct in6_aliasreq *ifra,
903 struct in6_ifaddr *ia, int flags)
904 {
905 int plen = -1;
906 struct sockaddr_in6 dst6;
907 struct in6_addrlifetime *lt;
908 char ip6buf[INET6_ADDRSTRLEN];
909
910 /* Validate parameters */
911 if (ifp == NULL || ifra == NULL) /* this maybe redundant */
912 return (EINVAL);
913
914 /*
915 * The destination address for a p2p link must have a family
916 * of AF_UNSPEC or AF_INET6.
917 */
918 if ((ifp->if_flags & IFF_POINTOPOINT) != 0 &&
919 ifra->ifra_dstaddr.sin6_family != AF_INET6 &&
920 ifra->ifra_dstaddr.sin6_family != AF_UNSPEC)
921 return (EAFNOSUPPORT);
922
923 /*
924 * Validate address
925 */
926 if (ifra->ifra_addr.sin6_len != sizeof(struct sockaddr_in6) ||
927 ifra->ifra_addr.sin6_family != AF_INET6)
928 return (EINVAL);
929
930 /*
931 * validate ifra_prefixmask. don't check sin6_family, netmask
932 * does not carry fields other than sin6_len.
933 */
934 if (ifra->ifra_prefixmask.sin6_len > sizeof(struct sockaddr_in6))
935 return (EINVAL);
936 /*
937 * Because the IPv6 address architecture is classless, we require
938 * users to specify a (non 0) prefix length (mask) for a new address.
939 * We also require the prefix (when specified) mask is valid, and thus
940 * reject a non-consecutive mask.
941 */
942 if (ia == NULL && ifra->ifra_prefixmask.sin6_len == 0)
943 return (EINVAL);
944 if (ifra->ifra_prefixmask.sin6_len != 0) {
945 plen = in6_mask2len(&ifra->ifra_prefixmask.sin6_addr,
946 (u_char *)&ifra->ifra_prefixmask +
947 ifra->ifra_prefixmask.sin6_len);
948 if (plen <= 0)
949 return (EINVAL);
950 } else {
951 /*
952 * In this case, ia must not be NULL. We just use its prefix
953 * length.
954 */
955 plen = in6_mask2len(&ia->ia_prefixmask.sin6_addr, NULL);
956 }
957 /*
958 * If the destination address on a p2p interface is specified,
959 * and the address is a scoped one, validate/set the scope
960 * zone identifier.
961 */
962 dst6 = ifra->ifra_dstaddr;
963 if ((ifp->if_flags & (IFF_POINTOPOINT|IFF_LOOPBACK)) != 0 &&
964 (dst6.sin6_family == AF_INET6)) {
965 struct in6_addr in6_tmp;
966 u_int32_t zoneid;
967
968 in6_tmp = dst6.sin6_addr;
969 if (in6_setscope(&in6_tmp, ifp, &zoneid))
970 return (EINVAL); /* XXX: should be impossible */
971
972 if (dst6.sin6_scope_id != 0) {
973 if (dst6.sin6_scope_id != zoneid)
974 return (EINVAL);
975 } else /* user omit to specify the ID. */
976 dst6.sin6_scope_id = zoneid;
977
978 /* convert into the internal form */
979 if (sa6_embedscope(&dst6, 0))
980 return (EINVAL); /* XXX: should be impossible */
981 }
982 /* Modify original ifra_dstaddr to reflect changes */
983 ifra->ifra_dstaddr = dst6;
984
985 /*
986 * The destination address can be specified only for a p2p or a
987 * loopback interface. If specified, the corresponding prefix length
988 * must be 128.
989 */
990 if (ifra->ifra_dstaddr.sin6_family == AF_INET6) {
991 if ((ifp->if_flags & (IFF_POINTOPOINT|IFF_LOOPBACK)) == 0) {
992 /* XXX: noisy message */
993 nd6log((LOG_INFO, "in6_update_ifa: a destination can "
994 "be specified for a p2p or a loopback IF only\n"));
995 return (EINVAL);
996 }
997 if (plen != 128) {
998 nd6log((LOG_INFO, "in6_update_ifa: prefixlen should "
999 "be 128 when dstaddr is specified\n"));
1000 return (EINVAL);
1001 }
1002 }
1003 /* lifetime consistency check */
1004 lt = &ifra->ifra_lifetime;
1005 if (lt->ia6t_pltime > lt->ia6t_vltime)
1006 return (EINVAL);
1007 if (lt->ia6t_vltime == 0) {
1008 /*
1009 * the following log might be noisy, but this is a typical
1010 * configuration mistake or a tool's bug.
1011 */
1012 nd6log((LOG_INFO,
1013 "in6_update_ifa: valid lifetime is 0 for %s\n",
1014 ip6_sprintf(ip6buf, &ifra->ifra_addr.sin6_addr)));
1015
1016 if (ia == NULL)
1017 return (0); /* there's nothing to do */
1018 }
1019
1020 /* Check prefix mask */
1021 if (ia != NULL && ifra->ifra_prefixmask.sin6_len != 0) {
1022 /*
1023 * We prohibit changing the prefix length of an existing
1024 * address, because
1025 * + such an operation should be rare in IPv6, and
1026 * + the operation would confuse prefix management.
1027 */
1028 if (ia->ia_prefixmask.sin6_len != 0 &&
1029 in6_mask2len(&ia->ia_prefixmask.sin6_addr, NULL) != plen) {
1030 nd6log((LOG_INFO, "in6_validate_ifa: the prefix length "
1031 "of an existing %s address should not be changed\n",
1032 ip6_sprintf(ip6buf, &ia->ia_addr.sin6_addr)));
1033
1034 return (EINVAL);
1035 }
1036 }
1037
1038 return (0);
1039 }
1040
1041
1042 /*
1043 * Allocate a new ifaddr and link it into chains.
1044 */
1045 static struct in6_ifaddr *
1046 in6_alloc_ifa(struct ifnet *ifp, struct in6_aliasreq *ifra, int flags)
1047 {
1048 struct in6_ifaddr *ia;
1049
1050 /*
1051 * When in6_alloc_ifa() is called in a process of a received
1052 * RA, it is called under an interrupt context. So, we should
1053 * call malloc with M_NOWAIT.
1054 */
1055 ia = (struct in6_ifaddr *)ifa_alloc(sizeof(*ia), M_NOWAIT);
1056 if (ia == NULL)
1057 return (NULL);
1058 LIST_INIT(&ia->ia6_memberships);
1059 /* Initialize the address and masks, and put time stamp */
1060 ia->ia_ifa.ifa_addr = (struct sockaddr *)&ia->ia_addr;
1061 ia->ia_addr.sin6_family = AF_INET6;
1062 ia->ia_addr.sin6_len = sizeof(ia->ia_addr);
1063 /* XXX: Can we assign ,sin6_addr and skip the rest? */
1064 ia->ia_addr = ifra->ifra_addr;
1065 ia->ia6_createtime = time_uptime;
1066 if ((ifp->if_flags & (IFF_POINTOPOINT | IFF_LOOPBACK)) != 0) {
1067 /*
1068 * Some functions expect that ifa_dstaddr is not
1069 * NULL for p2p interfaces.
1070 */
1071 ia->ia_ifa.ifa_dstaddr =
1072 (struct sockaddr *)&ia->ia_dstaddr;
1073 } else {
1074 ia->ia_ifa.ifa_dstaddr = NULL;
1075 }
1076
1077 /* set prefix mask if any */
1078 ia->ia_ifa.ifa_netmask = (struct sockaddr *)&ia->ia_prefixmask;
1079 if (ifra->ifra_prefixmask.sin6_len != 0) {
1080 ia->ia_prefixmask.sin6_family = AF_INET6;
1081 ia->ia_prefixmask.sin6_len = ifra->ifra_prefixmask.sin6_len;
1082 ia->ia_prefixmask.sin6_addr = ifra->ifra_prefixmask.sin6_addr;
1083 }
1084
1085 ia->ia_ifp = ifp;
1086 ifa_ref(&ia->ia_ifa); /* if_addrhead */
1087 IF_ADDR_WLOCK(ifp);
1088 TAILQ_INSERT_TAIL(&ifp->if_addrhead, &ia->ia_ifa, ifa_link);
1089 IF_ADDR_WUNLOCK(ifp);
1090
1091 ifa_ref(&ia->ia_ifa); /* in6_ifaddrhead */
1092 IN6_IFADDR_WLOCK();
1093 TAILQ_INSERT_TAIL(&V_in6_ifaddrhead, ia, ia_link);
1094 LIST_INSERT_HEAD(IN6ADDR_HASH(&ia->ia_addr.sin6_addr), ia, ia6_hash);
1095 IN6_IFADDR_WUNLOCK();
1096
1097 return (ia);
1098 }
1099
1100 /*
1101 * Update/configure interface address parameters:
1102 *
1103 * 1) Update lifetime
1104 * 2) Update interface metric ad flags
1105 * 3) Notify other subsystems
1106 */
1107 static int
1108 in6_update_ifa_internal(struct ifnet *ifp, struct in6_aliasreq *ifra,
1109 struct in6_ifaddr *ia, int hostIsNew, int flags)
1110 {
1111 int error;
1112
1113 /* update timestamp */
1114 ia->ia6_updatetime = time_uptime;
1115
1116 /*
1117 * Set lifetimes. We do not refer to ia6t_expire and ia6t_preferred
1118 * to see if the address is deprecated or invalidated, but initialize
1119 * these members for applications.
1120 */
1121 ia->ia6_lifetime = ifra->ifra_lifetime;
1122 if (ia->ia6_lifetime.ia6t_vltime != ND6_INFINITE_LIFETIME) {
1123 ia->ia6_lifetime.ia6t_expire =
1124 time_uptime + ia->ia6_lifetime.ia6t_vltime;
1125 } else
1126 ia->ia6_lifetime.ia6t_expire = 0;
1127 if (ia->ia6_lifetime.ia6t_pltime != ND6_INFINITE_LIFETIME) {
1128 ia->ia6_lifetime.ia6t_preferred =
1129 time_uptime + ia->ia6_lifetime.ia6t_pltime;
1130 } else
1131 ia->ia6_lifetime.ia6t_preferred = 0;
1132
1133 /*
1134 * backward compatibility - if IN6_IFF_DEPRECATED is set from the
1135 * userland, make it deprecated.
1136 */
1137 if ((ifra->ifra_flags & IN6_IFF_DEPRECATED) != 0) {
1138 ia->ia6_lifetime.ia6t_pltime = 0;
1139 ia->ia6_lifetime.ia6t_preferred = time_uptime;
1140 }
1141
1142 /*
1143 * configure address flags.
1144 */
1145 ia->ia6_flags = ifra->ifra_flags;
1146
1147 /*
1148 * Make the address tentative before joining multicast addresses,
1149 * so that corresponding MLD responses would not have a tentative
1150 * source address.
1151 */
1152 ia->ia6_flags &= ~IN6_IFF_DUPLICATED; /* safety */
1153
1154 /*
1155 * DAD should be performed for an new address or addresses on
1156 * an interface with ND6_IFF_IFDISABLED.
1157 */
1158 if (in6if_do_dad(ifp) &&
1159 (hostIsNew || (ND_IFINFO(ifp)->flags & ND6_IFF_IFDISABLED)))
1160 ia->ia6_flags |= IN6_IFF_TENTATIVE;
1161
1162 /* notify other subsystems */
1163 error = in6_notify_ifa(ifp, ia, ifra, hostIsNew);
1164
1165 return (error);
1166 }
1167
1168 /*
1169 * Do link-level ifa job:
1170 * 1) Add lle entry for added address
1171 * 2) Notifies routing socket users about new address
1172 * 3) join appropriate multicast group
1173 * 4) start DAD if enabled
1174 */
1175 static int
1176 in6_broadcast_ifa(struct ifnet *ifp, struct in6_aliasreq *ifra,
1177 struct in6_ifaddr *ia, int flags)
1178 {
1179 struct in6_multi *in6m_sol;
1180 int error = 0;
1181
1182 /* Add local address to lltable, if necessary (ex. on p2p link). */
1183 if ((error = nd6_add_ifa_lle(ia)) != 0) {
1184 in6_purgeaddr(&ia->ia_ifa);
1185 ifa_free(&ia->ia_ifa);
1186 return (error);
1187 }
1188
1189 /* Join necessary multicast groups. */
1190 in6m_sol = NULL;
1191 if ((ifp->if_flags & IFF_MULTICAST) != 0) {
1192 error = in6_update_ifa_join_mc(ifp, ifra, ia, flags, &in6m_sol);
1193 if (error != 0) {
1194 in6_purgeaddr(&ia->ia_ifa);
1195 ifa_free(&ia->ia_ifa);
1196 return (error);
1197 }
1198 }
1199
1200 /* Perform DAD, if the address is TENTATIVE. */
1201 if ((ia->ia6_flags & IN6_IFF_TENTATIVE)) {
1202 int delay, mindelay, maxdelay;
1203
1204 delay = 0;
1205 if ((flags & IN6_IFAUPDATE_DADDELAY)) {
1206 /*
1207 * We need to impose a delay before sending an NS
1208 * for DAD. Check if we also needed a delay for the
1209 * corresponding MLD message. If we did, the delay
1210 * should be larger than the MLD delay (this could be
1211 * relaxed a bit, but this simple logic is at least
1212 * safe).
1213 * XXX: Break data hiding guidelines and look at
1214 * state for the solicited multicast group.
1215 */
1216 mindelay = 0;
1217 if (in6m_sol != NULL &&
1218 in6m_sol->in6m_state == MLD_REPORTING_MEMBER) {
1219 mindelay = in6m_sol->in6m_timer;
1220 }
1221 maxdelay = MAX_RTR_SOLICITATION_DELAY * hz;
1222 if (maxdelay - mindelay == 0)
1223 delay = 0;
1224 else {
1225 delay =
1226 (arc4random() % (maxdelay - mindelay)) +
1227 mindelay;
1228 }
1229 }
1230 nd6_dad_start((struct ifaddr *)ia, delay);
1231 }
1232
1233 in6_newaddrmsg(ia, RTM_ADD);
1234 ifa_free(&ia->ia_ifa);
1235 return (error);
1236 }
1237
1238 void
1239 in6_purgeaddr(struct ifaddr *ifa)
1240 {
1241 struct ifnet *ifp = ifa->ifa_ifp;
1242 struct in6_ifaddr *ia = (struct in6_ifaddr *) ifa;
1243 struct in6_multi_mship *imm;
1244 int plen, error;
1245
1246 if (ifa->ifa_carp)
1247 (*carp_detach_p)(ifa);
1248
1249 /*
1250 * Remove the loopback route to the interface address.
1251 * The check for the current setting of "nd6_useloopback"
1252 * is not needed.
1253 */
1254 if (ia->ia_flags & IFA_RTSELF) {
1255 error = ifa_del_loopback_route((struct ifaddr *)ia,
1256 (struct sockaddr *)&ia->ia_addr);
1257 if (error == 0)
1258 ia->ia_flags &= ~IFA_RTSELF;
1259 }
1260
1261 /* stop DAD processing */
1262 nd6_dad_stop(ifa);
1263
1264 /* Leave multicast groups. */
1265 while ((imm = LIST_FIRST(&ia->ia6_memberships)) != NULL) {
1266 LIST_REMOVE(imm, i6mm_chain);
1267 in6_leavegroup(imm);
1268 }
1269 plen = in6_mask2len(&ia->ia_prefixmask.sin6_addr, NULL); /* XXX */
1270 if ((ia->ia_flags & IFA_ROUTE) && plen == 128) {
1271 error = rtinit(&(ia->ia_ifa), RTM_DELETE, ia->ia_flags |
1272 (ia->ia_dstaddr.sin6_family == AF_INET6 ? RTF_HOST : 0));
1273 if (error != 0)
1274 log(LOG_INFO, "%s: err=%d, destination address delete "
1275 "failed\n", __func__, error);
1276 ia->ia_flags &= ~IFA_ROUTE;
1277 }
1278
1279 in6_newaddrmsg(ia, RTM_DELETE);
1280 in6_unlink_ifa(ia, ifp);
1281 }
1282
1283 static void
1284 in6_unlink_ifa(struct in6_ifaddr *ia, struct ifnet *ifp)
1285 {
1286 char ip6buf[INET6_ADDRSTRLEN];
1287 int remove_lle;
1288
1289 IF_ADDR_WLOCK(ifp);
1290 TAILQ_REMOVE(&ifp->if_addrhead, &ia->ia_ifa, ifa_link);
1291 IF_ADDR_WUNLOCK(ifp);
1292 ifa_free(&ia->ia_ifa); /* if_addrhead */
1293
1294 /*
1295 * Defer the release of what might be the last reference to the
1296 * in6_ifaddr so that it can't be freed before the remainder of the
1297 * cleanup.
1298 */
1299 IN6_IFADDR_WLOCK();
1300 TAILQ_REMOVE(&V_in6_ifaddrhead, ia, ia_link);
1301 LIST_REMOVE(ia, ia6_hash);
1302 IN6_IFADDR_WUNLOCK();
1303
1304 /*
1305 * Release the reference to the base prefix. There should be a
1306 * positive reference.
1307 */
1308 remove_lle = 0;
1309 if (ia->ia6_ndpr == NULL) {
1310 nd6log((LOG_NOTICE,
1311 "in6_unlink_ifa: autoconf'ed address "
1312 "%s has no prefix\n", ip6_sprintf(ip6buf, IA6_IN6(ia))));
1313 } else {
1314 ia->ia6_ndpr->ndpr_addrcnt--;
1315 /* Do not delete lles within prefix if refcont != 0 */
1316 if (ia->ia6_ndpr->ndpr_addrcnt == 0)
1317 remove_lle = 1;
1318 ia->ia6_ndpr = NULL;
1319 }
1320
1321 nd6_rem_ifa_lle(ia, remove_lle);
1322
1323 /*
1324 * Also, if the address being removed is autoconf'ed, call
1325 * pfxlist_onlink_check() since the release might affect the status of
1326 * other (detached) addresses.
1327 */
1328 if ((ia->ia6_flags & IN6_IFF_AUTOCONF)) {
1329 pfxlist_onlink_check();
1330 }
1331 ifa_free(&ia->ia_ifa); /* in6_ifaddrhead */
1332 }
1333
1334 /*
1335 * Notifies other subsystems about address change/arrival:
1336 * 1) Notifies device handler on the first IPv6 address assignment
1337 * 2) Handle routing table changes for P2P links and route
1338 * 3) Handle routing table changes for address host route
1339 */
1340 static int
1341 in6_notify_ifa(struct ifnet *ifp, struct in6_ifaddr *ia,
1342 struct in6_aliasreq *ifra, int hostIsNew)
1343 {
1344 int error = 0, plen, ifacount = 0;
1345 struct ifaddr *ifa;
1346 struct sockaddr_in6 *pdst;
1347 char ip6buf[INET6_ADDRSTRLEN];
1348
1349 /*
1350 * Give the interface a chance to initialize
1351 * if this is its first address,
1352 */
1353 if (hostIsNew != 0) {
1354 IF_ADDR_RLOCK(ifp);
1355 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1356 if (ifa->ifa_addr->sa_family != AF_INET6)
1357 continue;
1358 ifacount++;
1359 }
1360 IF_ADDR_RUNLOCK(ifp);
1361 }
1362
1363 if (ifacount <= 1 && ifp->if_ioctl) {
1364 error = (*ifp->if_ioctl)(ifp, SIOCSIFADDR, (caddr_t)ia);
1365 if (error)
1366 goto done;
1367 }
1368
1369 /*
1370 * If a new destination address is specified, scrub the old one and
1371 * install the new destination. Note that the interface must be
1372 * p2p or loopback.
1373 */
1374 pdst = &ifra->ifra_dstaddr;
1375 if (pdst->sin6_family == AF_INET6 &&
1376 !IN6_ARE_ADDR_EQUAL(&pdst->sin6_addr, &ia->ia_dstaddr.sin6_addr)) {
1377 if ((ia->ia_flags & IFA_ROUTE) != 0 &&
1378 (rtinit(&(ia->ia_ifa), (int)RTM_DELETE, RTF_HOST) != 0)) {
1379 nd6log((LOG_ERR, "in6_update_ifa_internal: failed to "
1380 "remove a route to the old destination: %s\n",
1381 ip6_sprintf(ip6buf, &ia->ia_addr.sin6_addr)));
1382 /* proceed anyway... */
1383 } else
1384 ia->ia_flags &= ~IFA_ROUTE;
1385 ia->ia_dstaddr = *pdst;
1386 }
1387
1388 /*
1389 * If a new destination address is specified for a point-to-point
1390 * interface, install a route to the destination as an interface
1391 * direct route.
1392 * XXX: the logic below rejects assigning multiple addresses on a p2p
1393 * interface that share the same destination.
1394 */
1395 plen = in6_mask2len(&ia->ia_prefixmask.sin6_addr, NULL); /* XXX */
1396 if (!(ia->ia_flags & IFA_ROUTE) && plen == 128 &&
1397 ia->ia_dstaddr.sin6_family == AF_INET6) {
1398 int rtflags = RTF_UP | RTF_HOST;
1399 /*
1400 * Handle the case for ::1 .
1401 */
1402 if (ifp->if_flags & IFF_LOOPBACK)
1403 ia->ia_flags |= IFA_RTSELF;
1404 error = rtinit(&ia->ia_ifa, RTM_ADD, ia->ia_flags | rtflags);
1405 if (error)
1406 goto done;
1407 ia->ia_flags |= IFA_ROUTE;
1408 }
1409
1410 /*
1411 * add a loopback route to self if not exists
1412 */
1413 if (!(ia->ia_flags & IFA_RTSELF) && V_nd6_useloopback) {
1414 error = ifa_add_loopback_route((struct ifaddr *)ia,
1415 (struct sockaddr *)&ia->ia_addr);
1416 if (error == 0)
1417 ia->ia_flags |= IFA_RTSELF;
1418 }
1419 done:
1420 WITNESS_WARN(WARN_GIANTOK | WARN_SLEEPOK, NULL,
1421 "Invoking IPv6 network device address event may sleep");
1422
1423 EVENTHANDLER_INVOKE(ifaddr_event, ifp);
1424
1425 return (error);
1426 }
1427
1428 /*
1429 * Find an IPv6 interface link-local address specific to an interface.
1430 * ifaddr is returned referenced.
1431 */
1432 struct in6_ifaddr *
1433 in6ifa_ifpforlinklocal(struct ifnet *ifp, int ignoreflags)
1434 {
1435 struct ifaddr *ifa;
1436
1437 IF_ADDR_RLOCK(ifp);
1438 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1439 if (ifa->ifa_addr->sa_family != AF_INET6)
1440 continue;
1441 if (IN6_IS_ADDR_LINKLOCAL(IFA_IN6(ifa))) {
1442 if ((((struct in6_ifaddr *)ifa)->ia6_flags &
1443 ignoreflags) != 0)
1444 continue;
1445 ifa_ref(ifa);
1446 break;
1447 }
1448 }
1449 IF_ADDR_RUNLOCK(ifp);
1450
1451 return ((struct in6_ifaddr *)ifa);
1452 }
1453
1454
1455 /*
1456 * find the interface address corresponding to a given IPv6 address.
1457 * ifaddr is returned referenced.
1458 */
1459 struct in6_ifaddr *
1460 in6ifa_ifwithaddr(const struct in6_addr *addr, uint32_t zoneid)
1461 {
1462 struct rm_priotracker in6_ifa_tracker;
1463 struct in6_ifaddr *ia;
1464
1465 IN6_IFADDR_RLOCK(&in6_ifa_tracker);
1466 LIST_FOREACH(ia, IN6ADDR_HASH(addr), ia6_hash) {
1467 if (IN6_ARE_ADDR_EQUAL(IA6_IN6(ia), addr)) {
1468 if (zoneid != 0 &&
1469 zoneid != ia->ia_addr.sin6_scope_id)
1470 continue;
1471 ifa_ref(&ia->ia_ifa);
1472 break;
1473 }
1474 }
1475 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1476 return (ia);
1477 }
1478
1479 /*
1480 * find the internet address corresponding to a given interface and address.
1481 * ifaddr is returned referenced.
1482 */
1483 struct in6_ifaddr *
1484 in6ifa_ifpwithaddr(struct ifnet *ifp, const struct in6_addr *addr)
1485 {
1486 struct ifaddr *ifa;
1487
1488 IF_ADDR_RLOCK(ifp);
1489 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1490 if (ifa->ifa_addr->sa_family != AF_INET6)
1491 continue;
1492 if (IN6_ARE_ADDR_EQUAL(addr, IFA_IN6(ifa))) {
1493 ifa_ref(ifa);
1494 break;
1495 }
1496 }
1497 IF_ADDR_RUNLOCK(ifp);
1498
1499 return ((struct in6_ifaddr *)ifa);
1500 }
1501
1502 /*
1503 * Find a link-local scoped address on ifp and return it if any.
1504 */
1505 struct in6_ifaddr *
1506 in6ifa_llaonifp(struct ifnet *ifp)
1507 {
1508 struct sockaddr_in6 *sin6;
1509 struct ifaddr *ifa;
1510
1511 if (ND_IFINFO(ifp)->flags & ND6_IFF_IFDISABLED)
1512 return (NULL);
1513 IF_ADDR_RLOCK(ifp);
1514 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1515 if (ifa->ifa_addr->sa_family != AF_INET6)
1516 continue;
1517 sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
1518 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr) ||
1519 IN6_IS_ADDR_MC_INTFACELOCAL(&sin6->sin6_addr) ||
1520 IN6_IS_ADDR_MC_NODELOCAL(&sin6->sin6_addr))
1521 break;
1522 }
1523 IF_ADDR_RUNLOCK(ifp);
1524
1525 return ((struct in6_ifaddr *)ifa);
1526 }
1527
1528 /*
1529 * Convert IP6 address to printable (loggable) representation. Caller
1530 * has to make sure that ip6buf is at least INET6_ADDRSTRLEN long.
1531 */
1532 static char digits[] = "0123456789abcdef";
1533 char *
1534 ip6_sprintf(char *ip6buf, const struct in6_addr *addr)
1535 {
1536 int i, cnt = 0, maxcnt = 0, idx = 0, index = 0;
1537 char *cp;
1538 const u_int16_t *a = (const u_int16_t *)addr;
1539 const u_int8_t *d;
1540 int dcolon = 0, zero = 0;
1541
1542 cp = ip6buf;
1543
1544 for (i = 0; i < 8; i++) {
1545 if (*(a + i) == 0) {
1546 cnt++;
1547 if (cnt == 1)
1548 idx = i;
1549 }
1550 else if (maxcnt < cnt) {
1551 maxcnt = cnt;
1552 index = idx;
1553 cnt = 0;
1554 }
1555 }
1556 if (maxcnt < cnt) {
1557 maxcnt = cnt;
1558 index = idx;
1559 }
1560
1561 for (i = 0; i < 8; i++) {
1562 if (dcolon == 1) {
1563 if (*a == 0) {
1564 if (i == 7)
1565 *cp++ = ':';
1566 a++;
1567 continue;
1568 } else
1569 dcolon = 2;
1570 }
1571 if (*a == 0) {
1572 if (dcolon == 0 && *(a + 1) == 0 && i == index) {
1573 if (i == 0)
1574 *cp++ = ':';
1575 *cp++ = ':';
1576 dcolon = 1;
1577 } else {
1578 *cp++ = '';
1579 *cp++ = ':';
1580 }
1581 a++;
1582 continue;
1583 }
1584 d = (const u_char *)a;
1585 /* Try to eliminate leading zeros in printout like in :0001. */
1586 zero = 1;
1587 *cp = digits[*d >> 4];
1588 if (*cp != '') {
1589 zero = 0;
1590 cp++;
1591 }
1592 *cp = digits[*d++ & 0xf];
1593 if (zero == 0 || (*cp != '')) {
1594 zero = 0;
1595 cp++;
1596 }
1597 *cp = digits[*d >> 4];
1598 if (zero == 0 || (*cp != '')) {
1599 zero = 0;
1600 cp++;
1601 }
1602 *cp++ = digits[*d & 0xf];
1603 *cp++ = ':';
1604 a++;
1605 }
1606 *--cp = '\0';
1607 return (ip6buf);
1608 }
1609
1610 int
1611 in6_localaddr(struct in6_addr *in6)
1612 {
1613 struct rm_priotracker in6_ifa_tracker;
1614 struct in6_ifaddr *ia;
1615
1616 if (IN6_IS_ADDR_LOOPBACK(in6) || IN6_IS_ADDR_LINKLOCAL(in6))
1617 return 1;
1618
1619 IN6_IFADDR_RLOCK(&in6_ifa_tracker);
1620 TAILQ_FOREACH(ia, &V_in6_ifaddrhead, ia_link) {
1621 if (IN6_ARE_MASKED_ADDR_EQUAL(in6, &ia->ia_addr.sin6_addr,
1622 &ia->ia_prefixmask.sin6_addr)) {
1623 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1624 return 1;
1625 }
1626 }
1627 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1628
1629 return (0);
1630 }
1631
1632 /*
1633 * Return 1 if an internet address is for the local host and configured
1634 * on one of its interfaces.
1635 */
1636 int
1637 in6_localip(struct in6_addr *in6)
1638 {
1639 struct rm_priotracker in6_ifa_tracker;
1640 struct in6_ifaddr *ia;
1641
1642 IN6_IFADDR_RLOCK(&in6_ifa_tracker);
1643 LIST_FOREACH(ia, IN6ADDR_HASH(in6), ia6_hash) {
1644 if (IN6_ARE_ADDR_EQUAL(in6, &ia->ia_addr.sin6_addr)) {
1645 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1646 return (1);
1647 }
1648 }
1649 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1650 return (0);
1651 }
1652
1653 /*
1654 * Return 1 if an internet address is configured on an interface.
1655 */
1656 int
1657 in6_ifhasaddr(struct ifnet *ifp, struct in6_addr *addr)
1658 {
1659 struct in6_addr in6;
1660 struct ifaddr *ifa;
1661 struct in6_ifaddr *ia6;
1662
1663 in6 = *addr;
1664 if (in6_clearscope(&in6))
1665 return (0);
1666 in6_setscope(&in6, ifp, NULL);
1667
1668 IF_ADDR_RLOCK(ifp);
1669 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1670 if (ifa->ifa_addr->sa_family != AF_INET6)
1671 continue;
1672 ia6 = (struct in6_ifaddr *)ifa;
1673 if (IN6_ARE_ADDR_EQUAL(&ia6->ia_addr.sin6_addr, &in6)) {
1674 IF_ADDR_RUNLOCK(ifp);
1675 return (1);
1676 }
1677 }
1678 IF_ADDR_RUNLOCK(ifp);
1679
1680 return (0);
1681 }
1682
1683 int
1684 in6_is_addr_deprecated(struct sockaddr_in6 *sa6)
1685 {
1686 struct rm_priotracker in6_ifa_tracker;
1687 struct in6_ifaddr *ia;
1688
1689 IN6_IFADDR_RLOCK(&in6_ifa_tracker);
1690 LIST_FOREACH(ia, IN6ADDR_HASH(&sa6->sin6_addr), ia6_hash) {
1691 if (IN6_ARE_ADDR_EQUAL(IA6_IN6(ia), &sa6->sin6_addr)) {
1692 if (ia->ia6_flags & IN6_IFF_DEPRECATED) {
1693 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1694 return (1); /* true */
1695 }
1696 break;
1697 }
1698 }
1699 IN6_IFADDR_RUNLOCK(&in6_ifa_tracker);
1700
1701 return (0); /* false */
1702 }
1703
1704 /*
1705 * return length of part which dst and src are equal
1706 * hard coding...
1707 */
1708 int
1709 in6_matchlen(struct in6_addr *src, struct in6_addr *dst)
1710 {
1711 int match = 0;
1712 u_char *s = (u_char *)src, *d = (u_char *)dst;
1713 u_char *lim = s + 16, r;
1714
1715 while (s < lim)
1716 if ((r = (*d++ ^ *s++)) != 0) {
1717 while (r < 128) {
1718 match++;
1719 r <<= 1;
1720 }
1721 break;
1722 } else
1723 match += 8;
1724 return match;
1725 }
1726
1727 /* XXX: to be scope conscious */
1728 int
1729 in6_are_prefix_equal(struct in6_addr *p1, struct in6_addr *p2, int len)
1730 {
1731 int bytelen, bitlen;
1732
1733 /* sanity check */
1734 if (0 > len || len > 128) {
1735 log(LOG_ERR, "in6_are_prefix_equal: invalid prefix length(%d)\n",
1736 len);
1737 return (0);
1738 }
1739
1740 bytelen = len / 8;
1741 bitlen = len % 8;
1742
1743 if (bcmp(&p1->s6_addr, &p2->s6_addr, bytelen))
1744 return (0);
1745 if (bitlen != 0 &&
1746 p1->s6_addr[bytelen] >> (8 - bitlen) !=
1747 p2->s6_addr[bytelen] >> (8 - bitlen))
1748 return (0);
1749
1750 return (1);
1751 }
1752
1753 void
1754 in6_prefixlen2mask(struct in6_addr *maskp, int len)
1755 {
1756 u_char maskarray[8] = {0x80, 0xc0, 0xe0, 0xf0, 0xf8, 0xfc, 0xfe, 0xff};
1757 int bytelen, bitlen, i;
1758
1759 /* sanity check */
1760 if (0 > len || len > 128) {
1761 log(LOG_ERR, "in6_prefixlen2mask: invalid prefix length(%d)\n",
1762 len);
1763 return;
1764 }
1765
1766 bzero(maskp, sizeof(*maskp));
1767 bytelen = len / 8;
1768 bitlen = len % 8;
1769 for (i = 0; i < bytelen; i++)
1770 maskp->s6_addr[i] = 0xff;
1771 if (bitlen)
1772 maskp->s6_addr[bytelen] = maskarray[bitlen - 1];
1773 }
1774
1775 /*
1776 * return the best address out of the same scope. if no address was
1777 * found, return the first valid address from designated IF.
1778 */
1779 struct in6_ifaddr *
1780 in6_ifawithifp(struct ifnet *ifp, struct in6_addr *dst)
1781 {
1782 int dst_scope = in6_addrscope(dst), blen = -1, tlen;
1783 struct ifaddr *ifa;
1784 struct in6_ifaddr *besta = NULL;
1785 struct in6_ifaddr *dep[2]; /* last-resort: deprecated */
1786
1787 dep[0] = dep[1] = NULL;
1788
1789 /*
1790 * We first look for addresses in the same scope.
1791 * If there is one, return it.
1792 * If two or more, return one which matches the dst longest.
1793 * If none, return one of global addresses assigned other ifs.
1794 */
1795 IF_ADDR_RLOCK(ifp);
1796 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1797 if (ifa->ifa_addr->sa_family != AF_INET6)
1798 continue;
1799 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_ANYCAST)
1800 continue; /* XXX: is there any case to allow anycast? */
1801 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_NOTREADY)
1802 continue; /* don't use this interface */
1803 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DETACHED)
1804 continue;
1805 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DEPRECATED) {
1806 if (V_ip6_use_deprecated)
1807 dep[0] = (struct in6_ifaddr *)ifa;
1808 continue;
1809 }
1810
1811 if (dst_scope == in6_addrscope(IFA_IN6(ifa))) {
1812 /*
1813 * call in6_matchlen() as few as possible
1814 */
1815 if (besta) {
1816 if (blen == -1)
1817 blen = in6_matchlen(&besta->ia_addr.sin6_addr, dst);
1818 tlen = in6_matchlen(IFA_IN6(ifa), dst);
1819 if (tlen > blen) {
1820 blen = tlen;
1821 besta = (struct in6_ifaddr *)ifa;
1822 }
1823 } else
1824 besta = (struct in6_ifaddr *)ifa;
1825 }
1826 }
1827 if (besta) {
1828 ifa_ref(&besta->ia_ifa);
1829 IF_ADDR_RUNLOCK(ifp);
1830 return (besta);
1831 }
1832
1833 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1834 if (ifa->ifa_addr->sa_family != AF_INET6)
1835 continue;
1836 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_ANYCAST)
1837 continue; /* XXX: is there any case to allow anycast? */
1838 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_NOTREADY)
1839 continue; /* don't use this interface */
1840 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DETACHED)
1841 continue;
1842 if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DEPRECATED) {
1843 if (V_ip6_use_deprecated)
1844 dep[1] = (struct in6_ifaddr *)ifa;
1845 continue;
1846 }
1847
1848 if (ifa != NULL)
1849 ifa_ref(ifa);
1850 IF_ADDR_RUNLOCK(ifp);
1851 return (struct in6_ifaddr *)ifa;
1852 }
1853
1854 /* use the last-resort values, that are, deprecated addresses */
1855 if (dep[0]) {
1856 ifa_ref((struct ifaddr *)dep[0]);
1857 IF_ADDR_RUNLOCK(ifp);
1858 return dep[0];
1859 }
1860 if (dep[1]) {
1861 ifa_ref((struct ifaddr *)dep[1]);
1862 IF_ADDR_RUNLOCK(ifp);
1863 return dep[1];
1864 }
1865
1866 IF_ADDR_RUNLOCK(ifp);
1867 return NULL;
1868 }
1869
1870 /*
1871 * perform DAD when interface becomes IFF_UP.
1872 */
1873 void
1874 in6_if_up(struct ifnet *ifp)
1875 {
1876 struct ifaddr *ifa;
1877 struct in6_ifaddr *ia;
1878
1879 IF_ADDR_RLOCK(ifp);
1880 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
1881 if (ifa->ifa_addr->sa_family != AF_INET6)
1882 continue;
1883 ia = (struct in6_ifaddr *)ifa;
1884 if (ia->ia6_flags & IN6_IFF_TENTATIVE) {
1885 /*
1886 * The TENTATIVE flag was likely set by hand
1887 * beforehand, implicitly indicating the need for DAD.
1888 * We may be able to skip the random delay in this
1889 * case, but we impose delays just in case.
1890 */
1891 nd6_dad_start(ifa,
1892 arc4random() % (MAX_RTR_SOLICITATION_DELAY * hz));
1893 }
1894 }
1895 IF_ADDR_RUNLOCK(ifp);
1896
1897 /*
1898 * special cases, like 6to4, are handled in in6_ifattach
1899 */
1900 in6_ifattach(ifp, NULL);
1901 }
1902
1903 int
1904 in6if_do_dad(struct ifnet *ifp)
1905 {
1906 if ((ifp->if_flags & IFF_LOOPBACK) != 0)
1907 return (0);
1908
1909 if ((ND_IFINFO(ifp)->flags & ND6_IFF_IFDISABLED) ||
1910 (ND_IFINFO(ifp)->flags & ND6_IFF_NO_DAD))
1911 return (0);
1912
1913 /*
1914 * Our DAD routine requires the interface up and running.
1915 * However, some interfaces can be up before the RUNNING
1916 * status. Additionally, users may try to assign addresses
1917 * before the interface becomes up (or running).
1918 * This function returns EAGAIN in that case.
1919 * The caller should mark "tentative" on the address instead of
1920 * performing DAD immediately.
1921 */
1922 if (!((ifp->if_flags & IFF_UP) &&
1923 (ifp->if_drv_flags & IFF_DRV_RUNNING)))
1924 return (EAGAIN);
1925
1926 return (1);
1927 }
1928
1929 /*
1930 * Calculate max IPv6 MTU through all the interfaces and store it
1931 * to in6_maxmtu.
1932 */
1933 void
1934 in6_setmaxmtu(void)
1935 {
1936 unsigned long maxmtu = 0;
1937 struct ifnet *ifp;
1938
1939 IFNET_RLOCK_NOSLEEP();
1940 TAILQ_FOREACH(ifp, &V_ifnet, if_link) {
1941 /* this function can be called during ifnet initialization */
1942 if (!ifp->if_afdata[AF_INET6])
1943 continue;
1944 if ((ifp->if_flags & IFF_LOOPBACK) == 0 &&
1945 IN6_LINKMTU(ifp) > maxmtu)
1946 maxmtu = IN6_LINKMTU(ifp);
1947 }
1948 IFNET_RUNLOCK_NOSLEEP();
1949 if (maxmtu) /* update only when maxmtu is positive */
1950 V_in6_maxmtu = maxmtu;
1951 }
1952
1953 /*
1954 * Provide the length of interface identifiers to be used for the link attached
1955 * to the given interface. The length should be defined in "IPv6 over
1956 * xxx-link" document. Note that address architecture might also define
1957 * the length for a particular set of address prefixes, regardless of the
1958 * link type. As clarified in rfc2462bis, those two definitions should be
1959 * consistent, and those really are as of August 2004.
1960 */
1961 int
1962 in6_if2idlen(struct ifnet *ifp)
1963 {
1964 switch (ifp->if_type) {
1965 case IFT_ETHER: /* RFC2464 */
1966 case IFT_PROPVIRTUAL: /* XXX: no RFC. treat it as ether */
1967 case IFT_L2VLAN: /* ditto */
1968 case IFT_IEEE80211: /* ditto */
1969 case IFT_BRIDGE: /* bridge(4) only does Ethernet-like links */
1970 case IFT_INFINIBAND:
1971 return (64);
1972 case IFT_FDDI: /* RFC2467 */
1973 return (64);
1974 case IFT_ISO88025: /* RFC2470 (IPv6 over Token Ring) */
1975 return (64);
1976 case IFT_PPP: /* RFC2472 */
1977 return (64);
1978 case IFT_ARCNET: /* RFC2497 */
1979 return (64);
1980 case IFT_FRELAY: /* RFC2590 */
1981 return (64);
1982 case IFT_IEEE1394: /* RFC3146 */
1983 return (64);
1984 case IFT_GIF:
1985 return (64); /* draft-ietf-v6ops-mech-v2-07 */
1986 case IFT_LOOP:
1987 return (64); /* XXX: is this really correct? */
1988 default:
1989 /*
1990 * Unknown link type:
1991 * It might be controversial to use the today's common constant
1992 * of 64 for these cases unconditionally. For full compliance,
1993 * we should return an error in this case. On the other hand,
1994 * if we simply miss the standard for the link type or a new
1995 * standard is defined for a new link type, the IFID length
1996 * is very likely to be the common constant. As a compromise,
1997 * we always use the constant, but make an explicit notice
1998 * indicating the "unknown" case.
1999 */
2000 printf("in6_if2idlen: unknown link type (%d)\n", ifp->if_type);
2001 return (64);
2002 }
2003 }
2004
2005 #include <sys/sysctl.h>
2006
2007 struct in6_llentry {
2008 struct llentry base;
2009 };
2010
2011 #define IN6_LLTBL_DEFAULT_HSIZE 32
2012 #define IN6_LLTBL_HASH(k, h) \
2013 (((((((k >> 8) ^ k) >> 8) ^ k) >> 8) ^ k) & ((h) - 1))
2014
2015 /*
2016 * Do actual deallocation of @lle.
2017 */
2018 static void
2019 in6_lltable_destroy_lle_unlocked(struct llentry *lle)
2020 {
2021
2022 LLE_LOCK_DESTROY(lle);
2023 LLE_REQ_DESTROY(lle);
2024 free(lle, M_LLTABLE);
2025 }
2026
2027 /*
2028 * Called by LLE_FREE_LOCKED when number of references
2029 * drops to zero.
2030 */
2031 static void
2032 in6_lltable_destroy_lle(struct llentry *lle)
2033 {
2034
2035 LLE_WUNLOCK(lle);
2036 in6_lltable_destroy_lle_unlocked(lle);
2037 }
2038
2039 static struct llentry *
2040 in6_lltable_new(const struct in6_addr *addr6, u_int flags)
2041 {
2042 struct in6_llentry *lle;
2043
2044 lle = malloc(sizeof(struct in6_llentry), M_LLTABLE, M_NOWAIT | M_ZERO);
2045 if (lle == NULL) /* NB: caller generates msg */
2046 return NULL;
2047
2048 lle->base.r_l3addr.addr6 = *addr6;
2049 lle->base.lle_refcnt = 1;
2050 lle->base.lle_free = in6_lltable_destroy_lle;
2051 LLE_LOCK_INIT(&lle->base);
2052 LLE_REQ_INIT(&lle->base);
2053 callout_init(&lle->base.lle_timer, 1);
2054
2055 return (&lle->base);
2056 }
2057
2058 static int
2059 in6_lltable_match_prefix(const struct sockaddr *saddr,
2060 const struct sockaddr *smask, u_int flags, struct llentry *lle)
2061 {
2062 const struct in6_addr *addr, *mask, *lle_addr;
2063
2064 addr = &((const struct sockaddr_in6 *)saddr)->sin6_addr;
2065 mask = &((const struct sockaddr_in6 *)smask)->sin6_addr;
2066 lle_addr = &lle->r_l3addr.addr6;
2067
2068 if (IN6_ARE_MASKED_ADDR_EQUAL(lle_addr, addr, mask) == 0)
2069 return (0);
2070
2071 if (lle->la_flags & LLE_IFADDR) {
2072
2073 /*
2074 * Delete LLE_IFADDR records IFF address & flag matches.
2075 * Note that addr is the interface address within prefix
2076 * being matched.
2077 */
2078 if (IN6_ARE_ADDR_EQUAL(addr, lle_addr) &&
2079 (flags & LLE_STATIC) != 0)
2080 return (1);
2081 return (0);
2082 }
2083
2084 /* flags & LLE_STATIC means deleting both dynamic and static entries */
2085 if ((flags & LLE_STATIC) || !(lle->la_flags & LLE_STATIC))
2086 return (1);
2087
2088 return (0);
2089 }
2090
2091 static void
2092 in6_lltable_free_entry(struct lltable *llt, struct llentry *lle)
2093 {
2094 struct ifnet *ifp;
2095
2096 LLE_WLOCK_ASSERT(lle);
2097 KASSERT(llt != NULL, ("lltable is NULL"));
2098
2099 /* Unlink entry from table */
2100 if ((lle->la_flags & LLE_LINKED) != 0) {
2101
2102 ifp = llt->llt_ifp;
2103 IF_AFDATA_WLOCK_ASSERT(ifp);
2104 lltable_unlink_entry(llt, lle);
2105 }
2106
2107 if (callout_stop(&lle->lle_timer) > 0)
2108 LLE_REMREF(lle);
2109
2110 llentry_free(lle);
2111 }
2112
2113 static int
2114 in6_lltable_rtcheck(struct ifnet *ifp,
2115 u_int flags,
2116 const struct sockaddr *l3addr)
2117 {
2118 const struct sockaddr_in6 *sin6;
2119 struct nhop6_basic nh6;
2120 struct in6_addr dst;
2121 uint32_t scopeid;
2122 int error;
2123 char ip6buf[INET6_ADDRSTRLEN];
2124 int fibnum;
2125
2126 KASSERT(l3addr->sa_family == AF_INET6,
2127 ("sin_family %d", l3addr->sa_family));
2128
2129 sin6 = (const struct sockaddr_in6 *)l3addr;
2130 in6_splitscope(&sin6->sin6_addr, &dst, &scopeid);
2131 fibnum = V_rt_add_addr_allfibs ? RT_DEFAULT_FIB : ifp->if_fib;
2132 error = fib6_lookup_nh_basic(fibnum, &dst, scopeid, 0, 0, &nh6);
2133 if (error != 0 || (nh6.nh_flags & NHF_GATEWAY) || nh6.nh_ifp != ifp) {
2134 struct ifaddr *ifa;
2135 /*
2136 * Create an ND6 cache for an IPv6 neighbor
2137 * that is not covered by our own prefix.
2138 */
2139 ifa = ifaof_ifpforaddr(l3addr, ifp);
2140 if (ifa != NULL) {
2141 ifa_free(ifa);
2142 return 0;
2143 }
2144 log(LOG_INFO, "IPv6 address: \"%s\" is not on the network\n",
2145 ip6_sprintf(ip6buf, &sin6->sin6_addr));
2146 return EINVAL;
2147 }
2148 return 0;
2149 }
2150
2151 static inline uint32_t
2152 in6_lltable_hash_dst(const struct in6_addr *dst, uint32_t hsize)
2153 {
2154
2155 return (IN6_LLTBL_HASH(dst->s6_addr32[3], hsize));
2156 }
2157
2158 static uint32_t
2159 in6_lltable_hash(const struct llentry *lle, uint32_t hsize)
2160 {
2161
2162 return (in6_lltable_hash_dst(&lle->r_l3addr.addr6, hsize));
2163 }
2164
2165 static void
2166 in6_lltable_fill_sa_entry(const struct llentry *lle, struct sockaddr *sa)
2167 {
2168 struct sockaddr_in6 *sin6;
2169
2170 sin6 = (struct sockaddr_in6 *)sa;
2171 bzero(sin6, sizeof(*sin6));
2172 sin6->sin6_family = AF_INET6;
2173 sin6->sin6_len = sizeof(*sin6);
2174 sin6->sin6_addr = lle->r_l3addr.addr6;
2175 }
2176
2177 static inline struct llentry *
2178 in6_lltable_find_dst(struct lltable *llt, const struct in6_addr *dst)
2179 {
2180 struct llentry *lle;
2181 struct llentries *lleh;
2182 u_int hashidx;
2183
2184 hashidx = in6_lltable_hash_dst(dst, llt->llt_hsize);
2185 lleh = &llt->lle_head[hashidx];
2186 LIST_FOREACH(lle, lleh, lle_next) {
2187 if (lle->la_flags & LLE_DELETED)
2188 continue;
2189 if (IN6_ARE_ADDR_EQUAL(&lle->r_l3addr.addr6, dst))
2190 break;
2191 }
2192
2193 return (lle);
2194 }
2195
2196 static void
2197 in6_lltable_delete_entry(struct lltable *llt, struct llentry *lle)
2198 {
2199
2200 lle->la_flags |= LLE_DELETED;
2201 EVENTHANDLER_INVOKE(lle_event, lle, LLENTRY_DELETED);
2202 #ifdef DIAGNOSTIC
2203 log(LOG_INFO, "ifaddr cache = %p is deleted\n", lle);
2204 #endif
2205 llentry_free(lle);
2206 }
2207
2208 static struct llentry *
2209 in6_lltable_alloc(struct lltable *llt, u_int flags,
2210 const struct sockaddr *l3addr)
2211 {
2212 const struct sockaddr_in6 *sin6 = (const struct sockaddr_in6 *)l3addr;
2213 struct ifnet *ifp = llt->llt_ifp;
2214 struct llentry *lle;
2215 char linkhdr[LLE_MAX_LINKHDR];
2216 size_t linkhdrsize;
2217 int lladdr_off;
2218
2219 KASSERT(l3addr->sa_family == AF_INET6,
2220 ("sin_family %d", l3addr->sa_family));
2221
2222 /*
2223 * A route that covers the given address must have
2224 * been installed 1st because we are doing a resolution,
2225 * verify this.
2226 */
2227 if (!(flags & LLE_IFADDR) &&
2228 in6_lltable_rtcheck(ifp, flags, l3addr) != 0)
2229 return (NULL);
2230
2231 lle = in6_lltable_new(&sin6->sin6_addr, flags);
2232 if (lle == NULL) {
2233 log(LOG_INFO, "lla_lookup: new lle malloc failed\n");
2234 return (NULL);
2235 }
2236 lle->la_flags = flags;
2237 if ((flags & LLE_IFADDR) == LLE_IFADDR) {
2238 linkhdrsize = LLE_MAX_LINKHDR;
2239 if (lltable_calc_llheader(ifp, AF_INET6, IF_LLADDR(ifp),
2240 linkhdr, &linkhdrsize, &lladdr_off) != 0) {
2241 in6_lltable_destroy_lle_unlocked(lle);
2242 return (NULL);
2243 }
2244 lltable_set_entry_addr(ifp, lle, linkhdr, linkhdrsize,
2245 lladdr_off);
2246 lle->la_flags |= LLE_STATIC;
2247 }
2248
2249 if ((lle->la_flags & LLE_STATIC) != 0)
2250 lle->ln_state = ND6_LLINFO_REACHABLE;
2251
2252 return (lle);
2253 }
2254
2255 static struct llentry *
2256 in6_lltable_lookup(struct lltable *llt, u_int flags,
2257 const struct sockaddr *l3addr)
2258 {
2259 const struct sockaddr_in6 *sin6 = (const struct sockaddr_in6 *)l3addr;
2260 struct llentry *lle;
2261
2262 IF_AFDATA_LOCK_ASSERT(llt->llt_ifp);
2263 KASSERT(l3addr->sa_family == AF_INET6,
2264 ("sin_family %d", l3addr->sa_family));
2265
2266 lle = in6_lltable_find_dst(llt, &sin6->sin6_addr);
2267
2268 if (lle == NULL)
2269 return (NULL);
2270
2271 KASSERT((flags & (LLE_UNLOCKED|LLE_EXCLUSIVE)) !=
2272 (LLE_UNLOCKED|LLE_EXCLUSIVE),("wrong lle request flags: 0x%X",
2273 flags));
2274
2275 if (flags & LLE_UNLOCKED)
2276 return (lle);
2277
2278 if (flags & LLE_EXCLUSIVE)
2279 LLE_WLOCK(lle);
2280 else
2281 LLE_RLOCK(lle);
2282 return (lle);
2283 }
2284
2285 static int
2286 in6_lltable_dump_entry(struct lltable *llt, struct llentry *lle,
2287 struct sysctl_req *wr)
2288 {
2289 struct ifnet *ifp = llt->llt_ifp;
2290 /* XXX stack use */
2291 struct {
2292 struct rt_msghdr rtm;
2293 struct sockaddr_in6 sin6;
2294 /*
2295 * ndp.c assumes that sdl is word aligned
2296 */
2297 #ifdef __LP64__
2298 uint32_t pad;
2299 #endif
2300 struct sockaddr_dl sdl;
2301 } ndpc;
2302 struct sockaddr_dl *sdl;
2303 int error;
2304
2305 bzero(&ndpc, sizeof(ndpc));
2306 /* skip deleted entries */
2307 if ((lle->la_flags & LLE_DELETED) == LLE_DELETED)
2308 return (0);
2309 /* Skip if jailed and not a valid IP of the prison. */
2310 lltable_fill_sa_entry(lle,
2311 (struct sockaddr *)&ndpc.sin6);
2312 if (prison_if(wr->td->td_ucred,
2313 (struct sockaddr *)&ndpc.sin6) != 0)
2314 return (0);
2315 /*
2316 * produce a msg made of:
2317 * struct rt_msghdr;
2318 * struct sockaddr_in6 (IPv6)
2319 * struct sockaddr_dl;
2320 */
2321 ndpc.rtm.rtm_msglen = sizeof(ndpc);
2322 ndpc.rtm.rtm_version = RTM_VERSION;
2323 ndpc.rtm.rtm_type = RTM_GET;
2324 ndpc.rtm.rtm_flags = RTF_UP;
2325 ndpc.rtm.rtm_addrs = RTA_DST | RTA_GATEWAY;
2326 if (V_deembed_scopeid)
2327 sa6_recoverscope(&ndpc.sin6);
2328
2329 /* publish */
2330 if (lle->la_flags & LLE_PUB)
2331 ndpc.rtm.rtm_flags |= RTF_ANNOUNCE;
2332
2333 sdl = &ndpc.sdl;
2334 sdl->sdl_family = AF_LINK;
2335 sdl->sdl_len = sizeof(*sdl);
2336 sdl->sdl_index = ifp->if_index;
2337 sdl->sdl_type = ifp->if_type;
2338 if ((lle->la_flags & LLE_VALID) == LLE_VALID) {
2339 sdl->sdl_alen = ifp->if_addrlen;
2340 bcopy(lle->ll_addr, LLADDR(sdl),
2341 ifp->if_addrlen);
2342 } else {
2343 sdl->sdl_alen = 0;
2344 bzero(LLADDR(sdl), ifp->if_addrlen);
2345 }
2346 if (lle->la_expire != 0)
2347 ndpc.rtm.rtm_rmx.rmx_expire = lle->la_expire +
2348 lle->lle_remtime / hz +
2349 time_second - time_uptime;
2350 ndpc.rtm.rtm_flags |= (RTF_HOST | RTF_LLDATA);
2351 if (lle->la_flags & LLE_STATIC)
2352 ndpc.rtm.rtm_flags |= RTF_STATIC;
2353 if (lle->la_flags & LLE_IFADDR)
2354 ndpc.rtm.rtm_flags |= RTF_PINNED;
2355 if (lle->ln_router != 0)
2356 ndpc.rtm.rtm_flags |= RTF_GATEWAY;
2357 ndpc.rtm.rtm_rmx.rmx_pksent = lle->la_asked;
2358 /* Store state in rmx_weight value */
2359 ndpc.rtm.rtm_rmx.rmx_state = lle->ln_state;
2360 ndpc.rtm.rtm_index = ifp->if_index;
2361 error = SYSCTL_OUT(wr, &ndpc, sizeof(ndpc));
2362
2363 return (error);
2364 }
2365
2366 static struct lltable *
2367 in6_lltattach(struct ifnet *ifp)
2368 {
2369 struct lltable *llt;
2370
2371 llt = lltable_allocate_htbl(IN6_LLTBL_DEFAULT_HSIZE);
2372 llt->llt_af = AF_INET6;
2373 llt->llt_ifp = ifp;
2374
2375 llt->llt_lookup = in6_lltable_lookup;
2376 llt->llt_alloc_entry = in6_lltable_alloc;
2377 llt->llt_delete_entry = in6_lltable_delete_entry;
2378 llt->llt_dump_entry = in6_lltable_dump_entry;
2379 llt->llt_hash = in6_lltable_hash;
2380 llt->llt_fill_sa_entry = in6_lltable_fill_sa_entry;
2381 llt->llt_free_entry = in6_lltable_free_entry;
2382 llt->llt_match_prefix = in6_lltable_match_prefix;
2383 lltable_link(llt);
2384
2385 return (llt);
2386 }
2387
2388 void *
2389 in6_domifattach(struct ifnet *ifp)
2390 {
2391 struct in6_ifextra *ext;
2392
2393 /* There are not IPv6-capable interfaces. */
2394 switch (ifp->if_type) {
2395 case IFT_PFLOG:
2396 case IFT_PFSYNC:
2397 case IFT_USB:
2398 return (NULL);
2399 }
2400 ext = (struct in6_ifextra *)malloc(sizeof(*ext), M_IFADDR, M_WAITOK);
2401 bzero(ext, sizeof(*ext));
2402
2403 ext->in6_ifstat = malloc(sizeof(counter_u64_t) *
2404 sizeof(struct in6_ifstat) / sizeof(uint64_t), M_IFADDR, M_WAITOK);
2405 COUNTER_ARRAY_ALLOC(ext->in6_ifstat,
2406 sizeof(struct in6_ifstat) / sizeof(uint64_t), M_WAITOK);
2407
2408 ext->icmp6_ifstat = malloc(sizeof(counter_u64_t) *
2409 sizeof(struct icmp6_ifstat) / sizeof(uint64_t), M_IFADDR,
2410 M_WAITOK);
2411 COUNTER_ARRAY_ALLOC(ext->icmp6_ifstat,
2412 sizeof(struct icmp6_ifstat) / sizeof(uint64_t), M_WAITOK);
2413
2414 ext->nd_ifinfo = nd6_ifattach(ifp);
2415 ext->scope6_id = scope6_ifattach(ifp);
2416 ext->lltable = in6_lltattach(ifp);
2417
2418 ext->mld_ifinfo = mld_domifattach(ifp);
2419
2420 return ext;
2421 }
2422
2423 int
2424 in6_domifmtu(struct ifnet *ifp)
2425 {
2426 if (ifp->if_afdata[AF_INET6] == NULL)
2427 return ifp->if_mtu;
2428
2429 return (IN6_LINKMTU(ifp));
2430 }
2431
2432 void
2433 in6_domifdetach(struct ifnet *ifp, void *aux)
2434 {
2435 struct in6_ifextra *ext = (struct in6_ifextra *)aux;
2436
2437 mld_domifdetach(ifp);
2438 scope6_ifdetach(ext->scope6_id);
2439 nd6_ifdetach(ifp, ext->nd_ifinfo);
2440 lltable_free(ext->lltable);
2441 COUNTER_ARRAY_FREE(ext->in6_ifstat,
2442 sizeof(struct in6_ifstat) / sizeof(uint64_t));
2443 free(ext->in6_ifstat, M_IFADDR);
2444 COUNTER_ARRAY_FREE(ext->icmp6_ifstat,
2445 sizeof(struct icmp6_ifstat) / sizeof(uint64_t));
2446 free(ext->icmp6_ifstat, M_IFADDR);
2447 free(ext, M_IFADDR);
2448 }
2449
2450 /*
2451 * Convert sockaddr_in6 to sockaddr_in. Original sockaddr_in6 must be
2452 * v4 mapped addr or v4 compat addr
2453 */
2454 void
2455 in6_sin6_2_sin(struct sockaddr_in *sin, struct sockaddr_in6 *sin6)
2456 {
2457
2458 bzero(sin, sizeof(*sin));
2459 sin->sin_len = sizeof(struct sockaddr_in);
2460 sin->sin_family = AF_INET;
2461 sin->sin_port = sin6->sin6_port;
2462 sin->sin_addr.s_addr = sin6->sin6_addr.s6_addr32[3];
2463 }
2464
2465 /* Convert sockaddr_in to sockaddr_in6 in v4 mapped addr format. */
2466 void
2467 in6_sin_2_v4mapsin6(struct sockaddr_in *sin, struct sockaddr_in6 *sin6)
2468 {
2469 bzero(sin6, sizeof(*sin6));
2470 sin6->sin6_len = sizeof(struct sockaddr_in6);
2471 sin6->sin6_family = AF_INET6;
2472 sin6->sin6_port = sin->sin_port;
2473 sin6->sin6_addr.s6_addr32[0] = 0;
2474 sin6->sin6_addr.s6_addr32[1] = 0;
2475 sin6->sin6_addr.s6_addr32[2] = IPV6_ADDR_INT32_SMP;
2476 sin6->sin6_addr.s6_addr32[3] = sin->sin_addr.s_addr;
2477 }
2478
2479 /* Convert sockaddr_in6 into sockaddr_in. */
2480 void
2481 in6_sin6_2_sin_in_sock(struct sockaddr *nam)
2482 {
2483 struct sockaddr_in *sin_p;
2484 struct sockaddr_in6 sin6;
2485
2486 /*
2487 * Save original sockaddr_in6 addr and convert it
2488 * to sockaddr_in.
2489 */
2490 sin6 = *(struct sockaddr_in6 *)nam;
2491 sin_p = (struct sockaddr_in *)nam;
2492 in6_sin6_2_sin(sin_p, &sin6);
2493 }
2494
2495 /* Convert sockaddr_in into sockaddr_in6 in v4 mapped addr format. */
2496 void
2497 in6_sin_2_v4mapsin6_in_sock(struct sockaddr **nam)
2498 {
2499 struct sockaddr_in *sin_p;
2500 struct sockaddr_in6 *sin6_p;
2501
2502 sin6_p = malloc(sizeof *sin6_p, M_SONAME, M_WAITOK);
2503 sin_p = (struct sockaddr_in *)*nam;
2504 in6_sin_2_v4mapsin6(sin_p, sin6_p);
2505 free(*nam, M_SONAME);
2506 *nam = (struct sockaddr *)sin6_p;
2507 }
Cache object: 6fce36ecb377f0387ec46b58c38a7324
|