af_inet6.c revision 1.20 1 /* $NetBSD: af_inet6.c,v 1.20 2008/05/12 15:35:50 dyoung Exp $ */
2
3 /*
4 * Copyright (c) 1983, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __RCSID("$NetBSD: af_inet6.c,v 1.20 2008/05/12 15:35:50 dyoung Exp $");
35 #endif /* not lint */
36
37 #include <sys/param.h>
38 #include <sys/ioctl.h>
39 #include <sys/socket.h>
40
41 #include <net/if.h>
42 #include <netinet/in.h>
43 #include <netinet/in_var.h>
44 #include <netinet6/nd6.h>
45
46 #include <err.h>
47 #include <errno.h>
48 #include <ifaddrs.h>
49 #include <netdb.h>
50 #include <string.h>
51 #include <stdlib.h>
52 #include <stdio.h>
53 #include <util.h>
54
55 #include "env.h"
56 #include "parse.h"
57 #include "extern.h"
58 #include "af_inet6.h"
59 #include "af_inetany.h"
60
61 struct in6_ifreq in6_ridreq = {
62 .ifr_addr = {
63 .sin6_family = AF_INET6,
64 .sin6_addr = {
65 .s6_addr =
66 {0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff}
67 }
68 }
69 };
70
71 struct in6_aliasreq in6_addreq = {
72 .ifra_prefixmask = {
73 .sin6_len = sizeof(in6_addreq.ifra_prefixmask),
74 .sin6_addr = {
75 .s6_addr =
76 {0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff}}},
77 .ifra_lifetime = {
78 .ia6t_pltime = ND6_INFINITE_LIFETIME
79 , .ia6t_vltime = ND6_INFINITE_LIFETIME
80 }
81 };
82
83 static const struct kwinst ia6flagskw[] = {
84 IFKW("anycast", IN6_IFF_ANYCAST)
85 , IFKW("tentative", IN6_IFF_TENTATIVE)
86 , IFKW("deprecated", IN6_IFF_DEPRECATED)
87 };
88
89 static struct pinteger parse_pltime = PINTEGER_INITIALIZER(&parse_pltime,
90 "pltime", 0, NULL, "pltime", &command_root.pb_parser);
91
92 static struct pinteger parse_vltime = PINTEGER_INITIALIZER(&parse_vltime,
93 "vltime", 0, NULL, "vltime", &command_root.pb_parser);
94
95 static const struct kwinst inet6kw[] = {
96 {.k_word = "pltime", .k_nextparser = &parse_pltime.pi_parser}
97 , {.k_word = "vltime", .k_nextparser = &parse_vltime.pi_parser}
98 , {.k_word = "eui64", .k_key = "eui64", .k_type = KW_T_BOOL,
99 .k_bool = true, .k_nextparser = &command_root.pb_parser}
100 };
101
102 struct pkw ia6flags = PKW_INITIALIZER(&ia6flags, "ia6flags", NULL,
103 "ia6flag", ia6flagskw, __arraycount(ia6flagskw), &command_root.pb_parser);
104 struct pkw inet6 = PKW_INITIALIZER(&inet6, "IPv6 keywords", NULL,
105 NULL, inet6kw, __arraycount(inet6kw), NULL);
106
107 static void in6_delscopeid(struct sockaddr_in6 *sin6);
108 static int setia6lifetime(prop_dictionary_t, int64_t, time_t *, uint32_t *);
109 static void in6_alias(const char *, prop_dictionary_t, prop_dictionary_t,
110 struct in6_ifreq *);
111
112 static int
113 prefix(void *val, int size)
114 {
115 u_char *pname = (u_char *)val;
116 int byte, bit, plen = 0;
117
118 for (byte = 0; byte < size; byte++, plen += 8)
119 if (pname[byte] != 0xff)
120 break;
121 if (byte == size)
122 return (plen);
123 for (bit = 7; bit != 0; bit--, plen++)
124 if (!(pname[byte] & (1 << bit)))
125 break;
126 for (; bit != 0; bit--)
127 if (pname[byte] & (1 << bit))
128 return(0);
129 byte++;
130 for (; byte < size; byte++)
131 if (pname[byte])
132 return(0);
133 return (plen);
134 }
135
136 int
137 setia6flags_impl(prop_dictionary_t env, struct in6_aliasreq *ifra)
138 {
139 int64_t ia6flag;
140
141 if (!prop_dictionary_get_int64(env, "ia6flag", &ia6flag)) {
142 errno = ENOENT;
143 return -1;
144 }
145
146 if (ia6flag < 0) {
147 ia6flag = -ia6flag;
148 ifra->ifra_flags &= ~ia6flag;
149 } else
150 ifra->ifra_flags |= ia6flag;
151 return 0;
152 }
153
154 int
155 setia6pltime_impl(prop_dictionary_t env, struct in6_aliasreq *ifra)
156 {
157 int64_t pltime;
158
159 if (!prop_dictionary_get_int64(env, "pltime", &pltime)) {
160 errno = ENOENT;
161 return -1;
162 }
163
164 return setia6lifetime(env, pltime,
165 &ifra->ifra_lifetime.ia6t_preferred,
166 &ifra->ifra_lifetime.ia6t_pltime);
167 }
168
169 int
170 setia6vltime_impl(prop_dictionary_t env, struct in6_aliasreq *ifra)
171 {
172 int64_t vltime;
173
174 if (!prop_dictionary_get_int64(env, "vltime", &vltime)) {
175 errno = ENOENT;
176 return -1;
177 }
178
179 return setia6lifetime(env, vltime,
180 &ifra->ifra_lifetime.ia6t_expire,
181 &ifra->ifra_lifetime.ia6t_vltime);
182 }
183
184 static int
185 setia6lifetime(prop_dictionary_t env, int64_t val, time_t *timep,
186 uint32_t *ivalp)
187 {
188 time_t t;
189 int af;
190
191 if ((af = getaf(env)) == -1 || af != AF_INET6) {
192 errx(EXIT_FAILURE,
193 "inet6 address lifetime not allowed for the AF");
194 }
195
196 t = time(NULL);
197 *timep = t + val;
198 *ivalp = val;
199 return 0;
200 }
201
202 int
203 setia6eui64_impl(prop_dictionary_t env, struct in6_aliasreq *ifra)
204 {
205 char buf[2][80];
206 struct ifaddrs *ifap, *ifa;
207 const struct sockaddr_in6 *sin6 = NULL;
208 const struct in6_addr *lladdr = NULL;
209 struct in6_addr *in6;
210 const char *ifname;
211 bool doit = false;
212 int af;
213
214 if (!prop_dictionary_get_bool(env, "eui64", &doit) || !doit) {
215 errno = ENOENT;
216 return -1;
217 }
218
219 if ((ifname = getifname(env)) == NULL)
220 return -1;
221
222 af = getaf(env);
223 if (af != AF_INET6) {
224 errx(EXIT_FAILURE,
225 "eui64 address modifier not allowed for the AF");
226 }
227 in6 = &ifra->ifra_addr.sin6_addr;
228 if (memcmp(&in6addr_any.s6_addr[8], &in6->s6_addr[8], 8) != 0) {
229 union {
230 struct sockaddr_in6 sin6;
231 struct sockaddr sa;
232 } any = {.sin6 = {.sin6_family = AF_INET6}};
233 memcpy(&any.sin6.sin6_addr, &in6addr_any,
234 sizeof(any.sin6.sin6_addr));
235 (void)sockaddr_snprintf(buf[0], sizeof(buf[0]), "%a%%S",
236 &any.sa);
237 (void)sockaddr_snprintf(buf[1], sizeof(buf[1]), "%a%%S",
238 (const struct sockaddr *)&ifra->ifra_addr);
239 errx(EXIT_FAILURE, "interface index is already filled, %s | %s",
240 buf[0], buf[1]);
241 }
242 if (getifaddrs(&ifap) != 0)
243 err(EXIT_FAILURE, "getifaddrs");
244 for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
245 if (ifa->ifa_addr->sa_family == AF_INET6 &&
246 strcmp(ifa->ifa_name, ifname) == 0) {
247 sin6 = (const struct sockaddr_in6 *)ifa->ifa_addr;
248 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) {
249 lladdr = &sin6->sin6_addr;
250 break;
251 }
252 }
253 }
254 if (!lladdr)
255 errx(EXIT_FAILURE, "could not determine link local address");
256
257 memcpy(&in6->s6_addr[8], &lladdr->s6_addr[8], 8);
258
259 freeifaddrs(ifap);
260 return 0;
261 }
262
263 /* KAME idiosyncrasy */
264 static void
265 in6_delscopeid(struct sockaddr_in6 *sin6)
266 {
267 if (!IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr) ||
268 sin6->sin6_scope_id == 0)
269 return;
270
271 *(u_int16_t *)&sin6->sin6_addr.s6_addr[2] = htons(sin6->sin6_scope_id);
272 sin6->sin6_scope_id = 0;
273 }
274
275 /* KAME idiosyncrasy */
276 void
277 in6_fillscopeid(struct sockaddr_in6 *sin6)
278 {
279 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) {
280 sin6->sin6_scope_id =
281 ntohs(*(u_int16_t *)&sin6->sin6_addr.s6_addr[2]);
282 sin6->sin6_addr.s6_addr[2] = sin6->sin6_addr.s6_addr[3] = 0;
283 }
284 }
285
286 /* XXX not really an alias */
287 void
288 in6_alias(const char *ifname, prop_dictionary_t env, prop_dictionary_t oenv,
289 struct in6_ifreq *creq)
290 {
291 struct in6_ifreq ifr6;
292 struct sockaddr_in6 *sin6;
293 char hbuf[NI_MAXHOST];
294 u_int32_t scopeid;
295 int s;
296 const int niflag = NI_NUMERICHOST;
297 unsigned short flags;
298
299 /* Get the non-alias address for this interface. */
300 if ((s = getsock(AF_INET6)) == -1) {
301 if (errno == EAFNOSUPPORT)
302 return;
303 err(EXIT_FAILURE, "socket");
304 }
305
306 sin6 = &creq->ifr_addr;
307
308 in6_fillscopeid(sin6);
309 scopeid = sin6->sin6_scope_id;
310 if (getnameinfo((const struct sockaddr *)sin6, sin6->sin6_len,
311 hbuf, sizeof(hbuf), NULL, 0, niflag))
312 strlcpy(hbuf, "", sizeof(hbuf)); /* some message? */
313 printf("\tinet6 %s", hbuf);
314
315 if (getifflags(env, oenv, &flags) == -1)
316 err(EXIT_FAILURE, "%s: getifflags", __func__);
317
318 if (flags & IFF_POINTOPOINT) {
319 ifr6 = *creq;
320 if (ioctl(s, SIOCGIFDSTADDR_IN6, &ifr6) == -1) {
321 if (errno != EADDRNOTAVAIL)
322 warn("SIOCGIFDSTADDR_IN6");
323 memset(&ifr6.ifr_addr, 0, sizeof(ifr6.ifr_addr));
324 ifr6.ifr_addr.sin6_family = AF_INET6;
325 ifr6.ifr_addr.sin6_len = sizeof(struct sockaddr_in6);
326 }
327 sin6 = &ifr6.ifr_addr;
328 in6_fillscopeid(sin6);
329 hbuf[0] = '\0';
330 if (getnameinfo((struct sockaddr *)sin6, sin6->sin6_len,
331 hbuf, sizeof(hbuf), NULL, 0, niflag))
332 strlcpy(hbuf, "", sizeof(hbuf)); /* some message? */
333 printf(" -> %s", hbuf);
334 }
335
336 ifr6 = *creq;
337 if (ioctl(s, SIOCGIFNETMASK_IN6, &ifr6) == -1) {
338 if (errno != EADDRNOTAVAIL)
339 warn("SIOCGIFNETMASK_IN6");
340 } else {
341 sin6 = &ifr6.ifr_addr;
342 printf(" prefixlen %d", prefix(&sin6->sin6_addr,
343 sizeof(struct in6_addr)));
344 }
345
346 ifr6 = *creq;
347 if (ioctl(s, SIOCGIFAFLAG_IN6, &ifr6) == -1) {
348 if (errno != EADDRNOTAVAIL)
349 warn("SIOCGIFAFLAG_IN6");
350 } else {
351 if (ifr6.ifr_ifru.ifru_flags6 & IN6_IFF_ANYCAST)
352 printf(" anycast");
353 if (ifr6.ifr_ifru.ifru_flags6 & IN6_IFF_TENTATIVE)
354 printf(" tentative");
355 if (ifr6.ifr_ifru.ifru_flags6 & IN6_IFF_DUPLICATED)
356 printf(" duplicated");
357 if (ifr6.ifr_ifru.ifru_flags6 & IN6_IFF_DETACHED)
358 printf(" detached");
359 if (ifr6.ifr_ifru.ifru_flags6 & IN6_IFF_DEPRECATED)
360 printf(" deprecated");
361 }
362
363 if (scopeid)
364 printf(" scopeid 0x%x", scopeid);
365
366 if (Lflag) {
367 struct in6_addrlifetime *lifetime;
368 ifr6 = *creq;
369 lifetime = &ifr6.ifr_ifru.ifru_lifetime;
370 if (ioctl(s, SIOCGIFALIFETIME_IN6, &ifr6) == -1) {
371 if (errno != EADDRNOTAVAIL)
372 warn("SIOCGIFALIFETIME_IN6");
373 } else if (lifetime->ia6t_preferred || lifetime->ia6t_expire) {
374 time_t t = time(NULL);
375 printf(" pltime ");
376 if (lifetime->ia6t_preferred) {
377 printf("%lu",
378 (unsigned long)(lifetime->ia6t_preferred -
379 MIN(t, lifetime->ia6t_preferred)));
380 } else
381 printf("infty");
382
383 printf(" vltime ");
384 if (lifetime->ia6t_expire) {
385 printf("%lu",
386 (unsigned long)(lifetime->ia6t_expire -
387 MIN(t, lifetime->ia6t_expire)));
388 } else
389 printf("infty");
390 }
391 }
392
393 printf("\n");
394 }
395
396 void
397 in6_status(prop_dictionary_t env, prop_dictionary_t oenv, bool force)
398 {
399 struct ifaddrs *ifap, *ifa;
400 struct in6_ifreq ifr;
401 const char *ifname;
402
403 if ((ifname = getifname(env)) == NULL)
404 err(EXIT_FAILURE, "%s: getifname", __func__);
405
406 if (getifaddrs(&ifap) != 0)
407 err(EXIT_FAILURE, "getifaddrs");
408 for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
409 if (strcmp(ifname, ifa->ifa_name) != 0)
410 continue;
411 if (ifa->ifa_addr->sa_family != AF_INET6)
412 continue;
413 if (sizeof(ifr.ifr_addr) < ifa->ifa_addr->sa_len)
414 continue;
415
416 memset(&ifr, 0, sizeof(ifr));
417 estrlcpy(ifr.ifr_name, ifa->ifa_name, sizeof(ifr.ifr_name));
418 memcpy(&ifr.ifr_addr, ifa->ifa_addr, ifa->ifa_addr->sa_len);
419 in6_alias(ifname, env, oenv, &ifr);
420 }
421 freeifaddrs(ifap);
422 }
423
424 static int
425 in6_pre_aifaddr(prop_dictionary_t env, struct afparam *param)
426 {
427 struct in6_aliasreq *ifra = param->req.buf;
428
429 setia6eui64_impl(env, ifra);
430 setia6vltime_impl(env, ifra);
431 setia6pltime_impl(env, ifra);
432 setia6flags_impl(env, ifra);
433 in6_delscopeid(&ifra->ifra_addr);
434 in6_delscopeid(&ifra->ifra_dstaddr);
435
436 return 0;
437 }
438
439 void
440 in6_commit_address(prop_dictionary_t env, prop_dictionary_t oenv)
441 {
442 struct in6_ifreq in6_ifr = {
443 .ifr_addr = {
444 .sin6_family = AF_INET6,
445 .sin6_len = sizeof(in6_ifr.ifr_addr),
446 .sin6_addr = {
447 .s6_addr =
448 {0xff, 0xff, 0xff, 0xff,
449 0xff, 0xff, 0xff, 0xff}
450 }
451 }
452 };
453 static struct sockaddr_in6 in6_defmask = {
454 .sin6_family = AF_INET6,
455 .sin6_len = sizeof(in6_defmask),
456 .sin6_addr = {
457 .s6_addr = {0xff, 0xff, 0xff, 0xff,
458 0xff, 0xff, 0xff, 0xff}
459 }
460 };
461
462 struct in6_aliasreq in6_ifra = {
463 .ifra_prefixmask = {
464 .sin6_family = AF_INET6,
465 .sin6_len = sizeof(in6_ifra.ifra_prefixmask),
466 .sin6_addr = {
467 .s6_addr =
468 {0xff, 0xff, 0xff, 0xff,
469 0xff, 0xff, 0xff, 0xff}}},
470 .ifra_lifetime = {
471 .ia6t_pltime = ND6_INFINITE_LIFETIME
472 , .ia6t_vltime = ND6_INFINITE_LIFETIME
473 }
474 };
475 struct afparam in6param = {
476 .req = BUFPARAM(in6_ifra)
477 , .dgreq = BUFPARAM(in6_ifr)
478 , .name = {
479 {.buf = in6_ifr.ifr_name,
480 .buflen = sizeof(in6_ifr.ifr_name)},
481 {.buf = in6_ifra.ifra_name,
482 .buflen = sizeof(in6_ifra.ifra_name)}
483 }
484 , .dgaddr = BUFPARAM(in6_ifr.ifr_addr)
485 , .addr = BUFPARAM(in6_ifra.ifra_addr)
486 , .dst = BUFPARAM(in6_ifra.ifra_dstaddr)
487 , .brd = BUFPARAM(in6_ifra.ifra_broadaddr)
488 , .mask = BUFPARAM(in6_ifra.ifra_prefixmask)
489 , .aifaddr = IFADDR_PARAM(SIOCAIFADDR_IN6)
490 , .difaddr = IFADDR_PARAM(SIOCDIFADDR_IN6)
491 , .gifaddr = IFADDR_PARAM(SIOCGIFADDR_IN6)
492 , .defmask = BUFPARAM(in6_defmask)
493 , .pre_aifaddr = in6_pre_aifaddr
494 };
495 commit_address(env, oenv, &in6param);
496 }
497