netfilter: nf_ct_dccp: add missing DCCP protocol changes in event cache
[safe/jmp/linux-2.6] / net / socket.c
1 /*
2  * NET          An implementation of the SOCKET network access protocol.
3  *
4  * Version:     @(#)socket.c    1.1.93  18/02/95
5  *
6  * Authors:     Orest Zborowski, <obz@Kodak.COM>
7  *              Ross Biro
8  *              Fred N. van Kempen, <waltje@uWalt.NL.Mugnet.ORG>
9  *
10  * Fixes:
11  *              Anonymous       :       NOTSOCK/BADF cleanup. Error fix in
12  *                                      shutdown()
13  *              Alan Cox        :       verify_area() fixes
14  *              Alan Cox        :       Removed DDI
15  *              Jonathan Kamens :       SOCK_DGRAM reconnect bug
16  *              Alan Cox        :       Moved a load of checks to the very
17  *                                      top level.
18  *              Alan Cox        :       Move address structures to/from user
19  *                                      mode above the protocol layers.
20  *              Rob Janssen     :       Allow 0 length sends.
21  *              Alan Cox        :       Asynchronous I/O support (cribbed from the
22  *                                      tty drivers).
23  *              Niibe Yutaka    :       Asynchronous I/O for writes (4.4BSD style)
24  *              Jeff Uphoff     :       Made max number of sockets command-line
25  *                                      configurable.
26  *              Matti Aarnio    :       Made the number of sockets dynamic,
27  *                                      to be allocated when needed, and mr.
28  *                                      Uphoff's max is used as max to be
29  *                                      allowed to allocate.
30  *              Linus           :       Argh. removed all the socket allocation
31  *                                      altogether: it's in the inode now.
32  *              Alan Cox        :       Made sock_alloc()/sock_release() public
33  *                                      for NetROM and future kernel nfsd type
34  *                                      stuff.
35  *              Alan Cox        :       sendmsg/recvmsg basics.
36  *              Tom Dyas        :       Export net symbols.
37  *              Marcin Dalecki  :       Fixed problems with CONFIG_NET="n".
38  *              Alan Cox        :       Added thread locking to sys_* calls
39  *                                      for sockets. May have errors at the
40  *                                      moment.
41  *              Kevin Buhr      :       Fixed the dumb errors in the above.
42  *              Andi Kleen      :       Some small cleanups, optimizations,
43  *                                      and fixed a copy_from_user() bug.
44  *              Tigran Aivazian :       sys_send(args) calls sys_sendto(args, NULL, 0)
45  *              Tigran Aivazian :       Made listen(2) backlog sanity checks
46  *                                      protocol-independent
47  *
48  *
49  *              This program is free software; you can redistribute it and/or
50  *              modify it under the terms of the GNU General Public License
51  *              as published by the Free Software Foundation; either version
52  *              2 of the License, or (at your option) any later version.
53  *
54  *
55  *      This module is effectively the top level interface to the BSD socket
56  *      paradigm.
57  *
58  *      Based upon Swansea University Computer Society NET3.039
59  */
60
61 #include <linux/mm.h>
62 #include <linux/socket.h>
63 #include <linux/file.h>
64 #include <linux/net.h>
65 #include <linux/interrupt.h>
66 #include <linux/thread_info.h>
67 #include <linux/rcupdate.h>
68 #include <linux/netdevice.h>
69 #include <linux/proc_fs.h>
70 #include <linux/seq_file.h>
71 #include <linux/mutex.h>
72 #include <linux/wanrouter.h>
73 #include <linux/if_bridge.h>
74 #include <linux/if_frad.h>
75 #include <linux/if_vlan.h>
76 #include <linux/init.h>
77 #include <linux/poll.h>
78 #include <linux/cache.h>
79 #include <linux/module.h>
80 #include <linux/highmem.h>
81 #include <linux/mount.h>
82 #include <linux/security.h>
83 #include <linux/syscalls.h>
84 #include <linux/compat.h>
85 #include <linux/kmod.h>
86 #include <linux/audit.h>
87 #include <linux/wireless.h>
88 #include <linux/nsproxy.h>
89
90 #include <asm/uaccess.h>
91 #include <asm/unistd.h>
92
93 #include <net/compat.h>
94 #include <net/wext.h>
95
96 #include <net/sock.h>
97 #include <linux/netfilter.h>
98
99 static int sock_no_open(struct inode *irrelevant, struct file *dontcare);
100 static ssize_t sock_aio_read(struct kiocb *iocb, const struct iovec *iov,
101                          unsigned long nr_segs, loff_t pos);
102 static ssize_t sock_aio_write(struct kiocb *iocb, const struct iovec *iov,
103                           unsigned long nr_segs, loff_t pos);
104 static int sock_mmap(struct file *file, struct vm_area_struct *vma);
105
106 static int sock_close(struct inode *inode, struct file *file);
107 static unsigned int sock_poll(struct file *file,
108                               struct poll_table_struct *wait);
109 static long sock_ioctl(struct file *file, unsigned int cmd, unsigned long arg);
110 #ifdef CONFIG_COMPAT
111 static long compat_sock_ioctl(struct file *file,
112                               unsigned int cmd, unsigned long arg);
113 #endif
114 static int sock_fasync(int fd, struct file *filp, int on);
115 static ssize_t sock_sendpage(struct file *file, struct page *page,
116                              int offset, size_t size, loff_t *ppos, int more);
117 static ssize_t sock_splice_read(struct file *file, loff_t *ppos,
118                                 struct pipe_inode_info *pipe, size_t len,
119                                 unsigned int flags);
120
121 /*
122  *      Socket files have a set of 'special' operations as well as the generic file ones. These don't appear
123  *      in the operation structures but are done directly via the socketcall() multiplexor.
124  */
125
126 static const struct file_operations socket_file_ops = {
127         .owner =        THIS_MODULE,
128         .llseek =       no_llseek,
129         .aio_read =     sock_aio_read,
130         .aio_write =    sock_aio_write,
131         .poll =         sock_poll,
132         .unlocked_ioctl = sock_ioctl,
133 #ifdef CONFIG_COMPAT
134         .compat_ioctl = compat_sock_ioctl,
135 #endif
136         .mmap =         sock_mmap,
137         .open =         sock_no_open,   /* special open code to disallow open via /proc */
138         .release =      sock_close,
139         .fasync =       sock_fasync,
140         .sendpage =     sock_sendpage,
141         .splice_write = generic_splice_sendpage,
142         .splice_read =  sock_splice_read,
143 };
144
145 /*
146  *      The protocol list. Each protocol is registered in here.
147  */
148
149 static DEFINE_SPINLOCK(net_family_lock);
150 static const struct net_proto_family *net_families[NPROTO] __read_mostly;
151
152 /*
153  *      Statistics counters of the socket lists
154  */
155
156 static DEFINE_PER_CPU(int, sockets_in_use) = 0;
157
158 /*
159  * Support routines.
160  * Move socket addresses back and forth across the kernel/user
161  * divide and look after the messy bits.
162  */
163
164 #define MAX_SOCK_ADDR   128             /* 108 for Unix domain -
165                                            16 for IP, 16 for IPX,
166                                            24 for IPv6,
167                                            about 80 for AX.25
168                                            must be at least one bigger than
169                                            the AF_UNIX size (see net/unix/af_unix.c
170                                            :unix_mkname()).
171                                          */
172
173 /**
174  *      move_addr_to_kernel     -       copy a socket address into kernel space
175  *      @uaddr: Address in user space
176  *      @kaddr: Address in kernel space
177  *      @ulen: Length in user space
178  *
179  *      The address is copied into kernel space. If the provided address is
180  *      too long an error code of -EINVAL is returned. If the copy gives
181  *      invalid addresses -EFAULT is returned. On a success 0 is returned.
182  */
183
184 int move_addr_to_kernel(void __user *uaddr, int ulen, struct sockaddr *kaddr)
185 {
186         if (ulen < 0 || ulen > sizeof(struct sockaddr_storage))
187                 return -EINVAL;
188         if (ulen == 0)
189                 return 0;
190         if (copy_from_user(kaddr, uaddr, ulen))
191                 return -EFAULT;
192         return audit_sockaddr(ulen, kaddr);
193 }
194
195 /**
196  *      move_addr_to_user       -       copy an address to user space
197  *      @kaddr: kernel space address
198  *      @klen: length of address in kernel
199  *      @uaddr: user space address
200  *      @ulen: pointer to user length field
201  *
202  *      The value pointed to by ulen on entry is the buffer length available.
203  *      This is overwritten with the buffer space used. -EINVAL is returned
204  *      if an overlong buffer is specified or a negative buffer size. -EFAULT
205  *      is returned if either the buffer or the length field are not
206  *      accessible.
207  *      After copying the data up to the limit the user specifies, the true
208  *      length of the data is written over the length limit the user
209  *      specified. Zero is returned for a success.
210  */
211
212 int move_addr_to_user(struct sockaddr *kaddr, int klen, void __user *uaddr,
213                       int __user *ulen)
214 {
215         int err;
216         int len;
217
218         err = get_user(len, ulen);
219         if (err)
220                 return err;
221         if (len > klen)
222                 len = klen;
223         if (len < 0 || len > sizeof(struct sockaddr_storage))
224                 return -EINVAL;
225         if (len) {
226                 if (audit_sockaddr(klen, kaddr))
227                         return -ENOMEM;
228                 if (copy_to_user(uaddr, kaddr, len))
229                         return -EFAULT;
230         }
231         /*
232          *      "fromlen shall refer to the value before truncation.."
233          *                      1003.1g
234          */
235         return __put_user(klen, ulen);
236 }
237
238 #define SOCKFS_MAGIC 0x534F434B
239
240 static struct kmem_cache *sock_inode_cachep __read_mostly;
241
242 static struct inode *sock_alloc_inode(struct super_block *sb)
243 {
244         struct socket_alloc *ei;
245
246         ei = kmem_cache_alloc(sock_inode_cachep, GFP_KERNEL);
247         if (!ei)
248                 return NULL;
249         init_waitqueue_head(&ei->socket.wait);
250
251         ei->socket.fasync_list = NULL;
252         ei->socket.state = SS_UNCONNECTED;
253         ei->socket.flags = 0;
254         ei->socket.ops = NULL;
255         ei->socket.sk = NULL;
256         ei->socket.file = NULL;
257
258         return &ei->vfs_inode;
259 }
260
261 static void sock_destroy_inode(struct inode *inode)
262 {
263         kmem_cache_free(sock_inode_cachep,
264                         container_of(inode, struct socket_alloc, vfs_inode));
265 }
266
267 static void init_once(void *foo)
268 {
269         struct socket_alloc *ei = (struct socket_alloc *)foo;
270
271         inode_init_once(&ei->vfs_inode);
272 }
273
274 static int init_inodecache(void)
275 {
276         sock_inode_cachep = kmem_cache_create("sock_inode_cache",
277                                               sizeof(struct socket_alloc),
278                                               0,
279                                               (SLAB_HWCACHE_ALIGN |
280                                                SLAB_RECLAIM_ACCOUNT |
281                                                SLAB_MEM_SPREAD),
282                                               init_once);
283         if (sock_inode_cachep == NULL)
284                 return -ENOMEM;
285         return 0;
286 }
287
288 static struct super_operations sockfs_ops = {
289         .alloc_inode =  sock_alloc_inode,
290         .destroy_inode =sock_destroy_inode,
291         .statfs =       simple_statfs,
292 };
293
294 static int sockfs_get_sb(struct file_system_type *fs_type,
295                          int flags, const char *dev_name, void *data,
296                          struct vfsmount *mnt)
297 {
298         return get_sb_pseudo(fs_type, "socket:", &sockfs_ops, SOCKFS_MAGIC,
299                              mnt);
300 }
301
302 static struct vfsmount *sock_mnt __read_mostly;
303
304 static struct file_system_type sock_fs_type = {
305         .name =         "sockfs",
306         .get_sb =       sockfs_get_sb,
307         .kill_sb =      kill_anon_super,
308 };
309
310 static int sockfs_delete_dentry(struct dentry *dentry)
311 {
312         /*
313          * At creation time, we pretended this dentry was hashed
314          * (by clearing DCACHE_UNHASHED bit in d_flags)
315          * At delete time, we restore the truth : not hashed.
316          * (so that dput() can proceed correctly)
317          */
318         dentry->d_flags |= DCACHE_UNHASHED;
319         return 0;
320 }
321
322 /*
323  * sockfs_dname() is called from d_path().
324  */
325 static char *sockfs_dname(struct dentry *dentry, char *buffer, int buflen)
326 {
327         return dynamic_dname(dentry, buffer, buflen, "socket:[%lu]",
328                                 dentry->d_inode->i_ino);
329 }
330
331 static const struct dentry_operations sockfs_dentry_operations = {
332         .d_delete = sockfs_delete_dentry,
333         .d_dname  = sockfs_dname,
334 };
335
336 /*
337  *      Obtains the first available file descriptor and sets it up for use.
338  *
339  *      These functions create file structures and maps them to fd space
340  *      of the current process. On success it returns file descriptor
341  *      and file struct implicitly stored in sock->file.
342  *      Note that another thread may close file descriptor before we return
343  *      from this function. We use the fact that now we do not refer
344  *      to socket after mapping. If one day we will need it, this
345  *      function will increment ref. count on file by 1.
346  *
347  *      In any case returned fd MAY BE not valid!
348  *      This race condition is unavoidable
349  *      with shared fd spaces, we cannot solve it inside kernel,
350  *      but we take care of internal coherence yet.
351  */
352
353 static int sock_alloc_fd(struct file **filep, int flags)
354 {
355         int fd;
356
357         fd = get_unused_fd_flags(flags);
358         if (likely(fd >= 0)) {
359                 struct file *file = get_empty_filp();
360
361                 *filep = file;
362                 if (unlikely(!file)) {
363                         put_unused_fd(fd);
364                         return -ENFILE;
365                 }
366         } else
367                 *filep = NULL;
368         return fd;
369 }
370
371 static int sock_attach_fd(struct socket *sock, struct file *file, int flags)
372 {
373         struct dentry *dentry;
374         struct qstr name = { .name = "" };
375
376         dentry = d_alloc(sock_mnt->mnt_sb->s_root, &name);
377         if (unlikely(!dentry))
378                 return -ENOMEM;
379
380         dentry->d_op = &sockfs_dentry_operations;
381         /*
382          * We dont want to push this dentry into global dentry hash table.
383          * We pretend dentry is already hashed, by unsetting DCACHE_UNHASHED
384          * This permits a working /proc/$pid/fd/XXX on sockets
385          */
386         dentry->d_flags &= ~DCACHE_UNHASHED;
387         d_instantiate(dentry, SOCK_INODE(sock));
388
389         sock->file = file;
390         init_file(file, sock_mnt, dentry, FMODE_READ | FMODE_WRITE,
391                   &socket_file_ops);
392         SOCK_INODE(sock)->i_fop = &socket_file_ops;
393         file->f_flags = O_RDWR | (flags & O_NONBLOCK);
394         file->f_pos = 0;
395         file->private_data = sock;
396
397         return 0;
398 }
399
400 int sock_map_fd(struct socket *sock, int flags)
401 {
402         struct file *newfile;
403         int fd = sock_alloc_fd(&newfile, flags);
404
405         if (likely(fd >= 0)) {
406                 int err = sock_attach_fd(sock, newfile, flags);
407
408                 if (unlikely(err < 0)) {
409                         put_filp(newfile);
410                         put_unused_fd(fd);
411                         return err;
412                 }
413                 fd_install(fd, newfile);
414         }
415         return fd;
416 }
417
418 static struct socket *sock_from_file(struct file *file, int *err)
419 {
420         if (file->f_op == &socket_file_ops)
421                 return file->private_data;      /* set in sock_map_fd */
422
423         *err = -ENOTSOCK;
424         return NULL;
425 }
426
427 /**
428  *      sockfd_lookup   -       Go from a file number to its socket slot
429  *      @fd: file handle
430  *      @err: pointer to an error code return
431  *
432  *      The file handle passed in is locked and the socket it is bound
433  *      too is returned. If an error occurs the err pointer is overwritten
434  *      with a negative errno code and NULL is returned. The function checks
435  *      for both invalid handles and passing a handle which is not a socket.
436  *
437  *      On a success the socket object pointer is returned.
438  */
439
440 struct socket *sockfd_lookup(int fd, int *err)
441 {
442         struct file *file;
443         struct socket *sock;
444
445         file = fget(fd);
446         if (!file) {
447                 *err = -EBADF;
448                 return NULL;
449         }
450
451         sock = sock_from_file(file, err);
452         if (!sock)
453                 fput(file);
454         return sock;
455 }
456
457 static struct socket *sockfd_lookup_light(int fd, int *err, int *fput_needed)
458 {
459         struct file *file;
460         struct socket *sock;
461
462         *err = -EBADF;
463         file = fget_light(fd, fput_needed);
464         if (file) {
465                 sock = sock_from_file(file, err);
466                 if (sock)
467                         return sock;
468                 fput_light(file, *fput_needed);
469         }
470         return NULL;
471 }
472
473 /**
474  *      sock_alloc      -       allocate a socket
475  *
476  *      Allocate a new inode and socket object. The two are bound together
477  *      and initialised. The socket is then returned. If we are out of inodes
478  *      NULL is returned.
479  */
480
481 static struct socket *sock_alloc(void)
482 {
483         struct inode *inode;
484         struct socket *sock;
485
486         inode = new_inode(sock_mnt->mnt_sb);
487         if (!inode)
488                 return NULL;
489
490         sock = SOCKET_I(inode);
491
492         inode->i_mode = S_IFSOCK | S_IRWXUGO;
493         inode->i_uid = current_fsuid();
494         inode->i_gid = current_fsgid();
495
496         get_cpu_var(sockets_in_use)++;
497         put_cpu_var(sockets_in_use);
498         return sock;
499 }
500
501 /*
502  *      In theory you can't get an open on this inode, but /proc provides
503  *      a back door. Remember to keep it shut otherwise you'll let the
504  *      creepy crawlies in.
505  */
506
507 static int sock_no_open(struct inode *irrelevant, struct file *dontcare)
508 {
509         return -ENXIO;
510 }
511
512 const struct file_operations bad_sock_fops = {
513         .owner = THIS_MODULE,
514         .open = sock_no_open,
515 };
516
517 /**
518  *      sock_release    -       close a socket
519  *      @sock: socket to close
520  *
521  *      The socket is released from the protocol stack if it has a release
522  *      callback, and the inode is then released if the socket is bound to
523  *      an inode not a file.
524  */
525
526 void sock_release(struct socket *sock)
527 {
528         if (sock->ops) {
529                 struct module *owner = sock->ops->owner;
530
531                 sock->ops->release(sock);
532                 sock->ops = NULL;
533                 module_put(owner);
534         }
535
536         if (sock->fasync_list)
537                 printk(KERN_ERR "sock_release: fasync list not empty!\n");
538
539         get_cpu_var(sockets_in_use)--;
540         put_cpu_var(sockets_in_use);
541         if (!sock->file) {
542                 iput(SOCK_INODE(sock));
543                 return;
544         }
545         sock->file = NULL;
546 }
547
548 int sock_tx_timestamp(struct msghdr *msg, struct sock *sk,
549                       union skb_shared_tx *shtx)
550 {
551         shtx->flags = 0;
552         if (sock_flag(sk, SOCK_TIMESTAMPING_TX_HARDWARE))
553                 shtx->hardware = 1;
554         if (sock_flag(sk, SOCK_TIMESTAMPING_TX_SOFTWARE))
555                 shtx->software = 1;
556         return 0;
557 }
558 EXPORT_SYMBOL(sock_tx_timestamp);
559
560 static inline int __sock_sendmsg(struct kiocb *iocb, struct socket *sock,
561                                  struct msghdr *msg, size_t size)
562 {
563         struct sock_iocb *si = kiocb_to_siocb(iocb);
564         int err;
565
566         si->sock = sock;
567         si->scm = NULL;
568         si->msg = msg;
569         si->size = size;
570
571         err = security_socket_sendmsg(sock, msg, size);
572         if (err)
573                 return err;
574
575         return sock->ops->sendmsg(iocb, sock, msg, size);
576 }
577
578 int sock_sendmsg(struct socket *sock, struct msghdr *msg, size_t size)
579 {
580         struct kiocb iocb;
581         struct sock_iocb siocb;
582         int ret;
583
584         init_sync_kiocb(&iocb, NULL);
585         iocb.private = &siocb;
586         ret = __sock_sendmsg(&iocb, sock, msg, size);
587         if (-EIOCBQUEUED == ret)
588                 ret = wait_on_sync_kiocb(&iocb);
589         return ret;
590 }
591
592 int kernel_sendmsg(struct socket *sock, struct msghdr *msg,
593                    struct kvec *vec, size_t num, size_t size)
594 {
595         mm_segment_t oldfs = get_fs();
596         int result;
597
598         set_fs(KERNEL_DS);
599         /*
600          * the following is safe, since for compiler definitions of kvec and
601          * iovec are identical, yielding the same in-core layout and alignment
602          */
603         msg->msg_iov = (struct iovec *)vec;
604         msg->msg_iovlen = num;
605         result = sock_sendmsg(sock, msg, size);
606         set_fs(oldfs);
607         return result;
608 }
609
610 static int ktime2ts(ktime_t kt, struct timespec *ts)
611 {
612         if (kt.tv64) {
613                 *ts = ktime_to_timespec(kt);
614                 return 1;
615         } else {
616                 return 0;
617         }
618 }
619
620 /*
621  * called from sock_recv_timestamp() if sock_flag(sk, SOCK_RCVTSTAMP)
622  */
623 void __sock_recv_timestamp(struct msghdr *msg, struct sock *sk,
624         struct sk_buff *skb)
625 {
626         int need_software_tstamp = sock_flag(sk, SOCK_RCVTSTAMP);
627         struct timespec ts[3];
628         int empty = 1;
629         struct skb_shared_hwtstamps *shhwtstamps =
630                 skb_hwtstamps(skb);
631
632         /* Race occurred between timestamp enabling and packet
633            receiving.  Fill in the current time for now. */
634         if (need_software_tstamp && skb->tstamp.tv64 == 0)
635                 __net_timestamp(skb);
636
637         if (need_software_tstamp) {
638                 if (!sock_flag(sk, SOCK_RCVTSTAMPNS)) {
639                         struct timeval tv;
640                         skb_get_timestamp(skb, &tv);
641                         put_cmsg(msg, SOL_SOCKET, SCM_TIMESTAMP,
642                                  sizeof(tv), &tv);
643                 } else {
644                         struct timespec ts;
645                         skb_get_timestampns(skb, &ts);
646                         put_cmsg(msg, SOL_SOCKET, SCM_TIMESTAMPNS,
647                                  sizeof(ts), &ts);
648                 }
649         }
650
651
652         memset(ts, 0, sizeof(ts));
653         if (skb->tstamp.tv64 &&
654             sock_flag(sk, SOCK_TIMESTAMPING_SOFTWARE)) {
655                 skb_get_timestampns(skb, ts + 0);
656                 empty = 0;
657         }
658         if (shhwtstamps) {
659                 if (sock_flag(sk, SOCK_TIMESTAMPING_SYS_HARDWARE) &&
660                     ktime2ts(shhwtstamps->syststamp, ts + 1))
661                         empty = 0;
662                 if (sock_flag(sk, SOCK_TIMESTAMPING_RAW_HARDWARE) &&
663                     ktime2ts(shhwtstamps->hwtstamp, ts + 2))
664                         empty = 0;
665         }
666         if (!empty)
667                 put_cmsg(msg, SOL_SOCKET,
668                          SCM_TIMESTAMPING, sizeof(ts), &ts);
669 }
670
671 EXPORT_SYMBOL_GPL(__sock_recv_timestamp);
672
673 static inline int __sock_recvmsg(struct kiocb *iocb, struct socket *sock,
674                                  struct msghdr *msg, size_t size, int flags)
675 {
676         int err;
677         struct sock_iocb *si = kiocb_to_siocb(iocb);
678
679         si->sock = sock;
680         si->scm = NULL;
681         si->msg = msg;
682         si->size = size;
683         si->flags = flags;
684
685         err = security_socket_recvmsg(sock, msg, size, flags);
686         if (err)
687                 return err;
688
689         return sock->ops->recvmsg(iocb, sock, msg, size, flags);
690 }
691
692 int sock_recvmsg(struct socket *sock, struct msghdr *msg,
693                  size_t size, int flags)
694 {
695         struct kiocb iocb;
696         struct sock_iocb siocb;
697         int ret;
698
699         init_sync_kiocb(&iocb, NULL);
700         iocb.private = &siocb;
701         ret = __sock_recvmsg(&iocb, sock, msg, size, flags);
702         if (-EIOCBQUEUED == ret)
703                 ret = wait_on_sync_kiocb(&iocb);
704         return ret;
705 }
706
707 int kernel_recvmsg(struct socket *sock, struct msghdr *msg,
708                    struct kvec *vec, size_t num, size_t size, int flags)
709 {
710         mm_segment_t oldfs = get_fs();
711         int result;
712
713         set_fs(KERNEL_DS);
714         /*
715          * the following is safe, since for compiler definitions of kvec and
716          * iovec are identical, yielding the same in-core layout and alignment
717          */
718         msg->msg_iov = (struct iovec *)vec, msg->msg_iovlen = num;
719         result = sock_recvmsg(sock, msg, size, flags);
720         set_fs(oldfs);
721         return result;
722 }
723
724 static void sock_aio_dtor(struct kiocb *iocb)
725 {
726         kfree(iocb->private);
727 }
728
729 static ssize_t sock_sendpage(struct file *file, struct page *page,
730                              int offset, size_t size, loff_t *ppos, int more)
731 {
732         struct socket *sock;
733         int flags;
734
735         sock = file->private_data;
736
737         flags = !(file->f_flags & O_NONBLOCK) ? 0 : MSG_DONTWAIT;
738         if (more)
739                 flags |= MSG_MORE;
740
741         return sock->ops->sendpage(sock, page, offset, size, flags);
742 }
743
744 static ssize_t sock_splice_read(struct file *file, loff_t *ppos,
745                                 struct pipe_inode_info *pipe, size_t len,
746                                 unsigned int flags)
747 {
748         struct socket *sock = file->private_data;
749
750         if (unlikely(!sock->ops->splice_read))
751                 return -EINVAL;
752
753         return sock->ops->splice_read(sock, ppos, pipe, len, flags);
754 }
755
756 static struct sock_iocb *alloc_sock_iocb(struct kiocb *iocb,
757                                          struct sock_iocb *siocb)
758 {
759         if (!is_sync_kiocb(iocb)) {
760                 siocb = kmalloc(sizeof(*siocb), GFP_KERNEL);
761                 if (!siocb)
762                         return NULL;
763                 iocb->ki_dtor = sock_aio_dtor;
764         }
765
766         siocb->kiocb = iocb;
767         iocb->private = siocb;
768         return siocb;
769 }
770
771 static ssize_t do_sock_read(struct msghdr *msg, struct kiocb *iocb,
772                 struct file *file, const struct iovec *iov,
773                 unsigned long nr_segs)
774 {
775         struct socket *sock = file->private_data;
776         size_t size = 0;
777         int i;
778
779         for (i = 0; i < nr_segs; i++)
780                 size += iov[i].iov_len;
781
782         msg->msg_name = NULL;
783         msg->msg_namelen = 0;
784         msg->msg_control = NULL;
785         msg->msg_controllen = 0;
786         msg->msg_iov = (struct iovec *)iov;
787         msg->msg_iovlen = nr_segs;
788         msg->msg_flags = (file->f_flags & O_NONBLOCK) ? MSG_DONTWAIT : 0;
789
790         return __sock_recvmsg(iocb, sock, msg, size, msg->msg_flags);
791 }
792
793 static ssize_t sock_aio_read(struct kiocb *iocb, const struct iovec *iov,
794                                 unsigned long nr_segs, loff_t pos)
795 {
796         struct sock_iocb siocb, *x;
797
798         if (pos != 0)
799                 return -ESPIPE;
800
801         if (iocb->ki_left == 0) /* Match SYS5 behaviour */
802                 return 0;
803
804
805         x = alloc_sock_iocb(iocb, &siocb);
806         if (!x)
807                 return -ENOMEM;
808         return do_sock_read(&x->async_msg, iocb, iocb->ki_filp, iov, nr_segs);
809 }
810
811 static ssize_t do_sock_write(struct msghdr *msg, struct kiocb *iocb,
812                         struct file *file, const struct iovec *iov,
813                         unsigned long nr_segs)
814 {
815         struct socket *sock = file->private_data;
816         size_t size = 0;
817         int i;
818
819         for (i = 0; i < nr_segs; i++)
820                 size += iov[i].iov_len;
821
822         msg->msg_name = NULL;
823         msg->msg_namelen = 0;
824         msg->msg_control = NULL;
825         msg->msg_controllen = 0;
826         msg->msg_iov = (struct iovec *)iov;
827         msg->msg_iovlen = nr_segs;
828         msg->msg_flags = (file->f_flags & O_NONBLOCK) ? MSG_DONTWAIT : 0;
829         if (sock->type == SOCK_SEQPACKET)
830                 msg->msg_flags |= MSG_EOR;
831
832         return __sock_sendmsg(iocb, sock, msg, size);
833 }
834
835 static ssize_t sock_aio_write(struct kiocb *iocb, const struct iovec *iov,
836                           unsigned long nr_segs, loff_t pos)
837 {
838         struct sock_iocb siocb, *x;
839
840         if (pos != 0)
841                 return -ESPIPE;
842
843         x = alloc_sock_iocb(iocb, &siocb);
844         if (!x)
845                 return -ENOMEM;
846
847         return do_sock_write(&x->async_msg, iocb, iocb->ki_filp, iov, nr_segs);
848 }
849
850 /*
851  * Atomic setting of ioctl hooks to avoid race
852  * with module unload.
853  */
854
855 static DEFINE_MUTEX(br_ioctl_mutex);
856 static int (*br_ioctl_hook) (struct net *, unsigned int cmd, void __user *arg) = NULL;
857
858 void brioctl_set(int (*hook) (struct net *, unsigned int, void __user *))
859 {
860         mutex_lock(&br_ioctl_mutex);
861         br_ioctl_hook = hook;
862         mutex_unlock(&br_ioctl_mutex);
863 }
864
865 EXPORT_SYMBOL(brioctl_set);
866
867 static DEFINE_MUTEX(vlan_ioctl_mutex);
868 static int (*vlan_ioctl_hook) (struct net *, void __user *arg);
869
870 void vlan_ioctl_set(int (*hook) (struct net *, void __user *))
871 {
872         mutex_lock(&vlan_ioctl_mutex);
873         vlan_ioctl_hook = hook;
874         mutex_unlock(&vlan_ioctl_mutex);
875 }
876
877 EXPORT_SYMBOL(vlan_ioctl_set);
878
879 static DEFINE_MUTEX(dlci_ioctl_mutex);
880 static int (*dlci_ioctl_hook) (unsigned int, void __user *);
881
882 void dlci_ioctl_set(int (*hook) (unsigned int, void __user *))
883 {
884         mutex_lock(&dlci_ioctl_mutex);
885         dlci_ioctl_hook = hook;
886         mutex_unlock(&dlci_ioctl_mutex);
887 }
888
889 EXPORT_SYMBOL(dlci_ioctl_set);
890
891 /*
892  *      With an ioctl, arg may well be a user mode pointer, but we don't know
893  *      what to do with it - that's up to the protocol still.
894  */
895
896 static long sock_ioctl(struct file *file, unsigned cmd, unsigned long arg)
897 {
898         struct socket *sock;
899         struct sock *sk;
900         void __user *argp = (void __user *)arg;
901         int pid, err;
902         struct net *net;
903
904         sock = file->private_data;
905         sk = sock->sk;
906         net = sock_net(sk);
907         if (cmd >= SIOCDEVPRIVATE && cmd <= (SIOCDEVPRIVATE + 15)) {
908                 err = dev_ioctl(net, cmd, argp);
909         } else
910 #ifdef CONFIG_WIRELESS_EXT
911         if (cmd >= SIOCIWFIRST && cmd <= SIOCIWLAST) {
912                 err = dev_ioctl(net, cmd, argp);
913         } else
914 #endif                          /* CONFIG_WIRELESS_EXT */
915                 switch (cmd) {
916                 case FIOSETOWN:
917                 case SIOCSPGRP:
918                         err = -EFAULT;
919                         if (get_user(pid, (int __user *)argp))
920                                 break;
921                         err = f_setown(sock->file, pid, 1);
922                         break;
923                 case FIOGETOWN:
924                 case SIOCGPGRP:
925                         err = put_user(f_getown(sock->file),
926                                        (int __user *)argp);
927                         break;
928                 case SIOCGIFBR:
929                 case SIOCSIFBR:
930                 case SIOCBRADDBR:
931                 case SIOCBRDELBR:
932                         err = -ENOPKG;
933                         if (!br_ioctl_hook)
934                                 request_module("bridge");
935
936                         mutex_lock(&br_ioctl_mutex);
937                         if (br_ioctl_hook)
938                                 err = br_ioctl_hook(net, cmd, argp);
939                         mutex_unlock(&br_ioctl_mutex);
940                         break;
941                 case SIOCGIFVLAN:
942                 case SIOCSIFVLAN:
943                         err = -ENOPKG;
944                         if (!vlan_ioctl_hook)
945                                 request_module("8021q");
946
947                         mutex_lock(&vlan_ioctl_mutex);
948                         if (vlan_ioctl_hook)
949                                 err = vlan_ioctl_hook(net, argp);
950                         mutex_unlock(&vlan_ioctl_mutex);
951                         break;
952                 case SIOCADDDLCI:
953                 case SIOCDELDLCI:
954                         err = -ENOPKG;
955                         if (!dlci_ioctl_hook)
956                                 request_module("dlci");
957
958                         mutex_lock(&dlci_ioctl_mutex);
959                         if (dlci_ioctl_hook)
960                                 err = dlci_ioctl_hook(cmd, argp);
961                         mutex_unlock(&dlci_ioctl_mutex);
962                         break;
963                 default:
964                         err = sock->ops->ioctl(sock, cmd, arg);
965
966                         /*
967                          * If this ioctl is unknown try to hand it down
968                          * to the NIC driver.
969                          */
970                         if (err == -ENOIOCTLCMD)
971                                 err = dev_ioctl(net, cmd, argp);
972                         break;
973                 }
974         return err;
975 }
976
977 int sock_create_lite(int family, int type, int protocol, struct socket **res)
978 {
979         int err;
980         struct socket *sock = NULL;
981
982         err = security_socket_create(family, type, protocol, 1);
983         if (err)
984                 goto out;
985
986         sock = sock_alloc();
987         if (!sock) {
988                 err = -ENOMEM;
989                 goto out;
990         }
991
992         sock->type = type;
993         err = security_socket_post_create(sock, family, type, protocol, 1);
994         if (err)
995                 goto out_release;
996
997 out:
998         *res = sock;
999         return err;
1000 out_release:
1001         sock_release(sock);
1002         sock = NULL;
1003         goto out;
1004 }
1005
1006 /* No kernel lock held - perfect */
1007 static unsigned int sock_poll(struct file *file, poll_table *wait)
1008 {
1009         struct socket *sock;
1010
1011         /*
1012          *      We can't return errors to poll, so it's either yes or no.
1013          */
1014         sock = file->private_data;
1015         return sock->ops->poll(file, sock, wait);
1016 }
1017
1018 static int sock_mmap(struct file *file, struct vm_area_struct *vma)
1019 {
1020         struct socket *sock = file->private_data;
1021
1022         return sock->ops->mmap(file, sock, vma);
1023 }
1024
1025 static int sock_close(struct inode *inode, struct file *filp)
1026 {
1027         /*
1028          *      It was possible the inode is NULL we were
1029          *      closing an unfinished socket.
1030          */
1031
1032         if (!inode) {
1033                 printk(KERN_DEBUG "sock_close: NULL inode\n");
1034                 return 0;
1035         }
1036         sock_release(SOCKET_I(inode));
1037         return 0;
1038 }
1039
1040 /*
1041  *      Update the socket async list
1042  *
1043  *      Fasync_list locking strategy.
1044  *
1045  *      1. fasync_list is modified only under process context socket lock
1046  *         i.e. under semaphore.
1047  *      2. fasync_list is used under read_lock(&sk->sk_callback_lock)
1048  *         or under socket lock.
1049  *      3. fasync_list can be used from softirq context, so that
1050  *         modification under socket lock have to be enhanced with
1051  *         write_lock_bh(&sk->sk_callback_lock).
1052  *                                                      --ANK (990710)
1053  */
1054
1055 static int sock_fasync(int fd, struct file *filp, int on)
1056 {
1057         struct fasync_struct *fa, *fna = NULL, **prev;
1058         struct socket *sock;
1059         struct sock *sk;
1060
1061         if (on) {
1062                 fna = kmalloc(sizeof(struct fasync_struct), GFP_KERNEL);
1063                 if (fna == NULL)
1064                         return -ENOMEM;
1065         }
1066
1067         sock = filp->private_data;
1068
1069         sk = sock->sk;
1070         if (sk == NULL) {
1071                 kfree(fna);
1072                 return -EINVAL;
1073         }
1074
1075         lock_sock(sk);
1076
1077         spin_lock(&filp->f_lock);
1078         if (on)
1079                 filp->f_flags |= FASYNC;
1080         else
1081                 filp->f_flags &= ~FASYNC;
1082         spin_unlock(&filp->f_lock);
1083
1084         prev = &(sock->fasync_list);
1085
1086         for (fa = *prev; fa != NULL; prev = &fa->fa_next, fa = *prev)
1087                 if (fa->fa_file == filp)
1088                         break;
1089
1090         if (on) {
1091                 if (fa != NULL) {
1092                         write_lock_bh(&sk->sk_callback_lock);
1093                         fa->fa_fd = fd;
1094                         write_unlock_bh(&sk->sk_callback_lock);
1095
1096                         kfree(fna);
1097                         goto out;
1098                 }
1099                 fna->fa_file = filp;
1100                 fna->fa_fd = fd;
1101                 fna->magic = FASYNC_MAGIC;
1102                 fna->fa_next = sock->fasync_list;
1103                 write_lock_bh(&sk->sk_callback_lock);
1104                 sock->fasync_list = fna;
1105                 write_unlock_bh(&sk->sk_callback_lock);
1106         } else {
1107                 if (fa != NULL) {
1108                         write_lock_bh(&sk->sk_callback_lock);
1109                         *prev = fa->fa_next;
1110                         write_unlock_bh(&sk->sk_callback_lock);
1111                         kfree(fa);
1112                 }
1113         }
1114
1115 out:
1116         release_sock(sock->sk);
1117         return 0;
1118 }
1119
1120 /* This function may be called only under socket lock or callback_lock */
1121
1122 int sock_wake_async(struct socket *sock, int how, int band)
1123 {
1124         if (!sock || !sock->fasync_list)
1125                 return -1;
1126         switch (how) {
1127         case SOCK_WAKE_WAITD:
1128                 if (test_bit(SOCK_ASYNC_WAITDATA, &sock->flags))
1129                         break;
1130                 goto call_kill;
1131         case SOCK_WAKE_SPACE:
1132                 if (!test_and_clear_bit(SOCK_ASYNC_NOSPACE, &sock->flags))
1133                         break;
1134                 /* fall through */
1135         case SOCK_WAKE_IO:
1136 call_kill:
1137                 __kill_fasync(sock->fasync_list, SIGIO, band);
1138                 break;
1139         case SOCK_WAKE_URG:
1140                 __kill_fasync(sock->fasync_list, SIGURG, band);
1141         }
1142         return 0;
1143 }
1144
1145 static int __sock_create(struct net *net, int family, int type, int protocol,
1146                          struct socket **res, int kern)
1147 {
1148         int err;
1149         struct socket *sock;
1150         const struct net_proto_family *pf;
1151
1152         /*
1153          *      Check protocol is in range
1154          */
1155         if (family < 0 || family >= NPROTO)
1156                 return -EAFNOSUPPORT;
1157         if (type < 0 || type >= SOCK_MAX)
1158                 return -EINVAL;
1159
1160         /* Compatibility.
1161
1162            This uglymoron is moved from INET layer to here to avoid
1163            deadlock in module load.
1164          */
1165         if (family == PF_INET && type == SOCK_PACKET) {
1166                 static int warned;
1167                 if (!warned) {
1168                         warned = 1;
1169                         printk(KERN_INFO "%s uses obsolete (PF_INET,SOCK_PACKET)\n",
1170                                current->comm);
1171                 }
1172                 family = PF_PACKET;
1173         }
1174
1175         err = security_socket_create(family, type, protocol, kern);
1176         if (err)
1177                 return err;
1178
1179         /*
1180          *      Allocate the socket and allow the family to set things up. if
1181          *      the protocol is 0, the family is instructed to select an appropriate
1182          *      default.
1183          */
1184         sock = sock_alloc();
1185         if (!sock) {
1186                 if (net_ratelimit())
1187                         printk(KERN_WARNING "socket: no more sockets\n");
1188                 return -ENFILE; /* Not exactly a match, but its the
1189                                    closest posix thing */
1190         }
1191
1192         sock->type = type;
1193
1194 #ifdef CONFIG_MODULES
1195         /* Attempt to load a protocol module if the find failed.
1196          *
1197          * 12/09/1996 Marcin: But! this makes REALLY only sense, if the user
1198          * requested real, full-featured networking support upon configuration.
1199          * Otherwise module support will break!
1200          */
1201         if (net_families[family] == NULL)
1202                 request_module("net-pf-%d", family);
1203 #endif
1204
1205         rcu_read_lock();
1206         pf = rcu_dereference(net_families[family]);
1207         err = -EAFNOSUPPORT;
1208         if (!pf)
1209                 goto out_release;
1210
1211         /*
1212          * We will call the ->create function, that possibly is in a loadable
1213          * module, so we have to bump that loadable module refcnt first.
1214          */
1215         if (!try_module_get(pf->owner))
1216                 goto out_release;
1217
1218         /* Now protected by module ref count */
1219         rcu_read_unlock();
1220
1221         err = pf->create(net, sock, protocol);
1222         if (err < 0)
1223                 goto out_module_put;
1224
1225         /*
1226          * Now to bump the refcnt of the [loadable] module that owns this
1227          * socket at sock_release time we decrement its refcnt.
1228          */
1229         if (!try_module_get(sock->ops->owner))
1230                 goto out_module_busy;
1231
1232         /*
1233          * Now that we're done with the ->create function, the [loadable]
1234          * module can have its refcnt decremented
1235          */
1236         module_put(pf->owner);
1237         err = security_socket_post_create(sock, family, type, protocol, kern);
1238         if (err)
1239                 goto out_sock_release;
1240         *res = sock;
1241
1242         return 0;
1243
1244 out_module_busy:
1245         err = -EAFNOSUPPORT;
1246 out_module_put:
1247         sock->ops = NULL;
1248         module_put(pf->owner);
1249 out_sock_release:
1250         sock_release(sock);
1251         return err;
1252
1253 out_release:
1254         rcu_read_unlock();
1255         goto out_sock_release;
1256 }
1257
1258 int sock_create(int family, int type, int protocol, struct socket **res)
1259 {
1260         return __sock_create(current->nsproxy->net_ns, family, type, protocol, res, 0);
1261 }
1262
1263 int sock_create_kern(int family, int type, int protocol, struct socket **res)
1264 {
1265         return __sock_create(&init_net, family, type, protocol, res, 1);
1266 }
1267
1268 SYSCALL_DEFINE3(socket, int, family, int, type, int, protocol)
1269 {
1270         int retval;
1271         struct socket *sock;
1272         int flags;
1273
1274         /* Check the SOCK_* constants for consistency.  */
1275         BUILD_BUG_ON(SOCK_CLOEXEC != O_CLOEXEC);
1276         BUILD_BUG_ON((SOCK_MAX | SOCK_TYPE_MASK) != SOCK_TYPE_MASK);
1277         BUILD_BUG_ON(SOCK_CLOEXEC & SOCK_TYPE_MASK);
1278         BUILD_BUG_ON(SOCK_NONBLOCK & SOCK_TYPE_MASK);
1279
1280         flags = type & ~SOCK_TYPE_MASK;
1281         if (flags & ~(SOCK_CLOEXEC | SOCK_NONBLOCK))
1282                 return -EINVAL;
1283         type &= SOCK_TYPE_MASK;
1284
1285         if (SOCK_NONBLOCK != O_NONBLOCK && (flags & SOCK_NONBLOCK))
1286                 flags = (flags & ~SOCK_NONBLOCK) | O_NONBLOCK;
1287
1288         retval = sock_create(family, type, protocol, &sock);
1289         if (retval < 0)
1290                 goto out;
1291
1292         retval = sock_map_fd(sock, flags & (O_CLOEXEC | O_NONBLOCK));
1293         if (retval < 0)
1294                 goto out_release;
1295
1296 out:
1297         /* It may be already another descriptor 8) Not kernel problem. */
1298         return retval;
1299
1300 out_release:
1301         sock_release(sock);
1302         return retval;
1303 }
1304
1305 /*
1306  *      Create a pair of connected sockets.
1307  */
1308
1309 SYSCALL_DEFINE4(socketpair, int, family, int, type, int, protocol,
1310                 int __user *, usockvec)
1311 {
1312         struct socket *sock1, *sock2;
1313         int fd1, fd2, err;
1314         struct file *newfile1, *newfile2;
1315         int flags;
1316
1317         flags = type & ~SOCK_TYPE_MASK;
1318         if (flags & ~(SOCK_CLOEXEC | SOCK_NONBLOCK))
1319                 return -EINVAL;
1320         type &= SOCK_TYPE_MASK;
1321
1322         if (SOCK_NONBLOCK != O_NONBLOCK && (flags & SOCK_NONBLOCK))
1323                 flags = (flags & ~SOCK_NONBLOCK) | O_NONBLOCK;
1324
1325         /*
1326          * Obtain the first socket and check if the underlying protocol
1327          * supports the socketpair call.
1328          */
1329
1330         err = sock_create(family, type, protocol, &sock1);
1331         if (err < 0)
1332                 goto out;
1333
1334         err = sock_create(family, type, protocol, &sock2);
1335         if (err < 0)
1336                 goto out_release_1;
1337
1338         err = sock1->ops->socketpair(sock1, sock2);
1339         if (err < 0)
1340                 goto out_release_both;
1341
1342         fd1 = sock_alloc_fd(&newfile1, flags & O_CLOEXEC);
1343         if (unlikely(fd1 < 0)) {
1344                 err = fd1;
1345                 goto out_release_both;
1346         }
1347
1348         fd2 = sock_alloc_fd(&newfile2, flags & O_CLOEXEC);
1349         if (unlikely(fd2 < 0)) {
1350                 err = fd2;
1351                 put_filp(newfile1);
1352                 put_unused_fd(fd1);
1353                 goto out_release_both;
1354         }
1355
1356         err = sock_attach_fd(sock1, newfile1, flags & O_NONBLOCK);
1357         if (unlikely(err < 0)) {
1358                 goto out_fd2;
1359         }
1360
1361         err = sock_attach_fd(sock2, newfile2, flags & O_NONBLOCK);
1362         if (unlikely(err < 0)) {
1363                 fput(newfile1);
1364                 goto out_fd1;
1365         }
1366
1367         audit_fd_pair(fd1, fd2);
1368         fd_install(fd1, newfile1);
1369         fd_install(fd2, newfile2);
1370         /* fd1 and fd2 may be already another descriptors.
1371          * Not kernel problem.
1372          */
1373
1374         err = put_user(fd1, &usockvec[0]);
1375         if (!err)
1376                 err = put_user(fd2, &usockvec[1]);
1377         if (!err)
1378                 return 0;
1379
1380         sys_close(fd2);
1381         sys_close(fd1);
1382         return err;
1383
1384 out_release_both:
1385         sock_release(sock2);
1386 out_release_1:
1387         sock_release(sock1);
1388 out:
1389         return err;
1390
1391 out_fd2:
1392         put_filp(newfile1);
1393         sock_release(sock1);
1394 out_fd1:
1395         put_filp(newfile2);
1396         sock_release(sock2);
1397         put_unused_fd(fd1);
1398         put_unused_fd(fd2);
1399         goto out;
1400 }
1401
1402 /*
1403  *      Bind a name to a socket. Nothing much to do here since it's
1404  *      the protocol's responsibility to handle the local address.
1405  *
1406  *      We move the socket address to kernel space before we call
1407  *      the protocol layer (having also checked the address is ok).
1408  */
1409
1410 SYSCALL_DEFINE3(bind, int, fd, struct sockaddr __user *, umyaddr, int, addrlen)
1411 {
1412         struct socket *sock;
1413         struct sockaddr_storage address;
1414         int err, fput_needed;
1415
1416         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1417         if (sock) {
1418                 err = move_addr_to_kernel(umyaddr, addrlen, (struct sockaddr *)&address);
1419                 if (err >= 0) {
1420                         err = security_socket_bind(sock,
1421                                                    (struct sockaddr *)&address,
1422                                                    addrlen);
1423                         if (!err)
1424                                 err = sock->ops->bind(sock,
1425                                                       (struct sockaddr *)
1426                                                       &address, addrlen);
1427                 }
1428                 fput_light(sock->file, fput_needed);
1429         }
1430         return err;
1431 }
1432
1433 /*
1434  *      Perform a listen. Basically, we allow the protocol to do anything
1435  *      necessary for a listen, and if that works, we mark the socket as
1436  *      ready for listening.
1437  */
1438
1439 SYSCALL_DEFINE2(listen, int, fd, int, backlog)
1440 {
1441         struct socket *sock;
1442         int err, fput_needed;
1443         int somaxconn;
1444
1445         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1446         if (sock) {
1447                 somaxconn = sock_net(sock->sk)->core.sysctl_somaxconn;
1448                 if ((unsigned)backlog > somaxconn)
1449                         backlog = somaxconn;
1450
1451                 err = security_socket_listen(sock, backlog);
1452                 if (!err)
1453                         err = sock->ops->listen(sock, backlog);
1454
1455                 fput_light(sock->file, fput_needed);
1456         }
1457         return err;
1458 }
1459
1460 /*
1461  *      For accept, we attempt to create a new socket, set up the link
1462  *      with the client, wake up the client, then return the new
1463  *      connected fd. We collect the address of the connector in kernel
1464  *      space and move it to user at the very end. This is unclean because
1465  *      we open the socket then return an error.
1466  *
1467  *      1003.1g adds the ability to recvmsg() to query connection pending
1468  *      status to recvmsg. We need to add that support in a way thats
1469  *      clean when we restucture accept also.
1470  */
1471
1472 SYSCALL_DEFINE4(accept4, int, fd, struct sockaddr __user *, upeer_sockaddr,
1473                 int __user *, upeer_addrlen, int, flags)
1474 {
1475         struct socket *sock, *newsock;
1476         struct file *newfile;
1477         int err, len, newfd, fput_needed;
1478         struct sockaddr_storage address;
1479
1480         if (flags & ~(SOCK_CLOEXEC | SOCK_NONBLOCK))
1481                 return -EINVAL;
1482
1483         if (SOCK_NONBLOCK != O_NONBLOCK && (flags & SOCK_NONBLOCK))
1484                 flags = (flags & ~SOCK_NONBLOCK) | O_NONBLOCK;
1485
1486         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1487         if (!sock)
1488                 goto out;
1489
1490         err = -ENFILE;
1491         if (!(newsock = sock_alloc()))
1492                 goto out_put;
1493
1494         newsock->type = sock->type;
1495         newsock->ops = sock->ops;
1496
1497         /*
1498          * We don't need try_module_get here, as the listening socket (sock)
1499          * has the protocol module (sock->ops->owner) held.
1500          */
1501         __module_get(newsock->ops->owner);
1502
1503         newfd = sock_alloc_fd(&newfile, flags & O_CLOEXEC);
1504         if (unlikely(newfd < 0)) {
1505                 err = newfd;
1506                 sock_release(newsock);
1507                 goto out_put;
1508         }
1509
1510         err = sock_attach_fd(newsock, newfile, flags & O_NONBLOCK);
1511         if (err < 0)
1512                 goto out_fd_simple;
1513
1514         err = security_socket_accept(sock, newsock);
1515         if (err)
1516                 goto out_fd;
1517
1518         err = sock->ops->accept(sock, newsock, sock->file->f_flags);
1519         if (err < 0)
1520                 goto out_fd;
1521
1522         if (upeer_sockaddr) {
1523                 if (newsock->ops->getname(newsock, (struct sockaddr *)&address,
1524                                           &len, 2) < 0) {
1525                         err = -ECONNABORTED;
1526                         goto out_fd;
1527                 }
1528                 err = move_addr_to_user((struct sockaddr *)&address,
1529                                         len, upeer_sockaddr, upeer_addrlen);
1530                 if (err < 0)
1531                         goto out_fd;
1532         }
1533
1534         /* File flags are not inherited via accept() unlike another OSes. */
1535
1536         fd_install(newfd, newfile);
1537         err = newfd;
1538
1539 out_put:
1540         fput_light(sock->file, fput_needed);
1541 out:
1542         return err;
1543 out_fd_simple:
1544         sock_release(newsock);
1545         put_filp(newfile);
1546         put_unused_fd(newfd);
1547         goto out_put;
1548 out_fd:
1549         fput(newfile);
1550         put_unused_fd(newfd);
1551         goto out_put;
1552 }
1553
1554 SYSCALL_DEFINE3(accept, int, fd, struct sockaddr __user *, upeer_sockaddr,
1555                 int __user *, upeer_addrlen)
1556 {
1557         return sys_accept4(fd, upeer_sockaddr, upeer_addrlen, 0);
1558 }
1559
1560 /*
1561  *      Attempt to connect to a socket with the server address.  The address
1562  *      is in user space so we verify it is OK and move it to kernel space.
1563  *
1564  *      For 1003.1g we need to add clean support for a bind to AF_UNSPEC to
1565  *      break bindings
1566  *
1567  *      NOTE: 1003.1g draft 6.3 is broken with respect to AX.25/NetROM and
1568  *      other SEQPACKET protocols that take time to connect() as it doesn't
1569  *      include the -EINPROGRESS status for such sockets.
1570  */
1571
1572 SYSCALL_DEFINE3(connect, int, fd, struct sockaddr __user *, uservaddr,
1573                 int, addrlen)
1574 {
1575         struct socket *sock;
1576         struct sockaddr_storage address;
1577         int err, fput_needed;
1578
1579         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1580         if (!sock)
1581                 goto out;
1582         err = move_addr_to_kernel(uservaddr, addrlen, (struct sockaddr *)&address);
1583         if (err < 0)
1584                 goto out_put;
1585
1586         err =
1587             security_socket_connect(sock, (struct sockaddr *)&address, addrlen);
1588         if (err)
1589                 goto out_put;
1590
1591         err = sock->ops->connect(sock, (struct sockaddr *)&address, addrlen,
1592                                  sock->file->f_flags);
1593 out_put:
1594         fput_light(sock->file, fput_needed);
1595 out:
1596         return err;
1597 }
1598
1599 /*
1600  *      Get the local address ('name') of a socket object. Move the obtained
1601  *      name to user space.
1602  */
1603
1604 SYSCALL_DEFINE3(getsockname, int, fd, struct sockaddr __user *, usockaddr,
1605                 int __user *, usockaddr_len)
1606 {
1607         struct socket *sock;
1608         struct sockaddr_storage address;
1609         int len, err, fput_needed;
1610
1611         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1612         if (!sock)
1613                 goto out;
1614
1615         err = security_socket_getsockname(sock);
1616         if (err)
1617                 goto out_put;
1618
1619         err = sock->ops->getname(sock, (struct sockaddr *)&address, &len, 0);
1620         if (err)
1621                 goto out_put;
1622         err = move_addr_to_user((struct sockaddr *)&address, len, usockaddr, usockaddr_len);
1623
1624 out_put:
1625         fput_light(sock->file, fput_needed);
1626 out:
1627         return err;
1628 }
1629
1630 /*
1631  *      Get the remote address ('name') of a socket object. Move the obtained
1632  *      name to user space.
1633  */
1634
1635 SYSCALL_DEFINE3(getpeername, int, fd, struct sockaddr __user *, usockaddr,
1636                 int __user *, usockaddr_len)
1637 {
1638         struct socket *sock;
1639         struct sockaddr_storage address;
1640         int len, err, fput_needed;
1641
1642         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1643         if (sock != NULL) {
1644                 err = security_socket_getpeername(sock);
1645                 if (err) {
1646                         fput_light(sock->file, fput_needed);
1647                         return err;
1648                 }
1649
1650                 err =
1651                     sock->ops->getname(sock, (struct sockaddr *)&address, &len,
1652                                        1);
1653                 if (!err)
1654                         err = move_addr_to_user((struct sockaddr *)&address, len, usockaddr,
1655                                                 usockaddr_len);
1656                 fput_light(sock->file, fput_needed);
1657         }
1658         return err;
1659 }
1660
1661 /*
1662  *      Send a datagram to a given address. We move the address into kernel
1663  *      space and check the user space data area is readable before invoking
1664  *      the protocol.
1665  */
1666
1667 SYSCALL_DEFINE6(sendto, int, fd, void __user *, buff, size_t, len,
1668                 unsigned, flags, struct sockaddr __user *, addr,
1669                 int, addr_len)
1670 {
1671         struct socket *sock;
1672         struct sockaddr_storage address;
1673         int err;
1674         struct msghdr msg;
1675         struct iovec iov;
1676         int fput_needed;
1677
1678         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1679         if (!sock)
1680                 goto out;
1681
1682         iov.iov_base = buff;
1683         iov.iov_len = len;
1684         msg.msg_name = NULL;
1685         msg.msg_iov = &iov;
1686         msg.msg_iovlen = 1;
1687         msg.msg_control = NULL;
1688         msg.msg_controllen = 0;
1689         msg.msg_namelen = 0;
1690         if (addr) {
1691                 err = move_addr_to_kernel(addr, addr_len, (struct sockaddr *)&address);
1692                 if (err < 0)
1693                         goto out_put;
1694                 msg.msg_name = (struct sockaddr *)&address;
1695                 msg.msg_namelen = addr_len;
1696         }
1697         if (sock->file->f_flags & O_NONBLOCK)
1698                 flags |= MSG_DONTWAIT;
1699         msg.msg_flags = flags;
1700         err = sock_sendmsg(sock, &msg, len);
1701
1702 out_put:
1703         fput_light(sock->file, fput_needed);
1704 out:
1705         return err;
1706 }
1707
1708 /*
1709  *      Send a datagram down a socket.
1710  */
1711
1712 SYSCALL_DEFINE4(send, int, fd, void __user *, buff, size_t, len,
1713                 unsigned, flags)
1714 {
1715         return sys_sendto(fd, buff, len, flags, NULL, 0);
1716 }
1717
1718 /*
1719  *      Receive a frame from the socket and optionally record the address of the
1720  *      sender. We verify the buffers are writable and if needed move the
1721  *      sender address from kernel to user space.
1722  */
1723
1724 SYSCALL_DEFINE6(recvfrom, int, fd, void __user *, ubuf, size_t, size,
1725                 unsigned, flags, struct sockaddr __user *, addr,
1726                 int __user *, addr_len)
1727 {
1728         struct socket *sock;
1729         struct iovec iov;
1730         struct msghdr msg;
1731         struct sockaddr_storage address;
1732         int err, err2;
1733         int fput_needed;
1734
1735         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1736         if (!sock)
1737                 goto out;
1738
1739         msg.msg_control = NULL;
1740         msg.msg_controllen = 0;
1741         msg.msg_iovlen = 1;
1742         msg.msg_iov = &iov;
1743         iov.iov_len = size;
1744         iov.iov_base = ubuf;
1745         msg.msg_name = (struct sockaddr *)&address;
1746         msg.msg_namelen = sizeof(address);
1747         if (sock->file->f_flags & O_NONBLOCK)
1748                 flags |= MSG_DONTWAIT;
1749         err = sock_recvmsg(sock, &msg, size, flags);
1750
1751         if (err >= 0 && addr != NULL) {
1752                 err2 = move_addr_to_user((struct sockaddr *)&address,
1753                                          msg.msg_namelen, addr, addr_len);
1754                 if (err2 < 0)
1755                         err = err2;
1756         }
1757
1758         fput_light(sock->file, fput_needed);
1759 out:
1760         return err;
1761 }
1762
1763 /*
1764  *      Receive a datagram from a socket.
1765  */
1766
1767 asmlinkage long sys_recv(int fd, void __user *ubuf, size_t size,
1768                          unsigned flags)
1769 {
1770         return sys_recvfrom(fd, ubuf, size, flags, NULL, NULL);
1771 }
1772
1773 /*
1774  *      Set a socket option. Because we don't know the option lengths we have
1775  *      to pass the user mode parameter for the protocols to sort out.
1776  */
1777
1778 SYSCALL_DEFINE5(setsockopt, int, fd, int, level, int, optname,
1779                 char __user *, optval, int, optlen)
1780 {
1781         int err, fput_needed;
1782         struct socket *sock;
1783
1784         if (optlen < 0)
1785                 return -EINVAL;
1786
1787         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1788         if (sock != NULL) {
1789                 err = security_socket_setsockopt(sock, level, optname);
1790                 if (err)
1791                         goto out_put;
1792
1793                 if (level == SOL_SOCKET)
1794                         err =
1795                             sock_setsockopt(sock, level, optname, optval,
1796                                             optlen);
1797                 else
1798                         err =
1799                             sock->ops->setsockopt(sock, level, optname, optval,
1800                                                   optlen);
1801 out_put:
1802                 fput_light(sock->file, fput_needed);
1803         }
1804         return err;
1805 }
1806
1807 /*
1808  *      Get a socket option. Because we don't know the option lengths we have
1809  *      to pass a user mode parameter for the protocols to sort out.
1810  */
1811
1812 SYSCALL_DEFINE5(getsockopt, int, fd, int, level, int, optname,
1813                 char __user *, optval, int __user *, optlen)
1814 {
1815         int err, fput_needed;
1816         struct socket *sock;
1817
1818         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1819         if (sock != NULL) {
1820                 err = security_socket_getsockopt(sock, level, optname);
1821                 if (err)
1822                         goto out_put;
1823
1824                 if (level == SOL_SOCKET)
1825                         err =
1826                             sock_getsockopt(sock, level, optname, optval,
1827                                             optlen);
1828                 else
1829                         err =
1830                             sock->ops->getsockopt(sock, level, optname, optval,
1831                                                   optlen);
1832 out_put:
1833                 fput_light(sock->file, fput_needed);
1834         }
1835         return err;
1836 }
1837
1838 /*
1839  *      Shutdown a socket.
1840  */
1841
1842 SYSCALL_DEFINE2(shutdown, int, fd, int, how)
1843 {
1844         int err, fput_needed;
1845         struct socket *sock;
1846
1847         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1848         if (sock != NULL) {
1849                 err = security_socket_shutdown(sock, how);
1850                 if (!err)
1851                         err = sock->ops->shutdown(sock, how);
1852                 fput_light(sock->file, fput_needed);
1853         }
1854         return err;
1855 }
1856
1857 /* A couple of helpful macros for getting the address of the 32/64 bit
1858  * fields which are the same type (int / unsigned) on our platforms.
1859  */
1860 #define COMPAT_MSG(msg, member) ((MSG_CMSG_COMPAT & flags) ? &msg##_compat->member : &msg->member)
1861 #define COMPAT_NAMELEN(msg)     COMPAT_MSG(msg, msg_namelen)
1862 #define COMPAT_FLAGS(msg)       COMPAT_MSG(msg, msg_flags)
1863
1864 /*
1865  *      BSD sendmsg interface
1866  */
1867
1868 SYSCALL_DEFINE3(sendmsg, int, fd, struct msghdr __user *, msg, unsigned, flags)
1869 {
1870         struct compat_msghdr __user *msg_compat =
1871             (struct compat_msghdr __user *)msg;
1872         struct socket *sock;
1873         struct sockaddr_storage address;
1874         struct iovec iovstack[UIO_FASTIOV], *iov = iovstack;
1875         unsigned char ctl[sizeof(struct cmsghdr) + 20]
1876             __attribute__ ((aligned(sizeof(__kernel_size_t))));
1877         /* 20 is size of ipv6_pktinfo */
1878         unsigned char *ctl_buf = ctl;
1879         struct msghdr msg_sys;
1880         int err, ctl_len, iov_size, total_len;
1881         int fput_needed;
1882
1883         err = -EFAULT;
1884         if (MSG_CMSG_COMPAT & flags) {
1885                 if (get_compat_msghdr(&msg_sys, msg_compat))
1886                         return -EFAULT;
1887         }
1888         else if (copy_from_user(&msg_sys, msg, sizeof(struct msghdr)))
1889                 return -EFAULT;
1890
1891         sock = sockfd_lookup_light(fd, &err, &fput_needed);
1892         if (!sock)
1893                 goto out;
1894
1895         /* do not move before msg_sys is valid */
1896         err = -EMSGSIZE;
1897         if (msg_sys.msg_iovlen > UIO_MAXIOV)
1898                 goto out_put;
1899
1900         /* Check whether to allocate the iovec area */
1901         err = -ENOMEM;
1902         iov_size = msg_sys.msg_iovlen * sizeof(struct iovec);
1903         if (msg_sys.msg_iovlen > UIO_FASTIOV) {
1904                 iov = sock_kmalloc(sock->sk, iov_size, GFP_KERNEL);
1905                 if (!iov)
1906                         goto out_put;
1907         }
1908
1909         /* This will also move the address data into kernel space */
1910         if (MSG_CMSG_COMPAT & flags) {
1911                 err = verify_compat_iovec(&msg_sys, iov,
1912                                           (struct sockaddr *)&address,
1913                                           VERIFY_READ);
1914         } else
1915                 err = verify_iovec(&msg_sys, iov,
1916                                    (struct sockaddr *)&address,
1917                                    VERIFY_READ);
1918         if (err < 0)
1919                 goto out_freeiov;
1920         total_len = err;
1921
1922         err = -ENOBUFS;
1923
1924         if (msg_sys.msg_controllen > INT_MAX)
1925                 goto out_freeiov;
1926         ctl_len = msg_sys.msg_controllen;
1927         if ((MSG_CMSG_COMPAT & flags) && ctl_len) {
1928                 err =
1929                     cmsghdr_from_user_compat_to_kern(&msg_sys, sock->sk, ctl,
1930                                                      sizeof(ctl));
1931                 if (err)
1932                         goto out_freeiov;
1933                 ctl_buf = msg_sys.msg_control;
1934                 ctl_len = msg_sys.msg_controllen;
1935         } else if (ctl_len) {
1936                 if (ctl_len > sizeof(ctl)) {
1937                         ctl_buf = sock_kmalloc(sock->sk, ctl_len, GFP_KERNEL);
1938                         if (ctl_buf == NULL)
1939                                 goto out_freeiov;
1940                 }
1941                 err = -EFAULT;
1942                 /*
1943                  * Careful! Before this, msg_sys.msg_control contains a user pointer.
1944                  * Afterwards, it will be a kernel pointer. Thus the compiler-assisted
1945                  * checking falls down on this.
1946                  */
1947                 if (copy_from_user(ctl_buf, (void __user *)msg_sys.msg_control,
1948                                    ctl_len))
1949                         goto out_freectl;
1950                 msg_sys.msg_control = ctl_buf;
1951         }
1952         msg_sys.msg_flags = flags;
1953
1954         if (sock->file->f_flags & O_NONBLOCK)
1955                 msg_sys.msg_flags |= MSG_DONTWAIT;
1956         err = sock_sendmsg(sock, &msg_sys, total_len);
1957
1958 out_freectl:
1959         if (ctl_buf != ctl)
1960                 sock_kfree_s(sock->sk, ctl_buf, ctl_len);
1961 out_freeiov:
1962         if (iov != iovstack)
1963                 sock_kfree_s(sock->sk, iov, iov_size);
1964 out_put:
1965         fput_light(sock->file, fput_needed);
1966 out:
1967         return err;
1968 }
1969
1970 /*
1971  *      BSD recvmsg interface
1972  */
1973
1974 SYSCALL_DEFINE3(recvmsg, int, fd, struct msghdr __user *, msg,
1975                 unsigned int, flags)
1976 {
1977         struct compat_msghdr __user *msg_compat =
1978             (struct compat_msghdr __user *)msg;
1979         struct socket *sock;
1980         struct iovec iovstack[UIO_FASTIOV];
1981         struct iovec *iov = iovstack;
1982         struct msghdr msg_sys;
1983         unsigned long cmsg_ptr;
1984         int err, iov_size, total_len, len;
1985         int fput_needed;
1986
1987         /* kernel mode address */
1988         struct sockaddr_storage addr;
1989
1990         /* user mode address pointers */
1991         struct sockaddr __user *uaddr;
1992         int __user *uaddr_len;
1993
1994         if (MSG_CMSG_COMPAT & flags) {
1995                 if (get_compat_msghdr(&msg_sys, msg_compat))
1996                         return -EFAULT;
1997         }
1998         else if (copy_from_user(&msg_sys, msg, sizeof(struct msghdr)))
1999                 return -EFAULT;
2000
2001         sock = sockfd_lookup_light(fd, &err, &fput_needed);
2002         if (!sock)
2003                 goto out;
2004
2005         err = -EMSGSIZE;
2006         if (msg_sys.msg_iovlen > UIO_MAXIOV)
2007                 goto out_put;
2008
2009         /* Check whether to allocate the iovec area */
2010         err = -ENOMEM;
2011         iov_size = msg_sys.msg_iovlen * sizeof(struct iovec);
2012         if (msg_sys.msg_iovlen > UIO_FASTIOV) {
2013                 iov = sock_kmalloc(sock->sk, iov_size, GFP_KERNEL);
2014                 if (!iov)
2015                         goto out_put;
2016         }
2017
2018         /*
2019          *      Save the user-mode address (verify_iovec will change the
2020          *      kernel msghdr to use the kernel address space)
2021          */
2022
2023         uaddr = (__force void __user *)msg_sys.msg_name;
2024         uaddr_len = COMPAT_NAMELEN(msg);
2025         if (MSG_CMSG_COMPAT & flags) {
2026                 err = verify_compat_iovec(&msg_sys, iov,
2027                                           (struct sockaddr *)&addr,
2028                                           VERIFY_WRITE);
2029         } else
2030                 err = verify_iovec(&msg_sys, iov,
2031                                    (struct sockaddr *)&addr,
2032                                    VERIFY_WRITE);
2033         if (err < 0)
2034                 goto out_freeiov;
2035         total_len = err;
2036
2037         cmsg_ptr = (unsigned long)msg_sys.msg_control;
2038         msg_sys.msg_flags = flags & (MSG_CMSG_CLOEXEC|MSG_CMSG_COMPAT);
2039
2040         if (sock->file->f_flags & O_NONBLOCK)
2041                 flags |= MSG_DONTWAIT;
2042         err = sock_recvmsg(sock, &msg_sys, total_len, flags);
2043         if (err < 0)
2044                 goto out_freeiov;
2045         len = err;
2046
2047         if (uaddr != NULL) {
2048                 err = move_addr_to_user((struct sockaddr *)&addr,
2049                                         msg_sys.msg_namelen, uaddr,
2050                                         uaddr_len);
2051                 if (err < 0)
2052                         goto out_freeiov;
2053         }
2054         err = __put_user((msg_sys.msg_flags & ~MSG_CMSG_COMPAT),
2055                          COMPAT_FLAGS(msg));
2056         if (err)
2057                 goto out_freeiov;
2058         if (MSG_CMSG_COMPAT & flags)
2059                 err = __put_user((unsigned long)msg_sys.msg_control - cmsg_ptr,
2060                                  &msg_compat->msg_controllen);
2061         else
2062                 err = __put_user((unsigned long)msg_sys.msg_control - cmsg_ptr,
2063                                  &msg->msg_controllen);
2064         if (err)
2065                 goto out_freeiov;
2066         err = len;
2067
2068 out_freeiov:
2069         if (iov != iovstack)
2070                 sock_kfree_s(sock->sk, iov, iov_size);
2071 out_put:
2072         fput_light(sock->file, fput_needed);
2073 out:
2074         return err;
2075 }
2076
2077 #ifdef __ARCH_WANT_SYS_SOCKETCALL
2078
2079 /* Argument list sizes for sys_socketcall */
2080 #define AL(x) ((x) * sizeof(unsigned long))
2081 static const unsigned char nargs[19]={
2082         AL(0),AL(3),AL(3),AL(3),AL(2),AL(3),
2083         AL(3),AL(3),AL(4),AL(4),AL(4),AL(6),
2084         AL(6),AL(2),AL(5),AL(5),AL(3),AL(3),
2085         AL(4)
2086 };
2087
2088 #undef AL
2089
2090 /*
2091  *      System call vectors.
2092  *
2093  *      Argument checking cleaned up. Saved 20% in size.
2094  *  This function doesn't need to set the kernel lock because
2095  *  it is set by the callees.
2096  */
2097
2098 SYSCALL_DEFINE2(socketcall, int, call, unsigned long __user *, args)
2099 {
2100         unsigned long a[6];
2101         unsigned long a0, a1;
2102         int err;
2103
2104         if (call < 1 || call > SYS_ACCEPT4)
2105                 return -EINVAL;
2106
2107         /* copy_from_user should be SMP safe. */
2108         if (copy_from_user(a, args, nargs[call]))
2109                 return -EFAULT;
2110
2111         audit_socketcall(nargs[call] / sizeof(unsigned long), a);
2112
2113         a0 = a[0];
2114         a1 = a[1];
2115
2116         switch (call) {
2117         case SYS_SOCKET:
2118                 err = sys_socket(a0, a1, a[2]);
2119                 break;
2120         case SYS_BIND:
2121                 err = sys_bind(a0, (struct sockaddr __user *)a1, a[2]);
2122                 break;
2123         case SYS_CONNECT:
2124                 err = sys_connect(a0, (struct sockaddr __user *)a1, a[2]);
2125                 break;
2126         case SYS_LISTEN:
2127                 err = sys_listen(a0, a1);
2128                 break;
2129         case SYS_ACCEPT:
2130                 err = sys_accept4(a0, (struct sockaddr __user *)a1,
2131                                   (int __user *)a[2], 0);
2132                 break;
2133         case SYS_GETSOCKNAME:
2134                 err =
2135                     sys_getsockname(a0, (struct sockaddr __user *)a1,
2136                                     (int __user *)a[2]);
2137                 break;
2138         case SYS_GETPEERNAME:
2139                 err =
2140                     sys_getpeername(a0, (struct sockaddr __user *)a1,
2141                                     (int __user *)a[2]);
2142                 break;
2143         case SYS_SOCKETPAIR:
2144                 err = sys_socketpair(a0, a1, a[2], (int __user *)a[3]);
2145                 break;
2146         case SYS_SEND:
2147                 err = sys_send(a0, (void __user *)a1, a[2], a[3]);
2148                 break;
2149         case SYS_SENDTO:
2150                 err = sys_sendto(a0, (void __user *)a1, a[2], a[3],
2151                                  (struct sockaddr __user *)a[4], a[5]);
2152                 break;
2153         case SYS_RECV:
2154                 err = sys_recv(a0, (void __user *)a1, a[2], a[3]);
2155                 break;
2156         case SYS_RECVFROM:
2157                 err = sys_recvfrom(a0, (void __user *)a1, a[2], a[3],
2158                                    (struct sockaddr __user *)a[4],
2159                                    (int __user *)a[5]);
2160                 break;
2161         case SYS_SHUTDOWN:
2162                 err = sys_shutdown(a0, a1);
2163                 break;
2164         case SYS_SETSOCKOPT:
2165                 err = sys_setsockopt(a0, a1, a[2], (char __user *)a[3], a[4]);
2166                 break;
2167         case SYS_GETSOCKOPT:
2168                 err =
2169                     sys_getsockopt(a0, a1, a[2], (char __user *)a[3],
2170                                    (int __user *)a[4]);
2171                 break;
2172         case SYS_SENDMSG:
2173                 err = sys_sendmsg(a0, (struct msghdr __user *)a1, a[2]);
2174                 break;
2175         case SYS_RECVMSG:
2176                 err = sys_recvmsg(a0, (struct msghdr __user *)a1, a[2]);
2177                 break;
2178         case SYS_ACCEPT4:
2179                 err = sys_accept4(a0, (struct sockaddr __user *)a1,
2180                                   (int __user *)a[2], a[3]);
2181                 break;
2182         default:
2183                 err = -EINVAL;
2184                 break;
2185         }
2186         return err;
2187 }
2188
2189 #endif                          /* __ARCH_WANT_SYS_SOCKETCALL */
2190
2191 /**
2192  *      sock_register - add a socket protocol handler
2193  *      @ops: description of protocol
2194  *
2195  *      This function is called by a protocol handler that wants to
2196  *      advertise its address family, and have it linked into the
2197  *      socket interface. The value ops->family coresponds to the
2198  *      socket system call protocol family.
2199  */
2200 int sock_register(const struct net_proto_family *ops)
2201 {
2202         int err;
2203
2204         if (ops->family >= NPROTO) {
2205                 printk(KERN_CRIT "protocol %d >= NPROTO(%d)\n", ops->family,
2206                        NPROTO);
2207                 return -ENOBUFS;
2208         }
2209
2210         spin_lock(&net_family_lock);
2211         if (net_families[ops->family])
2212                 err = -EEXIST;
2213         else {
2214                 net_families[ops->family] = ops;
2215                 err = 0;
2216         }
2217         spin_unlock(&net_family_lock);
2218
2219         printk(KERN_INFO "NET: Registered protocol family %d\n", ops->family);
2220         return err;
2221 }
2222
2223 /**
2224  *      sock_unregister - remove a protocol handler
2225  *      @family: protocol family to remove
2226  *
2227  *      This function is called by a protocol handler that wants to
2228  *      remove its address family, and have it unlinked from the
2229  *      new socket creation.
2230  *
2231  *      If protocol handler is a module, then it can use module reference
2232  *      counts to protect against new references. If protocol handler is not
2233  *      a module then it needs to provide its own protection in
2234  *      the ops->create routine.
2235  */
2236 void sock_unregister(int family)
2237 {
2238         BUG_ON(family < 0 || family >= NPROTO);
2239
2240         spin_lock(&net_family_lock);
2241         net_families[family] = NULL;
2242         spin_unlock(&net_family_lock);
2243
2244         synchronize_rcu();
2245
2246         printk(KERN_INFO "NET: Unregistered protocol family %d\n", family);
2247 }
2248
2249 static int __init sock_init(void)
2250 {
2251         /*
2252          *      Initialize sock SLAB cache.
2253          */
2254
2255         sk_init();
2256
2257         /*
2258          *      Initialize skbuff SLAB cache
2259          */
2260         skb_init();
2261
2262         /*
2263          *      Initialize the protocols module.
2264          */
2265
2266         init_inodecache();
2267         register_filesystem(&sock_fs_type);
2268         sock_mnt = kern_mount(&sock_fs_type);
2269
2270         /* The real protocol initialization is performed in later initcalls.
2271          */
2272
2273 #ifdef CONFIG_NETFILTER
2274         netfilter_init();
2275 #endif
2276
2277         return 0;
2278 }
2279
2280 core_initcall(sock_init);       /* early initcall */
2281
2282 #ifdef CONFIG_PROC_FS
2283 void socket_seq_show(struct seq_file *seq)
2284 {
2285         int cpu;
2286         int counter = 0;
2287
2288         for_each_possible_cpu(cpu)
2289             counter += per_cpu(sockets_in_use, cpu);
2290
2291         /* It can be negative, by the way. 8) */
2292         if (counter < 0)
2293                 counter = 0;
2294
2295         seq_printf(seq, "sockets: used %d\n", counter);
2296 }
2297 #endif                          /* CONFIG_PROC_FS */
2298
2299 #ifdef CONFIG_COMPAT
2300 static long compat_sock_ioctl(struct file *file, unsigned cmd,
2301                               unsigned long arg)
2302 {
2303         struct socket *sock = file->private_data;
2304         int ret = -ENOIOCTLCMD;
2305         struct sock *sk;
2306         struct net *net;
2307
2308         sk = sock->sk;
2309         net = sock_net(sk);
2310
2311         if (sock->ops->compat_ioctl)
2312                 ret = sock->ops->compat_ioctl(sock, cmd, arg);
2313
2314         if (ret == -ENOIOCTLCMD &&
2315             (cmd >= SIOCIWFIRST && cmd <= SIOCIWLAST))
2316                 ret = compat_wext_handle_ioctl(net, cmd, arg);
2317
2318         return ret;
2319 }
2320 #endif
2321
2322 int kernel_bind(struct socket *sock, struct sockaddr *addr, int addrlen)
2323 {
2324         return sock->ops->bind(sock, addr, addrlen);
2325 }
2326
2327 int kernel_listen(struct socket *sock, int backlog)
2328 {
2329         return sock->ops->listen(sock, backlog);
2330 }
2331
2332 int kernel_accept(struct socket *sock, struct socket **newsock, int flags)
2333 {
2334         struct sock *sk = sock->sk;
2335         int err;
2336
2337         err = sock_create_lite(sk->sk_family, sk->sk_type, sk->sk_protocol,
2338                                newsock);
2339         if (err < 0)
2340                 goto done;
2341
2342         err = sock->ops->accept(sock, *newsock, flags);
2343         if (err < 0) {
2344                 sock_release(*newsock);
2345                 *newsock = NULL;
2346                 goto done;
2347         }
2348
2349         (*newsock)->ops = sock->ops;
2350         __module_get((*newsock)->ops->owner);
2351
2352 done:
2353         return err;
2354 }
2355
2356 int kernel_connect(struct socket *sock, struct sockaddr *addr, int addrlen,
2357                    int flags)
2358 {
2359         return sock->ops->connect(sock, addr, addrlen, flags);
2360 }
2361
2362 int kernel_getsockname(struct socket *sock, struct sockaddr *addr,
2363                          int *addrlen)
2364 {
2365         return sock->ops->getname(sock, addr, addrlen, 0);
2366 }
2367
2368 int kernel_getpeername(struct socket *sock, struct sockaddr *addr,
2369                          int *addrlen)
2370 {
2371         return sock->ops->getname(sock, addr, addrlen, 1);
2372 }
2373
2374 int kernel_getsockopt(struct socket *sock, int level, int optname,
2375                         char *optval, int *optlen)
2376 {
2377         mm_segment_t oldfs = get_fs();
2378         int err;
2379
2380         set_fs(KERNEL_DS);
2381         if (level == SOL_SOCKET)
2382                 err = sock_getsockopt(sock, level, optname, optval, optlen);
2383         else
2384                 err = sock->ops->getsockopt(sock, level, optname, optval,
2385                                             optlen);
2386         set_fs(oldfs);
2387         return err;
2388 }
2389
2390 int kernel_setsockopt(struct socket *sock, int level, int optname,
2391                         char *optval, int optlen)
2392 {
2393         mm_segment_t oldfs = get_fs();
2394         int err;
2395
2396         set_fs(KERNEL_DS);
2397         if (level == SOL_SOCKET)
2398                 err = sock_setsockopt(sock, level, optname, optval, optlen);
2399         else
2400                 err = sock->ops->setsockopt(sock, level, optname, optval,
2401                                             optlen);
2402         set_fs(oldfs);
2403         return err;
2404 }
2405
2406 int kernel_sendpage(struct socket *sock, struct page *page, int offset,
2407                     size_t size, int flags)
2408 {
2409         if (sock->ops->sendpage)
2410                 return sock->ops->sendpage(sock, page, offset, size, flags);
2411
2412         return sock_no_sendpage(sock, page, offset, size, flags);
2413 }
2414
2415 int kernel_sock_ioctl(struct socket *sock, int cmd, unsigned long arg)
2416 {
2417         mm_segment_t oldfs = get_fs();
2418         int err;
2419
2420         set_fs(KERNEL_DS);
2421         err = sock->ops->ioctl(sock, cmd, arg);
2422         set_fs(oldfs);
2423
2424         return err;
2425 }
2426
2427 int kernel_sock_shutdown(struct socket *sock, enum sock_shutdown_cmd how)
2428 {
2429         return sock->ops->shutdown(sock, how);
2430 }
2431
2432 EXPORT_SYMBOL(sock_create);
2433 EXPORT_SYMBOL(sock_create_kern);
2434 EXPORT_SYMBOL(sock_create_lite);
2435 EXPORT_SYMBOL(sock_map_fd);
2436 EXPORT_SYMBOL(sock_recvmsg);
2437 EXPORT_SYMBOL(sock_register);
2438 EXPORT_SYMBOL(sock_release);
2439 EXPORT_SYMBOL(sock_sendmsg);
2440 EXPORT_SYMBOL(sock_unregister);
2441 EXPORT_SYMBOL(sock_wake_async);
2442 EXPORT_SYMBOL(sockfd_lookup);
2443 EXPORT_SYMBOL(kernel_sendmsg);
2444 EXPORT_SYMBOL(kernel_recvmsg);
2445 EXPORT_SYMBOL(kernel_bind);
2446 EXPORT_SYMBOL(kernel_listen);
2447 EXPORT_SYMBOL(kernel_accept);
2448 EXPORT_SYMBOL(kernel_connect);
2449 EXPORT_SYMBOL(kernel_getsockname);
2450 EXPORT_SYMBOL(kernel_getpeername);
2451 EXPORT_SYMBOL(kernel_getsockopt);
2452 EXPORT_SYMBOL(kernel_setsockopt);
2453 EXPORT_SYMBOL(kernel_sendpage);
2454 EXPORT_SYMBOL(kernel_sock_ioctl);
2455 EXPORT_SYMBOL(kernel_sock_shutdown);