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