Mention branches and keyring.
[releases.git] / ipv4 / ip_sockglue.c
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * INET         An implementation of the TCP/IP protocol suite for the LINUX
4  *              operating system.  INET is implemented using the  BSD Socket
5  *              interface as the means of communication with the user level.
6  *
7  *              The IP to API glue.
8  *
9  * Authors:     see ip.c
10  *
11  * Fixes:
12  *              Many            :       Split from ip.c , see ip.c for history.
13  *              Martin Mares    :       TOS setting fixed.
14  *              Alan Cox        :       Fixed a couple of oopses in Martin's
15  *                                      TOS tweaks.
16  *              Mike McLagan    :       Routing by source
17  */
18
19 #include <linux/module.h>
20 #include <linux/types.h>
21 #include <linux/mm.h>
22 #include <linux/skbuff.h>
23 #include <linux/ip.h>
24 #include <linux/icmp.h>
25 #include <linux/inetdevice.h>
26 #include <linux/netdevice.h>
27 #include <linux/slab.h>
28 #include <net/sock.h>
29 #include <net/ip.h>
30 #include <net/icmp.h>
31 #include <net/tcp_states.h>
32 #include <linux/udp.h>
33 #include <linux/igmp.h>
34 #include <linux/netfilter.h>
35 #include <linux/route.h>
36 #include <linux/mroute.h>
37 #include <net/inet_ecn.h>
38 #include <net/route.h>
39 #include <net/xfrm.h>
40 #include <net/compat.h>
41 #include <net/checksum.h>
42 #if IS_ENABLED(CONFIG_IPV6)
43 #include <net/transp_v6.h>
44 #endif
45 #include <net/ip_fib.h>
46
47 #include <linux/errqueue.h>
48 #include <linux/uaccess.h>
49
50 #include <linux/bpfilter.h>
51
52 /*
53  *      SOL_IP control messages.
54  */
55
56 static void ip_cmsg_recv_pktinfo(struct msghdr *msg, struct sk_buff *skb)
57 {
58         struct in_pktinfo info = *PKTINFO_SKB_CB(skb);
59
60         info.ipi_addr.s_addr = ip_hdr(skb)->daddr;
61
62         put_cmsg(msg, SOL_IP, IP_PKTINFO, sizeof(info), &info);
63 }
64
65 static void ip_cmsg_recv_ttl(struct msghdr *msg, struct sk_buff *skb)
66 {
67         int ttl = ip_hdr(skb)->ttl;
68         put_cmsg(msg, SOL_IP, IP_TTL, sizeof(int), &ttl);
69 }
70
71 static void ip_cmsg_recv_tos(struct msghdr *msg, struct sk_buff *skb)
72 {
73         put_cmsg(msg, SOL_IP, IP_TOS, 1, &ip_hdr(skb)->tos);
74 }
75
76 static void ip_cmsg_recv_opts(struct msghdr *msg, struct sk_buff *skb)
77 {
78         if (IPCB(skb)->opt.optlen == 0)
79                 return;
80
81         put_cmsg(msg, SOL_IP, IP_RECVOPTS, IPCB(skb)->opt.optlen,
82                  ip_hdr(skb) + 1);
83 }
84
85
86 static void ip_cmsg_recv_retopts(struct net *net, struct msghdr *msg,
87                                  struct sk_buff *skb)
88 {
89         unsigned char optbuf[sizeof(struct ip_options) + 40];
90         struct ip_options *opt = (struct ip_options *)optbuf;
91
92         if (IPCB(skb)->opt.optlen == 0)
93                 return;
94
95         if (ip_options_echo(net, opt, skb)) {
96                 msg->msg_flags |= MSG_CTRUNC;
97                 return;
98         }
99         ip_options_undo(opt);
100
101         put_cmsg(msg, SOL_IP, IP_RETOPTS, opt->optlen, opt->__data);
102 }
103
104 static void ip_cmsg_recv_fragsize(struct msghdr *msg, struct sk_buff *skb)
105 {
106         int val;
107
108         if (IPCB(skb)->frag_max_size == 0)
109                 return;
110
111         val = IPCB(skb)->frag_max_size;
112         put_cmsg(msg, SOL_IP, IP_RECVFRAGSIZE, sizeof(val), &val);
113 }
114
115 static void ip_cmsg_recv_checksum(struct msghdr *msg, struct sk_buff *skb,
116                                   int tlen, int offset)
117 {
118         __wsum csum = skb->csum;
119
120         if (skb->ip_summed != CHECKSUM_COMPLETE)
121                 return;
122
123         if (offset != 0) {
124                 int tend_off = skb_transport_offset(skb) + tlen;
125                 csum = csum_sub(csum, skb_checksum(skb, tend_off, offset, 0));
126         }
127
128         put_cmsg(msg, SOL_IP, IP_CHECKSUM, sizeof(__wsum), &csum);
129 }
130
131 static void ip_cmsg_recv_security(struct msghdr *msg, struct sk_buff *skb)
132 {
133         char *secdata;
134         u32 seclen, secid;
135         int err;
136
137         err = security_socket_getpeersec_dgram(NULL, skb, &secid);
138         if (err)
139                 return;
140
141         err = security_secid_to_secctx(secid, &secdata, &seclen);
142         if (err)
143                 return;
144
145         put_cmsg(msg, SOL_IP, SCM_SECURITY, seclen, secdata);
146         security_release_secctx(secdata, seclen);
147 }
148
149 static void ip_cmsg_recv_dstaddr(struct msghdr *msg, struct sk_buff *skb)
150 {
151         __be16 _ports[2], *ports;
152         struct sockaddr_in sin;
153
154         /* All current transport protocols have the port numbers in the
155          * first four bytes of the transport header and this function is
156          * written with this assumption in mind.
157          */
158         ports = skb_header_pointer(skb, skb_transport_offset(skb),
159                                    sizeof(_ports), &_ports);
160         if (!ports)
161                 return;
162
163         sin.sin_family = AF_INET;
164         sin.sin_addr.s_addr = ip_hdr(skb)->daddr;
165         sin.sin_port = ports[1];
166         memset(sin.sin_zero, 0, sizeof(sin.sin_zero));
167
168         put_cmsg(msg, SOL_IP, IP_ORIGDSTADDR, sizeof(sin), &sin);
169 }
170
171 void ip_cmsg_recv_offset(struct msghdr *msg, struct sock *sk,
172                          struct sk_buff *skb, int tlen, int offset)
173 {
174         struct inet_sock *inet = inet_sk(sk);
175         unsigned int flags = inet->cmsg_flags;
176
177         /* Ordered by supposed usage frequency */
178         if (flags & IP_CMSG_PKTINFO) {
179                 ip_cmsg_recv_pktinfo(msg, skb);
180
181                 flags &= ~IP_CMSG_PKTINFO;
182                 if (!flags)
183                         return;
184         }
185
186         if (flags & IP_CMSG_TTL) {
187                 ip_cmsg_recv_ttl(msg, skb);
188
189                 flags &= ~IP_CMSG_TTL;
190                 if (!flags)
191                         return;
192         }
193
194         if (flags & IP_CMSG_TOS) {
195                 ip_cmsg_recv_tos(msg, skb);
196
197                 flags &= ~IP_CMSG_TOS;
198                 if (!flags)
199                         return;
200         }
201
202         if (flags & IP_CMSG_RECVOPTS) {
203                 ip_cmsg_recv_opts(msg, skb);
204
205                 flags &= ~IP_CMSG_RECVOPTS;
206                 if (!flags)
207                         return;
208         }
209
210         if (flags & IP_CMSG_RETOPTS) {
211                 ip_cmsg_recv_retopts(sock_net(sk), msg, skb);
212
213                 flags &= ~IP_CMSG_RETOPTS;
214                 if (!flags)
215                         return;
216         }
217
218         if (flags & IP_CMSG_PASSSEC) {
219                 ip_cmsg_recv_security(msg, skb);
220
221                 flags &= ~IP_CMSG_PASSSEC;
222                 if (!flags)
223                         return;
224         }
225
226         if (flags & IP_CMSG_ORIGDSTADDR) {
227                 ip_cmsg_recv_dstaddr(msg, skb);
228
229                 flags &= ~IP_CMSG_ORIGDSTADDR;
230                 if (!flags)
231                         return;
232         }
233
234         if (flags & IP_CMSG_CHECKSUM)
235                 ip_cmsg_recv_checksum(msg, skb, tlen, offset);
236
237         if (flags & IP_CMSG_RECVFRAGSIZE)
238                 ip_cmsg_recv_fragsize(msg, skb);
239 }
240 EXPORT_SYMBOL(ip_cmsg_recv_offset);
241
242 int ip_cmsg_send(struct sock *sk, struct msghdr *msg, struct ipcm_cookie *ipc,
243                  bool allow_ipv6)
244 {
245         int err, val;
246         struct cmsghdr *cmsg;
247         struct net *net = sock_net(sk);
248
249         for_each_cmsghdr(cmsg, msg) {
250                 if (!CMSG_OK(msg, cmsg))
251                         return -EINVAL;
252 #if IS_ENABLED(CONFIG_IPV6)
253                 if (allow_ipv6 &&
254                     cmsg->cmsg_level == SOL_IPV6 &&
255                     cmsg->cmsg_type == IPV6_PKTINFO) {
256                         struct in6_pktinfo *src_info;
257
258                         if (cmsg->cmsg_len < CMSG_LEN(sizeof(*src_info)))
259                                 return -EINVAL;
260                         src_info = (struct in6_pktinfo *)CMSG_DATA(cmsg);
261                         if (!ipv6_addr_v4mapped(&src_info->ipi6_addr))
262                                 return -EINVAL;
263                         if (src_info->ipi6_ifindex)
264                                 ipc->oif = src_info->ipi6_ifindex;
265                         ipc->addr = src_info->ipi6_addr.s6_addr32[3];
266                         continue;
267                 }
268 #endif
269                 if (cmsg->cmsg_level == SOL_SOCKET) {
270                         err = __sock_cmsg_send(sk, msg, cmsg, &ipc->sockc);
271                         if (err)
272                                 return err;
273                         continue;
274                 }
275
276                 if (cmsg->cmsg_level != SOL_IP)
277                         continue;
278                 switch (cmsg->cmsg_type) {
279                 case IP_RETOPTS:
280                         err = cmsg->cmsg_len - sizeof(struct cmsghdr);
281
282                         /* Our caller is responsible for freeing ipc->opt */
283                         err = ip_options_get(net, &ipc->opt,
284                                              KERNEL_SOCKPTR(CMSG_DATA(cmsg)),
285                                              err < 40 ? err : 40);
286                         if (err)
287                                 return err;
288                         break;
289                 case IP_PKTINFO:
290                 {
291                         struct in_pktinfo *info;
292                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct in_pktinfo)))
293                                 return -EINVAL;
294                         info = (struct in_pktinfo *)CMSG_DATA(cmsg);
295                         if (info->ipi_ifindex)
296                                 ipc->oif = info->ipi_ifindex;
297                         ipc->addr = info->ipi_spec_dst.s_addr;
298                         break;
299                 }
300                 case IP_TTL:
301                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(int)))
302                                 return -EINVAL;
303                         val = *(int *)CMSG_DATA(cmsg);
304                         if (val < 1 || val > 255)
305                                 return -EINVAL;
306                         ipc->ttl = val;
307                         break;
308                 case IP_TOS:
309                         if (cmsg->cmsg_len == CMSG_LEN(sizeof(int)))
310                                 val = *(int *)CMSG_DATA(cmsg);
311                         else if (cmsg->cmsg_len == CMSG_LEN(sizeof(u8)))
312                                 val = *(u8 *)CMSG_DATA(cmsg);
313                         else
314                                 return -EINVAL;
315                         if (val < 0 || val > 255)
316                                 return -EINVAL;
317                         ipc->tos = val;
318                         ipc->priority = rt_tos2priority(ipc->tos);
319                         break;
320                 case IP_PROTOCOL:
321                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(int)))
322                                 return -EINVAL;
323                         val = *(int *)CMSG_DATA(cmsg);
324                         if (val < 1 || val > 255)
325                                 return -EINVAL;
326                         ipc->protocol = val;
327                         break;
328                 default:
329                         return -EINVAL;
330                 }
331         }
332         return 0;
333 }
334
335 static void ip_ra_destroy_rcu(struct rcu_head *head)
336 {
337         struct ip_ra_chain *ra = container_of(head, struct ip_ra_chain, rcu);
338
339         sock_put(ra->saved_sk);
340         kfree(ra);
341 }
342
343 int ip_ra_control(struct sock *sk, unsigned char on,
344                   void (*destructor)(struct sock *))
345 {
346         struct ip_ra_chain *ra, *new_ra;
347         struct ip_ra_chain __rcu **rap;
348         struct net *net = sock_net(sk);
349
350         if (sk->sk_type != SOCK_RAW || inet_sk(sk)->inet_num == IPPROTO_RAW)
351                 return -EINVAL;
352
353         new_ra = on ? kmalloc(sizeof(*new_ra), GFP_KERNEL) : NULL;
354         if (on && !new_ra)
355                 return -ENOMEM;
356
357         mutex_lock(&net->ipv4.ra_mutex);
358         for (rap = &net->ipv4.ra_chain;
359              (ra = rcu_dereference_protected(*rap,
360                         lockdep_is_held(&net->ipv4.ra_mutex))) != NULL;
361              rap = &ra->next) {
362                 if (ra->sk == sk) {
363                         if (on) {
364                                 mutex_unlock(&net->ipv4.ra_mutex);
365                                 kfree(new_ra);
366                                 return -EADDRINUSE;
367                         }
368                         /* dont let ip_call_ra_chain() use sk again */
369                         ra->sk = NULL;
370                         RCU_INIT_POINTER(*rap, ra->next);
371                         mutex_unlock(&net->ipv4.ra_mutex);
372
373                         if (ra->destructor)
374                                 ra->destructor(sk);
375                         /*
376                          * Delay sock_put(sk) and kfree(ra) after one rcu grace
377                          * period. This guarantee ip_call_ra_chain() dont need
378                          * to mess with socket refcounts.
379                          */
380                         ra->saved_sk = sk;
381                         call_rcu(&ra->rcu, ip_ra_destroy_rcu);
382                         return 0;
383                 }
384         }
385         if (!new_ra) {
386                 mutex_unlock(&net->ipv4.ra_mutex);
387                 return -ENOBUFS;
388         }
389         new_ra->sk = sk;
390         new_ra->destructor = destructor;
391
392         RCU_INIT_POINTER(new_ra->next, ra);
393         rcu_assign_pointer(*rap, new_ra);
394         sock_hold(sk);
395         mutex_unlock(&net->ipv4.ra_mutex);
396
397         return 0;
398 }
399
400 static void ipv4_icmp_error_rfc4884(const struct sk_buff *skb,
401                                     struct sock_ee_data_rfc4884 *out)
402 {
403         switch (icmp_hdr(skb)->type) {
404         case ICMP_DEST_UNREACH:
405         case ICMP_TIME_EXCEEDED:
406         case ICMP_PARAMETERPROB:
407                 ip_icmp_error_rfc4884(skb, out, sizeof(struct icmphdr),
408                                       icmp_hdr(skb)->un.reserved[1] * 4);
409         }
410 }
411
412 void ip_icmp_error(struct sock *sk, struct sk_buff *skb, int err,
413                    __be16 port, u32 info, u8 *payload)
414 {
415         struct sock_exterr_skb *serr;
416
417         skb = skb_clone(skb, GFP_ATOMIC);
418         if (!skb)
419                 return;
420
421         serr = SKB_EXT_ERR(skb);
422         serr->ee.ee_errno = err;
423         serr->ee.ee_origin = SO_EE_ORIGIN_ICMP;
424         serr->ee.ee_type = icmp_hdr(skb)->type;
425         serr->ee.ee_code = icmp_hdr(skb)->code;
426         serr->ee.ee_pad = 0;
427         serr->ee.ee_info = info;
428         serr->ee.ee_data = 0;
429         serr->addr_offset = (u8 *)&(((struct iphdr *)(icmp_hdr(skb) + 1))->daddr) -
430                                    skb_network_header(skb);
431         serr->port = port;
432
433         if (skb_pull(skb, payload - skb->data)) {
434                 if (inet_sk(sk)->recverr_rfc4884)
435                         ipv4_icmp_error_rfc4884(skb, &serr->ee.ee_rfc4884);
436
437                 skb_reset_transport_header(skb);
438                 if (sock_queue_err_skb(sk, skb) == 0)
439                         return;
440         }
441         kfree_skb(skb);
442 }
443
444 void ip_local_error(struct sock *sk, int err, __be32 daddr, __be16 port, u32 info)
445 {
446         struct inet_sock *inet = inet_sk(sk);
447         struct sock_exterr_skb *serr;
448         struct iphdr *iph;
449         struct sk_buff *skb;
450
451         if (!inet->recverr)
452                 return;
453
454         skb = alloc_skb(sizeof(struct iphdr), GFP_ATOMIC);
455         if (!skb)
456                 return;
457
458         skb_put(skb, sizeof(struct iphdr));
459         skb_reset_network_header(skb);
460         iph = ip_hdr(skb);
461         iph->daddr = daddr;
462
463         serr = SKB_EXT_ERR(skb);
464         serr->ee.ee_errno = err;
465         serr->ee.ee_origin = SO_EE_ORIGIN_LOCAL;
466         serr->ee.ee_type = 0;
467         serr->ee.ee_code = 0;
468         serr->ee.ee_pad = 0;
469         serr->ee.ee_info = info;
470         serr->ee.ee_data = 0;
471         serr->addr_offset = (u8 *)&iph->daddr - skb_network_header(skb);
472         serr->port = port;
473
474         __skb_pull(skb, skb_tail_pointer(skb) - skb->data);
475         skb_reset_transport_header(skb);
476
477         if (sock_queue_err_skb(sk, skb))
478                 kfree_skb(skb);
479 }
480
481 /* For some errors we have valid addr_offset even with zero payload and
482  * zero port. Also, addr_offset should be supported if port is set.
483  */
484 static inline bool ipv4_datagram_support_addr(struct sock_exterr_skb *serr)
485 {
486         return serr->ee.ee_origin == SO_EE_ORIGIN_ICMP ||
487                serr->ee.ee_origin == SO_EE_ORIGIN_LOCAL || serr->port;
488 }
489
490 /* IPv4 supports cmsg on all imcp errors and some timestamps
491  *
492  * Timestamp code paths do not initialize the fields expected by cmsg:
493  * the PKTINFO fields in skb->cb[]. Fill those in here.
494  */
495 static bool ipv4_datagram_support_cmsg(const struct sock *sk,
496                                        struct sk_buff *skb,
497                                        int ee_origin)
498 {
499         struct in_pktinfo *info;
500
501         if (ee_origin == SO_EE_ORIGIN_ICMP)
502                 return true;
503
504         if (ee_origin == SO_EE_ORIGIN_LOCAL)
505                 return false;
506
507         /* Support IP_PKTINFO on tstamp packets if requested, to correlate
508          * timestamp with egress dev. Not possible for packets without iif
509          * or without payload (SOF_TIMESTAMPING_OPT_TSONLY).
510          */
511         info = PKTINFO_SKB_CB(skb);
512         if (!(READ_ONCE(sk->sk_tsflags) & SOF_TIMESTAMPING_OPT_CMSG) ||
513             !info->ipi_ifindex)
514                 return false;
515
516         info->ipi_spec_dst.s_addr = ip_hdr(skb)->saddr;
517         return true;
518 }
519
520 /*
521  *      Handle MSG_ERRQUEUE
522  */
523 int ip_recv_error(struct sock *sk, struct msghdr *msg, int len, int *addr_len)
524 {
525         struct sock_exterr_skb *serr;
526         struct sk_buff *skb;
527         DECLARE_SOCKADDR(struct sockaddr_in *, sin, msg->msg_name);
528         struct {
529                 struct sock_extended_err ee;
530                 struct sockaddr_in       offender;
531         } errhdr;
532         int err;
533         int copied;
534
535         err = -EAGAIN;
536         skb = sock_dequeue_err_skb(sk);
537         if (!skb)
538                 goto out;
539
540         copied = skb->len;
541         if (copied > len) {
542                 msg->msg_flags |= MSG_TRUNC;
543                 copied = len;
544         }
545         err = skb_copy_datagram_msg(skb, 0, msg, copied);
546         if (unlikely(err)) {
547                 kfree_skb(skb);
548                 return err;
549         }
550         sock_recv_timestamp(msg, sk, skb);
551
552         serr = SKB_EXT_ERR(skb);
553
554         if (sin && ipv4_datagram_support_addr(serr)) {
555                 sin->sin_family = AF_INET;
556                 sin->sin_addr.s_addr = *(__be32 *)(skb_network_header(skb) +
557                                                    serr->addr_offset);
558                 sin->sin_port = serr->port;
559                 memset(&sin->sin_zero, 0, sizeof(sin->sin_zero));
560                 *addr_len = sizeof(*sin);
561         }
562
563         memcpy(&errhdr.ee, &serr->ee, sizeof(struct sock_extended_err));
564         sin = &errhdr.offender;
565         memset(sin, 0, sizeof(*sin));
566
567         if (ipv4_datagram_support_cmsg(sk, skb, serr->ee.ee_origin)) {
568                 sin->sin_family = AF_INET;
569                 sin->sin_addr.s_addr = ip_hdr(skb)->saddr;
570                 if (inet_sk(sk)->cmsg_flags)
571                         ip_cmsg_recv(msg, skb);
572         }
573
574         put_cmsg(msg, SOL_IP, IP_RECVERR, sizeof(errhdr), &errhdr);
575
576         /* Now we could try to dump offended packet options */
577
578         msg->msg_flags |= MSG_ERRQUEUE;
579         err = copied;
580
581         consume_skb(skb);
582 out:
583         return err;
584 }
585
586 void __ip_sock_set_tos(struct sock *sk, int val)
587 {
588         if (sk->sk_type == SOCK_STREAM) {
589                 val &= ~INET_ECN_MASK;
590                 val |= inet_sk(sk)->tos & INET_ECN_MASK;
591         }
592         if (inet_sk(sk)->tos != val) {
593                 inet_sk(sk)->tos = val;
594                 WRITE_ONCE(sk->sk_priority, rt_tos2priority(val));
595                 sk_dst_reset(sk);
596         }
597 }
598
599 void ip_sock_set_tos(struct sock *sk, int val)
600 {
601         lock_sock(sk);
602         __ip_sock_set_tos(sk, val);
603         release_sock(sk);
604 }
605 EXPORT_SYMBOL(ip_sock_set_tos);
606
607 void ip_sock_set_freebind(struct sock *sk)
608 {
609         lock_sock(sk);
610         inet_sk(sk)->freebind = true;
611         release_sock(sk);
612 }
613 EXPORT_SYMBOL(ip_sock_set_freebind);
614
615 void ip_sock_set_recverr(struct sock *sk)
616 {
617         lock_sock(sk);
618         inet_sk(sk)->recverr = true;
619         release_sock(sk);
620 }
621 EXPORT_SYMBOL(ip_sock_set_recverr);
622
623 int ip_sock_set_mtu_discover(struct sock *sk, int val)
624 {
625         if (val < IP_PMTUDISC_DONT || val > IP_PMTUDISC_OMIT)
626                 return -EINVAL;
627         lock_sock(sk);
628         inet_sk(sk)->pmtudisc = val;
629         release_sock(sk);
630         return 0;
631 }
632 EXPORT_SYMBOL(ip_sock_set_mtu_discover);
633
634 void ip_sock_set_pktinfo(struct sock *sk)
635 {
636         lock_sock(sk);
637         inet_sk(sk)->cmsg_flags |= IP_CMSG_PKTINFO;
638         release_sock(sk);
639 }
640 EXPORT_SYMBOL(ip_sock_set_pktinfo);
641
642 /*
643  *      Socket option code for IP. This is the end of the line after any
644  *      TCP,UDP etc options on an IP socket.
645  */
646 static bool setsockopt_needs_rtnl(int optname)
647 {
648         switch (optname) {
649         case IP_ADD_MEMBERSHIP:
650         case IP_ADD_SOURCE_MEMBERSHIP:
651         case IP_BLOCK_SOURCE:
652         case IP_DROP_MEMBERSHIP:
653         case IP_DROP_SOURCE_MEMBERSHIP:
654         case IP_MSFILTER:
655         case IP_UNBLOCK_SOURCE:
656         case MCAST_BLOCK_SOURCE:
657         case MCAST_MSFILTER:
658         case MCAST_JOIN_GROUP:
659         case MCAST_JOIN_SOURCE_GROUP:
660         case MCAST_LEAVE_GROUP:
661         case MCAST_LEAVE_SOURCE_GROUP:
662         case MCAST_UNBLOCK_SOURCE:
663                 return true;
664         }
665         return false;
666 }
667
668 static int set_mcast_msfilter(struct sock *sk, int ifindex,
669                               int numsrc, int fmode,
670                               struct sockaddr_storage *group,
671                               struct sockaddr_storage *list)
672 {
673         struct ip_msfilter *msf;
674         struct sockaddr_in *psin;
675         int err, i;
676
677         msf = kmalloc(IP_MSFILTER_SIZE(numsrc), GFP_KERNEL);
678         if (!msf)
679                 return -ENOBUFS;
680
681         psin = (struct sockaddr_in *)group;
682         if (psin->sin_family != AF_INET)
683                 goto Eaddrnotavail;
684         msf->imsf_multiaddr = psin->sin_addr.s_addr;
685         msf->imsf_interface = 0;
686         msf->imsf_fmode = fmode;
687         msf->imsf_numsrc = numsrc;
688         for (i = 0; i < numsrc; ++i) {
689                 psin = (struct sockaddr_in *)&list[i];
690
691                 if (psin->sin_family != AF_INET)
692                         goto Eaddrnotavail;
693                 msf->imsf_slist_flex[i] = psin->sin_addr.s_addr;
694         }
695         err = ip_mc_msfilter(sk, msf, ifindex);
696         kfree(msf);
697         return err;
698
699 Eaddrnotavail:
700         kfree(msf);
701         return -EADDRNOTAVAIL;
702 }
703
704 static int copy_group_source_from_sockptr(struct group_source_req *greqs,
705                 sockptr_t optval, int optlen)
706 {
707         if (in_compat_syscall()) {
708                 struct compat_group_source_req gr32;
709
710                 if (optlen != sizeof(gr32))
711                         return -EINVAL;
712                 if (copy_from_sockptr(&gr32, optval, sizeof(gr32)))
713                         return -EFAULT;
714                 greqs->gsr_interface = gr32.gsr_interface;
715                 greqs->gsr_group = gr32.gsr_group;
716                 greqs->gsr_source = gr32.gsr_source;
717         } else {
718                 if (optlen != sizeof(*greqs))
719                         return -EINVAL;
720                 if (copy_from_sockptr(greqs, optval, sizeof(*greqs)))
721                         return -EFAULT;
722         }
723
724         return 0;
725 }
726
727 static int do_mcast_group_source(struct sock *sk, int optname,
728                 sockptr_t optval, int optlen)
729 {
730         struct group_source_req greqs;
731         struct ip_mreq_source mreqs;
732         struct sockaddr_in *psin;
733         int omode, add, err;
734
735         err = copy_group_source_from_sockptr(&greqs, optval, optlen);
736         if (err)
737                 return err;
738
739         if (greqs.gsr_group.ss_family != AF_INET ||
740             greqs.gsr_source.ss_family != AF_INET)
741                 return -EADDRNOTAVAIL;
742
743         psin = (struct sockaddr_in *)&greqs.gsr_group;
744         mreqs.imr_multiaddr = psin->sin_addr.s_addr;
745         psin = (struct sockaddr_in *)&greqs.gsr_source;
746         mreqs.imr_sourceaddr = psin->sin_addr.s_addr;
747         mreqs.imr_interface = 0; /* use index for mc_source */
748
749         if (optname == MCAST_BLOCK_SOURCE) {
750                 omode = MCAST_EXCLUDE;
751                 add = 1;
752         } else if (optname == MCAST_UNBLOCK_SOURCE) {
753                 omode = MCAST_EXCLUDE;
754                 add = 0;
755         } else if (optname == MCAST_JOIN_SOURCE_GROUP) {
756                 struct ip_mreqn mreq;
757
758                 psin = (struct sockaddr_in *)&greqs.gsr_group;
759                 mreq.imr_multiaddr = psin->sin_addr;
760                 mreq.imr_address.s_addr = 0;
761                 mreq.imr_ifindex = greqs.gsr_interface;
762                 err = ip_mc_join_group_ssm(sk, &mreq, MCAST_INCLUDE);
763                 if (err && err != -EADDRINUSE)
764                         return err;
765                 greqs.gsr_interface = mreq.imr_ifindex;
766                 omode = MCAST_INCLUDE;
767                 add = 1;
768         } else /* MCAST_LEAVE_SOURCE_GROUP */ {
769                 omode = MCAST_INCLUDE;
770                 add = 0;
771         }
772         return ip_mc_source(add, omode, sk, &mreqs, greqs.gsr_interface);
773 }
774
775 static int ip_set_mcast_msfilter(struct sock *sk, sockptr_t optval, int optlen)
776 {
777         struct group_filter *gsf = NULL;
778         int err;
779
780         if (optlen < GROUP_FILTER_SIZE(0))
781                 return -EINVAL;
782         if (optlen > READ_ONCE(sysctl_optmem_max))
783                 return -ENOBUFS;
784
785         gsf = memdup_sockptr(optval, optlen);
786         if (IS_ERR(gsf))
787                 return PTR_ERR(gsf);
788
789         /* numsrc >= (4G-140)/128 overflow in 32 bits */
790         err = -ENOBUFS;
791         if (gsf->gf_numsrc >= 0x1ffffff ||
792             gsf->gf_numsrc > READ_ONCE(sock_net(sk)->ipv4.sysctl_igmp_max_msf))
793                 goto out_free_gsf;
794
795         err = -EINVAL;
796         if (GROUP_FILTER_SIZE(gsf->gf_numsrc) > optlen)
797                 goto out_free_gsf;
798
799         err = set_mcast_msfilter(sk, gsf->gf_interface, gsf->gf_numsrc,
800                                  gsf->gf_fmode, &gsf->gf_group,
801                                  gsf->gf_slist_flex);
802 out_free_gsf:
803         kfree(gsf);
804         return err;
805 }
806
807 static int compat_ip_set_mcast_msfilter(struct sock *sk, sockptr_t optval,
808                 int optlen)
809 {
810         const int size0 = offsetof(struct compat_group_filter, gf_slist_flex);
811         struct compat_group_filter *gf32;
812         unsigned int n;
813         void *p;
814         int err;
815
816         if (optlen < size0)
817                 return -EINVAL;
818         if (optlen > READ_ONCE(sysctl_optmem_max) - 4)
819                 return -ENOBUFS;
820
821         p = kmalloc(optlen + 4, GFP_KERNEL);
822         if (!p)
823                 return -ENOMEM;
824         gf32 = p + 4; /* we want ->gf_group and ->gf_slist_flex aligned */
825
826         err = -EFAULT;
827         if (copy_from_sockptr(gf32, optval, optlen))
828                 goto out_free_gsf;
829
830         /* numsrc >= (4G-140)/128 overflow in 32 bits */
831         n = gf32->gf_numsrc;
832         err = -ENOBUFS;
833         if (n >= 0x1ffffff)
834                 goto out_free_gsf;
835
836         err = -EINVAL;
837         if (offsetof(struct compat_group_filter, gf_slist_flex[n]) > optlen)
838                 goto out_free_gsf;
839
840         /* numsrc >= (4G-140)/128 overflow in 32 bits */
841         err = -ENOBUFS;
842         if (n > READ_ONCE(sock_net(sk)->ipv4.sysctl_igmp_max_msf))
843                 goto out_free_gsf;
844         err = set_mcast_msfilter(sk, gf32->gf_interface, n, gf32->gf_fmode,
845                                  &gf32->gf_group, gf32->gf_slist_flex);
846 out_free_gsf:
847         kfree(p);
848         return err;
849 }
850
851 static int ip_mcast_join_leave(struct sock *sk, int optname,
852                 sockptr_t optval, int optlen)
853 {
854         struct ip_mreqn mreq = { };
855         struct sockaddr_in *psin;
856         struct group_req greq;
857
858         if (optlen < sizeof(struct group_req))
859                 return -EINVAL;
860         if (copy_from_sockptr(&greq, optval, sizeof(greq)))
861                 return -EFAULT;
862
863         psin = (struct sockaddr_in *)&greq.gr_group;
864         if (psin->sin_family != AF_INET)
865                 return -EINVAL;
866         mreq.imr_multiaddr = psin->sin_addr;
867         mreq.imr_ifindex = greq.gr_interface;
868         if (optname == MCAST_JOIN_GROUP)
869                 return ip_mc_join_group(sk, &mreq);
870         return ip_mc_leave_group(sk, &mreq);
871 }
872
873 static int compat_ip_mcast_join_leave(struct sock *sk, int optname,
874                 sockptr_t optval, int optlen)
875 {
876         struct compat_group_req greq;
877         struct ip_mreqn mreq = { };
878         struct sockaddr_in *psin;
879
880         if (optlen < sizeof(struct compat_group_req))
881                 return -EINVAL;
882         if (copy_from_sockptr(&greq, optval, sizeof(greq)))
883                 return -EFAULT;
884
885         psin = (struct sockaddr_in *)&greq.gr_group;
886         if (psin->sin_family != AF_INET)
887                 return -EINVAL;
888         mreq.imr_multiaddr = psin->sin_addr;
889         mreq.imr_ifindex = greq.gr_interface;
890
891         if (optname == MCAST_JOIN_GROUP)
892                 return ip_mc_join_group(sk, &mreq);
893         return ip_mc_leave_group(sk, &mreq);
894 }
895
896 DEFINE_STATIC_KEY_FALSE(ip4_min_ttl);
897
898 int do_ip_setsockopt(struct sock *sk, int level, int optname,
899                      sockptr_t optval, unsigned int optlen)
900 {
901         struct inet_sock *inet = inet_sk(sk);
902         struct net *net = sock_net(sk);
903         int val = 0, err;
904         bool needs_rtnl = setsockopt_needs_rtnl(optname);
905
906         switch (optname) {
907         case IP_PKTINFO:
908         case IP_RECVTTL:
909         case IP_RECVOPTS:
910         case IP_RECVTOS:
911         case IP_RETOPTS:
912         case IP_TOS:
913         case IP_TTL:
914         case IP_HDRINCL:
915         case IP_MTU_DISCOVER:
916         case IP_RECVERR:
917         case IP_ROUTER_ALERT:
918         case IP_FREEBIND:
919         case IP_PASSSEC:
920         case IP_TRANSPARENT:
921         case IP_MINTTL:
922         case IP_NODEFRAG:
923         case IP_BIND_ADDRESS_NO_PORT:
924         case IP_UNICAST_IF:
925         case IP_MULTICAST_TTL:
926         case IP_MULTICAST_ALL:
927         case IP_MULTICAST_LOOP:
928         case IP_RECVORIGDSTADDR:
929         case IP_CHECKSUM:
930         case IP_RECVFRAGSIZE:
931         case IP_RECVERR_RFC4884:
932         case IP_LOCAL_PORT_RANGE:
933                 if (optlen >= sizeof(int)) {
934                         if (copy_from_sockptr(&val, optval, sizeof(val)))
935                                 return -EFAULT;
936                 } else if (optlen >= sizeof(char)) {
937                         unsigned char ucval;
938
939                         if (copy_from_sockptr(&ucval, optval, sizeof(ucval)))
940                                 return -EFAULT;
941                         val = (int) ucval;
942                 }
943         }
944
945         /* If optlen==0, it is equivalent to val == 0 */
946
947         if (optname == IP_ROUTER_ALERT)
948                 return ip_ra_control(sk, val ? 1 : 0, NULL);
949         if (ip_mroute_opt(optname))
950                 return ip_mroute_setsockopt(sk, optname, optval, optlen);
951
952         err = 0;
953         if (needs_rtnl)
954                 rtnl_lock();
955         sockopt_lock_sock(sk);
956
957         switch (optname) {
958         case IP_OPTIONS:
959         {
960                 struct ip_options_rcu *old, *opt = NULL;
961
962                 if (optlen > 40)
963                         goto e_inval;
964                 err = ip_options_get(sock_net(sk), &opt, optval, optlen);
965                 if (err)
966                         break;
967                 old = rcu_dereference_protected(inet->inet_opt,
968                                                 lockdep_sock_is_held(sk));
969                 if (inet->is_icsk) {
970                         struct inet_connection_sock *icsk = inet_csk(sk);
971 #if IS_ENABLED(CONFIG_IPV6)
972                         if (sk->sk_family == PF_INET ||
973                             (!((1 << sk->sk_state) &
974                                (TCPF_LISTEN | TCPF_CLOSE)) &&
975                              inet->inet_daddr != LOOPBACK4_IPV6)) {
976 #endif
977                                 if (old)
978                                         icsk->icsk_ext_hdr_len -= old->opt.optlen;
979                                 if (opt)
980                                         icsk->icsk_ext_hdr_len += opt->opt.optlen;
981                                 icsk->icsk_sync_mss(sk, icsk->icsk_pmtu_cookie);
982 #if IS_ENABLED(CONFIG_IPV6)
983                         }
984 #endif
985                 }
986                 rcu_assign_pointer(inet->inet_opt, opt);
987                 if (old)
988                         kfree_rcu(old, rcu);
989                 break;
990         }
991         case IP_PKTINFO:
992                 if (val)
993                         inet->cmsg_flags |= IP_CMSG_PKTINFO;
994                 else
995                         inet->cmsg_flags &= ~IP_CMSG_PKTINFO;
996                 break;
997         case IP_RECVTTL:
998                 if (val)
999                         inet->cmsg_flags |=  IP_CMSG_TTL;
1000                 else
1001                         inet->cmsg_flags &= ~IP_CMSG_TTL;
1002                 break;
1003         case IP_RECVTOS:
1004                 if (val)
1005                         inet->cmsg_flags |=  IP_CMSG_TOS;
1006                 else
1007                         inet->cmsg_flags &= ~IP_CMSG_TOS;
1008                 break;
1009         case IP_RECVOPTS:
1010                 if (val)
1011                         inet->cmsg_flags |=  IP_CMSG_RECVOPTS;
1012                 else
1013                         inet->cmsg_flags &= ~IP_CMSG_RECVOPTS;
1014                 break;
1015         case IP_RETOPTS:
1016                 if (val)
1017                         inet->cmsg_flags |= IP_CMSG_RETOPTS;
1018                 else
1019                         inet->cmsg_flags &= ~IP_CMSG_RETOPTS;
1020                 break;
1021         case IP_PASSSEC:
1022                 if (val)
1023                         inet->cmsg_flags |= IP_CMSG_PASSSEC;
1024                 else
1025                         inet->cmsg_flags &= ~IP_CMSG_PASSSEC;
1026                 break;
1027         case IP_RECVORIGDSTADDR:
1028                 if (val)
1029                         inet->cmsg_flags |= IP_CMSG_ORIGDSTADDR;
1030                 else
1031                         inet->cmsg_flags &= ~IP_CMSG_ORIGDSTADDR;
1032                 break;
1033         case IP_CHECKSUM:
1034                 if (val) {
1035                         if (!(inet->cmsg_flags & IP_CMSG_CHECKSUM)) {
1036                                 inet_inc_convert_csum(sk);
1037                                 inet->cmsg_flags |= IP_CMSG_CHECKSUM;
1038                         }
1039                 } else {
1040                         if (inet->cmsg_flags & IP_CMSG_CHECKSUM) {
1041                                 inet_dec_convert_csum(sk);
1042                                 inet->cmsg_flags &= ~IP_CMSG_CHECKSUM;
1043                         }
1044                 }
1045                 break;
1046         case IP_RECVFRAGSIZE:
1047                 if (sk->sk_type != SOCK_RAW && sk->sk_type != SOCK_DGRAM)
1048                         goto e_inval;
1049                 if (val)
1050                         inet->cmsg_flags |= IP_CMSG_RECVFRAGSIZE;
1051                 else
1052                         inet->cmsg_flags &= ~IP_CMSG_RECVFRAGSIZE;
1053                 break;
1054         case IP_TOS:    /* This sets both TOS and Precedence */
1055                 __ip_sock_set_tos(sk, val);
1056                 break;
1057         case IP_TTL:
1058                 if (optlen < 1)
1059                         goto e_inval;
1060                 if (val != -1 && (val < 1 || val > 255))
1061                         goto e_inval;
1062                 inet->uc_ttl = val;
1063                 break;
1064         case IP_HDRINCL:
1065                 if (sk->sk_type != SOCK_RAW) {
1066                         err = -ENOPROTOOPT;
1067                         break;
1068                 }
1069                 inet->hdrincl = val ? 1 : 0;
1070                 break;
1071         case IP_NODEFRAG:
1072                 if (sk->sk_type != SOCK_RAW) {
1073                         err = -ENOPROTOOPT;
1074                         break;
1075                 }
1076                 inet->nodefrag = val ? 1 : 0;
1077                 break;
1078         case IP_BIND_ADDRESS_NO_PORT:
1079                 inet->bind_address_no_port = val ? 1 : 0;
1080                 break;
1081         case IP_MTU_DISCOVER:
1082                 if (val < IP_PMTUDISC_DONT || val > IP_PMTUDISC_OMIT)
1083                         goto e_inval;
1084                 inet->pmtudisc = val;
1085                 break;
1086         case IP_RECVERR:
1087                 inet->recverr = !!val;
1088                 if (!val)
1089                         skb_queue_purge(&sk->sk_error_queue);
1090                 break;
1091         case IP_RECVERR_RFC4884:
1092                 if (val < 0 || val > 1)
1093                         goto e_inval;
1094                 inet->recverr_rfc4884 = !!val;
1095                 break;
1096         case IP_MULTICAST_TTL:
1097                 if (sk->sk_type == SOCK_STREAM)
1098                         goto e_inval;
1099                 if (optlen < 1)
1100                         goto e_inval;
1101                 if (val == -1)
1102                         val = 1;
1103                 if (val < 0 || val > 255)
1104                         goto e_inval;
1105                 inet->mc_ttl = val;
1106                 break;
1107         case IP_MULTICAST_LOOP:
1108                 if (optlen < 1)
1109                         goto e_inval;
1110                 inet->mc_loop = !!val;
1111                 break;
1112         case IP_UNICAST_IF:
1113         {
1114                 struct net_device *dev = NULL;
1115                 int ifindex;
1116                 int midx;
1117
1118                 if (optlen != sizeof(int))
1119                         goto e_inval;
1120
1121                 ifindex = (__force int)ntohl((__force __be32)val);
1122                 if (ifindex == 0) {
1123                         inet->uc_index = 0;
1124                         err = 0;
1125                         break;
1126                 }
1127
1128                 dev = dev_get_by_index(sock_net(sk), ifindex);
1129                 err = -EADDRNOTAVAIL;
1130                 if (!dev)
1131                         break;
1132
1133                 midx = l3mdev_master_ifindex(dev);
1134                 dev_put(dev);
1135
1136                 err = -EINVAL;
1137                 if (sk->sk_bound_dev_if && midx != sk->sk_bound_dev_if)
1138                         break;
1139
1140                 inet->uc_index = ifindex;
1141                 err = 0;
1142                 break;
1143         }
1144         case IP_MULTICAST_IF:
1145         {
1146                 struct ip_mreqn mreq;
1147                 struct net_device *dev = NULL;
1148                 int midx;
1149
1150                 if (sk->sk_type == SOCK_STREAM)
1151                         goto e_inval;
1152                 /*
1153                  *      Check the arguments are allowable
1154                  */
1155
1156                 if (optlen < sizeof(struct in_addr))
1157                         goto e_inval;
1158
1159                 err = -EFAULT;
1160                 if (optlen >= sizeof(struct ip_mreqn)) {
1161                         if (copy_from_sockptr(&mreq, optval, sizeof(mreq)))
1162                                 break;
1163                 } else {
1164                         memset(&mreq, 0, sizeof(mreq));
1165                         if (optlen >= sizeof(struct ip_mreq)) {
1166                                 if (copy_from_sockptr(&mreq, optval,
1167                                                       sizeof(struct ip_mreq)))
1168                                         break;
1169                         } else if (optlen >= sizeof(struct in_addr)) {
1170                                 if (copy_from_sockptr(&mreq.imr_address, optval,
1171                                                       sizeof(struct in_addr)))
1172                                         break;
1173                         }
1174                 }
1175
1176                 if (!mreq.imr_ifindex) {
1177                         if (mreq.imr_address.s_addr == htonl(INADDR_ANY)) {
1178                                 inet->mc_index = 0;
1179                                 inet->mc_addr  = 0;
1180                                 err = 0;
1181                                 break;
1182                         }
1183                         dev = ip_dev_find(sock_net(sk), mreq.imr_address.s_addr);
1184                         if (dev)
1185                                 mreq.imr_ifindex = dev->ifindex;
1186                 } else
1187                         dev = dev_get_by_index(sock_net(sk), mreq.imr_ifindex);
1188
1189
1190                 err = -EADDRNOTAVAIL;
1191                 if (!dev)
1192                         break;
1193
1194                 midx = l3mdev_master_ifindex(dev);
1195
1196                 dev_put(dev);
1197
1198                 err = -EINVAL;
1199                 if (sk->sk_bound_dev_if &&
1200                     mreq.imr_ifindex != sk->sk_bound_dev_if &&
1201                     midx != sk->sk_bound_dev_if)
1202                         break;
1203
1204                 inet->mc_index = mreq.imr_ifindex;
1205                 inet->mc_addr  = mreq.imr_address.s_addr;
1206                 err = 0;
1207                 break;
1208         }
1209
1210         case IP_ADD_MEMBERSHIP:
1211         case IP_DROP_MEMBERSHIP:
1212         {
1213                 struct ip_mreqn mreq;
1214
1215                 err = -EPROTO;
1216                 if (inet_sk(sk)->is_icsk)
1217                         break;
1218
1219                 if (optlen < sizeof(struct ip_mreq))
1220                         goto e_inval;
1221                 err = -EFAULT;
1222                 if (optlen >= sizeof(struct ip_mreqn)) {
1223                         if (copy_from_sockptr(&mreq, optval, sizeof(mreq)))
1224                                 break;
1225                 } else {
1226                         memset(&mreq, 0, sizeof(mreq));
1227                         if (copy_from_sockptr(&mreq, optval,
1228                                               sizeof(struct ip_mreq)))
1229                                 break;
1230                 }
1231
1232                 if (optname == IP_ADD_MEMBERSHIP)
1233                         err = ip_mc_join_group(sk, &mreq);
1234                 else
1235                         err = ip_mc_leave_group(sk, &mreq);
1236                 break;
1237         }
1238         case IP_MSFILTER:
1239         {
1240                 struct ip_msfilter *msf;
1241
1242                 if (optlen < IP_MSFILTER_SIZE(0))
1243                         goto e_inval;
1244                 if (optlen > READ_ONCE(sysctl_optmem_max)) {
1245                         err = -ENOBUFS;
1246                         break;
1247                 }
1248                 msf = memdup_sockptr(optval, optlen);
1249                 if (IS_ERR(msf)) {
1250                         err = PTR_ERR(msf);
1251                         break;
1252                 }
1253                 /* numsrc >= (1G-4) overflow in 32 bits */
1254                 if (msf->imsf_numsrc >= 0x3ffffffcU ||
1255                     msf->imsf_numsrc > READ_ONCE(net->ipv4.sysctl_igmp_max_msf)) {
1256                         kfree(msf);
1257                         err = -ENOBUFS;
1258                         break;
1259                 }
1260                 if (IP_MSFILTER_SIZE(msf->imsf_numsrc) > optlen) {
1261                         kfree(msf);
1262                         err = -EINVAL;
1263                         break;
1264                 }
1265                 err = ip_mc_msfilter(sk, msf, 0);
1266                 kfree(msf);
1267                 break;
1268         }
1269         case IP_BLOCK_SOURCE:
1270         case IP_UNBLOCK_SOURCE:
1271         case IP_ADD_SOURCE_MEMBERSHIP:
1272         case IP_DROP_SOURCE_MEMBERSHIP:
1273         {
1274                 struct ip_mreq_source mreqs;
1275                 int omode, add;
1276
1277                 if (optlen != sizeof(struct ip_mreq_source))
1278                         goto e_inval;
1279                 if (copy_from_sockptr(&mreqs, optval, sizeof(mreqs))) {
1280                         err = -EFAULT;
1281                         break;
1282                 }
1283                 if (optname == IP_BLOCK_SOURCE) {
1284                         omode = MCAST_EXCLUDE;
1285                         add = 1;
1286                 } else if (optname == IP_UNBLOCK_SOURCE) {
1287                         omode = MCAST_EXCLUDE;
1288                         add = 0;
1289                 } else if (optname == IP_ADD_SOURCE_MEMBERSHIP) {
1290                         struct ip_mreqn mreq;
1291
1292                         mreq.imr_multiaddr.s_addr = mreqs.imr_multiaddr;
1293                         mreq.imr_address.s_addr = mreqs.imr_interface;
1294                         mreq.imr_ifindex = 0;
1295                         err = ip_mc_join_group_ssm(sk, &mreq, MCAST_INCLUDE);
1296                         if (err && err != -EADDRINUSE)
1297                                 break;
1298                         omode = MCAST_INCLUDE;
1299                         add = 1;
1300                 } else /* IP_DROP_SOURCE_MEMBERSHIP */ {
1301                         omode = MCAST_INCLUDE;
1302                         add = 0;
1303                 }
1304                 err = ip_mc_source(add, omode, sk, &mreqs, 0);
1305                 break;
1306         }
1307         case MCAST_JOIN_GROUP:
1308         case MCAST_LEAVE_GROUP:
1309                 if (in_compat_syscall())
1310                         err = compat_ip_mcast_join_leave(sk, optname, optval,
1311                                                          optlen);
1312                 else
1313                         err = ip_mcast_join_leave(sk, optname, optval, optlen);
1314                 break;
1315         case MCAST_JOIN_SOURCE_GROUP:
1316         case MCAST_LEAVE_SOURCE_GROUP:
1317         case MCAST_BLOCK_SOURCE:
1318         case MCAST_UNBLOCK_SOURCE:
1319                 err = do_mcast_group_source(sk, optname, optval, optlen);
1320                 break;
1321         case MCAST_MSFILTER:
1322                 if (in_compat_syscall())
1323                         err = compat_ip_set_mcast_msfilter(sk, optval, optlen);
1324                 else
1325                         err = ip_set_mcast_msfilter(sk, optval, optlen);
1326                 break;
1327         case IP_MULTICAST_ALL:
1328                 if (optlen < 1)
1329                         goto e_inval;
1330                 if (val != 0 && val != 1)
1331                         goto e_inval;
1332                 inet->mc_all = val;
1333                 break;
1334
1335         case IP_FREEBIND:
1336                 if (optlen < 1)
1337                         goto e_inval;
1338                 inet->freebind = !!val;
1339                 break;
1340
1341         case IP_IPSEC_POLICY:
1342         case IP_XFRM_POLICY:
1343                 err = -EPERM;
1344                 if (!sockopt_ns_capable(sock_net(sk)->user_ns, CAP_NET_ADMIN))
1345                         break;
1346                 err = xfrm_user_policy(sk, optname, optval, optlen);
1347                 break;
1348
1349         case IP_TRANSPARENT:
1350                 if (!!val && !sockopt_ns_capable(sock_net(sk)->user_ns, CAP_NET_RAW) &&
1351                     !sockopt_ns_capable(sock_net(sk)->user_ns, CAP_NET_ADMIN)) {
1352                         err = -EPERM;
1353                         break;
1354                 }
1355                 if (optlen < 1)
1356                         goto e_inval;
1357                 inet->transparent = !!val;
1358                 break;
1359
1360         case IP_MINTTL:
1361                 if (optlen < 1)
1362                         goto e_inval;
1363                 if (val < 0 || val > 255)
1364                         goto e_inval;
1365
1366                 if (val)
1367                         static_branch_enable(&ip4_min_ttl);
1368
1369                 /* tcp_v4_err() and tcp_v4_rcv() might read min_ttl
1370                  * while we are changint it.
1371                  */
1372                 WRITE_ONCE(inet->min_ttl, val);
1373                 break;
1374
1375         case IP_LOCAL_PORT_RANGE:
1376         {
1377                 const __u16 lo = val;
1378                 const __u16 hi = val >> 16;
1379
1380                 if (optlen != sizeof(__u32))
1381                         goto e_inval;
1382                 if (lo != 0 && hi != 0 && lo > hi)
1383                         goto e_inval;
1384
1385                 inet->local_port_range.lo = lo;
1386                 inet->local_port_range.hi = hi;
1387                 break;
1388         }
1389         default:
1390                 err = -ENOPROTOOPT;
1391                 break;
1392         }
1393         sockopt_release_sock(sk);
1394         if (needs_rtnl)
1395                 rtnl_unlock();
1396         return err;
1397
1398 e_inval:
1399         sockopt_release_sock(sk);
1400         if (needs_rtnl)
1401                 rtnl_unlock();
1402         return -EINVAL;
1403 }
1404
1405 /**
1406  * ipv4_pktinfo_prepare - transfer some info from rtable to skb
1407  * @sk: socket
1408  * @skb: buffer
1409  * @drop_dst: if true, drops skb dst
1410  *
1411  * To support IP_CMSG_PKTINFO option, we store rt_iif and specific
1412  * destination in skb->cb[] before dst drop.
1413  * This way, receiver doesn't make cache line misses to read rtable.
1414  */
1415 void ipv4_pktinfo_prepare(const struct sock *sk, struct sk_buff *skb, bool drop_dst)
1416 {
1417         struct in_pktinfo *pktinfo = PKTINFO_SKB_CB(skb);
1418         bool prepare = (inet_sk(sk)->cmsg_flags & IP_CMSG_PKTINFO) ||
1419                        ipv6_sk_rxinfo(sk);
1420
1421         if (prepare && skb_rtable(skb)) {
1422                 /* skb->cb is overloaded: prior to this point it is IP{6}CB
1423                  * which has interface index (iif) as the first member of the
1424                  * underlying inet{6}_skb_parm struct. This code then overlays
1425                  * PKTINFO_SKB_CB and in_pktinfo also has iif as the first
1426                  * element so the iif is picked up from the prior IPCB. If iif
1427                  * is the loopback interface, then return the sending interface
1428                  * (e.g., process binds socket to eth0 for Tx which is
1429                  * redirected to loopback in the rtable/dst).
1430                  */
1431                 struct rtable *rt = skb_rtable(skb);
1432                 bool l3slave = ipv4_l3mdev_skb(IPCB(skb)->flags);
1433
1434                 if (pktinfo->ipi_ifindex == LOOPBACK_IFINDEX)
1435                         pktinfo->ipi_ifindex = inet_iif(skb);
1436                 else if (l3slave && rt && rt->rt_iif)
1437                         pktinfo->ipi_ifindex = rt->rt_iif;
1438
1439                 pktinfo->ipi_spec_dst.s_addr = fib_compute_spec_dst(skb);
1440         } else {
1441                 pktinfo->ipi_ifindex = 0;
1442                 pktinfo->ipi_spec_dst.s_addr = 0;
1443         }
1444         if (drop_dst)
1445                 skb_dst_drop(skb);
1446 }
1447
1448 int ip_setsockopt(struct sock *sk, int level, int optname, sockptr_t optval,
1449                 unsigned int optlen)
1450 {
1451         int err;
1452
1453         if (level != SOL_IP)
1454                 return -ENOPROTOOPT;
1455
1456         err = do_ip_setsockopt(sk, level, optname, optval, optlen);
1457 #if IS_ENABLED(CONFIG_BPFILTER_UMH)
1458         if (optname >= BPFILTER_IPT_SO_SET_REPLACE &&
1459             optname < BPFILTER_IPT_SET_MAX)
1460                 err = bpfilter_ip_set_sockopt(sk, optname, optval, optlen);
1461 #endif
1462 #ifdef CONFIG_NETFILTER
1463         /* we need to exclude all possible ENOPROTOOPTs except default case */
1464         if (err == -ENOPROTOOPT && optname != IP_HDRINCL &&
1465                         optname != IP_IPSEC_POLICY &&
1466                         optname != IP_XFRM_POLICY &&
1467                         !ip_mroute_opt(optname))
1468                 err = nf_setsockopt(sk, PF_INET, optname, optval, optlen);
1469 #endif
1470         return err;
1471 }
1472 EXPORT_SYMBOL(ip_setsockopt);
1473
1474 /*
1475  *      Get the options. Note for future reference. The GET of IP options gets
1476  *      the _received_ ones. The set sets the _sent_ ones.
1477  */
1478
1479 static bool getsockopt_needs_rtnl(int optname)
1480 {
1481         switch (optname) {
1482         case IP_MSFILTER:
1483         case MCAST_MSFILTER:
1484                 return true;
1485         }
1486         return false;
1487 }
1488
1489 static int ip_get_mcast_msfilter(struct sock *sk, sockptr_t optval,
1490                                  sockptr_t optlen, int len)
1491 {
1492         const int size0 = offsetof(struct group_filter, gf_slist_flex);
1493         struct group_filter gsf;
1494         int num, gsf_size;
1495         int err;
1496
1497         if (len < size0)
1498                 return -EINVAL;
1499         if (copy_from_sockptr(&gsf, optval, size0))
1500                 return -EFAULT;
1501
1502         num = gsf.gf_numsrc;
1503         err = ip_mc_gsfget(sk, &gsf, optval,
1504                            offsetof(struct group_filter, gf_slist_flex));
1505         if (err)
1506                 return err;
1507         if (gsf.gf_numsrc < num)
1508                 num = gsf.gf_numsrc;
1509         gsf_size = GROUP_FILTER_SIZE(num);
1510         if (copy_to_sockptr(optlen, &gsf_size, sizeof(int)) ||
1511             copy_to_sockptr(optval, &gsf, size0))
1512                 return -EFAULT;
1513         return 0;
1514 }
1515
1516 static int compat_ip_get_mcast_msfilter(struct sock *sk, sockptr_t optval,
1517                                         sockptr_t optlen, int len)
1518 {
1519         const int size0 = offsetof(struct compat_group_filter, gf_slist_flex);
1520         struct compat_group_filter gf32;
1521         struct group_filter gf;
1522         int num;
1523         int err;
1524
1525         if (len < size0)
1526                 return -EINVAL;
1527         if (copy_from_sockptr(&gf32, optval, size0))
1528                 return -EFAULT;
1529
1530         gf.gf_interface = gf32.gf_interface;
1531         gf.gf_fmode = gf32.gf_fmode;
1532         num = gf.gf_numsrc = gf32.gf_numsrc;
1533         gf.gf_group = gf32.gf_group;
1534
1535         err = ip_mc_gsfget(sk, &gf, optval,
1536                            offsetof(struct compat_group_filter, gf_slist_flex));
1537         if (err)
1538                 return err;
1539         if (gf.gf_numsrc < num)
1540                 num = gf.gf_numsrc;
1541         len = GROUP_FILTER_SIZE(num) - (sizeof(gf) - sizeof(gf32));
1542         if (copy_to_sockptr(optlen, &len, sizeof(int)) ||
1543             copy_to_sockptr_offset(optval, offsetof(struct compat_group_filter, gf_fmode),
1544                                    &gf.gf_fmode, sizeof(gf.gf_fmode)) ||
1545             copy_to_sockptr_offset(optval, offsetof(struct compat_group_filter, gf_numsrc),
1546                                    &gf.gf_numsrc, sizeof(gf.gf_numsrc)))
1547                 return -EFAULT;
1548         return 0;
1549 }
1550
1551 int do_ip_getsockopt(struct sock *sk, int level, int optname,
1552                      sockptr_t optval, sockptr_t optlen)
1553 {
1554         struct inet_sock *inet = inet_sk(sk);
1555         bool needs_rtnl = getsockopt_needs_rtnl(optname);
1556         int val, err = 0;
1557         int len;
1558
1559         if (level != SOL_IP)
1560                 return -EOPNOTSUPP;
1561
1562         if (ip_mroute_opt(optname))
1563                 return ip_mroute_getsockopt(sk, optname, optval, optlen);
1564
1565         if (copy_from_sockptr(&len, optlen, sizeof(int)))
1566                 return -EFAULT;
1567         if (len < 0)
1568                 return -EINVAL;
1569
1570         if (needs_rtnl)
1571                 rtnl_lock();
1572         sockopt_lock_sock(sk);
1573
1574         switch (optname) {
1575         case IP_OPTIONS:
1576         {
1577                 unsigned char optbuf[sizeof(struct ip_options)+40];
1578                 struct ip_options *opt = (struct ip_options *)optbuf;
1579                 struct ip_options_rcu *inet_opt;
1580
1581                 inet_opt = rcu_dereference_protected(inet->inet_opt,
1582                                                      lockdep_sock_is_held(sk));
1583                 opt->optlen = 0;
1584                 if (inet_opt)
1585                         memcpy(optbuf, &inet_opt->opt,
1586                                sizeof(struct ip_options) +
1587                                inet_opt->opt.optlen);
1588                 sockopt_release_sock(sk);
1589
1590                 if (opt->optlen == 0) {
1591                         len = 0;
1592                         return copy_to_sockptr(optlen, &len, sizeof(int));
1593                 }
1594
1595                 ip_options_undo(opt);
1596
1597                 len = min_t(unsigned int, len, opt->optlen);
1598                 if (copy_to_sockptr(optlen, &len, sizeof(int)))
1599                         return -EFAULT;
1600                 if (copy_to_sockptr(optval, opt->__data, len))
1601                         return -EFAULT;
1602                 return 0;
1603         }
1604         case IP_PKTINFO:
1605                 val = (inet->cmsg_flags & IP_CMSG_PKTINFO) != 0;
1606                 break;
1607         case IP_RECVTTL:
1608                 val = (inet->cmsg_flags & IP_CMSG_TTL) != 0;
1609                 break;
1610         case IP_RECVTOS:
1611                 val = (inet->cmsg_flags & IP_CMSG_TOS) != 0;
1612                 break;
1613         case IP_RECVOPTS:
1614                 val = (inet->cmsg_flags & IP_CMSG_RECVOPTS) != 0;
1615                 break;
1616         case IP_RETOPTS:
1617                 val = (inet->cmsg_flags & IP_CMSG_RETOPTS) != 0;
1618                 break;
1619         case IP_PASSSEC:
1620                 val = (inet->cmsg_flags & IP_CMSG_PASSSEC) != 0;
1621                 break;
1622         case IP_RECVORIGDSTADDR:
1623                 val = (inet->cmsg_flags & IP_CMSG_ORIGDSTADDR) != 0;
1624                 break;
1625         case IP_CHECKSUM:
1626                 val = (inet->cmsg_flags & IP_CMSG_CHECKSUM) != 0;
1627                 break;
1628         case IP_RECVFRAGSIZE:
1629                 val = (inet->cmsg_flags & IP_CMSG_RECVFRAGSIZE) != 0;
1630                 break;
1631         case IP_TOS:
1632                 val = inet->tos;
1633                 break;
1634         case IP_TTL:
1635         {
1636                 struct net *net = sock_net(sk);
1637                 val = (inet->uc_ttl == -1 ?
1638                        READ_ONCE(net->ipv4.sysctl_ip_default_ttl) :
1639                        inet->uc_ttl);
1640                 break;
1641         }
1642         case IP_HDRINCL:
1643                 val = inet->hdrincl;
1644                 break;
1645         case IP_NODEFRAG:
1646                 val = inet->nodefrag;
1647                 break;
1648         case IP_BIND_ADDRESS_NO_PORT:
1649                 val = inet->bind_address_no_port;
1650                 break;
1651         case IP_MTU_DISCOVER:
1652                 val = inet->pmtudisc;
1653                 break;
1654         case IP_MTU:
1655         {
1656                 struct dst_entry *dst;
1657                 val = 0;
1658                 dst = sk_dst_get(sk);
1659                 if (dst) {
1660                         val = dst_mtu(dst);
1661                         dst_release(dst);
1662                 }
1663                 if (!val) {
1664                         sockopt_release_sock(sk);
1665                         return -ENOTCONN;
1666                 }
1667                 break;
1668         }
1669         case IP_RECVERR:
1670                 val = inet->recverr;
1671                 break;
1672         case IP_RECVERR_RFC4884:
1673                 val = inet->recverr_rfc4884;
1674                 break;
1675         case IP_MULTICAST_TTL:
1676                 val = inet->mc_ttl;
1677                 break;
1678         case IP_MULTICAST_LOOP:
1679                 val = inet->mc_loop;
1680                 break;
1681         case IP_UNICAST_IF:
1682                 val = (__force int)htonl((__u32) inet->uc_index);
1683                 break;
1684         case IP_MULTICAST_IF:
1685         {
1686                 struct in_addr addr;
1687                 len = min_t(unsigned int, len, sizeof(struct in_addr));
1688                 addr.s_addr = inet->mc_addr;
1689                 sockopt_release_sock(sk);
1690
1691                 if (copy_to_sockptr(optlen, &len, sizeof(int)))
1692                         return -EFAULT;
1693                 if (copy_to_sockptr(optval, &addr, len))
1694                         return -EFAULT;
1695                 return 0;
1696         }
1697         case IP_MSFILTER:
1698         {
1699                 struct ip_msfilter msf;
1700
1701                 if (len < IP_MSFILTER_SIZE(0)) {
1702                         err = -EINVAL;
1703                         goto out;
1704                 }
1705                 if (copy_from_sockptr(&msf, optval, IP_MSFILTER_SIZE(0))) {
1706                         err = -EFAULT;
1707                         goto out;
1708                 }
1709                 err = ip_mc_msfget(sk, &msf, optval, optlen);
1710                 goto out;
1711         }
1712         case MCAST_MSFILTER:
1713                 if (in_compat_syscall())
1714                         err = compat_ip_get_mcast_msfilter(sk, optval, optlen,
1715                                                            len);
1716                 else
1717                         err = ip_get_mcast_msfilter(sk, optval, optlen, len);
1718                 goto out;
1719         case IP_MULTICAST_ALL:
1720                 val = inet->mc_all;
1721                 break;
1722         case IP_PKTOPTIONS:
1723         {
1724                 struct msghdr msg;
1725
1726                 sockopt_release_sock(sk);
1727
1728                 if (sk->sk_type != SOCK_STREAM)
1729                         return -ENOPROTOOPT;
1730
1731                 if (optval.is_kernel) {
1732                         msg.msg_control_is_user = false;
1733                         msg.msg_control = optval.kernel;
1734                 } else {
1735                         msg.msg_control_is_user = true;
1736                         msg.msg_control_user = optval.user;
1737                 }
1738                 msg.msg_controllen = len;
1739                 msg.msg_flags = in_compat_syscall() ? MSG_CMSG_COMPAT : 0;
1740
1741                 if (inet->cmsg_flags & IP_CMSG_PKTINFO) {
1742                         struct in_pktinfo info;
1743
1744                         info.ipi_addr.s_addr = inet->inet_rcv_saddr;
1745                         info.ipi_spec_dst.s_addr = inet->inet_rcv_saddr;
1746                         info.ipi_ifindex = inet->mc_index;
1747                         put_cmsg(&msg, SOL_IP, IP_PKTINFO, sizeof(info), &info);
1748                 }
1749                 if (inet->cmsg_flags & IP_CMSG_TTL) {
1750                         int hlim = inet->mc_ttl;
1751                         put_cmsg(&msg, SOL_IP, IP_TTL, sizeof(hlim), &hlim);
1752                 }
1753                 if (inet->cmsg_flags & IP_CMSG_TOS) {
1754                         int tos = inet->rcv_tos;
1755                         put_cmsg(&msg, SOL_IP, IP_TOS, sizeof(tos), &tos);
1756                 }
1757                 len -= msg.msg_controllen;
1758                 return copy_to_sockptr(optlen, &len, sizeof(int));
1759         }
1760         case IP_FREEBIND:
1761                 val = inet->freebind;
1762                 break;
1763         case IP_TRANSPARENT:
1764                 val = inet->transparent;
1765                 break;
1766         case IP_MINTTL:
1767                 val = inet->min_ttl;
1768                 break;
1769         case IP_LOCAL_PORT_RANGE:
1770                 val = inet->local_port_range.hi << 16 | inet->local_port_range.lo;
1771                 break;
1772         case IP_PROTOCOL:
1773                 val = inet_sk(sk)->inet_num;
1774                 break;
1775         default:
1776                 sockopt_release_sock(sk);
1777                 return -ENOPROTOOPT;
1778         }
1779         sockopt_release_sock(sk);
1780
1781         if (len < sizeof(int) && len > 0 && val >= 0 && val <= 255) {
1782                 unsigned char ucval = (unsigned char)val;
1783                 len = 1;
1784                 if (copy_to_sockptr(optlen, &len, sizeof(int)))
1785                         return -EFAULT;
1786                 if (copy_to_sockptr(optval, &ucval, 1))
1787                         return -EFAULT;
1788         } else {
1789                 len = min_t(unsigned int, sizeof(int), len);
1790                 if (copy_to_sockptr(optlen, &len, sizeof(int)))
1791                         return -EFAULT;
1792                 if (copy_to_sockptr(optval, &val, len))
1793                         return -EFAULT;
1794         }
1795         return 0;
1796
1797 out:
1798         sockopt_release_sock(sk);
1799         if (needs_rtnl)
1800                 rtnl_unlock();
1801         return err;
1802 }
1803
1804 int ip_getsockopt(struct sock *sk, int level,
1805                   int optname, char __user *optval, int __user *optlen)
1806 {
1807         int err;
1808
1809         err = do_ip_getsockopt(sk, level, optname,
1810                                USER_SOCKPTR(optval), USER_SOCKPTR(optlen));
1811
1812 #if IS_ENABLED(CONFIG_BPFILTER_UMH)
1813         if (optname >= BPFILTER_IPT_SO_GET_INFO &&
1814             optname < BPFILTER_IPT_GET_MAX)
1815                 err = bpfilter_ip_get_sockopt(sk, optname, optval, optlen);
1816 #endif
1817 #ifdef CONFIG_NETFILTER
1818         /* we need to exclude all possible ENOPROTOOPTs except default case */
1819         if (err == -ENOPROTOOPT && optname != IP_PKTOPTIONS &&
1820                         !ip_mroute_opt(optname)) {
1821                 int len;
1822
1823                 if (get_user(len, optlen))
1824                         return -EFAULT;
1825
1826                 err = nf_getsockopt(sk, PF_INET, optname, optval, &len);
1827                 if (err >= 0)
1828                         err = put_user(len, optlen);
1829                 return err;
1830         }
1831 #endif
1832         return err;
1833 }
1834 EXPORT_SYMBOL(ip_getsockopt);