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