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