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