in6.c revision 1.23 1 1.23 itojun /* $NetBSD: in6.c,v 1.23 2000/03/02 07:14:52 itojun Exp $ */
2 1.23 itojun /* $KAME: in6.c,v 1.56 2000/03/02 07:11:00 itojun Exp $ */
3 1.3 thorpej
4 1.2 itojun /*
5 1.2 itojun * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
6 1.2 itojun * All rights reserved.
7 1.18 itojun *
8 1.2 itojun * Redistribution and use in source and binary forms, with or without
9 1.2 itojun * modification, are permitted provided that the following conditions
10 1.2 itojun * are met:
11 1.2 itojun * 1. Redistributions of source code must retain the above copyright
12 1.2 itojun * notice, this list of conditions and the following disclaimer.
13 1.2 itojun * 2. Redistributions in binary form must reproduce the above copyright
14 1.2 itojun * notice, this list of conditions and the following disclaimer in the
15 1.2 itojun * documentation and/or other materials provided with the distribution.
16 1.2 itojun * 3. Neither the name of the project nor the names of its contributors
17 1.2 itojun * may be used to endorse or promote products derived from this software
18 1.2 itojun * without specific prior written permission.
19 1.18 itojun *
20 1.2 itojun * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21 1.2 itojun * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 1.2 itojun * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 1.2 itojun * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24 1.2 itojun * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 1.2 itojun * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 1.2 itojun * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 1.2 itojun * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 1.2 itojun * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 1.2 itojun * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 1.2 itojun * SUCH DAMAGE.
31 1.2 itojun */
32 1.2 itojun
33 1.2 itojun /*
34 1.2 itojun * Copyright (c) 1982, 1986, 1991, 1993
35 1.2 itojun * The Regents of the University of California. All rights reserved.
36 1.2 itojun *
37 1.2 itojun * Redistribution and use in source and binary forms, with or without
38 1.2 itojun * modification, are permitted provided that the following conditions
39 1.2 itojun * are met:
40 1.2 itojun * 1. Redistributions of source code must retain the above copyright
41 1.2 itojun * notice, this list of conditions and the following disclaimer.
42 1.2 itojun * 2. Redistributions in binary form must reproduce the above copyright
43 1.2 itojun * notice, this list of conditions and the following disclaimer in the
44 1.2 itojun * documentation and/or other materials provided with the distribution.
45 1.2 itojun * 3. All advertising materials mentioning features or use of this software
46 1.2 itojun * must display the following acknowledgement:
47 1.2 itojun * This product includes software developed by the University of
48 1.2 itojun * California, Berkeley and its contributors.
49 1.2 itojun * 4. Neither the name of the University nor the names of its contributors
50 1.2 itojun * may be used to endorse or promote products derived from this software
51 1.2 itojun * without specific prior written permission.
52 1.2 itojun *
53 1.2 itojun * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
54 1.2 itojun * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
55 1.2 itojun * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
56 1.2 itojun * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
57 1.2 itojun * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
58 1.2 itojun * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
59 1.2 itojun * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
60 1.2 itojun * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
61 1.2 itojun * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
62 1.2 itojun * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
63 1.2 itojun * SUCH DAMAGE.
64 1.2 itojun *
65 1.2 itojun * @(#)in.c 8.2 (Berkeley) 11/15/93
66 1.2 itojun */
67 1.2 itojun
68 1.2 itojun #include "opt_inet.h"
69 1.2 itojun
70 1.2 itojun #include <sys/param.h>
71 1.2 itojun #include <sys/ioctl.h>
72 1.2 itojun #include <sys/errno.h>
73 1.2 itojun #include <sys/malloc.h>
74 1.2 itojun #include <sys/socket.h>
75 1.2 itojun #include <sys/socketvar.h>
76 1.2 itojun #include <sys/sockio.h>
77 1.2 itojun #include <sys/systm.h>
78 1.2 itojun #include <sys/proc.h>
79 1.2 itojun #include <sys/time.h>
80 1.2 itojun #include <sys/kernel.h>
81 1.8 itojun #include <sys/syslog.h>
82 1.2 itojun
83 1.2 itojun #include <net/if.h>
84 1.2 itojun #include <net/if_types.h>
85 1.2 itojun #include <net/route.h>
86 1.2 itojun #include "gif.h"
87 1.2 itojun #if NGIF > 0
88 1.2 itojun #include <net/if_gif.h>
89 1.2 itojun #endif
90 1.2 itojun #include <net/if_dl.h>
91 1.2 itojun
92 1.2 itojun #include <netinet/in.h>
93 1.2 itojun #include <netinet/in_var.h>
94 1.2 itojun #include <net/if_ether.h>
95 1.2 itojun
96 1.2 itojun #include <netinet6/nd6.h>
97 1.16 itojun #include <netinet/ip6.h>
98 1.8 itojun #include <netinet6/ip6_var.h>
99 1.2 itojun #include <netinet6/mld6_var.h>
100 1.2 itojun #include <netinet6/ip6_mroute.h>
101 1.2 itojun #include <netinet6/in6_ifattach.h>
102 1.2 itojun
103 1.8 itojun #include <net/net_osdep.h>
104 1.8 itojun
105 1.20 itojun /* enable backward compatibility code for obsoleted ioctls */
106 1.20 itojun #define COMPAT_IN6IFIOCTL
107 1.20 itojun
108 1.2 itojun /*
109 1.2 itojun * Definitions of some costant IP6 addresses.
110 1.2 itojun */
111 1.2 itojun const struct in6_addr in6addr_any = IN6ADDR_ANY_INIT;
112 1.2 itojun const struct in6_addr in6addr_loopback = IN6ADDR_LOOPBACK_INIT;
113 1.2 itojun const struct in6_addr in6addr_nodelocal_allnodes =
114 1.2 itojun IN6ADDR_NODELOCAL_ALLNODES_INIT;
115 1.2 itojun const struct in6_addr in6addr_linklocal_allnodes =
116 1.2 itojun IN6ADDR_LINKLOCAL_ALLNODES_INIT;
117 1.2 itojun const struct in6_addr in6addr_linklocal_allrouters =
118 1.2 itojun IN6ADDR_LINKLOCAL_ALLROUTERS_INIT;
119 1.2 itojun
120 1.2 itojun const struct in6_addr in6mask0 = IN6MASK0;
121 1.2 itojun const struct in6_addr in6mask32 = IN6MASK32;
122 1.2 itojun const struct in6_addr in6mask64 = IN6MASK64;
123 1.2 itojun const struct in6_addr in6mask96 = IN6MASK96;
124 1.2 itojun const struct in6_addr in6mask128 = IN6MASK128;
125 1.2 itojun
126 1.2 itojun static int in6_lifaddr_ioctl __P((struct socket *, u_long, caddr_t,
127 1.2 itojun struct ifnet *, struct proc *));
128 1.2 itojun
129 1.2 itojun /*
130 1.2 itojun * This structure is used to keep track of in6_multi chains which belong to
131 1.2 itojun * deleted interface addresses.
132 1.2 itojun */
133 1.2 itojun static LIST_HEAD(, multi6_kludge) in6_mk; /* XXX BSS initialization */
134 1.2 itojun
135 1.2 itojun struct multi6_kludge {
136 1.2 itojun LIST_ENTRY(multi6_kludge) mk_entry;
137 1.2 itojun struct ifnet *mk_ifp;
138 1.2 itojun struct in6_multihead mk_head;
139 1.2 itojun };
140 1.2 itojun
141 1.2 itojun /*
142 1.2 itojun * Check if the loopback entry will be automatically generated.
143 1.2 itojun * if 0 returned, will not be automatically generated.
144 1.2 itojun * if 1 returned, will be automatically generated.
145 1.2 itojun */
146 1.2 itojun static int
147 1.2 itojun in6_is_ifloop_auto(struct ifaddr *ifa)
148 1.2 itojun {
149 1.2 itojun #define SIN6(s) ((struct sockaddr_in6 *)s)
150 1.2 itojun /*
151 1.2 itojun * If RTF_CLONING is unset, or (IFF_LOOPBACK | IFF_POINTOPOINT),
152 1.2 itojun * or netmask is all0 or all1, then cloning will not happen,
153 1.2 itojun * then we can't rely on its loopback entry generation.
154 1.2 itojun */
155 1.2 itojun if ((ifa->ifa_flags & RTF_CLONING) == 0 ||
156 1.2 itojun (ifa->ifa_ifp->if_flags & (IFF_LOOPBACK | IFF_POINTOPOINT)) ||
157 1.2 itojun (SIN6(ifa->ifa_netmask)->sin6_len == sizeof(struct sockaddr_in6)
158 1.2 itojun &&
159 1.2 itojun IN6_ARE_ADDR_EQUAL(&SIN6(ifa->ifa_netmask)->sin6_addr,
160 1.2 itojun &in6mask128)) ||
161 1.2 itojun ((struct sockaddr_in6 *)ifa->ifa_netmask)->sin6_len == 0)
162 1.2 itojun return 0;
163 1.2 itojun else
164 1.2 itojun return 1;
165 1.2 itojun #undef SIN6
166 1.2 itojun }
167 1.2 itojun
168 1.2 itojun /*
169 1.2 itojun * Subroutine for in6_ifaddloop() and in6_ifremloop().
170 1.2 itojun * This routine does actual work.
171 1.2 itojun */
172 1.2 itojun static void
173 1.2 itojun in6_ifloop_request(int cmd, struct ifaddr *ifa)
174 1.2 itojun {
175 1.2 itojun struct sockaddr_in6 lo_sa;
176 1.2 itojun struct sockaddr_in6 all1_sa;
177 1.2 itojun struct rtentry *nrt = NULL;
178 1.2 itojun
179 1.2 itojun bzero(&lo_sa, sizeof(lo_sa));
180 1.2 itojun bzero(&all1_sa, sizeof(all1_sa));
181 1.2 itojun lo_sa.sin6_family = AF_INET6;
182 1.2 itojun lo_sa.sin6_len = sizeof(struct sockaddr_in6);
183 1.2 itojun all1_sa = lo_sa;
184 1.2 itojun lo_sa.sin6_addr = in6addr_loopback;
185 1.2 itojun all1_sa.sin6_addr = in6mask128;
186 1.2 itojun
187 1.2 itojun /* So we add or remove static loopback entry, here. */
188 1.2 itojun rtrequest(cmd, ifa->ifa_addr,
189 1.2 itojun (struct sockaddr *)&lo_sa,
190 1.2 itojun (struct sockaddr *)&all1_sa,
191 1.2 itojun RTF_UP|RTF_HOST, &nrt);
192 1.2 itojun
193 1.2 itojun /*
194 1.2 itojun * Make sure rt_ifa be equal to IFA, the second argument of the
195 1.2 itojun * function.
196 1.2 itojun * We need this because when we refer rt_ifa->ia6_flags in ip6_input,
197 1.2 itojun * we assume that the rt_ifa points to the address instead of the
198 1.2 itojun * loopback address.
199 1.2 itojun */
200 1.2 itojun if (cmd == RTM_ADD && nrt && ifa != nrt->rt_ifa) {
201 1.10 thorpej IFAFREE(nrt->rt_ifa);
202 1.10 thorpej IFAREF(ifa);
203 1.2 itojun nrt->rt_ifa = ifa;
204 1.2 itojun }
205 1.2 itojun if (nrt)
206 1.2 itojun nrt->rt_refcnt--;
207 1.2 itojun }
208 1.2 itojun
209 1.2 itojun /*
210 1.2 itojun * Add ownaddr as loopback rtentry, if necessary(ex. on p2p link).
211 1.2 itojun * Because, KAME needs loopback rtentry for ownaddr check in
212 1.2 itojun * ip6_input().
213 1.2 itojun */
214 1.2 itojun static void
215 1.2 itojun in6_ifaddloop(struct ifaddr *ifa)
216 1.2 itojun {
217 1.2 itojun if (!in6_is_ifloop_auto(ifa)) {
218 1.2 itojun struct rtentry *rt;
219 1.2 itojun
220 1.2 itojun /* If there is no loopback entry, allocate one. */
221 1.9 itojun rt = rtalloc1(ifa->ifa_addr, 0);
222 1.2 itojun if (rt == 0 || (rt->rt_ifp->if_flags & IFF_LOOPBACK) == 0)
223 1.2 itojun in6_ifloop_request(RTM_ADD, ifa);
224 1.2 itojun if (rt)
225 1.2 itojun rt->rt_refcnt--;
226 1.2 itojun }
227 1.2 itojun }
228 1.2 itojun
229 1.2 itojun /*
230 1.2 itojun * Remove loopback rtentry of ownaddr generated by in6_ifaddloop(),
231 1.2 itojun * if it exists.
232 1.2 itojun */
233 1.2 itojun static void
234 1.2 itojun in6_ifremloop(struct ifaddr *ifa)
235 1.2 itojun {
236 1.2 itojun if (!in6_is_ifloop_auto(ifa)) {
237 1.2 itojun struct in6_ifaddr *ia;
238 1.2 itojun int ia_count = 0;
239 1.2 itojun
240 1.2 itojun /* If only one ifa for the loopback entry, delete it. */
241 1.2 itojun for (ia = in6_ifaddr; ia; ia = ia->ia_next) {
242 1.8 itojun if (IN6_ARE_ADDR_EQUAL(IFA_IN6(ifa),
243 1.2 itojun &ia->ia_addr.sin6_addr)) {
244 1.2 itojun ia_count++;
245 1.2 itojun if (ia_count > 1)
246 1.2 itojun break;
247 1.2 itojun }
248 1.2 itojun }
249 1.2 itojun if (ia_count == 1)
250 1.2 itojun in6_ifloop_request(RTM_DELETE, ifa);
251 1.2 itojun }
252 1.2 itojun }
253 1.2 itojun
254 1.2 itojun int
255 1.8 itojun in6_ifindex2scopeid(idx)
256 1.8 itojun int idx;
257 1.8 itojun {
258 1.8 itojun struct ifnet *ifp;
259 1.8 itojun struct ifaddr *ifa;
260 1.8 itojun struct sockaddr_in6 *sin6;
261 1.8 itojun
262 1.8 itojun if (idx < 0 || if_index < idx)
263 1.8 itojun return -1;
264 1.8 itojun ifp = ifindex2ifnet[idx];
265 1.8 itojun
266 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
267 1.8 itojun {
268 1.8 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
269 1.8 itojun continue;
270 1.8 itojun sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
271 1.8 itojun if (IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr))
272 1.8 itojun return sin6->sin6_scope_id & 0xffff;
273 1.8 itojun }
274 1.8 itojun
275 1.8 itojun return -1;
276 1.8 itojun }
277 1.8 itojun
278 1.8 itojun int
279 1.2 itojun in6_mask2len(mask)
280 1.2 itojun struct in6_addr *mask;
281 1.2 itojun {
282 1.2 itojun int x, y;
283 1.2 itojun
284 1.2 itojun for (x = 0; x < sizeof(*mask); x++) {
285 1.2 itojun if (mask->s6_addr8[x] != 0xff)
286 1.2 itojun break;
287 1.2 itojun }
288 1.2 itojun y = 0;
289 1.2 itojun if (x < sizeof(*mask)) {
290 1.2 itojun for (y = 0; y < 8; y++) {
291 1.2 itojun if ((mask->s6_addr8[x] & (0x80 >> y)) == 0)
292 1.2 itojun break;
293 1.2 itojun }
294 1.2 itojun }
295 1.2 itojun return x * 8 + y;
296 1.2 itojun }
297 1.2 itojun
298 1.2 itojun void
299 1.2 itojun in6_len2mask(mask, len)
300 1.2 itojun struct in6_addr *mask;
301 1.2 itojun int len;
302 1.2 itojun {
303 1.2 itojun int i;
304 1.2 itojun
305 1.2 itojun bzero(mask, sizeof(*mask));
306 1.2 itojun for (i = 0; i < len / 8; i++)
307 1.2 itojun mask->s6_addr8[i] = 0xff;
308 1.2 itojun if (len % 8)
309 1.2 itojun mask->s6_addr8[i] = (0xff00 >> (len % 8)) & 0xff;
310 1.2 itojun }
311 1.2 itojun
312 1.2 itojun #define ifa2ia6(ifa) ((struct in6_ifaddr *)(ifa))
313 1.19 itojun #define ia62ifa(ia6) (&((ia6)->ia_ifa))
314 1.2 itojun
315 1.2 itojun int
316 1.2 itojun in6_control(so, cmd, data, ifp, p)
317 1.2 itojun struct socket *so;
318 1.2 itojun u_long cmd;
319 1.2 itojun caddr_t data;
320 1.2 itojun struct ifnet *ifp;
321 1.2 itojun struct proc *p;
322 1.2 itojun {
323 1.2 itojun struct in6_ifreq *ifr = (struct in6_ifreq *)data;
324 1.2 itojun struct in6_ifaddr *ia, *oia;
325 1.2 itojun struct in6_aliasreq *ifra = (struct in6_aliasreq *)data;
326 1.20 itojun struct sockaddr_in6 oldaddr;
327 1.20 itojun #ifdef COMPAT_IN6IFIOCTL
328 1.20 itojun struct sockaddr_in6 net;
329 1.20 itojun #endif
330 1.2 itojun int error = 0, hostIsNew, prefixIsNew;
331 1.8 itojun time_t time_second = (time_t)time.tv_sec;
332 1.8 itojun int privileged;
333 1.8 itojun
334 1.8 itojun privileged = 0;
335 1.8 itojun if (p && !suser(p->p_ucred, &p->p_acflag))
336 1.8 itojun privileged++;
337 1.2 itojun
338 1.2 itojun /*
339 1.2 itojun * xxx should prevent processes for link-local addresses?
340 1.2 itojun */
341 1.2 itojun #if NGIF > 0
342 1.2 itojun if (ifp && ifp->if_type == IFT_GIF) {
343 1.2 itojun switch (cmd) {
344 1.2 itojun case SIOCSIFPHYADDR_IN6:
345 1.8 itojun if (!privileged)
346 1.2 itojun return(EPERM);
347 1.2 itojun /*fall through*/
348 1.2 itojun case SIOCGIFPSRCADDR_IN6:
349 1.2 itojun case SIOCGIFPDSTADDR_IN6:
350 1.2 itojun return gif_ioctl(ifp, cmd, data);
351 1.2 itojun }
352 1.2 itojun }
353 1.2 itojun #endif
354 1.2 itojun switch (cmd) {
355 1.2 itojun case SIOCGETSGCNT_IN6:
356 1.2 itojun case SIOCGETMIFCNT_IN6:
357 1.2 itojun return (mrt6_ioctl(cmd, data));
358 1.2 itojun }
359 1.2 itojun
360 1.20 itojun if (ifp == NULL)
361 1.2 itojun return(EOPNOTSUPP);
362 1.2 itojun
363 1.2 itojun switch (cmd) {
364 1.2 itojun case SIOCSNDFLUSH_IN6:
365 1.2 itojun case SIOCSPFXFLUSH_IN6:
366 1.2 itojun case SIOCSRTRFLUSH_IN6:
367 1.8 itojun case SIOCSDEFIFACE_IN6:
368 1.8 itojun if (!privileged)
369 1.2 itojun return(EPERM);
370 1.2 itojun /*fall through*/
371 1.2 itojun case SIOCGIFINFO_IN6:
372 1.2 itojun case SIOCGDRLST_IN6:
373 1.2 itojun case SIOCGPRLST_IN6:
374 1.2 itojun case SIOCGNBRINFO_IN6:
375 1.8 itojun case SIOCGDEFIFACE_IN6:
376 1.2 itojun return(nd6_ioctl(cmd, data, ifp));
377 1.2 itojun }
378 1.2 itojun
379 1.2 itojun switch (cmd) {
380 1.2 itojun case SIOCSIFPREFIX_IN6:
381 1.2 itojun case SIOCDIFPREFIX_IN6:
382 1.2 itojun case SIOCAIFPREFIX_IN6:
383 1.2 itojun case SIOCCIFPREFIX_IN6:
384 1.2 itojun case SIOCSGIFPREFIX_IN6:
385 1.8 itojun if (!privileged)
386 1.2 itojun return(EPERM);
387 1.2 itojun /*fall through*/
388 1.2 itojun case SIOCGIFPREFIX_IN6:
389 1.8 itojun return(in6_prefix_ioctl(so, cmd, data, ifp));
390 1.2 itojun }
391 1.2 itojun
392 1.2 itojun switch (cmd) {
393 1.2 itojun case SIOCALIFADDR:
394 1.2 itojun case SIOCDLIFADDR:
395 1.8 itojun if (!privileged)
396 1.2 itojun return(EPERM);
397 1.2 itojun /*fall through*/
398 1.2 itojun case SIOCGLIFADDR:
399 1.2 itojun return in6_lifaddr_ioctl(so, cmd, data, ifp, p);
400 1.2 itojun }
401 1.2 itojun
402 1.2 itojun /*
403 1.2 itojun * Find address for this interface, if it exists.
404 1.2 itojun */
405 1.20 itojun if (ifra->ifra_addr.sin6_family == AF_INET6) { /* XXX */
406 1.8 itojun struct sockaddr_in6 *sa6 =
407 1.8 itojun (struct sockaddr_in6 *)&ifra->ifra_addr;
408 1.8 itojun
409 1.8 itojun if (IN6_IS_ADDR_LINKLOCAL(&sa6->sin6_addr)) {
410 1.8 itojun if (sa6->sin6_addr.s6_addr16[1] == 0) {
411 1.2 itojun /* interface ID is not embedded by the user */
412 1.8 itojun sa6->sin6_addr.s6_addr16[1] =
413 1.8 itojun htons(ifp->if_index);
414 1.2 itojun }
415 1.20 itojun else if (sa6->sin6_addr.s6_addr16[1] !=
416 1.20 itojun htons(ifp->if_index)) {
417 1.20 itojun return(EINVAL); /* ifid is contradict */
418 1.20 itojun }
419 1.8 itojun if (sa6->sin6_scope_id) {
420 1.8 itojun if (sa6->sin6_scope_id !=
421 1.8 itojun (u_int32_t)ifp->if_index)
422 1.8 itojun return(EINVAL);
423 1.8 itojun sa6->sin6_scope_id = 0; /* XXX: good way? */
424 1.8 itojun }
425 1.2 itojun }
426 1.20 itojun ia = in6ifa_ifpwithaddr(ifp, &ifra->ifra_addr.sin6_addr);
427 1.2 itojun }
428 1.2 itojun
429 1.2 itojun switch (cmd) {
430 1.2 itojun
431 1.2 itojun case SIOCDIFADDR_IN6:
432 1.20 itojun /*
433 1.20 itojun * for IPv4, we look for existing in6_ifaddr here to allow
434 1.20 itojun * "ifconfig if0 delete" to remove first IPv4 address on the
435 1.20 itojun * interface. For IPv6, as the spec allow multiple interface
436 1.20 itojun * address from the day one, we consider "remove the first one"
437 1.20 itojun * semantics to be not preferrable.
438 1.20 itojun */
439 1.20 itojun if (ia == NULL)
440 1.2 itojun return(EADDRNOTAVAIL);
441 1.2 itojun /* FALLTHROUGH */
442 1.2 itojun case SIOCAIFADDR_IN6:
443 1.2 itojun case SIOCSIFADDR_IN6:
444 1.20 itojun #ifdef COMPAT_IN6IFIOCTL
445 1.20 itojun case SIOCSIFDSTADDR_IN6:
446 1.2 itojun case SIOCSIFNETMASK_IN6:
447 1.20 itojun /*
448 1.20 itojun * Since IPv6 allows a node to assign multiple addresses
449 1.20 itojun * on a single interface, SIOCSIFxxx ioctls are not suitable
450 1.20 itojun * and should be unused.
451 1.20 itojun */
452 1.20 itojun #endif
453 1.20 itojun if (ifra->ifra_addr.sin6_family != AF_INET6)
454 1.20 itojun return(EAFNOSUPPORT);
455 1.8 itojun if (!privileged)
456 1.2 itojun return(EPERM);
457 1.20 itojun if (ia == NULL) {
458 1.2 itojun ia = (struct in6_ifaddr *)
459 1.2 itojun malloc(sizeof(*ia), M_IFADDR, M_WAITOK);
460 1.2 itojun if (ia == NULL)
461 1.2 itojun return (ENOBUFS);
462 1.2 itojun bzero((caddr_t)ia, sizeof(*ia));
463 1.20 itojun /* Initialize the address and masks */
464 1.2 itojun ia->ia_ifa.ifa_addr = (struct sockaddr *)&ia->ia_addr;
465 1.20 itojun ia->ia_addr.sin6_family = AF_INET6;
466 1.20 itojun ia->ia_addr.sin6_len = sizeof(ia->ia_addr);
467 1.20 itojun if (ifp->if_flags & IFF_POINTOPOINT) {
468 1.23 itojun ia->ia_ifa.ifa_dstaddr
469 1.23 itojun = (struct sockaddr *)&ia->ia_dstaddr;
470 1.20 itojun ia->ia_dstaddr.sin6_family = AF_INET6;
471 1.20 itojun ia->ia_dstaddr.sin6_len = sizeof(ia->ia_dstaddr);
472 1.23 itojun } else {
473 1.23 itojun ia->ia_ifa.ifa_dstaddr = NULL;
474 1.23 itojun bzero(&ia->ia_dstaddr, sizeof(ia->ia_dstaddr));
475 1.20 itojun }
476 1.2 itojun ia->ia_ifa.ifa_netmask
477 1.2 itojun = (struct sockaddr *)&ia->ia_prefixmask;
478 1.2 itojun
479 1.2 itojun ia->ia_ifp = ifp;
480 1.2 itojun if ((oia = in6_ifaddr) != NULL) {
481 1.2 itojun for ( ; oia->ia_next; oia = oia->ia_next)
482 1.2 itojun continue;
483 1.2 itojun oia->ia_next = ia;
484 1.2 itojun } else
485 1.2 itojun in6_ifaddr = ia;
486 1.10 thorpej IFAREF(&ia->ia_ifa);
487 1.10 thorpej
488 1.15 itojun TAILQ_INSERT_TAIL(&ifp->if_addrlist, &ia->ia_ifa,
489 1.15 itojun ifa_list);
490 1.10 thorpej IFAREF(&ia->ia_ifa);
491 1.2 itojun }
492 1.2 itojun
493 1.2 itojun if (cmd == SIOCAIFADDR_IN6) {
494 1.2 itojun /* sanity for overflow - beware unsigned */
495 1.2 itojun struct in6_addrlifetime *lt;
496 1.2 itojun lt = &ifra->ifra_lifetime;
497 1.2 itojun if (lt->ia6t_vltime != ND6_INFINITE_LIFETIME
498 1.2 itojun && lt->ia6t_vltime + time_second < time_second) {
499 1.2 itojun return EINVAL;
500 1.2 itojun }
501 1.2 itojun if (lt->ia6t_pltime != ND6_INFINITE_LIFETIME
502 1.2 itojun && lt->ia6t_pltime + time_second < time_second) {
503 1.2 itojun return EINVAL;
504 1.2 itojun }
505 1.2 itojun }
506 1.2 itojun break;
507 1.2 itojun
508 1.2 itojun case SIOCGIFADDR_IN6:
509 1.2 itojun /* This interface is basically deprecated. use SIOCGIFCONF. */
510 1.2 itojun /* fall through */
511 1.2 itojun case SIOCGIFAFLAG_IN6:
512 1.2 itojun case SIOCGIFNETMASK_IN6:
513 1.2 itojun case SIOCGIFDSTADDR_IN6:
514 1.8 itojun case SIOCGIFALIFETIME_IN6:
515 1.2 itojun /* must think again about its semantics */
516 1.20 itojun if (ia == NULL)
517 1.2 itojun return(EADDRNOTAVAIL);
518 1.2 itojun break;
519 1.2 itojun case SIOCSIFALIFETIME_IN6:
520 1.2 itojun {
521 1.2 itojun struct in6_addrlifetime *lt;
522 1.2 itojun
523 1.8 itojun if (!privileged)
524 1.2 itojun return(EPERM);
525 1.20 itojun if (ia == NULL)
526 1.2 itojun return(EADDRNOTAVAIL);
527 1.2 itojun /* sanity for overflow - beware unsigned */
528 1.2 itojun lt = &ifr->ifr_ifru.ifru_lifetime;
529 1.2 itojun if (lt->ia6t_vltime != ND6_INFINITE_LIFETIME
530 1.2 itojun && lt->ia6t_vltime + time_second < time_second) {
531 1.2 itojun return EINVAL;
532 1.2 itojun }
533 1.2 itojun if (lt->ia6t_pltime != ND6_INFINITE_LIFETIME
534 1.2 itojun && lt->ia6t_pltime + time_second < time_second) {
535 1.2 itojun return EINVAL;
536 1.2 itojun }
537 1.2 itojun break;
538 1.2 itojun }
539 1.2 itojun }
540 1.2 itojun
541 1.2 itojun switch (cmd) {
542 1.2 itojun
543 1.2 itojun case SIOCGIFADDR_IN6:
544 1.2 itojun ifr->ifr_addr = ia->ia_addr;
545 1.2 itojun break;
546 1.2 itojun
547 1.2 itojun case SIOCGIFDSTADDR_IN6:
548 1.2 itojun if ((ifp->if_flags & IFF_POINTOPOINT) == 0)
549 1.2 itojun return(EINVAL);
550 1.2 itojun ifr->ifr_dstaddr = ia->ia_dstaddr;
551 1.2 itojun break;
552 1.2 itojun
553 1.2 itojun case SIOCGIFNETMASK_IN6:
554 1.2 itojun ifr->ifr_addr = ia->ia_prefixmask;
555 1.2 itojun break;
556 1.2 itojun
557 1.2 itojun case SIOCGIFAFLAG_IN6:
558 1.2 itojun ifr->ifr_ifru.ifru_flags6 = ia->ia6_flags;
559 1.2 itojun break;
560 1.18 itojun
561 1.8 itojun case SIOCGIFSTAT_IN6:
562 1.8 itojun if (ifp == NULL)
563 1.8 itojun return EINVAL;
564 1.8 itojun if (in6_ifstat == NULL || ifp->if_index >= in6_ifstatmax
565 1.8 itojun || in6_ifstat[ifp->if_index] == NULL) {
566 1.8 itojun /* return EAFNOSUPPORT? */
567 1.8 itojun bzero(&ifr->ifr_ifru.ifru_stat,
568 1.8 itojun sizeof(ifr->ifr_ifru.ifru_stat));
569 1.8 itojun } else
570 1.8 itojun ifr->ifr_ifru.ifru_stat = *in6_ifstat[ifp->if_index];
571 1.8 itojun break;
572 1.8 itojun
573 1.8 itojun case SIOCGIFSTAT_ICMP6:
574 1.8 itojun if (ifp == NULL)
575 1.8 itojun return EINVAL;
576 1.8 itojun if (icmp6_ifstat == NULL || ifp->if_index >= icmp6_ifstatmax ||
577 1.8 itojun icmp6_ifstat[ifp->if_index] == NULL) {
578 1.8 itojun /* return EAFNOSUPPORT? */
579 1.8 itojun bzero(&ifr->ifr_ifru.ifru_stat,
580 1.8 itojun sizeof(ifr->ifr_ifru.ifru_icmp6stat));
581 1.8 itojun } else
582 1.8 itojun ifr->ifr_ifru.ifru_icmp6stat =
583 1.8 itojun *icmp6_ifstat[ifp->if_index];
584 1.8 itojun break;
585 1.8 itojun
586 1.20 itojun #ifdef COMPAT_IN6IFIOCTL /* should be unused */
587 1.2 itojun case SIOCSIFDSTADDR_IN6:
588 1.2 itojun if ((ifp->if_flags & IFF_POINTOPOINT) == 0)
589 1.2 itojun return(EINVAL);
590 1.2 itojun oldaddr = ia->ia_dstaddr;
591 1.2 itojun ia->ia_dstaddr = ifr->ifr_dstaddr;
592 1.2 itojun
593 1.2 itojun /* link-local index check */
594 1.2 itojun if (IN6_IS_ADDR_LINKLOCAL(&ia->ia_dstaddr.sin6_addr)) {
595 1.2 itojun if (ia->ia_dstaddr.sin6_addr.s6_addr16[1] == 0) {
596 1.2 itojun /* interface ID is not embedded by the user */
597 1.2 itojun ia->ia_dstaddr.sin6_addr.s6_addr16[1]
598 1.2 itojun = htons(ifp->if_index);
599 1.2 itojun }
600 1.20 itojun else if (ia->ia_dstaddr.sin6_addr.s6_addr16[1] !=
601 1.2 itojun htons(ifp->if_index)) {
602 1.20 itojun ia->ia_dstaddr = oldaddr;
603 1.20 itojun return(EINVAL); /* ifid is contradict */
604 1.20 itojun }
605 1.2 itojun }
606 1.2 itojun
607 1.2 itojun if (ifp->if_ioctl && (error = (ifp->if_ioctl)
608 1.2 itojun (ifp, SIOCSIFDSTADDR, (caddr_t)ia))) {
609 1.2 itojun ia->ia_dstaddr = oldaddr;
610 1.2 itojun return(error);
611 1.2 itojun }
612 1.2 itojun if (ia->ia_flags & IFA_ROUTE) {
613 1.2 itojun ia->ia_ifa.ifa_dstaddr = (struct sockaddr *)&oldaddr;
614 1.2 itojun rtinit(&(ia->ia_ifa), (int)RTM_DELETE, RTF_HOST);
615 1.2 itojun ia->ia_ifa.ifa_dstaddr =
616 1.2 itojun (struct sockaddr *)&ia->ia_dstaddr;
617 1.2 itojun rtinit(&(ia->ia_ifa), (int)RTM_ADD, RTF_HOST|RTF_UP);
618 1.2 itojun }
619 1.2 itojun break;
620 1.2 itojun
621 1.20 itojun #endif
622 1.2 itojun case SIOCGIFALIFETIME_IN6:
623 1.2 itojun ifr->ifr_ifru.ifru_lifetime = ia->ia6_lifetime;
624 1.2 itojun break;
625 1.2 itojun
626 1.2 itojun case SIOCSIFALIFETIME_IN6:
627 1.2 itojun ia->ia6_lifetime = ifr->ifr_ifru.ifru_lifetime;
628 1.2 itojun /* for sanity */
629 1.2 itojun if (ia->ia6_lifetime.ia6t_vltime != ND6_INFINITE_LIFETIME) {
630 1.2 itojun ia->ia6_lifetime.ia6t_expire =
631 1.2 itojun time_second + ia->ia6_lifetime.ia6t_vltime;
632 1.2 itojun } else
633 1.2 itojun ia->ia6_lifetime.ia6t_expire = 0;
634 1.2 itojun if (ia->ia6_lifetime.ia6t_pltime != ND6_INFINITE_LIFETIME) {
635 1.2 itojun ia->ia6_lifetime.ia6t_preferred =
636 1.2 itojun time_second + ia->ia6_lifetime.ia6t_pltime;
637 1.2 itojun } else
638 1.2 itojun ia->ia6_lifetime.ia6t_preferred = 0;
639 1.2 itojun break;
640 1.2 itojun
641 1.2 itojun case SIOCSIFADDR_IN6:
642 1.2 itojun return(in6_ifinit(ifp, ia, &ifr->ifr_addr, 1));
643 1.2 itojun
644 1.20 itojun #ifdef COMPAT_IN6IFIOCTL /* XXX should be unused */
645 1.2 itojun case SIOCSIFNETMASK_IN6:
646 1.2 itojun ia->ia_prefixmask = ifr->ifr_addr;
647 1.2 itojun bzero(&net, sizeof(net));
648 1.2 itojun net.sin6_len = sizeof(struct sockaddr_in6);
649 1.2 itojun net.sin6_family = AF_INET6;
650 1.2 itojun net.sin6_port = htons(0);
651 1.2 itojun net.sin6_flowinfo = htonl(0);
652 1.2 itojun net.sin6_addr.s6_addr32[0]
653 1.2 itojun = ia->ia_addr.sin6_addr.s6_addr32[0] &
654 1.2 itojun ia->ia_prefixmask.sin6_addr.s6_addr32[0];
655 1.2 itojun net.sin6_addr.s6_addr32[1]
656 1.2 itojun = ia->ia_addr.sin6_addr.s6_addr32[1] &
657 1.2 itojun ia->ia_prefixmask.sin6_addr.s6_addr32[1];
658 1.2 itojun net.sin6_addr.s6_addr32[2]
659 1.2 itojun = ia->ia_addr.sin6_addr.s6_addr32[2] &
660 1.2 itojun ia->ia_prefixmask.sin6_addr.s6_addr32[2];
661 1.2 itojun net.sin6_addr.s6_addr32[3]
662 1.2 itojun = ia->ia_addr.sin6_addr.s6_addr32[3] &
663 1.2 itojun ia->ia_prefixmask.sin6_addr.s6_addr32[3];
664 1.2 itojun ia->ia_net = net;
665 1.2 itojun break;
666 1.20 itojun #endif
667 1.2 itojun
668 1.2 itojun case SIOCAIFADDR_IN6:
669 1.2 itojun prefixIsNew = 0;
670 1.2 itojun hostIsNew = 1;
671 1.2 itojun
672 1.2 itojun if (ifra->ifra_addr.sin6_len == 0) {
673 1.2 itojun ifra->ifra_addr = ia->ia_addr;
674 1.2 itojun hostIsNew = 0;
675 1.2 itojun } else if (IN6_ARE_ADDR_EQUAL(&ifra->ifra_addr.sin6_addr,
676 1.2 itojun &ia->ia_addr.sin6_addr))
677 1.2 itojun hostIsNew = 0;
678 1.2 itojun
679 1.20 itojun /* Validate address families: */
680 1.20 itojun /*
681 1.20 itojun * The destination address for a p2p link must have a family
682 1.20 itojun * of AF_UNSPEC or AF_INET6.
683 1.20 itojun */
684 1.20 itojun if ((ifp->if_flags & IFF_POINTOPOINT) != 0 &&
685 1.20 itojun ifra->ifra_dstaddr.sin6_family != AF_INET6 &&
686 1.20 itojun ifra->ifra_dstaddr.sin6_family != AF_UNSPEC)
687 1.20 itojun return(EAFNOSUPPORT);
688 1.20 itojun /*
689 1.20 itojun * The prefixmask must have a family of AF_UNSPEC or AF_INET6.
690 1.20 itojun */
691 1.20 itojun if (ifra->ifra_prefixmask.sin6_family != AF_INET6 &&
692 1.20 itojun ifra->ifra_prefixmask.sin6_family != AF_UNSPEC)
693 1.20 itojun return(EAFNOSUPPORT);
694 1.20 itojun
695 1.2 itojun if (ifra->ifra_prefixmask.sin6_len) {
696 1.2 itojun in6_ifscrub(ifp, ia);
697 1.2 itojun ia->ia_prefixmask = ifra->ifra_prefixmask;
698 1.2 itojun prefixIsNew = 1;
699 1.2 itojun }
700 1.2 itojun if ((ifp->if_flags & IFF_POINTOPOINT) &&
701 1.2 itojun (ifra->ifra_dstaddr.sin6_family == AF_INET6)) {
702 1.2 itojun in6_ifscrub(ifp, ia);
703 1.17 itojun oldaddr = ia->ia_dstaddr;
704 1.2 itojun ia->ia_dstaddr = ifra->ifra_dstaddr;
705 1.2 itojun /* link-local index check: should be a separate function? */
706 1.2 itojun if (IN6_IS_ADDR_LINKLOCAL(&ia->ia_dstaddr.sin6_addr)) {
707 1.2 itojun if (ia->ia_dstaddr.sin6_addr.s6_addr16[1] == 0) {
708 1.2 itojun /*
709 1.2 itojun * interface ID is not embedded by
710 1.2 itojun * the user
711 1.2 itojun */
712 1.2 itojun ia->ia_dstaddr.sin6_addr.s6_addr16[1]
713 1.2 itojun = htons(ifp->if_index);
714 1.20 itojun } else if (ia->ia_dstaddr.sin6_addr.s6_addr16[1] !=
715 1.20 itojun htons(ifp->if_index)) {
716 1.20 itojun ia->ia_dstaddr = oldaddr;
717 1.20 itojun return(EINVAL); /* ifid is contradict */
718 1.2 itojun }
719 1.2 itojun }
720 1.2 itojun prefixIsNew = 1; /* We lie; but effect's the same */
721 1.2 itojun }
722 1.20 itojun if (hostIsNew || prefixIsNew)
723 1.2 itojun error = in6_ifinit(ifp, ia, &ifra->ifra_addr, 0);
724 1.20 itojun if (hostIsNew && (ifp->if_flags & IFF_MULTICAST)) {
725 1.2 itojun int error_local = 0;
726 1.2 itojun
727 1.2 itojun /*
728 1.2 itojun * join solicited multicast addr for new host id
729 1.2 itojun */
730 1.2 itojun struct in6_addr llsol;
731 1.2 itojun bzero(&llsol, sizeof(struct in6_addr));
732 1.2 itojun llsol.s6_addr16[0] = htons(0xff02);
733 1.2 itojun llsol.s6_addr16[1] = htons(ifp->if_index);
734 1.2 itojun llsol.s6_addr32[1] = 0;
735 1.2 itojun llsol.s6_addr32[2] = htonl(1);
736 1.2 itojun llsol.s6_addr32[3] =
737 1.2 itojun ifra->ifra_addr.sin6_addr.s6_addr32[3];
738 1.2 itojun llsol.s6_addr8[12] = 0xff;
739 1.2 itojun (void)in6_addmulti(&llsol, ifp, &error_local);
740 1.2 itojun if (error == 0)
741 1.2 itojun error = error_local;
742 1.2 itojun }
743 1.2 itojun
744 1.2 itojun ia->ia6_flags = ifra->ifra_flags;
745 1.2 itojun ia->ia6_flags &= ~IN6_IFF_DUPLICATED; /*safety*/
746 1.2 itojun
747 1.2 itojun ia->ia6_lifetime = ifra->ifra_lifetime;
748 1.2 itojun /* for sanity */
749 1.2 itojun if (ia->ia6_lifetime.ia6t_vltime != ND6_INFINITE_LIFETIME) {
750 1.2 itojun ia->ia6_lifetime.ia6t_expire =
751 1.2 itojun time_second + ia->ia6_lifetime.ia6t_vltime;
752 1.2 itojun } else
753 1.2 itojun ia->ia6_lifetime.ia6t_expire = 0;
754 1.2 itojun if (ia->ia6_lifetime.ia6t_pltime != ND6_INFINITE_LIFETIME) {
755 1.2 itojun ia->ia6_lifetime.ia6t_preferred =
756 1.2 itojun time_second + ia->ia6_lifetime.ia6t_pltime;
757 1.2 itojun } else
758 1.2 itojun ia->ia6_lifetime.ia6t_preferred = 0;
759 1.2 itojun
760 1.2 itojun /*
761 1.18 itojun * Perform DAD, if needed.
762 1.2 itojun * XXX It may be of use, if we can administratively
763 1.2 itojun * disable DAD.
764 1.2 itojun */
765 1.2 itojun switch (ifp->if_type) {
766 1.6 is case IFT_ARCNET:
767 1.2 itojun case IFT_ETHER:
768 1.2 itojun case IFT_FDDI:
769 1.2 itojun #if 0
770 1.2 itojun case IFT_ATM:
771 1.2 itojun case IFT_SLIP:
772 1.2 itojun case IFT_PPP:
773 1.2 itojun #endif
774 1.2 itojun ia->ia6_flags |= IN6_IFF_TENTATIVE;
775 1.15 itojun nd6_dad_start(&ia->ia_ifa, NULL);
776 1.2 itojun break;
777 1.8 itojun case IFT_FAITH:
778 1.2 itojun case IFT_GIF:
779 1.2 itojun case IFT_LOOP:
780 1.2 itojun default:
781 1.2 itojun break;
782 1.2 itojun }
783 1.2 itojun
784 1.8 itojun if (hostIsNew) {
785 1.8 itojun int iilen;
786 1.8 itojun int error_local = 0;
787 1.8 itojun
788 1.8 itojun iilen = (sizeof(ia->ia_prefixmask.sin6_addr) << 3) -
789 1.8 itojun in6_mask2len(&ia->ia_prefixmask.sin6_addr);
790 1.8 itojun error_local = in6_prefix_add_ifid(iilen, ia);
791 1.8 itojun if (error == 0)
792 1.8 itojun error = error_local;
793 1.8 itojun }
794 1.8 itojun
795 1.2 itojun return(error);
796 1.2 itojun
797 1.2 itojun case SIOCDIFADDR_IN6:
798 1.10 thorpej in6_purgeaddr(&ia->ia_ifa, ifp);
799 1.2 itojun break;
800 1.2 itojun
801 1.2 itojun default:
802 1.20 itojun if (ifp == NULL || ifp->if_ioctl == 0)
803 1.2 itojun return(EOPNOTSUPP);
804 1.2 itojun return((*ifp->if_ioctl)(ifp, cmd, data));
805 1.2 itojun }
806 1.2 itojun return(0);
807 1.2 itojun }
808 1.2 itojun
809 1.10 thorpej void
810 1.10 thorpej in6_purgeaddr(ifa, ifp)
811 1.10 thorpej struct ifaddr *ifa;
812 1.10 thorpej struct ifnet *ifp;
813 1.10 thorpej {
814 1.10 thorpej struct in6_ifaddr *oia, *ia = (void *) ifa;
815 1.10 thorpej
816 1.10 thorpej in6_ifscrub(ifp, ia);
817 1.10 thorpej
818 1.10 thorpej if (ifp->if_flags & IFF_MULTICAST) {
819 1.10 thorpej /*
820 1.10 thorpej * delete solicited multicast addr for deleting host id
821 1.10 thorpej */
822 1.10 thorpej struct in6_multi *in6m;
823 1.10 thorpej struct in6_addr llsol;
824 1.10 thorpej bzero(&llsol, sizeof(struct in6_addr));
825 1.10 thorpej llsol.s6_addr16[0] = htons(0xff02);
826 1.10 thorpej llsol.s6_addr16[1] = htons(ifp->if_index);
827 1.10 thorpej llsol.s6_addr32[1] = 0;
828 1.10 thorpej llsol.s6_addr32[2] = htonl(1);
829 1.10 thorpej llsol.s6_addr32[3] =
830 1.10 thorpej ia->ia_addr.sin6_addr.s6_addr32[3];
831 1.10 thorpej llsol.s6_addr8[12] = 0xff;
832 1.10 thorpej
833 1.10 thorpej IN6_LOOKUP_MULTI(llsol, ifp, in6m);
834 1.10 thorpej if (in6m)
835 1.10 thorpej in6_delmulti(in6m);
836 1.10 thorpej }
837 1.10 thorpej
838 1.10 thorpej TAILQ_REMOVE(&ifp->if_addrlist, &ia->ia_ifa, ifa_list);
839 1.10 thorpej IFAFREE(&ia->ia_ifa);
840 1.10 thorpej
841 1.10 thorpej oia = ia;
842 1.10 thorpej if (oia == (ia = in6_ifaddr))
843 1.10 thorpej in6_ifaddr = ia->ia_next;
844 1.10 thorpej else {
845 1.10 thorpej while (ia->ia_next && (ia->ia_next != oia))
846 1.10 thorpej ia = ia->ia_next;
847 1.10 thorpej if (ia->ia_next)
848 1.10 thorpej ia->ia_next = oia->ia_next;
849 1.10 thorpej else
850 1.10 thorpej printf("Didn't unlink in6_ifaddr from list\n");
851 1.10 thorpej }
852 1.10 thorpej {
853 1.10 thorpej int iilen;
854 1.10 thorpej
855 1.10 thorpej iilen = (sizeof(oia->ia_prefixmask.sin6_addr) << 3) -
856 1.10 thorpej in6_mask2len(&oia->ia_prefixmask.sin6_addr);
857 1.10 thorpej in6_prefix_remove_ifid(iilen, oia);
858 1.10 thorpej }
859 1.10 thorpej if (oia->ia6_multiaddrs.lh_first != NULL) {
860 1.10 thorpej /*
861 1.10 thorpej * XXX thorpej (at) netbsd.org -- if the interface is going
862 1.10 thorpej * XXX away, don't save the multicast entries, delete them!
863 1.10 thorpej */
864 1.10 thorpej if (oia->ia_ifa.ifa_ifp->if_output == if_nulloutput) {
865 1.10 thorpej struct in6_multi *in6m;
866 1.10 thorpej
867 1.10 thorpej while ((in6m =
868 1.10 thorpej LIST_FIRST(&oia->ia6_multiaddrs)) != NULL)
869 1.10 thorpej in6_delmulti(in6m);
870 1.10 thorpej } else
871 1.10 thorpej in6_savemkludge(oia);
872 1.10 thorpej }
873 1.10 thorpej
874 1.10 thorpej IFAFREE(&oia->ia_ifa);
875 1.14 thorpej }
876 1.11 itojun
877 1.14 thorpej void
878 1.14 thorpej in6_purgeif(ifp)
879 1.14 thorpej struct ifnet *ifp;
880 1.14 thorpej {
881 1.14 thorpej struct ifaddr *ifa, *nifa;
882 1.11 itojun
883 1.14 thorpej for (ifa = TAILQ_FIRST(&ifp->if_addrlist); ifa != NULL; ifa = nifa) {
884 1.14 thorpej nifa = TAILQ_NEXT(ifa, ifa_list);
885 1.14 thorpej if (ifa->ifa_addr->sa_family != AF_INET6)
886 1.14 thorpej continue;
887 1.14 thorpej in6_purgeaddr(ifa, ifp);
888 1.11 itojun }
889 1.14 thorpej
890 1.14 thorpej in6_ifdetach(ifp);
891 1.10 thorpej }
892 1.10 thorpej
893 1.2 itojun /*
894 1.2 itojun * SIOC[GAD]LIFADDR.
895 1.2 itojun * SIOCGLIFADDR: get first address. (???)
896 1.2 itojun * SIOCGLIFADDR with IFLR_PREFIX:
897 1.2 itojun * get first address that matches the specified prefix.
898 1.2 itojun * SIOCALIFADDR: add the specified address.
899 1.2 itojun * SIOCALIFADDR with IFLR_PREFIX:
900 1.2 itojun * add the specified prefix, filling hostid part from
901 1.2 itojun * the first link-local address. prefixlen must be <= 64.
902 1.2 itojun * SIOCDLIFADDR: delete the specified address.
903 1.2 itojun * SIOCDLIFADDR with IFLR_PREFIX:
904 1.2 itojun * delete the first address that matches the specified prefix.
905 1.2 itojun * return values:
906 1.2 itojun * EINVAL on invalid parameters
907 1.2 itojun * EADDRNOTAVAIL on prefix match failed/specified address not found
908 1.2 itojun * other values may be returned from in6_ioctl()
909 1.2 itojun *
910 1.2 itojun * NOTE: SIOCALIFADDR(with IFLR_PREFIX set) allows prefixlen less than 64.
911 1.2 itojun * this is to accomodate address naming scheme other than RFC2374,
912 1.2 itojun * in the future.
913 1.2 itojun * RFC2373 defines interface id to be 64bit, but it allows non-RFC2374
914 1.2 itojun * address encoding scheme. (see figure on page 8)
915 1.2 itojun */
916 1.2 itojun static int
917 1.2 itojun in6_lifaddr_ioctl(so, cmd, data, ifp, p)
918 1.2 itojun struct socket *so;
919 1.2 itojun u_long cmd;
920 1.2 itojun caddr_t data;
921 1.2 itojun struct ifnet *ifp;
922 1.2 itojun struct proc *p;
923 1.2 itojun {
924 1.2 itojun struct if_laddrreq *iflr = (struct if_laddrreq *)data;
925 1.2 itojun struct ifaddr *ifa;
926 1.8 itojun struct sockaddr *sa;
927 1.2 itojun
928 1.2 itojun /* sanity checks */
929 1.2 itojun if (!data || !ifp) {
930 1.2 itojun panic("invalid argument to in6_lifaddr_ioctl");
931 1.2 itojun /*NOTRECHED*/
932 1.2 itojun }
933 1.2 itojun
934 1.2 itojun switch (cmd) {
935 1.2 itojun case SIOCGLIFADDR:
936 1.2 itojun /* address must be specified on GET with IFLR_PREFIX */
937 1.2 itojun if ((iflr->flags & IFLR_PREFIX) == 0)
938 1.2 itojun break;
939 1.2 itojun /*FALLTHROUGH*/
940 1.2 itojun case SIOCALIFADDR:
941 1.2 itojun case SIOCDLIFADDR:
942 1.2 itojun /* address must be specified on ADD and DELETE */
943 1.8 itojun sa = (struct sockaddr *)&iflr->addr;
944 1.8 itojun if (sa->sa_family != AF_INET6)
945 1.2 itojun return EINVAL;
946 1.8 itojun if (sa->sa_len != sizeof(struct sockaddr_in6))
947 1.2 itojun return EINVAL;
948 1.2 itojun /* XXX need improvement */
949 1.8 itojun sa = (struct sockaddr *)&iflr->dstaddr;
950 1.8 itojun if (sa->sa_family && sa->sa_family != AF_INET6)
951 1.2 itojun return EINVAL;
952 1.8 itojun if (sa->sa_len && sa->sa_len != sizeof(struct sockaddr_in6))
953 1.2 itojun return EINVAL;
954 1.2 itojun break;
955 1.2 itojun default: /*shouldn't happen*/
956 1.2 itojun #if 0
957 1.2 itojun panic("invalid cmd to in6_lifaddr_ioctl");
958 1.2 itojun /*NOTREACHED*/
959 1.2 itojun #else
960 1.2 itojun return EOPNOTSUPP;
961 1.2 itojun #endif
962 1.2 itojun }
963 1.2 itojun if (sizeof(struct in6_addr) * 8 < iflr->prefixlen)
964 1.2 itojun return EINVAL;
965 1.2 itojun
966 1.2 itojun switch (cmd) {
967 1.2 itojun case SIOCALIFADDR:
968 1.2 itojun {
969 1.2 itojun struct in6_aliasreq ifra;
970 1.2 itojun struct in6_addr *hostid = NULL;
971 1.2 itojun int prefixlen;
972 1.2 itojun
973 1.2 itojun if ((iflr->flags & IFLR_PREFIX) != 0) {
974 1.2 itojun struct sockaddr_in6 *sin6;
975 1.2 itojun
976 1.2 itojun /*
977 1.2 itojun * hostid is to fill in the hostid part of the
978 1.2 itojun * address. hostid points to the first link-local
979 1.2 itojun * address attached to the interface.
980 1.2 itojun */
981 1.21 itojun ifa = (struct ifaddr *)in6ifa_ifpforlinklocal(ifp, 0);
982 1.2 itojun if (!ifa)
983 1.2 itojun return EADDRNOTAVAIL;
984 1.8 itojun hostid = IFA_IN6(ifa);
985 1.2 itojun
986 1.2 itojun /* prefixlen must be <= 64. */
987 1.2 itojun if (64 < iflr->prefixlen)
988 1.2 itojun return EINVAL;
989 1.2 itojun prefixlen = iflr->prefixlen;
990 1.2 itojun
991 1.2 itojun /* hostid part must be zero. */
992 1.2 itojun sin6 = (struct sockaddr_in6 *)&iflr->addr;
993 1.2 itojun if (sin6->sin6_addr.s6_addr32[2] != 0
994 1.2 itojun || sin6->sin6_addr.s6_addr32[3] != 0) {
995 1.2 itojun return EINVAL;
996 1.2 itojun }
997 1.2 itojun } else
998 1.2 itojun prefixlen = iflr->prefixlen;
999 1.2 itojun
1000 1.2 itojun /* copy args to in6_aliasreq, perform ioctl(SIOCAIFADDR_IN6). */
1001 1.2 itojun bzero(&ifra, sizeof(ifra));
1002 1.2 itojun bcopy(iflr->iflr_name, ifra.ifra_name,
1003 1.2 itojun sizeof(ifra.ifra_name));
1004 1.2 itojun
1005 1.8 itojun bcopy(&iflr->addr, &ifra.ifra_addr,
1006 1.8 itojun ((struct sockaddr *)&iflr->addr)->sa_len);
1007 1.2 itojun if (hostid) {
1008 1.2 itojun /* fill in hostid part */
1009 1.2 itojun ifra.ifra_addr.sin6_addr.s6_addr32[2] =
1010 1.2 itojun hostid->s6_addr32[2];
1011 1.2 itojun ifra.ifra_addr.sin6_addr.s6_addr32[3] =
1012 1.2 itojun hostid->s6_addr32[3];
1013 1.2 itojun }
1014 1.2 itojun
1015 1.8 itojun if (((struct sockaddr *)&iflr->dstaddr)->sa_family) { /*XXX*/
1016 1.2 itojun bcopy(&iflr->dstaddr, &ifra.ifra_dstaddr,
1017 1.8 itojun ((struct sockaddr *)&iflr->dstaddr)->sa_len);
1018 1.2 itojun if (hostid) {
1019 1.2 itojun ifra.ifra_dstaddr.sin6_addr.s6_addr32[2] =
1020 1.2 itojun hostid->s6_addr32[2];
1021 1.2 itojun ifra.ifra_dstaddr.sin6_addr.s6_addr32[3] =
1022 1.2 itojun hostid->s6_addr32[3];
1023 1.2 itojun }
1024 1.2 itojun }
1025 1.2 itojun
1026 1.2 itojun ifra.ifra_prefixmask.sin6_family = AF_INET6;
1027 1.2 itojun ifra.ifra_prefixmask.sin6_len = sizeof(struct sockaddr_in6);
1028 1.2 itojun in6_len2mask(&ifra.ifra_prefixmask.sin6_addr, prefixlen);
1029 1.2 itojun
1030 1.2 itojun ifra.ifra_flags = iflr->flags & ~IFLR_PREFIX;
1031 1.2 itojun return in6_control(so, SIOCAIFADDR_IN6, (caddr_t)&ifra, ifp, p);
1032 1.2 itojun }
1033 1.2 itojun case SIOCGLIFADDR:
1034 1.2 itojun case SIOCDLIFADDR:
1035 1.2 itojun {
1036 1.2 itojun struct in6_ifaddr *ia;
1037 1.2 itojun struct in6_addr mask, candidate, match;
1038 1.2 itojun struct sockaddr_in6 *sin6;
1039 1.2 itojun int cmp;
1040 1.2 itojun
1041 1.2 itojun bzero(&mask, sizeof(mask));
1042 1.2 itojun if (iflr->flags & IFLR_PREFIX) {
1043 1.2 itojun /* lookup a prefix rather than address. */
1044 1.2 itojun in6_len2mask(&mask, iflr->prefixlen);
1045 1.2 itojun
1046 1.2 itojun sin6 = (struct sockaddr_in6 *)&iflr->addr;
1047 1.2 itojun bcopy(&sin6->sin6_addr, &match, sizeof(match));
1048 1.2 itojun match.s6_addr32[0] &= mask.s6_addr32[0];
1049 1.2 itojun match.s6_addr32[1] &= mask.s6_addr32[1];
1050 1.2 itojun match.s6_addr32[2] &= mask.s6_addr32[2];
1051 1.2 itojun match.s6_addr32[3] &= mask.s6_addr32[3];
1052 1.2 itojun
1053 1.2 itojun /* if you set extra bits, that's wrong */
1054 1.2 itojun if (bcmp(&match, &sin6->sin6_addr, sizeof(match)))
1055 1.2 itojun return EINVAL;
1056 1.2 itojun
1057 1.2 itojun cmp = 1;
1058 1.2 itojun } else {
1059 1.2 itojun if (cmd == SIOCGLIFADDR) {
1060 1.2 itojun /* on getting an address, take the 1st match */
1061 1.2 itojun cmp = 0; /*XXX*/
1062 1.2 itojun } else {
1063 1.2 itojun /* on deleting an address, do exact match */
1064 1.2 itojun in6_len2mask(&mask, 128);
1065 1.2 itojun sin6 = (struct sockaddr_in6 *)&iflr->addr;
1066 1.2 itojun bcopy(&sin6->sin6_addr, &match, sizeof(match));
1067 1.2 itojun
1068 1.2 itojun cmp = 1;
1069 1.2 itojun }
1070 1.2 itojun }
1071 1.2 itojun
1072 1.2 itojun for (ifa = ifp->if_addrlist.tqh_first;
1073 1.2 itojun ifa;
1074 1.8 itojun ifa = ifa->ifa_list.tqe_next)
1075 1.8 itojun {
1076 1.2 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
1077 1.2 itojun continue;
1078 1.2 itojun if (!cmp)
1079 1.2 itojun break;
1080 1.8 itojun bcopy(IFA_IN6(ifa), &candidate, sizeof(candidate));
1081 1.2 itojun candidate.s6_addr32[0] &= mask.s6_addr32[0];
1082 1.2 itojun candidate.s6_addr32[1] &= mask.s6_addr32[1];
1083 1.2 itojun candidate.s6_addr32[2] &= mask.s6_addr32[2];
1084 1.2 itojun candidate.s6_addr32[3] &= mask.s6_addr32[3];
1085 1.2 itojun if (IN6_ARE_ADDR_EQUAL(&candidate, &match))
1086 1.2 itojun break;
1087 1.2 itojun }
1088 1.2 itojun if (!ifa)
1089 1.2 itojun return EADDRNOTAVAIL;
1090 1.2 itojun ia = ifa2ia6(ifa);
1091 1.2 itojun
1092 1.2 itojun if (cmd == SIOCGLIFADDR) {
1093 1.2 itojun /* fill in the if_laddrreq structure */
1094 1.2 itojun bcopy(&ia->ia_addr, &iflr->addr, ia->ia_addr.sin6_len);
1095 1.2 itojun
1096 1.2 itojun if ((ifp->if_flags & IFF_POINTOPOINT) != 0) {
1097 1.2 itojun bcopy(&ia->ia_dstaddr, &iflr->dstaddr,
1098 1.2 itojun ia->ia_dstaddr.sin6_len);
1099 1.2 itojun } else
1100 1.2 itojun bzero(&iflr->dstaddr, sizeof(iflr->dstaddr));
1101 1.2 itojun
1102 1.2 itojun iflr->prefixlen =
1103 1.2 itojun in6_mask2len(&ia->ia_prefixmask.sin6_addr);
1104 1.2 itojun
1105 1.2 itojun iflr->flags = ia->ia6_flags; /*XXX*/
1106 1.2 itojun
1107 1.2 itojun return 0;
1108 1.2 itojun } else {
1109 1.2 itojun struct in6_aliasreq ifra;
1110 1.2 itojun
1111 1.2 itojun /* fill in6_aliasreq and do ioctl(SIOCDIFADDR_IN6) */
1112 1.2 itojun bzero(&ifra, sizeof(ifra));
1113 1.2 itojun bcopy(iflr->iflr_name, ifra.ifra_name,
1114 1.2 itojun sizeof(ifra.ifra_name));
1115 1.2 itojun
1116 1.2 itojun bcopy(&ia->ia_addr, &ifra.ifra_addr,
1117 1.2 itojun ia->ia_addr.sin6_len);
1118 1.2 itojun if ((ifp->if_flags & IFF_POINTOPOINT) != 0) {
1119 1.2 itojun bcopy(&ia->ia_dstaddr, &ifra.ifra_dstaddr,
1120 1.2 itojun ia->ia_dstaddr.sin6_len);
1121 1.23 itojun } else {
1122 1.23 itojun bzero(&ifra.ifra_dstaddr,
1123 1.23 itojun sizeof(ifra.ifra_dstaddr));
1124 1.2 itojun }
1125 1.2 itojun bcopy(&ia->ia_prefixmask, &ifra.ifra_dstaddr,
1126 1.2 itojun ia->ia_prefixmask.sin6_len);
1127 1.2 itojun
1128 1.2 itojun ifra.ifra_flags = ia->ia6_flags;
1129 1.2 itojun return in6_control(so, SIOCDIFADDR_IN6, (caddr_t)&ifra,
1130 1.2 itojun ifp, p);
1131 1.2 itojun }
1132 1.2 itojun }
1133 1.2 itojun }
1134 1.2 itojun
1135 1.2 itojun return EOPNOTSUPP; /*just for safety*/
1136 1.2 itojun }
1137 1.2 itojun
1138 1.2 itojun /*
1139 1.2 itojun * Delete any existing route for an interface.
1140 1.2 itojun */
1141 1.2 itojun void
1142 1.2 itojun in6_ifscrub(ifp, ia)
1143 1.2 itojun register struct ifnet *ifp;
1144 1.2 itojun register struct in6_ifaddr *ia;
1145 1.2 itojun {
1146 1.2 itojun if ((ia->ia_flags & IFA_ROUTE) == 0)
1147 1.2 itojun return;
1148 1.2 itojun if (ifp->if_flags & (IFF_LOOPBACK | IFF_POINTOPOINT))
1149 1.2 itojun rtinit(&(ia->ia_ifa), (int)RTM_DELETE, RTF_HOST);
1150 1.2 itojun else
1151 1.2 itojun rtinit(&(ia->ia_ifa), (int)RTM_DELETE, 0);
1152 1.2 itojun ia->ia_flags &= ~IFA_ROUTE;
1153 1.2 itojun
1154 1.2 itojun /* Remove ownaddr's loopback rtentry, if it exists. */
1155 1.2 itojun in6_ifremloop(&(ia->ia_ifa));
1156 1.2 itojun }
1157 1.2 itojun
1158 1.2 itojun /*
1159 1.2 itojun * Initialize an interface's intetnet6 address
1160 1.2 itojun * and routing table entry.
1161 1.2 itojun */
1162 1.2 itojun int
1163 1.2 itojun in6_ifinit(ifp, ia, sin6, scrub)
1164 1.2 itojun struct ifnet *ifp;
1165 1.2 itojun struct in6_ifaddr *ia;
1166 1.2 itojun struct sockaddr_in6 *sin6;
1167 1.2 itojun int scrub;
1168 1.2 itojun {
1169 1.2 itojun struct sockaddr_in6 oldaddr;
1170 1.2 itojun int error, flags = RTF_UP;
1171 1.2 itojun int s = splimp();
1172 1.2 itojun
1173 1.2 itojun oldaddr = ia->ia_addr;
1174 1.2 itojun ia->ia_addr = *sin6;
1175 1.2 itojun /*
1176 1.2 itojun * Give the interface a chance to initialize
1177 1.2 itojun * if this is its first address,
1178 1.2 itojun * and to validate the address if necessary.
1179 1.2 itojun */
1180 1.2 itojun if (ifp->if_ioctl &&
1181 1.2 itojun (error = (*ifp->if_ioctl)(ifp, SIOCSIFADDR, (caddr_t)ia))) {
1182 1.2 itojun splx(s);
1183 1.2 itojun ia->ia_addr = oldaddr;
1184 1.2 itojun return(error);
1185 1.2 itojun }
1186 1.2 itojun
1187 1.2 itojun switch (ifp->if_type) {
1188 1.7 is case IFT_ARCNET:
1189 1.2 itojun case IFT_ETHER:
1190 1.2 itojun case IFT_FDDI:
1191 1.2 itojun ia->ia_ifa.ifa_rtrequest = nd6_rtrequest;
1192 1.2 itojun ia->ia_ifa.ifa_flags |= RTF_CLONING;
1193 1.2 itojun break;
1194 1.2 itojun case IFT_PPP:
1195 1.2 itojun ia->ia_ifa.ifa_rtrequest = nd6_p2p_rtrequest;
1196 1.2 itojun ia->ia_ifa.ifa_flags |= RTF_CLONING;
1197 1.2 itojun break;
1198 1.2 itojun }
1199 1.2 itojun
1200 1.2 itojun splx(s);
1201 1.2 itojun if (scrub) {
1202 1.2 itojun ia->ia_ifa.ifa_addr = (struct sockaddr *)&oldaddr;
1203 1.2 itojun in6_ifscrub(ifp, ia);
1204 1.2 itojun ia->ia_ifa.ifa_addr = (struct sockaddr *)&ia->ia_addr;
1205 1.2 itojun }
1206 1.18 itojun /* xxx
1207 1.2 itojun * in_socktrim
1208 1.2 itojun */
1209 1.2 itojun /*
1210 1.2 itojun * Add route for the network.
1211 1.2 itojun */
1212 1.2 itojun ia->ia_ifa.ifa_metric = ifp->if_metric;
1213 1.2 itojun if (ifp->if_flags & IFF_LOOPBACK) {
1214 1.2 itojun ia->ia_ifa.ifa_dstaddr = ia->ia_ifa.ifa_addr;
1215 1.2 itojun flags |= RTF_HOST;
1216 1.2 itojun } else if (ifp->if_flags & IFF_POINTOPOINT) {
1217 1.2 itojun if (ia->ia_dstaddr.sin6_family != AF_INET6)
1218 1.2 itojun return(0);
1219 1.2 itojun flags |= RTF_HOST;
1220 1.2 itojun }
1221 1.2 itojun if ((error = rtinit(&(ia->ia_ifa), (int)RTM_ADD, flags)) == 0)
1222 1.2 itojun ia->ia_flags |= IFA_ROUTE;
1223 1.2 itojun
1224 1.2 itojun /* Add ownaddr as loopback rtentry, if necessary(ex. on p2p link). */
1225 1.2 itojun in6_ifaddloop(&(ia->ia_ifa));
1226 1.2 itojun
1227 1.2 itojun if (ifp->if_flags & IFF_MULTICAST)
1228 1.2 itojun in6_restoremkludge(ia, ifp);
1229 1.2 itojun
1230 1.2 itojun return(error);
1231 1.2 itojun }
1232 1.2 itojun
1233 1.2 itojun /*
1234 1.2 itojun * Multicast address kludge:
1235 1.2 itojun * If there were any multicast addresses attached to this interface address,
1236 1.2 itojun * either move them to another address on this interface, or save them until
1237 1.2 itojun * such time as this interface is reconfigured for IPv6.
1238 1.2 itojun */
1239 1.2 itojun void
1240 1.2 itojun in6_savemkludge(oia)
1241 1.2 itojun struct in6_ifaddr *oia;
1242 1.2 itojun {
1243 1.2 itojun struct in6_ifaddr *ia;
1244 1.2 itojun struct in6_multi *in6m, *next;
1245 1.2 itojun
1246 1.2 itojun IFP_TO_IA6(oia->ia_ifp, ia);
1247 1.2 itojun if (ia) { /* there is another address */
1248 1.2 itojun for (in6m = oia->ia6_multiaddrs.lh_first; in6m; in6m = next){
1249 1.2 itojun next = in6m->in6m_entry.le_next;
1250 1.2 itojun IFAFREE(&in6m->in6m_ia->ia_ifa);
1251 1.10 thorpej IFAREF(&ia->ia_ifa);
1252 1.2 itojun in6m->in6m_ia = ia;
1253 1.2 itojun LIST_INSERT_HEAD(&ia->ia6_multiaddrs, in6m, in6m_entry);
1254 1.2 itojun }
1255 1.2 itojun } else { /* last address on this if deleted, save */
1256 1.2 itojun struct multi6_kludge *mk;
1257 1.2 itojun
1258 1.2 itojun mk = malloc(sizeof(*mk), M_IPMADDR, M_WAITOK);
1259 1.2 itojun
1260 1.2 itojun LIST_INIT(&mk->mk_head);
1261 1.2 itojun mk->mk_ifp = oia->ia_ifp;
1262 1.2 itojun
1263 1.2 itojun for (in6m = oia->ia6_multiaddrs.lh_first; in6m; in6m = next){
1264 1.2 itojun next = in6m->in6m_entry.le_next;
1265 1.12 itojun IFAFREE(&in6m->in6m_ia->ia_ifa); /* release reference */
1266 1.12 itojun in6m->in6m_ia = NULL;
1267 1.2 itojun LIST_INSERT_HEAD(&mk->mk_head, in6m, in6m_entry);
1268 1.2 itojun }
1269 1.2 itojun
1270 1.2 itojun if (mk->mk_head.lh_first != NULL) {
1271 1.2 itojun LIST_INSERT_HEAD(&in6_mk, mk, mk_entry);
1272 1.2 itojun }
1273 1.2 itojun else {
1274 1.2 itojun FREE(mk, M_IPMADDR);
1275 1.2 itojun }
1276 1.2 itojun }
1277 1.2 itojun }
1278 1.2 itojun
1279 1.2 itojun /*
1280 1.2 itojun * Continuation of multicast address hack:
1281 1.2 itojun * If there was a multicast group list previously saved for this interface,
1282 1.2 itojun * then we re-attach it to the first address configured on the i/f.
1283 1.2 itojun */
1284 1.2 itojun void
1285 1.2 itojun in6_restoremkludge(ia, ifp)
1286 1.2 itojun struct in6_ifaddr *ia;
1287 1.2 itojun struct ifnet *ifp;
1288 1.2 itojun {
1289 1.2 itojun struct multi6_kludge *mk;
1290 1.2 itojun
1291 1.2 itojun for (mk = in6_mk.lh_first; mk; mk = mk->mk_entry.le_next) {
1292 1.2 itojun if (mk->mk_ifp == ifp) {
1293 1.2 itojun struct in6_multi *in6m, *next;
1294 1.2 itojun
1295 1.2 itojun for (in6m = mk->mk_head.lh_first; in6m; in6m = next){
1296 1.2 itojun next = in6m->in6m_entry.le_next;
1297 1.12 itojun in6m->in6m_ia = ia;
1298 1.12 itojun IFAREF(&ia->ia_ifa); /* gain a reference */
1299 1.2 itojun LIST_INSERT_HEAD(&ia->ia6_multiaddrs,
1300 1.2 itojun in6m, in6m_entry);
1301 1.2 itojun }
1302 1.2 itojun LIST_REMOVE(mk, mk_entry);
1303 1.2 itojun free(mk, M_IPMADDR);
1304 1.2 itojun break;
1305 1.2 itojun }
1306 1.2 itojun }
1307 1.2 itojun }
1308 1.2 itojun
1309 1.12 itojun void
1310 1.12 itojun in6_purgemkludge(ifp)
1311 1.12 itojun struct ifnet *ifp;
1312 1.12 itojun {
1313 1.12 itojun struct multi6_kludge *mk;
1314 1.13 itojun struct in6_multi *in6m;
1315 1.12 itojun
1316 1.12 itojun for (mk = in6_mk.lh_first; mk; mk = mk->mk_entry.le_next) {
1317 1.12 itojun if (mk->mk_ifp != ifp)
1318 1.12 itojun continue;
1319 1.12 itojun
1320 1.13 itojun /* leave from all multicast groups joined */
1321 1.13 itojun while ((in6m = LIST_FIRST(&mk->mk_head)) != NULL)
1322 1.12 itojun in6_delmulti(in6m);
1323 1.12 itojun LIST_REMOVE(mk, mk_entry);
1324 1.12 itojun free(mk, M_IPMADDR);
1325 1.12 itojun break;
1326 1.12 itojun }
1327 1.12 itojun }
1328 1.12 itojun
1329 1.2 itojun /*
1330 1.18 itojun * Add an address to the list of IP6 multicast addresses for a
1331 1.2 itojun * given interface.
1332 1.2 itojun */
1333 1.2 itojun struct in6_multi *
1334 1.2 itojun in6_addmulti(maddr6, ifp, errorp)
1335 1.2 itojun register struct in6_addr *maddr6;
1336 1.2 itojun register struct ifnet *ifp;
1337 1.2 itojun int *errorp;
1338 1.2 itojun {
1339 1.2 itojun struct in6_ifaddr *ia;
1340 1.2 itojun struct in6_ifreq ifr;
1341 1.2 itojun struct in6_multi *in6m;
1342 1.4 itojun int s = splsoftnet();
1343 1.2 itojun
1344 1.2 itojun *errorp = 0;
1345 1.2 itojun /*
1346 1.2 itojun * See if address already in list.
1347 1.2 itojun */
1348 1.2 itojun IN6_LOOKUP_MULTI(*maddr6, ifp, in6m);
1349 1.2 itojun if (in6m != NULL) {
1350 1.2 itojun /*
1351 1.2 itojun * Found it; just increment the refrence count.
1352 1.2 itojun */
1353 1.2 itojun in6m->in6m_refcount++;
1354 1.2 itojun } else {
1355 1.2 itojun /*
1356 1.2 itojun * New address; allocate a new multicast record
1357 1.2 itojun * and link it into the interface's multicast list.
1358 1.2 itojun */
1359 1.2 itojun in6m = (struct in6_multi *)
1360 1.2 itojun malloc(sizeof(*in6m), M_IPMADDR, M_NOWAIT);
1361 1.2 itojun if (in6m == NULL) {
1362 1.2 itojun splx(s);
1363 1.2 itojun *errorp = ENOBUFS;
1364 1.2 itojun return(NULL);
1365 1.2 itojun }
1366 1.2 itojun in6m->in6m_addr = *maddr6;
1367 1.2 itojun in6m->in6m_ifp = ifp;
1368 1.2 itojun in6m->in6m_refcount = 1;
1369 1.2 itojun IFP_TO_IA6(ifp, ia);
1370 1.2 itojun if (ia == NULL) {
1371 1.2 itojun free(in6m, M_IPMADDR);
1372 1.2 itojun splx(s);
1373 1.2 itojun *errorp = EADDRNOTAVAIL; /* appropriate? */
1374 1.2 itojun return(NULL);
1375 1.2 itojun }
1376 1.2 itojun in6m->in6m_ia = ia;
1377 1.10 thorpej IFAREF(&ia->ia_ifa); /* gain a reference */
1378 1.2 itojun LIST_INSERT_HEAD(&ia->ia6_multiaddrs, in6m, in6m_entry);
1379 1.2 itojun
1380 1.2 itojun /*
1381 1.2 itojun * Ask the network driver to update its multicast reception
1382 1.2 itojun * filter appropriately for the new address.
1383 1.2 itojun */
1384 1.2 itojun bzero(&ifr.ifr_addr, sizeof(struct sockaddr_in6));
1385 1.2 itojun ifr.ifr_addr.sin6_len = sizeof(struct sockaddr_in6);
1386 1.2 itojun ifr.ifr_addr.sin6_family = AF_INET6;
1387 1.2 itojun ifr.ifr_addr.sin6_addr = *maddr6;
1388 1.2 itojun if (ifp->if_ioctl == NULL)
1389 1.2 itojun *errorp = ENXIO; /* XXX: appropriate? */
1390 1.2 itojun else
1391 1.2 itojun *errorp = (*ifp->if_ioctl)(ifp, SIOCADDMULTI,
1392 1.2 itojun (caddr_t)&ifr);
1393 1.2 itojun if (*errorp) {
1394 1.2 itojun LIST_REMOVE(in6m, in6m_entry);
1395 1.2 itojun free(in6m, M_IPMADDR);
1396 1.2 itojun splx(s);
1397 1.2 itojun return(NULL);
1398 1.2 itojun }
1399 1.2 itojun /*
1400 1.2 itojun * Let MLD6 know that we have joined a new IP6 multicast
1401 1.2 itojun * group.
1402 1.2 itojun */
1403 1.2 itojun mld6_start_listening(in6m);
1404 1.2 itojun }
1405 1.2 itojun splx(s);
1406 1.2 itojun return(in6m);
1407 1.2 itojun }
1408 1.2 itojun
1409 1.2 itojun /*
1410 1.2 itojun * Delete a multicast address record.
1411 1.2 itojun */
1412 1.2 itojun void
1413 1.2 itojun in6_delmulti(in6m)
1414 1.2 itojun struct in6_multi *in6m;
1415 1.2 itojun {
1416 1.2 itojun struct in6_ifreq ifr;
1417 1.4 itojun int s = splsoftnet();
1418 1.2 itojun
1419 1.2 itojun if (--in6m->in6m_refcount == 0) {
1420 1.2 itojun /*
1421 1.2 itojun * No remaining claims to this record; let MLD6 know
1422 1.2 itojun * that we are leaving the multicast group.
1423 1.2 itojun */
1424 1.2 itojun mld6_stop_listening(in6m);
1425 1.2 itojun
1426 1.2 itojun /*
1427 1.2 itojun * Unlink from list.
1428 1.2 itojun */
1429 1.2 itojun LIST_REMOVE(in6m, in6m_entry);
1430 1.12 itojun if (in6m->in6m_ia)
1431 1.12 itojun IFAFREE(&in6m->in6m_ia->ia_ifa); /* release reference */
1432 1.2 itojun
1433 1.2 itojun /*
1434 1.18 itojun * Notify the network driver to update its multicast
1435 1.2 itojun * reception filter.
1436 1.2 itojun */
1437 1.2 itojun bzero(&ifr.ifr_addr, sizeof(struct sockaddr_in6));
1438 1.2 itojun ifr.ifr_addr.sin6_len = sizeof(struct sockaddr_in6);
1439 1.2 itojun ifr.ifr_addr.sin6_family = AF_INET6;
1440 1.2 itojun ifr.ifr_addr.sin6_addr = in6m->in6m_addr;
1441 1.2 itojun (*in6m->in6m_ifp->if_ioctl)(in6m->in6m_ifp,
1442 1.2 itojun SIOCDELMULTI, (caddr_t)&ifr);
1443 1.2 itojun free(in6m, M_IPMADDR);
1444 1.2 itojun }
1445 1.2 itojun splx(s);
1446 1.2 itojun }
1447 1.2 itojun
1448 1.2 itojun /*
1449 1.2 itojun * Find an IPv6 interface link-local address specific to an interface.
1450 1.2 itojun */
1451 1.2 itojun struct in6_ifaddr *
1452 1.21 itojun in6ifa_ifpforlinklocal(ifp, ignoreflags)
1453 1.2 itojun struct ifnet *ifp;
1454 1.21 itojun int ignoreflags;
1455 1.2 itojun {
1456 1.2 itojun register struct ifaddr *ifa;
1457 1.2 itojun
1458 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
1459 1.8 itojun {
1460 1.2 itojun if (ifa->ifa_addr == NULL)
1461 1.2 itojun continue; /* just for safety */
1462 1.2 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
1463 1.2 itojun continue;
1464 1.21 itojun if (IN6_IS_ADDR_LINKLOCAL(IFA_IN6(ifa))) {
1465 1.21 itojun if ((((struct in6_ifaddr *)ifa)->ia6_flags &
1466 1.21 itojun ignoreflags) != 0)
1467 1.21 itojun continue;
1468 1.2 itojun break;
1469 1.21 itojun }
1470 1.2 itojun }
1471 1.2 itojun
1472 1.2 itojun return((struct in6_ifaddr *)ifa);
1473 1.2 itojun }
1474 1.2 itojun
1475 1.2 itojun
1476 1.2 itojun /*
1477 1.2 itojun * find the internet address corresponding to a given interface and address.
1478 1.2 itojun */
1479 1.2 itojun struct in6_ifaddr *
1480 1.2 itojun in6ifa_ifpwithaddr(ifp, addr)
1481 1.2 itojun struct ifnet *ifp;
1482 1.2 itojun struct in6_addr *addr;
1483 1.2 itojun {
1484 1.2 itojun register struct ifaddr *ifa;
1485 1.2 itojun
1486 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
1487 1.8 itojun {
1488 1.2 itojun if (ifa->ifa_addr == NULL)
1489 1.2 itojun continue; /* just for safety */
1490 1.2 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
1491 1.2 itojun continue;
1492 1.8 itojun if (IN6_ARE_ADDR_EQUAL(addr, IFA_IN6(ifa)))
1493 1.2 itojun break;
1494 1.2 itojun }
1495 1.2 itojun
1496 1.2 itojun return((struct in6_ifaddr *)ifa);
1497 1.2 itojun }
1498 1.2 itojun
1499 1.2 itojun /*
1500 1.2 itojun * Convert IP6 address to printable (loggable) representation.
1501 1.2 itojun */
1502 1.2 itojun static char digits[] = "0123456789abcdef";
1503 1.2 itojun static int ip6round = 0;
1504 1.2 itojun char *
1505 1.2 itojun ip6_sprintf(addr)
1506 1.2 itojun register struct in6_addr *addr;
1507 1.2 itojun {
1508 1.2 itojun static char ip6buf[8][48];
1509 1.2 itojun register int i;
1510 1.2 itojun register char *cp;
1511 1.2 itojun register u_short *a = (u_short *)addr;
1512 1.2 itojun register u_char *d;
1513 1.2 itojun int dcolon = 0;
1514 1.2 itojun
1515 1.2 itojun ip6round = (ip6round + 1) & 7;
1516 1.2 itojun cp = ip6buf[ip6round];
1517 1.2 itojun
1518 1.2 itojun for (i = 0; i < 8; i++) {
1519 1.2 itojun if (dcolon == 1) {
1520 1.2 itojun if (*a == 0) {
1521 1.2 itojun if (i == 7)
1522 1.2 itojun *cp++ = ':';
1523 1.2 itojun a++;
1524 1.2 itojun continue;
1525 1.2 itojun } else
1526 1.2 itojun dcolon = 2;
1527 1.2 itojun }
1528 1.2 itojun if (*a == 0) {
1529 1.2 itojun if (dcolon == 0 && *(a + 1) == 0) {
1530 1.2 itojun if (i == 0)
1531 1.2 itojun *cp++ = ':';
1532 1.2 itojun *cp++ = ':';
1533 1.2 itojun dcolon = 1;
1534 1.2 itojun } else {
1535 1.2 itojun *cp++ = '0';
1536 1.2 itojun *cp++ = ':';
1537 1.2 itojun }
1538 1.2 itojun a++;
1539 1.2 itojun continue;
1540 1.2 itojun }
1541 1.2 itojun d = (u_char *)a;
1542 1.2 itojun *cp++ = digits[*d >> 4];
1543 1.2 itojun *cp++ = digits[*d++ & 0xf];
1544 1.2 itojun *cp++ = digits[*d >> 4];
1545 1.2 itojun *cp++ = digits[*d & 0xf];
1546 1.2 itojun *cp++ = ':';
1547 1.2 itojun a++;
1548 1.2 itojun }
1549 1.2 itojun *--cp = 0;
1550 1.2 itojun return(ip6buf[ip6round]);
1551 1.2 itojun }
1552 1.2 itojun
1553 1.2 itojun int
1554 1.2 itojun in6_localaddr(in6)
1555 1.2 itojun struct in6_addr *in6;
1556 1.2 itojun {
1557 1.2 itojun struct in6_ifaddr *ia;
1558 1.2 itojun
1559 1.2 itojun if (IN6_IS_ADDR_LOOPBACK(in6) || IN6_IS_ADDR_LINKLOCAL(in6))
1560 1.2 itojun return 1;
1561 1.2 itojun
1562 1.2 itojun for (ia = in6_ifaddr; ia; ia = ia->ia_next)
1563 1.2 itojun if (IN6_ARE_MASKED_ADDR_EQUAL(in6, &ia->ia_addr.sin6_addr,
1564 1.2 itojun &ia->ia_prefixmask.sin6_addr))
1565 1.2 itojun return 1;
1566 1.2 itojun
1567 1.2 itojun return (0);
1568 1.2 itojun }
1569 1.2 itojun
1570 1.2 itojun /*
1571 1.2 itojun * Get a scope of the address. Node-local, link-local, site-local or global.
1572 1.2 itojun */
1573 1.2 itojun int
1574 1.2 itojun in6_addrscope (addr)
1575 1.2 itojun struct in6_addr *addr;
1576 1.2 itojun {
1577 1.2 itojun int scope;
1578 1.2 itojun
1579 1.2 itojun if (addr->s6_addr8[0] == 0xfe) {
1580 1.2 itojun scope = addr->s6_addr8[1] & 0xc0;
1581 1.2 itojun
1582 1.2 itojun switch (scope) {
1583 1.2 itojun case 0x80:
1584 1.2 itojun return IPV6_ADDR_SCOPE_LINKLOCAL;
1585 1.2 itojun break;
1586 1.2 itojun case 0xc0:
1587 1.2 itojun return IPV6_ADDR_SCOPE_SITELOCAL;
1588 1.2 itojun break;
1589 1.2 itojun default:
1590 1.2 itojun return IPV6_ADDR_SCOPE_GLOBAL; /* just in case */
1591 1.2 itojun break;
1592 1.2 itojun }
1593 1.2 itojun }
1594 1.2 itojun
1595 1.2 itojun
1596 1.2 itojun if (addr->s6_addr8[0] == 0xff) {
1597 1.2 itojun scope = addr->s6_addr8[1] & 0x0f;
1598 1.2 itojun
1599 1.18 itojun /*
1600 1.2 itojun * due to other scope such as reserved,
1601 1.2 itojun * return scope doesn't work.
1602 1.2 itojun */
1603 1.2 itojun switch (scope) {
1604 1.2 itojun case IPV6_ADDR_SCOPE_NODELOCAL:
1605 1.2 itojun return IPV6_ADDR_SCOPE_NODELOCAL;
1606 1.2 itojun break;
1607 1.2 itojun case IPV6_ADDR_SCOPE_LINKLOCAL:
1608 1.2 itojun return IPV6_ADDR_SCOPE_LINKLOCAL;
1609 1.2 itojun break;
1610 1.2 itojun case IPV6_ADDR_SCOPE_SITELOCAL:
1611 1.2 itojun return IPV6_ADDR_SCOPE_SITELOCAL;
1612 1.2 itojun break;
1613 1.2 itojun default:
1614 1.2 itojun return IPV6_ADDR_SCOPE_GLOBAL;
1615 1.2 itojun break;
1616 1.2 itojun }
1617 1.2 itojun }
1618 1.2 itojun
1619 1.2 itojun if (bcmp(&in6addr_loopback, addr, sizeof(addr) - 1) == 0) {
1620 1.2 itojun if (addr->s6_addr8[15] == 1) /* loopback */
1621 1.2 itojun return IPV6_ADDR_SCOPE_NODELOCAL;
1622 1.2 itojun if (addr->s6_addr8[15] == 0) /* unspecified */
1623 1.2 itojun return IPV6_ADDR_SCOPE_LINKLOCAL;
1624 1.2 itojun }
1625 1.2 itojun
1626 1.2 itojun return IPV6_ADDR_SCOPE_GLOBAL;
1627 1.2 itojun }
1628 1.2 itojun
1629 1.21 itojun int
1630 1.21 itojun in6_addr2scopeid(ifp, addr)
1631 1.21 itojun struct ifnet *ifp; /* must not be NULL */
1632 1.21 itojun struct in6_addr *addr; /* must not be NULL */
1633 1.21 itojun {
1634 1.21 itojun int scope = in6_addrscope(addr);
1635 1.21 itojun
1636 1.21 itojun switch(scope) {
1637 1.21 itojun case IPV6_ADDR_SCOPE_NODELOCAL:
1638 1.21 itojun return(-1); /* XXX: is this an appropriate value? */
1639 1.21 itojun
1640 1.21 itojun case IPV6_ADDR_SCOPE_LINKLOCAL:
1641 1.21 itojun /* XXX: we do not distinguish between a link and an I/F. */
1642 1.21 itojun return(ifp->if_index);
1643 1.21 itojun
1644 1.21 itojun case IPV6_ADDR_SCOPE_SITELOCAL:
1645 1.21 itojun return(0); /* XXX: invalid. */
1646 1.21 itojun
1647 1.21 itojun default:
1648 1.21 itojun return(0); /* XXX: treat as global. */
1649 1.21 itojun }
1650 1.21 itojun }
1651 1.21 itojun
1652 1.2 itojun /*
1653 1.2 itojun * return length of part which dst and src are equal
1654 1.2 itojun * hard coding...
1655 1.2 itojun */
1656 1.2 itojun
1657 1.2 itojun int
1658 1.2 itojun in6_matchlen(src, dst)
1659 1.2 itojun struct in6_addr *src, *dst;
1660 1.2 itojun {
1661 1.2 itojun int match = 0;
1662 1.2 itojun u_char *s = (u_char *)src, *d = (u_char *)dst;
1663 1.2 itojun u_char *lim = s + 16, r;
1664 1.2 itojun
1665 1.2 itojun while (s < lim)
1666 1.2 itojun if ((r = (*d++ ^ *s++)) != 0) {
1667 1.2 itojun while (r < 128) {
1668 1.2 itojun match++;
1669 1.2 itojun r <<= 1;
1670 1.2 itojun }
1671 1.2 itojun break;
1672 1.2 itojun } else
1673 1.2 itojun match += 8;
1674 1.2 itojun return match;
1675 1.2 itojun }
1676 1.2 itojun
1677 1.8 itojun int
1678 1.8 itojun in6_are_prefix_equal(p1, p2, len)
1679 1.8 itojun struct in6_addr *p1, *p2;
1680 1.8 itojun int len;
1681 1.8 itojun {
1682 1.8 itojun int bytelen, bitlen;
1683 1.8 itojun
1684 1.8 itojun /* sanity check */
1685 1.8 itojun if (0 > len || len > 128) {
1686 1.8 itojun log(LOG_ERR, "in6_are_prefix_equal: invalid prefix length(%d)\n",
1687 1.8 itojun len);
1688 1.8 itojun return(0);
1689 1.8 itojun }
1690 1.8 itojun
1691 1.8 itojun bytelen = len / 8;
1692 1.8 itojun bitlen = len % 8;
1693 1.8 itojun
1694 1.8 itojun if (bcmp(&p1->s6_addr, &p2->s6_addr, bytelen))
1695 1.8 itojun return(0);
1696 1.8 itojun if (p1->s6_addr[bytelen] >> (8 - bitlen) !=
1697 1.8 itojun p2->s6_addr[bytelen] >> (8 - bitlen))
1698 1.8 itojun return(0);
1699 1.8 itojun
1700 1.8 itojun return(1);
1701 1.8 itojun }
1702 1.8 itojun
1703 1.8 itojun void
1704 1.8 itojun in6_prefixlen2mask(maskp, len)
1705 1.8 itojun struct in6_addr *maskp;
1706 1.8 itojun int len;
1707 1.8 itojun {
1708 1.8 itojun u_char maskarray[8] = {0x80, 0xc0, 0xe0, 0xf0, 0xf8, 0xfc, 0xfe, 0xff};
1709 1.8 itojun int bytelen, bitlen, i;
1710 1.8 itojun
1711 1.8 itojun /* sanity check */
1712 1.8 itojun if (0 > len || len > 128) {
1713 1.8 itojun log(LOG_ERR, "in6_prefixlen2mask: invalid prefix length(%d)\n",
1714 1.8 itojun len);
1715 1.8 itojun return;
1716 1.8 itojun }
1717 1.8 itojun
1718 1.8 itojun bzero(maskp, sizeof(*maskp));
1719 1.8 itojun bytelen = len / 8;
1720 1.8 itojun bitlen = len % 8;
1721 1.8 itojun for (i = 0; i < bytelen; i++)
1722 1.8 itojun maskp->s6_addr[i] = 0xff;
1723 1.8 itojun if (bitlen)
1724 1.8 itojun maskp->s6_addr[bytelen] = maskarray[bitlen - 1];
1725 1.8 itojun }
1726 1.8 itojun
1727 1.2 itojun /*
1728 1.2 itojun * return the best address out of the same scope
1729 1.2 itojun */
1730 1.2 itojun struct in6_ifaddr *
1731 1.21 itojun in6_ifawithscope(oifp, dst)
1732 1.21 itojun register struct ifnet *oifp;
1733 1.2 itojun register struct in6_addr *dst;
1734 1.2 itojun {
1735 1.21 itojun int dst_scope = in6_addrscope(dst), src_scope, best_scope;
1736 1.21 itojun int blen = -1;
1737 1.2 itojun struct ifaddr *ifa;
1738 1.21 itojun struct ifnet *ifp;
1739 1.21 itojun struct in6_ifaddr *ifa_best = NULL;
1740 1.21 itojun
1741 1.21 itojun if (oifp == NULL) {
1742 1.21 itojun printf("in6_ifawithscope: output interface is not specified\n");
1743 1.21 itojun return(NULL);
1744 1.21 itojun }
1745 1.2 itojun
1746 1.2 itojun /*
1747 1.21 itojun * We search for all addresses on all interfaces from the beginning.
1748 1.21 itojun * Comparing an interface with the outgoing interface will be done
1749 1.21 itojun * only at the final stage of tiebreaking.
1750 1.2 itojun */
1751 1.21 itojun for (ifp = TAILQ_FIRST(&ifnet); ifp; ifp = TAILQ_NEXT(ifp, if_list))
1752 1.8 itojun {
1753 1.21 itojun /*
1754 1.21 itojun * We can never take an address that breaks the scope zone
1755 1.21 itojun * of the destination.
1756 1.21 itojun */
1757 1.21 itojun if (in6_addr2scopeid(ifp, dst) != in6_addr2scopeid(oifp, dst))
1758 1.2 itojun continue;
1759 1.2 itojun
1760 1.21 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa;
1761 1.21 itojun ifa = ifa->ifa_list.tqe_next)
1762 1.21 itojun {
1763 1.21 itojun int tlen = -1, dscopecmp, bscopecmp, matchcmp;
1764 1.21 itojun
1765 1.21 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
1766 1.21 itojun continue;
1767 1.21 itojun
1768 1.21 itojun src_scope = in6_addrscope(IFA_IN6(ifa));
1769 1.21 itojun
1770 1.21 itojun #ifdef ADDRSELECT_DEBUG /* should be removed after stabilization */
1771 1.21 itojun dscopecmp = IN6_ARE_SCOPE_CMP(src_scope, dst_scope);
1772 1.21 itojun printf("in6_ifawithscope: dst=%s bestaddr=%s, "
1773 1.21 itojun "newaddr=%s, scope=%x, dcmp=%d, bcmp=%d, "
1774 1.21 itojun "matchlen=%d, flgs=%x\n",
1775 1.21 itojun ip6_sprintf(dst),
1776 1.21 itojun ifa_best ? ip6_sprintf(&ifa_best->ia_addr.sin6_addr) : "none",
1777 1.21 itojun ip6_sprintf(IFA_IN6(ifa)), src_scope,
1778 1.21 itojun dscopecmp,
1779 1.21 itojun ifa_best ? IN6_ARE_SCOPE_CMP(src_scope, best_scope) : -1,
1780 1.21 itojun in6_matchlen(IFA_IN6(ifa), dst),
1781 1.21 itojun ((struct in6_ifaddr *)ifa)->ia6_flags);
1782 1.21 itojun #endif
1783 1.21 itojun
1784 1.21 itojun /*
1785 1.21 itojun * Don't use an address before completing DAD
1786 1.21 itojun * nor a duplicated address.
1787 1.21 itojun */
1788 1.21 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags &
1789 1.21 itojun IN6_IFF_NOTREADY)
1790 1.21 itojun continue;
1791 1.21 itojun
1792 1.21 itojun /* XXX: is there any case to allow anycasts? */
1793 1.21 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags &
1794 1.21 itojun IN6_IFF_ANYCAST)
1795 1.21 itojun continue;
1796 1.21 itojun
1797 1.21 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags &
1798 1.21 itojun IN6_IFF_DETACHED)
1799 1.21 itojun continue;
1800 1.21 itojun
1801 1.21 itojun /*
1802 1.21 itojun * If this is the first address we find,
1803 1.21 itojun * keep it anyway.
1804 1.21 itojun */
1805 1.21 itojun if (ifa_best == NULL)
1806 1.21 itojun goto replace;
1807 1.21 itojun
1808 1.21 itojun /*
1809 1.21 itojun * ifa_best is never NULL beyond this line except
1810 1.21 itojun * within the block labeled "replace".
1811 1.21 itojun */
1812 1.21 itojun
1813 1.21 itojun /*
1814 1.21 itojun * If ifa_best has a smaller scope than dst and
1815 1.21 itojun * the current address has a larger one than
1816 1.21 itojun * (or equal to) dst, always replace ifa_best.
1817 1.21 itojun * Also, if the current address has a smaller scope
1818 1.21 itojun * than dst, ignore it unless ifa_best also has a
1819 1.21 itojun * smaller scope.
1820 1.21 itojun */
1821 1.21 itojun if (IN6_ARE_SCOPE_CMP(best_scope, dst_scope) < 0 &&
1822 1.21 itojun IN6_ARE_SCOPE_CMP(src_scope, dst_scope) >= 0)
1823 1.21 itojun goto replace;
1824 1.21 itojun if (IN6_ARE_SCOPE_CMP(src_scope, dst_scope) < 0 &&
1825 1.21 itojun IN6_ARE_SCOPE_CMP(best_scope, dst_scope) >= 0)
1826 1.21 itojun continue;
1827 1.21 itojun
1828 1.21 itojun /*
1829 1.21 itojun * A deprecated address SHOULD NOT be used in new
1830 1.21 itojun * communications if an alternate (non-deprecated)
1831 1.21 itojun * address is available and has sufficient scope.
1832 1.21 itojun * RFC 2462, Section 5.5.4.
1833 1.21 itojun */
1834 1.21 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags &
1835 1.21 itojun IN6_IFF_DEPRECATED) {
1836 1.21 itojun /*
1837 1.21 itojun * Ignore any deprecated addresses if
1838 1.21 itojun * specified by configuration.
1839 1.21 itojun */
1840 1.21 itojun if (!ip6_use_deprecated)
1841 1.21 itojun continue;
1842 1.21 itojun
1843 1.21 itojun /*
1844 1.21 itojun * If we have already found a non-deprecated
1845 1.21 itojun * candidate, just ignore deprecated addresses.
1846 1.21 itojun */
1847 1.21 itojun if ((ifa_best->ia6_flags & IN6_IFF_DEPRECATED)
1848 1.21 itojun == 0)
1849 1.21 itojun continue;
1850 1.21 itojun }
1851 1.21 itojun
1852 1.21 itojun /*
1853 1.21 itojun * A non-deprecated address is always preferred
1854 1.21 itojun * to a deprecated one regardless of scopes and
1855 1.21 itojun * address matching.
1856 1.21 itojun */
1857 1.21 itojun if ((ifa_best->ia6_flags & IN6_IFF_DEPRECATED) &&
1858 1.21 itojun (((struct in6_ifaddr *)ifa)->ia6_flags &
1859 1.21 itojun IN6_IFF_DEPRECATED) == 0)
1860 1.21 itojun goto replace;
1861 1.21 itojun
1862 1.21 itojun /*
1863 1.21 itojun * At this point, we have two cases:
1864 1.21 itojun * 1. we are looking at a non-deprecated address,
1865 1.21 itojun * and ifa_best is also non-deprecated.
1866 1.21 itojun * 2. we are looking at a deprecated address,
1867 1.21 itojun * and ifa_best is also deprecated.
1868 1.21 itojun * Also, we do not have to consider a case where
1869 1.21 itojun * the scope of if_best is larger(smaller) than dst and
1870 1.21 itojun * the scope of the current address is smaller(larger)
1871 1.21 itojun * than dst. Such a case has already been covered.
1872 1.21 itojun * Tiebreaking is done according to the following
1873 1.21 itojun * items:
1874 1.21 itojun * - the scope comparison between the address and
1875 1.21 itojun * dst (dscopecmp)
1876 1.21 itojun * - the scope comparison between the address and
1877 1.21 itojun * ifa_best (bscopecmp)
1878 1.21 itojun * - if the address match dst longer than ifa_best
1879 1.21 itojun * (matchcmp)
1880 1.21 itojun * - if the address is on the outgoing I/F (outI/F)
1881 1.21 itojun *
1882 1.21 itojun * Roughly speaking, the selection policy is
1883 1.21 itojun * - the most important item is scope. The same scope
1884 1.21 itojun * is best. Then search for a larger scope.
1885 1.21 itojun * Smaller scopes are the last resort.
1886 1.21 itojun * - A deprecated address is chosen only when we have
1887 1.21 itojun * no address that has an enough scope, but is
1888 1.21 itojun * prefered to any addresses of smaller scopes.
1889 1.21 itojun * - Longest address match against dst is considered
1890 1.21 itojun * only for addresses that has the same scope of dst.
1891 1.21 itojun * - If there is no other reasons to choose one,
1892 1.21 itojun * addresses on the outgoing I/F are preferred.
1893 1.21 itojun *
1894 1.21 itojun * The precise decision table is as follows:
1895 1.21 itojun * dscopecmp bscopecmp matchcmp outI/F | replace?
1896 1.21 itojun * !equal equal N/A Yes | Yes (1)
1897 1.21 itojun * !equal equal N/A No | No (2)
1898 1.21 itojun * larger larger N/A N/A | No (3)
1899 1.21 itojun * larger smaller N/A N/A | Yes (4)
1900 1.21 itojun * smaller larger N/A N/A | Yes (5)
1901 1.21 itojun * smaller smaller N/A N/A | No (6)
1902 1.21 itojun * equal smaller N/A N/A | Yes (7)
1903 1.21 itojun * equal larger (already done)
1904 1.21 itojun * equal equal larger N/A | Yes (8)
1905 1.21 itojun * equal equal smaller N/A | No (9)
1906 1.21 itojun * equal equal equal Yes | Yes (a)
1907 1.21 itojun * eaual eqaul equal No | No (b)
1908 1.21 itojun */
1909 1.21 itojun dscopecmp = IN6_ARE_SCOPE_CMP(src_scope, dst_scope);
1910 1.21 itojun bscopecmp = IN6_ARE_SCOPE_CMP(src_scope, best_scope);
1911 1.21 itojun
1912 1.21 itojun if (dscopecmp && bscopecmp == 0) {
1913 1.21 itojun if (oifp == ifp) /* (1) */
1914 1.21 itojun goto replace;
1915 1.21 itojun continue; /* (2) */
1916 1.21 itojun }
1917 1.21 itojun if (dscopecmp > 0) {
1918 1.21 itojun if (bscopecmp > 0) /* (3) */
1919 1.21 itojun continue;
1920 1.21 itojun goto replace; /* (4) */
1921 1.21 itojun }
1922 1.21 itojun if (dscopecmp < 0) {
1923 1.21 itojun if (bscopecmp > 0) /* (5) */
1924 1.21 itojun goto replace;
1925 1.21 itojun continue; /* (6) */
1926 1.21 itojun }
1927 1.21 itojun
1928 1.21 itojun /* now dscopecmp must be 0 */
1929 1.21 itojun if (bscopecmp < 0)
1930 1.21 itojun goto replace; /* (7) */
1931 1.21 itojun
1932 1.2 itojun /*
1933 1.21 itojun * At last both dscopecmp and bscopecmp must be 0.
1934 1.21 itojun * We need address matching against dst for
1935 1.21 itojun * tiebreaking.
1936 1.2 itojun */
1937 1.21 itojun tlen = in6_matchlen(IFA_IN6(ifa), dst);
1938 1.21 itojun matchcmp = tlen - blen;
1939 1.21 itojun if (matchcmp > 0) /* (8) */
1940 1.21 itojun goto replace;
1941 1.21 itojun if (matchcmp < 0) /* (9) */
1942 1.21 itojun continue;
1943 1.21 itojun if (oifp == ifp) /* (a) */
1944 1.21 itojun goto replace;
1945 1.21 itojun continue; /* (b) */
1946 1.21 itojun
1947 1.21 itojun replace:
1948 1.21 itojun ifa_best = (struct in6_ifaddr *)ifa;
1949 1.21 itojun blen = tlen >= 0 ? tlen :
1950 1.21 itojun in6_matchlen(IFA_IN6(ifa), dst);
1951 1.21 itojun best_scope = in6_addrscope(&ifa_best->ia_addr.sin6_addr);
1952 1.2 itojun }
1953 1.2 itojun }
1954 1.2 itojun
1955 1.21 itojun /* count statistics for future improvements */
1956 1.21 itojun if (ifa_best == NULL)
1957 1.21 itojun ip6stat.ip6s_sources_none++;
1958 1.21 itojun else {
1959 1.21 itojun if (oifp == ifa_best->ia_ifp)
1960 1.21 itojun ip6stat.ip6s_sources_sameif[best_scope]++;
1961 1.21 itojun else
1962 1.21 itojun ip6stat.ip6s_sources_otherif[best_scope]++;
1963 1.21 itojun
1964 1.21 itojun if (best_scope == dst_scope)
1965 1.21 itojun ip6stat.ip6s_sources_samescope[best_scope]++;
1966 1.21 itojun else
1967 1.21 itojun ip6stat.ip6s_sources_otherscope[best_scope]++;
1968 1.21 itojun
1969 1.21 itojun if ((ifa_best->ia6_flags & IN6_IFF_DEPRECATED) != 0)
1970 1.21 itojun ip6stat.ip6s_sources_deprecated[best_scope]++;
1971 1.2 itojun }
1972 1.2 itojun
1973 1.21 itojun return(ifa_best);
1974 1.2 itojun }
1975 1.2 itojun
1976 1.2 itojun /*
1977 1.2 itojun * return the best address out of the same scope. if no address was
1978 1.2 itojun * found, return the first valid address from designated IF.
1979 1.2 itojun */
1980 1.2 itojun
1981 1.2 itojun struct in6_ifaddr *
1982 1.2 itojun in6_ifawithifp(ifp, dst)
1983 1.2 itojun register struct ifnet *ifp;
1984 1.2 itojun register struct in6_addr *dst;
1985 1.2 itojun {
1986 1.2 itojun int dst_scope = in6_addrscope(dst), blen = -1, tlen;
1987 1.2 itojun struct ifaddr *ifa;
1988 1.2 itojun struct in6_ifaddr *besta = 0;
1989 1.8 itojun struct in6_ifaddr *dep[2]; /*last-resort: deprecated*/
1990 1.8 itojun
1991 1.8 itojun dep[0] = dep[1] = NULL;
1992 1.2 itojun
1993 1.2 itojun /*
1994 1.18 itojun * We first look for addresses in the same scope.
1995 1.2 itojun * If there is one, return it.
1996 1.2 itojun * If two or more, return one which matches the dst longest.
1997 1.2 itojun * If none, return one of global addresses assigned other ifs.
1998 1.2 itojun */
1999 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
2000 1.8 itojun {
2001 1.2 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
2002 1.2 itojun continue;
2003 1.2 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_ANYCAST)
2004 1.2 itojun continue; /* XXX: is there any case to allow anycast? */
2005 1.2 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_NOTREADY)
2006 1.2 itojun continue; /* don't use this interface */
2007 1.2 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DETACHED)
2008 1.2 itojun continue;
2009 1.8 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DEPRECATED) {
2010 1.8 itojun if (ip6_use_deprecated)
2011 1.8 itojun dep[0] = (struct in6_ifaddr *)ifa;
2012 1.2 itojun continue;
2013 1.8 itojun }
2014 1.2 itojun
2015 1.8 itojun if (dst_scope == in6_addrscope(IFA_IN6(ifa))) {
2016 1.2 itojun /*
2017 1.2 itojun * call in6_matchlen() as few as possible
2018 1.2 itojun */
2019 1.2 itojun if (besta) {
2020 1.2 itojun if (blen == -1)
2021 1.2 itojun blen = in6_matchlen(&besta->ia_addr.sin6_addr, dst);
2022 1.8 itojun tlen = in6_matchlen(IFA_IN6(ifa), dst);
2023 1.2 itojun if (tlen > blen) {
2024 1.2 itojun blen = tlen;
2025 1.2 itojun besta = (struct in6_ifaddr *)ifa;
2026 1.2 itojun }
2027 1.18 itojun } else
2028 1.2 itojun besta = (struct in6_ifaddr *)ifa;
2029 1.2 itojun }
2030 1.2 itojun }
2031 1.2 itojun if (besta)
2032 1.2 itojun return(besta);
2033 1.2 itojun
2034 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
2035 1.8 itojun {
2036 1.2 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
2037 1.2 itojun continue;
2038 1.2 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_ANYCAST)
2039 1.2 itojun continue; /* XXX: is there any case to allow anycast? */
2040 1.2 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_NOTREADY)
2041 1.2 itojun continue; /* don't use this interface */
2042 1.2 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DETACHED)
2043 1.2 itojun continue;
2044 1.8 itojun if (((struct in6_ifaddr *)ifa)->ia6_flags & IN6_IFF_DEPRECATED) {
2045 1.8 itojun if (ip6_use_deprecated)
2046 1.8 itojun dep[1] = (struct in6_ifaddr *)ifa;
2047 1.2 itojun continue;
2048 1.8 itojun }
2049 1.2 itojun
2050 1.2 itojun return (struct in6_ifaddr *)ifa;
2051 1.2 itojun }
2052 1.2 itojun
2053 1.8 itojun /* use the last-resort values, that are, deprecated addresses */
2054 1.8 itojun if (dep[0])
2055 1.8 itojun return dep[0];
2056 1.8 itojun if (dep[1])
2057 1.8 itojun return dep[1];
2058 1.8 itojun
2059 1.2 itojun return NULL;
2060 1.2 itojun }
2061 1.2 itojun
2062 1.2 itojun /*
2063 1.2 itojun * perform DAD when interface becomes IFF_UP.
2064 1.2 itojun */
2065 1.2 itojun void
2066 1.2 itojun in6_if_up(ifp)
2067 1.2 itojun struct ifnet *ifp;
2068 1.2 itojun {
2069 1.2 itojun struct ifaddr *ifa;
2070 1.2 itojun struct in6_ifaddr *ia;
2071 1.2 itojun struct sockaddr_dl *sdl;
2072 1.2 itojun int type;
2073 1.2 itojun struct ether_addr ea;
2074 1.2 itojun int off;
2075 1.2 itojun int dad_delay; /* delay ticks before DAD output */
2076 1.2 itojun
2077 1.2 itojun bzero(&ea, sizeof(ea));
2078 1.2 itojun sdl = NULL;
2079 1.2 itojun
2080 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
2081 1.8 itojun {
2082 1.2 itojun if (ifa->ifa_addr->sa_family == AF_INET6
2083 1.2 itojun && IN6_IS_ADDR_LINKLOCAL(&((struct sockaddr_in6 *)ifa->ifa_addr)->sin6_addr)) {
2084 1.2 itojun goto dad;
2085 1.2 itojun }
2086 1.2 itojun if (ifa->ifa_addr->sa_family != AF_LINK)
2087 1.2 itojun continue;
2088 1.2 itojun sdl = (struct sockaddr_dl *)ifa->ifa_addr;
2089 1.2 itojun break;
2090 1.2 itojun }
2091 1.2 itojun
2092 1.2 itojun switch (ifp->if_type) {
2093 1.8 itojun case IFT_LOOP:
2094 1.8 itojun in6_ifattach(ifp, IN6_IFT_LOOP, NULL, 1);
2095 1.8 itojun break;
2096 1.2 itojun case IFT_SLIP:
2097 1.2 itojun case IFT_PPP:
2098 1.2 itojun case IFT_GIF:
2099 1.2 itojun case IFT_FAITH:
2100 1.2 itojun type = IN6_IFT_P2P;
2101 1.2 itojun in6_ifattach(ifp, type, 0, 1);
2102 1.2 itojun break;
2103 1.2 itojun case IFT_ETHER:
2104 1.2 itojun case IFT_FDDI:
2105 1.2 itojun case IFT_ATM:
2106 1.2 itojun type = IN6_IFT_802;
2107 1.2 itojun if (sdl == NULL)
2108 1.2 itojun break;
2109 1.2 itojun off = sdl->sdl_nlen;
2110 1.2 itojun if (bcmp(&sdl->sdl_data[off], &ea, sizeof(ea)) != 0)
2111 1.6 is in6_ifattach(ifp, type, LLADDR(sdl), 0);
2112 1.6 is break;
2113 1.6 is case IFT_ARCNET:
2114 1.6 is type = IN6_IFT_ARCNET;
2115 1.6 is if (sdl == NULL)
2116 1.6 is break;
2117 1.6 is off = sdl->sdl_nlen;
2118 1.6 is if (sdl->sdl_data[off] != 0) /* XXX ?: */
2119 1.2 itojun in6_ifattach(ifp, type, LLADDR(sdl), 0);
2120 1.2 itojun break;
2121 1.2 itojun default:
2122 1.2 itojun break;
2123 1.2 itojun }
2124 1.2 itojun
2125 1.2 itojun dad:
2126 1.2 itojun dad_delay = 0;
2127 1.8 itojun for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = ifa->ifa_list.tqe_next)
2128 1.8 itojun {
2129 1.2 itojun if (ifa->ifa_addr->sa_family != AF_INET6)
2130 1.2 itojun continue;
2131 1.2 itojun ia = (struct in6_ifaddr *)ifa;
2132 1.2 itojun if (ia->ia6_flags & IN6_IFF_TENTATIVE)
2133 1.2 itojun nd6_dad_start(ifa, &dad_delay);
2134 1.2 itojun }
2135 1.2 itojun }
2136 1.2 itojun
2137 1.2 itojun /*
2138 1.2 itojun * Calculate max IPv6 MTU through all the interfaces and store it
2139 1.2 itojun * to in6_maxmtu.
2140 1.2 itojun */
2141 1.2 itojun void
2142 1.2 itojun in6_setmaxmtu()
2143 1.2 itojun {
2144 1.2 itojun unsigned long maxmtu = 0;
2145 1.2 itojun struct ifnet *ifp;
2146 1.2 itojun
2147 1.8 itojun for (ifp = TAILQ_FIRST(&ifnet); ifp; ifp = TAILQ_NEXT(ifp, if_list))
2148 1.8 itojun {
2149 1.2 itojun if ((ifp->if_flags & IFF_LOOPBACK) == 0 &&
2150 1.2 itojun nd_ifinfo[ifp->if_index].linkmtu > maxmtu)
2151 1.2 itojun maxmtu = nd_ifinfo[ifp->if_index].linkmtu;
2152 1.2 itojun }
2153 1.2 itojun if (maxmtu) /* update only when maxmtu is positive */
2154 1.2 itojun in6_maxmtu = maxmtu;
2155 1.2 itojun }
2156