1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 2001-2008, by Cisco Systems, Inc. All rights reserved. 5 * Copyright (c) 2008-2012, by Randall Stewart. All rights reserved. 6 * Copyright (c) 2008-2012, by Michael Tuexen. All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions are met: 10 * 11 * a) Redistributions of source code must retain the above copyright notice, 12 * this list of conditions and the following disclaimer. 13 * 14 * b) Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in 16 * the documentation and/or other materials provided with the distribution. 17 * 18 * c) Neither the name of Cisco Systems, Inc. nor the names of its 19 * contributors may be used to endorse or promote products derived 20 * from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 23 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, 24 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 26 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 32 * THE POSSIBILITY OF SUCH DAMAGE. 33 */ 34 35 #include <sys/cdefs.h> 36 __FBSDID("$FreeBSD$"); 37 38 #include <netinet/sctp_os.h> 39 #include <netinet/sctp_var.h> 40 #include <netinet/sctp_sysctl.h> 41 #include <netinet/sctp_pcb.h> 42 #include <netinet/sctp_header.h> 43 #include <netinet/sctputil.h> 44 #include <netinet/sctp_output.h> 45 #include <netinet/sctp_input.h> 46 #include <netinet/sctp_auth.h> 47 #include <netinet/sctp_indata.h> 48 #include <netinet/sctp_asconf.h> 49 #include <netinet/sctp_bsd_addr.h> 50 #include <netinet/sctp_timer.h> 51 #include <netinet/sctp_crc32.h> 52 #include <netinet/sctp_kdtrace.h> 53 #if defined(INET) || defined(INET6) 54 #include <netinet/udp.h> 55 #endif 56 #include <sys/smp.h> 57 58 59 60 static void 61 sctp_stop_all_cookie_timers(struct sctp_tcb *stcb) 62 { 63 struct sctp_nets *net; 64 65 /* 66 * This now not only stops all cookie timers it also stops any INIT 67 * timers as well. This will make sure that the timers are stopped 68 * in all collision cases. 69 */ 70 SCTP_TCB_LOCK_ASSERT(stcb); 71 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 72 if (net->rxt_timer.type == SCTP_TIMER_TYPE_COOKIE) { 73 sctp_timer_stop(SCTP_TIMER_TYPE_COOKIE, 74 stcb->sctp_ep, 75 stcb, 76 net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_1); 77 } else if (net->rxt_timer.type == SCTP_TIMER_TYPE_INIT) { 78 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, 79 stcb->sctp_ep, 80 stcb, 81 net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_2); 82 } 83 } 84 } 85 86 /* INIT handler */ 87 static void 88 sctp_handle_init(struct mbuf *m, int iphlen, int offset, 89 struct sockaddr *src, struct sockaddr *dst, struct sctphdr *sh, 90 struct sctp_init_chunk *cp, struct sctp_inpcb *inp, 91 struct sctp_tcb *stcb, struct sctp_nets *net, int *abort_no_unlock, 92 uint8_t mflowtype, uint32_t mflowid, 93 uint32_t vrf_id, uint16_t port) 94 { 95 struct sctp_init *init; 96 struct mbuf *op_err; 97 98 SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_init: handling INIT tcb:%p\n", 99 (void *)stcb); 100 if (stcb == NULL) { 101 SCTP_INP_RLOCK(inp); 102 } 103 /* validate length */ 104 if (ntohs(cp->ch.chunk_length) < sizeof(struct sctp_init_chunk)) { 105 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 106 sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err, 107 mflowtype, mflowid, 108 vrf_id, port); 109 if (stcb) 110 *abort_no_unlock = 1; 111 goto outnow; 112 } 113 /* validate parameters */ 114 init = &cp->init; 115 if (init->initiate_tag == 0) { 116 /* protocol error... send abort */ 117 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 118 sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err, 119 mflowtype, mflowid, 120 vrf_id, port); 121 if (stcb) 122 *abort_no_unlock = 1; 123 goto outnow; 124 } 125 if (ntohl(init->a_rwnd) < SCTP_MIN_RWND) { 126 /* invalid parameter... send abort */ 127 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 128 sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err, 129 mflowtype, mflowid, 130 vrf_id, port); 131 if (stcb) 132 *abort_no_unlock = 1; 133 goto outnow; 134 } 135 if (init->num_inbound_streams == 0) { 136 /* protocol error... send abort */ 137 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 138 sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err, 139 mflowtype, mflowid, 140 vrf_id, port); 141 if (stcb) 142 *abort_no_unlock = 1; 143 goto outnow; 144 } 145 if (init->num_outbound_streams == 0) { 146 /* protocol error... send abort */ 147 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 148 sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err, 149 mflowtype, mflowid, 150 vrf_id, port); 151 if (stcb) 152 *abort_no_unlock = 1; 153 goto outnow; 154 } 155 if (sctp_validate_init_auth_params(m, offset + sizeof(*cp), 156 offset + ntohs(cp->ch.chunk_length))) { 157 /* auth parameter(s) error... send abort */ 158 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 159 "Problem with AUTH parameters"); 160 sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err, 161 mflowtype, mflowid, 162 vrf_id, port); 163 if (stcb) 164 *abort_no_unlock = 1; 165 goto outnow; 166 } 167 /* We are only accepting if we have a listening socket. */ 168 if ((stcb == NULL) && 169 ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) || 170 (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE) || 171 (!SCTP_IS_LISTENING(inp)))) { 172 /* 173 * FIX ME ?? What about TCP model and we have a 174 * match/restart case? Actually no fix is needed. the lookup 175 * will always find the existing assoc so stcb would not be 176 * NULL. It may be questionable to do this since we COULD 177 * just send back the INIT-ACK and hope that the app did 178 * accept()'s by the time the COOKIE was sent. But there is 179 * a price to pay for COOKIE generation and I don't want to 180 * pay it on the chance that the app will actually do some 181 * accepts(). The App just looses and should NOT be in this 182 * state :-) 183 */ 184 if (SCTP_BASE_SYSCTL(sctp_blackhole) == 0) { 185 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 186 "No listener"); 187 sctp_send_abort(m, iphlen, src, dst, sh, 0, op_err, 188 mflowtype, mflowid, inp->fibnum, 189 vrf_id, port); 190 } 191 goto outnow; 192 } 193 if ((stcb != NULL) && 194 (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_ACK_SENT)) { 195 SCTPDBG(SCTP_DEBUG_INPUT3, "sctp_handle_init: sending SHUTDOWN-ACK\n"); 196 sctp_send_shutdown_ack(stcb, NULL); 197 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_CONTROL_PROC, SCTP_SO_NOT_LOCKED); 198 } else { 199 SCTPDBG(SCTP_DEBUG_INPUT3, "sctp_handle_init: sending INIT-ACK\n"); 200 sctp_send_initiate_ack(inp, stcb, net, m, iphlen, offset, 201 src, dst, sh, cp, 202 mflowtype, mflowid, 203 vrf_id, port); 204 } 205 outnow: 206 if (stcb == NULL) { 207 SCTP_INP_RUNLOCK(inp); 208 } 209 } 210 211 /* 212 * process peer "INIT/INIT-ACK" chunk returns value < 0 on error 213 */ 214 215 int 216 sctp_is_there_unsent_data(struct sctp_tcb *stcb, int so_locked 217 #if !defined(__APPLE__) && !defined(SCTP_SO_LOCK_TESTING) 218 SCTP_UNUSED 219 #endif 220 ) 221 { 222 int unsent_data; 223 unsigned int i; 224 struct sctp_stream_queue_pending *sp; 225 struct sctp_association *asoc; 226 227 /* 228 * This function returns if any stream has true unsent data on it. 229 * Note that as it looks through it will clean up any places that 230 * have old data that has been sent but left at top of stream queue. 231 */ 232 asoc = &stcb->asoc; 233 unsent_data = 0; 234 SCTP_TCB_SEND_LOCK(stcb); 235 if (!stcb->asoc.ss_functions.sctp_ss_is_empty(stcb, asoc)) { 236 /* Check to see if some data queued */ 237 for (i = 0; i < stcb->asoc.streamoutcnt; i++) { 238 /* sa_ignore FREED_MEMORY */ 239 sp = TAILQ_FIRST(&stcb->asoc.strmout[i].outqueue); 240 if (sp == NULL) { 241 continue; 242 } 243 if ((sp->msg_is_complete) && 244 (sp->length == 0) && 245 (sp->sender_all_done)) { 246 /* 247 * We are doing differed cleanup. Last time 248 * through when we took all the data the 249 * sender_all_done was not set. 250 */ 251 if (sp->put_last_out == 0) { 252 SCTP_PRINTF("Gak, put out entire msg with NO end!-1\n"); 253 SCTP_PRINTF("sender_done:%d len:%d msg_comp:%d put_last_out:%d\n", 254 sp->sender_all_done, 255 sp->length, 256 sp->msg_is_complete, 257 sp->put_last_out); 258 } 259 atomic_subtract_int(&stcb->asoc.stream_queue_cnt, 1); 260 TAILQ_REMOVE(&stcb->asoc.strmout[i].outqueue, sp, next); 261 stcb->asoc.ss_functions.sctp_ss_remove_from_stream(stcb, asoc, &asoc->strmout[i], sp, 1); 262 if (sp->net) { 263 sctp_free_remote_addr(sp->net); 264 sp->net = NULL; 265 } 266 if (sp->data) { 267 sctp_m_freem(sp->data); 268 sp->data = NULL; 269 } 270 sctp_free_a_strmoq(stcb, sp, so_locked); 271 if (!TAILQ_EMPTY(&stcb->asoc.strmout[i].outqueue)) { 272 unsent_data++; 273 } 274 } else { 275 unsent_data++; 276 } 277 if (unsent_data > 0) { 278 break; 279 } 280 } 281 } 282 SCTP_TCB_SEND_UNLOCK(stcb); 283 return (unsent_data); 284 } 285 286 static int 287 sctp_process_init(struct sctp_init_chunk *cp, struct sctp_tcb *stcb) 288 { 289 struct sctp_init *init; 290 struct sctp_association *asoc; 291 struct sctp_nets *lnet; 292 unsigned int i; 293 294 init = &cp->init; 295 asoc = &stcb->asoc; 296 /* save off parameters */ 297 asoc->peer_vtag = ntohl(init->initiate_tag); 298 asoc->peers_rwnd = ntohl(init->a_rwnd); 299 /* init tsn's */ 300 asoc->highest_tsn_inside_map = asoc->asconf_seq_in = ntohl(init->initial_tsn) - 1; 301 302 if (!TAILQ_EMPTY(&asoc->nets)) { 303 /* update any ssthresh's that may have a default */ 304 TAILQ_FOREACH(lnet, &asoc->nets, sctp_next) { 305 lnet->ssthresh = asoc->peers_rwnd; 306 if (SCTP_BASE_SYSCTL(sctp_logging_level) & (SCTP_CWND_MONITOR_ENABLE | SCTP_CWND_LOGGING_ENABLE)) { 307 sctp_log_cwnd(stcb, lnet, 0, SCTP_CWND_INITIALIZATION); 308 } 309 310 } 311 } 312 SCTP_TCB_SEND_LOCK(stcb); 313 if (asoc->pre_open_streams > ntohs(init->num_inbound_streams)) { 314 unsigned int newcnt; 315 struct sctp_stream_out *outs; 316 struct sctp_stream_queue_pending *sp, *nsp; 317 struct sctp_tmit_chunk *chk, *nchk; 318 319 /* abandon the upper streams */ 320 newcnt = ntohs(init->num_inbound_streams); 321 TAILQ_FOREACH_SAFE(chk, &asoc->send_queue, sctp_next, nchk) { 322 if (chk->rec.data.sid >= newcnt) { 323 TAILQ_REMOVE(&asoc->send_queue, chk, sctp_next); 324 asoc->send_queue_cnt--; 325 if (asoc->strmout[chk->rec.data.sid].chunks_on_queues > 0) { 326 asoc->strmout[chk->rec.data.sid].chunks_on_queues--; 327 #ifdef INVARIANTS 328 } else { 329 panic("No chunks on the queues for sid %u.", chk->rec.data.sid); 330 #endif 331 } 332 if (chk->data != NULL) { 333 sctp_free_bufspace(stcb, asoc, chk, 1); 334 sctp_ulp_notify(SCTP_NOTIFY_UNSENT_DG_FAIL, stcb, 335 0, chk, SCTP_SO_NOT_LOCKED); 336 if (chk->data) { 337 sctp_m_freem(chk->data); 338 chk->data = NULL; 339 } 340 } 341 sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED); 342 /* sa_ignore FREED_MEMORY */ 343 } 344 } 345 if (asoc->strmout) { 346 for (i = newcnt; i < asoc->pre_open_streams; i++) { 347 outs = &asoc->strmout[i]; 348 TAILQ_FOREACH_SAFE(sp, &outs->outqueue, next, nsp) { 349 atomic_subtract_int(&stcb->asoc.stream_queue_cnt, 1); 350 TAILQ_REMOVE(&outs->outqueue, sp, next); 351 stcb->asoc.ss_functions.sctp_ss_remove_from_stream(stcb, asoc, outs, sp, 1); 352 sctp_ulp_notify(SCTP_NOTIFY_SPECIAL_SP_FAIL, 353 stcb, 0, sp, SCTP_SO_NOT_LOCKED); 354 if (sp->data) { 355 sctp_m_freem(sp->data); 356 sp->data = NULL; 357 } 358 if (sp->net) { 359 sctp_free_remote_addr(sp->net); 360 sp->net = NULL; 361 } 362 /* Free the chunk */ 363 sctp_free_a_strmoq(stcb, sp, SCTP_SO_NOT_LOCKED); 364 /* sa_ignore FREED_MEMORY */ 365 } 366 outs->state = SCTP_STREAM_CLOSED; 367 } 368 } 369 /* cut back the count */ 370 asoc->pre_open_streams = newcnt; 371 } 372 SCTP_TCB_SEND_UNLOCK(stcb); 373 asoc->streamoutcnt = asoc->pre_open_streams; 374 if (asoc->strmout) { 375 for (i = 0; i < asoc->streamoutcnt; i++) { 376 asoc->strmout[i].state = SCTP_STREAM_OPEN; 377 } 378 } 379 /* EY - nr_sack: initialize highest tsn in nr_mapping_array */ 380 asoc->highest_tsn_inside_nr_map = asoc->highest_tsn_inside_map; 381 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MAP_LOGGING_ENABLE) { 382 sctp_log_map(0, 5, asoc->highest_tsn_inside_map, SCTP_MAP_SLIDE_RESULT); 383 } 384 /* This is the next one we expect */ 385 asoc->str_reset_seq_in = asoc->asconf_seq_in + 1; 386 387 asoc->mapping_array_base_tsn = ntohl(init->initial_tsn); 388 asoc->tsn_last_delivered = asoc->cumulative_tsn = asoc->asconf_seq_in; 389 390 asoc->advanced_peer_ack_point = asoc->last_acked_seq; 391 /* open the requested streams */ 392 393 if (asoc->strmin != NULL) { 394 /* Free the old ones */ 395 for (i = 0; i < asoc->streamincnt; i++) { 396 sctp_clean_up_stream(stcb, &asoc->strmin[i].inqueue); 397 sctp_clean_up_stream(stcb, &asoc->strmin[i].uno_inqueue); 398 } 399 SCTP_FREE(asoc->strmin, SCTP_M_STRMI); 400 } 401 if (asoc->max_inbound_streams > ntohs(init->num_outbound_streams)) { 402 asoc->streamincnt = ntohs(init->num_outbound_streams); 403 } else { 404 asoc->streamincnt = asoc->max_inbound_streams; 405 } 406 SCTP_MALLOC(asoc->strmin, struct sctp_stream_in *, asoc->streamincnt * 407 sizeof(struct sctp_stream_in), SCTP_M_STRMI); 408 if (asoc->strmin == NULL) { 409 /* we didn't get memory for the streams! */ 410 SCTPDBG(SCTP_DEBUG_INPUT2, "process_init: couldn't get memory for the streams!\n"); 411 return (-1); 412 } 413 for (i = 0; i < asoc->streamincnt; i++) { 414 asoc->strmin[i].sid = i; 415 asoc->strmin[i].last_mid_delivered = 0xffffffff; 416 TAILQ_INIT(&asoc->strmin[i].inqueue); 417 TAILQ_INIT(&asoc->strmin[i].uno_inqueue); 418 asoc->strmin[i].pd_api_started = 0; 419 asoc->strmin[i].delivery_started = 0; 420 } 421 /* 422 * load_address_from_init will put the addresses into the 423 * association when the COOKIE is processed or the INIT-ACK is 424 * processed. Both types of COOKIE's existing and new call this 425 * routine. It will remove addresses that are no longer in the 426 * association (for the restarting case where addresses are 427 * removed). Up front when the INIT arrives we will discard it if it 428 * is a restart and new addresses have been added. 429 */ 430 /* sa_ignore MEMLEAK */ 431 return (0); 432 } 433 434 /* 435 * INIT-ACK message processing/consumption returns value < 0 on error 436 */ 437 static int 438 sctp_process_init_ack(struct mbuf *m, int iphlen, int offset, 439 struct sockaddr *src, struct sockaddr *dst, struct sctphdr *sh, 440 struct sctp_init_ack_chunk *cp, struct sctp_tcb *stcb, 441 struct sctp_nets *net, int *abort_no_unlock, 442 uint8_t mflowtype, uint32_t mflowid, 443 uint32_t vrf_id) 444 { 445 struct sctp_association *asoc; 446 struct mbuf *op_err; 447 int retval, abort_flag, cookie_found; 448 int initack_limit; 449 int nat_friendly = 0; 450 451 /* First verify that we have no illegal param's */ 452 abort_flag = 0; 453 cookie_found = 0; 454 455 op_err = sctp_arethere_unrecognized_parameters(m, 456 (offset + sizeof(struct sctp_init_chunk)), 457 &abort_flag, (struct sctp_chunkhdr *)cp, 458 &nat_friendly, &cookie_found); 459 if (abort_flag) { 460 /* Send an abort and notify peer */ 461 sctp_abort_an_association(stcb->sctp_ep, stcb, op_err, SCTP_SO_NOT_LOCKED); 462 *abort_no_unlock = 1; 463 return (-1); 464 } 465 if (!cookie_found) { 466 uint16_t len; 467 468 /* Only report the missing cookie parameter */ 469 if (op_err != NULL) { 470 sctp_m_freem(op_err); 471 } 472 len = (uint16_t)(sizeof(struct sctp_error_missing_param) + sizeof(uint16_t)); 473 /* We abort with an error of missing mandatory param */ 474 op_err = sctp_get_mbuf_for_msg(len, 0, M_NOWAIT, 1, MT_DATA); 475 if (op_err != NULL) { 476 struct sctp_error_missing_param *cause; 477 478 SCTP_BUF_LEN(op_err) = len; 479 cause = mtod(op_err, struct sctp_error_missing_param *); 480 /* Subtract the reserved param */ 481 cause->cause.code = htons(SCTP_CAUSE_MISSING_PARAM); 482 cause->cause.length = htons(len); 483 cause->num_missing_params = htonl(1); 484 cause->type[0] = htons(SCTP_STATE_COOKIE); 485 } 486 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 487 src, dst, sh, op_err, 488 mflowtype, mflowid, 489 vrf_id, net->port); 490 *abort_no_unlock = 1; 491 return (-3); 492 } 493 asoc = &stcb->asoc; 494 asoc->peer_supports_nat = (uint8_t)nat_friendly; 495 /* process the peer's parameters in the INIT-ACK */ 496 retval = sctp_process_init((struct sctp_init_chunk *)cp, stcb); 497 if (retval < 0) { 498 if (op_err != NULL) { 499 sctp_m_freem(op_err); 500 } 501 return (retval); 502 } 503 initack_limit = offset + ntohs(cp->ch.chunk_length); 504 /* load all addresses */ 505 if ((retval = sctp_load_addresses_from_init(stcb, m, 506 (offset + sizeof(struct sctp_init_chunk)), initack_limit, 507 src, dst, NULL, stcb->asoc.port))) { 508 if (op_err != NULL) { 509 sctp_m_freem(op_err); 510 } 511 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 512 "Problem with address parameters"); 513 SCTPDBG(SCTP_DEBUG_INPUT1, 514 "Load addresses from INIT causes an abort %d\n", 515 retval); 516 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 517 src, dst, sh, op_err, 518 mflowtype, mflowid, 519 vrf_id, net->port); 520 *abort_no_unlock = 1; 521 return (-1); 522 } 523 /* if the peer doesn't support asconf, flush the asconf queue */ 524 if (asoc->asconf_supported == 0) { 525 struct sctp_asconf_addr *param, *nparam; 526 527 TAILQ_FOREACH_SAFE(param, &asoc->asconf_queue, next, nparam) { 528 TAILQ_REMOVE(&asoc->asconf_queue, param, next); 529 SCTP_FREE(param, SCTP_M_ASC_ADDR); 530 } 531 } 532 533 stcb->asoc.peer_hmac_id = sctp_negotiate_hmacid(stcb->asoc.peer_hmacs, 534 stcb->asoc.local_hmacs); 535 if (op_err) { 536 sctp_queue_op_err(stcb, op_err); 537 /* queuing will steal away the mbuf chain to the out queue */ 538 op_err = NULL; 539 } 540 /* extract the cookie and queue it to "echo" it back... */ 541 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) { 542 sctp_misc_ints(SCTP_THRESHOLD_CLEAR, 543 stcb->asoc.overall_error_count, 544 0, 545 SCTP_FROM_SCTP_INPUT, 546 __LINE__); 547 } 548 stcb->asoc.overall_error_count = 0; 549 net->error_count = 0; 550 551 /* 552 * Cancel the INIT timer, We do this first before queueing the 553 * cookie. We always cancel at the primary to assue that we are 554 * canceling the timer started by the INIT which always goes to the 555 * primary. 556 */ 557 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, stcb->sctp_ep, stcb, 558 asoc->primary_destination, SCTP_FROM_SCTP_INPUT + SCTP_LOC_3); 559 560 /* calculate the RTO */ 561 sctp_calculate_rto(stcb, asoc, net, &asoc->time_entered, 562 SCTP_RTT_FROM_NON_DATA); 563 retval = sctp_send_cookie_echo(m, offset, initack_limit, stcb, net); 564 return (retval); 565 } 566 567 static void 568 sctp_handle_heartbeat_ack(struct sctp_heartbeat_chunk *cp, 569 struct sctp_tcb *stcb, struct sctp_nets *net) 570 { 571 union sctp_sockstore store; 572 struct sctp_nets *r_net, *f_net; 573 struct timeval tv; 574 int req_prim = 0; 575 uint16_t old_error_counter; 576 577 if (ntohs(cp->ch.chunk_length) != sizeof(struct sctp_heartbeat_chunk)) { 578 /* Invalid length */ 579 return; 580 } 581 582 memset(&store, 0, sizeof(store)); 583 switch (cp->heartbeat.hb_info.addr_family) { 584 #ifdef INET 585 case AF_INET: 586 if (cp->heartbeat.hb_info.addr_len == sizeof(struct sockaddr_in)) { 587 store.sin.sin_family = cp->heartbeat.hb_info.addr_family; 588 store.sin.sin_len = cp->heartbeat.hb_info.addr_len; 589 store.sin.sin_port = stcb->rport; 590 memcpy(&store.sin.sin_addr, cp->heartbeat.hb_info.address, 591 sizeof(store.sin.sin_addr)); 592 } else { 593 return; 594 } 595 break; 596 #endif 597 #ifdef INET6 598 case AF_INET6: 599 if (cp->heartbeat.hb_info.addr_len == sizeof(struct sockaddr_in6)) { 600 store.sin6.sin6_family = cp->heartbeat.hb_info.addr_family; 601 store.sin6.sin6_len = cp->heartbeat.hb_info.addr_len; 602 store.sin6.sin6_port = stcb->rport; 603 memcpy(&store.sin6.sin6_addr, cp->heartbeat.hb_info.address, sizeof(struct in6_addr)); 604 } else { 605 return; 606 } 607 break; 608 #endif 609 default: 610 return; 611 } 612 r_net = sctp_findnet(stcb, &store.sa); 613 if (r_net == NULL) { 614 SCTPDBG(SCTP_DEBUG_INPUT1, "Huh? I can't find the address I sent it to, discard\n"); 615 return; 616 } 617 if ((r_net && (r_net->dest_state & SCTP_ADDR_UNCONFIRMED)) && 618 (r_net->heartbeat_random1 == cp->heartbeat.hb_info.random_value1) && 619 (r_net->heartbeat_random2 == cp->heartbeat.hb_info.random_value2)) { 620 /* 621 * If the its a HB and it's random value is correct when can 622 * confirm the destination. 623 */ 624 r_net->dest_state &= ~SCTP_ADDR_UNCONFIRMED; 625 if (r_net->dest_state & SCTP_ADDR_REQ_PRIMARY) { 626 stcb->asoc.primary_destination = r_net; 627 r_net->dest_state &= ~SCTP_ADDR_REQ_PRIMARY; 628 f_net = TAILQ_FIRST(&stcb->asoc.nets); 629 if (f_net != r_net) { 630 /* 631 * first one on the list is NOT the primary 632 * sctp_cmpaddr() is much more efficient if 633 * the primary is the first on the list, 634 * make it so. 635 */ 636 TAILQ_REMOVE(&stcb->asoc.nets, r_net, sctp_next); 637 TAILQ_INSERT_HEAD(&stcb->asoc.nets, r_net, sctp_next); 638 } 639 req_prim = 1; 640 } 641 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED, 642 stcb, 0, (void *)r_net, SCTP_SO_NOT_LOCKED); 643 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, 644 r_net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_4); 645 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, r_net); 646 } 647 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) { 648 sctp_misc_ints(SCTP_THRESHOLD_CLEAR, 649 stcb->asoc.overall_error_count, 650 0, 651 SCTP_FROM_SCTP_INPUT, 652 __LINE__); 653 } 654 stcb->asoc.overall_error_count = 0; 655 old_error_counter = r_net->error_count; 656 r_net->error_count = 0; 657 r_net->hb_responded = 1; 658 tv.tv_sec = cp->heartbeat.hb_info.time_value_1; 659 tv.tv_usec = cp->heartbeat.hb_info.time_value_2; 660 /* Now lets do a RTO with this */ 661 sctp_calculate_rto(stcb, &stcb->asoc, r_net, &tv, 662 SCTP_RTT_FROM_NON_DATA); 663 if (!(r_net->dest_state & SCTP_ADDR_REACHABLE)) { 664 r_net->dest_state |= SCTP_ADDR_REACHABLE; 665 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_UP, stcb, 666 0, (void *)r_net, SCTP_SO_NOT_LOCKED); 667 } 668 if (r_net->dest_state & SCTP_ADDR_PF) { 669 r_net->dest_state &= ~SCTP_ADDR_PF; 670 stcb->asoc.cc_functions.sctp_cwnd_update_exit_pf(stcb, net); 671 } 672 if (old_error_counter > 0) { 673 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, 674 stcb, r_net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_5); 675 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, r_net); 676 } 677 if (r_net == stcb->asoc.primary_destination) { 678 if (stcb->asoc.alternate) { 679 /* release the alternate, primary is good */ 680 sctp_free_remote_addr(stcb->asoc.alternate); 681 stcb->asoc.alternate = NULL; 682 } 683 } 684 /* Mobility adaptation */ 685 if (req_prim) { 686 if ((sctp_is_mobility_feature_on(stcb->sctp_ep, 687 SCTP_MOBILITY_BASE) || 688 sctp_is_mobility_feature_on(stcb->sctp_ep, 689 SCTP_MOBILITY_FASTHANDOFF)) && 690 sctp_is_mobility_feature_on(stcb->sctp_ep, 691 SCTP_MOBILITY_PRIM_DELETED)) { 692 693 sctp_timer_stop(SCTP_TIMER_TYPE_PRIM_DELETED, 694 stcb->sctp_ep, stcb, NULL, 695 SCTP_FROM_SCTP_INPUT + SCTP_LOC_6); 696 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 697 SCTP_MOBILITY_FASTHANDOFF)) { 698 sctp_assoc_immediate_retrans(stcb, 699 stcb->asoc.primary_destination); 700 } 701 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 702 SCTP_MOBILITY_BASE)) { 703 sctp_move_chunks_from_net(stcb, 704 stcb->asoc.deleted_primary); 705 } 706 sctp_delete_prim_timer(stcb->sctp_ep, stcb, 707 stcb->asoc.deleted_primary); 708 } 709 } 710 } 711 712 static int 713 sctp_handle_nat_colliding_state(struct sctp_tcb *stcb) 714 { 715 /* 716 * Return 0 means we want you to proceed with the abort non-zero 717 * means no abort processing. 718 */ 719 uint32_t new_vtag; 720 struct sctpasochead *head; 721 722 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_WAIT) || 723 (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED)) { 724 new_vtag = sctp_select_a_tag(stcb->sctp_ep, stcb->sctp_ep->sctp_lport, stcb->rport, 1); 725 atomic_add_int(&stcb->asoc.refcnt, 1); 726 SCTP_TCB_UNLOCK(stcb); 727 SCTP_INP_INFO_WLOCK(); 728 SCTP_TCB_LOCK(stcb); 729 atomic_subtract_int(&stcb->asoc.refcnt, 1); 730 } else { 731 return (0); 732 } 733 if (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_WAIT) { 734 /* generate a new vtag and send init */ 735 LIST_REMOVE(stcb, sctp_asocs); 736 stcb->asoc.my_vtag = new_vtag; 737 head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(stcb->asoc.my_vtag, SCTP_BASE_INFO(hashasocmark))]; 738 /* 739 * put it in the bucket in the vtag hash of assoc's for the 740 * system 741 */ 742 LIST_INSERT_HEAD(head, stcb, sctp_asocs); 743 SCTP_INP_INFO_WUNLOCK(); 744 sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED); 745 return (1); 746 } else { 747 /* 748 * treat like a case where the cookie expired i.e.: - dump 749 * current cookie. - generate a new vtag. - resend init. 750 */ 751 /* generate a new vtag and send init */ 752 LIST_REMOVE(stcb, sctp_asocs); 753 SCTP_SET_STATE(stcb, SCTP_STATE_COOKIE_WAIT); 754 sctp_stop_all_cookie_timers(stcb); 755 sctp_toss_old_cookies(stcb, &stcb->asoc); 756 stcb->asoc.my_vtag = new_vtag; 757 head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(stcb->asoc.my_vtag, SCTP_BASE_INFO(hashasocmark))]; 758 /* 759 * put it in the bucket in the vtag hash of assoc's for the 760 * system 761 */ 762 LIST_INSERT_HEAD(head, stcb, sctp_asocs); 763 SCTP_INP_INFO_WUNLOCK(); 764 sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED); 765 return (1); 766 } 767 return (0); 768 } 769 770 static int 771 sctp_handle_nat_missing_state(struct sctp_tcb *stcb, 772 struct sctp_nets *net) 773 { 774 /* 775 * return 0 means we want you to proceed with the abort non-zero 776 * means no abort processing 777 */ 778 if (stcb->asoc.auth_supported == 0) { 779 SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_nat_missing_state: Peer does not support AUTH, cannot send an asconf\n"); 780 return (0); 781 } 782 sctp_asconf_send_nat_state_update(stcb, net); 783 return (1); 784 } 785 786 787 /* Returns 1 if the stcb was aborted, 0 otherwise */ 788 static int 789 sctp_handle_abort(struct sctp_abort_chunk *abort, 790 struct sctp_tcb *stcb, struct sctp_nets *net) 791 { 792 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 793 struct socket *so; 794 #endif 795 uint16_t len; 796 uint16_t error; 797 798 SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_abort: handling ABORT\n"); 799 if (stcb == NULL) 800 return (0); 801 802 len = ntohs(abort->ch.chunk_length); 803 if (len >= sizeof(struct sctp_chunkhdr) + sizeof(struct sctp_error_cause)) { 804 /* 805 * Need to check the cause codes for our two magic nat 806 * aborts which don't kill the assoc necessarily. 807 */ 808 struct sctp_error_cause *cause; 809 810 cause = (struct sctp_error_cause *)(abort + 1); 811 error = ntohs(cause->code); 812 if (error == SCTP_CAUSE_NAT_COLLIDING_STATE) { 813 SCTPDBG(SCTP_DEBUG_INPUT2, "Received Colliding state abort flags:%x\n", 814 abort->ch.chunk_flags); 815 if (sctp_handle_nat_colliding_state(stcb)) { 816 return (0); 817 } 818 } else if (error == SCTP_CAUSE_NAT_MISSING_STATE) { 819 SCTPDBG(SCTP_DEBUG_INPUT2, "Received missing state abort flags:%x\n", 820 abort->ch.chunk_flags); 821 if (sctp_handle_nat_missing_state(stcb, net)) { 822 return (0); 823 } 824 } 825 } else { 826 error = 0; 827 } 828 /* stop any receive timers */ 829 sctp_timer_stop(SCTP_TIMER_TYPE_RECV, stcb->sctp_ep, stcb, net, 830 SCTP_FROM_SCTP_INPUT + SCTP_LOC_7); 831 /* notify user of the abort and clean up... */ 832 sctp_abort_notification(stcb, 1, error, abort, SCTP_SO_NOT_LOCKED); 833 /* free the tcb */ 834 SCTP_STAT_INCR_COUNTER32(sctps_aborted); 835 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) || 836 (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 837 SCTP_STAT_DECR_GAUGE32(sctps_currestab); 838 } 839 #ifdef SCTP_ASOCLOG_OF_TSNS 840 sctp_print_out_track_log(stcb); 841 #endif 842 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 843 so = SCTP_INP_SO(stcb->sctp_ep); 844 atomic_add_int(&stcb->asoc.refcnt, 1); 845 SCTP_TCB_UNLOCK(stcb); 846 SCTP_SOCKET_LOCK(so, 1); 847 SCTP_TCB_LOCK(stcb); 848 atomic_subtract_int(&stcb->asoc.refcnt, 1); 849 #endif 850 SCTP_ADD_SUBSTATE(stcb, SCTP_STATE_WAS_ABORTED); 851 (void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC, 852 SCTP_FROM_SCTP_INPUT + SCTP_LOC_8); 853 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 854 SCTP_SOCKET_UNLOCK(so, 1); 855 #endif 856 SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_abort: finished\n"); 857 return (1); 858 } 859 860 static void 861 sctp_start_net_timers(struct sctp_tcb *stcb) 862 { 863 uint32_t cnt_hb_sent; 864 struct sctp_nets *net; 865 866 cnt_hb_sent = 0; 867 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 868 /* 869 * For each network start: 1) A pmtu timer. 2) A HB timer 3) 870 * If the dest in unconfirmed send a hb as well if under 871 * max_hb_burst have been sent. 872 */ 873 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, stcb->sctp_ep, stcb, net); 874 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, net); 875 if ((net->dest_state & SCTP_ADDR_UNCONFIRMED) && 876 (cnt_hb_sent < SCTP_BASE_SYSCTL(sctp_hb_maxburst))) { 877 sctp_send_hb(stcb, net, SCTP_SO_NOT_LOCKED); 878 cnt_hb_sent++; 879 } 880 } 881 if (cnt_hb_sent) { 882 sctp_chunk_output(stcb->sctp_ep, stcb, 883 SCTP_OUTPUT_FROM_COOKIE_ACK, 884 SCTP_SO_NOT_LOCKED); 885 } 886 } 887 888 889 static void 890 sctp_handle_shutdown(struct sctp_shutdown_chunk *cp, 891 struct sctp_tcb *stcb, struct sctp_nets *net, int *abort_flag) 892 { 893 struct sctp_association *asoc; 894 int some_on_streamwheel; 895 int old_state; 896 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 897 struct socket *so; 898 #endif 899 900 SCTPDBG(SCTP_DEBUG_INPUT2, 901 "sctp_handle_shutdown: handling SHUTDOWN\n"); 902 if (stcb == NULL) 903 return; 904 asoc = &stcb->asoc; 905 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_WAIT) || 906 (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED)) { 907 return; 908 } 909 if (ntohs(cp->ch.chunk_length) != sizeof(struct sctp_shutdown_chunk)) { 910 /* Shutdown NOT the expected size */ 911 return; 912 } 913 old_state = SCTP_GET_STATE(stcb); 914 sctp_update_acked(stcb, cp, abort_flag); 915 if (*abort_flag) { 916 return; 917 } 918 if (asoc->control_pdapi) { 919 /* 920 * With a normal shutdown we assume the end of last record. 921 */ 922 SCTP_INP_READ_LOCK(stcb->sctp_ep); 923 if (asoc->control_pdapi->on_strm_q) { 924 struct sctp_stream_in *strm; 925 926 strm = &asoc->strmin[asoc->control_pdapi->sinfo_stream]; 927 if (asoc->control_pdapi->on_strm_q == SCTP_ON_UNORDERED) { 928 /* Unordered */ 929 TAILQ_REMOVE(&strm->uno_inqueue, asoc->control_pdapi, next_instrm); 930 asoc->control_pdapi->on_strm_q = 0; 931 } else if (asoc->control_pdapi->on_strm_q == SCTP_ON_ORDERED) { 932 /* Ordered */ 933 TAILQ_REMOVE(&strm->inqueue, asoc->control_pdapi, next_instrm); 934 asoc->control_pdapi->on_strm_q = 0; 935 #ifdef INVARIANTS 936 } else { 937 panic("Unknown state on ctrl:%p on_strm_q:%d", 938 asoc->control_pdapi, 939 asoc->control_pdapi->on_strm_q); 940 #endif 941 } 942 } 943 asoc->control_pdapi->end_added = 1; 944 asoc->control_pdapi->pdapi_aborted = 1; 945 asoc->control_pdapi = NULL; 946 SCTP_INP_READ_UNLOCK(stcb->sctp_ep); 947 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 948 so = SCTP_INP_SO(stcb->sctp_ep); 949 atomic_add_int(&stcb->asoc.refcnt, 1); 950 SCTP_TCB_UNLOCK(stcb); 951 SCTP_SOCKET_LOCK(so, 1); 952 SCTP_TCB_LOCK(stcb); 953 atomic_subtract_int(&stcb->asoc.refcnt, 1); 954 if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) { 955 /* assoc was freed while we were unlocked */ 956 SCTP_SOCKET_UNLOCK(so, 1); 957 return; 958 } 959 #endif 960 if (stcb->sctp_socket) { 961 sctp_sorwakeup(stcb->sctp_ep, stcb->sctp_socket); 962 } 963 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 964 SCTP_SOCKET_UNLOCK(so, 1); 965 #endif 966 } 967 /* goto SHUTDOWN_RECEIVED state to block new requests */ 968 if (stcb->sctp_socket) { 969 if ((SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_RECEIVED) && 970 (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_ACK_SENT) && 971 (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_SENT)) { 972 SCTP_SET_STATE(stcb, SCTP_STATE_SHUTDOWN_RECEIVED); 973 /* 974 * notify upper layer that peer has initiated a 975 * shutdown 976 */ 977 sctp_ulp_notify(SCTP_NOTIFY_PEER_SHUTDOWN, stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 978 979 /* reset time */ 980 (void)SCTP_GETTIME_TIMEVAL(&asoc->time_entered); 981 } 982 } 983 if (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_SENT) { 984 /* 985 * stop the shutdown timer, since we WILL move to 986 * SHUTDOWN-ACK-SENT. 987 */ 988 sctp_timer_stop(SCTP_TIMER_TYPE_SHUTDOWN, stcb->sctp_ep, stcb, 989 net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_9); 990 } 991 /* Now is there unsent data on a stream somewhere? */ 992 some_on_streamwheel = sctp_is_there_unsent_data(stcb, SCTP_SO_NOT_LOCKED); 993 994 if (!TAILQ_EMPTY(&asoc->send_queue) || 995 !TAILQ_EMPTY(&asoc->sent_queue) || 996 some_on_streamwheel) { 997 /* By returning we will push more data out */ 998 return; 999 } else { 1000 /* no outstanding data to send, so move on... */ 1001 /* send SHUTDOWN-ACK */ 1002 /* move to SHUTDOWN-ACK-SENT state */ 1003 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) || 1004 (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 1005 SCTP_STAT_DECR_GAUGE32(sctps_currestab); 1006 } 1007 if (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_ACK_SENT) { 1008 SCTP_SET_STATE(stcb, SCTP_STATE_SHUTDOWN_ACK_SENT); 1009 sctp_stop_timers_for_shutdown(stcb); 1010 sctp_send_shutdown_ack(stcb, net); 1011 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNACK, 1012 stcb->sctp_ep, stcb, net); 1013 } else if (old_state == SCTP_STATE_SHUTDOWN_ACK_SENT) { 1014 sctp_send_shutdown_ack(stcb, net); 1015 } 1016 } 1017 } 1018 1019 static void 1020 sctp_handle_shutdown_ack(struct sctp_shutdown_ack_chunk *cp SCTP_UNUSED, 1021 struct sctp_tcb *stcb, 1022 struct sctp_nets *net) 1023 { 1024 struct sctp_association *asoc; 1025 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1026 struct socket *so; 1027 1028 so = SCTP_INP_SO(stcb->sctp_ep); 1029 #endif 1030 SCTPDBG(SCTP_DEBUG_INPUT2, 1031 "sctp_handle_shutdown_ack: handling SHUTDOWN ACK\n"); 1032 if (stcb == NULL) 1033 return; 1034 1035 asoc = &stcb->asoc; 1036 /* process according to association state */ 1037 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_WAIT) || 1038 (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED)) { 1039 /* unexpected SHUTDOWN-ACK... do OOTB handling... */ 1040 sctp_send_shutdown_complete(stcb, net, 1); 1041 SCTP_TCB_UNLOCK(stcb); 1042 return; 1043 } 1044 if ((SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_SENT) && 1045 (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_ACK_SENT)) { 1046 /* unexpected SHUTDOWN-ACK... so ignore... */ 1047 SCTP_TCB_UNLOCK(stcb); 1048 return; 1049 } 1050 if (asoc->control_pdapi) { 1051 /* 1052 * With a normal shutdown we assume the end of last record. 1053 */ 1054 SCTP_INP_READ_LOCK(stcb->sctp_ep); 1055 asoc->control_pdapi->end_added = 1; 1056 asoc->control_pdapi->pdapi_aborted = 1; 1057 asoc->control_pdapi = NULL; 1058 SCTP_INP_READ_UNLOCK(stcb->sctp_ep); 1059 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1060 atomic_add_int(&stcb->asoc.refcnt, 1); 1061 SCTP_TCB_UNLOCK(stcb); 1062 SCTP_SOCKET_LOCK(so, 1); 1063 SCTP_TCB_LOCK(stcb); 1064 atomic_subtract_int(&stcb->asoc.refcnt, 1); 1065 if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) { 1066 /* assoc was freed while we were unlocked */ 1067 SCTP_SOCKET_UNLOCK(so, 1); 1068 return; 1069 } 1070 #endif 1071 sctp_sorwakeup(stcb->sctp_ep, stcb->sctp_socket); 1072 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1073 SCTP_SOCKET_UNLOCK(so, 1); 1074 #endif 1075 } 1076 #ifdef INVARIANTS 1077 if (!TAILQ_EMPTY(&asoc->send_queue) || 1078 !TAILQ_EMPTY(&asoc->sent_queue) || 1079 sctp_is_there_unsent_data(stcb, SCTP_SO_NOT_LOCKED)) { 1080 panic("Queues are not empty when handling SHUTDOWN-ACK"); 1081 } 1082 #endif 1083 /* stop the timer */ 1084 sctp_timer_stop(SCTP_TIMER_TYPE_SHUTDOWN, stcb->sctp_ep, stcb, net, 1085 SCTP_FROM_SCTP_INPUT + SCTP_LOC_10); 1086 /* send SHUTDOWN-COMPLETE */ 1087 sctp_send_shutdown_complete(stcb, net, 0); 1088 /* notify upper layer protocol */ 1089 if (stcb->sctp_socket) { 1090 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) || 1091 (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) { 1092 stcb->sctp_socket->so_snd.sb_cc = 0; 1093 } 1094 sctp_ulp_notify(SCTP_NOTIFY_ASSOC_DOWN, stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 1095 } 1096 SCTP_STAT_INCR_COUNTER32(sctps_shutdown); 1097 /* free the TCB but first save off the ep */ 1098 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1099 atomic_add_int(&stcb->asoc.refcnt, 1); 1100 SCTP_TCB_UNLOCK(stcb); 1101 SCTP_SOCKET_LOCK(so, 1); 1102 SCTP_TCB_LOCK(stcb); 1103 atomic_subtract_int(&stcb->asoc.refcnt, 1); 1104 #endif 1105 (void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC, 1106 SCTP_FROM_SCTP_INPUT + SCTP_LOC_11); 1107 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1108 SCTP_SOCKET_UNLOCK(so, 1); 1109 #endif 1110 } 1111 1112 static void 1113 sctp_process_unrecog_chunk(struct sctp_tcb *stcb, uint8_t chunk_type, 1114 struct sctp_nets *net) 1115 { 1116 switch (chunk_type) { 1117 case SCTP_ASCONF_ACK: 1118 case SCTP_ASCONF: 1119 sctp_asconf_cleanup(stcb, net); 1120 break; 1121 case SCTP_IFORWARD_CUM_TSN: 1122 case SCTP_FORWARD_CUM_TSN: 1123 stcb->asoc.prsctp_supported = 0; 1124 break; 1125 default: 1126 SCTPDBG(SCTP_DEBUG_INPUT2, 1127 "Peer does not support chunk type %d (0x%x).\n", 1128 chunk_type, chunk_type); 1129 break; 1130 } 1131 } 1132 1133 /* 1134 * Skip past the param header and then we will find the param that caused the 1135 * problem. There are a number of param's in a ASCONF OR the prsctp param 1136 * these will turn of specific features. 1137 * XXX: Is this the right thing to do? 1138 */ 1139 static void 1140 sctp_process_unrecog_param(struct sctp_tcb *stcb, uint16_t parameter_type) 1141 { 1142 switch (parameter_type) { 1143 /* pr-sctp draft */ 1144 case SCTP_PRSCTP_SUPPORTED: 1145 stcb->asoc.prsctp_supported = 0; 1146 break; 1147 case SCTP_SUPPORTED_CHUNK_EXT: 1148 break; 1149 /* draft-ietf-tsvwg-addip-sctp */ 1150 case SCTP_HAS_NAT_SUPPORT: 1151 stcb->asoc.peer_supports_nat = 0; 1152 break; 1153 case SCTP_ADD_IP_ADDRESS: 1154 case SCTP_DEL_IP_ADDRESS: 1155 case SCTP_SET_PRIM_ADDR: 1156 stcb->asoc.asconf_supported = 0; 1157 break; 1158 case SCTP_SUCCESS_REPORT: 1159 case SCTP_ERROR_CAUSE_IND: 1160 SCTPDBG(SCTP_DEBUG_INPUT2, "Huh, the peer does not support success? or error cause?\n"); 1161 SCTPDBG(SCTP_DEBUG_INPUT2, 1162 "Turning off ASCONF to this strange peer\n"); 1163 stcb->asoc.asconf_supported = 0; 1164 break; 1165 default: 1166 SCTPDBG(SCTP_DEBUG_INPUT2, 1167 "Peer does not support param type %d (0x%x)??\n", 1168 parameter_type, parameter_type); 1169 break; 1170 } 1171 } 1172 1173 static int 1174 sctp_handle_error(struct sctp_chunkhdr *ch, 1175 struct sctp_tcb *stcb, struct sctp_nets *net, uint32_t limit) 1176 { 1177 struct sctp_error_cause *cause; 1178 struct sctp_association *asoc; 1179 uint32_t remaining_length, adjust; 1180 uint16_t code, cause_code, cause_length; 1181 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1182 struct socket *so; 1183 #endif 1184 1185 /* parse through all of the errors and process */ 1186 asoc = &stcb->asoc; 1187 cause = (struct sctp_error_cause *)((caddr_t)ch + 1188 sizeof(struct sctp_chunkhdr)); 1189 remaining_length = ntohs(ch->chunk_length); 1190 if (remaining_length > limit) { 1191 remaining_length = limit; 1192 } 1193 if (remaining_length >= sizeof(struct sctp_chunkhdr)) { 1194 remaining_length -= sizeof(struct sctp_chunkhdr); 1195 } else { 1196 remaining_length = 0; 1197 } 1198 code = 0; 1199 while (remaining_length >= sizeof(struct sctp_error_cause)) { 1200 /* Process an Error Cause */ 1201 cause_code = ntohs(cause->code); 1202 cause_length = ntohs(cause->length); 1203 if ((cause_length > remaining_length) || (cause_length == 0)) { 1204 /* Invalid cause length, possibly due to truncation. */ 1205 SCTPDBG(SCTP_DEBUG_INPUT1, "Bogus length in cause - bytes left: %u cause length: %u\n", 1206 remaining_length, cause_length); 1207 return (0); 1208 } 1209 if (code == 0) { 1210 /* report the first error cause */ 1211 code = cause_code; 1212 } 1213 switch (cause_code) { 1214 case SCTP_CAUSE_INVALID_STREAM: 1215 case SCTP_CAUSE_MISSING_PARAM: 1216 case SCTP_CAUSE_INVALID_PARAM: 1217 case SCTP_CAUSE_NO_USER_DATA: 1218 SCTPDBG(SCTP_DEBUG_INPUT1, "Software error we got a %u back? We have a bug :/ (or do they?)\n", 1219 cause_code); 1220 break; 1221 case SCTP_CAUSE_NAT_COLLIDING_STATE: 1222 SCTPDBG(SCTP_DEBUG_INPUT2, "Received Colliding state abort flags: %x\n", 1223 ch->chunk_flags); 1224 if (sctp_handle_nat_colliding_state(stcb)) { 1225 return (0); 1226 } 1227 break; 1228 case SCTP_CAUSE_NAT_MISSING_STATE: 1229 SCTPDBG(SCTP_DEBUG_INPUT2, "Received missing state abort flags: %x\n", 1230 ch->chunk_flags); 1231 if (sctp_handle_nat_missing_state(stcb, net)) { 1232 return (0); 1233 } 1234 break; 1235 case SCTP_CAUSE_STALE_COOKIE: 1236 /* 1237 * We only act if we have echoed a cookie and are 1238 * waiting. 1239 */ 1240 if ((cause_length >= sizeof(struct sctp_error_stale_cookie)) && 1241 (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED)) { 1242 struct sctp_error_stale_cookie *stale_cookie; 1243 1244 stale_cookie = (struct sctp_error_stale_cookie *)cause; 1245 asoc->cookie_preserve_req = ntohl(stale_cookie->stale_time); 1246 /* Double it to be more robust on RTX */ 1247 if (asoc->cookie_preserve_req <= UINT32_MAX / 2) { 1248 asoc->cookie_preserve_req *= 2; 1249 } else { 1250 asoc->cookie_preserve_req = UINT32_MAX; 1251 } 1252 asoc->stale_cookie_count++; 1253 if (asoc->stale_cookie_count > 1254 asoc->max_init_times) { 1255 sctp_abort_notification(stcb, 0, 0, NULL, SCTP_SO_NOT_LOCKED); 1256 /* now free the asoc */ 1257 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1258 so = SCTP_INP_SO(stcb->sctp_ep); 1259 atomic_add_int(&stcb->asoc.refcnt, 1); 1260 SCTP_TCB_UNLOCK(stcb); 1261 SCTP_SOCKET_LOCK(so, 1); 1262 SCTP_TCB_LOCK(stcb); 1263 atomic_subtract_int(&stcb->asoc.refcnt, 1); 1264 #endif 1265 (void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC, 1266 SCTP_FROM_SCTP_INPUT + SCTP_LOC_12); 1267 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1268 SCTP_SOCKET_UNLOCK(so, 1); 1269 #endif 1270 return (-1); 1271 } 1272 /* blast back to INIT state */ 1273 sctp_toss_old_cookies(stcb, &stcb->asoc); 1274 SCTP_SET_STATE(stcb, SCTP_STATE_COOKIE_WAIT); 1275 sctp_stop_all_cookie_timers(stcb); 1276 sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED); 1277 } 1278 break; 1279 case SCTP_CAUSE_UNRESOLVABLE_ADDR: 1280 /* 1281 * Nothing we can do here, we don't do hostname 1282 * addresses so if the peer does not like my IPv6 1283 * (or IPv4 for that matter) it does not matter. If 1284 * they don't support that type of address, they can 1285 * NOT possibly get that packet type... i.e. with no 1286 * IPv6 you can't receive a IPv6 packet. so we can 1287 * safely ignore this one. If we ever added support 1288 * for HOSTNAME Addresses, then we would need to do 1289 * something here. 1290 */ 1291 break; 1292 case SCTP_CAUSE_UNRECOG_CHUNK: 1293 if (cause_length >= sizeof(struct sctp_error_unrecognized_chunk)) { 1294 struct sctp_error_unrecognized_chunk *unrec_chunk; 1295 1296 unrec_chunk = (struct sctp_error_unrecognized_chunk *)cause; 1297 sctp_process_unrecog_chunk(stcb, unrec_chunk->ch.chunk_type, net); 1298 } 1299 break; 1300 case SCTP_CAUSE_UNRECOG_PARAM: 1301 /* XXX: We only consider the first parameter */ 1302 if (cause_length >= sizeof(struct sctp_error_cause) + sizeof(struct sctp_paramhdr)) { 1303 struct sctp_paramhdr *unrec_parameter; 1304 1305 unrec_parameter = (struct sctp_paramhdr *)(cause + 1); 1306 sctp_process_unrecog_param(stcb, ntohs(unrec_parameter->param_type)); 1307 } 1308 break; 1309 case SCTP_CAUSE_COOKIE_IN_SHUTDOWN: 1310 /* 1311 * We ignore this since the timer will drive out a 1312 * new cookie anyway and there timer will drive us 1313 * to send a SHUTDOWN_COMPLETE. We can't send one 1314 * here since we don't have their tag. 1315 */ 1316 break; 1317 case SCTP_CAUSE_DELETING_LAST_ADDR: 1318 case SCTP_CAUSE_RESOURCE_SHORTAGE: 1319 case SCTP_CAUSE_DELETING_SRC_ADDR: 1320 /* 1321 * We should NOT get these here, but in a 1322 * ASCONF-ACK. 1323 */ 1324 SCTPDBG(SCTP_DEBUG_INPUT2, "Peer sends ASCONF errors in a error cause with code %u.\n", 1325 cause_code); 1326 break; 1327 case SCTP_CAUSE_OUT_OF_RESC: 1328 /* 1329 * And what, pray tell do we do with the fact that 1330 * the peer is out of resources? Not really sure we 1331 * could do anything but abort. I suspect this 1332 * should have came WITH an abort instead of in a 1333 * OP-ERROR. 1334 */ 1335 break; 1336 default: 1337 SCTPDBG(SCTP_DEBUG_INPUT1, "sctp_handle_error: unknown code 0x%x\n", 1338 cause_code); 1339 break; 1340 } 1341 adjust = SCTP_SIZE32(cause_length); 1342 if (remaining_length >= adjust) { 1343 remaining_length -= adjust; 1344 } else { 1345 remaining_length = 0; 1346 } 1347 cause = (struct sctp_error_cause *)((caddr_t)cause + adjust); 1348 } 1349 sctp_ulp_notify(SCTP_NOTIFY_REMOTE_ERROR, stcb, code, ch, SCTP_SO_NOT_LOCKED); 1350 return (0); 1351 } 1352 1353 static int 1354 sctp_handle_init_ack(struct mbuf *m, int iphlen, int offset, 1355 struct sockaddr *src, struct sockaddr *dst, struct sctphdr *sh, 1356 struct sctp_init_ack_chunk *cp, struct sctp_tcb *stcb, 1357 struct sctp_nets *net, int *abort_no_unlock, 1358 uint8_t mflowtype, uint32_t mflowid, 1359 uint32_t vrf_id) 1360 { 1361 struct sctp_init_ack *init_ack; 1362 struct mbuf *op_err; 1363 1364 SCTPDBG(SCTP_DEBUG_INPUT2, 1365 "sctp_handle_init_ack: handling INIT-ACK\n"); 1366 1367 if (stcb == NULL) { 1368 SCTPDBG(SCTP_DEBUG_INPUT2, 1369 "sctp_handle_init_ack: TCB is null\n"); 1370 return (-1); 1371 } 1372 if (ntohs(cp->ch.chunk_length) < sizeof(struct sctp_init_ack_chunk)) { 1373 /* Invalid length */ 1374 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 1375 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 1376 src, dst, sh, op_err, 1377 mflowtype, mflowid, 1378 vrf_id, net->port); 1379 *abort_no_unlock = 1; 1380 return (-1); 1381 } 1382 init_ack = &cp->init; 1383 /* validate parameters */ 1384 if (init_ack->initiate_tag == 0) { 1385 /* protocol error... send an abort */ 1386 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 1387 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 1388 src, dst, sh, op_err, 1389 mflowtype, mflowid, 1390 vrf_id, net->port); 1391 *abort_no_unlock = 1; 1392 return (-1); 1393 } 1394 if (ntohl(init_ack->a_rwnd) < SCTP_MIN_RWND) { 1395 /* protocol error... send an abort */ 1396 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 1397 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 1398 src, dst, sh, op_err, 1399 mflowtype, mflowid, 1400 vrf_id, net->port); 1401 *abort_no_unlock = 1; 1402 return (-1); 1403 } 1404 if (init_ack->num_inbound_streams == 0) { 1405 /* protocol error... send an abort */ 1406 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 1407 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 1408 src, dst, sh, op_err, 1409 mflowtype, mflowid, 1410 vrf_id, net->port); 1411 *abort_no_unlock = 1; 1412 return (-1); 1413 } 1414 if (init_ack->num_outbound_streams == 0) { 1415 /* protocol error... send an abort */ 1416 op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, ""); 1417 sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen, 1418 src, dst, sh, op_err, 1419 mflowtype, mflowid, 1420 vrf_id, net->port); 1421 *abort_no_unlock = 1; 1422 return (-1); 1423 } 1424 /* process according to association state... */ 1425 switch (SCTP_GET_STATE(stcb)) { 1426 case SCTP_STATE_COOKIE_WAIT: 1427 /* this is the expected state for this chunk */ 1428 /* process the INIT-ACK parameters */ 1429 if (stcb->asoc.primary_destination->dest_state & 1430 SCTP_ADDR_UNCONFIRMED) { 1431 /* 1432 * The primary is where we sent the INIT, we can 1433 * always consider it confirmed when the INIT-ACK is 1434 * returned. Do this before we load addresses 1435 * though. 1436 */ 1437 stcb->asoc.primary_destination->dest_state &= 1438 ~SCTP_ADDR_UNCONFIRMED; 1439 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED, 1440 stcb, 0, (void *)stcb->asoc.primary_destination, SCTP_SO_NOT_LOCKED); 1441 } 1442 if (sctp_process_init_ack(m, iphlen, offset, src, dst, sh, cp, stcb, 1443 net, abort_no_unlock, 1444 mflowtype, mflowid, 1445 vrf_id) < 0) { 1446 /* error in parsing parameters */ 1447 return (-1); 1448 } 1449 /* update our state */ 1450 SCTPDBG(SCTP_DEBUG_INPUT2, "moving to COOKIE-ECHOED state\n"); 1451 SCTP_SET_STATE(stcb, SCTP_STATE_COOKIE_ECHOED); 1452 1453 /* reset the RTO calc */ 1454 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) { 1455 sctp_misc_ints(SCTP_THRESHOLD_CLEAR, 1456 stcb->asoc.overall_error_count, 1457 0, 1458 SCTP_FROM_SCTP_INPUT, 1459 __LINE__); 1460 } 1461 stcb->asoc.overall_error_count = 0; 1462 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered); 1463 /* 1464 * collapse the init timer back in case of a exponential 1465 * backoff 1466 */ 1467 sctp_timer_start(SCTP_TIMER_TYPE_COOKIE, stcb->sctp_ep, 1468 stcb, net); 1469 /* 1470 * the send at the end of the inbound data processing will 1471 * cause the cookie to be sent 1472 */ 1473 break; 1474 case SCTP_STATE_SHUTDOWN_SENT: 1475 /* incorrect state... discard */ 1476 break; 1477 case SCTP_STATE_COOKIE_ECHOED: 1478 /* incorrect state... discard */ 1479 break; 1480 case SCTP_STATE_OPEN: 1481 /* incorrect state... discard */ 1482 break; 1483 case SCTP_STATE_EMPTY: 1484 case SCTP_STATE_INUSE: 1485 default: 1486 /* incorrect state... discard */ 1487 return (-1); 1488 break; 1489 } 1490 SCTPDBG(SCTP_DEBUG_INPUT1, "Leaving handle-init-ack end\n"); 1491 return (0); 1492 } 1493 1494 static struct sctp_tcb * 1495 sctp_process_cookie_new(struct mbuf *m, int iphlen, int offset, 1496 struct sockaddr *src, struct sockaddr *dst, 1497 struct sctphdr *sh, struct sctp_state_cookie *cookie, int cookie_len, 1498 struct sctp_inpcb *inp, struct sctp_nets **netp, 1499 struct sockaddr *init_src, int *notification, 1500 int auth_skipped, uint32_t auth_offset, uint32_t auth_len, 1501 uint8_t mflowtype, uint32_t mflowid, 1502 uint32_t vrf_id, uint16_t port); 1503 1504 1505 /* 1506 * handle a state cookie for an existing association m: input packet mbuf 1507 * chain-- assumes a pullup on IP/SCTP/COOKIE-ECHO chunk note: this is a 1508 * "split" mbuf and the cookie signature does not exist offset: offset into 1509 * mbuf to the cookie-echo chunk 1510 */ 1511 static struct sctp_tcb * 1512 sctp_process_cookie_existing(struct mbuf *m, int iphlen, int offset, 1513 struct sockaddr *src, struct sockaddr *dst, 1514 struct sctphdr *sh, struct sctp_state_cookie *cookie, int cookie_len, 1515 struct sctp_inpcb *inp, struct sctp_tcb *stcb, struct sctp_nets **netp, 1516 struct sockaddr *init_src, int *notification, 1517 int auth_skipped, uint32_t auth_offset, uint32_t auth_len, 1518 uint8_t mflowtype, uint32_t mflowid, 1519 uint32_t vrf_id, uint16_t port) 1520 { 1521 struct sctp_association *asoc; 1522 struct sctp_init_chunk *init_cp, init_buf; 1523 struct sctp_init_ack_chunk *initack_cp, initack_buf; 1524 struct sctp_nets *net; 1525 struct mbuf *op_err; 1526 struct timeval old; 1527 int init_offset, initack_offset, i; 1528 int retval; 1529 int spec_flag = 0; 1530 uint32_t how_indx; 1531 #if defined(SCTP_DETAILED_STR_STATS) 1532 int j; 1533 #endif 1534 1535 net = *netp; 1536 /* I know that the TCB is non-NULL from the caller */ 1537 asoc = &stcb->asoc; 1538 for (how_indx = 0; how_indx < sizeof(asoc->cookie_how); how_indx++) { 1539 if (asoc->cookie_how[how_indx] == 0) 1540 break; 1541 } 1542 if (how_indx < sizeof(asoc->cookie_how)) { 1543 asoc->cookie_how[how_indx] = 1; 1544 } 1545 if (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_ACK_SENT) { 1546 /* SHUTDOWN came in after sending INIT-ACK */ 1547 sctp_send_shutdown_ack(stcb, stcb->asoc.primary_destination); 1548 op_err = sctp_generate_cause(SCTP_CAUSE_COOKIE_IN_SHUTDOWN, ""); 1549 sctp_send_operr_to(src, dst, sh, cookie->peers_vtag, op_err, 1550 mflowtype, mflowid, inp->fibnum, 1551 vrf_id, net->port); 1552 if (how_indx < sizeof(asoc->cookie_how)) 1553 asoc->cookie_how[how_indx] = 2; 1554 return (NULL); 1555 } 1556 /* 1557 * find and validate the INIT chunk in the cookie (peer's info) the 1558 * INIT should start after the cookie-echo header struct (chunk 1559 * header, state cookie header struct) 1560 */ 1561 init_offset = offset += sizeof(struct sctp_cookie_echo_chunk); 1562 1563 init_cp = (struct sctp_init_chunk *) 1564 sctp_m_getptr(m, init_offset, sizeof(struct sctp_init_chunk), 1565 (uint8_t *)&init_buf); 1566 if (init_cp == NULL) { 1567 /* could not pull a INIT chunk in cookie */ 1568 return (NULL); 1569 } 1570 if (init_cp->ch.chunk_type != SCTP_INITIATION) { 1571 return (NULL); 1572 } 1573 /* 1574 * find and validate the INIT-ACK chunk in the cookie (my info) the 1575 * INIT-ACK follows the INIT chunk 1576 */ 1577 initack_offset = init_offset + SCTP_SIZE32(ntohs(init_cp->ch.chunk_length)); 1578 initack_cp = (struct sctp_init_ack_chunk *) 1579 sctp_m_getptr(m, initack_offset, sizeof(struct sctp_init_ack_chunk), 1580 (uint8_t *)&initack_buf); 1581 if (initack_cp == NULL) { 1582 /* could not pull INIT-ACK chunk in cookie */ 1583 return (NULL); 1584 } 1585 if (initack_cp->ch.chunk_type != SCTP_INITIATION_ACK) { 1586 return (NULL); 1587 } 1588 if ((ntohl(initack_cp->init.initiate_tag) == asoc->my_vtag) && 1589 (ntohl(init_cp->init.initiate_tag) == asoc->peer_vtag)) { 1590 /* 1591 * case D in Section 5.2.4 Table 2: MMAA process accordingly 1592 * to get into the OPEN state 1593 */ 1594 if (ntohl(initack_cp->init.initial_tsn) != asoc->init_seq_number) { 1595 /*- 1596 * Opps, this means that we somehow generated two vtag's 1597 * the same. I.e. we did: 1598 * Us Peer 1599 * <---INIT(tag=a)------ 1600 * ----INIT-ACK(tag=t)--> 1601 * ----INIT(tag=t)------> *1 1602 * <---INIT-ACK(tag=a)--- 1603 * <----CE(tag=t)------------- *2 1604 * 1605 * At point *1 we should be generating a different 1606 * tag t'. Which means we would throw away the CE and send 1607 * ours instead. Basically this is case C (throw away side). 1608 */ 1609 if (how_indx < sizeof(asoc->cookie_how)) 1610 asoc->cookie_how[how_indx] = 17; 1611 return (NULL); 1612 1613 } 1614 switch (SCTP_GET_STATE(stcb)) { 1615 case SCTP_STATE_COOKIE_WAIT: 1616 case SCTP_STATE_COOKIE_ECHOED: 1617 /* 1618 * INIT was sent but got a COOKIE_ECHO with the 1619 * correct tags... just accept it...but we must 1620 * process the init so that we can make sure we have 1621 * the right seq no's. 1622 */ 1623 /* First we must process the INIT !! */ 1624 retval = sctp_process_init(init_cp, stcb); 1625 if (retval < 0) { 1626 if (how_indx < sizeof(asoc->cookie_how)) 1627 asoc->cookie_how[how_indx] = 3; 1628 return (NULL); 1629 } 1630 /* we have already processed the INIT so no problem */ 1631 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, 1632 stcb, net, 1633 SCTP_FROM_SCTP_INPUT + SCTP_LOC_13); 1634 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, inp, 1635 stcb, net, 1636 SCTP_FROM_SCTP_INPUT + SCTP_LOC_14); 1637 /* update current state */ 1638 if (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED) 1639 SCTP_STAT_INCR_COUNTER32(sctps_activeestab); 1640 else 1641 SCTP_STAT_INCR_COUNTER32(sctps_collisionestab); 1642 1643 SCTP_SET_STATE(stcb, SCTP_STATE_OPEN); 1644 if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) { 1645 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 1646 stcb->sctp_ep, stcb, asoc->primary_destination); 1647 } 1648 SCTP_STAT_INCR_GAUGE32(sctps_currestab); 1649 sctp_stop_all_cookie_timers(stcb); 1650 if (((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) || 1651 (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) && 1652 (!SCTP_IS_LISTENING(inp))) { 1653 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1654 struct socket *so; 1655 #endif 1656 /* 1657 * Here is where collision would go if we 1658 * did a connect() and instead got a 1659 * init/init-ack/cookie done before the 1660 * init-ack came back.. 1661 */ 1662 stcb->sctp_ep->sctp_flags |= 1663 SCTP_PCB_FLAGS_CONNECTED; 1664 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1665 so = SCTP_INP_SO(stcb->sctp_ep); 1666 atomic_add_int(&stcb->asoc.refcnt, 1); 1667 SCTP_TCB_UNLOCK(stcb); 1668 SCTP_SOCKET_LOCK(so, 1); 1669 SCTP_TCB_LOCK(stcb); 1670 atomic_add_int(&stcb->asoc.refcnt, -1); 1671 if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) { 1672 SCTP_SOCKET_UNLOCK(so, 1); 1673 return (NULL); 1674 } 1675 #endif 1676 soisconnected(stcb->sctp_socket); 1677 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1678 SCTP_SOCKET_UNLOCK(so, 1); 1679 #endif 1680 } 1681 /* notify upper layer */ 1682 *notification = SCTP_NOTIFY_ASSOC_UP; 1683 /* 1684 * since we did not send a HB make sure we don't 1685 * double things 1686 */ 1687 old.tv_sec = cookie->time_entered.tv_sec; 1688 old.tv_usec = cookie->time_entered.tv_usec; 1689 net->hb_responded = 1; 1690 sctp_calculate_rto(stcb, asoc, net, &old, 1691 SCTP_RTT_FROM_NON_DATA); 1692 1693 if (stcb->asoc.sctp_autoclose_ticks && 1694 (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE))) { 1695 sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE, 1696 inp, stcb, NULL); 1697 } 1698 break; 1699 default: 1700 /* 1701 * we're in the OPEN state (or beyond), so peer must 1702 * have simply lost the COOKIE-ACK 1703 */ 1704 break; 1705 } /* end switch */ 1706 sctp_stop_all_cookie_timers(stcb); 1707 /* 1708 * We ignore the return code here.. not sure if we should 1709 * somehow abort.. but we do have an existing asoc. This 1710 * really should not fail. 1711 */ 1712 if (sctp_load_addresses_from_init(stcb, m, 1713 init_offset + sizeof(struct sctp_init_chunk), 1714 initack_offset, src, dst, init_src, stcb->asoc.port)) { 1715 if (how_indx < sizeof(asoc->cookie_how)) 1716 asoc->cookie_how[how_indx] = 4; 1717 return (NULL); 1718 } 1719 /* respond with a COOKIE-ACK */ 1720 sctp_toss_old_cookies(stcb, asoc); 1721 sctp_send_cookie_ack(stcb); 1722 if (how_indx < sizeof(asoc->cookie_how)) 1723 asoc->cookie_how[how_indx] = 5; 1724 return (stcb); 1725 } 1726 1727 if (ntohl(initack_cp->init.initiate_tag) != asoc->my_vtag && 1728 ntohl(init_cp->init.initiate_tag) == asoc->peer_vtag && 1729 cookie->tie_tag_my_vtag == 0 && 1730 cookie->tie_tag_peer_vtag == 0) { 1731 /* 1732 * case C in Section 5.2.4 Table 2: XMOO silently discard 1733 */ 1734 if (how_indx < sizeof(asoc->cookie_how)) 1735 asoc->cookie_how[how_indx] = 6; 1736 return (NULL); 1737 } 1738 /* 1739 * If nat support, and the below and stcb is established, send back 1740 * a ABORT(colliding state) if we are established. 1741 */ 1742 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) && 1743 (asoc->peer_supports_nat) && 1744 ((ntohl(initack_cp->init.initiate_tag) == asoc->my_vtag) && 1745 ((ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) || 1746 (asoc->peer_vtag == 0)))) { 1747 /* 1748 * Special case - Peer's support nat. We may have two init's 1749 * that we gave out the same tag on since one was not 1750 * established.. i.e. we get INIT from host-1 behind the nat 1751 * and we respond tag-a, we get a INIT from host-2 behind 1752 * the nat and we get tag-a again. Then we bring up host-1 1753 * (or 2's) assoc, Then comes the cookie from hsot-2 (or 1). 1754 * Now we have colliding state. We must send an abort here 1755 * with colliding state indication. 1756 */ 1757 op_err = sctp_generate_cause(SCTP_CAUSE_NAT_COLLIDING_STATE, ""); 1758 sctp_send_abort(m, iphlen, src, dst, sh, 0, op_err, 1759 mflowtype, mflowid, inp->fibnum, 1760 vrf_id, port); 1761 return (NULL); 1762 } 1763 if ((ntohl(initack_cp->init.initiate_tag) == asoc->my_vtag) && 1764 ((ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) || 1765 (asoc->peer_vtag == 0))) { 1766 /* 1767 * case B in Section 5.2.4 Table 2: MXAA or MOAA my info 1768 * should be ok, re-accept peer info 1769 */ 1770 if (ntohl(initack_cp->init.initial_tsn) != asoc->init_seq_number) { 1771 /* 1772 * Extension of case C. If we hit this, then the 1773 * random number generator returned the same vtag 1774 * when we first sent our INIT-ACK and when we later 1775 * sent our INIT. The side with the seq numbers that 1776 * are different will be the one that normnally 1777 * would have hit case C. This in effect "extends" 1778 * our vtags in this collision case to be 64 bits. 1779 * The same collision could occur aka you get both 1780 * vtag and seq number the same twice in a row.. but 1781 * is much less likely. If it did happen then we 1782 * would proceed through and bring up the assoc.. we 1783 * may end up with the wrong stream setup however.. 1784 * which would be bad.. but there is no way to 1785 * tell.. until we send on a stream that does not 1786 * exist :-) 1787 */ 1788 if (how_indx < sizeof(asoc->cookie_how)) 1789 asoc->cookie_how[how_indx] = 7; 1790 1791 return (NULL); 1792 } 1793 if (how_indx < sizeof(asoc->cookie_how)) 1794 asoc->cookie_how[how_indx] = 8; 1795 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net, 1796 SCTP_FROM_SCTP_INPUT + SCTP_LOC_15); 1797 sctp_stop_all_cookie_timers(stcb); 1798 /* 1799 * since we did not send a HB make sure we don't double 1800 * things 1801 */ 1802 net->hb_responded = 1; 1803 if (stcb->asoc.sctp_autoclose_ticks && 1804 sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE)) { 1805 sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE, inp, stcb, 1806 NULL); 1807 } 1808 asoc->my_rwnd = ntohl(initack_cp->init.a_rwnd); 1809 asoc->pre_open_streams = ntohs(initack_cp->init.num_outbound_streams); 1810 1811 if (ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) { 1812 /* 1813 * Ok the peer probably discarded our data (if we 1814 * echoed a cookie+data). So anything on the 1815 * sent_queue should be marked for retransmit, we 1816 * may not get something to kick us so it COULD 1817 * still take a timeout to move these.. but it can't 1818 * hurt to mark them. 1819 */ 1820 struct sctp_tmit_chunk *chk; 1821 1822 TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) { 1823 if (chk->sent < SCTP_DATAGRAM_RESEND) { 1824 chk->sent = SCTP_DATAGRAM_RESEND; 1825 sctp_flight_size_decrease(chk); 1826 sctp_total_flight_decrease(stcb, chk); 1827 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt); 1828 spec_flag++; 1829 } 1830 } 1831 1832 } 1833 /* process the INIT info (peer's info) */ 1834 retval = sctp_process_init(init_cp, stcb); 1835 if (retval < 0) { 1836 if (how_indx < sizeof(asoc->cookie_how)) 1837 asoc->cookie_how[how_indx] = 9; 1838 return (NULL); 1839 } 1840 if (sctp_load_addresses_from_init(stcb, m, 1841 init_offset + sizeof(struct sctp_init_chunk), 1842 initack_offset, src, dst, init_src, stcb->asoc.port)) { 1843 if (how_indx < sizeof(asoc->cookie_how)) 1844 asoc->cookie_how[how_indx] = 10; 1845 return (NULL); 1846 } 1847 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_WAIT) || 1848 (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED)) { 1849 *notification = SCTP_NOTIFY_ASSOC_UP; 1850 1851 if (((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) || 1852 (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) && 1853 (!SCTP_IS_LISTENING(inp))) { 1854 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1855 struct socket *so; 1856 #endif 1857 stcb->sctp_ep->sctp_flags |= 1858 SCTP_PCB_FLAGS_CONNECTED; 1859 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1860 so = SCTP_INP_SO(stcb->sctp_ep); 1861 atomic_add_int(&stcb->asoc.refcnt, 1); 1862 SCTP_TCB_UNLOCK(stcb); 1863 SCTP_SOCKET_LOCK(so, 1); 1864 SCTP_TCB_LOCK(stcb); 1865 atomic_add_int(&stcb->asoc.refcnt, -1); 1866 if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) { 1867 SCTP_SOCKET_UNLOCK(so, 1); 1868 return (NULL); 1869 } 1870 #endif 1871 soisconnected(stcb->sctp_socket); 1872 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1873 SCTP_SOCKET_UNLOCK(so, 1); 1874 #endif 1875 } 1876 if (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED) 1877 SCTP_STAT_INCR_COUNTER32(sctps_activeestab); 1878 else 1879 SCTP_STAT_INCR_COUNTER32(sctps_collisionestab); 1880 SCTP_STAT_INCR_GAUGE32(sctps_currestab); 1881 } else if (SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) { 1882 SCTP_STAT_INCR_COUNTER32(sctps_restartestab); 1883 } else { 1884 SCTP_STAT_INCR_COUNTER32(sctps_collisionestab); 1885 } 1886 SCTP_SET_STATE(stcb, SCTP_STATE_OPEN); 1887 if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) { 1888 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 1889 stcb->sctp_ep, stcb, asoc->primary_destination); 1890 } 1891 sctp_stop_all_cookie_timers(stcb); 1892 sctp_toss_old_cookies(stcb, asoc); 1893 sctp_send_cookie_ack(stcb); 1894 if (spec_flag) { 1895 /* 1896 * only if we have retrans set do we do this. What 1897 * this call does is get only the COOKIE-ACK out and 1898 * then when we return the normal call to 1899 * sctp_chunk_output will get the retrans out behind 1900 * this. 1901 */ 1902 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_COOKIE_ACK, SCTP_SO_NOT_LOCKED); 1903 } 1904 if (how_indx < sizeof(asoc->cookie_how)) 1905 asoc->cookie_how[how_indx] = 11; 1906 1907 return (stcb); 1908 } 1909 if ((ntohl(initack_cp->init.initiate_tag) != asoc->my_vtag && 1910 ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) && 1911 cookie->tie_tag_my_vtag == asoc->my_vtag_nonce && 1912 cookie->tie_tag_peer_vtag == asoc->peer_vtag_nonce && 1913 cookie->tie_tag_peer_vtag != 0) { 1914 struct sctpasochead *head; 1915 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1916 struct socket *so; 1917 #endif 1918 1919 if (asoc->peer_supports_nat) { 1920 /* 1921 * This is a gross gross hack. Just call the 1922 * cookie_new code since we are allowing a duplicate 1923 * association. I hope this works... 1924 */ 1925 return (sctp_process_cookie_new(m, iphlen, offset, src, dst, 1926 sh, cookie, cookie_len, 1927 inp, netp, init_src, notification, 1928 auth_skipped, auth_offset, auth_len, 1929 mflowtype, mflowid, 1930 vrf_id, port)); 1931 } 1932 /* 1933 * case A in Section 5.2.4 Table 2: XXMM (peer restarted) 1934 */ 1935 /* temp code */ 1936 if (how_indx < sizeof(asoc->cookie_how)) 1937 asoc->cookie_how[how_indx] = 12; 1938 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, inp, stcb, net, 1939 SCTP_FROM_SCTP_INPUT + SCTP_LOC_16); 1940 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net, 1941 SCTP_FROM_SCTP_INPUT + SCTP_LOC_17); 1942 1943 /* notify upper layer */ 1944 *notification = SCTP_NOTIFY_ASSOC_RESTART; 1945 atomic_add_int(&stcb->asoc.refcnt, 1); 1946 if ((SCTP_GET_STATE(stcb) != SCTP_STATE_OPEN) && 1947 (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_RECEIVED) && 1948 (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_SENT)) { 1949 SCTP_STAT_INCR_GAUGE32(sctps_currestab); 1950 } 1951 if (SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) { 1952 SCTP_STAT_INCR_GAUGE32(sctps_restartestab); 1953 } else if (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_SENT) { 1954 SCTP_STAT_INCR_GAUGE32(sctps_collisionestab); 1955 } 1956 if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) { 1957 SCTP_SET_STATE(stcb, SCTP_STATE_OPEN); 1958 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 1959 stcb->sctp_ep, stcb, asoc->primary_destination); 1960 1961 } else if (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_SENT) { 1962 /* move to OPEN state, if not in SHUTDOWN_SENT */ 1963 SCTP_SET_STATE(stcb, SCTP_STATE_OPEN); 1964 } 1965 asoc->pre_open_streams = 1966 ntohs(initack_cp->init.num_outbound_streams); 1967 asoc->init_seq_number = ntohl(initack_cp->init.initial_tsn); 1968 asoc->sending_seq = asoc->asconf_seq_out = asoc->str_reset_seq_out = asoc->init_seq_number; 1969 asoc->asconf_seq_out_acked = asoc->asconf_seq_out - 1; 1970 1971 asoc->asconf_seq_in = asoc->last_acked_seq = asoc->init_seq_number - 1; 1972 1973 asoc->str_reset_seq_in = asoc->init_seq_number; 1974 1975 asoc->advanced_peer_ack_point = asoc->last_acked_seq; 1976 if (asoc->mapping_array) { 1977 memset(asoc->mapping_array, 0, 1978 asoc->mapping_array_size); 1979 } 1980 if (asoc->nr_mapping_array) { 1981 memset(asoc->nr_mapping_array, 0, 1982 asoc->mapping_array_size); 1983 } 1984 SCTP_TCB_UNLOCK(stcb); 1985 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 1986 so = SCTP_INP_SO(stcb->sctp_ep); 1987 SCTP_SOCKET_LOCK(so, 1); 1988 #endif 1989 SCTP_INP_INFO_WLOCK(); 1990 SCTP_INP_WLOCK(stcb->sctp_ep); 1991 SCTP_TCB_LOCK(stcb); 1992 atomic_add_int(&stcb->asoc.refcnt, -1); 1993 /* send up all the data */ 1994 SCTP_TCB_SEND_LOCK(stcb); 1995 1996 sctp_report_all_outbound(stcb, 0, 1, SCTP_SO_LOCKED); 1997 for (i = 0; i < stcb->asoc.streamoutcnt; i++) { 1998 stcb->asoc.strmout[i].chunks_on_queues = 0; 1999 #if defined(SCTP_DETAILED_STR_STATS) 2000 for (j = 0; j < SCTP_PR_SCTP_MAX + 1; j++) { 2001 asoc->strmout[i].abandoned_sent[j] = 0; 2002 asoc->strmout[i].abandoned_unsent[j] = 0; 2003 } 2004 #else 2005 asoc->strmout[i].abandoned_sent[0] = 0; 2006 asoc->strmout[i].abandoned_unsent[0] = 0; 2007 #endif 2008 stcb->asoc.strmout[i].sid = i; 2009 stcb->asoc.strmout[i].next_mid_ordered = 0; 2010 stcb->asoc.strmout[i].next_mid_unordered = 0; 2011 stcb->asoc.strmout[i].last_msg_incomplete = 0; 2012 } 2013 /* process the INIT-ACK info (my info) */ 2014 asoc->my_vtag = ntohl(initack_cp->init.initiate_tag); 2015 asoc->my_rwnd = ntohl(initack_cp->init.a_rwnd); 2016 2017 /* pull from vtag hash */ 2018 LIST_REMOVE(stcb, sctp_asocs); 2019 /* re-insert to new vtag position */ 2020 head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(stcb->asoc.my_vtag, 2021 SCTP_BASE_INFO(hashasocmark))]; 2022 /* 2023 * put it in the bucket in the vtag hash of assoc's for the 2024 * system 2025 */ 2026 LIST_INSERT_HEAD(head, stcb, sctp_asocs); 2027 2028 SCTP_TCB_SEND_UNLOCK(stcb); 2029 SCTP_INP_WUNLOCK(stcb->sctp_ep); 2030 SCTP_INP_INFO_WUNLOCK(); 2031 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2032 SCTP_SOCKET_UNLOCK(so, 1); 2033 #endif 2034 asoc->total_flight = 0; 2035 asoc->total_flight_count = 0; 2036 /* process the INIT info (peer's info) */ 2037 retval = sctp_process_init(init_cp, stcb); 2038 if (retval < 0) { 2039 if (how_indx < sizeof(asoc->cookie_how)) 2040 asoc->cookie_how[how_indx] = 13; 2041 2042 return (NULL); 2043 } 2044 /* 2045 * since we did not send a HB make sure we don't double 2046 * things 2047 */ 2048 net->hb_responded = 1; 2049 2050 if (sctp_load_addresses_from_init(stcb, m, 2051 init_offset + sizeof(struct sctp_init_chunk), 2052 initack_offset, src, dst, init_src, stcb->asoc.port)) { 2053 if (how_indx < sizeof(asoc->cookie_how)) 2054 asoc->cookie_how[how_indx] = 14; 2055 2056 return (NULL); 2057 } 2058 /* respond with a COOKIE-ACK */ 2059 sctp_stop_all_cookie_timers(stcb); 2060 sctp_toss_old_cookies(stcb, asoc); 2061 sctp_send_cookie_ack(stcb); 2062 if (how_indx < sizeof(asoc->cookie_how)) 2063 asoc->cookie_how[how_indx] = 15; 2064 2065 return (stcb); 2066 } 2067 if (how_indx < sizeof(asoc->cookie_how)) 2068 asoc->cookie_how[how_indx] = 16; 2069 /* all other cases... */ 2070 return (NULL); 2071 } 2072 2073 2074 /* 2075 * handle a state cookie for a new association m: input packet mbuf chain-- 2076 * assumes a pullup on IP/SCTP/COOKIE-ECHO chunk note: this is a "split" mbuf 2077 * and the cookie signature does not exist offset: offset into mbuf to the 2078 * cookie-echo chunk length: length of the cookie chunk to: where the init 2079 * was from returns a new TCB 2080 */ 2081 static struct sctp_tcb * 2082 sctp_process_cookie_new(struct mbuf *m, int iphlen, int offset, 2083 struct sockaddr *src, struct sockaddr *dst, 2084 struct sctphdr *sh, struct sctp_state_cookie *cookie, int cookie_len, 2085 struct sctp_inpcb *inp, struct sctp_nets **netp, 2086 struct sockaddr *init_src, int *notification, 2087 int auth_skipped, uint32_t auth_offset, uint32_t auth_len, 2088 uint8_t mflowtype, uint32_t mflowid, 2089 uint32_t vrf_id, uint16_t port) 2090 { 2091 struct sctp_tcb *stcb; 2092 struct sctp_init_chunk *init_cp, init_buf; 2093 struct sctp_init_ack_chunk *initack_cp, initack_buf; 2094 union sctp_sockstore store; 2095 struct sctp_association *asoc; 2096 int init_offset, initack_offset, initack_limit; 2097 int retval; 2098 int error = 0; 2099 uint8_t auth_chunk_buf[SCTP_PARAM_BUFFER_SIZE]; 2100 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2101 struct socket *so; 2102 2103 so = SCTP_INP_SO(inp); 2104 #endif 2105 2106 /* 2107 * find and validate the INIT chunk in the cookie (peer's info) the 2108 * INIT should start after the cookie-echo header struct (chunk 2109 * header, state cookie header struct) 2110 */ 2111 init_offset = offset + sizeof(struct sctp_cookie_echo_chunk); 2112 init_cp = (struct sctp_init_chunk *) 2113 sctp_m_getptr(m, init_offset, sizeof(struct sctp_init_chunk), 2114 (uint8_t *)&init_buf); 2115 if (init_cp == NULL) { 2116 /* could not pull a INIT chunk in cookie */ 2117 SCTPDBG(SCTP_DEBUG_INPUT1, 2118 "process_cookie_new: could not pull INIT chunk hdr\n"); 2119 return (NULL); 2120 } 2121 if (init_cp->ch.chunk_type != SCTP_INITIATION) { 2122 SCTPDBG(SCTP_DEBUG_INPUT1, "HUH? process_cookie_new: could not find INIT chunk!\n"); 2123 return (NULL); 2124 } 2125 initack_offset = init_offset + SCTP_SIZE32(ntohs(init_cp->ch.chunk_length)); 2126 /* 2127 * find and validate the INIT-ACK chunk in the cookie (my info) the 2128 * INIT-ACK follows the INIT chunk 2129 */ 2130 initack_cp = (struct sctp_init_ack_chunk *) 2131 sctp_m_getptr(m, initack_offset, sizeof(struct sctp_init_ack_chunk), 2132 (uint8_t *)&initack_buf); 2133 if (initack_cp == NULL) { 2134 /* could not pull INIT-ACK chunk in cookie */ 2135 SCTPDBG(SCTP_DEBUG_INPUT1, "process_cookie_new: could not pull INIT-ACK chunk hdr\n"); 2136 return (NULL); 2137 } 2138 if (initack_cp->ch.chunk_type != SCTP_INITIATION_ACK) { 2139 return (NULL); 2140 } 2141 /* 2142 * NOTE: We can't use the INIT_ACK's chk_length to determine the 2143 * "initack_limit" value. This is because the chk_length field 2144 * includes the length of the cookie, but the cookie is omitted when 2145 * the INIT and INIT_ACK are tacked onto the cookie... 2146 */ 2147 initack_limit = offset + cookie_len; 2148 2149 /* 2150 * now that we know the INIT/INIT-ACK are in place, create a new TCB 2151 * and popluate 2152 */ 2153 2154 /* 2155 * Here we do a trick, we set in NULL for the proc/thread argument. 2156 * We do this since in effect we only use the p argument when the 2157 * socket is unbound and we must do an implicit bind. Since we are 2158 * getting a cookie, we cannot be unbound. 2159 */ 2160 stcb = sctp_aloc_assoc(inp, init_src, &error, 2161 ntohl(initack_cp->init.initiate_tag), vrf_id, 2162 ntohs(initack_cp->init.num_outbound_streams), 2163 port, 2164 (struct thread *)NULL, 2165 SCTP_DONT_INITIALIZE_AUTH_PARAMS); 2166 if (stcb == NULL) { 2167 struct mbuf *op_err; 2168 2169 /* memory problem? */ 2170 SCTPDBG(SCTP_DEBUG_INPUT1, 2171 "process_cookie_new: no room for another TCB!\n"); 2172 op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, ""); 2173 sctp_abort_association(inp, (struct sctp_tcb *)NULL, m, iphlen, 2174 src, dst, sh, op_err, 2175 mflowtype, mflowid, 2176 vrf_id, port); 2177 return (NULL); 2178 } 2179 /* get the correct sctp_nets */ 2180 if (netp) 2181 *netp = sctp_findnet(stcb, init_src); 2182 2183 asoc = &stcb->asoc; 2184 /* get scope variables out of cookie */ 2185 asoc->scope.ipv4_local_scope = cookie->ipv4_scope; 2186 asoc->scope.site_scope = cookie->site_scope; 2187 asoc->scope.local_scope = cookie->local_scope; 2188 asoc->scope.loopback_scope = cookie->loopback_scope; 2189 2190 if ((asoc->scope.ipv4_addr_legal != cookie->ipv4_addr_legal) || 2191 (asoc->scope.ipv6_addr_legal != cookie->ipv6_addr_legal)) { 2192 struct mbuf *op_err; 2193 2194 /* 2195 * Houston we have a problem. The EP changed while the 2196 * cookie was in flight. Only recourse is to abort the 2197 * association. 2198 */ 2199 op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, ""); 2200 sctp_abort_association(inp, (struct sctp_tcb *)NULL, m, iphlen, 2201 src, dst, sh, op_err, 2202 mflowtype, mflowid, 2203 vrf_id, port); 2204 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2205 atomic_add_int(&stcb->asoc.refcnt, 1); 2206 SCTP_TCB_UNLOCK(stcb); 2207 SCTP_SOCKET_LOCK(so, 1); 2208 SCTP_TCB_LOCK(stcb); 2209 atomic_subtract_int(&stcb->asoc.refcnt, 1); 2210 #endif 2211 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 2212 SCTP_FROM_SCTP_INPUT + SCTP_LOC_18); 2213 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2214 SCTP_SOCKET_UNLOCK(so, 1); 2215 #endif 2216 return (NULL); 2217 } 2218 /* process the INIT-ACK info (my info) */ 2219 asoc->my_vtag = ntohl(initack_cp->init.initiate_tag); 2220 asoc->my_rwnd = ntohl(initack_cp->init.a_rwnd); 2221 asoc->pre_open_streams = ntohs(initack_cp->init.num_outbound_streams); 2222 asoc->init_seq_number = ntohl(initack_cp->init.initial_tsn); 2223 asoc->sending_seq = asoc->asconf_seq_out = asoc->str_reset_seq_out = asoc->init_seq_number; 2224 asoc->asconf_seq_out_acked = asoc->asconf_seq_out - 1; 2225 asoc->asconf_seq_in = asoc->last_acked_seq = asoc->init_seq_number - 1; 2226 asoc->str_reset_seq_in = asoc->init_seq_number; 2227 2228 asoc->advanced_peer_ack_point = asoc->last_acked_seq; 2229 2230 /* process the INIT info (peer's info) */ 2231 if (netp) 2232 retval = sctp_process_init(init_cp, stcb); 2233 else 2234 retval = 0; 2235 if (retval < 0) { 2236 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2237 atomic_add_int(&stcb->asoc.refcnt, 1); 2238 SCTP_TCB_UNLOCK(stcb); 2239 SCTP_SOCKET_LOCK(so, 1); 2240 SCTP_TCB_LOCK(stcb); 2241 atomic_subtract_int(&stcb->asoc.refcnt, 1); 2242 #endif 2243 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 2244 SCTP_FROM_SCTP_INPUT + SCTP_LOC_19); 2245 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2246 SCTP_SOCKET_UNLOCK(so, 1); 2247 #endif 2248 return (NULL); 2249 } 2250 /* load all addresses */ 2251 if (sctp_load_addresses_from_init(stcb, m, 2252 init_offset + sizeof(struct sctp_init_chunk), initack_offset, 2253 src, dst, init_src, port)) { 2254 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2255 atomic_add_int(&stcb->asoc.refcnt, 1); 2256 SCTP_TCB_UNLOCK(stcb); 2257 SCTP_SOCKET_LOCK(so, 1); 2258 SCTP_TCB_LOCK(stcb); 2259 atomic_subtract_int(&stcb->asoc.refcnt, 1); 2260 #endif 2261 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 2262 SCTP_FROM_SCTP_INPUT + SCTP_LOC_20); 2263 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2264 SCTP_SOCKET_UNLOCK(so, 1); 2265 #endif 2266 return (NULL); 2267 } 2268 /* 2269 * verify any preceding AUTH chunk that was skipped 2270 */ 2271 /* pull the local authentication parameters from the cookie/init-ack */ 2272 sctp_auth_get_cookie_params(stcb, m, 2273 initack_offset + sizeof(struct sctp_init_ack_chunk), 2274 initack_limit - (initack_offset + sizeof(struct sctp_init_ack_chunk))); 2275 if (auth_skipped) { 2276 struct sctp_auth_chunk *auth; 2277 2278 auth = (struct sctp_auth_chunk *) 2279 sctp_m_getptr(m, auth_offset, auth_len, auth_chunk_buf); 2280 if ((auth == NULL) || sctp_handle_auth(stcb, auth, m, auth_offset)) { 2281 /* auth HMAC failed, dump the assoc and packet */ 2282 SCTPDBG(SCTP_DEBUG_AUTH1, 2283 "COOKIE-ECHO: AUTH failed\n"); 2284 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2285 atomic_add_int(&stcb->asoc.refcnt, 1); 2286 SCTP_TCB_UNLOCK(stcb); 2287 SCTP_SOCKET_LOCK(so, 1); 2288 SCTP_TCB_LOCK(stcb); 2289 atomic_subtract_int(&stcb->asoc.refcnt, 1); 2290 #endif 2291 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 2292 SCTP_FROM_SCTP_INPUT + SCTP_LOC_21); 2293 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2294 SCTP_SOCKET_UNLOCK(so, 1); 2295 #endif 2296 return (NULL); 2297 } else { 2298 /* remaining chunks checked... good to go */ 2299 stcb->asoc.authenticated = 1; 2300 } 2301 } 2302 2303 /* 2304 * if we're doing ASCONFs, check to see if we have any new local 2305 * addresses that need to get added to the peer (eg. addresses 2306 * changed while cookie echo in flight). This needs to be done 2307 * after we go to the OPEN state to do the correct asconf 2308 * processing. else, make sure we have the correct addresses in our 2309 * lists 2310 */ 2311 2312 /* warning, we re-use sin, sin6, sa_store here! */ 2313 /* pull in local_address (our "from" address) */ 2314 switch (cookie->laddr_type) { 2315 #ifdef INET 2316 case SCTP_IPV4_ADDRESS: 2317 /* source addr is IPv4 */ 2318 memset(&store.sin, 0, sizeof(struct sockaddr_in)); 2319 store.sin.sin_family = AF_INET; 2320 store.sin.sin_len = sizeof(struct sockaddr_in); 2321 store.sin.sin_addr.s_addr = cookie->laddress[0]; 2322 break; 2323 #endif 2324 #ifdef INET6 2325 case SCTP_IPV6_ADDRESS: 2326 /* source addr is IPv6 */ 2327 memset(&store.sin6, 0, sizeof(struct sockaddr_in6)); 2328 store.sin6.sin6_family = AF_INET6; 2329 store.sin6.sin6_len = sizeof(struct sockaddr_in6); 2330 store.sin6.sin6_scope_id = cookie->scope_id; 2331 memcpy(&store.sin6.sin6_addr, cookie->laddress, sizeof(struct in6_addr)); 2332 break; 2333 #endif 2334 default: 2335 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2336 atomic_add_int(&stcb->asoc.refcnt, 1); 2337 SCTP_TCB_UNLOCK(stcb); 2338 SCTP_SOCKET_LOCK(so, 1); 2339 SCTP_TCB_LOCK(stcb); 2340 atomic_subtract_int(&stcb->asoc.refcnt, 1); 2341 #endif 2342 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 2343 SCTP_FROM_SCTP_INPUT + SCTP_LOC_22); 2344 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2345 SCTP_SOCKET_UNLOCK(so, 1); 2346 #endif 2347 return (NULL); 2348 } 2349 2350 /* update current state */ 2351 SCTPDBG(SCTP_DEBUG_INPUT2, "moving to OPEN state\n"); 2352 SCTP_SET_STATE(stcb, SCTP_STATE_OPEN); 2353 if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) { 2354 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 2355 stcb->sctp_ep, stcb, asoc->primary_destination); 2356 } 2357 sctp_stop_all_cookie_timers(stcb); 2358 SCTP_STAT_INCR_COUNTER32(sctps_passiveestab); 2359 SCTP_STAT_INCR_GAUGE32(sctps_currestab); 2360 2361 /* set up to notify upper layer */ 2362 *notification = SCTP_NOTIFY_ASSOC_UP; 2363 if (((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) || 2364 (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) && 2365 (!SCTP_IS_LISTENING(inp))) { 2366 /* 2367 * This is an endpoint that called connect() how it got a 2368 * cookie that is NEW is a bit of a mystery. It must be that 2369 * the INIT was sent, but before it got there.. a complete 2370 * INIT/INIT-ACK/COOKIE arrived. But of course then it 2371 * should have went to the other code.. not here.. oh well.. 2372 * a bit of protection is worth having.. 2373 */ 2374 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED; 2375 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2376 atomic_add_int(&stcb->asoc.refcnt, 1); 2377 SCTP_TCB_UNLOCK(stcb); 2378 SCTP_SOCKET_LOCK(so, 1); 2379 SCTP_TCB_LOCK(stcb); 2380 atomic_subtract_int(&stcb->asoc.refcnt, 1); 2381 if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) { 2382 SCTP_SOCKET_UNLOCK(so, 1); 2383 return (NULL); 2384 } 2385 #endif 2386 soisconnected(stcb->sctp_socket); 2387 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2388 SCTP_SOCKET_UNLOCK(so, 1); 2389 #endif 2390 } else if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) && 2391 (SCTP_IS_LISTENING(inp))) { 2392 /* 2393 * We don't want to do anything with this one. Since it is 2394 * the listening guy. The timer will get started for 2395 * accepted connections in the caller. 2396 */ 2397 ; 2398 } 2399 /* since we did not send a HB make sure we don't double things */ 2400 if ((netp) && (*netp)) 2401 (*netp)->hb_responded = 1; 2402 2403 if (stcb->asoc.sctp_autoclose_ticks && 2404 sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE)) { 2405 sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE, inp, stcb, NULL); 2406 } 2407 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered); 2408 if ((netp != NULL) && (*netp != NULL)) { 2409 struct timeval old; 2410 2411 /* calculate the RTT and set the encaps port */ 2412 old.tv_sec = cookie->time_entered.tv_sec; 2413 old.tv_usec = cookie->time_entered.tv_usec; 2414 sctp_calculate_rto(stcb, asoc, *netp, &old, SCTP_RTT_FROM_NON_DATA); 2415 } 2416 /* respond with a COOKIE-ACK */ 2417 sctp_send_cookie_ack(stcb); 2418 2419 /* 2420 * check the address lists for any ASCONFs that need to be sent 2421 * AFTER the cookie-ack is sent 2422 */ 2423 sctp_check_address_list(stcb, m, 2424 initack_offset + sizeof(struct sctp_init_ack_chunk), 2425 initack_limit - (initack_offset + sizeof(struct sctp_init_ack_chunk)), 2426 &store.sa, cookie->local_scope, cookie->site_scope, 2427 cookie->ipv4_scope, cookie->loopback_scope); 2428 2429 2430 return (stcb); 2431 } 2432 2433 /* 2434 * CODE LIKE THIS NEEDS TO RUN IF the peer supports the NAT extension, i.e 2435 * we NEED to make sure we are not already using the vtag. If so we 2436 * need to send back an ABORT-TRY-AGAIN-WITH-NEW-TAG No middle box bit! 2437 head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(tag, 2438 SCTP_BASE_INFO(hashasocmark))]; 2439 LIST_FOREACH(stcb, head, sctp_asocs) { 2440 if ((stcb->asoc.my_vtag == tag) && (stcb->rport == rport) && (inp == stcb->sctp_ep)) { 2441 -- SEND ABORT - TRY AGAIN -- 2442 } 2443 } 2444 */ 2445 2446 /* 2447 * handles a COOKIE-ECHO message stcb: modified to either a new or left as 2448 * existing (non-NULL) TCB 2449 */ 2450 static struct mbuf * 2451 sctp_handle_cookie_echo(struct mbuf *m, int iphlen, int offset, 2452 struct sockaddr *src, struct sockaddr *dst, 2453 struct sctphdr *sh, struct sctp_cookie_echo_chunk *cp, 2454 struct sctp_inpcb **inp_p, struct sctp_tcb **stcb, struct sctp_nets **netp, 2455 int auth_skipped, uint32_t auth_offset, uint32_t auth_len, 2456 struct sctp_tcb **locked_tcb, 2457 uint8_t mflowtype, uint32_t mflowid, 2458 uint32_t vrf_id, uint16_t port) 2459 { 2460 struct sctp_state_cookie *cookie; 2461 struct sctp_tcb *l_stcb = *stcb; 2462 struct sctp_inpcb *l_inp; 2463 struct sockaddr *to; 2464 struct sctp_pcb *ep; 2465 struct mbuf *m_sig; 2466 uint8_t calc_sig[SCTP_SIGNATURE_SIZE], tmp_sig[SCTP_SIGNATURE_SIZE]; 2467 uint8_t *sig; 2468 uint8_t cookie_ok = 0; 2469 unsigned int sig_offset, cookie_offset; 2470 unsigned int cookie_len; 2471 struct timeval now; 2472 struct timeval time_expires; 2473 int notification = 0; 2474 struct sctp_nets *netl; 2475 int had_a_existing_tcb = 0; 2476 int send_int_conf = 0; 2477 #ifdef INET 2478 struct sockaddr_in sin; 2479 #endif 2480 #ifdef INET6 2481 struct sockaddr_in6 sin6; 2482 #endif 2483 2484 SCTPDBG(SCTP_DEBUG_INPUT2, 2485 "sctp_handle_cookie: handling COOKIE-ECHO\n"); 2486 2487 if (inp_p == NULL) { 2488 return (NULL); 2489 } 2490 cookie = &cp->cookie; 2491 cookie_offset = offset + sizeof(struct sctp_chunkhdr); 2492 cookie_len = ntohs(cp->ch.chunk_length); 2493 2494 if (cookie_len < sizeof(struct sctp_cookie_echo_chunk) + 2495 sizeof(struct sctp_init_chunk) + 2496 sizeof(struct sctp_init_ack_chunk) + SCTP_SIGNATURE_SIZE) { 2497 /* cookie too small */ 2498 return (NULL); 2499 } 2500 if ((cookie->peerport != sh->src_port) || 2501 (cookie->myport != sh->dest_port) || 2502 (cookie->my_vtag != sh->v_tag)) { 2503 /* 2504 * invalid ports or bad tag. Note that we always leave the 2505 * v_tag in the header in network order and when we stored 2506 * it in the my_vtag slot we also left it in network order. 2507 * This maintains the match even though it may be in the 2508 * opposite byte order of the machine :-> 2509 */ 2510 return (NULL); 2511 } 2512 /* 2513 * split off the signature into its own mbuf (since it should not be 2514 * calculated in the sctp_hmac_m() call). 2515 */ 2516 sig_offset = offset + cookie_len - SCTP_SIGNATURE_SIZE; 2517 m_sig = m_split(m, sig_offset, M_NOWAIT); 2518 if (m_sig == NULL) { 2519 /* out of memory or ?? */ 2520 return (NULL); 2521 } 2522 #ifdef SCTP_MBUF_LOGGING 2523 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MBUF_LOGGING_ENABLE) { 2524 sctp_log_mbc(m_sig, SCTP_MBUF_SPLIT); 2525 } 2526 #endif 2527 2528 /* 2529 * compute the signature/digest for the cookie 2530 */ 2531 ep = &(*inp_p)->sctp_ep; 2532 l_inp = *inp_p; 2533 if (l_stcb) { 2534 SCTP_TCB_UNLOCK(l_stcb); 2535 } 2536 SCTP_INP_RLOCK(l_inp); 2537 if (l_stcb) { 2538 SCTP_TCB_LOCK(l_stcb); 2539 } 2540 /* which cookie is it? */ 2541 if ((cookie->time_entered.tv_sec < (long)ep->time_of_secret_change) && 2542 (ep->current_secret_number != ep->last_secret_number)) { 2543 /* it's the old cookie */ 2544 (void)sctp_hmac_m(SCTP_HMAC, 2545 (uint8_t *)ep->secret_key[(int)ep->last_secret_number], 2546 SCTP_SECRET_SIZE, m, cookie_offset, calc_sig, 0); 2547 } else { 2548 /* it's the current cookie */ 2549 (void)sctp_hmac_m(SCTP_HMAC, 2550 (uint8_t *)ep->secret_key[(int)ep->current_secret_number], 2551 SCTP_SECRET_SIZE, m, cookie_offset, calc_sig, 0); 2552 } 2553 /* get the signature */ 2554 SCTP_INP_RUNLOCK(l_inp); 2555 sig = (uint8_t *)sctp_m_getptr(m_sig, 0, SCTP_SIGNATURE_SIZE, (uint8_t *)&tmp_sig); 2556 if (sig == NULL) { 2557 /* couldn't find signature */ 2558 sctp_m_freem(m_sig); 2559 return (NULL); 2560 } 2561 /* compare the received digest with the computed digest */ 2562 if (timingsafe_bcmp(calc_sig, sig, SCTP_SIGNATURE_SIZE) != 0) { 2563 /* try the old cookie? */ 2564 if ((cookie->time_entered.tv_sec == (long)ep->time_of_secret_change) && 2565 (ep->current_secret_number != ep->last_secret_number)) { 2566 /* compute digest with old */ 2567 (void)sctp_hmac_m(SCTP_HMAC, 2568 (uint8_t *)ep->secret_key[(int)ep->last_secret_number], 2569 SCTP_SECRET_SIZE, m, cookie_offset, calc_sig, 0); 2570 /* compare */ 2571 if (timingsafe_bcmp(calc_sig, sig, SCTP_SIGNATURE_SIZE) == 0) 2572 cookie_ok = 1; 2573 } 2574 } else { 2575 cookie_ok = 1; 2576 } 2577 2578 /* 2579 * Now before we continue we must reconstruct our mbuf so that 2580 * normal processing of any other chunks will work. 2581 */ 2582 { 2583 struct mbuf *m_at; 2584 2585 m_at = m; 2586 while (SCTP_BUF_NEXT(m_at) != NULL) { 2587 m_at = SCTP_BUF_NEXT(m_at); 2588 } 2589 SCTP_BUF_NEXT(m_at) = m_sig; 2590 } 2591 2592 if (cookie_ok == 0) { 2593 SCTPDBG(SCTP_DEBUG_INPUT2, "handle_cookie_echo: cookie signature validation failed!\n"); 2594 SCTPDBG(SCTP_DEBUG_INPUT2, 2595 "offset = %u, cookie_offset = %u, sig_offset = %u\n", 2596 (uint32_t)offset, cookie_offset, sig_offset); 2597 return (NULL); 2598 } 2599 2600 /* 2601 * check the cookie timestamps to be sure it's not stale 2602 */ 2603 (void)SCTP_GETTIME_TIMEVAL(&now); 2604 /* Expire time is in Ticks, so we convert to seconds */ 2605 time_expires.tv_sec = cookie->time_entered.tv_sec + TICKS_TO_SEC(cookie->cookie_life); 2606 time_expires.tv_usec = cookie->time_entered.tv_usec; 2607 if (timevalcmp(&now, &time_expires, >)) { 2608 /* cookie is stale! */ 2609 struct mbuf *op_err; 2610 struct sctp_error_stale_cookie *cause; 2611 struct timeval diff; 2612 uint32_t staleness; 2613 2614 op_err = sctp_get_mbuf_for_msg(sizeof(struct sctp_error_stale_cookie), 2615 0, M_NOWAIT, 1, MT_DATA); 2616 if (op_err == NULL) { 2617 /* FOOBAR */ 2618 return (NULL); 2619 } 2620 /* Set the len */ 2621 SCTP_BUF_LEN(op_err) = sizeof(struct sctp_error_stale_cookie); 2622 cause = mtod(op_err, struct sctp_error_stale_cookie *); 2623 cause->cause.code = htons(SCTP_CAUSE_STALE_COOKIE); 2624 cause->cause.length = htons((sizeof(struct sctp_paramhdr) + 2625 (sizeof(uint32_t)))); 2626 diff = now; 2627 timevalsub(&diff, &time_expires); 2628 if ((uint32_t)diff.tv_sec > UINT32_MAX / 1000000) { 2629 staleness = UINT32_MAX; 2630 } else { 2631 staleness = diff.tv_sec * 1000000; 2632 } 2633 if (UINT32_MAX - staleness >= (uint32_t)diff.tv_usec) { 2634 staleness += diff.tv_usec; 2635 } else { 2636 staleness = UINT32_MAX; 2637 } 2638 cause->stale_time = htonl(staleness); 2639 sctp_send_operr_to(src, dst, sh, cookie->peers_vtag, op_err, 2640 mflowtype, mflowid, l_inp->fibnum, 2641 vrf_id, port); 2642 return (NULL); 2643 } 2644 /* 2645 * Now we must see with the lookup address if we have an existing 2646 * asoc. This will only happen if we were in the COOKIE-WAIT state 2647 * and a INIT collided with us and somewhere the peer sent the 2648 * cookie on another address besides the single address our assoc 2649 * had for him. In this case we will have one of the tie-tags set at 2650 * least AND the address field in the cookie can be used to look it 2651 * up. 2652 */ 2653 to = NULL; 2654 switch (cookie->addr_type) { 2655 #ifdef INET6 2656 case SCTP_IPV6_ADDRESS: 2657 memset(&sin6, 0, sizeof(sin6)); 2658 sin6.sin6_family = AF_INET6; 2659 sin6.sin6_len = sizeof(sin6); 2660 sin6.sin6_port = sh->src_port; 2661 sin6.sin6_scope_id = cookie->scope_id; 2662 memcpy(&sin6.sin6_addr.s6_addr, cookie->address, 2663 sizeof(sin6.sin6_addr.s6_addr)); 2664 to = (struct sockaddr *)&sin6; 2665 break; 2666 #endif 2667 #ifdef INET 2668 case SCTP_IPV4_ADDRESS: 2669 memset(&sin, 0, sizeof(sin)); 2670 sin.sin_family = AF_INET; 2671 sin.sin_len = sizeof(sin); 2672 sin.sin_port = sh->src_port; 2673 sin.sin_addr.s_addr = cookie->address[0]; 2674 to = (struct sockaddr *)&sin; 2675 break; 2676 #endif 2677 default: 2678 /* This should not happen */ 2679 return (NULL); 2680 } 2681 if (*stcb == NULL) { 2682 /* Yep, lets check */ 2683 *stcb = sctp_findassociation_ep_addr(inp_p, to, netp, dst, NULL); 2684 if (*stcb == NULL) { 2685 /* 2686 * We should have only got back the same inp. If we 2687 * got back a different ep we have a problem. The 2688 * original findep got back l_inp and now 2689 */ 2690 if (l_inp != *inp_p) { 2691 SCTP_PRINTF("Bad problem find_ep got a diff inp then special_locate?\n"); 2692 } 2693 } else { 2694 if (*locked_tcb == NULL) { 2695 /* 2696 * In this case we found the assoc only 2697 * after we locked the create lock. This 2698 * means we are in a colliding case and we 2699 * must make sure that we unlock the tcb if 2700 * its one of the cases where we throw away 2701 * the incoming packets. 2702 */ 2703 *locked_tcb = *stcb; 2704 2705 /* 2706 * We must also increment the inp ref count 2707 * since the ref_count flags was set when we 2708 * did not find the TCB, now we found it 2709 * which reduces the refcount.. we must 2710 * raise it back out to balance it all :-) 2711 */ 2712 SCTP_INP_INCR_REF((*stcb)->sctp_ep); 2713 if ((*stcb)->sctp_ep != l_inp) { 2714 SCTP_PRINTF("Huh? ep:%p diff then l_inp:%p?\n", 2715 (void *)(*stcb)->sctp_ep, (void *)l_inp); 2716 } 2717 } 2718 } 2719 } 2720 2721 cookie_len -= SCTP_SIGNATURE_SIZE; 2722 if (*stcb == NULL) { 2723 /* this is the "normal" case... get a new TCB */ 2724 *stcb = sctp_process_cookie_new(m, iphlen, offset, src, dst, sh, 2725 cookie, cookie_len, *inp_p, 2726 netp, to, ¬ification, 2727 auth_skipped, auth_offset, auth_len, 2728 mflowtype, mflowid, 2729 vrf_id, port); 2730 } else { 2731 /* this is abnormal... cookie-echo on existing TCB */ 2732 had_a_existing_tcb = 1; 2733 *stcb = sctp_process_cookie_existing(m, iphlen, offset, 2734 src, dst, sh, 2735 cookie, cookie_len, *inp_p, *stcb, netp, to, 2736 ¬ification, auth_skipped, auth_offset, auth_len, 2737 mflowtype, mflowid, 2738 vrf_id, port); 2739 } 2740 2741 if (*stcb == NULL) { 2742 /* still no TCB... must be bad cookie-echo */ 2743 return (NULL); 2744 } 2745 if (*netp != NULL) { 2746 (*netp)->flowtype = mflowtype; 2747 (*netp)->flowid = mflowid; 2748 } 2749 /* 2750 * Ok, we built an association so confirm the address we sent the 2751 * INIT-ACK to. 2752 */ 2753 netl = sctp_findnet(*stcb, to); 2754 /* 2755 * This code should in theory NOT run but 2756 */ 2757 if (netl == NULL) { 2758 /* TSNH! Huh, why do I need to add this address here? */ 2759 if (sctp_add_remote_addr(*stcb, to, NULL, port, 2760 SCTP_DONOT_SETSCOPE, SCTP_IN_COOKIE_PROC)) { 2761 return (NULL); 2762 } 2763 netl = sctp_findnet(*stcb, to); 2764 } 2765 if (netl) { 2766 if (netl->dest_state & SCTP_ADDR_UNCONFIRMED) { 2767 netl->dest_state &= ~SCTP_ADDR_UNCONFIRMED; 2768 (void)sctp_set_primary_addr((*stcb), (struct sockaddr *)NULL, 2769 netl); 2770 send_int_conf = 1; 2771 } 2772 } 2773 sctp_start_net_timers(*stcb); 2774 if ((*inp_p)->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) { 2775 if (!had_a_existing_tcb || 2776 (((*inp_p)->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) == 0)) { 2777 /* 2778 * If we have a NEW cookie or the connect never 2779 * reached the connected state during collision we 2780 * must do the TCP accept thing. 2781 */ 2782 struct socket *so, *oso; 2783 struct sctp_inpcb *inp; 2784 2785 if (notification == SCTP_NOTIFY_ASSOC_RESTART) { 2786 /* 2787 * For a restart we will keep the same 2788 * socket, no need to do anything. I THINK!! 2789 */ 2790 sctp_ulp_notify(notification, *stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 2791 if (send_int_conf) { 2792 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED, 2793 (*stcb), 0, (void *)netl, SCTP_SO_NOT_LOCKED); 2794 } 2795 return (m); 2796 } 2797 oso = (*inp_p)->sctp_socket; 2798 atomic_add_int(&(*stcb)->asoc.refcnt, 1); 2799 SCTP_TCB_UNLOCK((*stcb)); 2800 CURVNET_SET(oso->so_vnet); 2801 so = sonewconn(oso, 0 2802 ); 2803 CURVNET_RESTORE(); 2804 SCTP_TCB_LOCK((*stcb)); 2805 atomic_subtract_int(&(*stcb)->asoc.refcnt, 1); 2806 2807 if (so == NULL) { 2808 struct mbuf *op_err; 2809 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2810 struct socket *pcb_so; 2811 #endif 2812 /* Too many sockets */ 2813 SCTPDBG(SCTP_DEBUG_INPUT1, "process_cookie_new: no room for another socket!\n"); 2814 op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, ""); 2815 sctp_abort_association(*inp_p, NULL, m, iphlen, 2816 src, dst, sh, op_err, 2817 mflowtype, mflowid, 2818 vrf_id, port); 2819 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2820 pcb_so = SCTP_INP_SO(*inp_p); 2821 atomic_add_int(&(*stcb)->asoc.refcnt, 1); 2822 SCTP_TCB_UNLOCK((*stcb)); 2823 SCTP_SOCKET_LOCK(pcb_so, 1); 2824 SCTP_TCB_LOCK((*stcb)); 2825 atomic_subtract_int(&(*stcb)->asoc.refcnt, 1); 2826 #endif 2827 (void)sctp_free_assoc(*inp_p, *stcb, SCTP_NORMAL_PROC, 2828 SCTP_FROM_SCTP_INPUT + SCTP_LOC_23); 2829 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2830 SCTP_SOCKET_UNLOCK(pcb_so, 1); 2831 #endif 2832 return (NULL); 2833 } 2834 inp = (struct sctp_inpcb *)so->so_pcb; 2835 SCTP_INP_INCR_REF(inp); 2836 /* 2837 * We add the unbound flag here so that if we get an 2838 * soabort() before we get the move_pcb done, we 2839 * will properly cleanup. 2840 */ 2841 inp->sctp_flags = (SCTP_PCB_FLAGS_TCPTYPE | 2842 SCTP_PCB_FLAGS_CONNECTED | 2843 SCTP_PCB_FLAGS_IN_TCPPOOL | 2844 SCTP_PCB_FLAGS_UNBOUND | 2845 (SCTP_PCB_COPY_FLAGS & (*inp_p)->sctp_flags) | 2846 SCTP_PCB_FLAGS_DONT_WAKE); 2847 inp->sctp_features = (*inp_p)->sctp_features; 2848 inp->sctp_mobility_features = (*inp_p)->sctp_mobility_features; 2849 inp->sctp_socket = so; 2850 inp->sctp_frag_point = (*inp_p)->sctp_frag_point; 2851 inp->max_cwnd = (*inp_p)->max_cwnd; 2852 inp->sctp_cmt_on_off = (*inp_p)->sctp_cmt_on_off; 2853 inp->ecn_supported = (*inp_p)->ecn_supported; 2854 inp->prsctp_supported = (*inp_p)->prsctp_supported; 2855 inp->auth_supported = (*inp_p)->auth_supported; 2856 inp->asconf_supported = (*inp_p)->asconf_supported; 2857 inp->reconfig_supported = (*inp_p)->reconfig_supported; 2858 inp->nrsack_supported = (*inp_p)->nrsack_supported; 2859 inp->pktdrop_supported = (*inp_p)->pktdrop_supported; 2860 inp->partial_delivery_point = (*inp_p)->partial_delivery_point; 2861 inp->sctp_context = (*inp_p)->sctp_context; 2862 inp->local_strreset_support = (*inp_p)->local_strreset_support; 2863 inp->fibnum = (*inp_p)->fibnum; 2864 inp->inp_starting_point_for_iterator = NULL; 2865 /* 2866 * copy in the authentication parameters from the 2867 * original endpoint 2868 */ 2869 if (inp->sctp_ep.local_hmacs) 2870 sctp_free_hmaclist(inp->sctp_ep.local_hmacs); 2871 inp->sctp_ep.local_hmacs = 2872 sctp_copy_hmaclist((*inp_p)->sctp_ep.local_hmacs); 2873 if (inp->sctp_ep.local_auth_chunks) 2874 sctp_free_chunklist(inp->sctp_ep.local_auth_chunks); 2875 inp->sctp_ep.local_auth_chunks = 2876 sctp_copy_chunklist((*inp_p)->sctp_ep.local_auth_chunks); 2877 2878 /* 2879 * Now we must move it from one hash table to 2880 * another and get the tcb in the right place. 2881 */ 2882 2883 /* 2884 * This is where the one-2-one socket is put into 2885 * the accept state waiting for the accept! 2886 */ 2887 if (*stcb) { 2888 SCTP_ADD_SUBSTATE(*stcb, SCTP_STATE_IN_ACCEPT_QUEUE); 2889 } 2890 sctp_move_pcb_and_assoc(*inp_p, inp, *stcb); 2891 2892 atomic_add_int(&(*stcb)->asoc.refcnt, 1); 2893 SCTP_TCB_UNLOCK((*stcb)); 2894 2895 sctp_pull_off_control_to_new_inp((*inp_p), inp, *stcb, 2896 0); 2897 SCTP_TCB_LOCK((*stcb)); 2898 atomic_subtract_int(&(*stcb)->asoc.refcnt, 1); 2899 2900 2901 /* 2902 * now we must check to see if we were aborted while 2903 * the move was going on and the lock/unlock 2904 * happened. 2905 */ 2906 if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) { 2907 /* 2908 * yep it was, we leave the assoc attached 2909 * to the socket since the sctp_inpcb_free() 2910 * call will send an abort for us. 2911 */ 2912 SCTP_INP_DECR_REF(inp); 2913 return (NULL); 2914 } 2915 SCTP_INP_DECR_REF(inp); 2916 /* Switch over to the new guy */ 2917 *inp_p = inp; 2918 sctp_ulp_notify(notification, *stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 2919 if (send_int_conf) { 2920 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED, 2921 (*stcb), 0, (void *)netl, SCTP_SO_NOT_LOCKED); 2922 } 2923 2924 /* 2925 * Pull it from the incomplete queue and wake the 2926 * guy 2927 */ 2928 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2929 atomic_add_int(&(*stcb)->asoc.refcnt, 1); 2930 SCTP_TCB_UNLOCK((*stcb)); 2931 SCTP_SOCKET_LOCK(so, 1); 2932 #endif 2933 soisconnected(so); 2934 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2935 SCTP_TCB_LOCK((*stcb)); 2936 atomic_subtract_int(&(*stcb)->asoc.refcnt, 1); 2937 SCTP_SOCKET_UNLOCK(so, 1); 2938 #endif 2939 return (m); 2940 } 2941 } 2942 if (notification) { 2943 sctp_ulp_notify(notification, *stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 2944 } 2945 if (send_int_conf) { 2946 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED, 2947 (*stcb), 0, (void *)netl, SCTP_SO_NOT_LOCKED); 2948 } 2949 return (m); 2950 } 2951 2952 static void 2953 sctp_handle_cookie_ack(struct sctp_cookie_ack_chunk *cp SCTP_UNUSED, 2954 struct sctp_tcb *stcb, struct sctp_nets *net) 2955 { 2956 /* cp must not be used, others call this without a c-ack :-) */ 2957 struct sctp_association *asoc; 2958 2959 SCTPDBG(SCTP_DEBUG_INPUT2, 2960 "sctp_handle_cookie_ack: handling COOKIE-ACK\n"); 2961 if ((stcb == NULL) || (net == NULL)) { 2962 return; 2963 } 2964 2965 asoc = &stcb->asoc; 2966 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) { 2967 sctp_misc_ints(SCTP_THRESHOLD_CLEAR, 2968 asoc->overall_error_count, 2969 0, 2970 SCTP_FROM_SCTP_INPUT, 2971 __LINE__); 2972 } 2973 asoc->overall_error_count = 0; 2974 sctp_stop_all_cookie_timers(stcb); 2975 /* process according to association state */ 2976 if (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED) { 2977 /* state change only needed when I am in right state */ 2978 SCTPDBG(SCTP_DEBUG_INPUT2, "moving to OPEN state\n"); 2979 SCTP_SET_STATE(stcb, SCTP_STATE_OPEN); 2980 sctp_start_net_timers(stcb); 2981 if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) { 2982 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, 2983 stcb->sctp_ep, stcb, asoc->primary_destination); 2984 2985 } 2986 /* update RTO */ 2987 SCTP_STAT_INCR_COUNTER32(sctps_activeestab); 2988 SCTP_STAT_INCR_GAUGE32(sctps_currestab); 2989 if (asoc->overall_error_count == 0) { 2990 sctp_calculate_rto(stcb, asoc, net, &asoc->time_entered, 2991 SCTP_RTT_FROM_NON_DATA); 2992 } 2993 (void)SCTP_GETTIME_TIMEVAL(&asoc->time_entered); 2994 sctp_ulp_notify(SCTP_NOTIFY_ASSOC_UP, stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 2995 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) || 2996 (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) { 2997 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 2998 struct socket *so; 2999 3000 #endif 3001 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED; 3002 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 3003 so = SCTP_INP_SO(stcb->sctp_ep); 3004 atomic_add_int(&stcb->asoc.refcnt, 1); 3005 SCTP_TCB_UNLOCK(stcb); 3006 SCTP_SOCKET_LOCK(so, 1); 3007 SCTP_TCB_LOCK(stcb); 3008 atomic_subtract_int(&stcb->asoc.refcnt, 1); 3009 #endif 3010 if ((stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) == 0) { 3011 soisconnected(stcb->sctp_socket); 3012 } 3013 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 3014 SCTP_SOCKET_UNLOCK(so, 1); 3015 #endif 3016 } 3017 /* 3018 * since we did not send a HB make sure we don't double 3019 * things 3020 */ 3021 net->hb_responded = 1; 3022 3023 if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) { 3024 /* 3025 * We don't need to do the asconf thing, nor hb or 3026 * autoclose if the socket is closed. 3027 */ 3028 goto closed_socket; 3029 } 3030 3031 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, 3032 stcb, net); 3033 3034 3035 if (stcb->asoc.sctp_autoclose_ticks && 3036 sctp_is_feature_on(stcb->sctp_ep, SCTP_PCB_FLAGS_AUTOCLOSE)) { 3037 sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE, 3038 stcb->sctp_ep, stcb, NULL); 3039 } 3040 /* 3041 * send ASCONF if parameters are pending and ASCONFs are 3042 * allowed (eg. addresses changed when init/cookie echo were 3043 * in flight) 3044 */ 3045 if ((sctp_is_feature_on(stcb->sctp_ep, SCTP_PCB_FLAGS_DO_ASCONF)) && 3046 (stcb->asoc.asconf_supported == 1) && 3047 (!TAILQ_EMPTY(&stcb->asoc.asconf_queue))) { 3048 #ifdef SCTP_TIMER_BASED_ASCONF 3049 sctp_timer_start(SCTP_TIMER_TYPE_ASCONF, 3050 stcb->sctp_ep, stcb, 3051 stcb->asoc.primary_destination); 3052 #else 3053 sctp_send_asconf(stcb, stcb->asoc.primary_destination, 3054 SCTP_ADDR_NOT_LOCKED); 3055 #endif 3056 } 3057 } 3058 closed_socket: 3059 /* Toss the cookie if I can */ 3060 sctp_toss_old_cookies(stcb, asoc); 3061 if (!TAILQ_EMPTY(&asoc->sent_queue)) { 3062 /* Restart the timer if we have pending data */ 3063 struct sctp_tmit_chunk *chk; 3064 3065 chk = TAILQ_FIRST(&asoc->sent_queue); 3066 sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, chk->whoTo); 3067 } 3068 } 3069 3070 static void 3071 sctp_handle_ecn_echo(struct sctp_ecne_chunk *cp, 3072 struct sctp_tcb *stcb) 3073 { 3074 struct sctp_nets *net; 3075 struct sctp_tmit_chunk *lchk; 3076 struct sctp_ecne_chunk bkup; 3077 uint8_t override_bit; 3078 uint32_t tsn, window_data_tsn; 3079 int len; 3080 unsigned int pkt_cnt; 3081 3082 len = ntohs(cp->ch.chunk_length); 3083 if ((len != sizeof(struct sctp_ecne_chunk)) && 3084 (len != sizeof(struct old_sctp_ecne_chunk))) { 3085 return; 3086 } 3087 if (len == sizeof(struct old_sctp_ecne_chunk)) { 3088 /* Its the old format */ 3089 memcpy(&bkup, cp, sizeof(struct old_sctp_ecne_chunk)); 3090 bkup.num_pkts_since_cwr = htonl(1); 3091 cp = &bkup; 3092 } 3093 SCTP_STAT_INCR(sctps_recvecne); 3094 tsn = ntohl(cp->tsn); 3095 pkt_cnt = ntohl(cp->num_pkts_since_cwr); 3096 lchk = TAILQ_LAST(&stcb->asoc.send_queue, sctpchunk_listhead); 3097 if (lchk == NULL) { 3098 window_data_tsn = stcb->asoc.sending_seq - 1; 3099 } else { 3100 window_data_tsn = lchk->rec.data.tsn; 3101 } 3102 3103 /* Find where it was sent to if possible. */ 3104 net = NULL; 3105 TAILQ_FOREACH(lchk, &stcb->asoc.sent_queue, sctp_next) { 3106 if (lchk->rec.data.tsn == tsn) { 3107 net = lchk->whoTo; 3108 net->ecn_prev_cwnd = lchk->rec.data.cwnd_at_send; 3109 break; 3110 } 3111 if (SCTP_TSN_GT(lchk->rec.data.tsn, tsn)) { 3112 break; 3113 } 3114 } 3115 if (net == NULL) { 3116 /* 3117 * What to do. A previous send of a CWR was possibly lost. 3118 * See how old it is, we may have it marked on the actual 3119 * net. 3120 */ 3121 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 3122 if (tsn == net->last_cwr_tsn) { 3123 /* Found him, send it off */ 3124 break; 3125 } 3126 } 3127 if (net == NULL) { 3128 /* 3129 * If we reach here, we need to send a special CWR 3130 * that says hey, we did this a long time ago and 3131 * you lost the response. 3132 */ 3133 net = TAILQ_FIRST(&stcb->asoc.nets); 3134 if (net == NULL) { 3135 /* TSNH */ 3136 return; 3137 } 3138 override_bit = SCTP_CWR_REDUCE_OVERRIDE; 3139 } else { 3140 override_bit = 0; 3141 } 3142 } else { 3143 override_bit = 0; 3144 } 3145 if (SCTP_TSN_GT(tsn, net->cwr_window_tsn) && 3146 ((override_bit & SCTP_CWR_REDUCE_OVERRIDE) == 0)) { 3147 /* 3148 * JRS - Use the congestion control given in the pluggable 3149 * CC module 3150 */ 3151 stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo(stcb, net, 0, pkt_cnt); 3152 /* 3153 * We reduce once every RTT. So we will only lower cwnd at 3154 * the next sending seq i.e. the window_data_tsn 3155 */ 3156 net->cwr_window_tsn = window_data_tsn; 3157 net->ecn_ce_pkt_cnt += pkt_cnt; 3158 net->lost_cnt = pkt_cnt; 3159 net->last_cwr_tsn = tsn; 3160 } else { 3161 override_bit |= SCTP_CWR_IN_SAME_WINDOW; 3162 if (SCTP_TSN_GT(tsn, net->last_cwr_tsn) && 3163 ((override_bit & SCTP_CWR_REDUCE_OVERRIDE) == 0)) { 3164 /* 3165 * Another loss in the same window update how many 3166 * marks/packets lost we have had. 3167 */ 3168 int cnt = 1; 3169 3170 if (pkt_cnt > net->lost_cnt) { 3171 /* Should be the case */ 3172 cnt = (pkt_cnt - net->lost_cnt); 3173 net->ecn_ce_pkt_cnt += cnt; 3174 } 3175 net->lost_cnt = pkt_cnt; 3176 net->last_cwr_tsn = tsn; 3177 /* 3178 * Most CC functions will ignore this call, since we 3179 * are in-window yet of the initial CE the peer saw. 3180 */ 3181 stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo(stcb, net, 1, cnt); 3182 } 3183 } 3184 /* 3185 * We always send a CWR this way if our previous one was lost our 3186 * peer will get an update, or if it is not time again to reduce we 3187 * still get the cwr to the peer. Note we set the override when we 3188 * could not find the TSN on the chunk or the destination network. 3189 */ 3190 sctp_send_cwr(stcb, net, net->last_cwr_tsn, override_bit); 3191 } 3192 3193 static void 3194 sctp_handle_ecn_cwr(struct sctp_cwr_chunk *cp, struct sctp_tcb *stcb, struct sctp_nets *net) 3195 { 3196 /* 3197 * Here we get a CWR from the peer. We must look in the outqueue and 3198 * make sure that we have a covered ECNE in the control chunk part. 3199 * If so remove it. 3200 */ 3201 struct sctp_tmit_chunk *chk, *nchk; 3202 struct sctp_ecne_chunk *ecne; 3203 int override; 3204 uint32_t cwr_tsn; 3205 3206 cwr_tsn = ntohl(cp->tsn); 3207 override = cp->ch.chunk_flags & SCTP_CWR_REDUCE_OVERRIDE; 3208 TAILQ_FOREACH_SAFE(chk, &stcb->asoc.control_send_queue, sctp_next, nchk) { 3209 if (chk->rec.chunk_id.id != SCTP_ECN_ECHO) { 3210 continue; 3211 } 3212 if ((override == 0) && (chk->whoTo != net)) { 3213 /* Must be from the right src unless override is set */ 3214 continue; 3215 } 3216 ecne = mtod(chk->data, struct sctp_ecne_chunk *); 3217 if (SCTP_TSN_GE(cwr_tsn, ntohl(ecne->tsn))) { 3218 /* this covers this ECNE, we can remove it */ 3219 stcb->asoc.ecn_echo_cnt_onq--; 3220 TAILQ_REMOVE(&stcb->asoc.control_send_queue, chk, 3221 sctp_next); 3222 stcb->asoc.ctrl_queue_cnt--; 3223 sctp_m_freem(chk->data); 3224 chk->data = NULL; 3225 sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED); 3226 if (override == 0) { 3227 break; 3228 } 3229 } 3230 } 3231 } 3232 3233 static void 3234 sctp_handle_shutdown_complete(struct sctp_shutdown_complete_chunk *cp SCTP_UNUSED, 3235 struct sctp_tcb *stcb, struct sctp_nets *net) 3236 { 3237 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 3238 struct socket *so; 3239 #endif 3240 3241 SCTPDBG(SCTP_DEBUG_INPUT2, 3242 "sctp_handle_shutdown_complete: handling SHUTDOWN-COMPLETE\n"); 3243 if (stcb == NULL) 3244 return; 3245 3246 /* process according to association state */ 3247 if (SCTP_GET_STATE(stcb) != SCTP_STATE_SHUTDOWN_ACK_SENT) { 3248 /* unexpected SHUTDOWN-COMPLETE... so ignore... */ 3249 SCTPDBG(SCTP_DEBUG_INPUT2, 3250 "sctp_handle_shutdown_complete: not in SCTP_STATE_SHUTDOWN_ACK_SENT --- ignore\n"); 3251 SCTP_TCB_UNLOCK(stcb); 3252 return; 3253 } 3254 /* notify upper layer protocol */ 3255 if (stcb->sctp_socket) { 3256 sctp_ulp_notify(SCTP_NOTIFY_ASSOC_DOWN, stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 3257 } 3258 #ifdef INVARIANTS 3259 if (!TAILQ_EMPTY(&stcb->asoc.send_queue) || 3260 !TAILQ_EMPTY(&stcb->asoc.sent_queue) || 3261 sctp_is_there_unsent_data(stcb, SCTP_SO_NOT_LOCKED)) { 3262 panic("Queues are not empty when handling SHUTDOWN-COMPLETE"); 3263 } 3264 #endif 3265 /* stop the timer */ 3266 sctp_timer_stop(SCTP_TIMER_TYPE_SHUTDOWNACK, stcb->sctp_ep, stcb, net, 3267 SCTP_FROM_SCTP_INPUT + SCTP_LOC_24); 3268 SCTP_STAT_INCR_COUNTER32(sctps_shutdown); 3269 /* free the TCB */ 3270 SCTPDBG(SCTP_DEBUG_INPUT2, 3271 "sctp_handle_shutdown_complete: calls free-asoc\n"); 3272 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 3273 so = SCTP_INP_SO(stcb->sctp_ep); 3274 atomic_add_int(&stcb->asoc.refcnt, 1); 3275 SCTP_TCB_UNLOCK(stcb); 3276 SCTP_SOCKET_LOCK(so, 1); 3277 SCTP_TCB_LOCK(stcb); 3278 atomic_subtract_int(&stcb->asoc.refcnt, 1); 3279 #endif 3280 (void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC, 3281 SCTP_FROM_SCTP_INPUT + SCTP_LOC_25); 3282 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 3283 SCTP_SOCKET_UNLOCK(so, 1); 3284 #endif 3285 return; 3286 } 3287 3288 static int 3289 process_chunk_drop(struct sctp_tcb *stcb, struct sctp_chunk_desc *desc, 3290 struct sctp_nets *net, uint8_t flg) 3291 { 3292 switch (desc->chunk_type) { 3293 case SCTP_DATA: 3294 /* find the tsn to resend (possibly */ 3295 { 3296 uint32_t tsn; 3297 struct sctp_tmit_chunk *tp1; 3298 3299 tsn = ntohl(desc->tsn_ifany); 3300 TAILQ_FOREACH(tp1, &stcb->asoc.sent_queue, sctp_next) { 3301 if (tp1->rec.data.tsn == tsn) { 3302 /* found it */ 3303 break; 3304 } 3305 if (SCTP_TSN_GT(tp1->rec.data.tsn, tsn)) { 3306 /* not found */ 3307 tp1 = NULL; 3308 break; 3309 } 3310 } 3311 if (tp1 == NULL) { 3312 /* 3313 * Do it the other way , aka without paying 3314 * attention to queue seq order. 3315 */ 3316 SCTP_STAT_INCR(sctps_pdrpdnfnd); 3317 TAILQ_FOREACH(tp1, &stcb->asoc.sent_queue, sctp_next) { 3318 if (tp1->rec.data.tsn == tsn) { 3319 /* found it */ 3320 break; 3321 } 3322 } 3323 } 3324 if (tp1 == NULL) { 3325 SCTP_STAT_INCR(sctps_pdrptsnnf); 3326 } 3327 if ((tp1) && (tp1->sent < SCTP_DATAGRAM_ACKED)) { 3328 uint8_t *ddp; 3329 3330 if (((flg & SCTP_BADCRC) == 0) && 3331 ((flg & SCTP_FROM_MIDDLE_BOX) == 0)) { 3332 return (0); 3333 } 3334 if ((stcb->asoc.peers_rwnd == 0) && 3335 ((flg & SCTP_FROM_MIDDLE_BOX) == 0)) { 3336 SCTP_STAT_INCR(sctps_pdrpdiwnp); 3337 return (0); 3338 } 3339 if (stcb->asoc.peers_rwnd == 0 && 3340 (flg & SCTP_FROM_MIDDLE_BOX)) { 3341 SCTP_STAT_INCR(sctps_pdrpdizrw); 3342 return (0); 3343 } 3344 ddp = (uint8_t *)(mtod(tp1->data, caddr_t)+ 3345 sizeof(struct sctp_data_chunk)); 3346 { 3347 unsigned int iii; 3348 3349 for (iii = 0; iii < sizeof(desc->data_bytes); 3350 iii++) { 3351 if (ddp[iii] != desc->data_bytes[iii]) { 3352 SCTP_STAT_INCR(sctps_pdrpbadd); 3353 return (-1); 3354 } 3355 } 3356 } 3357 3358 if (tp1->do_rtt) { 3359 /* 3360 * this guy had a RTO calculation 3361 * pending on it, cancel it 3362 */ 3363 if (tp1->whoTo->rto_needed == 0) { 3364 tp1->whoTo->rto_needed = 1; 3365 } 3366 tp1->do_rtt = 0; 3367 } 3368 SCTP_STAT_INCR(sctps_pdrpmark); 3369 if (tp1->sent != SCTP_DATAGRAM_RESEND) 3370 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt); 3371 /* 3372 * mark it as if we were doing a FR, since 3373 * we will be getting gap ack reports behind 3374 * the info from the router. 3375 */ 3376 tp1->rec.data.doing_fast_retransmit = 1; 3377 /* 3378 * mark the tsn with what sequences can 3379 * cause a new FR. 3380 */ 3381 if (TAILQ_EMPTY(&stcb->asoc.send_queue)) { 3382 tp1->rec.data.fast_retran_tsn = stcb->asoc.sending_seq; 3383 } else { 3384 tp1->rec.data.fast_retran_tsn = (TAILQ_FIRST(&stcb->asoc.send_queue))->rec.data.tsn; 3385 } 3386 3387 /* restart the timer */ 3388 sctp_timer_stop(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, 3389 stcb, tp1->whoTo, 3390 SCTP_FROM_SCTP_INPUT + SCTP_LOC_26); 3391 sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, 3392 stcb, tp1->whoTo); 3393 3394 /* fix counts and things */ 3395 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_FLIGHT_LOGGING_ENABLE) { 3396 sctp_misc_ints(SCTP_FLIGHT_LOG_DOWN_PDRP, 3397 tp1->whoTo->flight_size, 3398 tp1->book_size, 3399 (uint32_t)(uintptr_t)stcb, 3400 tp1->rec.data.tsn); 3401 } 3402 if (tp1->sent < SCTP_DATAGRAM_RESEND) { 3403 sctp_flight_size_decrease(tp1); 3404 sctp_total_flight_decrease(stcb, tp1); 3405 } 3406 tp1->sent = SCTP_DATAGRAM_RESEND; 3407 } { 3408 /* audit code */ 3409 unsigned int audit; 3410 3411 audit = 0; 3412 TAILQ_FOREACH(tp1, &stcb->asoc.sent_queue, sctp_next) { 3413 if (tp1->sent == SCTP_DATAGRAM_RESEND) 3414 audit++; 3415 } 3416 TAILQ_FOREACH(tp1, &stcb->asoc.control_send_queue, 3417 sctp_next) { 3418 if (tp1->sent == SCTP_DATAGRAM_RESEND) 3419 audit++; 3420 } 3421 if (audit != stcb->asoc.sent_queue_retran_cnt) { 3422 SCTP_PRINTF("**Local Audit finds cnt:%d asoc cnt:%d\n", 3423 audit, stcb->asoc.sent_queue_retran_cnt); 3424 #ifndef SCTP_AUDITING_ENABLED 3425 stcb->asoc.sent_queue_retran_cnt = audit; 3426 #endif 3427 } 3428 } 3429 } 3430 break; 3431 case SCTP_ASCONF: 3432 { 3433 struct sctp_tmit_chunk *asconf; 3434 3435 TAILQ_FOREACH(asconf, &stcb->asoc.control_send_queue, 3436 sctp_next) { 3437 if (asconf->rec.chunk_id.id == SCTP_ASCONF) { 3438 break; 3439 } 3440 } 3441 if (asconf) { 3442 if (asconf->sent != SCTP_DATAGRAM_RESEND) 3443 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt); 3444 asconf->sent = SCTP_DATAGRAM_RESEND; 3445 asconf->snd_count--; 3446 } 3447 } 3448 break; 3449 case SCTP_INITIATION: 3450 /* resend the INIT */ 3451 stcb->asoc.dropped_special_cnt++; 3452 if (stcb->asoc.dropped_special_cnt < SCTP_RETRY_DROPPED_THRESH) { 3453 /* 3454 * If we can get it in, in a few attempts we do 3455 * this, otherwise we let the timer fire. 3456 */ 3457 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, stcb->sctp_ep, 3458 stcb, net, 3459 SCTP_FROM_SCTP_INPUT + SCTP_LOC_27); 3460 sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED); 3461 } 3462 break; 3463 case SCTP_SELECTIVE_ACK: 3464 case SCTP_NR_SELECTIVE_ACK: 3465 /* resend the sack */ 3466 sctp_send_sack(stcb, SCTP_SO_NOT_LOCKED); 3467 break; 3468 case SCTP_HEARTBEAT_REQUEST: 3469 /* resend a demand HB */ 3470 if ((stcb->asoc.overall_error_count + 3) < stcb->asoc.max_send_times) { 3471 /* 3472 * Only retransmit if we KNOW we wont destroy the 3473 * tcb 3474 */ 3475 sctp_send_hb(stcb, net, SCTP_SO_NOT_LOCKED); 3476 } 3477 break; 3478 case SCTP_SHUTDOWN: 3479 sctp_send_shutdown(stcb, net); 3480 break; 3481 case SCTP_SHUTDOWN_ACK: 3482 sctp_send_shutdown_ack(stcb, net); 3483 break; 3484 case SCTP_COOKIE_ECHO: 3485 { 3486 struct sctp_tmit_chunk *cookie; 3487 3488 cookie = NULL; 3489 TAILQ_FOREACH(cookie, &stcb->asoc.control_send_queue, 3490 sctp_next) { 3491 if (cookie->rec.chunk_id.id == SCTP_COOKIE_ECHO) { 3492 break; 3493 } 3494 } 3495 if (cookie) { 3496 if (cookie->sent != SCTP_DATAGRAM_RESEND) 3497 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt); 3498 cookie->sent = SCTP_DATAGRAM_RESEND; 3499 sctp_stop_all_cookie_timers(stcb); 3500 } 3501 } 3502 break; 3503 case SCTP_COOKIE_ACK: 3504 sctp_send_cookie_ack(stcb); 3505 break; 3506 case SCTP_ASCONF_ACK: 3507 /* resend last asconf ack */ 3508 sctp_send_asconf_ack(stcb); 3509 break; 3510 case SCTP_IFORWARD_CUM_TSN: 3511 case SCTP_FORWARD_CUM_TSN: 3512 send_forward_tsn(stcb, &stcb->asoc); 3513 break; 3514 /* can't do anything with these */ 3515 case SCTP_PACKET_DROPPED: 3516 case SCTP_INITIATION_ACK: /* this should not happen */ 3517 case SCTP_HEARTBEAT_ACK: 3518 case SCTP_ABORT_ASSOCIATION: 3519 case SCTP_OPERATION_ERROR: 3520 case SCTP_SHUTDOWN_COMPLETE: 3521 case SCTP_ECN_ECHO: 3522 case SCTP_ECN_CWR: 3523 default: 3524 break; 3525 } 3526 return (0); 3527 } 3528 3529 void 3530 sctp_reset_in_stream(struct sctp_tcb *stcb, uint32_t number_entries, uint16_t *list) 3531 { 3532 uint32_t i; 3533 uint16_t temp; 3534 3535 /* 3536 * We set things to 0xffffffff since this is the last delivered 3537 * sequence and we will be sending in 0 after the reset. 3538 */ 3539 3540 if (number_entries) { 3541 for (i = 0; i < number_entries; i++) { 3542 temp = ntohs(list[i]); 3543 if (temp >= stcb->asoc.streamincnt) { 3544 continue; 3545 } 3546 stcb->asoc.strmin[temp].last_mid_delivered = 0xffffffff; 3547 } 3548 } else { 3549 list = NULL; 3550 for (i = 0; i < stcb->asoc.streamincnt; i++) { 3551 stcb->asoc.strmin[i].last_mid_delivered = 0xffffffff; 3552 } 3553 } 3554 sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_RECV, stcb, number_entries, (void *)list, SCTP_SO_NOT_LOCKED); 3555 } 3556 3557 static void 3558 sctp_reset_out_streams(struct sctp_tcb *stcb, uint32_t number_entries, uint16_t *list) 3559 { 3560 uint32_t i; 3561 uint16_t temp; 3562 3563 if (number_entries > 0) { 3564 for (i = 0; i < number_entries; i++) { 3565 temp = ntohs(list[i]); 3566 if (temp >= stcb->asoc.streamoutcnt) { 3567 /* no such stream */ 3568 continue; 3569 } 3570 stcb->asoc.strmout[temp].next_mid_ordered = 0; 3571 stcb->asoc.strmout[temp].next_mid_unordered = 0; 3572 } 3573 } else { 3574 for (i = 0; i < stcb->asoc.streamoutcnt; i++) { 3575 stcb->asoc.strmout[i].next_mid_ordered = 0; 3576 stcb->asoc.strmout[i].next_mid_unordered = 0; 3577 } 3578 } 3579 sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_SEND, stcb, number_entries, (void *)list, SCTP_SO_NOT_LOCKED); 3580 } 3581 3582 static void 3583 sctp_reset_clear_pending(struct sctp_tcb *stcb, uint32_t number_entries, uint16_t *list) 3584 { 3585 uint32_t i; 3586 uint16_t temp; 3587 3588 if (number_entries > 0) { 3589 for (i = 0; i < number_entries; i++) { 3590 temp = ntohs(list[i]); 3591 if (temp >= stcb->asoc.streamoutcnt) { 3592 /* no such stream */ 3593 continue; 3594 } 3595 stcb->asoc.strmout[temp].state = SCTP_STREAM_OPEN; 3596 } 3597 } else { 3598 for (i = 0; i < stcb->asoc.streamoutcnt; i++) { 3599 stcb->asoc.strmout[i].state = SCTP_STREAM_OPEN; 3600 } 3601 } 3602 } 3603 3604 3605 struct sctp_stream_reset_request * 3606 sctp_find_stream_reset(struct sctp_tcb *stcb, uint32_t seq, struct sctp_tmit_chunk **bchk) 3607 { 3608 struct sctp_association *asoc; 3609 struct sctp_chunkhdr *ch; 3610 struct sctp_stream_reset_request *r; 3611 struct sctp_tmit_chunk *chk; 3612 int len, clen; 3613 3614 asoc = &stcb->asoc; 3615 if (TAILQ_EMPTY(&stcb->asoc.control_send_queue)) { 3616 asoc->stream_reset_outstanding = 0; 3617 return (NULL); 3618 } 3619 if (stcb->asoc.str_reset == NULL) { 3620 asoc->stream_reset_outstanding = 0; 3621 return (NULL); 3622 } 3623 chk = stcb->asoc.str_reset; 3624 if (chk->data == NULL) { 3625 return (NULL); 3626 } 3627 if (bchk) { 3628 /* he wants a copy of the chk pointer */ 3629 *bchk = chk; 3630 } 3631 clen = chk->send_size; 3632 ch = mtod(chk->data, struct sctp_chunkhdr *); 3633 r = (struct sctp_stream_reset_request *)(ch + 1); 3634 if (ntohl(r->request_seq) == seq) { 3635 /* found it */ 3636 return (r); 3637 } 3638 len = SCTP_SIZE32(ntohs(r->ph.param_length)); 3639 if (clen > (len + (int)sizeof(struct sctp_chunkhdr))) { 3640 /* move to the next one, there can only be a max of two */ 3641 r = (struct sctp_stream_reset_request *)((caddr_t)r + len); 3642 if (ntohl(r->request_seq) == seq) { 3643 return (r); 3644 } 3645 } 3646 /* that seq is not here */ 3647 return (NULL); 3648 } 3649 3650 static void 3651 sctp_clean_up_stream_reset(struct sctp_tcb *stcb) 3652 { 3653 struct sctp_association *asoc; 3654 struct sctp_tmit_chunk *chk; 3655 3656 asoc = &stcb->asoc; 3657 chk = asoc->str_reset; 3658 if (chk == NULL) { 3659 return; 3660 } 3661 asoc->str_reset = NULL; 3662 sctp_timer_stop(SCTP_TIMER_TYPE_STRRESET, stcb->sctp_ep, stcb, 3663 chk->whoTo, SCTP_FROM_SCTP_INPUT + SCTP_LOC_28); 3664 TAILQ_REMOVE(&asoc->control_send_queue, chk, sctp_next); 3665 asoc->ctrl_queue_cnt--; 3666 if (chk->data) { 3667 sctp_m_freem(chk->data); 3668 chk->data = NULL; 3669 } 3670 sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED); 3671 } 3672 3673 3674 static int 3675 sctp_handle_stream_reset_response(struct sctp_tcb *stcb, 3676 uint32_t seq, uint32_t action, 3677 struct sctp_stream_reset_response *respin) 3678 { 3679 uint16_t type; 3680 int lparam_len; 3681 struct sctp_association *asoc = &stcb->asoc; 3682 struct sctp_tmit_chunk *chk; 3683 struct sctp_stream_reset_request *req_param; 3684 struct sctp_stream_reset_out_request *req_out_param; 3685 struct sctp_stream_reset_in_request *req_in_param; 3686 uint32_t number_entries; 3687 3688 if (asoc->stream_reset_outstanding == 0) { 3689 /* duplicate */ 3690 return (0); 3691 } 3692 if (seq == stcb->asoc.str_reset_seq_out) { 3693 req_param = sctp_find_stream_reset(stcb, seq, &chk); 3694 if (req_param != NULL) { 3695 stcb->asoc.str_reset_seq_out++; 3696 type = ntohs(req_param->ph.param_type); 3697 lparam_len = ntohs(req_param->ph.param_length); 3698 if (type == SCTP_STR_RESET_OUT_REQUEST) { 3699 int no_clear = 0; 3700 3701 req_out_param = (struct sctp_stream_reset_out_request *)req_param; 3702 number_entries = (lparam_len - sizeof(struct sctp_stream_reset_out_request)) / sizeof(uint16_t); 3703 asoc->stream_reset_out_is_outstanding = 0; 3704 if (asoc->stream_reset_outstanding) 3705 asoc->stream_reset_outstanding--; 3706 if (action == SCTP_STREAM_RESET_RESULT_PERFORMED) { 3707 /* do it */ 3708 sctp_reset_out_streams(stcb, number_entries, req_out_param->list_of_streams); 3709 } else if (action == SCTP_STREAM_RESET_RESULT_DENIED) { 3710 sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_DENIED_OUT, stcb, number_entries, req_out_param->list_of_streams, SCTP_SO_NOT_LOCKED); 3711 } else if (action == SCTP_STREAM_RESET_RESULT_IN_PROGRESS) { 3712 /* 3713 * Set it up so we don't stop 3714 * retransmitting 3715 */ 3716 asoc->stream_reset_outstanding++; 3717 stcb->asoc.str_reset_seq_out--; 3718 asoc->stream_reset_out_is_outstanding = 1; 3719 no_clear = 1; 3720 } else { 3721 sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_FAILED_OUT, stcb, number_entries, req_out_param->list_of_streams, SCTP_SO_NOT_LOCKED); 3722 } 3723 if (no_clear == 0) { 3724 sctp_reset_clear_pending(stcb, number_entries, req_out_param->list_of_streams); 3725 } 3726 } else if (type == SCTP_STR_RESET_IN_REQUEST) { 3727 req_in_param = (struct sctp_stream_reset_in_request *)req_param; 3728 number_entries = (lparam_len - sizeof(struct sctp_stream_reset_in_request)) / sizeof(uint16_t); 3729 if (asoc->stream_reset_outstanding) 3730 asoc->stream_reset_outstanding--; 3731 if (action == SCTP_STREAM_RESET_RESULT_DENIED) { 3732 sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_DENIED_IN, stcb, 3733 number_entries, req_in_param->list_of_streams, SCTP_SO_NOT_LOCKED); 3734 } else if (action != SCTP_STREAM_RESET_RESULT_PERFORMED) { 3735 sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_FAILED_IN, stcb, 3736 number_entries, req_in_param->list_of_streams, SCTP_SO_NOT_LOCKED); 3737 } 3738 } else if (type == SCTP_STR_RESET_ADD_OUT_STREAMS) { 3739 /* Ok we now may have more streams */ 3740 int num_stream; 3741 3742 num_stream = stcb->asoc.strm_pending_add_size; 3743 if (num_stream > (stcb->asoc.strm_realoutsize - stcb->asoc.streamoutcnt)) { 3744 /* TSNH */ 3745 num_stream = stcb->asoc.strm_realoutsize - stcb->asoc.streamoutcnt; 3746 } 3747 stcb->asoc.strm_pending_add_size = 0; 3748 if (asoc->stream_reset_outstanding) 3749 asoc->stream_reset_outstanding--; 3750 if (action == SCTP_STREAM_RESET_RESULT_PERFORMED) { 3751 /* Put the new streams into effect */ 3752 int i; 3753 3754 for (i = asoc->streamoutcnt; i < (asoc->streamoutcnt + num_stream); i++) { 3755 asoc->strmout[i].state = SCTP_STREAM_OPEN; 3756 } 3757 asoc->streamoutcnt += num_stream; 3758 sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 0); 3759 } else if (action == SCTP_STREAM_RESET_RESULT_DENIED) { 3760 sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 3761 SCTP_STREAM_CHANGE_DENIED); 3762 } else { 3763 sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 3764 SCTP_STREAM_CHANGE_FAILED); 3765 } 3766 } else if (type == SCTP_STR_RESET_ADD_IN_STREAMS) { 3767 if (asoc->stream_reset_outstanding) 3768 asoc->stream_reset_outstanding--; 3769 if (action == SCTP_STREAM_RESET_RESULT_DENIED) { 3770 sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 3771 SCTP_STREAM_CHANGE_DENIED); 3772 } else if (action != SCTP_STREAM_RESET_RESULT_PERFORMED) { 3773 sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 3774 SCTP_STREAM_CHANGE_FAILED); 3775 } 3776 } else if (type == SCTP_STR_RESET_TSN_REQUEST) { 3777 /** 3778 * a) Adopt the new in tsn. 3779 * b) reset the map 3780 * c) Adopt the new out-tsn 3781 */ 3782 struct sctp_stream_reset_response_tsn *resp; 3783 struct sctp_forward_tsn_chunk fwdtsn; 3784 int abort_flag = 0; 3785 3786 if (respin == NULL) { 3787 /* huh ? */ 3788 return (0); 3789 } 3790 if (ntohs(respin->ph.param_length) < sizeof(struct sctp_stream_reset_response_tsn)) { 3791 return (0); 3792 } 3793 if (action == SCTP_STREAM_RESET_RESULT_PERFORMED) { 3794 resp = (struct sctp_stream_reset_response_tsn *)respin; 3795 asoc->stream_reset_outstanding--; 3796 fwdtsn.ch.chunk_length = htons(sizeof(struct sctp_forward_tsn_chunk)); 3797 fwdtsn.ch.chunk_type = SCTP_FORWARD_CUM_TSN; 3798 fwdtsn.new_cumulative_tsn = htonl(ntohl(resp->senders_next_tsn) - 1); 3799 sctp_handle_forward_tsn(stcb, &fwdtsn, &abort_flag, NULL, 0); 3800 if (abort_flag) { 3801 return (1); 3802 } 3803 stcb->asoc.highest_tsn_inside_map = (ntohl(resp->senders_next_tsn) - 1); 3804 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MAP_LOGGING_ENABLE) { 3805 sctp_log_map(0, 7, asoc->highest_tsn_inside_map, SCTP_MAP_SLIDE_RESULT); 3806 } 3807 3808 stcb->asoc.tsn_last_delivered = stcb->asoc.cumulative_tsn = stcb->asoc.highest_tsn_inside_map; 3809 stcb->asoc.mapping_array_base_tsn = ntohl(resp->senders_next_tsn); 3810 memset(stcb->asoc.mapping_array, 0, stcb->asoc.mapping_array_size); 3811 3812 stcb->asoc.highest_tsn_inside_nr_map = stcb->asoc.highest_tsn_inside_map; 3813 memset(stcb->asoc.nr_mapping_array, 0, stcb->asoc.mapping_array_size); 3814 3815 stcb->asoc.sending_seq = ntohl(resp->receivers_next_tsn); 3816 stcb->asoc.last_acked_seq = stcb->asoc.cumulative_tsn; 3817 3818 sctp_reset_out_streams(stcb, 0, (uint16_t *)NULL); 3819 sctp_reset_in_stream(stcb, 0, (uint16_t *)NULL); 3820 sctp_notify_stream_reset_tsn(stcb, stcb->asoc.sending_seq, (stcb->asoc.mapping_array_base_tsn + 1), 0); 3821 } else if (action == SCTP_STREAM_RESET_RESULT_DENIED) { 3822 sctp_notify_stream_reset_tsn(stcb, stcb->asoc.sending_seq, (stcb->asoc.mapping_array_base_tsn + 1), 3823 SCTP_ASSOC_RESET_DENIED); 3824 } else { 3825 sctp_notify_stream_reset_tsn(stcb, stcb->asoc.sending_seq, (stcb->asoc.mapping_array_base_tsn + 1), 3826 SCTP_ASSOC_RESET_FAILED); 3827 } 3828 } 3829 /* get rid of the request and get the request flags */ 3830 if (asoc->stream_reset_outstanding == 0) { 3831 sctp_clean_up_stream_reset(stcb); 3832 } 3833 } 3834 } 3835 if (asoc->stream_reset_outstanding == 0) { 3836 sctp_send_stream_reset_out_if_possible(stcb, SCTP_SO_NOT_LOCKED); 3837 } 3838 return (0); 3839 } 3840 3841 static void 3842 sctp_handle_str_reset_request_in(struct sctp_tcb *stcb, 3843 struct sctp_tmit_chunk *chk, 3844 struct sctp_stream_reset_in_request *req, int trunc) 3845 { 3846 uint32_t seq; 3847 int len, i; 3848 int number_entries; 3849 uint16_t temp; 3850 3851 /* 3852 * peer wants me to send a str-reset to him for my outgoing seq's if 3853 * seq_in is right. 3854 */ 3855 struct sctp_association *asoc = &stcb->asoc; 3856 3857 seq = ntohl(req->request_seq); 3858 if (asoc->str_reset_seq_in == seq) { 3859 asoc->last_reset_action[1] = asoc->last_reset_action[0]; 3860 if (!(asoc->local_strreset_support & SCTP_ENABLE_RESET_STREAM_REQ)) { 3861 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 3862 } else if (trunc) { 3863 /* Can't do it, since they exceeded our buffer size */ 3864 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 3865 } else if (stcb->asoc.stream_reset_out_is_outstanding == 0) { 3866 len = ntohs(req->ph.param_length); 3867 number_entries = ((len - sizeof(struct sctp_stream_reset_in_request)) / sizeof(uint16_t)); 3868 if (number_entries) { 3869 for (i = 0; i < number_entries; i++) { 3870 temp = ntohs(req->list_of_streams[i]); 3871 if (temp >= stcb->asoc.streamoutcnt) { 3872 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 3873 goto bad_boy; 3874 } 3875 req->list_of_streams[i] = temp; 3876 } 3877 for (i = 0; i < number_entries; i++) { 3878 if (stcb->asoc.strmout[req->list_of_streams[i]].state == SCTP_STREAM_OPEN) { 3879 stcb->asoc.strmout[req->list_of_streams[i]].state = SCTP_STREAM_RESET_PENDING; 3880 } 3881 } 3882 } else { 3883 /* Its all */ 3884 for (i = 0; i < stcb->asoc.streamoutcnt; i++) { 3885 if (stcb->asoc.strmout[i].state == SCTP_STREAM_OPEN) 3886 stcb->asoc.strmout[i].state = SCTP_STREAM_RESET_PENDING; 3887 } 3888 } 3889 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED; 3890 } else { 3891 /* Can't do it, since we have sent one out */ 3892 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_ERR_IN_PROGRESS; 3893 } 3894 bad_boy: 3895 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 3896 asoc->str_reset_seq_in++; 3897 } else if (asoc->str_reset_seq_in - 1 == seq) { 3898 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 3899 } else if (asoc->str_reset_seq_in - 2 == seq) { 3900 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]); 3901 } else { 3902 sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO); 3903 } 3904 sctp_send_stream_reset_out_if_possible(stcb, SCTP_SO_NOT_LOCKED); 3905 } 3906 3907 static int 3908 sctp_handle_str_reset_request_tsn(struct sctp_tcb *stcb, 3909 struct sctp_tmit_chunk *chk, 3910 struct sctp_stream_reset_tsn_request *req) 3911 { 3912 /* reset all in and out and update the tsn */ 3913 /* 3914 * A) reset my str-seq's on in and out. B) Select a receive next, 3915 * and set cum-ack to it. Also process this selected number as a 3916 * fwd-tsn as well. C) set in the response my next sending seq. 3917 */ 3918 struct sctp_forward_tsn_chunk fwdtsn; 3919 struct sctp_association *asoc = &stcb->asoc; 3920 int abort_flag = 0; 3921 uint32_t seq; 3922 3923 seq = ntohl(req->request_seq); 3924 if (asoc->str_reset_seq_in == seq) { 3925 asoc->last_reset_action[1] = stcb->asoc.last_reset_action[0]; 3926 if (!(asoc->local_strreset_support & SCTP_ENABLE_CHANGE_ASSOC_REQ)) { 3927 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 3928 } else { 3929 fwdtsn.ch.chunk_length = htons(sizeof(struct sctp_forward_tsn_chunk)); 3930 fwdtsn.ch.chunk_type = SCTP_FORWARD_CUM_TSN; 3931 fwdtsn.ch.chunk_flags = 0; 3932 fwdtsn.new_cumulative_tsn = htonl(stcb->asoc.highest_tsn_inside_map + 1); 3933 sctp_handle_forward_tsn(stcb, &fwdtsn, &abort_flag, NULL, 0); 3934 if (abort_flag) { 3935 return (1); 3936 } 3937 asoc->highest_tsn_inside_map += SCTP_STREAM_RESET_TSN_DELTA; 3938 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MAP_LOGGING_ENABLE) { 3939 sctp_log_map(0, 10, asoc->highest_tsn_inside_map, SCTP_MAP_SLIDE_RESULT); 3940 } 3941 asoc->tsn_last_delivered = asoc->cumulative_tsn = asoc->highest_tsn_inside_map; 3942 asoc->mapping_array_base_tsn = asoc->highest_tsn_inside_map + 1; 3943 memset(asoc->mapping_array, 0, asoc->mapping_array_size); 3944 asoc->highest_tsn_inside_nr_map = asoc->highest_tsn_inside_map; 3945 memset(asoc->nr_mapping_array, 0, asoc->mapping_array_size); 3946 atomic_add_int(&asoc->sending_seq, 1); 3947 /* save off historical data for retrans */ 3948 asoc->last_sending_seq[1] = asoc->last_sending_seq[0]; 3949 asoc->last_sending_seq[0] = asoc->sending_seq; 3950 asoc->last_base_tsnsent[1] = asoc->last_base_tsnsent[0]; 3951 asoc->last_base_tsnsent[0] = asoc->mapping_array_base_tsn; 3952 sctp_reset_out_streams(stcb, 0, (uint16_t *)NULL); 3953 sctp_reset_in_stream(stcb, 0, (uint16_t *)NULL); 3954 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED; 3955 sctp_notify_stream_reset_tsn(stcb, asoc->sending_seq, (asoc->mapping_array_base_tsn + 1), 0); 3956 } 3957 sctp_add_stream_reset_result_tsn(chk, seq, asoc->last_reset_action[0], 3958 asoc->last_sending_seq[0], asoc->last_base_tsnsent[0]); 3959 asoc->str_reset_seq_in++; 3960 } else if (asoc->str_reset_seq_in - 1 == seq) { 3961 sctp_add_stream_reset_result_tsn(chk, seq, asoc->last_reset_action[0], 3962 asoc->last_sending_seq[0], asoc->last_base_tsnsent[0]); 3963 } else if (asoc->str_reset_seq_in - 2 == seq) { 3964 sctp_add_stream_reset_result_tsn(chk, seq, asoc->last_reset_action[1], 3965 asoc->last_sending_seq[1], asoc->last_base_tsnsent[1]); 3966 } else { 3967 sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO); 3968 } 3969 return (0); 3970 } 3971 3972 static void 3973 sctp_handle_str_reset_request_out(struct sctp_tcb *stcb, 3974 struct sctp_tmit_chunk *chk, 3975 struct sctp_stream_reset_out_request *req, int trunc) 3976 { 3977 uint32_t seq, tsn; 3978 int number_entries, len; 3979 struct sctp_association *asoc = &stcb->asoc; 3980 3981 seq = ntohl(req->request_seq); 3982 3983 /* now if its not a duplicate we process it */ 3984 if (asoc->str_reset_seq_in == seq) { 3985 len = ntohs(req->ph.param_length); 3986 number_entries = ((len - sizeof(struct sctp_stream_reset_out_request)) / sizeof(uint16_t)); 3987 /* 3988 * the sender is resetting, handle the list issue.. we must 3989 * a) verify if we can do the reset, if so no problem b) If 3990 * we can't do the reset we must copy the request. c) queue 3991 * it, and setup the data in processor to trigger it off 3992 * when needed and dequeue all the queued data. 3993 */ 3994 tsn = ntohl(req->send_reset_at_tsn); 3995 3996 /* move the reset action back one */ 3997 asoc->last_reset_action[1] = asoc->last_reset_action[0]; 3998 if (!(asoc->local_strreset_support & SCTP_ENABLE_RESET_STREAM_REQ)) { 3999 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4000 } else if (trunc) { 4001 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4002 } else if (SCTP_TSN_GE(asoc->cumulative_tsn, tsn)) { 4003 /* we can do it now */ 4004 sctp_reset_in_stream(stcb, number_entries, req->list_of_streams); 4005 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED; 4006 } else { 4007 /* 4008 * we must queue it up and thus wait for the TSN's 4009 * to arrive that are at or before tsn 4010 */ 4011 struct sctp_stream_reset_list *liste; 4012 int siz; 4013 4014 siz = sizeof(struct sctp_stream_reset_list) + (number_entries * sizeof(uint16_t)); 4015 SCTP_MALLOC(liste, struct sctp_stream_reset_list *, 4016 siz, SCTP_M_STRESET); 4017 if (liste == NULL) { 4018 /* gak out of memory */ 4019 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4020 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 4021 return; 4022 } 4023 liste->seq = seq; 4024 liste->tsn = tsn; 4025 liste->number_entries = number_entries; 4026 memcpy(&liste->list_of_streams, req->list_of_streams, number_entries * sizeof(uint16_t)); 4027 TAILQ_INSERT_TAIL(&asoc->resetHead, liste, next_resp); 4028 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_IN_PROGRESS; 4029 } 4030 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 4031 asoc->str_reset_seq_in++; 4032 } else if ((asoc->str_reset_seq_in - 1) == seq) { 4033 /* 4034 * one seq back, just echo back last action since my 4035 * response was lost. 4036 */ 4037 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 4038 } else if ((asoc->str_reset_seq_in - 2) == seq) { 4039 /* 4040 * two seq back, just echo back last action since my 4041 * response was lost. 4042 */ 4043 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]); 4044 } else { 4045 sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO); 4046 } 4047 } 4048 4049 static void 4050 sctp_handle_str_reset_add_strm(struct sctp_tcb *stcb, struct sctp_tmit_chunk *chk, 4051 struct sctp_stream_reset_add_strm *str_add) 4052 { 4053 /* 4054 * Peer is requesting to add more streams. If its within our 4055 * max-streams we will allow it. 4056 */ 4057 uint32_t num_stream, i; 4058 uint32_t seq; 4059 struct sctp_association *asoc = &stcb->asoc; 4060 struct sctp_queued_to_read *ctl, *nctl; 4061 4062 /* Get the number. */ 4063 seq = ntohl(str_add->request_seq); 4064 num_stream = ntohs(str_add->number_of_streams); 4065 /* Now what would be the new total? */ 4066 if (asoc->str_reset_seq_in == seq) { 4067 num_stream += stcb->asoc.streamincnt; 4068 stcb->asoc.last_reset_action[1] = stcb->asoc.last_reset_action[0]; 4069 if (!(asoc->local_strreset_support & SCTP_ENABLE_CHANGE_ASSOC_REQ)) { 4070 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4071 } else if ((num_stream > stcb->asoc.max_inbound_streams) || 4072 (num_stream > 0xffff)) { 4073 /* We must reject it they ask for to many */ 4074 denied: 4075 stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4076 } else { 4077 /* Ok, we can do that :-) */ 4078 struct sctp_stream_in *oldstrm; 4079 4080 /* save off the old */ 4081 oldstrm = stcb->asoc.strmin; 4082 SCTP_MALLOC(stcb->asoc.strmin, struct sctp_stream_in *, 4083 (num_stream * sizeof(struct sctp_stream_in)), 4084 SCTP_M_STRMI); 4085 if (stcb->asoc.strmin == NULL) { 4086 stcb->asoc.strmin = oldstrm; 4087 goto denied; 4088 } 4089 /* copy off the old data */ 4090 for (i = 0; i < stcb->asoc.streamincnt; i++) { 4091 TAILQ_INIT(&stcb->asoc.strmin[i].inqueue); 4092 TAILQ_INIT(&stcb->asoc.strmin[i].uno_inqueue); 4093 stcb->asoc.strmin[i].sid = i; 4094 stcb->asoc.strmin[i].last_mid_delivered = oldstrm[i].last_mid_delivered; 4095 stcb->asoc.strmin[i].delivery_started = oldstrm[i].delivery_started; 4096 stcb->asoc.strmin[i].pd_api_started = oldstrm[i].pd_api_started; 4097 /* now anything on those queues? */ 4098 TAILQ_FOREACH_SAFE(ctl, &oldstrm[i].inqueue, next_instrm, nctl) { 4099 TAILQ_REMOVE(&oldstrm[i].inqueue, ctl, next_instrm); 4100 TAILQ_INSERT_TAIL(&stcb->asoc.strmin[i].inqueue, ctl, next_instrm); 4101 } 4102 TAILQ_FOREACH_SAFE(ctl, &oldstrm[i].uno_inqueue, next_instrm, nctl) { 4103 TAILQ_REMOVE(&oldstrm[i].uno_inqueue, ctl, next_instrm); 4104 TAILQ_INSERT_TAIL(&stcb->asoc.strmin[i].uno_inqueue, ctl, next_instrm); 4105 } 4106 } 4107 /* Init the new streams */ 4108 for (i = stcb->asoc.streamincnt; i < num_stream; i++) { 4109 TAILQ_INIT(&stcb->asoc.strmin[i].inqueue); 4110 TAILQ_INIT(&stcb->asoc.strmin[i].uno_inqueue); 4111 stcb->asoc.strmin[i].sid = i; 4112 stcb->asoc.strmin[i].last_mid_delivered = 0xffffffff; 4113 stcb->asoc.strmin[i].pd_api_started = 0; 4114 stcb->asoc.strmin[i].delivery_started = 0; 4115 } 4116 SCTP_FREE(oldstrm, SCTP_M_STRMI); 4117 /* update the size */ 4118 stcb->asoc.streamincnt = num_stream; 4119 stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED; 4120 sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 0); 4121 } 4122 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 4123 asoc->str_reset_seq_in++; 4124 } else if ((asoc->str_reset_seq_in - 1) == seq) { 4125 /* 4126 * one seq back, just echo back last action since my 4127 * response was lost. 4128 */ 4129 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 4130 } else if ((asoc->str_reset_seq_in - 2) == seq) { 4131 /* 4132 * two seq back, just echo back last action since my 4133 * response was lost. 4134 */ 4135 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]); 4136 } else { 4137 sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO); 4138 4139 } 4140 } 4141 4142 static void 4143 sctp_handle_str_reset_add_out_strm(struct sctp_tcb *stcb, struct sctp_tmit_chunk *chk, 4144 struct sctp_stream_reset_add_strm *str_add) 4145 { 4146 /* 4147 * Peer is requesting to add more streams. If its within our 4148 * max-streams we will allow it. 4149 */ 4150 uint16_t num_stream; 4151 uint32_t seq; 4152 struct sctp_association *asoc = &stcb->asoc; 4153 4154 /* Get the number. */ 4155 seq = ntohl(str_add->request_seq); 4156 num_stream = ntohs(str_add->number_of_streams); 4157 /* Now what would be the new total? */ 4158 if (asoc->str_reset_seq_in == seq) { 4159 stcb->asoc.last_reset_action[1] = stcb->asoc.last_reset_action[0]; 4160 if (!(asoc->local_strreset_support & SCTP_ENABLE_CHANGE_ASSOC_REQ)) { 4161 asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4162 } else if (stcb->asoc.stream_reset_outstanding) { 4163 /* We must reject it we have something pending */ 4164 stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_ERR_IN_PROGRESS; 4165 } else { 4166 /* Ok, we can do that :-) */ 4167 int mychk; 4168 4169 mychk = stcb->asoc.streamoutcnt; 4170 mychk += num_stream; 4171 if (mychk < 0x10000) { 4172 stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED; 4173 if (sctp_send_str_reset_req(stcb, 0, NULL, 0, 0, 1, num_stream, 0, 1)) { 4174 stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4175 } 4176 } else { 4177 stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED; 4178 } 4179 } 4180 sctp_add_stream_reset_result(chk, seq, stcb->asoc.last_reset_action[0]); 4181 asoc->str_reset_seq_in++; 4182 } else if ((asoc->str_reset_seq_in - 1) == seq) { 4183 /* 4184 * one seq back, just echo back last action since my 4185 * response was lost. 4186 */ 4187 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]); 4188 } else if ((asoc->str_reset_seq_in - 2) == seq) { 4189 /* 4190 * two seq back, just echo back last action since my 4191 * response was lost. 4192 */ 4193 sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]); 4194 } else { 4195 sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO); 4196 } 4197 } 4198 4199 #ifdef __GNUC__ 4200 __attribute__((noinline)) 4201 #endif 4202 static int 4203 sctp_handle_stream_reset(struct sctp_tcb *stcb, struct mbuf *m, int offset, 4204 struct sctp_chunkhdr *ch_req) 4205 { 4206 uint16_t remaining_length, param_len, ptype; 4207 struct sctp_paramhdr pstore; 4208 uint8_t cstore[SCTP_CHUNK_BUFFER_SIZE]; 4209 uint32_t seq = 0; 4210 int num_req = 0; 4211 int trunc = 0; 4212 struct sctp_tmit_chunk *chk; 4213 struct sctp_chunkhdr *ch; 4214 struct sctp_paramhdr *ph; 4215 int ret_code = 0; 4216 int num_param = 0; 4217 4218 /* now it may be a reset or a reset-response */ 4219 remaining_length = ntohs(ch_req->chunk_length) - sizeof(struct sctp_chunkhdr); 4220 4221 /* setup for adding the response */ 4222 sctp_alloc_a_chunk(stcb, chk); 4223 if (chk == NULL) { 4224 return (ret_code); 4225 } 4226 chk->copy_by_ref = 0; 4227 chk->rec.chunk_id.id = SCTP_STREAM_RESET; 4228 chk->rec.chunk_id.can_take_data = 0; 4229 chk->flags = 0; 4230 chk->asoc = &stcb->asoc; 4231 chk->no_fr_allowed = 0; 4232 chk->book_size = chk->send_size = sizeof(struct sctp_chunkhdr); 4233 chk->book_size_scale = 0; 4234 chk->data = sctp_get_mbuf_for_msg(MCLBYTES, 0, M_NOWAIT, 1, MT_DATA); 4235 if (chk->data == NULL) { 4236 strres_nochunk: 4237 if (chk->data) { 4238 sctp_m_freem(chk->data); 4239 chk->data = NULL; 4240 } 4241 sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED); 4242 return (ret_code); 4243 } 4244 SCTP_BUF_RESV_UF(chk->data, SCTP_MIN_OVERHEAD); 4245 4246 /* setup chunk parameters */ 4247 chk->sent = SCTP_DATAGRAM_UNSENT; 4248 chk->snd_count = 0; 4249 chk->whoTo = NULL; 4250 4251 ch = mtod(chk->data, struct sctp_chunkhdr *); 4252 ch->chunk_type = SCTP_STREAM_RESET; 4253 ch->chunk_flags = 0; 4254 ch->chunk_length = htons(chk->send_size); 4255 SCTP_BUF_LEN(chk->data) = SCTP_SIZE32(chk->send_size); 4256 offset += sizeof(struct sctp_chunkhdr); 4257 while (remaining_length >= sizeof(struct sctp_paramhdr)) { 4258 ph = (struct sctp_paramhdr *)sctp_m_getptr(m, offset, sizeof(pstore), (uint8_t *)&pstore); 4259 if (ph == NULL) { 4260 /* TSNH */ 4261 break; 4262 } 4263 param_len = ntohs(ph->param_length); 4264 if ((param_len > remaining_length) || 4265 (param_len < (sizeof(struct sctp_paramhdr) + sizeof(uint32_t)))) { 4266 /* bad parameter length */ 4267 break; 4268 } 4269 ph = (struct sctp_paramhdr *)sctp_m_getptr(m, offset, min(param_len, sizeof(cstore)), 4270 (uint8_t *)&cstore); 4271 if (ph == NULL) { 4272 /* TSNH */ 4273 break; 4274 } 4275 ptype = ntohs(ph->param_type); 4276 num_param++; 4277 if (param_len > sizeof(cstore)) { 4278 trunc = 1; 4279 } else { 4280 trunc = 0; 4281 } 4282 if (num_param > SCTP_MAX_RESET_PARAMS) { 4283 /* hit the max of parameters already sorry.. */ 4284 break; 4285 } 4286 if (ptype == SCTP_STR_RESET_OUT_REQUEST) { 4287 struct sctp_stream_reset_out_request *req_out; 4288 4289 if (param_len < sizeof(struct sctp_stream_reset_out_request)) { 4290 break; 4291 } 4292 req_out = (struct sctp_stream_reset_out_request *)ph; 4293 num_req++; 4294 if (stcb->asoc.stream_reset_outstanding) { 4295 seq = ntohl(req_out->response_seq); 4296 if (seq == stcb->asoc.str_reset_seq_out) { 4297 /* implicit ack */ 4298 (void)sctp_handle_stream_reset_response(stcb, seq, SCTP_STREAM_RESET_RESULT_PERFORMED, NULL); 4299 } 4300 } 4301 sctp_handle_str_reset_request_out(stcb, chk, req_out, trunc); 4302 } else if (ptype == SCTP_STR_RESET_ADD_OUT_STREAMS) { 4303 struct sctp_stream_reset_add_strm *str_add; 4304 4305 if (param_len < sizeof(struct sctp_stream_reset_add_strm)) { 4306 break; 4307 } 4308 str_add = (struct sctp_stream_reset_add_strm *)ph; 4309 num_req++; 4310 sctp_handle_str_reset_add_strm(stcb, chk, str_add); 4311 } else if (ptype == SCTP_STR_RESET_ADD_IN_STREAMS) { 4312 struct sctp_stream_reset_add_strm *str_add; 4313 4314 if (param_len < sizeof(struct sctp_stream_reset_add_strm)) { 4315 break; 4316 } 4317 str_add = (struct sctp_stream_reset_add_strm *)ph; 4318 num_req++; 4319 sctp_handle_str_reset_add_out_strm(stcb, chk, str_add); 4320 } else if (ptype == SCTP_STR_RESET_IN_REQUEST) { 4321 struct sctp_stream_reset_in_request *req_in; 4322 4323 num_req++; 4324 req_in = (struct sctp_stream_reset_in_request *)ph; 4325 sctp_handle_str_reset_request_in(stcb, chk, req_in, trunc); 4326 } else if (ptype == SCTP_STR_RESET_TSN_REQUEST) { 4327 struct sctp_stream_reset_tsn_request *req_tsn; 4328 4329 num_req++; 4330 req_tsn = (struct sctp_stream_reset_tsn_request *)ph; 4331 if (sctp_handle_str_reset_request_tsn(stcb, chk, req_tsn)) { 4332 ret_code = 1; 4333 goto strres_nochunk; 4334 } 4335 /* no more */ 4336 break; 4337 } else if (ptype == SCTP_STR_RESET_RESPONSE) { 4338 struct sctp_stream_reset_response *resp; 4339 uint32_t result; 4340 4341 if (param_len < sizeof(struct sctp_stream_reset_response)) { 4342 break; 4343 } 4344 resp = (struct sctp_stream_reset_response *)ph; 4345 seq = ntohl(resp->response_seq); 4346 result = ntohl(resp->result); 4347 if (sctp_handle_stream_reset_response(stcb, seq, result, resp)) { 4348 ret_code = 1; 4349 goto strres_nochunk; 4350 } 4351 } else { 4352 break; 4353 } 4354 offset += SCTP_SIZE32(param_len); 4355 if (remaining_length >= SCTP_SIZE32(param_len)) { 4356 remaining_length -= SCTP_SIZE32(param_len); 4357 } else { 4358 remaining_length = 0; 4359 } 4360 } 4361 if (num_req == 0) { 4362 /* we have no response free the stuff */ 4363 goto strres_nochunk; 4364 } 4365 /* ok we have a chunk to link in */ 4366 TAILQ_INSERT_TAIL(&stcb->asoc.control_send_queue, 4367 chk, 4368 sctp_next); 4369 stcb->asoc.ctrl_queue_cnt++; 4370 return (ret_code); 4371 } 4372 4373 /* 4374 * Handle a router or endpoints report of a packet loss, there are two ways 4375 * to handle this, either we get the whole packet and must disect it 4376 * ourselves (possibly with truncation and or corruption) or it is a summary 4377 * from a middle box that did the disectting for us. 4378 */ 4379 static void 4380 sctp_handle_packet_dropped(struct sctp_pktdrop_chunk *cp, 4381 struct sctp_tcb *stcb, struct sctp_nets *net, uint32_t limit) 4382 { 4383 uint32_t bottle_bw, on_queue; 4384 uint16_t trunc_len; 4385 unsigned int chlen; 4386 unsigned int at; 4387 struct sctp_chunk_desc desc; 4388 struct sctp_chunkhdr *ch; 4389 4390 chlen = ntohs(cp->ch.chunk_length); 4391 chlen -= sizeof(struct sctp_pktdrop_chunk); 4392 /* XXX possible chlen underflow */ 4393 if (chlen == 0) { 4394 ch = NULL; 4395 if (cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX) 4396 SCTP_STAT_INCR(sctps_pdrpbwrpt); 4397 } else { 4398 ch = (struct sctp_chunkhdr *)(cp->data + sizeof(struct sctphdr)); 4399 chlen -= sizeof(struct sctphdr); 4400 /* XXX possible chlen underflow */ 4401 memset(&desc, 0, sizeof(desc)); 4402 } 4403 trunc_len = (uint16_t)ntohs(cp->trunc_len); 4404 if (trunc_len > limit) { 4405 trunc_len = limit; 4406 } 4407 4408 /* now the chunks themselves */ 4409 while ((ch != NULL) && (chlen >= sizeof(struct sctp_chunkhdr))) { 4410 desc.chunk_type = ch->chunk_type; 4411 /* get amount we need to move */ 4412 at = ntohs(ch->chunk_length); 4413 if (at < sizeof(struct sctp_chunkhdr)) { 4414 /* corrupt chunk, maybe at the end? */ 4415 SCTP_STAT_INCR(sctps_pdrpcrupt); 4416 break; 4417 } 4418 if (trunc_len == 0) { 4419 /* we are supposed to have all of it */ 4420 if (at > chlen) { 4421 /* corrupt skip it */ 4422 SCTP_STAT_INCR(sctps_pdrpcrupt); 4423 break; 4424 } 4425 } else { 4426 /* is there enough of it left ? */ 4427 if (desc.chunk_type == SCTP_DATA) { 4428 if (chlen < (sizeof(struct sctp_data_chunk) + 4429 sizeof(desc.data_bytes))) { 4430 break; 4431 } 4432 } else { 4433 if (chlen < sizeof(struct sctp_chunkhdr)) { 4434 break; 4435 } 4436 } 4437 } 4438 if (desc.chunk_type == SCTP_DATA) { 4439 /* can we get out the tsn? */ 4440 if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX)) 4441 SCTP_STAT_INCR(sctps_pdrpmbda); 4442 4443 if (chlen >= (sizeof(struct sctp_data_chunk) + sizeof(uint32_t))) { 4444 /* yep */ 4445 struct sctp_data_chunk *dcp; 4446 uint8_t *ddp; 4447 unsigned int iii; 4448 4449 dcp = (struct sctp_data_chunk *)ch; 4450 ddp = (uint8_t *)(dcp + 1); 4451 for (iii = 0; iii < sizeof(desc.data_bytes); iii++) { 4452 desc.data_bytes[iii] = ddp[iii]; 4453 } 4454 desc.tsn_ifany = dcp->dp.tsn; 4455 } else { 4456 /* nope we are done. */ 4457 SCTP_STAT_INCR(sctps_pdrpnedat); 4458 break; 4459 } 4460 } else { 4461 if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX)) 4462 SCTP_STAT_INCR(sctps_pdrpmbct); 4463 } 4464 4465 if (process_chunk_drop(stcb, &desc, net, cp->ch.chunk_flags)) { 4466 SCTP_STAT_INCR(sctps_pdrppdbrk); 4467 break; 4468 } 4469 if (SCTP_SIZE32(at) > chlen) { 4470 break; 4471 } 4472 chlen -= SCTP_SIZE32(at); 4473 if (chlen < sizeof(struct sctp_chunkhdr)) { 4474 /* done, none left */ 4475 break; 4476 } 4477 ch = (struct sctp_chunkhdr *)((caddr_t)ch + SCTP_SIZE32(at)); 4478 } 4479 /* Now update any rwnd --- possibly */ 4480 if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX) == 0) { 4481 /* From a peer, we get a rwnd report */ 4482 uint32_t a_rwnd; 4483 4484 SCTP_STAT_INCR(sctps_pdrpfehos); 4485 4486 bottle_bw = ntohl(cp->bottle_bw); 4487 on_queue = ntohl(cp->current_onq); 4488 if (bottle_bw && on_queue) { 4489 /* a rwnd report is in here */ 4490 if (bottle_bw > on_queue) 4491 a_rwnd = bottle_bw - on_queue; 4492 else 4493 a_rwnd = 0; 4494 4495 if (a_rwnd == 0) 4496 stcb->asoc.peers_rwnd = 0; 4497 else { 4498 if (a_rwnd > stcb->asoc.total_flight) { 4499 stcb->asoc.peers_rwnd = 4500 a_rwnd - stcb->asoc.total_flight; 4501 } else { 4502 stcb->asoc.peers_rwnd = 0; 4503 } 4504 if (stcb->asoc.peers_rwnd < 4505 stcb->sctp_ep->sctp_ep.sctp_sws_sender) { 4506 /* SWS sender side engages */ 4507 stcb->asoc.peers_rwnd = 0; 4508 } 4509 } 4510 } 4511 } else { 4512 SCTP_STAT_INCR(sctps_pdrpfmbox); 4513 } 4514 4515 /* now middle boxes in sat networks get a cwnd bump */ 4516 if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX) && 4517 (stcb->asoc.sat_t3_loss_recovery == 0) && 4518 (stcb->asoc.sat_network)) { 4519 /* 4520 * This is debatable but for sat networks it makes sense 4521 * Note if a T3 timer has went off, we will prohibit any 4522 * changes to cwnd until we exit the t3 loss recovery. 4523 */ 4524 stcb->asoc.cc_functions.sctp_cwnd_update_after_packet_dropped(stcb, 4525 net, cp, &bottle_bw, &on_queue); 4526 } 4527 } 4528 4529 /* 4530 * handles all control chunks in a packet inputs: - m: mbuf chain, assumed to 4531 * still contain IP/SCTP header - stcb: is the tcb found for this packet - 4532 * offset: offset into the mbuf chain to first chunkhdr - length: is the 4533 * length of the complete packet outputs: - length: modified to remaining 4534 * length after control processing - netp: modified to new sctp_nets after 4535 * cookie-echo processing - return NULL to discard the packet (ie. no asoc, 4536 * bad packet,...) otherwise return the tcb for this packet 4537 */ 4538 #ifdef __GNUC__ 4539 __attribute__((noinline)) 4540 #endif 4541 static struct sctp_tcb * 4542 sctp_process_control(struct mbuf *m, int iphlen, int *offset, int length, 4543 struct sockaddr *src, struct sockaddr *dst, 4544 struct sctphdr *sh, struct sctp_chunkhdr *ch, struct sctp_inpcb *inp, 4545 struct sctp_tcb *stcb, struct sctp_nets **netp, int *fwd_tsn_seen, 4546 uint8_t mflowtype, uint32_t mflowid, uint16_t fibnum, 4547 uint32_t vrf_id, uint16_t port) 4548 { 4549 struct sctp_association *asoc; 4550 struct mbuf *op_err; 4551 char msg[SCTP_DIAG_INFO_LEN]; 4552 uint32_t vtag_in; 4553 int num_chunks = 0; /* number of control chunks processed */ 4554 uint32_t chk_length, contiguous; 4555 int ret; 4556 int abort_no_unlock = 0; 4557 int ecne_seen = 0; 4558 4559 /* 4560 * How big should this be, and should it be alloc'd? Lets try the 4561 * d-mtu-ceiling for now (2k) and that should hopefully work ... 4562 * until we get into jumbo grams and such.. 4563 */ 4564 uint8_t chunk_buf[SCTP_CHUNK_BUFFER_SIZE]; 4565 int got_auth = 0; 4566 uint32_t auth_offset = 0, auth_len = 0; 4567 int auth_skipped = 0; 4568 int asconf_cnt = 0; 4569 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 4570 struct socket *so; 4571 #endif 4572 4573 SCTPDBG(SCTP_DEBUG_INPUT1, "sctp_process_control: iphlen=%u, offset=%u, length=%u stcb:%p\n", 4574 iphlen, *offset, length, (void *)stcb); 4575 4576 if (stcb) { 4577 SCTP_TCB_LOCK_ASSERT(stcb); 4578 } 4579 /* validate chunk header length... */ 4580 if (ntohs(ch->chunk_length) < sizeof(*ch)) { 4581 SCTPDBG(SCTP_DEBUG_INPUT1, "Invalid header length %d\n", 4582 ntohs(ch->chunk_length)); 4583 *offset = length; 4584 return (stcb); 4585 } 4586 /* 4587 * validate the verification tag 4588 */ 4589 vtag_in = ntohl(sh->v_tag); 4590 4591 if (ch->chunk_type == SCTP_INITIATION) { 4592 SCTPDBG(SCTP_DEBUG_INPUT1, "Its an INIT of len:%d vtag:%x\n", 4593 ntohs(ch->chunk_length), vtag_in); 4594 if (vtag_in != 0) { 4595 /* protocol error- silently discard... */ 4596 SCTP_STAT_INCR(sctps_badvtag); 4597 if (stcb != NULL) { 4598 SCTP_TCB_UNLOCK(stcb); 4599 } 4600 return (NULL); 4601 } 4602 } else if (ch->chunk_type != SCTP_COOKIE_ECHO) { 4603 /* 4604 * If there is no stcb, skip the AUTH chunk and process 4605 * later after a stcb is found (to validate the lookup was 4606 * valid. 4607 */ 4608 if ((ch->chunk_type == SCTP_AUTHENTICATION) && 4609 (stcb == NULL) && 4610 (inp->auth_supported == 1)) { 4611 /* save this chunk for later processing */ 4612 auth_skipped = 1; 4613 auth_offset = *offset; 4614 auth_len = ntohs(ch->chunk_length); 4615 4616 /* (temporarily) move past this chunk */ 4617 *offset += SCTP_SIZE32(auth_len); 4618 if (*offset >= length) { 4619 /* no more data left in the mbuf chain */ 4620 *offset = length; 4621 return (NULL); 4622 } 4623 ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset, 4624 sizeof(struct sctp_chunkhdr), chunk_buf); 4625 } 4626 if (ch == NULL) { 4627 /* Help */ 4628 *offset = length; 4629 return (stcb); 4630 } 4631 if (ch->chunk_type == SCTP_COOKIE_ECHO) { 4632 goto process_control_chunks; 4633 } 4634 /* 4635 * first check if it's an ASCONF with an unknown src addr we 4636 * need to look inside to find the association 4637 */ 4638 if (ch->chunk_type == SCTP_ASCONF && stcb == NULL) { 4639 struct sctp_chunkhdr *asconf_ch = ch; 4640 uint32_t asconf_offset = 0, asconf_len = 0; 4641 4642 /* inp's refcount may be reduced */ 4643 SCTP_INP_INCR_REF(inp); 4644 4645 asconf_offset = *offset; 4646 do { 4647 asconf_len = ntohs(asconf_ch->chunk_length); 4648 if (asconf_len < sizeof(struct sctp_asconf_paramhdr)) 4649 break; 4650 stcb = sctp_findassociation_ep_asconf(m, 4651 *offset, 4652 dst, 4653 sh, &inp, netp, vrf_id); 4654 if (stcb != NULL) 4655 break; 4656 asconf_offset += SCTP_SIZE32(asconf_len); 4657 asconf_ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, asconf_offset, 4658 sizeof(struct sctp_chunkhdr), chunk_buf); 4659 } while (asconf_ch != NULL && asconf_ch->chunk_type == SCTP_ASCONF); 4660 if (stcb == NULL) { 4661 /* 4662 * reduce inp's refcount if not reduced in 4663 * sctp_findassociation_ep_asconf(). 4664 */ 4665 SCTP_INP_DECR_REF(inp); 4666 } 4667 4668 /* now go back and verify any auth chunk to be sure */ 4669 if (auth_skipped && (stcb != NULL)) { 4670 struct sctp_auth_chunk *auth; 4671 4672 auth = (struct sctp_auth_chunk *) 4673 sctp_m_getptr(m, auth_offset, 4674 auth_len, chunk_buf); 4675 got_auth = 1; 4676 auth_skipped = 0; 4677 if ((auth == NULL) || sctp_handle_auth(stcb, auth, m, 4678 auth_offset)) { 4679 /* auth HMAC failed so dump it */ 4680 *offset = length; 4681 return (stcb); 4682 } else { 4683 /* remaining chunks are HMAC checked */ 4684 stcb->asoc.authenticated = 1; 4685 } 4686 } 4687 } 4688 if (stcb == NULL) { 4689 snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__); 4690 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 4691 msg); 4692 /* no association, so it's out of the blue... */ 4693 sctp_handle_ootb(m, iphlen, *offset, src, dst, sh, inp, op_err, 4694 mflowtype, mflowid, inp->fibnum, 4695 vrf_id, port); 4696 *offset = length; 4697 return (NULL); 4698 } 4699 asoc = &stcb->asoc; 4700 /* ABORT and SHUTDOWN can use either v_tag... */ 4701 if ((ch->chunk_type == SCTP_ABORT_ASSOCIATION) || 4702 (ch->chunk_type == SCTP_SHUTDOWN_COMPLETE) || 4703 (ch->chunk_type == SCTP_PACKET_DROPPED)) { 4704 /* Take the T-bit always into account. */ 4705 if ((((ch->chunk_flags & SCTP_HAD_NO_TCB) == 0) && 4706 (vtag_in == asoc->my_vtag)) || 4707 (((ch->chunk_flags & SCTP_HAD_NO_TCB) == SCTP_HAD_NO_TCB) && 4708 (asoc->peer_vtag != htonl(0)) && 4709 (vtag_in == asoc->peer_vtag))) { 4710 /* this is valid */ 4711 } else { 4712 /* drop this packet... */ 4713 SCTP_STAT_INCR(sctps_badvtag); 4714 if (stcb != NULL) { 4715 SCTP_TCB_UNLOCK(stcb); 4716 } 4717 return (NULL); 4718 } 4719 } else if (ch->chunk_type == SCTP_SHUTDOWN_ACK) { 4720 if (vtag_in != asoc->my_vtag) { 4721 /* 4722 * this could be a stale SHUTDOWN-ACK or the 4723 * peer never got the SHUTDOWN-COMPLETE and 4724 * is still hung; we have started a new asoc 4725 * but it won't complete until the shutdown 4726 * is completed 4727 */ 4728 if (stcb != NULL) { 4729 SCTP_TCB_UNLOCK(stcb); 4730 } 4731 snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__); 4732 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 4733 msg); 4734 sctp_handle_ootb(m, iphlen, *offset, src, dst, 4735 sh, inp, op_err, 4736 mflowtype, mflowid, fibnum, 4737 vrf_id, port); 4738 return (NULL); 4739 } 4740 } else { 4741 /* for all other chunks, vtag must match */ 4742 if (vtag_in != asoc->my_vtag) { 4743 /* invalid vtag... */ 4744 SCTPDBG(SCTP_DEBUG_INPUT3, 4745 "invalid vtag: %xh, expect %xh\n", 4746 vtag_in, asoc->my_vtag); 4747 SCTP_STAT_INCR(sctps_badvtag); 4748 if (stcb != NULL) { 4749 SCTP_TCB_UNLOCK(stcb); 4750 } 4751 *offset = length; 4752 return (NULL); 4753 } 4754 } 4755 } /* end if !SCTP_COOKIE_ECHO */ 4756 /* 4757 * process all control chunks... 4758 */ 4759 if (((ch->chunk_type == SCTP_SELECTIVE_ACK) || 4760 (ch->chunk_type == SCTP_NR_SELECTIVE_ACK) || 4761 (ch->chunk_type == SCTP_HEARTBEAT_REQUEST)) && 4762 (SCTP_GET_STATE(stcb) == SCTP_STATE_COOKIE_ECHOED)) { 4763 /* implied cookie-ack.. we must have lost the ack */ 4764 sctp_handle_cookie_ack((struct sctp_cookie_ack_chunk *)ch, stcb, 4765 *netp); 4766 } 4767 4768 process_control_chunks: 4769 while (IS_SCTP_CONTROL(ch)) { 4770 /* validate chunk length */ 4771 chk_length = ntohs(ch->chunk_length); 4772 SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_process_control: processing a chunk type=%u, len=%u\n", 4773 ch->chunk_type, chk_length); 4774 SCTP_LTRACE_CHK(inp, stcb, ch->chunk_type, chk_length); 4775 if (chk_length < sizeof(*ch) || 4776 (*offset + (int)chk_length) > length) { 4777 *offset = length; 4778 return (stcb); 4779 } 4780 SCTP_STAT_INCR_COUNTER64(sctps_incontrolchunks); 4781 /* 4782 * INIT and INIT-ACK only gets the init ack "header" portion 4783 * only because we don't have to process the peer's COOKIE. 4784 * All others get a complete chunk. 4785 */ 4786 switch (ch->chunk_type) { 4787 case SCTP_INITIATION: 4788 contiguous = sizeof(struct sctp_init_chunk); 4789 break; 4790 case SCTP_INITIATION_ACK: 4791 contiguous = sizeof(struct sctp_init_ack_chunk); 4792 break; 4793 default: 4794 contiguous = min(chk_length, sizeof(chunk_buf)); 4795 break; 4796 } 4797 ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset, 4798 contiguous, 4799 chunk_buf); 4800 if (ch == NULL) { 4801 *offset = length; 4802 if (stcb != NULL) { 4803 SCTP_TCB_UNLOCK(stcb); 4804 } 4805 return (NULL); 4806 } 4807 4808 num_chunks++; 4809 /* Save off the last place we got a control from */ 4810 if (stcb != NULL) { 4811 if (((netp != NULL) && (*netp != NULL)) || (ch->chunk_type == SCTP_ASCONF)) { 4812 /* 4813 * allow last_control to be NULL if 4814 * ASCONF... ASCONF processing will find the 4815 * right net later 4816 */ 4817 if ((netp != NULL) && (*netp != NULL)) 4818 stcb->asoc.last_control_chunk_from = *netp; 4819 } 4820 } 4821 #ifdef SCTP_AUDITING_ENABLED 4822 sctp_audit_log(0xB0, ch->chunk_type); 4823 #endif 4824 4825 /* check to see if this chunk required auth, but isn't */ 4826 if ((stcb != NULL) && 4827 sctp_auth_is_required_chunk(ch->chunk_type, stcb->asoc.local_auth_chunks) && 4828 !stcb->asoc.authenticated) { 4829 /* "silently" ignore */ 4830 SCTP_STAT_INCR(sctps_recvauthmissing); 4831 goto next_chunk; 4832 } 4833 switch (ch->chunk_type) { 4834 case SCTP_INITIATION: 4835 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_INIT\n"); 4836 /* The INIT chunk must be the only chunk. */ 4837 if ((num_chunks > 1) || 4838 (length - *offset > (int)SCTP_SIZE32(chk_length))) { 4839 /* RFC 4960 requires that no ABORT is sent */ 4840 *offset = length; 4841 if (stcb != NULL) { 4842 SCTP_TCB_UNLOCK(stcb); 4843 } 4844 return (NULL); 4845 } 4846 /* Honor our resource limit. */ 4847 if (chk_length > SCTP_LARGEST_INIT_ACCEPTED) { 4848 op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, ""); 4849 sctp_abort_association(inp, stcb, m, iphlen, 4850 src, dst, sh, op_err, 4851 mflowtype, mflowid, 4852 vrf_id, port); 4853 *offset = length; 4854 return (NULL); 4855 } 4856 sctp_handle_init(m, iphlen, *offset, src, dst, sh, 4857 (struct sctp_init_chunk *)ch, inp, 4858 stcb, *netp, &abort_no_unlock, 4859 mflowtype, mflowid, 4860 vrf_id, port); 4861 *offset = length; 4862 if ((!abort_no_unlock) && (stcb != NULL)) { 4863 SCTP_TCB_UNLOCK(stcb); 4864 } 4865 return (NULL); 4866 break; 4867 case SCTP_PAD_CHUNK: 4868 break; 4869 case SCTP_INITIATION_ACK: 4870 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_INIT_ACK\n"); 4871 if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) { 4872 /* We are not interested anymore */ 4873 if ((stcb != NULL) && (stcb->asoc.total_output_queue_size)) { 4874 ; 4875 } else { 4876 *offset = length; 4877 if (stcb != NULL) { 4878 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 4879 so = SCTP_INP_SO(inp); 4880 atomic_add_int(&stcb->asoc.refcnt, 1); 4881 SCTP_TCB_UNLOCK(stcb); 4882 SCTP_SOCKET_LOCK(so, 1); 4883 SCTP_TCB_LOCK(stcb); 4884 atomic_subtract_int(&stcb->asoc.refcnt, 1); 4885 #endif 4886 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 4887 SCTP_FROM_SCTP_INPUT + SCTP_LOC_29); 4888 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 4889 SCTP_SOCKET_UNLOCK(so, 1); 4890 #endif 4891 } 4892 return (NULL); 4893 } 4894 } 4895 /* The INIT-ACK chunk must be the only chunk. */ 4896 if ((num_chunks > 1) || 4897 (length - *offset > (int)SCTP_SIZE32(chk_length))) { 4898 *offset = length; 4899 return (stcb); 4900 } 4901 if ((netp != NULL) && (*netp != NULL)) { 4902 ret = sctp_handle_init_ack(m, iphlen, *offset, 4903 src, dst, sh, 4904 (struct sctp_init_ack_chunk *)ch, 4905 stcb, *netp, 4906 &abort_no_unlock, 4907 mflowtype, mflowid, 4908 vrf_id); 4909 } else { 4910 ret = -1; 4911 } 4912 *offset = length; 4913 if (abort_no_unlock) { 4914 return (NULL); 4915 } 4916 /* 4917 * Special case, I must call the output routine to 4918 * get the cookie echoed 4919 */ 4920 if ((stcb != NULL) && (ret == 0)) { 4921 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_CONTROL_PROC, SCTP_SO_NOT_LOCKED); 4922 } 4923 return (stcb); 4924 break; 4925 case SCTP_SELECTIVE_ACK: 4926 case SCTP_NR_SELECTIVE_ACK: 4927 { 4928 int abort_now = 0; 4929 uint32_t a_rwnd, cum_ack; 4930 uint16_t num_seg, num_nr_seg, num_dup; 4931 uint8_t flags; 4932 int offset_seg, offset_dup; 4933 4934 SCTPDBG(SCTP_DEBUG_INPUT3, "%s\n", 4935 ch->chunk_type == SCTP_SELECTIVE_ACK ? "SCTP_SACK" : "SCTP_NR_SACK"); 4936 SCTP_STAT_INCR(sctps_recvsacks); 4937 if (stcb == NULL) { 4938 SCTPDBG(SCTP_DEBUG_INDATA1, "No stcb when processing %s chunk\n", 4939 (ch->chunk_type == SCTP_SELECTIVE_ACK) ? "SCTP_SACK" : "SCTP_NR_SACK"); 4940 break; 4941 } 4942 if (ch->chunk_type == SCTP_SELECTIVE_ACK) { 4943 if (chk_length < sizeof(struct sctp_sack_chunk)) { 4944 SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size on SACK chunk, too small\n"); 4945 break; 4946 } 4947 } else { 4948 if (stcb->asoc.nrsack_supported == 0) { 4949 goto unknown_chunk; 4950 } 4951 if (chk_length < sizeof(struct sctp_nr_sack_chunk)) { 4952 SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size on NR_SACK chunk, too small\n"); 4953 break; 4954 } 4955 } 4956 if (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_ACK_SENT) { 4957 /*- 4958 * If we have sent a shutdown-ack, we will pay no 4959 * attention to a sack sent in to us since 4960 * we don't care anymore. 4961 */ 4962 break; 4963 } 4964 flags = ch->chunk_flags; 4965 if (ch->chunk_type == SCTP_SELECTIVE_ACK) { 4966 struct sctp_sack_chunk *sack; 4967 4968 sack = (struct sctp_sack_chunk *)ch; 4969 cum_ack = ntohl(sack->sack.cum_tsn_ack); 4970 num_seg = ntohs(sack->sack.num_gap_ack_blks); 4971 num_nr_seg = 0; 4972 num_dup = ntohs(sack->sack.num_dup_tsns); 4973 a_rwnd = ntohl(sack->sack.a_rwnd); 4974 if (sizeof(struct sctp_sack_chunk) + 4975 num_seg * sizeof(struct sctp_gap_ack_block) + 4976 num_dup * sizeof(uint32_t) != chk_length) { 4977 SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size of SACK chunk\n"); 4978 break; 4979 } 4980 offset_seg = *offset + sizeof(struct sctp_sack_chunk); 4981 offset_dup = offset_seg + num_seg * sizeof(struct sctp_gap_ack_block); 4982 } else { 4983 struct sctp_nr_sack_chunk *nr_sack; 4984 4985 nr_sack = (struct sctp_nr_sack_chunk *)ch; 4986 cum_ack = ntohl(nr_sack->nr_sack.cum_tsn_ack); 4987 num_seg = ntohs(nr_sack->nr_sack.num_gap_ack_blks); 4988 num_nr_seg = ntohs(nr_sack->nr_sack.num_nr_gap_ack_blks); 4989 num_dup = ntohs(nr_sack->nr_sack.num_dup_tsns); 4990 a_rwnd = ntohl(nr_sack->nr_sack.a_rwnd); 4991 if (sizeof(struct sctp_nr_sack_chunk) + 4992 (num_seg + num_nr_seg) * sizeof(struct sctp_gap_ack_block) + 4993 num_dup * sizeof(uint32_t) != chk_length) { 4994 SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size of NR_SACK chunk\n"); 4995 break; 4996 } 4997 offset_seg = *offset + sizeof(struct sctp_nr_sack_chunk); 4998 offset_dup = offset_seg + (num_seg + num_nr_seg) * sizeof(struct sctp_gap_ack_block); 4999 } 5000 SCTPDBG(SCTP_DEBUG_INPUT3, "%s process cum_ack:%x num_seg:%d a_rwnd:%d\n", 5001 (ch->chunk_type == SCTP_SELECTIVE_ACK) ? "SCTP_SACK" : "SCTP_NR_SACK", 5002 cum_ack, num_seg, a_rwnd); 5003 stcb->asoc.seen_a_sack_this_pkt = 1; 5004 if ((stcb->asoc.pr_sctp_cnt == 0) && 5005 (num_seg == 0) && (num_nr_seg == 0) && 5006 SCTP_TSN_GE(cum_ack, stcb->asoc.last_acked_seq) && 5007 (stcb->asoc.saw_sack_with_frags == 0) && 5008 (stcb->asoc.saw_sack_with_nr_frags == 0) && 5009 (!TAILQ_EMPTY(&stcb->asoc.sent_queue))) { 5010 /* 5011 * We have a SIMPLE sack having no 5012 * prior segments and data on sent 5013 * queue to be acked. Use the faster 5014 * path sack processing. We also 5015 * allow window update sacks with no 5016 * missing segments to go this way 5017 * too. 5018 */ 5019 sctp_express_handle_sack(stcb, cum_ack, a_rwnd, 5020 &abort_now, ecne_seen); 5021 } else { 5022 if ((netp != NULL) && (*netp != NULL)) { 5023 sctp_handle_sack(m, offset_seg, offset_dup, stcb, 5024 num_seg, num_nr_seg, num_dup, &abort_now, flags, 5025 cum_ack, a_rwnd, ecne_seen); 5026 } 5027 } 5028 if (abort_now) { 5029 /* ABORT signal from sack processing */ 5030 *offset = length; 5031 return (NULL); 5032 } 5033 if (TAILQ_EMPTY(&stcb->asoc.send_queue) && 5034 TAILQ_EMPTY(&stcb->asoc.sent_queue) && 5035 (stcb->asoc.stream_queue_cnt == 0)) { 5036 sctp_ulp_notify(SCTP_NOTIFY_SENDER_DRY, stcb, 0, NULL, SCTP_SO_NOT_LOCKED); 5037 } 5038 break; 5039 } 5040 case SCTP_HEARTBEAT_REQUEST: 5041 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_HEARTBEAT\n"); 5042 if ((stcb != NULL) && (netp != NULL) && (*netp != NULL)) { 5043 SCTP_STAT_INCR(sctps_recvheartbeat); 5044 sctp_send_heartbeat_ack(stcb, m, *offset, 5045 chk_length, *netp); 5046 } 5047 break; 5048 case SCTP_HEARTBEAT_ACK: 5049 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_HEARTBEAT_ACK\n"); 5050 if ((stcb == NULL) || (chk_length != sizeof(struct sctp_heartbeat_chunk))) { 5051 /* Its not ours */ 5052 *offset = length; 5053 return (stcb); 5054 } 5055 SCTP_STAT_INCR(sctps_recvheartbeatack); 5056 if ((netp != NULL) && (*netp != NULL)) { 5057 sctp_handle_heartbeat_ack((struct sctp_heartbeat_chunk *)ch, 5058 stcb, *netp); 5059 } 5060 break; 5061 case SCTP_ABORT_ASSOCIATION: 5062 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ABORT, stcb %p\n", 5063 (void *)stcb); 5064 *offset = length; 5065 if ((stcb != NULL) && (netp != NULL) && (*netp != NULL)) { 5066 if (sctp_handle_abort((struct sctp_abort_chunk *)ch, stcb, *netp)) { 5067 return (NULL); 5068 } else { 5069 return (stcb); 5070 } 5071 } else { 5072 return (NULL); 5073 } 5074 break; 5075 case SCTP_SHUTDOWN: 5076 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SHUTDOWN, stcb %p\n", 5077 (void *)stcb); 5078 if ((stcb == NULL) || (chk_length != sizeof(struct sctp_shutdown_chunk))) { 5079 *offset = length; 5080 return (stcb); 5081 } 5082 if ((netp != NULL) && (*netp != NULL)) { 5083 int abort_flag = 0; 5084 5085 sctp_handle_shutdown((struct sctp_shutdown_chunk *)ch, 5086 stcb, *netp, &abort_flag); 5087 if (abort_flag) { 5088 *offset = length; 5089 return (NULL); 5090 } 5091 } 5092 break; 5093 case SCTP_SHUTDOWN_ACK: 5094 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SHUTDOWN_ACK, stcb %p\n", (void *)stcb); 5095 if ((stcb != NULL) && (netp != NULL) && (*netp != NULL)) { 5096 sctp_handle_shutdown_ack((struct sctp_shutdown_ack_chunk *)ch, stcb, *netp); 5097 } 5098 *offset = length; 5099 return (NULL); 5100 break; 5101 case SCTP_OPERATION_ERROR: 5102 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_OP_ERR\n"); 5103 if ((stcb != NULL) && (netp != NULL) && (*netp != NULL) && 5104 sctp_handle_error(ch, stcb, *netp, contiguous) < 0) { 5105 *offset = length; 5106 return (NULL); 5107 } 5108 break; 5109 case SCTP_COOKIE_ECHO: 5110 SCTPDBG(SCTP_DEBUG_INPUT3, 5111 "SCTP_COOKIE_ECHO, stcb %p\n", (void *)stcb); 5112 if ((stcb != NULL) && (stcb->asoc.total_output_queue_size > 0)) { 5113 ; 5114 } else { 5115 if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) { 5116 /* We are not interested anymore */ 5117 abend: 5118 if (stcb != NULL) { 5119 SCTP_TCB_UNLOCK(stcb); 5120 } 5121 *offset = length; 5122 return (NULL); 5123 } 5124 } 5125 /*- 5126 * First are we accepting? We do this again here 5127 * since it is possible that a previous endpoint WAS 5128 * listening responded to a INIT-ACK and then 5129 * closed. We opened and bound.. and are now no 5130 * longer listening. 5131 * 5132 * XXXGL: notes on checking listen queue length. 5133 * 1) SCTP_IS_LISTENING() doesn't necessarily mean 5134 * SOLISTENING(), because a listening "UDP type" 5135 * socket isn't listening in terms of the socket 5136 * layer. It is a normal data flow socket, that 5137 * can fork off new connections. Thus, we should 5138 * look into sol_qlen only in case we are !UDP. 5139 * 2) Checking sol_qlen in general requires locking 5140 * the socket, and this code lacks that. 5141 */ 5142 if ((stcb == NULL) && 5143 (!SCTP_IS_LISTENING(inp) || 5144 (!(inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) && 5145 inp->sctp_socket->sol_qlen >= inp->sctp_socket->sol_qlimit))) { 5146 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) && 5147 (SCTP_BASE_SYSCTL(sctp_abort_if_one_2_one_hits_limit))) { 5148 op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, ""); 5149 sctp_abort_association(inp, stcb, m, iphlen, 5150 src, dst, sh, op_err, 5151 mflowtype, mflowid, 5152 vrf_id, port); 5153 } 5154 *offset = length; 5155 return (NULL); 5156 } else { 5157 struct mbuf *ret_buf; 5158 struct sctp_inpcb *linp; 5159 5160 if (stcb) { 5161 linp = NULL; 5162 } else { 5163 linp = inp; 5164 } 5165 5166 if (linp != NULL) { 5167 SCTP_ASOC_CREATE_LOCK(linp); 5168 if ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) || 5169 (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE)) { 5170 SCTP_ASOC_CREATE_UNLOCK(linp); 5171 goto abend; 5172 } 5173 } 5174 5175 if (netp != NULL) { 5176 struct sctp_tcb *locked_stcb; 5177 5178 locked_stcb = stcb; 5179 ret_buf = 5180 sctp_handle_cookie_echo(m, iphlen, 5181 *offset, 5182 src, dst, 5183 sh, 5184 (struct sctp_cookie_echo_chunk *)ch, 5185 &inp, &stcb, netp, 5186 auth_skipped, 5187 auth_offset, 5188 auth_len, 5189 &locked_stcb, 5190 mflowtype, 5191 mflowid, 5192 vrf_id, 5193 port); 5194 if ((locked_stcb != NULL) && (locked_stcb != stcb)) { 5195 SCTP_TCB_UNLOCK(locked_stcb); 5196 } 5197 if (stcb != NULL) { 5198 SCTP_TCB_LOCK_ASSERT(stcb); 5199 } 5200 } else { 5201 ret_buf = NULL; 5202 } 5203 if (linp != NULL) { 5204 SCTP_ASOC_CREATE_UNLOCK(linp); 5205 } 5206 if (ret_buf == NULL) { 5207 if (stcb != NULL) { 5208 SCTP_TCB_UNLOCK(stcb); 5209 } 5210 SCTPDBG(SCTP_DEBUG_INPUT3, 5211 "GAK, null buffer\n"); 5212 *offset = length; 5213 return (NULL); 5214 } 5215 /* if AUTH skipped, see if it verified... */ 5216 if (auth_skipped) { 5217 got_auth = 1; 5218 auth_skipped = 0; 5219 } 5220 if (!TAILQ_EMPTY(&stcb->asoc.sent_queue)) { 5221 /* 5222 * Restart the timer if we have 5223 * pending data 5224 */ 5225 struct sctp_tmit_chunk *chk; 5226 5227 chk = TAILQ_FIRST(&stcb->asoc.sent_queue); 5228 sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, chk->whoTo); 5229 } 5230 } 5231 break; 5232 case SCTP_COOKIE_ACK: 5233 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_COOKIE_ACK, stcb %p\n", (void *)stcb); 5234 if ((stcb == NULL) || chk_length != sizeof(struct sctp_cookie_ack_chunk)) { 5235 return (stcb); 5236 } 5237 if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) { 5238 /* We are not interested anymore */ 5239 if ((stcb) && (stcb->asoc.total_output_queue_size)) { 5240 ; 5241 } else if (stcb) { 5242 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 5243 so = SCTP_INP_SO(inp); 5244 atomic_add_int(&stcb->asoc.refcnt, 1); 5245 SCTP_TCB_UNLOCK(stcb); 5246 SCTP_SOCKET_LOCK(so, 1); 5247 SCTP_TCB_LOCK(stcb); 5248 atomic_subtract_int(&stcb->asoc.refcnt, 1); 5249 #endif 5250 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 5251 SCTP_FROM_SCTP_INPUT + SCTP_LOC_30); 5252 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 5253 SCTP_SOCKET_UNLOCK(so, 1); 5254 #endif 5255 *offset = length; 5256 return (NULL); 5257 } 5258 } 5259 if ((netp != NULL) && (*netp != NULL)) { 5260 sctp_handle_cookie_ack((struct sctp_cookie_ack_chunk *)ch, stcb, *netp); 5261 } 5262 break; 5263 case SCTP_ECN_ECHO: 5264 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ECN_ECHO\n"); 5265 if ((stcb == NULL) || (chk_length != sizeof(struct sctp_ecne_chunk))) { 5266 /* Its not ours */ 5267 *offset = length; 5268 return (stcb); 5269 } 5270 if (stcb->asoc.ecn_supported == 0) { 5271 goto unknown_chunk; 5272 } 5273 sctp_handle_ecn_echo((struct sctp_ecne_chunk *)ch, stcb); 5274 ecne_seen = 1; 5275 break; 5276 case SCTP_ECN_CWR: 5277 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ECN_CWR\n"); 5278 if ((stcb == NULL) || (chk_length != sizeof(struct sctp_cwr_chunk))) { 5279 *offset = length; 5280 return (stcb); 5281 } 5282 if (stcb->asoc.ecn_supported == 0) { 5283 goto unknown_chunk; 5284 } 5285 sctp_handle_ecn_cwr((struct sctp_cwr_chunk *)ch, stcb, *netp); 5286 break; 5287 case SCTP_SHUTDOWN_COMPLETE: 5288 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SHUTDOWN_COMPLETE, stcb %p\n", (void *)stcb); 5289 /* must be first and only chunk */ 5290 if ((num_chunks > 1) || 5291 (length - *offset > (int)SCTP_SIZE32(chk_length))) { 5292 *offset = length; 5293 return (stcb); 5294 } 5295 if ((stcb != NULL) && (netp != NULL) && (*netp != NULL)) { 5296 sctp_handle_shutdown_complete((struct sctp_shutdown_complete_chunk *)ch, 5297 stcb, *netp); 5298 } 5299 *offset = length; 5300 return (NULL); 5301 break; 5302 case SCTP_ASCONF: 5303 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ASCONF\n"); 5304 if (stcb != NULL) { 5305 if (stcb->asoc.asconf_supported == 0) { 5306 goto unknown_chunk; 5307 } 5308 sctp_handle_asconf(m, *offset, src, 5309 (struct sctp_asconf_chunk *)ch, stcb, asconf_cnt == 0); 5310 asconf_cnt++; 5311 } 5312 break; 5313 case SCTP_ASCONF_ACK: 5314 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ASCONF_ACK\n"); 5315 if (chk_length < sizeof(struct sctp_asconf_ack_chunk)) { 5316 /* Its not ours */ 5317 *offset = length; 5318 return (stcb); 5319 } 5320 if ((stcb != NULL) && (netp != NULL) && (*netp != NULL)) { 5321 if (stcb->asoc.asconf_supported == 0) { 5322 goto unknown_chunk; 5323 } 5324 /* He's alive so give him credit */ 5325 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) { 5326 sctp_misc_ints(SCTP_THRESHOLD_CLEAR, 5327 stcb->asoc.overall_error_count, 5328 0, 5329 SCTP_FROM_SCTP_INPUT, 5330 __LINE__); 5331 } 5332 stcb->asoc.overall_error_count = 0; 5333 sctp_handle_asconf_ack(m, *offset, 5334 (struct sctp_asconf_ack_chunk *)ch, stcb, *netp, &abort_no_unlock); 5335 if (abort_no_unlock) 5336 return (NULL); 5337 } 5338 break; 5339 case SCTP_FORWARD_CUM_TSN: 5340 case SCTP_IFORWARD_CUM_TSN: 5341 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_FWD_TSN\n"); 5342 if (chk_length < sizeof(struct sctp_forward_tsn_chunk)) { 5343 /* Its not ours */ 5344 *offset = length; 5345 return (stcb); 5346 } 5347 5348 if (stcb != NULL) { 5349 int abort_flag = 0; 5350 5351 if (stcb->asoc.prsctp_supported == 0) { 5352 goto unknown_chunk; 5353 } 5354 *fwd_tsn_seen = 1; 5355 if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) { 5356 /* We are not interested anymore */ 5357 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 5358 so = SCTP_INP_SO(inp); 5359 atomic_add_int(&stcb->asoc.refcnt, 1); 5360 SCTP_TCB_UNLOCK(stcb); 5361 SCTP_SOCKET_LOCK(so, 1); 5362 SCTP_TCB_LOCK(stcb); 5363 atomic_subtract_int(&stcb->asoc.refcnt, 1); 5364 #endif 5365 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, 5366 SCTP_FROM_SCTP_INPUT + SCTP_LOC_31); 5367 #if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING) 5368 SCTP_SOCKET_UNLOCK(so, 1); 5369 #endif 5370 *offset = length; 5371 return (NULL); 5372 } 5373 /* 5374 * For sending a SACK this looks like DATA 5375 * chunks. 5376 */ 5377 stcb->asoc.last_data_chunk_from = stcb->asoc.last_control_chunk_from; 5378 sctp_handle_forward_tsn(stcb, 5379 (struct sctp_forward_tsn_chunk *)ch, &abort_flag, m, *offset); 5380 if (abort_flag) { 5381 *offset = length; 5382 return (NULL); 5383 } 5384 } 5385 break; 5386 case SCTP_STREAM_RESET: 5387 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_STREAM_RESET\n"); 5388 if (((stcb == NULL) || (ch == NULL) || (chk_length < sizeof(struct sctp_stream_reset_tsn_req)))) { 5389 /* Its not ours */ 5390 *offset = length; 5391 return (stcb); 5392 } 5393 if (stcb->asoc.reconfig_supported == 0) { 5394 goto unknown_chunk; 5395 } 5396 if (sctp_handle_stream_reset(stcb, m, *offset, ch)) { 5397 /* stop processing */ 5398 *offset = length; 5399 return (NULL); 5400 } 5401 break; 5402 case SCTP_PACKET_DROPPED: 5403 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_PACKET_DROPPED\n"); 5404 /* re-get it all please */ 5405 if (chk_length < sizeof(struct sctp_pktdrop_chunk)) { 5406 /* Its not ours */ 5407 *offset = length; 5408 return (stcb); 5409 } 5410 5411 if ((ch != NULL) && (stcb != NULL) && (netp != NULL) && (*netp != NULL)) { 5412 if (stcb->asoc.pktdrop_supported == 0) { 5413 goto unknown_chunk; 5414 } 5415 sctp_handle_packet_dropped((struct sctp_pktdrop_chunk *)ch, 5416 stcb, *netp, 5417 min(chk_length, contiguous)); 5418 } 5419 break; 5420 case SCTP_AUTHENTICATION: 5421 SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_AUTHENTICATION\n"); 5422 if (stcb == NULL) { 5423 /* save the first AUTH for later processing */ 5424 if (auth_skipped == 0) { 5425 auth_offset = *offset; 5426 auth_len = chk_length; 5427 auth_skipped = 1; 5428 } 5429 /* skip this chunk (temporarily) */ 5430 goto next_chunk; 5431 } 5432 if (stcb->asoc.auth_supported == 0) { 5433 goto unknown_chunk; 5434 } 5435 if ((chk_length < (sizeof(struct sctp_auth_chunk))) || 5436 (chk_length > (sizeof(struct sctp_auth_chunk) + 5437 SCTP_AUTH_DIGEST_LEN_MAX))) { 5438 /* Its not ours */ 5439 *offset = length; 5440 return (stcb); 5441 } 5442 if (got_auth == 1) { 5443 /* skip this chunk... it's already auth'd */ 5444 goto next_chunk; 5445 } 5446 got_auth = 1; 5447 if ((ch == NULL) || sctp_handle_auth(stcb, (struct sctp_auth_chunk *)ch, 5448 m, *offset)) { 5449 /* auth HMAC failed so dump the packet */ 5450 *offset = length; 5451 return (stcb); 5452 } else { 5453 /* remaining chunks are HMAC checked */ 5454 stcb->asoc.authenticated = 1; 5455 } 5456 break; 5457 5458 default: 5459 unknown_chunk: 5460 /* it's an unknown chunk! */ 5461 if ((ch->chunk_type & 0x40) && (stcb != NULL)) { 5462 struct sctp_gen_error_cause *cause; 5463 int len; 5464 5465 op_err = sctp_get_mbuf_for_msg(sizeof(struct sctp_gen_error_cause), 5466 0, M_NOWAIT, 1, MT_DATA); 5467 if (op_err != NULL) { 5468 len = min(SCTP_SIZE32(chk_length), (uint32_t)(length - *offset)); 5469 cause = mtod(op_err, struct sctp_gen_error_cause *); 5470 cause->code = htons(SCTP_CAUSE_UNRECOG_CHUNK); 5471 cause->length = htons((uint16_t)(len + sizeof(struct sctp_gen_error_cause))); 5472 SCTP_BUF_LEN(op_err) = sizeof(struct sctp_gen_error_cause); 5473 SCTP_BUF_NEXT(op_err) = SCTP_M_COPYM(m, *offset, len, M_NOWAIT); 5474 if (SCTP_BUF_NEXT(op_err) != NULL) { 5475 #ifdef SCTP_MBUF_LOGGING 5476 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MBUF_LOGGING_ENABLE) { 5477 sctp_log_mbc(SCTP_BUF_NEXT(op_err), SCTP_MBUF_ICOPY); 5478 } 5479 #endif 5480 sctp_queue_op_err(stcb, op_err); 5481 } else { 5482 sctp_m_freem(op_err); 5483 } 5484 } 5485 } 5486 if ((ch->chunk_type & 0x80) == 0) { 5487 /* discard this packet */ 5488 *offset = length; 5489 return (stcb); 5490 } /* else skip this bad chunk and continue... */ 5491 break; 5492 } /* switch (ch->chunk_type) */ 5493 5494 5495 next_chunk: 5496 /* get the next chunk */ 5497 *offset += SCTP_SIZE32(chk_length); 5498 if (*offset >= length) { 5499 /* no more data left in the mbuf chain */ 5500 break; 5501 } 5502 ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset, 5503 sizeof(struct sctp_chunkhdr), chunk_buf); 5504 if (ch == NULL) { 5505 *offset = length; 5506 return (stcb); 5507 } 5508 } /* while */ 5509 5510 if ((asconf_cnt > 0) && (stcb != NULL)) { 5511 sctp_send_asconf_ack(stcb); 5512 } 5513 return (stcb); 5514 } 5515 5516 5517 /* 5518 * common input chunk processing (v4 and v6) 5519 */ 5520 void 5521 sctp_common_input_processing(struct mbuf **mm, int iphlen, int offset, int length, 5522 struct sockaddr *src, struct sockaddr *dst, 5523 struct sctphdr *sh, struct sctp_chunkhdr *ch, 5524 uint8_t compute_crc, 5525 uint8_t ecn_bits, 5526 uint8_t mflowtype, uint32_t mflowid, uint16_t fibnum, 5527 uint32_t vrf_id, uint16_t port) 5528 { 5529 uint32_t high_tsn; 5530 int fwd_tsn_seen = 0, data_processed = 0; 5531 struct mbuf *m = *mm, *op_err; 5532 char msg[SCTP_DIAG_INFO_LEN]; 5533 int un_sent; 5534 int cnt_ctrl_ready = 0; 5535 struct sctp_inpcb *inp = NULL, *inp_decr = NULL; 5536 struct sctp_tcb *stcb = NULL; 5537 struct sctp_nets *net = NULL; 5538 5539 SCTP_STAT_INCR(sctps_recvdatagrams); 5540 #ifdef SCTP_AUDITING_ENABLED 5541 sctp_audit_log(0xE0, 1); 5542 sctp_auditing(0, inp, stcb, net); 5543 #endif 5544 if (compute_crc != 0) { 5545 uint32_t check, calc_check; 5546 5547 check = sh->checksum; 5548 sh->checksum = 0; 5549 calc_check = sctp_calculate_cksum(m, iphlen); 5550 sh->checksum = check; 5551 if (calc_check != check) { 5552 SCTPDBG(SCTP_DEBUG_INPUT1, "Bad CSUM on SCTP packet calc_check:%x check:%x m:%p mlen:%d iphlen:%d\n", 5553 calc_check, check, (void *)m, length, iphlen); 5554 stcb = sctp_findassociation_addr(m, offset, src, dst, 5555 sh, ch, &inp, &net, vrf_id); 5556 #if defined(INET) || defined(INET6) 5557 if ((ch->chunk_type != SCTP_INITIATION) && 5558 (net != NULL) && (net->port != port)) { 5559 if (net->port == 0) { 5560 /* UDP encapsulation turned on. */ 5561 net->mtu -= sizeof(struct udphdr); 5562 if (stcb->asoc.smallest_mtu > net->mtu) { 5563 sctp_pathmtu_adjustment(stcb, net->mtu); 5564 } 5565 } else if (port == 0) { 5566 /* UDP encapsulation turned off. */ 5567 net->mtu += sizeof(struct udphdr); 5568 /* XXX Update smallest_mtu */ 5569 } 5570 net->port = port; 5571 } 5572 #endif 5573 if (net != NULL) { 5574 net->flowtype = mflowtype; 5575 net->flowid = mflowid; 5576 } 5577 SCTP_PROBE5(receive, NULL, stcb, m, stcb, sh); 5578 if ((inp != NULL) && (stcb != NULL)) { 5579 sctp_send_packet_dropped(stcb, net, m, length, iphlen, 1); 5580 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_INPUT_ERROR, SCTP_SO_NOT_LOCKED); 5581 } else if ((inp != NULL) && (stcb == NULL)) { 5582 inp_decr = inp; 5583 } 5584 SCTP_STAT_INCR(sctps_badsum); 5585 SCTP_STAT_INCR_COUNTER32(sctps_checksumerrors); 5586 goto out; 5587 } 5588 } 5589 /* Destination port of 0 is illegal, based on RFC4960. */ 5590 if (sh->dest_port == 0) { 5591 SCTP_STAT_INCR(sctps_hdrops); 5592 goto out; 5593 } 5594 stcb = sctp_findassociation_addr(m, offset, src, dst, 5595 sh, ch, &inp, &net, vrf_id); 5596 #if defined(INET) || defined(INET6) 5597 if ((ch->chunk_type != SCTP_INITIATION) && 5598 (net != NULL) && (net->port != port)) { 5599 if (net->port == 0) { 5600 /* UDP encapsulation turned on. */ 5601 net->mtu -= sizeof(struct udphdr); 5602 if (stcb->asoc.smallest_mtu > net->mtu) { 5603 sctp_pathmtu_adjustment(stcb, net->mtu); 5604 } 5605 } else if (port == 0) { 5606 /* UDP encapsulation turned off. */ 5607 net->mtu += sizeof(struct udphdr); 5608 /* XXX Update smallest_mtu */ 5609 } 5610 net->port = port; 5611 } 5612 #endif 5613 if (net != NULL) { 5614 net->flowtype = mflowtype; 5615 net->flowid = mflowid; 5616 } 5617 if (inp == NULL) { 5618 SCTP_PROBE5(receive, NULL, stcb, m, stcb, sh); 5619 SCTP_STAT_INCR(sctps_noport); 5620 if (badport_bandlim(BANDLIM_SCTP_OOTB) < 0) { 5621 goto out; 5622 } 5623 if (ch->chunk_type == SCTP_SHUTDOWN_ACK) { 5624 sctp_send_shutdown_complete2(src, dst, sh, 5625 mflowtype, mflowid, fibnum, 5626 vrf_id, port); 5627 goto out; 5628 } 5629 if (ch->chunk_type == SCTP_SHUTDOWN_COMPLETE) { 5630 goto out; 5631 } 5632 if (ch->chunk_type != SCTP_ABORT_ASSOCIATION) { 5633 if ((SCTP_BASE_SYSCTL(sctp_blackhole) == 0) || 5634 ((SCTP_BASE_SYSCTL(sctp_blackhole) == 1) && 5635 (ch->chunk_type != SCTP_INIT))) { 5636 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 5637 "Out of the blue"); 5638 sctp_send_abort(m, iphlen, src, dst, 5639 sh, 0, op_err, 5640 mflowtype, mflowid, fibnum, 5641 vrf_id, port); 5642 } 5643 } 5644 goto out; 5645 } else if (stcb == NULL) { 5646 inp_decr = inp; 5647 } 5648 SCTPDBG(SCTP_DEBUG_INPUT1, "Ok, Common input processing called, m:%p iphlen:%d offset:%d length:%d stcb:%p\n", 5649 (void *)m, iphlen, offset, length, (void *)stcb); 5650 if (stcb) { 5651 /* always clear this before beginning a packet */ 5652 stcb->asoc.authenticated = 0; 5653 stcb->asoc.seen_a_sack_this_pkt = 0; 5654 SCTPDBG(SCTP_DEBUG_INPUT1, "stcb:%p state:%x\n", 5655 (void *)stcb, stcb->asoc.state); 5656 5657 if ((stcb->asoc.state & SCTP_STATE_WAS_ABORTED) || 5658 (stcb->asoc.state & SCTP_STATE_ABOUT_TO_BE_FREED)) { 5659 /*- 5660 * If we hit here, we had a ref count 5661 * up when the assoc was aborted and the 5662 * timer is clearing out the assoc, we should 5663 * NOT respond to any packet.. its OOTB. 5664 */ 5665 SCTP_TCB_UNLOCK(stcb); 5666 stcb = NULL; 5667 SCTP_PROBE5(receive, NULL, stcb, m, stcb, sh); 5668 snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__); 5669 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 5670 msg); 5671 sctp_handle_ootb(m, iphlen, offset, src, dst, sh, inp, op_err, 5672 mflowtype, mflowid, inp->fibnum, 5673 vrf_id, port); 5674 goto out; 5675 } 5676 } 5677 if (IS_SCTP_CONTROL(ch)) { 5678 /* process the control portion of the SCTP packet */ 5679 /* sa_ignore NO_NULL_CHK */ 5680 stcb = sctp_process_control(m, iphlen, &offset, length, 5681 src, dst, sh, ch, 5682 inp, stcb, &net, &fwd_tsn_seen, 5683 mflowtype, mflowid, fibnum, 5684 vrf_id, port); 5685 if (stcb) { 5686 /* 5687 * This covers us if the cookie-echo was there and 5688 * it changes our INP. 5689 */ 5690 inp = stcb->sctp_ep; 5691 #if defined(INET) || defined(INET6) 5692 if ((ch->chunk_type != SCTP_INITIATION) && 5693 (net != NULL) && (net->port != port)) { 5694 if (net->port == 0) { 5695 /* UDP encapsulation turned on. */ 5696 net->mtu -= sizeof(struct udphdr); 5697 if (stcb->asoc.smallest_mtu > net->mtu) { 5698 sctp_pathmtu_adjustment(stcb, net->mtu); 5699 } 5700 } else if (port == 0) { 5701 /* UDP encapsulation turned off. */ 5702 net->mtu += sizeof(struct udphdr); 5703 /* XXX Update smallest_mtu */ 5704 } 5705 net->port = port; 5706 } 5707 #endif 5708 } 5709 } else { 5710 /* 5711 * no control chunks, so pre-process DATA chunks (these 5712 * checks are taken care of by control processing) 5713 */ 5714 5715 /* 5716 * if DATA only packet, and auth is required, then punt... 5717 * can't have authenticated without any AUTH (control) 5718 * chunks 5719 */ 5720 if ((stcb != NULL) && 5721 sctp_auth_is_required_chunk(SCTP_DATA, stcb->asoc.local_auth_chunks)) { 5722 /* "silently" ignore */ 5723 SCTP_PROBE5(receive, NULL, stcb, m, stcb, sh); 5724 SCTP_STAT_INCR(sctps_recvauthmissing); 5725 goto out; 5726 } 5727 if (stcb == NULL) { 5728 /* out of the blue DATA chunk */ 5729 SCTP_PROBE5(receive, NULL, NULL, m, NULL, sh); 5730 snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__); 5731 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 5732 msg); 5733 sctp_handle_ootb(m, iphlen, offset, src, dst, sh, inp, op_err, 5734 mflowtype, mflowid, fibnum, 5735 vrf_id, port); 5736 goto out; 5737 } 5738 if (stcb->asoc.my_vtag != ntohl(sh->v_tag)) { 5739 /* v_tag mismatch! */ 5740 SCTP_PROBE5(receive, NULL, stcb, m, stcb, sh); 5741 SCTP_STAT_INCR(sctps_badvtag); 5742 goto out; 5743 } 5744 } 5745 5746 SCTP_PROBE5(receive, NULL, stcb, m, stcb, sh); 5747 if (stcb == NULL) { 5748 /* 5749 * no valid TCB for this packet, or we found it's a bad 5750 * packet while processing control, or we're done with this 5751 * packet (done or skip rest of data), so we drop it... 5752 */ 5753 goto out; 5754 } 5755 5756 /* 5757 * DATA chunk processing 5758 */ 5759 /* plow through the data chunks while length > offset */ 5760 5761 /* 5762 * Rest should be DATA only. Check authentication state if AUTH for 5763 * DATA is required. 5764 */ 5765 if ((length > offset) && 5766 (stcb != NULL) && 5767 sctp_auth_is_required_chunk(SCTP_DATA, stcb->asoc.local_auth_chunks) && 5768 !stcb->asoc.authenticated) { 5769 /* "silently" ignore */ 5770 SCTP_STAT_INCR(sctps_recvauthmissing); 5771 SCTPDBG(SCTP_DEBUG_AUTH1, 5772 "Data chunk requires AUTH, skipped\n"); 5773 goto trigger_send; 5774 } 5775 if (length > offset) { 5776 int retval; 5777 5778 /* 5779 * First check to make sure our state is correct. We would 5780 * not get here unless we really did have a tag, so we don't 5781 * abort if this happens, just dump the chunk silently. 5782 */ 5783 switch (SCTP_GET_STATE(stcb)) { 5784 case SCTP_STATE_COOKIE_ECHOED: 5785 /* 5786 * we consider data with valid tags in this state 5787 * shows us the cookie-ack was lost. Imply it was 5788 * there. 5789 */ 5790 sctp_handle_cookie_ack((struct sctp_cookie_ack_chunk *)ch, stcb, net); 5791 break; 5792 case SCTP_STATE_COOKIE_WAIT: 5793 /* 5794 * We consider OOTB any data sent during asoc setup. 5795 */ 5796 snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__); 5797 op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code), 5798 msg); 5799 sctp_handle_ootb(m, iphlen, offset, src, dst, sh, inp, op_err, 5800 mflowtype, mflowid, inp->fibnum, 5801 vrf_id, port); 5802 goto out; 5803 /* sa_ignore NOTREACHED */ 5804 break; 5805 case SCTP_STATE_EMPTY: /* should not happen */ 5806 case SCTP_STATE_INUSE: /* should not happen */ 5807 case SCTP_STATE_SHUTDOWN_RECEIVED: /* This is a peer error */ 5808 case SCTP_STATE_SHUTDOWN_ACK_SENT: 5809 default: 5810 goto out; 5811 /* sa_ignore NOTREACHED */ 5812 break; 5813 case SCTP_STATE_OPEN: 5814 case SCTP_STATE_SHUTDOWN_SENT: 5815 break; 5816 } 5817 /* plow through the data chunks while length > offset */ 5818 retval = sctp_process_data(mm, iphlen, &offset, length, 5819 inp, stcb, net, &high_tsn); 5820 if (retval == 2) { 5821 /* 5822 * The association aborted, NO UNLOCK needed since 5823 * the association is destroyed. 5824 */ 5825 stcb = NULL; 5826 goto out; 5827 } 5828 data_processed = 1; 5829 /* 5830 * Anything important needs to have been m_copy'ed in 5831 * process_data 5832 */ 5833 } 5834 5835 /* take care of ecn */ 5836 if ((data_processed == 1) && 5837 (stcb->asoc.ecn_supported == 1) && 5838 ((ecn_bits & SCTP_CE_BITS) == SCTP_CE_BITS)) { 5839 /* Yep, we need to add a ECNE */ 5840 sctp_send_ecn_echo(stcb, net, high_tsn); 5841 } 5842 5843 if ((data_processed == 0) && (fwd_tsn_seen)) { 5844 int was_a_gap; 5845 uint32_t highest_tsn; 5846 5847 if (SCTP_TSN_GT(stcb->asoc.highest_tsn_inside_nr_map, stcb->asoc.highest_tsn_inside_map)) { 5848 highest_tsn = stcb->asoc.highest_tsn_inside_nr_map; 5849 } else { 5850 highest_tsn = stcb->asoc.highest_tsn_inside_map; 5851 } 5852 was_a_gap = SCTP_TSN_GT(highest_tsn, stcb->asoc.cumulative_tsn); 5853 stcb->asoc.send_sack = 1; 5854 sctp_sack_check(stcb, was_a_gap); 5855 } else if (fwd_tsn_seen) { 5856 stcb->asoc.send_sack = 1; 5857 } 5858 /* trigger send of any chunks in queue... */ 5859 trigger_send: 5860 #ifdef SCTP_AUDITING_ENABLED 5861 sctp_audit_log(0xE0, 2); 5862 sctp_auditing(1, inp, stcb, net); 5863 #endif 5864 SCTPDBG(SCTP_DEBUG_INPUT1, 5865 "Check for chunk output prw:%d tqe:%d tf=%d\n", 5866 stcb->asoc.peers_rwnd, 5867 TAILQ_EMPTY(&stcb->asoc.control_send_queue), 5868 stcb->asoc.total_flight); 5869 un_sent = (stcb->asoc.total_output_queue_size - stcb->asoc.total_flight); 5870 if (!TAILQ_EMPTY(&stcb->asoc.control_send_queue)) { 5871 cnt_ctrl_ready = stcb->asoc.ctrl_queue_cnt - stcb->asoc.ecn_echo_cnt_onq; 5872 } 5873 if (!TAILQ_EMPTY(&stcb->asoc.asconf_send_queue) || 5874 cnt_ctrl_ready || 5875 stcb->asoc.trigger_reset || 5876 ((un_sent) && 5877 (stcb->asoc.peers_rwnd > 0 || 5878 (stcb->asoc.peers_rwnd <= 0 && stcb->asoc.total_flight == 0)))) { 5879 SCTPDBG(SCTP_DEBUG_INPUT3, "Calling chunk OUTPUT\n"); 5880 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_CONTROL_PROC, SCTP_SO_NOT_LOCKED); 5881 SCTPDBG(SCTP_DEBUG_INPUT3, "chunk OUTPUT returns\n"); 5882 } 5883 #ifdef SCTP_AUDITING_ENABLED 5884 sctp_audit_log(0xE0, 3); 5885 sctp_auditing(2, inp, stcb, net); 5886 #endif 5887 out: 5888 if (stcb != NULL) { 5889 SCTP_TCB_UNLOCK(stcb); 5890 } 5891 if (inp_decr != NULL) { 5892 /* reduce ref-count */ 5893 SCTP_INP_WLOCK(inp_decr); 5894 SCTP_INP_DECR_REF(inp_decr); 5895 SCTP_INP_WUNLOCK(inp_decr); 5896 } 5897 return; 5898 } 5899 5900 #ifdef INET 5901 void 5902 sctp_input_with_port(struct mbuf *i_pak, int off, uint16_t port) 5903 { 5904 struct mbuf *m; 5905 int iphlen; 5906 uint32_t vrf_id = 0; 5907 uint8_t ecn_bits; 5908 struct sockaddr_in src, dst; 5909 struct ip *ip; 5910 struct sctphdr *sh; 5911 struct sctp_chunkhdr *ch; 5912 int length, offset; 5913 uint8_t compute_crc; 5914 uint32_t mflowid; 5915 uint8_t mflowtype; 5916 uint16_t fibnum; 5917 5918 iphlen = off; 5919 if (SCTP_GET_PKT_VRFID(i_pak, vrf_id)) { 5920 SCTP_RELEASE_PKT(i_pak); 5921 return; 5922 } 5923 m = SCTP_HEADER_TO_CHAIN(i_pak); 5924 #ifdef SCTP_MBUF_LOGGING 5925 /* Log in any input mbufs */ 5926 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MBUF_LOGGING_ENABLE) { 5927 sctp_log_mbc(m, SCTP_MBUF_INPUT); 5928 } 5929 #endif 5930 #ifdef SCTP_PACKET_LOGGING 5931 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_LAST_PACKET_TRACING) { 5932 sctp_packet_log(m); 5933 } 5934 #endif 5935 SCTPDBG(SCTP_DEBUG_CRCOFFLOAD, 5936 "sctp_input(): Packet of length %d received on %s with csum_flags 0x%b.\n", 5937 m->m_pkthdr.len, 5938 if_name(m->m_pkthdr.rcvif), 5939 (int)m->m_pkthdr.csum_flags, CSUM_BITS); 5940 mflowid = m->m_pkthdr.flowid; 5941 mflowtype = M_HASHTYPE_GET(m); 5942 fibnum = M_GETFIB(m); 5943 SCTP_STAT_INCR(sctps_recvpackets); 5944 SCTP_STAT_INCR_COUNTER64(sctps_inpackets); 5945 /* Get IP, SCTP, and first chunk header together in the first mbuf. */ 5946 offset = iphlen + sizeof(struct sctphdr) + sizeof(struct sctp_chunkhdr); 5947 if (SCTP_BUF_LEN(m) < offset) { 5948 if ((m = m_pullup(m, offset)) == NULL) { 5949 SCTP_STAT_INCR(sctps_hdrops); 5950 return; 5951 } 5952 } 5953 ip = mtod(m, struct ip *); 5954 sh = (struct sctphdr *)((caddr_t)ip + iphlen); 5955 ch = (struct sctp_chunkhdr *)((caddr_t)sh + sizeof(struct sctphdr)); 5956 offset -= sizeof(struct sctp_chunkhdr); 5957 memset(&src, 0, sizeof(struct sockaddr_in)); 5958 src.sin_family = AF_INET; 5959 src.sin_len = sizeof(struct sockaddr_in); 5960 src.sin_port = sh->src_port; 5961 src.sin_addr = ip->ip_src; 5962 memset(&dst, 0, sizeof(struct sockaddr_in)); 5963 dst.sin_family = AF_INET; 5964 dst.sin_len = sizeof(struct sockaddr_in); 5965 dst.sin_port = sh->dest_port; 5966 dst.sin_addr = ip->ip_dst; 5967 length = ntohs(ip->ip_len); 5968 /* Validate mbuf chain length with IP payload length. */ 5969 if (SCTP_HEADER_LEN(m) != length) { 5970 SCTPDBG(SCTP_DEBUG_INPUT1, 5971 "sctp_input() length:%d reported length:%d\n", length, SCTP_HEADER_LEN(m)); 5972 SCTP_STAT_INCR(sctps_hdrops); 5973 goto out; 5974 } 5975 /* SCTP does not allow broadcasts or multicasts */ 5976 if (IN_MULTICAST(ntohl(dst.sin_addr.s_addr))) { 5977 goto out; 5978 } 5979 if (SCTP_IS_IT_BROADCAST(dst.sin_addr, m)) { 5980 goto out; 5981 } 5982 ecn_bits = ip->ip_tos; 5983 if (m->m_pkthdr.csum_flags & CSUM_SCTP_VALID) { 5984 SCTP_STAT_INCR(sctps_recvhwcrc); 5985 compute_crc = 0; 5986 } else { 5987 SCTP_STAT_INCR(sctps_recvswcrc); 5988 compute_crc = 1; 5989 } 5990 sctp_common_input_processing(&m, iphlen, offset, length, 5991 (struct sockaddr *)&src, 5992 (struct sockaddr *)&dst, 5993 sh, ch, 5994 compute_crc, 5995 ecn_bits, 5996 mflowtype, mflowid, fibnum, 5997 vrf_id, port); 5998 out: 5999 if (m) { 6000 sctp_m_freem(m); 6001 } 6002 return; 6003 } 6004 6005 #if defined(__FreeBSD__) && defined(SCTP_MCORE_INPUT) && defined(SMP) 6006 extern int *sctp_cpuarry; 6007 #endif 6008 6009 int 6010 sctp_input(struct mbuf **mp, int *offp, int proto SCTP_UNUSED) 6011 { 6012 struct mbuf *m; 6013 int off; 6014 6015 m = *mp; 6016 off = *offp; 6017 #if defined(__FreeBSD__) && defined(SCTP_MCORE_INPUT) && defined(SMP) 6018 if (mp_ncpus > 1) { 6019 struct ip *ip; 6020 struct sctphdr *sh; 6021 int offset; 6022 int cpu_to_use; 6023 uint32_t flowid, tag; 6024 6025 if (M_HASHTYPE_GET(m) != M_HASHTYPE_NONE) { 6026 flowid = m->m_pkthdr.flowid; 6027 } else { 6028 /* 6029 * No flow id built by lower layers fix it so we 6030 * create one. 6031 */ 6032 offset = off + sizeof(struct sctphdr); 6033 if (SCTP_BUF_LEN(m) < offset) { 6034 if ((m = m_pullup(m, offset)) == NULL) { 6035 SCTP_STAT_INCR(sctps_hdrops); 6036 return (IPPROTO_DONE); 6037 } 6038 } 6039 ip = mtod(m, struct ip *); 6040 sh = (struct sctphdr *)((caddr_t)ip + off); 6041 tag = htonl(sh->v_tag); 6042 flowid = tag ^ ntohs(sh->dest_port) ^ ntohs(sh->src_port); 6043 m->m_pkthdr.flowid = flowid; 6044 M_HASHTYPE_SET(m, M_HASHTYPE_OPAQUE_HASH); 6045 } 6046 cpu_to_use = sctp_cpuarry[flowid % mp_ncpus]; 6047 sctp_queue_to_mcore(m, off, cpu_to_use); 6048 return (IPPROTO_DONE); 6049 } 6050 #endif 6051 sctp_input_with_port(m, off, 0); 6052 return (IPPROTO_DONE); 6053 } 6054 #endif 6055