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