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