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