linux_socket.c revision 224778
1/*-
2 * Copyright (c) 1995 S�ren Schmidt
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer
10 *    in this position and unchanged.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 *    derived from this software without specific prior written permission
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#include <sys/cdefs.h>
30__FBSDID("$FreeBSD: head/sys/compat/linux/linux_socket.c 224778 2011-08-11 12:30:23Z rwatson $");
31
32/* XXX we use functions that might not exist. */
33#include "opt_compat.h"
34#include "opt_inet6.h"
35
36#include <sys/param.h>
37#include <sys/proc.h>
38#include <sys/systm.h>
39#include <sys/sysproto.h>
40#include <sys/capability.h>
41#include <sys/fcntl.h>
42#include <sys/file.h>
43#include <sys/limits.h>
44#include <sys/lock.h>
45#include <sys/malloc.h>
46#include <sys/mutex.h>
47#include <sys/mbuf.h>
48#include <sys/socket.h>
49#include <sys/socketvar.h>
50#include <sys/syscallsubr.h>
51#include <sys/uio.h>
52#include <sys/syslog.h>
53#include <sys/un.h>
54
55#include <net/if.h>
56#include <netinet/in.h>
57#include <netinet/in_systm.h>
58#include <netinet/ip.h>
59#ifdef INET6
60#include <netinet/ip6.h>
61#include <netinet6/ip6_var.h>
62#include <netinet6/in6_var.h>
63#endif
64
65#ifdef COMPAT_LINUX32
66#include <machine/../linux32/linux.h>
67#include <machine/../linux32/linux32_proto.h>
68#else
69#include <machine/../linux/linux.h>
70#include <machine/../linux/linux_proto.h>
71#endif
72#include <compat/linux/linux_socket.h>
73#include <compat/linux/linux_util.h>
74
75static int do_sa_get(struct sockaddr **, const struct osockaddr *, int *,
76    struct malloc_type *);
77static int linux_to_bsd_domain(int);
78
79/*
80 * Reads a linux sockaddr and does any necessary translation.
81 * Linux sockaddrs don't have a length field, only a family.
82 */
83static int
84linux_getsockaddr(struct sockaddr **sap, const struct osockaddr *osa, int len)
85{
86	int osalen = len;
87
88	return (do_sa_get(sap, osa, &osalen, M_SONAME));
89}
90
91/*
92 * Copy the osockaddr structure pointed to by osa to kernel, adjust
93 * family and convert to sockaddr.
94 */
95static int
96do_sa_get(struct sockaddr **sap, const struct osockaddr *osa, int *osalen,
97    struct malloc_type *mtype)
98{
99	int error=0, bdom;
100	struct sockaddr *sa;
101	struct osockaddr *kosa;
102	int alloclen;
103#ifdef INET6
104	int oldv6size;
105	struct sockaddr_in6 *sin6;
106#endif
107
108	if (*osalen < 2 || *osalen > UCHAR_MAX || !osa)
109		return (EINVAL);
110
111	alloclen = *osalen;
112#ifdef INET6
113	oldv6size = 0;
114	/*
115	 * Check for old (pre-RFC2553) sockaddr_in6. We may accept it
116	 * if it's a v4-mapped address, so reserve the proper space
117	 * for it.
118	 */
119	if (alloclen == sizeof (struct sockaddr_in6) - sizeof (u_int32_t)) {
120		alloclen = sizeof (struct sockaddr_in6);
121		oldv6size = 1;
122	}
123#endif
124
125	kosa = malloc(alloclen, mtype, M_WAITOK);
126
127	if ((error = copyin(osa, kosa, *osalen)))
128		goto out;
129
130	bdom = linux_to_bsd_domain(kosa->sa_family);
131	if (bdom == -1) {
132		error = EAFNOSUPPORT;
133		goto out;
134	}
135
136#ifdef INET6
137	/*
138	 * Older Linux IPv6 code uses obsolete RFC2133 struct sockaddr_in6,
139	 * which lacks the scope id compared with RFC2553 one. If we detect
140	 * the situation, reject the address and write a message to system log.
141	 *
142	 * Still accept addresses for which the scope id is not used.
143	 */
144	if (oldv6size && bdom == AF_INET6) {
145		sin6 = (struct sockaddr_in6 *)kosa;
146		if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr) ||
147		    (!IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr) &&
148		     !IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr) &&
149		     !IN6_IS_ADDR_V4COMPAT(&sin6->sin6_addr) &&
150		     !IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr) &&
151		     !IN6_IS_ADDR_MULTICAST(&sin6->sin6_addr))) {
152			sin6->sin6_scope_id = 0;
153		} else {
154			log(LOG_DEBUG,
155			    "obsolete pre-RFC2553 sockaddr_in6 rejected\n");
156			error = EINVAL;
157			goto out;
158		}
159	} else
160#endif
161	if (bdom == AF_INET) {
162		alloclen = sizeof(struct sockaddr_in);
163		if (*osalen < alloclen) {
164			error = EINVAL;
165			goto out;
166		}
167	}
168
169	sa = (struct sockaddr *) kosa;
170	sa->sa_family = bdom;
171	sa->sa_len = alloclen;
172
173	*sap = sa;
174	*osalen = alloclen;
175	return (0);
176
177out:
178	free(kosa, mtype);
179	return (error);
180}
181
182static int
183linux_to_bsd_domain(int domain)
184{
185
186	switch (domain) {
187	case LINUX_AF_UNSPEC:
188		return (AF_UNSPEC);
189	case LINUX_AF_UNIX:
190		return (AF_LOCAL);
191	case LINUX_AF_INET:
192		return (AF_INET);
193	case LINUX_AF_INET6:
194		return (AF_INET6);
195	case LINUX_AF_AX25:
196		return (AF_CCITT);
197	case LINUX_AF_IPX:
198		return (AF_IPX);
199	case LINUX_AF_APPLETALK:
200		return (AF_APPLETALK);
201	}
202	return (-1);
203}
204
205static int
206bsd_to_linux_domain(int domain)
207{
208
209	switch (domain) {
210	case AF_UNSPEC:
211		return (LINUX_AF_UNSPEC);
212	case AF_LOCAL:
213		return (LINUX_AF_UNIX);
214	case AF_INET:
215		return (LINUX_AF_INET);
216	case AF_INET6:
217		return (LINUX_AF_INET6);
218	case AF_CCITT:
219		return (LINUX_AF_AX25);
220	case AF_IPX:
221		return (LINUX_AF_IPX);
222	case AF_APPLETALK:
223		return (LINUX_AF_APPLETALK);
224	}
225	return (-1);
226}
227
228static int
229linux_to_bsd_sockopt_level(int level)
230{
231
232	switch (level) {
233	case LINUX_SOL_SOCKET:
234		return (SOL_SOCKET);
235	}
236	return (level);
237}
238
239static int
240bsd_to_linux_sockopt_level(int level)
241{
242
243	switch (level) {
244	case SOL_SOCKET:
245		return (LINUX_SOL_SOCKET);
246	}
247	return (level);
248}
249
250static int
251linux_to_bsd_ip_sockopt(int opt)
252{
253
254	switch (opt) {
255	case LINUX_IP_TOS:
256		return (IP_TOS);
257	case LINUX_IP_TTL:
258		return (IP_TTL);
259	case LINUX_IP_OPTIONS:
260		return (IP_OPTIONS);
261	case LINUX_IP_MULTICAST_IF:
262		return (IP_MULTICAST_IF);
263	case LINUX_IP_MULTICAST_TTL:
264		return (IP_MULTICAST_TTL);
265	case LINUX_IP_MULTICAST_LOOP:
266		return (IP_MULTICAST_LOOP);
267	case LINUX_IP_ADD_MEMBERSHIP:
268		return (IP_ADD_MEMBERSHIP);
269	case LINUX_IP_DROP_MEMBERSHIP:
270		return (IP_DROP_MEMBERSHIP);
271	case LINUX_IP_HDRINCL:
272		return (IP_HDRINCL);
273	}
274	return (-1);
275}
276
277static int
278linux_to_bsd_so_sockopt(int opt)
279{
280
281	switch (opt) {
282	case LINUX_SO_DEBUG:
283		return (SO_DEBUG);
284	case LINUX_SO_REUSEADDR:
285		return (SO_REUSEADDR);
286	case LINUX_SO_TYPE:
287		return (SO_TYPE);
288	case LINUX_SO_ERROR:
289		return (SO_ERROR);
290	case LINUX_SO_DONTROUTE:
291		return (SO_DONTROUTE);
292	case LINUX_SO_BROADCAST:
293		return (SO_BROADCAST);
294	case LINUX_SO_SNDBUF:
295		return (SO_SNDBUF);
296	case LINUX_SO_RCVBUF:
297		return (SO_RCVBUF);
298	case LINUX_SO_KEEPALIVE:
299		return (SO_KEEPALIVE);
300	case LINUX_SO_OOBINLINE:
301		return (SO_OOBINLINE);
302	case LINUX_SO_LINGER:
303		return (SO_LINGER);
304	case LINUX_SO_PEERCRED:
305		return (LOCAL_PEERCRED);
306	case LINUX_SO_RCVLOWAT:
307		return (SO_RCVLOWAT);
308	case LINUX_SO_SNDLOWAT:
309		return (SO_SNDLOWAT);
310	case LINUX_SO_RCVTIMEO:
311		return (SO_RCVTIMEO);
312	case LINUX_SO_SNDTIMEO:
313		return (SO_SNDTIMEO);
314	case LINUX_SO_TIMESTAMP:
315		return (SO_TIMESTAMP);
316	case LINUX_SO_ACCEPTCONN:
317		return (SO_ACCEPTCONN);
318	}
319	return (-1);
320}
321
322static int
323linux_to_bsd_msg_flags(int flags)
324{
325	int ret_flags = 0;
326
327	if (flags & LINUX_MSG_OOB)
328		ret_flags |= MSG_OOB;
329	if (flags & LINUX_MSG_PEEK)
330		ret_flags |= MSG_PEEK;
331	if (flags & LINUX_MSG_DONTROUTE)
332		ret_flags |= MSG_DONTROUTE;
333	if (flags & LINUX_MSG_CTRUNC)
334		ret_flags |= MSG_CTRUNC;
335	if (flags & LINUX_MSG_TRUNC)
336		ret_flags |= MSG_TRUNC;
337	if (flags & LINUX_MSG_DONTWAIT)
338		ret_flags |= MSG_DONTWAIT;
339	if (flags & LINUX_MSG_EOR)
340		ret_flags |= MSG_EOR;
341	if (flags & LINUX_MSG_WAITALL)
342		ret_flags |= MSG_WAITALL;
343	if (flags & LINUX_MSG_NOSIGNAL)
344		ret_flags |= MSG_NOSIGNAL;
345#if 0 /* not handled */
346	if (flags & LINUX_MSG_PROXY)
347		;
348	if (flags & LINUX_MSG_FIN)
349		;
350	if (flags & LINUX_MSG_SYN)
351		;
352	if (flags & LINUX_MSG_CONFIRM)
353		;
354	if (flags & LINUX_MSG_RST)
355		;
356	if (flags & LINUX_MSG_ERRQUEUE)
357		;
358#endif
359	return ret_flags;
360}
361
362/*
363* If bsd_to_linux_sockaddr() or linux_to_bsd_sockaddr() faults, then the
364* native syscall will fault.  Thus, we don't really need to check the
365* return values for these functions.
366*/
367
368static int
369bsd_to_linux_sockaddr(struct sockaddr *arg)
370{
371	struct sockaddr sa;
372	size_t sa_len = sizeof(struct sockaddr);
373	int error;
374
375	if ((error = copyin(arg, &sa, sa_len)))
376		return (error);
377
378	*(u_short *)&sa = sa.sa_family;
379
380	error = copyout(&sa, arg, sa_len);
381
382	return (error);
383}
384
385static int
386linux_to_bsd_sockaddr(struct sockaddr *arg, int len)
387{
388	struct sockaddr sa;
389	size_t sa_len = sizeof(struct sockaddr);
390	int error;
391
392	if ((error = copyin(arg, &sa, sa_len)))
393		return (error);
394
395	sa.sa_family = *(sa_family_t *)&sa;
396	sa.sa_len = len;
397
398	error = copyout(&sa, arg, sa_len);
399
400	return (error);
401}
402
403
404static int
405linux_sa_put(struct osockaddr *osa)
406{
407	struct osockaddr sa;
408	int error, bdom;
409
410	/*
411	 * Only read/write the osockaddr family part, the rest is
412	 * not changed.
413	 */
414	error = copyin(osa, &sa, sizeof(sa.sa_family));
415	if (error)
416		return (error);
417
418	bdom = bsd_to_linux_domain(sa.sa_family);
419	if (bdom == -1)
420		return (EINVAL);
421
422	sa.sa_family = bdom;
423	error = copyout(&sa, osa, sizeof(sa.sa_family));
424	if (error)
425		return (error);
426
427	return (0);
428}
429
430static int
431linux_to_bsd_cmsg_type(int cmsg_type)
432{
433
434	switch (cmsg_type) {
435	case LINUX_SCM_RIGHTS:
436		return (SCM_RIGHTS);
437	case LINUX_SCM_CREDENTIALS:
438		return (SCM_CREDS);
439	}
440	return (-1);
441}
442
443static int
444bsd_to_linux_cmsg_type(int cmsg_type)
445{
446
447	switch (cmsg_type) {
448	case SCM_RIGHTS:
449		return (LINUX_SCM_RIGHTS);
450	case SCM_CREDS:
451		return (LINUX_SCM_CREDENTIALS);
452	}
453	return (-1);
454}
455
456static int
457linux_to_bsd_msghdr(struct msghdr *bhdr, const struct l_msghdr *lhdr)
458{
459	if (lhdr->msg_controllen > INT_MAX)
460		return (ENOBUFS);
461
462	bhdr->msg_name		= PTRIN(lhdr->msg_name);
463	bhdr->msg_namelen	= lhdr->msg_namelen;
464	bhdr->msg_iov		= PTRIN(lhdr->msg_iov);
465	bhdr->msg_iovlen	= lhdr->msg_iovlen;
466	bhdr->msg_control	= PTRIN(lhdr->msg_control);
467
468	/*
469	 * msg_controllen is skipped since BSD and LINUX control messages
470	 * are potentially different sizes (e.g. the cred structure used
471	 * by SCM_CREDS is different between the two operating system).
472	 *
473	 * The caller can set it (if necessary) after converting all the
474	 * control messages.
475	 */
476
477	bhdr->msg_flags		= linux_to_bsd_msg_flags(lhdr->msg_flags);
478	return (0);
479}
480
481static int
482bsd_to_linux_msghdr(const struct msghdr *bhdr, struct l_msghdr *lhdr)
483{
484	lhdr->msg_name		= PTROUT(bhdr->msg_name);
485	lhdr->msg_namelen	= bhdr->msg_namelen;
486	lhdr->msg_iov		= PTROUT(bhdr->msg_iov);
487	lhdr->msg_iovlen	= bhdr->msg_iovlen;
488	lhdr->msg_control	= PTROUT(bhdr->msg_control);
489
490	/*
491	 * msg_controllen is skipped since BSD and LINUX control messages
492	 * are potentially different sizes (e.g. the cred structure used
493	 * by SCM_CREDS is different between the two operating system).
494	 *
495	 * The caller can set it (if necessary) after converting all the
496	 * control messages.
497	 */
498
499	/* msg_flags skipped */
500	return (0);
501}
502
503static int
504linux_set_socket_flags(struct thread *td, int s, int flags)
505{
506	int error;
507
508	if (flags & LINUX_SOCK_NONBLOCK) {
509		error = kern_fcntl(td, s, F_SETFL, O_NONBLOCK);
510		if (error)
511			return (error);
512	}
513	if (flags & LINUX_SOCK_CLOEXEC) {
514		error = kern_fcntl(td, s, F_SETFD, FD_CLOEXEC);
515		if (error)
516			return (error);
517	}
518	return (0);
519}
520
521static int
522linux_sendit(struct thread *td, int s, struct msghdr *mp, int flags,
523    struct mbuf *control, enum uio_seg segflg)
524{
525	struct sockaddr *to;
526	int error;
527
528	if (mp->msg_name != NULL) {
529		error = linux_getsockaddr(&to, mp->msg_name, mp->msg_namelen);
530		if (error)
531			return (error);
532		mp->msg_name = to;
533	} else
534		to = NULL;
535
536	error = kern_sendit(td, s, mp, linux_to_bsd_msg_flags(flags), control,
537	    segflg);
538
539	if (to)
540		free(to, M_SONAME);
541	return (error);
542}
543
544/* Return 0 if IP_HDRINCL is set for the given socket. */
545static int
546linux_check_hdrincl(struct thread *td, int s)
547{
548	int error, optval, size_val;
549
550	size_val = sizeof(optval);
551	error = kern_getsockopt(td, s, IPPROTO_IP, IP_HDRINCL,
552	    &optval, UIO_SYSSPACE, &size_val);
553	if (error)
554		return (error);
555
556	return (optval == 0);
557}
558
559struct linux_sendto_args {
560	int s;
561	l_uintptr_t msg;
562	int len;
563	int flags;
564	l_uintptr_t to;
565	int tolen;
566};
567
568/*
569 * Updated sendto() when IP_HDRINCL is set:
570 * tweak endian-dependent fields in the IP packet.
571 */
572static int
573linux_sendto_hdrincl(struct thread *td, struct linux_sendto_args *linux_args)
574{
575/*
576 * linux_ip_copysize defines how many bytes we should copy
577 * from the beginning of the IP packet before we customize it for BSD.
578 * It should include all the fields we modify (ip_len and ip_off).
579 */
580#define linux_ip_copysize	8
581
582	struct ip *packet;
583	struct msghdr msg;
584	struct iovec aiov[1];
585	int error;
586
587	/* Check that the packet isn't too big or too small. */
588	if (linux_args->len < linux_ip_copysize ||
589	    linux_args->len > IP_MAXPACKET)
590		return (EINVAL);
591
592	packet = (struct ip *)malloc(linux_args->len, M_TEMP, M_WAITOK);
593
594	/* Make kernel copy of the packet to be sent */
595	if ((error = copyin(PTRIN(linux_args->msg), packet,
596	    linux_args->len)))
597		goto goout;
598
599	/* Convert fields from Linux to BSD raw IP socket format */
600	packet->ip_len = linux_args->len;
601	packet->ip_off = ntohs(packet->ip_off);
602
603	/* Prepare the msghdr and iovec structures describing the new packet */
604	msg.msg_name = PTRIN(linux_args->to);
605	msg.msg_namelen = linux_args->tolen;
606	msg.msg_iov = aiov;
607	msg.msg_iovlen = 1;
608	msg.msg_control = NULL;
609	msg.msg_flags = 0;
610	aiov[0].iov_base = (char *)packet;
611	aiov[0].iov_len = linux_args->len;
612	error = linux_sendit(td, linux_args->s, &msg, linux_args->flags,
613	    NULL, UIO_SYSSPACE);
614goout:
615	free(packet, M_TEMP);
616	return (error);
617}
618
619struct linux_socket_args {
620	int domain;
621	int type;
622	int protocol;
623};
624
625static int
626linux_socket(struct thread *td, struct linux_socket_args *args)
627{
628	struct socket_args /* {
629		int domain;
630		int type;
631		int protocol;
632	} */ bsd_args;
633	int retval_socket, socket_flags;
634
635	bsd_args.protocol = args->protocol;
636	socket_flags = args->type & ~LINUX_SOCK_TYPE_MASK;
637	if (socket_flags & ~(LINUX_SOCK_CLOEXEC | LINUX_SOCK_NONBLOCK))
638		return (EINVAL);
639	bsd_args.type = args->type & LINUX_SOCK_TYPE_MASK;
640	if (bsd_args.type < 0 || bsd_args.type > LINUX_SOCK_MAX)
641		return (EINVAL);
642	bsd_args.domain = linux_to_bsd_domain(args->domain);
643	if (bsd_args.domain == -1)
644		return (EAFNOSUPPORT);
645
646	retval_socket = socket(td, &bsd_args);
647	if (retval_socket)
648		return (retval_socket);
649
650	retval_socket = linux_set_socket_flags(td, td->td_retval[0],
651	    socket_flags);
652	if (retval_socket) {
653		(void)kern_close(td, td->td_retval[0]);
654		goto out;
655	}
656
657	if (bsd_args.type == SOCK_RAW
658	    && (bsd_args.protocol == IPPROTO_RAW || bsd_args.protocol == 0)
659	    && bsd_args.domain == PF_INET) {
660		/* It's a raw IP socket: set the IP_HDRINCL option. */
661		int hdrincl;
662
663		hdrincl = 1;
664		/* We ignore any error returned by kern_setsockopt() */
665		kern_setsockopt(td, td->td_retval[0], IPPROTO_IP, IP_HDRINCL,
666		    &hdrincl, UIO_SYSSPACE, sizeof(hdrincl));
667	}
668#ifdef INET6
669	/*
670	 * Linux AF_INET6 socket has IPV6_V6ONLY setsockopt set to 0 by default
671	 * and some apps depend on this. So, set V6ONLY to 0 for Linux apps.
672	 * For simplicity we do this unconditionally of the net.inet6.ip6.v6only
673	 * sysctl value.
674	 */
675	if (bsd_args.domain == PF_INET6) {
676		int v6only;
677
678		v6only = 0;
679		/* We ignore any error returned by setsockopt() */
680		kern_setsockopt(td, td->td_retval[0], IPPROTO_IPV6, IPV6_V6ONLY,
681		    &v6only, UIO_SYSSPACE, sizeof(v6only));
682	}
683#endif
684
685out:
686	return (retval_socket);
687}
688
689struct linux_bind_args {
690	int s;
691	l_uintptr_t name;
692	int namelen;
693};
694
695static int
696linux_bind(struct thread *td, struct linux_bind_args *args)
697{
698	struct sockaddr *sa;
699	int error;
700
701	error = linux_getsockaddr(&sa, PTRIN(args->name),
702	    args->namelen);
703	if (error)
704		return (error);
705
706	error = kern_bind(td, args->s, sa);
707	free(sa, M_SONAME);
708	if (error == EADDRNOTAVAIL && args->namelen != sizeof(struct sockaddr_in))
709	   	return (EINVAL);
710	return (error);
711}
712
713struct linux_connect_args {
714	int s;
715	l_uintptr_t name;
716	int namelen;
717};
718int linux_connect(struct thread *, struct linux_connect_args *);
719
720int
721linux_connect(struct thread *td, struct linux_connect_args *args)
722{
723	struct socket *so;
724	struct sockaddr *sa;
725	u_int fflag;
726	int error;
727
728	error = linux_getsockaddr(&sa, (struct osockaddr *)PTRIN(args->name),
729	    args->namelen);
730	if (error)
731		return (error);
732
733	error = kern_connect(td, args->s, sa);
734	free(sa, M_SONAME);
735	if (error != EISCONN)
736		return (error);
737
738	/*
739	 * Linux doesn't return EISCONN the first time it occurs,
740	 * when on a non-blocking socket. Instead it returns the
741	 * error getsockopt(SOL_SOCKET, SO_ERROR) would return on BSD.
742	 *
743	 * XXXRW: Instead of using fgetsock(), check that it is a
744	 * socket and use the file descriptor reference instead of
745	 * creating a new one.
746	 */
747	error = fgetsock(td, args->s, CAP_CONNECT, &so, &fflag);
748	if (error == 0) {
749		error = EISCONN;
750		if (fflag & FNONBLOCK) {
751			SOCK_LOCK(so);
752			if (so->so_emuldata == 0)
753				error = so->so_error;
754			so->so_emuldata = (void *)1;
755			SOCK_UNLOCK(so);
756		}
757		fputsock(so);
758	}
759	return (error);
760}
761
762struct linux_listen_args {
763	int s;
764	int backlog;
765};
766
767static int
768linux_listen(struct thread *td, struct linux_listen_args *args)
769{
770	struct listen_args /* {
771		int s;
772		int backlog;
773	} */ bsd_args;
774
775	bsd_args.s = args->s;
776	bsd_args.backlog = args->backlog;
777	return (listen(td, &bsd_args));
778}
779
780static int
781linux_accept_common(struct thread *td, int s, l_uintptr_t addr,
782    l_uintptr_t namelen, int flags)
783{
784	struct accept_args /* {
785		int	s;
786		struct sockaddr * __restrict name;
787		socklen_t * __restrict anamelen;
788	} */ bsd_args;
789	int error;
790
791	if (flags & ~(LINUX_SOCK_CLOEXEC | LINUX_SOCK_NONBLOCK))
792		return (EINVAL);
793
794	bsd_args.s = s;
795	/* XXX: */
796	bsd_args.name = (struct sockaddr * __restrict)PTRIN(addr);
797	bsd_args.anamelen = PTRIN(namelen);/* XXX */
798	error = accept(td, &bsd_args);
799	bsd_to_linux_sockaddr((struct sockaddr *)bsd_args.name);
800	if (error) {
801		if (error == EFAULT && namelen != sizeof(struct sockaddr_in))
802			return (EINVAL);
803		return (error);
804	}
805
806	/*
807	 * linux appears not to copy flags from the parent socket to the
808	 * accepted one, so we must clear the flags in the new descriptor
809	 * and apply the requested flags.
810	 */
811	error = kern_fcntl(td, td->td_retval[0], F_SETFL, 0);
812	if (error)
813		goto out;
814	error = linux_set_socket_flags(td, td->td_retval[0], flags);
815	if (error)
816		goto out;
817	if (addr)
818		error = linux_sa_put(PTRIN(addr));
819
820out:
821	if (error) {
822		(void)kern_close(td, td->td_retval[0]);
823		td->td_retval[0] = 0;
824	}
825	return (error);
826}
827
828struct linux_accept_args {
829	int s;
830	l_uintptr_t addr;
831	l_uintptr_t namelen;
832};
833
834static int
835linux_accept(struct thread *td, struct linux_accept_args *args)
836{
837
838	return (linux_accept_common(td, args->s, args->addr,
839	    args->namelen, 0));
840}
841
842struct linux_accept4_args {
843	int s;
844	l_uintptr_t addr;
845	l_uintptr_t namelen;
846	int flags;
847};
848
849static int
850linux_accept4(struct thread *td, struct linux_accept4_args *args)
851{
852
853	return (linux_accept_common(td, args->s, args->addr,
854	    args->namelen, args->flags));
855}
856
857struct linux_getsockname_args {
858	int s;
859	l_uintptr_t addr;
860	l_uintptr_t namelen;
861};
862
863static int
864linux_getsockname(struct thread *td, struct linux_getsockname_args *args)
865{
866	struct getsockname_args /* {
867		int	fdes;
868		struct sockaddr * __restrict asa;
869		socklen_t * __restrict alen;
870	} */ bsd_args;
871	int error;
872
873	bsd_args.fdes = args->s;
874	/* XXX: */
875	bsd_args.asa = (struct sockaddr * __restrict)PTRIN(args->addr);
876	bsd_args.alen = PTRIN(args->namelen);	/* XXX */
877	error = getsockname(td, &bsd_args);
878	bsd_to_linux_sockaddr((struct sockaddr *)bsd_args.asa);
879	if (error)
880		return (error);
881	error = linux_sa_put(PTRIN(args->addr));
882	if (error)
883		return (error);
884	return (0);
885}
886
887struct linux_getpeername_args {
888	int s;
889	l_uintptr_t addr;
890	l_uintptr_t namelen;
891};
892
893static int
894linux_getpeername(struct thread *td, struct linux_getpeername_args *args)
895{
896	struct getpeername_args /* {
897		int fdes;
898		caddr_t asa;
899		int *alen;
900	} */ bsd_args;
901	int error;
902
903	bsd_args.fdes = args->s;
904	bsd_args.asa = (struct sockaddr *)PTRIN(args->addr);
905	bsd_args.alen = (int *)PTRIN(args->namelen);
906	error = getpeername(td, &bsd_args);
907	bsd_to_linux_sockaddr((struct sockaddr *)bsd_args.asa);
908	if (error)
909		return (error);
910	error = linux_sa_put(PTRIN(args->addr));
911	if (error)
912		return (error);
913	return (0);
914}
915
916struct linux_socketpair_args {
917	int domain;
918	int type;
919	int protocol;
920	l_uintptr_t rsv;
921};
922
923static int
924linux_socketpair(struct thread *td, struct linux_socketpair_args *args)
925{
926	struct socketpair_args /* {
927		int domain;
928		int type;
929		int protocol;
930		int *rsv;
931	} */ bsd_args;
932	int error, socket_flags;
933	int sv[2];
934
935	bsd_args.domain = linux_to_bsd_domain(args->domain);
936	if (bsd_args.domain != PF_LOCAL)
937		return (EAFNOSUPPORT);
938
939	socket_flags = args->type & ~LINUX_SOCK_TYPE_MASK;
940	if (socket_flags & ~(LINUX_SOCK_CLOEXEC | LINUX_SOCK_NONBLOCK))
941		return (EINVAL);
942	bsd_args.type = args->type & LINUX_SOCK_TYPE_MASK;
943	if (bsd_args.type < 0 || bsd_args.type > LINUX_SOCK_MAX)
944		return (EINVAL);
945
946	if (args->protocol != 0 && args->protocol != PF_UNIX)
947
948		/*
949		 * Use of PF_UNIX as protocol argument is not right,
950		 * but Linux does it.
951		 * Do not map PF_UNIX as its Linux value is identical
952		 * to FreeBSD one.
953		 */
954		return (EPROTONOSUPPORT);
955	else
956		bsd_args.protocol = 0;
957	bsd_args.rsv = (int *)PTRIN(args->rsv);
958	error = kern_socketpair(td, bsd_args.domain, bsd_args.type,
959	    bsd_args.protocol, sv);
960	if (error)
961		return (error);
962	error = linux_set_socket_flags(td, sv[0], socket_flags);
963	if (error)
964		goto out;
965	error = linux_set_socket_flags(td, sv[1], socket_flags);
966	if (error)
967		goto out;
968
969	error = copyout(sv, bsd_args.rsv, 2 * sizeof(int));
970
971out:
972	if (error) {
973		(void)kern_close(td, sv[0]);
974		(void)kern_close(td, sv[1]);
975	}
976	return (error);
977}
978
979struct linux_send_args {
980	int s;
981	l_uintptr_t msg;
982	int len;
983	int flags;
984};
985
986static int
987linux_send(struct thread *td, struct linux_send_args *args)
988{
989	struct sendto_args /* {
990		int s;
991		caddr_t buf;
992		int len;
993		int flags;
994		caddr_t to;
995		int tolen;
996	} */ bsd_args;
997
998	bsd_args.s = args->s;
999	bsd_args.buf = (caddr_t)PTRIN(args->msg);
1000	bsd_args.len = args->len;
1001	bsd_args.flags = args->flags;
1002	bsd_args.to = NULL;
1003	bsd_args.tolen = 0;
1004	return sendto(td, &bsd_args);
1005}
1006
1007struct linux_recv_args {
1008	int s;
1009	l_uintptr_t msg;
1010	int len;
1011	int flags;
1012};
1013
1014static int
1015linux_recv(struct thread *td, struct linux_recv_args *args)
1016{
1017	struct recvfrom_args /* {
1018		int s;
1019		caddr_t buf;
1020		int len;
1021		int flags;
1022		struct sockaddr *from;
1023		socklen_t fromlenaddr;
1024	} */ bsd_args;
1025
1026	bsd_args.s = args->s;
1027	bsd_args.buf = (caddr_t)PTRIN(args->msg);
1028	bsd_args.len = args->len;
1029	bsd_args.flags = linux_to_bsd_msg_flags(args->flags);
1030	bsd_args.from = NULL;
1031	bsd_args.fromlenaddr = 0;
1032	return (recvfrom(td, &bsd_args));
1033}
1034
1035static int
1036linux_sendto(struct thread *td, struct linux_sendto_args *args)
1037{
1038	struct msghdr msg;
1039	struct iovec aiov;
1040	int error;
1041
1042	if (linux_check_hdrincl(td, args->s) == 0)
1043		/* IP_HDRINCL set, tweak the packet before sending */
1044		return (linux_sendto_hdrincl(td, args));
1045
1046	msg.msg_name = PTRIN(args->to);
1047	msg.msg_namelen = args->tolen;
1048	msg.msg_iov = &aiov;
1049	msg.msg_iovlen = 1;
1050	msg.msg_control = NULL;
1051	msg.msg_flags = 0;
1052	aiov.iov_base = PTRIN(args->msg);
1053	aiov.iov_len = args->len;
1054	error = linux_sendit(td, args->s, &msg, args->flags, NULL,
1055	    UIO_USERSPACE);
1056	return (error);
1057}
1058
1059struct linux_recvfrom_args {
1060	int s;
1061	l_uintptr_t buf;
1062	int len;
1063	int flags;
1064	l_uintptr_t from;
1065	l_uintptr_t fromlen;
1066};
1067
1068static int
1069linux_recvfrom(struct thread *td, struct linux_recvfrom_args *args)
1070{
1071	struct recvfrom_args /* {
1072		int	s;
1073		caddr_t	buf;
1074		size_t	len;
1075		int	flags;
1076		struct sockaddr * __restrict from;
1077		socklen_t * __restrict fromlenaddr;
1078	} */ bsd_args;
1079	size_t len;
1080	int error;
1081
1082	if ((error = copyin(PTRIN(args->fromlen), &len, sizeof(size_t))))
1083		return (error);
1084
1085	bsd_args.s = args->s;
1086	bsd_args.buf = PTRIN(args->buf);
1087	bsd_args.len = args->len;
1088	bsd_args.flags = linux_to_bsd_msg_flags(args->flags);
1089	/* XXX: */
1090	bsd_args.from = (struct sockaddr * __restrict)PTRIN(args->from);
1091	bsd_args.fromlenaddr = PTRIN(args->fromlen);/* XXX */
1092
1093	linux_to_bsd_sockaddr((struct sockaddr *)bsd_args.from, len);
1094	error = recvfrom(td, &bsd_args);
1095	bsd_to_linux_sockaddr((struct sockaddr *)bsd_args.from);
1096
1097	if (error)
1098		return (error);
1099	if (args->from) {
1100		error = linux_sa_put((struct osockaddr *)
1101		    PTRIN(args->from));
1102		if (error)
1103			return (error);
1104	}
1105	return (0);
1106}
1107
1108struct linux_sendmsg_args {
1109	int s;
1110	l_uintptr_t msg;
1111	int flags;
1112};
1113
1114static int
1115linux_sendmsg(struct thread *td, struct linux_sendmsg_args *args)
1116{
1117	struct cmsghdr *cmsg;
1118	struct cmsgcred cmcred;
1119	struct mbuf *control;
1120	struct msghdr msg;
1121	struct l_cmsghdr linux_cmsg;
1122	struct l_cmsghdr *ptr_cmsg;
1123	struct l_msghdr linux_msg;
1124	struct iovec *iov;
1125	socklen_t datalen;
1126	struct sockaddr *sa;
1127	sa_family_t sa_family;
1128	void *data;
1129	int error;
1130
1131	error = copyin(PTRIN(args->msg), &linux_msg, sizeof(linux_msg));
1132	if (error)
1133		return (error);
1134
1135	/*
1136	 * Some Linux applications (ping) define a non-NULL control data
1137	 * pointer, but a msg_controllen of 0, which is not allowed in the
1138	 * FreeBSD system call interface.  NULL the msg_control pointer in
1139	 * order to handle this case.  This should be checked, but allows the
1140	 * Linux ping to work.
1141	 */
1142	if (PTRIN(linux_msg.msg_control) != NULL && linux_msg.msg_controllen == 0)
1143		linux_msg.msg_control = PTROUT(NULL);
1144
1145	error = linux_to_bsd_msghdr(&msg, &linux_msg);
1146	if (error)
1147		return (error);
1148
1149#ifdef COMPAT_LINUX32
1150	error = linux32_copyiniov(PTRIN(msg.msg_iov), msg.msg_iovlen,
1151	    &iov, EMSGSIZE);
1152#else
1153	error = copyiniov(msg.msg_iov, msg.msg_iovlen, &iov, EMSGSIZE);
1154#endif
1155	if (error)
1156		return (error);
1157
1158	control = NULL;
1159	cmsg = NULL;
1160
1161	if ((ptr_cmsg = LINUX_CMSG_FIRSTHDR(&linux_msg)) != NULL) {
1162		error = kern_getsockname(td, args->s, &sa, &datalen);
1163		if (error)
1164			goto bad;
1165		sa_family = sa->sa_family;
1166		free(sa, M_SONAME);
1167
1168		error = ENOBUFS;
1169		cmsg = malloc(CMSG_HDRSZ, M_TEMP, M_WAITOK | M_ZERO);
1170		control = m_get(M_WAIT, MT_CONTROL);
1171		if (control == NULL)
1172			goto bad;
1173
1174		do {
1175			error = copyin(ptr_cmsg, &linux_cmsg,
1176			    sizeof(struct l_cmsghdr));
1177			if (error)
1178				goto bad;
1179
1180			error = EINVAL;
1181			if (linux_cmsg.cmsg_len < sizeof(struct l_cmsghdr))
1182				goto bad;
1183
1184			/*
1185			 * Now we support only SCM_RIGHTS and SCM_CRED,
1186			 * so return EINVAL in any other cmsg_type
1187			 */
1188			cmsg->cmsg_type =
1189			    linux_to_bsd_cmsg_type(linux_cmsg.cmsg_type);
1190			cmsg->cmsg_level =
1191			    linux_to_bsd_sockopt_level(linux_cmsg.cmsg_level);
1192			if (cmsg->cmsg_type == -1
1193			    || cmsg->cmsg_level != SOL_SOCKET)
1194				goto bad;
1195
1196			/*
1197			 * Some applications (e.g. pulseaudio) attempt to
1198			 * send ancillary data even if the underlying protocol
1199			 * doesn't support it which is not allowed in the
1200			 * FreeBSD system call interface.
1201			 */
1202			if (sa_family != AF_UNIX)
1203				continue;
1204
1205			data = LINUX_CMSG_DATA(ptr_cmsg);
1206			datalen = linux_cmsg.cmsg_len - L_CMSG_HDRSZ;
1207
1208			switch (cmsg->cmsg_type)
1209			{
1210			case SCM_RIGHTS:
1211				break;
1212
1213			case SCM_CREDS:
1214				data = &cmcred;
1215				datalen = sizeof(cmcred);
1216
1217				/*
1218				 * The lower levels will fill in the structure
1219				 */
1220				bzero(data, datalen);
1221				break;
1222			}
1223
1224			cmsg->cmsg_len = CMSG_LEN(datalen);
1225
1226			error = ENOBUFS;
1227			if (!m_append(control, CMSG_HDRSZ, (c_caddr_t) cmsg))
1228				goto bad;
1229			if (!m_append(control, datalen, (c_caddr_t) data))
1230				goto bad;
1231		} while ((ptr_cmsg = LINUX_CMSG_NXTHDR(&linux_msg, ptr_cmsg)));
1232
1233		if (m_length(control, NULL) == 0) {
1234			m_freem(control);
1235			control = NULL;
1236		}
1237	}
1238
1239	msg.msg_iov = iov;
1240	msg.msg_flags = 0;
1241	error = linux_sendit(td, args->s, &msg, args->flags, control,
1242	    UIO_USERSPACE);
1243
1244bad:
1245	free(iov, M_IOV);
1246	if (cmsg)
1247		free(cmsg, M_TEMP);
1248	return (error);
1249}
1250
1251struct linux_recvmsg_args {
1252	int s;
1253	l_uintptr_t msg;
1254	int flags;
1255};
1256
1257static int
1258linux_recvmsg(struct thread *td, struct linux_recvmsg_args *args)
1259{
1260	struct cmsghdr *cm;
1261	struct cmsgcred *cmcred;
1262	struct msghdr msg;
1263	struct l_cmsghdr *linux_cmsg = NULL;
1264	struct l_ucred linux_ucred;
1265	socklen_t datalen, outlen;
1266	struct l_msghdr linux_msg;
1267	struct iovec *iov, *uiov;
1268	struct mbuf *control = NULL;
1269	struct mbuf **controlp;
1270	caddr_t outbuf;
1271	void *data;
1272	int error, i, fd, fds, *fdp;
1273
1274	error = copyin(PTRIN(args->msg), &linux_msg, sizeof(linux_msg));
1275	if (error)
1276		return (error);
1277
1278	error = linux_to_bsd_msghdr(&msg, &linux_msg);
1279	if (error)
1280		return (error);
1281
1282#ifdef COMPAT_LINUX32
1283	error = linux32_copyiniov(PTRIN(msg.msg_iov), msg.msg_iovlen,
1284	    &iov, EMSGSIZE);
1285#else
1286	error = copyiniov(msg.msg_iov, msg.msg_iovlen, &iov, EMSGSIZE);
1287#endif
1288	if (error)
1289		return (error);
1290
1291	if (msg.msg_name) {
1292		error = linux_to_bsd_sockaddr((struct sockaddr *)msg.msg_name,
1293		    msg.msg_namelen);
1294		if (error)
1295			goto bad;
1296	}
1297
1298	uiov = msg.msg_iov;
1299	msg.msg_iov = iov;
1300	controlp = (msg.msg_control != NULL) ? &control : NULL;
1301	error = kern_recvit(td, args->s, &msg, UIO_USERSPACE, controlp);
1302	msg.msg_iov = uiov;
1303	if (error)
1304		goto bad;
1305
1306	error = bsd_to_linux_msghdr(&msg, &linux_msg);
1307	if (error)
1308		goto bad;
1309
1310	if (linux_msg.msg_name) {
1311		error = bsd_to_linux_sockaddr((struct sockaddr *)
1312		    PTRIN(linux_msg.msg_name));
1313		if (error)
1314			goto bad;
1315	}
1316	if (linux_msg.msg_name && linux_msg.msg_namelen > 2) {
1317		error = linux_sa_put(PTRIN(linux_msg.msg_name));
1318		if (error)
1319			goto bad;
1320	}
1321
1322	outbuf = PTRIN(linux_msg.msg_control);
1323	outlen = 0;
1324
1325	if (control) {
1326		linux_cmsg = malloc(L_CMSG_HDRSZ, M_TEMP, M_WAITOK | M_ZERO);
1327
1328		msg.msg_control = mtod(control, struct cmsghdr *);
1329		msg.msg_controllen = control->m_len;
1330
1331		cm = CMSG_FIRSTHDR(&msg);
1332
1333		while (cm != NULL) {
1334			linux_cmsg->cmsg_type =
1335			    bsd_to_linux_cmsg_type(cm->cmsg_type);
1336			linux_cmsg->cmsg_level =
1337			    bsd_to_linux_sockopt_level(cm->cmsg_level);
1338			if (linux_cmsg->cmsg_type == -1
1339			    || cm->cmsg_level != SOL_SOCKET)
1340			{
1341				error = EINVAL;
1342				goto bad;
1343			}
1344
1345			data = CMSG_DATA(cm);
1346			datalen = (caddr_t)cm + cm->cmsg_len - (caddr_t)data;
1347
1348			switch (cm->cmsg_type)
1349			{
1350			case SCM_RIGHTS:
1351				if (args->flags & LINUX_MSG_CMSG_CLOEXEC) {
1352					fds = datalen / sizeof(int);
1353					fdp = data;
1354					for (i = 0; i < fds; i++) {
1355						fd = *fdp++;
1356						(void)kern_fcntl(td, fd,
1357						    F_SETFD, FD_CLOEXEC);
1358					}
1359				}
1360				break;
1361
1362			case SCM_CREDS:
1363				/*
1364				 * Currently LOCAL_CREDS is never in
1365				 * effect for Linux so no need to worry
1366				 * about sockcred
1367				 */
1368				if (datalen != sizeof (*cmcred)) {
1369					error = EMSGSIZE;
1370					goto bad;
1371				}
1372				cmcred = (struct cmsgcred *)data;
1373				bzero(&linux_ucred, sizeof(linux_ucred));
1374				linux_ucred.pid = cmcred->cmcred_pid;
1375				linux_ucred.uid = cmcred->cmcred_uid;
1376				linux_ucred.gid = cmcred->cmcred_gid;
1377				data = &linux_ucred;
1378				datalen = sizeof(linux_ucred);
1379				break;
1380			}
1381
1382			if (outlen + LINUX_CMSG_LEN(datalen) >
1383			    linux_msg.msg_controllen) {
1384				if (outlen == 0) {
1385					error = EMSGSIZE;
1386					goto bad;
1387				} else {
1388					linux_msg.msg_flags |=
1389					    LINUX_MSG_CTRUNC;
1390					goto out;
1391				}
1392			}
1393
1394			linux_cmsg->cmsg_len = LINUX_CMSG_LEN(datalen);
1395
1396			error = copyout(linux_cmsg, outbuf, L_CMSG_HDRSZ);
1397			if (error)
1398				goto bad;
1399			outbuf += L_CMSG_HDRSZ;
1400
1401			error = copyout(data, outbuf, datalen);
1402			if (error)
1403				goto bad;
1404
1405			outbuf += LINUX_CMSG_ALIGN(datalen);
1406			outlen += LINUX_CMSG_LEN(datalen);
1407
1408			cm = CMSG_NXTHDR(&msg, cm);
1409		}
1410	}
1411
1412out:
1413	linux_msg.msg_controllen = outlen;
1414	error = copyout(&linux_msg, PTRIN(args->msg), sizeof(linux_msg));
1415
1416bad:
1417	free(iov, M_IOV);
1418	if (control != NULL)
1419		m_freem(control);
1420	if (linux_cmsg != NULL)
1421		free(linux_cmsg, M_TEMP);
1422
1423	return (error);
1424}
1425
1426struct linux_shutdown_args {
1427	int s;
1428	int how;
1429};
1430
1431static int
1432linux_shutdown(struct thread *td, struct linux_shutdown_args *args)
1433{
1434	struct shutdown_args /* {
1435		int s;
1436		int how;
1437	} */ bsd_args;
1438
1439	bsd_args.s = args->s;
1440	bsd_args.how = args->how;
1441	return (shutdown(td, &bsd_args));
1442}
1443
1444struct linux_setsockopt_args {
1445	int s;
1446	int level;
1447	int optname;
1448	l_uintptr_t optval;
1449	int optlen;
1450};
1451
1452static int
1453linux_setsockopt(struct thread *td, struct linux_setsockopt_args *args)
1454{
1455	struct setsockopt_args /* {
1456		int s;
1457		int level;
1458		int name;
1459		caddr_t val;
1460		int valsize;
1461	} */ bsd_args;
1462	l_timeval linux_tv;
1463	struct timeval tv;
1464	int error, name;
1465
1466	bsd_args.s = args->s;
1467	bsd_args.level = linux_to_bsd_sockopt_level(args->level);
1468	switch (bsd_args.level) {
1469	case SOL_SOCKET:
1470		name = linux_to_bsd_so_sockopt(args->optname);
1471		switch (name) {
1472		case SO_RCVTIMEO:
1473			/* FALLTHROUGH */
1474		case SO_SNDTIMEO:
1475			error = copyin(PTRIN(args->optval), &linux_tv,
1476			    sizeof(linux_tv));
1477			if (error)
1478				return (error);
1479			tv.tv_sec = linux_tv.tv_sec;
1480			tv.tv_usec = linux_tv.tv_usec;
1481			return (kern_setsockopt(td, args->s, bsd_args.level,
1482			    name, &tv, UIO_SYSSPACE, sizeof(tv)));
1483			/* NOTREACHED */
1484			break;
1485		default:
1486			break;
1487		}
1488		break;
1489	case IPPROTO_IP:
1490		name = linux_to_bsd_ip_sockopt(args->optname);
1491		break;
1492	case IPPROTO_TCP:
1493		/* Linux TCP option values match BSD's */
1494		name = args->optname;
1495		break;
1496	default:
1497		name = -1;
1498		break;
1499	}
1500	if (name == -1)
1501		return (ENOPROTOOPT);
1502
1503	bsd_args.name = name;
1504	bsd_args.val = PTRIN(args->optval);
1505	bsd_args.valsize = args->optlen;
1506
1507	if (name == IPV6_NEXTHOP) {
1508		linux_to_bsd_sockaddr((struct sockaddr *)bsd_args.val,
1509			bsd_args.valsize);
1510		error = setsockopt(td, &bsd_args);
1511		bsd_to_linux_sockaddr((struct sockaddr *)bsd_args.val);
1512	} else
1513		error = setsockopt(td, &bsd_args);
1514
1515	return (error);
1516}
1517
1518struct linux_getsockopt_args {
1519	int s;
1520	int level;
1521	int optname;
1522	l_uintptr_t optval;
1523	l_uintptr_t optlen;
1524};
1525
1526static int
1527linux_getsockopt(struct thread *td, struct linux_getsockopt_args *args)
1528{
1529	struct getsockopt_args /* {
1530		int s;
1531		int level;
1532		int name;
1533		caddr_t val;
1534		int *avalsize;
1535	} */ bsd_args;
1536	l_timeval linux_tv;
1537	struct timeval tv;
1538	socklen_t tv_len, xulen;
1539	struct xucred xu;
1540	struct l_ucred lxu;
1541	int error, name;
1542
1543	bsd_args.s = args->s;
1544	bsd_args.level = linux_to_bsd_sockopt_level(args->level);
1545	switch (bsd_args.level) {
1546	case SOL_SOCKET:
1547		name = linux_to_bsd_so_sockopt(args->optname);
1548		switch (name) {
1549		case SO_RCVTIMEO:
1550			/* FALLTHROUGH */
1551		case SO_SNDTIMEO:
1552			tv_len = sizeof(tv);
1553			error = kern_getsockopt(td, args->s, bsd_args.level,
1554			    name, &tv, UIO_SYSSPACE, &tv_len);
1555			if (error)
1556				return (error);
1557			linux_tv.tv_sec = tv.tv_sec;
1558			linux_tv.tv_usec = tv.tv_usec;
1559			return (copyout(&linux_tv, PTRIN(args->optval),
1560			    sizeof(linux_tv)));
1561			/* NOTREACHED */
1562			break;
1563		case LOCAL_PEERCRED:
1564			if (args->optlen != sizeof(lxu))
1565				return (EINVAL);
1566			xulen = sizeof(xu);
1567			error = kern_getsockopt(td, args->s, bsd_args.level,
1568			    name, &xu, UIO_SYSSPACE, &xulen);
1569			if (error)
1570				return (error);
1571			/*
1572			 * XXX Use 0 for pid as the FreeBSD does not cache peer pid.
1573			 */
1574			lxu.pid = 0;
1575			lxu.uid = xu.cr_uid;
1576			lxu.gid = xu.cr_gid;
1577			return (copyout(&lxu, PTRIN(args->optval), sizeof(lxu)));
1578			/* NOTREACHED */
1579			break;
1580		default:
1581			break;
1582		}
1583		break;
1584	case IPPROTO_IP:
1585		name = linux_to_bsd_ip_sockopt(args->optname);
1586		break;
1587	case IPPROTO_TCP:
1588		/* Linux TCP option values match BSD's */
1589		name = args->optname;
1590		break;
1591	default:
1592		name = -1;
1593		break;
1594	}
1595	if (name == -1)
1596		return (EINVAL);
1597
1598	bsd_args.name = name;
1599	bsd_args.val = PTRIN(args->optval);
1600	bsd_args.avalsize = PTRIN(args->optlen);
1601
1602	if (name == IPV6_NEXTHOP) {
1603		error = getsockopt(td, &bsd_args);
1604		bsd_to_linux_sockaddr((struct sockaddr *)bsd_args.val);
1605	} else
1606		error = getsockopt(td, &bsd_args);
1607
1608	return (error);
1609}
1610
1611/* Argument list sizes for linux_socketcall */
1612
1613#define LINUX_AL(x) ((x) * sizeof(l_ulong))
1614
1615static const unsigned char lxs_args[] = {
1616	LINUX_AL(0) /* unused*/,	LINUX_AL(3) /* socket */,
1617	LINUX_AL(3) /* bind */,		LINUX_AL(3) /* connect */,
1618	LINUX_AL(2) /* listen */,	LINUX_AL(3) /* accept */,
1619	LINUX_AL(3) /* getsockname */,	LINUX_AL(3) /* getpeername */,
1620	LINUX_AL(4) /* socketpair */,	LINUX_AL(4) /* send */,
1621	LINUX_AL(4) /* recv */,		LINUX_AL(6) /* sendto */,
1622	LINUX_AL(6) /* recvfrom */,	LINUX_AL(2) /* shutdown */,
1623	LINUX_AL(5) /* setsockopt */,	LINUX_AL(5) /* getsockopt */,
1624	LINUX_AL(3) /* sendmsg */,	LINUX_AL(3) /* recvmsg */,
1625	LINUX_AL(4) /* accept4 */
1626};
1627
1628#define	LINUX_AL_SIZE	sizeof(lxs_args) / sizeof(lxs_args[0]) - 1
1629
1630int
1631linux_socketcall(struct thread *td, struct linux_socketcall_args *args)
1632{
1633	l_ulong a[6];
1634	void *arg;
1635	int error;
1636
1637	if (args->what < LINUX_SOCKET || args->what > LINUX_AL_SIZE)
1638		return (EINVAL);
1639	error = copyin(PTRIN(args->args), a, lxs_args[args->what]);
1640	if (error)
1641		return (error);
1642
1643	arg = a;
1644	switch (args->what) {
1645	case LINUX_SOCKET:
1646		return (linux_socket(td, arg));
1647	case LINUX_BIND:
1648		return (linux_bind(td, arg));
1649	case LINUX_CONNECT:
1650		return (linux_connect(td, arg));
1651	case LINUX_LISTEN:
1652		return (linux_listen(td, arg));
1653	case LINUX_ACCEPT:
1654		return (linux_accept(td, arg));
1655	case LINUX_GETSOCKNAME:
1656		return (linux_getsockname(td, arg));
1657	case LINUX_GETPEERNAME:
1658		return (linux_getpeername(td, arg));
1659	case LINUX_SOCKETPAIR:
1660		return (linux_socketpair(td, arg));
1661	case LINUX_SEND:
1662		return (linux_send(td, arg));
1663	case LINUX_RECV:
1664		return (linux_recv(td, arg));
1665	case LINUX_SENDTO:
1666		return (linux_sendto(td, arg));
1667	case LINUX_RECVFROM:
1668		return (linux_recvfrom(td, arg));
1669	case LINUX_SHUTDOWN:
1670		return (linux_shutdown(td, arg));
1671	case LINUX_SETSOCKOPT:
1672		return (linux_setsockopt(td, arg));
1673	case LINUX_GETSOCKOPT:
1674		return (linux_getsockopt(td, arg));
1675	case LINUX_SENDMSG:
1676		return (linux_sendmsg(td, arg));
1677	case LINUX_RECVMSG:
1678		return (linux_recvmsg(td, arg));
1679	case LINUX_ACCEPT4:
1680		return (linux_accept4(td, arg));
1681	}
1682
1683	uprintf("LINUX: 'socket' typ=%d not implemented\n", args->what);
1684	return (ENOSYS);
1685}
1686