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