1 /* 2 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. Neither the name of the project nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 * 29 * $FreeBSD: src/sys/netinet6/raw_ip6.c,v 1.7.2.7 2003/01/24 05:11:35 sam Exp $ 30 * $DragonFly: src/sys/netinet6/raw_ip6.c,v 1.27 2008/09/04 09:08:22 hasso Exp $ 31 */ 32 33 /* 34 * Copyright (c) 1982, 1986, 1988, 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 * @(#)raw_ip.c 8.2 (Berkeley) 1/4/94 66 */ 67 68 #include "opt_ipsec.h" 69 #include "opt_inet6.h" 70 71 #include <sys/param.h> 72 #include <sys/malloc.h> 73 #include <sys/proc.h> 74 #include <sys/priv.h> 75 #include <sys/mbuf.h> 76 #include <sys/socket.h> 77 #include <sys/jail.h> 78 #include <sys/protosw.h> 79 #include <sys/socketvar.h> 80 #include <sys/errno.h> 81 #include <sys/systm.h> 82 83 #include <sys/thread2.h> 84 #include <sys/socketvar2.h> 85 #include <sys/msgport2.h> 86 87 #include <net/if.h> 88 #include <net/route.h> 89 #include <net/if_types.h> 90 91 #include <netinet/in.h> 92 #include <netinet/in_var.h> 93 #include <netinet/in_systm.h> 94 #include <netinet/ip6.h> 95 #include <netinet6/ip6_var.h> 96 #include <netinet6/ip6_mroute.h> 97 #include <netinet/icmp6.h> 98 #include <netinet/in_pcb.h> 99 #include <netinet6/in6_pcb.h> 100 #include <netinet6/nd6.h> 101 #include <netinet6/ip6protosw.h> 102 #ifdef ENABLE_DEFAULT_SCOPE 103 #include <netinet6/scope6_var.h> 104 #endif 105 #include <netinet6/raw_ip6.h> 106 107 #ifdef IPSEC 108 #include <netinet6/ipsec.h> 109 #include <netinet6/ipsec6.h> 110 #endif /*IPSEC*/ 111 112 #ifdef FAST_IPSEC 113 #include <netproto/ipsec/ipsec.h> 114 #include <netproto/ipsec/ipsec6.h> 115 #endif /* FAST_IPSEC */ 116 117 #include <machine/stdarg.h> 118 119 #define satosin6(sa) ((struct sockaddr_in6 *)(sa)) 120 #define ifatoia6(ifa) ((struct in6_ifaddr *)(ifa)) 121 122 /* 123 * Raw interface to IP6 protocol. 124 */ 125 126 extern struct inpcbinfo ripcbinfo; 127 extern u_long rip_sendspace; 128 extern u_long rip_recvspace; 129 130 struct rip6stat rip6stat; 131 132 /* 133 * Setup generic address and protocol structures 134 * for raw_input routine, then pass them along with 135 * mbuf chain. 136 */ 137 int 138 rip6_input(struct mbuf **mp, int *offp, int proto) 139 { 140 struct mbuf *m = *mp; 141 struct ip6_hdr *ip6 = mtod(m, struct ip6_hdr *); 142 struct inpcb *in6p; 143 struct inpcb *last = 0; 144 struct mbuf *opts = NULL; 145 struct sockaddr_in6 rip6src; 146 147 rip6stat.rip6s_ipackets++; 148 149 if (faithprefix_p != NULL && (*faithprefix_p)(&ip6->ip6_dst)) { 150 /* XXX send icmp6 host/port unreach? */ 151 m_freem(m); 152 return IPPROTO_DONE; 153 } 154 155 init_sin6(&rip6src, m); /* general init */ 156 157 LIST_FOREACH(in6p, &ripcbinfo.pcblisthead, inp_list) { 158 if (in6p->in6p_flags & INP_PLACEMARKER) 159 continue; 160 if (!(in6p->in6p_vflag & INP_IPV6)) 161 continue; 162 if (in6p->in6p_ip6_nxt && 163 in6p->in6p_ip6_nxt != proto) 164 continue; 165 if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr) && 166 !IN6_ARE_ADDR_EQUAL(&in6p->in6p_laddr, &ip6->ip6_dst)) 167 continue; 168 if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr) && 169 !IN6_ARE_ADDR_EQUAL(&in6p->in6p_faddr, &ip6->ip6_src)) 170 continue; 171 if (in6p->in6p_cksum != -1) { 172 rip6stat.rip6s_isum++; 173 if (in6_cksum(m, ip6->ip6_nxt, *offp, 174 m->m_pkthdr.len - *offp)) { 175 rip6stat.rip6s_badsum++; 176 continue; 177 } 178 } 179 if (last) { 180 struct mbuf *n = m_copy(m, 0, (int)M_COPYALL); 181 182 #ifdef IPSEC 183 /* 184 * Check AH/ESP integrity. 185 */ 186 if (n && ipsec6_in_reject_so(n, last->inp_socket)) { 187 m_freem(n); 188 ipsec6stat.in_polvio++; 189 /* do not inject data into pcb */ 190 } else 191 #endif /*IPSEC*/ 192 #ifdef FAST_IPSEC 193 /* 194 * Check AH/ESP integrity. 195 */ 196 if (n && ipsec6_in_reject(n, last)) { 197 m_freem(n); 198 /* do not inject data into pcb */ 199 } else 200 #endif /*FAST_IPSEC*/ 201 if (n) { 202 struct socket *so; 203 204 so = last->in6p_socket; 205 if ((last->in6p_flags & IN6P_CONTROLOPTS) || 206 (so->so_options & SO_TIMESTAMP)) { 207 ip6_savecontrol(last, &opts, ip6, n); 208 } 209 /* strip intermediate headers */ 210 m_adj(n, *offp); 211 lwkt_gettoken(&so->so_rcv.ssb_token); 212 if (ssb_appendaddr(&so->so_rcv, 213 (struct sockaddr *)&rip6src, 214 n, opts) == 0) { 215 m_freem(n); 216 if (opts) 217 m_freem(opts); 218 rip6stat.rip6s_fullsock++; 219 } else { 220 sorwakeup(so); 221 } 222 lwkt_reltoken(&so->so_rcv.ssb_token); 223 opts = NULL; 224 } 225 } 226 last = in6p; 227 } 228 #ifdef IPSEC 229 /* 230 * Check AH/ESP integrity. 231 */ 232 if (last && ipsec6_in_reject_so(m, last->inp_socket)) { 233 m_freem(m); 234 ipsec6stat.in_polvio++; 235 ip6stat.ip6s_delivered--; 236 /* do not inject data into pcb */ 237 } else 238 #endif /*IPSEC*/ 239 #ifdef FAST_IPSEC 240 /* 241 * Check AH/ESP integrity. 242 */ 243 if (last && ipsec6_in_reject(m, last)) { 244 m_freem(m); 245 ip6stat.ip6s_delivered--; 246 /* do not inject data into pcb */ 247 } else 248 #endif /*FAST_IPSEC*/ 249 if (last) { 250 struct socket *so; 251 252 so = last->in6p_socket; 253 if ((last->in6p_flags & IN6P_CONTROLOPTS) || 254 (so->so_options & SO_TIMESTAMP)) { 255 ip6_savecontrol(last, &opts, ip6, m); 256 } 257 /* strip intermediate headers */ 258 m_adj(m, *offp); 259 lwkt_gettoken(&so->so_rcv.ssb_token); 260 if (ssb_appendaddr(&so->so_rcv, (struct sockaddr *)&rip6src, 261 m, opts) == 0) { 262 m_freem(m); 263 if (opts) 264 m_freem(opts); 265 rip6stat.rip6s_fullsock++; 266 } else { 267 sorwakeup(so); 268 } 269 lwkt_reltoken(&so->so_rcv.ssb_token); 270 } else { 271 rip6stat.rip6s_nosock++; 272 if (m->m_flags & M_MCAST) 273 rip6stat.rip6s_nosockmcast++; 274 if (proto == IPPROTO_NONE) 275 m_freem(m); 276 else { 277 char *prvnxtp = ip6_get_prevhdr(m, *offp); /* XXX */ 278 icmp6_error(m, ICMP6_PARAM_PROB, 279 ICMP6_PARAMPROB_NEXTHEADER, 280 prvnxtp - mtod(m, char *)); 281 } 282 ip6stat.ip6s_delivered--; 283 } 284 return IPPROTO_DONE; 285 } 286 287 void 288 rip6_ctlinput(netmsg_t msg) 289 { 290 int cmd = msg->ctlinput.nm_cmd; 291 struct sockaddr *sa = msg->ctlinput.nm_arg; 292 void *d = msg->ctlinput.nm_extra; 293 struct ip6_hdr *ip6; 294 struct mbuf *m; 295 int off = 0; 296 struct ip6ctlparam *ip6cp = NULL; 297 const struct sockaddr_in6 *sa6_src = NULL; 298 void (*notify) (struct inpcb *, int) = in6_rtchange; 299 300 if (sa->sa_family != AF_INET6 || 301 sa->sa_len != sizeof(struct sockaddr_in6)) 302 goto out; 303 304 if ((unsigned)cmd >= PRC_NCMDS) 305 goto out; 306 if (PRC_IS_REDIRECT(cmd)) 307 notify = in6_rtchange, d = NULL; 308 else if (cmd == PRC_HOSTDEAD) 309 d = NULL; 310 else if (inet6ctlerrmap[cmd] == 0) 311 goto out; 312 313 /* if the parameter is from icmp6, decode it. */ 314 if (d != NULL) { 315 ip6cp = (struct ip6ctlparam *)d; 316 m = ip6cp->ip6c_m; 317 ip6 = ip6cp->ip6c_ip6; 318 off = ip6cp->ip6c_off; 319 sa6_src = ip6cp->ip6c_src; 320 } else { 321 m = NULL; 322 ip6 = NULL; 323 sa6_src = &sa6_any; 324 } 325 326 in6_pcbnotify(&ripcbinfo.pcblisthead, sa, 0, 327 (const struct sockaddr *)sa6_src, 0, cmd, 0, notify); 328 out: 329 lwkt_replymsg(&msg->ctlinput.base.lmsg, 0); 330 } 331 332 /* 333 * Generate IPv6 header and pass packet to ip6_output. 334 * Tack on options user may have setup with control call. 335 */ 336 int 337 rip6_output(struct mbuf *m, struct socket *so, ...) 338 { 339 struct sockaddr_in6 *dstsock; 340 struct mbuf *control; 341 struct in6_addr *dst; 342 struct ip6_hdr *ip6; 343 struct inpcb *in6p; 344 u_int plen = m->m_pkthdr.len; 345 int error = 0; 346 struct ip6_pktopts opt, *optp = 0; 347 struct ifnet *oifp = NULL; 348 int type = 0, code = 0; /* for ICMPv6 output statistics only */ 349 int priv = 0; 350 __va_list ap; 351 352 __va_start(ap, so); 353 dstsock = __va_arg(ap, struct sockaddr_in6 *); 354 control = __va_arg(ap, struct mbuf *); 355 __va_end(ap); 356 357 in6p = so->so_pcb; 358 359 priv = 0; 360 if (so->so_cred->cr_uid == 0) 361 priv = 1; 362 dst = &dstsock->sin6_addr; 363 if (control) { 364 if ((error = ip6_setpktoptions(control, &opt, 365 in6p->in6p_outputopts, 366 so->so_proto->pr_protocol, priv)) != 0) 367 goto bad; 368 optp = &opt; 369 } else 370 optp = in6p->in6p_outputopts; 371 372 /* 373 * For an ICMPv6 packet, we should know its type and code 374 * to update statistics. 375 */ 376 if (so->so_proto->pr_protocol == IPPROTO_ICMPV6) { 377 struct icmp6_hdr *icmp6; 378 if (m->m_len < sizeof(struct icmp6_hdr) && 379 (m = m_pullup(m, sizeof(struct icmp6_hdr))) == NULL) { 380 error = ENOBUFS; 381 goto bad; 382 } 383 icmp6 = mtod(m, struct icmp6_hdr *); 384 type = icmp6->icmp6_type; 385 code = icmp6->icmp6_code; 386 } 387 388 M_PREPEND(m, sizeof(*ip6), MB_WAIT); 389 ip6 = mtod(m, struct ip6_hdr *); 390 391 /* 392 * Next header might not be ICMP6 but use its pseudo header anyway. 393 */ 394 ip6->ip6_dst = *dst; 395 396 /* 397 * If the scope of the destination is link-local, embed the interface 398 * index in the address. 399 * 400 * XXX advanced-api value overrides sin6_scope_id 401 */ 402 if (IN6_IS_SCOPE_LINKLOCAL(&ip6->ip6_dst)) { 403 struct in6_pktinfo *pi; 404 405 /* 406 * XXX Boundary check is assumed to be already done in 407 * ip6_setpktoptions(). 408 */ 409 if (optp && (pi = optp->ip6po_pktinfo) && pi->ipi6_ifindex) { 410 ip6->ip6_dst.s6_addr16[1] = htons(pi->ipi6_ifindex); 411 oifp = ifindex2ifnet[pi->ipi6_ifindex]; 412 } else if (IN6_IS_ADDR_MULTICAST(&ip6->ip6_dst) && 413 in6p->in6p_moptions && 414 in6p->in6p_moptions->im6o_multicast_ifp) { 415 oifp = in6p->in6p_moptions->im6o_multicast_ifp; 416 ip6->ip6_dst.s6_addr16[1] = htons(oifp->if_index); 417 } else if (dstsock->sin6_scope_id) { 418 /* boundary check */ 419 if (dstsock->sin6_scope_id < 0 420 || if_index < dstsock->sin6_scope_id) { 421 error = ENXIO; /* XXX EINVAL? */ 422 goto bad; 423 } 424 ip6->ip6_dst.s6_addr16[1] 425 = htons(dstsock->sin6_scope_id & 0xffff);/*XXX*/ 426 } 427 } 428 429 /* 430 * Source address selection. 431 */ 432 { 433 struct in6_addr *in6a; 434 435 if ((in6a = in6_selectsrc(dstsock, optp, 436 in6p->in6p_moptions, 437 &in6p->in6p_route, 438 &in6p->in6p_laddr, 439 &error, NULL)) == NULL) { 440 if (error == 0) 441 error = EADDRNOTAVAIL; 442 goto bad; 443 } 444 ip6->ip6_src = *in6a; 445 if (in6p->in6p_route.ro_rt) 446 oifp = ifindex2ifnet[in6p->in6p_route.ro_rt->rt_ifp->if_index]; 447 } 448 ip6->ip6_flow = (ip6->ip6_flow & ~IPV6_FLOWINFO_MASK) | 449 (in6p->in6p_flowinfo & IPV6_FLOWINFO_MASK); 450 ip6->ip6_vfc = (ip6->ip6_vfc & ~IPV6_VERSION_MASK) | 451 (IPV6_VERSION & IPV6_VERSION_MASK); 452 /* ip6_plen will be filled in ip6_output, so not fill it here. */ 453 ip6->ip6_nxt = in6p->in6p_ip6_nxt; 454 ip6->ip6_hlim = in6_selecthlim(in6p, oifp); 455 456 if (so->so_proto->pr_protocol == IPPROTO_ICMPV6 || 457 in6p->in6p_cksum != -1) { 458 struct mbuf *n; 459 int off; 460 u_int16_t *p; 461 462 /* compute checksum */ 463 if (so->so_proto->pr_protocol == IPPROTO_ICMPV6) 464 off = offsetof(struct icmp6_hdr, icmp6_cksum); 465 else 466 off = in6p->in6p_cksum; 467 if (plen < off + 1) { 468 error = EINVAL; 469 goto bad; 470 } 471 off += sizeof(struct ip6_hdr); 472 473 n = m; 474 while (n && n->m_len <= off) { 475 off -= n->m_len; 476 n = n->m_next; 477 } 478 if (!n) 479 goto bad; 480 p = (u_int16_t *)(mtod(n, caddr_t) + off); 481 *p = 0; 482 *p = in6_cksum(m, ip6->ip6_nxt, sizeof(*ip6), plen); 483 } 484 485 error = ip6_output(m, optp, &in6p->in6p_route, 0, 486 in6p->in6p_moptions, &oifp, in6p); 487 if (so->so_proto->pr_protocol == IPPROTO_ICMPV6) { 488 if (oifp) 489 icmp6_ifoutstat_inc(oifp, type, code); 490 icmp6stat.icp6s_outhist[type]++; 491 } else 492 rip6stat.rip6s_opackets++; 493 494 goto freectl; 495 496 bad: 497 if (m) 498 m_freem(m); 499 500 freectl: 501 if (optp == &opt && optp->ip6po_rthdr && optp->ip6po_route.ro_rt) 502 RTFREE(optp->ip6po_route.ro_rt); 503 if (control) { 504 if (optp == &opt) 505 ip6_clearpktopts(optp, -1); 506 m_freem(control); 507 } 508 return (error); 509 } 510 511 /* 512 * Raw IPv6 socket option processing. 513 */ 514 void 515 rip6_ctloutput(netmsg_t msg) 516 { 517 struct socket *so = msg->ctloutput.base.nm_so;; 518 struct sockopt *sopt = msg->ctloutput.nm_sopt; 519 int error; 520 521 if (sopt->sopt_level == IPPROTO_ICMPV6) { 522 /* 523 * XXX: is it better to call icmp6_ctloutput() directly 524 * from protosw? 525 */ 526 icmp6_ctloutput(msg); 527 /* msg invalid now */ 528 return; 529 } 530 if (sopt->sopt_level != IPPROTO_IPV6) { 531 error = EINVAL; 532 goto out; 533 } 534 535 error = 0; 536 537 switch (sopt->sopt_dir) { 538 case SOPT_GET: 539 switch (sopt->sopt_name) { 540 case MRT6_INIT: 541 case MRT6_DONE: 542 case MRT6_ADD_MIF: 543 case MRT6_DEL_MIF: 544 case MRT6_ADD_MFC: 545 case MRT6_DEL_MFC: 546 case MRT6_PIM: 547 error = ip6_mrouter_get(so, sopt); 548 break; 549 case IPV6_CHECKSUM: 550 error = ip6_raw_ctloutput(so, sopt); 551 break; 552 default: 553 error = ip6_ctloutput(so, sopt); 554 break; 555 } 556 break; 557 558 case SOPT_SET: 559 switch (sopt->sopt_name) { 560 case MRT6_INIT: 561 case MRT6_DONE: 562 case MRT6_ADD_MIF: 563 case MRT6_DEL_MIF: 564 case MRT6_ADD_MFC: 565 case MRT6_DEL_MFC: 566 case MRT6_PIM: 567 error = ip6_mrouter_set(so, sopt); 568 break; 569 case IPV6_CHECKSUM: 570 error = ip6_raw_ctloutput(so, sopt); 571 break; 572 default: 573 error = ip6_ctloutput(so, sopt); 574 break; 575 } 576 break; 577 } 578 out: 579 lwkt_replymsg(&msg->ctloutput.base.lmsg, error); 580 } 581 582 static void 583 rip6_attach(netmsg_t msg) 584 { 585 struct socket *so = msg->attach.base.nm_so; 586 int proto = msg->attach.nm_proto; 587 struct pru_attach_info *ai = msg->attach.nm_ai; 588 struct inpcb *inp; 589 int error; 590 591 inp = so->so_pcb; 592 if (inp) 593 panic("rip6_attach"); 594 error = priv_check_cred(ai->p_ucred, PRIV_NETINET_RAW, NULL_CRED_OKAY); 595 if (error) 596 goto out; 597 598 error = soreserve(so, rip_sendspace, rip_recvspace, ai->sb_rlimit); 599 if (error) 600 goto out; 601 crit_enter(); 602 error = in_pcballoc(so, &ripcbinfo); 603 crit_exit(); 604 if (error) 605 goto out; 606 inp = (struct inpcb *)so->so_pcb; 607 inp->inp_vflag |= INP_IPV6; 608 inp->in6p_ip6_nxt = (long)proto; 609 inp->in6p_hops = -1; /* use kernel default */ 610 inp->in6p_cksum = -1; 611 MALLOC(inp->in6p_icmp6filt, struct icmp6_filter *, 612 sizeof(struct icmp6_filter), M_PCB, M_NOWAIT); 613 if (inp->in6p_icmp6filt != NULL) 614 ICMP6_FILTER_SETPASSALL(inp->in6p_icmp6filt); 615 error = 0; 616 out: 617 lwkt_replymsg(&msg->attach.base.lmsg, error); 618 } 619 620 static void 621 rip6_detach(netmsg_t msg) 622 { 623 struct socket *so = msg->detach.base.nm_so; 624 struct inpcb *inp; 625 626 inp = so->so_pcb; 627 if (inp == NULL) 628 panic("rip6_detach"); 629 /* xxx: RSVP */ 630 if (so == ip6_mrouter) 631 ip6_mrouter_done(); 632 if (inp->in6p_icmp6filt) { 633 FREE(inp->in6p_icmp6filt, M_PCB); 634 inp->in6p_icmp6filt = NULL; 635 } 636 in6_pcbdetach(inp); 637 lwkt_replymsg(&msg->detach.base.lmsg, 0); 638 } 639 640 /* 641 * NOTE: (so) is referenced from soabort*() and netmsg_pru_abort() 642 * will sofree() it when we return. 643 */ 644 static void 645 rip6_abort(netmsg_t msg) 646 { 647 soisdisconnected(msg->abort.base.nm_so); 648 rip6_detach(msg); 649 /* msg invalid now */ 650 } 651 652 static void 653 rip6_disconnect(netmsg_t msg) 654 { 655 struct socket *so = msg->disconnect.base.nm_so; 656 struct inpcb *inp = so->so_pcb; 657 658 if (so->so_state & SS_ISCONNECTED) { 659 inp->in6p_faddr = kin6addr_any; 660 soreference(so); 661 rip6_abort(msg); 662 /* msg invalid now */ 663 sofree(so); 664 return; 665 } 666 lwkt_replymsg(&msg->disconnect.base.lmsg, ENOTCONN); 667 } 668 669 static void 670 rip6_bind(netmsg_t msg) 671 { 672 struct socket *so = msg->bind.base.nm_so; 673 struct sockaddr *nam = msg->bind.nm_nam; 674 struct inpcb *inp = so->so_pcb; 675 struct sockaddr_in6 *addr = (struct sockaddr_in6 *)nam; 676 struct ifaddr *ia = NULL; 677 int error; 678 679 if (nam->sa_len != sizeof(*addr)) { 680 error = EINVAL; 681 goto out; 682 } 683 684 if (TAILQ_EMPTY(&ifnet) || addr->sin6_family != AF_INET6) { 685 error = EADDRNOTAVAIL; 686 goto out; 687 } 688 #ifdef ENABLE_DEFAULT_SCOPE 689 if (addr->sin6_scope_id == 0) { /* not change if specified */ 690 addr->sin6_scope_id = scope6_addr2default(&addr->sin6_addr); 691 } 692 #endif 693 if (!IN6_IS_ADDR_UNSPECIFIED(&addr->sin6_addr) && 694 (ia = ifa_ifwithaddr((struct sockaddr *)addr)) == NULL) { 695 error = EADDRNOTAVAIL; 696 goto out; 697 } 698 if (ia && 699 ((struct in6_ifaddr *)ia)->ia6_flags & 700 (IN6_IFF_ANYCAST|IN6_IFF_NOTREADY| 701 IN6_IFF_DETACHED|IN6_IFF_DEPRECATED)) { 702 error = EADDRNOTAVAIL; 703 goto out; 704 } 705 inp->in6p_laddr = addr->sin6_addr; 706 error = 0; 707 out: 708 lwkt_replymsg(&msg->bind.base.lmsg, error); 709 } 710 711 static void 712 rip6_connect(netmsg_t msg) 713 { 714 struct socket *so = msg->connect.base.nm_so; 715 struct sockaddr *nam = msg->connect.nm_nam; 716 struct inpcb *inp = so->so_pcb; 717 struct sockaddr_in6 *addr = (struct sockaddr_in6 *)nam; 718 struct in6_addr *in6a = NULL; 719 int error = 0; 720 #ifdef ENABLE_DEFAULT_SCOPE 721 struct sockaddr_in6 tmp; 722 #endif 723 724 if (nam->sa_len != sizeof(*addr)) { 725 error = EINVAL; 726 goto out; 727 } 728 if (TAILQ_EMPTY(&ifnet)) { 729 error = EADDRNOTAVAIL; 730 goto out; 731 } 732 if (addr->sin6_family != AF_INET6) { 733 error = EAFNOSUPPORT; 734 goto out; 735 } 736 #ifdef ENABLE_DEFAULT_SCOPE 737 if (addr->sin6_scope_id == 0) { /* not change if specified */ 738 /* avoid overwrites */ 739 tmp = *addr; 740 addr = &tmp; 741 addr->sin6_scope_id = scope6_addr2default(&addr->sin6_addr); 742 } 743 #endif 744 /* Source address selection. XXX: need pcblookup? */ 745 in6a = in6_selectsrc(addr, inp->in6p_outputopts, 746 inp->in6p_moptions, &inp->in6p_route, 747 &inp->in6p_laddr, &error, NULL); 748 if (in6a == NULL) { 749 if (error == 0) 750 error = EADDRNOTAVAIL; 751 } else { 752 inp->in6p_laddr = *in6a; 753 inp->in6p_faddr = addr->sin6_addr; 754 soisconnected(so); 755 error = 0; 756 } 757 out: 758 lwkt_replymsg(&msg->connect.base.lmsg, error); 759 } 760 761 static void 762 rip6_shutdown(netmsg_t msg) 763 { 764 socantsendmore(msg->shutdown.base.nm_so); 765 lwkt_replymsg(&msg->shutdown.base.lmsg, 0); 766 } 767 768 static void 769 rip6_send(netmsg_t msg) 770 { 771 struct socket *so = msg->send.base.nm_so; 772 struct mbuf *m = msg->send.nm_m; 773 struct sockaddr *nam = msg->send.nm_addr; 774 struct mbuf *control = msg->send.nm_control; 775 struct inpcb *inp = so->so_pcb; 776 struct sockaddr_in6 tmp; 777 struct sockaddr_in6 *dst; 778 int error; 779 780 /* always copy sockaddr to avoid overwrites */ 781 if (so->so_state & SS_ISCONNECTED) { 782 if (nam) { 783 m_freem(m); 784 error = EISCONN; 785 goto out; 786 } 787 /* XXX */ 788 bzero(&tmp, sizeof(tmp)); 789 tmp.sin6_family = AF_INET6; 790 tmp.sin6_len = sizeof(struct sockaddr_in6); 791 bcopy(&inp->in6p_faddr, &tmp.sin6_addr, 792 sizeof(struct in6_addr)); 793 dst = &tmp; 794 } else { 795 if (nam == NULL) { 796 m_freem(m); 797 error = ENOTCONN; 798 goto out; 799 } 800 tmp = *(struct sockaddr_in6 *)nam; 801 dst = &tmp; 802 } 803 #ifdef ENABLE_DEFAULT_SCOPE 804 if (dst->sin6_scope_id == 0) { /* not change if specified */ 805 dst->sin6_scope_id = scope6_addr2default(&dst->sin6_addr); 806 } 807 #endif 808 error = rip6_output(m, so, dst, control); 809 out: 810 lwkt_replymsg(&msg->send.base.lmsg, error); 811 } 812 813 struct pr_usrreqs rip6_usrreqs = { 814 .pru_abort = rip6_abort, 815 .pru_accept = pr_generic_notsupp, 816 .pru_attach = rip6_attach, 817 .pru_bind = rip6_bind, 818 .pru_connect = rip6_connect, 819 .pru_connect2 = pr_generic_notsupp, 820 .pru_control = in6_control_dispatch, 821 .pru_detach = rip6_detach, 822 .pru_disconnect = rip6_disconnect, 823 .pru_listen = pr_generic_notsupp, 824 .pru_peeraddr = in6_setpeeraddr_dispatch, 825 .pru_rcvd = pr_generic_notsupp, 826 .pru_rcvoob = pr_generic_notsupp, 827 .pru_send = rip6_send, 828 .pru_sense = pru_sense_null, 829 .pru_shutdown = rip6_shutdown, 830 .pru_sockaddr = in6_setsockaddr_dispatch, 831 .pru_sosend = sosend, 832 .pru_soreceive = soreceive 833 }; 834