1 /*- 2 * Copyright (c) 2001-2007, by Cisco Systems, Inc. All rights reserved. 3 * 4 * Redistribution and use in source and binary forms, with or without 5 * modification, are permitted provided that the following conditions are met: 6 * 7 * a) Redistributions of source code must retain the above copyright notice, 8 * this list of conditions and the following disclaimer. 9 * 10 * b) Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in 12 * the documentation and/or other materials provided with the distribution. 13 * 14 * c) Neither the name of Cisco Systems, Inc. nor the names of its 15 * contributors may be used to endorse or promote products derived 16 * from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 19 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, 20 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 22 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 23 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 24 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 26 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 27 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 28 * THE POSSIBILITY OF SUCH DAMAGE. 29 */ 30 31 /* $KAME: sctp_usrreq.c,v 1.48 2005/03/07 23:26:08 itojun Exp $ */ 32 33 #include <sys/cdefs.h> 34 __FBSDID("$FreeBSD$"); 35 #include <netinet/sctp_os.h> 36 #include <sys/proc.h> 37 #include <netinet/sctp_pcb.h> 38 #include <netinet/sctp_header.h> 39 #include <netinet/sctp_var.h> 40 #if defined(INET6) 41 #include <netinet6/sctp6_var.h> 42 #endif 43 #include <netinet/sctp_sysctl.h> 44 #include <netinet/sctp_output.h> 45 #include <netinet/sctp_uio.h> 46 #include <netinet/sctp_asconf.h> 47 #include <netinet/sctputil.h> 48 #include <netinet/sctp_indata.h> 49 #include <netinet/sctp_timer.h> 50 #include <netinet/sctp_auth.h> 51 #include <netinet/sctp_bsd_addr.h> 52 53 54 55 56 void 57 sctp_init(void) 58 { 59 /* Init the SCTP pcb in sctp_pcb.c */ 60 u_long sb_max_adj; 61 62 sctp_pcb_init(); 63 64 if ((nmbclusters / 8) > SCTP_ASOC_MAX_CHUNKS_ON_QUEUE) 65 sctp_max_chunks_on_queue = (nmbclusters / 8); 66 /* 67 * Allow a user to take no more than 1/2 the number of clusters or 68 * the SB_MAX whichever is smaller for the send window. 69 */ 70 sb_max_adj = (u_long)((u_quad_t) (SB_MAX) * MCLBYTES / (MSIZE + MCLBYTES)); 71 sctp_sendspace = min((min(SB_MAX, sb_max_adj)), 72 (((uint32_t) nmbclusters / 2) * SCTP_DEFAULT_MAXSEGMENT)); 73 /* 74 * Now for the recv window, should we take the same amount? or 75 * should I do 1/2 the SB_MAX instead in the SB_MAX min above. For 76 * now I will just copy. 77 */ 78 sctp_recvspace = sctp_sendspace; 79 80 81 } 82 83 84 85 /* 86 * cleanup of the sctppcbinfo structure. 87 * Assumes that the sctppcbinfo lock is held. 88 */ 89 void 90 sctp_pcbinfo_cleanup(void) 91 { 92 /* free the hash tables */ 93 if (sctppcbinfo.sctp_asochash != NULL) 94 SCTP_HASH_FREE(sctppcbinfo.sctp_asochash, sctppcbinfo.hashasocmark); 95 if (sctppcbinfo.sctp_ephash != NULL) 96 SCTP_HASH_FREE(sctppcbinfo.sctp_ephash, sctppcbinfo.hashmark); 97 if (sctppcbinfo.sctp_tcpephash != NULL) 98 SCTP_HASH_FREE(sctppcbinfo.sctp_tcpephash, sctppcbinfo.hashtcpmark); 99 if (sctppcbinfo.sctp_restarthash != NULL) 100 SCTP_HASH_FREE(sctppcbinfo.sctp_restarthash, sctppcbinfo.hashrestartmark); 101 } 102 103 104 static void 105 sctp_pathmtu_adjustment(struct sctp_inpcb *inp, 106 struct sctp_tcb *stcb, 107 struct sctp_nets *net, 108 uint16_t nxtsz) 109 { 110 struct sctp_tmit_chunk *chk; 111 112 /* Adjust that too */ 113 stcb->asoc.smallest_mtu = nxtsz; 114 /* now off to subtract IP_DF flag if needed */ 115 #ifdef SCTP_PRINT_FOR_B_AND_M 116 SCTP_PRINTF("sctp_pathmtu_adjust called inp:%p stcb:%p net:%p nxtsz:%d\n", 117 inp, stcb, net, nxtsz); 118 #endif 119 TAILQ_FOREACH(chk, &stcb->asoc.send_queue, sctp_next) { 120 if ((chk->send_size + IP_HDR_SIZE) > nxtsz) { 121 chk->flags |= CHUNK_FLAGS_FRAGMENT_OK; 122 } 123 } 124 TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) { 125 if ((chk->send_size + IP_HDR_SIZE) > nxtsz) { 126 /* 127 * For this guy we also mark for immediate resend 128 * since we sent to big of chunk 129 */ 130 chk->flags |= CHUNK_FLAGS_FRAGMENT_OK; 131 if (chk->sent != SCTP_DATAGRAM_RESEND) { 132 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt); 133 } 134 chk->sent = SCTP_DATAGRAM_RESEND; 135 chk->rec.data.doing_fast_retransmit = 0; 136 #ifdef SCTP_FLIGHT_LOGGING 137 sctp_misc_ints(SCTP_FLIGHT_LOG_DOWN_PMTU, 138 chk->whoTo->flight_size, 139 chk->book_size, 140 (uintptr_t) chk->whoTo, 141 chk->rec.data.TSN_seq); 142 #endif 143 /* Clear any time so NO RTT is being done */ 144 chk->do_rtt = 0; 145 sctp_flight_size_decrease(chk); 146 sctp_total_flight_decrease(stcb, chk); 147 } 148 } 149 } 150 151 static void 152 sctp_notify_mbuf(struct sctp_inpcb *inp, 153 struct sctp_tcb *stcb, 154 struct sctp_nets *net, 155 struct ip *ip, 156 struct sctphdr *sh) 157 { 158 struct icmp *icmph; 159 int totsz, tmr_stopped = 0; 160 uint16_t nxtsz; 161 162 /* protection */ 163 if ((inp == NULL) || (stcb == NULL) || (net == NULL) || 164 (ip == NULL) || (sh == NULL)) { 165 if (stcb != NULL) { 166 SCTP_TCB_UNLOCK(stcb); 167 } 168 return; 169 } 170 /* First job is to verify the vtag matches what I would send */ 171 if (ntohl(sh->v_tag) != (stcb->asoc.peer_vtag)) { 172 SCTP_TCB_UNLOCK(stcb); 173 return; 174 } 175 icmph = (struct icmp *)((caddr_t)ip - (sizeof(struct icmp) - 176 sizeof(struct ip))); 177 if (icmph->icmp_type != ICMP_UNREACH) { 178 /* We only care about unreachable */ 179 SCTP_TCB_UNLOCK(stcb); 180 return; 181 } 182 if (icmph->icmp_code != ICMP_UNREACH_NEEDFRAG) { 183 /* not a unreachable message due to frag. */ 184 SCTP_TCB_UNLOCK(stcb); 185 return; 186 } 187 totsz = ip->ip_len; 188 189 nxtsz = ntohs(icmph->icmp_seq); 190 if (nxtsz == 0) { 191 /* 192 * old type router that does not tell us what the next size 193 * mtu is. Rats we will have to guess (in a educated fashion 194 * of course) 195 */ 196 nxtsz = find_next_best_mtu(totsz); 197 } 198 /* Stop any PMTU timer */ 199 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 200 tmr_stopped = 1; 201 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net, 202 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_1); 203 } 204 /* Adjust destination size limit */ 205 if (net->mtu > nxtsz) { 206 net->mtu = nxtsz; 207 } 208 /* now what about the ep? */ 209 if (stcb->asoc.smallest_mtu > nxtsz) { 210 #ifdef SCTP_PRINT_FOR_B_AND_M 211 SCTP_PRINTF("notify_mbuf (ICMP) calls sctp_pathmtu_adjust mtu:%d\n", 212 nxtsz); 213 #endif 214 sctp_pathmtu_adjustment(inp, stcb, net, nxtsz); 215 } 216 if (tmr_stopped) 217 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net); 218 219 SCTP_TCB_UNLOCK(stcb); 220 } 221 222 223 void 224 sctp_notify(struct sctp_inpcb *inp, 225 int error, 226 struct sctphdr *sh, 227 struct sockaddr *to, 228 struct sctp_tcb *stcb, 229 struct sctp_nets *net) 230 { 231 /* protection */ 232 if ((inp == NULL) || (stcb == NULL) || (net == NULL) || 233 (sh == NULL) || (to == NULL)) { 234 return; 235 } 236 /* First job is to verify the vtag matches what I would send */ 237 if (ntohl(sh->v_tag) != (stcb->asoc.peer_vtag)) { 238 return; 239 } 240 /* FIX ME FIX ME PROTOPT i.e. no SCTP should ALWAYS be an ABORT */ 241 242 if ((error == EHOSTUNREACH) || /* Host is not reachable */ 243 (error == EHOSTDOWN) || /* Host is down */ 244 (error == ECONNREFUSED) || /* Host refused the connection, (not 245 * an abort?) */ 246 (error == ENOPROTOOPT) /* SCTP is not present on host */ 247 ) { 248 /* 249 * Hmm reachablity problems we must examine closely. If its 250 * not reachable, we may have lost a network. Or if there is 251 * NO protocol at the other end named SCTP. well we consider 252 * it a OOTB abort. 253 */ 254 if ((error == EHOSTUNREACH) || (error == EHOSTDOWN)) { 255 if (net->dest_state & SCTP_ADDR_REACHABLE) { 256 /* Ok that destination is NOT reachable */ 257 SCTP_PRINTF("ICMP (thresh %d/%d) takes interface %p down\n", 258 net->error_count, 259 net->failure_threshold, 260 net); 261 262 net->dest_state &= ~SCTP_ADDR_REACHABLE; 263 net->dest_state |= SCTP_ADDR_NOT_REACHABLE; 264 net->error_count = net->failure_threshold + 1; 265 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_DOWN, 266 stcb, SCTP_FAILED_THRESHOLD, 267 (void *)net); 268 } 269 if (stcb) { 270 SCTP_TCB_UNLOCK(stcb); 271 } 272 } else { 273 /* 274 * Here the peer is either playing tricks on us, 275 * including an address that belongs to someone who 276 * does not support SCTP OR was a userland 277 * implementation that shutdown and now is dead. In 278 * either case treat it like a OOTB abort with no 279 * TCB 280 */ 281 sctp_abort_notification(stcb, SCTP_PEER_FAULTY); 282 sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_2); 283 /* no need to unlock here, since the TCB is gone */ 284 } 285 } else { 286 /* Send all others to the app */ 287 if (stcb) { 288 SCTP_TCB_UNLOCK(stcb); 289 } 290 if (inp->sctp_socket) { 291 #ifdef SCTP_LOCK_LOGGING 292 sctp_log_lock(inp, stcb, SCTP_LOG_LOCK_SOCK); 293 #endif 294 SOCK_LOCK(inp->sctp_socket); 295 inp->sctp_socket->so_error = error; 296 sctp_sowwakeup(inp, inp->sctp_socket); 297 SOCK_UNLOCK(inp->sctp_socket); 298 } 299 } 300 } 301 302 void 303 sctp_ctlinput(cmd, sa, vip) 304 int cmd; 305 struct sockaddr *sa; 306 void *vip; 307 { 308 struct ip *ip = vip; 309 struct sctphdr *sh; 310 uint32_t vrf_id; 311 312 /* FIX, for non-bsd is this right? */ 313 vrf_id = SCTP_DEFAULT_VRFID; 314 if (sa->sa_family != AF_INET || 315 ((struct sockaddr_in *)sa)->sin_addr.s_addr == INADDR_ANY) { 316 return; 317 } 318 if (PRC_IS_REDIRECT(cmd)) { 319 ip = 0; 320 } else if ((unsigned)cmd >= PRC_NCMDS || inetctlerrmap[cmd] == 0) { 321 return; 322 } 323 if (ip) { 324 struct sctp_inpcb *inp = NULL; 325 struct sctp_tcb *stcb = NULL; 326 struct sctp_nets *net = NULL; 327 struct sockaddr_in to, from; 328 329 sh = (struct sctphdr *)((caddr_t)ip + (ip->ip_hl << 2)); 330 bzero(&to, sizeof(to)); 331 bzero(&from, sizeof(from)); 332 from.sin_family = to.sin_family = AF_INET; 333 from.sin_len = to.sin_len = sizeof(to); 334 from.sin_port = sh->src_port; 335 from.sin_addr = ip->ip_src; 336 to.sin_port = sh->dest_port; 337 to.sin_addr = ip->ip_dst; 338 339 /* 340 * 'to' holds the dest of the packet that failed to be sent. 341 * 'from' holds our local endpoint address. Thus we reverse 342 * the to and the from in the lookup. 343 */ 344 stcb = sctp_findassociation_addr_sa((struct sockaddr *)&from, 345 (struct sockaddr *)&to, 346 &inp, &net, 1, vrf_id); 347 if (stcb != NULL && inp && (inp->sctp_socket != NULL)) { 348 if (cmd != PRC_MSGSIZE) { 349 int cm; 350 351 if (cmd == PRC_HOSTDEAD) { 352 cm = EHOSTUNREACH; 353 } else { 354 cm = inetctlerrmap[cmd]; 355 } 356 sctp_notify(inp, cm, sh, 357 (struct sockaddr *)&to, stcb, 358 net); 359 } else { 360 /* handle possible ICMP size messages */ 361 sctp_notify_mbuf(inp, stcb, net, ip, sh); 362 } 363 } else { 364 if ((stcb == NULL) && (inp != NULL)) { 365 /* reduce ref-count */ 366 SCTP_INP_WLOCK(inp); 367 SCTP_INP_DECR_REF(inp); 368 SCTP_INP_WUNLOCK(inp); 369 } 370 } 371 } 372 return; 373 } 374 375 static int 376 sctp_getcred(SYSCTL_HANDLER_ARGS) 377 { 378 struct xucred xuc; 379 struct sockaddr_in addrs[2]; 380 struct sctp_inpcb *inp; 381 struct sctp_nets *net; 382 struct sctp_tcb *stcb; 383 int error; 384 uint32_t vrf_id; 385 386 387 /* FIX, for non-bsd is this right? */ 388 vrf_id = SCTP_DEFAULT_VRFID; 389 390 /* 391 * XXXRW: Other instances of getcred use SUSER_ALLOWJAIL, as socket 392 * visibility is scoped using cr_canseesocket(), which it is not 393 * here. 394 */ 395 error = priv_check_cred(req->td->td_ucred, PRIV_NETINET_GETCRED, 396 SUSER_ALLOWJAIL); 397 if (error) 398 return (error); 399 400 error = SYSCTL_IN(req, addrs, sizeof(addrs)); 401 if (error) 402 return (error); 403 404 stcb = sctp_findassociation_addr_sa(sintosa(&addrs[0]), 405 sintosa(&addrs[1]), 406 &inp, &net, 1, vrf_id); 407 if (stcb == NULL || inp == NULL || inp->sctp_socket == NULL) { 408 if ((inp != NULL) && (stcb == NULL)) { 409 /* reduce ref-count */ 410 SCTP_INP_WLOCK(inp); 411 SCTP_INP_DECR_REF(inp); 412 goto cred_can_cont; 413 } 414 error = ENOENT; 415 goto out; 416 } 417 SCTP_TCB_UNLOCK(stcb); 418 /* 419 * We use the write lock here, only since in the error leg we need 420 * it. If we used RLOCK, then we would have to 421 * wlock/decr/unlock/rlock. Which in theory could create a hole. 422 * Better to use higher wlock. 423 */ 424 SCTP_INP_WLOCK(inp); 425 cred_can_cont: 426 error = cr_canseesocket(req->td->td_ucred, inp->sctp_socket); 427 if (error) { 428 SCTP_INP_WUNLOCK(inp); 429 goto out; 430 } 431 cru2x(inp->sctp_socket->so_cred, &xuc); 432 SCTP_INP_WUNLOCK(inp); 433 error = SYSCTL_OUT(req, &xuc, sizeof(struct xucred)); 434 out: 435 return (error); 436 } 437 438 SYSCTL_PROC(_net_inet_sctp, OID_AUTO, getcred, CTLTYPE_OPAQUE | CTLFLAG_RW, 439 0, 0, sctp_getcred, "S,ucred", "Get the ucred of a SCTP connection"); 440 441 442 static void 443 sctp_abort(struct socket *so) 444 { 445 struct sctp_inpcb *inp; 446 uint32_t flags; 447 448 inp = (struct sctp_inpcb *)so->so_pcb; 449 if (inp == 0) 450 return; 451 452 sctp_must_try_again: 453 flags = inp->sctp_flags; 454 #ifdef SCTP_LOG_CLOSING 455 sctp_log_closing(inp, NULL, 17); 456 #endif 457 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) && 458 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) { 459 #ifdef SCTP_LOG_CLOSING 460 sctp_log_closing(inp, NULL, 16); 461 #endif 462 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT, 463 SCTP_CALLED_AFTER_CMPSET_OFCLOSE); 464 SOCK_LOCK(so); 465 SCTP_SB_CLEAR(so->so_snd); 466 /* 467 * same for the rcv ones, they are only here for the 468 * accounting/select. 469 */ 470 SCTP_SB_CLEAR(so->so_rcv); 471 472 /* Now null out the reference, we are completely detached. */ 473 so->so_pcb = NULL; 474 SOCK_UNLOCK(so); 475 } else { 476 flags = inp->sctp_flags; 477 if ((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) { 478 goto sctp_must_try_again; 479 } 480 } 481 return; 482 } 483 484 static int 485 sctp_attach(struct socket *so, int proto, struct thread *p) 486 { 487 struct sctp_inpcb *inp; 488 struct inpcb *ip_inp; 489 int error; 490 491 #ifdef IPSEC 492 uint32_t flags; 493 494 #endif 495 inp = (struct sctp_inpcb *)so->so_pcb; 496 if (inp != 0) { 497 return EINVAL; 498 } 499 error = SCTP_SORESERVE(so, sctp_sendspace, sctp_recvspace); 500 if (error) { 501 return error; 502 } 503 error = sctp_inpcb_alloc(so); 504 if (error) { 505 return error; 506 } 507 inp = (struct sctp_inpcb *)so->so_pcb; 508 SCTP_INP_WLOCK(inp); 509 510 inp->sctp_flags &= ~SCTP_PCB_FLAGS_BOUND_V6; /* I'm not v6! */ 511 ip_inp = &inp->ip_inp.inp; 512 ip_inp->inp_vflag |= INP_IPV4; 513 ip_inp->inp_ip_ttl = ip_defttl; 514 515 #ifdef IPSEC 516 error = ipsec_init_pcbpolicy(so, &ip_inp->inp_sp); 517 #ifdef SCTP_LOG_CLOSING 518 sctp_log_closing(inp, NULL, 17); 519 #endif 520 if (error != 0) { 521 flags = inp->sctp_flags; 522 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) && 523 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) { 524 #ifdef SCTP_LOG_CLOSING 525 sctp_log_closing(inp, NULL, 15); 526 #endif 527 SCTP_INP_WUNLOCK(inp); 528 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT, 529 SCTP_CALLED_AFTER_CMPSET_OFCLOSE); 530 } else { 531 SCTP_INP_WUNLOCK(inp); 532 } 533 return error; 534 } 535 #endif /* IPSEC */ 536 SCTP_INP_WUNLOCK(inp); 537 return 0; 538 } 539 540 static int 541 sctp_bind(struct socket *so, struct sockaddr *addr, struct thread *p) 542 { 543 struct sctp_inpcb *inp; 544 int error; 545 546 #ifdef INET6 547 if (addr && addr->sa_family != AF_INET) 548 /* must be a v4 address! */ 549 return EINVAL; 550 #endif /* INET6 */ 551 if (addr && (addr->sa_len != sizeof(struct sockaddr_in))) { 552 return EINVAL; 553 } 554 inp = (struct sctp_inpcb *)so->so_pcb; 555 if (inp == 0) 556 return EINVAL; 557 558 error = sctp_inpcb_bind(so, addr, p); 559 return error; 560 } 561 562 static void 563 sctp_close(struct socket *so) 564 { 565 struct sctp_inpcb *inp; 566 uint32_t flags; 567 568 inp = (struct sctp_inpcb *)so->so_pcb; 569 if (inp == 0) 570 return; 571 572 /* 573 * Inform all the lower layer assoc that we are done. 574 */ 575 sctp_must_try_again: 576 flags = inp->sctp_flags; 577 #ifdef SCTP_LOG_CLOSING 578 sctp_log_closing(inp, NULL, 17); 579 #endif 580 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) && 581 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) { 582 if (((so->so_options & SO_LINGER) && (so->so_linger == 0)) || 583 (so->so_rcv.sb_cc > 0)) { 584 #ifdef SCTP_LOG_CLOSING 585 sctp_log_closing(inp, NULL, 13); 586 #endif 587 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT, 588 SCTP_CALLED_AFTER_CMPSET_OFCLOSE); 589 } else { 590 #ifdef SCTP_LOG_CLOSING 591 sctp_log_closing(inp, NULL, 14); 592 #endif 593 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_GRACEFUL_CLOSE, 594 SCTP_CALLED_AFTER_CMPSET_OFCLOSE); 595 } 596 /* 597 * The socket is now detached, no matter what the state of 598 * the SCTP association. 599 */ 600 SOCK_LOCK(so); 601 SCTP_SB_CLEAR(so->so_snd); 602 /* 603 * same for the rcv ones, they are only here for the 604 * accounting/select. 605 */ 606 SCTP_SB_CLEAR(so->so_rcv); 607 608 /* Now null out the reference, we are completely detached. */ 609 so->so_pcb = NULL; 610 SOCK_UNLOCK(so); 611 } else { 612 flags = inp->sctp_flags; 613 if ((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) { 614 goto sctp_must_try_again; 615 } 616 } 617 return; 618 } 619 620 621 int 622 sctp_sendm(struct socket *so, int flags, struct mbuf *m, struct sockaddr *addr, 623 struct mbuf *control, struct thread *p); 624 625 626 int 627 sctp_sendm(struct socket *so, int flags, struct mbuf *m, struct sockaddr *addr, 628 struct mbuf *control, struct thread *p) 629 { 630 struct sctp_inpcb *inp; 631 int error; 632 633 inp = (struct sctp_inpcb *)so->so_pcb; 634 if (inp == 0) { 635 if (control) { 636 sctp_m_freem(control); 637 control = NULL; 638 } 639 sctp_m_freem(m); 640 return EINVAL; 641 } 642 /* Got to have an to address if we are NOT a connected socket */ 643 if ((addr == NULL) && 644 ((inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) || 645 (inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE)) 646 ) { 647 goto connected_type; 648 } else if (addr == NULL) { 649 error = EDESTADDRREQ; 650 sctp_m_freem(m); 651 if (control) { 652 sctp_m_freem(control); 653 control = NULL; 654 } 655 return (error); 656 } 657 #ifdef INET6 658 if (addr->sa_family != AF_INET) { 659 /* must be a v4 address! */ 660 sctp_m_freem(m); 661 if (control) { 662 sctp_m_freem(control); 663 control = NULL; 664 } 665 error = EDESTADDRREQ; 666 return EINVAL; 667 } 668 #endif /* INET6 */ 669 connected_type: 670 /* now what about control */ 671 if (control) { 672 if (inp->control) { 673 SCTP_PRINTF("huh? control set?\n"); 674 sctp_m_freem(inp->control); 675 inp->control = NULL; 676 } 677 inp->control = control; 678 } 679 /* Place the data */ 680 if (inp->pkt) { 681 SCTP_BUF_NEXT(inp->pkt_last) = m; 682 inp->pkt_last = m; 683 } else { 684 inp->pkt_last = inp->pkt = m; 685 } 686 if ( 687 /* FreeBSD uses a flag passed */ 688 ((flags & PRUS_MORETOCOME) == 0) 689 ) { 690 /* 691 * note with the current version this code will only be used 692 * by OpenBSD-- NetBSD, FreeBSD, and MacOS have methods for 693 * re-defining sosend to use the sctp_sosend. One can 694 * optionally switch back to this code (by changing back the 695 * definitions) but this is not advisable. This code is used 696 * by FreeBSD when sending a file with sendfile() though. 697 */ 698 int ret; 699 700 ret = sctp_output(inp, inp->pkt, addr, inp->control, p, flags); 701 inp->pkt = NULL; 702 inp->control = NULL; 703 return (ret); 704 } else { 705 return (0); 706 } 707 } 708 709 static int 710 sctp_disconnect(struct socket *so) 711 { 712 struct sctp_inpcb *inp; 713 714 inp = (struct sctp_inpcb *)so->so_pcb; 715 if (inp == NULL) { 716 return (ENOTCONN); 717 } 718 SCTP_INP_RLOCK(inp); 719 if (inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) { 720 if (SCTP_LIST_EMPTY(&inp->sctp_asoc_list)) { 721 /* No connection */ 722 SCTP_INP_RUNLOCK(inp); 723 return (0); 724 } else { 725 struct sctp_association *asoc; 726 struct sctp_tcb *stcb; 727 728 stcb = LIST_FIRST(&inp->sctp_asoc_list); 729 if (stcb == NULL) { 730 SCTP_INP_RUNLOCK(inp); 731 return (EINVAL); 732 } 733 SCTP_TCB_LOCK(stcb); 734 asoc = &stcb->asoc; 735 if (stcb->asoc.state & SCTP_STATE_ABOUT_TO_BE_FREED) { 736 /* We are about to be freed, out of here */ 737 SCTP_TCB_UNLOCK(stcb); 738 SCTP_INP_RUNLOCK(inp); 739 return (0); 740 } 741 if (((so->so_options & SO_LINGER) && 742 (so->so_linger == 0)) || 743 (so->so_rcv.sb_cc > 0)) { 744 if (SCTP_GET_STATE(asoc) != 745 SCTP_STATE_COOKIE_WAIT) { 746 /* Left with Data unread */ 747 struct mbuf *err; 748 749 err = sctp_get_mbuf_for_msg(sizeof(struct sctp_paramhdr), 0, M_DONTWAIT, 1, MT_DATA); 750 if (err) { 751 /* 752 * Fill in the user 753 * initiated abort 754 */ 755 struct sctp_paramhdr *ph; 756 757 ph = mtod(err, struct sctp_paramhdr *); 758 SCTP_BUF_LEN(err) = sizeof(struct sctp_paramhdr); 759 ph->param_type = htons(SCTP_CAUSE_USER_INITIATED_ABT); 760 ph->param_length = htons(SCTP_BUF_LEN(err)); 761 } 762 sctp_send_abort_tcb(stcb, err); 763 SCTP_STAT_INCR_COUNTER32(sctps_aborted); 764 } 765 SCTP_INP_RUNLOCK(inp); 766 if ((SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_OPEN) || 767 (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 768 SCTP_STAT_DECR_GAUGE32(sctps_currestab); 769 } 770 sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_3); 771 /* No unlock tcb assoc is gone */ 772 return (0); 773 } 774 if (TAILQ_EMPTY(&asoc->send_queue) && 775 TAILQ_EMPTY(&asoc->sent_queue) && 776 (asoc->stream_queue_cnt == 0)) { 777 /* there is nothing queued to send, so done */ 778 if (asoc->locked_on_sending) { 779 goto abort_anyway; 780 } 781 if ((SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT) && 782 (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_ACK_SENT)) { 783 /* only send SHUTDOWN 1st time thru */ 784 sctp_stop_timers_for_shutdown(stcb); 785 sctp_send_shutdown(stcb, 786 stcb->asoc.primary_destination); 787 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_T3); 788 if ((SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) || 789 (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 790 SCTP_STAT_DECR_GAUGE32(sctps_currestab); 791 } 792 asoc->state = SCTP_STATE_SHUTDOWN_SENT; 793 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWN, 794 stcb->sctp_ep, stcb, 795 asoc->primary_destination); 796 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 797 stcb->sctp_ep, stcb, 798 asoc->primary_destination); 799 } 800 } else { 801 /* 802 * we still got (or just got) data to send, 803 * so set SHUTDOWN_PENDING 804 */ 805 /* 806 * XXX sockets draft says that SCTP_EOF 807 * should be sent with no data. currently, 808 * we will allow user data to be sent first 809 * and move to SHUTDOWN-PENDING 810 */ 811 asoc->state |= SCTP_STATE_SHUTDOWN_PENDING; 812 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, stcb->sctp_ep, stcb, 813 asoc->primary_destination); 814 if (asoc->locked_on_sending) { 815 /* Locked to send out the data */ 816 struct sctp_stream_queue_pending *sp; 817 818 sp = TAILQ_LAST(&asoc->locked_on_sending->outqueue, sctp_streamhead); 819 if (sp == NULL) { 820 SCTP_PRINTF("Error, sp is NULL, locked on sending is non-null strm:%d\n", 821 asoc->locked_on_sending->stream_no); 822 } else { 823 if ((sp->length == 0) && (sp->msg_is_complete == 0)) 824 asoc->state |= SCTP_STATE_PARTIAL_MSG_LEFT; 825 } 826 } 827 if (TAILQ_EMPTY(&asoc->send_queue) && 828 TAILQ_EMPTY(&asoc->sent_queue) && 829 (asoc->state & SCTP_STATE_PARTIAL_MSG_LEFT)) { 830 struct mbuf *op_err; 831 832 abort_anyway: 833 op_err = sctp_get_mbuf_for_msg((sizeof(struct sctp_paramhdr) + sizeof(uint32_t)), 834 0, M_DONTWAIT, 1, MT_DATA); 835 if (op_err) { 836 /* 837 * Fill in the user 838 * initiated abort 839 */ 840 struct sctp_paramhdr *ph; 841 uint32_t *ippp; 842 843 SCTP_BUF_LEN(op_err) = 844 (sizeof(struct sctp_paramhdr) + sizeof(uint32_t)); 845 ph = mtod(op_err, 846 struct sctp_paramhdr *); 847 ph->param_type = htons( 848 SCTP_CAUSE_USER_INITIATED_ABT); 849 ph->param_length = htons(SCTP_BUF_LEN(op_err)); 850 ippp = (uint32_t *) (ph + 1); 851 *ippp = htonl(SCTP_FROM_SCTP_USRREQ + SCTP_LOC_4); 852 } 853 stcb->sctp_ep->last_abort_code = SCTP_FROM_SCTP_USRREQ + SCTP_LOC_4; 854 sctp_send_abort_tcb(stcb, op_err); 855 SCTP_STAT_INCR_COUNTER32(sctps_aborted); 856 if ((SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_OPEN) || 857 (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 858 SCTP_STAT_DECR_GAUGE32(sctps_currestab); 859 } 860 SCTP_INP_RUNLOCK(inp); 861 sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_5); 862 return (0); 863 } 864 } 865 SCTP_TCB_UNLOCK(stcb); 866 SCTP_INP_RUNLOCK(inp); 867 return (0); 868 } 869 /* not reached */ 870 } else { 871 /* UDP model does not support this */ 872 SCTP_INP_RUNLOCK(inp); 873 return EOPNOTSUPP; 874 } 875 } 876 877 int 878 sctp_shutdown(struct socket *so) 879 { 880 struct sctp_inpcb *inp; 881 882 inp = (struct sctp_inpcb *)so->so_pcb; 883 if (inp == 0) { 884 return EINVAL; 885 } 886 SCTP_INP_RLOCK(inp); 887 /* For UDP model this is a invalid call */ 888 if (inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) { 889 /* Restore the flags that the soshutdown took away. */ 890 so->so_rcv.sb_state &= ~SBS_CANTRCVMORE; 891 /* This proc will wakeup for read and do nothing (I hope) */ 892 SCTP_INP_RUNLOCK(inp); 893 return (EOPNOTSUPP); 894 } 895 /* 896 * Ok if we reach here its the TCP model and it is either a SHUT_WR 897 * or SHUT_RDWR. This means we put the shutdown flag against it. 898 */ 899 { 900 struct sctp_tcb *stcb; 901 struct sctp_association *asoc; 902 903 socantsendmore(so); 904 905 stcb = LIST_FIRST(&inp->sctp_asoc_list); 906 if (stcb == NULL) { 907 /* 908 * Ok we hit the case that the shutdown call was 909 * made after an abort or something. Nothing to do 910 * now. 911 */ 912 SCTP_INP_RUNLOCK(inp); 913 return (0); 914 } 915 SCTP_TCB_LOCK(stcb); 916 asoc = &stcb->asoc; 917 if (TAILQ_EMPTY(&asoc->send_queue) && 918 TAILQ_EMPTY(&asoc->sent_queue) && 919 (asoc->stream_queue_cnt == 0)) { 920 if (asoc->locked_on_sending) { 921 goto abort_anyway; 922 } 923 /* there is nothing queued to send, so I'm done... */ 924 if (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT) { 925 /* only send SHUTDOWN the first time through */ 926 sctp_stop_timers_for_shutdown(stcb); 927 sctp_send_shutdown(stcb, 928 stcb->asoc.primary_destination); 929 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_T3); 930 if ((SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) || 931 (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 932 SCTP_STAT_DECR_GAUGE32(sctps_currestab); 933 } 934 asoc->state = SCTP_STATE_SHUTDOWN_SENT; 935 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWN, 936 stcb->sctp_ep, stcb, 937 asoc->primary_destination); 938 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 939 stcb->sctp_ep, stcb, 940 asoc->primary_destination); 941 } 942 } else { 943 /* 944 * we still got (or just got) data to send, so set 945 * SHUTDOWN_PENDING 946 */ 947 asoc->state |= SCTP_STATE_SHUTDOWN_PENDING; 948 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, stcb->sctp_ep, stcb, 949 asoc->primary_destination); 950 951 if (asoc->locked_on_sending) { 952 /* Locked to send out the data */ 953 struct sctp_stream_queue_pending *sp; 954 955 sp = TAILQ_LAST(&asoc->locked_on_sending->outqueue, sctp_streamhead); 956 if (sp == NULL) { 957 SCTP_PRINTF("Error, sp is NULL, locked on sending is non-null strm:%d\n", 958 asoc->locked_on_sending->stream_no); 959 } else { 960 if ((sp->length == 0) && (sp->msg_is_complete == 0)) { 961 asoc->state |= SCTP_STATE_PARTIAL_MSG_LEFT; 962 } 963 } 964 } 965 if (TAILQ_EMPTY(&asoc->send_queue) && 966 TAILQ_EMPTY(&asoc->sent_queue) && 967 (asoc->state & SCTP_STATE_PARTIAL_MSG_LEFT)) { 968 struct mbuf *op_err; 969 970 abort_anyway: 971 op_err = sctp_get_mbuf_for_msg((sizeof(struct sctp_paramhdr) + sizeof(uint32_t)), 972 0, M_DONTWAIT, 1, MT_DATA); 973 if (op_err) { 974 /* Fill in the user initiated abort */ 975 struct sctp_paramhdr *ph; 976 uint32_t *ippp; 977 978 SCTP_BUF_LEN(op_err) = 979 sizeof(struct sctp_paramhdr) + sizeof(uint32_t); 980 ph = mtod(op_err, 981 struct sctp_paramhdr *); 982 ph->param_type = htons( 983 SCTP_CAUSE_USER_INITIATED_ABT); 984 ph->param_length = htons(SCTP_BUF_LEN(op_err)); 985 ippp = (uint32_t *) (ph + 1); 986 *ippp = htonl(SCTP_FROM_SCTP_USRREQ + SCTP_LOC_6); 987 } 988 stcb->sctp_ep->last_abort_code = SCTP_FROM_SCTP_USRREQ + SCTP_LOC_6; 989 sctp_abort_an_association(stcb->sctp_ep, stcb, 990 SCTP_RESPONSE_TO_USER_REQ, 991 op_err); 992 goto skip_unlock; 993 } 994 } 995 SCTP_TCB_UNLOCK(stcb); 996 } 997 skip_unlock: 998 SCTP_INP_RUNLOCK(inp); 999 return 0; 1000 } 1001 1002 /* 1003 * copies a "user" presentable address and removes embedded scope, etc. 1004 * returns 0 on success, 1 on error 1005 */ 1006 static uint32_t 1007 sctp_fill_user_address(struct sockaddr_storage *ss, struct sockaddr *sa) 1008 { 1009 struct sockaddr_in6 lsa6; 1010 1011 sa = (struct sockaddr *)sctp_recover_scope((struct sockaddr_in6 *)sa, 1012 &lsa6); 1013 memcpy(ss, sa, sa->sa_len); 1014 return (0); 1015 } 1016 1017 1018 1019 static size_t 1020 sctp_fill_up_addresses_vrf(struct sctp_inpcb *inp, 1021 struct sctp_tcb *stcb, 1022 size_t limit, 1023 struct sockaddr_storage *sas, 1024 uint32_t vrf_id) 1025 { 1026 struct sctp_ifn *sctp_ifn; 1027 struct sctp_ifa *sctp_ifa; 1028 int loopback_scope, ipv4_local_scope, local_scope, site_scope; 1029 size_t actual; 1030 int ipv4_addr_legal, ipv6_addr_legal; 1031 struct sctp_vrf *vrf; 1032 1033 actual = 0; 1034 if (limit <= 0) 1035 return (actual); 1036 1037 if (stcb) { 1038 /* Turn on all the appropriate scope */ 1039 loopback_scope = stcb->asoc.loopback_scope; 1040 ipv4_local_scope = stcb->asoc.ipv4_local_scope; 1041 local_scope = stcb->asoc.local_scope; 1042 site_scope = stcb->asoc.site_scope; 1043 } else { 1044 /* Turn on ALL scope, since we look at the EP */ 1045 loopback_scope = ipv4_local_scope = local_scope = 1046 site_scope = 1; 1047 } 1048 ipv4_addr_legal = ipv6_addr_legal = 0; 1049 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 1050 ipv6_addr_legal = 1; 1051 if (SCTP_IPV6_V6ONLY(inp) == 0) { 1052 ipv4_addr_legal = 1; 1053 } 1054 } else { 1055 ipv4_addr_legal = 1; 1056 } 1057 vrf = sctp_find_vrf(vrf_id); 1058 if (vrf == NULL) { 1059 return (0); 1060 } 1061 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 1062 LIST_FOREACH(sctp_ifn, &vrf->ifnlist, next_ifn) { 1063 if ((loopback_scope == 0) && 1064 SCTP_IFN_IS_IFT_LOOP(sctp_ifn)) { 1065 /* Skip loopback if loopback_scope not set */ 1066 continue; 1067 } 1068 LIST_FOREACH(sctp_ifa, &sctp_ifn->ifalist, next_ifa) { 1069 if (stcb) { 1070 /* 1071 * For the BOUND-ALL case, the list 1072 * associated with a TCB is Always 1073 * considered a reverse list.. i.e. 1074 * it lists addresses that are NOT 1075 * part of the association. If this 1076 * is one of those we must skip it. 1077 */ 1078 if (sctp_is_addr_restricted(stcb, 1079 sctp_ifa)) { 1080 continue; 1081 } 1082 } 1083 if ((sctp_ifa->address.sa.sa_family == AF_INET) && 1084 (ipv4_addr_legal)) { 1085 struct sockaddr_in *sin; 1086 1087 sin = (struct sockaddr_in *)&sctp_ifa->address.sa; 1088 if (sin->sin_addr.s_addr == 0) { 1089 /* 1090 * we skip unspecifed 1091 * addresses 1092 */ 1093 continue; 1094 } 1095 if ((ipv4_local_scope == 0) && 1096 (IN4_ISPRIVATE_ADDRESS(&sin->sin_addr))) { 1097 continue; 1098 } 1099 if (inp->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) { 1100 in6_sin_2_v4mapsin6(sin, (struct sockaddr_in6 *)sas); 1101 ((struct sockaddr_in6 *)sas)->sin6_port = inp->sctp_lport; 1102 sas = (struct sockaddr_storage *)((caddr_t)sas + sizeof(struct sockaddr_in6)); 1103 actual += sizeof(sizeof(struct sockaddr_in6)); 1104 } else { 1105 memcpy(sas, sin, sizeof(*sin)); 1106 ((struct sockaddr_in *)sas)->sin_port = inp->sctp_lport; 1107 sas = (struct sockaddr_storage *)((caddr_t)sas + sizeof(*sin)); 1108 actual += sizeof(*sin); 1109 } 1110 if (actual >= limit) { 1111 return (actual); 1112 } 1113 } else if ((sctp_ifa->address.sa.sa_family == AF_INET6) && 1114 (ipv6_addr_legal)) { 1115 struct sockaddr_in6 *sin6; 1116 1117 sin6 = (struct sockaddr_in6 *)&sctp_ifa->address.sa; 1118 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) { 1119 /* 1120 * we skip unspecifed 1121 * addresses 1122 */ 1123 continue; 1124 } 1125 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) { 1126 if (local_scope == 0) 1127 continue; 1128 if (sin6->sin6_scope_id == 0) { 1129 if (sa6_recoverscope(sin6) != 0) 1130 /* 1131 * bad link 1132 * local 1133 * address 1134 */ 1135 continue; 1136 } 1137 } 1138 if ((site_scope == 0) && 1139 (IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr))) { 1140 continue; 1141 } 1142 memcpy(sas, sin6, sizeof(*sin6)); 1143 ((struct sockaddr_in6 *)sas)->sin6_port = inp->sctp_lport; 1144 sas = (struct sockaddr_storage *)((caddr_t)sas + sizeof(*sin6)); 1145 actual += sizeof(*sin6); 1146 if (actual >= limit) { 1147 return (actual); 1148 } 1149 } 1150 } 1151 } 1152 } else { 1153 struct sctp_laddr *laddr; 1154 1155 /* The list is a NEGATIVE list */ 1156 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) { 1157 if (stcb) { 1158 if (sctp_is_addr_restricted(stcb, laddr->ifa)) { 1159 continue; 1160 } 1161 } 1162 if (sctp_fill_user_address(sas, &laddr->ifa->address.sa)) 1163 continue; 1164 1165 ((struct sockaddr_in6 *)sas)->sin6_port = inp->sctp_lport; 1166 sas = (struct sockaddr_storage *)((caddr_t)sas + 1167 laddr->ifa->address.sa.sa_len); 1168 actual += laddr->ifa->address.sa.sa_len; 1169 if (actual >= limit) { 1170 return (actual); 1171 } 1172 } 1173 } 1174 return (actual); 1175 } 1176 1177 static size_t 1178 sctp_fill_up_addresses(struct sctp_inpcb *inp, 1179 struct sctp_tcb *stcb, 1180 size_t limit, 1181 struct sockaddr_storage *sas) 1182 { 1183 size_t size = 0; 1184 1185 /* fill up addresses for the endpoint's default vrf */ 1186 size = sctp_fill_up_addresses_vrf(inp, stcb, limit, sas, 1187 inp->def_vrf_id); 1188 return (size); 1189 } 1190 1191 static int 1192 sctp_count_max_addresses_vrf(struct sctp_inpcb *inp, uint32_t vrf_id) 1193 { 1194 int cnt = 0; 1195 struct sctp_vrf *vrf = NULL; 1196 1197 /* 1198 * In both sub-set bound an bound_all cases we return the MAXIMUM 1199 * number of addresses that you COULD get. In reality the sub-set 1200 * bound may have an exclusion list for a given TCB OR in the 1201 * bound-all case a TCB may NOT include the loopback or other 1202 * addresses as well. 1203 */ 1204 vrf = sctp_find_vrf(vrf_id); 1205 if (vrf == NULL) { 1206 return (0); 1207 } 1208 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 1209 struct sctp_ifn *sctp_ifn; 1210 struct sctp_ifa *sctp_ifa; 1211 1212 LIST_FOREACH(sctp_ifn, &vrf->ifnlist, next_ifn) { 1213 LIST_FOREACH(sctp_ifa, &sctp_ifn->ifalist, next_ifa) { 1214 /* Count them if they are the right type */ 1215 if (sctp_ifa->address.sa.sa_family == AF_INET) { 1216 if (inp->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) 1217 cnt += sizeof(struct sockaddr_in6); 1218 else 1219 cnt += sizeof(struct sockaddr_in); 1220 1221 } else if (sctp_ifa->address.sa.sa_family == AF_INET6) 1222 cnt += sizeof(struct sockaddr_in6); 1223 } 1224 } 1225 } else { 1226 struct sctp_laddr *laddr; 1227 1228 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) { 1229 if (laddr->ifa->address.sa.sa_family == AF_INET) { 1230 if (inp->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) 1231 cnt += sizeof(struct sockaddr_in6); 1232 else 1233 cnt += sizeof(struct sockaddr_in); 1234 1235 } else if (laddr->ifa->address.sa.sa_family == AF_INET6) 1236 cnt += sizeof(struct sockaddr_in6); 1237 } 1238 } 1239 return (cnt); 1240 } 1241 1242 static int 1243 sctp_count_max_addresses(struct sctp_inpcb *inp) 1244 { 1245 int cnt = 0; 1246 1247 /* count addresses for the endpoint's default VRF */ 1248 cnt = sctp_count_max_addresses_vrf(inp, inp->def_vrf_id); 1249 return (cnt); 1250 } 1251 1252 static int 1253 sctp_do_connect_x(struct socket *so, struct sctp_inpcb *inp, void *optval, 1254 size_t optsize, void *p, int delay) 1255 { 1256 int error = 0; 1257 int creat_lock_on = 0; 1258 struct sctp_tcb *stcb = NULL; 1259 struct sockaddr *sa; 1260 int num_v6 = 0, num_v4 = 0, *totaddrp, totaddr; 1261 int added = 0; 1262 uint32_t vrf_id; 1263 int bad_addresses = 0; 1264 sctp_assoc_t *a_id; 1265 1266 SCTPDBG(SCTP_DEBUG_PCB1, "Connectx called\n"); 1267 1268 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) && 1269 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) { 1270 /* We are already connected AND the TCP model */ 1271 return (EADDRINUSE); 1272 } 1273 if (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL) { 1274 return (EINVAL); 1275 } 1276 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) { 1277 SCTP_INP_RLOCK(inp); 1278 stcb = LIST_FIRST(&inp->sctp_asoc_list); 1279 SCTP_INP_RUNLOCK(inp); 1280 } 1281 if (stcb) { 1282 return (EALREADY); 1283 } 1284 SCTP_INP_INCR_REF(inp); 1285 SCTP_ASOC_CREATE_LOCK(inp); 1286 creat_lock_on = 1; 1287 if ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE) || 1288 (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE)) { 1289 error = EFAULT; 1290 goto out_now; 1291 } 1292 totaddrp = (int *)optval; 1293 totaddr = *totaddrp; 1294 sa = (struct sockaddr *)(totaddrp + 1); 1295 stcb = sctp_connectx_helper_find(inp, sa, &totaddr, &num_v4, &num_v6, &error, (optsize - sizeof(int)), &bad_addresses); 1296 if ((stcb != NULL) || bad_addresses) { 1297 /* Already have or am bring up an association */ 1298 SCTP_ASOC_CREATE_UNLOCK(inp); 1299 creat_lock_on = 0; 1300 SCTP_TCB_UNLOCK(stcb); 1301 if (bad_addresses == 0) 1302 error = EALREADY; 1303 goto out_now; 1304 } 1305 #ifdef INET6 1306 if (((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) && 1307 (num_v6 > 0)) { 1308 error = EINVAL; 1309 goto out_now; 1310 } 1311 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) && 1312 (num_v4 > 0)) { 1313 struct in6pcb *inp6; 1314 1315 inp6 = (struct in6pcb *)inp; 1316 if (SCTP_IPV6_V6ONLY(inp6)) { 1317 /* 1318 * if IPV6_V6ONLY flag, ignore connections destined 1319 * to a v4 addr or v4-mapped addr 1320 */ 1321 error = EINVAL; 1322 goto out_now; 1323 } 1324 } 1325 #endif /* INET6 */ 1326 if ((inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) == 1327 SCTP_PCB_FLAGS_UNBOUND) { 1328 /* Bind a ephemeral port */ 1329 error = sctp_inpcb_bind(so, NULL, p); 1330 if (error) { 1331 goto out_now; 1332 } 1333 } 1334 /* FIX ME: do we want to pass in a vrf on the connect call? */ 1335 vrf_id = inp->def_vrf_id; 1336 1337 /* We are GOOD to go */ 1338 stcb = sctp_aloc_assoc(inp, sa, 1, &error, 0, vrf_id); 1339 if (stcb == NULL) { 1340 /* Gak! no memory */ 1341 goto out_now; 1342 } 1343 stcb->asoc.state = SCTP_STATE_COOKIE_WAIT; 1344 /* move to second address */ 1345 if (sa->sa_family == AF_INET) 1346 sa = (struct sockaddr *)((caddr_t)sa + sizeof(struct sockaddr_in)); 1347 else 1348 sa = (struct sockaddr *)((caddr_t)sa + sizeof(struct sockaddr_in6)); 1349 1350 error = 0; 1351 added = sctp_connectx_helper_add(stcb, sa, (totaddr - 1), &error); 1352 /* Fill in the return id */ 1353 if (error) { 1354 sctp_free_assoc(inp, stcb, SCTP_PCBFREE_FORCE, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_12); 1355 goto out_now; 1356 } 1357 a_id = (sctp_assoc_t *) optval; 1358 *a_id = sctp_get_associd(stcb); 1359 1360 /* initialize authentication parameters for the assoc */ 1361 sctp_initialize_auth_params(inp, stcb); 1362 1363 if (delay) { 1364 /* doing delayed connection */ 1365 stcb->asoc.delayed_connection = 1; 1366 sctp_timer_start(SCTP_TIMER_TYPE_INIT, inp, stcb, stcb->asoc.primary_destination); 1367 } else { 1368 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered); 1369 sctp_send_initiate(inp, stcb); 1370 } 1371 SCTP_TCB_UNLOCK(stcb); 1372 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) { 1373 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED; 1374 /* Set the connected flag so we can queue data */ 1375 soisconnecting(so); 1376 } 1377 out_now: 1378 if (creat_lock_on) { 1379 SCTP_ASOC_CREATE_UNLOCK(inp); 1380 } 1381 SCTP_INP_DECR_REF(inp); 1382 return error; 1383 } 1384 1385 #define SCTP_FIND_STCB(inp, stcb, assoc_id) { \ 1386 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||\ 1387 (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) { \ 1388 SCTP_INP_RLOCK(inp); \ 1389 stcb = LIST_FIRST(&inp->sctp_asoc_list); \ 1390 if (stcb) { \ 1391 SCTP_TCB_LOCK(stcb); \ 1392 } \ 1393 SCTP_INP_RUNLOCK(inp); \ 1394 } else if (assoc_id != 0) { \ 1395 stcb = sctp_findassociation_ep_asocid(inp, assoc_id, 1); \ 1396 if (stcb == NULL) { \ 1397 error = ENOENT; \ 1398 break; \ 1399 } \ 1400 } else { \ 1401 stcb = NULL; \ 1402 } \ 1403 } 1404 1405 1406 #define SCTP_CHECK_AND_CAST(destp, srcp, type, size) {\ 1407 if (size < sizeof(type)) { \ 1408 error = EINVAL; \ 1409 break; \ 1410 } else { \ 1411 destp = (type *)srcp; \ 1412 } \ 1413 } 1414 1415 static int 1416 sctp_getopt(struct socket *so, int optname, void *optval, size_t *optsize, 1417 void *p) 1418 { 1419 struct sctp_inpcb *inp; 1420 int error, val = 0; 1421 struct sctp_tcb *stcb = NULL; 1422 1423 if (optval == NULL) { 1424 return (EINVAL); 1425 } 1426 inp = (struct sctp_inpcb *)so->so_pcb; 1427 if (inp == 0) 1428 return EINVAL; 1429 error = 0; 1430 1431 switch (optname) { 1432 case SCTP_NODELAY: 1433 case SCTP_AUTOCLOSE: 1434 case SCTP_EXPLICIT_EOR: 1435 case SCTP_AUTO_ASCONF: 1436 case SCTP_DISABLE_FRAGMENTS: 1437 case SCTP_I_WANT_MAPPED_V4_ADDR: 1438 case SCTP_USE_EXT_RCVINFO: 1439 SCTP_INP_RLOCK(inp); 1440 switch (optname) { 1441 case SCTP_DISABLE_FRAGMENTS: 1442 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_NO_FRAGMENT); 1443 break; 1444 case SCTP_I_WANT_MAPPED_V4_ADDR: 1445 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_NEEDS_MAPPED_V4); 1446 break; 1447 case SCTP_AUTO_ASCONF: 1448 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTO_ASCONF); 1449 break; 1450 case SCTP_EXPLICIT_EOR: 1451 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_EXPLICIT_EOR); 1452 break; 1453 case SCTP_NODELAY: 1454 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_NODELAY); 1455 break; 1456 case SCTP_USE_EXT_RCVINFO: 1457 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_EXT_RCVINFO); 1458 break; 1459 case SCTP_AUTOCLOSE: 1460 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE)) 1461 val = TICKS_TO_SEC(inp->sctp_ep.auto_close_time); 1462 else 1463 val = 0; 1464 break; 1465 1466 default: 1467 error = ENOPROTOOPT; 1468 } /* end switch (sopt->sopt_name) */ 1469 if (optname != SCTP_AUTOCLOSE) { 1470 /* make it an "on/off" value */ 1471 val = (val != 0); 1472 } 1473 if (*optsize < sizeof(val)) { 1474 error = EINVAL; 1475 } 1476 SCTP_INP_RUNLOCK(inp); 1477 if (error == 0) { 1478 /* return the option value */ 1479 *(int *)optval = val; 1480 *optsize = sizeof(val); 1481 } 1482 break; 1483 case SCTP_GET_PACKET_LOG: 1484 { 1485 #ifdef SCTP_PACKET_LOGGING 1486 uint8_t *target; 1487 int ret; 1488 1489 SCTP_CHECK_AND_CAST(target, optval, uint8_t, *optsize); 1490 ret = sctp_copy_out_packet_log(target, (int)*optsize); 1491 *optsize = ret; 1492 #else 1493 error = EOPNOTSUPP; 1494 #endif 1495 break; 1496 } 1497 case SCTP_PARTIAL_DELIVERY_POINT: 1498 { 1499 uint32_t *value; 1500 1501 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1502 *value = inp->partial_delivery_point; 1503 *optsize = sizeof(uint32_t); 1504 } 1505 break; 1506 case SCTP_FRAGMENT_INTERLEAVE: 1507 { 1508 uint32_t *value; 1509 1510 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1511 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE)) { 1512 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS)) { 1513 *value = SCTP_FRAG_LEVEL_2; 1514 } else { 1515 *value = SCTP_FRAG_LEVEL_1; 1516 } 1517 } else { 1518 *value = SCTP_FRAG_LEVEL_0; 1519 } 1520 *optsize = sizeof(uint32_t); 1521 } 1522 break; 1523 case SCTP_CMT_ON_OFF: 1524 { 1525 struct sctp_assoc_value *av; 1526 1527 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize); 1528 if (sctp_cmt_on_off) { 1529 SCTP_FIND_STCB(inp, stcb, av->assoc_id); 1530 if (stcb) { 1531 av->assoc_value = stcb->asoc.sctp_cmt_on_off; 1532 SCTP_TCB_UNLOCK(stcb); 1533 1534 } else { 1535 error = ENOTCONN; 1536 } 1537 } else { 1538 error = ENOPROTOOPT; 1539 } 1540 *optsize = sizeof(*av); 1541 } 1542 break; 1543 case SCTP_GET_ADDR_LEN: 1544 { 1545 struct sctp_assoc_value *av; 1546 1547 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize); 1548 error = EINVAL; 1549 #ifdef INET 1550 if (av->assoc_value == AF_INET) { 1551 av->assoc_value = sizeof(struct sockaddr_in); 1552 error = 0; 1553 } 1554 #endif 1555 #ifdef INET6 1556 if (av->assoc_value == AF_INET6) { 1557 av->assoc_value = sizeof(struct sockaddr_in6); 1558 error = 0; 1559 } 1560 #endif 1561 *optsize = sizeof(*av); 1562 } 1563 break; 1564 case SCTP_GET_ASSOC_NUMBER: 1565 { 1566 uint32_t *value, cnt; 1567 1568 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1569 cnt = 0; 1570 SCTP_INP_RLOCK(inp); 1571 LIST_FOREACH(stcb, &inp->sctp_asoc_list, sctp_tcblist) { 1572 cnt++; 1573 } 1574 SCTP_INP_RUNLOCK(inp); 1575 *value = cnt; 1576 *optsize = sizeof(uint32_t); 1577 } 1578 break; 1579 1580 case SCTP_GET_ASSOC_ID_LIST: 1581 { 1582 struct sctp_assoc_ids *ids; 1583 unsigned int at, limit; 1584 1585 SCTP_CHECK_AND_CAST(ids, optval, struct sctp_assoc_ids, *optsize); 1586 at = 0; 1587 limit = *optsize / sizeof(sctp_assoc_t); 1588 SCTP_INP_RLOCK(inp); 1589 LIST_FOREACH(stcb, &inp->sctp_asoc_list, sctp_tcblist) { 1590 if (at < limit) { 1591 ids->gaids_assoc_id[at++] = sctp_get_associd(stcb); 1592 } else { 1593 error = EINVAL; 1594 break; 1595 } 1596 } 1597 SCTP_INP_RUNLOCK(inp); 1598 *optsize = at * sizeof(sctp_assoc_t); 1599 } 1600 break; 1601 case SCTP_CONTEXT: 1602 { 1603 struct sctp_assoc_value *av; 1604 1605 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize); 1606 SCTP_FIND_STCB(inp, stcb, av->assoc_id); 1607 1608 if (stcb) { 1609 av->assoc_value = stcb->asoc.context; 1610 SCTP_TCB_UNLOCK(stcb); 1611 } else { 1612 SCTP_INP_RLOCK(inp); 1613 av->assoc_value = inp->sctp_context; 1614 SCTP_INP_RUNLOCK(inp); 1615 } 1616 *optsize = sizeof(*av); 1617 } 1618 break; 1619 case SCTP_VRF_ID: 1620 { 1621 uint32_t *default_vrfid; 1622 1623 SCTP_CHECK_AND_CAST(default_vrfid, optval, uint32_t, *optsize); 1624 *default_vrfid = inp->def_vrf_id; 1625 break; 1626 } 1627 case SCTP_GET_ASOC_VRF: 1628 { 1629 struct sctp_assoc_value *id; 1630 1631 SCTP_CHECK_AND_CAST(id, optval, struct sctp_assoc_value, *optsize); 1632 SCTP_FIND_STCB(inp, stcb, id->assoc_id); 1633 if (stcb == NULL) { 1634 error = EINVAL; 1635 break; 1636 } 1637 id->assoc_value = stcb->asoc.vrf_id; 1638 break; 1639 } 1640 case SCTP_GET_VRF_IDS: 1641 { 1642 error = EOPNOTSUPP; 1643 break; 1644 } 1645 case SCTP_GET_NONCE_VALUES: 1646 { 1647 struct sctp_get_nonce_values *gnv; 1648 1649 SCTP_CHECK_AND_CAST(gnv, optval, struct sctp_get_nonce_values, *optsize); 1650 SCTP_FIND_STCB(inp, stcb, gnv->gn_assoc_id); 1651 1652 if (stcb) { 1653 gnv->gn_peers_tag = stcb->asoc.peer_vtag; 1654 gnv->gn_local_tag = stcb->asoc.my_vtag; 1655 SCTP_TCB_UNLOCK(stcb); 1656 } else { 1657 error = ENOTCONN; 1658 } 1659 *optsize = sizeof(*gnv); 1660 } 1661 break; 1662 case SCTP_DELAYED_SACK: 1663 { 1664 struct sctp_sack_info *sack; 1665 1666 SCTP_CHECK_AND_CAST(sack, optval, struct sctp_sack_info, *optsize); 1667 SCTP_FIND_STCB(inp, stcb, sack->sack_assoc_id); 1668 if (stcb) { 1669 sack->sack_delay = stcb->asoc.delayed_ack; 1670 sack->sack_freq = stcb->asoc.sack_freq; 1671 SCTP_TCB_UNLOCK(stcb); 1672 } else { 1673 SCTP_INP_RLOCK(inp); 1674 sack->sack_delay = TICKS_TO_MSEC(inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_RECV]); 1675 sack->sack_freq = inp->sctp_ep.sctp_sack_freq; 1676 SCTP_INP_RUNLOCK(inp); 1677 } 1678 *optsize = sizeof(*sack); 1679 } 1680 break; 1681 1682 case SCTP_GET_SNDBUF_USE: 1683 { 1684 struct sctp_sockstat *ss; 1685 1686 SCTP_CHECK_AND_CAST(ss, optval, struct sctp_sockstat, *optsize); 1687 SCTP_FIND_STCB(inp, stcb, ss->ss_assoc_id); 1688 1689 if (stcb) { 1690 ss->ss_total_sndbuf = stcb->asoc.total_output_queue_size; 1691 ss->ss_total_recv_buf = (stcb->asoc.size_on_reasm_queue + 1692 stcb->asoc.size_on_all_streams); 1693 SCTP_TCB_UNLOCK(stcb); 1694 } else { 1695 error = ENOTCONN; 1696 } 1697 *optsize = sizeof(struct sctp_sockstat); 1698 } 1699 break; 1700 case SCTP_MAX_BURST: 1701 { 1702 uint8_t *value; 1703 1704 SCTP_CHECK_AND_CAST(value, optval, uint8_t, *optsize); 1705 1706 SCTP_INP_RLOCK(inp); 1707 *value = inp->sctp_ep.max_burst; 1708 SCTP_INP_RUNLOCK(inp); 1709 *optsize = sizeof(uint8_t); 1710 } 1711 break; 1712 case SCTP_MAXSEG: 1713 { 1714 struct sctp_assoc_value *av; 1715 int ovh; 1716 1717 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize); 1718 SCTP_FIND_STCB(inp, stcb, av->assoc_id); 1719 1720 if (stcb) { 1721 av->assoc_value = sctp_get_frag_point(stcb, &stcb->asoc); 1722 SCTP_TCB_UNLOCK(stcb); 1723 } else { 1724 SCTP_INP_RLOCK(inp); 1725 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 1726 ovh = SCTP_MED_OVERHEAD; 1727 } else { 1728 ovh = SCTP_MED_V4_OVERHEAD; 1729 } 1730 if (inp->sctp_frag_point >= SCTP_DEFAULT_MAXSEGMENT) 1731 av->assoc_value = 0; 1732 else 1733 av->assoc_value = inp->sctp_frag_point - ovh; 1734 SCTP_INP_RUNLOCK(inp); 1735 } 1736 *optsize = sizeof(struct sctp_assoc_value); 1737 } 1738 break; 1739 case SCTP_GET_STAT_LOG: 1740 #ifdef SCTP_STAT_LOGGING 1741 error = sctp_fill_stat_log(optval, optsize); 1742 #else 1743 error = EOPNOTSUPP; 1744 #endif 1745 break; 1746 case SCTP_EVENTS: 1747 { 1748 struct sctp_event_subscribe *events; 1749 1750 SCTP_CHECK_AND_CAST(events, optval, struct sctp_event_subscribe, *optsize); 1751 memset(events, 0, sizeof(*events)); 1752 SCTP_INP_RLOCK(inp); 1753 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVDATAIOEVNT)) 1754 events->sctp_data_io_event = 1; 1755 1756 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVASSOCEVNT)) 1757 events->sctp_association_event = 1; 1758 1759 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVPADDREVNT)) 1760 events->sctp_address_event = 1; 1761 1762 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVSENDFAILEVNT)) 1763 events->sctp_send_failure_event = 1; 1764 1765 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVPEERERR)) 1766 events->sctp_peer_error_event = 1; 1767 1768 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVSHUTDOWNEVNT)) 1769 events->sctp_shutdown_event = 1; 1770 1771 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_PDAPIEVNT)) 1772 events->sctp_partial_delivery_event = 1; 1773 1774 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_ADAPTATIONEVNT)) 1775 events->sctp_adaptation_layer_event = 1; 1776 1777 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTHEVNT)) 1778 events->sctp_authentication_event = 1; 1779 1780 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_STREAM_RESETEVNT)) 1781 events->sctp_stream_reset_events = 1; 1782 SCTP_INP_RUNLOCK(inp); 1783 *optsize = sizeof(struct sctp_event_subscribe); 1784 } 1785 break; 1786 1787 case SCTP_ADAPTATION_LAYER: 1788 { 1789 uint32_t *value; 1790 1791 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1792 1793 SCTP_INP_RLOCK(inp); 1794 *value = inp->sctp_ep.adaptation_layer_indicator; 1795 SCTP_INP_RUNLOCK(inp); 1796 *optsize = sizeof(uint32_t); 1797 } 1798 break; 1799 case SCTP_SET_INITIAL_DBG_SEQ: 1800 { 1801 uint32_t *value; 1802 1803 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1804 SCTP_INP_RLOCK(inp); 1805 *value = inp->sctp_ep.initial_sequence_debug; 1806 SCTP_INP_RUNLOCK(inp); 1807 *optsize = sizeof(uint32_t); 1808 } 1809 break; 1810 case SCTP_GET_LOCAL_ADDR_SIZE: 1811 { 1812 uint32_t *value; 1813 1814 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1815 SCTP_INP_RLOCK(inp); 1816 *value = sctp_count_max_addresses(inp); 1817 SCTP_INP_RUNLOCK(inp); 1818 *optsize = sizeof(uint32_t); 1819 } 1820 break; 1821 case SCTP_GET_REMOTE_ADDR_SIZE: 1822 { 1823 uint32_t *value; 1824 size_t size; 1825 struct sctp_nets *net; 1826 1827 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize); 1828 /* FIXME MT: change to sctp_assoc_value? */ 1829 SCTP_FIND_STCB(inp, stcb, (sctp_assoc_t) * value); 1830 1831 if (stcb) { 1832 size = 0; 1833 /* Count the sizes */ 1834 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1835 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) || 1836 (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET6)) { 1837 size += sizeof(struct sockaddr_in6); 1838 } else if (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET) { 1839 size += sizeof(struct sockaddr_in); 1840 } else { 1841 /* huh */ 1842 break; 1843 } 1844 } 1845 SCTP_TCB_UNLOCK(stcb); 1846 *value = (uint32_t) size; 1847 } else { 1848 error = ENOTCONN; 1849 } 1850 *optsize = sizeof(uint32_t); 1851 } 1852 break; 1853 case SCTP_GET_PEER_ADDRESSES: 1854 /* 1855 * Get the address information, an array is passed in to 1856 * fill up we pack it. 1857 */ 1858 { 1859 size_t cpsz, left; 1860 struct sockaddr_storage *sas; 1861 struct sctp_nets *net; 1862 struct sctp_getaddresses *saddr; 1863 1864 SCTP_CHECK_AND_CAST(saddr, optval, struct sctp_getaddresses, *optsize); 1865 SCTP_FIND_STCB(inp, stcb, saddr->sget_assoc_id); 1866 1867 if (stcb) { 1868 left = (*optsize) - sizeof(struct sctp_getaddresses); 1869 *optsize = sizeof(struct sctp_getaddresses); 1870 sas = (struct sockaddr_storage *)&saddr->addr[0]; 1871 1872 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1873 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) || 1874 (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET6)) { 1875 cpsz = sizeof(struct sockaddr_in6); 1876 } else if (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET) { 1877 cpsz = sizeof(struct sockaddr_in); 1878 } else { 1879 /* huh */ 1880 break; 1881 } 1882 if (left < cpsz) { 1883 /* not enough room. */ 1884 break; 1885 } 1886 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) && 1887 (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET)) { 1888 /* Must map the address */ 1889 in6_sin_2_v4mapsin6((struct sockaddr_in *)&net->ro._l_addr, 1890 (struct sockaddr_in6 *)sas); 1891 } else { 1892 memcpy(sas, &net->ro._l_addr, cpsz); 1893 } 1894 ((struct sockaddr_in *)sas)->sin_port = stcb->rport; 1895 1896 sas = (struct sockaddr_storage *)((caddr_t)sas + cpsz); 1897 left -= cpsz; 1898 *optsize += cpsz; 1899 } 1900 SCTP_TCB_UNLOCK(stcb); 1901 } else { 1902 error = ENOENT; 1903 } 1904 } 1905 break; 1906 case SCTP_GET_LOCAL_ADDRESSES: 1907 { 1908 size_t limit, actual; 1909 struct sockaddr_storage *sas; 1910 struct sctp_getaddresses *saddr; 1911 1912 SCTP_CHECK_AND_CAST(saddr, optval, struct sctp_getaddresses, *optsize); 1913 SCTP_FIND_STCB(inp, stcb, saddr->sget_assoc_id); 1914 1915 sas = (struct sockaddr_storage *)&saddr->addr[0]; 1916 limit = *optsize - sizeof(sctp_assoc_t); 1917 actual = sctp_fill_up_addresses(inp, stcb, limit, sas); 1918 if (stcb) { 1919 SCTP_TCB_UNLOCK(stcb); 1920 } 1921 *optsize = sizeof(struct sockaddr_storage) + actual; 1922 } 1923 break; 1924 case SCTP_PEER_ADDR_PARAMS: 1925 { 1926 struct sctp_paddrparams *paddrp; 1927 struct sctp_nets *net; 1928 1929 SCTP_CHECK_AND_CAST(paddrp, optval, struct sctp_paddrparams, *optsize); 1930 SCTP_FIND_STCB(inp, stcb, paddrp->spp_assoc_id); 1931 1932 net = NULL; 1933 if (stcb) { 1934 net = sctp_findnet(stcb, (struct sockaddr *)&paddrp->spp_address); 1935 } else { 1936 /* 1937 * We increment here since 1938 * sctp_findassociation_ep_addr() wil do a 1939 * decrement if it finds the stcb as long as 1940 * the locked tcb (last argument) is NOT a 1941 * TCB.. aka NULL. 1942 */ 1943 SCTP_INP_INCR_REF(inp); 1944 stcb = sctp_findassociation_ep_addr(&inp, (struct sockaddr *)&paddrp->spp_address, &net, NULL, NULL); 1945 if (stcb == NULL) { 1946 SCTP_INP_DECR_REF(inp); 1947 } 1948 } 1949 1950 if (stcb) { 1951 /* Applys to the specific association */ 1952 paddrp->spp_flags = 0; 1953 if (net) { 1954 int ovh; 1955 1956 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 1957 ovh = SCTP_MED_OVERHEAD; 1958 } else { 1959 ovh = SCTP_MED_V4_OVERHEAD; 1960 } 1961 1962 1963 paddrp->spp_pathmaxrxt = net->failure_threshold; 1964 paddrp->spp_pathmtu = net->mtu - ovh; 1965 /* get flags for HB */ 1966 if (net->dest_state & SCTP_ADDR_NOHB) 1967 paddrp->spp_flags |= SPP_HB_DISABLE; 1968 else 1969 paddrp->spp_flags |= SPP_HB_ENABLE; 1970 /* get flags for PMTU */ 1971 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 1972 paddrp->spp_flags |= SPP_PMTUD_ENABLE; 1973 } else { 1974 paddrp->spp_flags |= SPP_PMTUD_DISABLE; 1975 } 1976 #ifdef INET 1977 if (net->ro._l_addr.sin.sin_family == AF_INET) { 1978 paddrp->spp_ipv4_tos = net->tos_flowlabel & 0x000000fc; 1979 paddrp->spp_flags |= SPP_IPV4_TOS; 1980 } 1981 #endif 1982 #ifdef INET6 1983 if (net->ro._l_addr.sin6.sin6_family == AF_INET6) { 1984 paddrp->spp_ipv6_flowlabel = net->tos_flowlabel; 1985 paddrp->spp_flags |= SPP_IPV6_FLOWLABEL; 1986 } 1987 #endif 1988 } else { 1989 /* 1990 * No destination so return default 1991 * value 1992 */ 1993 int cnt = 0; 1994 1995 paddrp->spp_pathmaxrxt = stcb->asoc.def_net_failure; 1996 paddrp->spp_pathmtu = sctp_get_frag_point(stcb, &stcb->asoc); 1997 #ifdef INET 1998 paddrp->spp_ipv4_tos = stcb->asoc.default_tos & 0x000000fc; 1999 paddrp->spp_flags |= SPP_IPV4_TOS; 2000 #endif 2001 #ifdef INET6 2002 paddrp->spp_ipv6_flowlabel = stcb->asoc.default_flowlabel; 2003 paddrp->spp_flags |= SPP_IPV6_FLOWLABEL; 2004 #endif 2005 /* default settings should be these */ 2006 if (stcb->asoc.hb_is_disabled == 0) { 2007 paddrp->spp_flags |= SPP_HB_ENABLE; 2008 } else { 2009 paddrp->spp_flags |= SPP_HB_DISABLE; 2010 } 2011 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 2012 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 2013 cnt++; 2014 } 2015 } 2016 if (cnt) { 2017 paddrp->spp_flags |= SPP_PMTUD_ENABLE; 2018 } 2019 } 2020 paddrp->spp_hbinterval = stcb->asoc.heart_beat_delay; 2021 paddrp->spp_assoc_id = sctp_get_associd(stcb); 2022 SCTP_TCB_UNLOCK(stcb); 2023 } else { 2024 /* Use endpoint defaults */ 2025 SCTP_INP_RLOCK(inp); 2026 paddrp->spp_pathmaxrxt = inp->sctp_ep.def_net_failure; 2027 paddrp->spp_hbinterval = TICKS_TO_MSEC(inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_HEARTBEAT]); 2028 paddrp->spp_assoc_id = (sctp_assoc_t) 0; 2029 /* get inp's default */ 2030 #ifdef INET 2031 paddrp->spp_ipv4_tos = inp->ip_inp.inp.inp_ip_tos; 2032 paddrp->spp_flags |= SPP_IPV4_TOS; 2033 #endif 2034 #ifdef INET6 2035 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 2036 paddrp->spp_ipv6_flowlabel = ((struct in6pcb *)inp)->in6p_flowinfo; 2037 paddrp->spp_flags |= SPP_IPV6_FLOWLABEL; 2038 } 2039 #endif 2040 /* can't return this */ 2041 paddrp->spp_pathmtu = 0; 2042 2043 /* default behavior, no stcb */ 2044 paddrp->spp_flags = SPP_PMTUD_ENABLE; 2045 2046 if (sctp_is_feature_off(inp, SCTP_PCB_FLAGS_DONOT_HEARTBEAT)) { 2047 paddrp->spp_flags |= SPP_HB_ENABLE; 2048 } else { 2049 paddrp->spp_flags |= SPP_HB_DISABLE; 2050 } 2051 SCTP_INP_RUNLOCK(inp); 2052 } 2053 *optsize = sizeof(struct sctp_paddrparams); 2054 } 2055 break; 2056 case SCTP_GET_PEER_ADDR_INFO: 2057 { 2058 struct sctp_paddrinfo *paddri; 2059 struct sctp_nets *net; 2060 2061 SCTP_CHECK_AND_CAST(paddri, optval, struct sctp_paddrinfo, *optsize); 2062 SCTP_FIND_STCB(inp, stcb, paddri->spinfo_assoc_id); 2063 2064 net = NULL; 2065 if (stcb) { 2066 net = sctp_findnet(stcb, (struct sockaddr *)&paddri->spinfo_address); 2067 } else { 2068 /* 2069 * We increment here since 2070 * sctp_findassociation_ep_addr() wil do a 2071 * decrement if it finds the stcb as long as 2072 * the locked tcb (last argument) is NOT a 2073 * TCB.. aka NULL. 2074 */ 2075 SCTP_INP_INCR_REF(inp); 2076 stcb = sctp_findassociation_ep_addr(&inp, (struct sockaddr *)&paddri->spinfo_address, &net, NULL, NULL); 2077 if (stcb == NULL) { 2078 SCTP_INP_DECR_REF(inp); 2079 } 2080 } 2081 2082 if ((stcb) && (net)) { 2083 paddri->spinfo_state = net->dest_state & (SCTP_REACHABLE_MASK | SCTP_ADDR_NOHB); 2084 paddri->spinfo_cwnd = net->cwnd; 2085 paddri->spinfo_srtt = ((net->lastsa >> 2) + net->lastsv) >> 1; 2086 paddri->spinfo_rto = net->RTO; 2087 paddri->spinfo_assoc_id = sctp_get_associd(stcb); 2088 SCTP_TCB_UNLOCK(stcb); 2089 } else { 2090 if (stcb) { 2091 SCTP_TCB_UNLOCK(stcb); 2092 } 2093 error = ENOENT; 2094 } 2095 *optsize = sizeof(struct sctp_paddrinfo); 2096 } 2097 break; 2098 case SCTP_PCB_STATUS: 2099 { 2100 struct sctp_pcbinfo *spcb; 2101 2102 SCTP_CHECK_AND_CAST(spcb, optval, struct sctp_pcbinfo, *optsize); 2103 sctp_fill_pcbinfo(spcb); 2104 *optsize = sizeof(struct sctp_pcbinfo); 2105 } 2106 break; 2107 2108 case SCTP_STATUS: 2109 { 2110 struct sctp_nets *net; 2111 struct sctp_status *sstat; 2112 2113 SCTP_CHECK_AND_CAST(sstat, optval, struct sctp_status, *optsize); 2114 SCTP_FIND_STCB(inp, stcb, sstat->sstat_assoc_id); 2115 2116 if (stcb == NULL) { 2117 error = EINVAL; 2118 break; 2119 } 2120 /* 2121 * I think passing the state is fine since 2122 * sctp_constants.h will be available to the user 2123 * land. 2124 */ 2125 sstat->sstat_state = stcb->asoc.state; 2126 sstat->sstat_rwnd = stcb->asoc.peers_rwnd; 2127 sstat->sstat_unackdata = stcb->asoc.sent_queue_cnt; 2128 /* 2129 * We can't include chunks that have been passed to 2130 * the socket layer. Only things in queue. 2131 */ 2132 sstat->sstat_penddata = (stcb->asoc.cnt_on_reasm_queue + 2133 stcb->asoc.cnt_on_all_streams); 2134 2135 2136 sstat->sstat_instrms = stcb->asoc.streamincnt; 2137 sstat->sstat_outstrms = stcb->asoc.streamoutcnt; 2138 sstat->sstat_fragmentation_point = sctp_get_frag_point(stcb, &stcb->asoc); 2139 memcpy(&sstat->sstat_primary.spinfo_address, 2140 &stcb->asoc.primary_destination->ro._l_addr, 2141 ((struct sockaddr *)(&stcb->asoc.primary_destination->ro._l_addr))->sa_len); 2142 net = stcb->asoc.primary_destination; 2143 ((struct sockaddr_in *)&sstat->sstat_primary.spinfo_address)->sin_port = stcb->rport; 2144 /* 2145 * Again the user can get info from sctp_constants.h 2146 * for what the state of the network is. 2147 */ 2148 sstat->sstat_primary.spinfo_state = net->dest_state & SCTP_REACHABLE_MASK; 2149 sstat->sstat_primary.spinfo_cwnd = net->cwnd; 2150 sstat->sstat_primary.spinfo_srtt = net->lastsa; 2151 sstat->sstat_primary.spinfo_rto = net->RTO; 2152 sstat->sstat_primary.spinfo_mtu = net->mtu; 2153 sstat->sstat_primary.spinfo_assoc_id = sctp_get_associd(stcb); 2154 SCTP_TCB_UNLOCK(stcb); 2155 *optsize = sizeof(*sstat); 2156 } 2157 break; 2158 case SCTP_RTOINFO: 2159 { 2160 struct sctp_rtoinfo *srto; 2161 2162 SCTP_CHECK_AND_CAST(srto, optval, struct sctp_rtoinfo, *optsize); 2163 SCTP_FIND_STCB(inp, stcb, srto->srto_assoc_id); 2164 2165 if (stcb) { 2166 srto->srto_initial = stcb->asoc.initial_rto; 2167 srto->srto_max = stcb->asoc.maxrto; 2168 srto->srto_min = stcb->asoc.minrto; 2169 SCTP_TCB_UNLOCK(stcb); 2170 } else { 2171 SCTP_INP_RLOCK(inp); 2172 srto->srto_initial = inp->sctp_ep.initial_rto; 2173 srto->srto_max = inp->sctp_ep.sctp_maxrto; 2174 srto->srto_min = inp->sctp_ep.sctp_minrto; 2175 SCTP_INP_RUNLOCK(inp); 2176 } 2177 *optsize = sizeof(*srto); 2178 } 2179 break; 2180 case SCTP_ASSOCINFO: 2181 { 2182 struct sctp_assocparams *sasoc; 2183 2184 SCTP_CHECK_AND_CAST(sasoc, optval, struct sctp_assocparams, *optsize); 2185 SCTP_FIND_STCB(inp, stcb, sasoc->sasoc_assoc_id); 2186 2187 if (stcb) { 2188 sasoc->sasoc_asocmaxrxt = stcb->asoc.max_send_times; 2189 sasoc->sasoc_number_peer_destinations = stcb->asoc.numnets; 2190 sasoc->sasoc_peer_rwnd = stcb->asoc.peers_rwnd; 2191 sasoc->sasoc_local_rwnd = stcb->asoc.my_rwnd; 2192 sasoc->sasoc_cookie_life = TICKS_TO_MSEC(stcb->asoc.cookie_life); 2193 SCTP_TCB_UNLOCK(stcb); 2194 } else { 2195 SCTP_INP_RLOCK(inp); 2196 sasoc->sasoc_asocmaxrxt = inp->sctp_ep.max_send_times; 2197 sasoc->sasoc_number_peer_destinations = 0; 2198 sasoc->sasoc_peer_rwnd = 0; 2199 sasoc->sasoc_local_rwnd = sbspace(&inp->sctp_socket->so_rcv); 2200 sasoc->sasoc_cookie_life = TICKS_TO_MSEC(inp->sctp_ep.def_cookie_life); 2201 SCTP_INP_RUNLOCK(inp); 2202 } 2203 *optsize = sizeof(*sasoc); 2204 } 2205 break; 2206 case SCTP_DEFAULT_SEND_PARAM: 2207 { 2208 struct sctp_sndrcvinfo *s_info; 2209 2210 SCTP_CHECK_AND_CAST(s_info, optval, struct sctp_sndrcvinfo, *optsize); 2211 SCTP_FIND_STCB(inp, stcb, s_info->sinfo_assoc_id); 2212 2213 if (stcb) { 2214 memcpy(s_info, &stcb->asoc.def_send, sizeof(stcb->asoc.def_send)); 2215 SCTP_TCB_UNLOCK(stcb); 2216 } else { 2217 SCTP_INP_RLOCK(inp); 2218 memcpy(s_info, &inp->def_send, sizeof(inp->def_send)); 2219 SCTP_INP_RUNLOCK(inp); 2220 } 2221 *optsize = sizeof(*s_info); 2222 } 2223 break; 2224 case SCTP_INITMSG: 2225 { 2226 struct sctp_initmsg *sinit; 2227 2228 SCTP_CHECK_AND_CAST(sinit, optval, struct sctp_initmsg, *optsize); 2229 SCTP_INP_RLOCK(inp); 2230 sinit->sinit_num_ostreams = inp->sctp_ep.pre_open_stream_count; 2231 sinit->sinit_max_instreams = inp->sctp_ep.max_open_streams_intome; 2232 sinit->sinit_max_attempts = inp->sctp_ep.max_init_times; 2233 sinit->sinit_max_init_timeo = inp->sctp_ep.initial_init_rto_max; 2234 SCTP_INP_RUNLOCK(inp); 2235 *optsize = sizeof(*sinit); 2236 } 2237 break; 2238 case SCTP_PRIMARY_ADDR: 2239 /* we allow a "get" operation on this */ 2240 { 2241 struct sctp_setprim *ssp; 2242 2243 SCTP_CHECK_AND_CAST(ssp, optval, struct sctp_setprim, *optsize); 2244 SCTP_FIND_STCB(inp, stcb, ssp->ssp_assoc_id); 2245 2246 if (stcb) { 2247 /* simply copy out the sockaddr_storage... */ 2248 int len; 2249 2250 len = *optsize; 2251 if (len > stcb->asoc.primary_destination->ro._l_addr.sa.sa_len) 2252 len = stcb->asoc.primary_destination->ro._l_addr.sa.sa_len; 2253 2254 memcpy(&ssp->ssp_addr, 2255 &stcb->asoc.primary_destination->ro._l_addr, 2256 len); 2257 SCTP_TCB_UNLOCK(stcb); 2258 } else { 2259 error = EINVAL; 2260 } 2261 *optsize = sizeof(*ssp); 2262 } 2263 break; 2264 2265 case SCTP_HMAC_IDENT: 2266 { 2267 struct sctp_hmacalgo *shmac; 2268 sctp_hmaclist_t *hmaclist; 2269 uint32_t size; 2270 int i; 2271 2272 SCTP_CHECK_AND_CAST(shmac, optval, struct sctp_hmacalgo, *optsize); 2273 2274 SCTP_INP_RLOCK(inp); 2275 hmaclist = inp->sctp_ep.local_hmacs; 2276 if (hmaclist == NULL) { 2277 /* no HMACs to return */ 2278 *optsize = sizeof(*shmac); 2279 SCTP_INP_RUNLOCK(inp); 2280 break; 2281 } 2282 /* is there room for all of the hmac ids? */ 2283 size = sizeof(*shmac) + (hmaclist->num_algo * 2284 sizeof(shmac->shmac_idents[0])); 2285 if ((size_t)(*optsize) < size) { 2286 error = EINVAL; 2287 SCTP_INP_RUNLOCK(inp); 2288 break; 2289 } 2290 /* copy in the list */ 2291 for (i = 0; i < hmaclist->num_algo; i++) 2292 shmac->shmac_idents[i] = hmaclist->hmac[i]; 2293 SCTP_INP_RUNLOCK(inp); 2294 *optsize = size; 2295 break; 2296 } 2297 case SCTP_AUTH_ACTIVE_KEY: 2298 { 2299 struct sctp_authkeyid *scact; 2300 2301 SCTP_CHECK_AND_CAST(scact, optval, struct sctp_authkeyid, *optsize); 2302 SCTP_FIND_STCB(inp, stcb, scact->scact_assoc_id); 2303 2304 if (stcb) { 2305 /* get the active key on the assoc */ 2306 scact->scact_keynumber = stcb->asoc.authinfo.assoc_keyid; 2307 SCTP_TCB_UNLOCK(stcb); 2308 } else { 2309 /* get the endpoint active key */ 2310 SCTP_INP_RLOCK(inp); 2311 scact->scact_keynumber = inp->sctp_ep.default_keyid; 2312 SCTP_INP_RUNLOCK(inp); 2313 } 2314 *optsize = sizeof(*scact); 2315 break; 2316 } 2317 case SCTP_LOCAL_AUTH_CHUNKS: 2318 { 2319 struct sctp_authchunks *sac; 2320 sctp_auth_chklist_t *chklist = NULL; 2321 size_t size = 0; 2322 2323 SCTP_CHECK_AND_CAST(sac, optval, struct sctp_authchunks, *optsize); 2324 SCTP_FIND_STCB(inp, stcb, sac->gauth_assoc_id); 2325 2326 if (stcb) { 2327 /* get off the assoc */ 2328 chklist = stcb->asoc.local_auth_chunks; 2329 /* is there enough space? */ 2330 size = sctp_auth_get_chklist_size(chklist); 2331 if (*optsize < (sizeof(struct sctp_authchunks) + size)) { 2332 error = EINVAL; 2333 } else { 2334 /* copy in the chunks */ 2335 (void)sctp_serialize_auth_chunks(chklist, sac->gauth_chunks); 2336 } 2337 SCTP_TCB_UNLOCK(stcb); 2338 } else { 2339 /* get off the endpoint */ 2340 SCTP_INP_RLOCK(inp); 2341 chklist = inp->sctp_ep.local_auth_chunks; 2342 /* is there enough space? */ 2343 size = sctp_auth_get_chklist_size(chklist); 2344 if (*optsize < (sizeof(struct sctp_authchunks) + size)) { 2345 error = EINVAL; 2346 } else { 2347 /* copy in the chunks */ 2348 (void)sctp_serialize_auth_chunks(chklist, sac->gauth_chunks); 2349 } 2350 SCTP_INP_RUNLOCK(inp); 2351 } 2352 *optsize = sizeof(struct sctp_authchunks) + size; 2353 break; 2354 } 2355 case SCTP_PEER_AUTH_CHUNKS: 2356 { 2357 struct sctp_authchunks *sac; 2358 sctp_auth_chklist_t *chklist = NULL; 2359 size_t size = 0; 2360 2361 SCTP_CHECK_AND_CAST(sac, optval, struct sctp_authchunks, *optsize); 2362 SCTP_FIND_STCB(inp, stcb, sac->gauth_assoc_id); 2363 2364 if (stcb) { 2365 /* get off the assoc */ 2366 chklist = stcb->asoc.peer_auth_chunks; 2367 /* is there enough space? */ 2368 size = sctp_auth_get_chklist_size(chklist); 2369 if (*optsize < (sizeof(struct sctp_authchunks) + size)) { 2370 error = EINVAL; 2371 } else { 2372 /* copy in the chunks */ 2373 (void)sctp_serialize_auth_chunks(chklist, sac->gauth_chunks); 2374 } 2375 SCTP_TCB_UNLOCK(stcb); 2376 } else { 2377 error = ENOENT; 2378 } 2379 *optsize = sizeof(struct sctp_authchunks) + size; 2380 break; 2381 } 2382 2383 2384 default: 2385 error = ENOPROTOOPT; 2386 *optsize = 0; 2387 break; 2388 } /* end switch (sopt->sopt_name) */ 2389 return (error); 2390 } 2391 2392 static int 2393 sctp_setopt(struct socket *so, int optname, void *optval, size_t optsize, 2394 void *p) 2395 { 2396 int error, set_opt; 2397 uint32_t *mopt; 2398 struct sctp_tcb *stcb = NULL; 2399 struct sctp_inpcb *inp; 2400 uint32_t vrf_id; 2401 2402 if (optval == NULL) { 2403 SCTP_PRINTF("optval is NULL\n"); 2404 return (EINVAL); 2405 } 2406 inp = (struct sctp_inpcb *)so->so_pcb; 2407 if (inp == 0) { 2408 SCTP_PRINTF("inp is NULL?\n"); 2409 return EINVAL; 2410 } 2411 vrf_id = inp->def_vrf_id; 2412 2413 error = 0; 2414 switch (optname) { 2415 case SCTP_NODELAY: 2416 case SCTP_AUTOCLOSE: 2417 case SCTP_AUTO_ASCONF: 2418 case SCTP_EXPLICIT_EOR: 2419 case SCTP_DISABLE_FRAGMENTS: 2420 case SCTP_USE_EXT_RCVINFO: 2421 case SCTP_I_WANT_MAPPED_V4_ADDR: 2422 /* copy in the option value */ 2423 SCTP_CHECK_AND_CAST(mopt, optval, uint32_t, optsize); 2424 set_opt = 0; 2425 if (error) 2426 break; 2427 switch (optname) { 2428 case SCTP_DISABLE_FRAGMENTS: 2429 set_opt = SCTP_PCB_FLAGS_NO_FRAGMENT; 2430 break; 2431 case SCTP_AUTO_ASCONF: 2432 set_opt = SCTP_PCB_FLAGS_AUTO_ASCONF; 2433 break; 2434 case SCTP_EXPLICIT_EOR: 2435 set_opt = SCTP_PCB_FLAGS_EXPLICIT_EOR; 2436 break; 2437 case SCTP_USE_EXT_RCVINFO: 2438 set_opt = SCTP_PCB_FLAGS_EXT_RCVINFO; 2439 break; 2440 case SCTP_I_WANT_MAPPED_V4_ADDR: 2441 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 2442 set_opt = SCTP_PCB_FLAGS_NEEDS_MAPPED_V4; 2443 } else { 2444 return (EINVAL); 2445 } 2446 break; 2447 case SCTP_NODELAY: 2448 set_opt = SCTP_PCB_FLAGS_NODELAY; 2449 break; 2450 case SCTP_AUTOCLOSE: 2451 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) || 2452 (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) { 2453 return (EINVAL); 2454 } 2455 set_opt = SCTP_PCB_FLAGS_AUTOCLOSE; 2456 /* 2457 * The value is in ticks. Note this does not effect 2458 * old associations, only new ones. 2459 */ 2460 inp->sctp_ep.auto_close_time = SEC_TO_TICKS(*mopt); 2461 break; 2462 } 2463 SCTP_INP_WLOCK(inp); 2464 if (*mopt != 0) { 2465 sctp_feature_on(inp, set_opt); 2466 } else { 2467 sctp_feature_off(inp, set_opt); 2468 } 2469 SCTP_INP_WUNLOCK(inp); 2470 break; 2471 case SCTP_PARTIAL_DELIVERY_POINT: 2472 { 2473 uint32_t *value; 2474 2475 SCTP_CHECK_AND_CAST(value, optval, uint32_t, optsize); 2476 if (*value > SCTP_SB_LIMIT_RCV(so)) { 2477 error = EINVAL; 2478 break; 2479 } 2480 inp->partial_delivery_point = *value; 2481 } 2482 break; 2483 case SCTP_FRAGMENT_INTERLEAVE: 2484 /* not yet until we re-write sctp_recvmsg() */ 2485 { 2486 uint32_t *level; 2487 2488 SCTP_CHECK_AND_CAST(level, optval, uint32_t, optsize); 2489 if (*level == SCTP_FRAG_LEVEL_2) { 2490 sctp_feature_on(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE); 2491 sctp_feature_on(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS); 2492 } else if (*level == SCTP_FRAG_LEVEL_1) { 2493 sctp_feature_on(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE); 2494 sctp_feature_off(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS); 2495 } else if (*level == SCTP_FRAG_LEVEL_0) { 2496 sctp_feature_off(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE); 2497 sctp_feature_off(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS); 2498 2499 } else { 2500 error = EINVAL; 2501 } 2502 } 2503 break; 2504 case SCTP_CMT_ON_OFF: 2505 { 2506 struct sctp_assoc_value *av; 2507 2508 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize); 2509 if (sctp_cmt_on_off) { 2510 SCTP_FIND_STCB(inp, stcb, av->assoc_id); 2511 if (stcb) { 2512 stcb->asoc.sctp_cmt_on_off = (uint8_t) av->assoc_value; 2513 SCTP_TCB_UNLOCK(stcb); 2514 } else { 2515 error = ENOTCONN; 2516 } 2517 } else { 2518 error = ENOPROTOOPT; 2519 } 2520 } 2521 break; 2522 case SCTP_CLR_STAT_LOG: 2523 #ifdef SCTP_STAT_LOGGING 2524 sctp_clr_stat_log(); 2525 #else 2526 error = EOPNOTSUPP; 2527 #endif 2528 break; 2529 case SCTP_CONTEXT: 2530 { 2531 struct sctp_assoc_value *av; 2532 2533 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize); 2534 SCTP_FIND_STCB(inp, stcb, av->assoc_id); 2535 2536 if (stcb) { 2537 stcb->asoc.context = av->assoc_value; 2538 SCTP_TCB_UNLOCK(stcb); 2539 } else { 2540 SCTP_INP_WLOCK(inp); 2541 inp->sctp_context = av->assoc_value; 2542 SCTP_INP_WUNLOCK(inp); 2543 } 2544 } 2545 break; 2546 case SCTP_VRF_ID: 2547 { 2548 uint32_t *default_vrfid; 2549 2550 SCTP_CHECK_AND_CAST(default_vrfid, optval, uint32_t, optsize); 2551 if (*default_vrfid > SCTP_MAX_VRF_ID) { 2552 error = EINVAL; 2553 break; 2554 } 2555 inp->def_vrf_id = *default_vrfid; 2556 break; 2557 } 2558 case SCTP_DEL_VRF_ID: 2559 { 2560 error = EOPNOTSUPP; 2561 break; 2562 } 2563 case SCTP_ADD_VRF_ID: 2564 { 2565 error = EOPNOTSUPP; 2566 break; 2567 } 2568 case SCTP_DELAYED_SACK: 2569 { 2570 struct sctp_sack_info *sack; 2571 2572 SCTP_CHECK_AND_CAST(sack, optval, struct sctp_sack_info, optsize); 2573 SCTP_FIND_STCB(inp, stcb, sack->sack_assoc_id); 2574 if (stcb) { 2575 if (sack->sack_delay) { 2576 if (MSEC_TO_TICKS(sack->sack_delay) < 1) { 2577 sack->sack_delay = TICKS_TO_MSEC(1); 2578 } 2579 stcb->asoc.delayed_ack = sack->sack_delay; 2580 } 2581 if (sack->sack_freq) { 2582 stcb->asoc.sack_freq = sack->sack_freq; 2583 } 2584 SCTP_TCB_UNLOCK(stcb); 2585 } else { 2586 SCTP_INP_WLOCK(inp); 2587 if (sack->sack_delay) { 2588 if (MSEC_TO_TICKS(sack->sack_delay) < 1) { 2589 sack->sack_delay = TICKS_TO_MSEC(1); 2590 } 2591 inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_RECV] = MSEC_TO_TICKS(sack->sack_delay); 2592 } 2593 if (sack->sack_freq) { 2594 inp->sctp_ep.sctp_sack_freq = sack->sack_freq; 2595 } 2596 SCTP_INP_WUNLOCK(inp); 2597 } 2598 break; 2599 } 2600 case SCTP_AUTH_CHUNK: 2601 { 2602 struct sctp_authchunk *sauth; 2603 2604 SCTP_CHECK_AND_CAST(sauth, optval, struct sctp_authchunk, optsize); 2605 2606 SCTP_INP_WLOCK(inp); 2607 if (sctp_auth_add_chunk(sauth->sauth_chunk, inp->sctp_ep.local_auth_chunks)) 2608 error = EINVAL; 2609 SCTP_INP_WUNLOCK(inp); 2610 break; 2611 } 2612 case SCTP_AUTH_KEY: 2613 { 2614 struct sctp_authkey *sca; 2615 struct sctp_keyhead *shared_keys; 2616 sctp_sharedkey_t *shared_key; 2617 sctp_key_t *key = NULL; 2618 size_t size; 2619 2620 SCTP_CHECK_AND_CAST(sca, optval, struct sctp_authkey, optsize); 2621 SCTP_FIND_STCB(inp, stcb, sca->sca_assoc_id); 2622 size = optsize - sizeof(*sca); 2623 2624 if (stcb) { 2625 /* set it on the assoc */ 2626 shared_keys = &stcb->asoc.shared_keys; 2627 /* clear the cached keys for this key id */ 2628 sctp_clear_cachedkeys(stcb, sca->sca_keynumber); 2629 /* 2630 * create the new shared key and 2631 * insert/replace it 2632 */ 2633 if (size > 0) { 2634 key = sctp_set_key(sca->sca_key, (uint32_t) size); 2635 if (key == NULL) { 2636 error = ENOMEM; 2637 SCTP_TCB_UNLOCK(stcb); 2638 break; 2639 } 2640 } 2641 shared_key = sctp_alloc_sharedkey(); 2642 if (shared_key == NULL) { 2643 sctp_free_key(key); 2644 error = ENOMEM; 2645 SCTP_TCB_UNLOCK(stcb); 2646 break; 2647 } 2648 shared_key->key = key; 2649 shared_key->keyid = sca->sca_keynumber; 2650 sctp_insert_sharedkey(shared_keys, shared_key); 2651 SCTP_TCB_UNLOCK(stcb); 2652 } else { 2653 /* set it on the endpoint */ 2654 SCTP_INP_WLOCK(inp); 2655 shared_keys = &inp->sctp_ep.shared_keys; 2656 /* 2657 * clear the cached keys on all assocs for 2658 * this key id 2659 */ 2660 sctp_clear_cachedkeys_ep(inp, sca->sca_keynumber); 2661 /* 2662 * create the new shared key and 2663 * insert/replace it 2664 */ 2665 if (size > 0) { 2666 key = sctp_set_key(sca->sca_key, (uint32_t) size); 2667 if (key == NULL) { 2668 error = ENOMEM; 2669 SCTP_INP_WUNLOCK(inp); 2670 break; 2671 } 2672 } 2673 shared_key = sctp_alloc_sharedkey(); 2674 if (shared_key == NULL) { 2675 sctp_free_key(key); 2676 error = ENOMEM; 2677 SCTP_INP_WUNLOCK(inp); 2678 break; 2679 } 2680 shared_key->key = key; 2681 shared_key->keyid = sca->sca_keynumber; 2682 sctp_insert_sharedkey(shared_keys, shared_key); 2683 SCTP_INP_WUNLOCK(inp); 2684 } 2685 break; 2686 } 2687 case SCTP_HMAC_IDENT: 2688 { 2689 struct sctp_hmacalgo *shmac; 2690 sctp_hmaclist_t *hmaclist; 2691 uint32_t hmacid; 2692 size_t size, i, found; 2693 2694 SCTP_CHECK_AND_CAST(shmac, optval, struct sctp_hmacalgo, optsize); 2695 size = (optsize - sizeof(*shmac)) / sizeof(shmac->shmac_idents[0]); 2696 hmaclist = sctp_alloc_hmaclist(size); 2697 if (hmaclist == NULL) { 2698 error = ENOMEM; 2699 break; 2700 } 2701 for (i = 0; i < size; i++) { 2702 hmacid = shmac->shmac_idents[i]; 2703 if (sctp_auth_add_hmacid(hmaclist, (uint16_t) hmacid)) { 2704 /* invalid HMACs were found */ ; 2705 error = EINVAL; 2706 sctp_free_hmaclist(hmaclist); 2707 goto sctp_set_hmac_done; 2708 } 2709 } 2710 found = 0; 2711 for (i = 0; i < hmaclist->num_algo; i++) { 2712 if (hmaclist->hmac[i] == SCTP_AUTH_HMAC_ID_SHA1) { 2713 /* already in list */ 2714 found = 1; 2715 } 2716 } 2717 if (!found) { 2718 sctp_free_hmaclist(hmaclist); 2719 error = EINVAL; 2720 break; 2721 } 2722 /* set it on the endpoint */ 2723 SCTP_INP_WLOCK(inp); 2724 if (inp->sctp_ep.local_hmacs) 2725 sctp_free_hmaclist(inp->sctp_ep.local_hmacs); 2726 inp->sctp_ep.local_hmacs = hmaclist; 2727 SCTP_INP_WUNLOCK(inp); 2728 sctp_set_hmac_done: 2729 break; 2730 } 2731 case SCTP_AUTH_ACTIVE_KEY: 2732 { 2733 struct sctp_authkeyid *scact; 2734 2735 SCTP_CHECK_AND_CAST(scact, optval, struct sctp_authkeyid, optsize); 2736 SCTP_FIND_STCB(inp, stcb, scact->scact_assoc_id); 2737 2738 /* set the active key on the right place */ 2739 if (stcb) { 2740 /* set the active key on the assoc */ 2741 if (sctp_auth_setactivekey(stcb, scact->scact_keynumber)) 2742 error = EINVAL; 2743 SCTP_TCB_UNLOCK(stcb); 2744 } else { 2745 /* set the active key on the endpoint */ 2746 SCTP_INP_WLOCK(inp); 2747 if (sctp_auth_setactivekey_ep(inp, scact->scact_keynumber)) 2748 error = EINVAL; 2749 SCTP_INP_WUNLOCK(inp); 2750 } 2751 break; 2752 } 2753 case SCTP_AUTH_DELETE_KEY: 2754 { 2755 struct sctp_authkeyid *scdel; 2756 2757 SCTP_CHECK_AND_CAST(scdel, optval, struct sctp_authkeyid, optsize); 2758 SCTP_FIND_STCB(inp, stcb, scdel->scact_assoc_id); 2759 2760 /* delete the key from the right place */ 2761 if (stcb) { 2762 if (sctp_delete_sharedkey(stcb, scdel->scact_keynumber)) 2763 error = EINVAL; 2764 SCTP_TCB_UNLOCK(stcb); 2765 } else { 2766 SCTP_INP_WLOCK(inp); 2767 if (sctp_delete_sharedkey_ep(inp, scdel->scact_keynumber)) 2768 error = EINVAL; 2769 SCTP_INP_WUNLOCK(inp); 2770 } 2771 break; 2772 } 2773 2774 case SCTP_RESET_STREAMS: 2775 { 2776 struct sctp_stream_reset *strrst; 2777 uint8_t send_in = 0, send_tsn = 0, send_out = 0; 2778 int i; 2779 2780 SCTP_CHECK_AND_CAST(strrst, optval, struct sctp_stream_reset, optsize); 2781 SCTP_FIND_STCB(inp, stcb, strrst->strrst_assoc_id); 2782 2783 if (stcb == NULL) { 2784 error = ENOENT; 2785 break; 2786 } 2787 if (stcb->asoc.peer_supports_strreset == 0) { 2788 /* 2789 * Peer does not support it, we return 2790 * protocol not supported since this is true 2791 * for this feature and this peer, not the 2792 * socket request in general. 2793 */ 2794 error = EPROTONOSUPPORT; 2795 SCTP_TCB_UNLOCK(stcb); 2796 break; 2797 } 2798 if (stcb->asoc.stream_reset_outstanding) { 2799 error = EALREADY; 2800 SCTP_TCB_UNLOCK(stcb); 2801 break; 2802 } 2803 if (strrst->strrst_flags == SCTP_RESET_LOCAL_RECV) { 2804 send_in = 1; 2805 } else if (strrst->strrst_flags == SCTP_RESET_LOCAL_SEND) { 2806 send_out = 1; 2807 } else if (strrst->strrst_flags == SCTP_RESET_BOTH) { 2808 send_in = 1; 2809 send_out = 1; 2810 } else if (strrst->strrst_flags == SCTP_RESET_TSN) { 2811 send_tsn = 1; 2812 } else { 2813 error = EINVAL; 2814 SCTP_TCB_UNLOCK(stcb); 2815 break; 2816 } 2817 for (i = 0; i < strrst->strrst_num_streams; i++) { 2818 if ((send_in) && 2819 2820 (strrst->strrst_list[i] > stcb->asoc.streamincnt)) { 2821 error = EINVAL; 2822 goto get_out; 2823 } 2824 if ((send_out) && 2825 (strrst->strrst_list[i] > stcb->asoc.streamoutcnt)) { 2826 error = EINVAL; 2827 goto get_out; 2828 } 2829 } 2830 if (error) { 2831 get_out: 2832 SCTP_TCB_UNLOCK(stcb); 2833 break; 2834 } 2835 error = sctp_send_str_reset_req(stcb, strrst->strrst_num_streams, 2836 strrst->strrst_list, 2837 send_out, (stcb->asoc.str_reset_seq_in - 3), 2838 send_in, send_tsn); 2839 2840 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_STRRST_REQ); 2841 SCTP_TCB_UNLOCK(stcb); 2842 } 2843 break; 2844 2845 case SCTP_CONNECT_X: 2846 if (optsize < (sizeof(int) + sizeof(struct sockaddr_in))) { 2847 error = EINVAL; 2848 break; 2849 } 2850 error = sctp_do_connect_x(so, inp, optval, optsize, p, 0); 2851 break; 2852 2853 case SCTP_CONNECT_X_DELAYED: 2854 if (optsize < (sizeof(int) + sizeof(struct sockaddr_in))) { 2855 error = EINVAL; 2856 break; 2857 } 2858 error = sctp_do_connect_x(so, inp, optval, optsize, p, 1); 2859 break; 2860 2861 case SCTP_CONNECT_X_COMPLETE: 2862 { 2863 struct sockaddr *sa; 2864 struct sctp_nets *net; 2865 2866 /* FIXME MT: check correct? */ 2867 SCTP_CHECK_AND_CAST(sa, optval, struct sockaddr, optsize); 2868 2869 /* find tcb */ 2870 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) { 2871 SCTP_INP_RLOCK(inp); 2872 stcb = LIST_FIRST(&inp->sctp_asoc_list); 2873 if (stcb) { 2874 SCTP_TCB_LOCK(stcb); 2875 net = sctp_findnet(stcb, sa); 2876 } 2877 SCTP_INP_RUNLOCK(inp); 2878 } else { 2879 /* 2880 * We increment here since 2881 * sctp_findassociation_ep_addr() wil do a 2882 * decrement if it finds the stcb as long as 2883 * the locked tcb (last argument) is NOT a 2884 * TCB.. aka NULL. 2885 */ 2886 SCTP_INP_INCR_REF(inp); 2887 stcb = sctp_findassociation_ep_addr(&inp, sa, &net, NULL, NULL); 2888 if (stcb == NULL) { 2889 SCTP_INP_DECR_REF(inp); 2890 } 2891 } 2892 2893 if (stcb == NULL) { 2894 error = ENOENT; 2895 break; 2896 } 2897 if (stcb->asoc.delayed_connection == 1) { 2898 stcb->asoc.delayed_connection = 0; 2899 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered); 2900 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, inp, stcb, 2901 stcb->asoc.primary_destination, 2902 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_9); 2903 sctp_send_initiate(inp, stcb); 2904 } else { 2905 /* 2906 * already expired or did not use delayed 2907 * connectx 2908 */ 2909 error = EALREADY; 2910 } 2911 SCTP_TCB_UNLOCK(stcb); 2912 } 2913 break; 2914 case SCTP_MAX_BURST: 2915 { 2916 uint8_t *burst; 2917 2918 SCTP_CHECK_AND_CAST(burst, optval, uint8_t, optsize); 2919 2920 SCTP_INP_WLOCK(inp); 2921 if (*burst) { 2922 inp->sctp_ep.max_burst = *burst; 2923 } 2924 SCTP_INP_WUNLOCK(inp); 2925 } 2926 break; 2927 case SCTP_MAXSEG: 2928 { 2929 struct sctp_assoc_value *av; 2930 int ovh; 2931 2932 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize); 2933 SCTP_FIND_STCB(inp, stcb, av->assoc_id); 2934 2935 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 2936 ovh = SCTP_MED_OVERHEAD; 2937 } else { 2938 ovh = SCTP_MED_V4_OVERHEAD; 2939 } 2940 if (stcb) { 2941 if (av->assoc_value) { 2942 stcb->asoc.sctp_frag_point = (av->assoc_value + ovh); 2943 } else { 2944 stcb->asoc.sctp_frag_point = SCTP_DEFAULT_MAXSEGMENT; 2945 } 2946 SCTP_TCB_UNLOCK(stcb); 2947 } else { 2948 SCTP_INP_WLOCK(inp); 2949 /* 2950 * FIXME MT: I think this is not in tune 2951 * with the API ID 2952 */ 2953 if (av->assoc_value) { 2954 inp->sctp_frag_point = (av->assoc_value + ovh); 2955 } else { 2956 inp->sctp_frag_point = SCTP_DEFAULT_MAXSEGMENT; 2957 } 2958 SCTP_INP_WUNLOCK(inp); 2959 } 2960 } 2961 break; 2962 case SCTP_EVENTS: 2963 { 2964 struct sctp_event_subscribe *events; 2965 2966 SCTP_CHECK_AND_CAST(events, optval, struct sctp_event_subscribe, optsize); 2967 2968 SCTP_INP_WLOCK(inp); 2969 if (events->sctp_data_io_event) { 2970 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVDATAIOEVNT); 2971 } else { 2972 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVDATAIOEVNT); 2973 } 2974 2975 if (events->sctp_association_event) { 2976 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVASSOCEVNT); 2977 } else { 2978 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVASSOCEVNT); 2979 } 2980 2981 if (events->sctp_address_event) { 2982 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVPADDREVNT); 2983 } else { 2984 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVPADDREVNT); 2985 } 2986 2987 if (events->sctp_send_failure_event) { 2988 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVSENDFAILEVNT); 2989 } else { 2990 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVSENDFAILEVNT); 2991 } 2992 2993 if (events->sctp_peer_error_event) { 2994 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVPEERERR); 2995 } else { 2996 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVPEERERR); 2997 } 2998 2999 if (events->sctp_shutdown_event) { 3000 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVSHUTDOWNEVNT); 3001 } else { 3002 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVSHUTDOWNEVNT); 3003 } 3004 3005 if (events->sctp_partial_delivery_event) { 3006 sctp_feature_on(inp, SCTP_PCB_FLAGS_PDAPIEVNT); 3007 } else { 3008 sctp_feature_off(inp, SCTP_PCB_FLAGS_PDAPIEVNT); 3009 } 3010 3011 if (events->sctp_adaptation_layer_event) { 3012 sctp_feature_on(inp, SCTP_PCB_FLAGS_ADAPTATIONEVNT); 3013 } else { 3014 sctp_feature_off(inp, SCTP_PCB_FLAGS_ADAPTATIONEVNT); 3015 } 3016 3017 if (events->sctp_authentication_event) { 3018 sctp_feature_on(inp, SCTP_PCB_FLAGS_AUTHEVNT); 3019 } else { 3020 sctp_feature_off(inp, SCTP_PCB_FLAGS_AUTHEVNT); 3021 } 3022 3023 if (events->sctp_stream_reset_events) { 3024 sctp_feature_on(inp, SCTP_PCB_FLAGS_STREAM_RESETEVNT); 3025 } else { 3026 sctp_feature_off(inp, SCTP_PCB_FLAGS_STREAM_RESETEVNT); 3027 } 3028 SCTP_INP_WUNLOCK(inp); 3029 } 3030 break; 3031 3032 case SCTP_ADAPTATION_LAYER: 3033 { 3034 struct sctp_setadaptation *adap_bits; 3035 3036 SCTP_CHECK_AND_CAST(adap_bits, optval, struct sctp_setadaptation, optsize); 3037 SCTP_INP_WLOCK(inp); 3038 inp->sctp_ep.adaptation_layer_indicator = adap_bits->ssb_adaptation_ind; 3039 SCTP_INP_WUNLOCK(inp); 3040 } 3041 break; 3042 #ifdef SCTP_DEBUG 3043 case SCTP_SET_INITIAL_DBG_SEQ: 3044 { 3045 uint32_t *vvv; 3046 3047 SCTP_CHECK_AND_CAST(vvv, optval, uint32_t, optsize); 3048 SCTP_INP_WLOCK(inp); 3049 inp->sctp_ep.initial_sequence_debug = *vvv; 3050 SCTP_INP_WUNLOCK(inp); 3051 } 3052 break; 3053 #endif 3054 case SCTP_DEFAULT_SEND_PARAM: 3055 { 3056 struct sctp_sndrcvinfo *s_info; 3057 3058 SCTP_CHECK_AND_CAST(s_info, optval, struct sctp_sndrcvinfo, optsize); 3059 SCTP_FIND_STCB(inp, stcb, s_info->sinfo_assoc_id); 3060 3061 if (stcb) { 3062 if (s_info->sinfo_stream <= stcb->asoc.streamoutcnt) { 3063 memcpy(&stcb->asoc.def_send, s_info, min(optsize, sizeof(stcb->asoc.def_send))); 3064 } else { 3065 error = EINVAL; 3066 } 3067 SCTP_TCB_UNLOCK(stcb); 3068 } else { 3069 SCTP_INP_WLOCK(inp); 3070 memcpy(&inp->def_send, s_info, min(optsize, sizeof(inp->def_send))); 3071 SCTP_INP_WUNLOCK(inp); 3072 } 3073 } 3074 break; 3075 case SCTP_PEER_ADDR_PARAMS: 3076 /* Applys to the specific association */ 3077 { 3078 struct sctp_paddrparams *paddrp; 3079 struct sctp_nets *net; 3080 3081 SCTP_CHECK_AND_CAST(paddrp, optval, struct sctp_paddrparams, optsize); 3082 SCTP_FIND_STCB(inp, stcb, paddrp->spp_assoc_id); 3083 net = NULL; 3084 if (stcb) { 3085 net = sctp_findnet(stcb, (struct sockaddr *)&paddrp->spp_address); 3086 } else { 3087 /* 3088 * We increment here since 3089 * sctp_findassociation_ep_addr() wil do a 3090 * decrement if it finds the stcb as long as 3091 * the locked tcb (last argument) is NOT a 3092 * TCB.. aka NULL. 3093 */ 3094 SCTP_INP_INCR_REF(inp); 3095 stcb = sctp_findassociation_ep_addr(&inp, 3096 (struct sockaddr *)&paddrp->spp_address, 3097 &net, NULL, NULL); 3098 if (stcb == NULL) { 3099 SCTP_INP_DECR_REF(inp); 3100 } 3101 } 3102 /* sanity checks */ 3103 if ((paddrp->spp_flags & SPP_HB_ENABLE) && (paddrp->spp_flags & SPP_HB_DISABLE)) { 3104 if (stcb) 3105 SCTP_TCB_UNLOCK(stcb); 3106 return (EINVAL); 3107 } 3108 if ((paddrp->spp_flags & SPP_PMTUD_ENABLE) && (paddrp->spp_flags & SPP_PMTUD_DISABLE)) { 3109 if (stcb) 3110 SCTP_TCB_UNLOCK(stcb); 3111 return (EINVAL); 3112 } 3113 if (stcb) { 3114 /************************TCB SPECIFIC SET ******************/ 3115 /* 3116 * do we change the timer for HB, we run 3117 * only one? 3118 */ 3119 int ovh = 0; 3120 3121 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 3122 ovh = SCTP_MED_OVERHEAD; 3123 } else { 3124 ovh = SCTP_MED_V4_OVERHEAD; 3125 } 3126 3127 if (paddrp->spp_hbinterval) 3128 stcb->asoc.heart_beat_delay = paddrp->spp_hbinterval; 3129 else if (paddrp->spp_flags & SPP_HB_TIME_IS_ZERO) 3130 stcb->asoc.heart_beat_delay = 0; 3131 3132 /* network sets ? */ 3133 if (net) { 3134 /************************NET SPECIFIC SET ******************/ 3135 if (paddrp->spp_flags & SPP_HB_DEMAND) { 3136 /* on demand HB */ 3137 (void)sctp_send_hb(stcb, 1, net); 3138 } 3139 if (paddrp->spp_flags & SPP_HB_DISABLE) { 3140 net->dest_state |= SCTP_ADDR_NOHB; 3141 } 3142 if (paddrp->spp_flags & SPP_HB_ENABLE) { 3143 net->dest_state &= ~SCTP_ADDR_NOHB; 3144 } 3145 if ((paddrp->spp_flags & SPP_PMTUD_DISABLE) && (paddrp->spp_pathmtu >= SCTP_SMALLEST_PMTU)) { 3146 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 3147 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net, 3148 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_10); 3149 } 3150 if (paddrp->spp_pathmtu > SCTP_DEFAULT_MINSEGMENT) { 3151 net->mtu = paddrp->spp_pathmtu + ovh; 3152 if (net->mtu < stcb->asoc.smallest_mtu) { 3153 #ifdef SCTP_PRINT_FOR_B_AND_M 3154 SCTP_PRINTF("SCTP_PMTU_DISABLE calls sctp_pathmtu_adjustment:%d\n", 3155 net->mtu); 3156 #endif 3157 sctp_pathmtu_adjustment(inp, stcb, net, net->mtu); 3158 } 3159 } 3160 } 3161 if (paddrp->spp_flags & SPP_PMTUD_ENABLE) { 3162 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 3163 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net); 3164 } 3165 } 3166 if (paddrp->spp_pathmaxrxt) 3167 net->failure_threshold = paddrp->spp_pathmaxrxt; 3168 #ifdef INET 3169 if (paddrp->spp_flags & SPP_IPV4_TOS) { 3170 if (net->ro._l_addr.sin.sin_family == AF_INET) { 3171 net->tos_flowlabel = paddrp->spp_ipv4_tos & 0x000000fc; 3172 } 3173 } 3174 #endif 3175 #ifdef INET6 3176 if (paddrp->spp_flags & SPP_IPV6_FLOWLABEL) { 3177 if (net->ro._l_addr.sin6.sin6_family == AF_INET6) { 3178 net->tos_flowlabel = paddrp->spp_ipv6_flowlabel; 3179 } 3180 } 3181 #endif 3182 } else { 3183 /************************ASSOC ONLY -- NO NET SPECIFIC SET ******************/ 3184 if (paddrp->spp_pathmaxrxt) 3185 stcb->asoc.def_net_failure = paddrp->spp_pathmaxrxt; 3186 3187 if (paddrp->spp_flags & SPP_HB_ENABLE) { 3188 /* Turn back on the timer */ 3189 stcb->asoc.hb_is_disabled = 0; 3190 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net); 3191 } 3192 if ((paddrp->spp_flags & SPP_PMTUD_DISABLE) && (paddrp->spp_pathmtu >= SCTP_SMALLEST_PMTU)) { 3193 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 3194 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 3195 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net, 3196 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_10); 3197 } 3198 if (paddrp->spp_pathmtu > SCTP_DEFAULT_MINSEGMENT) { 3199 net->mtu = paddrp->spp_pathmtu + ovh; 3200 if (net->mtu < stcb->asoc.smallest_mtu) { 3201 #ifdef SCTP_PRINT_FOR_B_AND_M 3202 SCTP_PRINTF("SCTP_PMTU_DISABLE calls sctp_pathmtu_adjustment:%d\n", 3203 net->mtu); 3204 #endif 3205 sctp_pathmtu_adjustment(inp, stcb, net, net->mtu); 3206 } 3207 } 3208 } 3209 } 3210 if (paddrp->spp_flags & SPP_PMTUD_ENABLE) { 3211 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 3212 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) { 3213 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net); 3214 } 3215 } 3216 } 3217 if (paddrp->spp_flags & SPP_HB_DISABLE) { 3218 int cnt_of_unconf = 0; 3219 struct sctp_nets *lnet; 3220 3221 stcb->asoc.hb_is_disabled = 1; 3222 TAILQ_FOREACH(lnet, &stcb->asoc.nets, sctp_next) { 3223 if (lnet->dest_state & SCTP_ADDR_UNCONFIRMED) { 3224 cnt_of_unconf++; 3225 } 3226 } 3227 /* 3228 * stop the timer ONLY if we 3229 * have no unconfirmed 3230 * addresses 3231 */ 3232 if (cnt_of_unconf == 0) { 3233 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 3234 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net, 3235 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_11); 3236 } 3237 } 3238 } 3239 if (paddrp->spp_flags & SPP_HB_ENABLE) { 3240 /* start up the timer. */ 3241 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 3242 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net); 3243 } 3244 } 3245 #ifdef INET 3246 if (paddrp->spp_flags & SPP_IPV4_TOS) 3247 stcb->asoc.default_tos = paddrp->spp_ipv4_tos & 0x000000fc; 3248 #endif 3249 #ifdef INET6 3250 if (paddrp->spp_flags & SPP_IPV6_FLOWLABEL) 3251 stcb->asoc.default_flowlabel = paddrp->spp_ipv6_flowlabel; 3252 #endif 3253 3254 } 3255 SCTP_TCB_UNLOCK(stcb); 3256 } else { 3257 /************************NO TCB, SET TO default stuff ******************/ 3258 SCTP_INP_WLOCK(inp); 3259 /* 3260 * For the TOS/FLOWLABEL stuff you set it 3261 * with the options on the socket 3262 */ 3263 if (paddrp->spp_pathmaxrxt) { 3264 inp->sctp_ep.def_net_failure = paddrp->spp_pathmaxrxt; 3265 } 3266 if (paddrp->spp_flags & SPP_HB_TIME_IS_ZERO) 3267 inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_HEARTBEAT] = 0; 3268 else if (paddrp->spp_hbinterval) 3269 inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_HEARTBEAT] = MSEC_TO_TICKS(paddrp->spp_hbinterval); 3270 3271 if (paddrp->spp_flags & SPP_HB_ENABLE) { 3272 sctp_feature_off(inp, SCTP_PCB_FLAGS_DONOT_HEARTBEAT); 3273 3274 } else if (paddrp->spp_flags & SPP_HB_DISABLE) { 3275 sctp_feature_on(inp, SCTP_PCB_FLAGS_DONOT_HEARTBEAT); 3276 } 3277 SCTP_INP_WUNLOCK(inp); 3278 } 3279 } 3280 break; 3281 case SCTP_RTOINFO: 3282 { 3283 struct sctp_rtoinfo *srto; 3284 uint32_t new_init, new_min, new_max; 3285 3286 SCTP_CHECK_AND_CAST(srto, optval, struct sctp_rtoinfo, optsize); 3287 SCTP_FIND_STCB(inp, stcb, srto->srto_assoc_id); 3288 3289 if (stcb) { 3290 if (srto->srto_initial) 3291 new_init = srto->srto_initial; 3292 else 3293 new_init = stcb->asoc.initial_rto; 3294 if (srto->srto_max) 3295 new_max = srto->srto_max; 3296 else 3297 new_max = stcb->asoc.maxrto; 3298 if (srto->srto_min) 3299 new_min = srto->srto_min; 3300 else 3301 new_min = stcb->asoc.minrto; 3302 if ((new_min <= new_init) && (new_init <= new_max)) { 3303 stcb->asoc.initial_rto = new_init; 3304 stcb->asoc.maxrto = new_max; 3305 stcb->asoc.minrto = new_min; 3306 } else { 3307 error = EDOM; 3308 } 3309 SCTP_TCB_UNLOCK(stcb); 3310 } else { 3311 SCTP_INP_WLOCK(inp); 3312 if (srto->srto_initial) 3313 new_init = srto->srto_initial; 3314 else 3315 new_init = inp->sctp_ep.initial_rto; 3316 if (srto->srto_max) 3317 new_max = srto->srto_max; 3318 else 3319 new_max = inp->sctp_ep.sctp_maxrto; 3320 if (srto->srto_min) 3321 new_min = srto->srto_min; 3322 else 3323 new_min = inp->sctp_ep.sctp_minrto; 3324 if ((new_min <= new_init) && (new_init <= new_max)) { 3325 inp->sctp_ep.initial_rto = new_init; 3326 inp->sctp_ep.sctp_maxrto = new_max; 3327 inp->sctp_ep.sctp_minrto = new_min; 3328 } else { 3329 error = EDOM; 3330 } 3331 SCTP_INP_WUNLOCK(inp); 3332 } 3333 } 3334 break; 3335 case SCTP_ASSOCINFO: 3336 { 3337 struct sctp_assocparams *sasoc; 3338 3339 SCTP_CHECK_AND_CAST(sasoc, optval, struct sctp_assocparams, optsize); 3340 SCTP_FIND_STCB(inp, stcb, sasoc->sasoc_assoc_id); 3341 3342 if (stcb) { 3343 if (sasoc->sasoc_asocmaxrxt) 3344 stcb->asoc.max_send_times = sasoc->sasoc_asocmaxrxt; 3345 sasoc->sasoc_number_peer_destinations = stcb->asoc.numnets; 3346 sasoc->sasoc_peer_rwnd = 0; 3347 sasoc->sasoc_local_rwnd = 0; 3348 if (sasoc->sasoc_cookie_life) { 3349 if (sasoc->sasoc_cookie_life < 1000) 3350 sasoc->sasoc_cookie_life = 1000; 3351 stcb->asoc.cookie_life = MSEC_TO_TICKS(sasoc->sasoc_cookie_life); 3352 } 3353 SCTP_TCB_UNLOCK(stcb); 3354 } else { 3355 SCTP_INP_WLOCK(inp); 3356 if (sasoc->sasoc_asocmaxrxt) 3357 inp->sctp_ep.max_send_times = sasoc->sasoc_asocmaxrxt; 3358 sasoc->sasoc_number_peer_destinations = 0; 3359 sasoc->sasoc_peer_rwnd = 0; 3360 sasoc->sasoc_local_rwnd = 0; 3361 if (sasoc->sasoc_cookie_life) { 3362 if (sasoc->sasoc_cookie_life < 1000) 3363 sasoc->sasoc_cookie_life = 1000; 3364 inp->sctp_ep.def_cookie_life = MSEC_TO_TICKS(sasoc->sasoc_cookie_life); 3365 } 3366 SCTP_INP_WUNLOCK(inp); 3367 } 3368 } 3369 break; 3370 case SCTP_INITMSG: 3371 { 3372 struct sctp_initmsg *sinit; 3373 3374 SCTP_CHECK_AND_CAST(sinit, optval, struct sctp_initmsg, optsize); 3375 SCTP_INP_WLOCK(inp); 3376 if (sinit->sinit_num_ostreams) 3377 inp->sctp_ep.pre_open_stream_count = sinit->sinit_num_ostreams; 3378 3379 if (sinit->sinit_max_instreams) 3380 inp->sctp_ep.max_open_streams_intome = sinit->sinit_max_instreams; 3381 3382 if (sinit->sinit_max_attempts) 3383 inp->sctp_ep.max_init_times = sinit->sinit_max_attempts; 3384 3385 if (sinit->sinit_max_init_timeo) 3386 inp->sctp_ep.initial_init_rto_max = sinit->sinit_max_init_timeo; 3387 SCTP_INP_WUNLOCK(inp); 3388 } 3389 break; 3390 case SCTP_PRIMARY_ADDR: 3391 { 3392 struct sctp_setprim *spa; 3393 struct sctp_nets *net, *lnet; 3394 3395 SCTP_CHECK_AND_CAST(spa, optval, struct sctp_setprim, optsize); 3396 SCTP_FIND_STCB(inp, stcb, spa->ssp_assoc_id); 3397 3398 net = NULL; 3399 if (stcb) { 3400 net = sctp_findnet(stcb, (struct sockaddr *)&spa->ssp_addr); 3401 } else { 3402 /* 3403 * We increment here since 3404 * sctp_findassociation_ep_addr() wil do a 3405 * decrement if it finds the stcb as long as 3406 * the locked tcb (last argument) is NOT a 3407 * TCB.. aka NULL. 3408 */ 3409 SCTP_INP_INCR_REF(inp); 3410 stcb = sctp_findassociation_ep_addr(&inp, 3411 (struct sockaddr *)&spa->ssp_addr, 3412 &net, NULL, NULL); 3413 if (stcb == NULL) { 3414 SCTP_INP_DECR_REF(inp); 3415 } 3416 } 3417 3418 if ((stcb) && (net)) { 3419 if ((net != stcb->asoc.primary_destination) && 3420 (!(net->dest_state & SCTP_ADDR_UNCONFIRMED))) { 3421 /* Ok we need to set it */ 3422 lnet = stcb->asoc.primary_destination; 3423 if (sctp_set_primary_addr(stcb, (struct sockaddr *)NULL, net) == 0) { 3424 if (net->dest_state & SCTP_ADDR_SWITCH_PRIMARY) { 3425 net->dest_state |= SCTP_ADDR_DOUBLE_SWITCH; 3426 } 3427 net->dest_state |= SCTP_ADDR_SWITCH_PRIMARY; 3428 } 3429 } 3430 } else { 3431 error = EINVAL; 3432 } 3433 if (stcb) { 3434 SCTP_TCB_UNLOCK(stcb); 3435 } 3436 } 3437 break; 3438 case SCTP_SET_DYNAMIC_PRIMARY: 3439 { 3440 union sctp_sockstore *ss; 3441 3442 error = priv_check_cred(curthread->td_ucred, 3443 PRIV_NETINET_RESERVEDPORT, 3444 SUSER_ALLOWJAIL); 3445 if (error) 3446 break; 3447 3448 SCTP_CHECK_AND_CAST(ss, optval, union sctp_sockstore, optsize); 3449 /* SUPER USER CHECK? */ 3450 error = sctp_dynamic_set_primary(&ss->sa, vrf_id); 3451 } 3452 break; 3453 case SCTP_SET_PEER_PRIMARY_ADDR: 3454 { 3455 struct sctp_setpeerprim *sspp; 3456 3457 SCTP_CHECK_AND_CAST(sspp, optval, struct sctp_setpeerprim, optsize); 3458 SCTP_FIND_STCB(inp, stcb, sspp->sspp_assoc_id); 3459 if (stcb != NULL) { 3460 struct sctp_ifa *ifa; 3461 3462 ifa = sctp_find_ifa_by_addr((struct sockaddr *)&sspp->sspp_addr, 3463 stcb->asoc.vrf_id, 0); 3464 if (ifa == NULL) { 3465 error = EINVAL; 3466 goto out_of_it; 3467 } 3468 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) == 0) { 3469 /* 3470 * Must validate the ifa found is in 3471 * our ep 3472 */ 3473 struct sctp_laddr *laddr; 3474 int found = 0; 3475 3476 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) { 3477 if (laddr->ifa == NULL) { 3478 SCTPDBG(SCTP_DEBUG_OUTPUT1, "%s: NULL ifa\n", 3479 __FUNCTION__); 3480 continue; 3481 } 3482 if (laddr->ifa == ifa) { 3483 found = 1; 3484 break; 3485 } 3486 } 3487 if (!found) { 3488 error = EINVAL; 3489 goto out_of_it; 3490 } 3491 } 3492 if (sctp_set_primary_ip_address_sa(stcb, 3493 (struct sockaddr *)&sspp->sspp_addr) != 0) { 3494 error = EINVAL; 3495 } 3496 out_of_it: 3497 SCTP_TCB_UNLOCK(stcb); 3498 } else { 3499 error = EINVAL; 3500 } 3501 3502 } 3503 break; 3504 case SCTP_BINDX_ADD_ADDR: 3505 { 3506 struct sctp_getaddresses *addrs; 3507 struct sockaddr *addr_touse; 3508 struct sockaddr_in sin; 3509 3510 SCTP_CHECK_AND_CAST(addrs, optval, struct sctp_getaddresses, optsize); 3511 3512 /* see if we're bound all already! */ 3513 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 3514 error = EINVAL; 3515 break; 3516 } 3517 /* Is the VRF one we have */ 3518 addr_touse = addrs->addr; 3519 #if defined(INET6) 3520 if (addrs->addr->sa_family == AF_INET6) { 3521 struct sockaddr_in6 *sin6; 3522 3523 if (addrs->addr->sa_len != sizeof(struct sockaddr_in6)) { 3524 error = EINVAL; 3525 break; 3526 } 3527 sin6 = (struct sockaddr_in6 *)addr_touse; 3528 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 3529 in6_sin6_2_sin(&sin, sin6); 3530 addr_touse = (struct sockaddr *)&sin; 3531 } 3532 } 3533 #endif 3534 if (addrs->addr->sa_family == AF_INET) { 3535 if (addrs->addr->sa_len != sizeof(struct sockaddr_in)) { 3536 error = EINVAL; 3537 break; 3538 } 3539 } 3540 if (inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) { 3541 3542 if (p == NULL) { 3543 /* Can't get proc for Net/Open BSD */ 3544 error = EINVAL; 3545 break; 3546 } 3547 error = sctp_inpcb_bind(so, addr_touse, p); 3548 break; 3549 } 3550 /* 3551 * No locks required here since bind and mgmt_ep_sa 3552 * all do their own locking. If we do something for 3553 * the FIX: below we may need to lock in that case. 3554 */ 3555 if (addrs->sget_assoc_id == 0) { 3556 /* add the address */ 3557 struct sctp_inpcb *lep; 3558 3559 ((struct sockaddr_in *)addr_touse)->sin_port = inp->sctp_lport; 3560 lep = sctp_pcb_findep(addr_touse, 1, 0, vrf_id); 3561 if (lep != NULL) { 3562 /* 3563 * We must decrement the refcount 3564 * since we have the ep already and 3565 * are binding. No remove going on 3566 * here. 3567 */ 3568 SCTP_INP_DECR_REF(inp); 3569 } 3570 if (lep == inp) { 3571 /* already bound to it.. ok */ 3572 break; 3573 } else if (lep == NULL) { 3574 ((struct sockaddr_in *)addr_touse)->sin_port = 0; 3575 error = sctp_addr_mgmt_ep_sa(inp, addr_touse, 3576 SCTP_ADD_IP_ADDRESS, vrf_id); 3577 } else { 3578 error = EADDRINUSE; 3579 } 3580 if (error) 3581 break; 3582 3583 } else { 3584 /* 3585 * FIX: decide whether we allow assoc based 3586 * bindx 3587 */ 3588 } 3589 } 3590 break; 3591 case SCTP_BINDX_REM_ADDR: 3592 { 3593 struct sctp_getaddresses *addrs; 3594 struct sockaddr *addr_touse; 3595 struct sockaddr_in sin; 3596 3597 SCTP_CHECK_AND_CAST(addrs, optval, struct sctp_getaddresses, optsize); 3598 /* see if we're bound all already! */ 3599 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 3600 error = EINVAL; 3601 break; 3602 } 3603 addr_touse = addrs->addr; 3604 #if defined(INET6) 3605 if (addrs->addr->sa_family == AF_INET6) { 3606 struct sockaddr_in6 *sin6; 3607 3608 if (addrs->addr->sa_len != sizeof(struct sockaddr_in6)) { 3609 error = EINVAL; 3610 break; 3611 } 3612 sin6 = (struct sockaddr_in6 *)addr_touse; 3613 if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr)) { 3614 in6_sin6_2_sin(&sin, sin6); 3615 addr_touse = (struct sockaddr *)&sin; 3616 } 3617 } 3618 #endif 3619 if (addrs->addr->sa_family == AF_INET) { 3620 if (addrs->addr->sa_len != sizeof(struct sockaddr_in)) { 3621 error = EINVAL; 3622 break; 3623 } 3624 } 3625 /* 3626 * No lock required mgmt_ep_sa does its own locking. 3627 * If the FIX: below is ever changed we may need to 3628 * lock before calling association level binding. 3629 */ 3630 if (addrs->sget_assoc_id == 0) { 3631 /* delete the address */ 3632 error = sctp_addr_mgmt_ep_sa(inp, addr_touse, 3633 SCTP_DEL_IP_ADDRESS, 3634 vrf_id); 3635 } else { 3636 /* 3637 * FIX: decide whether we allow assoc based 3638 * bindx 3639 */ 3640 } 3641 } 3642 break; 3643 default: 3644 error = ENOPROTOOPT; 3645 break; 3646 } /* end switch (opt) */ 3647 return (error); 3648 } 3649 3650 3651 int 3652 sctp_ctloutput(struct socket *so, struct sockopt *sopt) 3653 { 3654 void *optval = NULL; 3655 size_t optsize = 0; 3656 struct sctp_inpcb *inp; 3657 void *p; 3658 int error = 0; 3659 3660 inp = (struct sctp_inpcb *)so->so_pcb; 3661 if (inp == 0) { 3662 /* I made the same as TCP since we are not setup? */ 3663 return (ECONNRESET); 3664 } 3665 if (sopt->sopt_level != IPPROTO_SCTP) { 3666 /* wrong proto level... send back up to IP */ 3667 #ifdef INET6 3668 if (INP_CHECK_SOCKAF(so, AF_INET6)) 3669 error = ip6_ctloutput(so, sopt); 3670 else 3671 #endif /* INET6 */ 3672 error = ip_ctloutput(so, sopt); 3673 return (error); 3674 } 3675 optsize = sopt->sopt_valsize; 3676 if (optsize) { 3677 SCTP_MALLOC(optval, void *, optsize, SCTP_M_SOCKOPT); 3678 if (optval == NULL) { 3679 return (ENOBUFS); 3680 } 3681 error = sooptcopyin(sopt, optval, optsize, optsize); 3682 if (error) { 3683 SCTP_FREE(optval, SCTP_M_SOCKOPT); 3684 goto out; 3685 } 3686 } 3687 p = (void *)sopt->sopt_td; 3688 if (sopt->sopt_dir == SOPT_SET) { 3689 error = sctp_setopt(so, sopt->sopt_name, optval, optsize, p); 3690 } else if (sopt->sopt_dir == SOPT_GET) { 3691 error = sctp_getopt(so, sopt->sopt_name, optval, &optsize, p); 3692 } else { 3693 error = EINVAL; 3694 } 3695 if ((error == 0) && (optval != NULL)) { 3696 error = sooptcopyout(sopt, optval, optsize); 3697 SCTP_FREE(optval, SCTP_M_SOCKOPT); 3698 } else if (optval != NULL) { 3699 SCTP_FREE(optval, SCTP_M_SOCKOPT); 3700 } 3701 out: 3702 return (error); 3703 } 3704 3705 3706 static int 3707 sctp_connect(struct socket *so, struct sockaddr *addr, struct thread *p) 3708 { 3709 int error = 0; 3710 int create_lock_on = 0; 3711 uint32_t vrf_id; 3712 struct sctp_inpcb *inp; 3713 struct sctp_tcb *stcb = NULL; 3714 3715 inp = (struct sctp_inpcb *)so->so_pcb; 3716 if (inp == 0) { 3717 /* I made the same as TCP since we are not setup? */ 3718 return (ECONNRESET); 3719 } 3720 if (addr == NULL) 3721 return EINVAL; 3722 3723 if ((addr->sa_family == AF_INET6) && (addr->sa_len != sizeof(struct sockaddr_in6))) { 3724 return (EINVAL); 3725 } 3726 if ((addr->sa_family == AF_INET) && (addr->sa_len != sizeof(struct sockaddr_in))) { 3727 return (EINVAL); 3728 } 3729 SCTP_ASOC_CREATE_LOCK(inp); 3730 create_lock_on = 1; 3731 3732 SCTP_INP_INCR_REF(inp); 3733 if ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE) || 3734 (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE)) { 3735 /* Should I really unlock ? */ 3736 error = EFAULT; 3737 goto out_now; 3738 } 3739 #ifdef INET6 3740 if (((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) && 3741 (addr->sa_family == AF_INET6)) { 3742 error = EINVAL; 3743 goto out_now; 3744 } 3745 #endif /* INET6 */ 3746 if ((inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) == 3747 SCTP_PCB_FLAGS_UNBOUND) { 3748 /* Bind a ephemeral port */ 3749 error = sctp_inpcb_bind(so, NULL, p); 3750 if (error) { 3751 goto out_now; 3752 } 3753 } 3754 /* Now do we connect? */ 3755 if (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL) { 3756 error = EINVAL; 3757 goto out_now; 3758 } 3759 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) && 3760 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) { 3761 /* We are already connected AND the TCP model */ 3762 error = EADDRINUSE; 3763 goto out_now; 3764 } 3765 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) { 3766 SCTP_INP_RLOCK(inp); 3767 stcb = LIST_FIRST(&inp->sctp_asoc_list); 3768 SCTP_INP_RUNLOCK(inp); 3769 } else { 3770 /* 3771 * We increment here since sctp_findassociation_ep_addr() 3772 * wil do a decrement if it finds the stcb as long as the 3773 * locked tcb (last argument) is NOT a TCB.. aka NULL. 3774 */ 3775 SCTP_INP_INCR_REF(inp); 3776 stcb = sctp_findassociation_ep_addr(&inp, addr, NULL, NULL, NULL); 3777 if (stcb == NULL) { 3778 SCTP_INP_DECR_REF(inp); 3779 } else { 3780 SCTP_TCB_LOCK(stcb); 3781 } 3782 } 3783 if (stcb != NULL) { 3784 /* Already have or am bring up an association */ 3785 error = EALREADY; 3786 goto out_now; 3787 } 3788 vrf_id = inp->def_vrf_id; 3789 /* We are GOOD to go */ 3790 stcb = sctp_aloc_assoc(inp, addr, 1, &error, 0, vrf_id); 3791 if (stcb == NULL) { 3792 /* Gak! no memory */ 3793 goto out_now; 3794 } 3795 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) { 3796 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED; 3797 /* Set the connected flag so we can queue data */ 3798 soisconnecting(so); 3799 } 3800 stcb->asoc.state = SCTP_STATE_COOKIE_WAIT; 3801 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered); 3802 3803 /* initialize authentication parameters for the assoc */ 3804 sctp_initialize_auth_params(inp, stcb); 3805 3806 sctp_send_initiate(inp, stcb); 3807 SCTP_TCB_UNLOCK(stcb); 3808 out_now: 3809 if (create_lock_on) { 3810 SCTP_ASOC_CREATE_UNLOCK(inp); 3811 } 3812 SCTP_INP_DECR_REF(inp); 3813 return error; 3814 } 3815 3816 int 3817 sctp_listen(struct socket *so, int backlog, struct thread *p) 3818 { 3819 /* 3820 * Note this module depends on the protocol processing being called 3821 * AFTER any socket level flags and backlog are applied to the 3822 * socket. The traditional way that the socket flags are applied is 3823 * AFTER protocol processing. We have made a change to the 3824 * sys/kern/uipc_socket.c module to reverse this but this MUST be in 3825 * place if the socket API for SCTP is to work properly. 3826 */ 3827 3828 int error = 0; 3829 struct sctp_inpcb *inp; 3830 3831 inp = (struct sctp_inpcb *)so->so_pcb; 3832 if (inp == 0) { 3833 /* I made the same as TCP since we are not setup? */ 3834 return (ECONNRESET); 3835 } 3836 SCTP_INP_RLOCK(inp); 3837 #ifdef SCTP_LOCK_LOGGING 3838 sctp_log_lock(inp, (struct sctp_tcb *)NULL, SCTP_LOG_LOCK_SOCK); 3839 #endif 3840 SOCK_LOCK(so); 3841 error = solisten_proto_check(so); 3842 if (error) { 3843 SOCK_UNLOCK(so); 3844 SCTP_INP_RUNLOCK(inp); 3845 return (error); 3846 } 3847 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) && 3848 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) { 3849 /* We are already connected AND the TCP model */ 3850 SCTP_INP_RUNLOCK(inp); 3851 SOCK_UNLOCK(so); 3852 return (EADDRINUSE); 3853 } 3854 if (inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) { 3855 /* We must do a bind. */ 3856 SOCK_UNLOCK(so); 3857 SCTP_INP_RUNLOCK(inp); 3858 if ((error = sctp_inpcb_bind(so, NULL, p))) { 3859 /* bind error, probably perm */ 3860 return (error); 3861 } 3862 SOCK_LOCK(so); 3863 } else { 3864 SCTP_INP_RUNLOCK(inp); 3865 } 3866 /* It appears for 7.0 and on, we must always call this. */ 3867 solisten_proto(so, backlog); 3868 if (inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) { 3869 /* remove the ACCEPTCONN flag for one-to-many sockets */ 3870 so->so_options &= ~SO_ACCEPTCONN; 3871 } 3872 if (backlog == 0) { 3873 /* turning off listen */ 3874 so->so_options &= ~SO_ACCEPTCONN; 3875 } 3876 SOCK_UNLOCK(so); 3877 return (error); 3878 } 3879 3880 static int sctp_defered_wakeup_cnt = 0; 3881 3882 int 3883 sctp_accept(struct socket *so, struct sockaddr **addr) 3884 { 3885 struct sctp_tcb *stcb; 3886 struct sctp_inpcb *inp; 3887 union sctp_sockstore store; 3888 3889 int error; 3890 3891 inp = (struct sctp_inpcb *)so->so_pcb; 3892 3893 if (inp == 0) { 3894 return (ECONNRESET); 3895 } 3896 SCTP_INP_RLOCK(inp); 3897 if (inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) { 3898 SCTP_INP_RUNLOCK(inp); 3899 return (ENOTSUP); 3900 } 3901 if (so->so_state & SS_ISDISCONNECTED) { 3902 SCTP_INP_RUNLOCK(inp); 3903 return (ECONNABORTED); 3904 } 3905 stcb = LIST_FIRST(&inp->sctp_asoc_list); 3906 if (stcb == NULL) { 3907 SCTP_INP_RUNLOCK(inp); 3908 return (ECONNRESET); 3909 } 3910 SCTP_TCB_LOCK(stcb); 3911 SCTP_INP_RUNLOCK(inp); 3912 store = stcb->asoc.primary_destination->ro._l_addr; 3913 SCTP_TCB_UNLOCK(stcb); 3914 if (store.sa.sa_family == AF_INET) { 3915 struct sockaddr_in *sin; 3916 3917 SCTP_MALLOC_SONAME(sin, struct sockaddr_in *, sizeof *sin); 3918 sin->sin_family = AF_INET; 3919 sin->sin_len = sizeof(*sin); 3920 sin->sin_port = ((struct sockaddr_in *)&store)->sin_port; 3921 sin->sin_addr = ((struct sockaddr_in *)&store)->sin_addr; 3922 *addr = (struct sockaddr *)sin; 3923 } else { 3924 struct sockaddr_in6 *sin6; 3925 3926 SCTP_MALLOC_SONAME(sin6, struct sockaddr_in6 *, sizeof *sin6); 3927 sin6->sin6_family = AF_INET6; 3928 sin6->sin6_len = sizeof(*sin6); 3929 sin6->sin6_port = ((struct sockaddr_in6 *)&store)->sin6_port; 3930 3931 sin6->sin6_addr = ((struct sockaddr_in6 *)&store)->sin6_addr; 3932 if ((error = sa6_recoverscope(sin6)) != 0) { 3933 SCTP_FREE_SONAME(sin6); 3934 return (error); 3935 } 3936 *addr = (struct sockaddr *)sin6; 3937 } 3938 /* Wake any delayed sleep action */ 3939 if (inp->sctp_flags & SCTP_PCB_FLAGS_DONT_WAKE) { 3940 SCTP_INP_WLOCK(inp); 3941 inp->sctp_flags &= ~SCTP_PCB_FLAGS_DONT_WAKE; 3942 if (inp->sctp_flags & SCTP_PCB_FLAGS_WAKEOUTPUT) { 3943 inp->sctp_flags &= ~SCTP_PCB_FLAGS_WAKEOUTPUT; 3944 SCTP_INP_WUNLOCK(inp); 3945 SOCKBUF_LOCK(&inp->sctp_socket->so_snd); 3946 if (sowriteable(inp->sctp_socket)) { 3947 sowwakeup_locked(inp->sctp_socket); 3948 } else { 3949 SOCKBUF_UNLOCK(&inp->sctp_socket->so_snd); 3950 } 3951 SCTP_INP_WLOCK(inp); 3952 } 3953 if (inp->sctp_flags & SCTP_PCB_FLAGS_WAKEINPUT) { 3954 inp->sctp_flags &= ~SCTP_PCB_FLAGS_WAKEINPUT; 3955 SCTP_INP_WUNLOCK(inp); 3956 SOCKBUF_LOCK(&inp->sctp_socket->so_rcv); 3957 if (soreadable(inp->sctp_socket)) { 3958 sctp_defered_wakeup_cnt++; 3959 sorwakeup_locked(inp->sctp_socket); 3960 } else { 3961 SOCKBUF_UNLOCK(&inp->sctp_socket->so_rcv); 3962 } 3963 SCTP_INP_WLOCK(inp); 3964 } 3965 SCTP_INP_WUNLOCK(inp); 3966 } 3967 return (0); 3968 } 3969 3970 int 3971 sctp_ingetaddr(struct socket *so, struct sockaddr **addr) 3972 { 3973 struct sockaddr_in *sin; 3974 uint32_t vrf_id; 3975 struct sctp_inpcb *inp; 3976 struct sctp_ifa *sctp_ifa; 3977 3978 /* 3979 * Do the malloc first in case it blocks. 3980 */ 3981 SCTP_MALLOC_SONAME(sin, struct sockaddr_in *, sizeof *sin); 3982 sin->sin_family = AF_INET; 3983 sin->sin_len = sizeof(*sin); 3984 inp = (struct sctp_inpcb *)so->so_pcb; 3985 if (!inp) { 3986 SCTP_FREE_SONAME(sin); 3987 return ECONNRESET; 3988 } 3989 SCTP_INP_RLOCK(inp); 3990 sin->sin_port = inp->sctp_lport; 3991 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 3992 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) { 3993 struct sctp_tcb *stcb; 3994 struct sockaddr_in *sin_a; 3995 struct sctp_nets *net; 3996 int fnd; 3997 3998 stcb = LIST_FIRST(&inp->sctp_asoc_list); 3999 if (stcb == NULL) { 4000 goto notConn; 4001 } 4002 fnd = 0; 4003 sin_a = NULL; 4004 SCTP_TCB_LOCK(stcb); 4005 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 4006 sin_a = (struct sockaddr_in *)&net->ro._l_addr; 4007 if (sin_a == NULL) 4008 /* this will make coverity happy */ 4009 continue; 4010 4011 if (sin_a->sin_family == AF_INET) { 4012 fnd = 1; 4013 break; 4014 } 4015 } 4016 if ((!fnd) || (sin_a == NULL)) { 4017 /* punt */ 4018 SCTP_TCB_UNLOCK(stcb); 4019 goto notConn; 4020 } 4021 vrf_id = inp->def_vrf_id; 4022 sctp_ifa = sctp_source_address_selection(inp, 4023 stcb, 4024 (sctp_route_t *) & net->ro, 4025 net, 0, vrf_id); 4026 if (sctp_ifa) { 4027 sin->sin_addr = sctp_ifa->address.sin.sin_addr; 4028 sctp_free_ifa(sctp_ifa); 4029 } 4030 SCTP_TCB_UNLOCK(stcb); 4031 } else { 4032 /* For the bound all case you get back 0 */ 4033 notConn: 4034 sin->sin_addr.s_addr = 0; 4035 } 4036 4037 } else { 4038 /* Take the first IPv4 address in the list */ 4039 struct sctp_laddr *laddr; 4040 int fnd = 0; 4041 4042 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) { 4043 if (laddr->ifa->address.sa.sa_family == AF_INET) { 4044 struct sockaddr_in *sin_a; 4045 4046 sin_a = (struct sockaddr_in *)&laddr->ifa->address.sa; 4047 sin->sin_addr = sin_a->sin_addr; 4048 fnd = 1; 4049 break; 4050 } 4051 } 4052 if (!fnd) { 4053 SCTP_FREE_SONAME(sin); 4054 SCTP_INP_RUNLOCK(inp); 4055 return ENOENT; 4056 } 4057 } 4058 SCTP_INP_RUNLOCK(inp); 4059 (*addr) = (struct sockaddr *)sin; 4060 return (0); 4061 } 4062 4063 int 4064 sctp_peeraddr(struct socket *so, struct sockaddr **addr) 4065 { 4066 struct sockaddr_in *sin = (struct sockaddr_in *)*addr; 4067 int fnd; 4068 struct sockaddr_in *sin_a; 4069 struct sctp_inpcb *inp; 4070 struct sctp_tcb *stcb; 4071 struct sctp_nets *net; 4072 4073 /* Do the malloc first in case it blocks. */ 4074 inp = (struct sctp_inpcb *)so->so_pcb; 4075 if ((inp == NULL) || 4076 ((inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) == 0)) { 4077 /* UDP type and listeners will drop out here */ 4078 return (ENOTCONN); 4079 } 4080 SCTP_MALLOC_SONAME(sin, struct sockaddr_in *, sizeof *sin); 4081 sin->sin_family = AF_INET; 4082 sin->sin_len = sizeof(*sin); 4083 4084 /* We must recapture incase we blocked */ 4085 inp = (struct sctp_inpcb *)so->so_pcb; 4086 if (!inp) { 4087 SCTP_FREE_SONAME(sin); 4088 return ECONNRESET; 4089 } 4090 SCTP_INP_RLOCK(inp); 4091 stcb = LIST_FIRST(&inp->sctp_asoc_list); 4092 if (stcb) { 4093 SCTP_TCB_LOCK(stcb); 4094 } 4095 SCTP_INP_RUNLOCK(inp); 4096 if (stcb == NULL) { 4097 SCTP_FREE_SONAME(sin); 4098 return ECONNRESET; 4099 } 4100 fnd = 0; 4101 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 4102 sin_a = (struct sockaddr_in *)&net->ro._l_addr; 4103 if (sin_a->sin_family == AF_INET) { 4104 fnd = 1; 4105 sin->sin_port = stcb->rport; 4106 sin->sin_addr = sin_a->sin_addr; 4107 break; 4108 } 4109 } 4110 SCTP_TCB_UNLOCK(stcb); 4111 if (!fnd) { 4112 /* No IPv4 address */ 4113 SCTP_FREE_SONAME(sin); 4114 return ENOENT; 4115 } 4116 (*addr) = (struct sockaddr *)sin; 4117 return (0); 4118 } 4119 4120 struct pr_usrreqs sctp_usrreqs = { 4121 .pru_abort = sctp_abort, 4122 .pru_accept = sctp_accept, 4123 .pru_attach = sctp_attach, 4124 .pru_bind = sctp_bind, 4125 .pru_connect = sctp_connect, 4126 .pru_control = in_control, 4127 .pru_close = sctp_close, 4128 .pru_detach = sctp_close, 4129 .pru_sopoll = sopoll_generic, 4130 .pru_disconnect = sctp_disconnect, 4131 .pru_listen = sctp_listen, 4132 .pru_peeraddr = sctp_peeraddr, 4133 .pru_send = sctp_sendm, 4134 .pru_shutdown = sctp_shutdown, 4135 .pru_sockaddr = sctp_ingetaddr, 4136 .pru_sosend = sctp_sosend, 4137 .pru_soreceive = sctp_soreceive 4138 }; 4139