This commit was manufactured by cvs2svn to create tag
[linux-2.6.git] / 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  * Version:     $Id: sock.c,v 1.117 2002/02/01 22:01:03 davem Exp $
11  *
12  * Authors:     Ross Biro, <bir7@leland.Stanford.Edu>
13  *              Fred N. van Kempen, <waltje@uWalt.NL.Mugnet.ORG>
14  *              Florian La Roche, <flla@stud.uni-sb.de>
15  *              Alan Cox, <A.Cox@swansea.ac.uk>
16  *
17  * Fixes:
18  *              Alan Cox        :       Numerous verify_area() problems
19  *              Alan Cox        :       Connecting on a connecting socket
20  *                                      now returns an error for tcp.
21  *              Alan Cox        :       sock->protocol is set correctly.
22  *                                      and is not sometimes left as 0.
23  *              Alan Cox        :       connect handles icmp errors on a
24  *                                      connect properly. Unfortunately there
25  *                                      is a restart syscall nasty there. I
26  *                                      can't match BSD without hacking the C
27  *                                      library. Ideas urgently sought!
28  *              Alan Cox        :       Disallow bind() to addresses that are
29  *                                      not ours - especially broadcast ones!!
30  *              Alan Cox        :       Socket 1024 _IS_ ok for users. (fencepost)
31  *              Alan Cox        :       sock_wfree/sock_rfree don't destroy sockets,
32  *                                      instead they leave that for the DESTROY timer.
33  *              Alan Cox        :       Clean up error flag in accept
34  *              Alan Cox        :       TCP ack handling is buggy, the DESTROY timer
35  *                                      was buggy. Put a remove_sock() in the handler
36  *                                      for memory when we hit 0. Also altered the timer
37  *                                      code. The ACK stuff can wait and needs major 
38  *                                      TCP layer surgery.
39  *              Alan Cox        :       Fixed TCP ack bug, removed remove sock
40  *                                      and fixed timer/inet_bh race.
41  *              Alan Cox        :       Added zapped flag for TCP
42  *              Alan Cox        :       Move kfree_skb into skbuff.c and tidied up surplus code
43  *              Alan Cox        :       for new sk_buff allocations wmalloc/rmalloc now call alloc_skb
44  *              Alan Cox        :       kfree_s calls now are kfree_skbmem so we can track skb resources
45  *              Alan Cox        :       Supports socket option broadcast now as does udp. Packet and raw need fixing.
46  *              Alan Cox        :       Added RCVBUF,SNDBUF size setting. It suddenly occurred to me how easy it was so...
47  *              Rick Sladkey    :       Relaxed UDP rules for matching packets.
48  *              C.E.Hawkins     :       IFF_PROMISC/SIOCGHWADDR support
49  *      Pauline Middelink       :       identd support
50  *              Alan Cox        :       Fixed connect() taking signals I think.
51  *              Alan Cox        :       SO_LINGER supported
52  *              Alan Cox        :       Error reporting fixes
53  *              Anonymous       :       inet_create tidied up (sk->reuse setting)
54  *              Alan Cox        :       inet sockets don't set sk->type!
55  *              Alan Cox        :       Split socket option code
56  *              Alan Cox        :       Callbacks
57  *              Alan Cox        :       Nagle flag for Charles & Johannes stuff
58  *              Alex            :       Removed restriction on inet fioctl
59  *              Alan Cox        :       Splitting INET from NET core
60  *              Alan Cox        :       Fixed bogus SO_TYPE handling in getsockopt()
61  *              Adam Caldwell   :       Missing return in SO_DONTROUTE/SO_DEBUG code
62  *              Alan Cox        :       Split IP from generic code
63  *              Alan Cox        :       New kfree_skbmem()
64  *              Alan Cox        :       Make SO_DEBUG superuser only.
65  *              Alan Cox        :       Allow anyone to clear SO_DEBUG
66  *                                      (compatibility fix)
67  *              Alan Cox        :       Added optimistic memory grabbing for AF_UNIX throughput.
68  *              Alan Cox        :       Allocator for a socket is settable.
69  *              Alan Cox        :       SO_ERROR includes soft errors.
70  *              Alan Cox        :       Allow NULL arguments on some SO_ opts
71  *              Alan Cox        :       Generic socket allocation to make hooks
72  *                                      easier (suggested by Craig Metz).
73  *              Michael Pall    :       SO_ERROR returns positive errno again
74  *              Steve Whitehouse:       Added default destructor to free
75  *                                      protocol private data.
76  *              Steve Whitehouse:       Added various other default routines
77  *                                      common to several socket families.
78  *              Chris Evans     :       Call suser() check last on F_SETOWN
79  *              Jay Schulist    :       Added SO_ATTACH_FILTER and SO_DETACH_FILTER.
80  *              Andi Kleen      :       Add sock_kmalloc()/sock_kfree_s()
81  *              Andi Kleen      :       Fix write_space callback
82  *              Chris Evans     :       Security fixes - signedness again
83  *              Arnaldo C. Melo :       cleanups, use skb_queue_purge
84  *
85  * To Fix:
86  *
87  *
88  *              This program is free software; you can redistribute it and/or
89  *              modify it under the terms of the GNU General Public License
90  *              as published by the Free Software Foundation; either version
91  *              2 of the License, or (at your option) any later version.
92  */
93
94 #include <linux/config.h>
95 #include <linux/errno.h>
96 #include <linux/types.h>
97 #include <linux/socket.h>
98 #include <linux/in.h>
99 #include <linux/kernel.h>
100 #include <linux/major.h>
101 #include <linux/module.h>
102 #include <linux/sched.h>
103 #include <linux/timer.h>
104 #include <linux/string.h>
105 #include <linux/sockios.h>
106 #include <linux/net.h>
107 #include <linux/mm.h>
108 #include <linux/slab.h>
109 #include <linux/interrupt.h>
110 #include <linux/poll.h>
111 #include <linux/tcp.h>
112 #include <linux/init.h>
113
114 #include <asm/uaccess.h>
115 #include <asm/system.h>
116
117 #include <linux/netdevice.h>
118 #include <net/protocol.h>
119 #include <linux/skbuff.h>
120 #include <net/sock.h>
121 #include <net/xfrm.h>
122 #include <linux/ipsec.h>
123
124 #include <linux/filter.h>
125 #include <linux/vs_socket.h>
126
127 #ifdef CONFIG_INET
128 #include <net/tcp.h>
129 #endif
130
131 /* Take into consideration the size of the struct sk_buff overhead in the
132  * determination of these values, since that is non-constant across
133  * platforms.  This makes socket queueing behavior and performance
134  * not depend upon such differences.
135  */
136 #define _SK_MEM_PACKETS         256
137 #define _SK_MEM_OVERHEAD        (sizeof(struct sk_buff) + 256)
138 #define SK_WMEM_MAX             (_SK_MEM_OVERHEAD * _SK_MEM_PACKETS)
139 #define SK_RMEM_MAX             (_SK_MEM_OVERHEAD * _SK_MEM_PACKETS)
140
141 /* Run time adjustable parameters. */
142 __u32 sysctl_wmem_max = SK_WMEM_MAX;
143 __u32 sysctl_rmem_max = SK_RMEM_MAX;
144 __u32 sysctl_wmem_default = SK_WMEM_MAX;
145 __u32 sysctl_rmem_default = SK_RMEM_MAX;
146
147 /* Maximal space eaten by iovec or ancilliary data plus some space */
148 int sysctl_optmem_max = sizeof(unsigned long)*(2*UIO_MAXIOV + 512);
149
150 static int sock_set_timeout(long *timeo_p, char __user *optval, int optlen)
151 {
152         struct timeval tv;
153
154         if (optlen < sizeof(tv))
155                 return -EINVAL;
156         if (copy_from_user(&tv, optval, sizeof(tv)))
157                 return -EFAULT;
158
159         *timeo_p = MAX_SCHEDULE_TIMEOUT;
160         if (tv.tv_sec == 0 && tv.tv_usec == 0)
161                 return 0;
162         if (tv.tv_sec < (MAX_SCHEDULE_TIMEOUT/HZ - 1))
163                 *timeo_p = tv.tv_sec*HZ + (tv.tv_usec+(1000000/HZ-1))/(1000000/HZ);
164         return 0;
165 }
166
167 static void sock_warn_obsolete_bsdism(const char *name)
168 {
169         static int warned;
170         static char warncomm[16];
171         if (strcmp(warncomm, current->comm) && warned < 5) { 
172                 strcpy(warncomm,  current->comm); 
173                 printk(KERN_WARNING "process `%s' is using obsolete "
174                        "%s SO_BSDCOMPAT\n", warncomm, name);
175                 warned++;
176         }
177 }
178
179 /*
180  *      This is meant for all protocols to use and covers goings on
181  *      at the socket level. Everything here is generic.
182  */
183
184 int sock_setsockopt(struct socket *sock, int level, int optname,
185                     char __user *optval, int optlen)
186 {
187         struct sock *sk=sock->sk;
188         struct sk_filter *filter;
189         int val;
190         int valbool;
191         struct linger ling;
192         int ret = 0;
193         
194         /*
195          *      Options without arguments
196          */
197
198 #ifdef SO_DONTLINGER            /* Compatibility item... */
199         switch (optname) {
200                 case SO_DONTLINGER:
201                         sock_reset_flag(sk, SOCK_LINGER);
202                         return 0;
203         }
204 #endif  
205                 
206         if(optlen<sizeof(int))
207                 return(-EINVAL);
208         
209         if (get_user(val, (int __user *)optval))
210                 return -EFAULT;
211         
212         valbool = val?1:0;
213
214         lock_sock(sk);
215
216         switch(optname) 
217         {
218                 case SO_DEBUG:  
219                         if(val && !capable(CAP_NET_ADMIN))
220                         {
221                                 ret = -EACCES;
222                         }
223                         else
224                                 sk->sk_debug = valbool;
225                         break;
226                 case SO_REUSEADDR:
227                         sk->sk_reuse = valbool;
228                         break;
229                 case SO_TYPE:
230                 case SO_ERROR:
231                         ret = -ENOPROTOOPT;
232                         break;
233                 case SO_DONTROUTE:
234                         sk->sk_localroute = valbool;
235                         break;
236                 case SO_BROADCAST:
237                         sock_valbool_flag(sk, SOCK_BROADCAST, valbool);
238                         break;
239                 case SO_SNDBUF:
240                         /* Don't error on this BSD doesn't and if you think
241                            about it this is right. Otherwise apps have to
242                            play 'guess the biggest size' games. RCVBUF/SNDBUF
243                            are treated in BSD as hints */
244                            
245                         if (val > sysctl_wmem_max)
246                                 val = sysctl_wmem_max;
247
248                         sk->sk_userlocks |= SOCK_SNDBUF_LOCK;
249                         if ((val * 2) < SOCK_MIN_SNDBUF)
250                                 sk->sk_sndbuf = SOCK_MIN_SNDBUF;
251                         else
252                                 sk->sk_sndbuf = val * 2;
253
254                         /*
255                          *      Wake up sending tasks if we
256                          *      upped the value.
257                          */
258                         sk->sk_write_space(sk);
259                         break;
260
261                 case SO_RCVBUF:
262                         /* Don't error on this BSD doesn't and if you think
263                            about it this is right. Otherwise apps have to
264                            play 'guess the biggest size' games. RCVBUF/SNDBUF
265                            are treated in BSD as hints */
266                           
267                         if (val > sysctl_rmem_max)
268                                 val = sysctl_rmem_max;
269
270                         sk->sk_userlocks |= SOCK_RCVBUF_LOCK;
271                         /* FIXME: is this lower bound the right one? */
272                         if ((val * 2) < SOCK_MIN_RCVBUF)
273                                 sk->sk_rcvbuf = SOCK_MIN_RCVBUF;
274                         else
275                                 sk->sk_rcvbuf = val * 2;
276                         break;
277
278                 case SO_KEEPALIVE:
279 #ifdef CONFIG_INET
280                         if (sk->sk_protocol == IPPROTO_TCP)
281                                 tcp_set_keepalive(sk, valbool);
282 #endif
283                         sock_valbool_flag(sk, SOCK_KEEPOPEN, valbool);
284                         break;
285
286                 case SO_OOBINLINE:
287                         sock_valbool_flag(sk, SOCK_URGINLINE, valbool);
288                         break;
289
290                 case SO_NO_CHECK:
291                         sk->sk_no_check = valbool;
292                         break;
293
294                 case SO_PRIORITY:
295                         if ((val >= 0 && val <= 6) || capable(CAP_NET_ADMIN)) 
296                                 sk->sk_priority = val;
297                         else
298                                 ret = -EPERM;
299                         break;
300
301                 case SO_LINGER:
302                         if(optlen<sizeof(ling)) {
303                                 ret = -EINVAL;  /* 1003.1g */
304                                 break;
305                         }
306                         if (copy_from_user(&ling,optval,sizeof(ling))) {
307                                 ret = -EFAULT;
308                                 break;
309                         }
310                         if (!ling.l_onoff)
311                                 sock_reset_flag(sk, SOCK_LINGER);
312                         else {
313 #if (BITS_PER_LONG == 32)
314                                 if (ling.l_linger >= MAX_SCHEDULE_TIMEOUT/HZ)
315                                         sk->sk_lingertime = MAX_SCHEDULE_TIMEOUT;
316                                 else
317 #endif
318                                         sk->sk_lingertime = ling.l_linger * HZ;
319                                 sock_set_flag(sk, SOCK_LINGER);
320                         }
321                         break;
322
323                 case SO_BSDCOMPAT:
324                         sock_warn_obsolete_bsdism("setsockopt");
325                         break;
326
327                 case SO_PASSCRED:
328                         if (valbool)
329                                 set_bit(SOCK_PASS_CRED, &sock->flags);
330                         else
331                                 clear_bit(SOCK_PASS_CRED, &sock->flags);
332                         break;
333
334                 case SO_TIMESTAMP:
335                         sk->sk_rcvtstamp = valbool;
336                         if (valbool) 
337                                 sock_enable_timestamp(sk);
338                         break;
339
340                 case SO_RCVLOWAT:
341                         if (val < 0)
342                                 val = INT_MAX;
343                         sk->sk_rcvlowat = val ? : 1;
344                         break;
345
346                 case SO_RCVTIMEO:
347                         ret = sock_set_timeout(&sk->sk_rcvtimeo, optval, optlen);
348                         break;
349
350                 case SO_SNDTIMEO:
351                         ret = sock_set_timeout(&sk->sk_sndtimeo, optval, optlen);
352                         break;
353
354 #ifdef CONFIG_NETDEVICES
355                 case SO_BINDTODEVICE:
356                 {
357                         char devname[IFNAMSIZ]; 
358
359                         /* Sorry... */ 
360                         if (!capable(CAP_NET_RAW)) {
361                                 ret = -EPERM;
362                                 break;
363                         }
364
365                         /* Bind this socket to a particular device like "eth0",
366                          * as specified in the passed interface name. If the
367                          * name is "" or the option length is zero the socket 
368                          * is not bound. 
369                          */ 
370
371                         if (!valbool) {
372                                 sk->sk_bound_dev_if = 0;
373                         } else {
374                                 if (optlen > IFNAMSIZ) 
375                                         optlen = IFNAMSIZ; 
376                                 if (copy_from_user(devname, optval, optlen)) {
377                                         ret = -EFAULT;
378                                         break;
379                                 }
380
381                                 /* Remove any cached route for this socket. */
382                                 sk_dst_reset(sk);
383
384                                 if (devname[0] == '\0') {
385                                         sk->sk_bound_dev_if = 0;
386                                 } else {
387                                         struct net_device *dev = dev_get_by_name(devname);
388                                         if (!dev) {
389                                                 ret = -ENODEV;
390                                                 break;
391                                         }
392                                         sk->sk_bound_dev_if = dev->ifindex;
393                                         dev_put(dev);
394                                 }
395                         }
396                         break;
397                 }
398 #endif
399
400
401                 case SO_ATTACH_FILTER:
402                         ret = -EINVAL;
403                         if (optlen == sizeof(struct sock_fprog)) {
404                                 struct sock_fprog fprog;
405
406                                 ret = -EFAULT;
407                                 if (copy_from_user(&fprog, optval, sizeof(fprog)))
408                                         break;
409
410                                 ret = sk_attach_filter(&fprog, sk);
411                         }
412                         break;
413
414                 case SO_DETACH_FILTER:
415                         spin_lock_bh(&sk->sk_lock.slock);
416                         filter = sk->sk_filter;
417                         if (filter) {
418                                 sk->sk_filter = NULL;
419                                 spin_unlock_bh(&sk->sk_lock.slock);
420                                 sk_filter_release(sk, filter);
421                                 break;
422                         }
423                         spin_unlock_bh(&sk->sk_lock.slock);
424                         ret = -ENONET;
425                         break;
426
427                 /* We implement the SO_SNDLOWAT etc to
428                    not be settable (1003.1g 5.3) */
429                 default:
430                         ret = -ENOPROTOOPT;
431                         break;
432         }
433         release_sock(sk);
434         return ret;
435 }
436
437
438 int sock_getsockopt(struct socket *sock, int level, int optname,
439                     char __user *optval, int __user *optlen)
440 {
441         struct sock *sk = sock->sk;
442         
443         union
444         {
445                 int val;
446                 struct linger ling;
447                 struct timeval tm;
448         } v;
449         
450         unsigned int lv = sizeof(int);
451         int len;
452         
453         if(get_user(len,optlen))
454                 return -EFAULT;
455         if(len < 0)
456                 return -EINVAL;
457                 
458         switch(optname) 
459         {
460                 case SO_DEBUG:          
461                         v.val = sk->sk_debug;
462                         break;
463                 
464                 case SO_DONTROUTE:
465                         v.val = sk->sk_localroute;
466                         break;
467                 
468                 case SO_BROADCAST:
469                         v.val = !!sock_flag(sk, SOCK_BROADCAST);
470                         break;
471
472                 case SO_SNDBUF:
473                         v.val = sk->sk_sndbuf;
474                         break;
475                 
476                 case SO_RCVBUF:
477                         v.val = sk->sk_rcvbuf;
478                         break;
479
480                 case SO_REUSEADDR:
481                         v.val = sk->sk_reuse;
482                         break;
483
484                 case SO_KEEPALIVE:
485                         v.val = !!sock_flag(sk, SOCK_KEEPOPEN);
486                         break;
487
488                 case SO_TYPE:
489                         v.val = sk->sk_type;                            
490                         break;
491
492                 case SO_ERROR:
493                         v.val = -sock_error(sk);
494                         if(v.val==0)
495                                 v.val = xchg(&sk->sk_err_soft, 0);
496                         break;
497
498                 case SO_OOBINLINE:
499                         v.val = !!sock_flag(sk, SOCK_URGINLINE);
500                         break;
501         
502                 case SO_NO_CHECK:
503                         v.val = sk->sk_no_check;
504                         break;
505
506                 case SO_PRIORITY:
507                         v.val = sk->sk_priority;
508                         break;
509                 
510                 case SO_LINGER: 
511                         lv              = sizeof(v.ling);
512                         v.ling.l_onoff  = !!sock_flag(sk, SOCK_LINGER);
513                         v.ling.l_linger = sk->sk_lingertime / HZ;
514                         break;
515                                         
516                 case SO_BSDCOMPAT:
517                         sock_warn_obsolete_bsdism("getsockopt");
518                         break;
519
520                 case SO_TIMESTAMP:
521                         v.val = sk->sk_rcvtstamp;
522                         break;
523
524                 case SO_RCVTIMEO:
525                         lv=sizeof(struct timeval);
526                         if (sk->sk_rcvtimeo == MAX_SCHEDULE_TIMEOUT) {
527                                 v.tm.tv_sec = 0;
528                                 v.tm.tv_usec = 0;
529                         } else {
530                                 v.tm.tv_sec = sk->sk_rcvtimeo / HZ;
531                                 v.tm.tv_usec = ((sk->sk_rcvtimeo % HZ) * 1000000) / HZ;
532                         }
533                         break;
534
535                 case SO_SNDTIMEO:
536                         lv=sizeof(struct timeval);
537                         if (sk->sk_sndtimeo == MAX_SCHEDULE_TIMEOUT) {
538                                 v.tm.tv_sec = 0;
539                                 v.tm.tv_usec = 0;
540                         } else {
541                                 v.tm.tv_sec = sk->sk_sndtimeo / HZ;
542                                 v.tm.tv_usec = ((sk->sk_sndtimeo % HZ) * 1000000) / HZ;
543                         }
544                         break;
545
546                 case SO_RCVLOWAT:
547                         v.val = sk->sk_rcvlowat;
548                         break;
549
550                 case SO_SNDLOWAT:
551                         v.val=1;
552                         break; 
553
554                 case SO_PASSCRED:
555                         v.val = test_bit(SOCK_PASS_CRED, &sock->flags)?1:0;
556                         break;
557
558                 case SO_PEERCRED:
559                         if (len > sizeof(sk->sk_peercred))
560                                 len = sizeof(sk->sk_peercred);
561                         if (copy_to_user(optval, &sk->sk_peercred, len))
562                                 return -EFAULT;
563                         goto lenout;
564
565                 case SO_PEERNAME:
566                 {
567                         char address[128];
568
569                         if (sock->ops->getname(sock, (struct sockaddr *)address, &lv, 2))
570                                 return -ENOTCONN;
571                         if (lv < len)
572                                 return -EINVAL;
573                         if (copy_to_user(optval, address, len))
574                                 return -EFAULT;
575                         goto lenout;
576                 }
577
578                 /* Dubious BSD thing... Probably nobody even uses it, but
579                  * the UNIX standard wants it for whatever reason... -DaveM
580                  */
581                 case SO_ACCEPTCONN:
582                         v.val = sk->sk_state == TCP_LISTEN;
583                         break;
584
585                 case SO_PEERSEC:
586                         return security_socket_getpeersec(sock, optval, optlen, len);
587
588                 default:
589                         return(-ENOPROTOOPT);
590         }
591         if (len > lv)
592                 len = lv;
593         if (copy_to_user(optval, &v, len))
594                 return -EFAULT;
595 lenout:
596         if (put_user(len, optlen))
597                 return -EFAULT;
598         return 0;
599 }
600
601 static kmem_cache_t *sk_cachep;
602
603 /**
604  *      sk_alloc - All socket objects are allocated here
605  *      @family - protocol family
606  *      @priority - for allocation (%GFP_KERNEL, %GFP_ATOMIC, etc)
607  *      @zero_it - zeroes the allocated sock
608  *      @slab - alternate slab
609  *
610  *      All socket objects are allocated here. If @zero_it is non-zero
611  *      it should have the size of the are to be zeroed, because the
612  *      private slabcaches have different sizes of the generic struct sock.
613  *      1 has been kept as a way to say sizeof(struct sock).
614  */
615 struct sock *sk_alloc(int family, int priority, int zero_it, kmem_cache_t *slab)
616 {
617         struct sock *sk = NULL;
618
619         if (!slab)
620                 slab = sk_cachep;
621         sk = kmem_cache_alloc(slab, priority);
622         if (sk) {
623                 if (zero_it) {
624                         memset(sk, 0,
625                                zero_it == 1 ? sizeof(struct sock) : zero_it);
626                         sk->sk_family = family;
627                         sock_lock_init(sk);
628                 }
629                 sk->sk_slab = slab;
630                 sock_vx_init(sk);
631                 sock_nx_init(sk);
632                 
633                 if (security_sk_alloc(sk, family, priority)) {
634                         kmem_cache_free(slab, sk);
635                         sk = NULL;
636                 }
637         }
638         return sk;
639 }
640
641 void sk_free(struct sock *sk)
642 {
643         struct sk_filter *filter;
644         struct module *owner = sk->sk_owner;
645
646         if (sk->sk_destruct)
647                 sk->sk_destruct(sk);
648
649         filter = sk->sk_filter;
650         if (filter) {
651                 sk_filter_release(sk, filter);
652                 sk->sk_filter = NULL;
653         }
654
655         sock_disable_timestamp(sk);
656
657         if (atomic_read(&sk->sk_omem_alloc))
658                 printk(KERN_DEBUG "%s: optmem leakage (%d bytes) detected.\n",
659                        __FUNCTION__, atomic_read(&sk->sk_omem_alloc));
660
661         /*
662          * If sendmsg cached page exists, toss it.
663          */
664         if (sk->sk_sndmsg_page) {
665                 __free_page(sk->sk_sndmsg_page);
666                 sk->sk_sndmsg_page = NULL;
667         }
668
669         security_sk_free(sk);
670         BUG_ON(sk->sk_vx_info);
671         BUG_ON(sk->sk_nx_info);
672         kmem_cache_free(sk->sk_slab, sk);
673         module_put(owner);
674 }
675
676 void __init sk_init(void)
677 {
678         sk_cachep = kmem_cache_create("sock", sizeof(struct sock), 0,
679                                       SLAB_HWCACHE_ALIGN, NULL, NULL);
680         if (!sk_cachep)
681                 printk(KERN_CRIT "sk_init: Cannot create sock SLAB cache!");
682
683         if (num_physpages <= 4096) {
684                 sysctl_wmem_max = 32767;
685                 sysctl_rmem_max = 32767;
686                 sysctl_wmem_default = 32767;
687                 sysctl_rmem_default = 32767;
688         } else if (num_physpages >= 131072) {
689                 sysctl_wmem_max = 131071;
690                 sysctl_rmem_max = 131071;
691         }
692 }
693
694 /*
695  *      Simple resource managers for sockets.
696  */
697
698
699 /* 
700  * Write buffer destructor automatically called from kfree_skb. 
701  */
702 void sock_wfree(struct sk_buff *skb)
703 {
704         struct sock *sk = skb->sk;
705
706         /* In case it might be waiting for more memory. */
707         atomic_sub(skb->truesize, &sk->sk_wmem_alloc);
708         if (!sk->sk_use_write_queue)
709                 sk->sk_write_space(sk);
710         sock_put(sk);
711 }
712
713 /* 
714  * Read buffer destructor automatically called from kfree_skb. 
715  */
716 void sock_rfree(struct sk_buff *skb)
717 {
718         struct sock *sk = skb->sk;
719
720         atomic_sub(skb->truesize, &sk->sk_rmem_alloc);
721 }
722
723
724 int sock_i_uid(struct sock *sk)
725 {
726         int uid;
727
728         read_lock(&sk->sk_callback_lock);
729         uid = sk->sk_socket ? SOCK_INODE(sk->sk_socket)->i_uid : 0;
730         read_unlock(&sk->sk_callback_lock);
731         return uid;
732 }
733
734 unsigned long sock_i_ino(struct sock *sk)
735 {
736         unsigned long ino;
737
738         read_lock(&sk->sk_callback_lock);
739         ino = sk->sk_socket ? SOCK_INODE(sk->sk_socket)->i_ino : 0;
740         read_unlock(&sk->sk_callback_lock);
741         return ino;
742 }
743
744 /*
745  * Allocate a skb from the socket's send buffer.
746  */
747 struct sk_buff *sock_wmalloc(struct sock *sk, unsigned long size, int force, int priority)
748 {
749         if (force || atomic_read(&sk->sk_wmem_alloc) < sk->sk_sndbuf) {
750                 struct sk_buff * skb = alloc_skb(size, priority);
751                 if (skb) {
752                         skb_set_owner_w(skb, sk);
753                         return skb;
754                 }
755         }
756         return NULL;
757 }
758
759 /*
760  * Allocate a skb from the socket's receive buffer.
761  */ 
762 struct sk_buff *sock_rmalloc(struct sock *sk, unsigned long size, int force, int priority)
763 {
764         if (force || atomic_read(&sk->sk_rmem_alloc) < sk->sk_rcvbuf) {
765                 struct sk_buff *skb = alloc_skb(size, priority);
766                 if (skb) {
767                         skb_set_owner_r(skb, sk);
768                         return skb;
769                 }
770         }
771         return NULL;
772 }
773
774 /* 
775  * Allocate a memory block from the socket's option memory buffer.
776  */ 
777 void *sock_kmalloc(struct sock *sk, int size, int priority)
778 {
779         if ((unsigned)size <= sysctl_optmem_max &&
780             atomic_read(&sk->sk_omem_alloc) + size < sysctl_optmem_max) {
781                 void *mem;
782                 /* First do the add, to avoid the race if kmalloc
783                  * might sleep.
784                  */
785                 atomic_add(size, &sk->sk_omem_alloc);
786                 mem = kmalloc(size, priority);
787                 if (mem)
788                         return mem;
789                 atomic_sub(size, &sk->sk_omem_alloc);
790         }
791         return NULL;
792 }
793
794 /*
795  * Free an option memory block.
796  */
797 void sock_kfree_s(struct sock *sk, void *mem, int size)
798 {
799         kfree(mem);
800         atomic_sub(size, &sk->sk_omem_alloc);
801 }
802
803 /* It is almost wait_for_tcp_memory minus release_sock/lock_sock.
804    I think, these locks should be removed for datagram sockets.
805  */
806 static long sock_wait_for_wmem(struct sock * sk, long timeo)
807 {
808         DEFINE_WAIT(wait);
809
810         clear_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
811         for (;;) {
812                 if (!timeo)
813                         break;
814                 if (signal_pending(current))
815                         break;
816                 set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
817                 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
818                 if (atomic_read(&sk->sk_wmem_alloc) < sk->sk_sndbuf)
819                         break;
820                 if (sk->sk_shutdown & SEND_SHUTDOWN)
821                         break;
822                 if (sk->sk_err)
823                         break;
824                 timeo = schedule_timeout(timeo);
825         }
826         finish_wait(sk->sk_sleep, &wait);
827         return timeo;
828 }
829
830
831 /*
832  *      Generic send/receive buffer handlers
833  */
834
835 struct sk_buff *sock_alloc_send_pskb(struct sock *sk, unsigned long header_len,
836                                      unsigned long data_len, int noblock, int *errcode)
837 {
838         struct sk_buff *skb;
839         unsigned int gfp_mask;
840         long timeo;
841         int err;
842
843         gfp_mask = sk->sk_allocation;
844         if (gfp_mask & __GFP_WAIT)
845                 gfp_mask |= __GFP_REPEAT;
846
847         timeo = sock_sndtimeo(sk, noblock);
848         while (1) {
849                 err = sock_error(sk);
850                 if (err != 0)
851                         goto failure;
852
853                 err = -EPIPE;
854                 if (sk->sk_shutdown & SEND_SHUTDOWN)
855                         goto failure;
856
857                 if (atomic_read(&sk->sk_wmem_alloc) < sk->sk_sndbuf) {
858                         skb = alloc_skb(header_len, sk->sk_allocation);
859                         if (skb) {
860                                 int npages;
861                                 int i;
862
863                                 /* No pages, we're done... */
864                                 if (!data_len)
865                                         break;
866
867                                 npages = (data_len + (PAGE_SIZE - 1)) >> PAGE_SHIFT;
868                                 skb->truesize += data_len;
869                                 skb_shinfo(skb)->nr_frags = npages;
870                                 for (i = 0; i < npages; i++) {
871                                         struct page *page;
872                                         skb_frag_t *frag;
873
874                                         page = alloc_pages(sk->sk_allocation, 0);
875                                         if (!page) {
876                                                 err = -ENOBUFS;
877                                                 skb_shinfo(skb)->nr_frags = i;
878                                                 kfree_skb(skb);
879                                                 goto failure;
880                                         }
881
882                                         frag = &skb_shinfo(skb)->frags[i];
883                                         frag->page = page;
884                                         frag->page_offset = 0;
885                                         frag->size = (data_len >= PAGE_SIZE ?
886                                                       PAGE_SIZE :
887                                                       data_len);
888                                         data_len -= PAGE_SIZE;
889                                 }
890
891                                 /* Full success... */
892                                 break;
893                         }
894                         err = -ENOBUFS;
895                         goto failure;
896                 }
897                 set_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
898                 set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
899                 err = -EAGAIN;
900                 if (!timeo)
901                         goto failure;
902                 if (signal_pending(current))
903                         goto interrupted;
904                 timeo = sock_wait_for_wmem(sk, timeo);
905         }
906
907         skb_set_owner_w(skb, sk);
908         return skb;
909
910 interrupted:
911         err = sock_intr_errno(timeo);
912 failure:
913         *errcode = err;
914         return NULL;
915 }
916
917 struct sk_buff *sock_alloc_send_skb(struct sock *sk, unsigned long size, 
918                                     int noblock, int *errcode)
919 {
920         return sock_alloc_send_pskb(sk, size, 0, noblock, errcode);
921 }
922
923 void __lock_sock(struct sock *sk)
924 {
925         DEFINE_WAIT(wait);
926
927         for(;;) {
928                 prepare_to_wait_exclusive(&sk->sk_lock.wq, &wait,
929                                         TASK_UNINTERRUPTIBLE);
930                 spin_unlock_bh(&sk->sk_lock.slock);
931                 schedule();
932                 spin_lock_bh(&sk->sk_lock.slock);
933                 if(!sock_owned_by_user(sk))
934                         break;
935         }
936         finish_wait(&sk->sk_lock.wq, &wait);
937 }
938
939 void __release_sock(struct sock *sk)
940 {
941         struct sk_buff *skb = sk->sk_backlog.head;
942
943         do {
944                 sk->sk_backlog.head = sk->sk_backlog.tail = NULL;
945                 bh_unlock_sock(sk);
946
947                 do {
948                         struct sk_buff *next = skb->next;
949
950                         skb->next = NULL;
951                         sk->sk_backlog_rcv(sk, skb);
952                         skb = next;
953                 } while (skb != NULL);
954
955                 bh_lock_sock(sk);
956         } while((skb = sk->sk_backlog.head) != NULL);
957 }
958
959 /**
960  * sk_wait_data - wait for data to arrive at sk_receive_queue
961  * sk - sock to wait on
962  * timeo - for how long
963  *
964  * Now socket state including sk->sk_err is changed only under lock,
965  * hence we may omit checks after joining wait queue.
966  * We check receive queue before schedule() only as optimization;
967  * it is very likely that release_sock() added new data.
968  */
969 int sk_wait_data(struct sock *sk, long *timeo)
970 {
971         int rc;
972         DEFINE_WAIT(wait);
973
974         prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
975         set_bit(SOCK_ASYNC_WAITDATA, &sk->sk_socket->flags);
976         rc = sk_wait_event(sk, timeo, !skb_queue_empty(&sk->sk_receive_queue));
977         clear_bit(SOCK_ASYNC_WAITDATA, &sk->sk_socket->flags);
978         finish_wait(sk->sk_sleep, &wait);
979         return rc;
980 }
981
982 EXPORT_SYMBOL(sk_wait_data);
983
984 /*
985  * Set of default routines for initialising struct proto_ops when
986  * the protocol does not support a particular function. In certain
987  * cases where it makes no sense for a protocol to have a "do nothing"
988  * function, some default processing is provided.
989  */
990
991 int sock_no_release(struct socket *sock)
992 {
993         return 0;
994 }
995
996 int sock_no_bind(struct socket *sock, struct sockaddr *saddr, int len)
997 {
998         return -EOPNOTSUPP;
999 }
1000
1001 int sock_no_connect(struct socket *sock, struct sockaddr *saddr, 
1002                     int len, int flags)
1003 {
1004         return -EOPNOTSUPP;
1005 }
1006
1007 int sock_no_socketpair(struct socket *sock1, struct socket *sock2)
1008 {
1009         return -EOPNOTSUPP;
1010 }
1011
1012 int sock_no_accept(struct socket *sock, struct socket *newsock, int flags)
1013 {
1014         return -EOPNOTSUPP;
1015 }
1016
1017 int sock_no_getname(struct socket *sock, struct sockaddr *saddr, 
1018                     int *len, int peer)
1019 {
1020         return -EOPNOTSUPP;
1021 }
1022
1023 unsigned int sock_no_poll(struct file * file, struct socket *sock, poll_table *pt)
1024 {
1025         return 0;
1026 }
1027
1028 int sock_no_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
1029 {
1030         return -EOPNOTSUPP;
1031 }
1032
1033 int sock_no_listen(struct socket *sock, int backlog)
1034 {
1035         return -EOPNOTSUPP;
1036 }
1037
1038 int sock_no_shutdown(struct socket *sock, int how)
1039 {
1040         return -EOPNOTSUPP;
1041 }
1042
1043 int sock_no_setsockopt(struct socket *sock, int level, int optname,
1044                     char __user *optval, int optlen)
1045 {
1046         return -EOPNOTSUPP;
1047 }
1048
1049 int sock_no_getsockopt(struct socket *sock, int level, int optname,
1050                     char __user *optval, int __user *optlen)
1051 {
1052         return -EOPNOTSUPP;
1053 }
1054
1055 int sock_no_sendmsg(struct kiocb *iocb, struct socket *sock, struct msghdr *m,
1056                     size_t len)
1057 {
1058         return -EOPNOTSUPP;
1059 }
1060
1061 int sock_no_recvmsg(struct kiocb *iocb, struct socket *sock, struct msghdr *m,
1062                     size_t len, int flags)
1063 {
1064         return -EOPNOTSUPP;
1065 }
1066
1067 int sock_no_mmap(struct file *file, struct socket *sock, struct vm_area_struct *vma)
1068 {
1069         /* Mirror missing mmap method error code */
1070         return -ENODEV;
1071 }
1072
1073 ssize_t sock_no_sendpage(struct socket *sock, struct page *page, int offset, size_t size, int flags)
1074 {
1075         ssize_t res;
1076         struct msghdr msg;
1077         struct iovec iov;
1078         mm_segment_t old_fs;
1079         char *kaddr;
1080
1081         kaddr = kmap(page);
1082
1083         msg.msg_name = NULL;
1084         msg.msg_namelen = 0;
1085         msg.msg_iov = &iov;
1086         msg.msg_iovlen = 1;
1087         msg.msg_control = NULL;
1088         msg.msg_controllen = 0;
1089         msg.msg_flags = flags;
1090
1091         /* This cast is ok because of the "set_fs(KERNEL_DS)" */
1092         iov.iov_base = (void __user *) (kaddr + offset);
1093         iov.iov_len = size;
1094
1095         old_fs = get_fs();
1096         set_fs(KERNEL_DS);
1097         res = sock_sendmsg(sock, &msg, size);
1098         set_fs(old_fs);
1099
1100         kunmap(page);
1101         return res;
1102 }
1103
1104 /*
1105  *      Default Socket Callbacks
1106  */
1107
1108 void sock_def_wakeup(struct sock *sk)
1109 {
1110         read_lock(&sk->sk_callback_lock);
1111         if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
1112                 wake_up_interruptible_all(sk->sk_sleep);
1113         read_unlock(&sk->sk_callback_lock);
1114 }
1115
1116 void sock_def_error_report(struct sock *sk)
1117 {
1118         read_lock(&sk->sk_callback_lock);
1119         if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
1120                 wake_up_interruptible(sk->sk_sleep);
1121         sk_wake_async(sk,0,POLL_ERR); 
1122         read_unlock(&sk->sk_callback_lock);
1123 }
1124
1125 void sock_def_readable(struct sock *sk, int len)
1126 {
1127         read_lock(&sk->sk_callback_lock);
1128         if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
1129                 wake_up_interruptible(sk->sk_sleep);
1130         sk_wake_async(sk,1,POLL_IN);
1131         read_unlock(&sk->sk_callback_lock);
1132 }
1133
1134 void sock_def_write_space(struct sock *sk)
1135 {
1136         read_lock(&sk->sk_callback_lock);
1137
1138         /* Do not wake up a writer until he can make "significant"
1139          * progress.  --DaveM
1140          */
1141         if((atomic_read(&sk->sk_wmem_alloc) << 1) <= sk->sk_sndbuf) {
1142                 if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
1143                         wake_up_interruptible(sk->sk_sleep);
1144
1145                 /* Should agree with poll, otherwise some programs break */
1146                 if (sock_writeable(sk))
1147                         sk_wake_async(sk, 2, POLL_OUT);
1148         }
1149
1150         read_unlock(&sk->sk_callback_lock);
1151 }
1152
1153 void sock_def_destruct(struct sock *sk)
1154 {
1155         if (sk->sk_protinfo)
1156                 kfree(sk->sk_protinfo);
1157 }
1158
1159 void sk_send_sigurg(struct sock *sk)
1160 {
1161         if (sk->sk_socket && sk->sk_socket->file)
1162                 if (send_sigurg(&sk->sk_socket->file->f_owner))
1163                         sk_wake_async(sk, 3, POLL_PRI);
1164 }
1165
1166 void sk_reset_timer(struct sock *sk, struct timer_list* timer,
1167                     unsigned long expires)
1168 {
1169         if (!mod_timer(timer, expires))
1170                 sock_hold(sk);
1171 }
1172
1173 EXPORT_SYMBOL(sk_reset_timer);
1174
1175 void sk_stop_timer(struct sock *sk, struct timer_list* timer)
1176 {
1177         if (timer_pending(timer) && del_timer(timer))
1178                 __sock_put(sk);
1179 }
1180
1181 EXPORT_SYMBOL(sk_stop_timer);
1182
1183 void sock_init_data(struct socket *sock, struct sock *sk)
1184 {
1185         skb_queue_head_init(&sk->sk_receive_queue);
1186         skb_queue_head_init(&sk->sk_write_queue);
1187         skb_queue_head_init(&sk->sk_error_queue);
1188
1189         sk->sk_send_head        =       NULL;
1190
1191         init_timer(&sk->sk_timer);
1192         
1193         sk->sk_allocation       =       GFP_KERNEL;
1194         sk->sk_rcvbuf           =       sysctl_rmem_default;
1195         sk->sk_sndbuf           =       sysctl_wmem_default;
1196         sk->sk_state            =       TCP_CLOSE;
1197         sk->sk_zapped           =       1;
1198         sk->sk_socket           =       sock;
1199
1200         if(sock)
1201         {
1202                 sk->sk_type     =       sock->type;
1203                 sk->sk_sleep    =       &sock->wait;
1204                 sock->sk        =       sk;
1205         } else
1206                 sk->sk_sleep    =       NULL;
1207
1208         sk->sk_dst_lock         =       RW_LOCK_UNLOCKED;
1209         sk->sk_callback_lock    =       RW_LOCK_UNLOCKED;
1210
1211         sk->sk_state_change     =       sock_def_wakeup;
1212         sk->sk_data_ready       =       sock_def_readable;
1213         sk->sk_write_space      =       sock_def_write_space;
1214         sk->sk_error_report     =       sock_def_error_report;
1215         sk->sk_destruct         =       sock_def_destruct;
1216
1217         sk->sk_sndmsg_page      =       NULL;
1218         sk->sk_sndmsg_off       =       0;
1219
1220         sk->sk_peercred.pid     =       0;
1221         sk->sk_peercred.uid     =       -1;
1222         sk->sk_peercred.gid     =       -1;
1223         sk->sk_write_pending    =       0;
1224         sk->sk_rcvlowat         =       1;
1225         sk->sk_rcvtimeo         =       MAX_SCHEDULE_TIMEOUT;
1226         sk->sk_sndtimeo         =       MAX_SCHEDULE_TIMEOUT;
1227         sk->sk_owner            =       NULL;
1228
1229         sk->sk_stamp.tv_sec     = -1L;
1230         sk->sk_stamp.tv_usec    = -1L;
1231
1232         sk->sk_vx_info          =       NULL;
1233         sk->sk_xid              =       0;
1234         sk->sk_nx_info          =       NULL;
1235         sk->sk_nid              =       0;
1236
1237         atomic_set(&sk->sk_refcnt, 1);
1238 }
1239
1240 void fastcall lock_sock(struct sock *sk)
1241 {
1242         might_sleep();
1243         spin_lock_bh(&(sk->sk_lock.slock));
1244         if (sk->sk_lock.owner)
1245                 __lock_sock(sk);
1246         sk->sk_lock.owner = (void *)1;
1247         spin_unlock_bh(&(sk->sk_lock.slock));
1248 }
1249
1250 EXPORT_SYMBOL(lock_sock);
1251
1252 void fastcall release_sock(struct sock *sk)
1253 {
1254         spin_lock_bh(&(sk->sk_lock.slock));
1255         if (sk->sk_backlog.tail)
1256                 __release_sock(sk);
1257         sk->sk_lock.owner = NULL;
1258         if (waitqueue_active(&(sk->sk_lock.wq)))
1259                 wake_up(&(sk->sk_lock.wq));
1260         spin_unlock_bh(&(sk->sk_lock.slock));
1261 }
1262 EXPORT_SYMBOL(release_sock);
1263
1264 /* When > 0 there are consumers of rx skb time stamps */
1265 atomic_t netstamp_needed = ATOMIC_INIT(0); 
1266
1267 int sock_get_timestamp(struct sock *sk, struct timeval __user *userstamp)
1268
1269         if (!sock_flag(sk, SOCK_TIMESTAMP))
1270                 sock_enable_timestamp(sk);
1271         if (sk->sk_stamp.tv_sec == -1) 
1272                 return -ENOENT;
1273         if (sk->sk_stamp.tv_sec == 0)
1274                 do_gettimeofday(&sk->sk_stamp);
1275         return copy_to_user(userstamp, &sk->sk_stamp, sizeof(struct timeval)) ?
1276                 -EFAULT : 0; 
1277
1278 EXPORT_SYMBOL(sock_get_timestamp);
1279
1280 void sock_enable_timestamp(struct sock *sk)
1281 {       
1282         if (!sock_flag(sk, SOCK_TIMESTAMP)) { 
1283                 sock_set_flag(sk, SOCK_TIMESTAMP);
1284                 atomic_inc(&netstamp_needed);
1285         }
1286 }
1287 EXPORT_SYMBOL(sock_enable_timestamp); 
1288
1289 void sock_disable_timestamp(struct sock *sk)
1290 {       
1291         if (sock_flag(sk, SOCK_TIMESTAMP)) { 
1292                 sock_reset_flag(sk, SOCK_TIMESTAMP);
1293                 atomic_dec(&netstamp_needed);
1294         }
1295 }
1296 EXPORT_SYMBOL(sock_disable_timestamp);
1297
1298 /*
1299  *      Get a socket option on an socket.
1300  *
1301  *      FIX: POSIX 1003.1g is very ambiguous here. It states that
1302  *      asynchronous errors should be reported by getsockopt. We assume
1303  *      this means if you specify SO_ERROR (otherwise whats the point of it).
1304  */
1305 int sock_common_getsockopt(struct socket *sock, int level, int optname,
1306                            char __user *optval, int __user *optlen)
1307 {
1308         struct sock *sk = sock->sk;
1309
1310         return sk->sk_prot->getsockopt(sk, level, optname, optval, optlen);
1311 }
1312
1313 EXPORT_SYMBOL(sock_common_getsockopt);
1314
1315 int sock_common_recvmsg(struct kiocb *iocb, struct socket *sock,
1316                         struct msghdr *msg, size_t size, int flags)
1317 {
1318         struct sock *sk = sock->sk;
1319         int addr_len = 0;
1320         int err;
1321
1322         err = sk->sk_prot->recvmsg(iocb, sk, msg, size, flags & MSG_DONTWAIT,
1323                                    flags & ~MSG_DONTWAIT, &addr_len);
1324         if (err >= 0)
1325                 msg->msg_namelen = addr_len;
1326         return err;
1327 }
1328
1329 EXPORT_SYMBOL(sock_common_recvmsg);
1330
1331 /*
1332  *      Set socket options on an inet socket.
1333  */
1334 int sock_common_setsockopt(struct socket *sock, int level, int optname,
1335                            char __user *optval, int optlen)
1336 {
1337         struct sock *sk = sock->sk;
1338
1339         return sk->sk_prot->setsockopt(sk, level, optname, optval, optlen);
1340 }
1341
1342 EXPORT_SYMBOL(sock_common_setsockopt);
1343
1344 void sk_common_release(struct sock *sk)
1345 {
1346         if (sk->sk_prot->destroy)
1347                 sk->sk_prot->destroy(sk);
1348
1349         /*
1350          * Observation: when sock_common_release is called, processes have
1351          * no access to socket. But net still has.
1352          * Step one, detach it from networking:
1353          *
1354          * A. Remove from hash tables.
1355          */
1356
1357         sk->sk_prot->unhash(sk);
1358
1359         /*
1360          * In this point socket cannot receive new packets, but it is possible
1361          * that some packets are in flight because some CPU runs receiver and
1362          * did hash table lookup before we unhashed socket. They will achieve
1363          * receive queue and will be purged by socket destructor.
1364          *
1365          * Also we still have packets pending on receive queue and probably,
1366          * our own packets waiting in device queues. sock_destroy will drain
1367          * receive queue, but transmitted packets will delay socket destruction
1368          * until the last reference will be released.
1369          */
1370
1371         sock_orphan(sk);
1372
1373         xfrm_sk_free_policy(sk);
1374
1375 #ifdef INET_REFCNT_DEBUG
1376         if (atomic_read(&sk->sk_refcnt) != 1)
1377                 printk(KERN_DEBUG "Destruction of the socket %p delayed, c=%d\n",
1378                        sk, atomic_read(&sk->sk_refcnt));
1379 #endif
1380         sock_put(sk);
1381 }
1382
1383 EXPORT_SYMBOL(sk_common_release);
1384
1385 EXPORT_SYMBOL(__lock_sock);
1386 EXPORT_SYMBOL(__release_sock);
1387 EXPORT_SYMBOL(sk_alloc);
1388 EXPORT_SYMBOL(sk_free);
1389 EXPORT_SYMBOL(sk_send_sigurg);
1390 EXPORT_SYMBOL(sock_alloc_send_pskb);
1391 EXPORT_SYMBOL(sock_alloc_send_skb);
1392 EXPORT_SYMBOL(sock_getsockopt);
1393 EXPORT_SYMBOL(sock_init_data);
1394 EXPORT_SYMBOL(sock_kfree_s);
1395 EXPORT_SYMBOL(sock_kmalloc);
1396 EXPORT_SYMBOL(sock_no_accept);
1397 EXPORT_SYMBOL(sock_no_bind);
1398 EXPORT_SYMBOL(sock_no_connect);
1399 EXPORT_SYMBOL(sock_no_getname);
1400 EXPORT_SYMBOL(sock_no_getsockopt);
1401 EXPORT_SYMBOL(sock_no_ioctl);
1402 EXPORT_SYMBOL(sock_no_listen);
1403 EXPORT_SYMBOL(sock_no_mmap);
1404 EXPORT_SYMBOL(sock_no_poll);
1405 EXPORT_SYMBOL(sock_no_recvmsg);
1406 EXPORT_SYMBOL(sock_no_release);
1407 EXPORT_SYMBOL(sock_no_sendmsg);
1408 EXPORT_SYMBOL(sock_no_sendpage);
1409 EXPORT_SYMBOL(sock_no_setsockopt);
1410 EXPORT_SYMBOL(sock_no_shutdown);
1411 EXPORT_SYMBOL(sock_no_socketpair);
1412 EXPORT_SYMBOL(sock_rfree);
1413 EXPORT_SYMBOL(sock_rmalloc);
1414 EXPORT_SYMBOL(sock_setsockopt);
1415 EXPORT_SYMBOL(sock_wfree);
1416 EXPORT_SYMBOL(sock_wmalloc);
1417 EXPORT_SYMBOL(sock_i_uid);
1418 EXPORT_SYMBOL(sock_i_ino);
1419 #ifdef CONFIG_SYSCTL
1420 EXPORT_SYMBOL(sysctl_optmem_max);
1421 EXPORT_SYMBOL(sysctl_rmem_max);
1422 EXPORT_SYMBOL(sysctl_wmem_max);
1423 #endif