1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 /* 22 * Copyright 2009 Sun Microsystems, Inc. All rights reserved. 23 * Use is subject to license terms. 24 */ 25 /* 26 * Copyright (c) 1990 Mentat Inc. 27 */ 28 29 /* 30 * This file contains the interface control functions for IPv6. 31 */ 32 33 #include <sys/types.h> 34 #include <sys/sysmacros.h> 35 #include <sys/stream.h> 36 #include <sys/dlpi.h> 37 #include <sys/stropts.h> 38 #include <sys/ddi.h> 39 #include <sys/cmn_err.h> 40 #include <sys/kstat.h> 41 #include <sys/debug.h> 42 #include <sys/zone.h> 43 #include <sys/policy.h> 44 45 #include <sys/systm.h> 46 #include <sys/param.h> 47 #include <sys/socket.h> 48 #include <sys/isa_defs.h> 49 #include <net/if.h> 50 #include <net/if_dl.h> 51 #include <net/route.h> 52 #include <netinet/in.h> 53 #include <netinet/igmp_var.h> 54 #include <netinet/ip6.h> 55 #include <netinet/icmp6.h> 56 57 #include <inet/common.h> 58 #include <inet/nd.h> 59 #include <inet/mib2.h> 60 #include <inet/ip.h> 61 #include <inet/ip6.h> 62 #include <inet/ip_multi.h> 63 #include <inet/ip_ire.h> 64 #include <inet/ip_rts.h> 65 #include <inet/ip_ndp.h> 66 #include <inet/ip_if.h> 67 #include <inet/ip6_asp.h> 68 #include <inet/tun.h> 69 #include <inet/ipclassifier.h> 70 #include <inet/sctp_ip.h> 71 72 #include <sys/tsol/tndb.h> 73 #include <sys/tsol/tnet.h> 74 75 static in6_addr_t ipv6_ll_template = 76 {(uint32_t)V6_LINKLOCAL, 0x0, 0x0, 0x0}; 77 78 static ipif_t * 79 ipif_lookup_interface_v6(const in6_addr_t *if_addr, const in6_addr_t *dst, 80 queue_t *q, mblk_t *mp, ipsq_func_t func, int *error, ip_stack_t *ipst); 81 82 /* 83 * These two functions, ipif_lookup_group_v6() and ill_lookup_group_v6(), 84 * are called when an application does not specify an interface to be 85 * used for multicast traffic. It calls ire_lookup_multi_v6() to look 86 * for an interface route for the specified multicast group. Doing 87 * this allows the administrator to add prefix routes for multicast to 88 * indicate which interface to be used for multicast traffic in the above 89 * scenario. The route could be for all multicast (ff00::/8), for a single 90 * multicast group (a /128 route) or anything in between. If there is no 91 * such multicast route, we just find any multicast capable interface and 92 * return it. 93 */ 94 ipif_t * 95 ipif_lookup_group_v6(const in6_addr_t *group, zoneid_t zoneid, ip_stack_t *ipst) 96 { 97 ire_t *ire; 98 ipif_t *ipif; 99 100 ire = ire_lookup_multi_v6(group, zoneid, ipst); 101 if (ire != NULL) { 102 ipif = ire->ire_ipif; 103 ipif_refhold(ipif); 104 ire_refrele(ire); 105 return (ipif); 106 } 107 108 return (ipif_lookup_multicast(ipst, zoneid, B_TRUE)); 109 } 110 111 ill_t * 112 ill_lookup_group_v6(const in6_addr_t *group, zoneid_t zoneid, ip_stack_t *ipst) 113 { 114 ire_t *ire; 115 ill_t *ill; 116 ipif_t *ipif; 117 118 ire = ire_lookup_multi_v6(group, zoneid, ipst); 119 if (ire != NULL) { 120 ill = ire->ire_ipif->ipif_ill; 121 ill_refhold(ill); 122 ire_refrele(ire); 123 return (ill); 124 } 125 126 ipif = ipif_lookup_multicast(ipst, zoneid, B_TRUE); 127 if (ipif == NULL) 128 return (NULL); 129 130 ill = ipif->ipif_ill; 131 ill_refhold(ill); 132 ipif_refrele(ipif); 133 return (ill); 134 } 135 136 /* 137 * Look for an ipif with the specified interface address and destination. 138 * The destination address is used only for matching point-to-point interfaces. 139 */ 140 static ipif_t * 141 ipif_lookup_interface_v6(const in6_addr_t *if_addr, const in6_addr_t *dst, 142 queue_t *q, mblk_t *mp, ipsq_func_t func, int *error, ip_stack_t *ipst) 143 { 144 ipif_t *ipif; 145 ill_t *ill; 146 ipsq_t *ipsq; 147 ill_walk_context_t ctx; 148 149 if (error != NULL) 150 *error = 0; 151 152 /* 153 * First match all the point-to-point interfaces 154 * before looking at non-point-to-point interfaces. 155 * This is done to avoid returning non-point-to-point 156 * ipif instead of unnumbered point-to-point ipif. 157 */ 158 rw_enter(&ipst->ips_ill_g_lock, RW_READER); 159 ill = ILL_START_WALK_V6(&ctx, ipst); 160 for (; ill != NULL; ill = ill_next(&ctx, ill)) { 161 GRAB_CONN_LOCK(q); 162 mutex_enter(&ill->ill_lock); 163 for (ipif = ill->ill_ipif; ipif != NULL; 164 ipif = ipif->ipif_next) { 165 /* Allow the ipif to be down */ 166 if ((ipif->ipif_flags & IPIF_POINTOPOINT) && 167 (IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6lcl_addr, 168 if_addr)) && 169 (IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6pp_dst_addr, 170 dst))) { 171 if (IPIF_CAN_LOOKUP(ipif)) { 172 ipif_refhold_locked(ipif); 173 mutex_exit(&ill->ill_lock); 174 RELEASE_CONN_LOCK(q); 175 rw_exit(&ipst->ips_ill_g_lock); 176 return (ipif); 177 } else if (IPIF_CAN_WAIT(ipif, q)) { 178 ipsq = ill->ill_phyint->phyint_ipsq; 179 mutex_enter(&ipsq->ipsq_lock); 180 mutex_enter(&ipsq->ipsq_xop->ipx_lock); 181 mutex_exit(&ill->ill_lock); 182 rw_exit(&ipst->ips_ill_g_lock); 183 ipsq_enq(ipsq, q, mp, func, NEW_OP, 184 ill); 185 mutex_exit(&ipsq->ipsq_xop->ipx_lock); 186 mutex_exit(&ipsq->ipsq_lock); 187 RELEASE_CONN_LOCK(q); 188 if (error != NULL) 189 *error = EINPROGRESS; 190 return (NULL); 191 } 192 } 193 } 194 mutex_exit(&ill->ill_lock); 195 RELEASE_CONN_LOCK(q); 196 } 197 rw_exit(&ipst->ips_ill_g_lock); 198 /* lookup the ipif based on interface address */ 199 ipif = ipif_lookup_addr_v6(if_addr, NULL, ALL_ZONES, q, mp, func, 200 error, ipst); 201 ASSERT(ipif == NULL || ipif->ipif_isv6); 202 return (ipif); 203 } 204 205 /* 206 * Common function for ipif_lookup_addr_v6() and ipif_lookup_addr_exact_v6(). 207 */ 208 static ipif_t * 209 ipif_lookup_addr_common_v6(const in6_addr_t *addr, ill_t *match_ill, 210 boolean_t match_illgrp, zoneid_t zoneid, queue_t *q, mblk_t *mp, 211 ipsq_func_t func, int *error, ip_stack_t *ipst) 212 { 213 ipif_t *ipif; 214 ill_t *ill; 215 boolean_t ptp = B_FALSE; 216 ipsq_t *ipsq; 217 ill_walk_context_t ctx; 218 219 if (error != NULL) 220 *error = 0; 221 222 rw_enter(&ipst->ips_ill_g_lock, RW_READER); 223 /* 224 * Repeat twice, first based on local addresses and 225 * next time for pointopoint. 226 */ 227 repeat: 228 ill = ILL_START_WALK_V6(&ctx, ipst); 229 for (; ill != NULL; ill = ill_next(&ctx, ill)) { 230 if (match_ill != NULL && ill != match_ill && 231 (!match_illgrp || !IS_IN_SAME_ILLGRP(ill, match_ill))) { 232 continue; 233 } 234 GRAB_CONN_LOCK(q); 235 mutex_enter(&ill->ill_lock); 236 for (ipif = ill->ill_ipif; ipif != NULL; 237 ipif = ipif->ipif_next) { 238 if (zoneid != ALL_ZONES && 239 ipif->ipif_zoneid != zoneid && 240 ipif->ipif_zoneid != ALL_ZONES) 241 continue; 242 /* Allow the ipif to be down */ 243 if ((!ptp && (IN6_ARE_ADDR_EQUAL( 244 &ipif->ipif_v6lcl_addr, addr) && 245 (ipif->ipif_flags & IPIF_UNNUMBERED) == 0)) || 246 (ptp && (ipif->ipif_flags & IPIF_POINTOPOINT) && 247 IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6pp_dst_addr, 248 addr))) { 249 if (IPIF_CAN_LOOKUP(ipif)) { 250 ipif_refhold_locked(ipif); 251 mutex_exit(&ill->ill_lock); 252 RELEASE_CONN_LOCK(q); 253 rw_exit(&ipst->ips_ill_g_lock); 254 return (ipif); 255 } else if (IPIF_CAN_WAIT(ipif, q)) { 256 ipsq = ill->ill_phyint->phyint_ipsq; 257 mutex_enter(&ipsq->ipsq_lock); 258 mutex_enter(&ipsq->ipsq_xop->ipx_lock); 259 mutex_exit(&ill->ill_lock); 260 rw_exit(&ipst->ips_ill_g_lock); 261 ipsq_enq(ipsq, q, mp, func, NEW_OP, 262 ill); 263 mutex_exit(&ipsq->ipsq_xop->ipx_lock); 264 mutex_exit(&ipsq->ipsq_lock); 265 RELEASE_CONN_LOCK(q); 266 if (error != NULL) 267 *error = EINPROGRESS; 268 return (NULL); 269 } 270 } 271 } 272 mutex_exit(&ill->ill_lock); 273 RELEASE_CONN_LOCK(q); 274 } 275 276 /* If we already did the ptp case, then we are done */ 277 if (ptp) { 278 rw_exit(&ipst->ips_ill_g_lock); 279 if (error != NULL) 280 *error = ENXIO; 281 return (NULL); 282 } 283 ptp = B_TRUE; 284 goto repeat; 285 } 286 287 boolean_t 288 ip_addr_exists_v6(const in6_addr_t *addr, zoneid_t zoneid, 289 ip_stack_t *ipst) 290 { 291 ipif_t *ipif; 292 ill_t *ill; 293 ill_walk_context_t ctx; 294 295 rw_enter(&ipst->ips_ill_g_lock, RW_READER); 296 297 ill = ILL_START_WALK_V6(&ctx, ipst); 298 for (; ill != NULL; ill = ill_next(&ctx, ill)) { 299 mutex_enter(&ill->ill_lock); 300 for (ipif = ill->ill_ipif; ipif != NULL; 301 ipif = ipif->ipif_next) { 302 if (zoneid != ALL_ZONES && 303 ipif->ipif_zoneid != zoneid && 304 ipif->ipif_zoneid != ALL_ZONES) 305 continue; 306 /* Allow the ipif to be down */ 307 if (((IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6lcl_addr, 308 addr) && 309 (ipif->ipif_flags & IPIF_UNNUMBERED) == 0)) || 310 ((ipif->ipif_flags & IPIF_POINTOPOINT) && 311 IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6pp_dst_addr, 312 addr))) { 313 mutex_exit(&ill->ill_lock); 314 rw_exit(&ipst->ips_ill_g_lock); 315 return (B_TRUE); 316 } 317 } 318 mutex_exit(&ill->ill_lock); 319 } 320 321 rw_exit(&ipst->ips_ill_g_lock); 322 return (B_FALSE); 323 } 324 325 /* 326 * Lookup an ipif with the specified address. For point-to-point links we 327 * look for matches on either the destination address or the local address, 328 * but we skip the local address check if IPIF_UNNUMBERED is set. If the 329 * `match_ill' argument is non-NULL, the lookup is restricted to that ill 330 * (or illgrp if `match_ill' is in an IPMP group). 331 */ 332 ipif_t * 333 ipif_lookup_addr_v6(const in6_addr_t *addr, ill_t *match_ill, zoneid_t zoneid, 334 queue_t *q, mblk_t *mp, ipsq_func_t func, int *error, ip_stack_t *ipst) 335 { 336 return (ipif_lookup_addr_common_v6(addr, match_ill, B_TRUE, zoneid, q, 337 mp, func, error, ipst)); 338 } 339 340 /* 341 * Special abbreviated version of ipif_lookup_addr_v6() that doesn't match 342 * `match_ill' across the IPMP group. This function is only needed in some 343 * corner-cases; almost everything should use ipif_lookup_addr_v6(). 344 */ 345 ipif_t * 346 ipif_lookup_addr_exact_v6(const in6_addr_t *addr, ill_t *match_ill, 347 ip_stack_t *ipst) 348 { 349 ASSERT(match_ill != NULL); 350 return (ipif_lookup_addr_common_v6(addr, match_ill, B_FALSE, ALL_ZONES, 351 NULL, NULL, NULL, NULL, ipst)); 352 } 353 354 /* 355 * Look for an ipif with the specified address. For point-point links 356 * we look for matches on either the destination address and the local 357 * address, but we ignore the check on the local address if IPIF_UNNUMBERED 358 * is set. 359 * If the `match_ill' argument is non-NULL, the lookup is restricted to that 360 * ill (or illgrp if `match_ill' is in an IPMP group). 361 * Return the zoneid for the ipif. ALL_ZONES if none found. 362 */ 363 zoneid_t 364 ipif_lookup_addr_zoneid_v6(const in6_addr_t *addr, ill_t *match_ill, 365 ip_stack_t *ipst) 366 { 367 ipif_t *ipif; 368 ill_t *ill; 369 boolean_t ptp = B_FALSE; 370 ill_walk_context_t ctx; 371 zoneid_t zoneid; 372 373 rw_enter(&ipst->ips_ill_g_lock, RW_READER); 374 /* 375 * Repeat twice, first based on local addresses and 376 * next time for pointopoint. 377 */ 378 repeat: 379 ill = ILL_START_WALK_V6(&ctx, ipst); 380 for (; ill != NULL; ill = ill_next(&ctx, ill)) { 381 if (match_ill != NULL && ill != match_ill && 382 !IS_IN_SAME_ILLGRP(ill, match_ill)) { 383 continue; 384 } 385 mutex_enter(&ill->ill_lock); 386 for (ipif = ill->ill_ipif; ipif != NULL; 387 ipif = ipif->ipif_next) { 388 /* Allow the ipif to be down */ 389 if ((!ptp && (IN6_ARE_ADDR_EQUAL( 390 &ipif->ipif_v6lcl_addr, addr) && 391 (ipif->ipif_flags & IPIF_UNNUMBERED) == 0)) || 392 (ptp && (ipif->ipif_flags & IPIF_POINTOPOINT) && 393 IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6pp_dst_addr, 394 addr)) && 395 !(ipif->ipif_state_flags & IPIF_CONDEMNED)) { 396 zoneid = ipif->ipif_zoneid; 397 mutex_exit(&ill->ill_lock); 398 rw_exit(&ipst->ips_ill_g_lock); 399 /* 400 * If ipif_zoneid was ALL_ZONES then we have 401 * a trusted extensions shared IP address. 402 * In that case GLOBAL_ZONEID works to send. 403 */ 404 if (zoneid == ALL_ZONES) 405 zoneid = GLOBAL_ZONEID; 406 return (zoneid); 407 } 408 } 409 mutex_exit(&ill->ill_lock); 410 } 411 412 /* If we already did the ptp case, then we are done */ 413 if (ptp) { 414 rw_exit(&ipst->ips_ill_g_lock); 415 return (ALL_ZONES); 416 } 417 ptp = B_TRUE; 418 goto repeat; 419 } 420 421 /* 422 * Perform various checks to verify that an address would make sense as a local 423 * interface address. This is currently only called when an attempt is made 424 * to set a local address. 425 * 426 * Does not allow a v4-mapped address, an address that equals the subnet 427 * anycast address, ... a multicast address, ... 428 */ 429 boolean_t 430 ip_local_addr_ok_v6(const in6_addr_t *addr, const in6_addr_t *subnet_mask) 431 { 432 in6_addr_t subnet; 433 434 if (IN6_IS_ADDR_UNSPECIFIED(addr)) 435 return (B_TRUE); /* Allow all zeros */ 436 437 /* 438 * Don't allow all zeroes or host part, but allow 439 * all ones netmask. 440 */ 441 V6_MASK_COPY(*addr, *subnet_mask, subnet); 442 if (IN6_IS_ADDR_V4MAPPED(addr) || 443 (IN6_ARE_ADDR_EQUAL(addr, &subnet) && 444 !IN6_ARE_ADDR_EQUAL(subnet_mask, &ipv6_all_ones)) || 445 (IN6_IS_ADDR_V4COMPAT(addr) && CLASSD(V4_PART_OF_V6((*addr)))) || 446 IN6_IS_ADDR_MULTICAST(addr)) 447 return (B_FALSE); 448 449 return (B_TRUE); 450 } 451 452 /* 453 * Perform various checks to verify that an address would make sense as a 454 * remote/subnet interface address. 455 */ 456 boolean_t 457 ip_remote_addr_ok_v6(const in6_addr_t *addr, const in6_addr_t *subnet_mask) 458 { 459 in6_addr_t subnet; 460 461 if (IN6_IS_ADDR_UNSPECIFIED(addr)) 462 return (B_TRUE); /* Allow all zeros */ 463 464 V6_MASK_COPY(*addr, *subnet_mask, subnet); 465 if (IN6_IS_ADDR_V4MAPPED(addr) || 466 (IN6_ARE_ADDR_EQUAL(addr, &subnet) && 467 !IN6_ARE_ADDR_EQUAL(subnet_mask, &ipv6_all_ones)) || 468 IN6_IS_ADDR_MULTICAST(addr) || 469 (IN6_IS_ADDR_V4COMPAT(addr) && CLASSD(V4_PART_OF_V6((*addr))))) 470 return (B_FALSE); 471 472 return (B_TRUE); 473 } 474 475 /* 476 * ip_rt_add_v6 is called to add an IPv6 route to the forwarding table. 477 * ipif_arg is passed in to associate it with the correct interface 478 * (for link-local destinations and gateways). 479 */ 480 /* ARGSUSED1 */ 481 int 482 ip_rt_add_v6(const in6_addr_t *dst_addr, const in6_addr_t *mask, 483 const in6_addr_t *gw_addr, const in6_addr_t *src_addr, int flags, 484 ipif_t *ipif_arg, ire_t **ire_arg, queue_t *q, mblk_t *mp, ipsq_func_t func, 485 struct rtsa_s *sp, ip_stack_t *ipst) 486 { 487 ire_t *ire; 488 ire_t *gw_ire = NULL; 489 ipif_t *ipif; 490 boolean_t ipif_refheld = B_FALSE; 491 uint_t type; 492 int match_flags = MATCH_IRE_TYPE; 493 int error; 494 tsol_gc_t *gc = NULL; 495 tsol_gcgrp_t *gcgrp = NULL; 496 boolean_t gcgrp_xtraref = B_FALSE; 497 498 if (ire_arg != NULL) 499 *ire_arg = NULL; 500 501 /* 502 * Prevent routes with a zero gateway from being created (since 503 * interfaces can currently be plumbed and brought up with no assigned 504 * address). 505 */ 506 if (IN6_IS_ADDR_UNSPECIFIED(gw_addr)) 507 return (ENETUNREACH); 508 509 /* 510 * If this is the case of RTF_HOST being set, then we set the netmask 511 * to all ones (regardless if one was supplied). 512 */ 513 if (flags & RTF_HOST) 514 mask = &ipv6_all_ones; 515 516 /* 517 * Get the ipif, if any, corresponding to the gw_addr 518 */ 519 ipif = ipif_lookup_interface_v6(gw_addr, dst_addr, q, mp, func, 520 &error, ipst); 521 if (ipif != NULL) 522 ipif_refheld = B_TRUE; 523 else if (error == EINPROGRESS) { 524 ip1dbg(("ip_rt_add_v6: null and EINPROGRESS")); 525 return (error); 526 } 527 528 /* 529 * GateD will attempt to create routes with a loopback interface 530 * address as the gateway and with RTF_GATEWAY set. We allow 531 * these routes to be added, but create them as interface routes 532 * since the gateway is an interface address. 533 */ 534 if ((ipif != NULL) && (ipif->ipif_ire_type == IRE_LOOPBACK)) { 535 flags &= ~RTF_GATEWAY; 536 if (IN6_ARE_ADDR_EQUAL(gw_addr, &ipv6_loopback) && 537 IN6_ARE_ADDR_EQUAL(dst_addr, &ipv6_loopback) && 538 IN6_ARE_ADDR_EQUAL(mask, &ipv6_all_ones)) { 539 ire = ire_ctable_lookup_v6(dst_addr, 0, IRE_LOOPBACK, 540 ipif, ALL_ZONES, NULL, match_flags, ipst); 541 if (ire != NULL) { 542 ire_refrele(ire); 543 if (ipif_refheld) 544 ipif_refrele(ipif); 545 return (EEXIST); 546 } 547 ip1dbg(("ipif_up_done: 0x%p creating IRE 0x%x" 548 "for 0x%x\n", (void *)ipif, 549 ipif->ipif_ire_type, 550 ntohl(ipif->ipif_lcl_addr))); 551 ire = ire_create_v6( 552 dst_addr, 553 mask, 554 &ipif->ipif_v6src_addr, 555 NULL, 556 &ipif->ipif_mtu, 557 NULL, 558 NULL, 559 NULL, 560 ipif->ipif_net_type, 561 ipif, 562 NULL, 563 0, 564 0, 565 flags, 566 &ire_uinfo_null, 567 NULL, 568 NULL, 569 ipst); 570 if (ire == NULL) { 571 if (ipif_refheld) 572 ipif_refrele(ipif); 573 return (ENOMEM); 574 } 575 error = ire_add(&ire, q, mp, func, B_FALSE); 576 if (error == 0) 577 goto save_ire; 578 /* 579 * In the result of failure, ire_add() will have already 580 * deleted the ire in question, so there is no need to 581 * do that here. 582 */ 583 if (ipif_refheld) 584 ipif_refrele(ipif); 585 return (error); 586 } 587 } 588 589 /* 590 * Traditionally, interface routes are ones where RTF_GATEWAY isn't set 591 * and the gateway address provided is one of the system's interface 592 * addresses. By using the routing socket interface and supplying an 593 * RTA_IFP sockaddr with an interface index, an alternate method of 594 * specifying an interface route to be created is available which uses 595 * the interface index that specifies the outgoing interface rather than 596 * the address of an outgoing interface (which may not be able to 597 * uniquely identify an interface). When coupled with the RTF_GATEWAY 598 * flag, routes can be specified which not only specify the next-hop to 599 * be used when routing to a certain prefix, but also which outgoing 600 * interface should be used. 601 * 602 * Previously, interfaces would have unique addresses assigned to them 603 * and so the address assigned to a particular interface could be used 604 * to identify a particular interface. One exception to this was the 605 * case of an unnumbered interface (where IPIF_UNNUMBERED was set). 606 * 607 * With the advent of IPv6 and its link-local addresses, this 608 * restriction was relaxed and interfaces could share addresses between 609 * themselves. In fact, typically all of the link-local interfaces on 610 * an IPv6 node or router will have the same link-local address. In 611 * order to differentiate between these interfaces, the use of an 612 * interface index is necessary and this index can be carried inside a 613 * RTA_IFP sockaddr (which is actually a sockaddr_dl). One restriction 614 * of using the interface index, however, is that all of the ipif's that 615 * are part of an ill have the same index and so the RTA_IFP sockaddr 616 * cannot be used to differentiate between ipif's (or logical 617 * interfaces) that belong to the same ill (physical interface). 618 * 619 * For example, in the following case involving IPv4 interfaces and 620 * logical interfaces 621 * 622 * 192.0.2.32 255.255.255.224 192.0.2.33 U if0 623 * 192.0.2.32 255.255.255.224 192.0.2.34 U if0:1 624 * 192.0.2.32 255.255.255.224 192.0.2.35 U if0:2 625 * 626 * the ipif's corresponding to each of these interface routes can be 627 * uniquely identified by the "gateway" (actually interface address). 628 * 629 * In this case involving multiple IPv6 default routes to a particular 630 * link-local gateway, the use of RTA_IFP is necessary to specify which 631 * default route is of interest: 632 * 633 * default fe80::123:4567:89ab:cdef U if0 634 * default fe80::123:4567:89ab:cdef U if1 635 */ 636 637 /* RTF_GATEWAY not set */ 638 if (!(flags & RTF_GATEWAY)) { 639 queue_t *stq; 640 641 if (sp != NULL) { 642 ip2dbg(("ip_rt_add_v6: gateway security attributes " 643 "cannot be set with interface route\n")); 644 if (ipif_refheld) 645 ipif_refrele(ipif); 646 return (EINVAL); 647 } 648 649 /* 650 * As the interface index specified with the RTA_IFP sockaddr is 651 * the same for all ipif's off of an ill, the matching logic 652 * below uses MATCH_IRE_ILL if such an index was specified. 653 * This means that routes sharing the same prefix when added 654 * using a RTA_IFP sockaddr must have distinct interface 655 * indices (namely, they must be on distinct ill's). 656 * 657 * On the other hand, since the gateway address will usually be 658 * different for each ipif on the system, the matching logic 659 * uses MATCH_IRE_IPIF in the case of a traditional interface 660 * route. This means that interface routes for the same prefix 661 * can be created if they belong to distinct ipif's and if a 662 * RTA_IFP sockaddr is not present. 663 */ 664 if (ipif_arg != NULL) { 665 if (ipif_refheld) { 666 ipif_refrele(ipif); 667 ipif_refheld = B_FALSE; 668 } 669 ipif = ipif_arg; 670 match_flags |= MATCH_IRE_ILL; 671 } else { 672 /* 673 * Check the ipif corresponding to the gw_addr 674 */ 675 if (ipif == NULL) 676 return (ENETUNREACH); 677 match_flags |= MATCH_IRE_IPIF; 678 } 679 680 ASSERT(ipif != NULL); 681 /* 682 * We check for an existing entry at this point. 683 */ 684 match_flags |= MATCH_IRE_MASK; 685 ire = ire_ftable_lookup_v6(dst_addr, mask, 0, IRE_INTERFACE, 686 ipif, NULL, ALL_ZONES, 0, NULL, match_flags, ipst); 687 if (ire != NULL) { 688 ire_refrele(ire); 689 if (ipif_refheld) 690 ipif_refrele(ipif); 691 return (EEXIST); 692 } 693 694 stq = (ipif->ipif_net_type == IRE_IF_RESOLVER) 695 ? ipif->ipif_rq : ipif->ipif_wq; 696 697 /* 698 * Create a copy of the IRE_LOOPBACK, IRE_IF_NORESOLVER or 699 * IRE_IF_RESOLVER with the modified address and netmask. 700 */ 701 ire = ire_create_v6( 702 dst_addr, 703 mask, 704 &ipif->ipif_v6src_addr, 705 NULL, 706 &ipif->ipif_mtu, 707 NULL, 708 NULL, 709 stq, 710 ipif->ipif_net_type, 711 ipif, 712 NULL, 713 0, 714 0, 715 flags, 716 &ire_uinfo_null, 717 NULL, 718 NULL, 719 ipst); 720 if (ire == NULL) { 721 if (ipif_refheld) 722 ipif_refrele(ipif); 723 return (ENOMEM); 724 } 725 726 /* 727 * Some software (for example, GateD and Sun Cluster) attempts 728 * to create (what amount to) IRE_PREFIX routes with the 729 * loopback address as the gateway. This is primarily done to 730 * set up prefixes with the RTF_REJECT flag set (for example, 731 * when generating aggregate routes). We also OR in the 732 * RTF_BLACKHOLE flag as these interface routes, by 733 * definition, can only be that. 734 * 735 * If the IRE type (as defined by ipif->ipif_net_type) is 736 * IRE_LOOPBACK, then we map the request into a 737 * IRE_IF_NORESOLVER. 738 * 739 * Needless to say, the real IRE_LOOPBACK is NOT created by this 740 * routine, but rather using ire_create_v6() directly. 741 */ 742 if (ipif->ipif_net_type == IRE_LOOPBACK) { 743 ire->ire_type = IRE_IF_NORESOLVER; 744 ire->ire_flags |= RTF_BLACKHOLE; 745 } 746 error = ire_add(&ire, q, mp, func, B_FALSE); 747 if (error == 0) 748 goto save_ire; 749 /* 750 * In the result of failure, ire_add() will have already 751 * deleted the ire in question, so there is no need to 752 * do that here. 753 */ 754 if (ipif_refheld) 755 ipif_refrele(ipif); 756 return (error); 757 } 758 if (ipif_refheld) { 759 ipif_refrele(ipif); 760 ipif_refheld = B_FALSE; 761 } 762 763 /* 764 * Get an interface IRE for the specified gateway. 765 * If we don't have an IRE_IF_NORESOLVER or IRE_IF_RESOLVER for the 766 * gateway, it is currently unreachable and we fail the request 767 * accordingly. 768 */ 769 ipif = ipif_arg; 770 if (ipif_arg != NULL) 771 match_flags |= MATCH_IRE_ILL; 772 gw_ire = ire_ftable_lookup_v6(gw_addr, 0, 0, IRE_INTERFACE, ipif_arg, 773 NULL, ALL_ZONES, 0, NULL, match_flags, ipst); 774 if (gw_ire == NULL) 775 return (ENETUNREACH); 776 777 /* 778 * We create one of three types of IREs as a result of this request 779 * based on the netmask. A netmask of all ones (which is automatically 780 * assumed when RTF_HOST is set) results in an IRE_HOST being created. 781 * An all zeroes netmask implies a default route so an IRE_DEFAULT is 782 * created. Otherwise, an IRE_PREFIX route is created for the 783 * destination prefix. 784 */ 785 if (IN6_ARE_ADDR_EQUAL(mask, &ipv6_all_ones)) 786 type = IRE_HOST; 787 else if (IN6_IS_ADDR_UNSPECIFIED(mask)) 788 type = IRE_DEFAULT; 789 else 790 type = IRE_PREFIX; 791 792 /* check for a duplicate entry */ 793 ire = ire_ftable_lookup_v6(dst_addr, mask, gw_addr, type, ipif_arg, 794 NULL, ALL_ZONES, 0, NULL, 795 match_flags | MATCH_IRE_MASK | MATCH_IRE_GW, ipst); 796 if (ire != NULL) { 797 ire_refrele(gw_ire); 798 ire_refrele(ire); 799 return (EEXIST); 800 } 801 802 /* Security attribute exists */ 803 if (sp != NULL) { 804 tsol_gcgrp_addr_t ga; 805 806 /* find or create the gateway credentials group */ 807 ga.ga_af = AF_INET6; 808 ga.ga_addr = *gw_addr; 809 810 /* we hold reference to it upon success */ 811 gcgrp = gcgrp_lookup(&ga, B_TRUE); 812 if (gcgrp == NULL) { 813 ire_refrele(gw_ire); 814 return (ENOMEM); 815 } 816 817 /* 818 * Create and add the security attribute to the group; a 819 * reference to the group is made upon allocating a new 820 * entry successfully. If it finds an already-existing 821 * entry for the security attribute in the group, it simply 822 * returns it and no new reference is made to the group. 823 */ 824 gc = gc_create(sp, gcgrp, &gcgrp_xtraref); 825 if (gc == NULL) { 826 /* release reference held by gcgrp_lookup */ 827 GCGRP_REFRELE(gcgrp); 828 ire_refrele(gw_ire); 829 return (ENOMEM); 830 } 831 } 832 833 /* Create the IRE. */ 834 ire = ire_create_v6( 835 dst_addr, /* dest address */ 836 mask, /* mask */ 837 /* src address assigned by the caller? */ 838 (((flags & RTF_SETSRC) && !IN6_IS_ADDR_UNSPECIFIED(src_addr)) ? 839 src_addr : NULL), 840 gw_addr, /* gateway address */ 841 &gw_ire->ire_max_frag, 842 NULL, /* no src nce */ 843 NULL, /* no recv-from queue */ 844 NULL, /* no send-to queue */ 845 (ushort_t)type, /* IRE type */ 846 ipif_arg, 847 NULL, 848 0, 849 0, 850 flags, 851 &gw_ire->ire_uinfo, /* Inherit ULP info from gw */ 852 gc, /* security attribute */ 853 NULL, 854 ipst); 855 856 /* 857 * The ire holds a reference to the 'gc' and the 'gc' holds a 858 * reference to the 'gcgrp'. We can now release the extra reference 859 * the 'gcgrp' acquired in the gcgrp_lookup, if it was not used. 860 */ 861 if (gcgrp_xtraref) 862 GCGRP_REFRELE(gcgrp); 863 if (ire == NULL) { 864 if (gc != NULL) 865 GC_REFRELE(gc); 866 ire_refrele(gw_ire); 867 return (ENOMEM); 868 } 869 870 /* 871 * POLICY: should we allow an RTF_HOST with address INADDR_ANY? 872 * SUN/OS socket stuff does but do we really want to allow ::0 ? 873 */ 874 875 /* Add the new IRE. */ 876 error = ire_add(&ire, q, mp, func, B_FALSE); 877 /* 878 * In the result of failure, ire_add() will have already 879 * deleted the ire in question, so there is no need to 880 * do that here. 881 */ 882 if (error != 0) { 883 ire_refrele(gw_ire); 884 return (error); 885 } 886 887 if (flags & RTF_MULTIRT) { 888 /* 889 * Invoke the CGTP (multirouting) filtering module 890 * to add the dst address in the filtering database. 891 * Replicated inbound packets coming from that address 892 * will be filtered to discard the duplicates. 893 * It is not necessary to call the CGTP filter hook 894 * when the dst address is a multicast, because an 895 * IP source address cannot be a multicast. 896 */ 897 if (ipst->ips_ip_cgtp_filter_ops != NULL && 898 !IN6_IS_ADDR_MULTICAST(&(ire->ire_addr_v6))) { 899 int res; 900 901 res = ipst->ips_ip_cgtp_filter_ops->cfo_add_dest_v6( 902 ipst->ips_netstack->netstack_stackid, 903 &ire->ire_addr_v6, 904 &ire->ire_gateway_addr_v6, 905 &ire->ire_src_addr_v6, 906 &gw_ire->ire_src_addr_v6); 907 if (res != 0) { 908 ire_refrele(gw_ire); 909 ire_delete(ire); 910 return (res); 911 } 912 } 913 } 914 915 /* 916 * Now that the prefix IRE entry has been created, delete any 917 * existing gateway IRE cache entries as well as any IRE caches 918 * using the gateway, and force them to be created through 919 * ip_newroute_v6. 920 */ 921 if (gc != NULL) { 922 ASSERT(gcgrp != NULL); 923 ire_clookup_delete_cache_gw_v6(gw_addr, ALL_ZONES, ipst); 924 } 925 926 save_ire: 927 if (gw_ire != NULL) { 928 ire_refrele(gw_ire); 929 } 930 if (ipif != NULL) { 931 mblk_t *save_mp; 932 933 /* 934 * Save enough information so that we can recreate the IRE if 935 * the interface goes down and then up. The metrics associated 936 * with the route will be saved as well when rts_setmetrics() is 937 * called after the IRE has been created. In the case where 938 * memory cannot be allocated, none of this information will be 939 * saved. 940 */ 941 save_mp = allocb(sizeof (ifrt_t), BPRI_MED); 942 if (save_mp != NULL) { 943 ifrt_t *ifrt; 944 945 save_mp->b_wptr += sizeof (ifrt_t); 946 ifrt = (ifrt_t *)save_mp->b_rptr; 947 bzero(ifrt, sizeof (ifrt_t)); 948 ifrt->ifrt_type = ire->ire_type; 949 ifrt->ifrt_v6addr = ire->ire_addr_v6; 950 mutex_enter(&ire->ire_lock); 951 ifrt->ifrt_v6gateway_addr = ire->ire_gateway_addr_v6; 952 ifrt->ifrt_v6src_addr = ire->ire_src_addr_v6; 953 mutex_exit(&ire->ire_lock); 954 ifrt->ifrt_v6mask = ire->ire_mask_v6; 955 ifrt->ifrt_flags = ire->ire_flags; 956 ifrt->ifrt_max_frag = ire->ire_max_frag; 957 mutex_enter(&ipif->ipif_saved_ire_lock); 958 save_mp->b_cont = ipif->ipif_saved_ire_mp; 959 ipif->ipif_saved_ire_mp = save_mp; 960 ipif->ipif_saved_ire_cnt++; 961 mutex_exit(&ipif->ipif_saved_ire_lock); 962 } 963 } 964 if (ire_arg != NULL) { 965 /* 966 * Store the ire that was successfully added into where ire_arg 967 * points to so that callers don't have to look it up 968 * themselves (but they are responsible for ire_refrele()ing 969 * the ire when they are finished with it). 970 */ 971 *ire_arg = ire; 972 } else { 973 ire_refrele(ire); /* Held in ire_add */ 974 } 975 if (ipif_refheld) 976 ipif_refrele(ipif); 977 return (0); 978 } 979 980 /* 981 * ip_rt_delete_v6 is called to delete an IPv6 route. 982 * ipif_arg is passed in to associate it with the correct interface 983 * (for link-local destinations and gateways). 984 */ 985 /* ARGSUSED4 */ 986 int 987 ip_rt_delete_v6(const in6_addr_t *dst_addr, const in6_addr_t *mask, 988 const in6_addr_t *gw_addr, uint_t rtm_addrs, int flags, ipif_t *ipif_arg, 989 queue_t *q, mblk_t *mp, ipsq_func_t func, ip_stack_t *ipst) 990 { 991 ire_t *ire = NULL; 992 ipif_t *ipif; 993 uint_t type; 994 uint_t match_flags = MATCH_IRE_TYPE; 995 int err = 0; 996 boolean_t ipif_refheld = B_FALSE; 997 998 /* 999 * If this is the case of RTF_HOST being set, then we set the netmask 1000 * to all ones. Otherwise, we use the netmask if one was supplied. 1001 */ 1002 if (flags & RTF_HOST) { 1003 mask = &ipv6_all_ones; 1004 match_flags |= MATCH_IRE_MASK; 1005 } else if (rtm_addrs & RTA_NETMASK) { 1006 match_flags |= MATCH_IRE_MASK; 1007 } 1008 1009 /* 1010 * Note that RTF_GATEWAY is never set on a delete, therefore 1011 * we check if the gateway address is one of our interfaces first, 1012 * and fall back on RTF_GATEWAY routes. 1013 * 1014 * This makes it possible to delete an original 1015 * IRE_IF_NORESOLVER/IRE_IF_RESOLVER - consistent with SunOS 4.1. 1016 * 1017 * As the interface index specified with the RTA_IFP sockaddr is the 1018 * same for all ipif's off of an ill, the matching logic below uses 1019 * MATCH_IRE_ILL if such an index was specified. This means a route 1020 * sharing the same prefix and interface index as the the route 1021 * intended to be deleted might be deleted instead if a RTA_IFP sockaddr 1022 * is specified in the request. 1023 * 1024 * On the other hand, since the gateway address will usually be 1025 * different for each ipif on the system, the matching logic 1026 * uses MATCH_IRE_IPIF in the case of a traditional interface 1027 * route. This means that interface routes for the same prefix can be 1028 * uniquely identified if they belong to distinct ipif's and if a 1029 * RTA_IFP sockaddr is not present. 1030 * 1031 * For more detail on specifying routes by gateway address and by 1032 * interface index, see the comments in ip_rt_add_v6(). 1033 */ 1034 ipif = ipif_lookup_interface_v6(gw_addr, dst_addr, q, mp, func, &err, 1035 ipst); 1036 if (ipif != NULL) { 1037 ipif_refheld = B_TRUE; 1038 if (ipif_arg != NULL) { 1039 ipif_refrele(ipif); 1040 ipif_refheld = B_FALSE; 1041 ipif = ipif_arg; 1042 match_flags |= MATCH_IRE_ILL; 1043 } else { 1044 match_flags |= MATCH_IRE_IPIF; 1045 } 1046 1047 if (ipif->ipif_ire_type == IRE_LOOPBACK) 1048 ire = ire_ctable_lookup_v6(dst_addr, 0, IRE_LOOPBACK, 1049 ipif, ALL_ZONES, NULL, match_flags, ipst); 1050 if (ire == NULL) 1051 ire = ire_ftable_lookup_v6(dst_addr, mask, 0, 1052 IRE_INTERFACE, ipif, NULL, ALL_ZONES, 0, NULL, 1053 match_flags, ipst); 1054 } else if (err == EINPROGRESS) { 1055 return (err); 1056 } else { 1057 err = 0; 1058 } 1059 if (ire == NULL) { 1060 /* 1061 * At this point, the gateway address is not one of our own 1062 * addresses or a matching interface route was not found. We 1063 * set the IRE type to lookup based on whether 1064 * this is a host route, a default route or just a prefix. 1065 * 1066 * If an ipif_arg was passed in, then the lookup is based on an 1067 * interface index so MATCH_IRE_ILL is added to match_flags. 1068 * In any case, MATCH_IRE_IPIF is cleared and MATCH_IRE_GW is 1069 * set as the route being looked up is not a traditional 1070 * interface route. 1071 */ 1072 match_flags &= ~MATCH_IRE_IPIF; 1073 match_flags |= MATCH_IRE_GW; 1074 if (ipif_arg != NULL) 1075 match_flags |= MATCH_IRE_ILL; 1076 if (IN6_ARE_ADDR_EQUAL(mask, &ipv6_all_ones)) 1077 type = IRE_HOST; 1078 else if (IN6_IS_ADDR_UNSPECIFIED(mask)) 1079 type = IRE_DEFAULT; 1080 else 1081 type = IRE_PREFIX; 1082 ire = ire_ftable_lookup_v6(dst_addr, mask, gw_addr, type, 1083 ipif_arg, NULL, ALL_ZONES, 0, NULL, match_flags, ipst); 1084 } 1085 1086 if (ipif_refheld) { 1087 ipif_refrele(ipif); 1088 ipif_refheld = B_FALSE; 1089 } 1090 if (ire == NULL) 1091 return (ESRCH); 1092 1093 if (ire->ire_flags & RTF_MULTIRT) { 1094 /* 1095 * Invoke the CGTP (multirouting) filtering module 1096 * to remove the dst address from the filtering database. 1097 * Packets coming from that address will no longer be 1098 * filtered to remove duplicates. 1099 */ 1100 if (ipst->ips_ip_cgtp_filter_ops != NULL) { 1101 err = ipst->ips_ip_cgtp_filter_ops->cfo_del_dest_v6( 1102 ipst->ips_netstack->netstack_stackid, 1103 &ire->ire_addr_v6, &ire->ire_gateway_addr_v6); 1104 } 1105 } 1106 1107 ipif = ire->ire_ipif; 1108 if (ipif != NULL) { 1109 mblk_t **mpp; 1110 mblk_t *mp; 1111 ifrt_t *ifrt; 1112 in6_addr_t gw_addr_v6; 1113 1114 /* Remove from ipif_saved_ire_mp list if it is there */ 1115 mutex_enter(&ire->ire_lock); 1116 gw_addr_v6 = ire->ire_gateway_addr_v6; 1117 mutex_exit(&ire->ire_lock); 1118 mutex_enter(&ipif->ipif_saved_ire_lock); 1119 for (mpp = &ipif->ipif_saved_ire_mp; *mpp != NULL; 1120 mpp = &(*mpp)->b_cont) { 1121 /* 1122 * On a given ipif, the triple of address, gateway and 1123 * mask is unique for each saved IRE (in the case of 1124 * ordinary interface routes, the gateway address is 1125 * all-zeroes). 1126 */ 1127 mp = *mpp; 1128 ifrt = (ifrt_t *)mp->b_rptr; 1129 if (IN6_ARE_ADDR_EQUAL(&ifrt->ifrt_v6addr, 1130 &ire->ire_addr_v6) && 1131 IN6_ARE_ADDR_EQUAL(&ifrt->ifrt_v6gateway_addr, 1132 &gw_addr_v6) && 1133 IN6_ARE_ADDR_EQUAL(&ifrt->ifrt_v6mask, 1134 &ire->ire_mask_v6)) { 1135 *mpp = mp->b_cont; 1136 ipif->ipif_saved_ire_cnt--; 1137 freeb(mp); 1138 break; 1139 } 1140 } 1141 mutex_exit(&ipif->ipif_saved_ire_lock); 1142 } 1143 ire_delete(ire); 1144 ire_refrele(ire); 1145 return (err); 1146 } 1147 1148 /* 1149 * Derive a token from the link layer address. 1150 */ 1151 boolean_t 1152 ill_setdefaulttoken(ill_t *ill) 1153 { 1154 int i; 1155 in6_addr_t v6addr, v6mask; 1156 1157 if (!MEDIA_V6INTFID(ill->ill_media, ill, &v6addr)) 1158 return (B_FALSE); 1159 1160 (void) ip_plen_to_mask_v6(IPV6_TOKEN_LEN, &v6mask); 1161 1162 for (i = 0; i < 4; i++) 1163 v6mask.s6_addr32[i] = v6mask.s6_addr32[i] ^ 1164 (uint32_t)0xffffffff; 1165 1166 V6_MASK_COPY(v6addr, v6mask, ill->ill_token); 1167 ill->ill_token_length = IPV6_TOKEN_LEN; 1168 return (B_TRUE); 1169 } 1170 1171 /* 1172 * Create a link-local address from a token. 1173 */ 1174 static void 1175 ipif_get_linklocal(in6_addr_t *dest, const in6_addr_t *token) 1176 { 1177 int i; 1178 1179 for (i = 0; i < 4; i++) { 1180 dest->s6_addr32[i] = 1181 token->s6_addr32[i] | ipv6_ll_template.s6_addr32[i]; 1182 } 1183 } 1184 1185 /* 1186 * Set a nice default address for either automatic tunnels tsrc/96 or 1187 * 6to4 tunnels 2002:<tsrc>::1/64 1188 */ 1189 static void 1190 ipif_set_tun_auto_addr(ipif_t *ipif, struct iftun_req *ta) 1191 { 1192 sin6_t sin6; 1193 sin_t *sin; 1194 ill_t *ill = ipif->ipif_ill; 1195 tun_t *tp = (tun_t *)ill->ill_wq->q_next->q_ptr; 1196 1197 if (ta->ifta_saddr.ss_family != AF_INET || 1198 (ipif->ipif_flags & IPIF_UP) || !ipif->ipif_isv6 || 1199 (ta->ifta_flags & IFTUN_SRC) == 0) 1200 return; 1201 1202 /* 1203 * Check the tunnel type by examining q_next->q_ptr 1204 */ 1205 if (tp->tun_flags & TUN_AUTOMATIC) { 1206 /* this is an automatic tunnel */ 1207 (void) ip_plen_to_mask_v6(IPV6_ABITS - IP_ABITS, 1208 &ipif->ipif_v6net_mask); 1209 bzero(&sin6, sizeof (sin6_t)); 1210 sin = (sin_t *)&ta->ifta_saddr; 1211 V4_PART_OF_V6(sin6.sin6_addr) = sin->sin_addr.s_addr; 1212 sin6.sin6_family = AF_INET6; 1213 (void) ip_sioctl_addr(ipif, (sin_t *)&sin6, 1214 NULL, NULL, NULL, NULL); 1215 } else if (tp->tun_flags & TUN_6TO4) { 1216 /* this is a 6to4 tunnel */ 1217 (void) ip_plen_to_mask_v6(IPV6_PREFIX_LEN, 1218 &ipif->ipif_v6net_mask); 1219 sin = (sin_t *)&ta->ifta_saddr; 1220 /* create a 6to4 address from the IPv4 tsrc */ 1221 IN6_V4ADDR_TO_6TO4(&sin->sin_addr, &sin6.sin6_addr); 1222 sin6.sin6_family = AF_INET6; 1223 (void) ip_sioctl_addr(ipif, (sin_t *)&sin6, 1224 NULL, NULL, NULL, NULL); 1225 } else { 1226 ip1dbg(("ipif_set_tun_auto_addr: Unknown tunnel type")); 1227 return; 1228 } 1229 } 1230 1231 /* 1232 * Set link local for ipif_id 0 of a configured tunnel based on the 1233 * tsrc or tdst parameter 1234 * For tunnels over IPv4 use the IPv4 address prepended with 32 zeros as 1235 * the token. 1236 * For tunnels over IPv6 use the low-order 64 bits of the "inner" IPv6 address 1237 * as the token for the "outer" link. 1238 */ 1239 void 1240 ipif_set_tun_llink(ill_t *ill, struct iftun_req *ta) 1241 { 1242 ipif_t *ipif; 1243 sin_t *sin; 1244 in6_addr_t *s6addr; 1245 1246 ASSERT(IAM_WRITER_ILL(ill)); 1247 1248 /* The first ipif must be id zero. */ 1249 ipif = ill->ill_ipif; 1250 ASSERT(ipif->ipif_id == 0); 1251 1252 /* no link local for automatic tunnels */ 1253 if (!(ipif->ipif_flags & IPIF_POINTOPOINT)) { 1254 ipif_set_tun_auto_addr(ipif, ta); 1255 return; 1256 } 1257 1258 if ((ta->ifta_flags & IFTUN_DST) && 1259 IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6pp_dst_addr)) { 1260 sin6_t sin6; 1261 1262 ASSERT(!(ipif->ipif_flags & IPIF_UP)); 1263 bzero(&sin6, sizeof (sin6_t)); 1264 if ((ta->ifta_saddr.ss_family == AF_INET)) { 1265 sin = (sin_t *)&ta->ifta_daddr; 1266 V4_PART_OF_V6(sin6.sin6_addr) = 1267 sin->sin_addr.s_addr; 1268 } else { 1269 s6addr = 1270 &((sin6_t *)&ta->ifta_daddr)->sin6_addr; 1271 sin6.sin6_addr.s6_addr32[3] = s6addr->s6_addr32[3]; 1272 sin6.sin6_addr.s6_addr32[2] = s6addr->s6_addr32[2]; 1273 } 1274 ipif_get_linklocal(&ipif->ipif_v6pp_dst_addr, 1275 &sin6.sin6_addr); 1276 ipif->ipif_v6subnet = ipif->ipif_v6pp_dst_addr; 1277 } 1278 if ((ta->ifta_flags & IFTUN_SRC)) { 1279 ASSERT(!(ipif->ipif_flags & IPIF_UP)); 1280 1281 /* Set the token if it isn't already set */ 1282 if (IN6_IS_ADDR_UNSPECIFIED(&ill->ill_token)) { 1283 if ((ta->ifta_saddr.ss_family == AF_INET)) { 1284 sin = (sin_t *)&ta->ifta_saddr; 1285 V4_PART_OF_V6(ill->ill_token) = 1286 sin->sin_addr.s_addr; 1287 } else { 1288 s6addr = 1289 &((sin6_t *)&ta->ifta_saddr)->sin6_addr; 1290 ill->ill_token.s6_addr32[3] = 1291 s6addr->s6_addr32[3]; 1292 ill->ill_token.s6_addr32[2] = 1293 s6addr->s6_addr32[2]; 1294 } 1295 ill->ill_token_length = IPV6_TOKEN_LEN; 1296 } 1297 /* 1298 * Attempt to set the link local address if it isn't set. 1299 */ 1300 if (IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6lcl_addr)) 1301 (void) ipif_setlinklocal(ipif); 1302 } 1303 } 1304 1305 /* 1306 * Is it not possible to set the link local address? 1307 * The address can be set if the token is set, and the token 1308 * isn't too long. 1309 * Return B_TRUE if the address can't be set, or B_FALSE if it can. 1310 */ 1311 boolean_t 1312 ipif_cant_setlinklocal(ipif_t *ipif) 1313 { 1314 ill_t *ill = ipif->ipif_ill; 1315 1316 if (IN6_IS_ADDR_UNSPECIFIED(&ill->ill_token) || 1317 ill->ill_token_length > IPV6_ABITS - IPV6_LL_PREFIXLEN) 1318 return (B_TRUE); 1319 1320 return (B_FALSE); 1321 } 1322 1323 /* 1324 * Generate a link-local address from the token. 1325 * Return zero if the address was set, or non-zero if it couldn't be set. 1326 */ 1327 int 1328 ipif_setlinklocal(ipif_t *ipif) 1329 { 1330 ill_t *ill = ipif->ipif_ill; 1331 in6_addr_t ov6addr; 1332 1333 ASSERT(IAM_WRITER_ILL(ill)); 1334 1335 if (ipif_cant_setlinklocal(ipif)) 1336 return (-1); 1337 1338 ov6addr = ipif->ipif_v6lcl_addr; 1339 ipif_get_linklocal(&ipif->ipif_v6lcl_addr, &ill->ill_token); 1340 sctp_update_ipif_addr(ipif, ov6addr); 1341 (void) ip_plen_to_mask_v6(IPV6_LL_PREFIXLEN, &ipif->ipif_v6net_mask); 1342 V6_MASK_COPY(ipif->ipif_v6lcl_addr, ipif->ipif_v6net_mask, 1343 ipif->ipif_v6subnet); 1344 1345 if (ipif->ipif_flags & IPIF_NOLOCAL) { 1346 ipif->ipif_v6src_addr = ipv6_all_zeros; 1347 } else { 1348 ipif->ipif_v6src_addr = ipif->ipif_v6lcl_addr; 1349 } 1350 return (0); 1351 } 1352 1353 /* 1354 * This function sets up the multicast mappings in NDP. 1355 * Unlike ARP, there are no mapping_mps here. We delete the 1356 * mapping nces and add a new one. 1357 * 1358 * Returns non-zero on error and 0 on success. 1359 */ 1360 int 1361 ipif_ndp_setup_multicast(ipif_t *ipif, nce_t **ret_nce) 1362 { 1363 ill_t *ill = ipif->ipif_ill; 1364 in6_addr_t v6_mcast_addr = {(uint32_t)V6_MCAST, 0, 0, 0}; 1365 in6_addr_t v6_mcast_mask = {(uint32_t)V6_MCAST, 0, 0, 0}; 1366 in6_addr_t v6_extract_mask; 1367 uchar_t *phys_addr, *bphys_addr, *alloc_phys; 1368 nce_t *mnce = NULL; 1369 int err = 0; 1370 phyint_t *phyi = ill->ill_phyint; 1371 uint32_t hw_extract_start; 1372 dl_unitdata_req_t *dlur; 1373 ip_stack_t *ipst = ill->ill_ipst; 1374 1375 if (ret_nce != NULL) 1376 *ret_nce = NULL; 1377 1378 /* 1379 * IPMP meta-interfaces don't have any inherent multicast mappings, 1380 * and instead use the ones on the underlying interfaces. 1381 */ 1382 if (IS_IPMP(ill)) 1383 return (0); 1384 1385 /* 1386 * Delete the mapping nce. Normally these should not exist 1387 * as a previous ipif_down -> ipif_ndp_down should have deleted 1388 * all the nces. But they can exist if ip_rput_dlpi_writer 1389 * calls this when PHYI_MULTI_BCAST is set. Mappings are always 1390 * tied to the underlying ill, so don't match across the illgrp. 1391 */ 1392 mnce = ndp_lookup_v6(ill, B_FALSE, &v6_mcast_addr, B_FALSE); 1393 if (mnce != NULL) { 1394 ndp_delete(mnce); 1395 NCE_REFRELE(mnce); 1396 mnce = NULL; 1397 } 1398 1399 /* 1400 * Get media specific v6 mapping information. Note that 1401 * nd_lla_len can be 0 for tunnels. 1402 */ 1403 alloc_phys = kmem_alloc(ill->ill_nd_lla_len, KM_NOSLEEP); 1404 if ((alloc_phys == NULL) && (ill->ill_nd_lla_len != 0)) 1405 return (ENOMEM); 1406 /* 1407 * Determine the broadcast address. 1408 */ 1409 dlur = (dl_unitdata_req_t *)ill->ill_bcast_mp->b_rptr; 1410 if (ill->ill_sap_length < 0) 1411 bphys_addr = (uchar_t *)dlur + dlur->dl_dest_addr_offset; 1412 else 1413 bphys_addr = (uchar_t *)dlur + 1414 dlur->dl_dest_addr_offset + ill->ill_sap_length; 1415 1416 /* 1417 * Check PHYI_MULTI_BCAST and possible length of physical 1418 * address to determine if we use the mapping or the 1419 * broadcast address. 1420 */ 1421 if ((phyi->phyint_flags & PHYI_MULTI_BCAST) || 1422 (!MEDIA_V6MINFO(ill->ill_media, ill->ill_nd_lla_len, 1423 bphys_addr, alloc_phys, &hw_extract_start, 1424 &v6_extract_mask))) { 1425 if (ill->ill_phys_addr_length > IP_MAX_HW_LEN) { 1426 kmem_free(alloc_phys, ill->ill_nd_lla_len); 1427 return (E2BIG); 1428 } 1429 /* Use the link-layer broadcast address for MULTI_BCAST */ 1430 phys_addr = bphys_addr; 1431 bzero(&v6_extract_mask, sizeof (v6_extract_mask)); 1432 hw_extract_start = ill->ill_nd_lla_len; 1433 } else { 1434 phys_addr = alloc_phys; 1435 } 1436 if ((ipif->ipif_flags & IPIF_BROADCAST) || 1437 (ill->ill_flags & ILLF_MULTICAST) || 1438 (phyi->phyint_flags & PHYI_MULTI_BCAST)) { 1439 mutex_enter(&ipst->ips_ndp6->ndp_g_lock); 1440 err = ndp_add_v6(ill, 1441 phys_addr, 1442 &v6_mcast_addr, /* v6 address */ 1443 &v6_mcast_mask, /* v6 mask */ 1444 &v6_extract_mask, 1445 hw_extract_start, 1446 NCE_F_MAPPING | NCE_F_PERMANENT | NCE_F_NONUD, 1447 ND_REACHABLE, 1448 &mnce); 1449 mutex_exit(&ipst->ips_ndp6->ndp_g_lock); 1450 if (err == 0) { 1451 if (ret_nce != NULL) { 1452 *ret_nce = mnce; 1453 } else { 1454 NCE_REFRELE(mnce); 1455 } 1456 } 1457 } 1458 kmem_free(alloc_phys, ill->ill_nd_lla_len); 1459 return (err); 1460 } 1461 1462 /* 1463 * Get the resolver set up for a new ipif. (Always called as writer.) 1464 */ 1465 int 1466 ipif_ndp_up(ipif_t *ipif, boolean_t initial) 1467 { 1468 ill_t *ill = ipif->ipif_ill; 1469 int err = 0; 1470 nce_t *nce = NULL; 1471 nce_t *mnce = NULL; 1472 boolean_t added_ipif = B_FALSE; 1473 1474 ASSERT(IAM_WRITER_ILL(ill)); 1475 ip1dbg(("ipif_ndp_up(%s:%u)\n", ill->ill_name, ipif->ipif_id)); 1476 1477 /* 1478 * ND not supported on XRESOLV interfaces. If ND support (multicast) 1479 * added later, take out this check. 1480 */ 1481 if ((ill->ill_flags & ILLF_XRESOLV) || 1482 IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6lcl_addr) || 1483 (!(ill->ill_net_type & IRE_INTERFACE))) { 1484 ipif->ipif_addr_ready = 1; 1485 return (0); 1486 } 1487 1488 /* 1489 * Need to setup multicast mapping only when the first 1490 * interface is coming UP. 1491 */ 1492 if (ill->ill_ipif_up_count == 0 && 1493 (ill->ill_flags & ILLF_MULTICAST)) { 1494 /* 1495 * We set the multicast before setting up the mapping for 1496 * local address because ipif_ndp_setup_multicast does 1497 * ndp_walk to delete nces which will delete the mapping 1498 * for local address also if we added the mapping for 1499 * local address first. 1500 */ 1501 err = ipif_ndp_setup_multicast(ipif, &mnce); 1502 if (err != 0) 1503 return (err); 1504 } 1505 1506 if ((ipif->ipif_flags & (IPIF_UNNUMBERED|IPIF_NOLOCAL)) == 0) { 1507 uint16_t flags; 1508 uint16_t state; 1509 uchar_t *hw_addr = NULL; 1510 ill_t *bound_ill; 1511 ipmp_illgrp_t *illg = ill->ill_grp; 1512 1513 /* Permanent entries don't need NUD */ 1514 flags = NCE_F_PERMANENT | NCE_F_NONUD; 1515 if (ill->ill_flags & ILLF_ROUTER) 1516 flags |= NCE_F_ISROUTER; 1517 1518 if (ipif->ipif_flags & IPIF_ANYCAST) 1519 flags |= NCE_F_ANYCAST; 1520 1521 if (IS_IPMP(ill)) { 1522 ASSERT(ill->ill_net_type == IRE_IF_RESOLVER); 1523 /* 1524 * If we're here via ipif_up(), then the ipif won't be 1525 * bound yet -- add it to the group, which will bind 1526 * it if possible. (We would add it in ipif_up(), but 1527 * deleting on failure there is gruesome.) If we're 1528 * here via ipmp_ill_bind_ipif(), then the ipif has 1529 * already been added to the group and we just need to 1530 * use the binding. 1531 */ 1532 if ((bound_ill = ipmp_ipif_bound_ill(ipif)) == NULL) { 1533 bound_ill = ipmp_illgrp_add_ipif(illg, ipif); 1534 if (bound_ill == NULL) { 1535 /* 1536 * We couldn't bind the ipif to an ill 1537 * yet, so we have nothing to publish. 1538 * Set ipif_addr_ready so that this 1539 * address can be used locally for now. 1540 * The routing socket message will be 1541 * sent from ipif_up_done_v6(). 1542 */ 1543 ipif->ipif_addr_ready = 1; 1544 return (0); 1545 } 1546 added_ipif = B_TRUE; 1547 } 1548 hw_addr = bound_ill->ill_nd_lla; 1549 } else { 1550 bound_ill = ill; 1551 if (ill->ill_net_type == IRE_IF_RESOLVER) 1552 hw_addr = ill->ill_nd_lla; 1553 } 1554 1555 /* 1556 * If this is an initial bring-up (or the ipif was never 1557 * completely brought up), do DAD. Otherwise, we're here 1558 * because IPMP has rebound an address to this ill: send 1559 * unsolicited advertisements to inform others. 1560 */ 1561 if (initial || !ipif->ipif_addr_ready) { 1562 state = ND_PROBE; 1563 } else { 1564 state = ND_REACHABLE; 1565 flags |= NCE_F_UNSOL_ADV; 1566 } 1567 /* 1568 * NOTE: for IPMP, local addresses are always associated with 1569 * the ill they're bound to, so don't match across the illgrp. 1570 */ 1571 err = ndp_lookup_then_add_v6(bound_ill, 1572 B_FALSE, 1573 hw_addr, 1574 &ipif->ipif_v6lcl_addr, 1575 &ipv6_all_ones, 1576 &ipv6_all_zeros, 1577 0, 1578 flags, 1579 state, 1580 &nce); 1581 switch (err) { 1582 case 0: 1583 ip1dbg(("ipif_ndp_up: NCE created for %s\n", 1584 ill->ill_name)); 1585 ipif->ipif_addr_ready = 1; 1586 break; 1587 case EINPROGRESS: 1588 ip1dbg(("ipif_ndp_up: running DAD now for %s\n", 1589 ill->ill_name)); 1590 break; 1591 case EEXIST: 1592 NCE_REFRELE(nce); 1593 ip1dbg(("ipif_ndp_up: NCE already exists for %s\n", 1594 ill->ill_name)); 1595 goto fail; 1596 default: 1597 ip1dbg(("ipif_ndp_up: NCE creation failed for %s\n", 1598 ill->ill_name)); 1599 goto fail; 1600 } 1601 } else { 1602 /* No local NCE for this entry */ 1603 ipif->ipif_addr_ready = 1; 1604 } 1605 if (nce != NULL) 1606 NCE_REFRELE(nce); 1607 if (mnce != NULL) 1608 NCE_REFRELE(mnce); 1609 return (0); 1610 fail: 1611 if (mnce != NULL) { 1612 ndp_delete(mnce); 1613 NCE_REFRELE(mnce); 1614 } 1615 if (added_ipif) 1616 ipmp_illgrp_del_ipif(ill->ill_grp, ipif); 1617 1618 return (err); 1619 } 1620 1621 /* Remove all cache entries for this logical interface */ 1622 void 1623 ipif_ndp_down(ipif_t *ipif) 1624 { 1625 nce_t *nce; 1626 ill_t *ill = ipif->ipif_ill; 1627 1628 ASSERT(IAM_WRITER_ILL(ill)); 1629 1630 if (ipif->ipif_isv6) { 1631 ill_t *bound_ill; 1632 1633 if (IS_IPMP(ill)) 1634 bound_ill = ipmp_ipif_bound_ill(ipif); 1635 else 1636 bound_ill = ill; 1637 1638 if (bound_ill != NULL) { 1639 nce = ndp_lookup_v6(bound_ill, 1640 B_FALSE, /* see comment in ipif_ndp_up() */ 1641 &ipif->ipif_v6lcl_addr, 1642 B_FALSE); 1643 if (nce != NULL) { 1644 ndp_delete(nce); 1645 NCE_REFRELE(nce); 1646 } 1647 } 1648 1649 /* 1650 * Make IPMP aware of the deleted data address. 1651 */ 1652 if (IS_IPMP(ill)) 1653 ipmp_illgrp_del_ipif(ill->ill_grp, ipif); 1654 } 1655 1656 /* 1657 * Remove mapping and all other nces dependent on this ill 1658 * when the last ipif is going away. 1659 */ 1660 if (ill->ill_ipif_up_count == 0) 1661 ndp_walk(ill, (pfi_t)ndp_delete_per_ill, ill, ill->ill_ipst); 1662 } 1663 1664 /* 1665 * Used when an interface comes up to recreate any extra routes on this 1666 * interface. 1667 */ 1668 static ire_t ** 1669 ipif_recover_ire_v6(ipif_t *ipif) 1670 { 1671 mblk_t *mp; 1672 ire_t **ipif_saved_irep; 1673 ire_t **irep; 1674 ip_stack_t *ipst = ipif->ipif_ill->ill_ipst; 1675 1676 ip1dbg(("ipif_recover_ire_v6(%s:%u)", ipif->ipif_ill->ill_name, 1677 ipif->ipif_id)); 1678 1679 ASSERT(ipif->ipif_isv6); 1680 1681 mutex_enter(&ipif->ipif_saved_ire_lock); 1682 ipif_saved_irep = (ire_t **)kmem_zalloc(sizeof (ire_t *) * 1683 ipif->ipif_saved_ire_cnt, KM_NOSLEEP); 1684 if (ipif_saved_irep == NULL) { 1685 mutex_exit(&ipif->ipif_saved_ire_lock); 1686 return (NULL); 1687 } 1688 1689 irep = ipif_saved_irep; 1690 1691 for (mp = ipif->ipif_saved_ire_mp; mp != NULL; mp = mp->b_cont) { 1692 ire_t *ire; 1693 queue_t *rfq; 1694 queue_t *stq; 1695 ifrt_t *ifrt; 1696 in6_addr_t *src_addr; 1697 in6_addr_t *gateway_addr; 1698 char buf[INET6_ADDRSTRLEN]; 1699 ushort_t type; 1700 1701 /* 1702 * When the ire was initially created and then added in 1703 * ip_rt_add_v6(), it was created either using 1704 * ipif->ipif_net_type in the case of a traditional interface 1705 * route, or as one of the IRE_OFFSUBNET types (with the 1706 * exception of IRE_HOST type redirect ire which is created by 1707 * icmp_redirect_v6() and which we don't need to save or 1708 * recover). In the case where ipif->ipif_net_type was 1709 * IRE_LOOPBACK, ip_rt_add_v6() will update the ire_type to 1710 * IRE_IF_NORESOLVER before calling ire_add_v6() to satisfy 1711 * software like GateD and Sun Cluster which creates routes 1712 * using the the loopback interface's address as a gateway. 1713 * 1714 * As ifrt->ifrt_type reflects the already updated ire_type, 1715 * ire_create_v6() will be called in the same way here as in 1716 * ip_rt_add_v6(), namely using ipif->ipif_net_type when the 1717 * route looks like a traditional interface route (where 1718 * ifrt->ifrt_type & IRE_INTERFACE is true) and otherwise 1719 * using the saved ifrt->ifrt_type. This means that in 1720 * the case where ipif->ipif_net_type is IRE_LOOPBACK, 1721 * the ire created by ire_create_v6() will be an IRE_LOOPBACK, 1722 * it will then be turned into an IRE_IF_NORESOLVER and then 1723 * added by ire_add_v6(). 1724 */ 1725 ifrt = (ifrt_t *)mp->b_rptr; 1726 if (ifrt->ifrt_type & IRE_INTERFACE) { 1727 rfq = NULL; 1728 stq = (ipif->ipif_net_type == IRE_IF_RESOLVER) 1729 ? ipif->ipif_rq : ipif->ipif_wq; 1730 src_addr = (ifrt->ifrt_flags & RTF_SETSRC) 1731 ? &ifrt->ifrt_v6src_addr 1732 : &ipif->ipif_v6src_addr; 1733 gateway_addr = NULL; 1734 type = ipif->ipif_net_type; 1735 } else { 1736 rfq = NULL; 1737 stq = NULL; 1738 src_addr = (ifrt->ifrt_flags & RTF_SETSRC) 1739 ? &ifrt->ifrt_v6src_addr : NULL; 1740 gateway_addr = &ifrt->ifrt_v6gateway_addr; 1741 type = ifrt->ifrt_type; 1742 } 1743 1744 /* 1745 * Create a copy of the IRE with the saved address and netmask. 1746 */ 1747 ip1dbg(("ipif_recover_ire_v6: creating IRE %s (%d) for %s/%d\n", 1748 ip_nv_lookup(ire_nv_tbl, ifrt->ifrt_type), ifrt->ifrt_type, 1749 inet_ntop(AF_INET6, &ifrt->ifrt_v6addr, buf, sizeof (buf)), 1750 ip_mask_to_plen_v6(&ifrt->ifrt_v6mask))); 1751 ire = ire_create_v6( 1752 &ifrt->ifrt_v6addr, 1753 &ifrt->ifrt_v6mask, 1754 src_addr, 1755 gateway_addr, 1756 &ifrt->ifrt_max_frag, 1757 NULL, 1758 rfq, 1759 stq, 1760 type, 1761 ipif, 1762 NULL, 1763 0, 1764 0, 1765 ifrt->ifrt_flags, 1766 &ifrt->ifrt_iulp_info, 1767 NULL, 1768 NULL, 1769 ipst); 1770 if (ire == NULL) { 1771 mutex_exit(&ipif->ipif_saved_ire_lock); 1772 kmem_free(ipif_saved_irep, 1773 ipif->ipif_saved_ire_cnt * sizeof (ire_t *)); 1774 return (NULL); 1775 } 1776 1777 /* 1778 * Some software (for example, GateD and Sun Cluster) attempts 1779 * to create (what amount to) IRE_PREFIX routes with the 1780 * loopback address as the gateway. This is primarily done to 1781 * set up prefixes with the RTF_REJECT flag set (for example, 1782 * when generating aggregate routes.) 1783 * 1784 * If the IRE type (as defined by ipif->ipif_net_type) is 1785 * IRE_LOOPBACK, then we map the request into a 1786 * IRE_IF_NORESOLVER. 1787 */ 1788 if (ipif->ipif_net_type == IRE_LOOPBACK) 1789 ire->ire_type = IRE_IF_NORESOLVER; 1790 /* 1791 * ire held by ire_add, will be refreled' in ipif_up_done 1792 * towards the end 1793 */ 1794 (void) ire_add(&ire, NULL, NULL, NULL, B_FALSE); 1795 *irep = ire; 1796 irep++; 1797 ip1dbg(("ipif_recover_ire_v6: added ire %p\n", (void *)ire)); 1798 } 1799 mutex_exit(&ipif->ipif_saved_ire_lock); 1800 return (ipif_saved_irep); 1801 } 1802 1803 /* 1804 * Return the scope of the given IPv6 address. If the address is an 1805 * IPv4 mapped IPv6 address, return the scope of the corresponding 1806 * IPv4 address. 1807 */ 1808 in6addr_scope_t 1809 ip_addr_scope_v6(const in6_addr_t *addr) 1810 { 1811 static in6_addr_t ipv6loopback = IN6ADDR_LOOPBACK_INIT; 1812 1813 if (IN6_IS_ADDR_V4MAPPED(addr)) { 1814 in_addr_t v4addr_h = ntohl(V4_PART_OF_V6((*addr))); 1815 if ((v4addr_h >> IN_CLASSA_NSHIFT) == IN_LOOPBACKNET || 1816 (v4addr_h & IN_AUTOCONF_MASK) == IN_AUTOCONF_NET) 1817 return (IP6_SCOPE_LINKLOCAL); 1818 if ((v4addr_h & IN_PRIVATE8_MASK) == IN_PRIVATE8_NET || 1819 (v4addr_h & IN_PRIVATE12_MASK) == IN_PRIVATE12_NET || 1820 (v4addr_h & IN_PRIVATE16_MASK) == IN_PRIVATE16_NET) 1821 return (IP6_SCOPE_SITELOCAL); 1822 return (IP6_SCOPE_GLOBAL); 1823 } 1824 1825 if (IN6_IS_ADDR_MULTICAST(addr)) 1826 return (IN6_ADDR_MC_SCOPE(addr)); 1827 1828 /* link-local and loopback addresses are of link-local scope */ 1829 if (IN6_IS_ADDR_LINKLOCAL(addr) || 1830 IN6_ARE_ADDR_EQUAL(addr, &ipv6loopback)) 1831 return (IP6_SCOPE_LINKLOCAL); 1832 if (IN6_IS_ADDR_SITELOCAL(addr)) 1833 return (IP6_SCOPE_SITELOCAL); 1834 return (IP6_SCOPE_GLOBAL); 1835 } 1836 1837 1838 /* 1839 * Returns the length of the common prefix of a1 and a2, as per 1840 * CommonPrefixLen() defined in RFC 3484. 1841 */ 1842 static int 1843 ip_common_prefix_v6(const in6_addr_t *a1, const in6_addr_t *a2) 1844 { 1845 int i; 1846 uint32_t a1val, a2val, mask; 1847 1848 for (i = 0; i < 4; i++) { 1849 if ((a1val = a1->s6_addr32[i]) != (a2val = a2->s6_addr32[i])) { 1850 a1val ^= a2val; 1851 i *= 32; 1852 mask = 0x80000000u; 1853 while (!(a1val & mask)) { 1854 mask >>= 1; 1855 i++; 1856 } 1857 return (i); 1858 } 1859 } 1860 return (IPV6_ABITS); 1861 } 1862 1863 #define IPIF_VALID_IPV6_SOURCE(ipif) \ 1864 (((ipif)->ipif_flags & IPIF_UP) && \ 1865 !((ipif)->ipif_flags & (IPIF_NOLOCAL|IPIF_ANYCAST)) && \ 1866 (ipif)->ipif_addr_ready) 1867 1868 /* source address candidate */ 1869 typedef struct candidate { 1870 ipif_t *cand_ipif; 1871 /* The properties of this candidate */ 1872 boolean_t cand_isdst; 1873 boolean_t cand_isdst_set; 1874 in6addr_scope_t cand_scope; 1875 boolean_t cand_scope_set; 1876 boolean_t cand_isdeprecated; 1877 boolean_t cand_isdeprecated_set; 1878 boolean_t cand_ispreferred; 1879 boolean_t cand_ispreferred_set; 1880 boolean_t cand_matchedinterface; 1881 boolean_t cand_matchedinterface_set; 1882 boolean_t cand_matchedlabel; 1883 boolean_t cand_matchedlabel_set; 1884 boolean_t cand_istmp; 1885 boolean_t cand_istmp_set; 1886 int cand_common_pref; 1887 boolean_t cand_common_pref_set; 1888 boolean_t cand_pref_eq; 1889 boolean_t cand_pref_eq_set; 1890 int cand_pref_len; 1891 boolean_t cand_pref_len_set; 1892 } cand_t; 1893 #define cand_srcaddr cand_ipif->ipif_v6lcl_addr 1894 #define cand_mask cand_ipif->ipif_v6net_mask 1895 #define cand_flags cand_ipif->ipif_flags 1896 #define cand_ill cand_ipif->ipif_ill 1897 #define cand_zoneid cand_ipif->ipif_zoneid 1898 1899 /* information about the destination for source address selection */ 1900 typedef struct dstinfo { 1901 const in6_addr_t *dst_addr; 1902 ill_t *dst_ill; 1903 uint_t dst_restrict_ill; 1904 boolean_t dst_prefer_src_tmp; 1905 in6addr_scope_t dst_scope; 1906 char *dst_label; 1907 } dstinfo_t; 1908 1909 /* 1910 * The following functions are rules used to select a source address in 1911 * ipif_select_source_v6(). Each rule compares a current candidate (cc) 1912 * against the best candidate (bc). Each rule has three possible outcomes; 1913 * the candidate is preferred over the best candidate (CAND_PREFER), the 1914 * candidate is not preferred over the best candidate (CAND_AVOID), or the 1915 * candidate is of equal value as the best candidate (CAND_TIE). 1916 * 1917 * These rules are part of a greater "Default Address Selection for IPv6" 1918 * sheme, which is standards based work coming out of the IETF ipv6 working 1919 * group. The IETF document defines both IPv6 source address selection and 1920 * destination address ordering. The rules defined here implement the IPv6 1921 * source address selection. Destination address ordering is done by 1922 * libnsl, and uses a similar set of rules to implement the sorting. 1923 * 1924 * Most of the rules are defined by the RFC and are not typically altered. The 1925 * last rule, number 8, has language that allows for local preferences. In the 1926 * scheme below, this means that new Solaris rules should normally go between 1927 * rule_ifprefix and rule_prefix. 1928 */ 1929 typedef enum {CAND_AVOID, CAND_TIE, CAND_PREFER} rule_res_t; 1930 typedef rule_res_t (*rulef_t)(cand_t *, cand_t *, const dstinfo_t *, 1931 ip_stack_t *); 1932 1933 /* Prefer an address if it is equal to the destination address. */ 1934 /* ARGSUSED3 */ 1935 static rule_res_t 1936 rule_isdst(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, ip_stack_t *ipst) 1937 { 1938 if (!bc->cand_isdst_set) { 1939 bc->cand_isdst = 1940 IN6_ARE_ADDR_EQUAL(&bc->cand_srcaddr, dstinfo->dst_addr); 1941 bc->cand_isdst_set = B_TRUE; 1942 } 1943 1944 cc->cand_isdst = 1945 IN6_ARE_ADDR_EQUAL(&cc->cand_srcaddr, dstinfo->dst_addr); 1946 cc->cand_isdst_set = B_TRUE; 1947 1948 if (cc->cand_isdst == bc->cand_isdst) 1949 return (CAND_TIE); 1950 else if (cc->cand_isdst) 1951 return (CAND_PREFER); 1952 else 1953 return (CAND_AVOID); 1954 } 1955 1956 /* 1957 * Prefer addresses that are of closest scope to the destination. Always 1958 * prefer addresses that are of greater scope than the destination over 1959 * those that are of lesser scope than the destination. 1960 */ 1961 /* ARGSUSED3 */ 1962 static rule_res_t 1963 rule_scope(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, ip_stack_t *ipst) 1964 { 1965 if (!bc->cand_scope_set) { 1966 bc->cand_scope = ip_addr_scope_v6(&bc->cand_srcaddr); 1967 bc->cand_scope_set = B_TRUE; 1968 } 1969 1970 cc->cand_scope = ip_addr_scope_v6(&cc->cand_srcaddr); 1971 cc->cand_scope_set = B_TRUE; 1972 1973 if (cc->cand_scope < bc->cand_scope) { 1974 if (cc->cand_scope < dstinfo->dst_scope) 1975 return (CAND_AVOID); 1976 else 1977 return (CAND_PREFER); 1978 } else if (bc->cand_scope < cc->cand_scope) { 1979 if (bc->cand_scope < dstinfo->dst_scope) 1980 return (CAND_PREFER); 1981 else 1982 return (CAND_AVOID); 1983 } else { 1984 return (CAND_TIE); 1985 } 1986 } 1987 1988 /* 1989 * Prefer non-deprecated source addresses. 1990 */ 1991 /* ARGSUSED2 */ 1992 static rule_res_t 1993 rule_deprecated(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 1994 ip_stack_t *ipst) 1995 { 1996 if (!bc->cand_isdeprecated_set) { 1997 bc->cand_isdeprecated = 1998 ((bc->cand_flags & IPIF_DEPRECATED) != 0); 1999 bc->cand_isdeprecated_set = B_TRUE; 2000 } 2001 2002 cc->cand_isdeprecated = ((cc->cand_flags & IPIF_DEPRECATED) != 0); 2003 cc->cand_isdeprecated_set = B_TRUE; 2004 2005 if (bc->cand_isdeprecated == cc->cand_isdeprecated) 2006 return (CAND_TIE); 2007 else if (cc->cand_isdeprecated) 2008 return (CAND_AVOID); 2009 else 2010 return (CAND_PREFER); 2011 } 2012 2013 /* 2014 * Prefer source addresses that have the IPIF_PREFERRED flag set. This 2015 * rule must be before rule_interface because the flag could be set on any 2016 * interface, not just the interface being used for outgoing packets (for 2017 * example, the IFF_PREFERRED could be set on an address assigned to the 2018 * loopback interface). 2019 */ 2020 /* ARGSUSED2 */ 2021 static rule_res_t 2022 rule_preferred(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2023 ip_stack_t *ipst) 2024 { 2025 if (!bc->cand_ispreferred_set) { 2026 bc->cand_ispreferred = ((bc->cand_flags & IPIF_PREFERRED) != 0); 2027 bc->cand_ispreferred_set = B_TRUE; 2028 } 2029 2030 cc->cand_ispreferred = ((cc->cand_flags & IPIF_PREFERRED) != 0); 2031 cc->cand_ispreferred_set = B_TRUE; 2032 2033 if (bc->cand_ispreferred == cc->cand_ispreferred) 2034 return (CAND_TIE); 2035 else if (cc->cand_ispreferred) 2036 return (CAND_PREFER); 2037 else 2038 return (CAND_AVOID); 2039 } 2040 2041 /* 2042 * Prefer source addresses that are assigned to the outgoing interface. 2043 */ 2044 /* ARGSUSED3 */ 2045 static rule_res_t 2046 rule_interface(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2047 ip_stack_t *ipst) 2048 { 2049 ill_t *dstill = dstinfo->dst_ill; 2050 2051 /* 2052 * If dstinfo->dst_restrict_ill is set, this rule is unnecessary 2053 * since we know all candidates will be on the same link. 2054 */ 2055 if (dstinfo->dst_restrict_ill) 2056 return (CAND_TIE); 2057 2058 if (!bc->cand_matchedinterface_set) { 2059 bc->cand_matchedinterface = bc->cand_ill == dstill; 2060 bc->cand_matchedinterface_set = B_TRUE; 2061 } 2062 2063 cc->cand_matchedinterface = cc->cand_ill == dstill; 2064 cc->cand_matchedinterface_set = B_TRUE; 2065 2066 if (bc->cand_matchedinterface == cc->cand_matchedinterface) 2067 return (CAND_TIE); 2068 else if (cc->cand_matchedinterface) 2069 return (CAND_PREFER); 2070 else 2071 return (CAND_AVOID); 2072 } 2073 2074 /* 2075 * Prefer source addresses whose label matches the destination's label. 2076 */ 2077 static rule_res_t 2078 rule_label(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, ip_stack_t *ipst) 2079 { 2080 char *label; 2081 2082 if (!bc->cand_matchedlabel_set) { 2083 label = ip6_asp_lookup(&bc->cand_srcaddr, NULL, ipst); 2084 bc->cand_matchedlabel = 2085 ip6_asp_labelcmp(label, dstinfo->dst_label); 2086 bc->cand_matchedlabel_set = B_TRUE; 2087 } 2088 2089 label = ip6_asp_lookup(&cc->cand_srcaddr, NULL, ipst); 2090 cc->cand_matchedlabel = ip6_asp_labelcmp(label, dstinfo->dst_label); 2091 cc->cand_matchedlabel_set = B_TRUE; 2092 2093 if (bc->cand_matchedlabel == cc->cand_matchedlabel) 2094 return (CAND_TIE); 2095 else if (cc->cand_matchedlabel) 2096 return (CAND_PREFER); 2097 else 2098 return (CAND_AVOID); 2099 } 2100 2101 /* 2102 * Prefer public addresses over temporary ones. An application can reverse 2103 * the logic of this rule and prefer temporary addresses by using the 2104 * IPV6_SRC_PREFERENCES socket option. 2105 */ 2106 /* ARGSUSED3 */ 2107 static rule_res_t 2108 rule_temporary(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2109 ip_stack_t *ipst) 2110 { 2111 if (!bc->cand_istmp_set) { 2112 bc->cand_istmp = ((bc->cand_flags & IPIF_TEMPORARY) != 0); 2113 bc->cand_istmp_set = B_TRUE; 2114 } 2115 2116 cc->cand_istmp = ((cc->cand_flags & IPIF_TEMPORARY) != 0); 2117 cc->cand_istmp_set = B_TRUE; 2118 2119 if (bc->cand_istmp == cc->cand_istmp) 2120 return (CAND_TIE); 2121 2122 if (dstinfo->dst_prefer_src_tmp && cc->cand_istmp) 2123 return (CAND_PREFER); 2124 else if (!dstinfo->dst_prefer_src_tmp && !cc->cand_istmp) 2125 return (CAND_PREFER); 2126 else 2127 return (CAND_AVOID); 2128 } 2129 2130 /* 2131 * Prefer source addresses with longer matching prefix with the destination 2132 * under the interface mask. This gets us on the same subnet before applying 2133 * any Solaris-specific rules. 2134 */ 2135 /* ARGSUSED3 */ 2136 static rule_res_t 2137 rule_ifprefix(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2138 ip_stack_t *ipst) 2139 { 2140 if (!bc->cand_pref_eq_set) { 2141 bc->cand_pref_eq = V6_MASK_EQ_2(bc->cand_srcaddr, 2142 bc->cand_mask, *dstinfo->dst_addr); 2143 bc->cand_pref_eq_set = B_TRUE; 2144 } 2145 2146 cc->cand_pref_eq = V6_MASK_EQ_2(cc->cand_srcaddr, cc->cand_mask, 2147 *dstinfo->dst_addr); 2148 cc->cand_pref_eq_set = B_TRUE; 2149 2150 if (bc->cand_pref_eq) { 2151 if (cc->cand_pref_eq) { 2152 if (!bc->cand_pref_len_set) { 2153 bc->cand_pref_len = 2154 ip_mask_to_plen_v6(&bc->cand_mask); 2155 bc->cand_pref_len_set = B_TRUE; 2156 } 2157 cc->cand_pref_len = ip_mask_to_plen_v6(&cc->cand_mask); 2158 cc->cand_pref_len_set = B_TRUE; 2159 if (bc->cand_pref_len == cc->cand_pref_len) 2160 return (CAND_TIE); 2161 else if (bc->cand_pref_len > cc->cand_pref_len) 2162 return (CAND_AVOID); 2163 else 2164 return (CAND_PREFER); 2165 } else { 2166 return (CAND_AVOID); 2167 } 2168 } else { 2169 if (cc->cand_pref_eq) 2170 return (CAND_PREFER); 2171 else 2172 return (CAND_TIE); 2173 } 2174 } 2175 2176 /* 2177 * Prefer to use zone-specific addresses when possible instead of all-zones 2178 * addresses. 2179 */ 2180 /* ARGSUSED2 */ 2181 static rule_res_t 2182 rule_zone_specific(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2183 ip_stack_t *ipst) 2184 { 2185 if ((bc->cand_zoneid == ALL_ZONES) == 2186 (cc->cand_zoneid == ALL_ZONES)) 2187 return (CAND_TIE); 2188 else if (cc->cand_zoneid == ALL_ZONES) 2189 return (CAND_AVOID); 2190 else 2191 return (CAND_PREFER); 2192 } 2193 2194 /* 2195 * Prefer to use DHCPv6 (first) and static addresses (second) when possible 2196 * instead of statelessly autoconfigured addresses. 2197 * 2198 * This is done after trying all other preferences (and before the final tie 2199 * breaker) so that, if all else is equal, we select addresses configured by 2200 * DHCPv6 over other addresses. We presume that DHCPv6 addresses, unlike 2201 * stateless autoconfigured addresses, are deliberately configured by an 2202 * administrator, and thus are correctly set up in DNS and network packet 2203 * filters. 2204 */ 2205 /* ARGSUSED2 */ 2206 static rule_res_t 2207 rule_addr_type(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2208 ip_stack_t *ipst) 2209 { 2210 #define ATYPE(x) \ 2211 ((x) & IPIF_DHCPRUNNING) ? 1 : ((x) & IPIF_ADDRCONF) ? 3 : 2 2212 int bcval = ATYPE(bc->cand_flags); 2213 int ccval = ATYPE(cc->cand_flags); 2214 #undef ATYPE 2215 2216 if (bcval == ccval) 2217 return (CAND_TIE); 2218 else if (ccval < bcval) 2219 return (CAND_PREFER); 2220 else 2221 return (CAND_AVOID); 2222 } 2223 2224 /* 2225 * Prefer source addresses with longer matching prefix with the destination. 2226 * We do the longest matching prefix calculation by doing an xor of both 2227 * addresses with the destination, and pick the address with the longest string 2228 * of leading zeros, as per CommonPrefixLen() defined in RFC 3484. 2229 */ 2230 /* ARGSUSED3 */ 2231 static rule_res_t 2232 rule_prefix(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, ip_stack_t *ipst) 2233 { 2234 /* 2235 * For IPMP, we always want to choose a random source address from 2236 * among any equally usable addresses, so always report a tie. 2237 */ 2238 if (IS_IPMP(dstinfo->dst_ill)) 2239 return (CAND_TIE); 2240 2241 if (!bc->cand_common_pref_set) { 2242 bc->cand_common_pref = ip_common_prefix_v6(&bc->cand_srcaddr, 2243 dstinfo->dst_addr); 2244 bc->cand_common_pref_set = B_TRUE; 2245 } 2246 2247 cc->cand_common_pref = ip_common_prefix_v6(&cc->cand_srcaddr, 2248 dstinfo->dst_addr); 2249 cc->cand_common_pref_set = B_TRUE; 2250 2251 if (bc->cand_common_pref == cc->cand_common_pref) 2252 return (CAND_TIE); 2253 else if (bc->cand_common_pref > cc->cand_common_pref) 2254 return (CAND_AVOID); 2255 else 2256 return (CAND_PREFER); 2257 } 2258 2259 /* 2260 * Last rule: we must pick something, so just prefer the current best 2261 * candidate. 2262 */ 2263 /* ARGSUSED */ 2264 static rule_res_t 2265 rule_must_be_last(cand_t *bc, cand_t *cc, const dstinfo_t *dstinfo, 2266 ip_stack_t *ipst) 2267 { 2268 return (CAND_AVOID); 2269 } 2270 2271 /* 2272 * Determine the best source address given a destination address and a 2273 * destination ill. If no suitable source address is found, it returns 2274 * NULL. If there is a usable address pointed to by the usesrc 2275 * (i.e ill_usesrc_ifindex != 0) then return that first since it is more 2276 * fine grained (i.e per interface) 2277 * 2278 * This implementation is based on the "Default Address Selection for IPv6" 2279 * specification produced by the IETF IPv6 working group. It has been 2280 * implemented so that the list of addresses is only traversed once (the 2281 * specification's algorithm could traverse the list of addresses once for 2282 * every rule). 2283 * 2284 * The restrict_ill argument restricts the algorithm to choose a source 2285 * address that is assigned to the destination ill. This is used when 2286 * the destination address is a link-local or multicast address, and when 2287 * ipv6_strict_dst_multihoming is turned on. 2288 * 2289 * src_prefs is the caller's set of source address preferences. If source 2290 * address selection is being called to determine the source address of a 2291 * connected socket (from ip_bind_connected_v6()), then the preferences are 2292 * taken from conn_src_preferences. These preferences can be set on a 2293 * per-socket basis using the IPV6_SRC_PREFERENCES socket option. The only 2294 * preference currently implemented is for rfc3041 temporary addresses. 2295 */ 2296 ipif_t * 2297 ipif_select_source_v6(ill_t *dstill, const in6_addr_t *dst, 2298 boolean_t restrict_ill, uint32_t src_prefs, zoneid_t zoneid) 2299 { 2300 dstinfo_t dstinfo; 2301 char dstr[INET6_ADDRSTRLEN]; 2302 char sstr[INET6_ADDRSTRLEN]; 2303 ipif_t *ipif, *start_ipif, *next_ipif; 2304 ill_t *ill, *usesrc_ill = NULL, *ipmp_ill = NULL; 2305 ill_walk_context_t ctx; 2306 cand_t best_c; /* The best candidate */ 2307 cand_t curr_c; /* The current candidate */ 2308 uint_t index; 2309 boolean_t first_candidate = B_TRUE; 2310 rule_res_t rule_result; 2311 tsol_tpc_t *src_rhtp, *dst_rhtp; 2312 ip_stack_t *ipst = dstill->ill_ipst; 2313 2314 /* 2315 * The list of ordering rules. They are applied in the order they 2316 * appear in the list. 2317 * 2318 * Solaris doesn't currently support Mobile IPv6, so there's no 2319 * rule_mipv6 corresponding to rule 4 in the specification. 2320 */ 2321 rulef_t rules[] = { 2322 rule_isdst, 2323 rule_scope, 2324 rule_deprecated, 2325 rule_preferred, 2326 rule_interface, 2327 rule_label, 2328 rule_temporary, 2329 rule_ifprefix, /* local rules after this */ 2330 rule_zone_specific, 2331 rule_addr_type, 2332 rule_prefix, /* local rules before this */ 2333 rule_must_be_last, /* must always be last */ 2334 NULL 2335 }; 2336 2337 ASSERT(dstill->ill_isv6); 2338 ASSERT(!IN6_IS_ADDR_V4MAPPED(dst)); 2339 2340 /* 2341 * Check if there is a usable src address pointed to by the 2342 * usesrc ifindex. This has higher precedence since it is 2343 * finer grained (i.e per interface) v/s being system wide. 2344 */ 2345 if (dstill->ill_usesrc_ifindex != 0) { 2346 if ((usesrc_ill = 2347 ill_lookup_on_ifindex(dstill->ill_usesrc_ifindex, B_TRUE, 2348 NULL, NULL, NULL, NULL, ipst)) != NULL) { 2349 dstinfo.dst_ill = usesrc_ill; 2350 } else { 2351 return (NULL); 2352 } 2353 } else if (IS_UNDER_IPMP(dstill)) { 2354 /* 2355 * Test addresses should never be used for source address 2356 * selection, so if we were passed an underlying ill, switch 2357 * to the IPMP meta-interface. 2358 */ 2359 if ((ipmp_ill = ipmp_ill_hold_ipmp_ill(dstill)) != NULL) 2360 dstinfo.dst_ill = ipmp_ill; 2361 else 2362 return (NULL); 2363 } else { 2364 dstinfo.dst_ill = dstill; 2365 } 2366 2367 /* 2368 * If we're dealing with an unlabeled destination on a labeled system, 2369 * make sure that we ignore source addresses that are incompatible with 2370 * the destination's default label. That destination's default label 2371 * must dominate the minimum label on the source address. 2372 * 2373 * (Note that this has to do with Trusted Solaris. It's not related to 2374 * the labels described by ip6_asp_lookup.) 2375 */ 2376 dst_rhtp = NULL; 2377 if (is_system_labeled()) { 2378 dst_rhtp = find_tpc(dst, IPV6_VERSION, B_FALSE); 2379 if (dst_rhtp == NULL) 2380 return (NULL); 2381 if (dst_rhtp->tpc_tp.host_type != UNLABELED) { 2382 TPC_RELE(dst_rhtp); 2383 dst_rhtp = NULL; 2384 } 2385 } 2386 2387 dstinfo.dst_addr = dst; 2388 dstinfo.dst_scope = ip_addr_scope_v6(dst); 2389 dstinfo.dst_label = ip6_asp_lookup(dst, NULL, ipst); 2390 dstinfo.dst_prefer_src_tmp = ((src_prefs & IPV6_PREFER_SRC_TMP) != 0); 2391 rw_enter(&ipst->ips_ill_g_lock, RW_READER); 2392 /* 2393 * Section three of the I-D states that for multicast and 2394 * link-local destinations, the candidate set must be restricted to 2395 * an interface that is on the same link as the outgoing interface. 2396 * Also, when ipv6_strict_dst_multihoming is turned on, always 2397 * restrict the source address to the destination link as doing 2398 * otherwise will almost certainly cause problems. 2399 */ 2400 if (IN6_IS_ADDR_LINKLOCAL(dst) || IN6_IS_ADDR_MULTICAST(dst) || 2401 ipst->ips_ipv6_strict_dst_multihoming || usesrc_ill != NULL) { 2402 dstinfo.dst_restrict_ill = B_TRUE; 2403 } else { 2404 dstinfo.dst_restrict_ill = restrict_ill; 2405 } 2406 2407 bzero(&best_c, sizeof (cand_t)); 2408 2409 /* 2410 * Take a pass through the list of IPv6 interfaces to choose the best 2411 * possible source address. If restrict_ill is set, just use dst_ill. 2412 */ 2413 if (dstinfo.dst_restrict_ill) 2414 ill = dstinfo.dst_ill; 2415 else 2416 ill = ILL_START_WALK_V6(&ctx, ipst); 2417 2418 for (; ill != NULL; ill = ill_next(&ctx, ill)) { 2419 ASSERT(ill->ill_isv6); 2420 2421 /* 2422 * Test addresses should never be used for source address 2423 * selection, so ignore underlying ills. 2424 */ 2425 if (IS_UNDER_IPMP(ill)) 2426 continue; 2427 2428 /* 2429 * For source address selection, we treat the ipif list as 2430 * circular and continue until we get back to where we 2431 * started. This allows IPMP to vary source address selection 2432 * (which improves inbound load spreading) by caching its last 2433 * ending point and starting from there. NOTE: we don't have 2434 * to worry about ill_src_ipif changing ills since that can't 2435 * happen on the IPMP ill. 2436 */ 2437 start_ipif = ill->ill_ipif; 2438 if (IS_IPMP(ill) && ill->ill_src_ipif != NULL) 2439 start_ipif = ill->ill_src_ipif; 2440 2441 ipif = start_ipif; 2442 do { 2443 if ((next_ipif = ipif->ipif_next) == NULL) 2444 next_ipif = ill->ill_ipif; 2445 2446 if (!IPIF_VALID_IPV6_SOURCE(ipif)) 2447 continue; 2448 2449 if (zoneid != ALL_ZONES && 2450 ipif->ipif_zoneid != zoneid && 2451 ipif->ipif_zoneid != ALL_ZONES) 2452 continue; 2453 2454 /* 2455 * Check compatibility of local address for 2456 * destination's default label if we're on a labeled 2457 * system. Incompatible addresses can't be used at 2458 * all and must be skipped over. 2459 */ 2460 if (dst_rhtp != NULL) { 2461 boolean_t incompat; 2462 2463 src_rhtp = find_tpc(&ipif->ipif_v6lcl_addr, 2464 IPV6_VERSION, B_FALSE); 2465 if (src_rhtp == NULL) 2466 continue; 2467 incompat = 2468 src_rhtp->tpc_tp.host_type != SUN_CIPSO || 2469 src_rhtp->tpc_tp.tp_doi != 2470 dst_rhtp->tpc_tp.tp_doi || 2471 (!_blinrange(&dst_rhtp->tpc_tp.tp_def_label, 2472 &src_rhtp->tpc_tp.tp_sl_range_cipso) && 2473 !blinlset(&dst_rhtp->tpc_tp.tp_def_label, 2474 src_rhtp->tpc_tp.tp_sl_set_cipso)); 2475 TPC_RELE(src_rhtp); 2476 if (incompat) 2477 continue; 2478 } 2479 2480 if (first_candidate) { 2481 /* 2482 * This is first valid address in the list. 2483 * It is automatically the best candidate 2484 * so far. 2485 */ 2486 best_c.cand_ipif = ipif; 2487 first_candidate = B_FALSE; 2488 continue; 2489 } 2490 2491 bzero(&curr_c, sizeof (cand_t)); 2492 curr_c.cand_ipif = ipif; 2493 2494 /* 2495 * Compare this current candidate (curr_c) with the 2496 * best candidate (best_c) by applying the 2497 * comparison rules in order until one breaks the 2498 * tie. 2499 */ 2500 for (index = 0; rules[index] != NULL; index++) { 2501 /* Apply a comparison rule. */ 2502 rule_result = (rules[index])(&best_c, &curr_c, 2503 &dstinfo, ipst); 2504 if (rule_result == CAND_AVOID) { 2505 /* 2506 * The best candidate is still the 2507 * best candidate. Forget about 2508 * this current candidate and go on 2509 * to the next one. 2510 */ 2511 break; 2512 } else if (rule_result == CAND_PREFER) { 2513 /* 2514 * This candidate is prefered. It 2515 * becomes the best candidate so 2516 * far. Go on to the next address. 2517 */ 2518 best_c = curr_c; 2519 break; 2520 } 2521 /* We have a tie, apply the next rule. */ 2522 } 2523 2524 /* 2525 * The last rule must be a tie breaker rule and 2526 * must never produce a tie. At this point, the 2527 * candidate should have either been rejected, or 2528 * have been prefered as the best candidate so far. 2529 */ 2530 ASSERT(rule_result != CAND_TIE); 2531 } while ((ipif = next_ipif) != start_ipif); 2532 2533 /* 2534 * For IPMP, update the source ipif rotor to the next ipif, 2535 * provided we can look it up. (We must not use it if it's 2536 * IPIF_CONDEMNED since we may have grabbed ill_g_lock after 2537 * ipif_free() checked ill_src_ipif.) 2538 */ 2539 if (IS_IPMP(ill) && ipif != NULL) { 2540 mutex_enter(&ipif->ipif_ill->ill_lock); 2541 next_ipif = ipif->ipif_next; 2542 if (next_ipif != NULL && IPIF_CAN_LOOKUP(next_ipif)) 2543 ill->ill_src_ipif = next_ipif; 2544 else 2545 ill->ill_src_ipif = NULL; 2546 mutex_exit(&ipif->ipif_ill->ill_lock); 2547 } 2548 2549 /* 2550 * Only one ill to consider if dst_restrict_ill is set. 2551 */ 2552 if (dstinfo.dst_restrict_ill) 2553 break; 2554 } 2555 2556 ipif = best_c.cand_ipif; 2557 ip1dbg(("ipif_select_source_v6(%s, %s) -> %s\n", 2558 dstinfo.dst_ill->ill_name, 2559 inet_ntop(AF_INET6, dstinfo.dst_addr, dstr, sizeof (dstr)), 2560 (ipif == NULL ? "NULL" : 2561 inet_ntop(AF_INET6, &ipif->ipif_v6lcl_addr, sstr, sizeof (sstr))))); 2562 2563 if (usesrc_ill != NULL) 2564 ill_refrele(usesrc_ill); 2565 2566 if (ipmp_ill != NULL) 2567 ill_refrele(ipmp_ill); 2568 2569 if (dst_rhtp != NULL) 2570 TPC_RELE(dst_rhtp); 2571 2572 if (ipif == NULL) { 2573 rw_exit(&ipst->ips_ill_g_lock); 2574 return (NULL); 2575 } 2576 2577 mutex_enter(&ipif->ipif_ill->ill_lock); 2578 if (IPIF_CAN_LOOKUP(ipif)) { 2579 ipif_refhold_locked(ipif); 2580 mutex_exit(&ipif->ipif_ill->ill_lock); 2581 rw_exit(&ipst->ips_ill_g_lock); 2582 return (ipif); 2583 } 2584 mutex_exit(&ipif->ipif_ill->ill_lock); 2585 rw_exit(&ipst->ips_ill_g_lock); 2586 ip1dbg(("ipif_select_source_v6 cannot lookup ipif %p" 2587 " returning null \n", (void *)ipif)); 2588 2589 return (NULL); 2590 } 2591 2592 /* 2593 * If old_ipif is not NULL, see if ipif was derived from old 2594 * ipif and if so, recreate the interface route by re-doing 2595 * source address selection. This happens when ipif_down -> 2596 * ipif_update_other_ipifs calls us. 2597 * 2598 * If old_ipif is NULL, just redo the source address selection 2599 * if needed. This happens when ipif_up_done_v6 calls us. 2600 */ 2601 void 2602 ipif_recreate_interface_routes_v6(ipif_t *old_ipif, ipif_t *ipif) 2603 { 2604 ire_t *ire; 2605 ire_t *ipif_ire; 2606 queue_t *stq; 2607 ill_t *ill; 2608 ipif_t *nipif = NULL; 2609 boolean_t nipif_refheld = B_FALSE; 2610 boolean_t ip6_asp_table_held = B_FALSE; 2611 ip_stack_t *ipst = ipif->ipif_ill->ill_ipst; 2612 2613 ill = ipif->ipif_ill; 2614 2615 if (!(ipif->ipif_flags & 2616 (IPIF_NOLOCAL|IPIF_ANYCAST|IPIF_DEPRECATED))) { 2617 /* 2618 * Can't possibly have borrowed the source 2619 * from old_ipif. 2620 */ 2621 return; 2622 } 2623 2624 /* 2625 * Is there any work to be done? No work if the address 2626 * is INADDR_ANY, loopback or NOLOCAL or ANYCAST ( 2627 * ipif_select_source_v6() does not borrow addresses from 2628 * NOLOCAL and ANYCAST interfaces). 2629 */ 2630 if ((old_ipif != NULL) && 2631 ((IN6_IS_ADDR_UNSPECIFIED(&old_ipif->ipif_v6lcl_addr)) || 2632 (old_ipif->ipif_ill->ill_wq == NULL) || 2633 (old_ipif->ipif_flags & 2634 (IPIF_NOLOCAL|IPIF_ANYCAST)))) { 2635 return; 2636 } 2637 2638 /* 2639 * Perform the same checks as when creating the 2640 * IRE_INTERFACE in ipif_up_done_v6. 2641 */ 2642 if (!(ipif->ipif_flags & IPIF_UP)) 2643 return; 2644 2645 if ((ipif->ipif_flags & IPIF_NOXMIT)) 2646 return; 2647 2648 if (IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6subnet) && 2649 IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6net_mask)) 2650 return; 2651 2652 /* 2653 * We know that ipif uses some other source for its 2654 * IRE_INTERFACE. Is it using the source of this 2655 * old_ipif? 2656 */ 2657 ipif_ire = ipif_to_ire_v6(ipif); 2658 if (ipif_ire == NULL) 2659 return; 2660 2661 if (old_ipif != NULL && 2662 !IN6_ARE_ADDR_EQUAL(&old_ipif->ipif_v6lcl_addr, 2663 &ipif_ire->ire_src_addr_v6)) { 2664 ire_refrele(ipif_ire); 2665 return; 2666 } 2667 2668 if (ip_debug > 2) { 2669 /* ip1dbg */ 2670 pr_addr_dbg("ipif_recreate_interface_routes_v6: deleting IRE" 2671 " for src %s\n", AF_INET6, &ipif_ire->ire_src_addr_v6); 2672 } 2673 2674 stq = ipif_ire->ire_stq; 2675 2676 /* 2677 * Can't use our source address. Select a different source address 2678 * for the IRE_INTERFACE. We restrict interface route source 2679 * address selection to ipif's assigned to the same link as the 2680 * interface. 2681 */ 2682 if (ip6_asp_can_lookup(ipst)) { 2683 ip6_asp_table_held = B_TRUE; 2684 nipif = ipif_select_source_v6(ill, &ipif->ipif_v6subnet, 2685 B_TRUE, IPV6_PREFER_SRC_DEFAULT, ipif->ipif_zoneid); 2686 } 2687 if (nipif == NULL) { 2688 /* Last resort - all ipif's have IPIF_NOLOCAL */ 2689 nipif = ipif; 2690 } else { 2691 nipif_refheld = B_TRUE; 2692 } 2693 2694 ire = ire_create_v6( 2695 &ipif->ipif_v6subnet, /* dest pref */ 2696 &ipif->ipif_v6net_mask, /* mask */ 2697 &nipif->ipif_v6src_addr, /* src addr */ 2698 NULL, /* no gateway */ 2699 &ipif->ipif_mtu, /* max frag */ 2700 NULL, /* no src nce */ 2701 NULL, /* no recv from queue */ 2702 stq, /* send-to queue */ 2703 ill->ill_net_type, /* IF_[NO]RESOLVER */ 2704 ipif, 2705 NULL, 2706 0, 2707 0, 2708 0, 2709 &ire_uinfo_null, 2710 NULL, 2711 NULL, 2712 ipst); 2713 2714 if (ire != NULL) { 2715 ire_t *ret_ire; 2716 int error; 2717 2718 /* 2719 * We don't need ipif_ire anymore. We need to delete 2720 * before we add so that ire_add does not detect 2721 * duplicates. 2722 */ 2723 ire_delete(ipif_ire); 2724 ret_ire = ire; 2725 error = ire_add(&ret_ire, NULL, NULL, NULL, B_FALSE); 2726 ASSERT(error == 0); 2727 ASSERT(ret_ire == ire); 2728 if (ret_ire != NULL) { 2729 /* Held in ire_add */ 2730 ire_refrele(ret_ire); 2731 } 2732 } 2733 /* 2734 * Either we are falling through from above or could not 2735 * allocate a replacement. 2736 */ 2737 ire_refrele(ipif_ire); 2738 if (ip6_asp_table_held) 2739 ip6_asp_table_refrele(ipst); 2740 if (nipif_refheld) 2741 ipif_refrele(nipif); 2742 } 2743 2744 /* 2745 * This old_ipif is going away. 2746 * 2747 * Determine if any other ipif's are using our address as 2748 * ipif_v6lcl_addr (due to those being IPIF_NOLOCAL, IPIF_ANYCAST, or 2749 * IPIF_DEPRECATED). 2750 * Find the IRE_INTERFACE for such ipif's and recreate them 2751 * to use an different source address following the rules in 2752 * ipif_up_done_v6. 2753 */ 2754 void 2755 ipif_update_other_ipifs_v6(ipif_t *old_ipif) 2756 { 2757 ipif_t *ipif; 2758 ill_t *ill; 2759 char buf[INET6_ADDRSTRLEN]; 2760 2761 ASSERT(IAM_WRITER_IPIF(old_ipif)); 2762 2763 ill = old_ipif->ipif_ill; 2764 2765 ip1dbg(("ipif_update_other_ipifs_v6(%s, %s)\n", 2766 ill->ill_name, 2767 inet_ntop(AF_INET6, &old_ipif->ipif_v6lcl_addr, 2768 buf, sizeof (buf)))); 2769 2770 for (ipif = ill->ill_ipif; ipif != NULL; ipif = ipif->ipif_next) { 2771 if (ipif != old_ipif) 2772 ipif_recreate_interface_routes_v6(old_ipif, ipif); 2773 } 2774 } 2775 2776 /* 2777 * Perform an attach and bind to get phys addr plus info_req for 2778 * the physical device. 2779 * q and mp represents an ioctl which will be queued waiting for 2780 * completion of the DLPI message exchange. 2781 * MUST be called on an ill queue. Can not set conn_pending_ill for that 2782 * reason thus the DL_PHYS_ADDR_ACK code does not assume ill_pending_q. 2783 * 2784 * Returns EINPROGRESS when mp has been consumed by queueing it on 2785 * ill_pending_mp and the ioctl will complete in ip_rput. 2786 */ 2787 int 2788 ill_dl_phys(ill_t *ill, ipif_t *ipif, mblk_t *mp, queue_t *q) 2789 { 2790 mblk_t *v6token_mp = NULL; 2791 mblk_t *v6lla_mp = NULL; 2792 mblk_t *phys_mp = NULL; 2793 mblk_t *info_mp = NULL; 2794 mblk_t *attach_mp = NULL; 2795 mblk_t *bind_mp = NULL; 2796 mblk_t *unbind_mp = NULL; 2797 mblk_t *notify_mp = NULL; 2798 2799 ip1dbg(("ill_dl_phys(%s:%u)\n", ill->ill_name, ipif->ipif_id)); 2800 ASSERT(ill->ill_dlpi_style_set); 2801 ASSERT(WR(q)->q_next != NULL); 2802 2803 if (ill->ill_isv6) { 2804 v6token_mp = ip_dlpi_alloc(sizeof (dl_phys_addr_req_t) + 2805 sizeof (t_scalar_t), DL_PHYS_ADDR_REQ); 2806 if (v6token_mp == NULL) 2807 goto bad; 2808 ((dl_phys_addr_req_t *)v6token_mp->b_rptr)->dl_addr_type = 2809 DL_IPV6_TOKEN; 2810 2811 v6lla_mp = ip_dlpi_alloc(sizeof (dl_phys_addr_req_t) + 2812 sizeof (t_scalar_t), DL_PHYS_ADDR_REQ); 2813 if (v6lla_mp == NULL) 2814 goto bad; 2815 ((dl_phys_addr_req_t *)v6lla_mp->b_rptr)->dl_addr_type = 2816 DL_IPV6_LINK_LAYER_ADDR; 2817 } 2818 2819 /* 2820 * Allocate a DL_NOTIFY_REQ and set the notifications we want. 2821 */ 2822 notify_mp = ip_dlpi_alloc(sizeof (dl_notify_req_t) + sizeof (long), 2823 DL_NOTIFY_REQ); 2824 if (notify_mp == NULL) 2825 goto bad; 2826 ((dl_notify_req_t *)notify_mp->b_rptr)->dl_notifications = 2827 (DL_NOTE_PHYS_ADDR | DL_NOTE_SDU_SIZE | DL_NOTE_FASTPATH_FLUSH | 2828 DL_NOTE_LINK_UP | DL_NOTE_LINK_DOWN | DL_NOTE_CAPAB_RENEG | 2829 DL_NOTE_REPLUMB); 2830 2831 phys_mp = ip_dlpi_alloc(sizeof (dl_phys_addr_req_t) + 2832 sizeof (t_scalar_t), DL_PHYS_ADDR_REQ); 2833 if (phys_mp == NULL) 2834 goto bad; 2835 ((dl_phys_addr_req_t *)phys_mp->b_rptr)->dl_addr_type = 2836 DL_CURR_PHYS_ADDR; 2837 2838 info_mp = ip_dlpi_alloc( 2839 sizeof (dl_info_req_t) + sizeof (dl_info_ack_t), 2840 DL_INFO_REQ); 2841 if (info_mp == NULL) 2842 goto bad; 2843 2844 bind_mp = ip_dlpi_alloc(sizeof (dl_bind_req_t) + sizeof (long), 2845 DL_BIND_REQ); 2846 if (bind_mp == NULL) 2847 goto bad; 2848 ((dl_bind_req_t *)bind_mp->b_rptr)->dl_sap = ill->ill_sap; 2849 ((dl_bind_req_t *)bind_mp->b_rptr)->dl_service_mode = DL_CLDLS; 2850 2851 unbind_mp = ip_dlpi_alloc(sizeof (dl_unbind_req_t), DL_UNBIND_REQ); 2852 if (unbind_mp == NULL) 2853 goto bad; 2854 2855 /* If we need to attach, pre-alloc and initialize the mblk */ 2856 if (ill->ill_needs_attach) { 2857 attach_mp = ip_dlpi_alloc(sizeof (dl_attach_req_t), 2858 DL_ATTACH_REQ); 2859 if (attach_mp == NULL) 2860 goto bad; 2861 ((dl_attach_req_t *)attach_mp->b_rptr)->dl_ppa = ill->ill_ppa; 2862 } 2863 2864 /* 2865 * Here we are going to delay the ioctl ack until after 2866 * ACKs from DL_PHYS_ADDR_REQ. So need to save the 2867 * original ioctl message before sending the requests 2868 */ 2869 mutex_enter(&ill->ill_lock); 2870 /* ipsq_pending_mp_add won't fail since we pass in a NULL connp */ 2871 (void) ipsq_pending_mp_add(NULL, ipif, ill->ill_wq, mp, 0); 2872 /* 2873 * Set ill_phys_addr_pend to zero. It will be set to the addr_type of 2874 * the DL_PHYS_ADDR_REQ in ill_dlpi_send() and ill_dlpi_done(). It will 2875 * be used to track which DL_PHYS_ADDR_REQ is being ACK'd/NAK'd. 2876 */ 2877 ill->ill_phys_addr_pend = 0; 2878 mutex_exit(&ill->ill_lock); 2879 2880 if (attach_mp != NULL) { 2881 ip1dbg(("ill_dl_phys: attach\n")); 2882 ill_dlpi_send(ill, attach_mp); 2883 } 2884 ill_dlpi_send(ill, bind_mp); 2885 ill_dlpi_send(ill, info_mp); 2886 if (ill->ill_isv6) { 2887 ill_dlpi_send(ill, v6token_mp); 2888 ill_dlpi_send(ill, v6lla_mp); 2889 } 2890 ill_dlpi_send(ill, phys_mp); 2891 ill_dlpi_send(ill, notify_mp); 2892 ill_dlpi_send(ill, unbind_mp); 2893 2894 /* 2895 * This operation will complete in ip_rput_dlpi_writer with either 2896 * a DL_PHYS_ADDR_ACK or DL_ERROR_ACK. 2897 */ 2898 return (EINPROGRESS); 2899 bad: 2900 freemsg(v6token_mp); 2901 freemsg(v6lla_mp); 2902 freemsg(phys_mp); 2903 freemsg(info_mp); 2904 freemsg(attach_mp); 2905 freemsg(bind_mp); 2906 freemsg(unbind_mp); 2907 freemsg(notify_mp); 2908 return (ENOMEM); 2909 } 2910 2911 uint_t ip_loopback_mtu_v6plus = IP_LOOPBACK_MTU + IPV6_HDR_LEN + 20; 2912 2913 /* 2914 * DLPI is up. 2915 * Create all the IREs associated with an interface bring up multicast. 2916 * Set the interface flag and finish other initialization 2917 * that potentially had to be differed to after DL_BIND_ACK. 2918 */ 2919 int 2920 ipif_up_done_v6(ipif_t *ipif) 2921 { 2922 ire_t *ire_array[20]; 2923 ire_t **irep = ire_array; 2924 ire_t **irep1; 2925 ill_t *ill = ipif->ipif_ill; 2926 queue_t *stq; 2927 in6_addr_t v6addr; 2928 in6_addr_t route_mask; 2929 ipif_t *src_ipif = NULL; 2930 ipif_t *tmp_ipif; 2931 boolean_t flush_ire_cache = B_TRUE; 2932 int err; 2933 char buf[INET6_ADDRSTRLEN]; 2934 ire_t **ipif_saved_irep = NULL; 2935 int ipif_saved_ire_cnt; 2936 int cnt; 2937 boolean_t src_ipif_held = B_FALSE; 2938 boolean_t loopback = B_FALSE; 2939 boolean_t ip6_asp_table_held = B_FALSE; 2940 ip_stack_t *ipst = ill->ill_ipst; 2941 2942 ip1dbg(("ipif_up_done_v6(%s:%u)\n", 2943 ipif->ipif_ill->ill_name, ipif->ipif_id)); 2944 2945 /* Check if this is a loopback interface */ 2946 if (ipif->ipif_ill->ill_wq == NULL) 2947 loopback = B_TRUE; 2948 2949 ASSERT(ipif->ipif_isv6); 2950 ASSERT(!MUTEX_HELD(&ipif->ipif_ill->ill_lock)); 2951 2952 /* 2953 * If all other interfaces for this ill are down or DEPRECATED, 2954 * or otherwise unsuitable for source address selection, remove 2955 * any IRE_CACHE entries for this ill to make sure source 2956 * address selection gets to take this new ipif into account. 2957 * No need to hold ill_lock while traversing the ipif list since 2958 * we are writer 2959 */ 2960 for (tmp_ipif = ill->ill_ipif; tmp_ipif; 2961 tmp_ipif = tmp_ipif->ipif_next) { 2962 if (((tmp_ipif->ipif_flags & 2963 (IPIF_NOXMIT|IPIF_ANYCAST|IPIF_NOLOCAL|IPIF_DEPRECATED)) || 2964 !(tmp_ipif->ipif_flags & IPIF_UP)) || 2965 (tmp_ipif == ipif)) 2966 continue; 2967 /* first useable pre-existing interface */ 2968 flush_ire_cache = B_FALSE; 2969 break; 2970 } 2971 if (flush_ire_cache) 2972 ire_walk_ill_v6(MATCH_IRE_ILL | MATCH_IRE_TYPE, 2973 IRE_CACHE, ill_ipif_cache_delete, ill, ill); 2974 2975 /* 2976 * Figure out which way the send-to queue should go. Only 2977 * IRE_IF_RESOLVER or IRE_IF_NORESOLVER should show up here. 2978 */ 2979 switch (ill->ill_net_type) { 2980 case IRE_IF_RESOLVER: 2981 stq = ill->ill_rq; 2982 break; 2983 case IRE_IF_NORESOLVER: 2984 case IRE_LOOPBACK: 2985 stq = ill->ill_wq; 2986 break; 2987 default: 2988 return (EINVAL); 2989 } 2990 2991 if (IS_LOOPBACK(ill)) { 2992 /* 2993 * lo0:1 and subsequent ipifs were marked IRE_LOCAL in 2994 * ipif_lookup_on_name(), but in the case of zones we can have 2995 * several loopback addresses on lo0. So all the interfaces with 2996 * loopback addresses need to be marked IRE_LOOPBACK. 2997 */ 2998 if (IN6_ARE_ADDR_EQUAL(&ipif->ipif_v6lcl_addr, &ipv6_loopback)) 2999 ipif->ipif_ire_type = IRE_LOOPBACK; 3000 else 3001 ipif->ipif_ire_type = IRE_LOCAL; 3002 } 3003 3004 if (ipif->ipif_flags & (IPIF_NOLOCAL|IPIF_ANYCAST) || 3005 ((ipif->ipif_flags & IPIF_DEPRECATED) && 3006 !(ipif->ipif_flags & IPIF_NOFAILOVER))) { 3007 /* 3008 * Can't use our source address. Select a different 3009 * source address for the IRE_INTERFACE and IRE_LOCAL 3010 */ 3011 if (ip6_asp_can_lookup(ipst)) { 3012 ip6_asp_table_held = B_TRUE; 3013 src_ipif = ipif_select_source_v6(ipif->ipif_ill, 3014 &ipif->ipif_v6subnet, B_FALSE, 3015 IPV6_PREFER_SRC_DEFAULT, ipif->ipif_zoneid); 3016 } 3017 if (src_ipif == NULL) 3018 src_ipif = ipif; /* Last resort */ 3019 else 3020 src_ipif_held = B_TRUE; 3021 } else { 3022 src_ipif = ipif; 3023 } 3024 3025 if (!IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6lcl_addr) && 3026 !(ipif->ipif_flags & IPIF_NOLOCAL)) { 3027 3028 /* 3029 * If we're on a labeled system then make sure that zone- 3030 * private addresses have proper remote host database entries. 3031 */ 3032 if (is_system_labeled() && 3033 ipif->ipif_ire_type != IRE_LOOPBACK) { 3034 if (ip6opt_ls == 0) { 3035 cmn_err(CE_WARN, "IPv6 not enabled " 3036 "via /etc/system"); 3037 return (EINVAL); 3038 } 3039 if (!tsol_check_interface_address(ipif)) 3040 return (EINVAL); 3041 } 3042 3043 /* Register the source address for __sin6_src_id */ 3044 err = ip_srcid_insert(&ipif->ipif_v6lcl_addr, 3045 ipif->ipif_zoneid, ipst); 3046 if (err != 0) { 3047 ip0dbg(("ipif_up_done_v6: srcid_insert %d\n", err)); 3048 if (src_ipif_held) 3049 ipif_refrele(src_ipif); 3050 if (ip6_asp_table_held) 3051 ip6_asp_table_refrele(ipst); 3052 return (err); 3053 } 3054 /* 3055 * If the interface address is set, create the LOCAL 3056 * or LOOPBACK IRE. 3057 */ 3058 ip1dbg(("ipif_up_done_v6: creating IRE %d for %s\n", 3059 ipif->ipif_ire_type, 3060 inet_ntop(AF_INET6, &ipif->ipif_v6lcl_addr, 3061 buf, sizeof (buf)))); 3062 3063 *irep++ = ire_create_v6( 3064 &ipif->ipif_v6lcl_addr, /* dest address */ 3065 &ipv6_all_ones, /* mask */ 3066 &src_ipif->ipif_v6src_addr, /* source address */ 3067 NULL, /* no gateway */ 3068 &ip_loopback_mtu_v6plus, /* max frag size */ 3069 NULL, 3070 ipif->ipif_rq, /* recv-from queue */ 3071 NULL, /* no send-to queue */ 3072 ipif->ipif_ire_type, /* LOCAL or LOOPBACK */ 3073 ipif, /* interface */ 3074 NULL, 3075 0, 3076 0, 3077 (ipif->ipif_flags & IPIF_PRIVATE) ? RTF_PRIVATE : 0, 3078 &ire_uinfo_null, 3079 NULL, 3080 NULL, 3081 ipst); 3082 } 3083 3084 /* 3085 * Set up the IRE_IF_RESOLVER or IRE_IF_NORESOLVER, as appropriate. 3086 * Note that atun interfaces have an all-zero ipif_v6subnet. 3087 * Thus we allow a zero subnet as long as the mask is non-zero. 3088 */ 3089 if (stq != NULL && !(ipif->ipif_flags & IPIF_NOXMIT) && 3090 !(IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6subnet) && 3091 IN6_IS_ADDR_UNSPECIFIED(&ipif->ipif_v6net_mask))) { 3092 /* ipif_v6subnet is ipif_v6pp_dst_addr for pt-pt */ 3093 v6addr = ipif->ipif_v6subnet; 3094 3095 if (ipif->ipif_flags & IPIF_POINTOPOINT) { 3096 route_mask = ipv6_all_ones; 3097 } else { 3098 route_mask = ipif->ipif_v6net_mask; 3099 } 3100 3101 ip1dbg(("ipif_up_done_v6: creating if IRE %d for %s\n", 3102 ill->ill_net_type, 3103 inet_ntop(AF_INET6, &v6addr, buf, sizeof (buf)))); 3104 3105 *irep++ = ire_create_v6( 3106 &v6addr, /* dest pref */ 3107 &route_mask, /* mask */ 3108 &src_ipif->ipif_v6src_addr, /* src addr */ 3109 NULL, /* no gateway */ 3110 &ipif->ipif_mtu, /* max frag */ 3111 NULL, /* no src nce */ 3112 NULL, /* no recv from queue */ 3113 stq, /* send-to queue */ 3114 ill->ill_net_type, /* IF_[NO]RESOLVER */ 3115 ipif, 3116 NULL, 3117 0, 3118 0, 3119 (ipif->ipif_flags & IPIF_PRIVATE) ? RTF_PRIVATE : 0, 3120 &ire_uinfo_null, 3121 NULL, 3122 NULL, 3123 ipst); 3124 } 3125 3126 /* 3127 * Setup 2002::/16 route, if this interface is a 6to4 tunnel 3128 */ 3129 if (IN6_IS_ADDR_6TO4(&ipif->ipif_v6lcl_addr) && 3130 (ill->ill_is_6to4tun)) { 3131 /* 3132 * Destination address is 2002::/16 3133 */ 3134 #ifdef _BIG_ENDIAN 3135 const in6_addr_t prefix_addr = { 0x20020000U, 0, 0, 0 }; 3136 const in6_addr_t prefix_mask = { 0xffff0000U, 0, 0, 0 }; 3137 #else 3138 const in6_addr_t prefix_addr = { 0x00000220U, 0, 0, 0 }; 3139 const in6_addr_t prefix_mask = { 0x0000ffffU, 0, 0, 0 }; 3140 #endif /* _BIG_ENDIAN */ 3141 char buf2[INET6_ADDRSTRLEN]; 3142 ire_t *isdup; 3143 in6_addr_t *first_addr = &ill->ill_ipif->ipif_v6lcl_addr; 3144 3145 /* 3146 * check to see if this route has already been added for 3147 * this tunnel interface. 3148 */ 3149 isdup = ire_ftable_lookup_v6(first_addr, &prefix_mask, 0, 3150 IRE_IF_NORESOLVER, ill->ill_ipif, NULL, ALL_ZONES, 0, NULL, 3151 (MATCH_IRE_SRC | MATCH_IRE_MASK), ipst); 3152 3153 if (isdup == NULL) { 3154 ip1dbg(("ipif_up_done_v6: creating if IRE %d for %s", 3155 IRE_IF_NORESOLVER, inet_ntop(AF_INET6, &v6addr, 3156 buf2, sizeof (buf2)))); 3157 3158 *irep++ = ire_create_v6( 3159 &prefix_addr, /* 2002:: */ 3160 &prefix_mask, /* ffff:: */ 3161 &ipif->ipif_v6lcl_addr, /* src addr */ 3162 NULL, /* gateway */ 3163 &ipif->ipif_mtu, /* max_frag */ 3164 NULL, /* no src nce */ 3165 NULL, /* no rfq */ 3166 ill->ill_wq, /* stq */ 3167 IRE_IF_NORESOLVER, /* type */ 3168 ipif, /* interface */ 3169 NULL, /* v6cmask */ 3170 0, 3171 0, 3172 RTF_UP, 3173 &ire_uinfo_null, 3174 NULL, 3175 NULL, 3176 ipst); 3177 } else { 3178 ire_refrele(isdup); 3179 } 3180 } 3181 3182 /* If an earlier ire_create failed, get out now */ 3183 for (irep1 = irep; irep1 > ire_array; ) { 3184 irep1--; 3185 if (*irep1 == NULL) { 3186 ip1dbg(("ipif_up_done_v6: NULL ire found in" 3187 " ire_array\n")); 3188 err = ENOMEM; 3189 goto bad; 3190 } 3191 } 3192 3193 ASSERT(!MUTEX_HELD(&ipif->ipif_ill->ill_lock)); 3194 3195 /* 3196 * Need to atomically check for IP address availability under 3197 * ip_addr_avail_lock. ill_g_lock is held as reader to ensure no new 3198 * ills or new ipifs can be added while we are checking availability. 3199 */ 3200 rw_enter(&ipst->ips_ill_g_lock, RW_READER); 3201 mutex_enter(&ipst->ips_ip_addr_avail_lock); 3202 ill->ill_ipif_up_count++; 3203 ipif->ipif_flags |= IPIF_UP; 3204 err = ip_addr_availability_check(ipif); 3205 mutex_exit(&ipst->ips_ip_addr_avail_lock); 3206 rw_exit(&ipst->ips_ill_g_lock); 3207 3208 if (err != 0) { 3209 /* 3210 * Our address may already be up on the same ill. In this case, 3211 * the external resolver entry for our ipif replaced the one for 3212 * the other ipif. So we don't want to delete it (otherwise the 3213 * other ipif would be unable to send packets). 3214 * ip_addr_availability_check() identifies this case for us and 3215 * returns EADDRINUSE; we need to turn it into EADDRNOTAVAIL 3216 * which is the expected error code. 3217 */ 3218 if (err == EADDRINUSE) { 3219 if (ipif->ipif_ill->ill_flags & ILLF_XRESOLV) { 3220 freemsg(ipif->ipif_arp_del_mp); 3221 ipif->ipif_arp_del_mp = NULL; 3222 } 3223 err = EADDRNOTAVAIL; 3224 } 3225 ill->ill_ipif_up_count--; 3226 ipif->ipif_flags &= ~IPIF_UP; 3227 goto bad; 3228 } 3229 3230 /* 3231 * Add in all newly created IREs. 3232 * 3233 * NOTE : We refrele the ire though we may branch to "bad" 3234 * later on where we do ire_delete. This is okay 3235 * because nobody can delete it as we are running 3236 * exclusively. 3237 */ 3238 for (irep1 = irep; irep1 > ire_array; ) { 3239 irep1--; 3240 /* Shouldn't be adding any bcast ire's */ 3241 ASSERT((*irep1)->ire_type != IRE_BROADCAST); 3242 ASSERT(!MUTEX_HELD(&ipif->ipif_ill->ill_lock)); 3243 /* 3244 * refheld by ire_add. refele towards the end of the func 3245 */ 3246 (void) ire_add(irep1, NULL, NULL, NULL, B_FALSE); 3247 } 3248 if (ip6_asp_table_held) { 3249 ip6_asp_table_refrele(ipst); 3250 ip6_asp_table_held = B_FALSE; 3251 } 3252 3253 /* Recover any additional IRE_IF_[NO]RESOLVER entries for this ipif */ 3254 ipif_saved_ire_cnt = ipif->ipif_saved_ire_cnt; 3255 ipif_saved_irep = ipif_recover_ire_v6(ipif); 3256 3257 if (ill->ill_need_recover_multicast) { 3258 /* 3259 * Need to recover all multicast memberships in the driver. 3260 * This had to be deferred until we had attached. 3261 */ 3262 ill_recover_multicast(ill); 3263 } 3264 3265 if (ill->ill_ipif_up_count == 1) { 3266 /* 3267 * Since the interface is now up, it may now be active. 3268 */ 3269 if (IS_UNDER_IPMP(ill)) 3270 ipmp_ill_refresh_active(ill); 3271 } 3272 3273 /* Join the allhosts multicast address and the solicited node MC */ 3274 ipif_multicast_up(ipif); 3275 3276 /* 3277 * See if anybody else would benefit from our new ipif. 3278 */ 3279 if (!loopback && 3280 !(ipif->ipif_flags & (IPIF_NOLOCAL|IPIF_ANYCAST|IPIF_DEPRECATED))) { 3281 ill_update_source_selection(ill); 3282 } 3283 3284 for (irep1 = irep; irep1 > ire_array; ) { 3285 irep1--; 3286 if (*irep1 != NULL) { 3287 /* was held in ire_add */ 3288 ire_refrele(*irep1); 3289 } 3290 } 3291 3292 cnt = ipif_saved_ire_cnt; 3293 for (irep1 = ipif_saved_irep; cnt > 0; irep1++, cnt--) { 3294 if (*irep1 != NULL) { 3295 /* was held in ire_add */ 3296 ire_refrele(*irep1); 3297 } 3298 } 3299 3300 if (ipif->ipif_addr_ready) 3301 ipif_up_notify(ipif); 3302 3303 if (ipif_saved_irep != NULL) { 3304 kmem_free(ipif_saved_irep, 3305 ipif_saved_ire_cnt * sizeof (ire_t *)); 3306 } 3307 3308 if (src_ipif_held) 3309 ipif_refrele(src_ipif); 3310 3311 return (0); 3312 3313 bad: 3314 if (ip6_asp_table_held) 3315 ip6_asp_table_refrele(ipst); 3316 3317 while (irep > ire_array) { 3318 irep--; 3319 if (*irep != NULL) 3320 ire_delete(*irep); 3321 } 3322 (void) ip_srcid_remove(&ipif->ipif_v6lcl_addr, ipif->ipif_zoneid, ipst); 3323 3324 if (ipif_saved_irep != NULL) { 3325 kmem_free(ipif_saved_irep, 3326 ipif_saved_ire_cnt * sizeof (ire_t *)); 3327 } 3328 if (src_ipif_held) 3329 ipif_refrele(src_ipif); 3330 3331 ipif_ndp_down(ipif); 3332 ipif_resolver_down(ipif); 3333 3334 return (err); 3335 } 3336 3337 /* 3338 * Delete an ND entry and the corresponding IRE_CACHE entry if it exists. 3339 */ 3340 /* ARGSUSED */ 3341 int 3342 ip_siocdelndp_v6(ipif_t *ipif, sin_t *dummy_sin, queue_t *q, mblk_t *mp, 3343 ip_ioctl_cmd_t *ipip, void *dummy_ifreq) 3344 { 3345 sin6_t *sin6; 3346 nce_t *nce; 3347 struct lifreq *lifr; 3348 lif_nd_req_t *lnr; 3349 ill_t *ill = ipif->ipif_ill; 3350 ire_t *ire; 3351 3352 lifr = (struct lifreq *)mp->b_cont->b_cont->b_rptr; 3353 lnr = &lifr->lifr_nd; 3354 /* Only allow for logical unit zero i.e. not on "le0:17" */ 3355 if (ipif->ipif_id != 0) 3356 return (EINVAL); 3357 3358 if (!ipif->ipif_isv6) 3359 return (EINVAL); 3360 3361 if (lnr->lnr_addr.ss_family != AF_INET6) 3362 return (EAFNOSUPPORT); 3363 3364 sin6 = (sin6_t *)&lnr->lnr_addr; 3365 3366 /* 3367 * Since ND mappings must be consistent across an IPMP group, prohibit 3368 * deleting ND mappings on underlying interfaces. Also, since ND 3369 * mappings for IPMP data addresses are owned by IP itself, prohibit 3370 * deleting them. 3371 */ 3372 if (IS_UNDER_IPMP(ill)) 3373 return (EPERM); 3374 3375 if (IS_IPMP(ill)) { 3376 ire = ire_ctable_lookup_v6(&sin6->sin6_addr, NULL, IRE_LOCAL, 3377 ipif, ALL_ZONES, NULL, MATCH_IRE_TYPE | MATCH_IRE_ILL, 3378 ill->ill_ipst); 3379 if (ire != NULL) { 3380 ire_refrele(ire); 3381 return (EPERM); 3382 } 3383 } 3384 3385 /* See comment in ndp_query() regarding IS_IPMP(ill) usage */ 3386 nce = ndp_lookup_v6(ill, IS_IPMP(ill), &sin6->sin6_addr, B_FALSE); 3387 if (nce == NULL) 3388 return (ESRCH); 3389 ndp_delete(nce); 3390 NCE_REFRELE(nce); 3391 return (0); 3392 } 3393 3394 /* 3395 * Return nbr cache info. 3396 */ 3397 /* ARGSUSED */ 3398 int 3399 ip_siocqueryndp_v6(ipif_t *ipif, sin_t *dummy_sin, queue_t *q, mblk_t *mp, 3400 ip_ioctl_cmd_t *ipip, void *dummy_ifreq) 3401 { 3402 ill_t *ill = ipif->ipif_ill; 3403 struct lifreq *lifr; 3404 lif_nd_req_t *lnr; 3405 3406 lifr = (struct lifreq *)mp->b_cont->b_cont->b_rptr; 3407 lnr = &lifr->lifr_nd; 3408 /* Only allow for logical unit zero i.e. not on "le0:17" */ 3409 if (ipif->ipif_id != 0) 3410 return (EINVAL); 3411 3412 if (!ipif->ipif_isv6) 3413 return (EINVAL); 3414 3415 if (lnr->lnr_addr.ss_family != AF_INET6) 3416 return (EAFNOSUPPORT); 3417 3418 if (ill->ill_phys_addr_length > sizeof (lnr->lnr_hdw_addr)) 3419 return (EINVAL); 3420 3421 return (ndp_query(ill, lnr)); 3422 } 3423 3424 /* 3425 * Perform an update of the nd entry for the specified address. 3426 */ 3427 /* ARGSUSED */ 3428 int 3429 ip_siocsetndp_v6(ipif_t *ipif, sin_t *dummy_sin, queue_t *q, mblk_t *mp, 3430 ip_ioctl_cmd_t *ipip, void *dummy_ifreq) 3431 { 3432 sin6_t *sin6; 3433 ill_t *ill = ipif->ipif_ill; 3434 struct lifreq *lifr; 3435 lif_nd_req_t *lnr; 3436 ire_t *ire; 3437 3438 lifr = (struct lifreq *)mp->b_cont->b_cont->b_rptr; 3439 lnr = &lifr->lifr_nd; 3440 /* Only allow for logical unit zero i.e. not on "le0:17" */ 3441 if (ipif->ipif_id != 0) 3442 return (EINVAL); 3443 3444 if (!ipif->ipif_isv6) 3445 return (EINVAL); 3446 3447 if (lnr->lnr_addr.ss_family != AF_INET6) 3448 return (EAFNOSUPPORT); 3449 3450 sin6 = (sin6_t *)&lnr->lnr_addr; 3451 3452 /* 3453 * Since ND mappings must be consistent across an IPMP group, prohibit 3454 * updating ND mappings on underlying interfaces. Also, since ND 3455 * mappings for IPMP data addresses are owned by IP itself, prohibit 3456 * updating them. 3457 */ 3458 if (IS_UNDER_IPMP(ill)) 3459 return (EPERM); 3460 3461 if (IS_IPMP(ill)) { 3462 ire = ire_ctable_lookup_v6(&sin6->sin6_addr, NULL, IRE_LOCAL, 3463 ipif, ALL_ZONES, NULL, MATCH_IRE_TYPE | MATCH_IRE_ILL, 3464 ill->ill_ipst); 3465 if (ire != NULL) { 3466 ire_refrele(ire); 3467 return (EPERM); 3468 } 3469 } 3470 3471 return (ndp_sioc_update(ill, lnr)); 3472 } 3473