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