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