net/core/sock.c

   1 /*
   2  * INET         An implementation of the TCP/IP protocol suite for the LINUX
   3  *              operating system.  INET is implemented using the  BSD Socket
   4  *              interface as the means of communication with the user level.
   5  *
   6  *              Generic socket support routines. Memory allocators, socket lock/release
   7  *              handler for protocols to use and generic option handler.
   8  *
   9  *
  10  * Authors:     Ross Biro
  11  *              Fred N. van Kempen, <waltje@uWalt.NL.Mugnet.ORG>
  12  *              Florian La Roche, <flla@stud.uni-sb.de>
  13  *              Alan Cox, <A.Cox@swansea.ac.uk>
  14  *
  15  * Fixes:
  16  *              Alan Cox        :       Numerous verify_area() problems
  17  *              Alan Cox        :       Connecting on a connecting socket
  18  *                                      now returns an error for tcp.
  19  *              Alan Cox        :       sock->protocol is set correctly.
  20  *                                      and is not sometimes left as 0.
  21  *              Alan Cox        :       connect handles icmp errors on a
  22  *                                      connect properly. Unfortunately there
  23  *                                      is a restart syscall nasty there. I
  24  *                                      can't match BSD without hacking the C
  25  *                                      library. Ideas urgently sought!
  26  *              Alan Cox        :       Disallow bind() to addresses that are
  27  *                                      not ours - especially broadcast ones!!
  28  *              Alan Cox        :       Socket 1024 _IS_ ok for users. (fencepost)
  29  *              Alan Cox        :       sock_wfree/sock_rfree don't destroy sockets,
  30  *                                      instead they leave that for the DESTROY timer.
  31  *              Alan Cox        :       Clean up error flag in accept
  32  *              Alan Cox        :       TCP ack handling is buggy, the DESTROY timer
  33  *                                      was buggy. Put a remove_sock() in the handler
  34  *                                      for memory when we hit 0. Also altered the timer
  35  *                                      code. The ACK stuff can wait and needs major
  36  *                                      TCP layer surgery.
  37  *              Alan Cox        :       Fixed TCP ack bug, removed remove sock
  38  *                                      and fixed timer/inet_bh race.
  39  *              Alan Cox        :       Added zapped flag for TCP
  40  *              Alan Cox        :       Move kfree_skb into skbuff.c and tidied up surplus code
  41  *              Alan Cox        :       for new sk_buff allocations wmalloc/rmalloc now call alloc_skb
  42  *              Alan Cox        :       kfree_s calls now are kfree_skbmem so we can track skb resources
  43  *              Alan Cox        :       Supports socket option broadcast now as does udp. Packet and raw need fixing.
  44  *              Alan Cox        :       Added RCVBUF,SNDBUF size setting. It suddenly occurred to me how easy it was so...
  45  *              Rick Sladkey    :       Relaxed UDP rules for matching packets.
  46  *              C.E.Hawkins     :       IFF_PROMISC/SIOCGHWADDR support
  47  *      Pauline Middelink       :       identd support
  48  *              Alan Cox        :       Fixed connect() taking signals I think.
  49  *              Alan Cox        :       SO_LINGER supported
  50  *              Alan Cox        :       Error reporting fixes
  51  *              Anonymous       :       inet_create tidied up (sk->reuse setting)
  52  *              Alan Cox        :       inet sockets don't set sk->type!
  53  *              Alan Cox        :       Split socket option code
  54  *              Alan Cox        :       Callbacks
  55  *              Alan Cox        :       Nagle flag for Charles & Johannes stuff
  56  *              Alex            :       Removed restriction on inet fioctl
  57  *              Alan Cox        :       Splitting INET from NET core
  58  *              Alan Cox        :       Fixed bogus SO_TYPE handling in getsockopt()
  59  *              Adam Caldwell   :       Missing return in SO_DONTROUTE/SO_DEBUG code
  60  *              Alan Cox        :       Split IP from generic code
  61  *              Alan Cox        :       New kfree_skbmem()
  62  *              Alan Cox        :       Make SO_DEBUG superuser only.
  63  *              Alan Cox        :       Allow anyone to clear SO_DEBUG
  64  *                                      (compatibility fix)
  65  *              Alan Cox        :       Added optimistic memory grabbing for AF_UNIX throughput.
  66  *              Alan Cox        :       Allocator for a socket is settable.
  67  *              Alan Cox        :       SO_ERROR includes soft errors.
  68  *              Alan Cox        :       Allow NULL arguments on some SO_ opts
  69  *              Alan Cox        :       Generic socket allocation to make hooks
  70  *                                      easier (suggested by Craig Metz).
  71  *              Michael Pall    :       SO_ERROR returns positive errno again
  72  *              Steve Whitehouse:       Added default destructor to free
  73  *                                      protocol private data.
  74  *              Steve Whitehouse:       Added various other default routines
  75  *                                      common to several socket families.
  76  *              Chris Evans     :       Call suser() check last on F_SETOWN
  77  *              Jay Schulist    :       Added SO_ATTACH_FILTER and SO_DETACH_FILTER.
  78  *              Andi Kleen      :       Add sock_kmalloc()/sock_kfree_s()
  79  *              Andi Kleen      :       Fix write_space callback
  80  *              Chris Evans     :       Security fixes - signedness again
  81  *              Arnaldo C. Melo :       cleanups, use skb_queue_purge
  82  *
  83  * To Fix:
  84  *
  85  *
  86  *              This program is free software; you can redistribute it and/or
  87  *              modify it under the terms of the GNU General Public License
  88  *              as published by the Free Software Foundation; either version
  89  *              2 of the License, or (at your option) any later version.
  90  */
  91
  92 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  93
  94 #include <linux/capability.h>
  95 #include <linux/errno.h>
  96 #include <linux/errqueue.h>
  97 #include <linux/types.h>
  98 #include <linux/socket.h>
  99 #include <linux/in.h>
 100 #include <linux/kernel.h>
 101 #include <linux/module.h>
 102 #include <linux/proc_fs.h>
 103 #include <linux/seq_file.h>
 104 #include <linux/sched.h>
 105 #include <linux/timer.h>
 106 #include <linux/string.h>
 107 #include <linux/sockios.h>
 108 #include <linux/net.h>
 109 #include <linux/mm.h>
 110 #include <linux/slab.h>
 111 #include <linux/interrupt.h>
 112 #include <linux/poll.h>
 113 #include <linux/tcp.h>
 114 #include <linux/init.h>
 115 #include <linux/highmem.h>
 116 #include <linux/user_namespace.h>
 117 #include <linux/static_key.h>
 118 #include <linux/memcontrol.h>
 119 #include <linux/prefetch.h>
 120
 121 #include <asm/uaccess.h>
 122
 123 #include <linux/netdevice.h>
 124 #include <net/protocol.h>
 125 #include <linux/skbuff.h>
 126 #include <net/net_namespace.h>
 127 #include <net/request_sock.h>
 128 #include <net/sock.h>
 129 #include <linux/net_tstamp.h>
 130 #include <net/xfrm.h>
 131 #include <linux/ipsec.h>
 132 #include <net/cls_cgroup.h>
 133 #include <net/netprio_cgroup.h>
 134 #include <linux/sock_diag.h>
 135
 136 #include <linux/filter.h>
 137
 138 #include <trace/events/sock.h>
 139
 140 #ifdef CONFIG_INET
 141 #include <net/tcp.h>
 142 #endif
 143
 144 #include <net/busy_poll.h>
 145
 146 static DEFINE_MUTEX(proto_list_mutex);
 147 static LIST_HEAD(proto_list);
 148
 149 /**
 150  * sk_ns_capable - General socket capability test
 151  * @sk: Socket to use a capability on or through
 152  * @user_ns: The user namespace of the capability to use
 153  * @cap: The capability to use
 154  *
 155  * Test to see if the opener of the socket had when the socket was
 156  * created and the current process has the capability @cap in the user
 157  * namespace @user_ns.
 158  */
 159 bool sk_ns_capable(const struct sock *sk,
 160                    struct user_namespace *user_ns, int cap)
 161 {
 162         return file_ns_capable(sk->sk_socket->file, user_ns, cap) &&
 163                 ns_capable(user_ns, cap);
 164 }
 165 EXPORT_SYMBOL(sk_ns_capable);
 166
 167 /**
 168  * sk_capable - Socket global capability test
 169  * @sk: Socket to use a capability on or through
 170  * @cap: The global capability to use
 171  *
 172  * Test to see if the opener of the socket had when the socket was
 173  * created and the current process has the capability @cap in all user
 174  * namespaces.
 175  */
 176 bool sk_capable(const struct sock *sk, int cap)
 177 {
 178         return sk_ns_capable(sk, &init_user_ns, cap);
 179 }
 180 EXPORT_SYMBOL(sk_capable);
 181
 182 /**
 183  * sk_net_capable - Network namespace socket capability test
 184  * @sk: Socket to use a capability on or through
 185  * @cap: The capability to use
 186  *
 187  * Test to see if the opener of the socket had when the socket was created
 188  * and the current process has the capability @cap over the network namespace
 189  * the socket is a member of.
 190  */
 191 bool sk_net_capable(const struct sock *sk, int cap)
 192 {
 193         return sk_ns_capable(sk, sock_net(sk)->user_ns, cap);
 194 }
 195 EXPORT_SYMBOL(sk_net_capable);
 196
 197
 198 #ifdef CONFIG_MEMCG_KMEM
 199 int mem_cgroup_sockets_init(struct mem_cgroup *memcg, struct cgroup_subsys *ss)
 200 {
 201         struct proto *proto;
 202         int ret = 0;
 203
 204         mutex_lock(&proto_list_mutex);
 205         list_for_each_entry(proto, &proto_list, node) {
 206                 if (proto->init_cgroup) {
 207                         ret = proto->init_cgroup(memcg, ss);
 208                         if (ret)
 209                                 goto out;
 210                 }
 211         }
 212
 213         mutex_unlock(&proto_list_mutex);
 214         return ret;
 215 out:
 216         list_for_each_entry_continue_reverse(proto, &proto_list, node)
 217                 if (proto->destroy_cgroup)
 218                         proto->destroy_cgroup(memcg);
 219         mutex_unlock(&proto_list_mutex);
 220         return ret;
 221 }
 222
 223 void mem_cgroup_sockets_destroy(struct mem_cgroup *memcg)
 224 {
 225         struct proto *proto;
 226
 227         mutex_lock(&proto_list_mutex);
 228         list_for_each_entry_reverse(proto, &proto_list, node)
 229                 if (proto->destroy_cgroup)
 230                         proto->destroy_cgroup(memcg);
 231         mutex_unlock(&proto_list_mutex);
 232 }
 233 #endif
 234
 235 /*
 236  * Each address family might have different locking rules, so we have
 237  * one slock key per address family:
 238  */
 239 static struct lock_class_key af_family_keys[AF_MAX];
 240 static struct lock_class_key af_family_slock_keys[AF_MAX];
 241
 242 #if defined(CONFIG_MEMCG_KMEM)
 243 struct static_key memcg_socket_limit_enabled;
 244 EXPORT_SYMBOL(memcg_socket_limit_enabled);
 245 #endif
 246
 247 /*
 248  * Make lock validator output more readable. (we pre-construct these
 249  * strings build-time, so that runtime initialization of socket
 250  * locks is fast):
 251  */
 252 static const char *const af_family_key_strings[AF_MAX+1] = {
 253   "sk_lock-AF_UNSPEC", "sk_lock-AF_UNIX"     , "sk_lock-AF_INET"     ,
 254   "sk_lock-AF_AX25"  , "sk_lock-AF_IPX"      , "sk_lock-AF_APPLETALK",
 255   "sk_lock-AF_NETROM", "sk_lock-AF_BRIDGE"   , "sk_lock-AF_ATMPVC"   ,
 256   "sk_lock-AF_X25"   , "sk_lock-AF_INET6"    , "sk_lock-AF_ROSE"     ,
 257   "sk_lock-AF_DECnet", "sk_lock-AF_NETBEUI"  , "sk_lock-AF_SECURITY" ,
 258   "sk_lock-AF_KEY"   , "sk_lock-AF_NETLINK"  , "sk_lock-AF_PACKET"   ,
 259   "sk_lock-AF_ASH"   , "sk_lock-AF_ECONET"   , "sk_lock-AF_ATMSVC"   ,
 260   "sk_lock-AF_RDS"   , "sk_lock-AF_SNA"      , "sk_lock-AF_IRDA"     ,
 261   "sk_lock-AF_PPPOX" , "sk_lock-AF_WANPIPE"  , "sk_lock-AF_LLC"      ,
 262   "sk_lock-27"       , "sk_lock-28"          , "sk_lock-AF_CAN"      ,
 263   "sk_lock-AF_TIPC"  , "sk_lock-AF_BLUETOOTH", "sk_lock-IUCV"        ,
 264   "sk_lock-AF_RXRPC" , "sk_lock-AF_ISDN"     , "sk_lock-AF_PHONET"   ,
 265   "sk_lock-AF_IEEE802154", "sk_lock-AF_CAIF" , "sk_lock-AF_ALG"      ,
 266   "sk_lock-AF_NFC"   , "sk_lock-AF_VSOCK"    , "sk_lock-AF_MAX"
 267 };
 268 static const char *const af_family_slock_key_strings[AF_MAX+1] = {
 269   "slock-AF_UNSPEC", "slock-AF_UNIX"     , "slock-AF_INET"     ,
 270   "slock-AF_AX25"  , "slock-AF_IPX"      , "slock-AF_APPLETALK",
 271   "slock-AF_NETROM", "slock-AF_BRIDGE"   , "slock-AF_ATMPVC"   ,
 272   "slock-AF_X25"   , "slock-AF_INET6"    , "slock-AF_ROSE"     ,
 273   "slock-AF_DECnet", "slock-AF_NETBEUI"  , "slock-AF_SECURITY" ,
 274   "slock-AF_KEY"   , "slock-AF_NETLINK"  , "slock-AF_PACKET"   ,
 275   "slock-AF_ASH"   , "slock-AF_ECONET"   , "slock-AF_ATMSVC"   ,
 276   "slock-AF_RDS"   , "slock-AF_SNA"      , "slock-AF_IRDA"     ,
 277   "slock-AF_PPPOX" , "slock-AF_WANPIPE"  , "slock-AF_LLC"      ,
 278   "slock-27"       , "slock-28"          , "slock-AF_CAN"      ,
 279   "slock-AF_TIPC"  , "slock-AF_BLUETOOTH", "slock-AF_IUCV"     ,
 280   "slock-AF_RXRPC" , "slock-AF_ISDN"     , "slock-AF_PHONET"   ,
 281   "slock-AF_IEEE802154", "slock-AF_CAIF" , "slock-AF_ALG"      ,
 282   "slock-AF_NFC"   , "slock-AF_VSOCK"    ,"slock-AF_MAX"
 283 };
 284 static const char *const af_family_clock_key_strings[AF_MAX+1] = {
 285   "clock-AF_UNSPEC", "clock-AF_UNIX"     , "clock-AF_INET"     ,
 286   "clock-AF_AX25"  , "clock-AF_IPX"      , "clock-AF_APPLETALK",
 287   "clock-AF_NETROM", "clock-AF_BRIDGE"   , "clock-AF_ATMPVC"   ,
 288   "clock-AF_X25"   , "clock-AF_INET6"    , "clock-AF_ROSE"     ,
 289   "clock-AF_DECnet", "clock-AF_NETBEUI"  , "clock-AF_SECURITY" ,
 290   "clock-AF_KEY"   , "clock-AF_NETLINK"  , "clock-AF_PACKET"   ,
 291   "clock-AF_ASH"   , "clock-AF_ECONET"   , "clock-AF_ATMSVC"   ,
 292   "clock-AF_RDS"   , "clock-AF_SNA"      , "clock-AF_IRDA"     ,
 293   "clock-AF_PPPOX" , "clock-AF_WANPIPE"  , "clock-AF_LLC"      ,
 294   "clock-27"       , "clock-28"          , "clock-AF_CAN"      ,
 295   "clock-AF_TIPC"  , "clock-AF_BLUETOOTH", "clock-AF_IUCV"     ,
 296   "clock-AF_RXRPC" , "clock-AF_ISDN"     , "clock-AF_PHONET"   ,
 297   "clock-AF_IEEE802154", "clock-AF_CAIF" , "clock-AF_ALG"      ,
 298   "clock-AF_NFC"   , "clock-AF_VSOCK"    , "clock-AF_MAX"
 299 };
 300
 301 /*
 302  * sk_callback_lock locking rules are per-address-family,
 303  * so split the lock classes by using a per-AF key:
 304  */
 305 static struct lock_class_key af_callback_keys[AF_MAX];
 306
 307 /* Take into consideration the size of the struct sk_buff overhead in the
 308  * determination of these values, since that is non-constant across
 309  * platforms.  This makes socket queueing behavior and performance
 310  * not depend upon such differences.
 311  */
 312 #define _SK_MEM_PACKETS         256
 313 #define _SK_MEM_OVERHEAD        SKB_TRUESIZE(256)
 314 #define SK_WMEM_MAX             (_SK_MEM_OVERHEAD * _SK_MEM_PACKETS)
 315 #define SK_RMEM_MAX             (_SK_MEM_OVERHEAD * _SK_MEM_PACKETS)
 316
 317 /* Run time adjustable parameters. */
 318 __u32 sysctl_wmem_max __read_mostly = SK_WMEM_MAX;
 319 EXPORT_SYMBOL(sysctl_wmem_max);
 320 __u32 sysctl_rmem_max __read_mostly = SK_RMEM_MAX;
 321 EXPORT_SYMBOL(sysctl_rmem_max);
 322 __u32 sysctl_wmem_default __read_mostly = SK_WMEM_MAX;
 323 __u32 sysctl_rmem_default __read_mostly = SK_RMEM_MAX;
 324
 325 /* Maximal space eaten by iovec or ancillary data plus some space */
 326 int sysctl_optmem_max __read_mostly = sizeof(unsigned long)*(2*UIO_MAXIOV+512);
 327 EXPORT_SYMBOL(sysctl_optmem_max);
 328
 329 int sysctl_tstamp_allow_data __read_mostly = 1;
 330
 331 struct static_key memalloc_socks = STATIC_KEY_INIT_FALSE;
 332 EXPORT_SYMBOL_GPL(memalloc_socks);
 333
 334 /**
 335  * sk_set_memalloc - sets %SOCK_MEMALLOC
 336  * @sk: socket to set it on
 337  *
 338  * Set %SOCK_MEMALLOC on a socket for access to emergency reserves.
 339  * It's the responsibility of the admin to adjust min_free_kbytes
 340  * to meet the requirements
 341  */
 342 void sk_set_memalloc(struct sock *sk)
 343 {
 344         sock_set_flag(sk, SOCK_MEMALLOC);
 345         sk->sk_allocation |= __GFP_MEMALLOC;
 346         static_key_slow_inc(&memalloc_socks);
 347 }
 348 EXPORT_SYMBOL_GPL(sk_set_memalloc);
 349
 350 void sk_clear_memalloc(struct sock *sk)
 351 {
 352         sock_reset_flag(sk, SOCK_MEMALLOC);
 353         sk->sk_allocation &= ~__GFP_MEMALLOC;
 354         static_key_slow_dec(&memalloc_socks);
 355
 356         /*
 357          * SOCK_MEMALLOC is allowed to ignore rmem limits to ensure forward
 358          * progress of swapping. SOCK_MEMALLOC may be cleared while
 359          * it has rmem allocations due to the last swapfile being deactivated
 360          * but there is a risk that the socket is unusable due to exceeding
 361          * the rmem limits. Reclaim the reserves and obey rmem limits again.
 362          */
 363         sk_mem_reclaim(sk);
 364 }
 365 EXPORT_SYMBOL_GPL(sk_clear_memalloc);
 366
 367 int __sk_backlog_rcv(struct sock *sk, struct sk_buff *skb)
 368 {
 369         int ret;
 370         unsigned long pflags = current->flags;
 371
 372         /* these should have been dropped before queueing */
 373         BUG_ON(!sock_flag(sk, SOCK_MEMALLOC));
 374
 375         current->flags |= PF_MEMALLOC;
 376         ret = sk->sk_backlog_rcv(sk, skb);
 377         tsk_restore_flags(current, pflags, PF_MEMALLOC);
 378
 379         return ret;
 380 }
 381 EXPORT_SYMBOL(__sk_backlog_rcv);
 382
 383 static int sock_set_timeout(long *timeo_p, char __user *optval, int optlen)
 384 {
 385         struct timeval tv;
 386
 387         if (optlen < sizeof(tv))
 388                 return -EINVAL;
 389         if (copy_from_user(&tv, optval, sizeof(tv)))
 390                 return -EFAULT;
 391         if (tv.tv_usec < 0 || tv.tv_usec >= USEC_PER_SEC)
 392                 return -EDOM;
 393
 394         if (tv.tv_sec < 0) {
 395                 static int warned __read_mostly;
 396
 397                 *timeo_p = 0;
 398                 if (warned < 10 && net_ratelimit()) {
 399                         warned++;
 400                         pr_info("%s: `%s' (pid %d) tries to set negative timeout\n",
 401                                 __func__, current->comm, task_pid_nr(current));
 402                 }
 403                 return 0;
 404         }
 405         *timeo_p = MAX_SCHEDULE_TIMEOUT;
 406         if (tv.tv_sec == 0 && tv.tv_usec == 0)
 407                 return 0;
 408         if (tv.tv_sec < (MAX_SCHEDULE_TIMEOUT/HZ - 1))
 409                 *timeo_p = tv.tv_sec*HZ + (tv.tv_usec+(1000000/HZ-1))/(1000000/HZ);
 410         return 0;
 411 }
 412
 413 static void sock_warn_obsolete_bsdism(const char *name)
 414 {
 415         static int warned;
 416         static char warncomm[TASK_COMM_LEN];
 417         if (strcmp(warncomm, current->comm) && warned < 5) {
 418                 strcpy(warncomm,  current->comm);
 419                 pr_warn("process `%s' is using obsolete %s SO_BSDCOMPAT\n",
 420                         warncomm, name);
 421                 warned++;
 422         }
 423 }
 424
 425 static bool sock_needs_netstamp(const struct sock *sk)
 426 {
 427         switch (sk->sk_family) {
 428         case AF_UNSPEC:
 429         case AF_UNIX:
 430                 return false;
 431         default:
 432                 return true;
 433         }
 434 }
 435
 436 static void sock_disable_timestamp(struct sock *sk, unsigned long flags)
 437 {
 438         if (sk->sk_flags & flags) {
 439                 sk->sk_flags &= ~flags;
 440                 if (sock_needs_netstamp(sk) &&
 441                     !(sk->sk_flags & SK_FLAGS_TIMESTAMP))
 442                         net_disable_timestamp();
 443         }
 444 }
 445
 446
 447 int sock_queue_rcv_skb(struct sock *sk, struct sk_buff *skb)
 448 {
 449         int err;
 450         unsigned long flags;
 451         struct sk_buff_head *list = &sk->sk_receive_queue;
 452
 453         if (atomic_read(&sk->sk_rmem_alloc) >= sk->sk_rcvbuf) {
 454                 atomic_inc(&sk->sk_drops);
 455                 trace_sock_rcvqueue_full(sk, skb);
 456                 return -ENOMEM;
 457         }
 458
 459         err = sk_filter(sk, skb);
 460         if (err)
 461                 return err;
 462
 463         if (!sk_rmem_schedule(sk, skb, skb->truesize)) {
 464                 atomic_inc(&sk->sk_drops);
 465                 return -ENOBUFS;
 466         }
 467
 468         skb->dev = NULL;
 469         skb_set_owner_r(skb, sk);
 470
 471         /* we escape from rcu protected region, make sure we dont leak
 472          * a norefcounted dst
 473          */
 474         skb_dst_force(skb);
 475
 476         spin_lock_irqsave(&list->lock, flags);
 477         sock_skb_set_dropcount(sk, skb);
 478         __skb_queue_tail(list, skb);
 479         spin_unlock_irqrestore(&list->lock, flags);
 480
 481         if (!sock_flag(sk, SOCK_DEAD))
 482                 sk->sk_data_ready(sk);
 483         return 0;
 484 }
 485 EXPORT_SYMBOL(sock_queue_rcv_skb);
 486
 487 int __sk_receive_skb(struct sock *sk, struct sk_buff *skb,
 488                      const int nested, unsigned int trim_cap)
 489 {
 490         int rc = NET_RX_SUCCESS;
 491
 492         if (sk_filter_trim_cap(sk, skb, trim_cap))
 493                 goto discard_and_relse;
 494
 495         skb->dev = NULL;
 496
 497         if (sk_rcvqueues_full(sk, sk->sk_rcvbuf)) {
 498                 atomic_inc(&sk->sk_drops);
 499                 goto discard_and_relse;
 500         }
 501         if (nested)
 502                 bh_lock_sock_nested(sk);
 503         else
 504                 bh_lock_sock(sk);
 505         if (!sock_owned_by_user(sk)) {
 506                 /*
 507                  * trylock + unlock semantics:
 508                  */
 509                 mutex_acquire(&sk->sk_lock.dep_map, 0, 1, _RET_IP_);
 510
 511                 rc = sk_backlog_rcv(sk, skb);
 512
 513                 mutex_release(&sk->sk_lock.dep_map, 1, _RET_IP_);
 514         } else if (sk_add_backlog(sk, skb, sk->sk_rcvbuf)) {
 515                 bh_unlock_sock(sk);
 516                 atomic_inc(&sk->sk_drops);
 517                 goto discard_and_relse;
 518         }
 519
 520         bh_unlock_sock(sk);
 521 out:
 522         sock_put(sk);
 523         return rc;
 524 discard_and_relse:
 525         kfree_skb(skb);
 526         goto out;
 527 }
 528 EXPORT_SYMBOL(__sk_receive_skb);
 529
 530 struct dst_entry *__sk_dst_check(struct sock *sk, u32 cookie)
 531 {
 532         struct dst_entry *dst = __sk_dst_get(sk);
 533
 534         if (dst && dst->obsolete && dst->ops->check(dst, cookie) == NULL) {
 535                 sk_tx_queue_clear(sk);
 536                 RCU_INIT_POINTER(sk->sk_dst_cache, NULL);
 537                 dst_release(dst);
 538                 return NULL;
 539         }
 540
 541         return dst;
 542 }
 543 EXPORT_SYMBOL(__sk_dst_check);
 544
 545 struct dst_entry *sk_dst_check(struct sock *sk, u32 cookie)
 546 {
 547         struct dst_entry *dst = sk_dst_get(sk);
 548
 549         if (dst && dst->obsolete && dst->ops->check(dst, cookie) == NULL) {
 550                 sk_dst_reset(sk);
 551                 dst_release(dst);
 552                 return NULL;
 553         }
 554
 555         return dst;
 556 }
 557 EXPORT_SYMBOL(sk_dst_check);
 558
 559 static int sock_setbindtodevice(struct sock *sk, char __user *optval,
 560                                 int optlen)
 561 {
 562         int ret = -ENOPROTOOPT;
 563 #ifdef CONFIG_NETDEVICES
 564         struct net *net = sock_net(sk);
 565         char devname[IFNAMSIZ];
 566         int index;
 567
 568         /* Sorry... */
 569         ret = -EPERM;
 570         if (!ns_capable(net->user_ns, CAP_NET_RAW))
 571                 goto out;
 572
 573         ret = -EINVAL;
 574         if (optlen < 0)
 575                 goto out;
 576
 577         /* Bind this socket to a particular device like "eth0",
 578          * as specified in the passed interface name. If the
 579          * name is "" or the option length is zero the socket
 580          * is not bound.
 581          */
 582         if (optlen > IFNAMSIZ - 1)
 583                 optlen = IFNAMSIZ - 1;
 584         memset(devname, 0, sizeof(devname));
 585
 586         ret = -EFAULT;
 587         if (copy_from_user(devname, optval, optlen))
 588                 goto out;
 589
 590         index = 0;
 591         if (devname[0] != '\0') {
 592                 struct net_device *dev;
 593
 594                 rcu_read_lock();
 595                 dev = dev_get_by_name_rcu(net, devname);
 596                 if (dev)
 597                         index = dev->ifindex;
 598                 rcu_read_unlock();
 599                 ret = -ENODEV;
 600                 if (!dev)
 601                         goto out;
 602         }
 603
 604         lock_sock(sk);
 605         sk->sk_bound_dev_if = index;
 606         sk_dst_reset(sk);
 607         release_sock(sk);
 608
 609         ret = 0;
 610
 611 out:
 612 #endif
 613
 614         return ret;
 615 }
 616
 617 static int sock_getbindtodevice(struct sock *sk, char __user *optval,
 618                                 int __user *optlen, int len)
 619 {
 620         int ret = -ENOPROTOOPT;
 621 #ifdef CONFIG_NETDEVICES
 622         struct net *net = sock_net(sk);
 623         char devname[IFNAMSIZ];
 624
 625         if (sk->sk_bound_dev_if == 0) {
 626                 len = 0;
 627                 goto zero;
 628         }
 629
 630         ret = -EINVAL;
 631         if (len < IFNAMSIZ)
 632                 goto out;
 633
 634         ret = netdev_get_name(net, devname, sk->sk_bound_dev_if);
 635         if (ret)
 636                 goto out;
 637
 638         len = strlen(devname) + 1;
 639
 640         ret = -EFAULT;
 641         if (copy_to_user(optval, devname, len))
 642                 goto out;
 643
 644 zero:
 645         ret = -EFAULT;
 646         if (put_user(len, optlen))
 647                 goto out;
 648
 649         ret = 0;
 650
 651 out:
 652 #endif
 653
 654         return ret;
 655 }
 656
 657 static inline void sock_valbool_flag(struct sock *sk, int bit, int valbool)
 658 {
 659         if (valbool)
 660                 sock_set_flag(sk, bit);
 661         else
 662                 sock_reset_flag(sk, bit);
 663 }
 664
 665 bool sk_mc_loop(struct sock *sk)
 666 {
 667         if (dev_recursion_level())
 668                 return false;
 669         if (!sk)
 670                 return true;
 671         switch (sk->sk_family) {
 672         case AF_INET:
 673                 return inet_sk(sk)->mc_loop;
 674 #if IS_ENABLED(CONFIG_IPV6)
 675         case AF_INET6:
 676                 return inet6_sk(sk)->mc_loop;
 677 #endif
 678         }
 679         WARN_ON(1);
 680         return true;
 681 }
 682 EXPORT_SYMBOL(sk_mc_loop);
 683
 684 /*
 685  *      This is meant for all protocols to use and covers goings on
 686  *      at the socket level. Everything here is generic.
 687  */
 688
 689 int sock_setsockopt(struct socket *sock, int level, int optname,
 690                     char __user *optval, unsigned int optlen)
 691 {
 692         struct sock *sk = sock->sk;
 693         int val;
 694         int valbool;
 695         struct linger ling;
 696         int ret = 0;
 697
 698         /*
 699          *      Options without arguments
 700          */
 701
 702         if (optname == SO_BINDTODEVICE)
 703                 return sock_setbindtodevice(sk, optval, optlen);
 704
 705         if (optlen < sizeof(int))
 706                 return -EINVAL;
 707
 708         if (get_user(val, (int __user *)optval))
 709                 return -EFAULT;
 710
 711         valbool = val ? 1 : 0;
 712
 713         lock_sock(sk);
 714
 715         switch (optname) {
 716         case SO_DEBUG:
 717                 if (val && !capable(CAP_NET_ADMIN))
 718                         ret = -EACCES;
 719                 else
 720                         sock_valbool_flag(sk, SOCK_DBG, valbool);
 721                 break;
 722         case SO_REUSEADDR:
 723                 sk->sk_reuse = (valbool ? SK_CAN_REUSE : SK_NO_REUSE);
 724                 break;
 725         case SO_REUSEPORT:
 726                 sk->sk_reuseport = valbool;
 727                 break;
 728         case SO_TYPE:
 729         case SO_PROTOCOL:
 730         case SO_DOMAIN:
 731         case SO_ERROR:
 732                 ret = -ENOPROTOOPT;
 733                 break;
 734         case SO_DONTROUTE:
 735                 sock_valbool_flag(sk, SOCK_LOCALROUTE, valbool);
 736                 sk_dst_reset(sk);
 737                 break;
 738         case SO_BROADCAST:
 739                 sock_valbool_flag(sk, SOCK_BROADCAST, valbool);
 740                 break;
 741         case SO_SNDBUF:
 742                 /* Don't error on this BSD doesn't and if you think
 743                  * about it this is right. Otherwise apps have to
 744                  * play 'guess the biggest size' games. RCVBUF/SNDBUF
 745                  * are treated in BSD as hints
 746                  */
 747                 val = min_t(u32, val, sysctl_wmem_max);
 748 set_sndbuf:
 749                 sk->sk_userlocks |= SOCK_SNDBUF_LOCK;
 750                 sk->sk_sndbuf = max_t(int, val * 2, SOCK_MIN_SNDBUF);
 751                 /* Wake up sending tasks if we upped the value. */
 752                 sk->sk_write_space(sk);
 753                 break;
 754
 755         case SO_SNDBUFFORCE:
 756                 if (!capable(CAP_NET_ADMIN)) {
 757                         ret = -EPERM;
 758                         break;
 759                 }
 760                 goto set_sndbuf;
 761
 762         case SO_RCVBUF:
 763                 /* Don't error on this BSD doesn't and if you think
 764                  * about it this is right. Otherwise apps have to
 765                  * play 'guess the biggest size' games. RCVBUF/SNDBUF
 766                  * are treated in BSD as hints
 767                  */
 768                 val = min_t(u32, val, sysctl_rmem_max);
 769 set_rcvbuf:
 770                 sk->sk_userlocks |= SOCK_RCVBUF_LOCK;
 771                 /*
 772                  * We double it on the way in to account for
 773                  * "struct sk_buff" etc. overhead.   Applications
 774                  * assume that the SO_RCVBUF setting they make will
 775                  * allow that much actual data to be received on that
 776                  * socket.
 777                  *
 778                  * Applications are unaware that "struct sk_buff" and
 779                  * other overheads allocate from the receive buffer
 780                  * during socket buffer allocation.
 781                  *
 782                  * And after considering the possible alternatives,
 783                  * returning the value we actually used in getsockopt
 784                  * is the most desirable behavior.
 785                  */
 786                 sk->sk_rcvbuf = max_t(int, val * 2, SOCK_MIN_RCVBUF);
 787                 break;
 788
 789         case SO_RCVBUFFORCE:
 790                 if (!capable(CAP_NET_ADMIN)) {
 791                         ret = -EPERM;
 792                         break;
 793                 }
 794                 goto set_rcvbuf;
 795
 796         case SO_KEEPALIVE:
 797 #ifdef CONFIG_INET
 798                 if (sk->sk_protocol == IPPROTO_TCP &&
 799                     sk->sk_type == SOCK_STREAM)
 800                         tcp_set_keepalive(sk, valbool);
 801 #endif
 802                 sock_valbool_flag(sk, SOCK_KEEPOPEN, valbool);
 803                 break;
 804
 805         case SO_OOBINLINE:
 806                 sock_valbool_flag(sk, SOCK_URGINLINE, valbool);
 807                 break;
 808
 809         case SO_NO_CHECK:
 810                 sk->sk_no_check_tx = valbool;
 811                 break;
 812
 813         case SO_PRIORITY:
 814                 if ((val >= 0 && val <= 6) ||
 815                     ns_capable(sock_net(sk)->user_ns, CAP_NET_ADMIN))
 816                         sk->sk_priority = val;
 817                 else
 818                         ret = -EPERM;
 819                 break;
 820
 821         case SO_LINGER:
 822                 if (optlen < sizeof(ling)) {
 823                         ret = -EINVAL;  /* 1003.1g */
 824                         break;
 825                 }
 826                 if (copy_from_user(&ling, optval, sizeof(ling))) {
 827                         ret = -EFAULT;
 828                         break;
 829                 }
 830                 if (!ling.l_onoff)
 831                         sock_reset_flag(sk, SOCK_LINGER);
 832                 else {
 833 #if (BITS_PER_LONG == 32)
 834                         if ((unsigned int)ling.l_linger >= MAX_SCHEDULE_TIMEOUT/HZ)
 835                                 sk->sk_lingertime = MAX_SCHEDULE_TIMEOUT;
 836                         else
 837 #endif
 838                                 sk->sk_lingertime = (unsigned int)ling.l_linger * HZ;
 839                         sock_set_flag(sk, SOCK_LINGER);
 840                 }
 841                 break;
 842
 843         case SO_BSDCOMPAT:
 844                 sock_warn_obsolete_bsdism("setsockopt");
 845                 break;
 846
 847         case SO_PASSCRED:
 848                 if (valbool)
 849                         set_bit(SOCK_PASSCRED, &sock->flags);
 850                 else
 851                         clear_bit(SOCK_PASSCRED, &sock->flags);
 852                 break;
 853
 854         case SO_TIMESTAMP:
 855         case SO_TIMESTAMPNS:
 856                 if (valbool)  {
 857                         if (optname == SO_TIMESTAMP)
 858                                 sock_reset_flag(sk, SOCK_RCVTSTAMPNS);
 859                         else
 860                                 sock_set_flag(sk, SOCK_RCVTSTAMPNS);
 861                         sock_set_flag(sk, SOCK_RCVTSTAMP);
 862                         sock_enable_timestamp(sk, SOCK_TIMESTAMP);
 863                 } else {
 864                         sock_reset_flag(sk, SOCK_RCVTSTAMP);
 865                         sock_reset_flag(sk, SOCK_RCVTSTAMPNS);
 866                 }
 867                 break;
 868
 869         case SO_TIMESTAMPING:
 870                 if (val & ~SOF_TIMESTAMPING_MASK) {
 871                         ret = -EINVAL;
 872                         break;
 873                 }
 874
 875                 if (val & SOF_TIMESTAMPING_OPT_ID &&
 876                     !(sk->sk_tsflags & SOF_TIMESTAMPING_OPT_ID)) {
 877                         if (sk->sk_protocol == IPPROTO_TCP &&
 878                             sk->sk_type == SOCK_STREAM) {
 879                                 if (sk->sk_state != TCP_ESTABLISHED) {
 880                                         ret = -EINVAL;
 881                                         break;
 882                                 }
 883                                 sk->sk_tskey = tcp_sk(sk)->snd_una;
 884                         } else {
 885                                 sk->sk_tskey = 0;
 886                         }
 887                 }
 888                 sk->sk_tsflags = val;
 889                 if (val & SOF_TIMESTAMPING_RX_SOFTWARE)
 890                         sock_enable_timestamp(sk,
 891                                               SOCK_TIMESTAMPING_RX_SOFTWARE);
 892                 else
 893                         sock_disable_timestamp(sk,
 894                                                (1UL << SOCK_TIMESTAMPING_RX_SOFTWARE));
 895                 break;
 896
 897         case SO_RCVLOWAT:
 898                 if (val < 0)
 899                         val = INT_MAX;
 900                 sk->sk_rcvlowat = val ? : 1;
 901                 break;
 902
 903         case SO_RCVTIMEO:
 904                 ret = sock_set_timeout(&sk->sk_rcvtimeo, optval, optlen);
 905                 break;
 906
 907         case SO_SNDTIMEO:
 908                 ret = sock_set_timeout(&sk->sk_sndtimeo, optval, optlen);
 909                 break;
 910
 911         case SO_ATTACH_FILTER:
 912                 ret = -EINVAL;
 913                 if (optlen == sizeof(struct sock_fprog)) {
 914                         struct sock_fprog fprog;
 915
 916                         ret = -EFAULT;
 917                         if (copy_from_user(&fprog, optval, sizeof(fprog)))
 918                                 break;
 919
 920                         ret = sk_attach_filter(&fprog, sk);
 921                 }
 922                 break;
 923
 924         case SO_ATTACH_BPF:
 925                 ret = -EINVAL;
 926                 if (optlen == sizeof(u32)) {
 927                         u32 ufd;
 928
 929                         ret = -EFAULT;
 930                         if (copy_from_user(&ufd, optval, sizeof(ufd)))
 931                                 break;
 932
 933                         ret = sk_attach_bpf(ufd, sk);
 934                 }
 935                 break;
 936
 937         case SO_DETACH_FILTER:
 938                 ret = sk_detach_filter(sk);
 939                 break;
 940
 941         case SO_LOCK_FILTER:
 942                 if (sock_flag(sk, SOCK_FILTER_LOCKED) && !valbool)
 943                         ret = -EPERM;
 944                 else
 945                         sock_valbool_flag(sk, SOCK_FILTER_LOCKED, valbool);
 946                 break;
 947
 948         case SO_PASSSEC:
 949                 if (valbool)
 950                         set_bit(SOCK_PASSSEC, &sock->flags);
 951                 else
 952                         clear_bit(SOCK_PASSSEC, &sock->flags);
 953                 break;
 954         case SO_MARK:
 955                 if (!ns_capable(sock_net(sk)->user_ns, CAP_NET_ADMIN))
 956                         ret = -EPERM;
 957                 else
 958                         sk->sk_mark = val;
 959                 break;
 960
 961         case SO_RXQ_OVFL:
 962                 sock_valbool_flag(sk, SOCK_RXQ_OVFL, valbool);
 963                 break;
 964
 965         case SO_WIFI_STATUS:
 966                 sock_valbool_flag(sk, SOCK_WIFI_STATUS, valbool);
 967                 break;
 968
 969         case SO_PEEK_OFF:
 970                 if (sock->ops->set_peek_off)
 971                         ret = sock->ops->set_peek_off(sk, val);
 972                 else
 973                         ret = -EOPNOTSUPP;
 974                 break;
 975
 976         case SO_NOFCS:
 977                 sock_valbool_flag(sk, SOCK_NOFCS, valbool);
 978                 break;
 979
 980         case SO_SELECT_ERR_QUEUE:
 981                 sock_valbool_flag(sk, SOCK_SELECT_ERR_QUEUE, valbool);
 982                 break;
 983
 984 #ifdef CONFIG_NET_RX_BUSY_POLL
 985         case SO_BUSY_POLL:
 986                 /* allow unprivileged users to decrease the value */
 987                 if ((val > sk->sk_ll_usec) && !capable(CAP_NET_ADMIN))
 988                         ret = -EPERM;
 989                 else {
 990                         if (val < 0)
 991                                 ret = -EINVAL;
 992                         else
 993                                 sk->sk_ll_usec = val;
 994                 }
 995                 break;
 996 #endif
 997
 998         case SO_MAX_PACING_RATE:
 999                 sk->sk_max_pacing_rate = val;
1000                 sk->sk_pacing_rate = min(sk->sk_pacing_rate,
1001                                          sk->sk_max_pacing_rate);
1002                 break;
1003
1004         case SO_INCOMING_CPU:
1005                 sk->sk_incoming_cpu = val;
1006                 break;
1007
1008         default:
1009                 ret = -ENOPROTOOPT;
1010                 break;
1011         }
1012         release_sock(sk);
1013         return ret;
1014 }
1015 EXPORT_SYMBOL(sock_setsockopt);
1016
1017
1018 static void cred_to_ucred(struct pid *pid, const struct cred *cred,
1019                           struct ucred *ucred)
1020 {
1021         ucred->pid = pid_vnr(pid);
1022         ucred->uid = ucred->gid = -1;
1023         if (cred) {
1024                 struct user_namespace *current_ns = current_user_ns();
1025
1026                 ucred->uid = from_kuid_munged(current_ns, cred->euid);
1027                 ucred->gid = from_kgid_munged(current_ns, cred->egid);
1028         }
1029 }
1030
1031 int sock_getsockopt(struct socket *sock, int level, int optname,
1032                     char __user *optval, int __user *optlen)
1033 {
1034         struct sock *sk = sock->sk;
1035
1036         union {
1037                 int val;
1038                 struct linger ling;
1039                 struct timeval tm;
1040         } v;
1041
1042         int lv = sizeof(int);
1043         int len;
1044
1045         if (get_user(len, optlen))
1046                 return -EFAULT;
1047         if (len < 0)
1048                 return -EINVAL;
1049
1050         memset(&v, 0, sizeof(v));
1051
1052         switch (optname) {
1053         case SO_DEBUG:
1054                 v.val = sock_flag(sk, SOCK_DBG);
1055                 break;
1056
1057         case SO_DONTROUTE:
1058                 v.val = sock_flag(sk, SOCK_LOCALROUTE);
1059                 break;
1060
1061         case SO_BROADCAST:
1062                 v.val = sock_flag(sk, SOCK_BROADCAST);
1063                 break;
1064
1065         case SO_SNDBUF:
1066                 v.val = sk->sk_sndbuf;
1067                 break;
1068
1069         case SO_RCVBUF:
1070                 v.val = sk->sk_rcvbuf;
1071                 break;
1072
1073         case SO_REUSEADDR:
1074                 v.val = sk->sk_reuse;
1075                 break;
1076
1077         case SO_REUSEPORT:
1078                 v.val = sk->sk_reuseport;
1079                 break;
1080
1081         case SO_KEEPALIVE:
1082                 v.val = sock_flag(sk, SOCK_KEEPOPEN);
1083                 break;
1084
1085         case SO_TYPE:
1086                 v.val = sk->sk_type;
1087                 break;
1088
1089         case SO_PROTOCOL:
1090                 v.val = sk->sk_protocol;
1091                 break;
1092
1093         case SO_DOMAIN:
1094                 v.val = sk->sk_family;
1095                 break;
1096
1097         case SO_ERROR:
1098                 v.val = -sock_error(sk);
1099                 if (v.val == 0)
1100                         v.val = xchg(&sk->sk_err_soft, 0);
1101                 break;
1102
1103         case SO_OOBINLINE:
1104                 v.val = sock_flag(sk, SOCK_URGINLINE);
1105                 break;
1106
1107         case SO_NO_CHECK:
1108                 v.val = sk->sk_no_check_tx;
1109                 break;
1110
1111         case SO_PRIORITY:
1112                 v.val = sk->sk_priority;
1113                 break;
1114
1115         case SO_LINGER:
1116                 lv              = sizeof(v.ling);
1117                 v.ling.l_onoff  = sock_flag(sk, SOCK_LINGER);
1118                 v.ling.l_linger = sk->sk_lingertime / HZ;
1119                 break;
1120
1121         case SO_BSDCOMPAT:
1122                 sock_warn_obsolete_bsdism("getsockopt");
1123                 break;
1124
1125         case SO_TIMESTAMP:
1126                 v.val = sock_flag(sk, SOCK_RCVTSTAMP) &&
1127                                 !sock_flag(sk, SOCK_RCVTSTAMPNS);
1128                 break;
1129
1130         case SO_TIMESTAMPNS:
1131                 v.val = sock_flag(sk, SOCK_RCVTSTAMPNS);
1132                 break;
1133
1134         case SO_TIMESTAMPING:
1135                 v.val = sk->sk_tsflags;
1136                 break;
1137
1138         case SO_RCVTIMEO:
1139                 lv = sizeof(struct timeval);
1140                 if (sk->sk_rcvtimeo == MAX_SCHEDULE_TIMEOUT) {
1141                         v.tm.tv_sec = 0;
1142                         v.tm.tv_usec = 0;
1143                 } else {
1144                         v.tm.tv_sec = sk->sk_rcvtimeo / HZ;
1145                         v.tm.tv_usec = ((sk->sk_rcvtimeo % HZ) * 1000000) / HZ;
1146                 }
1147                 break;
1148
1149         case SO_SNDTIMEO:
1150                 lv = sizeof(struct timeval);
1151                 if (sk->sk_sndtimeo == MAX_SCHEDULE_TIMEOUT) {
1152                         v.tm.tv_sec = 0;
1153                         v.tm.tv_usec = 0;
1154                 } else {
1155                         v.tm.tv_sec = sk->sk_sndtimeo / HZ;
1156                         v.tm.tv_usec = ((sk->sk_sndtimeo % HZ) * 1000000) / HZ;
1157                 }
1158                 break;
1159
1160         case SO_RCVLOWAT:
1161                 v.val = sk->sk_rcvlowat;
1162                 break;
1163
1164         case SO_SNDLOWAT:
1165                 v.val = 1;
1166                 break;
1167
1168         case SO_PASSCRED:
1169                 v.val = !!test_bit(SOCK_PASSCRED, &sock->flags);
1170                 break;
1171
1172         case SO_PEERCRED:
1173         {
1174                 struct ucred peercred;
1175                 if (len > sizeof(peercred))
1176                         len = sizeof(peercred);
1177                 cred_to_ucred(sk->sk_peer_pid, sk->sk_peer_cred, &peercred);
1178                 if (copy_to_user(optval, &peercred, len))
1179                         return -EFAULT;
1180                 goto lenout;
1181         }
1182
1183         case SO_PEERNAME:
1184         {
1185                 char address[128];
1186
1187                 if (sock->ops->getname(sock, (struct sockaddr *)address, &lv, 2))
1188                         return -ENOTCONN;
1189                 if (lv < len)
1190                         return -EINVAL;
1191                 if (copy_to_user(optval, address, len))
1192                         return -EFAULT;
1193                 goto lenout;
1194         }
1195
1196         /* Dubious BSD thing... Probably nobody even uses it, but
1197          * the UNIX standard wants it for whatever reason... -DaveM
1198          */
1199         case SO_ACCEPTCONN:
1200                 v.val = sk->sk_state == TCP_LISTEN;
1201                 break;
1202
1203         case SO_PASSSEC:
1204                 v.val = !!test_bit(SOCK_PASSSEC, &sock->flags);
1205                 break;
1206
1207         case SO_PEERSEC:
1208                 return security_socket_getpeersec_stream(sock, optval, optlen, len);
1209
1210         case SO_MARK:
1211                 v.val = sk->sk_mark;
1212                 break;
1213
1214         case SO_RXQ_OVFL:
1215                 v.val = sock_flag(sk, SOCK_RXQ_OVFL);
1216                 break;
1217
1218         case SO_WIFI_STATUS:
1219                 v.val = sock_flag(sk, SOCK_WIFI_STATUS);
1220                 break;
1221
1222         case SO_PEEK_OFF:
1223                 if (!sock->ops->set_peek_off)
1224                         return -EOPNOTSUPP;
1225
1226                 v.val = sk->sk_peek_off;
1227                 break;
1228         case SO_NOFCS:
1229                 v.val = sock_flag(sk, SOCK_NOFCS);
1230                 break;
1231
1232         case SO_BINDTODEVICE:
1233                 return sock_getbindtodevice(sk, optval, optlen, len);
1234
1235         case SO_GET_FILTER:
1236                 len = sk_get_filter(sk, (struct sock_filter __user *)optval, len);
1237                 if (len < 0)
1238                         return len;
1239
1240                 goto lenout;
1241
1242         case SO_LOCK_FILTER:
1243                 v.val = sock_flag(sk, SOCK_FILTER_LOCKED);
1244                 break;
1245
1246         case SO_BPF_EXTENSIONS:
1247                 v.val = bpf_tell_extensions();
1248                 break;
1249
1250         case SO_SELECT_ERR_QUEUE:
1251                 v.val = sock_flag(sk, SOCK_SELECT_ERR_QUEUE);
1252                 break;
1253
1254 #ifdef CONFIG_NET_RX_BUSY_POLL
1255         case SO_BUSY_POLL:
1256                 v.val = sk->sk_ll_usec;
1257                 break;
1258 #endif
1259
1260         case SO_MAX_PACING_RATE:
1261                 v.val = sk->sk_max_pacing_rate;
1262                 break;
1263
1264         case SO_INCOMING_CPU:
1265                 v.val = sk->sk_incoming_cpu;
1266                 break;
1267
1268         default:
1269                 /* We implement the SO_SNDLOWAT etc to not be settable
1270                  * (1003.1g 7).
1271                  */
1272                 return -ENOPROTOOPT;
1273         }
1274
1275         if (len > lv)
1276                 len = lv;
1277         if (copy_to_user(optval, &v, len))
1278                 return -EFAULT;
1279 lenout:
1280         if (put_user(len, optlen))
1281                 return -EFAULT;
1282         return 0;
1283 }
1284
1285 /*
1286  * Initialize an sk_lock.
1287  *
1288  * (We also register the sk_lock with the lock validator.)
1289  */
1290 static inline void sock_lock_init(struct sock *sk)
1291 {
1292         sock_lock_init_class_and_name(sk,
1293                         af_family_slock_key_strings[sk->sk_family],
1294                         af_family_slock_keys + sk->sk_family,
1295                         af_family_key_strings[sk->sk_family],
1296                         af_family_keys + sk->sk_family);
1297 }
1298
1299 /*
1300  * Copy all fields from osk to nsk but nsk->sk_refcnt must not change yet,
1301  * even temporarly, because of RCU lookups. sk_node should also be left as is.
1302  * We must not copy fields between sk_dontcopy_begin and sk_dontcopy_end
1303  */
1304 static void sock_copy(struct sock *nsk, const struct sock *osk)
1305 {
1306 #ifdef CONFIG_SECURITY_NETWORK
1307         void *sptr = nsk->sk_security;
1308 #endif
1309         memcpy(nsk, osk, offsetof(struct sock, sk_dontcopy_begin));
1310
1311         memcpy(&nsk->sk_dontcopy_end, &osk->sk_dontcopy_end,
1312                osk->sk_prot->obj_size - offsetof(struct sock, sk_dontcopy_end));
1313
1314 #ifdef CONFIG_SECURITY_NETWORK
1315         nsk->sk_security = sptr;
1316         security_sk_clone(osk, nsk);
1317 #endif
1318 }
1319
1320 void sk_prot_clear_portaddr_nulls(struct sock *sk, int size)
1321 {
1322         unsigned long nulls1, nulls2;
1323
1324         nulls1 = offsetof(struct sock, __sk_common.skc_node.next);
1325         nulls2 = offsetof(struct sock, __sk_common.skc_portaddr_node.next);
1326         if (nulls1 > nulls2)
1327                 swap(nulls1, nulls2);
1328
1329         if (nulls1 != 0)
1330                 memset((char *)sk, 0, nulls1);
1331         memset((char *)sk + nulls1 + sizeof(void *), 0,
1332                nulls2 - nulls1 - sizeof(void *));
1333         memset((char *)sk + nulls2 + sizeof(void *), 0,
1334                size - nulls2 - sizeof(void *));
1335 }
1336 EXPORT_SYMBOL(sk_prot_clear_portaddr_nulls);
1337
1338 static struct sock *sk_prot_alloc(struct proto *prot, gfp_t priority,
1339                 int family)
1340 {
1341         struct sock *sk;
1342         struct kmem_cache *slab;
1343
1344         slab = prot->slab;
1345         if (slab != NULL) {
1346                 sk = kmem_cache_alloc(slab, priority & ~__GFP_ZERO);
1347                 if (!sk)
1348                         return sk;
1349                 if (priority & __GFP_ZERO) {
1350                         if (prot->clear_sk)
1351                                 prot->clear_sk(sk, prot->obj_size);
1352                         else
1353                                 sk_prot_clear_nulls(sk, prot->obj_size);
1354                 }
1355         } else
1356                 sk = kmalloc(prot->obj_size, priority);
1357
1358         if (sk != NULL) {
1359                 kmemcheck_annotate_bitfield(sk, flags);
1360
1361                 if (security_sk_alloc(sk, family, priority))
1362                         goto out_free;
1363
1364                 if (!try_module_get(prot->owner))
1365                         goto out_free_sec;
1366                 sk_tx_queue_clear(sk);
1367         }
1368
1369         return sk;
1370
1371 out_free_sec:
1372         security_sk_free(sk);
1373 out_free:
1374         if (slab != NULL)
1375                 kmem_cache_free(slab, sk);
1376         else
1377                 kfree(sk);
1378         return NULL;
1379 }
1380
1381 static void sk_prot_free(struct proto *prot, struct sock *sk)
1382 {
1383         struct kmem_cache *slab;
1384         struct module *owner;
1385
1386         owner = prot->owner;
1387         slab = prot->slab;
1388
1389         security_sk_free(sk);
1390         if (slab != NULL)
1391                 kmem_cache_free(slab, sk);
1392         else
1393                 kfree(sk);
1394         module_put(owner);
1395 }
1396
1397 #if IS_ENABLED(CONFIG_CGROUP_NET_PRIO)
1398 void sock_update_netprioidx(struct sock *sk)
1399 {
1400         if (in_interrupt())
1401                 return;
1402
1403         sk->sk_cgrp_prioidx = task_netprioidx(current);
1404 }
1405 EXPORT_SYMBOL_GPL(sock_update_netprioidx);
1406 #endif
1407
1408 /**
1409  *      sk_alloc - All socket objects are allocated here
1410  *      @net: the applicable net namespace
1411  *      @family: protocol family
1412  *      @priority: for allocation (%GFP_KERNEL, %GFP_ATOMIC, etc)
1413  *      @prot: struct proto associated with this new sock instance
1414  *      @kern: is this to be a kernel socket?
1415  */
1416 struct sock *sk_alloc(struct net *net, int family, gfp_t priority,
1417                       struct proto *prot, int kern)
1418 {
1419         struct sock *sk;
1420
1421         sk = sk_prot_alloc(prot, priority | __GFP_ZERO, family);
1422         if (sk) {
1423                 sk->sk_family = family;
1424                 /*
1425                  * See comment in struct sock definition to understand
1426                  * why we need sk_prot_creator -acme
1427                  */
1428                 sk->sk_prot = sk->sk_prot_creator = prot;
1429                 sock_lock_init(sk);
1430                 sk->sk_net_refcnt = kern ? 0 : 1;
1431                 if (likely(sk->sk_net_refcnt))
1432                         get_net(net);
1433                 sock_net_set(sk, net);
1434                 atomic_set(&sk->sk_wmem_alloc, 1);
1435
1436                 sock_update_classid(sk);
1437                 sock_update_netprioidx(sk);
1438                 sk_tx_queue_clear(sk);
1439         }
1440
1441         return sk;
1442 }
1443 EXPORT_SYMBOL(sk_alloc);
1444
1445 void sk_destruct(struct sock *sk)
1446 {
1447         struct sk_filter *filter;
1448
1449         if (sk->sk_destruct)
1450                 sk->sk_destruct(sk);
1451
1452         filter = rcu_dereference_check(sk->sk_filter,
1453                                        atomic_read(&sk->sk_wmem_alloc) == 0);
1454         if (filter) {
1455                 sk_filter_uncharge(sk, filter);
1456                 RCU_INIT_POINTER(sk->sk_filter, NULL);
1457         }
1458
1459         sock_disable_timestamp(sk, SK_FLAGS_TIMESTAMP);
1460
1461         if (atomic_read(&sk->sk_omem_alloc))
1462                 pr_debug("%s: optmem leakage (%d bytes) detected\n",
1463                          __func__, atomic_read(&sk->sk_omem_alloc));
1464
1465         if (sk->sk_frag.page) {
1466                 put_page(sk->sk_frag.page);
1467                 sk->sk_frag.page = NULL;
1468         }
1469
1470         if (sk->sk_peer_cred)
1471                 put_cred(sk->sk_peer_cred);
1472         put_pid(sk->sk_peer_pid);
1473         if (likely(sk->sk_net_refcnt))
1474                 put_net(sock_net(sk));
1475         sk_prot_free(sk->sk_prot_creator, sk);
1476 }
1477
1478 static void __sk_free(struct sock *sk)
1479 {
1480         if (unlikely(sk->sk_net_refcnt && sock_diag_has_destroy_listeners(sk)))
1481                 sock_diag_broadcast_destroy(sk);
1482         else
1483                 sk_destruct(sk);
1484 }
1485
1486 void sk_free(struct sock *sk)
1487 {
1488         /*
1489          * We subtract one from sk_wmem_alloc and can know if
1490          * some packets are still in some tx queue.
1491          * If not null, sock_wfree() will call __sk_free(sk) later
1492          */
1493         if (atomic_dec_and_test(&sk->sk_wmem_alloc))
1494                 __sk_free(sk);
1495 }
1496 EXPORT_SYMBOL(sk_free);
1497
1498 static void sk_update_clone(const struct sock *sk, struct sock *newsk)
1499 {
1500         if (mem_cgroup_sockets_enabled && sk->sk_cgrp)
1501                 sock_update_memcg(newsk);
1502 }
1503
1504 /**
1505  *      sk_clone_lock - clone a socket, and lock its clone
1506  *      @sk: the socket to clone
1507  *      @priority: for allocation (%GFP_KERNEL, %GFP_ATOMIC, etc)
1508  *
1509  *      Caller must unlock socket even in error path (bh_unlock_sock(newsk))
1510  */
1511 struct sock *sk_clone_lock(const struct sock *sk, const gfp_t priority)
1512 {
1513         struct sock *newsk;
1514         bool is_charged = true;
1515
1516         newsk = sk_prot_alloc(sk->sk_prot, priority, sk->sk_family);
1517         if (newsk != NULL) {
1518                 struct sk_filter *filter;
1519
1520                 sock_copy(newsk, sk);
1521
1522                 newsk->sk_prot_creator = sk->sk_prot;
1523
1524                 /* SANITY */
1525                 if (likely(newsk->sk_net_refcnt))
1526                         get_net(sock_net(newsk));
1527                 sk_node_init(&newsk->sk_node);
1528                 sock_lock_init(newsk);
1529                 bh_lock_sock(newsk);
1530                 newsk->sk_backlog.head  = newsk->sk_backlog.tail = NULL;
1531                 newsk->sk_backlog.len = 0;
1532
1533                 atomic_set(&newsk->sk_rmem_alloc, 0);
1534                 /*
1535                  * sk_wmem_alloc set to one (see sk_free() and sock_wfree())
1536                  */
1537                 atomic_set(&newsk->sk_wmem_alloc, 1);
1538                 atomic_set(&newsk->sk_omem_alloc, 0);
1539                 skb_queue_head_init(&newsk->sk_receive_queue);
1540                 skb_queue_head_init(&newsk->sk_write_queue);
1541
1542                 rwlock_init(&newsk->sk_callback_lock);
1543                 lockdep_set_class_and_name(&newsk->sk_callback_lock,
1544                                 af_callback_keys + newsk->sk_family,
1545                                 af_family_clock_key_strings[newsk->sk_family]);
1546
1547                 newsk->sk_dst_cache     = NULL;
1548                 newsk->sk_wmem_queued   = 0;
1549                 newsk->sk_forward_alloc = 0;
1550                 newsk->sk_send_head     = NULL;
1551                 newsk->sk_userlocks     = sk->sk_userlocks & ~SOCK_BINDPORT_LOCK;
1552
1553                 sock_reset_flag(newsk, SOCK_DONE);
1554                 skb_queue_head_init(&newsk->sk_error_queue);
1555
1556                 filter = rcu_dereference_protected(newsk->sk_filter, 1);
1557                 if (filter != NULL)
1558                         /* though it's an empty new sock, the charging may fail
1559                          * if sysctl_optmem_max was changed between creation of
1560                          * original socket and cloning
1561                          */
1562                         is_charged = sk_filter_charge(newsk, filter);
1563
1564                 if (unlikely(!is_charged || xfrm_sk_clone_policy(newsk, sk))) {
1565                         /* We need to make sure that we don't uncharge the new
1566                          * socket if we couldn't charge it in the first place
1567                          * as otherwise we uncharge the parent's filter.
1568                          */
1569                         if (!is_charged)
1570                                 RCU_INIT_POINTER(newsk->sk_filter, NULL);
1571                         /* It is still raw copy of parent, so invalidate
1572                          * destructor and make plain sk_free() */
1573                         newsk->sk_destruct = NULL;
1574                         bh_unlock_sock(newsk);
1575                         sk_free(newsk);
1576                         newsk = NULL;
1577                         goto out;
1578                 }
1579
1580                 newsk->sk_err      = 0;
1581                 newsk->sk_err_soft = 0;
1582                 newsk->sk_priority = 0;
1583                 newsk->sk_incoming_cpu = raw_smp_processor_id();
1584                 atomic64_set(&newsk->sk_cookie, 0);
1585                 /*
1586                  * Before updating sk_refcnt, we must commit prior changes to memory
1587                  * (Documentation/RCU/rculist_nulls.txt for details)
1588                  */
1589                 smp_wmb();
1590                 atomic_set(&newsk->sk_refcnt, 2);
1591
1592                 /*
1593                  * Increment the counter in the same struct proto as the master
1594                  * sock (sk_refcnt_debug_inc uses newsk->sk_prot->socks, that
1595                  * is the same as sk->sk_prot->socks, as this field was copied
1596                  * with memcpy).
1597                  *
1598                  * This _changes_ the previous behaviour, where
1599                  * tcp_create_openreq_child always was incrementing the
1600                  * equivalent to tcp_prot->socks (inet_sock_nr), so this have
1601                  * to be taken into account in all callers. -acme
1602                  */
1603                 sk_refcnt_debug_inc(newsk);
1604                 sk_set_socket(newsk, NULL);
1605                 sk_tx_queue_clear(newsk);
1606                 newsk->sk_wq = NULL;
1607
1608                 sk_update_clone(sk, newsk);
1609
1610                 if (newsk->sk_prot->sockets_allocated)
1611                         sk_sockets_allocated_inc(newsk);
1612
1613                 if (sock_needs_netstamp(sk) &&
1614                     newsk->sk_flags & SK_FLAGS_TIMESTAMP)
1615                         net_enable_timestamp();
1616         }
1617 out:
1618         return newsk;
1619 }
1620 EXPORT_SYMBOL_GPL(sk_clone_lock);
1621
1622 void sk_setup_caps(struct sock *sk, struct dst_entry *dst)
1623 {
1624         u32 max_segs = 1;
1625
1626         sk_dst_set(sk, dst);
1627         sk->sk_route_caps = dst->dev->features;
1628         if (sk->sk_route_caps & NETIF_F_GSO)
1629                 sk->sk_route_caps |= NETIF_F_GSO_SOFTWARE;
1630         sk->sk_route_caps &= ~sk->sk_route_nocaps;
1631         if (sk_can_gso(sk)) {
1632                 if (dst->header_len) {
1633                         sk->sk_route_caps &= ~NETIF_F_GSO_MASK;
1634                 } else {
1635                         sk->sk_route_caps |= NETIF_F_SG | NETIF_F_HW_CSUM;
1636                         sk->sk_gso_max_size = dst->dev->gso_max_size;
1637                         max_segs = max_t(u32, dst->dev->gso_max_segs, 1);
1638                 }
1639         }
1640         sk->sk_gso_max_segs = max_segs;
1641 }
1642 EXPORT_SYMBOL_GPL(sk_setup_caps);
1643
1644 /*
1645  *      Simple resource managers for sockets.
1646  */
1647
1648
1649 /*
1650  * Write buffer destructor automatically called from kfree_skb.
1651  */
1652 void sock_wfree(struct sk_buff *skb)
1653 {
1654         struct sock *sk = skb->sk;
1655         unsigned int len = skb->truesize;
1656
1657         if (!sock_flag(sk, SOCK_USE_WRITE_QUEUE)) {
1658                 /*
1659                  * Keep a reference on sk_wmem_alloc, this will be released
1660                  * after sk_write_space() call
1661                  */
1662                 atomic_sub(len - 1, &sk->sk_wmem_alloc);
1663                 sk->sk_write_space(sk);
1664                 len = 1;
1665         }
1666         /*
1667          * if sk_wmem_alloc reaches 0, we must finish what sk_free()
1668          * could not do because of in-flight packets
1669          */
1670         if (atomic_sub_and_test(len, &sk->sk_wmem_alloc))
1671                 __sk_free(sk);
1672 }
1673 EXPORT_SYMBOL(sock_wfree);
1674
1675 void skb_set_owner_w(struct sk_buff *skb, struct sock *sk)
1676 {
1677         skb_orphan(skb);
1678         skb->sk = sk;
1679 #ifdef CONFIG_INET
1680         if (unlikely(!sk_fullsock(sk))) {
1681                 skb->destructor = sock_edemux;
1682                 sock_hold(sk);
1683                 return;
1684         }
1685 #endif
1686         skb->destructor = sock_wfree;
1687         skb_set_hash_from_sk(skb, sk);
1688         /*
1689          * We used to take a refcount on sk, but following operation
1690          * is enough to guarantee sk_free() wont free this sock until
1691          * all in-flight packets are completed
1692          */
1693         atomic_add(skb->truesize, &sk->sk_wmem_alloc);
1694 }
1695 EXPORT_SYMBOL(skb_set_owner_w);
1696
1697 void skb_orphan_partial(struct sk_buff *skb)
1698 {
1699         if (skb->destructor == sock_wfree
1700 #ifdef CONFIG_INET
1701             || skb->destructor == tcp_wfree
1702 #endif
1703                 ) {
1704                 struct sock *sk = skb->sk;
1705
1706                 if (atomic_inc_not_zero(&sk->sk_refcnt)) {
1707                         atomic_sub(skb->truesize, &sk->sk_wmem_alloc);
1708                         skb->destructor = sock_efree;
1709                 }
1710         } else {
1711                 skb_orphan(skb);
1712         }
1713 }
1714 EXPORT_SYMBOL(skb_orphan_partial);
1715
1716 /*
1717  * Read buffer destructor automatically called from kfree_skb.
1718  */
1719 void sock_rfree(struct sk_buff *skb)
1720 {
1721         struct sock *sk = skb->sk;
1722         unsigned int len = skb->truesize;
1723
1724         atomic_sub(len, &sk->sk_rmem_alloc);
1725         sk_mem_uncharge(sk, len);
1726 }
1727 EXPORT_SYMBOL(sock_rfree);
1728
1729 /*
1730  * Buffer destructor for skbs that are not used directly in read or write
1731  * path, e.g. for error handler skbs. Automatically called from kfree_skb.
1732  */
1733 void sock_efree(struct sk_buff *skb)
1734 {
1735         sock_put(skb->sk);
1736 }
1737 EXPORT_SYMBOL(sock_efree);
1738
1739 kuid_t sock_i_uid(struct sock *sk)
1740 {
1741         kuid_t uid;
1742
1743         read_lock_bh(&sk->sk_callback_lock);
1744         uid = sk->sk_socket ? SOCK_INODE(sk->sk_socket)->i_uid : GLOBAL_ROOT_UID;
1745         read_unlock_bh(&sk->sk_callback_lock);
1746         return uid;
1747 }
1748 EXPORT_SYMBOL(sock_i_uid);
1749
1750 unsigned long sock_i_ino(struct sock *sk)
1751 {
1752         unsigned long ino;
1753
1754         read_lock_bh(&sk->sk_callback_lock);
1755         ino = sk->sk_socket ? SOCK_INODE(sk->sk_socket)->i_ino : 0;
1756         read_unlock_bh(&sk->sk_callback_lock);
1757         return ino;
1758 }
1759 EXPORT_SYMBOL(sock_i_ino);
1760
1761 /*
1762  * Allocate a skb from the socket's send buffer.
1763  */
1764 struct sk_buff *sock_wmalloc(struct sock *sk, unsigned long size, int force,
1765                              gfp_t priority)
1766 {
1767         if (force || atomic_read(&sk->sk_wmem_alloc) < sk->sk_sndbuf) {
1768                 struct sk_buff *skb = alloc_skb(size, priority);
1769                 if (skb) {
1770                         skb_set_owner_w(skb, sk);
1771                         return skb;
1772                 }
1773         }
1774         return NULL;
1775 }
1776 EXPORT_SYMBOL(sock_wmalloc);
1777
1778 /*
1779  * Allocate a memory block from the socket's option memory buffer.
1780  */
1781 void *sock_kmalloc(struct sock *sk, int size, gfp_t priority)
1782 {
1783         if ((unsigned int)size <= sysctl_optmem_max &&
1784             atomic_read(&sk->sk_omem_alloc) + size < sysctl_optmem_max) {
1785                 void *mem;
1786                 /* First do the add, to avoid the race if kmalloc
1787                  * might sleep.
1788                  */
1789                 atomic_add(size, &sk->sk_omem_alloc);
1790                 mem = kmalloc(size, priority);
1791                 if (mem)
1792                         return mem;
1793                 atomic_sub(size, &sk->sk_omem_alloc);
1794         }
1795         return NULL;
1796 }
1797 EXPORT_SYMBOL(sock_kmalloc);
1798
1799 /* Free an option memory block. Note, we actually want the inline
1800  * here as this allows gcc to detect the nullify and fold away the
1801  * condition entirely.
1802  */
1803 static inline void __sock_kfree_s(struct sock *sk, void *mem, int size,
1804                                   const bool nullify)
1805 {
1806         if (WARN_ON_ONCE(!mem))
1807                 return;
1808         if (nullify)
1809                 kzfree(mem);
1810         else
1811                 kfree(mem);
1812         atomic_sub(size, &sk->sk_omem_alloc);
1813 }
1814
1815 void sock_kfree_s(struct sock *sk, void *mem, int size)
1816 {
1817         __sock_kfree_s(sk, mem, size, false);
1818 }
1819 EXPORT_SYMBOL(sock_kfree_s);
1820
1821 void sock_kzfree_s(struct sock *sk, void *mem, int size)
1822 {
1823         __sock_kfree_s(sk, mem, size, true);
1824 }
1825 EXPORT_SYMBOL(sock_kzfree_s);
1826
1827 /* It is almost wait_for_tcp_memory minus release_sock/lock_sock.
1828    I think, these locks should be removed for datagram sockets.
1829  */
1830 static long sock_wait_for_wmem(struct sock *sk, long timeo)
1831 {
1832         DEFINE_WAIT(wait);
1833
1834         sk_clear_bit(SOCKWQ_ASYNC_NOSPACE, sk);
1835         for (;;) {
1836                 if (!timeo)
1837                         break;
1838                 if (signal_pending(current))
1839                         break;
1840                 set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
1841                 prepare_to_wait(sk_sleep(sk), &wait, TASK_INTERRUPTIBLE);
1842                 if (atomic_read(&sk->sk_wmem_alloc) < sk->sk_sndbuf)
1843                         break;
1844                 if (sk->sk_shutdown & SEND_SHUTDOWN)
1845                         break;
1846                 if (sk->sk_err)
1847                         break;
1848                 timeo = schedule_timeout(timeo);
1849         }
1850         finish_wait(sk_sleep(sk), &wait);
1851         return timeo;
1852 }
1853
1854
1855 /*
1856  *      Generic send/receive buffer handlers
1857  */
1858
1859 struct sk_buff *sock_alloc_send_pskb(struct sock *sk, unsigned long header_len,
1860                                      unsigned long data_len, int noblock,
1861                                      int *errcode, int max_page_order)
1862 {
1863         struct sk_buff *skb;
1864         long timeo;
1865         int err;
1866
1867         timeo = sock_sndtimeo(sk, noblock);
1868         for (;;) {
1869                 err = sock_error(sk);
1870                 if (err != 0)
1871                         goto failure;
1872
1873                 err = -EPIPE;
1874                 if (sk->sk_shutdown & SEND_SHUTDOWN)
1875                         goto failure;
1876
1877                 if (sk_wmem_alloc_get(sk) < sk->sk_sndbuf)
1878                         break;
1879
1880                 sk_set_bit(SOCKWQ_ASYNC_NOSPACE, sk);
1881                 set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
1882                 err = -EAGAIN;
1883                 if (!timeo)
1884                         goto failure;
1885                 if (signal_pending(current))
1886                         goto interrupted;
1887                 timeo = sock_wait_for_wmem(sk, timeo);
1888         }
1889         skb = alloc_skb_with_frags(header_len, data_len, max_page_order,
1890                                    errcode, sk->sk_allocation);
1891         if (skb)
1892                 skb_set_owner_w(skb, sk);
1893         return skb;
1894
1895 interrupted:
1896         err = sock_intr_errno(timeo);
1897 failure:
1898         *errcode = err;
1899         return NULL;
1900 }
1901 EXPORT_SYMBOL(sock_alloc_send_pskb);
1902
1903 struct sk_buff *sock_alloc_send_skb(struct sock *sk, unsigned long size,
1904                                     int noblock, int *errcode)
1905 {
1906         return sock_alloc_send_pskb(sk, size, 0, noblock, errcode, 0);
1907 }
1908 EXPORT_SYMBOL(sock_alloc_send_skb);
1909
1910 int sock_cmsg_send(struct sock *sk, struct msghdr *msg,
1911                    struct sockcm_cookie *sockc)
1912 {
1913         struct cmsghdr *cmsg;
1914
1915         for_each_cmsghdr(cmsg, msg) {
1916                 if (!CMSG_OK(msg, cmsg))
1917                         return -EINVAL;
1918                 if (cmsg->cmsg_level != SOL_SOCKET)
1919                         continue;
1920                 switch (cmsg->cmsg_type) {
1921                 case SO_MARK:
1922                         if (!ns_capable(sock_net(sk)->user_ns, CAP_NET_ADMIN))
1923                                 return -EPERM;
1924                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(u32)))
1925                                 return -EINVAL;
1926                         sockc->mark = *(u32 *)CMSG_DATA(cmsg);
1927                         break;
1928                 default:
1929                         return -EINVAL;
1930                 }
1931         }
1932         return 0;
1933 }
1934 EXPORT_SYMBOL(sock_cmsg_send);
1935
1936 /* On 32bit arches, an skb frag is limited to 2^15 */
1937 #define SKB_FRAG_PAGE_ORDER     get_order(32768)
1938
1939 /**
1940  * skb_page_frag_refill - check that a page_frag contains enough room
1941  * @sz: minimum size of the fragment we want to get
1942  * @pfrag: pointer to page_frag
1943  * @gfp: priority for memory allocation
1944  *
1945  * Note: While this allocator tries to use high order pages, there is
1946  * no guarantee that allocations succeed. Therefore, @sz MUST be
1947  * less or equal than PAGE_SIZE.
1948  */
1949 bool skb_page_frag_refill(unsigned int sz, struct page_frag *pfrag, gfp_t gfp)
1950 {
1951         if (pfrag->page) {
1952                 if (atomic_read(&pfrag->page->_count) == 1) {
1953                         pfrag->offset = 0;
1954                         return true;
1955                 }
1956                 if (pfrag->offset + sz <= pfrag->size)
1957                         return true;
1958                 put_page(pfrag->page);
1959         }
1960
1961         pfrag->offset = 0;
1962         if (SKB_FRAG_PAGE_ORDER) {
1963                 /* Avoid direct reclaim but allow kswapd to wake */
1964                 pfrag->page = alloc_pages((gfp & ~__GFP_DIRECT_RECLAIM) |
1965                                           __GFP_COMP | __GFP_NOWARN |
1966                                           __GFP_NORETRY,
1967                                           SKB_FRAG_PAGE_ORDER);
1968                 if (likely(pfrag->page)) {
1969                         pfrag->size = PAGE_SIZE << SKB_FRAG_PAGE_ORDER;
1970                         return true;
1971                 }
1972         }
1973         pfrag->page = alloc_page(gfp);
1974         if (likely(pfrag->page)) {
1975                 pfrag->size = PAGE_SIZE;
1976                 return true;
1977         }
1978         return false;
1979 }
1980 EXPORT_SYMBOL(skb_page_frag_refill);
1981
1982 bool sk_page_frag_refill(struct sock *sk, struct page_frag *pfrag)
1983 {
1984         if (likely(skb_page_frag_refill(32U, pfrag, sk->sk_allocation)))
1985                 return true;
1986
1987         sk_enter_memory_pressure(sk);
1988         sk_stream_moderate_sndbuf(sk);
1989         return false;
1990 }
1991 EXPORT_SYMBOL(sk_page_frag_refill);
1992
1993 static void __lock_sock(struct sock *sk)
1994         __releases(&sk->sk_lock.slock)
1995         __acquires(&sk->sk_lock.slock)
1996 {
1997         DEFINE_WAIT(wait);
1998
1999         for (;;) {
2000                 prepare_to_wait_exclusive(&sk->sk_lock.wq, &wait,
2001                                         TASK_UNINTERRUPTIBLE);
2002                 spin_unlock_bh(&sk->sk_lock.slock);
2003                 schedule();
2004                 spin_lock_bh(&sk->sk_lock.slock);
2005                 if (!sock_owned_by_user(sk))
2006                         break;
2007         }
2008         finish_wait(&sk->sk_lock.wq, &wait);
2009 }
2010
2011 static void __release_sock(struct sock *sk)
2012         __releases(&sk->sk_lock.slock)
2013         __acquires(&sk->sk_lock.slock)
2014 {
2015         struct sk_buff *skb = sk->sk_backlog.head;
2016
2017         do {
2018                 sk->sk_backlog.head = sk->sk_backlog.tail = NULL;
2019                 bh_unlock_sock(sk);
2020
2021                 do {
2022                         struct sk_buff *next = skb->next;
2023
2024                         prefetch(next);
2025                         WARN_ON_ONCE(skb_dst_is_noref(skb));
2026                         skb->next = NULL;
2027                         sk_backlog_rcv(sk, skb);
2028
2029                         /*
2030                          * We are in process context here with softirqs
2031                          * disabled, use cond_resched_softirq() to preempt.
2032                          * This is safe to do because we've taken the backlog
2033                          * queue private:
2034                          */
2035                         cond_resched_softirq();
2036
2037                         skb = next;
2038                 } while (skb != NULL);
2039
2040                 bh_lock_sock(sk);
2041         } while ((skb = sk->sk_backlog.head) != NULL);
2042
2043         /*
2044          * Doing the zeroing here guarantee we can not loop forever
2045          * while a wild producer attempts to flood us.
2046          */
2047         sk->sk_backlog.len = 0;
2048 }
2049
2050 /**
2051  * sk_wait_data - wait for data to arrive at sk_receive_queue
2052  * @sk:    sock to wait on
2053  * @timeo: for how long
2054  * @skb:   last skb seen on sk_receive_queue
2055  *
2056  * Now socket state including sk->sk_err is changed only under lock,
2057  * hence we may omit checks after joining wait queue.
2058  * We check receive queue before schedule() only as optimization;
2059  * it is very likely that release_sock() added new data.
2060  */
2061 int sk_wait_data(struct sock *sk, long *timeo, const struct sk_buff *skb)
2062 {
2063         int rc;
2064         DEFINE_WAIT(wait);
2065
2066         prepare_to_wait(sk_sleep(sk), &wait, TASK_INTERRUPTIBLE);
2067         sk_set_bit(SOCKWQ_ASYNC_WAITDATA, sk);
2068         rc = sk_wait_event(sk, timeo, skb_peek_tail(&sk->sk_receive_queue) != skb);
2069         sk_clear_bit(SOCKWQ_ASYNC_WAITDATA, sk);
2070         finish_wait(sk_sleep(sk), &wait);
2071         return rc;
2072 }
2073 EXPORT_SYMBOL(sk_wait_data);
2074
2075 /**
2076  *      __sk_mem_schedule - increase sk_forward_alloc and memory_allocated
2077  *      @sk: socket
2078  *      @size: memory size to allocate
2079  *      @kind: allocation type
2080  *
2081  *      If kind is SK_MEM_SEND, it means wmem allocation. Otherwise it means
2082  *      rmem allocation. This function assumes that protocols which have
2083  *      memory_pressure use sk_wmem_queued as write buffer accounting.
2084  */
2085 int __sk_mem_schedule(struct sock *sk, int size, int kind)
2086 {
2087         struct proto *prot = sk->sk_prot;
2088         int amt = sk_mem_pages(size);
2089         long allocated;
2090         int parent_status = UNDER_LIMIT;
2091
2092         sk->sk_forward_alloc += amt * SK_MEM_QUANTUM;
2093
2094         allocated = sk_memory_allocated_add(sk, amt, &parent_status);
2095
2096         /* Under limit. */
2097         if (parent_status == UNDER_LIMIT &&
2098                         allocated <= sk_prot_mem_limits(sk, 0)) {
2099                 sk_leave_memory_pressure(sk);
2100                 return 1;
2101         }
2102
2103         /* Under pressure. (we or our parents) */
2104         if ((parent_status > SOFT_LIMIT) ||
2105                         allocated > sk_prot_mem_limits(sk, 1))
2106                 sk_enter_memory_pressure(sk);
2107
2108         /* Over hard limit (we or our parents) */
2109         if ((parent_status == OVER_LIMIT) ||
2110                         (allocated > sk_prot_mem_limits(sk, 2)))
2111                 goto suppress_allocation;
2112
2113         /* guarantee minimum buffer size under pressure */
2114         if (kind == SK_MEM_RECV) {
2115                 if (atomic_read(&sk->sk_rmem_alloc) < prot->sysctl_rmem[0])
2116                         return 1;
2117
2118         } else { /* SK_MEM_SEND */
2119                 if (sk->sk_type == SOCK_STREAM) {
2120                         if (sk->sk_wmem_queued < prot->sysctl_wmem[0])
2121                                 return 1;
2122                 } else if (atomic_read(&sk->sk_wmem_alloc) <
2123                            prot->sysctl_wmem[0])
2124                                 return 1;
2125         }
2126
2127         if (sk_has_memory_pressure(sk)) {
2128                 u64 alloc;
2129
2130                 if (!sk_under_memory_pressure(sk))
2131                         return 1;
2132                 alloc = sk_sockets_allocated_read_positive(sk);
2133                 if (sk_prot_mem_limits(sk, 2) > alloc *
2134                     sk_mem_pages(sk->sk_wmem_queued +
2135                                  atomic_read(&sk->sk_rmem_alloc) +
2136                                  sk->sk_forward_alloc))
2137                         return 1;
2138         }
2139
2140 suppress_allocation:
2141
2142         if (kind == SK_MEM_SEND && sk->sk_type == SOCK_STREAM) {
2143                 sk_stream_moderate_sndbuf(sk);
2144
2145                 /* Fail only if socket is _under_ its sndbuf.
2146                  * In this case we cannot block, so that we have to fail.
2147                  */
2148                 if (sk->sk_wmem_queued + size >= sk->sk_sndbuf)
2149                         return 1;
2150         }
2151
2152         trace_sock_exceed_buf_limit(sk, prot, allocated);
2153
2154         /* Alas. Undo changes. */
2155         sk->sk_forward_alloc -= amt * SK_MEM_QUANTUM;
2156
2157         sk_memory_allocated_sub(sk, amt);
2158
2159         return 0;
2160 }
2161 EXPORT_SYMBOL(__sk_mem_schedule);
2162
2163 /**
2164  *      __sk_mem_reclaim - reclaim memory_allocated
2165  *      @sk: socket
2166  *      @amount: number of bytes (rounded down to a SK_MEM_QUANTUM multiple)
2167  */
2168 void __sk_mem_reclaim(struct sock *sk, int amount)
2169 {
2170         amount >>= SK_MEM_QUANTUM_SHIFT;
2171         sk_memory_allocated_sub(sk, amount);
2172         sk->sk_forward_alloc -= amount << SK_MEM_QUANTUM_SHIFT;
2173
2174         if (sk_under_memory_pressure(sk) &&
2175             (sk_memory_allocated(sk) < sk_prot_mem_limits(sk, 0)))
2176                 sk_leave_memory_pressure(sk);
2177 }
2178 EXPORT_SYMBOL(__sk_mem_reclaim);
2179
2180
2181 /*
2182  * Set of default routines for initialising struct proto_ops when
2183  * the protocol does not support a particular function. In certain
2184  * cases where it makes no sense for a protocol to have a "do nothing"
2185  * function, some default processing is provided.
2186  */
2187
2188 int sock_no_bind(struct socket *sock, struct sockaddr *saddr, int len)
2189 {
2190         return -EOPNOTSUPP;
2191 }
2192 EXPORT_SYMBOL(sock_no_bind);
2193
2194 int sock_no_connect(struct socket *sock, struct sockaddr *saddr,
2195                     int len, int flags)
2196 {
2197         return -EOPNOTSUPP;
2198 }
2199 EXPORT_SYMBOL(sock_no_connect);
2200
2201 int sock_no_socketpair(struct socket *sock1, struct socket *sock2)
2202 {
2203         return -EOPNOTSUPP;
2204 }
2205 EXPORT_SYMBOL(sock_no_socketpair);
2206
2207 int sock_no_accept(struct socket *sock, struct socket *newsock, int flags)
2208 {
2209         return -EOPNOTSUPP;
2210 }
2211 EXPORT_SYMBOL(sock_no_accept);
2212
2213 int sock_no_getname(struct socket *sock, struct sockaddr *saddr,
2214                     int *len, int peer)
2215 {
2216         return -EOPNOTSUPP;
2217 }
2218 EXPORT_SYMBOL(sock_no_getname);
2219
2220 unsigned int sock_no_poll(struct file *file, struct socket *sock, poll_table *pt)
2221 {
2222         return 0;
2223 }
2224 EXPORT_SYMBOL(sock_no_poll);
2225
2226 int sock_no_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
2227 {
2228         return -EOPNOTSUPP;
2229 }
2230 EXPORT_SYMBOL(sock_no_ioctl);
2231
2232 int sock_no_listen(struct socket *sock, int backlog)
2233 {
2234         return -EOPNOTSUPP;
2235 }
2236 EXPORT_SYMBOL(sock_no_listen);
2237
2238 int sock_no_shutdown(struct socket *sock, int how)
2239 {
2240         return -EOPNOTSUPP;
2241 }
2242 EXPORT_SYMBOL(sock_no_shutdown);
2243
2244 int sock_no_setsockopt(struct socket *sock, int level, int optname,
2245                     char __user *optval, unsigned int optlen)
2246 {
2247         return -EOPNOTSUPP;
2248 }
2249 EXPORT_SYMBOL(sock_no_setsockopt);
2250
2251 int sock_no_getsockopt(struct socket *sock, int level, int optname,
2252                     char __user *optval, int __user *optlen)
2253 {
2254         return -EOPNOTSUPP;
2255 }
2256 EXPORT_SYMBOL(sock_no_getsockopt);
2257
2258 int sock_no_sendmsg(struct socket *sock, struct msghdr *m, size_t len)
2259 {
2260         return -EOPNOTSUPP;
2261 }
2262 EXPORT_SYMBOL(sock_no_sendmsg);
2263
2264 int sock_no_recvmsg(struct socket *sock, struct msghdr *m, size_t len,
2265                     int flags)
2266 {
2267         return -EOPNOTSUPP;
2268 }
2269 EXPORT_SYMBOL(sock_no_recvmsg);
2270
2271 int sock_no_mmap(struct file *file, struct socket *sock, struct vm_area_struct *vma)
2272 {
2273         /* Mirror missing mmap method error code */
2274         return -ENODEV;
2275 }
2276 EXPORT_SYMBOL(sock_no_mmap);
2277
2278 /*
2279  * When a file is received (via SCM_RIGHTS, etc), we must bump the
2280  * various sock-based usage counts.
2281  */
2282 void __receive_sock(struct file *file)
2283 {
2284         struct socket *sock;
2285         int error;
2286
2287         /*
2288          * The resulting value of "error" is ignored here since we only
2289          * need to take action when the file is a socket and testing
2290          * "sock" for NULL is sufficient.
2291          */
2292         sock = sock_from_file(file, &error);
2293         if (sock) {
2294                 sock_update_netprioidx(sock->sk);
2295                 sock_update_classid(sock->sk);
2296         }
2297 }
2298
2299 ssize_t sock_no_sendpage(struct socket *sock, struct page *page, int offset, size_t size, int flags)
2300 {
2301         ssize_t res;
2302         struct msghdr msg = {.msg_flags = flags};
2303         struct kvec iov;
2304         char *kaddr = kmap(page);
2305         iov.iov_base = kaddr + offset;
2306         iov.iov_len = size;
2307         res = kernel_sendmsg(sock, &msg, &iov, 1, size);
2308         kunmap(page);
2309         return res;
2310 }
2311 EXPORT_SYMBOL(sock_no_sendpage);
2312
2313 /*
2314  *      Default Socket Callbacks
2315  */
2316
2317 static void sock_def_wakeup(struct sock *sk)
2318 {
2319         struct socket_wq *wq;
2320
2321         rcu_read_lock();
2322         wq = rcu_dereference(sk->sk_wq);
2323         if (wq_has_sleeper(wq))
2324                 wake_up_interruptible_all(&wq->wait);
2325         rcu_read_unlock();
2326 }
2327
2328 static void sock_def_error_report(struct sock *sk)
2329 {
2330         struct socket_wq *wq;
2331
2332         rcu_read_lock();
2333         wq = rcu_dereference(sk->sk_wq);
2334         if (wq_has_sleeper(wq))
2335                 wake_up_interruptible_poll(&wq->wait, POLLERR);
2336         sk_wake_async(sk, SOCK_WAKE_IO, POLL_ERR);
2337         rcu_read_unlock();
2338 }
2339
2340 static void sock_def_readable(struct sock *sk)
2341 {
2342         struct socket_wq *wq;
2343
2344         rcu_read_lock();
2345         wq = rcu_dereference(sk->sk_wq);
2346         if (wq_has_sleeper(wq))
2347                 wake_up_interruptible_sync_poll(&wq->wait, POLLIN | POLLPRI |
2348                                                 POLLRDNORM | POLLRDBAND);
2349         sk_wake_async(sk, SOCK_WAKE_WAITD, POLL_IN);
2350         rcu_read_unlock();
2351 }
2352
2353 static void sock_def_write_space(struct sock *sk)
2354 {
2355         struct socket_wq *wq;
2356
2357         rcu_read_lock();
2358
2359         /* Do not wake up a writer until he can make "significant"
2360          * progress.  --DaveM
2361          */
2362         if ((atomic_read(&sk->sk_wmem_alloc) << 1) <= sk->sk_sndbuf) {
2363                 wq = rcu_dereference(sk->sk_wq);
2364                 if (wq_has_sleeper(wq))
2365                         wake_up_interruptible_sync_poll(&wq->wait, POLLOUT |
2366                                                 POLLWRNORM | POLLWRBAND);
2367
2368                 /* Should agree with poll, otherwise some programs break */
2369                 if (sock_writeable(sk))
2370                         sk_wake_async(sk, SOCK_WAKE_SPACE, POLL_OUT);
2371         }
2372
2373         rcu_read_unlock();
2374 }
2375
2376 static void sock_def_destruct(struct sock *sk)
2377 {
2378 }
2379
2380 void sk_send_sigurg(struct sock *sk)
2381 {
2382         if (sk->sk_socket && sk->sk_socket->file)
2383                 if (send_sigurg(&sk->sk_socket->file->f_owner))
2384                         sk_wake_async(sk, SOCK_WAKE_URG, POLL_PRI);
2385 }
2386 EXPORT_SYMBOL(sk_send_sigurg);
2387
2388 void sk_reset_timer(struct sock *sk, struct timer_list* timer,
2389                     unsigned long expires)
2390 {
2391         if (!mod_timer(timer, expires))
2392                 sock_hold(sk);
2393 }
2394 EXPORT_SYMBOL(sk_reset_timer);
2395
2396 void sk_stop_timer(struct sock *sk, struct timer_list* timer)
2397 {
2398         if (del_timer(timer))
2399                 __sock_put(sk);
2400 }
2401 EXPORT_SYMBOL(sk_stop_timer);
2402
2403 void sock_init_data(struct socket *sock, struct sock *sk)
2404 {
2405         skb_queue_head_init(&sk->sk_receive_queue);
2406         skb_queue_head_init(&sk->sk_write_queue);
2407         skb_queue_head_init(&sk->sk_error_queue);
2408
2409         sk->sk_send_head        =       NULL;
2410
2411         init_timer(&sk->sk_timer);
2412
2413         sk->sk_allocation       =       GFP_KERNEL;
2414         sk->sk_rcvbuf           =       sysctl_rmem_default;
2415         sk->sk_sndbuf           =       sysctl_wmem_default;
2416         sk->sk_state            =       TCP_CLOSE;
2417         sk_set_socket(sk, sock);
2418
2419         sock_set_flag(sk, SOCK_ZAPPED);
2420
2421         if (sock) {
2422                 sk->sk_type     =       sock->type;
2423                 sk->sk_wq       =       sock->wq;
2424                 sock->sk        =       sk;
2425         } else
2426                 sk->sk_wq       =       NULL;
2427
2428         rwlock_init(&sk->sk_callback_lock);
2429         lockdep_set_class_and_name(&sk->sk_callback_lock,
2430                         af_callback_keys + sk->sk_family,
2431                         af_family_clock_key_strings[sk->sk_family]);
2432
2433         sk->sk_state_change     =       sock_def_wakeup;
2434         sk->sk_data_ready       =       sock_def_readable;
2435         sk->sk_write_space      =       sock_def_write_space;
2436         sk->sk_error_report     =       sock_def_error_report;
2437         sk->sk_destruct         =       sock_def_destruct;
2438
2439         sk->sk_frag.page        =       NULL;
2440         sk->sk_frag.offset      =       0;
2441         sk->sk_peek_off         =       -1;
2442
2443         sk->sk_peer_pid         =       NULL;
2444         sk->sk_peer_cred        =       NULL;
2445         sk->sk_write_pending    =       0;
2446         sk->sk_rcvlowat         =       1;
2447         sk->sk_rcvtimeo         =       MAX_SCHEDULE_TIMEOUT;
2448         sk->sk_sndtimeo         =       MAX_SCHEDULE_TIMEOUT;
2449
2450         sk->sk_stamp = ktime_set(-1L, 0);
2451 #if BITS_PER_LONG==32
2452         seqlock_init(&sk->sk_stamp_seq);
2453 #endif
2454
2455 #ifdef CONFIG_NET_RX_BUSY_POLL
2456         sk->sk_napi_id          =       0;
2457         sk->sk_ll_usec          =       sysctl_net_busy_read;
2458 #endif
2459
2460         sk->sk_max_pacing_rate = ~0U;
2461         sk->sk_pacing_rate = ~0U;
2462         sk->sk_incoming_cpu = -1;
2463         /*
2464          * Before updating sk_refcnt, we must commit prior changes to memory
2465          * (Documentation/RCU/rculist_nulls.txt for details)
2466          */
2467         smp_wmb();
2468         atomic_set(&sk->sk_refcnt, 1);
2469         atomic_set(&sk->sk_drops, 0);
2470 }
2471 EXPORT_SYMBOL(sock_init_data);
2472
2473 void lock_sock_nested(struct sock *sk, int subclass)
2474 {
2475         might_sleep();
2476         spin_lock_bh(&sk->sk_lock.slock);
2477         if (sk->sk_lock.owned)
2478                 __lock_sock(sk);
2479         sk->sk_lock.owned = 1;
2480         spin_unlock(&sk->sk_lock.slock);
2481         /*
2482          * The sk_lock has mutex_lock() semantics here:
2483          */
2484         mutex_acquire(&sk->sk_lock.dep_map, subclass, 0, _RET_IP_);
2485         local_bh_enable();
2486 }
2487 EXPORT_SYMBOL(lock_sock_nested);
2488
2489 void release_sock(struct sock *sk)
2490 {
2491         /*
2492          * The sk_lock has mutex_unlock() semantics:
2493          */
2494         mutex_release(&sk->sk_lock.dep_map, 1, _RET_IP_);
2495
2496         spin_lock_bh(&sk->sk_lock.slock);
2497         if (sk->sk_backlog.tail)
2498                 __release_sock(sk);
2499
2500         /* Warning : release_cb() might need to release sk ownership,
2501          * ie call sock_release_ownership(sk) before us.
2502          */
2503         if (sk->sk_prot->release_cb)
2504                 sk->sk_prot->release_cb(sk);
2505
2506         sock_release_ownership(sk);
2507         if (waitqueue_active(&sk->sk_lock.wq))
2508                 wake_up(&sk->sk_lock.wq);
2509         spin_unlock_bh(&sk->sk_lock.slock);
2510 }
2511 EXPORT_SYMBOL(release_sock);
2512
2513 /**
2514  * lock_sock_fast - fast version of lock_sock
2515  * @sk: socket
2516  *
2517  * This version should be used for very small section, where process wont block
2518  * return false if fast path is taken
2519  *   sk_lock.slock locked, owned = 0, BH disabled
2520  * return true if slow path is taken
2521  *   sk_lock.slock unlocked, owned = 1, BH enabled
2522  */
2523 bool lock_sock_fast(struct sock *sk)
2524 {
2525         might_sleep();
2526         spin_lock_bh(&sk->sk_lock.slock);
2527
2528         if (!sk->sk_lock.owned)
2529                 /*
2530                  * Note : We must disable BH
2531                  */
2532                 return false;
2533
2534         __lock_sock(sk);
2535         sk->sk_lock.owned = 1;
2536         spin_unlock(&sk->sk_lock.slock);
2537         /*
2538          * The sk_lock has mutex_lock() semantics here:
2539          */
2540         mutex_acquire(&sk->sk_lock.dep_map, 0, 0, _RET_IP_);
2541         local_bh_enable();
2542         return true;
2543 }
2544 EXPORT_SYMBOL(lock_sock_fast);
2545
2546 int sock_get_timestamp(struct sock *sk, struct timeval __user *userstamp)
2547 {
2548         struct timeval tv;
2549         if (!sock_flag(sk, SOCK_TIMESTAMP))
2550                 sock_enable_timestamp(sk, SOCK_TIMESTAMP);
2551         tv = ktime_to_timeval(sk->sk_stamp);
2552         if (tv.tv_sec == -1)
2553                 return -ENOENT;
2554         if (tv.tv_sec == 0) {
2555                 sk->sk_stamp = ktime_get_real();
2556                 tv = ktime_to_timeval(sk->sk_stamp);
2557         }
2558         return copy_to_user(userstamp, &tv, sizeof(tv)) ? -EFAULT : 0;
2559 }
2560 EXPORT_SYMBOL(sock_get_timestamp);
2561
2562 int sock_get_timestampns(struct sock *sk, struct timespec __user *userstamp)
2563 {
2564         struct timespec ts;
2565         if (!sock_flag(sk, SOCK_TIMESTAMP))
2566                 sock_enable_timestamp(sk, SOCK_TIMESTAMP);
2567         ts = ktime_to_timespec(sk->sk_stamp);
2568         if (ts.tv_sec == -1)
2569                 return -ENOENT;
2570         if (ts.tv_sec == 0) {
2571                 sk->sk_stamp = ktime_get_real();
2572                 ts = ktime_to_timespec(sk->sk_stamp);
2573         }
2574         return copy_to_user(userstamp, &ts, sizeof(ts)) ? -EFAULT : 0;
2575 }
2576 EXPORT_SYMBOL(sock_get_timestampns);
2577
2578 void sock_enable_timestamp(struct sock *sk, int flag)
2579 {
2580         if (!sock_flag(sk, flag)) {
2581                 unsigned long previous_flags = sk->sk_flags;
2582
2583                 sock_set_flag(sk, flag);
2584                 /*
2585                  * we just set one of the two flags which require net
2586                  * time stamping, but time stamping might have been on
2587                  * already because of the other one
2588                  */
2589                 if (sock_needs_netstamp(sk) &&
2590                     !(previous_flags & SK_FLAGS_TIMESTAMP))
2591                         net_enable_timestamp();
2592         }
2593 }
2594
2595 int sock_recv_errqueue(struct sock *sk, struct msghdr *msg, int len,
2596                        int level, int type)
2597 {
2598         struct sock_exterr_skb *serr;
2599         struct sk_buff *skb;
2600         int copied, err;
2601
2602         err = -EAGAIN;
2603         skb = sock_dequeue_err_skb(sk);
2604         if (skb == NULL)
2605                 goto out;
2606
2607         copied = skb->len;
2608         if (copied > len) {
2609                 msg->msg_flags |= MSG_TRUNC;
2610                 copied = len;
2611         }
2612         err = skb_copy_datagram_msg(skb, 0, msg, copied);
2613         if (err)
2614                 goto out_free_skb;
2615
2616         sock_recv_timestamp(msg, sk, skb);
2617
2618         serr = SKB_EXT_ERR(skb);
2619         put_cmsg(msg, level, type, sizeof(serr->ee), &serr->ee);
2620
2621         msg->msg_flags |= MSG_ERRQUEUE;
2622         err = copied;
2623
2624 out_free_skb:
2625         kfree_skb(skb);
2626 out:
2627         return err;
2628 }
2629 EXPORT_SYMBOL(sock_recv_errqueue);
2630
2631 /*
2632  *      Get a socket option on an socket.
2633  *
2634  *      FIX: POSIX 1003.1g is very ambiguous here. It states that
2635  *      asynchronous errors should be reported by getsockopt. We assume
2636  *      this means if you specify SO_ERROR (otherwise whats the point of it).
2637  */
2638 int sock_common_getsockopt(struct socket *sock, int level, int optname,
2639                            char __user *optval, int __user *optlen)
2640 {
2641         struct sock *sk = sock->sk;
2642
2643         return sk->sk_prot->getsockopt(sk, level, optname, optval, optlen);
2644 }
2645 EXPORT_SYMBOL(sock_common_getsockopt);
2646
2647 #ifdef CONFIG_COMPAT
2648 int compat_sock_common_getsockopt(struct socket *sock, int level, int optname,
2649                                   char __user *optval, int __user *optlen)
2650 {
2651         struct sock *sk = sock->sk;
2652
2653         if (sk->sk_prot->compat_getsockopt != NULL)
2654                 return sk->sk_prot->compat_getsockopt(sk, level, optname,
2655                                                       optval, optlen);
2656         return sk->sk_prot->getsockopt(sk, level, optname, optval, optlen);
2657 }
2658 EXPORT_SYMBOL(compat_sock_common_getsockopt);
2659 #endif
2660
2661 int sock_common_recvmsg(struct socket *sock, struct msghdr *msg, size_t size,
2662                         int flags)
2663 {
2664         struct sock *sk = sock->sk;
2665         int addr_len = 0;
2666         int err;
2667
2668         err = sk->sk_prot->recvmsg(sk, msg, size, flags & MSG_DONTWAIT,
2669                                    flags & ~MSG_DONTWAIT, &addr_len);
2670         if (err >= 0)
2671                 msg->msg_namelen = addr_len;
2672         return err;
2673 }
2674 EXPORT_SYMBOL(sock_common_recvmsg);
2675
2676 /*
2677  *      Set socket options on an inet socket.
2678  */
2679 int sock_common_setsockopt(struct socket *sock, int level, int optname,
2680                            char __user *optval, unsigned int optlen)
2681 {
2682         struct sock *sk = sock->sk;
2683
2684         return sk->sk_prot->setsockopt(sk, level, optname, optval, optlen);
2685 }
2686 EXPORT_SYMBOL(sock_common_setsockopt);
2687
2688 #ifdef CONFIG_COMPAT
2689 int compat_sock_common_setsockopt(struct socket *sock, int level, int optname,
2690                                   char __user *optval, unsigned int optlen)
2691 {
2692         struct sock *sk = sock->sk;
2693
2694         if (sk->sk_prot->compat_setsockopt != NULL)
2695                 return sk->sk_prot->compat_setsockopt(sk, level, optname,
2696                                                       optval, optlen);
2697         return sk->sk_prot->setsockopt(sk, level, optname, optval, optlen);
2698 }
2699 EXPORT_SYMBOL(compat_sock_common_setsockopt);
2700 #endif
2701
2702 void sk_common_release(struct sock *sk)
2703 {
2704         if (sk->sk_prot->destroy)
2705                 sk->sk_prot->destroy(sk);
2706
2707         /*
2708          * Observation: when sock_common_release is called, processes have
2709          * no access to socket. But net still has.
2710          * Step one, detach it from networking:
2711          *
2712          * A. Remove from hash tables.
2713          */
2714
2715         sk->sk_prot->unhash(sk);
2716
2717         /*
2718          * In this point socket cannot receive new packets, but it is possible
2719          * that some packets are in flight because some CPU runs receiver and
2720          * did hash table lookup before we unhashed socket. They will achieve
2721          * receive queue and will be purged by socket destructor.
2722          *
2723          * Also we still have packets pending on receive queue and probably,
2724          * our own packets waiting in device queues. sock_destroy will drain
2725          * receive queue, but transmitted packets will delay socket destruction
2726          * until the last reference will be released.
2727          */
2728
2729         sock_orphan(sk);
2730
2731         xfrm_sk_free_policy(sk);
2732
2733         sk_refcnt_debug_release(sk);
2734
2735         sock_put(sk);
2736 }
2737 EXPORT_SYMBOL(sk_common_release);
2738
2739 #ifdef CONFIG_PROC_FS
2740 #define PROTO_INUSE_NR  64      /* should be enough for the first time */
2741 struct prot_inuse {
2742         int val[PROTO_INUSE_NR];
2743 };
2744
2745 static DECLARE_BITMAP(proto_inuse_idx, PROTO_INUSE_NR);
2746
2747 #ifdef CONFIG_NET_NS
2748 void sock_prot_inuse_add(struct net *net, struct proto *prot, int val)
2749 {
2750         __this_cpu_add(net->core.inuse->val[prot->inuse_idx], val);
2751 }
2752 EXPORT_SYMBOL_GPL(sock_prot_inuse_add);
2753
2754 int sock_prot_inuse_get(struct net *net, struct proto *prot)
2755 {
2756         int cpu, idx = prot->inuse_idx;
2757         int res = 0;
2758
2759         for_each_possible_cpu(cpu)
2760                 res += per_cpu_ptr(net->core.inuse, cpu)->val[idx];
2761
2762         return res >= 0 ? res : 0;
2763 }
2764 EXPORT_SYMBOL_GPL(sock_prot_inuse_get);
2765
2766 static int __net_init sock_inuse_init_net(struct net *net)
2767 {
2768         net->core.inuse = alloc_percpu(struct prot_inuse);
2769         return net->core.inuse ? 0 : -ENOMEM;
2770 }
2771
2772 static void __net_exit sock_inuse_exit_net(struct net *net)
2773 {
2774         free_percpu(net->core.inuse);
2775 }
2776
2777 static struct pernet_operations net_inuse_ops = {
2778         .init = sock_inuse_init_net,
2779         .exit = sock_inuse_exit_net,
2780 };
2781
2782 static __init int net_inuse_init(void)
2783 {
2784         if (register_pernet_subsys(&net_inuse_ops))
2785                 panic("Cannot initialize net inuse counters");
2786
2787         return 0;
2788 }
2789
2790 core_initcall(net_inuse_init);
2791 #else
2792 static DEFINE_PER_CPU(struct prot_inuse, prot_inuse);
2793
2794 void sock_prot_inuse_add(struct net *net, struct proto *prot, int val)
2795 {
2796         __this_cpu_add(prot_inuse.val[prot->inuse_idx], val);
2797 }
2798 EXPORT_SYMBOL_GPL(sock_prot_inuse_add);
2799
2800 int sock_prot_inuse_get(struct net *net, struct proto *prot)
2801 {
2802         int cpu, idx = prot->inuse_idx;
2803         int res = 0;
2804
2805         for_each_possible_cpu(cpu)
2806                 res += per_cpu(prot_inuse, cpu).val[idx];
2807
2808         return res >= 0 ? res : 0;
2809 }
2810 EXPORT_SYMBOL_GPL(sock_prot_inuse_get);
2811 #endif
2812
2813 static void assign_proto_idx(struct proto *prot)
2814 {
2815         prot->inuse_idx = find_first_zero_bit(proto_inuse_idx, PROTO_INUSE_NR);
2816
2817         if (unlikely(prot->inuse_idx == PROTO_INUSE_NR - 1)) {
2818                 pr_err("PROTO_INUSE_NR exhausted\n");
2819                 return;
2820         }
2821
2822         set_bit(prot->inuse_idx, proto_inuse_idx);
2823 }
2824
2825 static void release_proto_idx(struct proto *prot)
2826 {
2827         if (prot->inuse_idx != PROTO_INUSE_NR - 1)
2828                 clear_bit(prot->inuse_idx, proto_inuse_idx);
2829 }
2830 #else
2831 static inline void assign_proto_idx(struct proto *prot)
2832 {
2833 }
2834
2835 static inline void release_proto_idx(struct proto *prot)
2836 {
2837 }
2838 #endif
2839
2840 static void req_prot_cleanup(struct request_sock_ops *rsk_prot)
2841 {
2842         if (!rsk_prot)
2843                 return;
2844         kfree(rsk_prot->slab_name);
2845         rsk_prot->slab_name = NULL;
2846         kmem_cache_destroy(rsk_prot->slab);
2847         rsk_prot->slab = NULL;
2848 }
2849
2850 static int req_prot_init(const struct proto *prot)
2851 {
2852         struct request_sock_ops *rsk_prot = prot->rsk_prot;
2853
2854         if (!rsk_prot)
2855                 return 0;
2856
2857         rsk_prot->slab_name = kasprintf(GFP_KERNEL, "request_sock_%s",
2858                                         prot->name);
2859         if (!rsk_prot->slab_name)
2860                 return -ENOMEM;
2861
2862         rsk_prot->slab = kmem_cache_create(rsk_prot->slab_name,
2863                                            rsk_prot->obj_size, 0,
2864                                            prot->slab_flags, NULL);
2865
2866         if (!rsk_prot->slab) {
2867                 pr_crit("%s: Can't create request sock SLAB cache!\n",
2868                         prot->name);
2869                 return -ENOMEM;
2870         }
2871         return 0;
2872 }
2873
2874 int proto_register(struct proto *prot, int alloc_slab)
2875 {
2876         if (alloc_slab) {
2877                 prot->slab = kmem_cache_create(prot->name, prot->obj_size, 0,
2878                                         SLAB_HWCACHE_ALIGN | prot->slab_flags,
2879                                         NULL);
2880
2881                 if (prot->slab == NULL) {
2882                         pr_crit("%s: Can't create sock SLAB cache!\n",
2883                                 prot->name);
2884                         goto out;
2885                 }
2886
2887                 if (req_prot_init(prot))
2888                         goto out_free_request_sock_slab;
2889
2890                 if (prot->twsk_prot != NULL) {
2891                         prot->twsk_prot->twsk_slab_name = kasprintf(GFP_KERNEL, "tw_sock_%s", prot->name);
2892
2893                         if (prot->twsk_prot->twsk_slab_name == NULL)
2894                                 goto out_free_request_sock_slab;
2895
2896                         prot->twsk_prot->twsk_slab =
2897                                 kmem_cache_create(prot->twsk_prot->twsk_slab_name,
2898                                                   prot->twsk_prot->twsk_obj_size,
2899                                                   0,
2900                                                   prot->slab_flags,
2901                                                   NULL);
2902                         if (prot->twsk_prot->twsk_slab == NULL)
2903                                 goto out_free_timewait_sock_slab_name;
2904                 }
2905         }
2906
2907         mutex_lock(&proto_list_mutex);
2908         list_add(&prot->node, &proto_list);
2909         assign_proto_idx(prot);
2910         mutex_unlock(&proto_list_mutex);
2911         return 0;
2912
2913 out_free_timewait_sock_slab_name:
2914         kfree(prot->twsk_prot->twsk_slab_name);
2915 out_free_request_sock_slab:
2916         req_prot_cleanup(prot->rsk_prot);
2917
2918         kmem_cache_destroy(prot->slab);
2919         prot->slab = NULL;
2920 out:
2921         return -ENOBUFS;
2922 }
2923 EXPORT_SYMBOL(proto_register);
2924
2925 void proto_unregister(struct proto *prot)
2926 {
2927         mutex_lock(&proto_list_mutex);
2928         release_proto_idx(prot);
2929         list_del(&prot->node);
2930         mutex_unlock(&proto_list_mutex);
2931
2932         kmem_cache_destroy(prot->slab);
2933         prot->slab = NULL;
2934
2935         req_prot_cleanup(prot->rsk_prot);
2936
2937         if (prot->twsk_prot != NULL && prot->twsk_prot->twsk_slab != NULL) {
2938                 kmem_cache_destroy(prot->twsk_prot->twsk_slab);
2939                 kfree(prot->twsk_prot->twsk_slab_name);
2940                 prot->twsk_prot->twsk_slab = NULL;
2941         }
2942 }
2943 EXPORT_SYMBOL(proto_unregister);
2944
2945 #ifdef CONFIG_PROC_FS
2946 static void *proto_seq_start(struct seq_file *seq, loff_t *pos)
2947         __acquires(proto_list_mutex)
2948 {
2949         mutex_lock(&proto_list_mutex);
2950         return seq_list_start_head(&proto_list, *pos);
2951 }
2952
2953 static void *proto_seq_next(struct seq_file *seq, void *v, loff_t *pos)
2954 {
2955         return seq_list_next(v, &proto_list, pos);
2956 }
2957
2958 static void proto_seq_stop(struct seq_file *seq, void *v)
2959         __releases(proto_list_mutex)
2960 {
2961         mutex_unlock(&proto_list_mutex);
2962 }
2963
2964 static char proto_method_implemented(const void *method)
2965 {
2966         return method == NULL ? 'n' : 'y';
2967 }
2968 static long sock_prot_memory_allocated(struct proto *proto)
2969 {
2970         return proto->memory_allocated != NULL ? proto_memory_allocated(proto) : -1L;
2971 }
2972
2973 static char *sock_prot_memory_pressure(struct proto *proto)
2974 {
2975         return proto->memory_pressure != NULL ?
2976         proto_memory_pressure(proto) ? "yes" : "no" : "NI";
2977 }
2978
2979 static void proto_seq_printf(struct seq_file *seq, struct proto *proto)
2980 {
2981
2982         seq_printf(seq, "%-9s %4u %6d  %6ld   %-3s %6u   %-3s  %-10s "
2983                         "%2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c %2c\n",
2984                    proto->name,
2985                    proto->obj_size,
2986                    sock_prot_inuse_get(seq_file_net(seq), proto),
2987                    sock_prot_memory_allocated(proto),
2988                    sock_prot_memory_pressure(proto),
2989                    proto->max_header,
2990                    proto->slab == NULL ? "no" : "yes",
2991                    module_name(proto->owner),
2992                    proto_method_implemented(proto->close),
2993                    proto_method_implemented(proto->connect),
2994                    proto_method_implemented(proto->disconnect),
2995                    proto_method_implemented(proto->accept),
2996                    proto_method_implemented(proto->ioctl),
2997                    proto_method_implemented(proto->init),
2998                    proto_method_implemented(proto->destroy),
2999                    proto_method_implemented(proto->shutdown),
3000                    proto_method_implemented(proto->setsockopt),
3001                    proto_method_implemented(proto->getsockopt),
3002                    proto_method_implemented(proto->sendmsg),
3003                    proto_method_implemented(proto->recvmsg),
3004                    proto_method_implemented(proto->sendpage),
3005                    proto_method_implemented(proto->bind),
3006                    proto_method_implemented(proto->backlog_rcv),
3007                    proto_method_implemented(proto->hash),
3008                    proto_method_implemented(proto->unhash),
3009                    proto_method_implemented(proto->get_port),
3010                    proto_method_implemented(proto->enter_memory_pressure));
3011 }
3012
3013 static int proto_seq_show(struct seq_file *seq, void *v)
3014 {
3015         if (v == &proto_list)
3016                 seq_printf(seq, "%-9s %-4s %-8s %-6s %-5s %-7s %-4s %-10s %s",
3017                            "protocol",
3018                            "size",
3019                            "sockets",
3020                            "memory",
3021                            "press",
3022                            "maxhdr",
3023                            "slab",
3024                            "module",
3025                            "cl co di ac io in de sh ss gs se re sp bi br ha uh gp em\n");
3026         else
3027                 proto_seq_printf(seq, list_entry(v, struct proto, node));
3028         return 0;
3029 }
3030
3031 static const struct seq_operations proto_seq_ops = {
3032         .start  = proto_seq_start,
3033         .next   = proto_seq_next,
3034         .stop   = proto_seq_stop,
3035         .show   = proto_seq_show,
3036 };
3037
3038 static int proto_seq_open(struct inode *inode, struct file *file)
3039 {
3040         return seq_open_net(inode, file, &proto_seq_ops,
3041                             sizeof(struct seq_net_private));
3042 }
3043
3044 static const struct file_operations proto_seq_fops = {
3045         .owner          = THIS_MODULE,
3046         .open           = proto_seq_open,
3047         .read           = seq_read,
3048         .llseek         = seq_lseek,
3049         .release        = seq_release_net,
3050 };
3051
3052 static __net_init int proto_init_net(struct net *net)
3053 {
3054         if (!proc_create("protocols", S_IRUGO, net->proc_net, &proto_seq_fops))
3055                 return -ENOMEM;
3056
3057         return 0;
3058 }
3059
3060 static __net_exit void proto_exit_net(struct net *net)
3061 {
3062         remove_proc_entry("protocols", net->proc_net);
3063 }
3064
3065
3066 static __net_initdata struct pernet_operations proto_net_ops = {
3067         .init = proto_init_net,
3068         .exit = proto_exit_net,
3069 };
3070
3071 static int __init proto_init(void)
3072 {
3073         return register_pernet_subsys(&proto_net_ops);
3074 }
3075
3076 subsys_initcall(proto_init);
3077
3078 #endif /* PROC_FS */