sys/compat/freebsd32/freebsd32_misc.c

   1 /*-
   2  * Copyright (c) 2002 Doug Rabson
   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  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26
  27 #include <sys/cdefs.h>
  28 __FBSDID("$FreeBSD$");
  29
  30 #include "opt_compat.h"
  31 #include "opt_inet.h"
  32 #include "opt_inet6.h"
  33
  34 #define __ELF_WORD_SIZE 32
  35
  36 #include <sys/param.h>
  37 #include <sys/bus.h>
  38 #include <sys/capability.h>
  39 #include <sys/clock.h>
  40 #include <sys/exec.h>
  41 #include <sys/fcntl.h>
  42 #include <sys/filedesc.h>
  43 #include <sys/imgact.h>
  44 #include <sys/jail.h>
  45 #include <sys/kernel.h>
  46 #include <sys/limits.h>
  47 #include <sys/linker.h>
  48 #include <sys/lock.h>
  49 #include <sys/malloc.h>
  50 #include <sys/file.h>           /* Must come after sys/malloc.h */
  51 #include <sys/imgact.h>
  52 #include <sys/mbuf.h>
  53 #include <sys/mman.h>
  54 #include <sys/module.h>
  55 #include <sys/mount.h>
  56 #include <sys/mutex.h>
  57 #include <sys/namei.h>
  58 #include <sys/proc.h>
  59 #include <sys/procctl.h>
  60 #include <sys/reboot.h>
  61 #include <sys/resource.h>
  62 #include <sys/resourcevar.h>
  63 #include <sys/selinfo.h>
  64 #include <sys/eventvar.h>       /* Must come after sys/selinfo.h */
  65 #include <sys/pipe.h>           /* Must come after sys/selinfo.h */
  66 #include <sys/signal.h>
  67 #include <sys/signalvar.h>
  68 #include <sys/socket.h>
  69 #include <sys/socketvar.h>
  70 #include <sys/stat.h>
  71 #include <sys/syscall.h>
  72 #include <sys/syscallsubr.h>
  73 #include <sys/sysctl.h>
  74 #include <sys/sysent.h>
  75 #include <sys/sysproto.h>
  76 #include <sys/systm.h>
  77 #include <sys/thr.h>
  78 #include <sys/unistd.h>
  79 #include <sys/ucontext.h>
  80 #include <sys/vnode.h>
  81 #include <sys/wait.h>
  82 #include <sys/ipc.h>
  83 #include <sys/msg.h>
  84 #include <sys/sem.h>
  85 #include <sys/shm.h>
  86
  87 #ifdef INET
  88 #include <netinet/in.h>
  89 #endif
  90
  91 #include <vm/vm.h>
  92 #include <vm/vm_param.h>
  93 #include <vm/pmap.h>
  94 #include <vm/vm_map.h>
  95 #include <vm/vm_object.h>
  96 #include <vm/vm_extern.h>
  97
  98 #include <machine/cpu.h>
  99 #include <machine/elf.h>
 100
 101 #include <security/audit/audit.h>
 102
 103 #include <compat/freebsd32/freebsd32_util.h>
 104 #include <compat/freebsd32/freebsd32.h>
 105 #include <compat/freebsd32/freebsd32_ipc.h>
 106 #include <compat/freebsd32/freebsd32_misc.h>
 107 #include <compat/freebsd32/freebsd32_signal.h>
 108 #include <compat/freebsd32/freebsd32_proto.h>
 109
 110 FEATURE(compat_freebsd_32bit, "Compatible with 32-bit FreeBSD");
 111
 112 #ifndef __mips__
 113 CTASSERT(sizeof(struct timeval32) == 8);
 114 CTASSERT(sizeof(struct timespec32) == 8);
 115 CTASSERT(sizeof(struct itimerval32) == 16);
 116 #endif
 117 CTASSERT(sizeof(struct statfs32) == 256);
 118 #ifndef __mips__
 119 CTASSERT(sizeof(struct rusage32) == 72);
 120 #endif
 121 CTASSERT(sizeof(struct sigaltstack32) == 12);
 122 CTASSERT(sizeof(struct kevent32) == 20);
 123 CTASSERT(sizeof(struct iovec32) == 8);
 124 CTASSERT(sizeof(struct msghdr32) == 28);
 125 #ifndef __mips__
 126 CTASSERT(sizeof(struct stat32) == 96);
 127 #endif
 128 CTASSERT(sizeof(struct sigaction32) == 24);
 129
 130 static int freebsd32_kevent_copyout(void *arg, struct kevent *kevp, int count);
 131 static int freebsd32_kevent_copyin(void *arg, struct kevent *kevp, int count);
 132
 133 void
 134 freebsd32_rusage_out(const struct rusage *s, struct rusage32 *s32)
 135 {
 136
 137         TV_CP(*s, *s32, ru_utime);
 138         TV_CP(*s, *s32, ru_stime);
 139         CP(*s, *s32, ru_maxrss);
 140         CP(*s, *s32, ru_ixrss);
 141         CP(*s, *s32, ru_idrss);
 142         CP(*s, *s32, ru_isrss);
 143         CP(*s, *s32, ru_minflt);
 144         CP(*s, *s32, ru_majflt);
 145         CP(*s, *s32, ru_nswap);
 146         CP(*s, *s32, ru_inblock);
 147         CP(*s, *s32, ru_oublock);
 148         CP(*s, *s32, ru_msgsnd);
 149         CP(*s, *s32, ru_msgrcv);
 150         CP(*s, *s32, ru_nsignals);
 151         CP(*s, *s32, ru_nvcsw);
 152         CP(*s, *s32, ru_nivcsw);
 153 }
 154
 155 int
 156 freebsd32_wait4(struct thread *td, struct freebsd32_wait4_args *uap)
 157 {
 158         int error, status;
 159         struct rusage32 ru32;
 160         struct rusage ru, *rup;
 161
 162         if (uap->rusage != NULL)
 163                 rup = &ru;
 164         else
 165                 rup = NULL;
 166         error = kern_wait(td, uap->pid, &status, uap->options, rup);
 167         if (error)
 168                 return (error);
 169         if (uap->status != NULL)
 170                 error = copyout(&status, uap->status, sizeof(status));
 171         if (uap->rusage != NULL && error == 0) {
 172                 freebsd32_rusage_out(&ru, &ru32);
 173                 error = copyout(&ru32, uap->rusage, sizeof(ru32));
 174         }
 175         return (error);
 176 }
 177
 178 int
 179 freebsd32_wait6(struct thread *td, struct freebsd32_wait6_args *uap)
 180 {
 181         struct wrusage32 wru32;
 182         struct __wrusage wru, *wrup;
 183         struct siginfo32 si32;
 184         struct __siginfo si, *sip;
 185         int error, status;
 186
 187         if (uap->wrusage != NULL)
 188                 wrup = &wru;
 189         else
 190                 wrup = NULL;
 191         if (uap->info != NULL) {
 192                 sip = &si;
 193                 bzero(sip, sizeof(*sip));
 194         } else
 195                 sip = NULL;
 196         error = kern_wait6(td, uap->idtype, PAIR32TO64(id_t, uap->id),
 197             &status, uap->options, wrup, sip);
 198         if (error != 0)
 199                 return (error);
 200         if (uap->status != NULL)
 201                 error = copyout(&status, uap->status, sizeof(status));
 202         if (uap->wrusage != NULL && error == 0) {
 203                 freebsd32_rusage_out(&wru.wru_self, &wru32.wru_self);
 204                 freebsd32_rusage_out(&wru.wru_children, &wru32.wru_children);
 205                 error = copyout(&wru32, uap->wrusage, sizeof(wru32));
 206         }
 207         if (uap->info != NULL && error == 0) {
 208                 siginfo_to_siginfo32 (&si, &si32);
 209                 error = copyout(&si32, uap->info, sizeof(si32));
 210         }
 211         return (error);
 212 }
 213
 214 #ifdef COMPAT_FREEBSD4
 215 static void
 216 copy_statfs(struct statfs *in, struct statfs32 *out)
 217 {
 218
 219         statfs_scale_blocks(in, INT32_MAX);
 220         bzero(out, sizeof(*out));
 221         CP(*in, *out, f_bsize);
 222         out->f_iosize = MIN(in->f_iosize, INT32_MAX);
 223         CP(*in, *out, f_blocks);
 224         CP(*in, *out, f_bfree);
 225         CP(*in, *out, f_bavail);
 226         out->f_files = MIN(in->f_files, INT32_MAX);
 227         out->f_ffree = MIN(in->f_ffree, INT32_MAX);
 228         CP(*in, *out, f_fsid);
 229         CP(*in, *out, f_owner);
 230         CP(*in, *out, f_type);
 231         CP(*in, *out, f_flags);
 232         out->f_syncwrites = MIN(in->f_syncwrites, INT32_MAX);
 233         out->f_asyncwrites = MIN(in->f_asyncwrites, INT32_MAX);
 234         strlcpy(out->f_fstypename,
 235               in->f_fstypename, MFSNAMELEN);
 236         strlcpy(out->f_mntonname,
 237               in->f_mntonname, min(MNAMELEN, FREEBSD4_MNAMELEN));
 238         out->f_syncreads = MIN(in->f_syncreads, INT32_MAX);
 239         out->f_asyncreads = MIN(in->f_asyncreads, INT32_MAX);
 240         strlcpy(out->f_mntfromname,
 241               in->f_mntfromname, min(MNAMELEN, FREEBSD4_MNAMELEN));
 242 }
 243 #endif
 244
 245 #ifdef COMPAT_FREEBSD4
 246 int
 247 freebsd4_freebsd32_getfsstat(struct thread *td, struct freebsd4_freebsd32_getfsstat_args *uap)
 248 {
 249         struct statfs *buf, *sp;
 250         struct statfs32 stat32;
 251         size_t count, size;
 252         int error;
 253
 254         count = uap->bufsize / sizeof(struct statfs32);
 255         size = count * sizeof(struct statfs);
 256         error = kern_getfsstat(td, &buf, size, UIO_SYSSPACE, uap->flags);
 257         if (size > 0) {
 258                 count = td->td_retval[0];
 259                 sp = buf;
 260                 while (count > 0 && error == 0) {
 261                         copy_statfs(sp, &stat32);
 262                         error = copyout(&stat32, uap->buf, sizeof(stat32));
 263                         sp++;
 264                         uap->buf++;
 265                         count--;
 266                 }
 267                 free(buf, M_TEMP);
 268         }
 269         return (error);
 270 }
 271 #endif
 272
 273 int
 274 freebsd32_sigaltstack(struct thread *td,
 275                       struct freebsd32_sigaltstack_args *uap)
 276 {
 277         struct sigaltstack32 s32;
 278         struct sigaltstack ss, oss, *ssp;
 279         int error;
 280
 281         if (uap->ss != NULL) {
 282                 error = copyin(uap->ss, &s32, sizeof(s32));
 283                 if (error)
 284                         return (error);
 285                 PTRIN_CP(s32, ss, ss_sp);
 286                 CP(s32, ss, ss_size);
 287                 CP(s32, ss, ss_flags);
 288                 ssp = &ss;
 289         } else
 290                 ssp = NULL;
 291         error = kern_sigaltstack(td, ssp, &oss);
 292         if (error == 0 && uap->oss != NULL) {
 293                 PTROUT_CP(oss, s32, ss_sp);
 294                 CP(oss, s32, ss_size);
 295                 CP(oss, s32, ss_flags);
 296                 error = copyout(&s32, uap->oss, sizeof(s32));
 297         }
 298         return (error);
 299 }
 300
 301 /*
 302  * Custom version of exec_copyin_args() so that we can translate
 303  * the pointers.
 304  */
 305 int
 306 freebsd32_exec_copyin_args(struct image_args *args, char *fname,
 307     enum uio_seg segflg, u_int32_t *argv, u_int32_t *envv)
 308 {
 309         char *argp, *envp;
 310         u_int32_t *p32, arg;
 311         size_t length;
 312         int error;
 313
 314         bzero(args, sizeof(*args));
 315         if (argv == NULL)
 316                 return (EFAULT);
 317
 318         /*
 319          * Allocate demand-paged memory for the file name, argument, and
 320          * environment strings.
 321          */
 322         error = exec_alloc_args(args);
 323         if (error != 0)
 324                 return (error);
 325
 326         /*
 327          * Copy the file name.
 328          */
 329         if (fname != NULL) {
 330                 args->fname = args->buf;
 331                 error = (segflg == UIO_SYSSPACE) ?
 332                     copystr(fname, args->fname, PATH_MAX, &length) :
 333                     copyinstr(fname, args->fname, PATH_MAX, &length);
 334                 if (error != 0)
 335                         goto err_exit;
 336         } else
 337                 length = 0;
 338
 339         args->begin_argv = args->buf + length;
 340         args->endp = args->begin_argv;
 341         args->stringspace = ARG_MAX;
 342
 343         /*
 344          * extract arguments first
 345          */
 346         p32 = argv;
 347         for (;;) {
 348                 error = copyin(p32++, &arg, sizeof(arg));
 349                 if (error)
 350                         goto err_exit;
 351                 if (arg == 0)
 352                         break;
 353                 argp = PTRIN(arg);
 354                 error = copyinstr(argp, args->endp, args->stringspace, &length);
 355                 if (error) {
 356                         if (error == ENAMETOOLONG)
 357                                 error = E2BIG;
 358                         goto err_exit;
 359                 }
 360                 args->stringspace -= length;
 361                 args->endp += length;
 362                 args->argc++;
 363         }
 364
 365         args->begin_envv = args->endp;
 366
 367         /*
 368          * extract environment strings
 369          */
 370         if (envv) {
 371                 p32 = envv;
 372                 for (;;) {
 373                         error = copyin(p32++, &arg, sizeof(arg));
 374                         if (error)
 375                                 goto err_exit;
 376                         if (arg == 0)
 377                                 break;
 378                         envp = PTRIN(arg);
 379                         error = copyinstr(envp, args->endp, args->stringspace,
 380                             &length);
 381                         if (error) {
 382                                 if (error == ENAMETOOLONG)
 383                                         error = E2BIG;
 384                                 goto err_exit;
 385                         }
 386                         args->stringspace -= length;
 387                         args->endp += length;
 388                         args->envc++;
 389                 }
 390         }
 391
 392         return (0);
 393
 394 err_exit:
 395         exec_free_args(args);
 396         return (error);
 397 }
 398
 399 int
 400 freebsd32_execve(struct thread *td, struct freebsd32_execve_args *uap)
 401 {
 402         struct image_args eargs;
 403         int error;
 404
 405         error = freebsd32_exec_copyin_args(&eargs, uap->fname, UIO_USERSPACE,
 406             uap->argv, uap->envv);
 407         if (error == 0)
 408                 error = kern_execve(td, &eargs, NULL);
 409         return (error);
 410 }
 411
 412 int
 413 freebsd32_fexecve(struct thread *td, struct freebsd32_fexecve_args *uap)
 414 {
 415         struct image_args eargs;
 416         int error;
 417
 418         error = freebsd32_exec_copyin_args(&eargs, NULL, UIO_SYSSPACE,
 419             uap->argv, uap->envv);
 420         if (error == 0) {
 421                 eargs.fd = uap->fd;
 422                 error = kern_execve(td, &eargs, NULL);
 423         }
 424         return (error);
 425 }
 426
 427 #ifdef __ia64__
 428 static int
 429 freebsd32_mmap_partial(struct thread *td, vm_offset_t start, vm_offset_t end,
 430                        int prot, int fd, off_t pos)
 431 {
 432         vm_map_t map;
 433         vm_map_entry_t entry;
 434         int rv;
 435
 436         map = &td->td_proc->p_vmspace->vm_map;
 437         if (fd != -1)
 438                 prot |= VM_PROT_WRITE;
 439
 440         if (vm_map_lookup_entry(map, start, &entry)) {
 441                 if ((entry->protection & prot) != prot) {
 442                         rv = vm_map_protect(map,
 443                                             trunc_page(start),
 444                                             round_page(end),
 445                                             entry->protection | prot,
 446                                             FALSE);
 447                         if (rv != KERN_SUCCESS)
 448                                 return (EINVAL);
 449                 }
 450         } else {
 451                 vm_offset_t addr = trunc_page(start);
 452                 rv = vm_map_find(map, NULL, 0, &addr, PAGE_SIZE, 0,
 453                     VMFS_NO_SPACE, prot, VM_PROT_ALL, 0);
 454                 if (rv != KERN_SUCCESS)
 455                         return (EINVAL);
 456         }
 457
 458         if (fd != -1) {
 459                 struct pread_args r;
 460                 r.fd = fd;
 461                 r.buf = (void *) start;
 462                 r.nbyte = end - start;
 463                 r.offset = pos;
 464                 return (sys_pread(td, &r));
 465         } else {
 466                 while (start < end) {
 467                         subyte((void *) start, 0);
 468                         start++;
 469                 }
 470                 return (0);
 471         }
 472 }
 473 #endif
 474
 475 int
 476 freebsd32_mprotect(struct thread *td, struct freebsd32_mprotect_args *uap)
 477 {
 478         struct mprotect_args ap;
 479
 480         ap.addr = PTRIN(uap->addr);
 481         ap.len = uap->len;
 482         ap.prot = uap->prot;
 483 #if defined(__amd64__) || defined(__ia64__)
 484         if (i386_read_exec && (ap.prot & PROT_READ) != 0)
 485                 ap.prot |= PROT_EXEC;
 486 #endif
 487         return (sys_mprotect(td, &ap));
 488 }
 489
 490 int
 491 freebsd32_mmap(struct thread *td, struct freebsd32_mmap_args *uap)
 492 {
 493         struct mmap_args ap;
 494         vm_offset_t addr = (vm_offset_t) uap->addr;
 495         vm_size_t len    = uap->len;
 496         int prot         = uap->prot;
 497         int flags        = uap->flags;
 498         int fd           = uap->fd;
 499         off_t pos        = PAIR32TO64(off_t,uap->pos);
 500 #ifdef __ia64__
 501         vm_size_t pageoff;
 502         int error;
 503
 504         /*
 505          * Attempt to handle page size hassles.
 506          */
 507         pageoff = (pos & PAGE_MASK);
 508         if (flags & MAP_FIXED) {
 509                 vm_offset_t start, end;
 510                 start = addr;
 511                 end = addr + len;
 512
 513                 if (start != trunc_page(start)) {
 514                         error = freebsd32_mmap_partial(td, start,
 515                                                        round_page(start), prot,
 516                                                        fd, pos);
 517                         if (fd != -1)
 518                                 pos += round_page(start) - start;
 519                         start = round_page(start);
 520                 }
 521                 if (end != round_page(end)) {
 522                         vm_offset_t t = trunc_page(end);
 523                         error = freebsd32_mmap_partial(td, t, end,
 524                                                   prot, fd,
 525                                                   pos + t - start);
 526                         end = trunc_page(end);
 527                 }
 528                 if (end > start && fd != -1 && (pos & PAGE_MASK)) {
 529                         /*
 530                          * We can't map this region at all. The specified
 531                          * address doesn't have the same alignment as the file
 532                          * position. Fake the mapping by simply reading the
 533                          * entire region into memory. First we need to make
 534                          * sure the region exists.
 535                          */
 536                         vm_map_t map;
 537                         struct pread_args r;
 538                         int rv;
 539
 540                         prot |= VM_PROT_WRITE;
 541                         map = &td->td_proc->p_vmspace->vm_map;
 542                         rv = vm_map_remove(map, start, end);
 543                         if (rv != KERN_SUCCESS)
 544                                 return (EINVAL);
 545                         rv = vm_map_find(map, NULL, 0, &start, end - start,
 546                             0, VMFS_NO_SPACE, prot, VM_PROT_ALL, 0);
 547                         if (rv != KERN_SUCCESS)
 548                                 return (EINVAL);
 549                         r.fd = fd;
 550                         r.buf = (void *) start;
 551                         r.nbyte = end - start;
 552                         r.offset = pos;
 553                         error = sys_pread(td, &r);
 554                         if (error)
 555                                 return (error);
 556
 557                         td->td_retval[0] = addr;
 558                         return (0);
 559                 }
 560                 if (end == start) {
 561                         /*
 562                          * After dealing with the ragged ends, there
 563                          * might be none left.
 564                          */
 565                         td->td_retval[0] = addr;
 566                         return (0);
 567                 }
 568                 addr = start;
 569                 len = end - start;
 570         }
 571 #endif
 572
 573 #if defined(__amd64__) || defined(__ia64__)
 574         if (i386_read_exec && (prot & PROT_READ))
 575                 prot |= PROT_EXEC;
 576 #endif
 577
 578         ap.addr = (void *) addr;
 579         ap.len = len;
 580         ap.prot = prot;
 581         ap.flags = flags;
 582         ap.fd = fd;
 583         ap.pos = pos;
 584
 585         return (sys_mmap(td, &ap));
 586 }
 587
 588 #ifdef COMPAT_FREEBSD6
 589 int
 590 freebsd6_freebsd32_mmap(struct thread *td, struct freebsd6_freebsd32_mmap_args *uap)
 591 {
 592         struct freebsd32_mmap_args ap;
 593
 594         ap.addr = uap->addr;
 595         ap.len = uap->len;
 596         ap.prot = uap->prot;
 597         ap.flags = uap->flags;
 598         ap.fd = uap->fd;
 599         ap.pos1 = uap->pos1;
 600         ap.pos2 = uap->pos2;
 601
 602         return (freebsd32_mmap(td, &ap));
 603 }
 604 #endif
 605
 606 int
 607 freebsd32_setitimer(struct thread *td, struct freebsd32_setitimer_args *uap)
 608 {
 609         struct itimerval itv, oitv, *itvp;
 610         struct itimerval32 i32;
 611         int error;
 612
 613         if (uap->itv != NULL) {
 614                 error = copyin(uap->itv, &i32, sizeof(i32));
 615                 if (error)
 616                         return (error);
 617                 TV_CP(i32, itv, it_interval);
 618                 TV_CP(i32, itv, it_value);
 619                 itvp = &itv;
 620         } else
 621                 itvp = NULL;
 622         error = kern_setitimer(td, uap->which, itvp, &oitv);
 623         if (error || uap->oitv == NULL)
 624                 return (error);
 625         TV_CP(oitv, i32, it_interval);
 626         TV_CP(oitv, i32, it_value);
 627         return (copyout(&i32, uap->oitv, sizeof(i32)));
 628 }
 629
 630 int
 631 freebsd32_getitimer(struct thread *td, struct freebsd32_getitimer_args *uap)
 632 {
 633         struct itimerval itv;
 634         struct itimerval32 i32;
 635         int error;
 636
 637         error = kern_getitimer(td, uap->which, &itv);
 638         if (error || uap->itv == NULL)
 639                 return (error);
 640         TV_CP(itv, i32, it_interval);
 641         TV_CP(itv, i32, it_value);
 642         return (copyout(&i32, uap->itv, sizeof(i32)));
 643 }
 644
 645 int
 646 freebsd32_select(struct thread *td, struct freebsd32_select_args *uap)
 647 {
 648         struct timeval32 tv32;
 649         struct timeval tv, *tvp;
 650         int error;
 651
 652         if (uap->tv != NULL) {
 653                 error = copyin(uap->tv, &tv32, sizeof(tv32));
 654                 if (error)
 655                         return (error);
 656                 CP(tv32, tv, tv_sec);
 657                 CP(tv32, tv, tv_usec);
 658                 tvp = &tv;
 659         } else
 660                 tvp = NULL;
 661         /*
 662          * XXX Do pointers need PTRIN()?
 663          */
 664         return (kern_select(td, uap->nd, uap->in, uap->ou, uap->ex, tvp,
 665             sizeof(int32_t) * 8));
 666 }
 667
 668 int
 669 freebsd32_pselect(struct thread *td, struct freebsd32_pselect_args *uap)
 670 {
 671         struct timespec32 ts32;
 672         struct timespec ts;
 673         struct timeval tv, *tvp;
 674         sigset_t set, *uset;
 675         int error;
 676
 677         if (uap->ts != NULL) {
 678                 error = copyin(uap->ts, &ts32, sizeof(ts32));
 679                 if (error != 0)
 680                         return (error);
 681                 CP(ts32, ts, tv_sec);
 682                 CP(ts32, ts, tv_nsec);
 683                 TIMESPEC_TO_TIMEVAL(&tv, &ts);
 684                 tvp = &tv;
 685         } else
 686                 tvp = NULL;
 687         if (uap->sm != NULL) {
 688                 error = copyin(uap->sm, &set, sizeof(set));
 689                 if (error != 0)
 690                         return (error);
 691                 uset = &set;
 692         } else
 693                 uset = NULL;
 694         /*
 695          * XXX Do pointers need PTRIN()?
 696          */
 697         error = kern_pselect(td, uap->nd, uap->in, uap->ou, uap->ex, tvp,
 698             uset, sizeof(int32_t) * 8);
 699         return (error);
 700 }
 701
 702 /*
 703  * Copy 'count' items into the destination list pointed to by uap->eventlist.
 704  */
 705 static int
 706 freebsd32_kevent_copyout(void *arg, struct kevent *kevp, int count)
 707 {
 708         struct freebsd32_kevent_args *uap;
 709         struct kevent32 ks32[KQ_NEVENTS];
 710         int i, error = 0;
 711
 712         KASSERT(count <= KQ_NEVENTS, ("count (%d) > KQ_NEVENTS", count));
 713         uap = (struct freebsd32_kevent_args *)arg;
 714
 715         for (i = 0; i < count; i++) {
 716                 CP(kevp[i], ks32[i], ident);
 717                 CP(kevp[i], ks32[i], filter);
 718                 CP(kevp[i], ks32[i], flags);
 719                 CP(kevp[i], ks32[i], fflags);
 720                 CP(kevp[i], ks32[i], data);
 721                 PTROUT_CP(kevp[i], ks32[i], udata);
 722         }
 723         error = copyout(ks32, uap->eventlist, count * sizeof *ks32);
 724         if (error == 0)
 725                 uap->eventlist += count;
 726         return (error);
 727 }
 728
 729 /*
 730  * Copy 'count' items from the list pointed to by uap->changelist.
 731  */
 732 static int
 733 freebsd32_kevent_copyin(void *arg, struct kevent *kevp, int count)
 734 {
 735         struct freebsd32_kevent_args *uap;
 736         struct kevent32 ks32[KQ_NEVENTS];
 737         int i, error = 0;
 738
 739         KASSERT(count <= KQ_NEVENTS, ("count (%d) > KQ_NEVENTS", count));
 740         uap = (struct freebsd32_kevent_args *)arg;
 741
 742         error = copyin(uap->changelist, ks32, count * sizeof *ks32);
 743         if (error)
 744                 goto done;
 745         uap->changelist += count;
 746
 747         for (i = 0; i < count; i++) {
 748                 CP(ks32[i], kevp[i], ident);
 749                 CP(ks32[i], kevp[i], filter);
 750                 CP(ks32[i], kevp[i], flags);
 751                 CP(ks32[i], kevp[i], fflags);
 752                 CP(ks32[i], kevp[i], data);
 753                 PTRIN_CP(ks32[i], kevp[i], udata);
 754         }
 755 done:
 756         return (error);
 757 }
 758
 759 int
 760 freebsd32_kevent(struct thread *td, struct freebsd32_kevent_args *uap)
 761 {
 762         struct timespec32 ts32;
 763         struct timespec ts, *tsp;
 764         struct kevent_copyops k_ops = { uap,
 765                                         freebsd32_kevent_copyout,
 766                                         freebsd32_kevent_copyin};
 767         int error;
 768
 769
 770         if (uap->timeout) {
 771                 error = copyin(uap->timeout, &ts32, sizeof(ts32));
 772                 if (error)
 773                         return (error);
 774                 CP(ts32, ts, tv_sec);
 775                 CP(ts32, ts, tv_nsec);
 776                 tsp = &ts;
 777         } else
 778                 tsp = NULL;
 779         error = kern_kevent(td, uap->fd, uap->nchanges, uap->nevents,
 780             &k_ops, tsp);
 781         return (error);
 782 }
 783
 784 int
 785 freebsd32_gettimeofday(struct thread *td,
 786                        struct freebsd32_gettimeofday_args *uap)
 787 {
 788         struct timeval atv;
 789         struct timeval32 atv32;
 790         struct timezone rtz;
 791         int error = 0;
 792
 793         if (uap->tp) {
 794                 microtime(&atv);
 795                 CP(atv, atv32, tv_sec);
 796                 CP(atv, atv32, tv_usec);
 797                 error = copyout(&atv32, uap->tp, sizeof (atv32));
 798         }
 799         if (error == 0 && uap->tzp != NULL) {
 800                 rtz.tz_minuteswest = tz_minuteswest;
 801                 rtz.tz_dsttime = tz_dsttime;
 802                 error = copyout(&rtz, uap->tzp, sizeof (rtz));
 803         }
 804         return (error);
 805 }
 806
 807 int
 808 freebsd32_getrusage(struct thread *td, struct freebsd32_getrusage_args *uap)
 809 {
 810         struct rusage32 s32;
 811         struct rusage s;
 812         int error;
 813
 814         error = kern_getrusage(td, uap->who, &s);
 815         if (error)
 816                 return (error);
 817         if (uap->rusage != NULL) {
 818                 freebsd32_rusage_out(&s, &s32);
 819                 error = copyout(&s32, uap->rusage, sizeof(s32));
 820         }
 821         return (error);
 822 }
 823
 824 static int
 825 freebsd32_copyinuio(struct iovec32 *iovp, u_int iovcnt, struct uio **uiop)
 826 {
 827         struct iovec32 iov32;
 828         struct iovec *iov;
 829         struct uio *uio;
 830         u_int iovlen;
 831         int error, i;
 832
 833         *uiop = NULL;
 834         if (iovcnt > UIO_MAXIOV)
 835                 return (EINVAL);
 836         iovlen = iovcnt * sizeof(struct iovec);
 837         uio = malloc(iovlen + sizeof *uio, M_IOV, M_WAITOK);
 838         iov = (struct iovec *)(uio + 1);
 839         for (i = 0; i < iovcnt; i++) {
 840                 error = copyin(&iovp[i], &iov32, sizeof(struct iovec32));
 841                 if (error) {
 842                         free(uio, M_IOV);
 843                         return (error);
 844                 }
 845                 iov[i].iov_base = PTRIN(iov32.iov_base);
 846                 iov[i].iov_len = iov32.iov_len;
 847         }
 848         uio->uio_iov = iov;
 849         uio->uio_iovcnt = iovcnt;
 850         uio->uio_segflg = UIO_USERSPACE;
 851         uio->uio_offset = -1;
 852         uio->uio_resid = 0;
 853         for (i = 0; i < iovcnt; i++) {
 854                 if (iov->iov_len > INT_MAX - uio->uio_resid) {
 855                         free(uio, M_IOV);
 856                         return (EINVAL);
 857                 }
 858                 uio->uio_resid += iov->iov_len;
 859                 iov++;
 860         }
 861         *uiop = uio;
 862         return (0);
 863 }
 864
 865 int
 866 freebsd32_readv(struct thread *td, struct freebsd32_readv_args *uap)
 867 {
 868         struct uio *auio;
 869         int error;
 870
 871         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
 872         if (error)
 873                 return (error);
 874         error = kern_readv(td, uap->fd, auio);
 875         free(auio, M_IOV);
 876         return (error);
 877 }
 878
 879 int
 880 freebsd32_writev(struct thread *td, struct freebsd32_writev_args *uap)
 881 {
 882         struct uio *auio;
 883         int error;
 884
 885         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
 886         if (error)
 887                 return (error);
 888         error = kern_writev(td, uap->fd, auio);
 889         free(auio, M_IOV);
 890         return (error);
 891 }
 892
 893 int
 894 freebsd32_preadv(struct thread *td, struct freebsd32_preadv_args *uap)
 895 {
 896         struct uio *auio;
 897         int error;
 898
 899         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
 900         if (error)
 901                 return (error);
 902         error = kern_preadv(td, uap->fd, auio, PAIR32TO64(off_t,uap->offset));
 903         free(auio, M_IOV);
 904         return (error);
 905 }
 906
 907 int
 908 freebsd32_pwritev(struct thread *td, struct freebsd32_pwritev_args *uap)
 909 {
 910         struct uio *auio;
 911         int error;
 912
 913         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
 914         if (error)
 915                 return (error);
 916         error = kern_pwritev(td, uap->fd, auio, PAIR32TO64(off_t,uap->offset));
 917         free(auio, M_IOV);
 918         return (error);
 919 }
 920
 921 int
 922 freebsd32_copyiniov(struct iovec32 *iovp32, u_int iovcnt, struct iovec **iovp,
 923     int error)
 924 {
 925         struct iovec32 iov32;
 926         struct iovec *iov;
 927         u_int iovlen;
 928         int i;
 929
 930         *iovp = NULL;
 931         if (iovcnt > UIO_MAXIOV)
 932                 return (error);
 933         iovlen = iovcnt * sizeof(struct iovec);
 934         iov = malloc(iovlen, M_IOV, M_WAITOK);
 935         for (i = 0; i < iovcnt; i++) {
 936                 error = copyin(&iovp32[i], &iov32, sizeof(struct iovec32));
 937                 if (error) {
 938                         free(iov, M_IOV);
 939                         return (error);
 940                 }
 941                 iov[i].iov_base = PTRIN(iov32.iov_base);
 942                 iov[i].iov_len = iov32.iov_len;
 943         }
 944         *iovp = iov;
 945         return (0);
 946 }
 947
 948 static int
 949 freebsd32_copyinmsghdr(struct msghdr32 *msg32, struct msghdr *msg)
 950 {
 951         struct msghdr32 m32;
 952         int error;
 953
 954         error = copyin(msg32, &m32, sizeof(m32));
 955         if (error)
 956                 return (error);
 957         msg->msg_name = PTRIN(m32.msg_name);
 958         msg->msg_namelen = m32.msg_namelen;
 959         msg->msg_iov = PTRIN(m32.msg_iov);
 960         msg->msg_iovlen = m32.msg_iovlen;
 961         msg->msg_control = PTRIN(m32.msg_control);
 962         msg->msg_controllen = m32.msg_controllen;
 963         msg->msg_flags = m32.msg_flags;
 964         return (0);
 965 }
 966
 967 static int
 968 freebsd32_copyoutmsghdr(struct msghdr *msg, struct msghdr32 *msg32)
 969 {
 970         struct msghdr32 m32;
 971         int error;
 972
 973         m32.msg_name = PTROUT(msg->msg_name);
 974         m32.msg_namelen = msg->msg_namelen;
 975         m32.msg_iov = PTROUT(msg->msg_iov);
 976         m32.msg_iovlen = msg->msg_iovlen;
 977         m32.msg_control = PTROUT(msg->msg_control);
 978         m32.msg_controllen = msg->msg_controllen;
 979         m32.msg_flags = msg->msg_flags;
 980         error = copyout(&m32, msg32, sizeof(m32));
 981         return (error);
 982 }
 983
 984 #ifndef __mips__
 985 #define FREEBSD32_ALIGNBYTES    (sizeof(int) - 1)
 986 #else
 987 #define FREEBSD32_ALIGNBYTES    (sizeof(long) - 1)
 988 #endif
 989 #define FREEBSD32_ALIGN(p)      \
 990         (((u_long)(p) + FREEBSD32_ALIGNBYTES) & ~FREEBSD32_ALIGNBYTES)
 991 #define FREEBSD32_CMSG_SPACE(l) \
 992         (FREEBSD32_ALIGN(sizeof(struct cmsghdr)) + FREEBSD32_ALIGN(l))
 993
 994 #define FREEBSD32_CMSG_DATA(cmsg)       ((unsigned char *)(cmsg) + \
 995                                  FREEBSD32_ALIGN(sizeof(struct cmsghdr)))
 996 static int
 997 freebsd32_copy_msg_out(struct msghdr *msg, struct mbuf *control)
 998 {
 999         struct cmsghdr *cm;
1000         void *data;
1001         socklen_t clen, datalen;
1002         int error;
1003         caddr_t ctlbuf;
1004         int len, maxlen, copylen;
1005         struct mbuf *m;
1006         error = 0;
1007
1008         len    = msg->msg_controllen;
1009         maxlen = msg->msg_controllen;
1010         msg->msg_controllen = 0;
1011
1012         m = control;
1013         ctlbuf = msg->msg_control;
1014
1015         while (m && len > 0) {
1016                 cm = mtod(m, struct cmsghdr *);
1017                 clen = m->m_len;
1018
1019                 while (cm != NULL) {
1020
1021                         if (sizeof(struct cmsghdr) > clen ||
1022                             cm->cmsg_len > clen) {
1023                                 error = EINVAL;
1024                                 break;
1025                         }
1026
1027                         data   = CMSG_DATA(cm);
1028                         datalen = (caddr_t)cm + cm->cmsg_len - (caddr_t)data;
1029
1030                         /* Adjust message length */
1031                         cm->cmsg_len = FREEBSD32_ALIGN(sizeof(struct cmsghdr)) +
1032                             datalen;
1033
1034
1035                         /* Copy cmsghdr */
1036                         copylen = sizeof(struct cmsghdr);
1037                         if (len < copylen) {
1038                                 msg->msg_flags |= MSG_CTRUNC;
1039                                 copylen = len;
1040                         }
1041
1042                         error = copyout(cm,ctlbuf,copylen);
1043                         if (error)
1044                                 goto exit;
1045
1046                         ctlbuf += FREEBSD32_ALIGN(copylen);
1047                         len    -= FREEBSD32_ALIGN(copylen);
1048
1049                         if (len <= 0)
1050                                 break;
1051
1052                         /* Copy data */
1053                         copylen = datalen;
1054                         if (len < copylen) {
1055                                 msg->msg_flags |= MSG_CTRUNC;
1056                                 copylen = len;
1057                         }
1058
1059                         error = copyout(data,ctlbuf,copylen);
1060                         if (error)
1061                                 goto exit;
1062
1063                         ctlbuf += FREEBSD32_ALIGN(copylen);
1064                         len    -= FREEBSD32_ALIGN(copylen);
1065
1066                         if (CMSG_SPACE(datalen) < clen) {
1067                                 clen -= CMSG_SPACE(datalen);
1068                                 cm = (struct cmsghdr *)
1069                                         ((caddr_t)cm + CMSG_SPACE(datalen));
1070                         } else {
1071                                 clen = 0;
1072                                 cm = NULL;
1073                         }
1074                 }
1075                 m = m->m_next;
1076         }
1077
1078         msg->msg_controllen = (len <= 0) ? maxlen :  ctlbuf - (caddr_t)msg->msg_control;
1079
1080 exit:
1081         return (error);
1082
1083 }
1084
1085 int
1086 freebsd32_recvmsg(td, uap)
1087         struct thread *td;
1088         struct freebsd32_recvmsg_args /* {
1089                 int     s;
1090                 struct  msghdr32 *msg;
1091                 int     flags;
1092         } */ *uap;
1093 {
1094         struct msghdr msg;
1095         struct msghdr32 m32;
1096         struct iovec *uiov, *iov;
1097         struct mbuf *control = NULL;
1098         struct mbuf **controlp;
1099
1100         int error;
1101         error = copyin(uap->msg, &m32, sizeof(m32));
1102         if (error)
1103                 return (error);
1104         error = freebsd32_copyinmsghdr(uap->msg, &msg);
1105         if (error)
1106                 return (error);
1107         error = freebsd32_copyiniov(PTRIN(m32.msg_iov), m32.msg_iovlen, &iov,
1108             EMSGSIZE);
1109         if (error)
1110                 return (error);
1111         msg.msg_flags = uap->flags;
1112         uiov = msg.msg_iov;
1113         msg.msg_iov = iov;
1114
1115         controlp = (msg.msg_control != NULL) ?  &control : NULL;
1116         error = kern_recvit(td, uap->s, &msg, UIO_USERSPACE, controlp);
1117         if (error == 0) {
1118                 msg.msg_iov = uiov;
1119
1120                 if (control != NULL)
1121                         error = freebsd32_copy_msg_out(&msg, control);
1122                 else
1123                         msg.msg_controllen = 0;
1124
1125                 if (error == 0)
1126                         error = freebsd32_copyoutmsghdr(&msg, uap->msg);
1127         }
1128         free(iov, M_IOV);
1129
1130         if (control != NULL)
1131                 m_freem(control);
1132
1133         return (error);
1134 }
1135
1136
1137 static int
1138 freebsd32_convert_msg_in(struct mbuf **controlp)
1139 {
1140         struct mbuf *control = *controlp;
1141         struct cmsghdr *cm = mtod(control, struct cmsghdr *);
1142         void *data;
1143         socklen_t clen = control->m_len, datalen;
1144         int error;
1145
1146         error = 0;
1147         *controlp = NULL;
1148
1149         while (cm != NULL) {
1150                 if (sizeof(struct cmsghdr) > clen || cm->cmsg_len > clen) {
1151                         error = EINVAL;
1152                         break;
1153                 }
1154
1155                 data = FREEBSD32_CMSG_DATA(cm);
1156                 datalen = (caddr_t)cm + cm->cmsg_len - (caddr_t)data;
1157
1158                 *controlp = sbcreatecontrol(data, datalen, cm->cmsg_type,
1159                     cm->cmsg_level);
1160                 controlp = &(*controlp)->m_next;
1161
1162                 if (FREEBSD32_CMSG_SPACE(datalen) < clen) {
1163                         clen -= FREEBSD32_CMSG_SPACE(datalen);
1164                         cm = (struct cmsghdr *)
1165                                 ((caddr_t)cm + FREEBSD32_CMSG_SPACE(datalen));
1166                 } else {
1167                         clen = 0;
1168                         cm = NULL;
1169                 }
1170         }
1171
1172         m_freem(control);
1173         return (error);
1174 }
1175
1176
1177 int
1178 freebsd32_sendmsg(struct thread *td,
1179                   struct freebsd32_sendmsg_args *uap)
1180 {
1181         struct msghdr msg;
1182         struct msghdr32 m32;
1183         struct iovec *iov;
1184         struct mbuf *control = NULL;
1185         struct sockaddr *to = NULL;
1186         int error;
1187
1188         error = copyin(uap->msg, &m32, sizeof(m32));
1189         if (error)
1190                 return (error);
1191         error = freebsd32_copyinmsghdr(uap->msg, &msg);
1192         if (error)
1193                 return (error);
1194         error = freebsd32_copyiniov(PTRIN(m32.msg_iov), m32.msg_iovlen, &iov,
1195             EMSGSIZE);
1196         if (error)
1197                 return (error);
1198         msg.msg_iov = iov;
1199         if (msg.msg_name != NULL) {
1200                 error = getsockaddr(&to, msg.msg_name, msg.msg_namelen);
1201                 if (error) {
1202                         to = NULL;
1203                         goto out;
1204                 }
1205                 msg.msg_name = to;
1206         }
1207
1208         if (msg.msg_control) {
1209                 if (msg.msg_controllen < sizeof(struct cmsghdr)) {
1210                         error = EINVAL;
1211                         goto out;
1212                 }
1213
1214                 error = sockargs(&control, msg.msg_control,
1215                     msg.msg_controllen, MT_CONTROL);
1216                 if (error)
1217                         goto out;
1218
1219                 error = freebsd32_convert_msg_in(&control);
1220                 if (error)
1221                         goto out;
1222         }
1223
1224         error = kern_sendit(td, uap->s, &msg, uap->flags, control,
1225             UIO_USERSPACE);
1226
1227 out:
1228         free(iov, M_IOV);
1229         if (to)
1230                 free(to, M_SONAME);
1231         return (error);
1232 }
1233
1234 int
1235 freebsd32_recvfrom(struct thread *td,
1236                    struct freebsd32_recvfrom_args *uap)
1237 {
1238         struct msghdr msg;
1239         struct iovec aiov;
1240         int error;
1241
1242         if (uap->fromlenaddr) {
1243                 error = copyin(PTRIN(uap->fromlenaddr), &msg.msg_namelen,
1244                     sizeof(msg.msg_namelen));
1245                 if (error)
1246                         return (error);
1247         } else {
1248                 msg.msg_namelen = 0;
1249         }
1250
1251         msg.msg_name = PTRIN(uap->from);
1252         msg.msg_iov = &aiov;
1253         msg.msg_iovlen = 1;
1254         aiov.iov_base = PTRIN(uap->buf);
1255         aiov.iov_len = uap->len;
1256         msg.msg_control = NULL;
1257         msg.msg_flags = uap->flags;
1258         error = kern_recvit(td, uap->s, &msg, UIO_USERSPACE, NULL);
1259         if (error == 0 && uap->fromlenaddr)
1260                 error = copyout(&msg.msg_namelen, PTRIN(uap->fromlenaddr),
1261                     sizeof (msg.msg_namelen));
1262         return (error);
1263 }
1264
1265 int
1266 freebsd32_settimeofday(struct thread *td,
1267                        struct freebsd32_settimeofday_args *uap)
1268 {
1269         struct timeval32 tv32;
1270         struct timeval tv, *tvp;
1271         struct timezone tz, *tzp;
1272         int error;
1273
1274         if (uap->tv) {
1275                 error = copyin(uap->tv, &tv32, sizeof(tv32));
1276                 if (error)
1277                         return (error);
1278                 CP(tv32, tv, tv_sec);
1279                 CP(tv32, tv, tv_usec);
1280                 tvp = &tv;
1281         } else
1282                 tvp = NULL;
1283         if (uap->tzp) {
1284                 error = copyin(uap->tzp, &tz, sizeof(tz));
1285                 if (error)
1286                         return (error);
1287                 tzp = &tz;
1288         } else
1289                 tzp = NULL;
1290         return (kern_settimeofday(td, tvp, tzp));
1291 }
1292
1293 int
1294 freebsd32_utimes(struct thread *td, struct freebsd32_utimes_args *uap)
1295 {
1296         struct timeval32 s32[2];
1297         struct timeval s[2], *sp;
1298         int error;
1299
1300         if (uap->tptr != NULL) {
1301                 error = copyin(uap->tptr, s32, sizeof(s32));
1302                 if (error)
1303                         return (error);
1304                 CP(s32[0], s[0], tv_sec);
1305                 CP(s32[0], s[0], tv_usec);
1306                 CP(s32[1], s[1], tv_sec);
1307                 CP(s32[1], s[1], tv_usec);
1308                 sp = s;
1309         } else
1310                 sp = NULL;
1311         return (kern_utimes(td, uap->path, UIO_USERSPACE, sp, UIO_SYSSPACE));
1312 }
1313
1314 int
1315 freebsd32_lutimes(struct thread *td, struct freebsd32_lutimes_args *uap)
1316 {
1317         struct timeval32 s32[2];
1318         struct timeval s[2], *sp;
1319         int error;
1320
1321         if (uap->tptr != NULL) {
1322                 error = copyin(uap->tptr, s32, sizeof(s32));
1323                 if (error)
1324                         return (error);
1325                 CP(s32[0], s[0], tv_sec);
1326                 CP(s32[0], s[0], tv_usec);
1327                 CP(s32[1], s[1], tv_sec);
1328                 CP(s32[1], s[1], tv_usec);
1329                 sp = s;
1330         } else
1331                 sp = NULL;
1332         return (kern_lutimes(td, uap->path, UIO_USERSPACE, sp, UIO_SYSSPACE));
1333 }
1334
1335 int
1336 freebsd32_futimes(struct thread *td, struct freebsd32_futimes_args *uap)
1337 {
1338         struct timeval32 s32[2];
1339         struct timeval s[2], *sp;
1340         int error;
1341
1342         if (uap->tptr != NULL) {
1343                 error = copyin(uap->tptr, s32, sizeof(s32));
1344                 if (error)
1345                         return (error);
1346                 CP(s32[0], s[0], tv_sec);
1347                 CP(s32[0], s[0], tv_usec);
1348                 CP(s32[1], s[1], tv_sec);
1349                 CP(s32[1], s[1], tv_usec);
1350                 sp = s;
1351         } else
1352                 sp = NULL;
1353         return (kern_futimes(td, uap->fd, sp, UIO_SYSSPACE));
1354 }
1355
1356 int
1357 freebsd32_futimesat(struct thread *td, struct freebsd32_futimesat_args *uap)
1358 {
1359         struct timeval32 s32[2];
1360         struct timeval s[2], *sp;
1361         int error;
1362
1363         if (uap->times != NULL) {
1364                 error = copyin(uap->times, s32, sizeof(s32));
1365                 if (error)
1366                         return (error);
1367                 CP(s32[0], s[0], tv_sec);
1368                 CP(s32[0], s[0], tv_usec);
1369                 CP(s32[1], s[1], tv_sec);
1370                 CP(s32[1], s[1], tv_usec);
1371                 sp = s;
1372         } else
1373                 sp = NULL;
1374         return (kern_utimesat(td, uap->fd, uap->path, UIO_USERSPACE,
1375                 sp, UIO_SYSSPACE));
1376 }
1377
1378 int
1379 freebsd32_adjtime(struct thread *td, struct freebsd32_adjtime_args *uap)
1380 {
1381         struct timeval32 tv32;
1382         struct timeval delta, olddelta, *deltap;
1383         int error;
1384
1385         if (uap->delta) {
1386                 error = copyin(uap->delta, &tv32, sizeof(tv32));
1387                 if (error)
1388                         return (error);
1389                 CP(tv32, delta, tv_sec);
1390                 CP(tv32, delta, tv_usec);
1391                 deltap = &delta;
1392         } else
1393                 deltap = NULL;
1394         error = kern_adjtime(td, deltap, &olddelta);
1395         if (uap->olddelta && error == 0) {
1396                 CP(olddelta, tv32, tv_sec);
1397                 CP(olddelta, tv32, tv_usec);
1398                 error = copyout(&tv32, uap->olddelta, sizeof(tv32));
1399         }
1400         return (error);
1401 }
1402
1403 #ifdef COMPAT_FREEBSD4
1404 int
1405 freebsd4_freebsd32_statfs(struct thread *td, struct freebsd4_freebsd32_statfs_args *uap)
1406 {
1407         struct statfs32 s32;
1408         struct statfs s;
1409         int error;
1410
1411         error = kern_statfs(td, uap->path, UIO_USERSPACE, &s);
1412         if (error)
1413                 return (error);
1414         copy_statfs(&s, &s32);
1415         return (copyout(&s32, uap->buf, sizeof(s32)));
1416 }
1417 #endif
1418
1419 #ifdef COMPAT_FREEBSD4
1420 int
1421 freebsd4_freebsd32_fstatfs(struct thread *td, struct freebsd4_freebsd32_fstatfs_args *uap)
1422 {
1423         struct statfs32 s32;
1424         struct statfs s;
1425         int error;
1426
1427         error = kern_fstatfs(td, uap->fd, &s);
1428         if (error)
1429                 return (error);
1430         copy_statfs(&s, &s32);
1431         return (copyout(&s32, uap->buf, sizeof(s32)));
1432 }
1433 #endif
1434
1435 #ifdef COMPAT_FREEBSD4
1436 int
1437 freebsd4_freebsd32_fhstatfs(struct thread *td, struct freebsd4_freebsd32_fhstatfs_args *uap)
1438 {
1439         struct statfs32 s32;
1440         struct statfs s;
1441         fhandle_t fh;
1442         int error;
1443
1444         if ((error = copyin(uap->u_fhp, &fh, sizeof(fhandle_t))) != 0)
1445                 return (error);
1446         error = kern_fhstatfs(td, fh, &s);
1447         if (error)
1448                 return (error);
1449         copy_statfs(&s, &s32);
1450         return (copyout(&s32, uap->buf, sizeof(s32)));
1451 }
1452 #endif
1453
1454 int
1455 freebsd32_pread(struct thread *td, struct freebsd32_pread_args *uap)
1456 {
1457         struct pread_args ap;
1458
1459         ap.fd = uap->fd;
1460         ap.buf = uap->buf;
1461         ap.nbyte = uap->nbyte;
1462         ap.offset = PAIR32TO64(off_t,uap->offset);
1463         return (sys_pread(td, &ap));
1464 }
1465
1466 int
1467 freebsd32_pwrite(struct thread *td, struct freebsd32_pwrite_args *uap)
1468 {
1469         struct pwrite_args ap;
1470
1471         ap.fd = uap->fd;
1472         ap.buf = uap->buf;
1473         ap.nbyte = uap->nbyte;
1474         ap.offset = PAIR32TO64(off_t,uap->offset);
1475         return (sys_pwrite(td, &ap));
1476 }
1477
1478 #ifdef COMPAT_43
1479 int
1480 ofreebsd32_lseek(struct thread *td, struct ofreebsd32_lseek_args *uap)
1481 {
1482         struct lseek_args nuap;
1483
1484         nuap.fd = uap->fd;
1485         nuap.offset = uap->offset;
1486         nuap.whence = uap->whence;
1487         return (sys_lseek(td, &nuap));
1488 }
1489 #endif
1490
1491 int
1492 freebsd32_lseek(struct thread *td, struct freebsd32_lseek_args *uap)
1493 {
1494         int error;
1495         struct lseek_args ap;
1496         off_t pos;
1497
1498         ap.fd = uap->fd;
1499         ap.offset = PAIR32TO64(off_t,uap->offset);
1500         ap.whence = uap->whence;
1501         error = sys_lseek(td, &ap);
1502         /* Expand the quad return into two parts for eax and edx */
1503         pos = *(off_t *)(td->td_retval);
1504         td->td_retval[RETVAL_LO] = pos & 0xffffffff;    /* %eax */
1505         td->td_retval[RETVAL_HI] = pos >> 32;           /* %edx */
1506         return error;
1507 }
1508
1509 int
1510 freebsd32_truncate(struct thread *td, struct freebsd32_truncate_args *uap)
1511 {
1512         struct truncate_args ap;
1513
1514         ap.path = uap->path;
1515         ap.length = PAIR32TO64(off_t,uap->length);
1516         return (sys_truncate(td, &ap));
1517 }
1518
1519 int
1520 freebsd32_ftruncate(struct thread *td, struct freebsd32_ftruncate_args *uap)
1521 {
1522         struct ftruncate_args ap;
1523
1524         ap.fd = uap->fd;
1525         ap.length = PAIR32TO64(off_t,uap->length);
1526         return (sys_ftruncate(td, &ap));
1527 }
1528
1529 #ifdef COMPAT_43
1530 int
1531 ofreebsd32_getdirentries(struct thread *td,
1532     struct ofreebsd32_getdirentries_args *uap)
1533 {
1534         struct ogetdirentries_args ap;
1535         int error;
1536         long loff;
1537         int32_t loff_cut;
1538
1539         ap.fd = uap->fd;
1540         ap.buf = uap->buf;
1541         ap.count = uap->count;
1542         ap.basep = NULL;
1543         error = kern_ogetdirentries(td, &ap, &loff);
1544         if (error == 0) {
1545                 loff_cut = loff;
1546                 error = copyout(&loff_cut, uap->basep, sizeof(int32_t));
1547         }
1548         return (error);
1549 }
1550 #endif
1551
1552 int
1553 freebsd32_getdirentries(struct thread *td,
1554     struct freebsd32_getdirentries_args *uap)
1555 {
1556         long base;
1557         int32_t base32;
1558         int error;
1559
1560         error = kern_getdirentries(td, uap->fd, uap->buf, uap->count, &base,
1561             NULL, UIO_USERSPACE);
1562         if (error)
1563                 return (error);
1564         if (uap->basep != NULL) {
1565                 base32 = base;
1566                 error = copyout(&base32, uap->basep, sizeof(int32_t));
1567         }
1568         return (error);
1569 }
1570
1571 #ifdef COMPAT_FREEBSD6
1572 /* versions with the 'int pad' argument */
1573 int
1574 freebsd6_freebsd32_pread(struct thread *td, struct freebsd6_freebsd32_pread_args *uap)
1575 {
1576         struct pread_args ap;
1577
1578         ap.fd = uap->fd;
1579         ap.buf = uap->buf;
1580         ap.nbyte = uap->nbyte;
1581         ap.offset = PAIR32TO64(off_t,uap->offset);
1582         return (sys_pread(td, &ap));
1583 }
1584
1585 int
1586 freebsd6_freebsd32_pwrite(struct thread *td, struct freebsd6_freebsd32_pwrite_args *uap)
1587 {
1588         struct pwrite_args ap;
1589
1590         ap.fd = uap->fd;
1591         ap.buf = uap->buf;
1592         ap.nbyte = uap->nbyte;
1593         ap.offset = PAIR32TO64(off_t,uap->offset);
1594         return (sys_pwrite(td, &ap));
1595 }
1596
1597 int
1598 freebsd6_freebsd32_lseek(struct thread *td, struct freebsd6_freebsd32_lseek_args *uap)
1599 {
1600         int error;
1601         struct lseek_args ap;
1602         off_t pos;
1603
1604         ap.fd = uap->fd;
1605         ap.offset = PAIR32TO64(off_t,uap->offset);
1606         ap.whence = uap->whence;
1607         error = sys_lseek(td, &ap);
1608         /* Expand the quad return into two parts for eax and edx */
1609         pos = *(off_t *)(td->td_retval);
1610         td->td_retval[RETVAL_LO] = pos & 0xffffffff;    /* %eax */
1611         td->td_retval[RETVAL_HI] = pos >> 32;           /* %edx */
1612         return error;
1613 }
1614
1615 int
1616 freebsd6_freebsd32_truncate(struct thread *td, struct freebsd6_freebsd32_truncate_args *uap)
1617 {
1618         struct truncate_args ap;
1619
1620         ap.path = uap->path;
1621         ap.length = PAIR32TO64(off_t,uap->length);
1622         return (sys_truncate(td, &ap));
1623 }
1624
1625 int
1626 freebsd6_freebsd32_ftruncate(struct thread *td, struct freebsd6_freebsd32_ftruncate_args *uap)
1627 {
1628         struct ftruncate_args ap;
1629
1630         ap.fd = uap->fd;
1631         ap.length = PAIR32TO64(off_t,uap->length);
1632         return (sys_ftruncate(td, &ap));
1633 }
1634 #endif /* COMPAT_FREEBSD6 */
1635
1636 struct sf_hdtr32 {
1637         uint32_t headers;
1638         int hdr_cnt;
1639         uint32_t trailers;
1640         int trl_cnt;
1641 };
1642
1643 static int
1644 freebsd32_do_sendfile(struct thread *td,
1645     struct freebsd32_sendfile_args *uap, int compat)
1646 {
1647         struct sf_hdtr32 hdtr32;
1648         struct sf_hdtr hdtr;
1649         struct uio *hdr_uio, *trl_uio;
1650         struct iovec32 *iov32;
1651         struct file *fp;
1652         cap_rights_t rights;
1653         off_t offset;
1654         int error;
1655
1656         offset = PAIR32TO64(off_t, uap->offset);
1657         if (offset < 0)
1658                 return (EINVAL);
1659
1660         hdr_uio = trl_uio = NULL;
1661
1662         if (uap->hdtr != NULL) {
1663                 error = copyin(uap->hdtr, &hdtr32, sizeof(hdtr32));
1664                 if (error)
1665                         goto out;
1666                 PTRIN_CP(hdtr32, hdtr, headers);
1667                 CP(hdtr32, hdtr, hdr_cnt);
1668                 PTRIN_CP(hdtr32, hdtr, trailers);
1669                 CP(hdtr32, hdtr, trl_cnt);
1670
1671                 if (hdtr.headers != NULL) {
1672                         iov32 = PTRIN(hdtr32.headers);
1673                         error = freebsd32_copyinuio(iov32,
1674                             hdtr32.hdr_cnt, &hdr_uio);
1675                         if (error)
1676                                 goto out;
1677                 }
1678                 if (hdtr.trailers != NULL) {
1679                         iov32 = PTRIN(hdtr32.trailers);
1680                         error = freebsd32_copyinuio(iov32,
1681                             hdtr32.trl_cnt, &trl_uio);
1682                         if (error)
1683                                 goto out;
1684                 }
1685         }
1686
1687         AUDIT_ARG_FD(uap->fd);
1688
1689         if ((error = fget_read(td, uap->fd,
1690             cap_rights_init(&rights, CAP_PREAD), &fp)) != 0) {
1691                 goto out;
1692         }
1693
1694         error = fo_sendfile(fp, uap->s, hdr_uio, trl_uio, offset,
1695             uap->nbytes, uap->sbytes, uap->flags, compat ? SFK_COMPAT : 0, td);
1696         fdrop(fp, td);
1697
1698 out:
1699         if (hdr_uio)
1700                 free(hdr_uio, M_IOV);
1701         if (trl_uio)
1702                 free(trl_uio, M_IOV);
1703         return (error);
1704 }
1705
1706 #ifdef COMPAT_FREEBSD4
1707 int
1708 freebsd4_freebsd32_sendfile(struct thread *td,
1709     struct freebsd4_freebsd32_sendfile_args *uap)
1710 {
1711         return (freebsd32_do_sendfile(td,
1712             (struct freebsd32_sendfile_args *)uap, 1));
1713 }
1714 #endif
1715
1716 int
1717 freebsd32_sendfile(struct thread *td, struct freebsd32_sendfile_args *uap)
1718 {
1719
1720         return (freebsd32_do_sendfile(td, uap, 0));
1721 }
1722
1723 static void
1724 copy_stat(struct stat *in, struct stat32 *out)
1725 {
1726
1727         CP(*in, *out, st_dev);
1728         CP(*in, *out, st_ino);
1729         CP(*in, *out, st_mode);
1730         CP(*in, *out, st_nlink);
1731         CP(*in, *out, st_uid);
1732         CP(*in, *out, st_gid);
1733         CP(*in, *out, st_rdev);
1734         TS_CP(*in, *out, st_atim);
1735         TS_CP(*in, *out, st_mtim);
1736         TS_CP(*in, *out, st_ctim);
1737         CP(*in, *out, st_size);
1738         CP(*in, *out, st_blocks);
1739         CP(*in, *out, st_blksize);
1740         CP(*in, *out, st_flags);
1741         CP(*in, *out, st_gen);
1742         TS_CP(*in, *out, st_birthtim);
1743 }
1744
1745 #ifdef COMPAT_43
1746 static void
1747 copy_ostat(struct stat *in, struct ostat32 *out)
1748 {
1749
1750         CP(*in, *out, st_dev);
1751         CP(*in, *out, st_ino);
1752         CP(*in, *out, st_mode);
1753         CP(*in, *out, st_nlink);
1754         CP(*in, *out, st_uid);
1755         CP(*in, *out, st_gid);
1756         CP(*in, *out, st_rdev);
1757         CP(*in, *out, st_size);
1758         TS_CP(*in, *out, st_atim);
1759         TS_CP(*in, *out, st_mtim);
1760         TS_CP(*in, *out, st_ctim);
1761         CP(*in, *out, st_blksize);
1762         CP(*in, *out, st_blocks);
1763         CP(*in, *out, st_flags);
1764         CP(*in, *out, st_gen);
1765 }
1766 #endif
1767
1768 int
1769 freebsd32_stat(struct thread *td, struct freebsd32_stat_args *uap)
1770 {
1771         struct stat sb;
1772         struct stat32 sb32;
1773         int error;
1774
1775         error = kern_stat(td, uap->path, UIO_USERSPACE, &sb);
1776         if (error)
1777                 return (error);
1778         copy_stat(&sb, &sb32);
1779         error = copyout(&sb32, uap->ub, sizeof (sb32));
1780         return (error);
1781 }
1782
1783 #ifdef COMPAT_43
1784 int
1785 ofreebsd32_stat(struct thread *td, struct ofreebsd32_stat_args *uap)
1786 {
1787         struct stat sb;
1788         struct ostat32 sb32;
1789         int error;
1790
1791         error = kern_stat(td, uap->path, UIO_USERSPACE, &sb);
1792         if (error)
1793                 return (error);
1794         copy_ostat(&sb, &sb32);
1795         error = copyout(&sb32, uap->ub, sizeof (sb32));
1796         return (error);
1797 }
1798 #endif
1799
1800 int
1801 freebsd32_fstat(struct thread *td, struct freebsd32_fstat_args *uap)
1802 {
1803         struct stat ub;
1804         struct stat32 ub32;
1805         int error;
1806
1807         error = kern_fstat(td, uap->fd, &ub);
1808         if (error)
1809                 return (error);
1810         copy_stat(&ub, &ub32);
1811         error = copyout(&ub32, uap->ub, sizeof(ub32));
1812         return (error);
1813 }
1814
1815 #ifdef COMPAT_43
1816 int
1817 ofreebsd32_fstat(struct thread *td, struct ofreebsd32_fstat_args *uap)
1818 {
1819         struct stat ub;
1820         struct ostat32 ub32;
1821         int error;
1822
1823         error = kern_fstat(td, uap->fd, &ub);
1824         if (error)
1825                 return (error);
1826         copy_ostat(&ub, &ub32);
1827         error = copyout(&ub32, uap->ub, sizeof(ub32));
1828         return (error);
1829 }
1830 #endif
1831
1832 int
1833 freebsd32_fstatat(struct thread *td, struct freebsd32_fstatat_args *uap)
1834 {
1835         struct stat ub;
1836         struct stat32 ub32;
1837         int error;
1838
1839         error = kern_statat(td, uap->flag, uap->fd, uap->path, UIO_USERSPACE, &ub);
1840         if (error)
1841                 return (error);
1842         copy_stat(&ub, &ub32);
1843         error = copyout(&ub32, uap->buf, sizeof(ub32));
1844         return (error);
1845 }
1846
1847 int
1848 freebsd32_lstat(struct thread *td, struct freebsd32_lstat_args *uap)
1849 {
1850         struct stat sb;
1851         struct stat32 sb32;
1852         int error;
1853
1854         error = kern_lstat(td, uap->path, UIO_USERSPACE, &sb);
1855         if (error)
1856                 return (error);
1857         copy_stat(&sb, &sb32);
1858         error = copyout(&sb32, uap->ub, sizeof (sb32));
1859         return (error);
1860 }
1861
1862 #ifdef COMPAT_43
1863 int
1864 ofreebsd32_lstat(struct thread *td, struct ofreebsd32_lstat_args *uap)
1865 {
1866         struct stat sb;
1867         struct ostat32 sb32;
1868         int error;
1869
1870         error = kern_lstat(td, uap->path, UIO_USERSPACE, &sb);
1871         if (error)
1872                 return (error);
1873         copy_ostat(&sb, &sb32);
1874         error = copyout(&sb32, uap->ub, sizeof (sb32));
1875         return (error);
1876 }
1877 #endif
1878
1879 int
1880 freebsd32_sysctl(struct thread *td, struct freebsd32_sysctl_args *uap)
1881 {
1882         int error, name[CTL_MAXNAME];
1883         size_t j, oldlen;
1884
1885         if (uap->namelen > CTL_MAXNAME || uap->namelen < 2)
1886                 return (EINVAL);
1887         error = copyin(uap->name, name, uap->namelen * sizeof(int));
1888         if (error)
1889                 return (error);
1890         if (uap->oldlenp)
1891                 oldlen = fuword32(uap->oldlenp);
1892         else
1893                 oldlen = 0;
1894         error = userland_sysctl(td, name, uap->namelen,
1895                 uap->old, &oldlen, 1,
1896                 uap->new, uap->newlen, &j, SCTL_MASK32);
1897         if (error && error != ENOMEM)
1898                 return (error);
1899         if (uap->oldlenp)
1900                 suword32(uap->oldlenp, j);
1901         return (0);
1902 }
1903
1904 int
1905 freebsd32_jail(struct thread *td, struct freebsd32_jail_args *uap)
1906 {
1907         uint32_t version;
1908         int error;
1909         struct jail j;
1910
1911         error = copyin(uap->jail, &version, sizeof(uint32_t));
1912         if (error)
1913                 return (error);
1914
1915         switch (version) {
1916         case 0:
1917         {
1918                 /* FreeBSD single IPv4 jails. */
1919                 struct jail32_v0 j32_v0;
1920
1921                 bzero(&j, sizeof(struct jail));
1922                 error = copyin(uap->jail, &j32_v0, sizeof(struct jail32_v0));
1923                 if (error)
1924                         return (error);
1925                 CP(j32_v0, j, version);
1926                 PTRIN_CP(j32_v0, j, path);
1927                 PTRIN_CP(j32_v0, j, hostname);
1928                 j.ip4s = htonl(j32_v0.ip_number);       /* jail_v0 is host order */
1929                 break;
1930         }
1931
1932         case 1:
1933                 /*
1934                  * Version 1 was used by multi-IPv4 jail implementations
1935                  * that never made it into the official kernel.
1936                  */
1937                 return (EINVAL);
1938
1939         case 2: /* JAIL_API_VERSION */
1940         {
1941                 /* FreeBSD multi-IPv4/IPv6,noIP jails. */
1942                 struct jail32 j32;
1943
1944                 error = copyin(uap->jail, &j32, sizeof(struct jail32));
1945                 if (error)
1946                         return (error);
1947                 CP(j32, j, version);
1948                 PTRIN_CP(j32, j, path);
1949                 PTRIN_CP(j32, j, hostname);
1950                 PTRIN_CP(j32, j, jailname);
1951                 CP(j32, j, ip4s);
1952                 CP(j32, j, ip6s);
1953                 PTRIN_CP(j32, j, ip4);
1954                 PTRIN_CP(j32, j, ip6);
1955                 break;
1956         }
1957
1958         default:
1959                 /* Sci-Fi jails are not supported, sorry. */
1960                 return (EINVAL);
1961         }
1962         return (kern_jail(td, &j));
1963 }
1964
1965 int
1966 freebsd32_jail_set(struct thread *td, struct freebsd32_jail_set_args *uap)
1967 {
1968         struct uio *auio;
1969         int error;
1970
1971         /* Check that we have an even number of iovecs. */
1972         if (uap->iovcnt & 1)
1973                 return (EINVAL);
1974
1975         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
1976         if (error)
1977                 return (error);
1978         error = kern_jail_set(td, auio, uap->flags);
1979         free(auio, M_IOV);
1980         return (error);
1981 }
1982
1983 int
1984 freebsd32_jail_get(struct thread *td, struct freebsd32_jail_get_args *uap)
1985 {
1986         struct iovec32 iov32;
1987         struct uio *auio;
1988         int error, i;
1989
1990         /* Check that we have an even number of iovecs. */
1991         if (uap->iovcnt & 1)
1992                 return (EINVAL);
1993
1994         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
1995         if (error)
1996                 return (error);
1997         error = kern_jail_get(td, auio, uap->flags);
1998         if (error == 0)
1999                 for (i = 0; i < uap->iovcnt; i++) {
2000                         PTROUT_CP(auio->uio_iov[i], iov32, iov_base);
2001                         CP(auio->uio_iov[i], iov32, iov_len);
2002                         error = copyout(&iov32, uap->iovp + i, sizeof(iov32));
2003                         if (error != 0)
2004                                 break;
2005                 }
2006         free(auio, M_IOV);
2007         return (error);
2008 }
2009
2010 int
2011 freebsd32_sigaction(struct thread *td, struct freebsd32_sigaction_args *uap)
2012 {
2013         struct sigaction32 s32;
2014         struct sigaction sa, osa, *sap;
2015         int error;
2016
2017         if (uap->act) {
2018                 error = copyin(uap->act, &s32, sizeof(s32));
2019                 if (error)
2020                         return (error);
2021                 sa.sa_handler = PTRIN(s32.sa_u);
2022                 CP(s32, sa, sa_flags);
2023                 CP(s32, sa, sa_mask);
2024                 sap = &sa;
2025         } else
2026                 sap = NULL;
2027         error = kern_sigaction(td, uap->sig, sap, &osa, 0);
2028         if (error == 0 && uap->oact != NULL) {
2029                 s32.sa_u = PTROUT(osa.sa_handler);
2030                 CP(osa, s32, sa_flags);
2031                 CP(osa, s32, sa_mask);
2032                 error = copyout(&s32, uap->oact, sizeof(s32));
2033         }
2034         return (error);
2035 }
2036
2037 #ifdef COMPAT_FREEBSD4
2038 int
2039 freebsd4_freebsd32_sigaction(struct thread *td,
2040                              struct freebsd4_freebsd32_sigaction_args *uap)
2041 {
2042         struct sigaction32 s32;
2043         struct sigaction sa, osa, *sap;
2044         int error;
2045
2046         if (uap->act) {
2047                 error = copyin(uap->act, &s32, sizeof(s32));
2048                 if (error)
2049                         return (error);
2050                 sa.sa_handler = PTRIN(s32.sa_u);
2051                 CP(s32, sa, sa_flags);
2052                 CP(s32, sa, sa_mask);
2053                 sap = &sa;
2054         } else
2055                 sap = NULL;
2056         error = kern_sigaction(td, uap->sig, sap, &osa, KSA_FREEBSD4);
2057         if (error == 0 && uap->oact != NULL) {
2058                 s32.sa_u = PTROUT(osa.sa_handler);
2059                 CP(osa, s32, sa_flags);
2060                 CP(osa, s32, sa_mask);
2061                 error = copyout(&s32, uap->oact, sizeof(s32));
2062         }
2063         return (error);
2064 }
2065 #endif
2066
2067 #ifdef COMPAT_43
2068 struct osigaction32 {
2069         u_int32_t       sa_u;
2070         osigset_t       sa_mask;
2071         int             sa_flags;
2072 };
2073
2074 #define ONSIG   32
2075
2076 int
2077 ofreebsd32_sigaction(struct thread *td,
2078                              struct ofreebsd32_sigaction_args *uap)
2079 {
2080         struct osigaction32 s32;
2081         struct sigaction sa, osa, *sap;
2082         int error;
2083
2084         if (uap->signum <= 0 || uap->signum >= ONSIG)
2085                 return (EINVAL);
2086
2087         if (uap->nsa) {
2088                 error = copyin(uap->nsa, &s32, sizeof(s32));
2089                 if (error)
2090                         return (error);
2091                 sa.sa_handler = PTRIN(s32.sa_u);
2092                 CP(s32, sa, sa_flags);
2093                 OSIG2SIG(s32.sa_mask, sa.sa_mask);
2094                 sap = &sa;
2095         } else
2096                 sap = NULL;
2097         error = kern_sigaction(td, uap->signum, sap, &osa, KSA_OSIGSET);
2098         if (error == 0 && uap->osa != NULL) {
2099                 s32.sa_u = PTROUT(osa.sa_handler);
2100                 CP(osa, s32, sa_flags);
2101                 SIG2OSIG(osa.sa_mask, s32.sa_mask);
2102                 error = copyout(&s32, uap->osa, sizeof(s32));
2103         }
2104         return (error);
2105 }
2106
2107 int
2108 ofreebsd32_sigprocmask(struct thread *td,
2109                                struct ofreebsd32_sigprocmask_args *uap)
2110 {
2111         sigset_t set, oset;
2112         int error;
2113
2114         OSIG2SIG(uap->mask, set);
2115         error = kern_sigprocmask(td, uap->how, &set, &oset, SIGPROCMASK_OLD);
2116         SIG2OSIG(oset, td->td_retval[0]);
2117         return (error);
2118 }
2119
2120 int
2121 ofreebsd32_sigpending(struct thread *td,
2122                               struct ofreebsd32_sigpending_args *uap)
2123 {
2124         struct proc *p = td->td_proc;
2125         sigset_t siglist;
2126
2127         PROC_LOCK(p);
2128         siglist = p->p_siglist;
2129         SIGSETOR(siglist, td->td_siglist);
2130         PROC_UNLOCK(p);
2131         SIG2OSIG(siglist, td->td_retval[0]);
2132         return (0);
2133 }
2134
2135 struct sigvec32 {
2136         u_int32_t       sv_handler;
2137         int             sv_mask;
2138         int             sv_flags;
2139 };
2140
2141 int
2142 ofreebsd32_sigvec(struct thread *td,
2143                           struct ofreebsd32_sigvec_args *uap)
2144 {
2145         struct sigvec32 vec;
2146         struct sigaction sa, osa, *sap;
2147         int error;
2148
2149         if (uap->signum <= 0 || uap->signum >= ONSIG)
2150                 return (EINVAL);
2151
2152         if (uap->nsv) {
2153                 error = copyin(uap->nsv, &vec, sizeof(vec));
2154                 if (error)
2155                         return (error);
2156                 sa.sa_handler = PTRIN(vec.sv_handler);
2157                 OSIG2SIG(vec.sv_mask, sa.sa_mask);
2158                 sa.sa_flags = vec.sv_flags;
2159                 sa.sa_flags ^= SA_RESTART;
2160                 sap = &sa;
2161         } else
2162                 sap = NULL;
2163         error = kern_sigaction(td, uap->signum, sap, &osa, KSA_OSIGSET);
2164         if (error == 0 && uap->osv != NULL) {
2165                 vec.sv_handler = PTROUT(osa.sa_handler);
2166                 SIG2OSIG(osa.sa_mask, vec.sv_mask);
2167                 vec.sv_flags = osa.sa_flags;
2168                 vec.sv_flags &= ~SA_NOCLDWAIT;
2169                 vec.sv_flags ^= SA_RESTART;
2170                 error = copyout(&vec, uap->osv, sizeof(vec));
2171         }
2172         return (error);
2173 }
2174
2175 int
2176 ofreebsd32_sigblock(struct thread *td,
2177                             struct ofreebsd32_sigblock_args *uap)
2178 {
2179         sigset_t set, oset;
2180
2181         OSIG2SIG(uap->mask, set);
2182         kern_sigprocmask(td, SIG_BLOCK, &set, &oset, 0);
2183         SIG2OSIG(oset, td->td_retval[0]);
2184         return (0);
2185 }
2186
2187 int
2188 ofreebsd32_sigsetmask(struct thread *td,
2189                               struct ofreebsd32_sigsetmask_args *uap)
2190 {
2191         sigset_t set, oset;
2192
2193         OSIG2SIG(uap->mask, set);
2194         kern_sigprocmask(td, SIG_SETMASK, &set, &oset, 0);
2195         SIG2OSIG(oset, td->td_retval[0]);
2196         return (0);
2197 }
2198
2199 int
2200 ofreebsd32_sigsuspend(struct thread *td,
2201                               struct ofreebsd32_sigsuspend_args *uap)
2202 {
2203         sigset_t mask;
2204
2205         OSIG2SIG(uap->mask, mask);
2206         return (kern_sigsuspend(td, mask));
2207 }
2208
2209 struct sigstack32 {
2210         u_int32_t       ss_sp;
2211         int             ss_onstack;
2212 };
2213
2214 int
2215 ofreebsd32_sigstack(struct thread *td,
2216                             struct ofreebsd32_sigstack_args *uap)
2217 {
2218         struct sigstack32 s32;
2219         struct sigstack nss, oss;
2220         int error = 0, unss;
2221
2222         if (uap->nss != NULL) {
2223                 error = copyin(uap->nss, &s32, sizeof(s32));
2224                 if (error)
2225                         return (error);
2226                 nss.ss_sp = PTRIN(s32.ss_sp);
2227                 CP(s32, nss, ss_onstack);
2228                 unss = 1;
2229         } else {
2230                 unss = 0;
2231         }
2232         oss.ss_sp = td->td_sigstk.ss_sp;
2233         oss.ss_onstack = sigonstack(cpu_getstack(td));
2234         if (unss) {
2235                 td->td_sigstk.ss_sp = nss.ss_sp;
2236                 td->td_sigstk.ss_size = 0;
2237                 td->td_sigstk.ss_flags |= (nss.ss_onstack & SS_ONSTACK);
2238                 td->td_pflags |= TDP_ALTSTACK;
2239         }
2240         if (uap->oss != NULL) {
2241                 s32.ss_sp = PTROUT(oss.ss_sp);
2242                 CP(oss, s32, ss_onstack);
2243                 error = copyout(&s32, uap->oss, sizeof(s32));
2244         }
2245         return (error);
2246 }
2247 #endif
2248
2249 int
2250 freebsd32_nanosleep(struct thread *td, struct freebsd32_nanosleep_args *uap)
2251 {
2252         struct timespec32 rmt32, rqt32;
2253         struct timespec rmt, rqt;
2254         int error;
2255
2256         error = copyin(uap->rqtp, &rqt32, sizeof(rqt32));
2257         if (error)
2258                 return (error);
2259
2260         CP(rqt32, rqt, tv_sec);
2261         CP(rqt32, rqt, tv_nsec);
2262
2263         if (uap->rmtp &&
2264             !useracc((caddr_t)uap->rmtp, sizeof(rmt), VM_PROT_WRITE))
2265                 return (EFAULT);
2266         error = kern_nanosleep(td, &rqt, &rmt);
2267         if (error && uap->rmtp) {
2268                 int error2;
2269
2270                 CP(rmt, rmt32, tv_sec);
2271                 CP(rmt, rmt32, tv_nsec);
2272
2273                 error2 = copyout(&rmt32, uap->rmtp, sizeof(rmt32));
2274                 if (error2)
2275                         error = error2;
2276         }
2277         return (error);
2278 }
2279
2280 int
2281 freebsd32_clock_gettime(struct thread *td,
2282                         struct freebsd32_clock_gettime_args *uap)
2283 {
2284         struct timespec ats;
2285         struct timespec32 ats32;
2286         int error;
2287
2288         error = kern_clock_gettime(td, uap->clock_id, &ats);
2289         if (error == 0) {
2290                 CP(ats, ats32, tv_sec);
2291                 CP(ats, ats32, tv_nsec);
2292                 error = copyout(&ats32, uap->tp, sizeof(ats32));
2293         }
2294         return (error);
2295 }
2296
2297 int
2298 freebsd32_clock_settime(struct thread *td,
2299                         struct freebsd32_clock_settime_args *uap)
2300 {
2301         struct timespec ats;
2302         struct timespec32 ats32;
2303         int error;
2304
2305         error = copyin(uap->tp, &ats32, sizeof(ats32));
2306         if (error)
2307                 return (error);
2308         CP(ats32, ats, tv_sec);
2309         CP(ats32, ats, tv_nsec);
2310
2311         return (kern_clock_settime(td, uap->clock_id, &ats));
2312 }
2313
2314 int
2315 freebsd32_clock_getres(struct thread *td,
2316                        struct freebsd32_clock_getres_args *uap)
2317 {
2318         struct timespec ts;
2319         struct timespec32 ts32;
2320         int error;
2321
2322         if (uap->tp == NULL)
2323                 return (0);
2324         error = kern_clock_getres(td, uap->clock_id, &ts);
2325         if (error == 0) {
2326                 CP(ts, ts32, tv_sec);
2327                 CP(ts, ts32, tv_nsec);
2328                 error = copyout(&ts32, uap->tp, sizeof(ts32));
2329         }
2330         return (error);
2331 }
2332
2333 int freebsd32_ktimer_create(struct thread *td,
2334     struct freebsd32_ktimer_create_args *uap)
2335 {
2336         struct sigevent32 ev32;
2337         struct sigevent ev, *evp;
2338         int error, id;
2339
2340         if (uap->evp == NULL) {
2341                 evp = NULL;
2342         } else {
2343                 evp = &ev;
2344                 error = copyin(uap->evp, &ev32, sizeof(ev32));
2345                 if (error != 0)
2346                         return (error);
2347                 error = convert_sigevent32(&ev32, &ev);
2348                 if (error != 0)
2349                         return (error);
2350         }
2351         error = kern_ktimer_create(td, uap->clock_id, evp, &id, -1);
2352         if (error == 0) {
2353                 error = copyout(&id, uap->timerid, sizeof(int));
2354                 if (error != 0)
2355                         kern_ktimer_delete(td, id);
2356         }
2357         return (error);
2358 }
2359
2360 int
2361 freebsd32_ktimer_settime(struct thread *td,
2362     struct freebsd32_ktimer_settime_args *uap)
2363 {
2364         struct itimerspec32 val32, oval32;
2365         struct itimerspec val, oval, *ovalp;
2366         int error;
2367
2368         error = copyin(uap->value, &val32, sizeof(val32));
2369         if (error != 0)
2370                 return (error);
2371         ITS_CP(val32, val);
2372         ovalp = uap->ovalue != NULL ? &oval : NULL;
2373         error = kern_ktimer_settime(td, uap->timerid, uap->flags, &val, ovalp);
2374         if (error == 0 && uap->ovalue != NULL) {
2375                 ITS_CP(oval, oval32);
2376                 error = copyout(&oval32, uap->ovalue, sizeof(oval32));
2377         }
2378         return (error);
2379 }
2380
2381 int
2382 freebsd32_ktimer_gettime(struct thread *td,
2383     struct freebsd32_ktimer_gettime_args *uap)
2384 {
2385         struct itimerspec32 val32;
2386         struct itimerspec val;
2387         int error;
2388
2389         error = kern_ktimer_gettime(td, uap->timerid, &val);
2390         if (error == 0) {
2391                 ITS_CP(val, val32);
2392                 error = copyout(&val32, uap->value, sizeof(val32));
2393         }
2394         return (error);
2395 }
2396
2397 int
2398 freebsd32_clock_getcpuclockid2(struct thread *td,
2399     struct freebsd32_clock_getcpuclockid2_args *uap)
2400 {
2401         clockid_t clk_id;
2402         int error;
2403
2404         error = kern_clock_getcpuclockid2(td, PAIR32TO64(id_t, uap->id),
2405             uap->which, &clk_id);
2406         if (error == 0)
2407                 error = copyout(&clk_id, uap->clock_id, sizeof(clockid_t));
2408         return (error);
2409 }
2410
2411 int
2412 freebsd32_thr_new(struct thread *td,
2413                   struct freebsd32_thr_new_args *uap)
2414 {
2415         struct thr_param32 param32;
2416         struct thr_param param;
2417         int error;
2418
2419         if (uap->param_size < 0 ||
2420             uap->param_size > sizeof(struct thr_param32))
2421                 return (EINVAL);
2422         bzero(&param, sizeof(struct thr_param));
2423         bzero(&param32, sizeof(struct thr_param32));
2424         error = copyin(uap->param, &param32, uap->param_size);
2425         if (error != 0)
2426                 return (error);
2427         param.start_func = PTRIN(param32.start_func);
2428         param.arg = PTRIN(param32.arg);
2429         param.stack_base = PTRIN(param32.stack_base);
2430         param.stack_size = param32.stack_size;
2431         param.tls_base = PTRIN(param32.tls_base);
2432         param.tls_size = param32.tls_size;
2433         param.child_tid = PTRIN(param32.child_tid);
2434         param.parent_tid = PTRIN(param32.parent_tid);
2435         param.flags = param32.flags;
2436         param.rtp = PTRIN(param32.rtp);
2437         param.spare[0] = PTRIN(param32.spare[0]);
2438         param.spare[1] = PTRIN(param32.spare[1]);
2439         param.spare[2] = PTRIN(param32.spare[2]);
2440
2441         return (kern_thr_new(td, &param));
2442 }
2443
2444 int
2445 freebsd32_thr_suspend(struct thread *td, struct freebsd32_thr_suspend_args *uap)
2446 {
2447         struct timespec32 ts32;
2448         struct timespec ts, *tsp;
2449         int error;
2450
2451         error = 0;
2452         tsp = NULL;
2453         if (uap->timeout != NULL) {
2454                 error = copyin((const void *)uap->timeout, (void *)&ts32,
2455                     sizeof(struct timespec32));
2456                 if (error != 0)
2457                         return (error);
2458                 ts.tv_sec = ts32.tv_sec;
2459                 ts.tv_nsec = ts32.tv_nsec;
2460                 tsp = &ts;
2461         }
2462         return (kern_thr_suspend(td, tsp));
2463 }
2464
2465 void
2466 siginfo_to_siginfo32(const siginfo_t *src, struct siginfo32 *dst)
2467 {
2468         bzero(dst, sizeof(*dst));
2469         dst->si_signo = src->si_signo;
2470         dst->si_errno = src->si_errno;
2471         dst->si_code = src->si_code;
2472         dst->si_pid = src->si_pid;
2473         dst->si_uid = src->si_uid;
2474         dst->si_status = src->si_status;
2475         dst->si_addr = (uintptr_t)src->si_addr;
2476         dst->si_value.sival_int = src->si_value.sival_int;
2477         dst->si_timerid = src->si_timerid;
2478         dst->si_overrun = src->si_overrun;
2479 }
2480
2481 int
2482 freebsd32_sigtimedwait(struct thread *td, struct freebsd32_sigtimedwait_args *uap)
2483 {
2484         struct timespec32 ts32;
2485         struct timespec ts;
2486         struct timespec *timeout;
2487         sigset_t set;
2488         ksiginfo_t ksi;
2489         struct siginfo32 si32;
2490         int error;
2491
2492         if (uap->timeout) {
2493                 error = copyin(uap->timeout, &ts32, sizeof(ts32));
2494                 if (error)
2495                         return (error);
2496                 ts.tv_sec = ts32.tv_sec;
2497                 ts.tv_nsec = ts32.tv_nsec;
2498                 timeout = &ts;
2499         } else
2500                 timeout = NULL;
2501
2502         error = copyin(uap->set, &set, sizeof(set));
2503         if (error)
2504                 return (error);
2505
2506         error = kern_sigtimedwait(td, set, &ksi, timeout);
2507         if (error)
2508                 return (error);
2509
2510         if (uap->info) {
2511                 siginfo_to_siginfo32(&ksi.ksi_info, &si32);
2512                 error = copyout(&si32, uap->info, sizeof(struct siginfo32));
2513         }
2514
2515         if (error == 0)
2516                 td->td_retval[0] = ksi.ksi_signo;
2517         return (error);
2518 }
2519
2520 /*
2521  * MPSAFE
2522  */
2523 int
2524 freebsd32_sigwaitinfo(struct thread *td, struct freebsd32_sigwaitinfo_args *uap)
2525 {
2526         ksiginfo_t ksi;
2527         struct siginfo32 si32;
2528         sigset_t set;
2529         int error;
2530
2531         error = copyin(uap->set, &set, sizeof(set));
2532         if (error)
2533                 return (error);
2534
2535         error = kern_sigtimedwait(td, set, &ksi, NULL);
2536         if (error)
2537                 return (error);
2538
2539         if (uap->info) {
2540                 siginfo_to_siginfo32(&ksi.ksi_info, &si32);
2541                 error = copyout(&si32, uap->info, sizeof(struct siginfo32));
2542         }
2543         if (error == 0)
2544                 td->td_retval[0] = ksi.ksi_signo;
2545         return (error);
2546 }
2547
2548 int
2549 freebsd32_cpuset_setid(struct thread *td,
2550     struct freebsd32_cpuset_setid_args *uap)
2551 {
2552         struct cpuset_setid_args ap;
2553
2554         ap.which = uap->which;
2555         ap.id = PAIR32TO64(id_t,uap->id);
2556         ap.setid = uap->setid;
2557
2558         return (sys_cpuset_setid(td, &ap));
2559 }
2560
2561 int
2562 freebsd32_cpuset_getid(struct thread *td,
2563     struct freebsd32_cpuset_getid_args *uap)
2564 {
2565         struct cpuset_getid_args ap;
2566
2567         ap.level = uap->level;
2568         ap.which = uap->which;
2569         ap.id = PAIR32TO64(id_t,uap->id);
2570         ap.setid = uap->setid;
2571
2572         return (sys_cpuset_getid(td, &ap));
2573 }
2574
2575 int
2576 freebsd32_cpuset_getaffinity(struct thread *td,
2577     struct freebsd32_cpuset_getaffinity_args *uap)
2578 {
2579         struct cpuset_getaffinity_args ap;
2580
2581         ap.level = uap->level;
2582         ap.which = uap->which;
2583         ap.id = PAIR32TO64(id_t,uap->id);
2584         ap.cpusetsize = uap->cpusetsize;
2585         ap.mask = uap->mask;
2586
2587         return (sys_cpuset_getaffinity(td, &ap));
2588 }
2589
2590 int
2591 freebsd32_cpuset_setaffinity(struct thread *td,
2592     struct freebsd32_cpuset_setaffinity_args *uap)
2593 {
2594         struct cpuset_setaffinity_args ap;
2595
2596         ap.level = uap->level;
2597         ap.which = uap->which;
2598         ap.id = PAIR32TO64(id_t,uap->id);
2599         ap.cpusetsize = uap->cpusetsize;
2600         ap.mask = uap->mask;
2601
2602         return (sys_cpuset_setaffinity(td, &ap));
2603 }
2604
2605 int
2606 freebsd32_nmount(struct thread *td,
2607     struct freebsd32_nmount_args /* {
2608         struct iovec *iovp;
2609         unsigned int iovcnt;
2610         int flags;
2611     } */ *uap)
2612 {
2613         struct uio *auio;
2614         uint64_t flags;
2615         int error;
2616
2617         /*
2618          * Mount flags are now 64-bits. On 32-bit archtectures only
2619          * 32-bits are passed in, but from here on everything handles
2620          * 64-bit flags correctly.
2621          */
2622         flags = uap->flags;
2623
2624         AUDIT_ARG_FFLAGS(flags);
2625
2626         /*
2627          * Filter out MNT_ROOTFS.  We do not want clients of nmount() in
2628          * userspace to set this flag, but we must filter it out if we want
2629          * MNT_UPDATE on the root file system to work.
2630          * MNT_ROOTFS should only be set by the kernel when mounting its
2631          * root file system.
2632          */
2633         flags &= ~MNT_ROOTFS;
2634
2635         /*
2636          * check that we have an even number of iovec's
2637          * and that we have at least two options.
2638          */
2639         if ((uap->iovcnt & 1) || (uap->iovcnt < 4))
2640                 return (EINVAL);
2641
2642         error = freebsd32_copyinuio(uap->iovp, uap->iovcnt, &auio);
2643         if (error)
2644                 return (error);
2645         error = vfs_donmount(td, flags, auio);
2646
2647         free(auio, M_IOV);
2648         return error;
2649 }
2650
2651 #if 0
2652 int
2653 freebsd32_xxx(struct thread *td, struct freebsd32_xxx_args *uap)
2654 {
2655         struct yyy32 *p32, s32;
2656         struct yyy *p = NULL, s;
2657         struct xxx_arg ap;
2658         int error;
2659
2660         if (uap->zzz) {
2661                 error = copyin(uap->zzz, &s32, sizeof(s32));
2662                 if (error)
2663                         return (error);
2664                 /* translate in */
2665                 p = &s;
2666         }
2667         error = kern_xxx(td, p);
2668         if (error)
2669                 return (error);
2670         if (uap->zzz) {
2671                 /* translate out */
2672                 error = copyout(&s32, p32, sizeof(s32));
2673         }
2674         return (error);
2675 }
2676 #endif
2677
2678 int
2679 syscall32_register(int *offset, struct sysent *new_sysent,
2680     struct sysent *old_sysent)
2681 {
2682         if (*offset == NO_SYSCALL) {
2683                 int i;
2684
2685                 for (i = 1; i < SYS_MAXSYSCALL; ++i)
2686                         if (freebsd32_sysent[i].sy_call ==
2687                             (sy_call_t *)lkmnosys)
2688                                 break;
2689                 if (i == SYS_MAXSYSCALL)
2690                         return (ENFILE);
2691                 *offset = i;
2692         } else if (*offset < 0 || *offset >= SYS_MAXSYSCALL)
2693                 return (EINVAL);
2694         else if (freebsd32_sysent[*offset].sy_call != (sy_call_t *)lkmnosys &&
2695             freebsd32_sysent[*offset].sy_call != (sy_call_t *)lkmressys)
2696                 return (EEXIST);
2697
2698         *old_sysent = freebsd32_sysent[*offset];
2699         freebsd32_sysent[*offset] = *new_sysent;
2700         return 0;
2701 }
2702
2703 int
2704 syscall32_deregister(int *offset, struct sysent *old_sysent)
2705 {
2706
2707         if (*offset)
2708                 freebsd32_sysent[*offset] = *old_sysent;
2709         return 0;
2710 }
2711
2712 int
2713 syscall32_module_handler(struct module *mod, int what, void *arg)
2714 {
2715         struct syscall_module_data *data = (struct syscall_module_data*)arg;
2716         modspecific_t ms;
2717         int error;
2718
2719         switch (what) {
2720         case MOD_LOAD:
2721                 error = syscall32_register(data->offset, data->new_sysent,
2722                     &data->old_sysent);
2723                 if (error) {
2724                         /* Leave a mark so we know to safely unload below. */
2725                         data->offset = NULL;
2726                         return error;
2727                 }
2728                 ms.intval = *data->offset;
2729                 MOD_XLOCK;
2730                 module_setspecific(mod, &ms);
2731                 MOD_XUNLOCK;
2732                 if (data->chainevh)
2733                         error = data->chainevh(mod, what, data->chainarg);
2734                 return (error);
2735         case MOD_UNLOAD:
2736                 /*
2737                  * MOD_LOAD failed, so just return without calling the
2738                  * chained handler since we didn't pass along the MOD_LOAD
2739                  * event.
2740                  */
2741                 if (data->offset == NULL)
2742                         return (0);
2743                 if (data->chainevh) {
2744                         error = data->chainevh(mod, what, data->chainarg);
2745                         if (error)
2746                                 return (error);
2747                 }
2748                 error = syscall32_deregister(data->offset, &data->old_sysent);
2749                 return (error);
2750         default:
2751                 error = EOPNOTSUPP;
2752                 if (data->chainevh)
2753                         error = data->chainevh(mod, what, data->chainarg);
2754                 return (error);
2755         }
2756 }
2757
2758 int
2759 syscall32_helper_register(struct syscall_helper_data *sd)
2760 {
2761         struct syscall_helper_data *sd1;
2762         int error;
2763
2764         for (sd1 = sd; sd1->syscall_no != NO_SYSCALL; sd1++) {
2765                 error = syscall32_register(&sd1->syscall_no, &sd1->new_sysent,
2766                     &sd1->old_sysent);
2767                 if (error != 0) {
2768                         syscall32_helper_unregister(sd);
2769                         return (error);
2770                 }
2771                 sd1->registered = 1;
2772         }
2773         return (0);
2774 }
2775
2776 int
2777 syscall32_helper_unregister(struct syscall_helper_data *sd)
2778 {
2779         struct syscall_helper_data *sd1;
2780
2781         for (sd1 = sd; sd1->registered != 0; sd1++) {
2782                 syscall32_deregister(&sd1->syscall_no, &sd1->old_sysent);
2783                 sd1->registered = 0;
2784         }
2785         return (0);
2786 }
2787
2788 register_t *
2789 freebsd32_copyout_strings(struct image_params *imgp)
2790 {
2791         int argc, envc, i;
2792         u_int32_t *vectp;
2793         char *stringp, *destp;
2794         u_int32_t *stack_base;
2795         struct freebsd32_ps_strings *arginfo;
2796         char canary[sizeof(long) * 8];
2797         int32_t pagesizes32[MAXPAGESIZES];
2798         size_t execpath_len;
2799         int szsigcode;
2800
2801         /*
2802          * Calculate string base and vector table pointers.
2803          * Also deal with signal trampoline code for this exec type.
2804          */
2805         if (imgp->execpath != NULL && imgp->auxargs != NULL)
2806                 execpath_len = strlen(imgp->execpath) + 1;
2807         else
2808                 execpath_len = 0;
2809         arginfo = (struct freebsd32_ps_strings *)curproc->p_sysent->
2810             sv_psstrings;
2811         if (imgp->proc->p_sysent->sv_sigcode_base == 0)
2812                 szsigcode = *(imgp->proc->p_sysent->sv_szsigcode);
2813         else
2814                 szsigcode = 0;
2815         destp = (caddr_t)arginfo - szsigcode - SPARE_USRSPACE -
2816             roundup(execpath_len, sizeof(char *)) -
2817             roundup(sizeof(canary), sizeof(char *)) -
2818             roundup(sizeof(pagesizes32), sizeof(char *)) -
2819             roundup((ARG_MAX - imgp->args->stringspace), sizeof(char *));
2820
2821         /*
2822          * install sigcode
2823          */
2824         if (szsigcode != 0)
2825                 copyout(imgp->proc->p_sysent->sv_sigcode,
2826                         ((caddr_t)arginfo - szsigcode), szsigcode);
2827
2828         /*
2829          * Copy the image path for the rtld.
2830          */
2831         if (execpath_len != 0) {
2832                 imgp->execpathp = (uintptr_t)arginfo - szsigcode - execpath_len;
2833                 copyout(imgp->execpath, (void *)imgp->execpathp,
2834                     execpath_len);
2835         }
2836
2837         /*
2838          * Prepare the canary for SSP.
2839          */
2840         arc4rand(canary, sizeof(canary), 0);
2841         imgp->canary = (uintptr_t)arginfo - szsigcode - execpath_len -
2842             sizeof(canary);
2843         copyout(canary, (void *)imgp->canary, sizeof(canary));
2844         imgp->canarylen = sizeof(canary);
2845
2846         /*
2847          * Prepare the pagesizes array.
2848          */
2849         for (i = 0; i < MAXPAGESIZES; i++)
2850                 pagesizes32[i] = (uint32_t)pagesizes[i];
2851         imgp->pagesizes = (uintptr_t)arginfo - szsigcode - execpath_len -
2852             roundup(sizeof(canary), sizeof(char *)) - sizeof(pagesizes32);
2853         copyout(pagesizes32, (void *)imgp->pagesizes, sizeof(pagesizes32));
2854         imgp->pagesizeslen = sizeof(pagesizes32);
2855
2856         /*
2857          * If we have a valid auxargs ptr, prepare some room
2858          * on the stack.
2859          */
2860         if (imgp->auxargs) {
2861                 /*
2862                  * 'AT_COUNT*2' is size for the ELF Auxargs data. This is for
2863                  * lower compatibility.
2864                  */
2865                 imgp->auxarg_size = (imgp->auxarg_size) ? imgp->auxarg_size
2866                         : (AT_COUNT * 2);
2867                 /*
2868                  * The '+ 2' is for the null pointers at the end of each of
2869                  * the arg and env vector sets,and imgp->auxarg_size is room
2870                  * for argument of Runtime loader.
2871                  */
2872                 vectp = (u_int32_t *) (destp - (imgp->args->argc +
2873                     imgp->args->envc + 2 + imgp->auxarg_size + execpath_len) *
2874                     sizeof(u_int32_t));
2875         } else
2876                 /*
2877                  * The '+ 2' is for the null pointers at the end of each of
2878                  * the arg and env vector sets
2879                  */
2880                 vectp = (u_int32_t *)
2881                         (destp - (imgp->args->argc + imgp->args->envc + 2) * sizeof(u_int32_t));
2882
2883         /*
2884          * vectp also becomes our initial stack base
2885          */
2886         stack_base = vectp;
2887
2888         stringp = imgp->args->begin_argv;
2889         argc = imgp->args->argc;
2890         envc = imgp->args->envc;
2891         /*
2892          * Copy out strings - arguments and environment.
2893          */
2894         copyout(stringp, destp, ARG_MAX - imgp->args->stringspace);
2895
2896         /*
2897          * Fill in "ps_strings" struct for ps, w, etc.
2898          */
2899         suword32(&arginfo->ps_argvstr, (u_int32_t)(intptr_t)vectp);
2900         suword32(&arginfo->ps_nargvstr, argc);
2901
2902         /*
2903          * Fill in argument portion of vector table.
2904          */
2905         for (; argc > 0; --argc) {
2906                 suword32(vectp++, (u_int32_t)(intptr_t)destp);
2907                 while (*stringp++ != 0)
2908                         destp++;
2909                 destp++;
2910         }
2911
2912         /* a null vector table pointer separates the argp's from the envp's */
2913         suword32(vectp++, 0);
2914
2915         suword32(&arginfo->ps_envstr, (u_int32_t)(intptr_t)vectp);
2916         suword32(&arginfo->ps_nenvstr, envc);
2917
2918         /*
2919          * Fill in environment portion of vector table.
2920          */
2921         for (; envc > 0; --envc) {
2922                 suword32(vectp++, (u_int32_t)(intptr_t)destp);
2923                 while (*stringp++ != 0)
2924                         destp++;
2925                 destp++;
2926         }
2927
2928         /* end of vector table is a null pointer */
2929         suword32(vectp, 0);
2930
2931         return ((register_t *)stack_base);
2932 }
2933
2934 int
2935 freebsd32_kldstat(struct thread *td, struct freebsd32_kldstat_args *uap)
2936 {
2937         struct kld_file_stat stat;
2938         struct kld32_file_stat stat32;
2939         int error, version;
2940
2941         if ((error = copyin(&uap->stat->version, &version, sizeof(version)))
2942             != 0)
2943                 return (error);
2944         if (version != sizeof(struct kld32_file_stat_1) &&
2945             version != sizeof(struct kld32_file_stat))
2946                 return (EINVAL);
2947
2948         error = kern_kldstat(td, uap->fileid, &stat);
2949         if (error != 0)
2950                 return (error);
2951
2952         bcopy(&stat.name[0], &stat32.name[0], sizeof(stat.name));
2953         CP(stat, stat32, refs);
2954         CP(stat, stat32, id);
2955         PTROUT_CP(stat, stat32, address);
2956         CP(stat, stat32, size);
2957         bcopy(&stat.pathname[0], &stat32.pathname[0], sizeof(stat.pathname));
2958         return (copyout(&stat32, uap->stat, version));
2959 }
2960
2961 int
2962 freebsd32_posix_fallocate(struct thread *td,
2963     struct freebsd32_posix_fallocate_args *uap)
2964 {
2965
2966         return (kern_posix_fallocate(td, uap->fd,
2967             PAIR32TO64(off_t, uap->offset), PAIR32TO64(off_t, uap->len)));
2968 }
2969
2970 int
2971 freebsd32_posix_fadvise(struct thread *td,
2972     struct freebsd32_posix_fadvise_args *uap)
2973 {
2974
2975         return (kern_posix_fadvise(td, uap->fd, PAIR32TO64(off_t, uap->offset),
2976             PAIR32TO64(off_t, uap->len), uap->advice));
2977 }
2978
2979 int
2980 convert_sigevent32(struct sigevent32 *sig32, struct sigevent *sig)
2981 {
2982
2983         CP(*sig32, *sig, sigev_notify);
2984         switch (sig->sigev_notify) {
2985         case SIGEV_NONE:
2986                 break;
2987         case SIGEV_THREAD_ID:
2988                 CP(*sig32, *sig, sigev_notify_thread_id);
2989                 /* FALLTHROUGH */
2990         case SIGEV_SIGNAL:
2991                 CP(*sig32, *sig, sigev_signo);
2992                 PTRIN_CP(*sig32, *sig, sigev_value.sival_ptr);
2993                 break;
2994         case SIGEV_KEVENT:
2995                 CP(*sig32, *sig, sigev_notify_kqueue);
2996                 CP(*sig32, *sig, sigev_notify_kevent_flags);
2997                 PTRIN_CP(*sig32, *sig, sigev_value.sival_ptr);
2998                 break;
2999         default:
3000                 return (EINVAL);
3001         }
3002         return (0);
3003 }
3004
3005 int
3006 freebsd32_procctl(struct thread *td, struct freebsd32_procctl_args *uap)
3007 {
3008         void *data;
3009         int error, flags;
3010
3011         switch (uap->com) {
3012         case PROC_SPROTECT:
3013                 error = copyin(PTRIN(uap->data), &flags, sizeof(flags));
3014                 if (error)
3015                         return (error);
3016                 data = &flags;
3017                 break;
3018         default:
3019                 return (EINVAL);
3020         }
3021         return (kern_procctl(td, uap->idtype, PAIR32TO64(id_t, uap->id),
3022             uap->com, data));
3023 }