1 /*- 2 * Copyright (c) 2001-2007, by Cisco Systems, Inc. All rights reserved. 3 * Copyright (c) 2008-2011, by Randall Stewart. All rights reserved. 4 * Copyright (c) 2008-2011, by Michael Tuexen. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions are met: 8 * 9 * a) Redistributions of source code must retain the above copyright notice, 10 * this list of conditions and the following disclaimer. 11 * 12 * b) Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in 14 * the documentation and/or other materials provided with the distribution. 15 * 16 * c) Neither the name of Cisco Systems, Inc. nor the names of its 17 * contributors may be used to endorse or promote products derived 18 * from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, 22 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 24 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 30 * THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 /* $KAME: sctp6_usrreq.c,v 1.38 2005/08/24 08:08:56 suz Exp $ */ 33 34 #include <sys/cdefs.h> 35 __FBSDID("$FreeBSD$"); 36 37 #include <netinet/sctp_os.h> 38 #include <sys/proc.h> 39 #include <netinet/sctp_pcb.h> 40 #include <netinet/sctp_header.h> 41 #include <netinet/sctp_var.h> 42 #if defined(INET6) 43 #include <netinet6/sctp6_var.h> 44 #endif 45 #include <netinet/sctp_sysctl.h> 46 #include <netinet/sctp_output.h> 47 #include <netinet/sctp_uio.h> 48 #include <netinet/sctp_asconf.h> 49 #include <netinet/sctputil.h> 50 #include <netinet/sctp_indata.h> 51 #include <netinet/sctp_timer.h> 52 #include <netinet/sctp_auth.h> 53 #include <netinet/sctp_input.h> 54 #include <netinet/sctp_output.h> 55 #include <netinet/sctp_bsd_addr.h> 56 #include <netinet/sctp_crc32.h> 57 #include <netinet/udp.h> 58 59 #ifdef IPSEC 60 #include <netipsec/ipsec.h> 61 #if defined(INET6) 62 #include <netipsec/ipsec6.h> 63 #endif /* INET6 */ 64 #endif /* IPSEC */ 65 66 extern struct protosw inetsw[]; 67 68 int 69 sctp6_input(struct mbuf **i_pak, int *offp, int proto) 70 { 71 struct mbuf *m; 72 struct ip6_hdr *ip6; 73 struct sctphdr *sh; 74 struct sctp_inpcb *in6p = NULL; 75 struct sctp_nets *net; 76 int refcount_up = 0; 77 uint32_t vrf_id = 0; 78 79 #ifdef IPSEC 80 struct inpcb *in6p_ip; 81 82 #endif 83 struct sctp_chunkhdr *ch; 84 int length, offset, iphlen; 85 uint8_t ecn_bits; 86 struct sctp_tcb *stcb = NULL; 87 int pkt_len = 0; 88 89 #if !defined(SCTP_WITH_NO_CSUM) 90 uint32_t check, calc_check; 91 92 #endif 93 int off = *offp; 94 uint16_t port = 0; 95 96 /* get the VRF and table id's */ 97 if (SCTP_GET_PKT_VRFID(*i_pak, vrf_id)) { 98 SCTP_RELEASE_PKT(*i_pak); 99 return (-1); 100 } 101 m = SCTP_HEADER_TO_CHAIN(*i_pak); 102 pkt_len = SCTP_HEADER_LEN((*i_pak)); 103 104 #ifdef SCTP_PACKET_LOGGING 105 sctp_packet_log(m, pkt_len); 106 #endif 107 ip6 = mtod(m, struct ip6_hdr *); 108 /* Ensure that (sctphdr + sctp_chunkhdr) in a row. */ 109 IP6_EXTHDR_GET(sh, struct sctphdr *, m, off, 110 (int)(sizeof(*sh) + sizeof(*ch))); 111 if (sh == NULL) { 112 SCTP_STAT_INCR(sctps_hdrops); 113 return IPPROTO_DONE; 114 } 115 ch = (struct sctp_chunkhdr *)((caddr_t)sh + sizeof(struct sctphdr)); 116 iphlen = off; 117 offset = iphlen + sizeof(*sh) + sizeof(*ch); 118 SCTPDBG(SCTP_DEBUG_INPUT1, 119 "sctp6_input() length:%d iphlen:%d\n", pkt_len, iphlen); 120 121 122 #if defined(NFAITH) && NFAITH > 0 123 124 if (faithprefix_p != NULL && (*faithprefix_p) (&ip6->ip6_dst)) { 125 /* XXX send icmp6 host/port unreach? */ 126 goto bad; 127 } 128 #endif /* NFAITH defined and > 0 */ 129 SCTP_STAT_INCR(sctps_recvpackets); 130 SCTP_STAT_INCR_COUNTER64(sctps_inpackets); 131 SCTPDBG(SCTP_DEBUG_INPUT1, "V6 input gets a packet iphlen:%d pktlen:%d\n", 132 iphlen, pkt_len); 133 if (IN6_IS_ADDR_MULTICAST(&ip6->ip6_dst)) { 134 /* No multi-cast support in SCTP */ 135 goto bad; 136 } 137 /* destination port of 0 is illegal, based on RFC2960. */ 138 if (sh->dest_port == 0) 139 goto bad; 140 141 SCTPDBG(SCTP_DEBUG_CRCOFFLOAD, 142 "sctp_input(): Packet of length %d received on %s with csum_flags 0x%x.\n", 143 m->m_pkthdr.len, 144 if_name(m->m_pkthdr.rcvif), 145 m->m_pkthdr.csum_flags); 146 #if defined(SCTP_WITH_NO_CSUM) 147 SCTP_STAT_INCR(sctps_recvnocrc); 148 #else 149 if (m->m_pkthdr.csum_flags & CSUM_SCTP_VALID) { 150 SCTP_STAT_INCR(sctps_recvhwcrc); 151 goto sctp_skip_csum; 152 } 153 check = sh->checksum; /* save incoming checksum */ 154 if ((check == 0) && (SCTP_BASE_SYSCTL(sctp_no_csum_on_loopback)) && 155 (IN6_ARE_ADDR_EQUAL(&ip6->ip6_src, &ip6->ip6_dst))) { 156 SCTP_STAT_INCR(sctps_recvnocrc); 157 goto sctp_skip_csum; 158 } 159 sh->checksum = 0; /* prepare for calc */ 160 calc_check = sctp_calculate_cksum(m, iphlen); 161 SCTP_STAT_INCR(sctps_recvswcrc); 162 if (calc_check != check) { 163 SCTPDBG(SCTP_DEBUG_INPUT1, "Bad CSUM on SCTP packet calc_check:%x check:%x m:%p phlen:%d\n", 164 calc_check, check, m, iphlen); 165 stcb = sctp_findassociation_addr(m, iphlen, offset - sizeof(*ch), 166 sh, ch, &in6p, &net, vrf_id); 167 if ((net) && (port)) { 168 if (net->port == 0) { 169 sctp_pathmtu_adjustment(in6p, stcb, net, net->mtu - sizeof(struct udphdr)); 170 } 171 net->port = port; 172 } 173 if ((net != NULL) && (m->m_flags & M_FLOWID)) { 174 net->flowid = m->m_pkthdr.flowid; 175 #ifdef INVARIANTS 176 net->flowidset = 1; 177 #endif 178 } 179 /* in6p's ref-count increased && stcb locked */ 180 if ((in6p) && (stcb)) { 181 sctp_send_packet_dropped(stcb, net, m, iphlen, 1); 182 sctp_chunk_output((struct sctp_inpcb *)in6p, stcb, SCTP_OUTPUT_FROM_INPUT_ERROR, SCTP_SO_NOT_LOCKED); 183 } else if ((in6p != NULL) && (stcb == NULL)) { 184 refcount_up = 1; 185 } 186 SCTP_STAT_INCR(sctps_badsum); 187 SCTP_STAT_INCR_COUNTER32(sctps_checksumerrors); 188 goto bad; 189 } 190 sh->checksum = calc_check; 191 192 sctp_skip_csum: 193 #endif 194 net = NULL; 195 /* 196 * Locate pcb and tcb for datagram sctp_findassociation_addr() wants 197 * IP/SCTP/first chunk header... 198 */ 199 stcb = sctp_findassociation_addr(m, iphlen, offset - sizeof(*ch), 200 sh, ch, &in6p, &net, vrf_id); 201 if ((net) && (port)) { 202 if (net->port == 0) { 203 sctp_pathmtu_adjustment(in6p, stcb, net, net->mtu - sizeof(struct udphdr)); 204 } 205 net->port = port; 206 } 207 if ((net != NULL) && (m->m_flags & M_FLOWID)) { 208 net->flowid = m->m_pkthdr.flowid; 209 #ifdef INVARIANTS 210 net->flowidset = 1; 211 #endif 212 } 213 /* in6p's ref-count increased */ 214 if (in6p == NULL) { 215 struct sctp_init_chunk *init_chk, chunk_buf; 216 217 SCTP_STAT_INCR(sctps_noport); 218 if (ch->chunk_type == SCTP_INITIATION) { 219 /* 220 * we do a trick here to get the INIT tag, dig in 221 * and get the tag from the INIT and put it in the 222 * common header. 223 */ 224 init_chk = (struct sctp_init_chunk *)sctp_m_getptr(m, 225 iphlen + sizeof(*sh), sizeof(*init_chk), 226 (uint8_t *) & chunk_buf); 227 if (init_chk) 228 sh->v_tag = init_chk->init.initiate_tag; 229 else 230 sh->v_tag = 0; 231 } 232 if (ch->chunk_type == SCTP_SHUTDOWN_ACK) { 233 sctp_send_shutdown_complete2(m, iphlen, sh, vrf_id, port); 234 goto bad; 235 } 236 if (ch->chunk_type == SCTP_SHUTDOWN_COMPLETE) { 237 goto bad; 238 } 239 if (ch->chunk_type != SCTP_ABORT_ASSOCIATION) 240 sctp_send_abort(m, iphlen, sh, 0, NULL, vrf_id, port); 241 goto bad; 242 } else if (stcb == NULL) { 243 refcount_up = 1; 244 } 245 #ifdef IPSEC 246 /* 247 * Check AH/ESP integrity. 248 */ 249 in6p_ip = (struct inpcb *)in6p; 250 if (in6p_ip && (ipsec6_in_reject(m, in6p_ip))) { 251 /* XXX */ 252 MODULE_GLOBAL(ipsec6stat).in_polvio++; 253 goto bad; 254 } 255 #endif /* IPSEC */ 256 257 /* 258 * CONTROL chunk processing 259 */ 260 offset -= sizeof(*ch); 261 ecn_bits = ((ntohl(ip6->ip6_flow) >> 20) & 0x000000ff); 262 263 /* Length now holds the total packet length payload + iphlen */ 264 length = ntohs(ip6->ip6_plen) + iphlen; 265 266 /* sa_ignore NO_NULL_CHK */ 267 sctp_common_input_processing(&m, iphlen, offset, length, sh, ch, 268 in6p, stcb, net, ecn_bits, vrf_id, port); 269 /* inp's ref-count reduced && stcb unlocked */ 270 /* XXX this stuff below gets moved to appropriate parts later... */ 271 if (m) 272 sctp_m_freem(m); 273 if ((in6p) && refcount_up) { 274 /* reduce ref-count */ 275 SCTP_INP_WLOCK(in6p); 276 SCTP_INP_DECR_REF(in6p); 277 SCTP_INP_WUNLOCK(in6p); 278 } 279 return IPPROTO_DONE; 280 281 bad: 282 if (stcb) { 283 SCTP_TCB_UNLOCK(stcb); 284 } 285 if ((in6p) && refcount_up) { 286 /* reduce ref-count */ 287 SCTP_INP_WLOCK(in6p); 288 SCTP_INP_DECR_REF(in6p); 289 SCTP_INP_WUNLOCK(in6p); 290 } 291 if (m) 292 sctp_m_freem(m); 293 return IPPROTO_DONE; 294 } 295 296 297 static void 298 sctp6_notify_mbuf(struct sctp_inpcb *inp, struct icmp6_hdr *icmp6, 299 struct sctphdr *sh, struct sctp_tcb *stcb, struct sctp_nets *net) 300 { 301 uint32_t nxtsz; 302 303 if ((inp == NULL) || (stcb == NULL) || (net == NULL) || 304 (icmp6 == NULL) || (sh == NULL)) { 305 goto out; 306 } 307 /* First do we even look at it? */ 308 if (ntohl(sh->v_tag) != (stcb->asoc.peer_vtag)) 309 goto out; 310 311 if (icmp6->icmp6_type != ICMP6_PACKET_TOO_BIG) { 312 /* not PACKET TO BIG */ 313 goto out; 314 } 315 /* 316 * ok we need to look closely. We could even get smarter and look at 317 * anyone that we sent to in case we get a different ICMP that tells 318 * us there is no way to reach a host, but for this impl, all we 319 * care about is MTU discovery. 320 */ 321 nxtsz = ntohl(icmp6->icmp6_mtu); 322 /* Stop any PMTU timer */ 323 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, NULL, SCTP_FROM_SCTP6_USRREQ + SCTP_LOC_1); 324 325 /* Adjust destination size limit */ 326 if (net->mtu > nxtsz) { 327 net->mtu = nxtsz; 328 if (net->port) { 329 net->mtu -= sizeof(struct udphdr); 330 } 331 } 332 /* now what about the ep? */ 333 if (stcb->asoc.smallest_mtu > nxtsz) { 334 struct sctp_tmit_chunk *chk; 335 336 /* Adjust that too */ 337 stcb->asoc.smallest_mtu = nxtsz; 338 /* now off to subtract IP_DF flag if needed */ 339 340 TAILQ_FOREACH(chk, &stcb->asoc.send_queue, sctp_next) { 341 if ((uint32_t) (chk->send_size + IP_HDR_SIZE) > nxtsz) { 342 chk->flags |= CHUNK_FLAGS_FRAGMENT_OK; 343 } 344 } 345 TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) { 346 if ((uint32_t) (chk->send_size + IP_HDR_SIZE) > nxtsz) { 347 /* 348 * For this guy we also mark for immediate 349 * resend since we sent to big of chunk 350 */ 351 chk->flags |= CHUNK_FLAGS_FRAGMENT_OK; 352 if (chk->sent != SCTP_DATAGRAM_RESEND) 353 stcb->asoc.sent_queue_retran_cnt++; 354 chk->sent = SCTP_DATAGRAM_RESEND; 355 chk->rec.data.doing_fast_retransmit = 0; 356 357 chk->sent = SCTP_DATAGRAM_RESEND; 358 /* Clear any time so NO RTT is being done */ 359 chk->sent_rcv_time.tv_sec = 0; 360 chk->sent_rcv_time.tv_usec = 0; 361 stcb->asoc.total_flight -= chk->send_size; 362 net->flight_size -= chk->send_size; 363 } 364 } 365 } 366 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, NULL); 367 out: 368 if (stcb) { 369 SCTP_TCB_UNLOCK(stcb); 370 } 371 } 372 373 374 void 375 sctp6_notify(struct sctp_inpcb *inp, 376 struct icmp6_hdr *icmph, 377 struct sctphdr *sh, 378 struct sockaddr *to, 379 struct sctp_tcb *stcb, 380 struct sctp_nets *net) 381 { 382 #if defined (__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 383 struct socket *so; 384 385 #endif 386 /* protection */ 387 int reason; 388 389 390 if ((inp == NULL) || (stcb == NULL) || (net == NULL) || 391 (sh == NULL) || (to == NULL)) { 392 if (stcb) 393 SCTP_TCB_UNLOCK(stcb); 394 return; 395 } 396 /* First job is to verify the vtag matches what I would send */ 397 if (ntohl(sh->v_tag) != (stcb->asoc.peer_vtag)) { 398 SCTP_TCB_UNLOCK(stcb); 399 return; 400 } 401 if (icmph->icmp6_type != ICMP_UNREACH) { 402 /* We only care about unreachable */ 403 SCTP_TCB_UNLOCK(stcb); 404 return; 405 } 406 if ((icmph->icmp6_code == ICMP_UNREACH_NET) || 407 (icmph->icmp6_code == ICMP_UNREACH_HOST) || 408 (icmph->icmp6_code == ICMP_UNREACH_NET_UNKNOWN) || 409 (icmph->icmp6_code == ICMP_UNREACH_HOST_UNKNOWN) || 410 (icmph->icmp6_code == ICMP_UNREACH_ISOLATED) || 411 (icmph->icmp6_code == ICMP_UNREACH_NET_PROHIB) || 412 (icmph->icmp6_code == ICMP_UNREACH_HOST_PROHIB) || 413 (icmph->icmp6_code == ICMP_UNREACH_FILTER_PROHIB)) { 414 415 /* 416 * Hmm reachablity problems we must examine closely. If its 417 * not reachable, we may have lost a network. Or if there is 418 * NO protocol at the other end named SCTP. well we consider 419 * it a OOTB abort. 420 */ 421 if (net->dest_state & SCTP_ADDR_REACHABLE) { 422 /* Ok that destination is NOT reachable */ 423 SCTP_PRINTF("ICMP (thresh %d/%d) takes interface %p down\n", 424 net->error_count, 425 net->failure_threshold, 426 net); 427 428 net->dest_state &= ~SCTP_ADDR_REACHABLE; 429 net->dest_state |= SCTP_ADDR_NOT_REACHABLE; 430 /* 431 * JRS 5/14/07 - If a destination is unreachable, 432 * the PF bit is turned off. This allows an 433 * unambiguous use of the PF bit for destinations 434 * that are reachable but potentially failed. If the 435 * destination is set to the unreachable state, also 436 * set the destination to the PF state. 437 */ 438 /* 439 * Add debug message here if destination is not in 440 * PF state. 441 */ 442 /* Stop any running T3 timers here? */ 443 if ((stcb->asoc.sctp_cmt_on_off > 0) && 444 (stcb->asoc.sctp_cmt_pf > 0)) { 445 net->dest_state &= ~SCTP_ADDR_PF; 446 SCTPDBG(SCTP_DEBUG_TIMER4, "Destination %p moved from PF to unreachable.\n", 447 net); 448 } 449 net->error_count = net->failure_threshold + 1; 450 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_DOWN, 451 stcb, SCTP_FAILED_THRESHOLD, 452 (void *)net, SCTP_SO_NOT_LOCKED); 453 } 454 SCTP_TCB_UNLOCK(stcb); 455 } else if ((icmph->icmp6_code == ICMP_UNREACH_PROTOCOL) || 456 (icmph->icmp6_code == ICMP_UNREACH_PORT)) { 457 /* 458 * Here the peer is either playing tricks on us, including 459 * an address that belongs to someone who does not support 460 * SCTP OR was a userland implementation that shutdown and 461 * now is dead. In either case treat it like a OOTB abort 462 * with no TCB 463 */ 464 reason = SCTP_PEER_FAULTY; 465 sctp_abort_notification(stcb, reason, SCTP_SO_NOT_LOCKED); 466 #if defined (__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 467 so = SCTP_INP_SO(inp); 468 atomic_add_int(&stcb->asoc.refcnt, 1); 469 SCTP_TCB_UNLOCK(stcb); 470 SCTP_SOCKET_LOCK(so, 1); 471 SCTP_TCB_LOCK(stcb); 472 atomic_subtract_int(&stcb->asoc.refcnt, 1); 473 #endif 474 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_2); 475 #if defined (__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 476 SCTP_SOCKET_UNLOCK(so, 1); 477 /* SCTP_TCB_UNLOCK(stcb); MT: I think this is not needed. */ 478 #endif 479 /* no need to unlock here, since the TCB is gone */ 480 } else { 481 SCTP_TCB_UNLOCK(stcb); 482 } 483 } 484 485 486 487 void 488 sctp6_ctlinput(int cmd, struct sockaddr *pktdst, void *d) 489 { 490 struct sctphdr sh; 491 struct ip6ctlparam *ip6cp = NULL; 492 uint32_t vrf_id; 493 494 vrf_id = SCTP_DEFAULT_VRFID; 495 496 if (pktdst->sa_family != AF_INET6 || 497 pktdst->sa_len != sizeof(struct sockaddr_in6)) 498 return; 499 500 if ((unsigned)cmd >= PRC_NCMDS) 501 return; 502 if (PRC_IS_REDIRECT(cmd)) { 503 d = NULL; 504 } else if (inet6ctlerrmap[cmd] == 0) { 505 return; 506 } 507 /* if the parameter is from icmp6, decode it. */ 508 if (d != NULL) { 509 ip6cp = (struct ip6ctlparam *)d; 510 } else { 511 ip6cp = (struct ip6ctlparam *)NULL; 512 } 513 514 if (ip6cp) { 515 /* 516 * XXX: We assume that when IPV6 is non NULL, M and OFF are 517 * valid. 518 */ 519 /* check if we can safely examine src and dst ports */ 520 struct sctp_inpcb *inp = NULL; 521 struct sctp_tcb *stcb = NULL; 522 struct sctp_nets *net = NULL; 523 struct sockaddr_in6 final; 524 525 if (ip6cp->ip6c_m == NULL) 526 return; 527 528 bzero(&sh, sizeof(sh)); 529 bzero(&final, sizeof(final)); 530 inp = NULL; 531 net = NULL; 532 m_copydata(ip6cp->ip6c_m, ip6cp->ip6c_off, sizeof(sh), 533 (caddr_t)&sh); 534 ip6cp->ip6c_src->sin6_port = sh.src_port; 535 final.sin6_len = sizeof(final); 536 final.sin6_family = AF_INET6; 537 final.sin6_addr = ((struct sockaddr_in6 *)pktdst)->sin6_addr; 538 final.sin6_port = sh.dest_port; 539 stcb = sctp_findassociation_addr_sa((struct sockaddr *)ip6cp->ip6c_src, 540 (struct sockaddr *)&final, 541 &inp, &net, 1, vrf_id); 542 /* inp's ref-count increased && stcb locked */ 543 if (stcb != NULL && inp && (inp->sctp_socket != NULL)) { 544 if (cmd == PRC_MSGSIZE) { 545 sctp6_notify_mbuf(inp, 546 ip6cp->ip6c_icmp6, 547 &sh, 548 stcb, 549 net); 550 /* inp's ref-count reduced && stcb unlocked */ 551 } else { 552 sctp6_notify(inp, ip6cp->ip6c_icmp6, &sh, 553 (struct sockaddr *)&final, 554 stcb, net); 555 /* inp's ref-count reduced && stcb unlocked */ 556 } 557 } else { 558 if (PRC_IS_REDIRECT(cmd) && inp) { 559 in6_rtchange((struct in6pcb *)inp, 560 inet6ctlerrmap[cmd]); 561 } 562 if (inp) { 563 /* reduce inp's ref-count */ 564 SCTP_INP_WLOCK(inp); 565 SCTP_INP_DECR_REF(inp); 566 SCTP_INP_WUNLOCK(inp); 567 } 568 if (stcb) 569 SCTP_TCB_UNLOCK(stcb); 570 } 571 } 572 } 573 574 /* 575 * this routine can probably be collasped into the one in sctp_userreq.c 576 * since they do the same thing and now we lookup with a sockaddr 577 */ 578 static int 579 sctp6_getcred(SYSCTL_HANDLER_ARGS) 580 { 581 struct xucred xuc; 582 struct sockaddr_in6 addrs[2]; 583 struct sctp_inpcb *inp; 584 struct sctp_nets *net; 585 struct sctp_tcb *stcb; 586 int error; 587 uint32_t vrf_id; 588 589 vrf_id = SCTP_DEFAULT_VRFID; 590 591 error = priv_check(req->td, PRIV_NETINET_GETCRED); 592 if (error) 593 return (error); 594 595 if (req->newlen != sizeof(addrs)) { 596 SCTP_LTRACE_ERR_RET(NULL, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 597 return (EINVAL); 598 } 599 if (req->oldlen != sizeof(struct ucred)) { 600 SCTP_LTRACE_ERR_RET(NULL, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 601 return (EINVAL); 602 } 603 error = SYSCTL_IN(req, addrs, sizeof(addrs)); 604 if (error) 605 return (error); 606 607 stcb = sctp_findassociation_addr_sa(sin6tosa(&addrs[0]), 608 sin6tosa(&addrs[1]), 609 &inp, &net, 1, vrf_id); 610 if (stcb == NULL || inp == NULL || inp->sctp_socket == NULL) { 611 if ((inp != NULL) && (stcb == NULL)) { 612 /* reduce ref-count */ 613 SCTP_INP_WLOCK(inp); 614 SCTP_INP_DECR_REF(inp); 615 goto cred_can_cont; 616 } 617 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ENOENT); 618 error = ENOENT; 619 goto out; 620 } 621 SCTP_TCB_UNLOCK(stcb); 622 /* 623 * We use the write lock here, only since in the error leg we need 624 * it. If we used RLOCK, then we would have to 625 * wlock/decr/unlock/rlock. Which in theory could create a hole. 626 * Better to use higher wlock. 627 */ 628 SCTP_INP_WLOCK(inp); 629 cred_can_cont: 630 error = cr_canseesocket(req->td->td_ucred, inp->sctp_socket); 631 if (error) { 632 SCTP_INP_WUNLOCK(inp); 633 goto out; 634 } 635 cru2x(inp->sctp_socket->so_cred, &xuc); 636 SCTP_INP_WUNLOCK(inp); 637 error = SYSCTL_OUT(req, &xuc, sizeof(struct xucred)); 638 out: 639 return (error); 640 } 641 642 SYSCTL_PROC(_net_inet6_sctp6, OID_AUTO, getcred, CTLTYPE_OPAQUE | CTLFLAG_RW, 643 0, 0, 644 sctp6_getcred, "S,ucred", "Get the ucred of a SCTP6 connection"); 645 646 647 /* This is the same as the sctp_abort() could be made common */ 648 static void 649 sctp6_abort(struct socket *so) 650 { 651 struct sctp_inpcb *inp; 652 uint32_t flags; 653 654 inp = (struct sctp_inpcb *)so->so_pcb; 655 if (inp == 0) { 656 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 657 return; 658 } 659 sctp_must_try_again: 660 flags = inp->sctp_flags; 661 #ifdef SCTP_LOG_CLOSING 662 sctp_log_closing(inp, NULL, 17); 663 #endif 664 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) && 665 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) { 666 #ifdef SCTP_LOG_CLOSING 667 sctp_log_closing(inp, NULL, 16); 668 #endif 669 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT, 670 SCTP_CALLED_AFTER_CMPSET_OFCLOSE); 671 SOCK_LOCK(so); 672 SCTP_SB_CLEAR(so->so_snd); 673 /* 674 * same for the rcv ones, they are only here for the 675 * accounting/select. 676 */ 677 SCTP_SB_CLEAR(so->so_rcv); 678 /* Now null out the reference, we are completely detached. */ 679 so->so_pcb = NULL; 680 SOCK_UNLOCK(so); 681 } else { 682 flags = inp->sctp_flags; 683 if ((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) { 684 goto sctp_must_try_again; 685 } 686 } 687 return; 688 } 689 690 static int 691 sctp6_attach(struct socket *so, int proto, struct thread *p) 692 { 693 struct in6pcb *inp6; 694 int error; 695 struct sctp_inpcb *inp; 696 uint32_t vrf_id = SCTP_DEFAULT_VRFID; 697 698 inp = (struct sctp_inpcb *)so->so_pcb; 699 if (inp != NULL) { 700 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 701 return EINVAL; 702 } 703 if (so->so_snd.sb_hiwat == 0 || so->so_rcv.sb_hiwat == 0) { 704 error = SCTP_SORESERVE(so, SCTP_BASE_SYSCTL(sctp_sendspace), SCTP_BASE_SYSCTL(sctp_recvspace)); 705 if (error) 706 return error; 707 } 708 error = sctp_inpcb_alloc(so, vrf_id); 709 if (error) 710 return error; 711 inp = (struct sctp_inpcb *)so->so_pcb; 712 SCTP_INP_WLOCK(inp); 713 inp->sctp_flags |= SCTP_PCB_FLAGS_BOUND_V6; /* I'm v6! */ 714 inp6 = (struct in6pcb *)inp; 715 716 inp6->inp_vflag |= INP_IPV6; 717 inp6->in6p_hops = -1; /* use kernel default */ 718 inp6->in6p_cksum = -1; /* just to be sure */ 719 #ifdef INET 720 /* 721 * XXX: ugly!! IPv4 TTL initialization is necessary for an IPv6 722 * socket as well, because the socket may be bound to an IPv6 723 * wildcard address, which may match an IPv4-mapped IPv6 address. 724 */ 725 inp6->inp_ip_ttl = MODULE_GLOBAL(ip_defttl); 726 #endif 727 /* 728 * Hmm what about the IPSEC stuff that is missing here but in 729 * sctp_attach()? 730 */ 731 SCTP_INP_WUNLOCK(inp); 732 return 0; 733 } 734 735 static int 736 sctp6_bind(struct socket *so, struct sockaddr *addr, struct thread *p) 737 { 738 struct sctp_inpcb *inp; 739 struct in6pcb *inp6; 740 int error; 741 742 inp = (struct sctp_inpcb *)so->so_pcb; 743 if (inp == 0) { 744 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 745 return EINVAL; 746 } 747 if (addr) { 748 if ((addr->sa_family == AF_INET6) && 749 (addr->sa_len != sizeof(struct sockaddr_in6))) { 750 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 751 return EINVAL; 752 } 753 if ((addr->sa_family == AF_INET) && 754 (addr->sa_len != sizeof(struct sockaddr_in))) { 755 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 756 return EINVAL; 757 } 758 } 759 inp6 = (struct in6pcb *)inp; 760 inp6->inp_vflag &= ~INP_IPV4; 761 inp6->inp_vflag |= INP_IPV6; 762 if ((addr != NULL) && (SCTP_IPV6_V6ONLY(inp6) == 0)) { 763 if (addr->sa_family == AF_INET) { 764 /* binding v4 addr to v6 socket, so reset flags */ 765 inp6->inp_vflag |= INP_IPV4; 766 inp6->inp_vflag &= ~INP_IPV6; 767 } else { 768 struct sockaddr_in6 *sin6_p; 769 770 sin6_p = (struct sockaddr_in6 *)addr; 771 772 if (IN6_IS_ADDR_UNSPECIFIED(&sin6_p->sin6_addr)) { 773 inp6->inp_vflag |= INP_IPV4; 774 } else if (IN6_IS_ADDR_V4MAPPED(&sin6_p->sin6_addr)) { 775 struct sockaddr_in sin; 776 777 in6_sin6_2_sin(&sin, sin6_p); 778 inp6->inp_vflag |= INP_IPV4; 779 inp6->inp_vflag &= ~INP_IPV6; 780 error = sctp_inpcb_bind(so, (struct sockaddr *)&sin, NULL, p); 781 return error; 782 } 783 } 784 } else if (addr != NULL) { 785 /* IPV6_V6ONLY socket */ 786 if (addr->sa_family == AF_INET) { 787 /* can't bind v4 addr to v6 only socket! */ 788 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 789 return EINVAL; 790 } else { 791 struct sockaddr_in6 *sin6_p; 792 793 sin6_p = (struct sockaddr_in6 *)addr; 794 795 if (IN6_IS_ADDR_V4MAPPED(&sin6_p->sin6_addr)) { 796 /* can't bind v4-mapped addrs either! */ 797 /* NOTE: we don't support SIIT */ 798 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 799 return EINVAL; 800 } 801 } 802 } 803 error = sctp_inpcb_bind(so, addr, NULL, p); 804 return error; 805 } 806 807 808 static void 809 sctp6_close(struct socket *so) 810 { 811 sctp_close(so); 812 } 813 814 /* This could be made common with sctp_detach() since they are identical */ 815 816 static 817 int 818 sctp6_disconnect(struct socket *so) 819 { 820 return (sctp_disconnect(so)); 821 } 822 823 824 int 825 sctp_sendm(struct socket *so, int flags, struct mbuf *m, struct sockaddr *addr, 826 struct mbuf *control, struct thread *p); 827 828 829 static int 830 sctp6_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *addr, 831 struct mbuf *control, struct thread *p) 832 { 833 struct sctp_inpcb *inp; 834 struct in6pcb *inp6; 835 836 #ifdef INET 837 struct sockaddr_in6 *sin6; 838 839 #endif /* INET */ 840 /* No SPL needed since sctp_output does this */ 841 842 inp = (struct sctp_inpcb *)so->so_pcb; 843 if (inp == NULL) { 844 if (control) { 845 SCTP_RELEASE_PKT(control); 846 control = NULL; 847 } 848 SCTP_RELEASE_PKT(m); 849 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 850 return EINVAL; 851 } 852 inp6 = (struct in6pcb *)inp; 853 /* 854 * For the TCP model we may get a NULL addr, if we are a connected 855 * socket thats ok. 856 */ 857 if ((inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) && 858 (addr == NULL)) { 859 goto connected_type; 860 } 861 if (addr == NULL) { 862 SCTP_RELEASE_PKT(m); 863 if (control) { 864 SCTP_RELEASE_PKT(control); 865 control = NULL; 866 } 867 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EDESTADDRREQ); 868 return (EDESTADDRREQ); 869 } 870 #ifdef INET 871 sin6 = (struct sockaddr_in6 *)addr; 872 if (SCTP_IPV6_V6ONLY(inp6)) { 873 /* 874 * if IPV6_V6ONLY flag, we discard datagrams destined to a 875 * v4 addr or v4-mapped addr 876 */ 877 if (addr->sa_family == AF_INET) { 878 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 879 return EINVAL; 880 } 881 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 882 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 883 return EINVAL; 884 } 885 } 886 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 887 if (!MODULE_GLOBAL(ip6_v6only)) { 888 struct sockaddr_in sin; 889 890 /* convert v4-mapped into v4 addr and send */ 891 in6_sin6_2_sin(&sin, sin6); 892 return sctp_sendm(so, flags, m, (struct sockaddr *)&sin, 893 control, p); 894 } else { 895 /* mapped addresses aren't enabled */ 896 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 897 return EINVAL; 898 } 899 } 900 #endif /* INET */ 901 connected_type: 902 /* now what about control */ 903 if (control) { 904 if (inp->control) { 905 SCTP_PRINTF("huh? control set?\n"); 906 SCTP_RELEASE_PKT(inp->control); 907 inp->control = NULL; 908 } 909 inp->control = control; 910 } 911 /* Place the data */ 912 if (inp->pkt) { 913 SCTP_BUF_NEXT(inp->pkt_last) = m; 914 inp->pkt_last = m; 915 } else { 916 inp->pkt_last = inp->pkt = m; 917 } 918 if ( 919 /* FreeBSD and MacOSX uses a flag passed */ 920 ((flags & PRUS_MORETOCOME) == 0) 921 ) { 922 /* 923 * note with the current version this code will only be used 924 * by OpenBSD, NetBSD and FreeBSD have methods for 925 * re-defining sosend() to use sctp_sosend(). One can 926 * optionaly switch back to this code (by changing back the 927 * defininitions but this is not advisable. 928 */ 929 int ret; 930 931 ret = sctp_output(inp, inp->pkt, addr, inp->control, p, flags); 932 inp->pkt = NULL; 933 inp->control = NULL; 934 return (ret); 935 } else { 936 return (0); 937 } 938 } 939 940 static int 941 sctp6_connect(struct socket *so, struct sockaddr *addr, struct thread *p) 942 { 943 uint32_t vrf_id; 944 int error = 0; 945 struct sctp_inpcb *inp; 946 struct in6pcb *inp6; 947 struct sctp_tcb *stcb; 948 949 #ifdef INET 950 struct sockaddr_in6 *sin6; 951 struct sockaddr_storage ss; 952 953 #endif /* INET */ 954 955 inp6 = (struct in6pcb *)so->so_pcb; 956 inp = (struct sctp_inpcb *)so->so_pcb; 957 if (inp == 0) { 958 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ECONNRESET); 959 return (ECONNRESET); /* I made the same as TCP since we are 960 * not setup? */ 961 } 962 if (addr == NULL) { 963 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 964 return (EINVAL); 965 } 966 if ((addr->sa_family == AF_INET6) && (addr->sa_len != sizeof(struct sockaddr_in6))) { 967 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 968 return (EINVAL); 969 } 970 if ((addr->sa_family == AF_INET) && (addr->sa_len != sizeof(struct sockaddr_in))) { 971 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 972 return (EINVAL); 973 } 974 vrf_id = inp->def_vrf_id; 975 SCTP_ASOC_CREATE_LOCK(inp); 976 SCTP_INP_RLOCK(inp); 977 if ((inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) == 978 SCTP_PCB_FLAGS_UNBOUND) { 979 /* Bind a ephemeral port */ 980 SCTP_INP_RUNLOCK(inp); 981 error = sctp6_bind(so, NULL, p); 982 if (error) { 983 SCTP_ASOC_CREATE_UNLOCK(inp); 984 985 return (error); 986 } 987 SCTP_INP_RLOCK(inp); 988 } 989 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) && 990 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) { 991 /* We are already connected AND the TCP model */ 992 SCTP_INP_RUNLOCK(inp); 993 SCTP_ASOC_CREATE_UNLOCK(inp); 994 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EADDRINUSE); 995 return (EADDRINUSE); 996 } 997 #ifdef INET 998 sin6 = (struct sockaddr_in6 *)addr; 999 if (SCTP_IPV6_V6ONLY(inp6)) { 1000 /* 1001 * if IPV6_V6ONLY flag, ignore connections destined to a v4 1002 * addr or v4-mapped addr 1003 */ 1004 if (addr->sa_family == AF_INET) { 1005 SCTP_INP_RUNLOCK(inp); 1006 SCTP_ASOC_CREATE_UNLOCK(inp); 1007 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 1008 return EINVAL; 1009 } 1010 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 1011 SCTP_INP_RUNLOCK(inp); 1012 SCTP_ASOC_CREATE_UNLOCK(inp); 1013 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 1014 return EINVAL; 1015 } 1016 } 1017 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 1018 if (!MODULE_GLOBAL(ip6_v6only)) { 1019 /* convert v4-mapped into v4 addr */ 1020 in6_sin6_2_sin((struct sockaddr_in *)&ss, sin6); 1021 addr = (struct sockaddr *)&ss; 1022 } else { 1023 /* mapped addresses aren't enabled */ 1024 SCTP_INP_RUNLOCK(inp); 1025 SCTP_ASOC_CREATE_UNLOCK(inp); 1026 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 1027 return EINVAL; 1028 } 1029 } else 1030 #endif /* INET */ 1031 addr = addr; /* for true v6 address case */ 1032 1033 /* Now do we connect? */ 1034 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) { 1035 stcb = LIST_FIRST(&inp->sctp_asoc_list); 1036 if (stcb) { 1037 SCTP_TCB_UNLOCK(stcb); 1038 } 1039 SCTP_INP_RUNLOCK(inp); 1040 } else { 1041 SCTP_INP_RUNLOCK(inp); 1042 SCTP_INP_WLOCK(inp); 1043 SCTP_INP_INCR_REF(inp); 1044 SCTP_INP_WUNLOCK(inp); 1045 stcb = sctp_findassociation_ep_addr(&inp, addr, NULL, NULL, NULL); 1046 if (stcb == NULL) { 1047 SCTP_INP_WLOCK(inp); 1048 SCTP_INP_DECR_REF(inp); 1049 SCTP_INP_WUNLOCK(inp); 1050 } 1051 } 1052 1053 if (stcb != NULL) { 1054 /* Already have or am bring up an association */ 1055 SCTP_ASOC_CREATE_UNLOCK(inp); 1056 SCTP_TCB_UNLOCK(stcb); 1057 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EALREADY); 1058 return (EALREADY); 1059 } 1060 /* We are GOOD to go */ 1061 stcb = sctp_aloc_assoc(inp, addr, &error, 0, vrf_id, p); 1062 SCTP_ASOC_CREATE_UNLOCK(inp); 1063 if (stcb == NULL) { 1064 /* Gak! no memory */ 1065 return (error); 1066 } 1067 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) { 1068 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED; 1069 /* Set the connected flag so we can queue data */ 1070 soisconnecting(so); 1071 } 1072 stcb->asoc.state = SCTP_STATE_COOKIE_WAIT; 1073 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered); 1074 1075 /* initialize authentication parameters for the assoc */ 1076 sctp_initialize_auth_params(inp, stcb); 1077 1078 sctp_send_initiate(inp, stcb, SCTP_SO_LOCKED); 1079 SCTP_TCB_UNLOCK(stcb); 1080 return error; 1081 } 1082 1083 static int 1084 sctp6_getaddr(struct socket *so, struct sockaddr **addr) 1085 { 1086 struct sockaddr_in6 *sin6; 1087 struct sctp_inpcb *inp; 1088 uint32_t vrf_id; 1089 struct sctp_ifa *sctp_ifa; 1090 1091 int error; 1092 1093 /* 1094 * Do the malloc first in case it blocks. 1095 */ 1096 SCTP_MALLOC_SONAME(sin6, struct sockaddr_in6 *, sizeof *sin6); 1097 if (sin6 == NULL) 1098 return ENOMEM; 1099 sin6->sin6_family = AF_INET6; 1100 sin6->sin6_len = sizeof(*sin6); 1101 1102 inp = (struct sctp_inpcb *)so->so_pcb; 1103 if (inp == NULL) { 1104 SCTP_FREE_SONAME(sin6); 1105 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ECONNRESET); 1106 return ECONNRESET; 1107 } 1108 SCTP_INP_RLOCK(inp); 1109 sin6->sin6_port = inp->sctp_lport; 1110 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 1111 /* For the bound all case you get back 0 */ 1112 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) { 1113 struct sctp_tcb *stcb; 1114 struct sockaddr_in6 *sin_a6; 1115 struct sctp_nets *net; 1116 int fnd; 1117 1118 stcb = LIST_FIRST(&inp->sctp_asoc_list); 1119 if (stcb == NULL) { 1120 goto notConn6; 1121 } 1122 fnd = 0; 1123 sin_a6 = NULL; 1124 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1125 sin_a6 = (struct sockaddr_in6 *)&net->ro._l_addr; 1126 if (sin_a6 == NULL) 1127 /* this will make coverity happy */ 1128 continue; 1129 1130 if (sin_a6->sin6_family == AF_INET6) { 1131 fnd = 1; 1132 break; 1133 } 1134 } 1135 if ((!fnd) || (sin_a6 == NULL)) { 1136 /* punt */ 1137 goto notConn6; 1138 } 1139 vrf_id = inp->def_vrf_id; 1140 sctp_ifa = sctp_source_address_selection(inp, stcb, (sctp_route_t *) & net->ro, net, 0, vrf_id); 1141 if (sctp_ifa) { 1142 sin6->sin6_addr = sctp_ifa->address.sin6.sin6_addr; 1143 } 1144 } else { 1145 /* For the bound all case you get back 0 */ 1146 notConn6: 1147 memset(&sin6->sin6_addr, 0, sizeof(sin6->sin6_addr)); 1148 } 1149 } else { 1150 /* Take the first IPv6 address in the list */ 1151 struct sctp_laddr *laddr; 1152 int fnd = 0; 1153 1154 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) { 1155 if (laddr->ifa->address.sa.sa_family == AF_INET6) { 1156 struct sockaddr_in6 *sin_a; 1157 1158 sin_a = (struct sockaddr_in6 *)&laddr->ifa->address.sin6; 1159 sin6->sin6_addr = sin_a->sin6_addr; 1160 fnd = 1; 1161 break; 1162 } 1163 } 1164 if (!fnd) { 1165 SCTP_FREE_SONAME(sin6); 1166 SCTP_INP_RUNLOCK(inp); 1167 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ENOENT); 1168 return ENOENT; 1169 } 1170 } 1171 SCTP_INP_RUNLOCK(inp); 1172 /* Scoping things for v6 */ 1173 if ((error = sa6_recoverscope(sin6)) != 0) { 1174 SCTP_FREE_SONAME(sin6); 1175 return (error); 1176 } 1177 (*addr) = (struct sockaddr *)sin6; 1178 return (0); 1179 } 1180 1181 static int 1182 sctp6_peeraddr(struct socket *so, struct sockaddr **addr) 1183 { 1184 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)*addr; 1185 int fnd; 1186 struct sockaddr_in6 *sin_a6; 1187 struct sctp_inpcb *inp; 1188 struct sctp_tcb *stcb; 1189 struct sctp_nets *net; 1190 1191 int error; 1192 1193 /* 1194 * Do the malloc first in case it blocks. 1195 */ 1196 inp = (struct sctp_inpcb *)so->so_pcb; 1197 if ((inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) == 0) { 1198 /* UDP type and listeners will drop out here */ 1199 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ENOTCONN); 1200 return (ENOTCONN); 1201 } 1202 SCTP_MALLOC_SONAME(sin6, struct sockaddr_in6 *, sizeof *sin6); 1203 if (sin6 == NULL) 1204 return (ENOMEM); 1205 sin6->sin6_family = AF_INET6; 1206 sin6->sin6_len = sizeof(*sin6); 1207 1208 /* We must recapture incase we blocked */ 1209 inp = (struct sctp_inpcb *)so->so_pcb; 1210 if (inp == NULL) { 1211 SCTP_FREE_SONAME(sin6); 1212 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ECONNRESET); 1213 return ECONNRESET; 1214 } 1215 SCTP_INP_RLOCK(inp); 1216 stcb = LIST_FIRST(&inp->sctp_asoc_list); 1217 if (stcb) { 1218 SCTP_TCB_LOCK(stcb); 1219 } 1220 SCTP_INP_RUNLOCK(inp); 1221 if (stcb == NULL) { 1222 SCTP_FREE_SONAME(sin6); 1223 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ECONNRESET); 1224 return ECONNRESET; 1225 } 1226 fnd = 0; 1227 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1228 sin_a6 = (struct sockaddr_in6 *)&net->ro._l_addr; 1229 if (sin_a6->sin6_family == AF_INET6) { 1230 fnd = 1; 1231 sin6->sin6_port = stcb->rport; 1232 sin6->sin6_addr = sin_a6->sin6_addr; 1233 break; 1234 } 1235 } 1236 SCTP_TCB_UNLOCK(stcb); 1237 if (!fnd) { 1238 /* No IPv4 address */ 1239 SCTP_FREE_SONAME(sin6); 1240 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, ENOENT); 1241 return ENOENT; 1242 } 1243 if ((error = sa6_recoverscope(sin6)) != 0) 1244 return (error); 1245 *addr = (struct sockaddr *)sin6; 1246 return (0); 1247 } 1248 1249 static int 1250 sctp6_in6getaddr(struct socket *so, struct sockaddr **nam) 1251 { 1252 struct sockaddr *addr; 1253 struct in6pcb *inp6 = sotoin6pcb(so); 1254 int error; 1255 1256 if (inp6 == NULL) { 1257 SCTP_LTRACE_ERR_RET(NULL, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 1258 return EINVAL; 1259 } 1260 /* allow v6 addresses precedence */ 1261 error = sctp6_getaddr(so, nam); 1262 if (error) { 1263 /* try v4 next if v6 failed */ 1264 error = sctp_ingetaddr(so, nam); 1265 if (error) { 1266 return (error); 1267 } 1268 addr = *nam; 1269 /* if I'm V6ONLY, convert it to v4-mapped */ 1270 if (SCTP_IPV6_V6ONLY(inp6)) { 1271 struct sockaddr_in6 sin6; 1272 1273 in6_sin_2_v4mapsin6((struct sockaddr_in *)addr, &sin6); 1274 memcpy(addr, &sin6, sizeof(struct sockaddr_in6)); 1275 1276 } 1277 } 1278 return (error); 1279 } 1280 1281 1282 static int 1283 sctp6_getpeeraddr(struct socket *so, struct sockaddr **nam) 1284 { 1285 struct sockaddr *addr = *nam; 1286 struct in6pcb *inp6 = sotoin6pcb(so); 1287 int error; 1288 1289 if (inp6 == NULL) { 1290 SCTP_LTRACE_ERR_RET(NULL, NULL, NULL, SCTP_FROM_SCTP6_USRREQ, EINVAL); 1291 return EINVAL; 1292 } 1293 /* allow v6 addresses precedence */ 1294 error = sctp6_peeraddr(so, nam); 1295 if (error) { 1296 /* try v4 next if v6 failed */ 1297 error = sctp_peeraddr(so, nam); 1298 if (error) { 1299 return (error); 1300 } 1301 /* if I'm V6ONLY, convert it to v4-mapped */ 1302 if (SCTP_IPV6_V6ONLY(inp6)) { 1303 struct sockaddr_in6 sin6; 1304 1305 in6_sin_2_v4mapsin6((struct sockaddr_in *)addr, &sin6); 1306 memcpy(addr, &sin6, sizeof(struct sockaddr_in6)); 1307 } 1308 } 1309 return error; 1310 } 1311 1312 struct pr_usrreqs sctp6_usrreqs = { 1313 .pru_abort = sctp6_abort, 1314 .pru_accept = sctp_accept, 1315 .pru_attach = sctp6_attach, 1316 .pru_bind = sctp6_bind, 1317 .pru_connect = sctp6_connect, 1318 .pru_control = in6_control, 1319 .pru_close = sctp6_close, 1320 .pru_detach = sctp6_close, 1321 .pru_sopoll = sopoll_generic, 1322 .pru_flush = sctp_flush, 1323 .pru_disconnect = sctp6_disconnect, 1324 .pru_listen = sctp_listen, 1325 .pru_peeraddr = sctp6_getpeeraddr, 1326 .pru_send = sctp6_send, 1327 .pru_shutdown = sctp_shutdown, 1328 .pru_sockaddr = sctp6_in6getaddr, 1329 .pru_sosend = sctp_sosend, 1330 .pru_soreceive = sctp_soreceive 1331 }; 1332