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