| /* $Id: socket.c,v 1.6 2002/02/08 03:57:14 davem Exp $ |
| * socket.c: Socket syscall emulation for Solaris 2.6+ |
| * |
| * Copyright (C) 1998 Jakub Jelinek (jj@ultra.linux.cz) |
| * |
| * 1999-08-19 Fixed socketpair code |
| * Jason Rappleye (rappleye@ccr.buffalo.edu) |
| */ |
| |
| #include <linux/types.h> |
| #include <linux/mm.h> |
| #include <linux/slab.h> |
| #include <linux/socket.h> |
| #include <linux/file.h> |
| #include <linux/net.h> |
| #include <linux/compat.h> |
| #include <net/compat.h> |
| #include <net/sock.h> |
| |
| #include <asm/uaccess.h> |
| #include <asm/string.h> |
| #include <asm/oplib.h> |
| #include <asm/idprom.h> |
| |
| #include "conv.h" |
| |
| #define SOCK_SOL_STREAM 2 |
| #define SOCK_SOL_DGRAM 1 |
| #define SOCK_SOL_RAW 4 |
| #define SOCK_SOL_RDM 5 |
| #define SOCK_SOL_SEQPACKET 6 |
| |
| #define SOL_SO_SNDLOWAT 0x1003 |
| #define SOL_SO_RCVLOWAT 0x1004 |
| #define SOL_SO_SNDTIMEO 0x1005 |
| #define SOL_SO_RCVTIMEO 0x1006 |
| #define SOL_SO_STATE 0x2000 |
| |
| #define SOL_SS_NDELAY 0x040 |
| #define SOL_SS_NONBLOCK 0x080 |
| #define SOL_SS_ASYNC 0x100 |
| |
| #define SO_STATE 0x000e |
| |
| static int socket_check(int family, int type) |
| { |
| if (family != PF_UNIX && family != PF_INET) |
| return -ESOCKTNOSUPPORT; |
| switch (type) { |
| case SOCK_SOL_STREAM: type = SOCK_STREAM; break; |
| case SOCK_SOL_DGRAM: type = SOCK_DGRAM; break; |
| case SOCK_SOL_RAW: type = SOCK_RAW; break; |
| case SOCK_SOL_RDM: type = SOCK_RDM; break; |
| case SOCK_SOL_SEQPACKET: type = SOCK_SEQPACKET; break; |
| default: return -EINVAL; |
| } |
| return type; |
| } |
| |
| static int solaris_to_linux_sockopt(int optname) |
| { |
| switch (optname) { |
| case SOL_SO_SNDLOWAT: optname = SO_SNDLOWAT; break; |
| case SOL_SO_RCVLOWAT: optname = SO_RCVLOWAT; break; |
| case SOL_SO_SNDTIMEO: optname = SO_SNDTIMEO; break; |
| case SOL_SO_RCVTIMEO: optname = SO_RCVTIMEO; break; |
| case SOL_SO_STATE: optname = SO_STATE; break; |
| }; |
| |
| return optname; |
| } |
| |
| asmlinkage int solaris_socket(int family, int type, int protocol) |
| { |
| int (*sys_socket)(int, int, int) = |
| (int (*)(int, int, int))SYS(socket); |
| |
| type = socket_check (family, type); |
| if (type < 0) return type; |
| return sys_socket(family, type, protocol); |
| } |
| |
| asmlinkage int solaris_socketpair(int *usockvec) |
| { |
| int (*sys_socketpair)(int, int, int, int *) = |
| (int (*)(int, int, int, int *))SYS(socketpair); |
| |
| /* solaris socketpair really only takes one arg at the syscall |
| * level, int * usockvec. The libs apparently take care of |
| * making sure that family==AF_UNIX and type==SOCK_STREAM. The |
| * pointer we really want ends up residing in the first (and |
| * supposedly only) argument. |
| */ |
| |
| return sys_socketpair(AF_UNIX, SOCK_STREAM, 0, (int *)usockvec); |
| } |
| |
| asmlinkage int solaris_bind(int fd, struct sockaddr *addr, int addrlen) |
| { |
| int (*sys_bind)(int, struct sockaddr *, int) = |
| (int (*)(int, struct sockaddr *, int))SUNOS(104); |
| |
| return sys_bind(fd, addr, addrlen); |
| } |
| |
| asmlinkage int solaris_setsockopt(int fd, int level, int optname, u32 optval, int optlen) |
| { |
| int (*sunos_setsockopt)(int, int, int, u32, int) = |
| (int (*)(int, int, int, u32, int))SUNOS(105); |
| |
| optname = solaris_to_linux_sockopt(optname); |
| if (optname < 0) |
| return optname; |
| if (optname == SO_STATE) |
| return 0; |
| |
| return sunos_setsockopt(fd, level, optname, optval, optlen); |
| } |
| |
| asmlinkage int solaris_getsockopt(int fd, int level, int optname, u32 optval, u32 optlen) |
| { |
| int (*sunos_getsockopt)(int, int, int, u32, u32) = |
| (int (*)(int, int, int, u32, u32))SUNOS(118); |
| |
| optname = solaris_to_linux_sockopt(optname); |
| if (optname < 0) |
| return optname; |
| |
| if (optname == SO_STATE) |
| optname = SOL_SO_STATE; |
| |
| return sunos_getsockopt(fd, level, optname, optval, optlen); |
| } |
| |
| asmlinkage int solaris_connect(int fd, struct sockaddr __user *addr, int addrlen) |
| { |
| int (*sys_connect)(int, struct sockaddr __user *, int) = |
| (int (*)(int, struct sockaddr __user *, int))SYS(connect); |
| |
| return sys_connect(fd, addr, addrlen); |
| } |
| |
| asmlinkage int solaris_accept(int fd, struct sockaddr __user *addr, int __user *addrlen) |
| { |
| int (*sys_accept)(int, struct sockaddr __user *, int __user *) = |
| (int (*)(int, struct sockaddr __user *, int __user *))SYS(accept); |
| |
| return sys_accept(fd, addr, addrlen); |
| } |
| |
| asmlinkage int solaris_listen(int fd, int backlog) |
| { |
| int (*sys_listen)(int, int) = |
| (int (*)(int, int))SUNOS(106); |
| |
| return sys_listen(fd, backlog); |
| } |
| |
| asmlinkage int solaris_shutdown(int fd, int how) |
| { |
| int (*sys_shutdown)(int, int) = |
| (int (*)(int, int))SYS(shutdown); |
| |
| return sys_shutdown(fd, how); |
| } |
| |
| #define MSG_SOL_OOB 0x1 |
| #define MSG_SOL_PEEK 0x2 |
| #define MSG_SOL_DONTROUTE 0x4 |
| #define MSG_SOL_EOR 0x8 |
| #define MSG_SOL_CTRUNC 0x10 |
| #define MSG_SOL_TRUNC 0x20 |
| #define MSG_SOL_WAITALL 0x40 |
| #define MSG_SOL_DONTWAIT 0x80 |
| |
| static int solaris_to_linux_msgflags(int flags) |
| { |
| int fl = flags & (MSG_OOB|MSG_PEEK|MSG_DONTROUTE); |
| |
| if (flags & MSG_SOL_EOR) fl |= MSG_EOR; |
| if (flags & MSG_SOL_CTRUNC) fl |= MSG_CTRUNC; |
| if (flags & MSG_SOL_TRUNC) fl |= MSG_TRUNC; |
| if (flags & MSG_SOL_WAITALL) fl |= MSG_WAITALL; |
| if (flags & MSG_SOL_DONTWAIT) fl |= MSG_DONTWAIT; |
| return fl; |
| } |
| |
| static int linux_to_solaris_msgflags(int flags) |
| { |
| int fl = flags & (MSG_OOB|MSG_PEEK|MSG_DONTROUTE); |
| |
| if (flags & MSG_EOR) fl |= MSG_SOL_EOR; |
| if (flags & MSG_CTRUNC) fl |= MSG_SOL_CTRUNC; |
| if (flags & MSG_TRUNC) fl |= MSG_SOL_TRUNC; |
| if (flags & MSG_WAITALL) fl |= MSG_SOL_WAITALL; |
| if (flags & MSG_DONTWAIT) fl |= MSG_SOL_DONTWAIT; |
| return fl; |
| } |
| |
| asmlinkage int solaris_recvfrom(int s, char __user *buf, int len, int flags, u32 from, u32 fromlen) |
| { |
| int (*sys_recvfrom)(int, void __user *, size_t, unsigned, struct sockaddr __user *, int __user *) = |
| (int (*)(int, void __user *, size_t, unsigned, struct sockaddr __user *, int __user *))SYS(recvfrom); |
| |
| return sys_recvfrom(s, buf, len, solaris_to_linux_msgflags(flags), A(from), A(fromlen)); |
| } |
| |
| asmlinkage int solaris_recv(int s, char __user *buf, int len, int flags) |
| { |
| int (*sys_recvfrom)(int, void __user *, size_t, unsigned, struct sockaddr __user *, int __user *) = |
| (int (*)(int, void __user *, size_t, unsigned, struct sockaddr __user *, int __user *))SYS(recvfrom); |
| |
| return sys_recvfrom(s, buf, len, solaris_to_linux_msgflags(flags), NULL, NULL); |
| } |
| |
| asmlinkage int solaris_sendto(int s, char __user *buf, int len, int flags, u32 to, u32 tolen) |
| { |
| int (*sys_sendto)(int, void __user *, size_t, unsigned, struct sockaddr __user *, int __user *) = |
| (int (*)(int, void __user *, size_t, unsigned, struct sockaddr __user *, int __user *))SYS(sendto); |
| |
| return sys_sendto(s, buf, len, solaris_to_linux_msgflags(flags), A(to), A(tolen)); |
| } |
| |
| asmlinkage int solaris_send(int s, char *buf, int len, int flags) |
| { |
| int (*sys_sendto)(int, void *, size_t, unsigned, struct sockaddr *, int *) = |
| (int (*)(int, void *, size_t, unsigned, struct sockaddr *, int *))SYS(sendto); |
| |
| return sys_sendto(s, buf, len, solaris_to_linux_msgflags(flags), NULL, NULL); |
| } |
| |
| asmlinkage int solaris_getpeername(int fd, struct sockaddr *addr, int *addrlen) |
| { |
| int (*sys_getpeername)(int, struct sockaddr *, int *) = |
| (int (*)(int, struct sockaddr *, int *))SYS(getpeername); |
| |
| return sys_getpeername(fd, addr, addrlen); |
| } |
| |
| asmlinkage int solaris_getsockname(int fd, struct sockaddr *addr, int *addrlen) |
| { |
| int (*sys_getsockname)(int, struct sockaddr *, int *) = |
| (int (*)(int, struct sockaddr *, int *))SYS(getsockname); |
| |
| return sys_getsockname(fd, addr, addrlen); |
| } |
| |
| /* XXX This really belongs in some header file... -DaveM */ |
| #define MAX_SOCK_ADDR 128 /* 108 for Unix domain - |
| 16 for IP, 16 for IPX, |
| 24 for IPv6, |
| about 80 for AX.25 */ |
| |
| struct sol_nmsghdr { |
| u32 msg_name; |
| int msg_namelen; |
| u32 msg_iov; |
| u32 msg_iovlen; |
| u32 msg_control; |
| u32 msg_controllen; |
| u32 msg_flags; |
| }; |
| |
| struct sol_cmsghdr { |
| u32 cmsg_len; |
| int cmsg_level; |
| int cmsg_type; |
| unsigned char cmsg_data[0]; |
| }; |
| |
| static inline int msghdr_from_user32_to_kern(struct msghdr *kmsg, |
| struct sol_nmsghdr __user *umsg) |
| { |
| u32 tmp1, tmp2, tmp3; |
| int err; |
| |
| err = get_user(tmp1, &umsg->msg_name); |
| err |= __get_user(tmp2, &umsg->msg_iov); |
| err |= __get_user(tmp3, &umsg->msg_control); |
| if (err) |
| return -EFAULT; |
| |
| kmsg->msg_name = A(tmp1); |
| kmsg->msg_iov = A(tmp2); |
| kmsg->msg_control = A(tmp3); |
| |
| err = get_user(kmsg->msg_namelen, &umsg->msg_namelen); |
| err |= get_user(kmsg->msg_controllen, &umsg->msg_controllen); |
| err |= get_user(kmsg->msg_flags, &umsg->msg_flags); |
| |
| kmsg->msg_flags = solaris_to_linux_msgflags(kmsg->msg_flags); |
| |
| return err; |
| } |
| |
| asmlinkage int solaris_sendmsg(int fd, struct sol_nmsghdr __user *user_msg, unsigned user_flags) |
| { |
| struct socket *sock; |
| char address[MAX_SOCK_ADDR]; |
| struct iovec iovstack[UIO_FASTIOV], *iov = iovstack; |
| unsigned char ctl[sizeof(struct cmsghdr) + 20]; |
| unsigned char *ctl_buf = ctl; |
| struct msghdr msg_sys; |
| int err, ctl_len, iov_size, total_len; |
| |
| err = -EFAULT; |
| if (msghdr_from_user32_to_kern(&msg_sys, user_msg)) |
| goto out; |
| |
| sock = sockfd_lookup(fd, &err); |
| if (!sock) |
| goto out; |
| |
| /* do not move before msg_sys is valid */ |
| err = -EMSGSIZE; |
| if (msg_sys.msg_iovlen > UIO_MAXIOV) |
| goto out_put; |
| |
| /* Check whether to allocate the iovec area*/ |
| err = -ENOMEM; |
| iov_size = msg_sys.msg_iovlen * sizeof(struct iovec); |
| if (msg_sys.msg_iovlen > UIO_FASTIOV) { |
| iov = sock_kmalloc(sock->sk, iov_size, GFP_KERNEL); |
| if (!iov) |
| goto out_put; |
| } |
| |
| err = verify_compat_iovec(&msg_sys, iov, address, VERIFY_READ); |
| if (err < 0) |
| goto out_freeiov; |
| total_len = err; |
| |
| err = -ENOBUFS; |
| if (msg_sys.msg_controllen > INT_MAX) |
| goto out_freeiov; |
| |
| ctl_len = msg_sys.msg_controllen; |
| if (ctl_len) { |
| struct sol_cmsghdr __user *ucmsg = msg_sys.msg_control; |
| unsigned long *kcmsg; |
| compat_size_t cmlen; |
| |
| err = -EINVAL; |
| if (ctl_len <= sizeof(compat_size_t)) |
| goto out_freeiov; |
| |
| if (ctl_len > sizeof(ctl)) { |
| err = -ENOBUFS; |
| ctl_buf = kmalloc(ctl_len, GFP_KERNEL); |
| if (!ctl_buf) |
| goto out_freeiov; |
| } |
| __get_user(cmlen, &ucmsg->cmsg_len); |
| kcmsg = (unsigned long *) ctl_buf; |
| *kcmsg++ = (unsigned long)cmlen; |
| err = -EFAULT; |
| if (copy_from_user(kcmsg, &ucmsg->cmsg_level, |
| ctl_len - sizeof(compat_size_t))) |
| goto out_freectl; |
| msg_sys.msg_control = ctl_buf; |
| } |
| msg_sys.msg_flags = solaris_to_linux_msgflags(user_flags); |
| |
| if (sock->file->f_flags & O_NONBLOCK) |
| msg_sys.msg_flags |= MSG_DONTWAIT; |
| err = sock_sendmsg(sock, &msg_sys, total_len); |
| |
| out_freectl: |
| if (ctl_buf != ctl) |
| sock_kfree_s(sock->sk, ctl_buf, ctl_len); |
| out_freeiov: |
| if (iov != iovstack) |
| sock_kfree_s(sock->sk, iov, iov_size); |
| out_put: |
| sockfd_put(sock); |
| out: |
| return err; |
| } |
| |
| asmlinkage int solaris_recvmsg(int fd, struct sol_nmsghdr __user *user_msg, unsigned int user_flags) |
| { |
| struct socket *sock; |
| struct iovec iovstack[UIO_FASTIOV]; |
| struct iovec *iov = iovstack; |
| struct msghdr msg_sys; |
| unsigned long cmsg_ptr; |
| int err, iov_size, total_len, len; |
| |
| /* kernel mode address */ |
| char addr[MAX_SOCK_ADDR]; |
| |
| /* user mode address pointers */ |
| struct sockaddr __user *uaddr; |
| int __user *uaddr_len; |
| |
| if (msghdr_from_user32_to_kern(&msg_sys, user_msg)) |
| return -EFAULT; |
| |
| sock = sockfd_lookup(fd, &err); |
| if (!sock) |
| goto out; |
| |
| err = -EMSGSIZE; |
| if (msg_sys.msg_iovlen > UIO_MAXIOV) |
| goto out_put; |
| |
| /* Check whether to allocate the iovec area*/ |
| err = -ENOMEM; |
| iov_size = msg_sys.msg_iovlen * sizeof(struct iovec); |
| if (msg_sys.msg_iovlen > UIO_FASTIOV) { |
| iov = sock_kmalloc(sock->sk, iov_size, GFP_KERNEL); |
| if (!iov) |
| goto out_put; |
| } |
| |
| /* |
| * Save the user-mode address (verify_iovec will change the |
| * kernel msghdr to use the kernel address space) |
| */ |
| |
| uaddr = (void __user *) msg_sys.msg_name; |
| uaddr_len = &user_msg->msg_namelen; |
| err = verify_compat_iovec(&msg_sys, iov, addr, VERIFY_WRITE); |
| if (err < 0) |
| goto out_freeiov; |
| total_len = err; |
| |
| cmsg_ptr = (unsigned long) msg_sys.msg_control; |
| msg_sys.msg_flags = MSG_CMSG_COMPAT; |
| |
| if (sock->file->f_flags & O_NONBLOCK) |
| user_flags |= MSG_DONTWAIT; |
| |
| err = sock_recvmsg(sock, &msg_sys, total_len, user_flags); |
| if(err < 0) |
| goto out_freeiov; |
| |
| len = err; |
| |
| if (uaddr != NULL) { |
| err = move_addr_to_user(addr, msg_sys.msg_namelen, uaddr, uaddr_len); |
| if (err < 0) |
| goto out_freeiov; |
| } |
| err = __put_user(linux_to_solaris_msgflags(msg_sys.msg_flags), &user_msg->msg_flags); |
| if (err) |
| goto out_freeiov; |
| err = __put_user((unsigned long)msg_sys.msg_control - cmsg_ptr, |
| &user_msg->msg_controllen); |
| if (err) |
| goto out_freeiov; |
| err = len; |
| |
| out_freeiov: |
| if (iov != iovstack) |
| sock_kfree_s(sock->sk, iov, iov_size); |
| out_put: |
| sockfd_put(sock); |
| out: |
| return err; |
| } |