in6_pcb.c revision 1.32
1 /* $NetBSD: in6_pcb.c,v 1.32 2000/10/19 20:23:02 itojun Exp $ */ 2 /* $KAME: in6_pcb.c,v 1.64 2000/10/01 12:37:20 itojun Exp $ */ 3 4 /* 5 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project. 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. Neither the name of the project nor the names of its contributors 17 * may be used to endorse or promote products derived from this software 18 * without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 */ 32 33 /* 34 * Copyright (c) 1982, 1986, 1991, 1993 35 * The Regents of the University of California. All rights reserved. 36 * 37 * Redistribution and use in source and binary forms, with or without 38 * modification, are permitted provided that the following conditions 39 * are met: 40 * 1. Redistributions of source code must retain the above copyright 41 * notice, this list of conditions and the following disclaimer. 42 * 2. Redistributions in binary form must reproduce the above copyright 43 * notice, this list of conditions and the following disclaimer in the 44 * documentation and/or other materials provided with the distribution. 45 * 3. All advertising materials mentioning features or use of this software 46 * must display the following acknowledgement: 47 * This product includes software developed by the University of 48 * California, Berkeley and its contributors. 49 * 4. Neither the name of the University nor the names of its contributors 50 * may be used to endorse or promote products derived from this software 51 * without specific prior written permission. 52 * 53 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 54 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 55 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 56 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 57 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 58 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 59 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 60 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 61 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 62 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 63 * SUCH DAMAGE. 64 * 65 * @(#)in_pcb.c 8.2 (Berkeley) 1/4/94 66 */ 67 68 #include "opt_ipsec.h" 69 70 #include <sys/param.h> 71 #include <sys/systm.h> 72 #include <sys/malloc.h> 73 #include <sys/mbuf.h> 74 #include <sys/protosw.h> 75 #include <sys/socket.h> 76 #include <sys/socketvar.h> 77 #include <sys/ioctl.h> 78 #include <sys/errno.h> 79 #include <sys/time.h> 80 #include <sys/proc.h> 81 82 #include <net/if.h> 83 #include <net/route.h> 84 85 #include <netinet/in.h> 86 #include <netinet/in_var.h> 87 #include <netinet/in_systm.h> 88 #include <netinet/ip.h> 89 #include <netinet/in_pcb.h> 90 #include <netinet/ip6.h> 91 #include <netinet6/ip6_var.h> 92 #include <netinet6/in6_pcb.h> 93 #include <netinet6/nd6.h> 94 95 #include "loop.h" 96 extern struct ifnet loif[NLOOP]; 97 #include "faith.h" 98 99 #ifdef IPSEC 100 #include <netinet6/ipsec.h> 101 #include <netkey/key.h> 102 #endif /* IPSEC */ 103 104 struct in6_addr zeroin6_addr; 105 106 int ip6_anonportmin = IPV6PORT_ANONMIN; 107 int ip6_anonportmax = IPV6PORT_ANONMAX; 108 int ip6_lowportmin = IPV6PORT_RESERVEDMIN; 109 int ip6_lowportmax = IPV6PORT_RESERVEDMAX; 110 111 int 112 in6_pcballoc(so, head) 113 struct socket *so; 114 struct in6pcb *head; 115 { 116 struct in6pcb *in6p; 117 118 MALLOC(in6p, struct in6pcb *, sizeof(*in6p), M_PCB, M_NOWAIT); 119 if (in6p == NULL) 120 return(ENOBUFS); 121 bzero((caddr_t)in6p, sizeof(*in6p)); 122 in6p->in6p_head = head; 123 in6p->in6p_socket = so; 124 in6p->in6p_hops = -1; /* use kernel default */ 125 in6p->in6p_icmp6filt = NULL; 126 in6p->in6p_next = head->in6p_next; 127 head->in6p_next = in6p; 128 in6p->in6p_prev = head; 129 in6p->in6p_next->in6p_prev = in6p; 130 #ifndef INET6_BINDV6ONLY 131 if (ip6_bindv6only) 132 in6p->in6p_flags |= IN6P_BINDV6ONLY; 133 #else 134 in6p->in6p_flags |= IN6P_BINDV6ONLY; /*just for safety*/ 135 #endif 136 so->so_pcb = (caddr_t)in6p; 137 return(0); 138 } 139 140 int 141 in6_pcbbind(in6p, nam, p) 142 register struct in6pcb *in6p; 143 struct mbuf *nam; 144 struct proc *p; 145 { 146 struct socket *so = in6p->in6p_socket; 147 struct in6pcb *head = in6p->in6p_head; 148 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)NULL; 149 u_int16_t lport = 0; 150 int wild = 0, reuseport = (so->so_options & SO_REUSEPORT); 151 152 if (in6p->in6p_lport || !IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr)) 153 return(EINVAL); 154 if ((so->so_options & (SO_REUSEADDR|SO_REUSEPORT)) == 0 && 155 ((so->so_proto->pr_flags & PR_CONNREQUIRED) == 0 || 156 (so->so_options & SO_ACCEPTCONN) == 0)) 157 wild = IN6PLOOKUP_WILDCARD; 158 if (nam) { 159 sin6 = mtod(nam, struct sockaddr_in6 *); 160 if (nam->m_len != sizeof(*sin6)) 161 return(EINVAL); 162 /* 163 * We should check the family, but old programs 164 * incorrectly fail to intialize it. 165 */ 166 if (sin6->sin6_family != AF_INET6) 167 return(EAFNOSUPPORT); 168 169 /* 170 * since we do not check port number duplicate with IPv4 space, 171 * we reject it at this moment. If we leave it, we make normal 172 * user to hijack port number from other users. 173 */ 174 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) 175 return(EADDRNOTAVAIL); 176 177 /* KAME hack: embed scopeid */ 178 if (in6_embedscope(&sin6->sin6_addr, sin6, in6p, NULL) != 0) 179 return EINVAL; 180 /* this must be cleared for ifa_ifwithaddr() */ 181 sin6->sin6_scope_id = 0; 182 183 lport = sin6->sin6_port; 184 if (IN6_IS_ADDR_MULTICAST(&sin6->sin6_addr)) { 185 /* 186 * Treat SO_REUSEADDR as SO_REUSEPORT for multicast; 187 * allow compepte duplication of binding if 188 * SO_REUSEPORT is set, or if SO_REUSEADDR is set 189 * and a multicast address is bound on both 190 * new and duplicated sockets. 191 */ 192 if (so->so_options & SO_REUSEADDR) 193 reuseport = SO_REUSEADDR|SO_REUSEPORT; 194 } else if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 195 struct sockaddr_in sin; 196 197 bzero(&sin, sizeof(sin)); 198 sin.sin_len = sizeof(sin); 199 sin.sin_family = AF_INET; 200 bcopy(&sin6->sin6_addr.s6_addr32[3], &sin.sin_addr, 201 sizeof(sin.sin_addr)); 202 if (ifa_ifwithaddr((struct sockaddr *)&sin) == 0) 203 return EADDRNOTAVAIL; 204 } else if (!IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) { 205 struct ifaddr *ia = NULL; 206 207 sin6->sin6_port = 0; /* yech... */ 208 #if defined(NFAITH) && NFAITH > 0 209 if ((in6p->in6p_flags & IN6P_FAITH) == 0 210 && (ia = ifa_ifwithaddr((struct sockaddr *)sin6)) == 0) 211 #else 212 if ((ia = ifa_ifwithaddr((struct sockaddr *)sin6)) == 0) 213 #endif 214 return(EADDRNOTAVAIL); 215 216 /* 217 * XXX: bind to an anycast address might accidentally 218 * cause sending a packet with anycast source address. 219 */ 220 if (ia && 221 ((struct in6_ifaddr *)ia)->ia6_flags & 222 (IN6_IFF_ANYCAST|IN6_IFF_NOTREADY| 223 IN6_IFF_DETACHED|IN6_IFF_DEPRECATED)) { 224 return(EADDRNOTAVAIL); 225 } 226 } 227 if (lport) { 228 #ifndef IPNOPRIVPORTS 229 int priv; 230 231 /* 232 * NOTE: all operating systems use suser() for 233 * privilege check! do not rewrite it into SS_PRIV. 234 */ 235 priv = (p && !suser(p->p_ucred, &p->p_acflag)) ? 1 : 0; 236 /* GROSS */ 237 if (ntohs(lport) < IPV6PORT_RESERVED && !priv) 238 return(EACCES); 239 #endif 240 241 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 242 /* should check this but we can't ... */ 243 #if 0 244 struct inpcb *t; 245 246 t = in_pcblookup_bind(&tcbtable, 247 (struct in_addr *)&sin6->sin6_addr.s6_addr32[3], 248 lport); 249 if (t && (reuseport & t->inp_socket->so_options) == 0) 250 return EADDRINUSE; 251 #endif 252 } else { 253 struct in6pcb *t; 254 255 t = in6_pcblookup(head, &zeroin6_addr, 0, 256 &sin6->sin6_addr, lport, wild); 257 if (t && (reuseport & t->in6p_socket->so_options) == 0) 258 return(EADDRINUSE); 259 } 260 } 261 in6p->in6p_laddr = sin6->sin6_addr; 262 } 263 264 if (lport == 0) { 265 int e; 266 if ((e = in6_pcbsetport(&in6p->in6p_laddr, in6p)) != 0) 267 return(e); 268 } 269 else 270 in6p->in6p_lport = lport; 271 272 in6p->in6p_flowinfo = sin6 ? sin6->sin6_flowinfo : 0; /*XXX*/ 273 return(0); 274 } 275 276 /* 277 * Connect from a socket to a specified address. 278 * Both address and port must be specified in argument sin6. 279 * If don't have a local address for this socket yet, 280 * then pick one. 281 */ 282 int 283 in6_pcbconnect(in6p, nam) 284 struct in6pcb *in6p; 285 struct mbuf *nam; 286 { 287 struct in6_addr *in6a = NULL; 288 struct sockaddr_in6 *sin6 = mtod(nam, struct sockaddr_in6 *); 289 struct ifnet *ifp = NULL; /* outgoing interface */ 290 int error = 0; 291 #ifdef INET 292 struct in6_addr mapped; 293 #endif 294 struct sockaddr_in6 tmp; 295 296 (void)&in6a; /* XXX fool gcc */ 297 298 if (nam->m_len != sizeof(*sin6)) 299 return(EINVAL); 300 if (sin6->sin6_family != AF_INET6) 301 return(EAFNOSUPPORT); 302 if (sin6->sin6_port == 0) 303 return(EADDRNOTAVAIL); 304 305 /* sanity check for mapped address case */ 306 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 307 if (IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr)) 308 in6p->in6p_laddr.s6_addr16[5] = htons(0xffff); 309 if (!IN6_IS_ADDR_V4MAPPED(&in6p->in6p_laddr)) 310 return EINVAL; 311 } else { 312 if (IN6_IS_ADDR_V4MAPPED(&in6p->in6p_laddr)) 313 return EINVAL; 314 } 315 316 /* protect *sin6 from overwrites */ 317 tmp = *sin6; 318 sin6 = &tmp; 319 320 /* KAME hack: embed scopeid */ 321 if (in6_embedscope(&sin6->sin6_addr, sin6, in6p, &ifp) != 0) 322 return EINVAL; 323 324 /* Source address selection. */ 325 if (IN6_IS_ADDR_V4MAPPED(&in6p->in6p_laddr) 326 && in6p->in6p_laddr.s6_addr32[3] == 0) { 327 #ifdef INET 328 struct sockaddr_in sin, *sinp; 329 330 bzero(&sin, sizeof(sin)); 331 sin.sin_len = sizeof(sin); 332 sin.sin_family = AF_INET; 333 bcopy(&sin6->sin6_addr.s6_addr32[3], &sin.sin_addr, 334 sizeof(sin.sin_addr)); 335 sinp = in_selectsrc(&sin, (struct route *)&in6p->in6p_route, 336 in6p->in6p_socket->so_options, NULL, &error); 337 if (sinp == 0) { 338 if (error == 0) 339 error = EADDRNOTAVAIL; 340 return(error); 341 } 342 bzero(&mapped, sizeof(mapped)); 343 mapped.s6_addr16[5] = htons(0xffff); 344 bcopy(&sinp->sin_addr, &mapped.s6_addr32[3], sizeof(sinp->sin_addr)); 345 in6a = &mapped; 346 #else 347 return EADDRNOTAVAIL; 348 #endif 349 } else { 350 /* 351 * XXX: in6_selectsrc might replace the bound local address 352 * with the address specified by setsockopt(IPV6_PKTINFO). 353 * Is it the intended behavior? 354 */ 355 in6a = in6_selectsrc(sin6, in6p->in6p_outputopts, 356 in6p->in6p_moptions, 357 &in6p->in6p_route, 358 &in6p->in6p_laddr, &error); 359 if (in6a == 0) { 360 if (error == 0) 361 error = EADDRNOTAVAIL; 362 return(error); 363 } 364 } 365 if (in6p->in6p_route.ro_rt) 366 ifp = in6p->in6p_route.ro_rt->rt_ifp; 367 368 in6p->in6p_ip6.ip6_hlim = (u_int8_t)in6_selecthlim(in6p, ifp); 369 370 if (in6_pcblookup(in6p->in6p_head, 371 &sin6->sin6_addr, 372 sin6->sin6_port, 373 IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr) ? 374 in6a : &in6p->in6p_laddr, 375 in6p->in6p_lport, 376 0)) 377 return(EADDRINUSE); 378 if (IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr) 379 || (IN6_IS_ADDR_V4MAPPED(&in6p->in6p_laddr) 380 && in6p->in6p_laddr.s6_addr32[3] == 0)) { 381 if (in6p->in6p_lport == 0) { 382 #ifdef __NetBSD__ 383 (void)in6_pcbbind(in6p, (struct mbuf *)0, 384 (struct proc *)0); 385 #else 386 (void)in6_pcbbind(in6p, (struct mbuf *)0); 387 #endif 388 } 389 in6p->in6p_laddr = *in6a; 390 } 391 in6p->in6p_faddr = sin6->sin6_addr; 392 in6p->in6p_fport = sin6->sin6_port; 393 /* 394 * xxx kazu flowlabel is necessary for connect? 395 * but if this line is missing, the garbage value remains. 396 */ 397 in6p->in6p_flowinfo = sin6->sin6_flowinfo; 398 return(0); 399 } 400 401 void 402 in6_pcbdisconnect(in6p) 403 struct in6pcb *in6p; 404 { 405 bzero((caddr_t)&in6p->in6p_faddr, sizeof(in6p->in6p_faddr)); 406 in6p->in6p_fport = 0; 407 if (in6p->in6p_socket->so_state & SS_NOFDREF) 408 in6_pcbdetach(in6p); 409 } 410 411 void 412 in6_pcbdetach(in6p) 413 struct in6pcb *in6p; 414 { 415 struct socket *so = in6p->in6p_socket; 416 417 #ifdef IPSEC 418 ipsec6_delete_pcbpolicy(in6p); 419 #endif /* IPSEC */ 420 sotoin6pcb(so) = 0; 421 sofree(so); 422 if (in6p->in6p_options) 423 m_freem(in6p->in6p_options); 424 if (in6p->in6p_outputopts) { 425 if (in6p->in6p_outputopts->ip6po_rthdr && 426 in6p->in6p_outputopts->ip6po_route.ro_rt) 427 RTFREE(in6p->in6p_outputopts->ip6po_route.ro_rt); 428 if (in6p->in6p_outputopts->ip6po_m) 429 (void)m_free(in6p->in6p_outputopts->ip6po_m); 430 free(in6p->in6p_outputopts, M_IP6OPT); 431 } 432 if (in6p->in6p_route.ro_rt) 433 rtfree(in6p->in6p_route.ro_rt); 434 ip6_freemoptions(in6p->in6p_moptions); 435 in6p->in6p_next->in6p_prev = in6p->in6p_prev; 436 in6p->in6p_prev->in6p_next = in6p->in6p_next; 437 in6p->in6p_prev = NULL; 438 FREE(in6p, M_PCB); 439 } 440 441 void 442 in6_setsockaddr(in6p, nam) 443 struct in6pcb *in6p; 444 struct mbuf *nam; 445 { 446 struct sockaddr_in6 *sin6; 447 448 nam->m_len = sizeof(*sin6); 449 sin6 = mtod(nam, struct sockaddr_in6 *); 450 bzero((caddr_t)sin6, sizeof(*sin6)); 451 sin6->sin6_family = AF_INET6; 452 sin6->sin6_len = sizeof(struct sockaddr_in6); 453 sin6->sin6_port = in6p->in6p_lport; 454 /* KAME hack: recover scopeid */ 455 (void)in6_recoverscope(sin6, &in6p->in6p_laddr, NULL); 456 } 457 458 void 459 in6_setpeeraddr(in6p, nam) 460 struct in6pcb *in6p; 461 struct mbuf *nam; 462 { 463 struct sockaddr_in6 *sin6; 464 465 nam->m_len = sizeof(*sin6); 466 sin6 = mtod(nam, struct sockaddr_in6 *); 467 bzero((caddr_t)sin6, sizeof(*sin6)); 468 sin6->sin6_family = AF_INET6; 469 sin6->sin6_len = sizeof(struct sockaddr_in6); 470 sin6->sin6_port = in6p->in6p_fport; 471 /* KAME hack: recover scopeid */ 472 (void)in6_recoverscope(sin6, &in6p->in6p_faddr, NULL); 473 } 474 475 /* 476 * Pass some notification to all connections of a protocol 477 * associated with address dst. The local address and/or port numbers 478 * may be specified to limit the search. The "usual action" will be 479 * taken, depending on the ctlinput cmd. The caller must filter any 480 * cmds that are uninteresting (e.g., no error in the map). 481 * Call the protocol specific routine (if any) to report 482 * any errors for each matching socket. 483 * 484 * Must be called at splsoftnet. 485 */ 486 int 487 in6_pcbnotify(head, dst, fport_arg, laddr6, lport_arg, cmd, notify) 488 struct in6pcb *head; 489 struct sockaddr *dst; 490 u_int fport_arg, lport_arg; 491 struct in6_addr *laddr6; 492 int cmd; 493 void (*notify) __P((struct in6pcb *, int)); 494 { 495 struct in6pcb *in6p, *nin6p; 496 struct in6_addr faddr6; 497 u_int16_t fport = fport_arg, lport = lport_arg; 498 int errno; 499 int nmatch = 0; 500 int do_rtchange = (notify == in6_rtchange); 501 502 if ((unsigned)cmd > PRC_NCMDS || dst->sa_family != AF_INET6) 503 return 0; 504 faddr6 = ((struct sockaddr_in6 *)dst)->sin6_addr; 505 if (IN6_IS_ADDR_UNSPECIFIED(&faddr6)) 506 return 0; 507 508 /* 509 * Redirects go to all references to the destination, 510 * and use in6_rtchange to invalidate the route cache. 511 * Dead host indications: also use in6_rtchange to invalidate 512 * the cache, and deliver the error to all the sockets. 513 * Otherwise, if we have knowledge of the local port and address, 514 * deliver only to that socket. 515 */ 516 if (PRC_IS_REDIRECT(cmd) || cmd == PRC_HOSTDEAD) { 517 fport = 0; 518 lport = 0; 519 bzero((caddr_t)laddr6, sizeof(*laddr6)); 520 521 do_rtchange = 1; 522 } 523 524 if (notify == NULL) 525 return 0; 526 527 errno = inet6ctlerrmap[cmd]; 528 for (in6p = head->in6p_next; in6p != head; in6p = nin6p) { 529 nin6p = in6p->in6p_next; 530 531 if (do_rtchange) { 532 /* 533 * Since a non-connected PCB might have a cached route, 534 * we always call in6_rtchange without matching 535 * the PCB to the src/dst pair. 536 * 537 * XXX: we assume in6_rtchange does not free the PCB. 538 */ 539 if (IN6_ARE_ADDR_EQUAL(&in6p->in6p_route.ro_dst.sin6_addr, 540 &faddr6)) 541 in6_rtchange(in6p, errno); 542 543 if (notify == in6_rtchange) 544 continue; /* there's nothing to do any more */ 545 } 546 547 /* at this point, we can assume that NOTIFY is not NULL. */ 548 549 if (!IN6_ARE_ADDR_EQUAL(&in6p->in6p_faddr, &faddr6) || 550 in6p->in6p_socket == 0 || 551 (lport && in6p->in6p_lport != lport) || 552 (!IN6_IS_ADDR_UNSPECIFIED(laddr6) && 553 !IN6_ARE_ADDR_EQUAL(&in6p->in6p_laddr, laddr6)) || 554 (fport && in6p->in6p_fport != fport)) 555 continue; 556 557 (*notify)(in6p, errno); 558 nmatch++; 559 } 560 return nmatch; 561 } 562 563 void 564 in6_pcbpurgeif(head, ifp) 565 struct in6pcb *head; 566 struct ifnet *ifp; 567 { 568 struct in6pcb *in6p, *nin6p; 569 570 for (in6p = head->in6p_next; in6p != head; in6p = nin6p) { 571 nin6p = in6p->in6p_next; 572 if (in6p->in6p_route.ro_rt != NULL && 573 in6p->in6p_route.ro_rt->rt_ifp == ifp) 574 in6_rtchange(in6p, 0); 575 } 576 } 577 578 /* 579 * Check for alternatives when higher level complains 580 * about service problems. For now, invalidate cached 581 * routing information. If the route was created dynamically 582 * (by a redirect), time to try a default gateway again. 583 */ 584 void 585 in6_losing(in6p) 586 struct in6pcb *in6p; 587 { 588 struct rtentry *rt; 589 struct rt_addrinfo info; 590 591 if ((rt = in6p->in6p_route.ro_rt) != NULL) { 592 in6p->in6p_route.ro_rt = 0; 593 bzero((caddr_t)&info, sizeof(info)); 594 info.rti_info[RTAX_DST] = 595 (struct sockaddr *)&in6p->in6p_route.ro_dst; 596 info.rti_info[RTAX_GATEWAY] = rt->rt_gateway; 597 info.rti_info[RTAX_NETMASK] = rt_mask(rt); 598 rt_missmsg(RTM_LOSING, &info, rt->rt_flags, 0); 599 if (rt->rt_flags & RTF_DYNAMIC) 600 (void)rtrequest(RTM_DELETE, rt_key(rt), 601 rt->rt_gateway, rt_mask(rt), rt->rt_flags, 602 (struct rtentry **)0); 603 else 604 /* 605 * A new route can be allocated 606 * the next time output is attempted. 607 */ 608 rtfree(rt); 609 } 610 } 611 612 /* 613 * After a routing change, flush old routing 614 * and allocate a (hopefully) better one. 615 */ 616 void 617 in6_rtchange(in6p, errno) 618 struct in6pcb *in6p; 619 int errno; 620 { 621 if (in6p->in6p_route.ro_rt) { 622 rtfree(in6p->in6p_route.ro_rt); 623 in6p->in6p_route.ro_rt = 0; 624 /* 625 * A new route can be allocated the next time 626 * output is attempted. 627 */ 628 } 629 } 630 631 struct in6pcb * 632 in6_pcblookup(head, faddr6, fport_arg, laddr6, lport_arg, flags) 633 struct in6pcb *head; 634 struct in6_addr *faddr6, *laddr6; 635 u_int fport_arg, lport_arg; 636 int flags; 637 { 638 struct in6pcb *in6p, *match = 0; 639 int matchwild = 3, wildcard; 640 u_int16_t fport = fport_arg, lport = lport_arg; 641 642 for (in6p = head->in6p_next; in6p != head; in6p = in6p->in6p_next) { 643 if (in6p->in6p_lport != lport) 644 continue; 645 wildcard = 0; 646 if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr)) { 647 if (IN6_IS_ADDR_UNSPECIFIED(laddr6)) 648 wildcard++; 649 else if (!IN6_ARE_ADDR_EQUAL(&in6p->in6p_laddr, laddr6)) 650 continue; 651 } 652 else if (IN6_IS_ADDR_V4MAPPED(&in6p->in6p_laddr) 653 && in6p->in6p_laddr.s6_addr32[3] == 0) { 654 if (!IN6_IS_ADDR_V4MAPPED(laddr6)) 655 continue; 656 if (laddr6->s6_addr32[3] == 0) 657 ; 658 else 659 wildcard++; 660 } 661 else { 662 if (IN6_IS_ADDR_V4MAPPED(laddr6)) { 663 #ifndef INET6_BINDV6ONLY 664 if (in6p->in6p_flags & IN6P_BINDV6ONLY) 665 continue; 666 else 667 wildcard++; 668 #else 669 continue; 670 #endif 671 } else if (!IN6_IS_ADDR_UNSPECIFIED(laddr6)) 672 wildcard++; 673 } 674 if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr)) { 675 if (IN6_IS_ADDR_UNSPECIFIED(faddr6)) 676 wildcard++; 677 else if (!IN6_ARE_ADDR_EQUAL(&in6p->in6p_faddr, faddr6) 678 || in6p->in6p_fport != fport) 679 continue; 680 } 681 else if (IN6_IS_ADDR_V4MAPPED(&in6p->in6p_faddr) 682 && in6p->in6p_faddr.s6_addr32[3] == 0) { 683 if (!IN6_IS_ADDR_V4MAPPED(faddr6)) 684 continue; 685 if (faddr6->s6_addr32[3] == 0) 686 ; 687 else 688 wildcard++; 689 } 690 else { 691 if (IN6_IS_ADDR_V4MAPPED(faddr6)) { 692 #ifndef INET6_BINDV6ONLY 693 if (in6p->in6p_flags & IN6P_BINDV6ONLY) 694 continue; 695 else 696 wildcard++; 697 #else 698 continue; 699 #endif 700 } else if (!IN6_IS_ADDR_UNSPECIFIED(faddr6)) 701 wildcard++; 702 } 703 704 if (wildcard && (flags & IN6PLOOKUP_WILDCARD) == 0) 705 continue; 706 if (wildcard < matchwild) { 707 match = in6p; 708 matchwild = wildcard; 709 if (matchwild == 0) 710 break; 711 } 712 } 713 return(match); 714 } 715 716 struct rtentry * 717 in6_pcbrtentry(in6p) 718 struct in6pcb *in6p; 719 { 720 struct route_in6 *ro; 721 722 ro = &in6p->in6p_route; 723 724 if (ro->ro_rt == NULL) { 725 /* 726 * No route yet, so try to acquire one. 727 */ 728 if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr)) { 729 bzero(&ro->ro_dst, sizeof(ro->ro_dst)); 730 ro->ro_dst.sin6_family = AF_INET6; 731 ro->ro_dst.sin6_len = sizeof(struct sockaddr_in6); 732 satosin6(&ro->ro_dst)->sin6_addr = in6p->in6p_faddr; 733 rtalloc((struct route *)ro); 734 } 735 } 736 return (ro->ro_rt); 737 } 738 739 struct in6pcb * 740 in6_pcblookup_connect(head, faddr6, fport_arg, laddr6, lport_arg, faith) 741 struct in6pcb *head; 742 struct in6_addr *faddr6, *laddr6; 743 u_int fport_arg, lport_arg; 744 int faith; 745 { 746 struct in6pcb *in6p; 747 u_int16_t fport = fport_arg, lport = lport_arg; 748 749 for (in6p = head->in6p_next; in6p != head; in6p = in6p->in6p_next) { 750 /* find exact match on both source and dest */ 751 if (in6p->in6p_fport != fport) 752 continue; 753 if (in6p->in6p_lport != lport) 754 continue; 755 if (IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr)) 756 continue; 757 if (!IN6_ARE_ADDR_EQUAL(&in6p->in6p_faddr, faddr6)) 758 continue; 759 if (IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr)) 760 continue; 761 if (!IN6_ARE_ADDR_EQUAL(&in6p->in6p_laddr, laddr6)) 762 continue; 763 return in6p; 764 } 765 return NULL; 766 } 767 768 struct in6pcb * 769 in6_pcblookup_bind(head, laddr6, lport_arg, faith) 770 struct in6pcb *head; 771 struct in6_addr *laddr6; 772 u_int lport_arg; 773 int faith; 774 { 775 struct in6pcb *in6p, *match; 776 u_int16_t lport = lport_arg; 777 778 match = NULL; 779 for (in6p = head->in6p_next; in6p != head; in6p = in6p->in6p_next) { 780 /* 781 * find destination match. exact match is preferred 782 * against wildcard match. 783 */ 784 #if defined(NFAITH) && NFAITH > 0 785 if (faith && (in6p->in6p_flags & IN6P_FAITH) == 0) 786 continue; 787 #endif 788 if (in6p->in6p_fport != 0) 789 continue; 790 if (in6p->in6p_lport != lport) 791 continue; 792 if (IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr)) { 793 if (IN6_IS_ADDR_V4MAPPED(laddr6)) { 794 #ifndef INET6_BINDV6ONLY 795 if (in6p->in6p_flags & IN6P_BINDV6ONLY) 796 continue; 797 else 798 match = in6p; 799 #else 800 continue; 801 #endif 802 } else 803 match = in6p; 804 } 805 else if (IN6_IS_ADDR_V4MAPPED(&in6p->in6p_laddr) && 806 in6p->in6p_laddr.s6_addr32[3] == 0) { 807 if (IN6_IS_ADDR_V4MAPPED(laddr6) && 808 laddr6->s6_addr32[3] != 0) 809 match = in6p; 810 } 811 else if (IN6_ARE_ADDR_EQUAL(&in6p->in6p_laddr, laddr6)) 812 return in6p; 813 } 814 return match; 815 } 816
Indexes created Mon Sep 22 21:09:42 GMT 2025