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