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