1/* SCTP kernel implementation
2 * Copyright (c) 1999-2000 Cisco, Inc.
3 * Copyright (c) 1999-2001 Motorola, Inc.
4 * Copyright (c) 2001-2003 International Business Machines, Corp.
5 * Copyright (c) 2001 Intel Corp.
6 * Copyright (c) 2001 Nokia, Inc.
7 * Copyright (c) 2001 La Monte H.P. Yarroll
8 *
9 * This file is part of the SCTP kernel implementation
10 *
11 * These functions handle all input from the IP layer into SCTP.
12 *
13 * This SCTP implementation is free software;
14 * you can redistribute it and/or modify it under the terms of
15 * the GNU General Public License as published by
16 * the Free Software Foundation; either version 2, or (at your option)
17 * any later version.
18 *
19 * This SCTP implementation is distributed in the hope that it
20 * will be useful, but WITHOUT ANY WARRANTY; without even the implied
21 *                 ************************
22 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
23 * See the GNU General Public License for more details.
24 *
25 * You should have received a copy of the GNU General Public License
26 * along with GNU CC; see the file COPYING.  If not, see
27 * <http://www.gnu.org/licenses/>.
28 *
29 * Please send any bug reports or fixes you make to the
30 * email address(es):
31 *    lksctp developers <linux-sctp@vger.kernel.org>
32 *
33 * Written or modified by:
34 *    La Monte H.P. Yarroll <piggy@acm.org>
35 *    Karl Knutson <karl@athena.chicago.il.us>
36 *    Xingang Guo <xingang.guo@intel.com>
37 *    Jon Grimm <jgrimm@us.ibm.com>
38 *    Hui Huang <hui.huang@nokia.com>
39 *    Daisy Chang <daisyc@us.ibm.com>
40 *    Sridhar Samudrala <sri@us.ibm.com>
41 *    Ardelle Fan <ardelle.fan@intel.com>
42 */
43
44#include <linux/types.h>
45#include <linux/list.h> /* For struct list_head */
46#include <linux/socket.h>
47#include <linux/ip.h>
48#include <linux/time.h> /* For struct timeval */
49#include <linux/slab.h>
50#include <net/ip.h>
51#include <net/icmp.h>
52#include <net/snmp.h>
53#include <net/sock.h>
54#include <net/xfrm.h>
55#include <net/sctp/sctp.h>
56#include <net/sctp/sm.h>
57#include <net/sctp/checksum.h>
58#include <net/net_namespace.h>
59
60/* Forward declarations for internal helpers. */
61static int sctp_rcv_ootb(struct sk_buff *);
62static struct sctp_association *__sctp_rcv_lookup(struct net *net,
63				      struct sk_buff *skb,
64				      const union sctp_addr *paddr,
65				      const union sctp_addr *laddr,
66				      struct sctp_transport **transportp);
67static struct sctp_endpoint *__sctp_rcv_lookup_endpoint(struct net *net,
68						const union sctp_addr *laddr);
69static struct sctp_association *__sctp_lookup_association(
70					struct net *net,
71					const union sctp_addr *local,
72					const union sctp_addr *peer,
73					struct sctp_transport **pt);
74
75static int sctp_add_backlog(struct sock *sk, struct sk_buff *skb);
76
77
78/* Calculate the SCTP checksum of an SCTP packet.  */
79static inline int sctp_rcv_checksum(struct net *net, struct sk_buff *skb)
80{
81	struct sctphdr *sh = sctp_hdr(skb);
82	__le32 cmp = sh->checksum;
83	__le32 val = sctp_compute_cksum(skb, 0);
84
85	if (val != cmp) {
86		/* CRC failure, dump it. */
87		SCTP_INC_STATS_BH(net, SCTP_MIB_CHECKSUMERRORS);
88		return -1;
89	}
90	return 0;
91}
92
93struct sctp_input_cb {
94	union {
95		struct inet_skb_parm	h4;
96#if IS_ENABLED(CONFIG_IPV6)
97		struct inet6_skb_parm	h6;
98#endif
99	} header;
100	struct sctp_chunk *chunk;
101};
102#define SCTP_INPUT_CB(__skb)	((struct sctp_input_cb *)&((__skb)->cb[0]))
103
104/*
105 * This is the routine which IP calls when receiving an SCTP packet.
106 */
107int sctp_rcv(struct sk_buff *skb)
108{
109	struct sock *sk;
110	struct sctp_association *asoc;
111	struct sctp_endpoint *ep = NULL;
112	struct sctp_ep_common *rcvr;
113	struct sctp_transport *transport = NULL;
114	struct sctp_chunk *chunk;
115	struct sctphdr *sh;
116	union sctp_addr src;
117	union sctp_addr dest;
118	int family;
119	struct sctp_af *af;
120	struct net *net = dev_net(skb->dev);
121
122	if (skb->pkt_type != PACKET_HOST)
123		goto discard_it;
124
125	SCTP_INC_STATS_BH(net, SCTP_MIB_INSCTPPACKS);
126
127	if (skb_linearize(skb))
128		goto discard_it;
129
130	sh = sctp_hdr(skb);
131
132	/* Pull up the IP and SCTP headers. */
133	__skb_pull(skb, skb_transport_offset(skb));
134	if (skb->len < sizeof(struct sctphdr))
135		goto discard_it;
136
137	skb->csum_valid = 0; /* Previous value not applicable */
138	if (skb_csum_unnecessary(skb))
139		__skb_decr_checksum_unnecessary(skb);
140	else if (!sctp_checksum_disable && sctp_rcv_checksum(net, skb) < 0)
141		goto discard_it;
142	skb->csum_valid = 1;
143
144	skb_pull(skb, sizeof(struct sctphdr));
145
146	/* Make sure we at least have chunk headers worth of data left. */
147	if (skb->len < sizeof(struct sctp_chunkhdr))
148		goto discard_it;
149
150	family = ipver2af(ip_hdr(skb)->version);
151	af = sctp_get_af_specific(family);
152	if (unlikely(!af))
153		goto discard_it;
154
155	/* Initialize local addresses for lookups. */
156	af->from_skb(&src, skb, 1);
157	af->from_skb(&dest, skb, 0);
158
159	/* If the packet is to or from a non-unicast address,
160	 * silently discard the packet.
161	 *
162	 * This is not clearly defined in the RFC except in section
163	 * 8.4 - OOTB handling.  However, based on the book "Stream Control
164	 * Transmission Protocol" 2.1, "It is important to note that the
165	 * IP address of an SCTP transport address must be a routable
166	 * unicast address.  In other words, IP multicast addresses and
167	 * IP broadcast addresses cannot be used in an SCTP transport
168	 * address."
169	 */
170	if (!af->addr_valid(&src, NULL, skb) ||
171	    !af->addr_valid(&dest, NULL, skb))
172		goto discard_it;
173
174	asoc = __sctp_rcv_lookup(net, skb, &src, &dest, &transport);
175
176	if (!asoc)
177		ep = __sctp_rcv_lookup_endpoint(net, &dest);
178
179	/* Retrieve the common input handling substructure. */
180	rcvr = asoc ? &asoc->base : &ep->base;
181	sk = rcvr->sk;
182
183	/*
184	 * If a frame arrives on an interface and the receiving socket is
185	 * bound to another interface, via SO_BINDTODEVICE, treat it as OOTB
186	 */
187	if (sk->sk_bound_dev_if && (sk->sk_bound_dev_if != af->skb_iif(skb))) {
188		if (asoc) {
189			sctp_association_put(asoc);
190			asoc = NULL;
191		} else {
192			sctp_endpoint_put(ep);
193			ep = NULL;
194		}
195		sk = net->sctp.ctl_sock;
196		ep = sctp_sk(sk)->ep;
197		sctp_endpoint_hold(ep);
198		rcvr = &ep->base;
199	}
200
201	/*
202	 * RFC 2960, 8.4 - Handle "Out of the blue" Packets.
203	 * An SCTP packet is called an "out of the blue" (OOTB)
204	 * packet if it is correctly formed, i.e., passed the
205	 * receiver's checksum check, but the receiver is not
206	 * able to identify the association to which this
207	 * packet belongs.
208	 */
209	if (!asoc) {
210		if (sctp_rcv_ootb(skb)) {
211			SCTP_INC_STATS_BH(net, SCTP_MIB_OUTOFBLUES);
212			goto discard_release;
213		}
214	}
215
216	if (!xfrm_policy_check(sk, XFRM_POLICY_IN, skb, family))
217		goto discard_release;
218	nf_reset(skb);
219
220	if (sk_filter(sk, skb))
221		goto discard_release;
222
223	/* Create an SCTP packet structure. */
224	chunk = sctp_chunkify(skb, asoc, sk);
225	if (!chunk)
226		goto discard_release;
227	SCTP_INPUT_CB(skb)->chunk = chunk;
228
229	/* Remember what endpoint is to handle this packet. */
230	chunk->rcvr = rcvr;
231
232	/* Remember the SCTP header. */
233	chunk->sctp_hdr = sh;
234
235	/* Set the source and destination addresses of the incoming chunk.  */
236	sctp_init_addrs(chunk, &src, &dest);
237
238	/* Remember where we came from.  */
239	chunk->transport = transport;
240
241	/* Acquire access to the sock lock. Note: We are safe from other
242	 * bottom halves on this lock, but a user may be in the lock too,
243	 * so check if it is busy.
244	 */
245	bh_lock_sock(sk);
246
247	if (sk != rcvr->sk) {
248		/* Our cached sk is different from the rcvr->sk.  This is
249		 * because migrate()/accept() may have moved the association
250		 * to a new socket and released all the sockets.  So now we
251		 * are holding a lock on the old socket while the user may
252		 * be doing something with the new socket.  Switch our veiw
253		 * of the current sk.
254		 */
255		bh_unlock_sock(sk);
256		sk = rcvr->sk;
257		bh_lock_sock(sk);
258	}
259
260	if (sock_owned_by_user(sk)) {
261		if (sctp_add_backlog(sk, skb)) {
262			bh_unlock_sock(sk);
263			sctp_chunk_free(chunk);
264			skb = NULL; /* sctp_chunk_free already freed the skb */
265			goto discard_release;
266		}
267		SCTP_INC_STATS_BH(net, SCTP_MIB_IN_PKT_BACKLOG);
268	} else {
269		SCTP_INC_STATS_BH(net, SCTP_MIB_IN_PKT_SOFTIRQ);
270		sctp_inq_push(&chunk->rcvr->inqueue, chunk);
271	}
272
273	bh_unlock_sock(sk);
274
275	/* Release the asoc/ep ref we took in the lookup calls. */
276	if (asoc)
277		sctp_association_put(asoc);
278	else
279		sctp_endpoint_put(ep);
280
281	return 0;
282
283discard_it:
284	SCTP_INC_STATS_BH(net, SCTP_MIB_IN_PKT_DISCARDS);
285	kfree_skb(skb);
286	return 0;
287
288discard_release:
289	/* Release the asoc/ep ref we took in the lookup calls. */
290	if (asoc)
291		sctp_association_put(asoc);
292	else
293		sctp_endpoint_put(ep);
294
295	goto discard_it;
296}
297
298/* Process the backlog queue of the socket.  Every skb on
299 * the backlog holds a ref on an association or endpoint.
300 * We hold this ref throughout the state machine to make
301 * sure that the structure we need is still around.
302 */
303int sctp_backlog_rcv(struct sock *sk, struct sk_buff *skb)
304{
305	struct sctp_chunk *chunk = SCTP_INPUT_CB(skb)->chunk;
306	struct sctp_inq *inqueue = &chunk->rcvr->inqueue;
307	struct sctp_ep_common *rcvr = NULL;
308	int backloged = 0;
309
310	rcvr = chunk->rcvr;
311
312	/* If the rcvr is dead then the association or endpoint
313	 * has been deleted and we can safely drop the chunk
314	 * and refs that we are holding.
315	 */
316	if (rcvr->dead) {
317		sctp_chunk_free(chunk);
318		goto done;
319	}
320
321	if (unlikely(rcvr->sk != sk)) {
322		/* In this case, the association moved from one socket to
323		 * another.  We are currently sitting on the backlog of the
324		 * old socket, so we need to move.
325		 * However, since we are here in the process context we
326		 * need to take make sure that the user doesn't own
327		 * the new socket when we process the packet.
328		 * If the new socket is user-owned, queue the chunk to the
329		 * backlog of the new socket without dropping any refs.
330		 * Otherwise, we can safely push the chunk on the inqueue.
331		 */
332
333		sk = rcvr->sk;
334		bh_lock_sock(sk);
335
336		if (sock_owned_by_user(sk)) {
337			if (sk_add_backlog(sk, skb, sk->sk_rcvbuf))
338				sctp_chunk_free(chunk);
339			else
340				backloged = 1;
341		} else
342			sctp_inq_push(inqueue, chunk);
343
344		bh_unlock_sock(sk);
345
346		/* If the chunk was backloged again, don't drop refs */
347		if (backloged)
348			return 0;
349	} else {
350		sctp_inq_push(inqueue, chunk);
351	}
352
353done:
354	/* Release the refs we took in sctp_add_backlog */
355	if (SCTP_EP_TYPE_ASSOCIATION == rcvr->type)
356		sctp_association_put(sctp_assoc(rcvr));
357	else if (SCTP_EP_TYPE_SOCKET == rcvr->type)
358		sctp_endpoint_put(sctp_ep(rcvr));
359	else
360		BUG();
361
362	return 0;
363}
364
365static int sctp_add_backlog(struct sock *sk, struct sk_buff *skb)
366{
367	struct sctp_chunk *chunk = SCTP_INPUT_CB(skb)->chunk;
368	struct sctp_ep_common *rcvr = chunk->rcvr;
369	int ret;
370
371	ret = sk_add_backlog(sk, skb, sk->sk_rcvbuf);
372	if (!ret) {
373		/* Hold the assoc/ep while hanging on the backlog queue.
374		 * This way, we know structures we need will not disappear
375		 * from us
376		 */
377		if (SCTP_EP_TYPE_ASSOCIATION == rcvr->type)
378			sctp_association_hold(sctp_assoc(rcvr));
379		else if (SCTP_EP_TYPE_SOCKET == rcvr->type)
380			sctp_endpoint_hold(sctp_ep(rcvr));
381		else
382			BUG();
383	}
384	return ret;
385
386}
387
388/* Handle icmp frag needed error. */
389void sctp_icmp_frag_needed(struct sock *sk, struct sctp_association *asoc,
390			   struct sctp_transport *t, __u32 pmtu)
391{
392	if (!t || (t->pathmtu <= pmtu))
393		return;
394
395	if (sock_owned_by_user(sk)) {
396		asoc->pmtu_pending = 1;
397		t->pmtu_pending = 1;
398		return;
399	}
400
401	if (t->param_flags & SPP_PMTUD_ENABLE) {
402		/* Update transports view of the MTU */
403		sctp_transport_update_pmtu(sk, t, pmtu);
404
405		/* Update association pmtu. */
406		sctp_assoc_sync_pmtu(sk, asoc);
407	}
408
409	/* Retransmit with the new pmtu setting.
410	 * Normally, if PMTU discovery is disabled, an ICMP Fragmentation
411	 * Needed will never be sent, but if a message was sent before
412	 * PMTU discovery was disabled that was larger than the PMTU, it
413	 * would not be fragmented, so it must be re-transmitted fragmented.
414	 */
415	sctp_retransmit(&asoc->outqueue, t, SCTP_RTXR_PMTUD);
416}
417
418void sctp_icmp_redirect(struct sock *sk, struct sctp_transport *t,
419			struct sk_buff *skb)
420{
421	struct dst_entry *dst;
422
423	if (!t)
424		return;
425	dst = sctp_transport_dst_check(t);
426	if (dst)
427		dst->ops->redirect(dst, sk, skb);
428}
429
430/*
431 * SCTP Implementer's Guide, 2.37 ICMP handling procedures
432 *
433 * ICMP8) If the ICMP code is a "Unrecognized next header type encountered"
434 *        or a "Protocol Unreachable" treat this message as an abort
435 *        with the T bit set.
436 *
437 * This function sends an event to the state machine, which will abort the
438 * association.
439 *
440 */
441void sctp_icmp_proto_unreachable(struct sock *sk,
442			   struct sctp_association *asoc,
443			   struct sctp_transport *t)
444{
445	if (sock_owned_by_user(sk)) {
446		if (timer_pending(&t->proto_unreach_timer))
447			return;
448		else {
449			if (!mod_timer(&t->proto_unreach_timer,
450						jiffies + (HZ/20)))
451				sctp_association_hold(asoc);
452		}
453	} else {
454		struct net *net = sock_net(sk);
455
456		pr_debug("%s: unrecognized next header type "
457			 "encountered!\n", __func__);
458
459		if (del_timer(&t->proto_unreach_timer))
460			sctp_association_put(asoc);
461
462		sctp_do_sm(net, SCTP_EVENT_T_OTHER,
463			   SCTP_ST_OTHER(SCTP_EVENT_ICMP_PROTO_UNREACH),
464			   asoc->state, asoc->ep, asoc, t,
465			   GFP_ATOMIC);
466	}
467}
468
469/* Common lookup code for icmp/icmpv6 error handler. */
470struct sock *sctp_err_lookup(struct net *net, int family, struct sk_buff *skb,
471			     struct sctphdr *sctphdr,
472			     struct sctp_association **app,
473			     struct sctp_transport **tpp)
474{
475	union sctp_addr saddr;
476	union sctp_addr daddr;
477	struct sctp_af *af;
478	struct sock *sk = NULL;
479	struct sctp_association *asoc;
480	struct sctp_transport *transport = NULL;
481	struct sctp_init_chunk *chunkhdr;
482	__u32 vtag = ntohl(sctphdr->vtag);
483	int len = skb->len - ((void *)sctphdr - (void *)skb->data);
484
485	*app = NULL; *tpp = NULL;
486
487	af = sctp_get_af_specific(family);
488	if (unlikely(!af)) {
489		return NULL;
490	}
491
492	/* Initialize local addresses for lookups. */
493	af->from_skb(&saddr, skb, 1);
494	af->from_skb(&daddr, skb, 0);
495
496	/* Look for an association that matches the incoming ICMP error
497	 * packet.
498	 */
499	asoc = __sctp_lookup_association(net, &saddr, &daddr, &transport);
500	if (!asoc)
501		return NULL;
502
503	sk = asoc->base.sk;
504
505	/* RFC 4960, Appendix C. ICMP Handling
506	 *
507	 * ICMP6) An implementation MUST validate that the Verification Tag
508	 * contained in the ICMP message matches the Verification Tag of
509	 * the peer.  If the Verification Tag is not 0 and does NOT
510	 * match, discard the ICMP message.  If it is 0 and the ICMP
511	 * message contains enough bytes to verify that the chunk type is
512	 * an INIT chunk and that the Initiate Tag matches the tag of the
513	 * peer, continue with ICMP7.  If the ICMP message is too short
514	 * or the chunk type or the Initiate Tag does not match, silently
515	 * discard the packet.
516	 */
517	if (vtag == 0) {
518		chunkhdr = (void *)sctphdr + sizeof(struct sctphdr);
519		if (len < sizeof(struct sctphdr) + sizeof(sctp_chunkhdr_t)
520			  + sizeof(__be32) ||
521		    chunkhdr->chunk_hdr.type != SCTP_CID_INIT ||
522		    ntohl(chunkhdr->init_hdr.init_tag) != asoc->c.my_vtag) {
523			goto out;
524		}
525	} else if (vtag != asoc->c.peer_vtag) {
526		goto out;
527	}
528
529	bh_lock_sock(sk);
530
531	/* If too many ICMPs get dropped on busy
532	 * servers this needs to be solved differently.
533	 */
534	if (sock_owned_by_user(sk))
535		NET_INC_STATS_BH(net, LINUX_MIB_LOCKDROPPEDICMPS);
536
537	*app = asoc;
538	*tpp = transport;
539	return sk;
540
541out:
542	sctp_association_put(asoc);
543	return NULL;
544}
545
546/* Common cleanup code for icmp/icmpv6 error handler. */
547void sctp_err_finish(struct sock *sk, struct sctp_association *asoc)
548{
549	bh_unlock_sock(sk);
550	sctp_association_put(asoc);
551}
552
553/*
554 * This routine is called by the ICMP module when it gets some
555 * sort of error condition.  If err < 0 then the socket should
556 * be closed and the error returned to the user.  If err > 0
557 * it's just the icmp type << 8 | icmp code.  After adjustment
558 * header points to the first 8 bytes of the sctp header.  We need
559 * to find the appropriate port.
560 *
561 * The locking strategy used here is very "optimistic". When
562 * someone else accesses the socket the ICMP is just dropped
563 * and for some paths there is no check at all.
564 * A more general error queue to queue errors for later handling
565 * is probably better.
566 *
567 */
568void sctp_v4_err(struct sk_buff *skb, __u32 info)
569{
570	const struct iphdr *iph = (const struct iphdr *)skb->data;
571	const int ihlen = iph->ihl * 4;
572	const int type = icmp_hdr(skb)->type;
573	const int code = icmp_hdr(skb)->code;
574	struct sock *sk;
575	struct sctp_association *asoc = NULL;
576	struct sctp_transport *transport;
577	struct inet_sock *inet;
578	__u16 saveip, savesctp;
579	int err;
580	struct net *net = dev_net(skb->dev);
581
582	/* Fix up skb to look at the embedded net header. */
583	saveip = skb->network_header;
584	savesctp = skb->transport_header;
585	skb_reset_network_header(skb);
586	skb_set_transport_header(skb, ihlen);
587	sk = sctp_err_lookup(net, AF_INET, skb, sctp_hdr(skb), &asoc, &transport);
588	/* Put back, the original values. */
589	skb->network_header = saveip;
590	skb->transport_header = savesctp;
591	if (!sk) {
592		ICMP_INC_STATS_BH(net, ICMP_MIB_INERRORS);
593		return;
594	}
595	/* Warning:  The sock lock is held.  Remember to call
596	 * sctp_err_finish!
597	 */
598
599	switch (type) {
600	case ICMP_PARAMETERPROB:
601		err = EPROTO;
602		break;
603	case ICMP_DEST_UNREACH:
604		if (code > NR_ICMP_UNREACH)
605			goto out_unlock;
606
607		/* PMTU discovery (RFC1191) */
608		if (ICMP_FRAG_NEEDED == code) {
609			sctp_icmp_frag_needed(sk, asoc, transport, info);
610			goto out_unlock;
611		} else {
612			if (ICMP_PROT_UNREACH == code) {
613				sctp_icmp_proto_unreachable(sk, asoc,
614							    transport);
615				goto out_unlock;
616			}
617		}
618		err = icmp_err_convert[code].errno;
619		break;
620	case ICMP_TIME_EXCEEDED:
621		/* Ignore any time exceeded errors due to fragment reassembly
622		 * timeouts.
623		 */
624		if (ICMP_EXC_FRAGTIME == code)
625			goto out_unlock;
626
627		err = EHOSTUNREACH;
628		break;
629	case ICMP_REDIRECT:
630		sctp_icmp_redirect(sk, transport, skb);
631		/* Fall through to out_unlock. */
632	default:
633		goto out_unlock;
634	}
635
636	inet = inet_sk(sk);
637	if (!sock_owned_by_user(sk) && inet->recverr) {
638		sk->sk_err = err;
639		sk->sk_error_report(sk);
640	} else {  /* Only an error on timeout */
641		sk->sk_err_soft = err;
642	}
643
644out_unlock:
645	sctp_err_finish(sk, asoc);
646}
647
648/*
649 * RFC 2960, 8.4 - Handle "Out of the blue" Packets.
650 *
651 * This function scans all the chunks in the OOTB packet to determine if
652 * the packet should be discarded right away.  If a response might be needed
653 * for this packet, or, if further processing is possible, the packet will
654 * be queued to a proper inqueue for the next phase of handling.
655 *
656 * Output:
657 * Return 0 - If further processing is needed.
658 * Return 1 - If the packet can be discarded right away.
659 */
660static int sctp_rcv_ootb(struct sk_buff *skb)
661{
662	sctp_chunkhdr_t *ch;
663	__u8 *ch_end;
664
665	ch = (sctp_chunkhdr_t *) skb->data;
666
667	/* Scan through all the chunks in the packet.  */
668	do {
669		/* Break out if chunk length is less then minimal. */
670		if (ntohs(ch->length) < sizeof(sctp_chunkhdr_t))
671			break;
672
673		ch_end = ((__u8 *)ch) + WORD_ROUND(ntohs(ch->length));
674		if (ch_end > skb_tail_pointer(skb))
675			break;
676
677		/* RFC 8.4, 2) If the OOTB packet contains an ABORT chunk, the
678		 * receiver MUST silently discard the OOTB packet and take no
679		 * further action.
680		 */
681		if (SCTP_CID_ABORT == ch->type)
682			goto discard;
683
684		/* RFC 8.4, 6) If the packet contains a SHUTDOWN COMPLETE
685		 * chunk, the receiver should silently discard the packet
686		 * and take no further action.
687		 */
688		if (SCTP_CID_SHUTDOWN_COMPLETE == ch->type)
689			goto discard;
690
691		/* RFC 4460, 2.11.2
692		 * This will discard packets with INIT chunk bundled as
693		 * subsequent chunks in the packet.  When INIT is first,
694		 * the normal INIT processing will discard the chunk.
695		 */
696		if (SCTP_CID_INIT == ch->type && (void *)ch != skb->data)
697			goto discard;
698
699		ch = (sctp_chunkhdr_t *) ch_end;
700	} while (ch_end < skb_tail_pointer(skb));
701
702	return 0;
703
704discard:
705	return 1;
706}
707
708/* Insert endpoint into the hash table.  */
709static void __sctp_hash_endpoint(struct sctp_endpoint *ep)
710{
711	struct net *net = sock_net(ep->base.sk);
712	struct sctp_ep_common *epb;
713	struct sctp_hashbucket *head;
714
715	epb = &ep->base;
716
717	epb->hashent = sctp_ep_hashfn(net, epb->bind_addr.port);
718	head = &sctp_ep_hashtable[epb->hashent];
719
720	write_lock(&head->lock);
721	hlist_add_head(&epb->node, &head->chain);
722	write_unlock(&head->lock);
723}
724
725/* Add an endpoint to the hash. Local BH-safe. */
726void sctp_hash_endpoint(struct sctp_endpoint *ep)
727{
728	local_bh_disable();
729	__sctp_hash_endpoint(ep);
730	local_bh_enable();
731}
732
733/* Remove endpoint from the hash table.  */
734static void __sctp_unhash_endpoint(struct sctp_endpoint *ep)
735{
736	struct net *net = sock_net(ep->base.sk);
737	struct sctp_hashbucket *head;
738	struct sctp_ep_common *epb;
739
740	epb = &ep->base;
741
742	epb->hashent = sctp_ep_hashfn(net, epb->bind_addr.port);
743
744	head = &sctp_ep_hashtable[epb->hashent];
745
746	write_lock(&head->lock);
747	hlist_del_init(&epb->node);
748	write_unlock(&head->lock);
749}
750
751/* Remove endpoint from the hash.  Local BH-safe. */
752void sctp_unhash_endpoint(struct sctp_endpoint *ep)
753{
754	local_bh_disable();
755	__sctp_unhash_endpoint(ep);
756	local_bh_enable();
757}
758
759/* Look up an endpoint. */
760static struct sctp_endpoint *__sctp_rcv_lookup_endpoint(struct net *net,
761						const union sctp_addr *laddr)
762{
763	struct sctp_hashbucket *head;
764	struct sctp_ep_common *epb;
765	struct sctp_endpoint *ep;
766	int hash;
767
768	hash = sctp_ep_hashfn(net, ntohs(laddr->v4.sin_port));
769	head = &sctp_ep_hashtable[hash];
770	read_lock(&head->lock);
771	sctp_for_each_hentry(epb, &head->chain) {
772		ep = sctp_ep(epb);
773		if (sctp_endpoint_is_match(ep, net, laddr))
774			goto hit;
775	}
776
777	ep = sctp_sk(net->sctp.ctl_sock)->ep;
778
779hit:
780	sctp_endpoint_hold(ep);
781	read_unlock(&head->lock);
782	return ep;
783}
784
785/* Insert association into the hash table.  */
786static void __sctp_hash_established(struct sctp_association *asoc)
787{
788	struct net *net = sock_net(asoc->base.sk);
789	struct sctp_ep_common *epb;
790	struct sctp_hashbucket *head;
791
792	epb = &asoc->base;
793
794	/* Calculate which chain this entry will belong to. */
795	epb->hashent = sctp_assoc_hashfn(net, epb->bind_addr.port,
796					 asoc->peer.port);
797
798	head = &sctp_assoc_hashtable[epb->hashent];
799
800	write_lock(&head->lock);
801	hlist_add_head(&epb->node, &head->chain);
802	write_unlock(&head->lock);
803}
804
805/* Add an association to the hash. Local BH-safe. */
806void sctp_hash_established(struct sctp_association *asoc)
807{
808	if (asoc->temp)
809		return;
810
811	local_bh_disable();
812	__sctp_hash_established(asoc);
813	local_bh_enable();
814}
815
816/* Remove association from the hash table.  */
817static void __sctp_unhash_established(struct sctp_association *asoc)
818{
819	struct net *net = sock_net(asoc->base.sk);
820	struct sctp_hashbucket *head;
821	struct sctp_ep_common *epb;
822
823	epb = &asoc->base;
824
825	epb->hashent = sctp_assoc_hashfn(net, epb->bind_addr.port,
826					 asoc->peer.port);
827
828	head = &sctp_assoc_hashtable[epb->hashent];
829
830	write_lock(&head->lock);
831	hlist_del_init(&epb->node);
832	write_unlock(&head->lock);
833}
834
835/* Remove association from the hash table.  Local BH-safe. */
836void sctp_unhash_established(struct sctp_association *asoc)
837{
838	if (asoc->temp)
839		return;
840
841	local_bh_disable();
842	__sctp_unhash_established(asoc);
843	local_bh_enable();
844}
845
846/* Look up an association. */
847static struct sctp_association *__sctp_lookup_association(
848					struct net *net,
849					const union sctp_addr *local,
850					const union sctp_addr *peer,
851					struct sctp_transport **pt)
852{
853	struct sctp_hashbucket *head;
854	struct sctp_ep_common *epb;
855	struct sctp_association *asoc;
856	struct sctp_transport *transport;
857	int hash;
858
859	/* Optimize here for direct hit, only listening connections can
860	 * have wildcards anyways.
861	 */
862	hash = sctp_assoc_hashfn(net, ntohs(local->v4.sin_port),
863				 ntohs(peer->v4.sin_port));
864	head = &sctp_assoc_hashtable[hash];
865	read_lock(&head->lock);
866	sctp_for_each_hentry(epb, &head->chain) {
867		asoc = sctp_assoc(epb);
868		transport = sctp_assoc_is_match(asoc, net, local, peer);
869		if (transport)
870			goto hit;
871	}
872
873	read_unlock(&head->lock);
874
875	return NULL;
876
877hit:
878	*pt = transport;
879	sctp_association_hold(asoc);
880	read_unlock(&head->lock);
881	return asoc;
882}
883
884/* Look up an association. BH-safe. */
885static
886struct sctp_association *sctp_lookup_association(struct net *net,
887						 const union sctp_addr *laddr,
888						 const union sctp_addr *paddr,
889						 struct sctp_transport **transportp)
890{
891	struct sctp_association *asoc;
892
893	local_bh_disable();
894	asoc = __sctp_lookup_association(net, laddr, paddr, transportp);
895	local_bh_enable();
896
897	return asoc;
898}
899
900/* Is there an association matching the given local and peer addresses? */
901int sctp_has_association(struct net *net,
902			 const union sctp_addr *laddr,
903			 const union sctp_addr *paddr)
904{
905	struct sctp_association *asoc;
906	struct sctp_transport *transport;
907
908	if ((asoc = sctp_lookup_association(net, laddr, paddr, &transport))) {
909		sctp_association_put(asoc);
910		return 1;
911	}
912
913	return 0;
914}
915
916/*
917 * SCTP Implementors Guide, 2.18 Handling of address
918 * parameters within the INIT or INIT-ACK.
919 *
920 * D) When searching for a matching TCB upon reception of an INIT
921 *    or INIT-ACK chunk the receiver SHOULD use not only the
922 *    source address of the packet (containing the INIT or
923 *    INIT-ACK) but the receiver SHOULD also use all valid
924 *    address parameters contained within the chunk.
925 *
926 * 2.18.3 Solution description
927 *
928 * This new text clearly specifies to an implementor the need
929 * to look within the INIT or INIT-ACK. Any implementation that
930 * does not do this, may not be able to establish associations
931 * in certain circumstances.
932 *
933 */
934static struct sctp_association *__sctp_rcv_init_lookup(struct net *net,
935	struct sk_buff *skb,
936	const union sctp_addr *laddr, struct sctp_transport **transportp)
937{
938	struct sctp_association *asoc;
939	union sctp_addr addr;
940	union sctp_addr *paddr = &addr;
941	struct sctphdr *sh = sctp_hdr(skb);
942	union sctp_params params;
943	sctp_init_chunk_t *init;
944	struct sctp_transport *transport;
945	struct sctp_af *af;
946
947	/*
948	 * This code will NOT touch anything inside the chunk--it is
949	 * strictly READ-ONLY.
950	 *
951	 * RFC 2960 3  SCTP packet Format
952	 *
953	 * Multiple chunks can be bundled into one SCTP packet up to
954	 * the MTU size, except for the INIT, INIT ACK, and SHUTDOWN
955	 * COMPLETE chunks.  These chunks MUST NOT be bundled with any
956	 * other chunk in a packet.  See Section 6.10 for more details
957	 * on chunk bundling.
958	 */
959
960	/* Find the start of the TLVs and the end of the chunk.  This is
961	 * the region we search for address parameters.
962	 */
963	init = (sctp_init_chunk_t *)skb->data;
964
965	/* Walk the parameters looking for embedded addresses. */
966	sctp_walk_params(params, init, init_hdr.params) {
967
968		/* Note: Ignoring hostname addresses. */
969		af = sctp_get_af_specific(param_type2af(params.p->type));
970		if (!af)
971			continue;
972
973		af->from_addr_param(paddr, params.addr, sh->source, 0);
974
975		asoc = __sctp_lookup_association(net, laddr, paddr, &transport);
976		if (asoc)
977			return asoc;
978	}
979
980	return NULL;
981}
982
983/* ADD-IP, Section 5.2
984 * When an endpoint receives an ASCONF Chunk from the remote peer
985 * special procedures may be needed to identify the association the
986 * ASCONF Chunk is associated with. To properly find the association
987 * the following procedures SHOULD be followed:
988 *
989 * D2) If the association is not found, use the address found in the
990 * Address Parameter TLV combined with the port number found in the
991 * SCTP common header. If found proceed to rule D4.
992 *
993 * D2-ext) If more than one ASCONF Chunks are packed together, use the
994 * address found in the ASCONF Address Parameter TLV of each of the
995 * subsequent ASCONF Chunks. If found, proceed to rule D4.
996 */
997static struct sctp_association *__sctp_rcv_asconf_lookup(
998					struct net *net,
999					sctp_chunkhdr_t *ch,
1000					const union sctp_addr *laddr,
1001					__be16 peer_port,
1002					struct sctp_transport **transportp)
1003{
1004	sctp_addip_chunk_t *asconf = (struct sctp_addip_chunk *)ch;
1005	struct sctp_af *af;
1006	union sctp_addr_param *param;
1007	union sctp_addr paddr;
1008
1009	/* Skip over the ADDIP header and find the Address parameter */
1010	param = (union sctp_addr_param *)(asconf + 1);
1011
1012	af = sctp_get_af_specific(param_type2af(param->p.type));
1013	if (unlikely(!af))
1014		return NULL;
1015
1016	af->from_addr_param(&paddr, param, peer_port, 0);
1017
1018	return __sctp_lookup_association(net, laddr, &paddr, transportp);
1019}
1020
1021
1022/* SCTP-AUTH, Section 6.3:
1023*    If the receiver does not find a STCB for a packet containing an AUTH
1024*    chunk as the first chunk and not a COOKIE-ECHO chunk as the second
1025*    chunk, it MUST use the chunks after the AUTH chunk to look up an existing
1026*    association.
1027*
1028* This means that any chunks that can help us identify the association need
1029* to be looked at to find this association.
1030*/
1031static struct sctp_association *__sctp_rcv_walk_lookup(struct net *net,
1032				      struct sk_buff *skb,
1033				      const union sctp_addr *laddr,
1034				      struct sctp_transport **transportp)
1035{
1036	struct sctp_association *asoc = NULL;
1037	sctp_chunkhdr_t *ch;
1038	int have_auth = 0;
1039	unsigned int chunk_num = 1;
1040	__u8 *ch_end;
1041
1042	/* Walk through the chunks looking for AUTH or ASCONF chunks
1043	 * to help us find the association.
1044	 */
1045	ch = (sctp_chunkhdr_t *) skb->data;
1046	do {
1047		/* Break out if chunk length is less then minimal. */
1048		if (ntohs(ch->length) < sizeof(sctp_chunkhdr_t))
1049			break;
1050
1051		ch_end = ((__u8 *)ch) + WORD_ROUND(ntohs(ch->length));
1052		if (ch_end > skb_tail_pointer(skb))
1053			break;
1054
1055		switch (ch->type) {
1056		case SCTP_CID_AUTH:
1057			have_auth = chunk_num;
1058			break;
1059
1060		case SCTP_CID_COOKIE_ECHO:
1061			/* If a packet arrives containing an AUTH chunk as
1062			 * a first chunk, a COOKIE-ECHO chunk as the second
1063			 * chunk, and possibly more chunks after them, and
1064			 * the receiver does not have an STCB for that
1065			 * packet, then authentication is based on
1066			 * the contents of the COOKIE- ECHO chunk.
1067			 */
1068			if (have_auth == 1 && chunk_num == 2)
1069				return NULL;
1070			break;
1071
1072		case SCTP_CID_ASCONF:
1073			if (have_auth || net->sctp.addip_noauth)
1074				asoc = __sctp_rcv_asconf_lookup(
1075						net, ch, laddr,
1076						sctp_hdr(skb)->source,
1077						transportp);
1078		default:
1079			break;
1080		}
1081
1082		if (asoc)
1083			break;
1084
1085		ch = (sctp_chunkhdr_t *) ch_end;
1086		chunk_num++;
1087	} while (ch_end < skb_tail_pointer(skb));
1088
1089	return asoc;
1090}
1091
1092/*
1093 * There are circumstances when we need to look inside the SCTP packet
1094 * for information to help us find the association.   Examples
1095 * include looking inside of INIT/INIT-ACK chunks or after the AUTH
1096 * chunks.
1097 */
1098static struct sctp_association *__sctp_rcv_lookup_harder(struct net *net,
1099				      struct sk_buff *skb,
1100				      const union sctp_addr *laddr,
1101				      struct sctp_transport **transportp)
1102{
1103	sctp_chunkhdr_t *ch;
1104
1105	ch = (sctp_chunkhdr_t *) skb->data;
1106
1107	/* The code below will attempt to walk the chunk and extract
1108	 * parameter information.  Before we do that, we need to verify
1109	 * that the chunk length doesn't cause overflow.  Otherwise, we'll
1110	 * walk off the end.
1111	 */
1112	if (WORD_ROUND(ntohs(ch->length)) > skb->len)
1113		return NULL;
1114
1115	/* If this is INIT/INIT-ACK look inside the chunk too. */
1116	if (ch->type == SCTP_CID_INIT || ch->type == SCTP_CID_INIT_ACK)
1117		return __sctp_rcv_init_lookup(net, skb, laddr, transportp);
1118
1119	return __sctp_rcv_walk_lookup(net, skb, laddr, transportp);
1120}
1121
1122/* Lookup an association for an inbound skb. */
1123static struct sctp_association *__sctp_rcv_lookup(struct net *net,
1124				      struct sk_buff *skb,
1125				      const union sctp_addr *paddr,
1126				      const union sctp_addr *laddr,
1127				      struct sctp_transport **transportp)
1128{
1129	struct sctp_association *asoc;
1130
1131	asoc = __sctp_lookup_association(net, laddr, paddr, transportp);
1132
1133	/* Further lookup for INIT/INIT-ACK packets.
1134	 * SCTP Implementors Guide, 2.18 Handling of address
1135	 * parameters within the INIT or INIT-ACK.
1136	 */
1137	if (!asoc)
1138		asoc = __sctp_rcv_lookup_harder(net, skb, laddr, transportp);
1139
1140	return asoc;
1141}
1142