1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 2001-2007, 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_asconf.h> 43 #include <netinet/sctp_timer.h> 44 45 /* 46 * debug flags: 47 * SCTP_DEBUG_ASCONF1: protocol info, general info and errors 48 * SCTP_DEBUG_ASCONF2: detailed info 49 */ 50 51 /* 52 * RFC 5061 53 * 54 * An ASCONF parameter queue exists per asoc which holds the pending address 55 * operations. Lists are updated upon receipt of ASCONF-ACK. 56 * 57 * A restricted_addrs list exists per assoc to hold local addresses that are 58 * not (yet) usable by the assoc as a source address. These addresses are 59 * either pending an ASCONF operation (and exist on the ASCONF parameter 60 * queue), or they are permanently restricted (the peer has returned an 61 * ERROR indication to an ASCONF(ADD), or the peer does not support ASCONF). 62 * 63 * Deleted addresses are always immediately removed from the lists as they will 64 * (shortly) no longer exist in the kernel. We send ASCONFs as a courtesy, 65 * only if allowed. 66 */ 67 68 /* 69 * ASCONF parameter processing. 70 * response_required: set if a reply is required (eg. SUCCESS_REPORT). 71 * returns a mbuf to an "error" response parameter or NULL/"success" if ok. 72 * FIX: allocating this many mbufs on the fly is pretty inefficient... 73 */ 74 static struct mbuf * 75 sctp_asconf_success_response(uint32_t id) 76 { 77 struct mbuf *m_reply = NULL; 78 struct sctp_asconf_paramhdr *aph; 79 80 m_reply = sctp_get_mbuf_for_msg(sizeof(struct sctp_asconf_paramhdr), 81 0, M_NOWAIT, 1, MT_DATA); 82 if (m_reply == NULL) { 83 SCTPDBG(SCTP_DEBUG_ASCONF1, 84 "asconf_success_response: couldn't get mbuf!\n"); 85 return (NULL); 86 } 87 aph = mtod(m_reply, struct sctp_asconf_paramhdr *); 88 aph->correlation_id = id; 89 aph->ph.param_type = htons(SCTP_SUCCESS_REPORT); 90 aph->ph.param_length = sizeof(struct sctp_asconf_paramhdr); 91 SCTP_BUF_LEN(m_reply) = aph->ph.param_length; 92 aph->ph.param_length = htons(aph->ph.param_length); 93 94 return (m_reply); 95 } 96 97 static struct mbuf * 98 sctp_asconf_error_response(uint32_t id, uint16_t cause, uint8_t *error_tlv, 99 uint16_t tlv_length) 100 { 101 struct mbuf *m_reply = NULL; 102 struct sctp_asconf_paramhdr *aph; 103 struct sctp_error_cause *error; 104 uint32_t buf_len; 105 uint16_t i, param_length, cause_length, padding_length; 106 uint8_t *tlv; 107 108 if (error_tlv == NULL) { 109 tlv_length = 0; 110 } 111 cause_length = sizeof(struct sctp_error_cause) + tlv_length; 112 param_length = sizeof(struct sctp_asconf_paramhdr) + cause_length; 113 padding_length = tlv_length % 4; 114 if (padding_length != 0) { 115 padding_length = 4 - padding_length; 116 } 117 buf_len = param_length + padding_length; 118 if (buf_len > MLEN) { 119 SCTPDBG(SCTP_DEBUG_ASCONF1, 120 "asconf_error_response: tlv_length (%xh) too big\n", 121 tlv_length); 122 return (NULL); 123 } 124 m_reply = sctp_get_mbuf_for_msg(buf_len, 0, M_NOWAIT, 1, MT_DATA); 125 if (m_reply == NULL) { 126 SCTPDBG(SCTP_DEBUG_ASCONF1, 127 "asconf_error_response: couldn't get mbuf!\n"); 128 return (NULL); 129 } 130 aph = mtod(m_reply, struct sctp_asconf_paramhdr *); 131 aph->ph.param_type = htons(SCTP_ERROR_CAUSE_IND); 132 aph->ph.param_length = htons(param_length); 133 aph->correlation_id = id; 134 error = (struct sctp_error_cause *)(aph + 1); 135 error->code = htons(cause); 136 error->length = htons(cause_length); 137 if (error_tlv != NULL) { 138 tlv = (uint8_t *)(error + 1); 139 memcpy(tlv, error_tlv, tlv_length); 140 for (i = 0; i < padding_length; i++) { 141 tlv[tlv_length + i] = 0; 142 } 143 } 144 SCTP_BUF_LEN(m_reply) = buf_len; 145 return (m_reply); 146 } 147 148 static struct mbuf * 149 sctp_process_asconf_add_ip(struct sockaddr *src, struct sctp_asconf_paramhdr *aph, 150 struct sctp_tcb *stcb, int send_hb, int response_required) 151 { 152 struct sctp_nets *net; 153 struct mbuf *m_reply = NULL; 154 union sctp_sockstore store; 155 struct sctp_paramhdr *ph; 156 uint16_t param_type, aparam_length; 157 #if defined(INET) || defined(INET6) 158 uint16_t param_length; 159 #endif 160 struct sockaddr *sa; 161 int zero_address = 0; 162 int bad_address = 0; 163 #ifdef INET 164 struct sockaddr_in *sin; 165 struct sctp_ipv4addr_param *v4addr; 166 #endif 167 #ifdef INET6 168 struct sockaddr_in6 *sin6; 169 struct sctp_ipv6addr_param *v6addr; 170 #endif 171 172 aparam_length = ntohs(aph->ph.param_length); 173 if (aparam_length < sizeof(struct sctp_asconf_paramhdr) + sizeof(struct sctp_paramhdr)) { 174 return (NULL); 175 } 176 ph = (struct sctp_paramhdr *)(aph + 1); 177 param_type = ntohs(ph->param_type); 178 #if defined(INET) || defined(INET6) 179 param_length = ntohs(ph->param_length); 180 if (param_length + sizeof(struct sctp_asconf_paramhdr) != aparam_length) { 181 return (NULL); 182 } 183 #endif 184 sa = &store.sa; 185 switch (param_type) { 186 #ifdef INET 187 case SCTP_IPV4_ADDRESS: 188 if (param_length != sizeof(struct sctp_ipv4addr_param)) { 189 /* invalid param size */ 190 return (NULL); 191 } 192 v4addr = (struct sctp_ipv4addr_param *)ph; 193 sin = &store.sin; 194 memset(sin, 0, sizeof(*sin)); 195 sin->sin_family = AF_INET; 196 sin->sin_len = sizeof(struct sockaddr_in); 197 sin->sin_port = stcb->rport; 198 sin->sin_addr.s_addr = v4addr->addr; 199 if ((sin->sin_addr.s_addr == INADDR_BROADCAST) || 200 IN_MULTICAST(ntohl(sin->sin_addr.s_addr))) { 201 bad_address = 1; 202 } 203 if (sin->sin_addr.s_addr == INADDR_ANY) 204 zero_address = 1; 205 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_add_ip: adding "); 206 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 207 break; 208 #endif 209 #ifdef INET6 210 case SCTP_IPV6_ADDRESS: 211 if (param_length != sizeof(struct sctp_ipv6addr_param)) { 212 /* invalid param size */ 213 return (NULL); 214 } 215 v6addr = (struct sctp_ipv6addr_param *)ph; 216 sin6 = &store.sin6; 217 memset(sin6, 0, sizeof(*sin6)); 218 sin6->sin6_family = AF_INET6; 219 sin6->sin6_len = sizeof(struct sockaddr_in6); 220 sin6->sin6_port = stcb->rport; 221 memcpy((caddr_t)&sin6->sin6_addr, v6addr->addr, 222 sizeof(struct in6_addr)); 223 if (IN6_IS_ADDR_MULTICAST(&sin6->sin6_addr)) { 224 bad_address = 1; 225 } 226 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) 227 zero_address = 1; 228 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_add_ip: adding "); 229 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 230 break; 231 #endif 232 default: 233 m_reply = sctp_asconf_error_response(aph->correlation_id, 234 SCTP_CAUSE_INVALID_PARAM, (uint8_t *)aph, 235 aparam_length); 236 return (m_reply); 237 } /* end switch */ 238 239 /* if 0.0.0.0/::0, add the source address instead */ 240 if (zero_address && SCTP_BASE_SYSCTL(sctp_nat_friendly)) { 241 sa = src; 242 SCTPDBG(SCTP_DEBUG_ASCONF1, 243 "process_asconf_add_ip: using source addr "); 244 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, src); 245 } 246 net = NULL; 247 /* add the address */ 248 if (bad_address) { 249 m_reply = sctp_asconf_error_response(aph->correlation_id, 250 SCTP_CAUSE_INVALID_PARAM, (uint8_t *)aph, 251 aparam_length); 252 } else if (sctp_add_remote_addr(stcb, sa, &net, stcb->asoc.port, 253 SCTP_DONOT_SETSCOPE, 254 SCTP_ADDR_DYNAMIC_ADDED) != 0) { 255 SCTPDBG(SCTP_DEBUG_ASCONF1, 256 "process_asconf_add_ip: error adding address\n"); 257 m_reply = sctp_asconf_error_response(aph->correlation_id, 258 SCTP_CAUSE_RESOURCE_SHORTAGE, (uint8_t *)aph, 259 aparam_length); 260 } else { 261 if (response_required) { 262 m_reply = 263 sctp_asconf_success_response(aph->correlation_id); 264 } 265 if (net != NULL) { 266 /* notify upper layer */ 267 sctp_ulp_notify(SCTP_NOTIFY_ASCONF_ADD_IP, stcb, 0, sa, SCTP_SO_NOT_LOCKED); 268 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, stcb->sctp_ep, stcb, net); 269 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, 270 stcb, net); 271 if (send_hb) { 272 sctp_send_hb(stcb, net, SCTP_SO_NOT_LOCKED); 273 } 274 } 275 } 276 return (m_reply); 277 } 278 279 static int 280 sctp_asconf_del_remote_addrs_except(struct sctp_tcb *stcb, struct sockaddr *src) 281 { 282 struct sctp_nets *src_net, *net, *nnet; 283 284 /* make sure the source address exists as a destination net */ 285 src_net = sctp_findnet(stcb, src); 286 if (src_net == NULL) { 287 /* not found */ 288 return (-1); 289 } 290 291 /* delete all destination addresses except the source */ 292 TAILQ_FOREACH_SAFE(net, &stcb->asoc.nets, sctp_next, nnet) { 293 if (net != src_net) { 294 /* delete this address */ 295 SCTPDBG(SCTP_DEBUG_ASCONF1, 296 "asconf_del_remote_addrs_except: deleting "); 297 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, 298 (struct sockaddr *)&net->ro._l_addr); 299 /* notify upper layer */ 300 sctp_ulp_notify(SCTP_NOTIFY_ASCONF_DELETE_IP, stcb, 0, 301 (struct sockaddr *)&net->ro._l_addr, SCTP_SO_NOT_LOCKED); 302 sctp_remove_net(stcb, net); 303 } 304 } 305 return (0); 306 } 307 308 static struct mbuf * 309 sctp_process_asconf_delete_ip(struct sockaddr *src, 310 struct sctp_asconf_paramhdr *aph, 311 struct sctp_tcb *stcb, int response_required) 312 { 313 struct mbuf *m_reply = NULL; 314 union sctp_sockstore store; 315 struct sctp_paramhdr *ph; 316 uint16_t param_type, aparam_length; 317 #if defined(INET) || defined(INET6) 318 uint16_t param_length; 319 #endif 320 struct sockaddr *sa; 321 int zero_address = 0; 322 int result; 323 #ifdef INET 324 struct sockaddr_in *sin; 325 struct sctp_ipv4addr_param *v4addr; 326 #endif 327 #ifdef INET6 328 struct sockaddr_in6 *sin6; 329 struct sctp_ipv6addr_param *v6addr; 330 #endif 331 332 aparam_length = ntohs(aph->ph.param_length); 333 if (aparam_length < sizeof(struct sctp_asconf_paramhdr) + sizeof(struct sctp_paramhdr)) { 334 return (NULL); 335 } 336 ph = (struct sctp_paramhdr *)(aph + 1); 337 param_type = ntohs(ph->param_type); 338 #if defined(INET) || defined(INET6) 339 param_length = ntohs(ph->param_length); 340 if (param_length + sizeof(struct sctp_asconf_paramhdr) != aparam_length) { 341 return (NULL); 342 } 343 #endif 344 sa = &store.sa; 345 switch (param_type) { 346 #ifdef INET 347 case SCTP_IPV4_ADDRESS: 348 if (param_length != sizeof(struct sctp_ipv4addr_param)) { 349 /* invalid param size */ 350 return (NULL); 351 } 352 v4addr = (struct sctp_ipv4addr_param *)ph; 353 sin = &store.sin; 354 memset(sin, 0, sizeof(*sin)); 355 sin->sin_family = AF_INET; 356 sin->sin_len = sizeof(struct sockaddr_in); 357 sin->sin_port = stcb->rport; 358 sin->sin_addr.s_addr = v4addr->addr; 359 if (sin->sin_addr.s_addr == INADDR_ANY) 360 zero_address = 1; 361 SCTPDBG(SCTP_DEBUG_ASCONF1, 362 "process_asconf_delete_ip: deleting "); 363 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 364 break; 365 #endif 366 #ifdef INET6 367 case SCTP_IPV6_ADDRESS: 368 if (param_length != sizeof(struct sctp_ipv6addr_param)) { 369 /* invalid param size */ 370 return (NULL); 371 } 372 v6addr = (struct sctp_ipv6addr_param *)ph; 373 sin6 = &store.sin6; 374 memset(sin6, 0, sizeof(*sin6)); 375 sin6->sin6_family = AF_INET6; 376 sin6->sin6_len = sizeof(struct sockaddr_in6); 377 sin6->sin6_port = stcb->rport; 378 memcpy(&sin6->sin6_addr, v6addr->addr, 379 sizeof(struct in6_addr)); 380 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) 381 zero_address = 1; 382 SCTPDBG(SCTP_DEBUG_ASCONF1, 383 "process_asconf_delete_ip: deleting "); 384 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 385 break; 386 #endif 387 default: 388 m_reply = sctp_asconf_error_response(aph->correlation_id, 389 SCTP_CAUSE_UNRESOLVABLE_ADDR, (uint8_t *)aph, 390 aparam_length); 391 return (m_reply); 392 } 393 394 /* make sure the source address is not being deleted */ 395 if (sctp_cmpaddr(sa, src)) { 396 /* trying to delete the source address! */ 397 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_delete_ip: tried to delete source addr\n"); 398 m_reply = sctp_asconf_error_response(aph->correlation_id, 399 SCTP_CAUSE_DELETING_SRC_ADDR, (uint8_t *)aph, 400 aparam_length); 401 return (m_reply); 402 } 403 404 /* if deleting 0.0.0.0/::0, delete all addresses except src addr */ 405 if (zero_address && SCTP_BASE_SYSCTL(sctp_nat_friendly)) { 406 result = sctp_asconf_del_remote_addrs_except(stcb, src); 407 408 if (result) { 409 /* src address did not exist? */ 410 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_delete_ip: src addr does not exist?\n"); 411 /* what error to reply with?? */ 412 m_reply = 413 sctp_asconf_error_response(aph->correlation_id, 414 SCTP_CAUSE_REQUEST_REFUSED, (uint8_t *)aph, 415 aparam_length); 416 } else if (response_required) { 417 m_reply = 418 sctp_asconf_success_response(aph->correlation_id); 419 } 420 return (m_reply); 421 } 422 423 /* delete the address */ 424 result = sctp_del_remote_addr(stcb, sa); 425 /* 426 * note if result == -2, the address doesn't exist in the asoc but 427 * since it's being deleted anyways, we just ack the delete -- but 428 * this probably means something has already gone awry 429 */ 430 if (result == -1) { 431 /* only one address in the asoc */ 432 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_delete_ip: tried to delete last IP addr!\n"); 433 m_reply = sctp_asconf_error_response(aph->correlation_id, 434 SCTP_CAUSE_DELETING_LAST_ADDR, (uint8_t *)aph, 435 aparam_length); 436 } else { 437 if (response_required) { 438 m_reply = sctp_asconf_success_response(aph->correlation_id); 439 } 440 /* notify upper layer */ 441 sctp_ulp_notify(SCTP_NOTIFY_ASCONF_DELETE_IP, stcb, 0, sa, SCTP_SO_NOT_LOCKED); 442 } 443 return (m_reply); 444 } 445 446 static struct mbuf * 447 sctp_process_asconf_set_primary(struct sockaddr *src, 448 struct sctp_asconf_paramhdr *aph, 449 struct sctp_tcb *stcb, int response_required) 450 { 451 struct mbuf *m_reply = NULL; 452 union sctp_sockstore store; 453 struct sctp_paramhdr *ph; 454 uint16_t param_type, aparam_length; 455 #if defined(INET) || defined(INET6) 456 uint16_t param_length; 457 #endif 458 struct sockaddr *sa; 459 int zero_address = 0; 460 #ifdef INET 461 struct sockaddr_in *sin; 462 struct sctp_ipv4addr_param *v4addr; 463 #endif 464 #ifdef INET6 465 struct sockaddr_in6 *sin6; 466 struct sctp_ipv6addr_param *v6addr; 467 #endif 468 469 aparam_length = ntohs(aph->ph.param_length); 470 if (aparam_length < sizeof(struct sctp_asconf_paramhdr) + sizeof(struct sctp_paramhdr)) { 471 return (NULL); 472 } 473 ph = (struct sctp_paramhdr *)(aph + 1); 474 param_type = ntohs(ph->param_type); 475 #if defined(INET) || defined(INET6) 476 param_length = ntohs(ph->param_length); 477 if (param_length + sizeof(struct sctp_asconf_paramhdr) != aparam_length) { 478 return (NULL); 479 } 480 #endif 481 sa = &store.sa; 482 switch (param_type) { 483 #ifdef INET 484 case SCTP_IPV4_ADDRESS: 485 if (param_length != sizeof(struct sctp_ipv4addr_param)) { 486 /* invalid param size */ 487 return (NULL); 488 } 489 v4addr = (struct sctp_ipv4addr_param *)ph; 490 sin = &store.sin; 491 memset(sin, 0, sizeof(*sin)); 492 sin->sin_family = AF_INET; 493 sin->sin_len = sizeof(struct sockaddr_in); 494 sin->sin_addr.s_addr = v4addr->addr; 495 if (sin->sin_addr.s_addr == INADDR_ANY) 496 zero_address = 1; 497 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_set_primary: "); 498 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 499 break; 500 #endif 501 #ifdef INET6 502 case SCTP_IPV6_ADDRESS: 503 if (param_length != sizeof(struct sctp_ipv6addr_param)) { 504 /* invalid param size */ 505 return (NULL); 506 } 507 v6addr = (struct sctp_ipv6addr_param *)ph; 508 sin6 = &store.sin6; 509 memset(sin6, 0, sizeof(*sin6)); 510 sin6->sin6_family = AF_INET6; 511 sin6->sin6_len = sizeof(struct sockaddr_in6); 512 memcpy((caddr_t)&sin6->sin6_addr, v6addr->addr, 513 sizeof(struct in6_addr)); 514 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) 515 zero_address = 1; 516 SCTPDBG(SCTP_DEBUG_ASCONF1, "process_asconf_set_primary: "); 517 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 518 break; 519 #endif 520 default: 521 m_reply = sctp_asconf_error_response(aph->correlation_id, 522 SCTP_CAUSE_UNRESOLVABLE_ADDR, (uint8_t *)aph, 523 aparam_length); 524 return (m_reply); 525 } 526 527 /* if 0.0.0.0/::0, use the source address instead */ 528 if (zero_address && SCTP_BASE_SYSCTL(sctp_nat_friendly)) { 529 sa = src; 530 SCTPDBG(SCTP_DEBUG_ASCONF1, 531 "process_asconf_set_primary: using source addr "); 532 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, src); 533 } 534 /* set the primary address */ 535 if (sctp_set_primary_addr(stcb, sa, NULL) == 0) { 536 SCTPDBG(SCTP_DEBUG_ASCONF1, 537 "process_asconf_set_primary: primary address set\n"); 538 /* notify upper layer */ 539 sctp_ulp_notify(SCTP_NOTIFY_ASCONF_SET_PRIMARY, stcb, 0, sa, SCTP_SO_NOT_LOCKED); 540 if ((stcb->asoc.primary_destination->dest_state & SCTP_ADDR_REACHABLE) && 541 ((stcb->asoc.primary_destination->dest_state & SCTP_ADDR_PF) == 0) && 542 (stcb->asoc.alternate != NULL)) { 543 sctp_free_remote_addr(stcb->asoc.alternate); 544 stcb->asoc.alternate = NULL; 545 } 546 if (response_required) { 547 m_reply = sctp_asconf_success_response(aph->correlation_id); 548 } 549 /* 550 * Mobility adaptation. Ideally, when the reception of SET 551 * PRIMARY with DELETE IP ADDRESS of the previous primary 552 * destination, unacknowledged DATA are retransmitted 553 * immediately to the new primary destination for seamless 554 * handover. If the destination is UNCONFIRMED and marked to 555 * REQ_PRIM, The retransmission occur when reception of the 556 * HEARTBEAT-ACK. (See sctp_handle_heartbeat_ack in 557 * sctp_input.c) Also, when change of the primary 558 * destination, it is better that all subsequent new DATA 559 * containing already queued DATA are transmitted to the new 560 * primary destination. (by micchie) 561 */ 562 if ((sctp_is_mobility_feature_on(stcb->sctp_ep, 563 SCTP_MOBILITY_BASE) || 564 sctp_is_mobility_feature_on(stcb->sctp_ep, 565 SCTP_MOBILITY_FASTHANDOFF)) && 566 sctp_is_mobility_feature_on(stcb->sctp_ep, 567 SCTP_MOBILITY_PRIM_DELETED) && 568 (stcb->asoc.primary_destination->dest_state & 569 SCTP_ADDR_UNCONFIRMED) == 0) { 570 sctp_timer_stop(SCTP_TIMER_TYPE_PRIM_DELETED, 571 stcb->sctp_ep, stcb, NULL, 572 SCTP_FROM_SCTP_ASCONF + SCTP_LOC_1); 573 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 574 SCTP_MOBILITY_FASTHANDOFF)) { 575 sctp_assoc_immediate_retrans(stcb, 576 stcb->asoc.primary_destination); 577 } 578 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 579 SCTP_MOBILITY_BASE)) { 580 sctp_move_chunks_from_net(stcb, 581 stcb->asoc.deleted_primary); 582 } 583 sctp_delete_prim_timer(stcb->sctp_ep, stcb); 584 } 585 } else { 586 /* couldn't set the requested primary address! */ 587 SCTPDBG(SCTP_DEBUG_ASCONF1, 588 "process_asconf_set_primary: set primary failed!\n"); 589 /* must have been an invalid address, so report */ 590 m_reply = sctp_asconf_error_response(aph->correlation_id, 591 SCTP_CAUSE_UNRESOLVABLE_ADDR, (uint8_t *)aph, 592 aparam_length); 593 } 594 595 return (m_reply); 596 } 597 598 /* 599 * handles an ASCONF chunk. 600 * if all parameters are processed ok, send a plain (empty) ASCONF-ACK 601 */ 602 void 603 sctp_handle_asconf(struct mbuf *m, unsigned int offset, 604 struct sockaddr *src, 605 struct sctp_asconf_chunk *cp, struct sctp_tcb *stcb, 606 int first) 607 { 608 struct sctp_association *asoc; 609 uint32_t serial_num; 610 struct mbuf *n, *m_ack, *m_result, *m_tail; 611 struct sctp_asconf_ack_chunk *ack_cp; 612 struct sctp_asconf_paramhdr *aph; 613 struct sctp_ipv6addr_param *p_addr; 614 unsigned int asconf_limit, cnt; 615 int error = 0; /* did an error occur? */ 616 617 /* asconf param buffer */ 618 uint8_t aparam_buf[SCTP_PARAM_BUFFER_SIZE]; 619 struct sctp_asconf_ack *ack, *ack_next; 620 621 /* verify minimum length */ 622 if (ntohs(cp->ch.chunk_length) < sizeof(struct sctp_asconf_chunk)) { 623 SCTPDBG(SCTP_DEBUG_ASCONF1, 624 "handle_asconf: chunk too small = %xh\n", 625 ntohs(cp->ch.chunk_length)); 626 return; 627 } 628 asoc = &stcb->asoc; 629 serial_num = ntohl(cp->serial_number); 630 631 if (SCTP_TSN_GE(asoc->asconf_seq_in, serial_num)) { 632 /* got a duplicate ASCONF */ 633 SCTPDBG(SCTP_DEBUG_ASCONF1, 634 "handle_asconf: got duplicate serial number = %xh\n", 635 serial_num); 636 return; 637 } else if (serial_num != (asoc->asconf_seq_in + 1)) { 638 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: incorrect serial number = %xh (expected next = %xh)\n", 639 serial_num, asoc->asconf_seq_in + 1); 640 return; 641 } 642 643 /* it's the expected "next" sequence number, so process it */ 644 asoc->asconf_seq_in = serial_num; /* update sequence */ 645 /* get length of all the param's in the ASCONF */ 646 asconf_limit = offset + ntohs(cp->ch.chunk_length); 647 SCTPDBG(SCTP_DEBUG_ASCONF1, 648 "handle_asconf: asconf_limit=%u, sequence=%xh\n", 649 asconf_limit, serial_num); 650 651 if (first) { 652 /* delete old cache */ 653 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: Now processing first ASCONF. Try to delete old cache\n"); 654 655 TAILQ_FOREACH_SAFE(ack, &asoc->asconf_ack_sent, next, ack_next) { 656 if (ack->serial_number == serial_num) 657 break; 658 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: delete old(%u) < first(%u)\n", 659 ack->serial_number, serial_num); 660 TAILQ_REMOVE(&asoc->asconf_ack_sent, ack, next); 661 if (ack->data != NULL) { 662 sctp_m_freem(ack->data); 663 } 664 SCTP_ZONE_FREE(SCTP_BASE_INFO(ipi_zone_asconf_ack), ack); 665 } 666 } 667 668 m_ack = sctp_get_mbuf_for_msg(sizeof(struct sctp_asconf_ack_chunk), 0, 669 M_NOWAIT, 1, MT_DATA); 670 if (m_ack == NULL) { 671 SCTPDBG(SCTP_DEBUG_ASCONF1, 672 "handle_asconf: couldn't get mbuf!\n"); 673 return; 674 } 675 m_tail = m_ack; /* current reply chain's tail */ 676 677 /* fill in ASCONF-ACK header */ 678 ack_cp = mtod(m_ack, struct sctp_asconf_ack_chunk *); 679 ack_cp->ch.chunk_type = SCTP_ASCONF_ACK; 680 ack_cp->ch.chunk_flags = 0; 681 ack_cp->serial_number = htonl(serial_num); 682 /* set initial lengths (eg. just an ASCONF-ACK), ntohx at the end! */ 683 SCTP_BUF_LEN(m_ack) = sizeof(struct sctp_asconf_ack_chunk); 684 ack_cp->ch.chunk_length = sizeof(struct sctp_asconf_ack_chunk); 685 686 /* skip the lookup address parameter */ 687 offset += sizeof(struct sctp_asconf_chunk); 688 p_addr = (struct sctp_ipv6addr_param *)sctp_m_getptr(m, offset, sizeof(struct sctp_paramhdr), (uint8_t *)&aparam_buf); 689 if (p_addr == NULL) { 690 SCTPDBG(SCTP_DEBUG_ASCONF1, 691 "handle_asconf: couldn't get lookup addr!\n"); 692 /* respond with a missing/invalid mandatory parameter error */ 693 sctp_m_freem(m_ack); 694 return; 695 } 696 /* skip lookup addr */ 697 offset += SCTP_SIZE32(ntohs(p_addr->ph.param_length)); 698 /* get pointer to first asconf param in ASCONF */ 699 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(m, offset, sizeof(struct sctp_asconf_paramhdr), (uint8_t *)&aparam_buf); 700 if (aph == NULL) { 701 SCTPDBG(SCTP_DEBUG_ASCONF1, "Empty ASCONF received?\n"); 702 goto send_reply; 703 } 704 /* process through all parameters */ 705 cnt = 0; 706 while (aph != NULL) { 707 unsigned int param_length, param_type; 708 709 param_type = ntohs(aph->ph.param_type); 710 param_length = ntohs(aph->ph.param_length); 711 if (offset + param_length > asconf_limit) { 712 /* parameter goes beyond end of chunk! */ 713 sctp_m_freem(m_ack); 714 return; 715 } 716 m_result = NULL; 717 718 if (param_length > sizeof(aparam_buf)) { 719 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: param length (%u) larger than buffer size!\n", param_length); 720 sctp_m_freem(m_ack); 721 return; 722 } 723 if (param_length < sizeof(struct sctp_asconf_paramhdr)) { 724 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: param length (%u) too short\n", param_length); 725 sctp_m_freem(m_ack); 726 return; 727 } 728 /* get the entire parameter */ 729 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(m, offset, param_length, aparam_buf); 730 if (aph == NULL) { 731 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: couldn't get entire param\n"); 732 sctp_m_freem(m_ack); 733 return; 734 } 735 switch (param_type) { 736 case SCTP_ADD_IP_ADDRESS: 737 m_result = sctp_process_asconf_add_ip(src, aph, stcb, 738 (cnt < SCTP_BASE_SYSCTL(sctp_hb_maxburst)), error); 739 cnt++; 740 break; 741 case SCTP_DEL_IP_ADDRESS: 742 m_result = sctp_process_asconf_delete_ip(src, aph, stcb, 743 error); 744 break; 745 case SCTP_ERROR_CAUSE_IND: 746 /* not valid in an ASCONF chunk */ 747 break; 748 case SCTP_SET_PRIM_ADDR: 749 m_result = sctp_process_asconf_set_primary(src, aph, 750 stcb, error); 751 break; 752 case SCTP_NAT_VTAGS: 753 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: sees a NAT VTAG state parameter\n"); 754 break; 755 case SCTP_SUCCESS_REPORT: 756 /* not valid in an ASCONF chunk */ 757 break; 758 case SCTP_ULP_ADAPTATION: 759 /* FIX */ 760 break; 761 default: 762 if ((param_type & 0x8000) == 0) { 763 /* Been told to STOP at this param */ 764 asconf_limit = offset; 765 /* 766 * FIX FIX - We need to call 767 * sctp_arethere_unrecognized_parameters() 768 * to get a operr and send it for any 769 * param's with the 0x4000 bit set OR do it 770 * here ourselves... note we still must STOP 771 * if the 0x8000 bit is clear. 772 */ 773 } 774 /* unknown/invalid param type */ 775 break; 776 } /* switch */ 777 778 /* add any (error) result to the reply mbuf chain */ 779 if (m_result != NULL) { 780 SCTP_BUF_NEXT(m_tail) = m_result; 781 m_tail = m_result; 782 ack_cp->ch.chunk_length += SCTP_BUF_LEN(m_result); 783 /* set flag to force success reports */ 784 error = 1; 785 } 786 offset += SCTP_SIZE32(param_length); 787 /* update remaining ASCONF message length to process */ 788 if (offset >= asconf_limit) { 789 /* no more data in the mbuf chain */ 790 break; 791 } 792 /* get pointer to next asconf param */ 793 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(m, offset, 794 sizeof(struct sctp_asconf_paramhdr), 795 (uint8_t *)&aparam_buf); 796 if (aph == NULL) { 797 /* can't get an asconf paramhdr */ 798 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: can't get asconf param hdr!\n"); 799 /* FIX ME - add error here... */ 800 } 801 } 802 803 send_reply: 804 ack_cp->ch.chunk_length = htons(ack_cp->ch.chunk_length); 805 /* save the ASCONF-ACK reply */ 806 ack = SCTP_ZONE_GET(SCTP_BASE_INFO(ipi_zone_asconf_ack), 807 struct sctp_asconf_ack); 808 if (ack == NULL) { 809 sctp_m_freem(m_ack); 810 return; 811 } 812 ack->serial_number = serial_num; 813 ack->last_sent_to = NULL; 814 ack->data = m_ack; 815 ack->len = 0; 816 for (n = m_ack; n != NULL; n = SCTP_BUF_NEXT(n)) { 817 ack->len += SCTP_BUF_LEN(n); 818 } 819 TAILQ_INSERT_TAIL(&stcb->asoc.asconf_ack_sent, ack, next); 820 821 /* see if last_control_chunk_from is set properly (use IP src addr) */ 822 if (stcb->asoc.last_control_chunk_from == NULL) { 823 /* 824 * this could happen if the source address was just newly 825 * added 826 */ 827 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: looking up net for IP source address\n"); 828 SCTPDBG(SCTP_DEBUG_ASCONF1, "Looking for IP source: "); 829 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, src); 830 /* look up the from address */ 831 stcb->asoc.last_control_chunk_from = sctp_findnet(stcb, src); 832 #ifdef SCTP_DEBUG 833 if (stcb->asoc.last_control_chunk_from == NULL) { 834 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf: IP source address not found?!\n"); 835 } 836 #endif 837 } 838 } 839 840 /* 841 * does the address match? returns 0 if not, 1 if so 842 */ 843 static uint32_t 844 sctp_asconf_addr_match(struct sctp_asconf_addr *aa, struct sockaddr *sa) 845 { 846 switch (sa->sa_family) { 847 #ifdef INET6 848 case AF_INET6: 849 { 850 /* XXX scopeid */ 851 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sa; 852 853 if ((aa->ap.addrp.ph.param_type == SCTP_IPV6_ADDRESS) && 854 (memcmp(&aa->ap.addrp.addr, &sin6->sin6_addr, 855 sizeof(struct in6_addr)) == 0)) { 856 return (1); 857 } 858 break; 859 } 860 #endif 861 #ifdef INET 862 case AF_INET: 863 { 864 struct sockaddr_in *sin = (struct sockaddr_in *)sa; 865 866 if ((aa->ap.addrp.ph.param_type == SCTP_IPV4_ADDRESS) && 867 (memcmp(&aa->ap.addrp.addr, &sin->sin_addr, 868 sizeof(struct in_addr)) == 0)) { 869 return (1); 870 } 871 break; 872 } 873 #endif 874 default: 875 break; 876 } 877 return (0); 878 } 879 880 /* 881 * does the address match? returns 0 if not, 1 if so 882 */ 883 static uint32_t 884 sctp_addr_match(struct sctp_paramhdr *ph, struct sockaddr *sa) 885 { 886 #if defined(INET) || defined(INET6) 887 uint16_t param_type, param_length; 888 889 param_type = ntohs(ph->param_type); 890 param_length = ntohs(ph->param_length); 891 #endif 892 switch (sa->sa_family) { 893 #ifdef INET6 894 case AF_INET6: 895 { 896 /* XXX scopeid */ 897 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sa; 898 struct sctp_ipv6addr_param *v6addr; 899 900 v6addr = (struct sctp_ipv6addr_param *)ph; 901 if ((param_type == SCTP_IPV6_ADDRESS) && 902 (param_length == sizeof(struct sctp_ipv6addr_param)) && 903 (memcmp(&v6addr->addr, &sin6->sin6_addr, 904 sizeof(struct in6_addr)) == 0)) { 905 return (1); 906 } 907 break; 908 } 909 #endif 910 #ifdef INET 911 case AF_INET: 912 { 913 struct sockaddr_in *sin = (struct sockaddr_in *)sa; 914 struct sctp_ipv4addr_param *v4addr; 915 916 v4addr = (struct sctp_ipv4addr_param *)ph; 917 if ((param_type == SCTP_IPV4_ADDRESS) && 918 (param_length == sizeof(struct sctp_ipv4addr_param)) && 919 (memcmp(&v4addr->addr, &sin->sin_addr, 920 sizeof(struct in_addr)) == 0)) { 921 return (1); 922 } 923 break; 924 } 925 #endif 926 default: 927 break; 928 } 929 return (0); 930 } 931 932 /* 933 * Cleanup for non-responded/OP ERR'd ASCONF 934 */ 935 void 936 sctp_asconf_cleanup(struct sctp_tcb *stcb) 937 { 938 /* 939 * clear out any existing asconfs going out 940 */ 941 sctp_timer_stop(SCTP_TIMER_TYPE_ASCONF, stcb->sctp_ep, stcb, NULL, 942 SCTP_FROM_SCTP_ASCONF + SCTP_LOC_2); 943 stcb->asoc.asconf_seq_out_acked = stcb->asoc.asconf_seq_out; 944 /* remove the old ASCONF on our outbound queue */ 945 sctp_toss_old_asconf(stcb); 946 } 947 948 /* 949 * cleanup any cached source addresses that may be topologically 950 * incorrect after a new address has been added to this interface. 951 */ 952 static void 953 sctp_asconf_nets_cleanup(struct sctp_tcb *stcb, struct sctp_ifn *ifn) 954 { 955 struct sctp_nets *net; 956 957 /* 958 * Ideally, we want to only clear cached routes and source addresses 959 * that are topologically incorrect. But since there is no easy way 960 * to know whether the newly added address on the ifn would cause a 961 * routing change (i.e. a new egress interface would be chosen) 962 * without doing a new routing lookup and source address selection, 963 * we will (for now) just flush any cached route using a different 964 * ifn (and cached source addrs) and let output re-choose them 965 * during the next send on that net. 966 */ 967 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 968 /* 969 * clear any cached route (and cached source address) if the 970 * route's interface is NOT the same as the address change. 971 * If it's the same interface, just clear the cached source 972 * address. 973 */ 974 if (SCTP_ROUTE_HAS_VALID_IFN(&net->ro) && 975 ((ifn == NULL) || 976 (SCTP_GET_IF_INDEX_FROM_ROUTE(&net->ro) != ifn->ifn_index))) { 977 /* clear any cached route */ 978 RO_NHFREE(&net->ro); 979 } 980 /* clear any cached source address */ 981 if (net->src_addr_selected) { 982 sctp_free_ifa(net->ro._s_addr); 983 net->ro._s_addr = NULL; 984 net->src_addr_selected = 0; 985 } 986 } 987 } 988 989 void 990 sctp_assoc_immediate_retrans(struct sctp_tcb *stcb, struct sctp_nets *dstnet) 991 { 992 int error; 993 994 if (dstnet->dest_state & SCTP_ADDR_UNCONFIRMED) { 995 return; 996 } 997 if (stcb->asoc.deleted_primary == NULL) { 998 return; 999 } 1000 1001 if (!TAILQ_EMPTY(&stcb->asoc.sent_queue)) { 1002 SCTPDBG(SCTP_DEBUG_ASCONF1, "assoc_immediate_retrans: Deleted primary is "); 1003 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, &stcb->asoc.deleted_primary->ro._l_addr.sa); 1004 SCTPDBG(SCTP_DEBUG_ASCONF1, "Current Primary is "); 1005 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, &stcb->asoc.primary_destination->ro._l_addr.sa); 1006 sctp_timer_stop(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, 1007 stcb->asoc.deleted_primary, 1008 SCTP_FROM_SCTP_ASCONF + SCTP_LOC_3); 1009 stcb->asoc.num_send_timers_up--; 1010 if (stcb->asoc.num_send_timers_up < 0) { 1011 stcb->asoc.num_send_timers_up = 0; 1012 } 1013 SCTP_TCB_LOCK_ASSERT(stcb); 1014 error = sctp_t3rxt_timer(stcb->sctp_ep, stcb, 1015 stcb->asoc.deleted_primary); 1016 if (error) { 1017 SCTP_INP_DECR_REF(stcb->sctp_ep); 1018 return; 1019 } 1020 SCTP_TCB_LOCK_ASSERT(stcb); 1021 #ifdef SCTP_AUDITING_ENABLED 1022 sctp_auditing(4, stcb->sctp_ep, stcb, stcb->asoc.deleted_primary); 1023 #endif 1024 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_T3, SCTP_SO_NOT_LOCKED); 1025 if ((stcb->asoc.num_send_timers_up == 0) && 1026 (stcb->asoc.sent_queue_cnt > 0)) { 1027 struct sctp_tmit_chunk *chk; 1028 1029 TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) { 1030 if (chk->whoTo != NULL) { 1031 break; 1032 } 1033 } 1034 if (chk != NULL) { 1035 sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, chk->whoTo); 1036 } 1037 } 1038 } 1039 return; 1040 } 1041 1042 static int 1043 sctp_asconf_queue_mgmt(struct sctp_tcb *, struct sctp_ifa *, uint16_t); 1044 1045 void 1046 sctp_net_immediate_retrans(struct sctp_tcb *stcb, struct sctp_nets *net) 1047 { 1048 struct sctp_tmit_chunk *chk; 1049 1050 SCTPDBG(SCTP_DEBUG_ASCONF1, "net_immediate_retrans: RTO is %d\n", net->RTO); 1051 sctp_timer_stop(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, net, 1052 SCTP_FROM_SCTP_ASCONF + SCTP_LOC_4); 1053 stcb->asoc.cc_functions.sctp_set_initial_cc_param(stcb, net); 1054 net->error_count = 0; 1055 TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) { 1056 if (chk->whoTo == net) { 1057 if (chk->sent < SCTP_DATAGRAM_RESEND) { 1058 chk->sent = SCTP_DATAGRAM_RESEND; 1059 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt); 1060 sctp_flight_size_decrease(chk); 1061 sctp_total_flight_decrease(stcb, chk); 1062 net->marked_retrans++; 1063 stcb->asoc.marked_retrans++; 1064 } 1065 } 1066 } 1067 if (net->marked_retrans) { 1068 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_T3, SCTP_SO_NOT_LOCKED); 1069 } 1070 } 1071 1072 static void 1073 sctp_path_check_and_react(struct sctp_tcb *stcb, struct sctp_ifa *newifa) 1074 { 1075 struct sctp_nets *net; 1076 int addrnum, changed; 1077 1078 /* 1079 * If number of local valid addresses is 1, the valid address is 1080 * probably newly added address. Several valid addresses in this 1081 * association. A source address may not be changed. Additionally, 1082 * they can be configured on a same interface as "alias" addresses. 1083 * (by micchie) 1084 */ 1085 addrnum = sctp_local_addr_count(stcb); 1086 SCTPDBG(SCTP_DEBUG_ASCONF1, "p_check_react(): %d local addresses\n", 1087 addrnum); 1088 if (addrnum == 1) { 1089 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1090 /* clear any cached route and source address */ 1091 RO_NHFREE(&net->ro); 1092 if (net->src_addr_selected) { 1093 sctp_free_ifa(net->ro._s_addr); 1094 net->ro._s_addr = NULL; 1095 net->src_addr_selected = 0; 1096 } 1097 /* Retransmit unacknowledged DATA chunks immediately */ 1098 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 1099 SCTP_MOBILITY_FASTHANDOFF)) { 1100 sctp_net_immediate_retrans(stcb, net); 1101 } 1102 /* also, SET PRIMARY is maybe already sent */ 1103 } 1104 return; 1105 } 1106 1107 /* Multiple local addresses exist in the association. */ 1108 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1109 /* clear any cached route and source address */ 1110 RO_NHFREE(&net->ro); 1111 if (net->src_addr_selected) { 1112 sctp_free_ifa(net->ro._s_addr); 1113 net->ro._s_addr = NULL; 1114 net->src_addr_selected = 0; 1115 } 1116 /* 1117 * Check if the nexthop is corresponding to the new address. 1118 * If the new address is corresponding to the current 1119 * nexthop, the path will be changed. If the new address is 1120 * NOT corresponding to the current nexthop, the path will 1121 * not be changed. 1122 */ 1123 SCTP_RTALLOC((sctp_route_t *)&net->ro, 1124 stcb->sctp_ep->def_vrf_id, 1125 stcb->sctp_ep->fibnum); 1126 if (net->ro.ro_nh == NULL) 1127 continue; 1128 1129 changed = 0; 1130 switch (net->ro._l_addr.sa.sa_family) { 1131 #ifdef INET 1132 case AF_INET: 1133 if (sctp_v4src_match_nexthop(newifa, (sctp_route_t *)&net->ro)) { 1134 changed = 1; 1135 } 1136 break; 1137 #endif 1138 #ifdef INET6 1139 case AF_INET6: 1140 if (sctp_v6src_match_nexthop( 1141 &newifa->address.sin6, (sctp_route_t *)&net->ro)) { 1142 changed = 1; 1143 } 1144 break; 1145 #endif 1146 default: 1147 break; 1148 } 1149 /* 1150 * if the newly added address does not relate routing 1151 * information, we skip. 1152 */ 1153 if (changed == 0) 1154 continue; 1155 /* Retransmit unacknowledged DATA chunks immediately */ 1156 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 1157 SCTP_MOBILITY_FASTHANDOFF)) { 1158 sctp_net_immediate_retrans(stcb, net); 1159 } 1160 /* Send SET PRIMARY for this new address */ 1161 if (net == stcb->asoc.primary_destination) { 1162 (void)sctp_asconf_queue_mgmt(stcb, newifa, 1163 SCTP_SET_PRIM_ADDR); 1164 } 1165 } 1166 } 1167 1168 /* 1169 * process an ADD/DELETE IP ack from peer. 1170 * addr: corresponding sctp_ifa to the address being added/deleted. 1171 * type: SCTP_ADD_IP_ADDRESS or SCTP_DEL_IP_ADDRESS. 1172 * flag: 1=success, 0=failure. 1173 */ 1174 static void 1175 sctp_asconf_addr_mgmt_ack(struct sctp_tcb *stcb, struct sctp_ifa *addr, uint32_t flag) 1176 { 1177 /* 1178 * do the necessary asoc list work- if we get a failure indication, 1179 * leave the address on the assoc's restricted list. If we get a 1180 * success indication, remove the address from the restricted list. 1181 */ 1182 /* 1183 * Note: this will only occur for ADD_IP_ADDRESS, since 1184 * DEL_IP_ADDRESS is never actually added to the list... 1185 */ 1186 if (flag) { 1187 /* success case, so remove from the restricted list */ 1188 sctp_del_local_addr_restricted(stcb, addr); 1189 1190 if (sctp_is_mobility_feature_on(stcb->sctp_ep, 1191 SCTP_MOBILITY_BASE) || 1192 sctp_is_mobility_feature_on(stcb->sctp_ep, 1193 SCTP_MOBILITY_FASTHANDOFF)) { 1194 sctp_path_check_and_react(stcb, addr); 1195 return; 1196 } 1197 /* clear any cached/topologically incorrect source addresses */ 1198 sctp_asconf_nets_cleanup(stcb, addr->ifn_p); 1199 } 1200 /* else, leave it on the list */ 1201 } 1202 1203 /* 1204 * add an asconf add/delete/set primary IP address parameter to the queue. 1205 * type = SCTP_ADD_IP_ADDRESS, SCTP_DEL_IP_ADDRESS, SCTP_SET_PRIM_ADDR. 1206 * returns 0 if queued, -1 if not queued/removed. 1207 * NOTE: if adding, but a delete for the same address is already scheduled 1208 * (and not yet sent out), simply remove it from queue. Same for deleting 1209 * an address already scheduled for add. If a duplicate operation is found, 1210 * ignore the new one. 1211 */ 1212 static int 1213 sctp_asconf_queue_mgmt(struct sctp_tcb *stcb, struct sctp_ifa *ifa, 1214 uint16_t type) 1215 { 1216 struct sctp_asconf_addr *aa, *aa_next; 1217 1218 /* make sure the request isn't already in the queue */ 1219 TAILQ_FOREACH_SAFE(aa, &stcb->asoc.asconf_queue, next, aa_next) { 1220 /* address match? */ 1221 if (sctp_asconf_addr_match(aa, &ifa->address.sa) == 0) 1222 continue; 1223 /* 1224 * is the request already in queue but not sent? pass the 1225 * request already sent in order to resolve the following 1226 * case: 1. arrival of ADD, then sent 2. arrival of DEL. we 1227 * can't remove the ADD request already sent 3. arrival of 1228 * ADD 1229 */ 1230 if (aa->ap.aph.ph.param_type == type && aa->sent == 0) { 1231 return (-1); 1232 } 1233 /* is the negative request already in queue, and not sent */ 1234 if ((aa->sent == 0) && (type == SCTP_ADD_IP_ADDRESS) && 1235 (aa->ap.aph.ph.param_type == SCTP_DEL_IP_ADDRESS)) { 1236 /* add requested, delete already queued */ 1237 TAILQ_REMOVE(&stcb->asoc.asconf_queue, aa, next); 1238 /* remove the ifa from the restricted list */ 1239 sctp_del_local_addr_restricted(stcb, ifa); 1240 /* free the asconf param */ 1241 SCTP_FREE(aa, SCTP_M_ASC_ADDR); 1242 SCTPDBG(SCTP_DEBUG_ASCONF2, "asconf_queue_mgmt: add removes queued entry\n"); 1243 return (-1); 1244 } 1245 if ((aa->sent == 0) && (type == SCTP_DEL_IP_ADDRESS) && 1246 (aa->ap.aph.ph.param_type == SCTP_ADD_IP_ADDRESS)) { 1247 /* delete requested, add already queued */ 1248 TAILQ_REMOVE(&stcb->asoc.asconf_queue, aa, next); 1249 /* remove the aa->ifa from the restricted list */ 1250 sctp_del_local_addr_restricted(stcb, aa->ifa); 1251 /* free the asconf param */ 1252 SCTP_FREE(aa, SCTP_M_ASC_ADDR); 1253 SCTPDBG(SCTP_DEBUG_ASCONF2, "asconf_queue_mgmt: delete removes queued entry\n"); 1254 return (-1); 1255 } 1256 } /* for each aa */ 1257 1258 /* adding new request to the queue */ 1259 SCTP_MALLOC(aa, struct sctp_asconf_addr *, sizeof(*aa), 1260 SCTP_M_ASC_ADDR); 1261 if (aa == NULL) { 1262 /* didn't get memory */ 1263 SCTPDBG(SCTP_DEBUG_ASCONF1, "asconf_queue_mgmt: failed to get memory!\n"); 1264 return (-1); 1265 } 1266 aa->special_del = 0; 1267 /* fill in asconf address parameter fields */ 1268 /* top level elements are "networked" during send */ 1269 aa->ap.aph.ph.param_type = type; 1270 aa->ifa = ifa; 1271 atomic_add_int(&ifa->refcount, 1); 1272 /* correlation_id filled in during send routine later... */ 1273 switch (ifa->address.sa.sa_family) { 1274 #ifdef INET6 1275 case AF_INET6: 1276 { 1277 struct sockaddr_in6 *sin6; 1278 1279 sin6 = &ifa->address.sin6; 1280 aa->ap.addrp.ph.param_type = SCTP_IPV6_ADDRESS; 1281 aa->ap.addrp.ph.param_length = (sizeof(struct sctp_ipv6addr_param)); 1282 aa->ap.aph.ph.param_length = sizeof(struct sctp_asconf_paramhdr) + 1283 sizeof(struct sctp_ipv6addr_param); 1284 memcpy(&aa->ap.addrp.addr, &sin6->sin6_addr, 1285 sizeof(struct in6_addr)); 1286 break; 1287 } 1288 #endif 1289 #ifdef INET 1290 case AF_INET: 1291 { 1292 struct sockaddr_in *sin; 1293 1294 sin = &ifa->address.sin; 1295 aa->ap.addrp.ph.param_type = SCTP_IPV4_ADDRESS; 1296 aa->ap.addrp.ph.param_length = (sizeof(struct sctp_ipv4addr_param)); 1297 aa->ap.aph.ph.param_length = sizeof(struct sctp_asconf_paramhdr) + 1298 sizeof(struct sctp_ipv4addr_param); 1299 memcpy(&aa->ap.addrp.addr, &sin->sin_addr, 1300 sizeof(struct in_addr)); 1301 break; 1302 } 1303 #endif 1304 default: 1305 /* invalid family! */ 1306 SCTP_FREE(aa, SCTP_M_ASC_ADDR); 1307 sctp_free_ifa(ifa); 1308 return (-1); 1309 } 1310 aa->sent = 0; /* clear sent flag */ 1311 1312 TAILQ_INSERT_TAIL(&stcb->asoc.asconf_queue, aa, next); 1313 #ifdef SCTP_DEBUG 1314 if (SCTP_BASE_SYSCTL(sctp_debug_on) & SCTP_DEBUG_ASCONF2) { 1315 if (type == SCTP_ADD_IP_ADDRESS) { 1316 SCTPDBG(SCTP_DEBUG_ASCONF2, "asconf_queue_mgmt: inserted asconf ADD_IP_ADDRESS: "); 1317 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF2, &ifa->address.sa); 1318 } else if (type == SCTP_DEL_IP_ADDRESS) { 1319 SCTPDBG(SCTP_DEBUG_ASCONF2, "asconf_queue_mgmt: appended asconf DEL_IP_ADDRESS: "); 1320 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF2, &ifa->address.sa); 1321 } else { 1322 SCTPDBG(SCTP_DEBUG_ASCONF2, "asconf_queue_mgmt: appended asconf SET_PRIM_ADDR: "); 1323 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF2, &ifa->address.sa); 1324 } 1325 } 1326 #endif 1327 1328 return (0); 1329 } 1330 1331 /* 1332 * add an asconf operation for the given ifa and type. 1333 * type = SCTP_ADD_IP_ADDRESS, SCTP_DEL_IP_ADDRESS, SCTP_SET_PRIM_ADDR. 1334 * returns 0 if completed, -1 if not completed, 1 if immediate send is 1335 * advisable. 1336 */ 1337 static int 1338 sctp_asconf_queue_add(struct sctp_tcb *stcb, struct sctp_ifa *ifa, 1339 uint16_t type) 1340 { 1341 uint32_t status; 1342 int pending_delete_queued = 0; 1343 int last; 1344 1345 /* see if peer supports ASCONF */ 1346 if (stcb->asoc.asconf_supported == 0) { 1347 return (-1); 1348 } 1349 1350 /* 1351 * if this is deleting the last address from the assoc, mark it as 1352 * pending. 1353 */ 1354 if ((type == SCTP_DEL_IP_ADDRESS) && !stcb->asoc.asconf_del_pending) { 1355 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 1356 last = (sctp_local_addr_count(stcb) == 0); 1357 } else { 1358 last = (sctp_local_addr_count(stcb) == 1); 1359 } 1360 if (last) { 1361 /* set the pending delete info only */ 1362 stcb->asoc.asconf_del_pending = 1; 1363 stcb->asoc.asconf_addr_del_pending = ifa; 1364 atomic_add_int(&ifa->refcount, 1); 1365 SCTPDBG(SCTP_DEBUG_ASCONF2, 1366 "asconf_queue_add: mark delete last address pending\n"); 1367 return (-1); 1368 } 1369 } 1370 1371 /* queue an asconf parameter */ 1372 status = sctp_asconf_queue_mgmt(stcb, ifa, type); 1373 1374 /* 1375 * if this is an add, and there is a delete also pending (i.e. the 1376 * last local address is being changed), queue the pending delete 1377 * too. 1378 */ 1379 if ((type == SCTP_ADD_IP_ADDRESS) && stcb->asoc.asconf_del_pending && (status == 0)) { 1380 /* queue in the pending delete */ 1381 if (sctp_asconf_queue_mgmt(stcb, 1382 stcb->asoc.asconf_addr_del_pending, 1383 SCTP_DEL_IP_ADDRESS) == 0) { 1384 SCTPDBG(SCTP_DEBUG_ASCONF2, "asconf_queue_add: queuing pending delete\n"); 1385 pending_delete_queued = 1; 1386 /* clear out the pending delete info */ 1387 stcb->asoc.asconf_del_pending = 0; 1388 sctp_free_ifa(stcb->asoc.asconf_addr_del_pending); 1389 stcb->asoc.asconf_addr_del_pending = NULL; 1390 } 1391 } 1392 1393 if (pending_delete_queued) { 1394 struct sctp_nets *net; 1395 1396 /* 1397 * since we know that the only/last address is now being 1398 * changed in this case, reset the cwnd/rto on all nets to 1399 * start as a new address and path. Also clear the error 1400 * counts to give the assoc the best chance to complete the 1401 * address change. 1402 */ 1403 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1404 stcb->asoc.cc_functions.sctp_set_initial_cc_param(stcb, 1405 net); 1406 net->RTO = 0; 1407 net->error_count = 0; 1408 } 1409 stcb->asoc.overall_error_count = 0; 1410 if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) { 1411 sctp_misc_ints(SCTP_THRESHOLD_CLEAR, 1412 stcb->asoc.overall_error_count, 1413 0, 1414 SCTP_FROM_SCTP_ASCONF, 1415 __LINE__); 1416 } 1417 1418 /* queue in an advisory set primary too */ 1419 (void)sctp_asconf_queue_mgmt(stcb, ifa, SCTP_SET_PRIM_ADDR); 1420 /* let caller know we should send this out immediately */ 1421 status = 1; 1422 } 1423 return (status); 1424 } 1425 1426 /*- 1427 * add an asconf delete IP address parameter to the queue by sockaddr and 1428 * possibly with no sctp_ifa available. This is only called by the routine 1429 * that checks the addresses in an INIT-ACK against the current address list. 1430 * returns 0 if completed, non-zero if not completed. 1431 * NOTE: if an add is already scheduled (and not yet sent out), simply 1432 * remove it from queue. If a duplicate operation is found, ignore the 1433 * new one. 1434 */ 1435 static int 1436 sctp_asconf_queue_sa_delete(struct sctp_tcb *stcb, struct sockaddr *sa) 1437 { 1438 struct sctp_ifa *ifa; 1439 struct sctp_asconf_addr *aa, *aa_next; 1440 1441 if (stcb == NULL) { 1442 return (-1); 1443 } 1444 /* see if peer supports ASCONF */ 1445 if (stcb->asoc.asconf_supported == 0) { 1446 return (-1); 1447 } 1448 /* make sure the request isn't already in the queue */ 1449 TAILQ_FOREACH_SAFE(aa, &stcb->asoc.asconf_queue, next, aa_next) { 1450 /* address match? */ 1451 if (sctp_asconf_addr_match(aa, sa) == 0) 1452 continue; 1453 /* is the request already in queue (sent or not) */ 1454 if (aa->ap.aph.ph.param_type == SCTP_DEL_IP_ADDRESS) { 1455 return (-1); 1456 } 1457 /* is the negative request already in queue, and not sent */ 1458 if (aa->sent == 1) 1459 continue; 1460 if (aa->ap.aph.ph.param_type == SCTP_ADD_IP_ADDRESS) { 1461 /* add already queued, so remove existing entry */ 1462 TAILQ_REMOVE(&stcb->asoc.asconf_queue, aa, next); 1463 sctp_del_local_addr_restricted(stcb, aa->ifa); 1464 /* free the entry */ 1465 SCTP_FREE(aa, SCTP_M_ASC_ADDR); 1466 return (-1); 1467 } 1468 } /* for each aa */ 1469 1470 /* find any existing ifa-- NOTE ifa CAN be allowed to be NULL */ 1471 ifa = sctp_find_ifa_by_addr(sa, stcb->asoc.vrf_id, SCTP_ADDR_NOT_LOCKED); 1472 1473 /* adding new request to the queue */ 1474 SCTP_MALLOC(aa, struct sctp_asconf_addr *, sizeof(*aa), 1475 SCTP_M_ASC_ADDR); 1476 if (aa == NULL) { 1477 /* didn't get memory */ 1478 SCTPDBG(SCTP_DEBUG_ASCONF1, 1479 "sctp_asconf_queue_sa_delete: failed to get memory!\n"); 1480 return (-1); 1481 } 1482 aa->special_del = 0; 1483 /* fill in asconf address parameter fields */ 1484 /* top level elements are "networked" during send */ 1485 aa->ap.aph.ph.param_type = SCTP_DEL_IP_ADDRESS; 1486 aa->ifa = ifa; 1487 if (ifa) 1488 atomic_add_int(&ifa->refcount, 1); 1489 /* correlation_id filled in during send routine later... */ 1490 switch (sa->sa_family) { 1491 #ifdef INET6 1492 case AF_INET6: 1493 { 1494 /* IPv6 address */ 1495 struct sockaddr_in6 *sin6; 1496 1497 sin6 = (struct sockaddr_in6 *)sa; 1498 aa->ap.addrp.ph.param_type = SCTP_IPV6_ADDRESS; 1499 aa->ap.addrp.ph.param_length = (sizeof(struct sctp_ipv6addr_param)); 1500 aa->ap.aph.ph.param_length = sizeof(struct sctp_asconf_paramhdr) + sizeof(struct sctp_ipv6addr_param); 1501 memcpy(&aa->ap.addrp.addr, &sin6->sin6_addr, 1502 sizeof(struct in6_addr)); 1503 break; 1504 } 1505 #endif 1506 #ifdef INET 1507 case AF_INET: 1508 { 1509 /* IPv4 address */ 1510 struct sockaddr_in *sin = (struct sockaddr_in *)sa; 1511 1512 aa->ap.addrp.ph.param_type = SCTP_IPV4_ADDRESS; 1513 aa->ap.addrp.ph.param_length = (sizeof(struct sctp_ipv4addr_param)); 1514 aa->ap.aph.ph.param_length = sizeof(struct sctp_asconf_paramhdr) + sizeof(struct sctp_ipv4addr_param); 1515 memcpy(&aa->ap.addrp.addr, &sin->sin_addr, 1516 sizeof(struct in_addr)); 1517 break; 1518 } 1519 #endif 1520 default: 1521 /* invalid family! */ 1522 SCTP_FREE(aa, SCTP_M_ASC_ADDR); 1523 if (ifa) 1524 sctp_free_ifa(ifa); 1525 return (-1); 1526 } 1527 aa->sent = 0; /* clear sent flag */ 1528 1529 /* delete goes to the back of the queue */ 1530 TAILQ_INSERT_TAIL(&stcb->asoc.asconf_queue, aa, next); 1531 1532 /* sa_ignore MEMLEAK {memory is put on the tailq} */ 1533 return (0); 1534 } 1535 1536 /* 1537 * find a specific asconf param on our "sent" queue 1538 */ 1539 static struct sctp_asconf_addr * 1540 sctp_asconf_find_param(struct sctp_tcb *stcb, uint32_t correlation_id) 1541 { 1542 struct sctp_asconf_addr *aa; 1543 1544 TAILQ_FOREACH(aa, &stcb->asoc.asconf_queue, next) { 1545 if (aa->ap.aph.correlation_id == correlation_id && 1546 aa->sent == 1) { 1547 /* found it */ 1548 return (aa); 1549 } 1550 } 1551 /* didn't find it */ 1552 return (NULL); 1553 } 1554 1555 /* 1556 * process an SCTP_ERROR_CAUSE_IND for a ASCONF-ACK parameter and do 1557 * notifications based on the error response 1558 */ 1559 static void 1560 sctp_asconf_process_error(struct sctp_tcb *stcb SCTP_UNUSED, 1561 struct sctp_asconf_paramhdr *aph) 1562 { 1563 struct sctp_error_cause *eh; 1564 struct sctp_paramhdr *ph; 1565 uint16_t param_type; 1566 uint16_t error_code; 1567 1568 eh = (struct sctp_error_cause *)(aph + 1); 1569 ph = (struct sctp_paramhdr *)(eh + 1); 1570 /* validate lengths */ 1571 if (htons(eh->length) + sizeof(struct sctp_error_cause) > 1572 htons(aph->ph.param_length)) { 1573 /* invalid error cause length */ 1574 SCTPDBG(SCTP_DEBUG_ASCONF1, 1575 "asconf_process_error: cause element too long\n"); 1576 return; 1577 } 1578 if (htons(ph->param_length) + sizeof(struct sctp_paramhdr) > 1579 htons(eh->length)) { 1580 /* invalid included TLV length */ 1581 SCTPDBG(SCTP_DEBUG_ASCONF1, 1582 "asconf_process_error: included TLV too long\n"); 1583 return; 1584 } 1585 /* which error code ? */ 1586 error_code = ntohs(eh->code); 1587 param_type = ntohs(aph->ph.param_type); 1588 /* FIX: this should go back up the REMOTE_ERROR ULP notify */ 1589 switch (error_code) { 1590 case SCTP_CAUSE_RESOURCE_SHORTAGE: 1591 /* we allow ourselves to "try again" for this error */ 1592 break; 1593 default: 1594 /* peer can't handle it... */ 1595 switch (param_type) { 1596 case SCTP_ADD_IP_ADDRESS: 1597 case SCTP_DEL_IP_ADDRESS: 1598 case SCTP_SET_PRIM_ADDR: 1599 break; 1600 default: 1601 break; 1602 } 1603 } 1604 } 1605 1606 /* 1607 * process an asconf queue param. 1608 * aparam: parameter to process, will be removed from the queue. 1609 * flag: 1=success case, 0=failure case 1610 */ 1611 static void 1612 sctp_asconf_process_param_ack(struct sctp_tcb *stcb, 1613 struct sctp_asconf_addr *aparam, uint32_t flag) 1614 { 1615 uint16_t param_type; 1616 1617 /* process this param */ 1618 param_type = aparam->ap.aph.ph.param_type; 1619 switch (param_type) { 1620 case SCTP_ADD_IP_ADDRESS: 1621 SCTPDBG(SCTP_DEBUG_ASCONF1, 1622 "process_param_ack: added IP address\n"); 1623 sctp_asconf_addr_mgmt_ack(stcb, aparam->ifa, flag); 1624 break; 1625 case SCTP_DEL_IP_ADDRESS: 1626 SCTPDBG(SCTP_DEBUG_ASCONF1, 1627 "process_param_ack: deleted IP address\n"); 1628 /* nothing really to do... lists already updated */ 1629 break; 1630 case SCTP_SET_PRIM_ADDR: 1631 SCTPDBG(SCTP_DEBUG_ASCONF1, 1632 "process_param_ack: set primary IP address\n"); 1633 /* nothing to do... peer may start using this addr */ 1634 break; 1635 default: 1636 /* should NEVER happen */ 1637 break; 1638 } 1639 1640 /* remove the param and free it */ 1641 TAILQ_REMOVE(&stcb->asoc.asconf_queue, aparam, next); 1642 if (aparam->ifa) 1643 sctp_free_ifa(aparam->ifa); 1644 SCTP_FREE(aparam, SCTP_M_ASC_ADDR); 1645 } 1646 1647 /* 1648 * cleanup from a bad asconf ack parameter 1649 */ 1650 static void 1651 sctp_asconf_ack_clear(struct sctp_tcb *stcb SCTP_UNUSED) 1652 { 1653 /* assume peer doesn't really know how to do asconfs */ 1654 /* XXX we could free the pending queue here */ 1655 1656 } 1657 1658 void 1659 sctp_handle_asconf_ack(struct mbuf *m, int offset, 1660 struct sctp_asconf_ack_chunk *cp, struct sctp_tcb *stcb, 1661 struct sctp_nets *net, int *abort_no_unlock) 1662 { 1663 struct sctp_association *asoc; 1664 uint32_t serial_num; 1665 uint16_t ack_length; 1666 struct sctp_asconf_paramhdr *aph; 1667 struct sctp_asconf_addr *aa, *aa_next; 1668 uint32_t last_error_id = 0; /* last error correlation id */ 1669 uint32_t id; 1670 struct sctp_asconf_addr *ap; 1671 1672 /* asconf param buffer */ 1673 uint8_t aparam_buf[SCTP_PARAM_BUFFER_SIZE]; 1674 1675 /* verify minimum length */ 1676 if (ntohs(cp->ch.chunk_length) < sizeof(struct sctp_asconf_ack_chunk)) { 1677 SCTPDBG(SCTP_DEBUG_ASCONF1, 1678 "handle_asconf_ack: chunk too small = %xh\n", 1679 ntohs(cp->ch.chunk_length)); 1680 return; 1681 } 1682 asoc = &stcb->asoc; 1683 serial_num = ntohl(cp->serial_number); 1684 1685 /* 1686 * NOTE: we may want to handle this differently- currently, we will 1687 * abort when we get an ack for the expected serial number + 1 (eg. 1688 * we didn't send it), process an ack normally if it is the expected 1689 * serial number, and re-send the previous ack for *ALL* other 1690 * serial numbers 1691 */ 1692 1693 /* 1694 * if the serial number is the next expected, but I didn't send it, 1695 * abort the asoc, since someone probably just hijacked us... 1696 */ 1697 if (serial_num == (asoc->asconf_seq_out + 1)) { 1698 struct mbuf *op_err; 1699 char msg[SCTP_DIAG_INFO_LEN]; 1700 1701 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf_ack: got unexpected next serial number! Aborting asoc!\n"); 1702 SCTP_SNPRINTF(msg, sizeof(msg), "Never sent serial number %8.8x", serial_num); 1703 op_err = sctp_generate_cause(SCTP_CAUSE_PROTOCOL_VIOLATION, msg); 1704 sctp_abort_an_association(stcb->sctp_ep, stcb, op_err, false, SCTP_SO_NOT_LOCKED); 1705 *abort_no_unlock = 1; 1706 return; 1707 } 1708 if (serial_num != asoc->asconf_seq_out_acked + 1) { 1709 /* got a duplicate/unexpected ASCONF-ACK */ 1710 SCTPDBG(SCTP_DEBUG_ASCONF1, "handle_asconf_ack: got duplicate/unexpected serial number = %xh (expected = %xh)\n", 1711 serial_num, asoc->asconf_seq_out_acked + 1); 1712 return; 1713 } 1714 1715 if (serial_num == asoc->asconf_seq_out - 1) { 1716 /* stop our timer */ 1717 sctp_timer_stop(SCTP_TIMER_TYPE_ASCONF, stcb->sctp_ep, stcb, NULL, 1718 SCTP_FROM_SCTP_ASCONF + SCTP_LOC_5); 1719 } 1720 1721 /* process the ASCONF-ACK contents */ 1722 ack_length = ntohs(cp->ch.chunk_length) - 1723 sizeof(struct sctp_asconf_ack_chunk); 1724 offset += sizeof(struct sctp_asconf_ack_chunk); 1725 /* process through all parameters */ 1726 while (ack_length >= sizeof(struct sctp_asconf_paramhdr)) { 1727 unsigned int param_length, param_type; 1728 1729 /* get pointer to next asconf parameter */ 1730 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(m, offset, 1731 sizeof(struct sctp_asconf_paramhdr), aparam_buf); 1732 if (aph == NULL) { 1733 /* can't get an asconf paramhdr */ 1734 sctp_asconf_ack_clear(stcb); 1735 return; 1736 } 1737 param_type = ntohs(aph->ph.param_type); 1738 param_length = ntohs(aph->ph.param_length); 1739 if (param_length > ack_length) { 1740 sctp_asconf_ack_clear(stcb); 1741 return; 1742 } 1743 if (param_length < sizeof(struct sctp_asconf_paramhdr)) { 1744 sctp_asconf_ack_clear(stcb); 1745 return; 1746 } 1747 /* get the complete parameter... */ 1748 if (param_length > sizeof(aparam_buf)) { 1749 SCTPDBG(SCTP_DEBUG_ASCONF1, 1750 "param length (%u) larger than buffer size!\n", param_length); 1751 sctp_asconf_ack_clear(stcb); 1752 return; 1753 } 1754 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(m, offset, param_length, aparam_buf); 1755 if (aph == NULL) { 1756 sctp_asconf_ack_clear(stcb); 1757 return; 1758 } 1759 /* correlation_id is transparent to peer, no ntohl needed */ 1760 id = aph->correlation_id; 1761 1762 switch (param_type) { 1763 case SCTP_ERROR_CAUSE_IND: 1764 last_error_id = id; 1765 /* find the corresponding asconf param in our queue */ 1766 ap = sctp_asconf_find_param(stcb, id); 1767 if (ap == NULL) { 1768 /* hmm... can't find this in our queue! */ 1769 break; 1770 } 1771 /* process the parameter, failed flag */ 1772 sctp_asconf_process_param_ack(stcb, ap, 0); 1773 /* process the error response */ 1774 sctp_asconf_process_error(stcb, aph); 1775 break; 1776 case SCTP_SUCCESS_REPORT: 1777 /* find the corresponding asconf param in our queue */ 1778 ap = sctp_asconf_find_param(stcb, id); 1779 if (ap == NULL) { 1780 /* hmm... can't find this in our queue! */ 1781 break; 1782 } 1783 /* process the parameter, success flag */ 1784 sctp_asconf_process_param_ack(stcb, ap, 1); 1785 break; 1786 default: 1787 break; 1788 } /* switch */ 1789 1790 /* update remaining ASCONF-ACK message length to process */ 1791 if (ack_length > SCTP_SIZE32(param_length)) { 1792 ack_length -= SCTP_SIZE32(param_length); 1793 } else { 1794 break; 1795 } 1796 offset += SCTP_SIZE32(param_length); 1797 } /* while */ 1798 1799 /* 1800 * if there are any "sent" params still on the queue, these are 1801 * implicitly "success", or "failed" (if we got an error back) ... 1802 * so process these appropriately 1803 * 1804 * we assume that the correlation_id's are monotonically increasing 1805 * beginning from 1 and that we don't have *that* many outstanding 1806 * at any given time 1807 */ 1808 if (last_error_id == 0) 1809 last_error_id--; /* set to "max" value */ 1810 TAILQ_FOREACH_SAFE(aa, &stcb->asoc.asconf_queue, next, aa_next) { 1811 if (aa->sent == 1) { 1812 /* 1813 * implicitly successful or failed if correlation_id 1814 * < last_error_id, then success else, failure 1815 */ 1816 if (aa->ap.aph.correlation_id < last_error_id) 1817 sctp_asconf_process_param_ack(stcb, aa, 1); 1818 else 1819 sctp_asconf_process_param_ack(stcb, aa, 0); 1820 } else { 1821 /* 1822 * since we always process in order (FIFO queue) if 1823 * we reach one that hasn't been sent, the rest 1824 * should not have been sent either. so, we're 1825 * done... 1826 */ 1827 break; 1828 } 1829 } 1830 1831 /* update the next sequence number to use */ 1832 asoc->asconf_seq_out_acked++; 1833 /* remove the old ASCONF on our outbound queue */ 1834 sctp_toss_old_asconf(stcb); 1835 if (!TAILQ_EMPTY(&stcb->asoc.asconf_queue)) { 1836 #ifdef SCTP_TIMER_BASED_ASCONF 1837 /* we have more params, so restart our timer */ 1838 sctp_timer_start(SCTP_TIMER_TYPE_ASCONF, stcb->sctp_ep, 1839 stcb, net); 1840 #else 1841 /* we have more params, so send out more */ 1842 sctp_send_asconf(stcb, net, SCTP_ADDR_NOT_LOCKED); 1843 #endif 1844 } 1845 } 1846 1847 #ifdef INET6 1848 static uint32_t 1849 sctp_is_scopeid_in_nets(struct sctp_tcb *stcb, struct sockaddr *sa) 1850 { 1851 struct sockaddr_in6 *sin6, *net6; 1852 struct sctp_nets *net; 1853 1854 if (sa->sa_family != AF_INET6) { 1855 /* wrong family */ 1856 return (0); 1857 } 1858 sin6 = (struct sockaddr_in6 *)sa; 1859 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr) == 0) { 1860 /* not link local address */ 1861 return (0); 1862 } 1863 /* hunt through our destination nets list for this scope_id */ 1864 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 1865 if (((struct sockaddr *)(&net->ro._l_addr))->sa_family != 1866 AF_INET6) 1867 continue; 1868 net6 = (struct sockaddr_in6 *)&net->ro._l_addr; 1869 if (IN6_IS_ADDR_LINKLOCAL(&net6->sin6_addr) == 0) 1870 continue; 1871 if (sctp_is_same_scope(sin6, net6)) { 1872 /* found one */ 1873 return (1); 1874 } 1875 } 1876 /* didn't find one */ 1877 return (0); 1878 } 1879 #endif 1880 1881 /* 1882 * address management functions 1883 */ 1884 static void 1885 sctp_addr_mgmt_assoc(struct sctp_inpcb *inp, struct sctp_tcb *stcb, 1886 struct sctp_ifa *ifa, uint16_t type, int addr_locked) 1887 { 1888 int status; 1889 1890 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) == 0 || 1891 sctp_is_feature_off(inp, SCTP_PCB_FLAGS_DO_ASCONF)) { 1892 /* subset bound, no ASCONF allowed case, so ignore */ 1893 return; 1894 } 1895 /* 1896 * note: we know this is not the subset bound, no ASCONF case eg. 1897 * this is boundall or subset bound w/ASCONF allowed 1898 */ 1899 1900 /* first, make sure that the address is IPv4 or IPv6 and not jailed */ 1901 switch (ifa->address.sa.sa_family) { 1902 #ifdef INET6 1903 case AF_INET6: 1904 if (prison_check_ip6(inp->ip_inp.inp.inp_cred, 1905 &ifa->address.sin6.sin6_addr) != 0) { 1906 return; 1907 } 1908 break; 1909 #endif 1910 #ifdef INET 1911 case AF_INET: 1912 if (prison_check_ip4(inp->ip_inp.inp.inp_cred, 1913 &ifa->address.sin.sin_addr) != 0) { 1914 return; 1915 } 1916 break; 1917 #endif 1918 default: 1919 return; 1920 } 1921 #ifdef INET6 1922 /* make sure we're "allowed" to add this type of addr */ 1923 if (ifa->address.sa.sa_family == AF_INET6) { 1924 /* invalid if we're not a v6 endpoint */ 1925 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) 1926 return; 1927 /* is the v6 addr really valid ? */ 1928 if (ifa->localifa_flags & SCTP_ADDR_IFA_UNUSEABLE) { 1929 return; 1930 } 1931 } 1932 #endif 1933 /* put this address on the "pending/do not use yet" list */ 1934 sctp_add_local_addr_restricted(stcb, ifa); 1935 /* 1936 * check address scope if address is out of scope, don't queue 1937 * anything... note: this would leave the address on both inp and 1938 * asoc lists 1939 */ 1940 switch (ifa->address.sa.sa_family) { 1941 #ifdef INET6 1942 case AF_INET6: 1943 { 1944 struct sockaddr_in6 *sin6; 1945 1946 sin6 = &ifa->address.sin6; 1947 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) { 1948 /* we skip unspecified addresses */ 1949 return; 1950 } 1951 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) { 1952 if (stcb->asoc.scope.local_scope == 0) { 1953 return; 1954 } 1955 /* is it the right link local scope? */ 1956 if (sctp_is_scopeid_in_nets(stcb, &ifa->address.sa) == 0) { 1957 return; 1958 } 1959 } 1960 if (stcb->asoc.scope.site_scope == 0 && 1961 IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr)) { 1962 return; 1963 } 1964 break; 1965 } 1966 #endif 1967 #ifdef INET 1968 case AF_INET: 1969 { 1970 struct sockaddr_in *sin; 1971 1972 /* invalid if we are a v6 only endpoint */ 1973 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) && 1974 SCTP_IPV6_V6ONLY(inp)) 1975 return; 1976 1977 sin = &ifa->address.sin; 1978 if (sin->sin_addr.s_addr == 0) { 1979 /* we skip unspecified addresses */ 1980 return; 1981 } 1982 if (stcb->asoc.scope.ipv4_local_scope == 0 && 1983 IN4_ISPRIVATE_ADDRESS(&sin->sin_addr)) { 1984 return; 1985 } 1986 break; 1987 } 1988 #endif 1989 default: 1990 /* else, not AF_INET or AF_INET6, so skip */ 1991 return; 1992 } 1993 1994 /* queue an asconf for this address add/delete */ 1995 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_DO_ASCONF)) { 1996 /* does the peer do asconf? */ 1997 if (stcb->asoc.asconf_supported) { 1998 /* queue an asconf for this addr */ 1999 status = sctp_asconf_queue_add(stcb, ifa, type); 2000 2001 /* 2002 * if queued ok, and in the open state, send out the 2003 * ASCONF. If in the non-open state, these will be 2004 * sent when the state goes open. 2005 */ 2006 if (status == 0 && 2007 ((SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) || 2008 (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_RECEIVED))) { 2009 #ifdef SCTP_TIMER_BASED_ASCONF 2010 sctp_timer_start(SCTP_TIMER_TYPE_ASCONF, inp, 2011 stcb, stcb->asoc.primary_destination); 2012 #else 2013 sctp_send_asconf(stcb, NULL, addr_locked); 2014 #endif 2015 } 2016 } 2017 } 2018 } 2019 2020 int 2021 sctp_asconf_iterator_ep(struct sctp_inpcb *inp, void *ptr, uint32_t val SCTP_UNUSED) 2022 { 2023 struct sctp_asconf_iterator *asc; 2024 struct sctp_ifa *ifa; 2025 struct sctp_laddr *l; 2026 int cnt_invalid = 0; 2027 2028 asc = (struct sctp_asconf_iterator *)ptr; 2029 LIST_FOREACH(l, &asc->list_of_work, sctp_nxt_addr) { 2030 ifa = l->ifa; 2031 switch (ifa->address.sa.sa_family) { 2032 #ifdef INET6 2033 case AF_INET6: 2034 /* invalid if we're not a v6 endpoint */ 2035 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) { 2036 cnt_invalid++; 2037 if (asc->cnt == cnt_invalid) 2038 return (1); 2039 } 2040 break; 2041 #endif 2042 #ifdef INET 2043 case AF_INET: 2044 { 2045 /* invalid if we are a v6 only endpoint */ 2046 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) && 2047 SCTP_IPV6_V6ONLY(inp)) { 2048 cnt_invalid++; 2049 if (asc->cnt == cnt_invalid) 2050 return (1); 2051 } 2052 break; 2053 } 2054 #endif 2055 default: 2056 /* invalid address family */ 2057 cnt_invalid++; 2058 if (asc->cnt == cnt_invalid) 2059 return (1); 2060 } 2061 } 2062 return (0); 2063 } 2064 2065 static int 2066 sctp_asconf_iterator_ep_end(struct sctp_inpcb *inp, void *ptr, uint32_t val SCTP_UNUSED) 2067 { 2068 struct sctp_ifa *ifa; 2069 struct sctp_asconf_iterator *asc; 2070 struct sctp_laddr *laddr, *nladdr, *l; 2071 2072 /* Only for specific case not bound all */ 2073 asc = (struct sctp_asconf_iterator *)ptr; 2074 LIST_FOREACH(l, &asc->list_of_work, sctp_nxt_addr) { 2075 ifa = l->ifa; 2076 if (l->action == SCTP_ADD_IP_ADDRESS) { 2077 LIST_FOREACH(laddr, &inp->sctp_addr_list, 2078 sctp_nxt_addr) { 2079 if (laddr->ifa == ifa) { 2080 laddr->action = 0; 2081 break; 2082 } 2083 } 2084 } else if (l->action == SCTP_DEL_IP_ADDRESS) { 2085 LIST_FOREACH_SAFE(laddr, &inp->sctp_addr_list, sctp_nxt_addr, nladdr) { 2086 /* remove only after all guys are done */ 2087 if (laddr->ifa == ifa) { 2088 sctp_del_local_addr_ep(inp, ifa); 2089 } 2090 } 2091 } 2092 } 2093 return (0); 2094 } 2095 2096 void 2097 sctp_asconf_iterator_stcb(struct sctp_inpcb *inp, struct sctp_tcb *stcb, 2098 void *ptr, uint32_t val SCTP_UNUSED) 2099 { 2100 struct sctp_asconf_iterator *asc; 2101 struct sctp_ifa *ifa; 2102 struct sctp_laddr *l; 2103 int cnt_invalid = 0; 2104 int type, status; 2105 int num_queued = 0; 2106 2107 asc = (struct sctp_asconf_iterator *)ptr; 2108 LIST_FOREACH(l, &asc->list_of_work, sctp_nxt_addr) { 2109 ifa = l->ifa; 2110 type = l->action; 2111 2112 /* address's vrf_id must be the vrf_id of the assoc */ 2113 if (ifa->vrf_id != stcb->asoc.vrf_id) { 2114 continue; 2115 } 2116 2117 /* Same checks again for assoc */ 2118 switch (ifa->address.sa.sa_family) { 2119 #ifdef INET6 2120 case AF_INET6: 2121 { 2122 /* invalid if we're not a v6 endpoint */ 2123 struct sockaddr_in6 *sin6; 2124 2125 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) { 2126 cnt_invalid++; 2127 if (asc->cnt == cnt_invalid) 2128 return; 2129 else 2130 continue; 2131 } 2132 sin6 = &ifa->address.sin6; 2133 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) { 2134 /* we skip unspecified addresses */ 2135 continue; 2136 } 2137 if (prison_check_ip6(inp->ip_inp.inp.inp_cred, 2138 &sin6->sin6_addr) != 0) { 2139 continue; 2140 } 2141 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) { 2142 if (stcb->asoc.scope.local_scope == 0) { 2143 continue; 2144 } 2145 /* is it the right link local scope? */ 2146 if (sctp_is_scopeid_in_nets(stcb, &ifa->address.sa) == 0) { 2147 continue; 2148 } 2149 } 2150 break; 2151 } 2152 #endif 2153 #ifdef INET 2154 case AF_INET: 2155 { 2156 /* invalid if we are a v6 only endpoint */ 2157 struct sockaddr_in *sin; 2158 2159 /* invalid if we are a v6 only endpoint */ 2160 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) && 2161 SCTP_IPV6_V6ONLY(inp)) 2162 continue; 2163 2164 sin = &ifa->address.sin; 2165 if (sin->sin_addr.s_addr == 0) { 2166 /* we skip unspecified addresses */ 2167 continue; 2168 } 2169 if (prison_check_ip4(inp->ip_inp.inp.inp_cred, 2170 &sin->sin_addr) != 0) { 2171 continue; 2172 } 2173 if (stcb->asoc.scope.ipv4_local_scope == 0 && 2174 IN4_ISPRIVATE_ADDRESS(&sin->sin_addr)) { 2175 continue; 2176 } 2177 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) && 2178 SCTP_IPV6_V6ONLY(inp)) { 2179 cnt_invalid++; 2180 if (asc->cnt == cnt_invalid) 2181 return; 2182 else 2183 continue; 2184 } 2185 break; 2186 } 2187 #endif 2188 default: 2189 /* invalid address family */ 2190 cnt_invalid++; 2191 if (asc->cnt == cnt_invalid) 2192 return; 2193 else 2194 continue; 2195 } 2196 2197 if (type == SCTP_ADD_IP_ADDRESS) { 2198 /* prevent this address from being used as a source */ 2199 sctp_add_local_addr_restricted(stcb, ifa); 2200 } else if (type == SCTP_DEL_IP_ADDRESS) { 2201 struct sctp_nets *net; 2202 2203 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) { 2204 /* delete this address if cached */ 2205 if (net->ro._s_addr == ifa) { 2206 sctp_free_ifa(net->ro._s_addr); 2207 net->ro._s_addr = NULL; 2208 net->src_addr_selected = 0; 2209 RO_NHFREE(&net->ro); 2210 /* 2211 * Now we deleted our src address, 2212 * should we not also now reset the 2213 * cwnd/rto to start as if its a new 2214 * address? 2215 */ 2216 stcb->asoc.cc_functions.sctp_set_initial_cc_param(stcb, net); 2217 net->RTO = 0; 2218 } 2219 } 2220 } else if (type == SCTP_SET_PRIM_ADDR) { 2221 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) == 0) { 2222 /* must validate the ifa is in the ep */ 2223 if (sctp_is_addr_in_ep(stcb->sctp_ep, ifa) == 0) { 2224 continue; 2225 } 2226 } else { 2227 /* Need to check scopes for this guy */ 2228 if (sctp_is_address_in_scope(ifa, &stcb->asoc.scope, 0) == 0) { 2229 continue; 2230 } 2231 } 2232 } 2233 /* queue an asconf for this address add/delete */ 2234 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_DO_ASCONF) && 2235 stcb->asoc.asconf_supported == 1) { 2236 /* queue an asconf for this addr */ 2237 status = sctp_asconf_queue_add(stcb, ifa, type); 2238 /* 2239 * if queued ok, and in the open state, update the 2240 * count of queued params. If in the non-open 2241 * state, these get sent when the assoc goes open. 2242 */ 2243 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) || 2244 (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 2245 if (status >= 0) { 2246 num_queued++; 2247 } 2248 } 2249 } 2250 } 2251 /* 2252 * If we have queued params in the open state, send out an ASCONF. 2253 */ 2254 if (num_queued > 0) { 2255 sctp_send_asconf(stcb, NULL, SCTP_ADDR_NOT_LOCKED); 2256 } 2257 } 2258 2259 void 2260 sctp_asconf_iterator_end(void *ptr, uint32_t val SCTP_UNUSED) 2261 { 2262 struct sctp_asconf_iterator *asc; 2263 struct sctp_ifa *ifa; 2264 struct sctp_laddr *l, *nl; 2265 2266 asc = (struct sctp_asconf_iterator *)ptr; 2267 LIST_FOREACH_SAFE(l, &asc->list_of_work, sctp_nxt_addr, nl) { 2268 ifa = l->ifa; 2269 if (l->action == SCTP_ADD_IP_ADDRESS) { 2270 /* Clear the defer use flag */ 2271 ifa->localifa_flags &= ~SCTP_ADDR_DEFER_USE; 2272 } 2273 sctp_free_ifa(ifa); 2274 SCTP_ZONE_FREE(SCTP_BASE_INFO(ipi_zone_laddr), l); 2275 SCTP_DECR_LADDR_COUNT(); 2276 } 2277 SCTP_FREE(asc, SCTP_M_ASC_IT); 2278 } 2279 2280 /* 2281 * sa is the sockaddr to ask the peer to set primary to. 2282 * returns: 0 = completed, -1 = error 2283 */ 2284 int32_t 2285 sctp_set_primary_ip_address_sa(struct sctp_tcb *stcb, struct sockaddr *sa) 2286 { 2287 uint32_t vrf_id; 2288 struct sctp_ifa *ifa; 2289 2290 /* find the ifa for the desired set primary */ 2291 vrf_id = stcb->asoc.vrf_id; 2292 ifa = sctp_find_ifa_by_addr(sa, vrf_id, SCTP_ADDR_NOT_LOCKED); 2293 if (ifa == NULL) { 2294 /* Invalid address */ 2295 return (-1); 2296 } 2297 2298 /* queue an ASCONF:SET_PRIM_ADDR to be sent */ 2299 if (!sctp_asconf_queue_add(stcb, ifa, SCTP_SET_PRIM_ADDR)) { 2300 /* set primary queuing succeeded */ 2301 SCTPDBG(SCTP_DEBUG_ASCONF1, 2302 "set_primary_ip_address_sa: queued on tcb=%p, ", 2303 (void *)stcb); 2304 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 2305 if ((SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) || 2306 (SCTP_GET_STATE(stcb) == SCTP_STATE_SHUTDOWN_RECEIVED)) { 2307 #ifdef SCTP_TIMER_BASED_ASCONF 2308 sctp_timer_start(SCTP_TIMER_TYPE_ASCONF, 2309 stcb->sctp_ep, stcb, 2310 stcb->asoc.primary_destination); 2311 #else 2312 sctp_send_asconf(stcb, NULL, SCTP_ADDR_NOT_LOCKED); 2313 #endif 2314 } 2315 } else { 2316 SCTPDBG(SCTP_DEBUG_ASCONF1, "set_primary_ip_address_sa: failed to add to queue on tcb=%p, ", 2317 (void *)stcb); 2318 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF1, sa); 2319 return (-1); 2320 } 2321 return (0); 2322 } 2323 2324 int 2325 sctp_is_addr_pending(struct sctp_tcb *stcb, struct sctp_ifa *sctp_ifa) 2326 { 2327 struct sctp_tmit_chunk *chk, *nchk; 2328 unsigned int offset, asconf_limit; 2329 struct sctp_asconf_chunk *acp; 2330 struct sctp_asconf_paramhdr *aph; 2331 uint8_t aparam_buf[SCTP_PARAM_BUFFER_SIZE]; 2332 struct sctp_paramhdr *ph; 2333 int add_cnt, del_cnt; 2334 uint16_t last_param_type; 2335 2336 add_cnt = del_cnt = 0; 2337 last_param_type = 0; 2338 TAILQ_FOREACH_SAFE(chk, &stcb->asoc.asconf_send_queue, sctp_next, nchk) { 2339 if (chk->data == NULL) { 2340 SCTPDBG(SCTP_DEBUG_ASCONF1, "is_addr_pending: No mbuf data?\n"); 2341 continue; 2342 } 2343 offset = 0; 2344 acp = mtod(chk->data, struct sctp_asconf_chunk *); 2345 offset += sizeof(struct sctp_asconf_chunk); 2346 asconf_limit = ntohs(acp->ch.chunk_length); 2347 ph = (struct sctp_paramhdr *)sctp_m_getptr(chk->data, offset, sizeof(struct sctp_paramhdr), aparam_buf); 2348 if (ph == NULL) { 2349 SCTPDBG(SCTP_DEBUG_ASCONF1, "is_addr_pending: couldn't get lookup addr!\n"); 2350 continue; 2351 } 2352 offset += ntohs(ph->param_length); 2353 2354 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(chk->data, offset, sizeof(struct sctp_asconf_paramhdr), aparam_buf); 2355 if (aph == NULL) { 2356 SCTPDBG(SCTP_DEBUG_ASCONF1, "is_addr_pending: Empty ASCONF will be sent?\n"); 2357 continue; 2358 } 2359 while (aph != NULL) { 2360 unsigned int param_length, param_type; 2361 2362 param_type = ntohs(aph->ph.param_type); 2363 param_length = ntohs(aph->ph.param_length); 2364 if (offset + param_length > asconf_limit) { 2365 /* parameter goes beyond end of chunk! */ 2366 break; 2367 } 2368 if (param_length > sizeof(aparam_buf)) { 2369 SCTPDBG(SCTP_DEBUG_ASCONF1, "is_addr_pending: param length (%u) larger than buffer size!\n", param_length); 2370 break; 2371 } 2372 if (param_length <= sizeof(struct sctp_paramhdr)) { 2373 SCTPDBG(SCTP_DEBUG_ASCONF1, "is_addr_pending: param length(%u) too short\n", param_length); 2374 break; 2375 } 2376 2377 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(chk->data, offset, param_length, aparam_buf); 2378 if (aph == NULL) { 2379 SCTPDBG(SCTP_DEBUG_ASCONF1, "is_addr_pending: couldn't get entire param\n"); 2380 break; 2381 } 2382 2383 ph = (struct sctp_paramhdr *)(aph + 1); 2384 if (sctp_addr_match(ph, &sctp_ifa->address.sa) != 0) { 2385 switch (param_type) { 2386 case SCTP_ADD_IP_ADDRESS: 2387 add_cnt++; 2388 break; 2389 case SCTP_DEL_IP_ADDRESS: 2390 del_cnt++; 2391 break; 2392 default: 2393 break; 2394 } 2395 last_param_type = param_type; 2396 } 2397 2398 offset += SCTP_SIZE32(param_length); 2399 if (offset >= asconf_limit) { 2400 /* no more data in the mbuf chain */ 2401 break; 2402 } 2403 /* get pointer to next asconf param */ 2404 aph = (struct sctp_asconf_paramhdr *)sctp_m_getptr(chk->data, offset, sizeof(struct sctp_asconf_paramhdr), aparam_buf); 2405 } 2406 } 2407 2408 /* 2409 * we want to find the sequences which consist of ADD -> DEL -> ADD 2410 * or DEL -> ADD 2411 */ 2412 if (add_cnt > del_cnt || 2413 (add_cnt == del_cnt && last_param_type == SCTP_ADD_IP_ADDRESS)) { 2414 return (1); 2415 } 2416 return (0); 2417 } 2418 2419 static struct sockaddr * 2420 sctp_find_valid_localaddr(struct sctp_tcb *stcb, int addr_locked) 2421 { 2422 struct sctp_vrf *vrf = NULL; 2423 struct sctp_ifn *sctp_ifn; 2424 struct sctp_ifa *sctp_ifa; 2425 2426 if (addr_locked == SCTP_ADDR_NOT_LOCKED) 2427 SCTP_IPI_ADDR_RLOCK(); 2428 vrf = sctp_find_vrf(stcb->asoc.vrf_id); 2429 if (vrf == NULL) { 2430 if (addr_locked == SCTP_ADDR_NOT_LOCKED) 2431 SCTP_IPI_ADDR_RUNLOCK(); 2432 return (NULL); 2433 } 2434 LIST_FOREACH(sctp_ifn, &vrf->ifnlist, next_ifn) { 2435 if (stcb->asoc.scope.loopback_scope == 0 && 2436 SCTP_IFN_IS_IFT_LOOP(sctp_ifn)) { 2437 /* Skip if loopback_scope not set */ 2438 continue; 2439 } 2440 LIST_FOREACH(sctp_ifa, &sctp_ifn->ifalist, next_ifa) { 2441 switch (sctp_ifa->address.sa.sa_family) { 2442 #ifdef INET 2443 case AF_INET: 2444 if (stcb->asoc.scope.ipv4_addr_legal) { 2445 struct sockaddr_in *sin; 2446 2447 sin = &sctp_ifa->address.sin; 2448 if (sin->sin_addr.s_addr == 0) { 2449 /* 2450 * skip unspecified 2451 * addresses 2452 */ 2453 continue; 2454 } 2455 if (prison_check_ip4(stcb->sctp_ep->ip_inp.inp.inp_cred, 2456 &sin->sin_addr) != 0) { 2457 continue; 2458 } 2459 2460 if (stcb->asoc.scope.loopback_scope == 0 && 2461 IN4_ISLOOPBACK_ADDRESS(&sin->sin_addr)) 2462 continue; 2463 2464 if (stcb->asoc.scope.ipv4_local_scope == 0 && 2465 IN4_ISPRIVATE_ADDRESS(&sin->sin_addr)) 2466 continue; 2467 2468 if (sctp_is_addr_restricted(stcb, sctp_ifa) && 2469 (!sctp_is_addr_pending(stcb, sctp_ifa))) 2470 continue; 2471 /* 2472 * found a valid local v4 address to 2473 * use 2474 */ 2475 if (addr_locked == SCTP_ADDR_NOT_LOCKED) 2476 SCTP_IPI_ADDR_RUNLOCK(); 2477 return (&sctp_ifa->address.sa); 2478 } 2479 break; 2480 #endif 2481 #ifdef INET6 2482 case AF_INET6: 2483 if (stcb->asoc.scope.ipv6_addr_legal) { 2484 struct sockaddr_in6 *sin6; 2485 2486 if (sctp_ifa->localifa_flags & SCTP_ADDR_IFA_UNUSEABLE) { 2487 continue; 2488 } 2489 2490 sin6 = &sctp_ifa->address.sin6; 2491 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) { 2492 /* 2493 * we skip unspecified 2494 * addresses 2495 */ 2496 continue; 2497 } 2498 if (prison_check_ip6(stcb->sctp_ep->ip_inp.inp.inp_cred, 2499 &sin6->sin6_addr) != 0) { 2500 continue; 2501 } 2502 if (stcb->asoc.scope.loopback_scope == 0 && 2503 IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr)) 2504 continue; 2505 if (stcb->asoc.scope.local_scope == 0 && 2506 IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) 2507 continue; 2508 if (stcb->asoc.scope.site_scope == 0 && 2509 IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr)) 2510 continue; 2511 2512 if (sctp_is_addr_restricted(stcb, sctp_ifa) && 2513 (!sctp_is_addr_pending(stcb, sctp_ifa))) 2514 continue; 2515 /* 2516 * found a valid local v6 address to 2517 * use 2518 */ 2519 if (addr_locked == SCTP_ADDR_NOT_LOCKED) 2520 SCTP_IPI_ADDR_RUNLOCK(); 2521 return (&sctp_ifa->address.sa); 2522 } 2523 break; 2524 #endif 2525 default: 2526 break; 2527 } 2528 } 2529 } 2530 /* no valid addresses found */ 2531 if (addr_locked == SCTP_ADDR_NOT_LOCKED) 2532 SCTP_IPI_ADDR_RUNLOCK(); 2533 return (NULL); 2534 } 2535 2536 static struct sockaddr * 2537 sctp_find_valid_localaddr_ep(struct sctp_tcb *stcb) 2538 { 2539 struct sctp_laddr *laddr; 2540 2541 LIST_FOREACH(laddr, &stcb->sctp_ep->sctp_addr_list, sctp_nxt_addr) { 2542 if (laddr->ifa == NULL) { 2543 continue; 2544 } 2545 /* is the address restricted ? */ 2546 if (sctp_is_addr_restricted(stcb, laddr->ifa) && 2547 (!sctp_is_addr_pending(stcb, laddr->ifa))) 2548 continue; 2549 2550 /* found a valid local address to use */ 2551 return (&laddr->ifa->address.sa); 2552 } 2553 /* no valid addresses found */ 2554 return (NULL); 2555 } 2556 2557 /* 2558 * builds an ASCONF chunk from queued ASCONF params. 2559 * returns NULL on error (no mbuf, no ASCONF params queued, etc). 2560 */ 2561 struct mbuf * 2562 sctp_compose_asconf(struct sctp_tcb *stcb, int *retlen, int addr_locked) 2563 { 2564 struct mbuf *m_asconf, *m_asconf_chk; 2565 struct sctp_asconf_addr *aa; 2566 struct sctp_asconf_chunk *acp; 2567 struct sctp_asconf_paramhdr *aph; 2568 struct sctp_asconf_addr_param *aap; 2569 uint32_t p_length, overhead; 2570 uint32_t correlation_id = 1; /* 0 is reserved... */ 2571 caddr_t ptr, lookup_ptr; 2572 uint8_t lookup_used = 0; 2573 2574 /* are there any asconf params to send? */ 2575 TAILQ_FOREACH(aa, &stcb->asoc.asconf_queue, next) { 2576 if (aa->sent == 0) 2577 break; 2578 } 2579 if (aa == NULL) 2580 return (NULL); 2581 2582 /* Consider IP header and SCTP common header. */ 2583 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) { 2584 overhead = SCTP_MIN_OVERHEAD; 2585 } else { 2586 overhead = SCTP_MIN_V4_OVERHEAD; 2587 } 2588 /* Consider ASONF chunk. */ 2589 overhead += sizeof(struct sctp_asconf_chunk); 2590 /* Consider AUTH chunk. */ 2591 overhead += sctp_get_auth_chunk_len(stcb->asoc.peer_hmac_id); 2592 if (stcb->asoc.smallest_mtu <= overhead) { 2593 /* MTU too small. */ 2594 return (NULL); 2595 } 2596 /* 2597 * get a chunk header mbuf and a cluster for the asconf params since 2598 * it's simpler to fill in the asconf chunk header lookup address on 2599 * the fly 2600 */ 2601 m_asconf_chk = sctp_get_mbuf_for_msg(sizeof(struct sctp_asconf_chunk), 0, M_NOWAIT, 1, MT_DATA); 2602 if (m_asconf_chk == NULL) { 2603 /* no mbuf's */ 2604 SCTPDBG(SCTP_DEBUG_ASCONF1, 2605 "sctp_compose_asconf: couldn't get chunk mbuf!\n"); 2606 return (NULL); 2607 } 2608 m_asconf = sctp_get_mbuf_for_msg(MCLBYTES, 0, M_NOWAIT, 1, MT_DATA); 2609 if (m_asconf == NULL) { 2610 /* no mbuf's */ 2611 SCTPDBG(SCTP_DEBUG_ASCONF1, 2612 "sctp_compose_asconf: couldn't get mbuf!\n"); 2613 sctp_m_freem(m_asconf_chk); 2614 return (NULL); 2615 } 2616 SCTP_BUF_LEN(m_asconf_chk) = sizeof(struct sctp_asconf_chunk); 2617 SCTP_BUF_LEN(m_asconf) = 0; 2618 acp = mtod(m_asconf_chk, struct sctp_asconf_chunk *); 2619 memset(acp, 0, sizeof(struct sctp_asconf_chunk)); 2620 /* save pointers to lookup address and asconf params */ 2621 lookup_ptr = (caddr_t)(acp + 1); /* after the header */ 2622 ptr = mtod(m_asconf, caddr_t); /* beginning of cluster */ 2623 2624 /* fill in chunk header info */ 2625 acp->ch.chunk_type = SCTP_ASCONF; 2626 acp->ch.chunk_flags = 0; 2627 acp->serial_number = htonl(stcb->asoc.asconf_seq_out); 2628 stcb->asoc.asconf_seq_out++; 2629 2630 /* add parameters... up to smallest MTU allowed */ 2631 TAILQ_FOREACH(aa, &stcb->asoc.asconf_queue, next) { 2632 if (aa->sent) 2633 continue; 2634 /* get the parameter length */ 2635 p_length = SCTP_SIZE32(aa->ap.aph.ph.param_length); 2636 /* will it fit in current chunk? */ 2637 if ((SCTP_BUF_LEN(m_asconf) + p_length > stcb->asoc.smallest_mtu - overhead) || 2638 (SCTP_BUF_LEN(m_asconf) + p_length > MCLBYTES)) { 2639 /* won't fit, so we're done with this chunk */ 2640 break; 2641 } 2642 /* assign (and store) a correlation id */ 2643 aa->ap.aph.correlation_id = correlation_id++; 2644 2645 /* 2646 * fill in address if we're doing a delete this is a simple 2647 * way for us to fill in the correlation address, which 2648 * should only be used by the peer if we're deleting our 2649 * source address and adding a new address (e.g. renumbering 2650 * case) 2651 */ 2652 if (lookup_used == 0 && 2653 (aa->special_del == 0) && 2654 aa->ap.aph.ph.param_type == SCTP_DEL_IP_ADDRESS) { 2655 struct sctp_ipv6addr_param *lookup; 2656 uint16_t p_size, addr_size; 2657 2658 lookup = (struct sctp_ipv6addr_param *)lookup_ptr; 2659 lookup->ph.param_type = 2660 htons(aa->ap.addrp.ph.param_type); 2661 if (aa->ap.addrp.ph.param_type == SCTP_IPV6_ADDRESS) { 2662 /* copy IPv6 address */ 2663 p_size = sizeof(struct sctp_ipv6addr_param); 2664 addr_size = sizeof(struct in6_addr); 2665 } else { 2666 /* copy IPv4 address */ 2667 p_size = sizeof(struct sctp_ipv4addr_param); 2668 addr_size = sizeof(struct in_addr); 2669 } 2670 lookup->ph.param_length = htons(SCTP_SIZE32(p_size)); 2671 memcpy(lookup->addr, &aa->ap.addrp.addr, addr_size); 2672 SCTP_BUF_LEN(m_asconf_chk) += SCTP_SIZE32(p_size); 2673 lookup_used = 1; 2674 } 2675 /* copy into current space */ 2676 memcpy(ptr, &aa->ap, p_length); 2677 2678 /* network elements and update lengths */ 2679 aph = (struct sctp_asconf_paramhdr *)ptr; 2680 aap = (struct sctp_asconf_addr_param *)ptr; 2681 /* correlation_id is transparent to peer, no htonl needed */ 2682 aph->ph.param_type = htons(aph->ph.param_type); 2683 aph->ph.param_length = htons(aph->ph.param_length); 2684 aap->addrp.ph.param_type = htons(aap->addrp.ph.param_type); 2685 aap->addrp.ph.param_length = htons(aap->addrp.ph.param_length); 2686 2687 SCTP_BUF_LEN(m_asconf) += SCTP_SIZE32(p_length); 2688 ptr += SCTP_SIZE32(p_length); 2689 2690 /* 2691 * these params are removed off the pending list upon 2692 * getting an ASCONF-ACK back from the peer, just set flag 2693 */ 2694 aa->sent = 1; 2695 } 2696 /* check to see if the lookup addr has been populated yet */ 2697 if (lookup_used == 0) { 2698 /* NOTE: if the address param is optional, can skip this... */ 2699 /* add any valid (existing) address... */ 2700 struct sctp_ipv6addr_param *lookup; 2701 uint16_t p_size, addr_size; 2702 struct sockaddr *found_addr; 2703 caddr_t addr_ptr; 2704 2705 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) 2706 found_addr = sctp_find_valid_localaddr(stcb, 2707 addr_locked); 2708 else 2709 found_addr = sctp_find_valid_localaddr_ep(stcb); 2710 2711 lookup = (struct sctp_ipv6addr_param *)lookup_ptr; 2712 if (found_addr != NULL) { 2713 switch (found_addr->sa_family) { 2714 #ifdef INET6 2715 case AF_INET6: 2716 /* copy IPv6 address */ 2717 lookup->ph.param_type = 2718 htons(SCTP_IPV6_ADDRESS); 2719 p_size = sizeof(struct sctp_ipv6addr_param); 2720 addr_size = sizeof(struct in6_addr); 2721 addr_ptr = (caddr_t)&((struct sockaddr_in6 *) 2722 found_addr)->sin6_addr; 2723 break; 2724 #endif 2725 #ifdef INET 2726 case AF_INET: 2727 /* copy IPv4 address */ 2728 lookup->ph.param_type = 2729 htons(SCTP_IPV4_ADDRESS); 2730 p_size = sizeof(struct sctp_ipv4addr_param); 2731 addr_size = sizeof(struct in_addr); 2732 addr_ptr = (caddr_t)&((struct sockaddr_in *) 2733 found_addr)->sin_addr; 2734 break; 2735 #endif 2736 default: 2737 SCTPDBG(SCTP_DEBUG_ASCONF1, 2738 "sctp_compose_asconf: no usable lookup addr (family = %d)!\n", 2739 found_addr->sa_family); 2740 sctp_m_freem(m_asconf_chk); 2741 sctp_m_freem(m_asconf); 2742 return (NULL); 2743 } 2744 lookup->ph.param_length = htons(SCTP_SIZE32(p_size)); 2745 memcpy(lookup->addr, addr_ptr, addr_size); 2746 SCTP_BUF_LEN(m_asconf_chk) += SCTP_SIZE32(p_size); 2747 } else { 2748 /* uh oh... don't have any address?? */ 2749 SCTPDBG(SCTP_DEBUG_ASCONF1, 2750 "sctp_compose_asconf: no lookup addr!\n"); 2751 sctp_m_freem(m_asconf_chk); 2752 sctp_m_freem(m_asconf); 2753 return (NULL); 2754 } 2755 } 2756 /* chain it all together */ 2757 SCTP_BUF_NEXT(m_asconf_chk) = m_asconf; 2758 *retlen = SCTP_BUF_LEN(m_asconf_chk) + SCTP_BUF_LEN(m_asconf); 2759 acp->ch.chunk_length = htons(*retlen); 2760 2761 return (m_asconf_chk); 2762 } 2763 2764 /* 2765 * section to handle address changes before an association is up eg. changes 2766 * during INIT/INIT-ACK/COOKIE-ECHO handshake 2767 */ 2768 2769 /* 2770 * processes the (local) addresses in the INIT-ACK chunk 2771 */ 2772 static void 2773 sctp_process_initack_addresses(struct sctp_tcb *stcb, struct mbuf *m, 2774 unsigned int offset, unsigned int length) 2775 { 2776 struct sctp_paramhdr tmp_param, *ph; 2777 uint16_t plen, ptype; 2778 struct sctp_ifa *sctp_ifa; 2779 union sctp_sockstore store; 2780 #ifdef INET6 2781 struct sctp_ipv6addr_param addr6_store; 2782 #endif 2783 #ifdef INET 2784 struct sctp_ipv4addr_param addr4_store; 2785 #endif 2786 2787 SCTPDBG(SCTP_DEBUG_ASCONF2, "processing init-ack addresses\n"); 2788 if (stcb == NULL) /* Un-needed check for SA */ 2789 return; 2790 2791 /* convert to upper bound */ 2792 length += offset; 2793 2794 if ((offset + sizeof(struct sctp_paramhdr)) > length) { 2795 return; 2796 } 2797 /* go through the addresses in the init-ack */ 2798 ph = (struct sctp_paramhdr *) 2799 sctp_m_getptr(m, offset, sizeof(struct sctp_paramhdr), 2800 (uint8_t *)&tmp_param); 2801 while (ph != NULL) { 2802 ptype = ntohs(ph->param_type); 2803 plen = ntohs(ph->param_length); 2804 switch (ptype) { 2805 #ifdef INET6 2806 case SCTP_IPV6_ADDRESS: 2807 { 2808 struct sctp_ipv6addr_param *a6p; 2809 2810 /* get the entire IPv6 address param */ 2811 a6p = (struct sctp_ipv6addr_param *) 2812 sctp_m_getptr(m, offset, 2813 sizeof(struct sctp_ipv6addr_param), 2814 (uint8_t *)&addr6_store); 2815 if (plen != sizeof(struct sctp_ipv6addr_param) || 2816 a6p == NULL) { 2817 return; 2818 } 2819 memset(&store, 0, sizeof(union sctp_sockstore)); 2820 store.sin6.sin6_family = AF_INET6; 2821 store.sin6.sin6_len = sizeof(struct sockaddr_in6); 2822 store.sin6.sin6_port = stcb->rport; 2823 memcpy(&store.sin6.sin6_addr, a6p->addr, sizeof(struct in6_addr)); 2824 break; 2825 } 2826 #endif 2827 #ifdef INET 2828 case SCTP_IPV4_ADDRESS: 2829 { 2830 struct sctp_ipv4addr_param *a4p; 2831 2832 /* get the entire IPv4 address param */ 2833 a4p = (struct sctp_ipv4addr_param *)sctp_m_getptr(m, offset, 2834 sizeof(struct sctp_ipv4addr_param), 2835 (uint8_t *)&addr4_store); 2836 if (plen != sizeof(struct sctp_ipv4addr_param) || 2837 a4p == NULL) { 2838 return; 2839 } 2840 memset(&store, 0, sizeof(union sctp_sockstore)); 2841 store.sin.sin_family = AF_INET; 2842 store.sin.sin_len = sizeof(struct sockaddr_in); 2843 store.sin.sin_port = stcb->rport; 2844 store.sin.sin_addr.s_addr = a4p->addr; 2845 break; 2846 } 2847 #endif 2848 default: 2849 goto next_addr; 2850 } 2851 2852 /* see if this address really (still) exists */ 2853 sctp_ifa = sctp_find_ifa_by_addr(&store.sa, stcb->asoc.vrf_id, 2854 SCTP_ADDR_NOT_LOCKED); 2855 if (sctp_ifa == NULL) { 2856 /* address doesn't exist anymore */ 2857 int status; 2858 2859 /* are ASCONFs allowed ? */ 2860 if ((sctp_is_feature_on(stcb->sctp_ep, 2861 SCTP_PCB_FLAGS_DO_ASCONF)) && 2862 stcb->asoc.asconf_supported) { 2863 /* queue an ASCONF DEL_IP_ADDRESS */ 2864 status = sctp_asconf_queue_sa_delete(stcb, &store.sa); 2865 /* 2866 * if queued ok, and in correct state, send 2867 * out the ASCONF. 2868 */ 2869 if (status == 0 && 2870 SCTP_GET_STATE(stcb) == SCTP_STATE_OPEN) { 2871 #ifdef SCTP_TIMER_BASED_ASCONF 2872 sctp_timer_start(SCTP_TIMER_TYPE_ASCONF, 2873 stcb->sctp_ep, stcb, 2874 stcb->asoc.primary_destination); 2875 #else 2876 sctp_send_asconf(stcb, NULL, SCTP_ADDR_NOT_LOCKED); 2877 #endif 2878 } 2879 } 2880 } 2881 2882 next_addr: 2883 /* 2884 * Sanity check: Make sure the length isn't 0, otherwise 2885 * we'll be stuck in this loop for a long time... 2886 */ 2887 if (SCTP_SIZE32(plen) == 0) { 2888 SCTP_PRINTF("process_initack_addrs: bad len (%d) type=%xh\n", 2889 plen, ptype); 2890 return; 2891 } 2892 /* get next parameter */ 2893 offset += SCTP_SIZE32(plen); 2894 if ((offset + sizeof(struct sctp_paramhdr)) > length) 2895 return; 2896 ph = (struct sctp_paramhdr *)sctp_m_getptr(m, offset, 2897 sizeof(struct sctp_paramhdr), (uint8_t *)&tmp_param); 2898 } /* while */ 2899 } 2900 2901 /* FIX ME: need to verify return result for v6 address type if v6 disabled */ 2902 /* 2903 * checks to see if a specific address is in the initack address list returns 2904 * 1 if found, 0 if not 2905 */ 2906 static uint32_t 2907 sctp_addr_in_initack(struct mbuf *m, uint32_t offset, uint32_t length, struct sockaddr *sa) 2908 { 2909 struct sctp_paramhdr tmp_param, *ph; 2910 uint16_t plen, ptype; 2911 #ifdef INET 2912 struct sockaddr_in *sin; 2913 struct sctp_ipv4addr_param *a4p; 2914 struct sctp_ipv6addr_param addr4_store; 2915 #endif 2916 #ifdef INET6 2917 struct sockaddr_in6 *sin6; 2918 struct sctp_ipv6addr_param *a6p; 2919 struct sctp_ipv6addr_param addr6_store; 2920 struct sockaddr_in6 sin6_tmp; 2921 #endif 2922 2923 switch (sa->sa_family) { 2924 #ifdef INET 2925 case AF_INET: 2926 break; 2927 #endif 2928 #ifdef INET6 2929 case AF_INET6: 2930 break; 2931 #endif 2932 default: 2933 return (0); 2934 } 2935 2936 SCTPDBG(SCTP_DEBUG_ASCONF2, "find_initack_addr: starting search for "); 2937 SCTPDBG_ADDR(SCTP_DEBUG_ASCONF2, sa); 2938 /* convert to upper bound */ 2939 length += offset; 2940 2941 if ((offset + sizeof(struct sctp_paramhdr)) > length) { 2942 SCTPDBG(SCTP_DEBUG_ASCONF1, 2943 "find_initack_addr: invalid offset?\n"); 2944 return (0); 2945 } 2946 /* go through the addresses in the init-ack */ 2947 ph = (struct sctp_paramhdr *)sctp_m_getptr(m, offset, 2948 sizeof(struct sctp_paramhdr), (uint8_t *)&tmp_param); 2949 while (ph != NULL) { 2950 ptype = ntohs(ph->param_type); 2951 plen = ntohs(ph->param_length); 2952 switch (ptype) { 2953 #ifdef INET6 2954 case SCTP_IPV6_ADDRESS: 2955 if (sa->sa_family == AF_INET6) { 2956 /* get the entire IPv6 address param */ 2957 if (plen != sizeof(struct sctp_ipv6addr_param)) { 2958 break; 2959 } 2960 /* get the entire IPv6 address param */ 2961 a6p = (struct sctp_ipv6addr_param *) 2962 sctp_m_getptr(m, offset, 2963 sizeof(struct sctp_ipv6addr_param), 2964 (uint8_t *)&addr6_store); 2965 if (a6p == NULL) { 2966 return (0); 2967 } 2968 sin6 = (struct sockaddr_in6 *)sa; 2969 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr)) { 2970 /* create a copy and clear scope */ 2971 memcpy(&sin6_tmp, sin6, 2972 sizeof(struct sockaddr_in6)); 2973 sin6 = &sin6_tmp; 2974 in6_clearscope(&sin6->sin6_addr); 2975 } 2976 if (memcmp(&sin6->sin6_addr, a6p->addr, 2977 sizeof(struct in6_addr)) == 0) { 2978 /* found it */ 2979 return (1); 2980 } 2981 } 2982 break; 2983 #endif /* INET6 */ 2984 #ifdef INET 2985 case SCTP_IPV4_ADDRESS: 2986 if (sa->sa_family == AF_INET) { 2987 if (plen != sizeof(struct sctp_ipv4addr_param)) { 2988 break; 2989 } 2990 /* get the entire IPv4 address param */ 2991 a4p = (struct sctp_ipv4addr_param *) 2992 sctp_m_getptr(m, offset, 2993 sizeof(struct sctp_ipv4addr_param), 2994 (uint8_t *)&addr4_store); 2995 if (a4p == NULL) { 2996 return (0); 2997 } 2998 sin = (struct sockaddr_in *)sa; 2999 if (sin->sin_addr.s_addr == a4p->addr) { 3000 /* found it */ 3001 return (1); 3002 } 3003 } 3004 break; 3005 #endif 3006 default: 3007 break; 3008 } 3009 /* get next parameter */ 3010 offset += SCTP_SIZE32(plen); 3011 if (offset + sizeof(struct sctp_paramhdr) > length) { 3012 return (0); 3013 } 3014 ph = (struct sctp_paramhdr *) 3015 sctp_m_getptr(m, offset, sizeof(struct sctp_paramhdr), 3016 (uint8_t *)&tmp_param); 3017 } /* while */ 3018 /* not found! */ 3019 return (0); 3020 } 3021 3022 /* 3023 * makes sure that the current endpoint local addr list is consistent with 3024 * the new association (eg. subset bound, asconf allowed) adds addresses as 3025 * necessary 3026 */ 3027 static void 3028 sctp_check_address_list_ep(struct sctp_tcb *stcb, struct mbuf *m, int offset, 3029 int length, struct sockaddr *init_addr) 3030 { 3031 struct sctp_laddr *laddr; 3032 3033 /* go through the endpoint list */ 3034 LIST_FOREACH(laddr, &stcb->sctp_ep->sctp_addr_list, sctp_nxt_addr) { 3035 /* be paranoid and validate the laddr */ 3036 if (laddr->ifa == NULL) { 3037 SCTPDBG(SCTP_DEBUG_ASCONF1, 3038 "check_addr_list_ep: laddr->ifa is NULL"); 3039 continue; 3040 } 3041 /* do i have it implicitly? */ 3042 if (sctp_cmpaddr(&laddr->ifa->address.sa, init_addr)) { 3043 continue; 3044 } 3045 /* check to see if in the init-ack */ 3046 if (!sctp_addr_in_initack(m, offset, length, &laddr->ifa->address.sa)) { 3047 /* try to add it */ 3048 sctp_addr_mgmt_assoc(stcb->sctp_ep, stcb, laddr->ifa, 3049 SCTP_ADD_IP_ADDRESS, SCTP_ADDR_NOT_LOCKED); 3050 } 3051 } 3052 } 3053 3054 /* 3055 * makes sure that the current kernel address list is consistent with the new 3056 * association (with all addrs bound) adds addresses as necessary 3057 */ 3058 static void 3059 sctp_check_address_list_all(struct sctp_tcb *stcb, struct mbuf *m, int offset, 3060 int length, struct sockaddr *init_addr, 3061 uint16_t local_scope, uint16_t site_scope, 3062 uint16_t ipv4_scope, uint16_t loopback_scope) 3063 { 3064 struct sctp_vrf *vrf = NULL; 3065 struct sctp_ifn *sctp_ifn; 3066 struct sctp_ifa *sctp_ifa; 3067 uint32_t vrf_id; 3068 #ifdef INET 3069 struct sockaddr_in *sin; 3070 #endif 3071 #ifdef INET6 3072 struct sockaddr_in6 *sin6; 3073 #endif 3074 3075 if (stcb) { 3076 vrf_id = stcb->asoc.vrf_id; 3077 } else { 3078 return; 3079 } 3080 SCTP_IPI_ADDR_RLOCK(); 3081 vrf = sctp_find_vrf(vrf_id); 3082 if (vrf == NULL) { 3083 SCTP_IPI_ADDR_RUNLOCK(); 3084 return; 3085 } 3086 /* go through all our known interfaces */ 3087 LIST_FOREACH(sctp_ifn, &vrf->ifnlist, next_ifn) { 3088 if (loopback_scope == 0 && SCTP_IFN_IS_IFT_LOOP(sctp_ifn)) { 3089 /* skip loopback interface */ 3090 continue; 3091 } 3092 /* go through each interface address */ 3093 LIST_FOREACH(sctp_ifa, &sctp_ifn->ifalist, next_ifa) { 3094 /* do i have it implicitly? */ 3095 if (sctp_cmpaddr(&sctp_ifa->address.sa, init_addr)) { 3096 continue; 3097 } 3098 switch (sctp_ifa->address.sa.sa_family) { 3099 #ifdef INET 3100 case AF_INET: 3101 sin = &sctp_ifa->address.sin; 3102 if (prison_check_ip4(stcb->sctp_ep->ip_inp.inp.inp_cred, 3103 &sin->sin_addr) != 0) { 3104 continue; 3105 } 3106 if (loopback_scope == 0 && 3107 (IN4_ISLOOPBACK_ADDRESS(&sin->sin_addr))) 3108 continue; 3109 if ((ipv4_scope == 0) && 3110 (IN4_ISPRIVATE_ADDRESS(&sin->sin_addr))) { 3111 /* private address not in scope */ 3112 continue; 3113 } 3114 break; 3115 #endif 3116 #ifdef INET6 3117 case AF_INET6: 3118 sin6 = &sctp_ifa->address.sin6; 3119 if (prison_check_ip6(stcb->sctp_ep->ip_inp.inp.inp_cred, 3120 &sin6->sin6_addr) != 0) { 3121 continue; 3122 } 3123 if (loopback_scope == 0 && 3124 (IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr))) { 3125 continue; 3126 } 3127 if ((local_scope == 0) && 3128 (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr))) { 3129 continue; 3130 } 3131 if ((site_scope == 0) && 3132 (IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr))) { 3133 continue; 3134 } 3135 break; 3136 #endif 3137 default: 3138 break; 3139 } 3140 /* check to see if in the init-ack */ 3141 if (!sctp_addr_in_initack(m, offset, length, &sctp_ifa->address.sa)) { 3142 /* try to add it */ 3143 sctp_addr_mgmt_assoc(stcb->sctp_ep, stcb, 3144 sctp_ifa, SCTP_ADD_IP_ADDRESS, 3145 SCTP_ADDR_LOCKED); 3146 } 3147 } /* end foreach ifa */ 3148 } /* end foreach ifn */ 3149 SCTP_IPI_ADDR_RUNLOCK(); 3150 } 3151 3152 /* 3153 * validates an init-ack chunk (from a cookie-echo) with current addresses 3154 * adds addresses from the init-ack into our local address list, if needed 3155 * queues asconf adds/deletes addresses as needed and makes appropriate list 3156 * changes for source address selection m, offset: points to the start of the 3157 * address list in an init-ack chunk length: total length of the address 3158 * params only init_addr: address where my INIT-ACK was sent from 3159 */ 3160 void 3161 sctp_check_address_list(struct sctp_tcb *stcb, struct mbuf *m, int offset, 3162 int length, struct sockaddr *init_addr, 3163 uint16_t local_scope, uint16_t site_scope, 3164 uint16_t ipv4_scope, uint16_t loopback_scope) 3165 { 3166 /* process the local addresses in the initack */ 3167 sctp_process_initack_addresses(stcb, m, offset, length); 3168 3169 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 3170 /* bound all case */ 3171 sctp_check_address_list_all(stcb, m, offset, length, init_addr, 3172 local_scope, site_scope, ipv4_scope, loopback_scope); 3173 } else { 3174 /* subset bound case */ 3175 if (sctp_is_feature_on(stcb->sctp_ep, 3176 SCTP_PCB_FLAGS_DO_ASCONF)) { 3177 /* asconf's allowed */ 3178 sctp_check_address_list_ep(stcb, m, offset, length, 3179 init_addr); 3180 } 3181 /* else, no asconfs allowed, so what we sent is what we get */ 3182 } 3183 } 3184 3185 /* 3186 * sctp_bindx() support 3187 */ 3188 uint32_t 3189 sctp_addr_mgmt_ep_sa(struct sctp_inpcb *inp, struct sockaddr *sa, 3190 uint32_t type, uint32_t vrf_id) 3191 { 3192 struct sctp_ifa *ifa; 3193 struct sctp_laddr *laddr, *nladdr; 3194 3195 if (sa->sa_len == 0) { 3196 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_ASCONF, EINVAL); 3197 return (EINVAL); 3198 } 3199 if (type == SCTP_ADD_IP_ADDRESS) { 3200 /* For an add the address MUST be on the system */ 3201 ifa = sctp_find_ifa_by_addr(sa, vrf_id, SCTP_ADDR_NOT_LOCKED); 3202 } else if (type == SCTP_DEL_IP_ADDRESS) { 3203 /* For a delete we need to find it in the inp */ 3204 ifa = sctp_find_ifa_in_ep(inp, sa, SCTP_ADDR_NOT_LOCKED); 3205 } else { 3206 ifa = NULL; 3207 } 3208 if (ifa != NULL) { 3209 if (type == SCTP_ADD_IP_ADDRESS) { 3210 sctp_add_local_addr_ep(inp, ifa, type); 3211 } else if (type == SCTP_DEL_IP_ADDRESS) { 3212 if (inp->laddr_count < 2) { 3213 /* can't delete the last local address */ 3214 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_ASCONF, EINVAL); 3215 return (EINVAL); 3216 } 3217 LIST_FOREACH(laddr, &inp->sctp_addr_list, 3218 sctp_nxt_addr) { 3219 if (ifa == laddr->ifa) { 3220 /* Mark in the delete */ 3221 laddr->action = type; 3222 } 3223 } 3224 } 3225 if (LIST_EMPTY(&inp->sctp_asoc_list)) { 3226 /* 3227 * There is no need to start the iterator if the inp 3228 * has no associations. 3229 */ 3230 if (type == SCTP_DEL_IP_ADDRESS) { 3231 LIST_FOREACH_SAFE(laddr, &inp->sctp_addr_list, sctp_nxt_addr, nladdr) { 3232 if (laddr->ifa == ifa) { 3233 sctp_del_local_addr_ep(inp, ifa); 3234 } 3235 } 3236 } 3237 } else { 3238 struct sctp_asconf_iterator *asc; 3239 struct sctp_laddr *wi; 3240 int ret; 3241 3242 SCTP_MALLOC(asc, struct sctp_asconf_iterator *, 3243 sizeof(struct sctp_asconf_iterator), 3244 SCTP_M_ASC_IT); 3245 if (asc == NULL) { 3246 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_ASCONF, ENOMEM); 3247 return (ENOMEM); 3248 } 3249 wi = SCTP_ZONE_GET(SCTP_BASE_INFO(ipi_zone_laddr), struct sctp_laddr); 3250 if (wi == NULL) { 3251 SCTP_FREE(asc, SCTP_M_ASC_IT); 3252 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_ASCONF, ENOMEM); 3253 return (ENOMEM); 3254 } 3255 LIST_INIT(&asc->list_of_work); 3256 asc->cnt = 1; 3257 SCTP_INCR_LADDR_COUNT(); 3258 wi->ifa = ifa; 3259 wi->action = type; 3260 atomic_add_int(&ifa->refcount, 1); 3261 LIST_INSERT_HEAD(&asc->list_of_work, wi, sctp_nxt_addr); 3262 ret = sctp_initiate_iterator(sctp_asconf_iterator_ep, 3263 sctp_asconf_iterator_stcb, 3264 sctp_asconf_iterator_ep_end, 3265 SCTP_PCB_ANY_FLAGS, 3266 SCTP_PCB_ANY_FEATURES, 3267 SCTP_ASOC_ANY_STATE, 3268 (void *)asc, 0, 3269 sctp_asconf_iterator_end, inp, 0); 3270 if (ret) { 3271 SCTP_PRINTF("Failed to initiate iterator for addr_mgmt_ep_sa\n"); 3272 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_ASCONF, EFAULT); 3273 sctp_asconf_iterator_end(asc, 0); 3274 return (EFAULT); 3275 } 3276 } 3277 return (0); 3278 } else { 3279 /* invalid address! */ 3280 SCTP_LTRACE_ERR_RET(NULL, NULL, NULL, SCTP_FROM_SCTP_ASCONF, EADDRNOTAVAIL); 3281 return (EADDRNOTAVAIL); 3282 } 3283 } 3284 3285 void 3286 sctp_asconf_send_nat_state_update(struct sctp_tcb *stcb, struct sctp_nets *net) 3287 { 3288 struct sctp_asconf_addr *aa_vtag, *aa_add, *aa_del; 3289 struct sctp_ifa *sctp_ifap; 3290 struct sctp_asconf_tag_param *vtag; 3291 #ifdef INET 3292 struct sockaddr_in *to; 3293 #endif 3294 #ifdef INET6 3295 struct sockaddr_in6 *to6; 3296 #endif 3297 3298 if (net == NULL) { 3299 SCTPDBG(SCTP_DEBUG_ASCONF1, "sctp_asconf_send_nat_state_update: Missing net\n"); 3300 return; 3301 } 3302 if (stcb == NULL) { 3303 SCTPDBG(SCTP_DEBUG_ASCONF1, "sctp_asconf_send_nat_state_update: Missing stcb\n"); 3304 return; 3305 } 3306 /* 3307 * Need to have in the ASCONF: - VTAG(my_vtag/peer_vtag) - 3308 * ADD(wildcard) - DEL(wildcard) - ADD(Any global addresses) 3309 */ 3310 SCTP_MALLOC(aa_vtag, struct sctp_asconf_addr *, sizeof(struct sctp_asconf_addr), SCTP_M_ASC_ADDR); 3311 SCTP_MALLOC(aa_add, struct sctp_asconf_addr *, sizeof(struct sctp_asconf_addr), SCTP_M_ASC_ADDR); 3312 SCTP_MALLOC(aa_del, struct sctp_asconf_addr *, sizeof(struct sctp_asconf_addr), SCTP_M_ASC_ADDR); 3313 3314 if ((aa_vtag == NULL) || (aa_add == NULL) || (aa_del == NULL)) { 3315 /* Didn't get memory */ 3316 SCTPDBG(SCTP_DEBUG_ASCONF1, "sctp_asconf_send_nat_state_update: failed to get memory!\n"); 3317 out: 3318 if (aa_vtag != NULL) { 3319 SCTP_FREE(aa_vtag, SCTP_M_ASC_ADDR); 3320 } 3321 if (aa_add != NULL) { 3322 SCTP_FREE(aa_add, SCTP_M_ASC_ADDR); 3323 } 3324 if (aa_del != NULL) { 3325 SCTP_FREE(aa_del, SCTP_M_ASC_ADDR); 3326 } 3327 return; 3328 } 3329 memset(aa_vtag, 0, sizeof(struct sctp_asconf_addr)); 3330 aa_vtag->special_del = 0; 3331 /* Fill in ASCONF address parameter fields. */ 3332 /* Top level elements are "networked" during send. */ 3333 aa_vtag->ifa = NULL; 3334 aa_vtag->sent = 0; /* clear sent flag */ 3335 vtag = (struct sctp_asconf_tag_param *)&aa_vtag->ap.aph; 3336 vtag->aph.ph.param_type = SCTP_NAT_VTAGS; 3337 vtag->aph.ph.param_length = sizeof(struct sctp_asconf_tag_param); 3338 vtag->local_vtag = htonl(stcb->asoc.my_vtag); 3339 vtag->remote_vtag = htonl(stcb->asoc.peer_vtag); 3340 3341 memset(aa_add, 0, sizeof(struct sctp_asconf_addr)); 3342 memset(aa_del, 0, sizeof(struct sctp_asconf_addr)); 3343 switch (net->ro._l_addr.sa.sa_family) { 3344 #ifdef INET 3345 case AF_INET: 3346 aa_add->ap.aph.ph.param_type = SCTP_ADD_IP_ADDRESS; 3347 aa_add->ap.aph.ph.param_length = sizeof(struct sctp_asconf_addrv4_param); 3348 aa_add->ap.addrp.ph.param_type = SCTP_IPV4_ADDRESS; 3349 aa_add->ap.addrp.ph.param_length = sizeof(struct sctp_ipv4addr_param); 3350 /* No need to fill the address, we are using 0.0.0.0 */ 3351 aa_del->ap.aph.ph.param_type = SCTP_DEL_IP_ADDRESS; 3352 aa_del->ap.aph.ph.param_length = sizeof(struct sctp_asconf_addrv4_param); 3353 aa_del->ap.addrp.ph.param_type = SCTP_IPV4_ADDRESS; 3354 aa_del->ap.addrp.ph.param_length = sizeof(struct sctp_ipv4addr_param); 3355 /* No need to fill the address, we are using 0.0.0.0 */ 3356 break; 3357 #endif 3358 #ifdef INET6 3359 case AF_INET6: 3360 aa_add->ap.aph.ph.param_type = SCTP_ADD_IP_ADDRESS; 3361 aa_add->ap.aph.ph.param_length = sizeof(struct sctp_asconf_addr_param); 3362 aa_add->ap.addrp.ph.param_type = SCTP_IPV6_ADDRESS; 3363 aa_add->ap.addrp.ph.param_length = sizeof(struct sctp_ipv6addr_param); 3364 /* No need to fill the address, we are using ::0 */ 3365 aa_del->ap.aph.ph.param_type = SCTP_DEL_IP_ADDRESS; 3366 aa_del->ap.aph.ph.param_length = sizeof(struct sctp_asconf_addr_param); 3367 aa_del->ap.addrp.ph.param_type = SCTP_IPV6_ADDRESS; 3368 aa_del->ap.addrp.ph.param_length = sizeof(struct sctp_ipv6addr_param); 3369 /* No need to fill the address, we are using ::0 */ 3370 break; 3371 #endif 3372 default: 3373 SCTPDBG(SCTP_DEBUG_ASCONF1, 3374 "sctp_asconf_send_nat_state_update: unknown address family %d\n", 3375 net->ro._l_addr.sa.sa_family); 3376 goto out; 3377 } 3378 TAILQ_INSERT_TAIL(&stcb->asoc.asconf_queue, aa_vtag, next); 3379 TAILQ_INSERT_TAIL(&stcb->asoc.asconf_queue, aa_add, next); 3380 TAILQ_INSERT_TAIL(&stcb->asoc.asconf_queue, aa_del, next); 3381 3382 /* Now we must hunt the addresses and add all global addresses */ 3383 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) { 3384 struct sctp_vrf *vrf = NULL; 3385 struct sctp_ifn *sctp_ifnp; 3386 uint32_t vrf_id; 3387 3388 vrf_id = stcb->sctp_ep->def_vrf_id; 3389 vrf = sctp_find_vrf(vrf_id); 3390 if (vrf == NULL) { 3391 goto skip_rest; 3392 } 3393 3394 SCTP_IPI_ADDR_RLOCK(); 3395 LIST_FOREACH(sctp_ifnp, &vrf->ifnlist, next_ifn) { 3396 LIST_FOREACH(sctp_ifap, &sctp_ifnp->ifalist, next_ifa) { 3397 switch (sctp_ifap->address.sa.sa_family) { 3398 #ifdef INET 3399 case AF_INET: 3400 to = &sctp_ifap->address.sin; 3401 if (prison_check_ip4(stcb->sctp_ep->ip_inp.inp.inp_cred, 3402 &to->sin_addr) != 0) { 3403 continue; 3404 } 3405 if (IN4_ISPRIVATE_ADDRESS(&to->sin_addr)) { 3406 continue; 3407 } 3408 if (IN4_ISLOOPBACK_ADDRESS(&to->sin_addr)) { 3409 continue; 3410 } 3411 break; 3412 #endif 3413 #ifdef INET6 3414 case AF_INET6: 3415 to6 = &sctp_ifap->address.sin6; 3416 if (prison_check_ip6(stcb->sctp_ep->ip_inp.inp.inp_cred, 3417 &to6->sin6_addr) != 0) { 3418 continue; 3419 } 3420 if (IN6_IS_ADDR_LOOPBACK(&to6->sin6_addr)) { 3421 continue; 3422 } 3423 if (IN6_IS_ADDR_LINKLOCAL(&to6->sin6_addr)) { 3424 continue; 3425 } 3426 break; 3427 #endif 3428 default: 3429 continue; 3430 } 3431 sctp_asconf_queue_mgmt(stcb, sctp_ifap, SCTP_ADD_IP_ADDRESS); 3432 } 3433 } 3434 SCTP_IPI_ADDR_RUNLOCK(); 3435 } else { 3436 struct sctp_laddr *laddr; 3437 3438 LIST_FOREACH(laddr, &stcb->sctp_ep->sctp_addr_list, sctp_nxt_addr) { 3439 if (laddr->ifa == NULL) { 3440 continue; 3441 } 3442 if (laddr->ifa->localifa_flags & SCTP_BEING_DELETED) 3443 /* 3444 * Address being deleted by the system, dont 3445 * list. 3446 */ 3447 continue; 3448 if (laddr->action == SCTP_DEL_IP_ADDRESS) { 3449 /* 3450 * Address being deleted on this ep don't 3451 * list. 3452 */ 3453 continue; 3454 } 3455 sctp_ifap = laddr->ifa; 3456 switch (sctp_ifap->address.sa.sa_family) { 3457 #ifdef INET 3458 case AF_INET: 3459 to = &sctp_ifap->address.sin; 3460 if (IN4_ISPRIVATE_ADDRESS(&to->sin_addr)) { 3461 continue; 3462 } 3463 if (IN4_ISLOOPBACK_ADDRESS(&to->sin_addr)) { 3464 continue; 3465 } 3466 break; 3467 #endif 3468 #ifdef INET6 3469 case AF_INET6: 3470 to6 = &sctp_ifap->address.sin6; 3471 if (IN6_IS_ADDR_LOOPBACK(&to6->sin6_addr)) { 3472 continue; 3473 } 3474 if (IN6_IS_ADDR_LINKLOCAL(&to6->sin6_addr)) { 3475 continue; 3476 } 3477 break; 3478 #endif 3479 default: 3480 continue; 3481 } 3482 sctp_asconf_queue_mgmt(stcb, sctp_ifap, SCTP_ADD_IP_ADDRESS); 3483 } 3484 } 3485 skip_rest: 3486 /* Now we must send the asconf into the queue */ 3487 sctp_send_asconf(stcb, net, SCTP_ADDR_NOT_LOCKED); 3488 } 3489