sctp_input.c revision 294215
1112158Sdas/*-
2112158Sdas * Copyright (c) 2001-2008, by Cisco Systems, Inc. All rights reserved.
3112158Sdas * Copyright (c) 2008-2012, by Randall Stewart. All rights reserved.
4112158Sdas * Copyright (c) 2008-2012, by Michael Tuexen. All rights reserved.
5112158Sdas *
6112158Sdas * Redistribution and use in source and binary forms, with or without
7112158Sdas * modification, are permitted provided that the following conditions are met:
8112158Sdas *
9112158Sdas * a) Redistributions of source code must retain the above copyright notice,
10112158Sdas *    this list of conditions and the following disclaimer.
11112158Sdas *
12112158Sdas * b) Redistributions in binary form must reproduce the above copyright
13112158Sdas *    notice, this list of conditions and the following disclaimer in
14112158Sdas *    the documentation and/or other materials provided with the distribution.
15112158Sdas *
16112158Sdas * c) Neither the name of Cisco Systems, Inc. nor the names of its
17112158Sdas *    contributors may be used to endorse or promote products derived
18112158Sdas *    from this software without specific prior written permission.
19112158Sdas *
20112158Sdas * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21112158Sdas * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
22112158Sdas * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23112158Sdas * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
24112158Sdas * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25112158Sdas * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26112158Sdas * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27112158Sdas * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28112158Sdas * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29165743Sdas * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
30165743Sdas * THE POSSIBILITY OF SUCH DAMAGE.
31112158Sdas */
32112158Sdas
33112158Sdas#include <sys/cdefs.h>
34112158Sdas__FBSDID("$FreeBSD: stable/10/sys/netinet/sctp_input.c 294215 2016-01-17 12:15:41Z tuexen $");
35112158Sdas
36112158Sdas#include <netinet/sctp_os.h>
37112158Sdas#include <netinet/sctp_var.h>
38112158Sdas#include <netinet/sctp_sysctl.h>
39112158Sdas#include <netinet/sctp_pcb.h>
40112158Sdas#include <netinet/sctp_header.h>
41112158Sdas#include <netinet/sctputil.h>
42112158Sdas#include <netinet/sctp_output.h>
43112158Sdas#include <netinet/sctp_input.h>
44112158Sdas#include <netinet/sctp_auth.h>
45112158Sdas#include <netinet/sctp_indata.h>
46112158Sdas#include <netinet/sctp_asconf.h>
47112158Sdas#include <netinet/sctp_bsd_addr.h>
48112158Sdas#include <netinet/sctp_timer.h>
49112158Sdas#include <netinet/sctp_crc32.h>
50112158Sdas#if defined(INET) || defined(INET6)
51112158Sdas#include <netinet/udp.h>
52112158Sdas#endif
53112158Sdas#include <sys/smp.h>
54112158Sdas
55112158Sdas
56112158Sdas
57112158Sdasstatic void
58112158Sdassctp_stop_all_cookie_timers(struct sctp_tcb *stcb)
59112158Sdas{
60112158Sdas	struct sctp_nets *net;
61112158Sdas
62112158Sdas	/*
63112158Sdas	 * This now not only stops all cookie timers it also stops any INIT
64112158Sdas	 * timers as well. This will make sure that the timers are stopped
65112158Sdas	 * in all collision cases.
66112158Sdas	 */
67112158Sdas	SCTP_TCB_LOCK_ASSERT(stcb);
68112158Sdas	TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
69112158Sdas		if (net->rxt_timer.type == SCTP_TIMER_TYPE_COOKIE) {
70112158Sdas			sctp_timer_stop(SCTP_TIMER_TYPE_COOKIE,
71112158Sdas			    stcb->sctp_ep,
72112158Sdas			    stcb,
73112158Sdas			    net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_1);
74219557Sdas		} else if (net->rxt_timer.type == SCTP_TIMER_TYPE_INIT) {
75219557Sdas			sctp_timer_stop(SCTP_TIMER_TYPE_INIT,
76219557Sdas			    stcb->sctp_ep,
77219557Sdas			    stcb,
78219557Sdas			    net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_2);
79174678Sdas		}
80219557Sdas	}
81112158Sdas}
82112158Sdas
83112158Sdas/* INIT handler */
84112158Sdasstatic void
85112158Sdassctp_handle_init(struct mbuf *m, int iphlen, int offset,
86112158Sdas    struct sockaddr *src, struct sockaddr *dst, struct sctphdr *sh,
87112158Sdas    struct sctp_init_chunk *cp, struct sctp_inpcb *inp,
88112158Sdas    struct sctp_tcb *stcb, int *abort_no_unlock,
89112158Sdas    uint8_t mflowtype, uint32_t mflowid,
90112158Sdas    uint32_t vrf_id, uint16_t port)
91112158Sdas{
92112158Sdas	struct sctp_init *init;
93112158Sdas	struct mbuf *op_err;
94112158Sdas
95219557Sdas	SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_init: handling INIT tcb:%p\n",
96219557Sdas	    (void *)stcb);
97219557Sdas	if (stcb == NULL) {
98219557Sdas		SCTP_INP_RLOCK(inp);
99219557Sdas	}
100112158Sdas	/* validate length */
101112158Sdas	if (ntohs(cp->ch.chunk_length) < sizeof(struct sctp_init_chunk)) {
102112158Sdas		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
103112158Sdas		sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err,
104112158Sdas		    mflowtype, mflowid,
105112158Sdas		    vrf_id, port);
106219557Sdas		if (stcb)
107219557Sdas			*abort_no_unlock = 1;
108219557Sdas		goto outnow;
109219557Sdas	}
110219557Sdas	/* validate parameters */
111219557Sdas	init = &cp->init;
112219557Sdas	if (init->initiate_tag == 0) {
113174678Sdas		/* protocol error... send abort */
114219557Sdas		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
115112158Sdas		sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err,
116112158Sdas		    mflowtype, mflowid,
117112158Sdas		    vrf_id, port);
118112158Sdas		if (stcb)
119112158Sdas			*abort_no_unlock = 1;
120112158Sdas		goto outnow;
121112158Sdas	}
122112158Sdas	if (ntohl(init->a_rwnd) < SCTP_MIN_RWND) {
123219557Sdas		/* invalid parameter... send abort */
124112158Sdas		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
125219557Sdas		sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err,
126219557Sdas		    mflowtype, mflowid,
127219557Sdas		    vrf_id, port);
128112158Sdas		if (stcb)
129112158Sdas			*abort_no_unlock = 1;
130112158Sdas		goto outnow;
131112158Sdas	}
132112158Sdas	if (init->num_inbound_streams == 0) {
133112158Sdas		/* protocol error... send abort */
134112158Sdas		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
135112158Sdas		sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err,
136112158Sdas		    mflowtype, mflowid,
137112158Sdas		    vrf_id, port);
138112158Sdas		if (stcb)
139112158Sdas			*abort_no_unlock = 1;
140112158Sdas		goto outnow;
141112158Sdas	}
142112158Sdas	if (init->num_outbound_streams == 0) {
143112158Sdas		/* protocol error... send abort */
144112158Sdas		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
145112158Sdas		sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err,
146112158Sdas		    mflowtype, mflowid,
147112158Sdas		    vrf_id, port);
148112158Sdas		if (stcb)
149112158Sdas			*abort_no_unlock = 1;
150112158Sdas		goto outnow;
151	}
152	if (sctp_validate_init_auth_params(m, offset + sizeof(*cp),
153	    offset + ntohs(cp->ch.chunk_length))) {
154		/* auth parameter(s) error... send abort */
155		op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
156		    "Problem with AUTH parameters");
157		sctp_abort_association(inp, stcb, m, iphlen, src, dst, sh, op_err,
158		    mflowtype, mflowid,
159		    vrf_id, port);
160		if (stcb)
161			*abort_no_unlock = 1;
162		goto outnow;
163	}
164	/*
165	 * We are only accepting if we have a socket with positive
166	 * so_qlimit.
167	 */
168	if ((stcb == NULL) &&
169	    ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) ||
170	    (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE) ||
171	    (inp->sctp_socket == NULL) ||
172	    (inp->sctp_socket->so_qlimit == 0))) {
173		/*
174		 * FIX ME ?? What about TCP model and we have a
175		 * match/restart case? Actually no fix is needed. the lookup
176		 * will always find the existing assoc so stcb would not be
177		 * NULL. It may be questionable to do this since we COULD
178		 * just send back the INIT-ACK and hope that the app did
179		 * accept()'s by the time the COOKIE was sent. But there is
180		 * a price to pay for COOKIE generation and I don't want to
181		 * pay it on the chance that the app will actually do some
182		 * accepts(). The App just looses and should NOT be in this
183		 * state :-)
184		 */
185		if (SCTP_BASE_SYSCTL(sctp_blackhole) == 0) {
186			op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
187			    "No listener");
188			sctp_send_abort(m, iphlen, src, dst, sh, 0, op_err,
189			    mflowtype, mflowid, inp->fibnum,
190			    vrf_id, port);
191		}
192		goto outnow;
193	}
194	if ((stcb != NULL) &&
195	    (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_ACK_SENT)) {
196		SCTPDBG(SCTP_DEBUG_INPUT3, "sctp_handle_init: sending SHUTDOWN-ACK\n");
197		sctp_send_shutdown_ack(stcb, NULL);
198		sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_CONTROL_PROC, SCTP_SO_NOT_LOCKED);
199	} else {
200		SCTPDBG(SCTP_DEBUG_INPUT3, "sctp_handle_init: sending INIT-ACK\n");
201		sctp_send_initiate_ack(inp, stcb, m, iphlen, offset, src, dst,
202		    sh, cp,
203		    mflowtype, mflowid,
204		    vrf_id, port,
205		    ((stcb == NULL) ? SCTP_HOLDS_LOCK : SCTP_NOT_LOCKED));
206	}
207outnow:
208	if (stcb == NULL) {
209		SCTP_INP_RUNLOCK(inp);
210	}
211}
212
213/*
214 * process peer "INIT/INIT-ACK" chunk returns value < 0 on error
215 */
216
217int
218sctp_is_there_unsent_data(struct sctp_tcb *stcb, int so_locked
219#if !defined(__APPLE__) && !defined(SCTP_SO_LOCK_TESTING)
220    SCTP_UNUSED
221#endif
222)
223{
224	int unsent_data = 0;
225	unsigned int i;
226	struct sctp_stream_queue_pending *sp;
227	struct sctp_association *asoc;
228
229	/*
230	 * This function returns the number of streams that have true unsent
231	 * data on them. Note that as it looks through it will clean up any
232	 * places that have old data that has been sent but left at top of
233	 * stream queue.
234	 */
235	asoc = &stcb->asoc;
236	SCTP_TCB_SEND_LOCK(stcb);
237	if (!stcb->asoc.ss_functions.sctp_ss_is_empty(stcb, asoc)) {
238		/* Check to see if some data queued */
239		for (i = 0; i < stcb->asoc.streamoutcnt; i++) {
240			/* sa_ignore FREED_MEMORY */
241			sp = TAILQ_FIRST(&stcb->asoc.strmout[i].outqueue);
242			if (sp == NULL) {
243				continue;
244			}
245			if ((sp->msg_is_complete) &&
246			    (sp->length == 0) &&
247			    (sp->sender_all_done)) {
248				/*
249				 * We are doing differed cleanup. Last time
250				 * through when we took all the data the
251				 * sender_all_done was not set.
252				 */
253				if (sp->put_last_out == 0) {
254					SCTP_PRINTF("Gak, put out entire msg with NO end!-1\n");
255					SCTP_PRINTF("sender_done:%d len:%d msg_comp:%d put_last_out:%d\n",
256					    sp->sender_all_done,
257					    sp->length,
258					    sp->msg_is_complete,
259					    sp->put_last_out);
260				}
261				atomic_subtract_int(&stcb->asoc.stream_queue_cnt, 1);
262				TAILQ_REMOVE(&stcb->asoc.strmout[i].outqueue, sp, next);
263				if (sp->net) {
264					sctp_free_remote_addr(sp->net);
265					sp->net = NULL;
266				}
267				if (sp->data) {
268					sctp_m_freem(sp->data);
269					sp->data = NULL;
270				}
271				sctp_free_a_strmoq(stcb, sp, so_locked);
272			} else {
273				unsent_data++;
274				break;
275			}
276		}
277	}
278	SCTP_TCB_SEND_UNLOCK(stcb);
279	return (unsent_data);
280}
281
282static int
283sctp_process_init(struct sctp_init_chunk *cp, struct sctp_tcb *stcb)
284{
285	struct sctp_init *init;
286	struct sctp_association *asoc;
287	struct sctp_nets *lnet;
288	unsigned int i;
289
290	init = &cp->init;
291	asoc = &stcb->asoc;
292	/* save off parameters */
293	asoc->peer_vtag = ntohl(init->initiate_tag);
294	asoc->peers_rwnd = ntohl(init->a_rwnd);
295	/* init tsn's */
296	asoc->highest_tsn_inside_map = asoc->asconf_seq_in = ntohl(init->initial_tsn) - 1;
297
298	if (!TAILQ_EMPTY(&asoc->nets)) {
299		/* update any ssthresh's that may have a default */
300		TAILQ_FOREACH(lnet, &asoc->nets, sctp_next) {
301			lnet->ssthresh = asoc->peers_rwnd;
302			if (SCTP_BASE_SYSCTL(sctp_logging_level) & (SCTP_CWND_MONITOR_ENABLE | SCTP_CWND_LOGGING_ENABLE)) {
303				sctp_log_cwnd(stcb, lnet, 0, SCTP_CWND_INITIALIZATION);
304			}
305		}
306	}
307	SCTP_TCB_SEND_LOCK(stcb);
308	if (asoc->pre_open_streams > ntohs(init->num_inbound_streams)) {
309		unsigned int newcnt;
310		struct sctp_stream_out *outs;
311		struct sctp_stream_queue_pending *sp, *nsp;
312		struct sctp_tmit_chunk *chk, *nchk;
313
314		/* abandon the upper streams */
315		newcnt = ntohs(init->num_inbound_streams);
316		TAILQ_FOREACH_SAFE(chk, &asoc->send_queue, sctp_next, nchk) {
317			if (chk->rec.data.stream_number >= newcnt) {
318				TAILQ_REMOVE(&asoc->send_queue, chk, sctp_next);
319				asoc->send_queue_cnt--;
320				if (asoc->strmout[chk->rec.data.stream_number].chunks_on_queues > 0) {
321					asoc->strmout[chk->rec.data.stream_number].chunks_on_queues--;
322#ifdef INVARIANTS
323				} else {
324					panic("No chunks on the queues for sid %u.", chk->rec.data.stream_number);
325#endif
326				}
327				if (chk->data != NULL) {
328					sctp_free_bufspace(stcb, asoc, chk, 1);
329					sctp_ulp_notify(SCTP_NOTIFY_UNSENT_DG_FAIL, stcb,
330					    0, chk, SCTP_SO_NOT_LOCKED);
331					if (chk->data) {
332						sctp_m_freem(chk->data);
333						chk->data = NULL;
334					}
335				}
336				sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED);
337				/* sa_ignore FREED_MEMORY */
338			}
339		}
340		if (asoc->strmout) {
341			for (i = newcnt; i < asoc->pre_open_streams; i++) {
342				outs = &asoc->strmout[i];
343				TAILQ_FOREACH_SAFE(sp, &outs->outqueue, next, nsp) {
344					TAILQ_REMOVE(&outs->outqueue, sp, next);
345					asoc->stream_queue_cnt--;
346					sctp_ulp_notify(SCTP_NOTIFY_SPECIAL_SP_FAIL,
347					    stcb, 0, sp, SCTP_SO_NOT_LOCKED);
348					if (sp->data) {
349						sctp_m_freem(sp->data);
350						sp->data = NULL;
351					}
352					if (sp->net) {
353						sctp_free_remote_addr(sp->net);
354						sp->net = NULL;
355					}
356					/* Free the chunk */
357					sctp_free_a_strmoq(stcb, sp, SCTP_SO_NOT_LOCKED);
358					/* sa_ignore FREED_MEMORY */
359				}
360				outs->state = SCTP_STREAM_CLOSED;
361			}
362		}
363		/* cut back the count */
364		asoc->pre_open_streams = newcnt;
365	}
366	SCTP_TCB_SEND_UNLOCK(stcb);
367	asoc->streamoutcnt = asoc->pre_open_streams;
368	for (i = 0; i < asoc->streamoutcnt; i++) {
369		asoc->strmout[i].state = SCTP_STREAM_OPEN;
370	}
371	/* EY - nr_sack: initialize highest tsn in nr_mapping_array */
372	asoc->highest_tsn_inside_nr_map = asoc->highest_tsn_inside_map;
373	if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MAP_LOGGING_ENABLE) {
374		sctp_log_map(0, 5, asoc->highest_tsn_inside_map, SCTP_MAP_SLIDE_RESULT);
375	}
376	/* This is the next one we expect */
377	asoc->str_reset_seq_in = asoc->asconf_seq_in + 1;
378
379	asoc->mapping_array_base_tsn = ntohl(init->initial_tsn);
380	asoc->tsn_last_delivered = asoc->cumulative_tsn = asoc->asconf_seq_in;
381
382	asoc->advanced_peer_ack_point = asoc->last_acked_seq;
383	/* open the requested streams */
384
385	if (asoc->strmin != NULL) {
386		/* Free the old ones */
387		struct sctp_queued_to_read *ctl, *nctl;
388
389		for (i = 0; i < asoc->streamincnt; i++) {
390			TAILQ_FOREACH_SAFE(ctl, &asoc->strmin[i].inqueue, next, nctl) {
391				TAILQ_REMOVE(&asoc->strmin[i].inqueue, ctl, next);
392				sctp_free_remote_addr(ctl->whoFrom);
393				ctl->whoFrom = NULL;
394				sctp_m_freem(ctl->data);
395				ctl->data = NULL;
396				sctp_free_a_readq(stcb, ctl);
397			}
398		}
399		SCTP_FREE(asoc->strmin, SCTP_M_STRMI);
400	}
401	if (asoc->max_inbound_streams > ntohs(init->num_outbound_streams)) {
402		asoc->streamincnt = ntohs(init->num_outbound_streams);
403	} else {
404		asoc->streamincnt = asoc->max_inbound_streams;
405	}
406	SCTP_MALLOC(asoc->strmin, struct sctp_stream_in *, asoc->streamincnt *
407	    sizeof(struct sctp_stream_in), SCTP_M_STRMI);
408	if (asoc->strmin == NULL) {
409		/* we didn't get memory for the streams! */
410		SCTPDBG(SCTP_DEBUG_INPUT2, "process_init: couldn't get memory for the streams!\n");
411		return (-1);
412	}
413	for (i = 0; i < asoc->streamincnt; i++) {
414		asoc->strmin[i].stream_no = i;
415		asoc->strmin[i].last_sequence_delivered = 0xffff;
416		TAILQ_INIT(&asoc->strmin[i].inqueue);
417		asoc->strmin[i].delivery_started = 0;
418	}
419	/*
420	 * load_address_from_init will put the addresses into the
421	 * association when the COOKIE is processed or the INIT-ACK is
422	 * processed. Both types of COOKIE's existing and new call this
423	 * routine. It will remove addresses that are no longer in the
424	 * association (for the restarting case where addresses are
425	 * removed). Up front when the INIT arrives we will discard it if it
426	 * is a restart and new addresses have been added.
427	 */
428	/* sa_ignore MEMLEAK */
429	return (0);
430}
431
432/*
433 * INIT-ACK message processing/consumption returns value < 0 on error
434 */
435static int
436sctp_process_init_ack(struct mbuf *m, int iphlen, int offset,
437    struct sockaddr *src, struct sockaddr *dst, struct sctphdr *sh,
438    struct sctp_init_ack_chunk *cp, struct sctp_tcb *stcb,
439    struct sctp_nets *net, int *abort_no_unlock,
440    uint8_t mflowtype, uint32_t mflowid,
441    uint32_t vrf_id)
442{
443	struct sctp_association *asoc;
444	struct mbuf *op_err;
445	int retval, abort_flag;
446	uint32_t initack_limit;
447	int nat_friendly = 0;
448
449	/* First verify that we have no illegal param's */
450	abort_flag = 0;
451
452	op_err = sctp_arethere_unrecognized_parameters(m,
453	    (offset + sizeof(struct sctp_init_chunk)),
454	    &abort_flag, (struct sctp_chunkhdr *)cp, &nat_friendly);
455	if (abort_flag) {
456		/* Send an abort and notify peer */
457		sctp_abort_an_association(stcb->sctp_ep, stcb, op_err, SCTP_SO_NOT_LOCKED);
458		*abort_no_unlock = 1;
459		return (-1);
460	}
461	asoc = &stcb->asoc;
462	asoc->peer_supports_nat = (uint8_t) nat_friendly;
463	/* process the peer's parameters in the INIT-ACK */
464	retval = sctp_process_init((struct sctp_init_chunk *)cp, stcb);
465	if (retval < 0) {
466		return (retval);
467	}
468	initack_limit = offset + ntohs(cp->ch.chunk_length);
469	/* load all addresses */
470	if ((retval = sctp_load_addresses_from_init(stcb, m,
471	    (offset + sizeof(struct sctp_init_chunk)), initack_limit,
472	    src, dst, NULL))) {
473		op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
474		    "Problem with address parameters");
475		SCTPDBG(SCTP_DEBUG_INPUT1,
476		    "Load addresses from INIT causes an abort %d\n",
477		    retval);
478		sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
479		    src, dst, sh, op_err,
480		    mflowtype, mflowid,
481		    vrf_id, net->port);
482		*abort_no_unlock = 1;
483		return (-1);
484	}
485	/* if the peer doesn't support asconf, flush the asconf queue */
486	if (asoc->asconf_supported == 0) {
487		struct sctp_asconf_addr *param, *nparam;
488
489		TAILQ_FOREACH_SAFE(param, &asoc->asconf_queue, next, nparam) {
490			TAILQ_REMOVE(&asoc->asconf_queue, param, next);
491			SCTP_FREE(param, SCTP_M_ASC_ADDR);
492		}
493	}
494	stcb->asoc.peer_hmac_id = sctp_negotiate_hmacid(stcb->asoc.peer_hmacs,
495	    stcb->asoc.local_hmacs);
496	if (op_err) {
497		sctp_queue_op_err(stcb, op_err);
498		/* queuing will steal away the mbuf chain to the out queue */
499		op_err = NULL;
500	}
501	/* extract the cookie and queue it to "echo" it back... */
502	if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
503		sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
504		    stcb->asoc.overall_error_count,
505		    0,
506		    SCTP_FROM_SCTP_INPUT,
507		    __LINE__);
508	}
509	stcb->asoc.overall_error_count = 0;
510	net->error_count = 0;
511
512	/*
513	 * Cancel the INIT timer, We do this first before queueing the
514	 * cookie. We always cancel at the primary to assue that we are
515	 * canceling the timer started by the INIT which always goes to the
516	 * primary.
517	 */
518	sctp_timer_stop(SCTP_TIMER_TYPE_INIT, stcb->sctp_ep, stcb,
519	    asoc->primary_destination, SCTP_FROM_SCTP_INPUT + SCTP_LOC_3);
520
521	/* calculate the RTO */
522	net->RTO = sctp_calculate_rto(stcb, asoc, net, &asoc->time_entered, sctp_align_safe_nocopy,
523	    SCTP_RTT_FROM_NON_DATA);
524	retval = sctp_send_cookie_echo(m, offset, stcb, net);
525	if (retval < 0) {
526		/*
527		 * No cookie, we probably should send a op error. But in any
528		 * case if there is no cookie in the INIT-ACK, we can
529		 * abandon the peer, its broke.
530		 */
531		if (retval == -3) {
532			uint16_t len;
533
534			len = (uint16_t) (sizeof(struct sctp_error_missing_param) + sizeof(uint16_t));
535			/* We abort with an error of missing mandatory param */
536			op_err = sctp_get_mbuf_for_msg(len, 0, M_NOWAIT, 1, MT_DATA);
537			if (op_err != NULL) {
538				struct sctp_error_missing_param *cause;
539
540				SCTP_BUF_LEN(op_err) = len;
541				cause = mtod(op_err, struct sctp_error_missing_param *);
542				/* Subtract the reserved param */
543				cause->cause.code = htons(SCTP_CAUSE_MISSING_PARAM);
544				cause->cause.length = htons(len);
545				cause->num_missing_params = htonl(1);
546				cause->type[0] = htons(SCTP_STATE_COOKIE);
547			}
548			sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
549			    src, dst, sh, op_err,
550			    mflowtype, mflowid,
551			    vrf_id, net->port);
552			*abort_no_unlock = 1;
553		}
554		return (retval);
555	}
556	return (0);
557}
558
559static void
560sctp_handle_heartbeat_ack(struct sctp_heartbeat_chunk *cp,
561    struct sctp_tcb *stcb, struct sctp_nets *net)
562{
563	union sctp_sockstore store;
564	struct sctp_nets *r_net, *f_net;
565	struct timeval tv;
566	int req_prim = 0;
567	uint16_t old_error_counter;
568
569	if (ntohs(cp->ch.chunk_length) != sizeof(struct sctp_heartbeat_chunk)) {
570		/* Invalid length */
571		return;
572	}
573	memset(&store, 0, sizeof(store));
574	switch (cp->heartbeat.hb_info.addr_family) {
575#ifdef INET
576	case AF_INET:
577		if (cp->heartbeat.hb_info.addr_len == sizeof(struct sockaddr_in)) {
578			store.sin.sin_family = cp->heartbeat.hb_info.addr_family;
579			store.sin.sin_len = cp->heartbeat.hb_info.addr_len;
580			store.sin.sin_port = stcb->rport;
581			memcpy(&store.sin.sin_addr, cp->heartbeat.hb_info.address,
582			    sizeof(store.sin.sin_addr));
583		} else {
584			return;
585		}
586		break;
587#endif
588#ifdef INET6
589	case AF_INET6:
590		if (cp->heartbeat.hb_info.addr_len == sizeof(struct sockaddr_in6)) {
591			store.sin6.sin6_family = cp->heartbeat.hb_info.addr_family;
592			store.sin6.sin6_len = cp->heartbeat.hb_info.addr_len;
593			store.sin6.sin6_port = stcb->rport;
594			memcpy(&store.sin6.sin6_addr, cp->heartbeat.hb_info.address, sizeof(struct in6_addr));
595		} else {
596			return;
597		}
598		break;
599#endif
600	default:
601		return;
602	}
603	r_net = sctp_findnet(stcb, &store.sa);
604	if (r_net == NULL) {
605		SCTPDBG(SCTP_DEBUG_INPUT1, "Huh? I can't find the address I sent it to, discard\n");
606		return;
607	}
608	if ((r_net && (r_net->dest_state & SCTP_ADDR_UNCONFIRMED)) &&
609	    (r_net->heartbeat_random1 == cp->heartbeat.hb_info.random_value1) &&
610	    (r_net->heartbeat_random2 == cp->heartbeat.hb_info.random_value2)) {
611		/*
612		 * If the its a HB and it's random value is correct when can
613		 * confirm the destination.
614		 */
615		r_net->dest_state &= ~SCTP_ADDR_UNCONFIRMED;
616		if (r_net->dest_state & SCTP_ADDR_REQ_PRIMARY) {
617			stcb->asoc.primary_destination = r_net;
618			r_net->dest_state &= ~SCTP_ADDR_REQ_PRIMARY;
619			f_net = TAILQ_FIRST(&stcb->asoc.nets);
620			if (f_net != r_net) {
621				/*
622				 * first one on the list is NOT the primary
623				 * sctp_cmpaddr() is much more efficent if
624				 * the primary is the first on the list,
625				 * make it so.
626				 */
627				TAILQ_REMOVE(&stcb->asoc.nets, r_net, sctp_next);
628				TAILQ_INSERT_HEAD(&stcb->asoc.nets, r_net, sctp_next);
629			}
630			req_prim = 1;
631		}
632		sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED,
633		    stcb, 0, (void *)r_net, SCTP_SO_NOT_LOCKED);
634		sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb,
635		    r_net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_4);
636		sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, r_net);
637	}
638	old_error_counter = r_net->error_count;
639	r_net->error_count = 0;
640	r_net->hb_responded = 1;
641	tv.tv_sec = cp->heartbeat.hb_info.time_value_1;
642	tv.tv_usec = cp->heartbeat.hb_info.time_value_2;
643	/* Now lets do a RTO with this */
644	r_net->RTO = sctp_calculate_rto(stcb, &stcb->asoc, r_net, &tv, sctp_align_safe_nocopy,
645	    SCTP_RTT_FROM_NON_DATA);
646	if (!(r_net->dest_state & SCTP_ADDR_REACHABLE)) {
647		r_net->dest_state |= SCTP_ADDR_REACHABLE;
648		sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_UP, stcb,
649		    0, (void *)r_net, SCTP_SO_NOT_LOCKED);
650	}
651	if (r_net->dest_state & SCTP_ADDR_PF) {
652		r_net->dest_state &= ~SCTP_ADDR_PF;
653		stcb->asoc.cc_functions.sctp_cwnd_update_exit_pf(stcb, net);
654	}
655	if (old_error_counter > 0) {
656		sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep,
657		    stcb, r_net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_5);
658		sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, r_net);
659	}
660	if (r_net == stcb->asoc.primary_destination) {
661		if (stcb->asoc.alternate) {
662			/* release the alternate, primary is good */
663			sctp_free_remote_addr(stcb->asoc.alternate);
664			stcb->asoc.alternate = NULL;
665		}
666	}
667	/* Mobility adaptation */
668	if (req_prim) {
669		if ((sctp_is_mobility_feature_on(stcb->sctp_ep,
670		    SCTP_MOBILITY_BASE) ||
671		    sctp_is_mobility_feature_on(stcb->sctp_ep,
672		    SCTP_MOBILITY_FASTHANDOFF)) &&
673		    sctp_is_mobility_feature_on(stcb->sctp_ep,
674		    SCTP_MOBILITY_PRIM_DELETED)) {
675
676			sctp_timer_stop(SCTP_TIMER_TYPE_PRIM_DELETED,
677			    stcb->sctp_ep, stcb, NULL,
678			    SCTP_FROM_SCTP_INPUT + SCTP_LOC_6);
679			if (sctp_is_mobility_feature_on(stcb->sctp_ep,
680			    SCTP_MOBILITY_FASTHANDOFF)) {
681				sctp_assoc_immediate_retrans(stcb,
682				    stcb->asoc.primary_destination);
683			}
684			if (sctp_is_mobility_feature_on(stcb->sctp_ep,
685			    SCTP_MOBILITY_BASE)) {
686				sctp_move_chunks_from_net(stcb,
687				    stcb->asoc.deleted_primary);
688			}
689			sctp_delete_prim_timer(stcb->sctp_ep, stcb,
690			    stcb->asoc.deleted_primary);
691		}
692	}
693}
694
695static int
696sctp_handle_nat_colliding_state(struct sctp_tcb *stcb)
697{
698	/*
699	 * return 0 means we want you to proceed with the abort non-zero
700	 * means no abort processing
701	 */
702	struct sctpasochead *head;
703
704	if (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_COOKIE_WAIT) {
705		/* generate a new vtag and send init */
706		LIST_REMOVE(stcb, sctp_asocs);
707		stcb->asoc.my_vtag = sctp_select_a_tag(stcb->sctp_ep, stcb->sctp_ep->sctp_lport, stcb->rport, 1);
708		head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(stcb->asoc.my_vtag, SCTP_BASE_INFO(hashasocmark))];
709		/*
710		 * put it in the bucket in the vtag hash of assoc's for the
711		 * system
712		 */
713		LIST_INSERT_HEAD(head, stcb, sctp_asocs);
714		sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED);
715		return (1);
716	}
717	if (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_COOKIE_ECHOED) {
718		/*
719		 * treat like a case where the cookie expired i.e.: - dump
720		 * current cookie. - generate a new vtag. - resend init.
721		 */
722		/* generate a new vtag and send init */
723		LIST_REMOVE(stcb, sctp_asocs);
724		stcb->asoc.state &= ~SCTP_STATE_COOKIE_ECHOED;
725		stcb->asoc.state |= SCTP_STATE_COOKIE_WAIT;
726		sctp_stop_all_cookie_timers(stcb);
727		sctp_toss_old_cookies(stcb, &stcb->asoc);
728		stcb->asoc.my_vtag = sctp_select_a_tag(stcb->sctp_ep, stcb->sctp_ep->sctp_lport, stcb->rport, 1);
729		head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(stcb->asoc.my_vtag, SCTP_BASE_INFO(hashasocmark))];
730		/*
731		 * put it in the bucket in the vtag hash of assoc's for the
732		 * system
733		 */
734		LIST_INSERT_HEAD(head, stcb, sctp_asocs);
735		sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED);
736		return (1);
737	}
738	return (0);
739}
740
741static int
742sctp_handle_nat_missing_state(struct sctp_tcb *stcb,
743    struct sctp_nets *net)
744{
745	/*
746	 * return 0 means we want you to proceed with the abort non-zero
747	 * means no abort processing
748	 */
749	if (stcb->asoc.auth_supported == 0) {
750		SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_nat_missing_state: Peer does not support AUTH, cannot send an asconf\n");
751		return (0);
752	}
753	sctp_asconf_send_nat_state_update(stcb, net);
754	return (1);
755}
756
757
758static void
759sctp_handle_abort(struct sctp_abort_chunk *abort,
760    struct sctp_tcb *stcb, struct sctp_nets *net)
761{
762#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
763	struct socket *so;
764
765#endif
766	uint16_t len;
767	uint16_t error;
768
769	SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_abort: handling ABORT\n");
770	if (stcb == NULL)
771		return;
772
773	len = ntohs(abort->ch.chunk_length);
774	if (len > sizeof(struct sctp_chunkhdr)) {
775		/*
776		 * Need to check the cause codes for our two magic nat
777		 * aborts which don't kill the assoc necessarily.
778		 */
779		struct sctp_gen_error_cause *cause;
780
781		cause = (struct sctp_gen_error_cause *)(abort + 1);
782		error = ntohs(cause->code);
783		if (error == SCTP_CAUSE_NAT_COLLIDING_STATE) {
784			SCTPDBG(SCTP_DEBUG_INPUT2, "Received Colliding state abort flags:%x\n",
785			    abort->ch.chunk_flags);
786			if (sctp_handle_nat_colliding_state(stcb)) {
787				return;
788			}
789		} else if (error == SCTP_CAUSE_NAT_MISSING_STATE) {
790			SCTPDBG(SCTP_DEBUG_INPUT2, "Received missing state abort flags:%x\n",
791			    abort->ch.chunk_flags);
792			if (sctp_handle_nat_missing_state(stcb, net)) {
793				return;
794			}
795		}
796	} else {
797		error = 0;
798	}
799	/* stop any receive timers */
800	sctp_timer_stop(SCTP_TIMER_TYPE_RECV, stcb->sctp_ep, stcb, net,
801	    SCTP_FROM_SCTP_INPUT + SCTP_LOC_7);
802	/* notify user of the abort and clean up... */
803	sctp_abort_notification(stcb, 1, error, abort, SCTP_SO_NOT_LOCKED);
804	/* free the tcb */
805	SCTP_STAT_INCR_COUNTER32(sctps_aborted);
806	if ((SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_OPEN) ||
807	    (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) {
808		SCTP_STAT_DECR_GAUGE32(sctps_currestab);
809	}
810#ifdef SCTP_ASOCLOG_OF_TSNS
811	sctp_print_out_track_log(stcb);
812#endif
813#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
814	so = SCTP_INP_SO(stcb->sctp_ep);
815	atomic_add_int(&stcb->asoc.refcnt, 1);
816	SCTP_TCB_UNLOCK(stcb);
817	SCTP_SOCKET_LOCK(so, 1);
818	SCTP_TCB_LOCK(stcb);
819	atomic_subtract_int(&stcb->asoc.refcnt, 1);
820#endif
821	stcb->asoc.state |= SCTP_STATE_WAS_ABORTED;
822	(void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC,
823	    SCTP_FROM_SCTP_INPUT + SCTP_LOC_8);
824#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
825	SCTP_SOCKET_UNLOCK(so, 1);
826#endif
827	SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_handle_abort: finished\n");
828}
829
830static void
831sctp_start_net_timers(struct sctp_tcb *stcb)
832{
833	uint32_t cnt_hb_sent;
834	struct sctp_nets *net;
835
836	cnt_hb_sent = 0;
837	TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
838		/*
839		 * For each network start: 1) A pmtu timer. 2) A HB timer 3)
840		 * If the dest in unconfirmed send a hb as well if under
841		 * max_hb_burst have been sent.
842		 */
843		sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, stcb->sctp_ep, stcb, net);
844		sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep, stcb, net);
845		if ((net->dest_state & SCTP_ADDR_UNCONFIRMED) &&
846		    (cnt_hb_sent < SCTP_BASE_SYSCTL(sctp_hb_maxburst))) {
847			sctp_send_hb(stcb, net, SCTP_SO_NOT_LOCKED);
848			cnt_hb_sent++;
849		}
850	}
851	if (cnt_hb_sent) {
852		sctp_chunk_output(stcb->sctp_ep, stcb,
853		    SCTP_OUTPUT_FROM_COOKIE_ACK,
854		    SCTP_SO_NOT_LOCKED);
855	}
856}
857
858
859static void
860sctp_handle_shutdown(struct sctp_shutdown_chunk *cp,
861    struct sctp_tcb *stcb, struct sctp_nets *net, int *abort_flag)
862{
863	struct sctp_association *asoc;
864	int some_on_streamwheel;
865	int old_state;
866
867#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
868	struct socket *so;
869
870#endif
871
872	SCTPDBG(SCTP_DEBUG_INPUT2,
873	    "sctp_handle_shutdown: handling SHUTDOWN\n");
874	if (stcb == NULL)
875		return;
876	asoc = &stcb->asoc;
877	if ((SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_WAIT) ||
878	    (SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_ECHOED)) {
879		return;
880	}
881	if (ntohs(cp->ch.chunk_length) != sizeof(struct sctp_shutdown_chunk)) {
882		/* Shutdown NOT the expected size */
883		return;
884	}
885	old_state = SCTP_GET_STATE(asoc);
886	sctp_update_acked(stcb, cp, abort_flag);
887	if (*abort_flag) {
888		return;
889	}
890	if (asoc->control_pdapi) {
891		/*
892		 * With a normal shutdown we assume the end of last record.
893		 */
894		SCTP_INP_READ_LOCK(stcb->sctp_ep);
895		asoc->control_pdapi->end_added = 1;
896		asoc->control_pdapi->pdapi_aborted = 1;
897		asoc->control_pdapi = NULL;
898		SCTP_INP_READ_UNLOCK(stcb->sctp_ep);
899#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
900		so = SCTP_INP_SO(stcb->sctp_ep);
901		atomic_add_int(&stcb->asoc.refcnt, 1);
902		SCTP_TCB_UNLOCK(stcb);
903		SCTP_SOCKET_LOCK(so, 1);
904		SCTP_TCB_LOCK(stcb);
905		atomic_subtract_int(&stcb->asoc.refcnt, 1);
906		if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) {
907			/* assoc was freed while we were unlocked */
908			SCTP_SOCKET_UNLOCK(so, 1);
909			return;
910		}
911#endif
912		sctp_sorwakeup(stcb->sctp_ep, stcb->sctp_socket);
913#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
914		SCTP_SOCKET_UNLOCK(so, 1);
915#endif
916	}
917	/* goto SHUTDOWN_RECEIVED state to block new requests */
918	if (stcb->sctp_socket) {
919		if ((SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_RECEIVED) &&
920		    (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_ACK_SENT) &&
921		    (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT)) {
922			SCTP_SET_STATE(asoc, SCTP_STATE_SHUTDOWN_RECEIVED);
923			SCTP_CLEAR_SUBSTATE(asoc, SCTP_STATE_SHUTDOWN_PENDING);
924			/*
925			 * notify upper layer that peer has initiated a
926			 * shutdown
927			 */
928			sctp_ulp_notify(SCTP_NOTIFY_PEER_SHUTDOWN, stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
929
930			/* reset time */
931			(void)SCTP_GETTIME_TIMEVAL(&asoc->time_entered);
932		}
933	}
934	if (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_SENT) {
935		/*
936		 * stop the shutdown timer, since we WILL move to
937		 * SHUTDOWN-ACK-SENT.
938		 */
939		sctp_timer_stop(SCTP_TIMER_TYPE_SHUTDOWN, stcb->sctp_ep, stcb,
940		    net, SCTP_FROM_SCTP_INPUT + SCTP_LOC_9);
941	}
942	/* Now is there unsent data on a stream somewhere? */
943	some_on_streamwheel = sctp_is_there_unsent_data(stcb, SCTP_SO_NOT_LOCKED);
944
945	if (!TAILQ_EMPTY(&asoc->send_queue) ||
946	    !TAILQ_EMPTY(&asoc->sent_queue) ||
947	    some_on_streamwheel) {
948		/* By returning we will push more data out */
949		return;
950	} else {
951		/* no outstanding data to send, so move on... */
952		/* send SHUTDOWN-ACK */
953		/* move to SHUTDOWN-ACK-SENT state */
954		if ((SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) ||
955		    (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) {
956			SCTP_STAT_DECR_GAUGE32(sctps_currestab);
957		}
958		SCTP_CLEAR_SUBSTATE(asoc, SCTP_STATE_SHUTDOWN_PENDING);
959		if (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_ACK_SENT) {
960			SCTP_SET_STATE(asoc, SCTP_STATE_SHUTDOWN_ACK_SENT);
961			sctp_stop_timers_for_shutdown(stcb);
962			sctp_send_shutdown_ack(stcb, net);
963			sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNACK,
964			    stcb->sctp_ep, stcb, net);
965		} else if (old_state == SCTP_STATE_SHUTDOWN_ACK_SENT) {
966			sctp_send_shutdown_ack(stcb, net);
967		}
968	}
969}
970
971static void
972sctp_handle_shutdown_ack(struct sctp_shutdown_ack_chunk *cp SCTP_UNUSED,
973    struct sctp_tcb *stcb,
974    struct sctp_nets *net)
975{
976	struct sctp_association *asoc;
977
978#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
979	struct socket *so;
980
981	so = SCTP_INP_SO(stcb->sctp_ep);
982#endif
983	SCTPDBG(SCTP_DEBUG_INPUT2,
984	    "sctp_handle_shutdown_ack: handling SHUTDOWN ACK\n");
985	if (stcb == NULL)
986		return;
987
988	asoc = &stcb->asoc;
989	/* process according to association state */
990	if ((SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_WAIT) ||
991	    (SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_ECHOED)) {
992		/* unexpected SHUTDOWN-ACK... do OOTB handling... */
993		sctp_send_shutdown_complete(stcb, net, 1);
994		SCTP_TCB_UNLOCK(stcb);
995		return;
996	}
997	if ((SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT) &&
998	    (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_ACK_SENT)) {
999		/* unexpected SHUTDOWN-ACK... so ignore... */
1000		SCTP_TCB_UNLOCK(stcb);
1001		return;
1002	}
1003	if (asoc->control_pdapi) {
1004		/*
1005		 * With a normal shutdown we assume the end of last record.
1006		 */
1007		SCTP_INP_READ_LOCK(stcb->sctp_ep);
1008		asoc->control_pdapi->end_added = 1;
1009		asoc->control_pdapi->pdapi_aborted = 1;
1010		asoc->control_pdapi = NULL;
1011		SCTP_INP_READ_UNLOCK(stcb->sctp_ep);
1012#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1013		atomic_add_int(&stcb->asoc.refcnt, 1);
1014		SCTP_TCB_UNLOCK(stcb);
1015		SCTP_SOCKET_LOCK(so, 1);
1016		SCTP_TCB_LOCK(stcb);
1017		atomic_subtract_int(&stcb->asoc.refcnt, 1);
1018		if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) {
1019			/* assoc was freed while we were unlocked */
1020			SCTP_SOCKET_UNLOCK(so, 1);
1021			return;
1022		}
1023#endif
1024		sctp_sorwakeup(stcb->sctp_ep, stcb->sctp_socket);
1025#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1026		SCTP_SOCKET_UNLOCK(so, 1);
1027#endif
1028	}
1029#ifdef INVARIANTS
1030	if (!TAILQ_EMPTY(&asoc->send_queue) ||
1031	    !TAILQ_EMPTY(&asoc->sent_queue) ||
1032	    !stcb->asoc.ss_functions.sctp_ss_is_empty(stcb, asoc)) {
1033		panic("Queues are not empty when handling SHUTDOWN-ACK");
1034	}
1035#endif
1036	/* stop the timer */
1037	sctp_timer_stop(SCTP_TIMER_TYPE_SHUTDOWN, stcb->sctp_ep, stcb, net,
1038	    SCTP_FROM_SCTP_INPUT + SCTP_LOC_10);
1039	/* send SHUTDOWN-COMPLETE */
1040	sctp_send_shutdown_complete(stcb, net, 0);
1041	/* notify upper layer protocol */
1042	if (stcb->sctp_socket) {
1043		if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
1044		    (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) {
1045			stcb->sctp_socket->so_snd.sb_cc = 0;
1046		}
1047		sctp_ulp_notify(SCTP_NOTIFY_ASSOC_DOWN, stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
1048	}
1049	SCTP_STAT_INCR_COUNTER32(sctps_shutdown);
1050	/* free the TCB but first save off the ep */
1051#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1052	atomic_add_int(&stcb->asoc.refcnt, 1);
1053	SCTP_TCB_UNLOCK(stcb);
1054	SCTP_SOCKET_LOCK(so, 1);
1055	SCTP_TCB_LOCK(stcb);
1056	atomic_subtract_int(&stcb->asoc.refcnt, 1);
1057#endif
1058	(void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC,
1059	    SCTP_FROM_SCTP_INPUT + SCTP_LOC_11);
1060#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1061	SCTP_SOCKET_UNLOCK(so, 1);
1062#endif
1063}
1064
1065/*
1066 * Skip past the param header and then we will find the chunk that caused the
1067 * problem. There are two possiblities ASCONF or FWD-TSN other than that and
1068 * our peer must be broken.
1069 */
1070static void
1071sctp_process_unrecog_chunk(struct sctp_tcb *stcb, struct sctp_paramhdr *phdr,
1072    struct sctp_nets *net)
1073{
1074	struct sctp_chunkhdr *chk;
1075
1076	chk = (struct sctp_chunkhdr *)((caddr_t)phdr + sizeof(*phdr));
1077	switch (chk->chunk_type) {
1078	case SCTP_ASCONF_ACK:
1079	case SCTP_ASCONF:
1080		sctp_asconf_cleanup(stcb, net);
1081		break;
1082	case SCTP_FORWARD_CUM_TSN:
1083		stcb->asoc.prsctp_supported = 0;
1084		break;
1085	default:
1086		SCTPDBG(SCTP_DEBUG_INPUT2,
1087		    "Peer does not support chunk type %d(%x)??\n",
1088		    chk->chunk_type, (uint32_t) chk->chunk_type);
1089		break;
1090	}
1091}
1092
1093/*
1094 * Skip past the param header and then we will find the param that caused the
1095 * problem.  There are a number of param's in a ASCONF OR the prsctp param
1096 * these will turn of specific features.
1097 * XXX: Is this the right thing to do?
1098 */
1099static void
1100sctp_process_unrecog_param(struct sctp_tcb *stcb, struct sctp_paramhdr *phdr)
1101{
1102	struct sctp_paramhdr *pbad;
1103
1104	pbad = phdr + 1;
1105	switch (ntohs(pbad->param_type)) {
1106		/* pr-sctp draft */
1107	case SCTP_PRSCTP_SUPPORTED:
1108		stcb->asoc.prsctp_supported = 0;
1109		break;
1110	case SCTP_SUPPORTED_CHUNK_EXT:
1111		break;
1112		/* draft-ietf-tsvwg-addip-sctp */
1113	case SCTP_HAS_NAT_SUPPORT:
1114		stcb->asoc.peer_supports_nat = 0;
1115		break;
1116	case SCTP_ADD_IP_ADDRESS:
1117	case SCTP_DEL_IP_ADDRESS:
1118	case SCTP_SET_PRIM_ADDR:
1119		stcb->asoc.asconf_supported = 0;
1120		break;
1121	case SCTP_SUCCESS_REPORT:
1122	case SCTP_ERROR_CAUSE_IND:
1123		SCTPDBG(SCTP_DEBUG_INPUT2, "Huh, the peer does not support success? or error cause?\n");
1124		SCTPDBG(SCTP_DEBUG_INPUT2,
1125		    "Turning off ASCONF to this strange peer\n");
1126		stcb->asoc.asconf_supported = 0;
1127		break;
1128	default:
1129		SCTPDBG(SCTP_DEBUG_INPUT2,
1130		    "Peer does not support param type %d(%x)??\n",
1131		    pbad->param_type, (uint32_t) pbad->param_type);
1132		break;
1133	}
1134}
1135
1136static int
1137sctp_handle_error(struct sctp_chunkhdr *ch,
1138    struct sctp_tcb *stcb, struct sctp_nets *net)
1139{
1140	int chklen;
1141	struct sctp_paramhdr *phdr;
1142	uint16_t error, error_type;
1143	uint16_t error_len;
1144	struct sctp_association *asoc;
1145	int adjust;
1146
1147#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1148	struct socket *so;
1149
1150#endif
1151
1152	/* parse through all of the errors and process */
1153	asoc = &stcb->asoc;
1154	phdr = (struct sctp_paramhdr *)((caddr_t)ch +
1155	    sizeof(struct sctp_chunkhdr));
1156	chklen = ntohs(ch->chunk_length) - sizeof(struct sctp_chunkhdr);
1157	error = 0;
1158	while ((size_t)chklen >= sizeof(struct sctp_paramhdr)) {
1159		/* Process an Error Cause */
1160		error_type = ntohs(phdr->param_type);
1161		error_len = ntohs(phdr->param_length);
1162		if ((error_len > chklen) || (error_len == 0)) {
1163			/* invalid param length for this param */
1164			SCTPDBG(SCTP_DEBUG_INPUT1, "Bogus length in error param- chunk left:%d errorlen:%d\n",
1165			    chklen, error_len);
1166			return (0);
1167		}
1168		if (error == 0) {
1169			/* report the first error cause */
1170			error = error_type;
1171		}
1172		switch (error_type) {
1173		case SCTP_CAUSE_INVALID_STREAM:
1174		case SCTP_CAUSE_MISSING_PARAM:
1175		case SCTP_CAUSE_INVALID_PARAM:
1176		case SCTP_CAUSE_NO_USER_DATA:
1177			SCTPDBG(SCTP_DEBUG_INPUT1, "Software error we got a %d back? We have a bug :/ (or do they?)\n",
1178			    error_type);
1179			break;
1180		case SCTP_CAUSE_NAT_COLLIDING_STATE:
1181			SCTPDBG(SCTP_DEBUG_INPUT2, "Received Colliding state abort flags:%x\n",
1182			    ch->chunk_flags);
1183			if (sctp_handle_nat_colliding_state(stcb)) {
1184				return (0);
1185			}
1186			break;
1187		case SCTP_CAUSE_NAT_MISSING_STATE:
1188			SCTPDBG(SCTP_DEBUG_INPUT2, "Received missing state abort flags:%x\n",
1189			    ch->chunk_flags);
1190			if (sctp_handle_nat_missing_state(stcb, net)) {
1191				return (0);
1192			}
1193			break;
1194		case SCTP_CAUSE_STALE_COOKIE:
1195			/*
1196			 * We only act if we have echoed a cookie and are
1197			 * waiting.
1198			 */
1199			if (SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_ECHOED) {
1200				int *p;
1201
1202				p = (int *)((caddr_t)phdr + sizeof(*phdr));
1203				/* Save the time doubled */
1204				asoc->cookie_preserve_req = ntohl(*p) << 1;
1205				asoc->stale_cookie_count++;
1206				if (asoc->stale_cookie_count >
1207				    asoc->max_init_times) {
1208					sctp_abort_notification(stcb, 0, 0, NULL, SCTP_SO_NOT_LOCKED);
1209					/* now free the asoc */
1210#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1211					so = SCTP_INP_SO(stcb->sctp_ep);
1212					atomic_add_int(&stcb->asoc.refcnt, 1);
1213					SCTP_TCB_UNLOCK(stcb);
1214					SCTP_SOCKET_LOCK(so, 1);
1215					SCTP_TCB_LOCK(stcb);
1216					atomic_subtract_int(&stcb->asoc.refcnt, 1);
1217#endif
1218					(void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC,
1219					    SCTP_FROM_SCTP_INPUT + SCTP_LOC_12);
1220#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1221					SCTP_SOCKET_UNLOCK(so, 1);
1222#endif
1223					return (-1);
1224				}
1225				/* blast back to INIT state */
1226				sctp_toss_old_cookies(stcb, &stcb->asoc);
1227				asoc->state &= ~SCTP_STATE_COOKIE_ECHOED;
1228				asoc->state |= SCTP_STATE_COOKIE_WAIT;
1229				sctp_stop_all_cookie_timers(stcb);
1230				sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED);
1231			}
1232			break;
1233		case SCTP_CAUSE_UNRESOLVABLE_ADDR:
1234			/*
1235			 * Nothing we can do here, we don't do hostname
1236			 * addresses so if the peer does not like my IPv6
1237			 * (or IPv4 for that matter) it does not matter. If
1238			 * they don't support that type of address, they can
1239			 * NOT possibly get that packet type... i.e. with no
1240			 * IPv6 you can't recieve a IPv6 packet. so we can
1241			 * safely ignore this one. If we ever added support
1242			 * for HOSTNAME Addresses, then we would need to do
1243			 * something here.
1244			 */
1245			break;
1246		case SCTP_CAUSE_UNRECOG_CHUNK:
1247			sctp_process_unrecog_chunk(stcb, phdr, net);
1248			break;
1249		case SCTP_CAUSE_UNRECOG_PARAM:
1250			sctp_process_unrecog_param(stcb, phdr);
1251			break;
1252		case SCTP_CAUSE_COOKIE_IN_SHUTDOWN:
1253			/*
1254			 * We ignore this since the timer will drive out a
1255			 * new cookie anyway and there timer will drive us
1256			 * to send a SHUTDOWN_COMPLETE. We can't send one
1257			 * here since we don't have their tag.
1258			 */
1259			break;
1260		case SCTP_CAUSE_DELETING_LAST_ADDR:
1261		case SCTP_CAUSE_RESOURCE_SHORTAGE:
1262		case SCTP_CAUSE_DELETING_SRC_ADDR:
1263			/*
1264			 * We should NOT get these here, but in a
1265			 * ASCONF-ACK.
1266			 */
1267			SCTPDBG(SCTP_DEBUG_INPUT2, "Peer sends ASCONF errors in a Operational Error?<%d>?\n",
1268			    error_type);
1269			break;
1270		case SCTP_CAUSE_OUT_OF_RESC:
1271			/*
1272			 * And what, pray tell do we do with the fact that
1273			 * the peer is out of resources? Not really sure we
1274			 * could do anything but abort. I suspect this
1275			 * should have came WITH an abort instead of in a
1276			 * OP-ERROR.
1277			 */
1278			break;
1279		default:
1280			SCTPDBG(SCTP_DEBUG_INPUT1, "sctp_handle_error: unknown error type = 0x%xh\n",
1281			    error_type);
1282			break;
1283		}
1284		adjust = SCTP_SIZE32(error_len);
1285		chklen -= adjust;
1286		phdr = (struct sctp_paramhdr *)((caddr_t)phdr + adjust);
1287	}
1288	sctp_ulp_notify(SCTP_NOTIFY_REMOTE_ERROR, stcb, error, ch, SCTP_SO_NOT_LOCKED);
1289	return (0);
1290}
1291
1292static int
1293sctp_handle_init_ack(struct mbuf *m, int iphlen, int offset,
1294    struct sockaddr *src, struct sockaddr *dst, struct sctphdr *sh,
1295    struct sctp_init_ack_chunk *cp, struct sctp_tcb *stcb,
1296    struct sctp_nets *net, int *abort_no_unlock,
1297    uint8_t mflowtype, uint32_t mflowid,
1298    uint32_t vrf_id)
1299{
1300	struct sctp_init_ack *init_ack;
1301	struct mbuf *op_err;
1302
1303	SCTPDBG(SCTP_DEBUG_INPUT2,
1304	    "sctp_handle_init_ack: handling INIT-ACK\n");
1305
1306	if (stcb == NULL) {
1307		SCTPDBG(SCTP_DEBUG_INPUT2,
1308		    "sctp_handle_init_ack: TCB is null\n");
1309		return (-1);
1310	}
1311	if (ntohs(cp->ch.chunk_length) < sizeof(struct sctp_init_ack_chunk)) {
1312		/* Invalid length */
1313		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
1314		sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
1315		    src, dst, sh, op_err,
1316		    mflowtype, mflowid,
1317		    vrf_id, net->port);
1318		*abort_no_unlock = 1;
1319		return (-1);
1320	}
1321	init_ack = &cp->init;
1322	/* validate parameters */
1323	if (init_ack->initiate_tag == 0) {
1324		/* protocol error... send an abort */
1325		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
1326		sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
1327		    src, dst, sh, op_err,
1328		    mflowtype, mflowid,
1329		    vrf_id, net->port);
1330		*abort_no_unlock = 1;
1331		return (-1);
1332	}
1333	if (ntohl(init_ack->a_rwnd) < SCTP_MIN_RWND) {
1334		/* protocol error... send an abort */
1335		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
1336		sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
1337		    src, dst, sh, op_err,
1338		    mflowtype, mflowid,
1339		    vrf_id, net->port);
1340		*abort_no_unlock = 1;
1341		return (-1);
1342	}
1343	if (init_ack->num_inbound_streams == 0) {
1344		/* protocol error... send an abort */
1345		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
1346		sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
1347		    src, dst, sh, op_err,
1348		    mflowtype, mflowid,
1349		    vrf_id, net->port);
1350		*abort_no_unlock = 1;
1351		return (-1);
1352	}
1353	if (init_ack->num_outbound_streams == 0) {
1354		/* protocol error... send an abort */
1355		op_err = sctp_generate_cause(SCTP_CAUSE_INVALID_PARAM, "");
1356		sctp_abort_association(stcb->sctp_ep, stcb, m, iphlen,
1357		    src, dst, sh, op_err,
1358		    mflowtype, mflowid,
1359		    vrf_id, net->port);
1360		*abort_no_unlock = 1;
1361		return (-1);
1362	}
1363	/* process according to association state... */
1364	switch (stcb->asoc.state & SCTP_STATE_MASK) {
1365	case SCTP_STATE_COOKIE_WAIT:
1366		/* this is the expected state for this chunk */
1367		/* process the INIT-ACK parameters */
1368		if (stcb->asoc.primary_destination->dest_state &
1369		    SCTP_ADDR_UNCONFIRMED) {
1370			/*
1371			 * The primary is where we sent the INIT, we can
1372			 * always consider it confirmed when the INIT-ACK is
1373			 * returned. Do this before we load addresses
1374			 * though.
1375			 */
1376			stcb->asoc.primary_destination->dest_state &=
1377			    ~SCTP_ADDR_UNCONFIRMED;
1378			sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED,
1379			    stcb, 0, (void *)stcb->asoc.primary_destination, SCTP_SO_NOT_LOCKED);
1380		}
1381		if (sctp_process_init_ack(m, iphlen, offset, src, dst, sh, cp, stcb,
1382		    net, abort_no_unlock,
1383		    mflowtype, mflowid,
1384		    vrf_id) < 0) {
1385			/* error in parsing parameters */
1386			return (-1);
1387		}
1388		/* update our state */
1389		SCTPDBG(SCTP_DEBUG_INPUT2, "moving to COOKIE-ECHOED state\n");
1390		SCTP_SET_STATE(&stcb->asoc, SCTP_STATE_COOKIE_ECHOED);
1391
1392		/* reset the RTO calc */
1393		if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
1394			sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
1395			    stcb->asoc.overall_error_count,
1396			    0,
1397			    SCTP_FROM_SCTP_INPUT,
1398			    __LINE__);
1399		}
1400		stcb->asoc.overall_error_count = 0;
1401		(void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered);
1402		/*
1403		 * collapse the init timer back in case of a exponential
1404		 * backoff
1405		 */
1406		sctp_timer_start(SCTP_TIMER_TYPE_COOKIE, stcb->sctp_ep,
1407		    stcb, net);
1408		/*
1409		 * the send at the end of the inbound data processing will
1410		 * cause the cookie to be sent
1411		 */
1412		break;
1413	case SCTP_STATE_SHUTDOWN_SENT:
1414		/* incorrect state... discard */
1415		break;
1416	case SCTP_STATE_COOKIE_ECHOED:
1417		/* incorrect state... discard */
1418		break;
1419	case SCTP_STATE_OPEN:
1420		/* incorrect state... discard */
1421		break;
1422	case SCTP_STATE_EMPTY:
1423	case SCTP_STATE_INUSE:
1424	default:
1425		/* incorrect state... discard */
1426		return (-1);
1427		break;
1428	}
1429	SCTPDBG(SCTP_DEBUG_INPUT1, "Leaving handle-init-ack end\n");
1430	return (0);
1431}
1432
1433static struct sctp_tcb *
1434sctp_process_cookie_new(struct mbuf *m, int iphlen, int offset,
1435    struct sockaddr *src, struct sockaddr *dst,
1436    struct sctphdr *sh, struct sctp_state_cookie *cookie, int cookie_len,
1437    struct sctp_inpcb *inp, struct sctp_nets **netp,
1438    struct sockaddr *init_src, int *notification,
1439    int auth_skipped, uint32_t auth_offset, uint32_t auth_len,
1440    uint8_t mflowtype, uint32_t mflowid,
1441    uint32_t vrf_id, uint16_t port);
1442
1443
1444/*
1445 * handle a state cookie for an existing association m: input packet mbuf
1446 * chain-- assumes a pullup on IP/SCTP/COOKIE-ECHO chunk note: this is a
1447 * "split" mbuf and the cookie signature does not exist offset: offset into
1448 * mbuf to the cookie-echo chunk
1449 */
1450static struct sctp_tcb *
1451sctp_process_cookie_existing(struct mbuf *m, int iphlen, int offset,
1452    struct sockaddr *src, struct sockaddr *dst,
1453    struct sctphdr *sh, struct sctp_state_cookie *cookie, int cookie_len,
1454    struct sctp_inpcb *inp, struct sctp_tcb *stcb, struct sctp_nets **netp,
1455    struct sockaddr *init_src, int *notification,
1456    int auth_skipped, uint32_t auth_offset, uint32_t auth_len,
1457    uint8_t mflowtype, uint32_t mflowid,
1458    uint32_t vrf_id, uint16_t port)
1459{
1460	struct sctp_association *asoc;
1461	struct sctp_init_chunk *init_cp, init_buf;
1462	struct sctp_init_ack_chunk *initack_cp, initack_buf;
1463	struct sctp_nets *net;
1464	struct mbuf *op_err;
1465	int init_offset, initack_offset, i;
1466	int retval;
1467	int spec_flag = 0;
1468	uint32_t how_indx;
1469
1470#if defined(SCTP_DETAILED_STR_STATS)
1471	int j;
1472
1473#endif
1474
1475	net = *netp;
1476	/* I know that the TCB is non-NULL from the caller */
1477	asoc = &stcb->asoc;
1478	for (how_indx = 0; how_indx < sizeof(asoc->cookie_how); how_indx++) {
1479		if (asoc->cookie_how[how_indx] == 0)
1480			break;
1481	}
1482	if (how_indx < sizeof(asoc->cookie_how)) {
1483		asoc->cookie_how[how_indx] = 1;
1484	}
1485	if (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_ACK_SENT) {
1486		/* SHUTDOWN came in after sending INIT-ACK */
1487		sctp_send_shutdown_ack(stcb, stcb->asoc.primary_destination);
1488		op_err = sctp_generate_cause(SCTP_CAUSE_COOKIE_IN_SHUTDOWN, "");
1489		sctp_send_operr_to(src, dst, sh, cookie->peers_vtag, op_err,
1490		    mflowtype, mflowid, inp->fibnum,
1491		    vrf_id, net->port);
1492		if (how_indx < sizeof(asoc->cookie_how))
1493			asoc->cookie_how[how_indx] = 2;
1494		return (NULL);
1495	}
1496	/*
1497	 * find and validate the INIT chunk in the cookie (peer's info) the
1498	 * INIT should start after the cookie-echo header struct (chunk
1499	 * header, state cookie header struct)
1500	 */
1501	init_offset = offset += sizeof(struct sctp_cookie_echo_chunk);
1502
1503	init_cp = (struct sctp_init_chunk *)
1504	    sctp_m_getptr(m, init_offset, sizeof(struct sctp_init_chunk),
1505	    (uint8_t *) & init_buf);
1506	if (init_cp == NULL) {
1507		/* could not pull a INIT chunk in cookie */
1508		return (NULL);
1509	}
1510	if (init_cp->ch.chunk_type != SCTP_INITIATION) {
1511		return (NULL);
1512	}
1513	/*
1514	 * find and validate the INIT-ACK chunk in the cookie (my info) the
1515	 * INIT-ACK follows the INIT chunk
1516	 */
1517	initack_offset = init_offset + SCTP_SIZE32(ntohs(init_cp->ch.chunk_length));
1518	initack_cp = (struct sctp_init_ack_chunk *)
1519	    sctp_m_getptr(m, initack_offset, sizeof(struct sctp_init_ack_chunk),
1520	    (uint8_t *) & initack_buf);
1521	if (initack_cp == NULL) {
1522		/* could not pull INIT-ACK chunk in cookie */
1523		return (NULL);
1524	}
1525	if (initack_cp->ch.chunk_type != SCTP_INITIATION_ACK) {
1526		return (NULL);
1527	}
1528	if ((ntohl(initack_cp->init.initiate_tag) == asoc->my_vtag) &&
1529	    (ntohl(init_cp->init.initiate_tag) == asoc->peer_vtag)) {
1530		/*
1531		 * case D in Section 5.2.4 Table 2: MMAA process accordingly
1532		 * to get into the OPEN state
1533		 */
1534		if (ntohl(initack_cp->init.initial_tsn) != asoc->init_seq_number) {
1535			/*-
1536			 * Opps, this means that we somehow generated two vtag's
1537			 * the same. I.e. we did:
1538			 *  Us               Peer
1539			 *   <---INIT(tag=a)------
1540			 *   ----INIT-ACK(tag=t)-->
1541			 *   ----INIT(tag=t)------> *1
1542			 *   <---INIT-ACK(tag=a)---
1543                         *   <----CE(tag=t)------------- *2
1544			 *
1545			 * At point *1 we should be generating a different
1546			 * tag t'. Which means we would throw away the CE and send
1547			 * ours instead. Basically this is case C (throw away side).
1548			 */
1549			if (how_indx < sizeof(asoc->cookie_how))
1550				asoc->cookie_how[how_indx] = 17;
1551			return (NULL);
1552
1553		}
1554		switch (SCTP_GET_STATE(asoc)) {
1555		case SCTP_STATE_COOKIE_WAIT:
1556		case SCTP_STATE_COOKIE_ECHOED:
1557			/*
1558			 * INIT was sent but got a COOKIE_ECHO with the
1559			 * correct tags... just accept it...but we must
1560			 * process the init so that we can make sure we have
1561			 * the right seq no's.
1562			 */
1563			/* First we must process the INIT !! */
1564			retval = sctp_process_init(init_cp, stcb);
1565			if (retval < 0) {
1566				if (how_indx < sizeof(asoc->cookie_how))
1567					asoc->cookie_how[how_indx] = 3;
1568				return (NULL);
1569			}
1570			/* we have already processed the INIT so no problem */
1571			sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp,
1572			    stcb, net,
1573			    SCTP_FROM_SCTP_INPUT + SCTP_LOC_13);
1574			sctp_timer_stop(SCTP_TIMER_TYPE_INIT, inp,
1575			    stcb, net,
1576			    SCTP_FROM_SCTP_INPUT + SCTP_LOC_14);
1577			/* update current state */
1578			if (SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_ECHOED)
1579				SCTP_STAT_INCR_COUNTER32(sctps_activeestab);
1580			else
1581				SCTP_STAT_INCR_COUNTER32(sctps_collisionestab);
1582
1583			SCTP_SET_STATE(asoc, SCTP_STATE_OPEN);
1584			if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) {
1585				sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
1586				    stcb->sctp_ep, stcb, asoc->primary_destination);
1587			}
1588			SCTP_STAT_INCR_GAUGE32(sctps_currestab);
1589			sctp_stop_all_cookie_timers(stcb);
1590			if (((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
1591			    (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) &&
1592			    (inp->sctp_socket->so_qlimit == 0)
1593			    ) {
1594#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1595				struct socket *so;
1596
1597#endif
1598				/*
1599				 * Here is where collision would go if we
1600				 * did a connect() and instead got a
1601				 * init/init-ack/cookie done before the
1602				 * init-ack came back..
1603				 */
1604				stcb->sctp_ep->sctp_flags |=
1605				    SCTP_PCB_FLAGS_CONNECTED;
1606#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1607				so = SCTP_INP_SO(stcb->sctp_ep);
1608				atomic_add_int(&stcb->asoc.refcnt, 1);
1609				SCTP_TCB_UNLOCK(stcb);
1610				SCTP_SOCKET_LOCK(so, 1);
1611				SCTP_TCB_LOCK(stcb);
1612				atomic_add_int(&stcb->asoc.refcnt, -1);
1613				if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) {
1614					SCTP_SOCKET_UNLOCK(so, 1);
1615					return (NULL);
1616				}
1617#endif
1618				soisconnected(stcb->sctp_socket);
1619#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1620				SCTP_SOCKET_UNLOCK(so, 1);
1621#endif
1622			}
1623			/* notify upper layer */
1624			*notification = SCTP_NOTIFY_ASSOC_UP;
1625			/*
1626			 * since we did not send a HB make sure we don't
1627			 * double things
1628			 */
1629			net->hb_responded = 1;
1630			net->RTO = sctp_calculate_rto(stcb, asoc, net,
1631			    &cookie->time_entered,
1632			    sctp_align_unsafe_makecopy,
1633			    SCTP_RTT_FROM_NON_DATA);
1634
1635			if (stcb->asoc.sctp_autoclose_ticks &&
1636			    (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE))) {
1637				sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE,
1638				    inp, stcb, NULL);
1639			}
1640			break;
1641		default:
1642			/*
1643			 * we're in the OPEN state (or beyond), so peer must
1644			 * have simply lost the COOKIE-ACK
1645			 */
1646			break;
1647		}		/* end switch */
1648		sctp_stop_all_cookie_timers(stcb);
1649		/*
1650		 * We ignore the return code here.. not sure if we should
1651		 * somehow abort.. but we do have an existing asoc. This
1652		 * really should not fail.
1653		 */
1654		if (sctp_load_addresses_from_init(stcb, m,
1655		    init_offset + sizeof(struct sctp_init_chunk),
1656		    initack_offset, src, dst, init_src)) {
1657			if (how_indx < sizeof(asoc->cookie_how))
1658				asoc->cookie_how[how_indx] = 4;
1659			return (NULL);
1660		}
1661		/* respond with a COOKIE-ACK */
1662		sctp_toss_old_cookies(stcb, asoc);
1663		sctp_send_cookie_ack(stcb);
1664		if (how_indx < sizeof(asoc->cookie_how))
1665			asoc->cookie_how[how_indx] = 5;
1666		return (stcb);
1667	}
1668	if (ntohl(initack_cp->init.initiate_tag) != asoc->my_vtag &&
1669	    ntohl(init_cp->init.initiate_tag) == asoc->peer_vtag &&
1670	    cookie->tie_tag_my_vtag == 0 &&
1671	    cookie->tie_tag_peer_vtag == 0) {
1672		/*
1673		 * case C in Section 5.2.4 Table 2: XMOO silently discard
1674		 */
1675		if (how_indx < sizeof(asoc->cookie_how))
1676			asoc->cookie_how[how_indx] = 6;
1677		return (NULL);
1678	}
1679	/*
1680	 * If nat support, and the below and stcb is established, send back
1681	 * a ABORT(colliding state) if we are established.
1682	 */
1683	if ((SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) &&
1684	    (asoc->peer_supports_nat) &&
1685	    ((ntohl(initack_cp->init.initiate_tag) == asoc->my_vtag) &&
1686	    ((ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) ||
1687	    (asoc->peer_vtag == 0)))) {
1688		/*
1689		 * Special case - Peer's support nat. We may have two init's
1690		 * that we gave out the same tag on since one was not
1691		 * established.. i.e. we get INIT from host-1 behind the nat
1692		 * and we respond tag-a, we get a INIT from host-2 behind
1693		 * the nat and we get tag-a again. Then we bring up host-1
1694		 * (or 2's) assoc, Then comes the cookie from hsot-2 (or 1).
1695		 * Now we have colliding state. We must send an abort here
1696		 * with colliding state indication.
1697		 */
1698		op_err = sctp_generate_cause(SCTP_CAUSE_NAT_COLLIDING_STATE, "");
1699		sctp_send_abort(m, iphlen, src, dst, sh, 0, op_err,
1700		    mflowtype, mflowid, inp->fibnum,
1701		    vrf_id, port);
1702		return (NULL);
1703	}
1704	if ((ntohl(initack_cp->init.initiate_tag) == asoc->my_vtag) &&
1705	    ((ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) ||
1706	    (asoc->peer_vtag == 0))) {
1707		/*
1708		 * case B in Section 5.2.4 Table 2: MXAA or MOAA my info
1709		 * should be ok, re-accept peer info
1710		 */
1711		if (ntohl(initack_cp->init.initial_tsn) != asoc->init_seq_number) {
1712			/*
1713			 * Extension of case C. If we hit this, then the
1714			 * random number generator returned the same vtag
1715			 * when we first sent our INIT-ACK and when we later
1716			 * sent our INIT. The side with the seq numbers that
1717			 * are different will be the one that normnally
1718			 * would have hit case C. This in effect "extends"
1719			 * our vtags in this collision case to be 64 bits.
1720			 * The same collision could occur aka you get both
1721			 * vtag and seq number the same twice in a row.. but
1722			 * is much less likely. If it did happen then we
1723			 * would proceed through and bring up the assoc.. we
1724			 * may end up with the wrong stream setup however..
1725			 * which would be bad.. but there is no way to
1726			 * tell.. until we send on a stream that does not
1727			 * exist :-)
1728			 */
1729			if (how_indx < sizeof(asoc->cookie_how))
1730				asoc->cookie_how[how_indx] = 7;
1731
1732			return (NULL);
1733		}
1734		if (how_indx < sizeof(asoc->cookie_how))
1735			asoc->cookie_how[how_indx] = 8;
1736		sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net,
1737		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_15);
1738		sctp_stop_all_cookie_timers(stcb);
1739		/*
1740		 * since we did not send a HB make sure we don't double
1741		 * things
1742		 */
1743		net->hb_responded = 1;
1744		if (stcb->asoc.sctp_autoclose_ticks &&
1745		    sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE)) {
1746			sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE, inp, stcb,
1747			    NULL);
1748		}
1749		asoc->my_rwnd = ntohl(initack_cp->init.a_rwnd);
1750		asoc->pre_open_streams = ntohs(initack_cp->init.num_outbound_streams);
1751
1752		if (ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) {
1753			/*
1754			 * Ok the peer probably discarded our data (if we
1755			 * echoed a cookie+data). So anything on the
1756			 * sent_queue should be marked for retransmit, we
1757			 * may not get something to kick us so it COULD
1758			 * still take a timeout to move these.. but it can't
1759			 * hurt to mark them.
1760			 */
1761			struct sctp_tmit_chunk *chk;
1762
1763			TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) {
1764				if (chk->sent < SCTP_DATAGRAM_RESEND) {
1765					chk->sent = SCTP_DATAGRAM_RESEND;
1766					sctp_flight_size_decrease(chk);
1767					sctp_total_flight_decrease(stcb, chk);
1768					sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt);
1769					spec_flag++;
1770				}
1771			}
1772
1773		}
1774		/* process the INIT info (peer's info) */
1775		retval = sctp_process_init(init_cp, stcb);
1776		if (retval < 0) {
1777			if (how_indx < sizeof(asoc->cookie_how))
1778				asoc->cookie_how[how_indx] = 9;
1779			return (NULL);
1780		}
1781		if (sctp_load_addresses_from_init(stcb, m,
1782		    init_offset + sizeof(struct sctp_init_chunk),
1783		    initack_offset, src, dst, init_src)) {
1784			if (how_indx < sizeof(asoc->cookie_how))
1785				asoc->cookie_how[how_indx] = 10;
1786			return (NULL);
1787		}
1788		if ((asoc->state & SCTP_STATE_COOKIE_WAIT) ||
1789		    (asoc->state & SCTP_STATE_COOKIE_ECHOED)) {
1790			*notification = SCTP_NOTIFY_ASSOC_UP;
1791
1792			if (((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
1793			    (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) &&
1794			    (inp->sctp_socket->so_qlimit == 0)) {
1795#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1796				struct socket *so;
1797
1798#endif
1799				stcb->sctp_ep->sctp_flags |=
1800				    SCTP_PCB_FLAGS_CONNECTED;
1801#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1802				so = SCTP_INP_SO(stcb->sctp_ep);
1803				atomic_add_int(&stcb->asoc.refcnt, 1);
1804				SCTP_TCB_UNLOCK(stcb);
1805				SCTP_SOCKET_LOCK(so, 1);
1806				SCTP_TCB_LOCK(stcb);
1807				atomic_add_int(&stcb->asoc.refcnt, -1);
1808				if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) {
1809					SCTP_SOCKET_UNLOCK(so, 1);
1810					return (NULL);
1811				}
1812#endif
1813				soisconnected(stcb->sctp_socket);
1814#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1815				SCTP_SOCKET_UNLOCK(so, 1);
1816#endif
1817			}
1818			if (SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_ECHOED)
1819				SCTP_STAT_INCR_COUNTER32(sctps_activeestab);
1820			else
1821				SCTP_STAT_INCR_COUNTER32(sctps_collisionestab);
1822			SCTP_STAT_INCR_GAUGE32(sctps_currestab);
1823		} else if (SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) {
1824			SCTP_STAT_INCR_COUNTER32(sctps_restartestab);
1825		} else {
1826			SCTP_STAT_INCR_COUNTER32(sctps_collisionestab);
1827		}
1828		SCTP_SET_STATE(asoc, SCTP_STATE_OPEN);
1829		if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) {
1830			sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
1831			    stcb->sctp_ep, stcb, asoc->primary_destination);
1832		}
1833		sctp_stop_all_cookie_timers(stcb);
1834		sctp_toss_old_cookies(stcb, asoc);
1835		sctp_send_cookie_ack(stcb);
1836		if (spec_flag) {
1837			/*
1838			 * only if we have retrans set do we do this. What
1839			 * this call does is get only the COOKIE-ACK out and
1840			 * then when we return the normal call to
1841			 * sctp_chunk_output will get the retrans out behind
1842			 * this.
1843			 */
1844			sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_COOKIE_ACK, SCTP_SO_NOT_LOCKED);
1845		}
1846		if (how_indx < sizeof(asoc->cookie_how))
1847			asoc->cookie_how[how_indx] = 11;
1848
1849		return (stcb);
1850	}
1851	if ((ntohl(initack_cp->init.initiate_tag) != asoc->my_vtag &&
1852	    ntohl(init_cp->init.initiate_tag) != asoc->peer_vtag) &&
1853	    cookie->tie_tag_my_vtag == asoc->my_vtag_nonce &&
1854	    cookie->tie_tag_peer_vtag == asoc->peer_vtag_nonce &&
1855	    cookie->tie_tag_peer_vtag != 0) {
1856		struct sctpasochead *head;
1857
1858#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1859		struct socket *so;
1860
1861#endif
1862
1863		if (asoc->peer_supports_nat) {
1864			/*
1865			 * This is a gross gross hack. Just call the
1866			 * cookie_new code since we are allowing a duplicate
1867			 * association. I hope this works...
1868			 */
1869			return (sctp_process_cookie_new(m, iphlen, offset, src, dst,
1870			    sh, cookie, cookie_len,
1871			    inp, netp, init_src, notification,
1872			    auth_skipped, auth_offset, auth_len,
1873			    mflowtype, mflowid,
1874			    vrf_id, port));
1875		}
1876		/*
1877		 * case A in Section 5.2.4 Table 2: XXMM (peer restarted)
1878		 */
1879		/* temp code */
1880		if (how_indx < sizeof(asoc->cookie_how))
1881			asoc->cookie_how[how_indx] = 12;
1882		sctp_timer_stop(SCTP_TIMER_TYPE_INIT, inp, stcb, net,
1883		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_16);
1884		sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net,
1885		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_17);
1886
1887		/* notify upper layer */
1888		*notification = SCTP_NOTIFY_ASSOC_RESTART;
1889		atomic_add_int(&stcb->asoc.refcnt, 1);
1890		if ((SCTP_GET_STATE(asoc) != SCTP_STATE_OPEN) &&
1891		    (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_RECEIVED) &&
1892		    (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT)) {
1893			SCTP_STAT_INCR_GAUGE32(sctps_currestab);
1894		}
1895		if (SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) {
1896			SCTP_STAT_INCR_GAUGE32(sctps_restartestab);
1897		} else if (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT) {
1898			SCTP_STAT_INCR_GAUGE32(sctps_collisionestab);
1899		}
1900		if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) {
1901			SCTP_SET_STATE(asoc, SCTP_STATE_OPEN);
1902			sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
1903			    stcb->sctp_ep, stcb, asoc->primary_destination);
1904
1905		} else if (!(asoc->state & SCTP_STATE_SHUTDOWN_SENT)) {
1906			/* move to OPEN state, if not in SHUTDOWN_SENT */
1907			SCTP_SET_STATE(asoc, SCTP_STATE_OPEN);
1908		}
1909		asoc->pre_open_streams =
1910		    ntohs(initack_cp->init.num_outbound_streams);
1911		asoc->init_seq_number = ntohl(initack_cp->init.initial_tsn);
1912		asoc->sending_seq = asoc->asconf_seq_out = asoc->str_reset_seq_out = asoc->init_seq_number;
1913		asoc->asconf_seq_out_acked = asoc->asconf_seq_out - 1;
1914
1915		asoc->asconf_seq_in = asoc->last_acked_seq = asoc->init_seq_number - 1;
1916
1917		asoc->str_reset_seq_in = asoc->init_seq_number;
1918
1919		asoc->advanced_peer_ack_point = asoc->last_acked_seq;
1920		if (asoc->mapping_array) {
1921			memset(asoc->mapping_array, 0,
1922			    asoc->mapping_array_size);
1923		}
1924		if (asoc->nr_mapping_array) {
1925			memset(asoc->nr_mapping_array, 0,
1926			    asoc->mapping_array_size);
1927		}
1928		SCTP_TCB_UNLOCK(stcb);
1929#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1930		so = SCTP_INP_SO(stcb->sctp_ep);
1931		SCTP_SOCKET_LOCK(so, 1);
1932#endif
1933		SCTP_INP_INFO_WLOCK();
1934		SCTP_INP_WLOCK(stcb->sctp_ep);
1935		SCTP_TCB_LOCK(stcb);
1936		atomic_add_int(&stcb->asoc.refcnt, -1);
1937		/* send up all the data */
1938		SCTP_TCB_SEND_LOCK(stcb);
1939
1940		sctp_report_all_outbound(stcb, 0, 1, SCTP_SO_LOCKED);
1941		for (i = 0; i < stcb->asoc.streamoutcnt; i++) {
1942			stcb->asoc.strmout[i].chunks_on_queues = 0;
1943#if defined(SCTP_DETAILED_STR_STATS)
1944			for (j = 0; j < SCTP_PR_SCTP_MAX + 1; j++) {
1945				asoc->strmout[i].abandoned_sent[j] = 0;
1946				asoc->strmout[i].abandoned_unsent[j] = 0;
1947			}
1948#else
1949			asoc->strmout[i].abandoned_sent[0] = 0;
1950			asoc->strmout[i].abandoned_unsent[0] = 0;
1951#endif
1952			stcb->asoc.strmout[i].stream_no = i;
1953			stcb->asoc.strmout[i].next_sequence_send = 0;
1954			stcb->asoc.strmout[i].last_msg_incomplete = 0;
1955		}
1956		/* process the INIT-ACK info (my info) */
1957		asoc->my_vtag = ntohl(initack_cp->init.initiate_tag);
1958		asoc->my_rwnd = ntohl(initack_cp->init.a_rwnd);
1959
1960		/* pull from vtag hash */
1961		LIST_REMOVE(stcb, sctp_asocs);
1962		/* re-insert to new vtag position */
1963		head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(stcb->asoc.my_vtag,
1964		    SCTP_BASE_INFO(hashasocmark))];
1965		/*
1966		 * put it in the bucket in the vtag hash of assoc's for the
1967		 * system
1968		 */
1969		LIST_INSERT_HEAD(head, stcb, sctp_asocs);
1970
1971		SCTP_TCB_SEND_UNLOCK(stcb);
1972		SCTP_INP_WUNLOCK(stcb->sctp_ep);
1973		SCTP_INP_INFO_WUNLOCK();
1974#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
1975		SCTP_SOCKET_UNLOCK(so, 1);
1976#endif
1977		asoc->total_flight = 0;
1978		asoc->total_flight_count = 0;
1979		/* process the INIT info (peer's info) */
1980		retval = sctp_process_init(init_cp, stcb);
1981		if (retval < 0) {
1982			if (how_indx < sizeof(asoc->cookie_how))
1983				asoc->cookie_how[how_indx] = 13;
1984
1985			return (NULL);
1986		}
1987		/*
1988		 * since we did not send a HB make sure we don't double
1989		 * things
1990		 */
1991		net->hb_responded = 1;
1992
1993		if (sctp_load_addresses_from_init(stcb, m,
1994		    init_offset + sizeof(struct sctp_init_chunk),
1995		    initack_offset, src, dst, init_src)) {
1996			if (how_indx < sizeof(asoc->cookie_how))
1997				asoc->cookie_how[how_indx] = 14;
1998
1999			return (NULL);
2000		}
2001		/* respond with a COOKIE-ACK */
2002		sctp_stop_all_cookie_timers(stcb);
2003		sctp_toss_old_cookies(stcb, asoc);
2004		sctp_send_cookie_ack(stcb);
2005		if (how_indx < sizeof(asoc->cookie_how))
2006			asoc->cookie_how[how_indx] = 15;
2007
2008		return (stcb);
2009	}
2010	if (how_indx < sizeof(asoc->cookie_how))
2011		asoc->cookie_how[how_indx] = 16;
2012	/* all other cases... */
2013	return (NULL);
2014}
2015
2016
2017/*
2018 * handle a state cookie for a new association m: input packet mbuf chain--
2019 * assumes a pullup on IP/SCTP/COOKIE-ECHO chunk note: this is a "split" mbuf
2020 * and the cookie signature does not exist offset: offset into mbuf to the
2021 * cookie-echo chunk length: length of the cookie chunk to: where the init
2022 * was from returns a new TCB
2023 */
2024static struct sctp_tcb *
2025sctp_process_cookie_new(struct mbuf *m, int iphlen, int offset,
2026    struct sockaddr *src, struct sockaddr *dst,
2027    struct sctphdr *sh, struct sctp_state_cookie *cookie, int cookie_len,
2028    struct sctp_inpcb *inp, struct sctp_nets **netp,
2029    struct sockaddr *init_src, int *notification,
2030    int auth_skipped, uint32_t auth_offset, uint32_t auth_len,
2031    uint8_t mflowtype, uint32_t mflowid,
2032    uint32_t vrf_id, uint16_t port)
2033{
2034	struct sctp_tcb *stcb;
2035	struct sctp_init_chunk *init_cp, init_buf;
2036	struct sctp_init_ack_chunk *initack_cp, initack_buf;
2037	union sctp_sockstore store;
2038	struct sctp_association *asoc;
2039	int init_offset, initack_offset, initack_limit;
2040	int retval;
2041	int error = 0;
2042	uint8_t auth_chunk_buf[SCTP_PARAM_BUFFER_SIZE];
2043
2044#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2045	struct socket *so;
2046
2047	so = SCTP_INP_SO(inp);
2048#endif
2049
2050	/*
2051	 * find and validate the INIT chunk in the cookie (peer's info) the
2052	 * INIT should start after the cookie-echo header struct (chunk
2053	 * header, state cookie header struct)
2054	 */
2055	init_offset = offset + sizeof(struct sctp_cookie_echo_chunk);
2056	init_cp = (struct sctp_init_chunk *)
2057	    sctp_m_getptr(m, init_offset, sizeof(struct sctp_init_chunk),
2058	    (uint8_t *) & init_buf);
2059	if (init_cp == NULL) {
2060		/* could not pull a INIT chunk in cookie */
2061		SCTPDBG(SCTP_DEBUG_INPUT1,
2062		    "process_cookie_new: could not pull INIT chunk hdr\n");
2063		return (NULL);
2064	}
2065	if (init_cp->ch.chunk_type != SCTP_INITIATION) {
2066		SCTPDBG(SCTP_DEBUG_INPUT1, "HUH? process_cookie_new: could not find INIT chunk!\n");
2067		return (NULL);
2068	}
2069	initack_offset = init_offset + SCTP_SIZE32(ntohs(init_cp->ch.chunk_length));
2070	/*
2071	 * find and validate the INIT-ACK chunk in the cookie (my info) the
2072	 * INIT-ACK follows the INIT chunk
2073	 */
2074	initack_cp = (struct sctp_init_ack_chunk *)
2075	    sctp_m_getptr(m, initack_offset, sizeof(struct sctp_init_ack_chunk),
2076	    (uint8_t *) & initack_buf);
2077	if (initack_cp == NULL) {
2078		/* could not pull INIT-ACK chunk in cookie */
2079		SCTPDBG(SCTP_DEBUG_INPUT1, "process_cookie_new: could not pull INIT-ACK chunk hdr\n");
2080		return (NULL);
2081	}
2082	if (initack_cp->ch.chunk_type != SCTP_INITIATION_ACK) {
2083		return (NULL);
2084	}
2085	/*
2086	 * NOTE: We can't use the INIT_ACK's chk_length to determine the
2087	 * "initack_limit" value.  This is because the chk_length field
2088	 * includes the length of the cookie, but the cookie is omitted when
2089	 * the INIT and INIT_ACK are tacked onto the cookie...
2090	 */
2091	initack_limit = offset + cookie_len;
2092
2093	/*
2094	 * now that we know the INIT/INIT-ACK are in place, create a new TCB
2095	 * and popluate
2096	 */
2097
2098	/*
2099	 * Here we do a trick, we set in NULL for the proc/thread argument.
2100	 * We do this since in effect we only use the p argument when the
2101	 * socket is unbound and we must do an implicit bind. Since we are
2102	 * getting a cookie, we cannot be unbound.
2103	 */
2104	stcb = sctp_aloc_assoc(inp, init_src, &error,
2105	    ntohl(initack_cp->init.initiate_tag), vrf_id,
2106	    ntohs(initack_cp->init.num_outbound_streams),
2107	    (struct thread *)NULL
2108	    );
2109	if (stcb == NULL) {
2110		struct mbuf *op_err;
2111
2112		/* memory problem? */
2113		SCTPDBG(SCTP_DEBUG_INPUT1,
2114		    "process_cookie_new: no room for another TCB!\n");
2115		op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, "");
2116		sctp_abort_association(inp, (struct sctp_tcb *)NULL, m, iphlen,
2117		    src, dst, sh, op_err,
2118		    mflowtype, mflowid,
2119		    vrf_id, port);
2120		return (NULL);
2121	}
2122	/* get the correct sctp_nets */
2123	if (netp)
2124		*netp = sctp_findnet(stcb, init_src);
2125
2126	asoc = &stcb->asoc;
2127	/* get scope variables out of cookie */
2128	asoc->scope.ipv4_local_scope = cookie->ipv4_scope;
2129	asoc->scope.site_scope = cookie->site_scope;
2130	asoc->scope.local_scope = cookie->local_scope;
2131	asoc->scope.loopback_scope = cookie->loopback_scope;
2132
2133	if ((asoc->scope.ipv4_addr_legal != cookie->ipv4_addr_legal) ||
2134	    (asoc->scope.ipv6_addr_legal != cookie->ipv6_addr_legal)) {
2135		struct mbuf *op_err;
2136
2137		/*
2138		 * Houston we have a problem. The EP changed while the
2139		 * cookie was in flight. Only recourse is to abort the
2140		 * association.
2141		 */
2142		atomic_add_int(&stcb->asoc.refcnt, 1);
2143		op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, "");
2144		sctp_abort_association(inp, (struct sctp_tcb *)NULL, m, iphlen,
2145		    src, dst, sh, op_err,
2146		    mflowtype, mflowid,
2147		    vrf_id, port);
2148#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2149		SCTP_TCB_UNLOCK(stcb);
2150		SCTP_SOCKET_LOCK(so, 1);
2151		SCTP_TCB_LOCK(stcb);
2152#endif
2153		(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
2154		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_18);
2155#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2156		SCTP_SOCKET_UNLOCK(so, 1);
2157#endif
2158		atomic_subtract_int(&stcb->asoc.refcnt, 1);
2159		return (NULL);
2160	}
2161	/* process the INIT-ACK info (my info) */
2162	asoc->my_vtag = ntohl(initack_cp->init.initiate_tag);
2163	asoc->my_rwnd = ntohl(initack_cp->init.a_rwnd);
2164	asoc->pre_open_streams = ntohs(initack_cp->init.num_outbound_streams);
2165	asoc->init_seq_number = ntohl(initack_cp->init.initial_tsn);
2166	asoc->sending_seq = asoc->asconf_seq_out = asoc->str_reset_seq_out = asoc->init_seq_number;
2167	asoc->asconf_seq_out_acked = asoc->asconf_seq_out - 1;
2168	asoc->asconf_seq_in = asoc->last_acked_seq = asoc->init_seq_number - 1;
2169	asoc->str_reset_seq_in = asoc->init_seq_number;
2170
2171	asoc->advanced_peer_ack_point = asoc->last_acked_seq;
2172
2173	/* process the INIT info (peer's info) */
2174	if (netp)
2175		retval = sctp_process_init(init_cp, stcb);
2176	else
2177		retval = 0;
2178	if (retval < 0) {
2179		atomic_add_int(&stcb->asoc.refcnt, 1);
2180#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2181		SCTP_TCB_UNLOCK(stcb);
2182		SCTP_SOCKET_LOCK(so, 1);
2183		SCTP_TCB_LOCK(stcb);
2184#endif
2185		(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
2186		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_19);
2187#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2188		SCTP_SOCKET_UNLOCK(so, 1);
2189#endif
2190		atomic_subtract_int(&stcb->asoc.refcnt, 1);
2191		return (NULL);
2192	}
2193	/* load all addresses */
2194	if (sctp_load_addresses_from_init(stcb, m,
2195	    init_offset + sizeof(struct sctp_init_chunk), initack_offset,
2196	    src, dst, init_src)) {
2197		atomic_add_int(&stcb->asoc.refcnt, 1);
2198#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2199		SCTP_TCB_UNLOCK(stcb);
2200		SCTP_SOCKET_LOCK(so, 1);
2201		SCTP_TCB_LOCK(stcb);
2202#endif
2203		(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
2204		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_20);
2205#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2206		SCTP_SOCKET_UNLOCK(so, 1);
2207#endif
2208		atomic_subtract_int(&stcb->asoc.refcnt, 1);
2209		return (NULL);
2210	}
2211	/*
2212	 * verify any preceding AUTH chunk that was skipped
2213	 */
2214	/* pull the local authentication parameters from the cookie/init-ack */
2215	sctp_auth_get_cookie_params(stcb, m,
2216	    initack_offset + sizeof(struct sctp_init_ack_chunk),
2217	    initack_limit - (initack_offset + sizeof(struct sctp_init_ack_chunk)));
2218	if (auth_skipped) {
2219		struct sctp_auth_chunk *auth;
2220
2221		auth = (struct sctp_auth_chunk *)
2222		    sctp_m_getptr(m, auth_offset, auth_len, auth_chunk_buf);
2223		if ((auth == NULL) || sctp_handle_auth(stcb, auth, m, auth_offset)) {
2224			/* auth HMAC failed, dump the assoc and packet */
2225			SCTPDBG(SCTP_DEBUG_AUTH1,
2226			    "COOKIE-ECHO: AUTH failed\n");
2227			atomic_add_int(&stcb->asoc.refcnt, 1);
2228#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2229			SCTP_TCB_UNLOCK(stcb);
2230			SCTP_SOCKET_LOCK(so, 1);
2231			SCTP_TCB_LOCK(stcb);
2232#endif
2233			(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
2234			    SCTP_FROM_SCTP_INPUT + SCTP_LOC_21);
2235#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2236			SCTP_SOCKET_UNLOCK(so, 1);
2237#endif
2238			atomic_subtract_int(&stcb->asoc.refcnt, 1);
2239			return (NULL);
2240		} else {
2241			/* remaining chunks checked... good to go */
2242			stcb->asoc.authenticated = 1;
2243		}
2244	}
2245	/* update current state */
2246	SCTPDBG(SCTP_DEBUG_INPUT2, "moving to OPEN state\n");
2247	SCTP_SET_STATE(asoc, SCTP_STATE_OPEN);
2248	if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) {
2249		sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
2250		    stcb->sctp_ep, stcb, asoc->primary_destination);
2251	}
2252	sctp_stop_all_cookie_timers(stcb);
2253	SCTP_STAT_INCR_COUNTER32(sctps_passiveestab);
2254	SCTP_STAT_INCR_GAUGE32(sctps_currestab);
2255
2256	/*
2257	 * if we're doing ASCONFs, check to see if we have any new local
2258	 * addresses that need to get added to the peer (eg. addresses
2259	 * changed while cookie echo in flight).  This needs to be done
2260	 * after we go to the OPEN state to do the correct asconf
2261	 * processing. else, make sure we have the correct addresses in our
2262	 * lists
2263	 */
2264
2265	/* warning, we re-use sin, sin6, sa_store here! */
2266	/* pull in local_address (our "from" address) */
2267	switch (cookie->laddr_type) {
2268#ifdef INET
2269	case SCTP_IPV4_ADDRESS:
2270		/* source addr is IPv4 */
2271		memset(&store.sin, 0, sizeof(struct sockaddr_in));
2272		store.sin.sin_family = AF_INET;
2273		store.sin.sin_len = sizeof(struct sockaddr_in);
2274		store.sin.sin_addr.s_addr = cookie->laddress[0];
2275		break;
2276#endif
2277#ifdef INET6
2278	case SCTP_IPV6_ADDRESS:
2279		/* source addr is IPv6 */
2280		memset(&store.sin6, 0, sizeof(struct sockaddr_in6));
2281		store.sin6.sin6_family = AF_INET6;
2282		store.sin6.sin6_len = sizeof(struct sockaddr_in6);
2283		store.sin6.sin6_scope_id = cookie->scope_id;
2284		memcpy(&store.sin6.sin6_addr, cookie->laddress, sizeof(struct in6_addr));
2285		break;
2286#endif
2287	default:
2288		atomic_add_int(&stcb->asoc.refcnt, 1);
2289#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2290		SCTP_TCB_UNLOCK(stcb);
2291		SCTP_SOCKET_LOCK(so, 1);
2292		SCTP_TCB_LOCK(stcb);
2293#endif
2294		(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
2295		    SCTP_FROM_SCTP_INPUT + SCTP_LOC_22);
2296#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2297		SCTP_SOCKET_UNLOCK(so, 1);
2298#endif
2299		atomic_subtract_int(&stcb->asoc.refcnt, 1);
2300		return (NULL);
2301	}
2302
2303	/* set up to notify upper layer */
2304	*notification = SCTP_NOTIFY_ASSOC_UP;
2305	if (((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
2306	    (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) &&
2307	    (inp->sctp_socket->so_qlimit == 0)) {
2308		/*
2309		 * This is an endpoint that called connect() how it got a
2310		 * cookie that is NEW is a bit of a mystery. It must be that
2311		 * the INIT was sent, but before it got there.. a complete
2312		 * INIT/INIT-ACK/COOKIE arrived. But of course then it
2313		 * should have went to the other code.. not here.. oh well..
2314		 * a bit of protection is worth having..
2315		 */
2316		stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED;
2317#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2318		atomic_add_int(&stcb->asoc.refcnt, 1);
2319		SCTP_TCB_UNLOCK(stcb);
2320		SCTP_SOCKET_LOCK(so, 1);
2321		SCTP_TCB_LOCK(stcb);
2322		atomic_subtract_int(&stcb->asoc.refcnt, 1);
2323		if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) {
2324			SCTP_SOCKET_UNLOCK(so, 1);
2325			return (NULL);
2326		}
2327#endif
2328		soisconnected(stcb->sctp_socket);
2329#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2330		SCTP_SOCKET_UNLOCK(so, 1);
2331#endif
2332	} else if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) &&
2333	    (inp->sctp_socket->so_qlimit)) {
2334		/*
2335		 * We don't want to do anything with this one. Since it is
2336		 * the listening guy. The timer will get started for
2337		 * accepted connections in the caller.
2338		 */
2339		;
2340	}
2341	/* since we did not send a HB make sure we don't double things */
2342	if ((netp) && (*netp))
2343		(*netp)->hb_responded = 1;
2344
2345	if (stcb->asoc.sctp_autoclose_ticks &&
2346	    sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE)) {
2347		sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE, inp, stcb, NULL);
2348	}
2349	(void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered);
2350	if ((netp != NULL) && (*netp != NULL)) {
2351		/* calculate the RTT and set the encaps port */
2352		(*netp)->RTO = sctp_calculate_rto(stcb, asoc, *netp,
2353		    &cookie->time_entered, sctp_align_unsafe_makecopy,
2354		    SCTP_RTT_FROM_NON_DATA);
2355#if defined(INET) || defined(INET6)
2356		if (((*netp)->port == 0) && (port != 0)) {
2357			sctp_pathmtu_adjustment(stcb, (*netp)->mtu - sizeof(struct udphdr));
2358		}
2359		(*netp)->port = port;
2360#endif
2361	}
2362	/* respond with a COOKIE-ACK */
2363	sctp_send_cookie_ack(stcb);
2364
2365	/*
2366	 * check the address lists for any ASCONFs that need to be sent
2367	 * AFTER the cookie-ack is sent
2368	 */
2369	sctp_check_address_list(stcb, m,
2370	    initack_offset + sizeof(struct sctp_init_ack_chunk),
2371	    initack_limit - (initack_offset + sizeof(struct sctp_init_ack_chunk)),
2372	    &store.sa, cookie->local_scope, cookie->site_scope,
2373	    cookie->ipv4_scope, cookie->loopback_scope);
2374
2375
2376	return (stcb);
2377}
2378
2379/*
2380 * CODE LIKE THIS NEEDS TO RUN IF the peer supports the NAT extension, i.e
2381 * we NEED to make sure we are not already using the vtag. If so we
2382 * need to send back an ABORT-TRY-AGAIN-WITH-NEW-TAG No middle box bit!
2383	head = &SCTP_BASE_INFO(sctp_asochash)[SCTP_PCBHASH_ASOC(tag,
2384							    SCTP_BASE_INFO(hashasocmark))];
2385	LIST_FOREACH(stcb, head, sctp_asocs) {
2386	        if ((stcb->asoc.my_vtag == tag) && (stcb->rport == rport) && (inp == stcb->sctp_ep))  {
2387		       -- SEND ABORT - TRY AGAIN --
2388		}
2389	}
2390*/
2391
2392/*
2393 * handles a COOKIE-ECHO message stcb: modified to either a new or left as
2394 * existing (non-NULL) TCB
2395 */
2396static struct mbuf *
2397sctp_handle_cookie_echo(struct mbuf *m, int iphlen, int offset,
2398    struct sockaddr *src, struct sockaddr *dst,
2399    struct sctphdr *sh, struct sctp_cookie_echo_chunk *cp,
2400    struct sctp_inpcb **inp_p, struct sctp_tcb **stcb, struct sctp_nets **netp,
2401    int auth_skipped, uint32_t auth_offset, uint32_t auth_len,
2402    struct sctp_tcb **locked_tcb,
2403    uint8_t mflowtype, uint32_t mflowid,
2404    uint32_t vrf_id, uint16_t port)
2405{
2406	struct sctp_state_cookie *cookie;
2407	struct sctp_tcb *l_stcb = *stcb;
2408	struct sctp_inpcb *l_inp;
2409	struct sockaddr *to;
2410	struct sctp_pcb *ep;
2411	struct mbuf *m_sig;
2412	uint8_t calc_sig[SCTP_SIGNATURE_SIZE], tmp_sig[SCTP_SIGNATURE_SIZE];
2413	uint8_t *sig;
2414	uint8_t cookie_ok = 0;
2415	unsigned int sig_offset, cookie_offset;
2416	unsigned int cookie_len;
2417	struct timeval now;
2418	struct timeval time_expires;
2419	int notification = 0;
2420	struct sctp_nets *netl;
2421	int had_a_existing_tcb = 0;
2422	int send_int_conf = 0;
2423
2424#ifdef INET
2425	struct sockaddr_in sin;
2426
2427#endif
2428#ifdef INET6
2429	struct sockaddr_in6 sin6;
2430
2431#endif
2432
2433	SCTPDBG(SCTP_DEBUG_INPUT2,
2434	    "sctp_handle_cookie: handling COOKIE-ECHO\n");
2435
2436	if (inp_p == NULL) {
2437		return (NULL);
2438	}
2439	cookie = &cp->cookie;
2440	cookie_offset = offset + sizeof(struct sctp_chunkhdr);
2441	cookie_len = ntohs(cp->ch.chunk_length);
2442
2443	if ((cookie->peerport != sh->src_port) ||
2444	    (cookie->myport != sh->dest_port) ||
2445	    (cookie->my_vtag != sh->v_tag)) {
2446		/*
2447		 * invalid ports or bad tag.  Note that we always leave the
2448		 * v_tag in the header in network order and when we stored
2449		 * it in the my_vtag slot we also left it in network order.
2450		 * This maintains the match even though it may be in the
2451		 * opposite byte order of the machine :->
2452		 */
2453		return (NULL);
2454	}
2455	if (cookie_len < sizeof(struct sctp_cookie_echo_chunk) +
2456	    sizeof(struct sctp_init_chunk) +
2457	    sizeof(struct sctp_init_ack_chunk) + SCTP_SIGNATURE_SIZE) {
2458		/* cookie too small */
2459		return (NULL);
2460	}
2461	/*
2462	 * split off the signature into its own mbuf (since it should not be
2463	 * calculated in the sctp_hmac_m() call).
2464	 */
2465	sig_offset = offset + cookie_len - SCTP_SIGNATURE_SIZE;
2466	m_sig = m_split(m, sig_offset, M_NOWAIT);
2467	if (m_sig == NULL) {
2468		/* out of memory or ?? */
2469		return (NULL);
2470	}
2471#ifdef SCTP_MBUF_LOGGING
2472	if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MBUF_LOGGING_ENABLE) {
2473		sctp_log_mbc(m_sig, SCTP_MBUF_SPLIT);
2474	}
2475#endif
2476
2477	/*
2478	 * compute the signature/digest for the cookie
2479	 */
2480	ep = &(*inp_p)->sctp_ep;
2481	l_inp = *inp_p;
2482	if (l_stcb) {
2483		SCTP_TCB_UNLOCK(l_stcb);
2484	}
2485	SCTP_INP_RLOCK(l_inp);
2486	if (l_stcb) {
2487		SCTP_TCB_LOCK(l_stcb);
2488	}
2489	/* which cookie is it? */
2490	if ((cookie->time_entered.tv_sec < (long)ep->time_of_secret_change) &&
2491	    (ep->current_secret_number != ep->last_secret_number)) {
2492		/* it's the old cookie */
2493		(void)sctp_hmac_m(SCTP_HMAC,
2494		    (uint8_t *) ep->secret_key[(int)ep->last_secret_number],
2495		    SCTP_SECRET_SIZE, m, cookie_offset, calc_sig, 0);
2496	} else {
2497		/* it's the current cookie */
2498		(void)sctp_hmac_m(SCTP_HMAC,
2499		    (uint8_t *) ep->secret_key[(int)ep->current_secret_number],
2500		    SCTP_SECRET_SIZE, m, cookie_offset, calc_sig, 0);
2501	}
2502	/* get the signature */
2503	SCTP_INP_RUNLOCK(l_inp);
2504	sig = (uint8_t *) sctp_m_getptr(m_sig, 0, SCTP_SIGNATURE_SIZE, (uint8_t *) & tmp_sig);
2505	if (sig == NULL) {
2506		/* couldn't find signature */
2507		sctp_m_freem(m_sig);
2508		return (NULL);
2509	}
2510	/* compare the received digest with the computed digest */
2511	if (memcmp(calc_sig, sig, SCTP_SIGNATURE_SIZE) != 0) {
2512		/* try the old cookie? */
2513		if ((cookie->time_entered.tv_sec == (long)ep->time_of_secret_change) &&
2514		    (ep->current_secret_number != ep->last_secret_number)) {
2515			/* compute digest with old */
2516			(void)sctp_hmac_m(SCTP_HMAC,
2517			    (uint8_t *) ep->secret_key[(int)ep->last_secret_number],
2518			    SCTP_SECRET_SIZE, m, cookie_offset, calc_sig, 0);
2519			/* compare */
2520			if (memcmp(calc_sig, sig, SCTP_SIGNATURE_SIZE) == 0)
2521				cookie_ok = 1;
2522		}
2523	} else {
2524		cookie_ok = 1;
2525	}
2526
2527	/*
2528	 * Now before we continue we must reconstruct our mbuf so that
2529	 * normal processing of any other chunks will work.
2530	 */
2531	{
2532		struct mbuf *m_at;
2533
2534		m_at = m;
2535		while (SCTP_BUF_NEXT(m_at) != NULL) {
2536			m_at = SCTP_BUF_NEXT(m_at);
2537		}
2538		SCTP_BUF_NEXT(m_at) = m_sig;
2539	}
2540
2541	if (cookie_ok == 0) {
2542		SCTPDBG(SCTP_DEBUG_INPUT2, "handle_cookie_echo: cookie signature validation failed!\n");
2543		SCTPDBG(SCTP_DEBUG_INPUT2,
2544		    "offset = %u, cookie_offset = %u, sig_offset = %u\n",
2545		    (uint32_t) offset, cookie_offset, sig_offset);
2546		return (NULL);
2547	}
2548	/*
2549	 * check the cookie timestamps to be sure it's not stale
2550	 */
2551	(void)SCTP_GETTIME_TIMEVAL(&now);
2552	/* Expire time is in Ticks, so we convert to seconds */
2553	time_expires.tv_sec = cookie->time_entered.tv_sec + TICKS_TO_SEC(cookie->cookie_life);
2554	time_expires.tv_usec = cookie->time_entered.tv_usec;
2555	/*
2556	 * TODO sctp_constants.h needs alternative time macros when _KERNEL
2557	 * is undefined.
2558	 */
2559	if (timevalcmp(&now, &time_expires, >)) {
2560		/* cookie is stale! */
2561		struct mbuf *op_err;
2562		struct sctp_error_stale_cookie *cause;
2563		uint32_t tim;
2564
2565		op_err = sctp_get_mbuf_for_msg(sizeof(struct sctp_error_stale_cookie),
2566		    0, M_NOWAIT, 1, MT_DATA);
2567		if (op_err == NULL) {
2568			/* FOOBAR */
2569			return (NULL);
2570		}
2571		/* Set the len */
2572		SCTP_BUF_LEN(op_err) = sizeof(struct sctp_error_stale_cookie);
2573		cause = mtod(op_err, struct sctp_error_stale_cookie *);
2574		cause->cause.code = htons(SCTP_CAUSE_STALE_COOKIE);
2575		cause->cause.length = htons((sizeof(struct sctp_paramhdr) +
2576		    (sizeof(uint32_t))));
2577		/* seconds to usec */
2578		tim = (now.tv_sec - time_expires.tv_sec) * 1000000;
2579		/* add in usec */
2580		if (tim == 0)
2581			tim = now.tv_usec - cookie->time_entered.tv_usec;
2582		cause->stale_time = htonl(tim);
2583		sctp_send_operr_to(src, dst, sh, cookie->peers_vtag, op_err,
2584		    mflowtype, mflowid, l_inp->fibnum,
2585		    vrf_id, port);
2586		return (NULL);
2587	}
2588	/*
2589	 * Now we must see with the lookup address if we have an existing
2590	 * asoc. This will only happen if we were in the COOKIE-WAIT state
2591	 * and a INIT collided with us and somewhere the peer sent the
2592	 * cookie on another address besides the single address our assoc
2593	 * had for him. In this case we will have one of the tie-tags set at
2594	 * least AND the address field in the cookie can be used to look it
2595	 * up.
2596	 */
2597	to = NULL;
2598	switch (cookie->addr_type) {
2599#ifdef INET6
2600	case SCTP_IPV6_ADDRESS:
2601		memset(&sin6, 0, sizeof(sin6));
2602		sin6.sin6_family = AF_INET6;
2603		sin6.sin6_len = sizeof(sin6);
2604		sin6.sin6_port = sh->src_port;
2605		sin6.sin6_scope_id = cookie->scope_id;
2606		memcpy(&sin6.sin6_addr.s6_addr, cookie->address,
2607		    sizeof(sin6.sin6_addr.s6_addr));
2608		to = (struct sockaddr *)&sin6;
2609		break;
2610#endif
2611#ifdef INET
2612	case SCTP_IPV4_ADDRESS:
2613		memset(&sin, 0, sizeof(sin));
2614		sin.sin_family = AF_INET;
2615		sin.sin_len = sizeof(sin);
2616		sin.sin_port = sh->src_port;
2617		sin.sin_addr.s_addr = cookie->address[0];
2618		to = (struct sockaddr *)&sin;
2619		break;
2620#endif
2621	default:
2622		/* This should not happen */
2623		return (NULL);
2624	}
2625	if (*stcb == NULL) {
2626		/* Yep, lets check */
2627		*stcb = sctp_findassociation_ep_addr(inp_p, to, netp, dst, NULL);
2628		if (*stcb == NULL) {
2629			/*
2630			 * We should have only got back the same inp. If we
2631			 * got back a different ep we have a problem. The
2632			 * original findep got back l_inp and now
2633			 */
2634			if (l_inp != *inp_p) {
2635				SCTP_PRINTF("Bad problem find_ep got a diff inp then special_locate?\n");
2636			}
2637		} else {
2638			if (*locked_tcb == NULL) {
2639				/*
2640				 * In this case we found the assoc only
2641				 * after we locked the create lock. This
2642				 * means we are in a colliding case and we
2643				 * must make sure that we unlock the tcb if
2644				 * its one of the cases where we throw away
2645				 * the incoming packets.
2646				 */
2647				*locked_tcb = *stcb;
2648
2649				/*
2650				 * We must also increment the inp ref count
2651				 * since the ref_count flags was set when we
2652				 * did not find the TCB, now we found it
2653				 * which reduces the refcount.. we must
2654				 * raise it back out to balance it all :-)
2655				 */
2656				SCTP_INP_INCR_REF((*stcb)->sctp_ep);
2657				if ((*stcb)->sctp_ep != l_inp) {
2658					SCTP_PRINTF("Huh? ep:%p diff then l_inp:%p?\n",
2659					    (void *)(*stcb)->sctp_ep, (void *)l_inp);
2660				}
2661			}
2662		}
2663	}
2664	cookie_len -= SCTP_SIGNATURE_SIZE;
2665	if (*stcb == NULL) {
2666		/* this is the "normal" case... get a new TCB */
2667		*stcb = sctp_process_cookie_new(m, iphlen, offset, src, dst, sh,
2668		    cookie, cookie_len, *inp_p,
2669		    netp, to, &notification,
2670		    auth_skipped, auth_offset, auth_len,
2671		    mflowtype, mflowid,
2672		    vrf_id, port);
2673	} else {
2674		/* this is abnormal... cookie-echo on existing TCB */
2675		had_a_existing_tcb = 1;
2676		*stcb = sctp_process_cookie_existing(m, iphlen, offset,
2677		    src, dst, sh,
2678		    cookie, cookie_len, *inp_p, *stcb, netp, to,
2679		    &notification, auth_skipped, auth_offset, auth_len,
2680		    mflowtype, mflowid,
2681		    vrf_id, port);
2682	}
2683
2684	if (*stcb == NULL) {
2685		/* still no TCB... must be bad cookie-echo */
2686		return (NULL);
2687	}
2688	if (*netp != NULL) {
2689		(*netp)->flowtype = mflowtype;
2690		(*netp)->flowid = mflowid;
2691	}
2692	/*
2693	 * Ok, we built an association so confirm the address we sent the
2694	 * INIT-ACK to.
2695	 */
2696	netl = sctp_findnet(*stcb, to);
2697	/*
2698	 * This code should in theory NOT run but
2699	 */
2700	if (netl == NULL) {
2701		/* TSNH! Huh, why do I need to add this address here? */
2702		if (sctp_add_remote_addr(*stcb, to, NULL, SCTP_DONOT_SETSCOPE, SCTP_IN_COOKIE_PROC)) {
2703			return (NULL);
2704		}
2705		netl = sctp_findnet(*stcb, to);
2706	}
2707	if (netl) {
2708		if (netl->dest_state & SCTP_ADDR_UNCONFIRMED) {
2709			netl->dest_state &= ~SCTP_ADDR_UNCONFIRMED;
2710			(void)sctp_set_primary_addr((*stcb), (struct sockaddr *)NULL,
2711			    netl);
2712			send_int_conf = 1;
2713		}
2714	}
2715	sctp_start_net_timers(*stcb);
2716	if ((*inp_p)->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) {
2717		if (!had_a_existing_tcb ||
2718		    (((*inp_p)->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) == 0)) {
2719			/*
2720			 * If we have a NEW cookie or the connect never
2721			 * reached the connected state during collision we
2722			 * must do the TCP accept thing.
2723			 */
2724			struct socket *so, *oso;
2725			struct sctp_inpcb *inp;
2726
2727			if (notification == SCTP_NOTIFY_ASSOC_RESTART) {
2728				/*
2729				 * For a restart we will keep the same
2730				 * socket, no need to do anything. I THINK!!
2731				 */
2732				sctp_ulp_notify(notification, *stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
2733				if (send_int_conf) {
2734					sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED,
2735					    (*stcb), 0, (void *)netl, SCTP_SO_NOT_LOCKED);
2736				}
2737				return (m);
2738			}
2739			oso = (*inp_p)->sctp_socket;
2740			atomic_add_int(&(*stcb)->asoc.refcnt, 1);
2741			SCTP_TCB_UNLOCK((*stcb));
2742			CURVNET_SET(oso->so_vnet);
2743			so = sonewconn(oso, 0
2744			    );
2745			CURVNET_RESTORE();
2746			SCTP_TCB_LOCK((*stcb));
2747			atomic_subtract_int(&(*stcb)->asoc.refcnt, 1);
2748
2749			if (so == NULL) {
2750				struct mbuf *op_err;
2751
2752#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2753				struct socket *pcb_so;
2754
2755#endif
2756				/* Too many sockets */
2757				SCTPDBG(SCTP_DEBUG_INPUT1, "process_cookie_new: no room for another socket!\n");
2758				op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, "");
2759				sctp_abort_association(*inp_p, NULL, m, iphlen,
2760				    src, dst, sh, op_err,
2761				    mflowtype, mflowid,
2762				    vrf_id, port);
2763#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2764				pcb_so = SCTP_INP_SO(*inp_p);
2765				atomic_add_int(&(*stcb)->asoc.refcnt, 1);
2766				SCTP_TCB_UNLOCK((*stcb));
2767				SCTP_SOCKET_LOCK(pcb_so, 1);
2768				SCTP_TCB_LOCK((*stcb));
2769				atomic_subtract_int(&(*stcb)->asoc.refcnt, 1);
2770#endif
2771				(void)sctp_free_assoc(*inp_p, *stcb, SCTP_NORMAL_PROC,
2772				    SCTP_FROM_SCTP_INPUT + SCTP_LOC_23);
2773#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2774				SCTP_SOCKET_UNLOCK(pcb_so, 1);
2775#endif
2776				return (NULL);
2777			}
2778			inp = (struct sctp_inpcb *)so->so_pcb;
2779			SCTP_INP_INCR_REF(inp);
2780			/*
2781			 * We add the unbound flag here so that if we get an
2782			 * soabort() before we get the move_pcb done, we
2783			 * will properly cleanup.
2784			 */
2785			inp->sctp_flags = (SCTP_PCB_FLAGS_TCPTYPE |
2786			    SCTP_PCB_FLAGS_CONNECTED |
2787			    SCTP_PCB_FLAGS_IN_TCPPOOL |
2788			    SCTP_PCB_FLAGS_UNBOUND |
2789			    (SCTP_PCB_COPY_FLAGS & (*inp_p)->sctp_flags) |
2790			    SCTP_PCB_FLAGS_DONT_WAKE);
2791			inp->sctp_features = (*inp_p)->sctp_features;
2792			inp->sctp_mobility_features = (*inp_p)->sctp_mobility_features;
2793			inp->sctp_socket = so;
2794			inp->sctp_frag_point = (*inp_p)->sctp_frag_point;
2795			inp->max_cwnd = (*inp_p)->max_cwnd;
2796			inp->sctp_cmt_on_off = (*inp_p)->sctp_cmt_on_off;
2797			inp->ecn_supported = (*inp_p)->ecn_supported;
2798			inp->prsctp_supported = (*inp_p)->prsctp_supported;
2799			inp->auth_supported = (*inp_p)->auth_supported;
2800			inp->asconf_supported = (*inp_p)->asconf_supported;
2801			inp->reconfig_supported = (*inp_p)->reconfig_supported;
2802			inp->nrsack_supported = (*inp_p)->nrsack_supported;
2803			inp->pktdrop_supported = (*inp_p)->pktdrop_supported;
2804			inp->partial_delivery_point = (*inp_p)->partial_delivery_point;
2805			inp->sctp_context = (*inp_p)->sctp_context;
2806			inp->local_strreset_support = (*inp_p)->local_strreset_support;
2807			inp->fibnum = (*inp_p)->fibnum;
2808			inp->inp_starting_point_for_iterator = NULL;
2809			/*
2810			 * copy in the authentication parameters from the
2811			 * original endpoint
2812			 */
2813			if (inp->sctp_ep.local_hmacs)
2814				sctp_free_hmaclist(inp->sctp_ep.local_hmacs);
2815			inp->sctp_ep.local_hmacs =
2816			    sctp_copy_hmaclist((*inp_p)->sctp_ep.local_hmacs);
2817			if (inp->sctp_ep.local_auth_chunks)
2818				sctp_free_chunklist(inp->sctp_ep.local_auth_chunks);
2819			inp->sctp_ep.local_auth_chunks =
2820			    sctp_copy_chunklist((*inp_p)->sctp_ep.local_auth_chunks);
2821
2822			/*
2823			 * Now we must move it from one hash table to
2824			 * another and get the tcb in the right place.
2825			 */
2826
2827			/*
2828			 * This is where the one-2-one socket is put into
2829			 * the accept state waiting for the accept!
2830			 */
2831			if (*stcb) {
2832				(*stcb)->asoc.state |= SCTP_STATE_IN_ACCEPT_QUEUE;
2833			}
2834			sctp_move_pcb_and_assoc(*inp_p, inp, *stcb);
2835
2836			atomic_add_int(&(*stcb)->asoc.refcnt, 1);
2837			SCTP_TCB_UNLOCK((*stcb));
2838
2839			sctp_pull_off_control_to_new_inp((*inp_p), inp, *stcb,
2840			    0);
2841			SCTP_TCB_LOCK((*stcb));
2842			atomic_subtract_int(&(*stcb)->asoc.refcnt, 1);
2843
2844
2845			/*
2846			 * now we must check to see if we were aborted while
2847			 * the move was going on and the lock/unlock
2848			 * happened.
2849			 */
2850			if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) {
2851				/*
2852				 * yep it was, we leave the assoc attached
2853				 * to the socket since the sctp_inpcb_free()
2854				 * call will send an abort for us.
2855				 */
2856				SCTP_INP_DECR_REF(inp);
2857				return (NULL);
2858			}
2859			SCTP_INP_DECR_REF(inp);
2860			/* Switch over to the new guy */
2861			*inp_p = inp;
2862			sctp_ulp_notify(notification, *stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
2863			if (send_int_conf) {
2864				sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED,
2865				    (*stcb), 0, (void *)netl, SCTP_SO_NOT_LOCKED);
2866			}
2867			/*
2868			 * Pull it from the incomplete queue and wake the
2869			 * guy
2870			 */
2871#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2872			atomic_add_int(&(*stcb)->asoc.refcnt, 1);
2873			SCTP_TCB_UNLOCK((*stcb));
2874			SCTP_SOCKET_LOCK(so, 1);
2875#endif
2876			soisconnected(so);
2877#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2878			SCTP_TCB_LOCK((*stcb));
2879			atomic_subtract_int(&(*stcb)->asoc.refcnt, 1);
2880			SCTP_SOCKET_UNLOCK(so, 1);
2881#endif
2882			return (m);
2883		}
2884	}
2885	if (notification) {
2886		sctp_ulp_notify(notification, *stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
2887	}
2888	if (send_int_conf) {
2889		sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_CONFIRMED,
2890		    (*stcb), 0, (void *)netl, SCTP_SO_NOT_LOCKED);
2891	}
2892	return (m);
2893}
2894
2895static void
2896sctp_handle_cookie_ack(struct sctp_cookie_ack_chunk *cp SCTP_UNUSED,
2897    struct sctp_tcb *stcb, struct sctp_nets *net)
2898{
2899	/* cp must not be used, others call this without a c-ack :-) */
2900	struct sctp_association *asoc;
2901
2902	SCTPDBG(SCTP_DEBUG_INPUT2,
2903	    "sctp_handle_cookie_ack: handling COOKIE-ACK\n");
2904	if ((stcb == NULL) || (net == NULL)) {
2905		return;
2906	}
2907	asoc = &stcb->asoc;
2908
2909	sctp_stop_all_cookie_timers(stcb);
2910	/* process according to association state */
2911	if (SCTP_GET_STATE(asoc) == SCTP_STATE_COOKIE_ECHOED) {
2912		/* state change only needed when I am in right state */
2913		SCTPDBG(SCTP_DEBUG_INPUT2, "moving to OPEN state\n");
2914		SCTP_SET_STATE(asoc, SCTP_STATE_OPEN);
2915		sctp_start_net_timers(stcb);
2916		if (asoc->state & SCTP_STATE_SHUTDOWN_PENDING) {
2917			sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
2918			    stcb->sctp_ep, stcb, asoc->primary_destination);
2919
2920		}
2921		/* update RTO */
2922		SCTP_STAT_INCR_COUNTER32(sctps_activeestab);
2923		SCTP_STAT_INCR_GAUGE32(sctps_currestab);
2924		if (asoc->overall_error_count == 0) {
2925			net->RTO = sctp_calculate_rto(stcb, asoc, net,
2926			    &asoc->time_entered, sctp_align_safe_nocopy,
2927			    SCTP_RTT_FROM_NON_DATA);
2928		}
2929		(void)SCTP_GETTIME_TIMEVAL(&asoc->time_entered);
2930		sctp_ulp_notify(SCTP_NOTIFY_ASSOC_UP, stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
2931		if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
2932		    (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) {
2933#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2934			struct socket *so;
2935
2936#endif
2937			stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED;
2938#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2939			so = SCTP_INP_SO(stcb->sctp_ep);
2940			atomic_add_int(&stcb->asoc.refcnt, 1);
2941			SCTP_TCB_UNLOCK(stcb);
2942			SCTP_SOCKET_LOCK(so, 1);
2943			SCTP_TCB_LOCK(stcb);
2944			atomic_subtract_int(&stcb->asoc.refcnt, 1);
2945#endif
2946			if ((stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) == 0) {
2947				soisconnected(stcb->sctp_socket);
2948			}
2949#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
2950			SCTP_SOCKET_UNLOCK(so, 1);
2951#endif
2952		}
2953		/*
2954		 * since we did not send a HB make sure we don't double
2955		 * things
2956		 */
2957		net->hb_responded = 1;
2958
2959		if (stcb->asoc.state & SCTP_STATE_CLOSED_SOCKET) {
2960			/*
2961			 * We don't need to do the asconf thing, nor hb or
2962			 * autoclose if the socket is closed.
2963			 */
2964			goto closed_socket;
2965		}
2966		sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, stcb->sctp_ep,
2967		    stcb, net);
2968
2969
2970		if (stcb->asoc.sctp_autoclose_ticks &&
2971		    sctp_is_feature_on(stcb->sctp_ep, SCTP_PCB_FLAGS_AUTOCLOSE)) {
2972			sctp_timer_start(SCTP_TIMER_TYPE_AUTOCLOSE,
2973			    stcb->sctp_ep, stcb, NULL);
2974		}
2975		/*
2976		 * send ASCONF if parameters are pending and ASCONFs are
2977		 * allowed (eg. addresses changed when init/cookie echo were
2978		 * in flight)
2979		 */
2980		if ((sctp_is_feature_on(stcb->sctp_ep, SCTP_PCB_FLAGS_DO_ASCONF)) &&
2981		    (stcb->asoc.asconf_supported == 1) &&
2982		    (!TAILQ_EMPTY(&stcb->asoc.asconf_queue))) {
2983#ifdef SCTP_TIMER_BASED_ASCONF
2984			sctp_timer_start(SCTP_TIMER_TYPE_ASCONF,
2985			    stcb->sctp_ep, stcb,
2986			    stcb->asoc.primary_destination);
2987#else
2988			sctp_send_asconf(stcb, stcb->asoc.primary_destination,
2989			    SCTP_ADDR_NOT_LOCKED);
2990#endif
2991		}
2992	}
2993closed_socket:
2994	/* Toss the cookie if I can */
2995	sctp_toss_old_cookies(stcb, asoc);
2996	if (!TAILQ_EMPTY(&asoc->sent_queue)) {
2997		/* Restart the timer if we have pending data */
2998		struct sctp_tmit_chunk *chk;
2999
3000		chk = TAILQ_FIRST(&asoc->sent_queue);
3001		sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, chk->whoTo);
3002	}
3003}
3004
3005static void
3006sctp_handle_ecn_echo(struct sctp_ecne_chunk *cp,
3007    struct sctp_tcb *stcb)
3008{
3009	struct sctp_nets *net;
3010	struct sctp_tmit_chunk *lchk;
3011	struct sctp_ecne_chunk bkup;
3012	uint8_t override_bit;
3013	uint32_t tsn, window_data_tsn;
3014	int len;
3015	unsigned int pkt_cnt;
3016
3017	len = ntohs(cp->ch.chunk_length);
3018	if ((len != sizeof(struct sctp_ecne_chunk)) &&
3019	    (len != sizeof(struct old_sctp_ecne_chunk))) {
3020		return;
3021	}
3022	if (len == sizeof(struct old_sctp_ecne_chunk)) {
3023		/* Its the old format */
3024		memcpy(&bkup, cp, sizeof(struct old_sctp_ecne_chunk));
3025		bkup.num_pkts_since_cwr = htonl(1);
3026		cp = &bkup;
3027	}
3028	SCTP_STAT_INCR(sctps_recvecne);
3029	tsn = ntohl(cp->tsn);
3030	pkt_cnt = ntohl(cp->num_pkts_since_cwr);
3031	lchk = TAILQ_LAST(&stcb->asoc.send_queue, sctpchunk_listhead);
3032	if (lchk == NULL) {
3033		window_data_tsn = stcb->asoc.sending_seq - 1;
3034	} else {
3035		window_data_tsn = lchk->rec.data.TSN_seq;
3036	}
3037
3038	/* Find where it was sent to if possible. */
3039	net = NULL;
3040	TAILQ_FOREACH(lchk, &stcb->asoc.sent_queue, sctp_next) {
3041		if (lchk->rec.data.TSN_seq == tsn) {
3042			net = lchk->whoTo;
3043			net->ecn_prev_cwnd = lchk->rec.data.cwnd_at_send;
3044			break;
3045		}
3046		if (SCTP_TSN_GT(lchk->rec.data.TSN_seq, tsn)) {
3047			break;
3048		}
3049	}
3050	if (net == NULL) {
3051		/*
3052		 * What to do. A previous send of a CWR was possibly lost.
3053		 * See how old it is, we may have it marked on the actual
3054		 * net.
3055		 */
3056		TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
3057			if (tsn == net->last_cwr_tsn) {
3058				/* Found him, send it off */
3059				break;
3060			}
3061		}
3062		if (net == NULL) {
3063			/*
3064			 * If we reach here, we need to send a special CWR
3065			 * that says hey, we did this a long time ago and
3066			 * you lost the response.
3067			 */
3068			net = TAILQ_FIRST(&stcb->asoc.nets);
3069			if (net == NULL) {
3070				/* TSNH */
3071				return;
3072			}
3073			override_bit = SCTP_CWR_REDUCE_OVERRIDE;
3074		} else {
3075			override_bit = 0;
3076		}
3077	} else {
3078		override_bit = 0;
3079	}
3080	if (SCTP_TSN_GT(tsn, net->cwr_window_tsn) &&
3081	    ((override_bit & SCTP_CWR_REDUCE_OVERRIDE) == 0)) {
3082		/*
3083		 * JRS - Use the congestion control given in the pluggable
3084		 * CC module
3085		 */
3086		stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo(stcb, net, 0, pkt_cnt);
3087		/*
3088		 * We reduce once every RTT. So we will only lower cwnd at
3089		 * the next sending seq i.e. the window_data_tsn
3090		 */
3091		net->cwr_window_tsn = window_data_tsn;
3092		net->ecn_ce_pkt_cnt += pkt_cnt;
3093		net->lost_cnt = pkt_cnt;
3094		net->last_cwr_tsn = tsn;
3095	} else {
3096		override_bit |= SCTP_CWR_IN_SAME_WINDOW;
3097		if (SCTP_TSN_GT(tsn, net->last_cwr_tsn) &&
3098		    ((override_bit & SCTP_CWR_REDUCE_OVERRIDE) == 0)) {
3099			/*
3100			 * Another loss in the same window update how many
3101			 * marks/packets lost we have had.
3102			 */
3103			int cnt = 1;
3104
3105			if (pkt_cnt > net->lost_cnt) {
3106				/* Should be the case */
3107				cnt = (pkt_cnt - net->lost_cnt);
3108				net->ecn_ce_pkt_cnt += cnt;
3109			}
3110			net->lost_cnt = pkt_cnt;
3111			net->last_cwr_tsn = tsn;
3112			/*
3113			 * Most CC functions will ignore this call, since we
3114			 * are in-window yet of the initial CE the peer saw.
3115			 */
3116			stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo(stcb, net, 1, cnt);
3117		}
3118	}
3119	/*
3120	 * We always send a CWR this way if our previous one was lost our
3121	 * peer will get an update, or if it is not time again to reduce we
3122	 * still get the cwr to the peer. Note we set the override when we
3123	 * could not find the TSN on the chunk or the destination network.
3124	 */
3125	sctp_send_cwr(stcb, net, net->last_cwr_tsn, override_bit);
3126}
3127
3128static void
3129sctp_handle_ecn_cwr(struct sctp_cwr_chunk *cp, struct sctp_tcb *stcb, struct sctp_nets *net)
3130{
3131	/*
3132	 * Here we get a CWR from the peer. We must look in the outqueue and
3133	 * make sure that we have a covered ECNE in the control chunk part.
3134	 * If so remove it.
3135	 */
3136	struct sctp_tmit_chunk *chk;
3137	struct sctp_ecne_chunk *ecne;
3138	int override;
3139	uint32_t cwr_tsn;
3140
3141	cwr_tsn = ntohl(cp->tsn);
3142	override = cp->ch.chunk_flags & SCTP_CWR_REDUCE_OVERRIDE;
3143	TAILQ_FOREACH(chk, &stcb->asoc.control_send_queue, sctp_next) {
3144		if (chk->rec.chunk_id.id != SCTP_ECN_ECHO) {
3145			continue;
3146		}
3147		if ((override == 0) && (chk->whoTo != net)) {
3148			/* Must be from the right src unless override is set */
3149			continue;
3150		}
3151		ecne = mtod(chk->data, struct sctp_ecne_chunk *);
3152		if (SCTP_TSN_GE(cwr_tsn, ntohl(ecne->tsn))) {
3153			/* this covers this ECNE, we can remove it */
3154			stcb->asoc.ecn_echo_cnt_onq--;
3155			TAILQ_REMOVE(&stcb->asoc.control_send_queue, chk,
3156			    sctp_next);
3157			sctp_m_freem(chk->data);
3158			chk->data = NULL;
3159			stcb->asoc.ctrl_queue_cnt--;
3160			sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED);
3161			if (override == 0) {
3162				break;
3163			}
3164		}
3165	}
3166}
3167
3168static void
3169sctp_handle_shutdown_complete(struct sctp_shutdown_complete_chunk *cp SCTP_UNUSED,
3170    struct sctp_tcb *stcb, struct sctp_nets *net)
3171{
3172	struct sctp_association *asoc;
3173
3174#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
3175	struct socket *so;
3176
3177#endif
3178
3179	SCTPDBG(SCTP_DEBUG_INPUT2,
3180	    "sctp_handle_shutdown_complete: handling SHUTDOWN-COMPLETE\n");
3181	if (stcb == NULL)
3182		return;
3183
3184	asoc = &stcb->asoc;
3185	/* process according to association state */
3186	if (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_ACK_SENT) {
3187		/* unexpected SHUTDOWN-COMPLETE... so ignore... */
3188		SCTPDBG(SCTP_DEBUG_INPUT2,
3189		    "sctp_handle_shutdown_complete: not in SCTP_STATE_SHUTDOWN_ACK_SENT --- ignore\n");
3190		SCTP_TCB_UNLOCK(stcb);
3191		return;
3192	}
3193	/* notify upper layer protocol */
3194	if (stcb->sctp_socket) {
3195		sctp_ulp_notify(SCTP_NOTIFY_ASSOC_DOWN, stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
3196	}
3197#ifdef INVARIANTS
3198	if (!TAILQ_EMPTY(&asoc->send_queue) ||
3199	    !TAILQ_EMPTY(&asoc->sent_queue) ||
3200	    !stcb->asoc.ss_functions.sctp_ss_is_empty(stcb, asoc)) {
3201		panic("Queues are not empty when handling SHUTDOWN-COMPLETE");
3202	}
3203#endif
3204	/* stop the timer */
3205	sctp_timer_stop(SCTP_TIMER_TYPE_SHUTDOWNACK, stcb->sctp_ep, stcb, net,
3206	    SCTP_FROM_SCTP_INPUT + SCTP_LOC_24);
3207	SCTP_STAT_INCR_COUNTER32(sctps_shutdown);
3208	/* free the TCB */
3209	SCTPDBG(SCTP_DEBUG_INPUT2,
3210	    "sctp_handle_shutdown_complete: calls free-asoc\n");
3211#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
3212	so = SCTP_INP_SO(stcb->sctp_ep);
3213	atomic_add_int(&stcb->asoc.refcnt, 1);
3214	SCTP_TCB_UNLOCK(stcb);
3215	SCTP_SOCKET_LOCK(so, 1);
3216	SCTP_TCB_LOCK(stcb);
3217	atomic_subtract_int(&stcb->asoc.refcnt, 1);
3218#endif
3219	(void)sctp_free_assoc(stcb->sctp_ep, stcb, SCTP_NORMAL_PROC,
3220	    SCTP_FROM_SCTP_INPUT + SCTP_LOC_25);
3221#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
3222	SCTP_SOCKET_UNLOCK(so, 1);
3223#endif
3224	return;
3225}
3226
3227static int
3228process_chunk_drop(struct sctp_tcb *stcb, struct sctp_chunk_desc *desc,
3229    struct sctp_nets *net, uint8_t flg)
3230{
3231	switch (desc->chunk_type) {
3232	case SCTP_DATA:
3233		/* find the tsn to resend (possibly */
3234		{
3235			uint32_t tsn;
3236			struct sctp_tmit_chunk *tp1;
3237
3238			tsn = ntohl(desc->tsn_ifany);
3239			TAILQ_FOREACH(tp1, &stcb->asoc.sent_queue, sctp_next) {
3240				if (tp1->rec.data.TSN_seq == tsn) {
3241					/* found it */
3242					break;
3243				}
3244				if (SCTP_TSN_GT(tp1->rec.data.TSN_seq, tsn)) {
3245					/* not found */
3246					tp1 = NULL;
3247					break;
3248				}
3249			}
3250			if (tp1 == NULL) {
3251				/*
3252				 * Do it the other way , aka without paying
3253				 * attention to queue seq order.
3254				 */
3255				SCTP_STAT_INCR(sctps_pdrpdnfnd);
3256				TAILQ_FOREACH(tp1, &stcb->asoc.sent_queue, sctp_next) {
3257					if (tp1->rec.data.TSN_seq == tsn) {
3258						/* found it */
3259						break;
3260					}
3261				}
3262			}
3263			if (tp1 == NULL) {
3264				SCTP_STAT_INCR(sctps_pdrptsnnf);
3265			}
3266			if ((tp1) && (tp1->sent < SCTP_DATAGRAM_ACKED)) {
3267				uint8_t *ddp;
3268
3269				if (((flg & SCTP_BADCRC) == 0) &&
3270				    ((flg & SCTP_FROM_MIDDLE_BOX) == 0)) {
3271					return (0);
3272				}
3273				if ((stcb->asoc.peers_rwnd == 0) &&
3274				    ((flg & SCTP_FROM_MIDDLE_BOX) == 0)) {
3275					SCTP_STAT_INCR(sctps_pdrpdiwnp);
3276					return (0);
3277				}
3278				if (stcb->asoc.peers_rwnd == 0 &&
3279				    (flg & SCTP_FROM_MIDDLE_BOX)) {
3280					SCTP_STAT_INCR(sctps_pdrpdizrw);
3281					return (0);
3282				}
3283				ddp = (uint8_t *) (mtod(tp1->data, caddr_t)+
3284				    sizeof(struct sctp_data_chunk));
3285				{
3286					unsigned int iii;
3287
3288					for (iii = 0; iii < sizeof(desc->data_bytes);
3289					    iii++) {
3290						if (ddp[iii] != desc->data_bytes[iii]) {
3291							SCTP_STAT_INCR(sctps_pdrpbadd);
3292							return (-1);
3293						}
3294					}
3295				}
3296
3297				if (tp1->do_rtt) {
3298					/*
3299					 * this guy had a RTO calculation
3300					 * pending on it, cancel it
3301					 */
3302					if (tp1->whoTo->rto_needed == 0) {
3303						tp1->whoTo->rto_needed = 1;
3304					}
3305					tp1->do_rtt = 0;
3306				}
3307				SCTP_STAT_INCR(sctps_pdrpmark);
3308				if (tp1->sent != SCTP_DATAGRAM_RESEND)
3309					sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt);
3310				/*
3311				 * mark it as if we were doing a FR, since
3312				 * we will be getting gap ack reports behind
3313				 * the info from the router.
3314				 */
3315				tp1->rec.data.doing_fast_retransmit = 1;
3316				/*
3317				 * mark the tsn with what sequences can
3318				 * cause a new FR.
3319				 */
3320				if (TAILQ_EMPTY(&stcb->asoc.send_queue)) {
3321					tp1->rec.data.fast_retran_tsn = stcb->asoc.sending_seq;
3322				} else {
3323					tp1->rec.data.fast_retran_tsn = (TAILQ_FIRST(&stcb->asoc.send_queue))->rec.data.TSN_seq;
3324				}
3325
3326				/* restart the timer */
3327				sctp_timer_stop(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep,
3328				    stcb, tp1->whoTo,
3329				    SCTP_FROM_SCTP_INPUT + SCTP_LOC_26);
3330				sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep,
3331				    stcb, tp1->whoTo);
3332
3333				/* fix counts and things */
3334				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_FLIGHT_LOGGING_ENABLE) {
3335					sctp_misc_ints(SCTP_FLIGHT_LOG_DOWN_PDRP,
3336					    tp1->whoTo->flight_size,
3337					    tp1->book_size,
3338					    (uintptr_t) stcb,
3339					    tp1->rec.data.TSN_seq);
3340				}
3341				if (tp1->sent < SCTP_DATAGRAM_RESEND) {
3342					sctp_flight_size_decrease(tp1);
3343					sctp_total_flight_decrease(stcb, tp1);
3344				}
3345				tp1->sent = SCTP_DATAGRAM_RESEND;
3346			} {
3347				/* audit code */
3348				unsigned int audit;
3349
3350				audit = 0;
3351				TAILQ_FOREACH(tp1, &stcb->asoc.sent_queue, sctp_next) {
3352					if (tp1->sent == SCTP_DATAGRAM_RESEND)
3353						audit++;
3354				}
3355				TAILQ_FOREACH(tp1, &stcb->asoc.control_send_queue,
3356				    sctp_next) {
3357					if (tp1->sent == SCTP_DATAGRAM_RESEND)
3358						audit++;
3359				}
3360				if (audit != stcb->asoc.sent_queue_retran_cnt) {
3361					SCTP_PRINTF("**Local Audit finds cnt:%d asoc cnt:%d\n",
3362					    audit, stcb->asoc.sent_queue_retran_cnt);
3363#ifndef SCTP_AUDITING_ENABLED
3364					stcb->asoc.sent_queue_retran_cnt = audit;
3365#endif
3366				}
3367			}
3368		}
3369		break;
3370	case SCTP_ASCONF:
3371		{
3372			struct sctp_tmit_chunk *asconf;
3373
3374			TAILQ_FOREACH(asconf, &stcb->asoc.control_send_queue,
3375			    sctp_next) {
3376				if (asconf->rec.chunk_id.id == SCTP_ASCONF) {
3377					break;
3378				}
3379			}
3380			if (asconf) {
3381				if (asconf->sent != SCTP_DATAGRAM_RESEND)
3382					sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt);
3383				asconf->sent = SCTP_DATAGRAM_RESEND;
3384				asconf->snd_count--;
3385			}
3386		}
3387		break;
3388	case SCTP_INITIATION:
3389		/* resend the INIT */
3390		stcb->asoc.dropped_special_cnt++;
3391		if (stcb->asoc.dropped_special_cnt < SCTP_RETRY_DROPPED_THRESH) {
3392			/*
3393			 * If we can get it in, in a few attempts we do
3394			 * this, otherwise we let the timer fire.
3395			 */
3396			sctp_timer_stop(SCTP_TIMER_TYPE_INIT, stcb->sctp_ep,
3397			    stcb, net,
3398			    SCTP_FROM_SCTP_INPUT + SCTP_LOC_27);
3399			sctp_send_initiate(stcb->sctp_ep, stcb, SCTP_SO_NOT_LOCKED);
3400		}
3401		break;
3402	case SCTP_SELECTIVE_ACK:
3403	case SCTP_NR_SELECTIVE_ACK:
3404		/* resend the sack */
3405		sctp_send_sack(stcb, SCTP_SO_NOT_LOCKED);
3406		break;
3407	case SCTP_HEARTBEAT_REQUEST:
3408		/* resend a demand HB */
3409		if ((stcb->asoc.overall_error_count + 3) < stcb->asoc.max_send_times) {
3410			/*
3411			 * Only retransmit if we KNOW we wont destroy the
3412			 * tcb
3413			 */
3414			sctp_send_hb(stcb, net, SCTP_SO_NOT_LOCKED);
3415		}
3416		break;
3417	case SCTP_SHUTDOWN:
3418		sctp_send_shutdown(stcb, net);
3419		break;
3420	case SCTP_SHUTDOWN_ACK:
3421		sctp_send_shutdown_ack(stcb, net);
3422		break;
3423	case SCTP_COOKIE_ECHO:
3424		{
3425			struct sctp_tmit_chunk *cookie;
3426
3427			cookie = NULL;
3428			TAILQ_FOREACH(cookie, &stcb->asoc.control_send_queue,
3429			    sctp_next) {
3430				if (cookie->rec.chunk_id.id == SCTP_COOKIE_ECHO) {
3431					break;
3432				}
3433			}
3434			if (cookie) {
3435				if (cookie->sent != SCTP_DATAGRAM_RESEND)
3436					sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt);
3437				cookie->sent = SCTP_DATAGRAM_RESEND;
3438				sctp_stop_all_cookie_timers(stcb);
3439			}
3440		}
3441		break;
3442	case SCTP_COOKIE_ACK:
3443		sctp_send_cookie_ack(stcb);
3444		break;
3445	case SCTP_ASCONF_ACK:
3446		/* resend last asconf ack */
3447		sctp_send_asconf_ack(stcb);
3448		break;
3449	case SCTP_FORWARD_CUM_TSN:
3450		send_forward_tsn(stcb, &stcb->asoc);
3451		break;
3452		/* can't do anything with these */
3453	case SCTP_PACKET_DROPPED:
3454	case SCTP_INITIATION_ACK:	/* this should not happen */
3455	case SCTP_HEARTBEAT_ACK:
3456	case SCTP_ABORT_ASSOCIATION:
3457	case SCTP_OPERATION_ERROR:
3458	case SCTP_SHUTDOWN_COMPLETE:
3459	case SCTP_ECN_ECHO:
3460	case SCTP_ECN_CWR:
3461	default:
3462		break;
3463	}
3464	return (0);
3465}
3466
3467void
3468sctp_reset_in_stream(struct sctp_tcb *stcb, uint32_t number_entries, uint16_t * list)
3469{
3470	uint32_t i;
3471	uint16_t temp;
3472
3473	/*
3474	 * We set things to 0xffff since this is the last delivered sequence
3475	 * and we will be sending in 0 after the reset.
3476	 */
3477
3478	if (number_entries) {
3479		for (i = 0; i < number_entries; i++) {
3480			temp = ntohs(list[i]);
3481			if (temp >= stcb->asoc.streamincnt) {
3482				continue;
3483			}
3484			stcb->asoc.strmin[temp].last_sequence_delivered = 0xffff;
3485		}
3486	} else {
3487		list = NULL;
3488		for (i = 0; i < stcb->asoc.streamincnt; i++) {
3489			stcb->asoc.strmin[i].last_sequence_delivered = 0xffff;
3490		}
3491	}
3492	sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_RECV, stcb, number_entries, (void *)list, SCTP_SO_NOT_LOCKED);
3493}
3494
3495static void
3496sctp_reset_out_streams(struct sctp_tcb *stcb, uint32_t number_entries, uint16_t * list)
3497{
3498	uint32_t i;
3499	uint16_t temp;
3500
3501	if (number_entries > 0) {
3502		for (i = 0; i < number_entries; i++) {
3503			temp = ntohs(list[i]);
3504			if (temp >= stcb->asoc.streamoutcnt) {
3505				/* no such stream */
3506				continue;
3507			}
3508			stcb->asoc.strmout[temp].next_sequence_send = 0;
3509		}
3510	} else {
3511		for (i = 0; i < stcb->asoc.streamoutcnt; i++) {
3512			stcb->asoc.strmout[i].next_sequence_send = 0;
3513		}
3514	}
3515	sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_SEND, stcb, number_entries, (void *)list, SCTP_SO_NOT_LOCKED);
3516}
3517
3518static void
3519sctp_reset_clear_pending(struct sctp_tcb *stcb, uint32_t number_entries, uint16_t * list)
3520{
3521	uint32_t i;
3522	uint16_t temp;
3523
3524	if (number_entries > 0) {
3525		for (i = 0; i < number_entries; i++) {
3526			temp = ntohs(list[i]);
3527			if (temp >= stcb->asoc.streamoutcnt) {
3528				/* no such stream */
3529				continue;
3530			}
3531			stcb->asoc.strmout[temp].state = SCTP_STREAM_OPEN;
3532		}
3533	} else {
3534		for (i = 0; i < stcb->asoc.streamoutcnt; i++) {
3535			stcb->asoc.strmout[i].state = SCTP_STREAM_OPEN;
3536		}
3537	}
3538}
3539
3540
3541struct sctp_stream_reset_request *
3542sctp_find_stream_reset(struct sctp_tcb *stcb, uint32_t seq, struct sctp_tmit_chunk **bchk)
3543{
3544	struct sctp_association *asoc;
3545	struct sctp_chunkhdr *ch;
3546	struct sctp_stream_reset_request *r;
3547	struct sctp_tmit_chunk *chk;
3548	int len, clen;
3549
3550	asoc = &stcb->asoc;
3551	if (TAILQ_EMPTY(&stcb->asoc.control_send_queue)) {
3552		asoc->stream_reset_outstanding = 0;
3553		return (NULL);
3554	}
3555	if (stcb->asoc.str_reset == NULL) {
3556		asoc->stream_reset_outstanding = 0;
3557		return (NULL);
3558	}
3559	chk = stcb->asoc.str_reset;
3560	if (chk->data == NULL) {
3561		return (NULL);
3562	}
3563	if (bchk) {
3564		/* he wants a copy of the chk pointer */
3565		*bchk = chk;
3566	}
3567	clen = chk->send_size;
3568	ch = mtod(chk->data, struct sctp_chunkhdr *);
3569	r = (struct sctp_stream_reset_request *)(ch + 1);
3570	if (ntohl(r->request_seq) == seq) {
3571		/* found it */
3572		return (r);
3573	}
3574	len = SCTP_SIZE32(ntohs(r->ph.param_length));
3575	if (clen > (len + (int)sizeof(struct sctp_chunkhdr))) {
3576		/* move to the next one, there can only be a max of two */
3577		r = (struct sctp_stream_reset_request *)((caddr_t)r + len);
3578		if (ntohl(r->request_seq) == seq) {
3579			return (r);
3580		}
3581	}
3582	/* that seq is not here */
3583	return (NULL);
3584}
3585
3586static void
3587sctp_clean_up_stream_reset(struct sctp_tcb *stcb)
3588{
3589	struct sctp_association *asoc;
3590	struct sctp_tmit_chunk *chk = stcb->asoc.str_reset;
3591
3592	if (stcb->asoc.str_reset == NULL) {
3593		return;
3594	}
3595	asoc = &stcb->asoc;
3596
3597	sctp_timer_stop(SCTP_TIMER_TYPE_STRRESET, stcb->sctp_ep, stcb,
3598	    chk->whoTo, SCTP_FROM_SCTP_INPUT + SCTP_LOC_28);
3599	TAILQ_REMOVE(&asoc->control_send_queue,
3600	    chk,
3601	    sctp_next);
3602	if (chk->data) {
3603		sctp_m_freem(chk->data);
3604		chk->data = NULL;
3605	}
3606	asoc->ctrl_queue_cnt--;
3607	sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED);
3608	/* sa_ignore NO_NULL_CHK */
3609	stcb->asoc.str_reset = NULL;
3610}
3611
3612
3613static int
3614sctp_handle_stream_reset_response(struct sctp_tcb *stcb,
3615    uint32_t seq, uint32_t action,
3616    struct sctp_stream_reset_response *respin)
3617{
3618	uint16_t type;
3619	int lparm_len;
3620	struct sctp_association *asoc = &stcb->asoc;
3621	struct sctp_tmit_chunk *chk;
3622	struct sctp_stream_reset_request *req_param;
3623	struct sctp_stream_reset_out_request *req_out_param;
3624	struct sctp_stream_reset_in_request *req_in_param;
3625	uint32_t number_entries;
3626
3627	if (asoc->stream_reset_outstanding == 0) {
3628		/* duplicate */
3629		return (0);
3630	}
3631	if (seq == stcb->asoc.str_reset_seq_out) {
3632		req_param = sctp_find_stream_reset(stcb, seq, &chk);
3633		if (req_param != NULL) {
3634			stcb->asoc.str_reset_seq_out++;
3635			type = ntohs(req_param->ph.param_type);
3636			lparm_len = ntohs(req_param->ph.param_length);
3637			if (type == SCTP_STR_RESET_OUT_REQUEST) {
3638				int no_clear = 0;
3639
3640				req_out_param = (struct sctp_stream_reset_out_request *)req_param;
3641				number_entries = (lparm_len - sizeof(struct sctp_stream_reset_out_request)) / sizeof(uint16_t);
3642				asoc->stream_reset_out_is_outstanding = 0;
3643				if (asoc->stream_reset_outstanding)
3644					asoc->stream_reset_outstanding--;
3645				if (action == SCTP_STREAM_RESET_RESULT_PERFORMED) {
3646					/* do it */
3647					sctp_reset_out_streams(stcb, number_entries, req_out_param->list_of_streams);
3648				} else if (action == SCTP_STREAM_RESET_RESULT_DENIED) {
3649					sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_DENIED_OUT, stcb, number_entries, req_out_param->list_of_streams, SCTP_SO_NOT_LOCKED);
3650				} else if (action == SCTP_STREAM_RESET_RESULT_IN_PROGRESS) {
3651					/*
3652					 * Set it up so we don't stop
3653					 * retransmitting
3654					 */
3655					asoc->stream_reset_outstanding++;
3656					stcb->asoc.str_reset_seq_out--;
3657					asoc->stream_reset_out_is_outstanding = 1;
3658					no_clear = 1;
3659				} else {
3660					sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_FAILED_OUT, stcb, number_entries, req_out_param->list_of_streams, SCTP_SO_NOT_LOCKED);
3661				}
3662				if (no_clear == 0) {
3663					sctp_reset_clear_pending(stcb, number_entries, req_out_param->list_of_streams);
3664				}
3665			} else if (type == SCTP_STR_RESET_IN_REQUEST) {
3666				req_in_param = (struct sctp_stream_reset_in_request *)req_param;
3667				number_entries = (lparm_len - sizeof(struct sctp_stream_reset_in_request)) / sizeof(uint16_t);
3668				if (asoc->stream_reset_outstanding)
3669					asoc->stream_reset_outstanding--;
3670				if (action == SCTP_STREAM_RESET_RESULT_DENIED) {
3671					sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_DENIED_IN, stcb,
3672					    number_entries, req_in_param->list_of_streams, SCTP_SO_NOT_LOCKED);
3673				} else if (action != SCTP_STREAM_RESET_RESULT_PERFORMED) {
3674					sctp_ulp_notify(SCTP_NOTIFY_STR_RESET_FAILED_IN, stcb,
3675					    number_entries, req_in_param->list_of_streams, SCTP_SO_NOT_LOCKED);
3676				}
3677			} else if (type == SCTP_STR_RESET_ADD_OUT_STREAMS) {
3678				/* Ok we now may have more streams */
3679				int num_stream;
3680
3681				num_stream = stcb->asoc.strm_pending_add_size;
3682				if (num_stream > (stcb->asoc.strm_realoutsize - stcb->asoc.streamoutcnt)) {
3683					/* TSNH */
3684					num_stream = stcb->asoc.strm_realoutsize - stcb->asoc.streamoutcnt;
3685				}
3686				stcb->asoc.strm_pending_add_size = 0;
3687				if (asoc->stream_reset_outstanding)
3688					asoc->stream_reset_outstanding--;
3689				if (action == SCTP_STREAM_RESET_RESULT_PERFORMED) {
3690					/* Put the new streams into effect */
3691					int i;
3692
3693					for (i = asoc->streamoutcnt; i < (asoc->streamoutcnt + num_stream); i++) {
3694						asoc->strmout[i].state = SCTP_STREAM_OPEN;
3695					}
3696					asoc->streamoutcnt += num_stream;
3697					sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 0);
3698				} else if (action == SCTP_STREAM_RESET_RESULT_DENIED) {
3699					sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt,
3700					    SCTP_STREAM_CHANGE_DENIED);
3701				} else {
3702					sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt,
3703					    SCTP_STREAM_CHANGE_FAILED);
3704				}
3705			} else if (type == SCTP_STR_RESET_ADD_IN_STREAMS) {
3706				if (asoc->stream_reset_outstanding)
3707					asoc->stream_reset_outstanding--;
3708				if (action == SCTP_STREAM_RESET_RESULT_DENIED) {
3709					sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt,
3710					    SCTP_STREAM_CHANGE_DENIED);
3711				} else if (action != SCTP_STREAM_RESET_RESULT_PERFORMED) {
3712					sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt,
3713					    SCTP_STREAM_CHANGE_FAILED);
3714				}
3715			} else if (type == SCTP_STR_RESET_TSN_REQUEST) {
3716				/**
3717				 * a) Adopt the new in tsn.
3718				 * b) reset the map
3719				 * c) Adopt the new out-tsn
3720				 */
3721				struct sctp_stream_reset_response_tsn *resp;
3722				struct sctp_forward_tsn_chunk fwdtsn;
3723				int abort_flag = 0;
3724
3725				if (respin == NULL) {
3726					/* huh ? */
3727					return (0);
3728				}
3729				if (ntohs(respin->ph.param_length) < sizeof(struct sctp_stream_reset_response_tsn)) {
3730					return (0);
3731				}
3732				if (action == SCTP_STREAM_RESET_RESULT_PERFORMED) {
3733					resp = (struct sctp_stream_reset_response_tsn *)respin;
3734					asoc->stream_reset_outstanding--;
3735					fwdtsn.ch.chunk_length = htons(sizeof(struct sctp_forward_tsn_chunk));
3736					fwdtsn.ch.chunk_type = SCTP_FORWARD_CUM_TSN;
3737					fwdtsn.new_cumulative_tsn = htonl(ntohl(resp->senders_next_tsn) - 1);
3738					sctp_handle_forward_tsn(stcb, &fwdtsn, &abort_flag, NULL, 0);
3739					if (abort_flag) {
3740						return (1);
3741					}
3742					stcb->asoc.highest_tsn_inside_map = (ntohl(resp->senders_next_tsn) - 1);
3743					if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MAP_LOGGING_ENABLE) {
3744						sctp_log_map(0, 7, asoc->highest_tsn_inside_map, SCTP_MAP_SLIDE_RESULT);
3745					}
3746					stcb->asoc.tsn_last_delivered = stcb->asoc.cumulative_tsn = stcb->asoc.highest_tsn_inside_map;
3747					stcb->asoc.mapping_array_base_tsn = ntohl(resp->senders_next_tsn);
3748					memset(stcb->asoc.mapping_array, 0, stcb->asoc.mapping_array_size);
3749
3750					stcb->asoc.highest_tsn_inside_nr_map = stcb->asoc.highest_tsn_inside_map;
3751					memset(stcb->asoc.nr_mapping_array, 0, stcb->asoc.mapping_array_size);
3752
3753					stcb->asoc.sending_seq = ntohl(resp->receivers_next_tsn);
3754					stcb->asoc.last_acked_seq = stcb->asoc.cumulative_tsn;
3755
3756					sctp_reset_out_streams(stcb, 0, (uint16_t *) NULL);
3757					sctp_reset_in_stream(stcb, 0, (uint16_t *) NULL);
3758					sctp_notify_stream_reset_tsn(stcb, stcb->asoc.sending_seq, (stcb->asoc.mapping_array_base_tsn + 1), 0);
3759				} else if (action == SCTP_STREAM_RESET_RESULT_DENIED) {
3760					sctp_notify_stream_reset_tsn(stcb, stcb->asoc.sending_seq, (stcb->asoc.mapping_array_base_tsn + 1),
3761					    SCTP_ASSOC_RESET_DENIED);
3762				} else {
3763					sctp_notify_stream_reset_tsn(stcb, stcb->asoc.sending_seq, (stcb->asoc.mapping_array_base_tsn + 1),
3764					    SCTP_ASSOC_RESET_FAILED);
3765				}
3766			}
3767			/* get rid of the request and get the request flags */
3768			if (asoc->stream_reset_outstanding == 0) {
3769				sctp_clean_up_stream_reset(stcb);
3770			}
3771		}
3772	}
3773	if (asoc->stream_reset_outstanding == 0) {
3774		sctp_send_stream_reset_out_if_possible(stcb, SCTP_SO_NOT_LOCKED);
3775	}
3776	return (0);
3777}
3778
3779static void
3780sctp_handle_str_reset_request_in(struct sctp_tcb *stcb,
3781    struct sctp_tmit_chunk *chk,
3782    struct sctp_stream_reset_in_request *req, int trunc)
3783{
3784	uint32_t seq;
3785	int len, i;
3786	int number_entries;
3787	uint16_t temp;
3788
3789	/*
3790	 * peer wants me to send a str-reset to him for my outgoing seq's if
3791	 * seq_in is right.
3792	 */
3793	struct sctp_association *asoc = &stcb->asoc;
3794
3795	seq = ntohl(req->request_seq);
3796	if (asoc->str_reset_seq_in == seq) {
3797		asoc->last_reset_action[1] = asoc->last_reset_action[0];
3798		if (!(asoc->local_strreset_support & SCTP_ENABLE_RESET_STREAM_REQ)) {
3799			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3800		} else if (trunc) {
3801			/* Can't do it, since they exceeded our buffer size  */
3802			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3803		} else if (stcb->asoc.stream_reset_out_is_outstanding == 0) {
3804			len = ntohs(req->ph.param_length);
3805			number_entries = ((len - sizeof(struct sctp_stream_reset_in_request)) / sizeof(uint16_t));
3806			if (number_entries) {
3807				for (i = 0; i < number_entries; i++) {
3808					temp = ntohs(req->list_of_streams[i]);
3809					if (temp >= stcb->asoc.streamoutcnt) {
3810						asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3811						goto bad_boy;
3812					}
3813					req->list_of_streams[i] = temp;
3814				}
3815				for (i = 0; i < number_entries; i++) {
3816					if (stcb->asoc.strmout[req->list_of_streams[i]].state == SCTP_STREAM_OPEN) {
3817						stcb->asoc.strmout[req->list_of_streams[i]].state = SCTP_STREAM_RESET_PENDING;
3818					}
3819				}
3820			} else {
3821				/* Its all */
3822				for (i = 0; i < stcb->asoc.streamoutcnt; i++) {
3823					if (stcb->asoc.strmout[i].state == SCTP_STREAM_OPEN)
3824						stcb->asoc.strmout[i].state = SCTP_STREAM_RESET_PENDING;
3825				}
3826			}
3827			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED;
3828		} else {
3829			/* Can't do it, since we have sent one out */
3830			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_ERR_IN_PROGRESS;
3831		}
3832bad_boy:
3833		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
3834		asoc->str_reset_seq_in++;
3835	} else if (asoc->str_reset_seq_in - 1 == seq) {
3836		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
3837	} else if (asoc->str_reset_seq_in - 2 == seq) {
3838		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]);
3839	} else {
3840		sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO);
3841	}
3842	sctp_send_stream_reset_out_if_possible(stcb, SCTP_SO_NOT_LOCKED);
3843}
3844
3845static int
3846sctp_handle_str_reset_request_tsn(struct sctp_tcb *stcb,
3847    struct sctp_tmit_chunk *chk,
3848    struct sctp_stream_reset_tsn_request *req)
3849{
3850	/* reset all in and out and update the tsn */
3851	/*
3852	 * A) reset my str-seq's on in and out. B) Select a receive next,
3853	 * and set cum-ack to it. Also process this selected number as a
3854	 * fwd-tsn as well. C) set in the response my next sending seq.
3855	 */
3856	struct sctp_forward_tsn_chunk fwdtsn;
3857	struct sctp_association *asoc = &stcb->asoc;
3858	int abort_flag = 0;
3859	uint32_t seq;
3860
3861	seq = ntohl(req->request_seq);
3862	if (asoc->str_reset_seq_in == seq) {
3863		asoc->last_reset_action[1] = stcb->asoc.last_reset_action[0];
3864		if (!(asoc->local_strreset_support & SCTP_ENABLE_CHANGE_ASSOC_REQ)) {
3865			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3866		} else {
3867			fwdtsn.ch.chunk_length = htons(sizeof(struct sctp_forward_tsn_chunk));
3868			fwdtsn.ch.chunk_type = SCTP_FORWARD_CUM_TSN;
3869			fwdtsn.ch.chunk_flags = 0;
3870			fwdtsn.new_cumulative_tsn = htonl(stcb->asoc.highest_tsn_inside_map + 1);
3871			sctp_handle_forward_tsn(stcb, &fwdtsn, &abort_flag, NULL, 0);
3872			if (abort_flag) {
3873				return (1);
3874			}
3875			asoc->highest_tsn_inside_map += SCTP_STREAM_RESET_TSN_DELTA;
3876			if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MAP_LOGGING_ENABLE) {
3877				sctp_log_map(0, 10, asoc->highest_tsn_inside_map, SCTP_MAP_SLIDE_RESULT);
3878			}
3879			asoc->tsn_last_delivered = asoc->cumulative_tsn = asoc->highest_tsn_inside_map;
3880			asoc->mapping_array_base_tsn = asoc->highest_tsn_inside_map + 1;
3881			memset(asoc->mapping_array, 0, asoc->mapping_array_size);
3882			asoc->highest_tsn_inside_nr_map = asoc->highest_tsn_inside_map;
3883			memset(asoc->nr_mapping_array, 0, asoc->mapping_array_size);
3884			atomic_add_int(&asoc->sending_seq, 1);
3885			/* save off historical data for retrans */
3886			asoc->last_sending_seq[1] = asoc->last_sending_seq[0];
3887			asoc->last_sending_seq[0] = asoc->sending_seq;
3888			asoc->last_base_tsnsent[1] = asoc->last_base_tsnsent[0];
3889			asoc->last_base_tsnsent[0] = asoc->mapping_array_base_tsn;
3890			sctp_reset_out_streams(stcb, 0, (uint16_t *) NULL);
3891			sctp_reset_in_stream(stcb, 0, (uint16_t *) NULL);
3892			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED;
3893			sctp_notify_stream_reset_tsn(stcb, asoc->sending_seq, (asoc->mapping_array_base_tsn + 1), 0);
3894		}
3895		sctp_add_stream_reset_result_tsn(chk, seq, asoc->last_reset_action[0],
3896		    asoc->last_sending_seq[0], asoc->last_base_tsnsent[0]);
3897		asoc->str_reset_seq_in++;
3898	} else if (asoc->str_reset_seq_in - 1 == seq) {
3899		sctp_add_stream_reset_result_tsn(chk, seq, asoc->last_reset_action[0],
3900		    asoc->last_sending_seq[0], asoc->last_base_tsnsent[0]);
3901	} else if (asoc->str_reset_seq_in - 2 == seq) {
3902		sctp_add_stream_reset_result_tsn(chk, seq, asoc->last_reset_action[1],
3903		    asoc->last_sending_seq[1], asoc->last_base_tsnsent[1]);
3904	} else {
3905		sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO);
3906	}
3907	return (0);
3908}
3909
3910static void
3911sctp_handle_str_reset_request_out(struct sctp_tcb *stcb,
3912    struct sctp_tmit_chunk *chk,
3913    struct sctp_stream_reset_out_request *req, int trunc)
3914{
3915	uint32_t seq, tsn;
3916	int number_entries, len;
3917	struct sctp_association *asoc = &stcb->asoc;
3918
3919	seq = ntohl(req->request_seq);
3920
3921	/* now if its not a duplicate we process it */
3922	if (asoc->str_reset_seq_in == seq) {
3923		len = ntohs(req->ph.param_length);
3924		number_entries = ((len - sizeof(struct sctp_stream_reset_out_request)) / sizeof(uint16_t));
3925		/*
3926		 * the sender is resetting, handle the list issue.. we must
3927		 * a) verify if we can do the reset, if so no problem b) If
3928		 * we can't do the reset we must copy the request. c) queue
3929		 * it, and setup the data in processor to trigger it off
3930		 * when needed and dequeue all the queued data.
3931		 */
3932		tsn = ntohl(req->send_reset_at_tsn);
3933
3934		/* move the reset action back one */
3935		asoc->last_reset_action[1] = asoc->last_reset_action[0];
3936		if (!(asoc->local_strreset_support & SCTP_ENABLE_RESET_STREAM_REQ)) {
3937			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3938		} else if (trunc) {
3939			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3940		} else if (SCTP_TSN_GE(asoc->cumulative_tsn, tsn)) {
3941			/* we can do it now */
3942			sctp_reset_in_stream(stcb, number_entries, req->list_of_streams);
3943			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED;
3944		} else {
3945			/*
3946			 * we must queue it up and thus wait for the TSN's
3947			 * to arrive that are at or before tsn
3948			 */
3949			struct sctp_stream_reset_list *liste;
3950			int siz;
3951
3952			siz = sizeof(struct sctp_stream_reset_list) + (number_entries * sizeof(uint16_t));
3953			SCTP_MALLOC(liste, struct sctp_stream_reset_list *,
3954			    siz, SCTP_M_STRESET);
3955			if (liste == NULL) {
3956				/* gak out of memory */
3957				asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
3958				sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
3959				return;
3960			}
3961			liste->seq = seq;
3962			liste->tsn = tsn;
3963			liste->number_entries = number_entries;
3964			memcpy(&liste->list_of_streams, req->list_of_streams, number_entries * sizeof(uint16_t));
3965			TAILQ_INSERT_TAIL(&asoc->resetHead, liste, next_resp);
3966			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_IN_PROGRESS;
3967		}
3968		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
3969		asoc->str_reset_seq_in++;
3970	} else if ((asoc->str_reset_seq_in - 1) == seq) {
3971		/*
3972		 * one seq back, just echo back last action since my
3973		 * response was lost.
3974		 */
3975		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
3976	} else if ((asoc->str_reset_seq_in - 2) == seq) {
3977		/*
3978		 * two seq back, just echo back last action since my
3979		 * response was lost.
3980		 */
3981		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]);
3982	} else {
3983		sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO);
3984	}
3985}
3986
3987static void
3988sctp_handle_str_reset_add_strm(struct sctp_tcb *stcb, struct sctp_tmit_chunk *chk,
3989    struct sctp_stream_reset_add_strm *str_add)
3990{
3991	/*
3992	 * Peer is requesting to add more streams. If its within our
3993	 * max-streams we will allow it.
3994	 */
3995	uint32_t num_stream, i;
3996	uint32_t seq;
3997	struct sctp_association *asoc = &stcb->asoc;
3998	struct sctp_queued_to_read *ctl, *nctl;
3999
4000	/* Get the number. */
4001	seq = ntohl(str_add->request_seq);
4002	num_stream = ntohs(str_add->number_of_streams);
4003	/* Now what would be the new total? */
4004	if (asoc->str_reset_seq_in == seq) {
4005		num_stream += stcb->asoc.streamincnt;
4006		stcb->asoc.last_reset_action[1] = stcb->asoc.last_reset_action[0];
4007		if (!(asoc->local_strreset_support & SCTP_ENABLE_CHANGE_ASSOC_REQ)) {
4008			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
4009		} else if ((num_stream > stcb->asoc.max_inbound_streams) ||
4010		    (num_stream > 0xffff)) {
4011			/* We must reject it they ask for to many */
4012	denied:
4013			stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
4014		} else {
4015			/* Ok, we can do that :-) */
4016			struct sctp_stream_in *oldstrm;
4017
4018			/* save off the old */
4019			oldstrm = stcb->asoc.strmin;
4020			SCTP_MALLOC(stcb->asoc.strmin, struct sctp_stream_in *,
4021			    (num_stream * sizeof(struct sctp_stream_in)),
4022			    SCTP_M_STRMI);
4023			if (stcb->asoc.strmin == NULL) {
4024				stcb->asoc.strmin = oldstrm;
4025				goto denied;
4026			}
4027			/* copy off the old data */
4028			for (i = 0; i < stcb->asoc.streamincnt; i++) {
4029				TAILQ_INIT(&stcb->asoc.strmin[i].inqueue);
4030				stcb->asoc.strmin[i].stream_no = i;
4031				stcb->asoc.strmin[i].last_sequence_delivered = oldstrm[i].last_sequence_delivered;
4032				stcb->asoc.strmin[i].delivery_started = oldstrm[i].delivery_started;
4033				/* now anything on those queues? */
4034				TAILQ_FOREACH_SAFE(ctl, &oldstrm[i].inqueue, next, nctl) {
4035					TAILQ_REMOVE(&oldstrm[i].inqueue, ctl, next);
4036					TAILQ_INSERT_TAIL(&stcb->asoc.strmin[i].inqueue, ctl, next);
4037				}
4038			}
4039			/* Init the new streams */
4040			for (i = stcb->asoc.streamincnt; i < num_stream; i++) {
4041				TAILQ_INIT(&stcb->asoc.strmin[i].inqueue);
4042				stcb->asoc.strmin[i].stream_no = i;
4043				stcb->asoc.strmin[i].last_sequence_delivered = 0xffff;
4044				stcb->asoc.strmin[i].delivery_started = 0;
4045			}
4046			SCTP_FREE(oldstrm, SCTP_M_STRMI);
4047			/* update the size */
4048			stcb->asoc.streamincnt = num_stream;
4049			stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED;
4050			sctp_notify_stream_reset_add(stcb, stcb->asoc.streamincnt, stcb->asoc.streamoutcnt, 0);
4051		}
4052		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
4053		asoc->str_reset_seq_in++;
4054	} else if ((asoc->str_reset_seq_in - 1) == seq) {
4055		/*
4056		 * one seq back, just echo back last action since my
4057		 * response was lost.
4058		 */
4059		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
4060	} else if ((asoc->str_reset_seq_in - 2) == seq) {
4061		/*
4062		 * two seq back, just echo back last action since my
4063		 * response was lost.
4064		 */
4065		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]);
4066	} else {
4067		sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO);
4068
4069	}
4070}
4071
4072static void
4073sctp_handle_str_reset_add_out_strm(struct sctp_tcb *stcb, struct sctp_tmit_chunk *chk,
4074    struct sctp_stream_reset_add_strm *str_add)
4075{
4076	/*
4077	 * Peer is requesting to add more streams. If its within our
4078	 * max-streams we will allow it.
4079	 */
4080	uint16_t num_stream;
4081	uint32_t seq;
4082	struct sctp_association *asoc = &stcb->asoc;
4083
4084	/* Get the number. */
4085	seq = ntohl(str_add->request_seq);
4086	num_stream = ntohs(str_add->number_of_streams);
4087	/* Now what would be the new total? */
4088	if (asoc->str_reset_seq_in == seq) {
4089		stcb->asoc.last_reset_action[1] = stcb->asoc.last_reset_action[0];
4090		if (!(asoc->local_strreset_support & SCTP_ENABLE_CHANGE_ASSOC_REQ)) {
4091			asoc->last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
4092		} else if (stcb->asoc.stream_reset_outstanding) {
4093			/* We must reject it we have something pending */
4094			stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_ERR_IN_PROGRESS;
4095		} else {
4096			/* Ok, we can do that :-) */
4097			int mychk;
4098
4099			mychk = stcb->asoc.streamoutcnt;
4100			mychk += num_stream;
4101			if (mychk < 0x10000) {
4102				stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_PERFORMED;
4103				if (sctp_send_str_reset_req(stcb, 0, NULL, 0, 0, 1, num_stream, 0, 1)) {
4104					stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
4105				}
4106			} else {
4107				stcb->asoc.last_reset_action[0] = SCTP_STREAM_RESET_RESULT_DENIED;
4108			}
4109		}
4110		sctp_add_stream_reset_result(chk, seq, stcb->asoc.last_reset_action[0]);
4111		asoc->str_reset_seq_in++;
4112	} else if ((asoc->str_reset_seq_in - 1) == seq) {
4113		/*
4114		 * one seq back, just echo back last action since my
4115		 * response was lost.
4116		 */
4117		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[0]);
4118	} else if ((asoc->str_reset_seq_in - 2) == seq) {
4119		/*
4120		 * two seq back, just echo back last action since my
4121		 * response was lost.
4122		 */
4123		sctp_add_stream_reset_result(chk, seq, asoc->last_reset_action[1]);
4124	} else {
4125		sctp_add_stream_reset_result(chk, seq, SCTP_STREAM_RESET_RESULT_ERR_BAD_SEQNO);
4126	}
4127}
4128
4129#ifdef __GNUC__
4130__attribute__((noinline))
4131#endif
4132	static int
4133	    sctp_handle_stream_reset(struct sctp_tcb *stcb, struct mbuf *m, int offset,
4134        struct sctp_chunkhdr *ch_req)
4135{
4136	uint16_t remaining_length, param_len, ptype;
4137	struct sctp_paramhdr pstore;
4138	uint8_t cstore[SCTP_CHUNK_BUFFER_SIZE];
4139	uint32_t seq = 0;
4140	int num_req = 0;
4141	int trunc = 0;
4142	struct sctp_tmit_chunk *chk;
4143	struct sctp_chunkhdr *ch;
4144	struct sctp_paramhdr *ph;
4145	int ret_code = 0;
4146	int num_param = 0;
4147
4148	/* now it may be a reset or a reset-response */
4149	remaining_length = ntohs(ch_req->chunk_length) - sizeof(struct sctp_chunkhdr);
4150
4151	/* setup for adding the response */
4152	sctp_alloc_a_chunk(stcb, chk);
4153	if (chk == NULL) {
4154		return (ret_code);
4155	}
4156	chk->copy_by_ref = 0;
4157	chk->rec.chunk_id.id = SCTP_STREAM_RESET;
4158	chk->rec.chunk_id.can_take_data = 0;
4159	chk->flags = 0;
4160	chk->asoc = &stcb->asoc;
4161	chk->no_fr_allowed = 0;
4162	chk->book_size = chk->send_size = sizeof(struct sctp_chunkhdr);
4163	chk->book_size_scale = 0;
4164	chk->data = sctp_get_mbuf_for_msg(MCLBYTES, 0, M_NOWAIT, 1, MT_DATA);
4165	if (chk->data == NULL) {
4166strres_nochunk:
4167		if (chk->data) {
4168			sctp_m_freem(chk->data);
4169			chk->data = NULL;
4170		}
4171		sctp_free_a_chunk(stcb, chk, SCTP_SO_NOT_LOCKED);
4172		return (ret_code);
4173	}
4174	SCTP_BUF_RESV_UF(chk->data, SCTP_MIN_OVERHEAD);
4175
4176	/* setup chunk parameters */
4177	chk->sent = SCTP_DATAGRAM_UNSENT;
4178	chk->snd_count = 0;
4179	chk->whoTo = NULL;
4180
4181	ch = mtod(chk->data, struct sctp_chunkhdr *);
4182	ch->chunk_type = SCTP_STREAM_RESET;
4183	ch->chunk_flags = 0;
4184	ch->chunk_length = htons(chk->send_size);
4185	SCTP_BUF_LEN(chk->data) = SCTP_SIZE32(chk->send_size);
4186	offset += sizeof(struct sctp_chunkhdr);
4187	while (remaining_length >= sizeof(struct sctp_paramhdr)) {
4188		ph = (struct sctp_paramhdr *)sctp_m_getptr(m, offset, sizeof(pstore), (uint8_t *) & pstore);
4189		if (ph == NULL) {
4190			/* TSNH */
4191			break;
4192		}
4193		param_len = ntohs(ph->param_length);
4194		if ((param_len > remaining_length) ||
4195		    (param_len < (sizeof(struct sctp_paramhdr) + sizeof(uint32_t)))) {
4196			/* bad parameter length */
4197			break;
4198		}
4199		ph = (struct sctp_paramhdr *)sctp_m_getptr(m, offset, min(param_len, sizeof(cstore)),
4200		    (uint8_t *) & cstore);
4201		if (ph == NULL) {
4202			/* TSNH */
4203			break;
4204		}
4205		ptype = ntohs(ph->param_type);
4206		num_param++;
4207		if (param_len > sizeof(cstore)) {
4208			trunc = 1;
4209		} else {
4210			trunc = 0;
4211		}
4212		if (num_param > SCTP_MAX_RESET_PARAMS) {
4213			/* hit the max of parameters already sorry.. */
4214			break;
4215		}
4216		if (ptype == SCTP_STR_RESET_OUT_REQUEST) {
4217			struct sctp_stream_reset_out_request *req_out;
4218
4219			if (param_len < sizeof(struct sctp_stream_reset_out_request)) {
4220				break;
4221			}
4222			req_out = (struct sctp_stream_reset_out_request *)ph;
4223			num_req++;
4224			if (stcb->asoc.stream_reset_outstanding) {
4225				seq = ntohl(req_out->response_seq);
4226				if (seq == stcb->asoc.str_reset_seq_out) {
4227					/* implicit ack */
4228					(void)sctp_handle_stream_reset_response(stcb, seq, SCTP_STREAM_RESET_RESULT_PERFORMED, NULL);
4229				}
4230			}
4231			sctp_handle_str_reset_request_out(stcb, chk, req_out, trunc);
4232		} else if (ptype == SCTP_STR_RESET_ADD_OUT_STREAMS) {
4233			struct sctp_stream_reset_add_strm *str_add;
4234
4235			if (param_len < sizeof(struct sctp_stream_reset_add_strm)) {
4236				break;
4237			}
4238			str_add = (struct sctp_stream_reset_add_strm *)ph;
4239			num_req++;
4240			sctp_handle_str_reset_add_strm(stcb, chk, str_add);
4241		} else if (ptype == SCTP_STR_RESET_ADD_IN_STREAMS) {
4242			struct sctp_stream_reset_add_strm *str_add;
4243
4244			if (param_len < sizeof(struct sctp_stream_reset_add_strm)) {
4245				break;
4246			}
4247			str_add = (struct sctp_stream_reset_add_strm *)ph;
4248			num_req++;
4249			sctp_handle_str_reset_add_out_strm(stcb, chk, str_add);
4250		} else if (ptype == SCTP_STR_RESET_IN_REQUEST) {
4251			struct sctp_stream_reset_in_request *req_in;
4252
4253			num_req++;
4254			req_in = (struct sctp_stream_reset_in_request *)ph;
4255			sctp_handle_str_reset_request_in(stcb, chk, req_in, trunc);
4256		} else if (ptype == SCTP_STR_RESET_TSN_REQUEST) {
4257			struct sctp_stream_reset_tsn_request *req_tsn;
4258
4259			num_req++;
4260			req_tsn = (struct sctp_stream_reset_tsn_request *)ph;
4261			if (sctp_handle_str_reset_request_tsn(stcb, chk, req_tsn)) {
4262				ret_code = 1;
4263				goto strres_nochunk;
4264			}
4265			/* no more */
4266			break;
4267		} else if (ptype == SCTP_STR_RESET_RESPONSE) {
4268			struct sctp_stream_reset_response *resp;
4269			uint32_t result;
4270
4271			if (param_len < sizeof(struct sctp_stream_reset_response)) {
4272				break;
4273			}
4274			resp = (struct sctp_stream_reset_response *)ph;
4275			seq = ntohl(resp->response_seq);
4276			result = ntohl(resp->result);
4277			if (sctp_handle_stream_reset_response(stcb, seq, result, resp)) {
4278				ret_code = 1;
4279				goto strres_nochunk;
4280			}
4281		} else {
4282			break;
4283		}
4284		offset += SCTP_SIZE32(param_len);
4285		if (remaining_length >= SCTP_SIZE32(param_len)) {
4286			remaining_length -= SCTP_SIZE32(param_len);
4287		} else {
4288			remaining_length = 0;
4289		}
4290	}
4291	if (num_req == 0) {
4292		/* we have no response free the stuff */
4293		goto strres_nochunk;
4294	}
4295	/* ok we have a chunk to link in */
4296	TAILQ_INSERT_TAIL(&stcb->asoc.control_send_queue,
4297	    chk,
4298	    sctp_next);
4299	stcb->asoc.ctrl_queue_cnt++;
4300	return (ret_code);
4301}
4302
4303/*
4304 * Handle a router or endpoints report of a packet loss, there are two ways
4305 * to handle this, either we get the whole packet and must disect it
4306 * ourselves (possibly with truncation and or corruption) or it is a summary
4307 * from a middle box that did the disectting for us.
4308 */
4309static void
4310sctp_handle_packet_dropped(struct sctp_pktdrop_chunk *cp,
4311    struct sctp_tcb *stcb, struct sctp_nets *net, uint32_t limit)
4312{
4313	uint32_t bottle_bw, on_queue;
4314	uint16_t trunc_len;
4315	unsigned int chlen;
4316	unsigned int at;
4317	struct sctp_chunk_desc desc;
4318	struct sctp_chunkhdr *ch;
4319
4320	chlen = ntohs(cp->ch.chunk_length);
4321	chlen -= sizeof(struct sctp_pktdrop_chunk);
4322	/* XXX possible chlen underflow */
4323	if (chlen == 0) {
4324		ch = NULL;
4325		if (cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX)
4326			SCTP_STAT_INCR(sctps_pdrpbwrpt);
4327	} else {
4328		ch = (struct sctp_chunkhdr *)(cp->data + sizeof(struct sctphdr));
4329		chlen -= sizeof(struct sctphdr);
4330		/* XXX possible chlen underflow */
4331		memset(&desc, 0, sizeof(desc));
4332	}
4333	trunc_len = (uint16_t) ntohs(cp->trunc_len);
4334	if (trunc_len > limit) {
4335		trunc_len = limit;
4336	}
4337	/* now the chunks themselves */
4338	while ((ch != NULL) && (chlen >= sizeof(struct sctp_chunkhdr))) {
4339		desc.chunk_type = ch->chunk_type;
4340		/* get amount we need to move */
4341		at = ntohs(ch->chunk_length);
4342		if (at < sizeof(struct sctp_chunkhdr)) {
4343			/* corrupt chunk, maybe at the end? */
4344			SCTP_STAT_INCR(sctps_pdrpcrupt);
4345			break;
4346		}
4347		if (trunc_len == 0) {
4348			/* we are supposed to have all of it */
4349			if (at > chlen) {
4350				/* corrupt skip it */
4351				SCTP_STAT_INCR(sctps_pdrpcrupt);
4352				break;
4353			}
4354		} else {
4355			/* is there enough of it left ? */
4356			if (desc.chunk_type == SCTP_DATA) {
4357				if (chlen < (sizeof(struct sctp_data_chunk) +
4358				    sizeof(desc.data_bytes))) {
4359					break;
4360				}
4361			} else {
4362				if (chlen < sizeof(struct sctp_chunkhdr)) {
4363					break;
4364				}
4365			}
4366		}
4367		if (desc.chunk_type == SCTP_DATA) {
4368			/* can we get out the tsn? */
4369			if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX))
4370				SCTP_STAT_INCR(sctps_pdrpmbda);
4371
4372			if (chlen >= (sizeof(struct sctp_data_chunk) + sizeof(uint32_t))) {
4373				/* yep */
4374				struct sctp_data_chunk *dcp;
4375				uint8_t *ddp;
4376				unsigned int iii;
4377
4378				dcp = (struct sctp_data_chunk *)ch;
4379				ddp = (uint8_t *) (dcp + 1);
4380				for (iii = 0; iii < sizeof(desc.data_bytes); iii++) {
4381					desc.data_bytes[iii] = ddp[iii];
4382				}
4383				desc.tsn_ifany = dcp->dp.tsn;
4384			} else {
4385				/* nope we are done. */
4386				SCTP_STAT_INCR(sctps_pdrpnedat);
4387				break;
4388			}
4389		} else {
4390			if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX))
4391				SCTP_STAT_INCR(sctps_pdrpmbct);
4392		}
4393
4394		if (process_chunk_drop(stcb, &desc, net, cp->ch.chunk_flags)) {
4395			SCTP_STAT_INCR(sctps_pdrppdbrk);
4396			break;
4397		}
4398		if (SCTP_SIZE32(at) > chlen) {
4399			break;
4400		}
4401		chlen -= SCTP_SIZE32(at);
4402		if (chlen < sizeof(struct sctp_chunkhdr)) {
4403			/* done, none left */
4404			break;
4405		}
4406		ch = (struct sctp_chunkhdr *)((caddr_t)ch + SCTP_SIZE32(at));
4407	}
4408	/* Now update any rwnd --- possibly */
4409	if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX) == 0) {
4410		/* From a peer, we get a rwnd report */
4411		uint32_t a_rwnd;
4412
4413		SCTP_STAT_INCR(sctps_pdrpfehos);
4414
4415		bottle_bw = ntohl(cp->bottle_bw);
4416		on_queue = ntohl(cp->current_onq);
4417		if (bottle_bw && on_queue) {
4418			/* a rwnd report is in here */
4419			if (bottle_bw > on_queue)
4420				a_rwnd = bottle_bw - on_queue;
4421			else
4422				a_rwnd = 0;
4423
4424			if (a_rwnd == 0)
4425				stcb->asoc.peers_rwnd = 0;
4426			else {
4427				if (a_rwnd > stcb->asoc.total_flight) {
4428					stcb->asoc.peers_rwnd =
4429					    a_rwnd - stcb->asoc.total_flight;
4430				} else {
4431					stcb->asoc.peers_rwnd = 0;
4432				}
4433				if (stcb->asoc.peers_rwnd <
4434				    stcb->sctp_ep->sctp_ep.sctp_sws_sender) {
4435					/* SWS sender side engages */
4436					stcb->asoc.peers_rwnd = 0;
4437				}
4438			}
4439		}
4440	} else {
4441		SCTP_STAT_INCR(sctps_pdrpfmbox);
4442	}
4443
4444	/* now middle boxes in sat networks get a cwnd bump */
4445	if ((cp->ch.chunk_flags & SCTP_FROM_MIDDLE_BOX) &&
4446	    (stcb->asoc.sat_t3_loss_recovery == 0) &&
4447	    (stcb->asoc.sat_network)) {
4448		/*
4449		 * This is debateable but for sat networks it makes sense
4450		 * Note if a T3 timer has went off, we will prohibit any
4451		 * changes to cwnd until we exit the t3 loss recovery.
4452		 */
4453		stcb->asoc.cc_functions.sctp_cwnd_update_after_packet_dropped(stcb,
4454		    net, cp, &bottle_bw, &on_queue);
4455	}
4456}
4457
4458/*
4459 * handles all control chunks in a packet inputs: - m: mbuf chain, assumed to
4460 * still contain IP/SCTP header - stcb: is the tcb found for this packet -
4461 * offset: offset into the mbuf chain to first chunkhdr - length: is the
4462 * length of the complete packet outputs: - length: modified to remaining
4463 * length after control processing - netp: modified to new sctp_nets after
4464 * cookie-echo processing - return NULL to discard the packet (ie. no asoc,
4465 * bad packet,...) otherwise return the tcb for this packet
4466 */
4467#ifdef __GNUC__
4468__attribute__((noinline))
4469#endif
4470	static struct sctp_tcb *
4471	         sctp_process_control(struct mbuf *m, int iphlen, int *offset, int length,
4472             struct sockaddr *src, struct sockaddr *dst,
4473             struct sctphdr *sh, struct sctp_chunkhdr *ch, struct sctp_inpcb *inp,
4474             struct sctp_tcb *stcb, struct sctp_nets **netp, int *fwd_tsn_seen,
4475             uint8_t mflowtype, uint32_t mflowid, uint16_t fibnum,
4476             uint32_t vrf_id, uint16_t port)
4477{
4478	struct sctp_association *asoc;
4479	struct mbuf *op_err;
4480	char msg[SCTP_DIAG_INFO_LEN];
4481	uint32_t vtag_in;
4482	int num_chunks = 0;	/* number of control chunks processed */
4483	uint32_t chk_length;
4484	int ret;
4485	int abort_no_unlock = 0;
4486	int ecne_seen = 0;
4487
4488	/*
4489	 * How big should this be, and should it be alloc'd? Lets try the
4490	 * d-mtu-ceiling for now (2k) and that should hopefully work ...
4491	 * until we get into jumbo grams and such..
4492	 */
4493	uint8_t chunk_buf[SCTP_CHUNK_BUFFER_SIZE];
4494	struct sctp_tcb *locked_tcb = stcb;
4495	int got_auth = 0;
4496	uint32_t auth_offset = 0, auth_len = 0;
4497	int auth_skipped = 0;
4498	int asconf_cnt = 0;
4499
4500#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
4501	struct socket *so;
4502
4503#endif
4504
4505	SCTPDBG(SCTP_DEBUG_INPUT1, "sctp_process_control: iphlen=%u, offset=%u, length=%u stcb:%p\n",
4506	    iphlen, *offset, length, (void *)stcb);
4507
4508	/* validate chunk header length... */
4509	if (ntohs(ch->chunk_length) < sizeof(*ch)) {
4510		SCTPDBG(SCTP_DEBUG_INPUT1, "Invalid header length %d\n",
4511		    ntohs(ch->chunk_length));
4512		if (locked_tcb) {
4513			SCTP_TCB_UNLOCK(locked_tcb);
4514		}
4515		return (NULL);
4516	}
4517	/*
4518	 * validate the verification tag
4519	 */
4520	vtag_in = ntohl(sh->v_tag);
4521
4522	if (locked_tcb) {
4523		SCTP_TCB_LOCK_ASSERT(locked_tcb);
4524	}
4525	if (ch->chunk_type == SCTP_INITIATION) {
4526		SCTPDBG(SCTP_DEBUG_INPUT1, "Its an INIT of len:%d vtag:%x\n",
4527		    ntohs(ch->chunk_length), vtag_in);
4528		if (vtag_in != 0) {
4529			/* protocol error- silently discard... */
4530			SCTP_STAT_INCR(sctps_badvtag);
4531			if (locked_tcb) {
4532				SCTP_TCB_UNLOCK(locked_tcb);
4533			}
4534			return (NULL);
4535		}
4536	} else if (ch->chunk_type != SCTP_COOKIE_ECHO) {
4537		/*
4538		 * If there is no stcb, skip the AUTH chunk and process
4539		 * later after a stcb is found (to validate the lookup was
4540		 * valid.
4541		 */
4542		if ((ch->chunk_type == SCTP_AUTHENTICATION) &&
4543		    (stcb == NULL) &&
4544		    (inp->auth_supported == 1)) {
4545			/* save this chunk for later processing */
4546			auth_skipped = 1;
4547			auth_offset = *offset;
4548			auth_len = ntohs(ch->chunk_length);
4549
4550			/* (temporarily) move past this chunk */
4551			*offset += SCTP_SIZE32(auth_len);
4552			if (*offset >= length) {
4553				/* no more data left in the mbuf chain */
4554				*offset = length;
4555				if (locked_tcb) {
4556					SCTP_TCB_UNLOCK(locked_tcb);
4557				}
4558				return (NULL);
4559			}
4560			ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset,
4561			    sizeof(struct sctp_chunkhdr), chunk_buf);
4562		}
4563		if (ch == NULL) {
4564			/* Help */
4565			*offset = length;
4566			if (locked_tcb) {
4567				SCTP_TCB_UNLOCK(locked_tcb);
4568			}
4569			return (NULL);
4570		}
4571		if (ch->chunk_type == SCTP_COOKIE_ECHO) {
4572			goto process_control_chunks;
4573		}
4574		/*
4575		 * first check if it's an ASCONF with an unknown src addr we
4576		 * need to look inside to find the association
4577		 */
4578		if (ch->chunk_type == SCTP_ASCONF && stcb == NULL) {
4579			struct sctp_chunkhdr *asconf_ch = ch;
4580			uint32_t asconf_offset = 0, asconf_len = 0;
4581
4582			/* inp's refcount may be reduced */
4583			SCTP_INP_INCR_REF(inp);
4584
4585			asconf_offset = *offset;
4586			do {
4587				asconf_len = ntohs(asconf_ch->chunk_length);
4588				if (asconf_len < sizeof(struct sctp_asconf_paramhdr))
4589					break;
4590				stcb = sctp_findassociation_ep_asconf(m,
4591				    *offset,
4592				    dst,
4593				    sh, &inp, netp, vrf_id);
4594				if (stcb != NULL)
4595					break;
4596				asconf_offset += SCTP_SIZE32(asconf_len);
4597				asconf_ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, asconf_offset,
4598				    sizeof(struct sctp_chunkhdr), chunk_buf);
4599			} while (asconf_ch != NULL && asconf_ch->chunk_type == SCTP_ASCONF);
4600			if (stcb == NULL) {
4601				/*
4602				 * reduce inp's refcount if not reduced in
4603				 * sctp_findassociation_ep_asconf().
4604				 */
4605				SCTP_INP_DECR_REF(inp);
4606			} else {
4607				locked_tcb = stcb;
4608			}
4609
4610			/* now go back and verify any auth chunk to be sure */
4611			if (auth_skipped && (stcb != NULL)) {
4612				struct sctp_auth_chunk *auth;
4613
4614				auth = (struct sctp_auth_chunk *)
4615				    sctp_m_getptr(m, auth_offset,
4616				    auth_len, chunk_buf);
4617				got_auth = 1;
4618				auth_skipped = 0;
4619				if ((auth == NULL) || sctp_handle_auth(stcb, auth, m,
4620				    auth_offset)) {
4621					/* auth HMAC failed so dump it */
4622					*offset = length;
4623					if (locked_tcb) {
4624						SCTP_TCB_UNLOCK(locked_tcb);
4625					}
4626					return (NULL);
4627				} else {
4628					/* remaining chunks are HMAC checked */
4629					stcb->asoc.authenticated = 1;
4630				}
4631			}
4632		}
4633		if (stcb == NULL) {
4634			snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__);
4635			op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
4636			    msg);
4637			/* no association, so it's out of the blue... */
4638			sctp_handle_ootb(m, iphlen, *offset, src, dst, sh, inp, op_err,
4639			    mflowtype, mflowid, inp->fibnum,
4640			    vrf_id, port);
4641			*offset = length;
4642			if (locked_tcb) {
4643				SCTP_TCB_UNLOCK(locked_tcb);
4644			}
4645			return (NULL);
4646		}
4647		asoc = &stcb->asoc;
4648		/* ABORT and SHUTDOWN can use either v_tag... */
4649		if ((ch->chunk_type == SCTP_ABORT_ASSOCIATION) ||
4650		    (ch->chunk_type == SCTP_SHUTDOWN_COMPLETE) ||
4651		    (ch->chunk_type == SCTP_PACKET_DROPPED)) {
4652			/* Take the T-bit always into account. */
4653			if ((((ch->chunk_flags & SCTP_HAD_NO_TCB) == 0) &&
4654			    (vtag_in == asoc->my_vtag)) ||
4655			    (((ch->chunk_flags & SCTP_HAD_NO_TCB) == SCTP_HAD_NO_TCB) &&
4656			    (vtag_in == asoc->peer_vtag))) {
4657				/* this is valid */
4658			} else {
4659				/* drop this packet... */
4660				SCTP_STAT_INCR(sctps_badvtag);
4661				if (locked_tcb) {
4662					SCTP_TCB_UNLOCK(locked_tcb);
4663				}
4664				return (NULL);
4665			}
4666		} else if (ch->chunk_type == SCTP_SHUTDOWN_ACK) {
4667			if (vtag_in != asoc->my_vtag) {
4668				/*
4669				 * this could be a stale SHUTDOWN-ACK or the
4670				 * peer never got the SHUTDOWN-COMPLETE and
4671				 * is still hung; we have started a new asoc
4672				 * but it won't complete until the shutdown
4673				 * is completed
4674				 */
4675				if (locked_tcb) {
4676					SCTP_TCB_UNLOCK(locked_tcb);
4677				}
4678				snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__);
4679				op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
4680				    msg);
4681				sctp_handle_ootb(m, iphlen, *offset, src, dst,
4682				    sh, inp, op_err,
4683				    mflowtype, mflowid, fibnum,
4684				    vrf_id, port);
4685				return (NULL);
4686			}
4687		} else {
4688			/* for all other chunks, vtag must match */
4689			if (vtag_in != asoc->my_vtag) {
4690				/* invalid vtag... */
4691				SCTPDBG(SCTP_DEBUG_INPUT3,
4692				    "invalid vtag: %xh, expect %xh\n",
4693				    vtag_in, asoc->my_vtag);
4694				SCTP_STAT_INCR(sctps_badvtag);
4695				if (locked_tcb) {
4696					SCTP_TCB_UNLOCK(locked_tcb);
4697				}
4698				*offset = length;
4699				return (NULL);
4700			}
4701		}
4702	}			/* end if !SCTP_COOKIE_ECHO */
4703	/*
4704	 * process all control chunks...
4705	 */
4706	if (((ch->chunk_type == SCTP_SELECTIVE_ACK) ||
4707	    (ch->chunk_type == SCTP_NR_SELECTIVE_ACK) ||
4708	    (ch->chunk_type == SCTP_HEARTBEAT_REQUEST)) &&
4709	    (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_COOKIE_ECHOED)) {
4710		/* implied cookie-ack.. we must have lost the ack */
4711		if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
4712			sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
4713			    stcb->asoc.overall_error_count,
4714			    0,
4715			    SCTP_FROM_SCTP_INPUT,
4716			    __LINE__);
4717		}
4718		stcb->asoc.overall_error_count = 0;
4719		sctp_handle_cookie_ack((struct sctp_cookie_ack_chunk *)ch, stcb,
4720		    *netp);
4721	}
4722process_control_chunks:
4723	while (IS_SCTP_CONTROL(ch)) {
4724		/* validate chunk length */
4725		chk_length = ntohs(ch->chunk_length);
4726		SCTPDBG(SCTP_DEBUG_INPUT2, "sctp_process_control: processing a chunk type=%u, len=%u\n",
4727		    ch->chunk_type, chk_length);
4728		SCTP_LTRACE_CHK(inp, stcb, ch->chunk_type, chk_length);
4729		if (chk_length < sizeof(*ch) ||
4730		    (*offset + (int)chk_length) > length) {
4731			*offset = length;
4732			if (locked_tcb) {
4733				SCTP_TCB_UNLOCK(locked_tcb);
4734			}
4735			return (NULL);
4736		}
4737		SCTP_STAT_INCR_COUNTER64(sctps_incontrolchunks);
4738		/*
4739		 * INIT-ACK only gets the init ack "header" portion only
4740		 * because we don't have to process the peer's COOKIE. All
4741		 * others get a complete chunk.
4742		 */
4743		if ((ch->chunk_type == SCTP_INITIATION_ACK) ||
4744		    (ch->chunk_type == SCTP_INITIATION)) {
4745			/* get an init-ack chunk */
4746			ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset,
4747			    sizeof(struct sctp_init_ack_chunk), chunk_buf);
4748			if (ch == NULL) {
4749				*offset = length;
4750				if (locked_tcb) {
4751					SCTP_TCB_UNLOCK(locked_tcb);
4752				}
4753				return (NULL);
4754			}
4755		} else {
4756			/* For cookies and all other chunks. */
4757			if (chk_length > sizeof(chunk_buf)) {
4758				/*
4759				 * use just the size of the chunk buffer so
4760				 * the front part of our chunks fit in
4761				 * contiguous space up to the chunk buffer
4762				 * size (508 bytes). For chunks that need to
4763				 * get more than that they must use the
4764				 * sctp_m_getptr() function or other means
4765				 * (e.g. know how to parse mbuf chains).
4766				 * Cookies do this already.
4767				 */
4768				ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset,
4769				    (sizeof(chunk_buf) - 4),
4770				    chunk_buf);
4771				if (ch == NULL) {
4772					*offset = length;
4773					if (locked_tcb) {
4774						SCTP_TCB_UNLOCK(locked_tcb);
4775					}
4776					return (NULL);
4777				}
4778			} else {
4779				/* We can fit it all */
4780				ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset,
4781				    chk_length, chunk_buf);
4782				if (ch == NULL) {
4783					SCTP_PRINTF("sctp_process_control: Can't get the all data....\n");
4784					*offset = length;
4785					if (locked_tcb) {
4786						SCTP_TCB_UNLOCK(locked_tcb);
4787					}
4788					return (NULL);
4789				}
4790			}
4791		}
4792		num_chunks++;
4793		/* Save off the last place we got a control from */
4794		if (stcb != NULL) {
4795			if (((netp != NULL) && (*netp != NULL)) || (ch->chunk_type == SCTP_ASCONF)) {
4796				/*
4797				 * allow last_control to be NULL if
4798				 * ASCONF... ASCONF processing will find the
4799				 * right net later
4800				 */
4801				if ((netp != NULL) && (*netp != NULL))
4802					stcb->asoc.last_control_chunk_from = *netp;
4803			}
4804		}
4805#ifdef SCTP_AUDITING_ENABLED
4806		sctp_audit_log(0xB0, ch->chunk_type);
4807#endif
4808
4809		/* check to see if this chunk required auth, but isn't */
4810		if ((stcb != NULL) &&
4811		    (stcb->asoc.auth_supported == 1) &&
4812		    sctp_auth_is_required_chunk(ch->chunk_type, stcb->asoc.local_auth_chunks) &&
4813		    !stcb->asoc.authenticated) {
4814			/* "silently" ignore */
4815			SCTP_STAT_INCR(sctps_recvauthmissing);
4816			goto next_chunk;
4817		}
4818		switch (ch->chunk_type) {
4819		case SCTP_INITIATION:
4820			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_INIT\n");
4821			/* The INIT chunk must be the only chunk. */
4822			if ((num_chunks > 1) ||
4823			    (length - *offset > (int)SCTP_SIZE32(chk_length))) {
4824				/* RFC 4960 requires that no ABORT is sent */
4825				*offset = length;
4826				if (locked_tcb) {
4827					SCTP_TCB_UNLOCK(locked_tcb);
4828				}
4829				return (NULL);
4830			}
4831			/* Honor our resource limit. */
4832			if (chk_length > SCTP_LARGEST_INIT_ACCEPTED) {
4833				op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, "");
4834				sctp_abort_association(inp, stcb, m, iphlen,
4835				    src, dst, sh, op_err,
4836				    mflowtype, mflowid,
4837				    vrf_id, port);
4838				*offset = length;
4839				return (NULL);
4840			}
4841			sctp_handle_init(m, iphlen, *offset, src, dst, sh,
4842			    (struct sctp_init_chunk *)ch, inp,
4843			    stcb, &abort_no_unlock,
4844			    mflowtype, mflowid,
4845			    vrf_id, port);
4846			*offset = length;
4847			if ((!abort_no_unlock) && (locked_tcb)) {
4848				SCTP_TCB_UNLOCK(locked_tcb);
4849			}
4850			return (NULL);
4851			break;
4852		case SCTP_PAD_CHUNK:
4853			break;
4854		case SCTP_INITIATION_ACK:
4855			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_INIT-ACK\n");
4856			if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) {
4857				/* We are not interested anymore */
4858				if ((stcb) && (stcb->asoc.total_output_queue_size)) {
4859					;
4860				} else {
4861					if (locked_tcb != stcb) {
4862						/* Very unlikely */
4863						SCTP_TCB_UNLOCK(locked_tcb);
4864					}
4865					*offset = length;
4866					if (stcb) {
4867#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
4868						so = SCTP_INP_SO(inp);
4869						atomic_add_int(&stcb->asoc.refcnt, 1);
4870						SCTP_TCB_UNLOCK(stcb);
4871						SCTP_SOCKET_LOCK(so, 1);
4872						SCTP_TCB_LOCK(stcb);
4873						atomic_subtract_int(&stcb->asoc.refcnt, 1);
4874#endif
4875						(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
4876						    SCTP_FROM_SCTP_INPUT + SCTP_LOC_29);
4877#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
4878						SCTP_SOCKET_UNLOCK(so, 1);
4879#endif
4880					}
4881					return (NULL);
4882				}
4883			}
4884			/* The INIT-ACK chunk must be the only chunk. */
4885			if ((num_chunks > 1) ||
4886			    (length - *offset > (int)SCTP_SIZE32(chk_length))) {
4887				*offset = length;
4888				if (locked_tcb) {
4889					SCTP_TCB_UNLOCK(locked_tcb);
4890				}
4891				return (NULL);
4892			}
4893			if ((netp) && (*netp)) {
4894				ret = sctp_handle_init_ack(m, iphlen, *offset,
4895				    src, dst, sh,
4896				    (struct sctp_init_ack_chunk *)ch,
4897				    stcb, *netp,
4898				    &abort_no_unlock,
4899				    mflowtype, mflowid,
4900				    vrf_id);
4901			} else {
4902				ret = -1;
4903			}
4904			*offset = length;
4905			if (abort_no_unlock) {
4906				return (NULL);
4907			}
4908			/*
4909			 * Special case, I must call the output routine to
4910			 * get the cookie echoed
4911			 */
4912			if ((stcb != NULL) && (ret == 0)) {
4913				sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_CONTROL_PROC, SCTP_SO_NOT_LOCKED);
4914			}
4915			if (locked_tcb) {
4916				SCTP_TCB_UNLOCK(locked_tcb);
4917			}
4918			return (NULL);
4919			break;
4920		case SCTP_SELECTIVE_ACK:
4921			{
4922				struct sctp_sack_chunk *sack;
4923				int abort_now = 0;
4924				uint32_t a_rwnd, cum_ack;
4925				uint16_t num_seg, num_dup;
4926				uint8_t flags;
4927				int offset_seg, offset_dup;
4928
4929				SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SACK\n");
4930				SCTP_STAT_INCR(sctps_recvsacks);
4931				if (stcb == NULL) {
4932					SCTPDBG(SCTP_DEBUG_INDATA1, "No stcb when processing SACK chunk\n");
4933					break;
4934				}
4935				if (chk_length < sizeof(struct sctp_sack_chunk)) {
4936					SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size on SACK chunk, too small\n");
4937					break;
4938				}
4939				if (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_ACK_SENT) {
4940					/*-
4941					 * If we have sent a shutdown-ack, we will pay no
4942					 * attention to a sack sent in to us since
4943					 * we don't care anymore.
4944					 */
4945					break;
4946				}
4947				sack = (struct sctp_sack_chunk *)ch;
4948				flags = ch->chunk_flags;
4949				cum_ack = ntohl(sack->sack.cum_tsn_ack);
4950				num_seg = ntohs(sack->sack.num_gap_ack_blks);
4951				num_dup = ntohs(sack->sack.num_dup_tsns);
4952				a_rwnd = (uint32_t) ntohl(sack->sack.a_rwnd);
4953				if (sizeof(struct sctp_sack_chunk) +
4954				    num_seg * sizeof(struct sctp_gap_ack_block) +
4955				    num_dup * sizeof(uint32_t) != chk_length) {
4956					SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size of SACK chunk\n");
4957					break;
4958				}
4959				offset_seg = *offset + sizeof(struct sctp_sack_chunk);
4960				offset_dup = offset_seg + num_seg * sizeof(struct sctp_gap_ack_block);
4961				SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SACK process cum_ack:%x num_seg:%d a_rwnd:%d\n",
4962				    cum_ack, num_seg, a_rwnd);
4963				stcb->asoc.seen_a_sack_this_pkt = 1;
4964				if ((stcb->asoc.pr_sctp_cnt == 0) &&
4965				    (num_seg == 0) &&
4966				    SCTP_TSN_GE(cum_ack, stcb->asoc.last_acked_seq) &&
4967				    (stcb->asoc.saw_sack_with_frags == 0) &&
4968				    (stcb->asoc.saw_sack_with_nr_frags == 0) &&
4969				    (!TAILQ_EMPTY(&stcb->asoc.sent_queue))
4970				    ) {
4971					/*
4972					 * We have a SIMPLE sack having no
4973					 * prior segments and data on sent
4974					 * queue to be acked.. Use the
4975					 * faster path sack processing. We
4976					 * also allow window update sacks
4977					 * with no missing segments to go
4978					 * this way too.
4979					 */
4980					sctp_express_handle_sack(stcb, cum_ack, a_rwnd, &abort_now, ecne_seen);
4981				} else {
4982					if (netp && *netp)
4983						sctp_handle_sack(m, offset_seg, offset_dup, stcb,
4984						    num_seg, 0, num_dup, &abort_now, flags,
4985						    cum_ack, a_rwnd, ecne_seen);
4986				}
4987				if (abort_now) {
4988					/* ABORT signal from sack processing */
4989					*offset = length;
4990					return (NULL);
4991				}
4992				if (TAILQ_EMPTY(&stcb->asoc.send_queue) &&
4993				    TAILQ_EMPTY(&stcb->asoc.sent_queue) &&
4994				    (stcb->asoc.stream_queue_cnt == 0)) {
4995					sctp_ulp_notify(SCTP_NOTIFY_SENDER_DRY, stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
4996				}
4997			}
4998			break;
4999			/*
5000			 * EY - nr_sack:  If the received chunk is an
5001			 * nr_sack chunk
5002			 */
5003		case SCTP_NR_SELECTIVE_ACK:
5004			{
5005				struct sctp_nr_sack_chunk *nr_sack;
5006				int abort_now = 0;
5007				uint32_t a_rwnd, cum_ack;
5008				uint16_t num_seg, num_nr_seg, num_dup;
5009				uint8_t flags;
5010				int offset_seg, offset_dup;
5011
5012				SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_NR_SACK\n");
5013				SCTP_STAT_INCR(sctps_recvsacks);
5014				if (stcb == NULL) {
5015					SCTPDBG(SCTP_DEBUG_INDATA1, "No stcb when processing NR-SACK chunk\n");
5016					break;
5017				}
5018				if (stcb->asoc.nrsack_supported == 0) {
5019					goto unknown_chunk;
5020				}
5021				if (chk_length < sizeof(struct sctp_nr_sack_chunk)) {
5022					SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size on NR-SACK chunk, too small\n");
5023					break;
5024				}
5025				if (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_ACK_SENT) {
5026					/*-
5027					 * If we have sent a shutdown-ack, we will pay no
5028					 * attention to a sack sent in to us since
5029					 * we don't care anymore.
5030					 */
5031					break;
5032				}
5033				nr_sack = (struct sctp_nr_sack_chunk *)ch;
5034				flags = ch->chunk_flags;
5035				cum_ack = ntohl(nr_sack->nr_sack.cum_tsn_ack);
5036				num_seg = ntohs(nr_sack->nr_sack.num_gap_ack_blks);
5037				num_nr_seg = ntohs(nr_sack->nr_sack.num_nr_gap_ack_blks);
5038				num_dup = ntohs(nr_sack->nr_sack.num_dup_tsns);
5039				a_rwnd = (uint32_t) ntohl(nr_sack->nr_sack.a_rwnd);
5040				if (sizeof(struct sctp_nr_sack_chunk) +
5041				    (num_seg + num_nr_seg) * sizeof(struct sctp_gap_ack_block) +
5042				    num_dup * sizeof(uint32_t) != chk_length) {
5043					SCTPDBG(SCTP_DEBUG_INDATA1, "Bad size of NR_SACK chunk\n");
5044					break;
5045				}
5046				offset_seg = *offset + sizeof(struct sctp_nr_sack_chunk);
5047				offset_dup = offset_seg + num_seg * sizeof(struct sctp_gap_ack_block);
5048				SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_NR_SACK process cum_ack:%x num_seg:%d a_rwnd:%d\n",
5049				    cum_ack, num_seg, a_rwnd);
5050				stcb->asoc.seen_a_sack_this_pkt = 1;
5051				if ((stcb->asoc.pr_sctp_cnt == 0) &&
5052				    (num_seg == 0) && (num_nr_seg == 0) &&
5053				    SCTP_TSN_GE(cum_ack, stcb->asoc.last_acked_seq) &&
5054				    (stcb->asoc.saw_sack_with_frags == 0) &&
5055				    (stcb->asoc.saw_sack_with_nr_frags == 0) &&
5056				    (!TAILQ_EMPTY(&stcb->asoc.sent_queue))) {
5057					/*
5058					 * We have a SIMPLE sack having no
5059					 * prior segments and data on sent
5060					 * queue to be acked. Use the faster
5061					 * path sack processing. We also
5062					 * allow window update sacks with no
5063					 * missing segments to go this way
5064					 * too.
5065					 */
5066					sctp_express_handle_sack(stcb, cum_ack, a_rwnd,
5067					    &abort_now, ecne_seen);
5068				} else {
5069					if (netp && *netp)
5070						sctp_handle_sack(m, offset_seg, offset_dup, stcb,
5071						    num_seg, num_nr_seg, num_dup, &abort_now, flags,
5072						    cum_ack, a_rwnd, ecne_seen);
5073				}
5074				if (abort_now) {
5075					/* ABORT signal from sack processing */
5076					*offset = length;
5077					return (NULL);
5078				}
5079				if (TAILQ_EMPTY(&stcb->asoc.send_queue) &&
5080				    TAILQ_EMPTY(&stcb->asoc.sent_queue) &&
5081				    (stcb->asoc.stream_queue_cnt == 0)) {
5082					sctp_ulp_notify(SCTP_NOTIFY_SENDER_DRY, stcb, 0, NULL, SCTP_SO_NOT_LOCKED);
5083				}
5084			}
5085			break;
5086
5087		case SCTP_HEARTBEAT_REQUEST:
5088			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_HEARTBEAT\n");
5089			if ((stcb) && netp && *netp) {
5090				SCTP_STAT_INCR(sctps_recvheartbeat);
5091				sctp_send_heartbeat_ack(stcb, m, *offset,
5092				    chk_length, *netp);
5093
5094				/* He's alive so give him credit */
5095				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5096					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5097					    stcb->asoc.overall_error_count,
5098					    0,
5099					    SCTP_FROM_SCTP_INPUT,
5100					    __LINE__);
5101				}
5102				stcb->asoc.overall_error_count = 0;
5103			}
5104			break;
5105		case SCTP_HEARTBEAT_ACK:
5106			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_HEARTBEAT-ACK\n");
5107			if ((stcb == NULL) || (chk_length != sizeof(struct sctp_heartbeat_chunk))) {
5108				/* Its not ours */
5109				*offset = length;
5110				if (locked_tcb) {
5111					SCTP_TCB_UNLOCK(locked_tcb);
5112				}
5113				return (NULL);
5114			}
5115			/* He's alive so give him credit */
5116			if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5117				sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5118				    stcb->asoc.overall_error_count,
5119				    0,
5120				    SCTP_FROM_SCTP_INPUT,
5121				    __LINE__);
5122			}
5123			stcb->asoc.overall_error_count = 0;
5124			SCTP_STAT_INCR(sctps_recvheartbeatack);
5125			if (netp && *netp)
5126				sctp_handle_heartbeat_ack((struct sctp_heartbeat_chunk *)ch,
5127				    stcb, *netp);
5128			break;
5129		case SCTP_ABORT_ASSOCIATION:
5130			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ABORT, stcb %p\n",
5131			    (void *)stcb);
5132			if ((stcb) && netp && *netp)
5133				sctp_handle_abort((struct sctp_abort_chunk *)ch,
5134				    stcb, *netp);
5135			*offset = length;
5136			return (NULL);
5137			break;
5138		case SCTP_SHUTDOWN:
5139			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SHUTDOWN, stcb %p\n",
5140			    (void *)stcb);
5141			if ((stcb == NULL) || (chk_length != sizeof(struct sctp_shutdown_chunk))) {
5142				*offset = length;
5143				if (locked_tcb) {
5144					SCTP_TCB_UNLOCK(locked_tcb);
5145				}
5146				return (NULL);
5147			}
5148			if (netp && *netp) {
5149				int abort_flag = 0;
5150
5151				sctp_handle_shutdown((struct sctp_shutdown_chunk *)ch,
5152				    stcb, *netp, &abort_flag);
5153				if (abort_flag) {
5154					*offset = length;
5155					return (NULL);
5156				}
5157			}
5158			break;
5159		case SCTP_SHUTDOWN_ACK:
5160			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SHUTDOWN-ACK, stcb %p\n", (void *)stcb);
5161			if ((stcb) && (netp) && (*netp))
5162				sctp_handle_shutdown_ack((struct sctp_shutdown_ack_chunk *)ch, stcb, *netp);
5163			*offset = length;
5164			return (NULL);
5165			break;
5166
5167		case SCTP_OPERATION_ERROR:
5168			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_OP-ERR\n");
5169			if ((stcb) && netp && *netp && sctp_handle_error(ch, stcb, *netp) < 0) {
5170				*offset = length;
5171				return (NULL);
5172			}
5173			break;
5174		case SCTP_COOKIE_ECHO:
5175			SCTPDBG(SCTP_DEBUG_INPUT3,
5176			    "SCTP_COOKIE-ECHO, stcb %p\n", (void *)stcb);
5177			if ((stcb) && (stcb->asoc.total_output_queue_size)) {
5178				;
5179			} else {
5180				if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) {
5181					/* We are not interested anymore */
5182			abend:
5183					if (stcb) {
5184						SCTP_TCB_UNLOCK(stcb);
5185					}
5186					*offset = length;
5187					return (NULL);
5188				}
5189			}
5190			/*
5191			 * First are we accepting? We do this again here
5192			 * since it is possible that a previous endpoint WAS
5193			 * listening responded to a INIT-ACK and then
5194			 * closed. We opened and bound.. and are now no
5195			 * longer listening.
5196			 */
5197
5198			if ((stcb == NULL) && (inp->sctp_socket->so_qlen >= inp->sctp_socket->so_qlimit)) {
5199				if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) &&
5200				    (SCTP_BASE_SYSCTL(sctp_abort_if_one_2_one_hits_limit))) {
5201					op_err = sctp_generate_cause(SCTP_CAUSE_OUT_OF_RESC, "");
5202					sctp_abort_association(inp, stcb, m, iphlen,
5203					    src, dst, sh, op_err,
5204					    mflowtype, mflowid,
5205					    vrf_id, port);
5206				}
5207				*offset = length;
5208				return (NULL);
5209			} else {
5210				struct mbuf *ret_buf;
5211				struct sctp_inpcb *linp;
5212
5213				if (stcb) {
5214					linp = NULL;
5215				} else {
5216					linp = inp;
5217				}
5218
5219				if (linp) {
5220					SCTP_ASOC_CREATE_LOCK(linp);
5221					if ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) ||
5222					    (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE)) {
5223						SCTP_ASOC_CREATE_UNLOCK(linp);
5224						goto abend;
5225					}
5226				}
5227				if (netp) {
5228					ret_buf =
5229					    sctp_handle_cookie_echo(m, iphlen,
5230					    *offset,
5231					    src, dst,
5232					    sh,
5233					    (struct sctp_cookie_echo_chunk *)ch,
5234					    &inp, &stcb, netp,
5235					    auth_skipped,
5236					    auth_offset,
5237					    auth_len,
5238					    &locked_tcb,
5239					    mflowtype,
5240					    mflowid,
5241					    vrf_id,
5242					    port);
5243				} else {
5244					ret_buf = NULL;
5245				}
5246				if (linp) {
5247					SCTP_ASOC_CREATE_UNLOCK(linp);
5248				}
5249				if (ret_buf == NULL) {
5250					if (locked_tcb) {
5251						SCTP_TCB_UNLOCK(locked_tcb);
5252					}
5253					SCTPDBG(SCTP_DEBUG_INPUT3,
5254					    "GAK, null buffer\n");
5255					*offset = length;
5256					return (NULL);
5257				}
5258				/* if AUTH skipped, see if it verified... */
5259				if (auth_skipped) {
5260					got_auth = 1;
5261					auth_skipped = 0;
5262				}
5263				if (!TAILQ_EMPTY(&stcb->asoc.sent_queue)) {
5264					/*
5265					 * Restart the timer if we have
5266					 * pending data
5267					 */
5268					struct sctp_tmit_chunk *chk;
5269
5270					chk = TAILQ_FIRST(&stcb->asoc.sent_queue);
5271					sctp_timer_start(SCTP_TIMER_TYPE_SEND, stcb->sctp_ep, stcb, chk->whoTo);
5272				}
5273			}
5274			break;
5275		case SCTP_COOKIE_ACK:
5276			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_COOKIE-ACK, stcb %p\n", (void *)stcb);
5277			if ((stcb == NULL) || chk_length != sizeof(struct sctp_cookie_ack_chunk)) {
5278				if (locked_tcb) {
5279					SCTP_TCB_UNLOCK(locked_tcb);
5280				}
5281				return (NULL);
5282			}
5283			if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) {
5284				/* We are not interested anymore */
5285				if ((stcb) && (stcb->asoc.total_output_queue_size)) {
5286					;
5287				} else if (stcb) {
5288#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
5289					so = SCTP_INP_SO(inp);
5290					atomic_add_int(&stcb->asoc.refcnt, 1);
5291					SCTP_TCB_UNLOCK(stcb);
5292					SCTP_SOCKET_LOCK(so, 1);
5293					SCTP_TCB_LOCK(stcb);
5294					atomic_subtract_int(&stcb->asoc.refcnt, 1);
5295#endif
5296					(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
5297					    SCTP_FROM_SCTP_INPUT + SCTP_LOC_30);
5298#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
5299					SCTP_SOCKET_UNLOCK(so, 1);
5300#endif
5301					*offset = length;
5302					return (NULL);
5303				}
5304			}
5305			/* He's alive so give him credit */
5306			if ((stcb) && netp && *netp) {
5307				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5308					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5309					    stcb->asoc.overall_error_count,
5310					    0,
5311					    SCTP_FROM_SCTP_INPUT,
5312					    __LINE__);
5313				}
5314				stcb->asoc.overall_error_count = 0;
5315				sctp_handle_cookie_ack((struct sctp_cookie_ack_chunk *)ch, stcb, *netp);
5316			}
5317			break;
5318		case SCTP_ECN_ECHO:
5319			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ECN-ECHO\n");
5320			/* He's alive so give him credit */
5321			if ((stcb == NULL) || (chk_length != sizeof(struct sctp_ecne_chunk))) {
5322				/* Its not ours */
5323				if (locked_tcb) {
5324					SCTP_TCB_UNLOCK(locked_tcb);
5325				}
5326				*offset = length;
5327				return (NULL);
5328			}
5329			if (stcb) {
5330				if (stcb->asoc.ecn_supported == 0) {
5331					goto unknown_chunk;
5332				}
5333				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5334					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5335					    stcb->asoc.overall_error_count,
5336					    0,
5337					    SCTP_FROM_SCTP_INPUT,
5338					    __LINE__);
5339				}
5340				stcb->asoc.overall_error_count = 0;
5341				sctp_handle_ecn_echo((struct sctp_ecne_chunk *)ch,
5342				    stcb);
5343				ecne_seen = 1;
5344			}
5345			break;
5346		case SCTP_ECN_CWR:
5347			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ECN-CWR\n");
5348			/* He's alive so give him credit */
5349			if ((stcb == NULL) || (chk_length != sizeof(struct sctp_cwr_chunk))) {
5350				/* Its not ours */
5351				if (locked_tcb) {
5352					SCTP_TCB_UNLOCK(locked_tcb);
5353				}
5354				*offset = length;
5355				return (NULL);
5356			}
5357			if (stcb) {
5358				if (stcb->asoc.ecn_supported == 0) {
5359					goto unknown_chunk;
5360				}
5361				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5362					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5363					    stcb->asoc.overall_error_count,
5364					    0,
5365					    SCTP_FROM_SCTP_INPUT,
5366					    __LINE__);
5367				}
5368				stcb->asoc.overall_error_count = 0;
5369				sctp_handle_ecn_cwr((struct sctp_cwr_chunk *)ch, stcb, *netp);
5370			}
5371			break;
5372		case SCTP_SHUTDOWN_COMPLETE:
5373			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_SHUTDOWN-COMPLETE, stcb %p\n", (void *)stcb);
5374			/* must be first and only chunk */
5375			if ((num_chunks > 1) ||
5376			    (length - *offset > (int)SCTP_SIZE32(chk_length))) {
5377				*offset = length;
5378				if (locked_tcb) {
5379					SCTP_TCB_UNLOCK(locked_tcb);
5380				}
5381				return (NULL);
5382			}
5383			if ((stcb) && netp && *netp) {
5384				sctp_handle_shutdown_complete((struct sctp_shutdown_complete_chunk *)ch,
5385				    stcb, *netp);
5386			}
5387			*offset = length;
5388			return (NULL);
5389			break;
5390		case SCTP_ASCONF:
5391			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ASCONF\n");
5392			/* He's alive so give him credit */
5393			if (stcb) {
5394				if (stcb->asoc.asconf_supported == 0) {
5395					goto unknown_chunk;
5396				}
5397				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5398					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5399					    stcb->asoc.overall_error_count,
5400					    0,
5401					    SCTP_FROM_SCTP_INPUT,
5402					    __LINE__);
5403				}
5404				stcb->asoc.overall_error_count = 0;
5405				sctp_handle_asconf(m, *offset, src,
5406				    (struct sctp_asconf_chunk *)ch, stcb, asconf_cnt == 0);
5407				asconf_cnt++;
5408			}
5409			break;
5410		case SCTP_ASCONF_ACK:
5411			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_ASCONF-ACK\n");
5412			if (chk_length < sizeof(struct sctp_asconf_ack_chunk)) {
5413				/* Its not ours */
5414				if (locked_tcb) {
5415					SCTP_TCB_UNLOCK(locked_tcb);
5416				}
5417				*offset = length;
5418				return (NULL);
5419			}
5420			if ((stcb) && netp && *netp) {
5421				if (stcb->asoc.asconf_supported == 0) {
5422					goto unknown_chunk;
5423				}
5424				/* He's alive so give him credit */
5425				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5426					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5427					    stcb->asoc.overall_error_count,
5428					    0,
5429					    SCTP_FROM_SCTP_INPUT,
5430					    __LINE__);
5431				}
5432				stcb->asoc.overall_error_count = 0;
5433				sctp_handle_asconf_ack(m, *offset,
5434				    (struct sctp_asconf_ack_chunk *)ch, stcb, *netp, &abort_no_unlock);
5435				if (abort_no_unlock)
5436					return (NULL);
5437			}
5438			break;
5439		case SCTP_FORWARD_CUM_TSN:
5440			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_FWD-TSN\n");
5441			if (chk_length < sizeof(struct sctp_forward_tsn_chunk)) {
5442				/* Its not ours */
5443				if (locked_tcb) {
5444					SCTP_TCB_UNLOCK(locked_tcb);
5445				}
5446				*offset = length;
5447				return (NULL);
5448			}
5449			/* He's alive so give him credit */
5450			if (stcb) {
5451				int abort_flag = 0;
5452
5453				if (stcb->asoc.prsctp_supported == 0) {
5454					goto unknown_chunk;
5455				}
5456				stcb->asoc.overall_error_count = 0;
5457				if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5458					sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5459					    stcb->asoc.overall_error_count,
5460					    0,
5461					    SCTP_FROM_SCTP_INPUT,
5462					    __LINE__);
5463				}
5464				*fwd_tsn_seen = 1;
5465				if (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE) {
5466					/* We are not interested anymore */
5467#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
5468					so = SCTP_INP_SO(inp);
5469					atomic_add_int(&stcb->asoc.refcnt, 1);
5470					SCTP_TCB_UNLOCK(stcb);
5471					SCTP_SOCKET_LOCK(so, 1);
5472					SCTP_TCB_LOCK(stcb);
5473					atomic_subtract_int(&stcb->asoc.refcnt, 1);
5474#endif
5475					(void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC,
5476					    SCTP_FROM_SCTP_INPUT + SCTP_LOC_31);
5477#if defined(__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
5478					SCTP_SOCKET_UNLOCK(so, 1);
5479#endif
5480					*offset = length;
5481					return (NULL);
5482				}
5483				sctp_handle_forward_tsn(stcb,
5484				    (struct sctp_forward_tsn_chunk *)ch, &abort_flag, m, *offset);
5485				if (abort_flag) {
5486					*offset = length;
5487					return (NULL);
5488				} else {
5489					if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5490						sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5491						    stcb->asoc.overall_error_count,
5492						    0,
5493						    SCTP_FROM_SCTP_INPUT,
5494						    __LINE__);
5495					}
5496					stcb->asoc.overall_error_count = 0;
5497				}
5498
5499			}
5500			break;
5501		case SCTP_STREAM_RESET:
5502			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_STREAM_RESET\n");
5503			if (((stcb == NULL) || (ch == NULL) || (chk_length < sizeof(struct sctp_stream_reset_tsn_req)))) {
5504				/* Its not ours */
5505				if (locked_tcb) {
5506					SCTP_TCB_UNLOCK(locked_tcb);
5507				}
5508				*offset = length;
5509				return (NULL);
5510			}
5511			if (stcb->asoc.reconfig_supported == 0) {
5512				goto unknown_chunk;
5513			}
5514			if (sctp_handle_stream_reset(stcb, m, *offset, ch)) {
5515				/* stop processing */
5516				*offset = length;
5517				return (NULL);
5518			}
5519			break;
5520		case SCTP_PACKET_DROPPED:
5521			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_PACKET_DROPPED\n");
5522			/* re-get it all please */
5523			if (chk_length < sizeof(struct sctp_pktdrop_chunk)) {
5524				/* Its not ours */
5525				if (locked_tcb) {
5526					SCTP_TCB_UNLOCK(locked_tcb);
5527				}
5528				*offset = length;
5529				return (NULL);
5530			}
5531			if (ch && (stcb) && netp && (*netp)) {
5532				if (stcb->asoc.pktdrop_supported == 0) {
5533					goto unknown_chunk;
5534				}
5535				sctp_handle_packet_dropped((struct sctp_pktdrop_chunk *)ch,
5536				    stcb, *netp,
5537				    min(chk_length, (sizeof(chunk_buf) - 4)));
5538
5539			}
5540			break;
5541		case SCTP_AUTHENTICATION:
5542			SCTPDBG(SCTP_DEBUG_INPUT3, "SCTP_AUTHENTICATION\n");
5543			if (stcb == NULL) {
5544				/* save the first AUTH for later processing */
5545				if (auth_skipped == 0) {
5546					auth_offset = *offset;
5547					auth_len = chk_length;
5548					auth_skipped = 1;
5549				}
5550				/* skip this chunk (temporarily) */
5551				goto next_chunk;
5552			}
5553			if (stcb->asoc.auth_supported == 0) {
5554				goto unknown_chunk;
5555			}
5556			if ((chk_length < (sizeof(struct sctp_auth_chunk))) ||
5557			    (chk_length > (sizeof(struct sctp_auth_chunk) +
5558			    SCTP_AUTH_DIGEST_LEN_MAX))) {
5559				/* Its not ours */
5560				if (locked_tcb) {
5561					SCTP_TCB_UNLOCK(locked_tcb);
5562				}
5563				*offset = length;
5564				return (NULL);
5565			}
5566			if (got_auth == 1) {
5567				/* skip this chunk... it's already auth'd */
5568				goto next_chunk;
5569			}
5570			got_auth = 1;
5571			if ((ch == NULL) || sctp_handle_auth(stcb, (struct sctp_auth_chunk *)ch,
5572			    m, *offset)) {
5573				/* auth HMAC failed so dump the packet */
5574				*offset = length;
5575				return (stcb);
5576			} else {
5577				/* remaining chunks are HMAC checked */
5578				stcb->asoc.authenticated = 1;
5579			}
5580			break;
5581
5582		default:
5583	unknown_chunk:
5584			/* it's an unknown chunk! */
5585			if ((ch->chunk_type & 0x40) && (stcb != NULL)) {
5586				struct sctp_gen_error_cause *cause;
5587				int len;
5588
5589				op_err = sctp_get_mbuf_for_msg(sizeof(struct sctp_gen_error_cause),
5590				    0, M_NOWAIT, 1, MT_DATA);
5591				if (op_err != NULL) {
5592					len = min(SCTP_SIZE32(chk_length), (uint32_t) (length - *offset));
5593					cause = mtod(op_err, struct sctp_gen_error_cause *);
5594					cause->code = htons(SCTP_CAUSE_UNRECOG_CHUNK);
5595					cause->length = htons(len + sizeof(struct sctp_gen_error_cause));
5596					SCTP_BUF_LEN(op_err) = sizeof(struct sctp_gen_error_cause);
5597					SCTP_BUF_NEXT(op_err) = SCTP_M_COPYM(m, *offset, len, M_NOWAIT);
5598					if (SCTP_BUF_NEXT(op_err) != NULL) {
5599#ifdef SCTP_MBUF_LOGGING
5600						if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MBUF_LOGGING_ENABLE) {
5601							sctp_log_mbc(SCTP_BUF_NEXT(op_err), SCTP_MBUF_ICOPY);
5602						}
5603#endif
5604						sctp_queue_op_err(stcb, op_err);
5605					} else {
5606						sctp_m_freem(op_err);
5607					}
5608				}
5609			}
5610			if ((ch->chunk_type & 0x80) == 0) {
5611				/* discard this packet */
5612				*offset = length;
5613				return (stcb);
5614			}	/* else skip this bad chunk and continue... */
5615			break;
5616		}		/* switch (ch->chunk_type) */
5617
5618
5619next_chunk:
5620		/* get the next chunk */
5621		*offset += SCTP_SIZE32(chk_length);
5622		if (*offset >= length) {
5623			/* no more data left in the mbuf chain */
5624			break;
5625		}
5626		ch = (struct sctp_chunkhdr *)sctp_m_getptr(m, *offset,
5627		    sizeof(struct sctp_chunkhdr), chunk_buf);
5628		if (ch == NULL) {
5629			if (locked_tcb) {
5630				SCTP_TCB_UNLOCK(locked_tcb);
5631			}
5632			*offset = length;
5633			return (NULL);
5634		}
5635	}			/* while */
5636
5637	if (asconf_cnt > 0 && stcb != NULL) {
5638		sctp_send_asconf_ack(stcb);
5639	}
5640	return (stcb);
5641}
5642
5643
5644#ifdef INVARIANTS
5645#ifdef __GNUC__
5646__attribute__((noinline))
5647#endif
5648	void
5649	     sctp_validate_no_locks(struct sctp_inpcb *inp)
5650{
5651	struct sctp_tcb *lstcb;
5652
5653	LIST_FOREACH(lstcb, &inp->sctp_asoc_list, sctp_tcblist) {
5654		if (mtx_owned(&lstcb->tcb_mtx)) {
5655			panic("Own lock on stcb at return from input");
5656		}
5657	}
5658	if (mtx_owned(&inp->inp_create_mtx)) {
5659		panic("Own create lock on inp");
5660	}
5661	if (mtx_owned(&inp->inp_mtx)) {
5662		panic("Own inp lock on inp");
5663	}
5664}
5665
5666#endif
5667
5668/*
5669 * common input chunk processing (v4 and v6)
5670 */
5671void
5672sctp_common_input_processing(struct mbuf **mm, int iphlen, int offset, int length,
5673    struct sockaddr *src, struct sockaddr *dst,
5674    struct sctphdr *sh, struct sctp_chunkhdr *ch,
5675#if !defined(SCTP_WITH_NO_CSUM)
5676    uint8_t compute_crc,
5677#endif
5678    uint8_t ecn_bits,
5679    uint8_t mflowtype, uint32_t mflowid, uint16_t fibnum,
5680    uint32_t vrf_id, uint16_t port)
5681{
5682	uint32_t high_tsn;
5683	int fwd_tsn_seen = 0, data_processed = 0;
5684	struct mbuf *m = *mm, *op_err;
5685	char msg[SCTP_DIAG_INFO_LEN];
5686	int un_sent;
5687	int cnt_ctrl_ready = 0;
5688	struct sctp_inpcb *inp = NULL, *inp_decr = NULL;
5689	struct sctp_tcb *stcb = NULL;
5690	struct sctp_nets *net = NULL;
5691
5692	SCTP_STAT_INCR(sctps_recvdatagrams);
5693#ifdef SCTP_AUDITING_ENABLED
5694	sctp_audit_log(0xE0, 1);
5695	sctp_auditing(0, inp, stcb, net);
5696#endif
5697#if !defined(SCTP_WITH_NO_CSUM)
5698	if (compute_crc != 0) {
5699		uint32_t check, calc_check;
5700
5701		check = sh->checksum;
5702		sh->checksum = 0;
5703		calc_check = sctp_calculate_cksum(m, iphlen);
5704		sh->checksum = check;
5705		if (calc_check != check) {
5706			SCTPDBG(SCTP_DEBUG_INPUT1, "Bad CSUM on SCTP packet calc_check:%x check:%x  m:%p mlen:%d iphlen:%d\n",
5707			    calc_check, check, (void *)m, length, iphlen);
5708			stcb = sctp_findassociation_addr(m, offset, src, dst,
5709			    sh, ch, &inp, &net, vrf_id);
5710#if defined(INET) || defined(INET6)
5711			if ((net != NULL) && (port != 0)) {
5712				if (net->port == 0) {
5713					sctp_pathmtu_adjustment(stcb, net->mtu - sizeof(struct udphdr));
5714				}
5715				net->port = port;
5716			}
5717#endif
5718			if (net != NULL) {
5719				net->flowtype = mflowtype;
5720				net->flowid = mflowid;
5721			}
5722			if ((inp != NULL) && (stcb != NULL)) {
5723				sctp_send_packet_dropped(stcb, net, m, length, iphlen, 1);
5724				sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_INPUT_ERROR, SCTP_SO_NOT_LOCKED);
5725			} else if ((inp != NULL) && (stcb == NULL)) {
5726				inp_decr = inp;
5727			}
5728			SCTP_STAT_INCR(sctps_badsum);
5729			SCTP_STAT_INCR_COUNTER32(sctps_checksumerrors);
5730			goto out;
5731		}
5732	}
5733#endif
5734	/* Destination port of 0 is illegal, based on RFC4960. */
5735	if (sh->dest_port == 0) {
5736		SCTP_STAT_INCR(sctps_hdrops);
5737		goto out;
5738	}
5739	stcb = sctp_findassociation_addr(m, offset, src, dst,
5740	    sh, ch, &inp, &net, vrf_id);
5741#if defined(INET) || defined(INET6)
5742	if ((net != NULL) && (port != 0)) {
5743		if (net->port == 0) {
5744			sctp_pathmtu_adjustment(stcb, net->mtu - sizeof(struct udphdr));
5745		}
5746		net->port = port;
5747	}
5748#endif
5749	if (net != NULL) {
5750		net->flowtype = mflowtype;
5751		net->flowid = mflowid;
5752	}
5753	if (inp == NULL) {
5754		SCTP_STAT_INCR(sctps_noport);
5755		if (badport_bandlim(BANDLIM_SCTP_OOTB) < 0) {
5756			goto out;
5757		}
5758		if (ch->chunk_type == SCTP_SHUTDOWN_ACK) {
5759			sctp_send_shutdown_complete2(src, dst, sh,
5760			    mflowtype, mflowid, fibnum,
5761			    vrf_id, port);
5762			goto out;
5763		}
5764		if (ch->chunk_type == SCTP_SHUTDOWN_COMPLETE) {
5765			goto out;
5766		}
5767		if (ch->chunk_type != SCTP_ABORT_ASSOCIATION) {
5768			if ((SCTP_BASE_SYSCTL(sctp_blackhole) == 0) ||
5769			    ((SCTP_BASE_SYSCTL(sctp_blackhole) == 1) &&
5770			    (ch->chunk_type != SCTP_INIT))) {
5771				op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
5772				    "Out of the blue");
5773				sctp_send_abort(m, iphlen, src, dst,
5774				    sh, 0, op_err,
5775				    mflowtype, mflowid, fibnum,
5776				    vrf_id, port);
5777			}
5778		}
5779		goto out;
5780	} else if (stcb == NULL) {
5781		inp_decr = inp;
5782	}
5783#ifdef IPSEC
5784	/*-
5785	 * I very much doubt any of the IPSEC stuff will work but I have no
5786	 * idea, so I will leave it in place.
5787	 */
5788	if (inp != NULL) {
5789		switch (dst->sa_family) {
5790#ifdef INET
5791		case AF_INET:
5792			if (ipsec4_in_reject(m, &inp->ip_inp.inp)) {
5793				IPSECSTAT_INC(ips_in_polvio);
5794				SCTP_STAT_INCR(sctps_hdrops);
5795				goto out;
5796			}
5797			break;
5798#endif
5799#ifdef INET6
5800		case AF_INET6:
5801			if (ipsec6_in_reject(m, &inp->ip_inp.inp)) {
5802				IPSEC6STAT_INC(ips_in_polvio);
5803				SCTP_STAT_INCR(sctps_hdrops);
5804				goto out;
5805			}
5806			break;
5807#endif
5808		default:
5809			break;
5810		}
5811	}
5812#endif
5813	SCTPDBG(SCTP_DEBUG_INPUT1, "Ok, Common input processing called, m:%p iphlen:%d offset:%d length:%d stcb:%p\n",
5814	    (void *)m, iphlen, offset, length, (void *)stcb);
5815	if (stcb) {
5816		/* always clear this before beginning a packet */
5817		stcb->asoc.authenticated = 0;
5818		stcb->asoc.seen_a_sack_this_pkt = 0;
5819		SCTPDBG(SCTP_DEBUG_INPUT1, "stcb:%p state:%x\n",
5820		    (void *)stcb, stcb->asoc.state);
5821
5822		if ((stcb->asoc.state & SCTP_STATE_WAS_ABORTED) ||
5823		    (stcb->asoc.state & SCTP_STATE_ABOUT_TO_BE_FREED)) {
5824			/*-
5825			 * If we hit here, we had a ref count
5826			 * up when the assoc was aborted and the
5827			 * timer is clearing out the assoc, we should
5828			 * NOT respond to any packet.. its OOTB.
5829			 */
5830			SCTP_TCB_UNLOCK(stcb);
5831			stcb = NULL;
5832			snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__);
5833			op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
5834			    msg);
5835			sctp_handle_ootb(m, iphlen, offset, src, dst, sh, inp, op_err,
5836			    mflowtype, mflowid, inp->fibnum,
5837			    vrf_id, port);
5838			goto out;
5839		}
5840	}
5841	if (IS_SCTP_CONTROL(ch)) {
5842		/* process the control portion of the SCTP packet */
5843		/* sa_ignore NO_NULL_CHK */
5844		stcb = sctp_process_control(m, iphlen, &offset, length,
5845		    src, dst, sh, ch,
5846		    inp, stcb, &net, &fwd_tsn_seen,
5847		    mflowtype, mflowid, fibnum,
5848		    vrf_id, port);
5849		if (stcb) {
5850			/*
5851			 * This covers us if the cookie-echo was there and
5852			 * it changes our INP.
5853			 */
5854			inp = stcb->sctp_ep;
5855#if defined(INET) || defined(INET6)
5856			if ((net != NULL) && (port != 0)) {
5857				if (net->port == 0) {
5858					sctp_pathmtu_adjustment(stcb, net->mtu - sizeof(struct udphdr));
5859				}
5860				net->port = port;
5861			}
5862#endif
5863		}
5864	} else {
5865		/*
5866		 * no control chunks, so pre-process DATA chunks (these
5867		 * checks are taken care of by control processing)
5868		 */
5869
5870		/*
5871		 * if DATA only packet, and auth is required, then punt...
5872		 * can't have authenticated without any AUTH (control)
5873		 * chunks
5874		 */
5875		if ((stcb != NULL) &&
5876		    (stcb->asoc.auth_supported == 1) &&
5877		    sctp_auth_is_required_chunk(SCTP_DATA, stcb->asoc.local_auth_chunks)) {
5878			/* "silently" ignore */
5879			SCTP_STAT_INCR(sctps_recvauthmissing);
5880			goto out;
5881		}
5882		if (stcb == NULL) {
5883			/* out of the blue DATA chunk */
5884			snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__);
5885			op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
5886			    msg);
5887			sctp_handle_ootb(m, iphlen, offset, src, dst, sh, inp, op_err,
5888			    mflowtype, mflowid, fibnum,
5889			    vrf_id, port);
5890			goto out;
5891		}
5892		if (stcb->asoc.my_vtag != ntohl(sh->v_tag)) {
5893			/* v_tag mismatch! */
5894			SCTP_STAT_INCR(sctps_badvtag);
5895			goto out;
5896		}
5897	}
5898
5899	if (stcb == NULL) {
5900		/*
5901		 * no valid TCB for this packet, or we found it's a bad
5902		 * packet while processing control, or we're done with this
5903		 * packet (done or skip rest of data), so we drop it...
5904		 */
5905		goto out;
5906	}
5907	/*
5908	 * DATA chunk processing
5909	 */
5910	/* plow through the data chunks while length > offset */
5911
5912	/*
5913	 * Rest should be DATA only.  Check authentication state if AUTH for
5914	 * DATA is required.
5915	 */
5916	if ((length > offset) &&
5917	    (stcb != NULL) &&
5918	    (stcb->asoc.auth_supported == 1) &&
5919	    sctp_auth_is_required_chunk(SCTP_DATA, stcb->asoc.local_auth_chunks) &&
5920	    !stcb->asoc.authenticated) {
5921		/* "silently" ignore */
5922		SCTP_STAT_INCR(sctps_recvauthmissing);
5923		SCTPDBG(SCTP_DEBUG_AUTH1,
5924		    "Data chunk requires AUTH, skipped\n");
5925		goto trigger_send;
5926	}
5927	if (length > offset) {
5928		int retval;
5929
5930		/*
5931		 * First check to make sure our state is correct. We would
5932		 * not get here unless we really did have a tag, so we don't
5933		 * abort if this happens, just dump the chunk silently.
5934		 */
5935		switch (SCTP_GET_STATE(&stcb->asoc)) {
5936		case SCTP_STATE_COOKIE_ECHOED:
5937			/*
5938			 * we consider data with valid tags in this state
5939			 * shows us the cookie-ack was lost. Imply it was
5940			 * there.
5941			 */
5942			if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_THRESHOLD_LOGGING) {
5943				sctp_misc_ints(SCTP_THRESHOLD_CLEAR,
5944				    stcb->asoc.overall_error_count,
5945				    0,
5946				    SCTP_FROM_SCTP_INPUT,
5947				    __LINE__);
5948			}
5949			stcb->asoc.overall_error_count = 0;
5950			sctp_handle_cookie_ack((struct sctp_cookie_ack_chunk *)ch, stcb, net);
5951			break;
5952		case SCTP_STATE_COOKIE_WAIT:
5953			/*
5954			 * We consider OOTB any data sent during asoc setup.
5955			 */
5956			snprintf(msg, sizeof(msg), "OOTB, %s:%d at %s", __FILE__, __LINE__, __func__);
5957			op_err = sctp_generate_cause(SCTP_BASE_SYSCTL(sctp_diag_info_code),
5958			    msg);
5959			sctp_handle_ootb(m, iphlen, offset, src, dst, sh, inp, op_err,
5960			    mflowtype, mflowid, inp->fibnum,
5961			    vrf_id, port);
5962			goto out;
5963			/* sa_ignore NOTREACHED */
5964			break;
5965		case SCTP_STATE_EMPTY:	/* should not happen */
5966		case SCTP_STATE_INUSE:	/* should not happen */
5967		case SCTP_STATE_SHUTDOWN_RECEIVED:	/* This is a peer error */
5968		case SCTP_STATE_SHUTDOWN_ACK_SENT:
5969		default:
5970			goto out;
5971			/* sa_ignore NOTREACHED */
5972			break;
5973		case SCTP_STATE_OPEN:
5974		case SCTP_STATE_SHUTDOWN_SENT:
5975			break;
5976		}
5977		/* plow through the data chunks while length > offset */
5978		retval = sctp_process_data(mm, iphlen, &offset, length,
5979		    inp, stcb, net, &high_tsn);
5980		if (retval == 2) {
5981			/*
5982			 * The association aborted, NO UNLOCK needed since
5983			 * the association is destroyed.
5984			 */
5985			stcb = NULL;
5986			goto out;
5987		}
5988		data_processed = 1;
5989		/*
5990		 * Anything important needs to have been m_copy'ed in
5991		 * process_data
5992		 */
5993	}
5994	/* take care of ecn */
5995	if ((data_processed == 1) &&
5996	    (stcb->asoc.ecn_supported == 1) &&
5997	    ((ecn_bits & SCTP_CE_BITS) == SCTP_CE_BITS)) {
5998		/* Yep, we need to add a ECNE */
5999		sctp_send_ecn_echo(stcb, net, high_tsn);
6000	}
6001	if ((data_processed == 0) && (fwd_tsn_seen)) {
6002		int was_a_gap;
6003		uint32_t highest_tsn;
6004
6005		if (SCTP_TSN_GT(stcb->asoc.highest_tsn_inside_nr_map, stcb->asoc.highest_tsn_inside_map)) {
6006			highest_tsn = stcb->asoc.highest_tsn_inside_nr_map;
6007		} else {
6008			highest_tsn = stcb->asoc.highest_tsn_inside_map;
6009		}
6010		was_a_gap = SCTP_TSN_GT(highest_tsn, stcb->asoc.cumulative_tsn);
6011		stcb->asoc.send_sack = 1;
6012		sctp_sack_check(stcb, was_a_gap);
6013	} else if (fwd_tsn_seen) {
6014		stcb->asoc.send_sack = 1;
6015	}
6016	/* trigger send of any chunks in queue... */
6017trigger_send:
6018#ifdef SCTP_AUDITING_ENABLED
6019	sctp_audit_log(0xE0, 2);
6020	sctp_auditing(1, inp, stcb, net);
6021#endif
6022	SCTPDBG(SCTP_DEBUG_INPUT1,
6023	    "Check for chunk output prw:%d tqe:%d tf=%d\n",
6024	    stcb->asoc.peers_rwnd,
6025	    TAILQ_EMPTY(&stcb->asoc.control_send_queue),
6026	    stcb->asoc.total_flight);
6027	un_sent = (stcb->asoc.total_output_queue_size - stcb->asoc.total_flight);
6028	if (!TAILQ_EMPTY(&stcb->asoc.control_send_queue)) {
6029		cnt_ctrl_ready = stcb->asoc.ctrl_queue_cnt - stcb->asoc.ecn_echo_cnt_onq;
6030	}
6031	if (cnt_ctrl_ready || stcb->asoc.trigger_reset ||
6032	    ((un_sent) &&
6033	    (stcb->asoc.peers_rwnd > 0 ||
6034	    (stcb->asoc.peers_rwnd <= 0 && stcb->asoc.total_flight == 0)))) {
6035		SCTPDBG(SCTP_DEBUG_INPUT3, "Calling chunk OUTPUT\n");
6036		sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_CONTROL_PROC, SCTP_SO_NOT_LOCKED);
6037		SCTPDBG(SCTP_DEBUG_INPUT3, "chunk OUTPUT returns\n");
6038	}
6039#ifdef SCTP_AUDITING_ENABLED
6040	sctp_audit_log(0xE0, 3);
6041	sctp_auditing(2, inp, stcb, net);
6042#endif
6043out:
6044	if (stcb != NULL) {
6045		SCTP_TCB_UNLOCK(stcb);
6046	}
6047	if (inp_decr != NULL) {
6048		/* reduce ref-count */
6049		SCTP_INP_WLOCK(inp_decr);
6050		SCTP_INP_DECR_REF(inp_decr);
6051		SCTP_INP_WUNLOCK(inp_decr);
6052	}
6053#ifdef INVARIANTS
6054	if (inp != NULL) {
6055		sctp_validate_no_locks(inp);
6056	}
6057#endif
6058	return;
6059}
6060
6061#if 0
6062static void
6063sctp_print_mbuf_chain(struct mbuf *m)
6064{
6065	for (; m; m = SCTP_BUF_NEXT(m)) {
6066		SCTP_PRINTF("%p: m_len = %ld\n", (void *)m, SCTP_BUF_LEN(m));
6067		if (SCTP_BUF_IS_EXTENDED(m))
6068			SCTP_PRINTF("%p: extend_size = %d\n", (void *)m, SCTP_BUF_EXTEND_SIZE(m));
6069	}
6070}
6071
6072#endif
6073
6074#ifdef INET
6075void
6076sctp_input_with_port(struct mbuf *i_pak, int off, uint16_t port)
6077{
6078	struct mbuf *m;
6079	int iphlen;
6080	uint32_t vrf_id = 0;
6081	uint8_t ecn_bits;
6082	struct sockaddr_in src, dst;
6083	struct ip *ip;
6084	struct sctphdr *sh;
6085	struct sctp_chunkhdr *ch;
6086	int length, offset;
6087
6088#if !defined(SCTP_WITH_NO_CSUM)
6089	uint8_t compute_crc;
6090
6091#endif
6092	uint32_t mflowid;
6093	uint8_t mflowtype;
6094	uint16_t fibnum;
6095
6096	iphlen = off;
6097	if (SCTP_GET_PKT_VRFID(i_pak, vrf_id)) {
6098		SCTP_RELEASE_PKT(i_pak);
6099		return;
6100	}
6101	m = SCTP_HEADER_TO_CHAIN(i_pak);
6102#ifdef SCTP_MBUF_LOGGING
6103	/* Log in any input mbufs */
6104	if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_MBUF_LOGGING_ENABLE) {
6105		sctp_log_mbc(m, SCTP_MBUF_INPUT);
6106	}
6107#endif
6108#ifdef SCTP_PACKET_LOGGING
6109	if (SCTP_BASE_SYSCTL(sctp_logging_level) & SCTP_LAST_PACKET_TRACING) {
6110		sctp_packet_log(m);
6111	}
6112#endif
6113	SCTPDBG(SCTP_DEBUG_CRCOFFLOAD,
6114	    "sctp_input(): Packet of length %d received on %s with csum_flags 0x%b.\n",
6115	    m->m_pkthdr.len,
6116	    if_name(m->m_pkthdr.rcvif),
6117	    (int)m->m_pkthdr.csum_flags, CSUM_BITS);
6118	mflowid = m->m_pkthdr.flowid;
6119	mflowtype = M_HASHTYPE_GET(m);
6120	fibnum = M_GETFIB(m);
6121	SCTP_STAT_INCR(sctps_recvpackets);
6122	SCTP_STAT_INCR_COUNTER64(sctps_inpackets);
6123	/* Get IP, SCTP, and first chunk header together in the first mbuf. */
6124	offset = iphlen + sizeof(struct sctphdr) + sizeof(struct sctp_chunkhdr);
6125	if (SCTP_BUF_LEN(m) < offset) {
6126		if ((m = m_pullup(m, offset)) == NULL) {
6127			SCTP_STAT_INCR(sctps_hdrops);
6128			return;
6129		}
6130	}
6131	ip = mtod(m, struct ip *);
6132	sh = (struct sctphdr *)((caddr_t)ip + iphlen);
6133	ch = (struct sctp_chunkhdr *)((caddr_t)sh + sizeof(struct sctphdr));
6134	offset -= sizeof(struct sctp_chunkhdr);
6135	memset(&src, 0, sizeof(struct sockaddr_in));
6136	src.sin_family = AF_INET;
6137	src.sin_len = sizeof(struct sockaddr_in);
6138	src.sin_port = sh->src_port;
6139	src.sin_addr = ip->ip_src;
6140	memset(&dst, 0, sizeof(struct sockaddr_in));
6141	dst.sin_family = AF_INET;
6142	dst.sin_len = sizeof(struct sockaddr_in);
6143	dst.sin_port = sh->dest_port;
6144	dst.sin_addr = ip->ip_dst;
6145	length = ntohs(ip->ip_len);
6146	/* Validate mbuf chain length with IP payload length. */
6147	if (SCTP_HEADER_LEN(m) != length) {
6148		SCTPDBG(SCTP_DEBUG_INPUT1,
6149		    "sctp_input() length:%d reported length:%d\n", length, SCTP_HEADER_LEN(m));
6150		SCTP_STAT_INCR(sctps_hdrops);
6151		goto out;
6152	}
6153	/* SCTP does not allow broadcasts or multicasts */
6154	if (IN_MULTICAST(ntohl(dst.sin_addr.s_addr))) {
6155		goto out;
6156	}
6157	if (SCTP_IS_IT_BROADCAST(dst.sin_addr, m)) {
6158		goto out;
6159	}
6160	ecn_bits = ip->ip_tos;
6161#if defined(SCTP_WITH_NO_CSUM)
6162	SCTP_STAT_INCR(sctps_recvnocrc);
6163#else
6164	if (m->m_pkthdr.csum_flags & CSUM_SCTP_VALID) {
6165		SCTP_STAT_INCR(sctps_recvhwcrc);
6166		compute_crc = 0;
6167	} else {
6168		SCTP_STAT_INCR(sctps_recvswcrc);
6169		compute_crc = 1;
6170	}
6171#endif
6172	sctp_common_input_processing(&m, iphlen, offset, length,
6173	    (struct sockaddr *)&src,
6174	    (struct sockaddr *)&dst,
6175	    sh, ch,
6176#if !defined(SCTP_WITH_NO_CSUM)
6177	    compute_crc,
6178#endif
6179	    ecn_bits,
6180	    mflowtype, mflowid, fibnum,
6181	    vrf_id, port);
6182out:
6183	if (m) {
6184		sctp_m_freem(m);
6185	}
6186	return;
6187}
6188
6189#if defined(__FreeBSD__) && defined(SCTP_MCORE_INPUT) && defined(SMP)
6190extern int *sctp_cpuarry;
6191
6192#endif
6193
6194void
6195sctp_input(struct mbuf *m, int off)
6196{
6197#if defined(__FreeBSD__) && defined(SCTP_MCORE_INPUT) && defined(SMP)
6198	struct ip *ip;
6199	struct sctphdr *sh;
6200	int offset;
6201	int cpu_to_use;
6202	uint32_t flowid, tag;
6203
6204	if (mp_ncpus > 1) {
6205		if (M_HASHTYPE_GET(m) != M_HASHTYPE_NONE) {
6206			flowid = m->m_pkthdr.flowid;
6207		} else {
6208			/*
6209			 * No flow id built by lower layers fix it so we
6210			 * create one.
6211			 */
6212			offset = off + sizeof(struct sctphdr);
6213			if (SCTP_BUF_LEN(m) < offset) {
6214				if ((m = m_pullup(m, offset)) == NULL) {
6215					SCTP_STAT_INCR(sctps_hdrops);
6216					return;
6217				}
6218			}
6219			ip = mtod(m, struct ip *);
6220			sh = (struct sctphdr *)((caddr_t)ip + off);
6221			tag = htonl(sh->v_tag);
6222			flowid = tag ^ ntohs(sh->dest_port) ^ ntohs(sh->src_port);
6223			m->m_pkthdr.flowid = flowid;
6224			M_HASHTYPE_SET(m, M_HASHTYPE_OPAQUE);
6225		}
6226		cpu_to_use = sctp_cpuarry[flowid % mp_ncpus];
6227		sctp_queue_to_mcore(m, off, cpu_to_use);
6228		return;
6229	}
6230#endif
6231	sctp_input_with_port(m, off, 0);
6232}
6233
6234#endif
6235