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