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