1 /* $NetBSD: config.c,v 1.7 2000/05/23 11:37:58 itojun Exp $ */ 2 /* $KAME: config.c,v 1.12 2000/05/22 22:23:07 itojun Exp $ */ 3 4 /* 5 * Copyright (C) 1998 WIDE Project. 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. Neither the name of the project nor the names of its contributors 17 * may be used to endorse or promote products derived from this software 18 * without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 */ 32 33 #include <sys/param.h> 34 #include <sys/ioctl.h> 35 #include <sys/socket.h> 36 #include <sys/time.h> 37 38 #include <net/if.h> 39 #if defined(__FreeBSD__) && __FreeBSD__ >= 3 40 #include <net/if_var.h> 41 #endif /* __FreeBSD__ >= 3 */ 42 #include <net/route.h> 43 #include <net/if_dl.h> 44 45 #include <netinet/in.h> 46 #include <netinet/in_var.h> 47 #include <netinet/ip6.h> 48 #include <netinet6/ip6_var.h> 49 #include <netinet/icmp6.h> 50 #ifdef MIP6 51 #include <netinet6/mip6.h> 52 #endif 53 54 #include <arpa/inet.h> 55 56 #include <stdio.h> 57 #include <syslog.h> 58 #include <errno.h> 59 #include <string.h> 60 #include <stdlib.h> 61 #if defined(__NetBSD__) || defined(__OpenBSD__) 62 #include <search.h> 63 #endif 64 #include <unistd.h> 65 66 #include "rtadvd.h" 67 #include "advcap.h" 68 #include "timer.h" 69 #include "if.h" 70 #include "config.h" 71 72 static void makeentry __P((char *, int, char *, int)); 73 static void get_prefix __P((struct rainfo *)); 74 75 extern struct rainfo *ralist; 76 77 void 78 getconfig(intface) 79 char *intface; 80 { 81 int stat, pfxs, i; 82 char tbuf[BUFSIZ]; 83 struct rainfo *tmp; 84 long val; 85 char buf[BUFSIZ]; 86 char *bp = buf; 87 char *addr; 88 89 #define MUSTHAVE(var, cap) \ 90 do { \ 91 int t; \ 92 if ((t = agetnum(cap)) < 0) { \ 93 fprintf(stderr, "rtadvd: need %s for interface %s\n", \ 94 cap, intface); \ 95 exit(1); \ 96 } \ 97 var = t; \ 98 } while (0) 99 #define MAYHAVE(var, cap, def) \ 100 do { \ 101 if ((var = agetnum(cap)) < 0) \ 102 var = def; \ 103 } while (0) 104 105 if ((stat = agetent(tbuf, intface)) <= 0) { 106 memset(tbuf, 0, sizeof(tbuf)); 107 syslog(LOG_INFO, 108 "<%s> %s isn't defined in the configuration file" 109 " or the configuration file doesn't exist." 110 " Treat it as default", 111 __FUNCTION__, intface); 112 } 113 114 tmp = (struct rainfo *)malloc(sizeof(*ralist)); 115 memset(tmp, 0, sizeof(*tmp)); 116 tmp->prefix.next = tmp->prefix.prev = &tmp->prefix; 117 118 /* get interface information */ 119 if (agetflag("nolladdr")) 120 tmp->advlinkopt = 0; 121 else 122 tmp->advlinkopt = 1; 123 if (tmp->advlinkopt) { 124 if ((tmp->sdl = if_nametosdl(intface)) == NULL) { 125 syslog(LOG_ERR, 126 "<%s> can't get information of %s", 127 __FUNCTION__, intface); 128 exit(1); 129 } 130 tmp->ifindex = tmp->sdl->sdl_index; 131 } else 132 tmp->ifindex = if_nametoindex(intface); 133 strncpy(tmp->ifname, intface, sizeof(tmp->ifname)); 134 if ((tmp->phymtu = if_getmtu(intface)) == 0) { 135 tmp->phymtu = IPV6_MMTU; 136 syslog(LOG_WARNING, 137 "<%s> can't get interface mtu of %s. Treat as %d", 138 __FUNCTION__, intface, IPV6_MMTU); 139 } 140 141 /* 142 * set router configuration variables. 143 */ 144 MAYHAVE(val, "maxinterval", DEF_MAXRTRADVINTERVAL); 145 if (val < MIN_MAXINTERVAL || val > MAX_MAXINTERVAL) { 146 syslog(LOG_ERR, 147 "<%s> maxinterval must be between %e and %u", 148 __FUNCTION__, MIN_MAXINTERVAL, MAX_MAXINTERVAL); 149 exit(1); 150 } 151 tmp->maxinterval = (u_int)val; 152 MAYHAVE(val, "mininterval", tmp->maxinterval/3); 153 if (val < MIN_MININTERVAL || val > (tmp->maxinterval * 3) / 4) { 154 syslog(LOG_ERR, 155 "<%s> mininterval must be between %e and %d", 156 __FUNCTION__, 157 MIN_MININTERVAL, 158 (tmp->maxinterval * 3) / 4); 159 exit(1); 160 } 161 tmp->mininterval = (u_int)val; 162 163 MAYHAVE(val, "chlim", DEF_ADVCURHOPLIMIT); 164 tmp->hoplimit = val & 0xff; 165 166 MAYHAVE(val, "raflags", 0); 167 tmp->managedflg= val & ND_RA_FLAG_MANAGED; 168 tmp->otherflg = val & ND_RA_FLAG_OTHER; 169 #ifdef MIP6 170 if (mobileip6) 171 tmp->haflg = val & ND_RA_FLAG_HA; 172 #endif 173 174 MAYHAVE(val, "rltime", tmp->maxinterval * 3); 175 if (val && (val < tmp->maxinterval || val > MAXROUTERLIFETIME)) { 176 syslog(LOG_ERR, 177 "<%s> router lifetime on %s must be 0 or" 178 " between %d and %d", 179 __FUNCTION__, intface, 180 tmp->maxinterval, MAXROUTERLIFETIME); 181 exit(1); 182 } 183 tmp->lifetime = val & 0xffff; 184 185 MAYHAVE(val, "rtime", DEF_ADVREACHABLETIME); 186 if (val > MAXREACHABLETIME) { 187 syslog(LOG_ERR, 188 "<%s> reachable time must be no greater than %d", 189 __FUNCTION__, MAXREACHABLETIME); 190 exit(1); 191 } 192 tmp->reachabletime = (u_int32_t)val; 193 194 MAYHAVE(val, "retrans", DEF_ADVRETRANSTIMER); 195 if (val < 0 || val > 0xffffffff) { 196 syslog(LOG_ERR, 197 "<%s> retrans time out of range", __FUNCTION__); 198 exit(1); 199 } 200 tmp->retranstimer = (u_int32_t)val; 201 202 #ifdef MIP6 203 if (!mobileip6) 204 #else 205 if (1) 206 #endif 207 { 208 if (agetstr("hapref", &bp) || agetstr("hatime", &bp)) { 209 syslog(LOG_ERR, 210 "<%s> mobile-ip6 configuration without " 211 "proper command line option", 212 __FUNCTION__); 213 exit(1); 214 } 215 } 216 #ifdef MIP6 217 else { 218 tmp->hapref = 0; 219 if ((val = agetnum("hapref")) >= 0) 220 tmp->hapref = (int16_t)val; 221 if (tmp->hapref != 0) { 222 tmp->hatime = 0; 223 MUSTHAVE(val, "hatime"); 224 tmp->hatime = (u_int16_t)val; 225 if (tmp->hatime <= 0) { 226 syslog(LOG_ERR, 227 "<%s> home agent lifetime must be greater than 0", 228 __FUNCTION__); 229 exit(1); 230 } 231 } 232 } 233 #endif 234 235 /* prefix information */ 236 if ((pfxs = agetnum("addrs")) < 0) { 237 /* auto configure prefix information */ 238 if (agetstr("addr", &bp) || agetstr("addr1", &bp)) { 239 syslog(LOG_ERR, 240 "<%s> conflicting prefix configuration for %s: " 241 "automatic and manual config at the same time", 242 __FUNCTION__, intface); 243 exit(1); 244 } 245 get_prefix(tmp); 246 } 247 else { 248 tmp->pfxs = pfxs; 249 for (i = 0; i < pfxs; i++) { 250 struct prefix *pfx; 251 char entbuf[256]; 252 int added = (pfxs > 1) ? 1 : 0; 253 254 /* allocate memory to store prefix information */ 255 if ((pfx = malloc(sizeof(struct prefix))) == NULL) { 256 syslog(LOG_ERR, 257 "<%s> can't allocate enough memory", 258 __FUNCTION__); 259 exit(1); 260 } 261 /* link into chain */ 262 insque(pfx, &tmp->prefix); 263 264 pfx->origin = PREFIX_FROM_CONFIG; 265 266 makeentry(entbuf, i, "prefixlen", added); 267 MAYHAVE(val, entbuf, 64); 268 if (val < 0 || val > 128) { 269 syslog(LOG_ERR, 270 "<%s> prefixlen out of range", 271 __FUNCTION__); 272 exit(1); 273 } 274 pfx->prefixlen = (int)val; 275 276 makeentry(entbuf, i, "pinfoflags", added); 277 #ifdef MIP6 278 if (mobileip6) 279 { 280 MAYHAVE(val, entbuf, 281 (ND_OPT_PI_FLAG_ONLINK|ND_OPT_PI_FLAG_AUTO| 282 ND_OPT_PI_FLAG_RTADDR)); 283 } else 284 #endif 285 { 286 MAYHAVE(val, entbuf, 287 (ND_OPT_PI_FLAG_ONLINK|ND_OPT_PI_FLAG_AUTO)); 288 } 289 pfx->onlinkflg = val & ND_OPT_PI_FLAG_ONLINK; 290 pfx->autoconfflg = val & ND_OPT_PI_FLAG_AUTO; 291 #ifdef MIP6 292 if (mobileip6) 293 pfx->routeraddr = val & ND_OPT_PI_FLAG_RTADDR; 294 #endif 295 296 makeentry(entbuf, i, "vltime", added); 297 MAYHAVE(val, entbuf, DEF_ADVVALIDLIFETIME); 298 if (val < 0 || val > 0xffffffff) { 299 syslog(LOG_ERR, 300 "<%s> vltime out of range", 301 __FUNCTION__); 302 exit(1); 303 } 304 pfx->validlifetime = (u_int32_t)val; 305 306 makeentry(entbuf, i, "pltime", added); 307 MAYHAVE(val, entbuf, DEF_ADVPREFERREDLIFETIME); 308 if (val < 0 || val > 0xffffffff) { 309 syslog(LOG_ERR, 310 "<%s> pltime out of range", 311 __FUNCTION__); 312 exit(1); 313 } 314 pfx->preflifetime = (u_int32_t)val; 315 316 makeentry(entbuf, i, "addr", added); 317 addr = (char *)agetstr(entbuf, &bp); 318 if (addr == NULL) { 319 syslog(LOG_ERR, 320 "<%s> need %s as an prefix for " 321 "interface %s", 322 __FUNCTION__, entbuf, intface); 323 exit(1); 324 } 325 if (inet_pton(AF_INET6, addr, 326 &pfx->prefix) != 1) { 327 syslog(LOG_ERR, 328 "<%s> inet_pton failed for %s", 329 __FUNCTION__, addr); 330 exit(1); 331 } 332 if (IN6_IS_ADDR_MULTICAST(&pfx->prefix)) { 333 syslog(LOG_ERR, 334 "<%s> multicast prefix(%s) must " 335 "not be advertised (IF=%s)", 336 __FUNCTION__, addr, intface); 337 exit(1); 338 } 339 if (IN6_IS_ADDR_LINKLOCAL(&pfx->prefix)) 340 syslog(LOG_NOTICE, 341 "<%s> link-local prefix(%s) will be" 342 " advertised on %s", 343 __FUNCTION__, addr, intface); 344 } 345 } 346 347 MAYHAVE(val, "mtu", 0); 348 if (val < 0 || val > 0xffffffff) { 349 syslog(LOG_ERR, 350 "<%s> mtu out of range", __FUNCTION__); 351 exit(1); 352 } 353 tmp->linkmtu = (u_int32_t)val; 354 if (tmp->linkmtu == 0) { 355 char *mtustr; 356 357 if ((mtustr = (char *)agetstr("mtu", &bp)) && 358 strcmp(mtustr, "auto") == 0) 359 tmp->linkmtu = tmp->phymtu; 360 } 361 else if (tmp->linkmtu < IPV6_MMTU || tmp->linkmtu > tmp->phymtu) { 362 syslog(LOG_ERR, 363 "<%s> advertised link mtu must be between" 364 " least MTU and physical link MTU", 365 __FUNCTION__); 366 exit(1); 367 } 368 369 /* okey */ 370 tmp->next = ralist; 371 ralist = tmp; 372 373 /* construct the sending packet */ 374 make_packet(tmp); 375 376 /* set timer */ 377 tmp->timer = rtadvd_add_timer(ra_timeout, ra_timer_update, 378 tmp, tmp); 379 ra_timer_update((void *)tmp, &tmp->timer->tm); 380 rtadvd_set_timer(&tmp->timer->tm, tmp->timer); 381 } 382 383 static void 384 get_prefix(struct rainfo *rai) 385 { 386 size_t len; 387 u_char *buf, *lim, *next; 388 u_char ntopbuf[INET6_ADDRSTRLEN]; 389 390 if ((len = rtbuf_len()) < 0) { 391 syslog(LOG_ERR, 392 "<%s> can't get buffer length for routing info", 393 __FUNCTION__); 394 exit(1); 395 } 396 if ((buf = malloc(len)) == NULL) { 397 syslog(LOG_ERR, 398 "<%s> can't allocate buffer", __FUNCTION__); 399 exit(1); 400 } 401 if (get_rtinfo(buf, &len) < 0) { 402 syslog(LOG_ERR, 403 "<%s> can't get routing inforamtion", __FUNCTION__); 404 exit(1); 405 } 406 407 lim = buf + len; 408 next = get_next_msg(buf, lim, rai->ifindex, &len, 409 RTADV_TYPE2BITMASK(RTM_GET)); 410 while (next < lim) { 411 struct prefix *pp; 412 struct in6_addr *a; 413 414 /* allocate memory to store prefix info. */ 415 if ((pp = malloc(sizeof(*pp))) == NULL) { 416 syslog(LOG_ERR, 417 "<%s> can't get allocate buffer for prefix", 418 __FUNCTION__); 419 exit(1); 420 } 421 memset(pp, 0, sizeof(*pp)); 422 423 /* set prefix and its length */ 424 a = get_addr(next); 425 memcpy(&pp->prefix, a, sizeof(*a)); 426 if ((pp->prefixlen = get_prefixlen(next)) < 0) { 427 syslog(LOG_ERR, 428 "<%s> failed to get prefixlen " 429 "or prefixl is invalid", 430 __FUNCTION__); 431 exit(1); 432 } 433 syslog(LOG_DEBUG, 434 "<%s> add %s/%d to prefix list on %s", 435 __FUNCTION__, 436 inet_ntop(AF_INET6, a, ntopbuf, INET6_ADDRSTRLEN), 437 pp->prefixlen, rai->ifname); 438 439 /* set other fields with protocol defaults */ 440 pp->validlifetime = DEF_ADVVALIDLIFETIME; 441 pp->preflifetime = DEF_ADVPREFERREDLIFETIME; 442 pp->onlinkflg = 1; 443 pp->autoconfflg = 1; 444 pp->origin = PREFIX_FROM_KERNEL; 445 446 /* link into chain */ 447 insque(pp, &rai->prefix); 448 449 /* counter increment */ 450 rai->pfxs++; 451 452 /* forward pointer and get next prefix(if any) */ 453 next += len; 454 next = get_next_msg(next, lim, rai->ifindex, 455 &len, RTADV_TYPE2BITMASK(RTM_GET)); 456 } 457 458 free(buf); 459 } 460 461 static void 462 makeentry(buf, id, string, add) 463 char *buf, *string; 464 int id, add; 465 { 466 strcpy(buf, string); 467 if (add) { 468 char *cp; 469 470 cp = (char *)index(buf, '\0'); 471 cp += sprintf(cp, "%d", id); 472 *cp = '\0'; 473 } 474 } 475 476 /* 477 * Add a prefix to the list of specified interface and reconstruct 478 * the outgoing packet. 479 * The prefix must not be in the list. 480 * XXX: other parameter of the prefix(e.g. lifetime) shoule be 481 * able to be specified. 482 */ 483 static void 484 add_prefix(struct rainfo *rai, struct in6_prefixreq *ipr) 485 { 486 struct prefix *prefix; 487 u_char ntopbuf[INET6_ADDRSTRLEN]; 488 489 if ((prefix = malloc(sizeof(*prefix))) == NULL) { 490 syslog(LOG_ERR, "<%s> memory allocation failed", 491 __FUNCTION__); 492 return; /* XXX: error or exit? */ 493 } 494 prefix->prefix = ipr->ipr_prefix.sin6_addr; 495 prefix->prefixlen = ipr->ipr_plen; 496 prefix->validlifetime = ipr->ipr_vltime; 497 prefix->preflifetime = ipr->ipr_pltime; 498 prefix->onlinkflg = ipr->ipr_raf_onlink; 499 prefix->autoconfflg = ipr->ipr_raf_auto; 500 prefix->origin = PREFIX_FROM_DYNAMIC; 501 502 insque(prefix, &rai->prefix); 503 504 syslog(LOG_DEBUG, "<%s> new prefix %s/%d was added on %s", 505 __FUNCTION__, inet_ntop(AF_INET6, &ipr->ipr_prefix.sin6_addr, 506 ntopbuf, INET6_ADDRSTRLEN), 507 ipr->ipr_plen, rai->ifname); 508 509 /* free the previous packet */ 510 free(rai->ra_data); 511 rai->ra_data = 0; 512 513 /* reconstruct the packet */ 514 rai->pfxs++; 515 make_packet(rai); 516 517 /* 518 * reset the timer so that the new prefix will be advertised quickly. 519 */ 520 rai->initcounter = 0; 521 ra_timer_update((void *)rai, &rai->timer->tm); 522 rtadvd_set_timer(&rai->timer->tm, rai->timer); 523 } 524 525 /* 526 * Delete a prefix to the list of specified interface and reconstruct 527 * the outgoing packet. 528 * The prefix must be in the list. 529 */ 530 void 531 delete_prefix(struct rainfo *rai, struct prefix *prefix) 532 { 533 u_char ntopbuf[INET6_ADDRSTRLEN]; 534 535 remque(prefix); 536 syslog(LOG_DEBUG, "<%s> prefix %s/%d was deleted on %s", 537 __FUNCTION__, inet_ntop(AF_INET6, &prefix->prefix, 538 ntopbuf, INET6_ADDRSTRLEN), 539 prefix->prefixlen, rai->ifname); 540 free(prefix); 541 rai->pfxs--; 542 make_packet(rai); 543 } 544 545 /* 546 * Try to get an in6_prefixreq contents for a prefix which matches 547 * ipr->ipr_prefix and ipr->ipr_plen and belongs to 548 * the interface whose name is ipr->ipr_name[]. 549 */ 550 static int 551 init_prefix(struct in6_prefixreq *ipr) 552 { 553 int s; 554 555 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) { 556 syslog(LOG_ERR, "<%s> socket: %s", __FUNCTION__, 557 strerror(errno)); 558 exit(1); 559 } 560 561 if (ioctl(s, SIOCGIFPREFIX_IN6, (caddr_t)ipr) < 0) { 562 syslog(LOG_INFO, "<%s> ioctl:SIOCGIFPREFIX %s", __FUNCTION__, 563 strerror(errno)); 564 565 ipr->ipr_vltime = DEF_ADVVALIDLIFETIME; 566 ipr->ipr_pltime = DEF_ADVPREFERREDLIFETIME; 567 ipr->ipr_raf_onlink = 1; 568 ipr->ipr_raf_auto = 1; 569 /* omit other field initialization */ 570 } 571 else if (ipr->ipr_origin < PR_ORIG_RR) { 572 u_char ntopbuf[INET6_ADDRSTRLEN]; 573 574 syslog(LOG_WARNING, "<%s> Added prefix(%s)'s origin %d is" 575 "lower than PR_ORIG_RR(router renumbering)." 576 "This should not happen if I am router", __FUNCTION__, 577 inet_ntop(AF_INET6, &ipr->ipr_prefix.sin6_addr, ntopbuf, 578 sizeof(ntopbuf)), ipr->ipr_origin); 579 close(s); 580 return 1; 581 } 582 583 close(s); 584 return 0; 585 } 586 587 void 588 make_prefix(struct rainfo *rai, int ifindex, struct in6_addr *addr, int plen) 589 { 590 struct in6_prefixreq ipr; 591 592 memset(&ipr, 0, sizeof(ipr)); 593 if (if_indextoname(ifindex, ipr.ipr_name) == NULL) { 594 syslog(LOG_ERR, "<%s> Prefix added interface No.%d doesn't" 595 "exist. This should not happen! %s", __FUNCTION__, 596 ifindex, strerror(errno)); 597 exit(1); 598 } 599 ipr.ipr_prefix.sin6_len = sizeof(ipr.ipr_prefix); 600 ipr.ipr_prefix.sin6_family = AF_INET6; 601 ipr.ipr_prefix.sin6_addr = *addr; 602 ipr.ipr_plen = plen; 603 604 if (init_prefix(&ipr)) 605 return; /* init failed by some error */ 606 add_prefix(rai, &ipr); 607 } 608 609 void 610 make_packet(struct rainfo *rainfo) 611 { 612 size_t packlen, lladdroptlen = 0; 613 char *buf; 614 struct nd_router_advert *ra; 615 struct nd_opt_prefix_info *ndopt_pi; 616 struct nd_opt_mtu *ndopt_mtu; 617 #ifdef MIP6 618 struct nd_opt_advint *ndopt_advint; 619 struct nd_opt_hai *ndopt_hai; 620 #endif 621 struct prefix *pfx; 622 623 /* calculate total length */ 624 packlen = sizeof(struct nd_router_advert); 625 if (rainfo->advlinkopt) { 626 if ((lladdroptlen = lladdropt_length(rainfo->sdl)) == 0) { 627 syslog(LOG_INFO, 628 "<%s> link-layer address option has" 629 " null length on %s." 630 " Treat as not included.", 631 __FUNCTION__, rainfo->ifname); 632 rainfo->advlinkopt = 0; 633 } 634 packlen += lladdroptlen; 635 } 636 if (rainfo->pfxs) 637 packlen += sizeof(struct nd_opt_prefix_info) * rainfo->pfxs; 638 if (rainfo->linkmtu) 639 packlen += sizeof(struct nd_opt_mtu); 640 #ifdef MIP6 641 if (mobileip6 && rainfo->maxinterval) 642 packlen += sizeof(struct nd_opt_advint); 643 if (mobileip6 && rainfo->hatime) 644 packlen += sizeof(struct nd_opt_hai); 645 #endif 646 647 /* allocate memory for the packet */ 648 if ((buf = malloc(packlen)) == NULL) { 649 syslog(LOG_ERR, 650 "<%s> can't get enough memory for an RA packet", 651 __FUNCTION__); 652 exit(1); 653 } 654 rainfo->ra_data = buf; 655 /* XXX: what if packlen > 576? */ 656 rainfo->ra_datalen = packlen; 657 658 /* 659 * construct the packet 660 */ 661 ra = (struct nd_router_advert *)buf; 662 ra->nd_ra_type = ND_ROUTER_ADVERT; 663 ra->nd_ra_code = 0; 664 ra->nd_ra_cksum = 0; 665 ra->nd_ra_curhoplimit = (u_int8_t)(0xff & rainfo->hoplimit); 666 ra->nd_ra_flags_reserved = 0; 667 ra->nd_ra_flags_reserved |= 668 rainfo->managedflg ? ND_RA_FLAG_MANAGED : 0; 669 ra->nd_ra_flags_reserved |= 670 rainfo->otherflg ? ND_RA_FLAG_OTHER : 0; 671 #ifdef MIP6 672 ra->nd_ra_flags_reserved |= 673 rainfo->haflg ? ND_RA_FLAG_HA : 0; 674 #endif 675 ra->nd_ra_router_lifetime = htons(rainfo->lifetime); 676 ra->nd_ra_reachable = htonl(rainfo->reachabletime); 677 ra->nd_ra_retransmit = htonl(rainfo->retranstimer); 678 buf += sizeof(*ra); 679 680 if (rainfo->advlinkopt) { 681 lladdropt_fill(rainfo->sdl, (struct nd_opt_hdr *)buf); 682 buf += lladdroptlen; 683 } 684 685 if (rainfo->linkmtu) { 686 ndopt_mtu = (struct nd_opt_mtu *)buf; 687 ndopt_mtu->nd_opt_mtu_type = ND_OPT_MTU; 688 ndopt_mtu->nd_opt_mtu_len = 1; 689 ndopt_mtu->nd_opt_mtu_reserved = 0; 690 ndopt_mtu->nd_opt_mtu_mtu = ntohl(rainfo->linkmtu); 691 buf += sizeof(struct nd_opt_mtu); 692 } 693 694 #ifdef MIP6 695 if (mobileip6 && rainfo->maxinterval) { 696 ndopt_advint = (struct nd_opt_advint *)buf; 697 ndopt_advint->nd_opt_int_type = ND_OPT_ADV_INTERVAL; 698 ndopt_advint->nd_opt_int_len = 1; 699 ndopt_advint->nd_opt_int_reserved = 0; 700 ndopt_advint->nd_opt_int_interval = ntohl(rainfo->maxinterval * 701 1000); 702 buf += sizeof(struct nd_opt_advint); 703 } 704 #endif 705 706 #ifdef MIP6 707 if (rainfo->hatime) { 708 ndopt_hai = (struct nd_opt_hai *)buf; 709 ndopt_hai->nd_opt_hai_type = ND_OPT_HA_INFORMATION; 710 ndopt_hai->nd_opt_hai_len = 1; 711 ndopt_hai->nd_opt_hai_reserved = 0; 712 ndopt_hai->nd_opt_hai_pref = ntohs(rainfo->hapref); 713 ndopt_hai->nd_opt_hai_lifetime = ntohs(rainfo->hatime); 714 buf += sizeof(struct nd_opt_hai); 715 } 716 #endif 717 718 for (pfx = rainfo->prefix.next; 719 pfx != &rainfo->prefix; pfx = pfx->next) { 720 ndopt_pi = (struct nd_opt_prefix_info *)buf; 721 ndopt_pi->nd_opt_pi_type = ND_OPT_PREFIX_INFORMATION; 722 ndopt_pi->nd_opt_pi_len = 4; 723 ndopt_pi->nd_opt_pi_prefix_len = pfx->prefixlen; 724 ndopt_pi->nd_opt_pi_flags_reserved = 0; 725 if (pfx->onlinkflg) 726 ndopt_pi->nd_opt_pi_flags_reserved |= 727 ND_OPT_PI_FLAG_ONLINK; 728 if (pfx->autoconfflg) 729 ndopt_pi->nd_opt_pi_flags_reserved |= 730 ND_OPT_PI_FLAG_AUTO; 731 #ifdef MIP6 732 if (pfx->routeraddr) 733 ndopt_pi->nd_opt_pi_flags_reserved |= 734 ND_OPT_PI_FLAG_RTADDR; 735 #endif 736 ndopt_pi->nd_opt_pi_valid_time = ntohl(pfx->validlifetime); 737 ndopt_pi->nd_opt_pi_preferred_time = 738 ntohl(pfx->preflifetime); 739 ndopt_pi->nd_opt_pi_reserved2 = 0; 740 ndopt_pi->nd_opt_pi_prefix = pfx->prefix; 741 742 buf += sizeof(struct nd_opt_prefix_info); 743 } 744 745 return; 746 } 747