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