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