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