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