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