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