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