2 * Copyright (c) 2000 Marcel Moolenaar
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer
10 * in this position and unchanged.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 * $FreeBSD: src/sys/i386/linux/linux_machdep.c,v 1.6.2.4 2001/11/05 19:08:23 marcel Exp $
29 * $DragonFly: src/sys/emulation/linux/i386/linux_machdep.c,v 1.23 2007/07/30 17:41:23 pavalos Exp $
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/imgact.h>
35 #include <sys/kern_syscall.h>
38 #include <sys/nlookup.h>
41 #include <sys/resource.h>
42 #include <sys/resourcevar.h>
43 #include <sys/ptrace.h>
44 #include <sys/sysproto.h>
45 #include <sys/thread2.h>
46 #include <sys/unistd.h>
49 #include <machine/frame.h>
50 #include <machine/psl.h>
51 #include <machine/segments.h>
52 #include <machine/sysarch.h>
56 #include <vm/vm_map.h>
58 #include <sys/mplock2.h>
61 #include "linux_proto.h"
62 #include "../linux_ipc.h"
63 #include "../linux_signal.h"
64 #include "../linux_util.h"
65 #include "../linux_emuldata.h"
73 l_uint read_exec_only
:1;
74 l_uint limit_in_pages
:1;
75 l_uint seg_not_present
:1;
79 struct l_old_select_argv
{
84 struct l_timeval
*timeout
;
88 linux_to_bsd_sigaltstack(int lsa
)
92 if (lsa
& LINUX_SS_DISABLE
)
94 if (lsa
& LINUX_SS_ONSTACK
)
100 bsd_to_linux_sigaltstack(int bsa
)
104 if (bsa
& SS_DISABLE
)
105 lsa
|= LINUX_SS_DISABLE
;
106 if (bsa
& SS_ONSTACK
)
107 lsa
|= LINUX_SS_ONSTACK
;
115 sys_linux_execve(struct linux_execve_args
*args
)
117 struct nlookupdata nd
;
118 struct image_args exec_args
;
122 error
= linux_copyin_path(args
->path
, &path
, LINUX_PATH_EXISTS
);
127 kprintf(ARGS(execve
, "%s"), path
);
130 error
= nlookup_init(&nd
, path
, UIO_SYSSPACE
, NLC_FOLLOW
);
131 bzero(&exec_args
, sizeof(exec_args
));
133 error
= exec_copyin_args(&exec_args
, path
, PATH_SYSSPACE
,
134 args
->argp
, args
->envp
);
137 error
= kern_execve(&nd
, &exec_args
);
141 * The syscall result is returned in registers to the new program.
142 * Linux will register %edx as an atexit function and we must be
143 * sure to set it to 0. XXX
146 args
->sysmsg_result64
= 0;
147 if (curproc
->p_sysent
== &elf_linux_sysvec
)
148 error
= emuldata_init(curproc
, NULL
, 0);
151 exec_free_args(&exec_args
);
152 linux_free_path(&path
);
155 /* We hit a lethal error condition. Let's die now. */
156 exit1(W_EXITCODE(0, SIGABRT
));
164 struct l_ipc_kludge
{
165 struct l_msgbuf
*msgp
;
173 sys_linux_ipc(struct linux_ipc_args
*args
)
179 switch (args
->what
& 0xFFFF) {
181 struct linux_semop_args a
;
183 a
.semid
= args
->arg1
;
185 a
.nsops
= args
->arg2
;
186 a
.sysmsg_lresult
= 0;
187 error
= linux_semop(&a
);
188 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
192 struct linux_semget_args a
;
195 a
.nsems
= args
->arg2
;
196 a
.semflg
= args
->arg3
;
197 a
.sysmsg_lresult
= 0;
198 error
= linux_semget(&a
);
199 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
203 struct linux_semctl_args a
;
206 a
.semid
= args
->arg1
;
207 a
.semnum
= args
->arg2
;
209 a
.sysmsg_lresult
= 0;
210 error
= copyin((caddr_t
)args
->ptr
, &a
.arg
, sizeof(a
.arg
));
213 error
= linux_semctl(&a
);
214 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
218 struct linux_msgsnd_args a
;
220 a
.msqid
= args
->arg1
;
222 a
.msgsz
= args
->arg2
;
223 a
.msgflg
= args
->arg3
;
224 a
.sysmsg_lresult
= 0;
225 error
= linux_msgsnd(&a
);
226 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
230 struct linux_msgrcv_args a
;
232 a
.msqid
= args
->arg1
;
233 a
.msgsz
= args
->arg2
;
238 a
.msgflg
= args
->arg3
;
239 a
.sysmsg_lresult
= 0;
240 if ((args
->what
>> 16) == 0) {
241 struct l_ipc_kludge tmp
;
244 if (args
->ptr
== NULL
) {
248 error
= copyin((caddr_t
)args
->ptr
, &tmp
, sizeof(tmp
));
252 a
.msgtyp
= tmp
.msgtyp
;
255 a
.msgtyp
= args
->arg5
;
257 error
= linux_msgrcv(&a
);
258 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
262 struct linux_msgget_args a
;
265 a
.msgflg
= args
->arg2
;
266 a
.sysmsg_lresult
= 0;
267 error
= linux_msgget(&a
);
268 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
272 struct linux_msgctl_args a
;
274 a
.msqid
= args
->arg1
;
277 a
.sysmsg_lresult
= 0;
278 error
= linux_msgctl(&a
);
279 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
283 struct linux_shmat_args a
;
285 a
.shmid
= args
->arg1
;
286 a
.shmaddr
= args
->ptr
;
287 a
.shmflg
= args
->arg2
;
288 a
.raddr
= (l_ulong
*)args
->arg3
;
289 a
.sysmsg_lresult
= 0;
290 error
= linux_shmat(&a
);
291 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
295 struct linux_shmdt_args a
;
297 a
.shmaddr
= args
->ptr
;
298 a
.sysmsg_lresult
= 0;
299 error
= linux_shmdt(&a
);
300 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
304 struct linux_shmget_args a
;
308 a
.shmflg
= args
->arg3
;
309 a
.sysmsg_lresult
= 0;
310 error
= linux_shmget(&a
);
311 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
315 struct linux_shmctl_args a
;
317 a
.shmid
= args
->arg1
;
320 a
.sysmsg_lresult
= 0;
321 error
= linux_shmctl(&a
);
322 args
->sysmsg_lresult
= a
.sysmsg_lresult
;
337 sys_linux_old_select(struct linux_old_select_args
*args
)
339 struct l_old_select_argv linux_args
;
340 struct linux_select_args newsel
;
344 if (ldebug(old_select
))
345 kprintf(ARGS(old_select
, "%p"), args
->ptr
);
348 error
= copyin((caddr_t
)args
->ptr
, &linux_args
, sizeof(linux_args
));
352 newsel
.sysmsg_iresult
= 0;
353 newsel
.nfds
= linux_args
.nfds
;
354 newsel
.readfds
= linux_args
.readfds
;
355 newsel
.writefds
= linux_args
.writefds
;
356 newsel
.exceptfds
= linux_args
.exceptfds
;
357 newsel
.timeout
= linux_args
.timeout
;
358 error
= sys_linux_select(&newsel
);
359 args
->sysmsg_iresult
= newsel
.sysmsg_iresult
;
367 sys_linux_fork(struct linux_fork_args
*args
)
369 struct lwp
*lp
= curthread
->td_lwp
;
374 error
= fork1(lp
, RFFDG
| RFPROC
| RFPGLOCK
, &p2
);
376 emuldata_init(curproc
, p2
, 0);
378 start_forked_proc(lp
, p2
);
379 args
->sysmsg_fds
[0] = p2
->p_pid
;
380 args
->sysmsg_fds
[1] = 0;
384 /* Are we the child? */
385 if (args
->sysmsg_iresult
== 1)
386 args
->sysmsg_iresult
= 0;
395 sys_linux_exit_group(struct linux_exit_group_args
*args
)
397 struct linux_emuldata
*em
, *e
;
406 em
= emuldata_get(curproc
);
408 if (em
->s
->refs
== 1) {
409 exit1(W_EXITCODE(0, sig
));
417 KKASSERT(em
->proc
== curproc
);
418 em
->flags
|= EMUL_DIDKILL
;
419 em
->s
->flags
|= LINUX_LES_INEXITGROUP
;
420 em
->s
->xstat
= W_EXITCODE(0, sig
);
422 LIST_REMOVE(em
, threads
);
423 LIST_INSERT_HEAD(&em
->s
->threads
, em
, threads
);
425 while ((e
= LIST_NEXT(em
, threads
)) != NULL
) {
426 LIST_REMOVE(em
, threads
);
427 LIST_INSERT_AFTER(e
, em
, threads
);
428 if ((e
->flags
& EMUL_DIDKILL
) == 0) {
429 e
->flags
|= EMUL_DIDKILL
;
430 KKASSERT(pfind(e
->proc
->p_pid
) == e
->proc
);
431 ksignal(e
->proc
, SIGKILL
);
438 exit1(W_EXITCODE(0, sig
));
449 sys_linux_vfork(struct linux_vfork_args
*args
)
451 struct lwp
*lp
= curthread
->td_lwp
;
456 error
= fork1(lp
, RFFDG
| RFPROC
| RFPPWAIT
| RFMEM
| RFPGLOCK
, &p2
);
458 emuldata_init(curproc
, p2
, 0);
460 start_forked_proc(lp
, p2
);
461 args
->sysmsg_fds
[0] = p2
->p_pid
;
462 args
->sysmsg_fds
[1] = 0;
466 if (args
->sysmsg_iresult
== 1)
467 args
->sysmsg_iresult
= 0;
476 sys_linux_clone(struct linux_clone_args
*args
)
478 struct segment_descriptor
*desc
;
479 struct l_user_desc info
;
483 struct lwp
*lp
= curthread
->td_lwp
;
484 int error
, ff
= RFPROC
;
485 struct proc
*p2
= NULL
;
491 kprintf(ARGS(clone
, "flags %x, stack %x"),
492 (unsigned int)args
->flags
, (unsigned int)args
->stack
);
493 if (args
->flags
& CLONE_PID
)
494 kprintf(LMSG("CLONE_PID not yet supported"));
497 exit_signal
= args
->flags
& 0x000000ff;
498 if (exit_signal
>= LINUX_NSIG
)
500 if (exit_signal
<= LINUX_SIGTBLSZ
)
501 exit_signal
= linux_to_bsd_signal
[_SIG_IDX(exit_signal
)];
503 if (args
->flags
& LINUX_CLONE_VM
)
505 if (args
->flags
& LINUX_CLONE_SIGHAND
)
507 if (!(args
->flags
& (LINUX_CLONE_FILES
| LINUX_CLONE_FS
)))
509 if ((args
->flags
& 0xffffff00) == LINUX_THREADING_FLAGS
)
511 if (args
->flags
& LINUX_CLONE_VFORK
)
513 if (args
->flags
& LINUX_CLONE_PARENT_SETTID
) {
514 if (args
->parent_tidptr
== NULL
)
522 error
= fork1(lp
, ff
| RFPGLOCK
, &p2
);
528 args
->sysmsg_fds
[0] = p2
? p2
->p_pid
: 0;
529 args
->sysmsg_fds
[1] = 0;
531 if (args
->flags
& (LINUX_CLONE_PARENT
| LINUX_CLONE_THREAD
))
532 proc_reparent(p2
, curproc
->p_pptr
/* XXX */);
534 emuldata_init(curproc
, p2
, args
->flags
);
535 linux_proc_fork(p2
, curproc
, args
->child_tidptr
);
537 * XXX: this can't happen, p2 is never NULL, or else we'd have
538 * other problems, too (see p2->p_sigparent == ...,
539 * linux_proc_fork and emuldata_init.
544 if (args
->flags
& LINUX_CLONE_PARENT_SETTID
) {
545 error
= copyout(&p2
->p_pid
, args
->parent_tidptr
, sizeof(p2
->p_pid
));
549 p2
->p_sigparent
= exit_signal
;
551 ONLY_LWP_IN_PROC(p2
)->lwp_md
.md_regs
->tf_esp
=
552 (unsigned long)args
->stack
;
555 if (args
->flags
& LINUX_CLONE_SETTLS
) {
556 error
= copyin((void *)curthread
->td_lwp
->lwp_md
.md_regs
->tf_esi
, &info
, sizeof(struct l_user_desc
));
558 kprintf("copyin of tf_esi to info failed\n");
560 idx
= info
.entry_number
;
562 * We understand both our own entries such as the ones
563 * we provide on linux_set_thread_area, as well as the
564 * linux-type entries 6-8.
566 if ((idx
< 6 || idx
> 8) && (idx
< GTLS_START
)) {
567 kprintf("LINUX_CLONE_SETTLS, invalid idx requested: %d\n", idx
);
570 if (idx
< GTLS_START
) {
574 idx
-= (GTLS_START
+ mycpu
->gd_cpuid
* NGDT
);
581 a
[0] = LINUX_LDT_entry_a(&info
);
582 a
[1] = LINUX_LDT_entry_b(&info
);
584 desc
= &FIRST_LWP_IN_PROC(p2
)->lwp_thread
->td_tls
.tls
[idx
];
585 memcpy(desc
, &a
, sizeof(a
));
587 kprintf("linux_clone... we don't have a p2\n");
593 start_forked_proc(lp
, p2
);
598 kprintf(LMSG("clone: successful rfork to %ld"),
615 #define STACK_SIZE (2 * 1024 * 1024)
616 #define GUARD_SIZE (4 * PAGE_SIZE)
622 linux_mmap_common(caddr_t linux_addr
, size_t linux_len
, int linux_prot
,
623 int linux_flags
, int linux_fd
, off_t pos
, void **res
)
625 struct thread
*td
= curthread
;
626 struct proc
*p
= td
->td_proc
;
629 int error
, flags
, len
, prot
, fd
;
632 if (linux_flags
& LINUX_MAP_SHARED
)
634 if (linux_flags
& LINUX_MAP_PRIVATE
)
635 flags
|= MAP_PRIVATE
;
636 if (linux_flags
& LINUX_MAP_FIXED
)
638 if (linux_flags
& LINUX_MAP_ANON
) {
646 if (linux_flags
& LINUX_MAP_GROWSDOWN
) {
648 /* The linux MAP_GROWSDOWN option does not limit auto
649 * growth of the region. Linux mmap with this option
650 * takes as addr the inital BOS, and as len, the initial
651 * region size. It can then grow down from addr without
652 * limit. However, linux threads has an implicit internal
653 * limit to stack size of STACK_SIZE. Its just not
654 * enforced explicitly in linux. But, here we impose
655 * a limit of (STACK_SIZE - GUARD_SIZE) on the stack
656 * region, since we can do this with our mmap.
658 * Our mmap with MAP_STACK takes addr as the maximum
659 * downsize limit on BOS, and as len the max size of
660 * the region. It them maps the top SGROWSIZ bytes,
661 * and autgrows the region down, up to the limit
664 * If we don't use the MAP_STACK option, the effect
665 * of this code is to allocate a stack region of a
666 * fixed size of (STACK_SIZE - GUARD_SIZE).
669 /* This gives us TOS */
670 addr
= linux_addr
+ linux_len
;
672 if (addr
> p
->p_vmspace
->vm_maxsaddr
) {
673 /* Some linux apps will attempt to mmap
674 * thread stacks near the top of their
675 * address space. If their TOS is greater
676 * than vm_maxsaddr, vm_map_growstack()
677 * will confuse the thread stack with the
678 * process stack and deliver a SEGV if they
679 * attempt to grow the thread stack past their
680 * current stacksize rlimit. To avoid this,
681 * adjust vm_maxsaddr upwards to reflect
682 * the current stacksize rlimit rather
683 * than the maximum possible stacksize.
684 * It would be better to adjust the
685 * mmap'ed region, but some apps do not check
686 * mmap's return value.
688 p
->p_vmspace
->vm_maxsaddr
= (char *)USRSTACK
-
689 p
->p_rlimit
[RLIMIT_STACK
].rlim_cur
;
692 /* This gives us our maximum stack size */
693 if (linux_len
> STACK_SIZE
- GUARD_SIZE
) {
696 len
= STACK_SIZE
- GUARD_SIZE
;
698 /* This gives us a new BOS. If we're using VM_STACK, then
699 * mmap will just map the top SGROWSIZ bytes, and let
700 * the stack grow down to the limit at BOS. If we're
701 * not using VM_STACK we map the full stack, since we
702 * don't have a way to autogrow it.
710 prot
= linux_prot
| PROT_READ
;
711 if (linux_flags
& LINUX_MAP_ANON
) {
718 if (ldebug(mmap
) || ldebug(mmap2
))
719 kprintf("-> (%p, %d, %d, 0x%08x, %d, %lld)\n",
720 addr
, len
, prot
, flags
, fd
, pos
);
722 error
= kern_mmap(curproc
->p_vmspace
, addr
, len
,
723 prot
, flags
, fd
, pos
, &new);
735 sys_linux_mmap(struct linux_mmap_args
*args
)
737 struct l_mmap_argv linux_args
;
740 error
= copyin((caddr_t
)args
->ptr
, &linux_args
, sizeof(linux_args
));
746 kprintf(ARGS(mmap
, "%p, %d, %d, 0x%08x, %d, %d"),
747 (void *)linux_args
.addr
, linux_args
.len
, linux_args
.prot
,
748 linux_args
.flags
, linux_args
.fd
, linux_args
.pos
);
750 error
= linux_mmap_common(linux_args
.addr
, linux_args
.len
,
751 linux_args
.prot
, linux_args
.flags
, linux_args
.fd
,
752 linux_args
.pos
, &args
->sysmsg_resultp
);
755 kprintf("-> %p\n", args
->sysmsg_resultp
);
764 sys_linux_mmap2(struct linux_mmap2_args
*args
)
770 kprintf(ARGS(mmap2
, "%p, %d, %d, 0x%08x, %d, %d"),
771 (void *)args
->addr
, args
->len
, args
->prot
, args
->flags
,
772 args
->fd
, args
->pgoff
);
774 error
= linux_mmap_common((void *)args
->addr
, args
->len
, args
->prot
,
775 args
->flags
, args
->fd
, args
->pgoff
* PAGE_SIZE
,
776 &args
->sysmsg_resultp
);
779 kprintf("-> %p\n", args
->sysmsg_resultp
);
788 sys_linux_pipe(struct linux_pipe_args
*args
)
792 struct pipe_args bsd_args
;
796 kprintf(ARGS(pipe
, "*"));
799 reg_edx
= args
->sysmsg_fds
[1];
800 error
= sys_pipe(&bsd_args
);
802 args
->sysmsg_fds
[1] = reg_edx
;
806 error
= copyout(bsd_args
.sysmsg_fds
, args
->pipefds
, 2*sizeof(int));
808 args
->sysmsg_fds
[1] = reg_edx
;
812 args
->sysmsg_fds
[1] = reg_edx
;
813 args
->sysmsg_fds
[0] = 0;
821 sys_linux_ioperm(struct linux_ioperm_args
*args
)
823 struct sysarch_args sa
;
824 struct i386_ioperm_args
*iia
;
828 sg
= stackgap_init();
829 iia
= stackgap_alloc(&sg
, sizeof(struct i386_ioperm_args
));
830 iia
->start
= args
->start
;
831 iia
->length
= args
->length
;
832 iia
->enable
= args
->enable
;
833 sa
.sysmsg_resultp
= NULL
;
834 sa
.op
= I386_SET_IOPERM
;
835 sa
.parms
= (char *)iia
;
836 error
= sys_sysarch(&sa
);
837 args
->sysmsg_resultp
= sa
.sysmsg_resultp
;
845 sys_linux_iopl(struct linux_iopl_args
*args
)
847 struct thread
*td
= curthread
;
848 struct lwp
*lp
= td
->td_lwp
;
851 if (args
->level
< 0 || args
->level
> 3)
853 if ((error
= priv_check(td
, PRIV_ROOT
)) != 0)
857 lp
->lwp_md
.md_regs
->tf_eflags
=
858 (lp
->lwp_md
.md_regs
->tf_eflags
& ~PSL_IOPL
) |
859 (args
->level
* (PSL_IOPL
/ 3));
867 sys_linux_modify_ldt(struct linux_modify_ldt_args
*uap
)
871 struct sysarch_args args
;
872 struct i386_ldt_args
*ldt
;
873 struct l_descriptor ld
;
874 union descriptor
*desc
;
877 sg
= stackgap_init();
879 if (uap
->ptr
== NULL
)
883 case 0x00: /* read_ldt */
884 ldt
= stackgap_alloc(&sg
, sizeof(*ldt
));
886 ldt
->descs
= uap
->ptr
;
887 ldt
->num
= uap
->bytecount
/ sizeof(union descriptor
);
888 args
.op
= I386_GET_LDT
;
889 args
.parms
= (char*)ldt
;
890 args
.sysmsg_iresult
= 0;
891 error
= sys_sysarch(&args
);
892 uap
->sysmsg_iresult
= args
.sysmsg_iresult
*
893 sizeof(union descriptor
);
895 case 0x02: /* read_default_ldt = 0 */
896 size
= 5*sizeof(struct l_desc_struct
);
897 if (size
> uap
->bytecount
)
898 size
= uap
->bytecount
;
899 for (written
= error
= 0; written
< size
&& error
== 0; written
++)
900 error
= subyte((char *)uap
->ptr
+ written
, 0);
901 uap
->sysmsg_iresult
= written
;
903 case 0x01: /* write_ldt */
904 case 0x11: /* write_ldt */
905 if (uap
->bytecount
!= sizeof(ld
))
908 error
= copyin(uap
->ptr
, &ld
, sizeof(ld
));
912 ldt
= stackgap_alloc(&sg
, sizeof(*ldt
));
913 desc
= stackgap_alloc(&sg
, sizeof(*desc
));
914 ldt
->start
= ld
.entry_number
;
917 desc
->sd
.sd_lolimit
= (ld
.limit
& 0x0000ffff);
918 desc
->sd
.sd_hilimit
= (ld
.limit
& 0x000f0000) >> 16;
919 desc
->sd
.sd_lobase
= (ld
.base_addr
& 0x00ffffff);
920 desc
->sd
.sd_hibase
= (ld
.base_addr
& 0xff000000) >> 24;
921 desc
->sd
.sd_type
= SDT_MEMRO
| ((ld
.read_exec_only
^ 1) << 1) |
924 desc
->sd
.sd_p
= (ld
.seg_not_present
^ 1);
926 desc
->sd
.sd_def32
= ld
.seg_32bit
;
927 desc
->sd
.sd_gran
= ld
.limit_in_pages
;
928 args
.op
= I386_SET_LDT
;
929 args
.parms
= (char*)ldt
;
930 args
.sysmsg_iresult
= 0;
931 error
= sys_sysarch(&args
);
932 uap
->sysmsg_iresult
= args
.sysmsg_iresult
;
946 sys_linux_sigaction(struct linux_sigaction_args
*args
)
949 l_sigaction_t linux_act
, linux_oact
;
950 struct sigaction act
, oact
;
954 if (ldebug(sigaction
))
955 kprintf(ARGS(sigaction
, "%d, %p, %p"),
956 args
->sig
, (void *)args
->nsa
, (void *)args
->osa
);
960 error
= copyin(args
->nsa
, &osa
, sizeof(l_osigaction_t
));
963 linux_act
.lsa_handler
= osa
.lsa_handler
;
964 linux_act
.lsa_flags
= osa
.lsa_flags
;
965 linux_act
.lsa_restorer
= osa
.lsa_restorer
;
966 LINUX_SIGEMPTYSET(linux_act
.lsa_mask
);
967 linux_act
.lsa_mask
.__bits
[0] = osa
.lsa_mask
;
968 linux_to_bsd_sigaction(&linux_act
, &act
);
972 error
= kern_sigaction(args
->sig
, args
->nsa
? &act
: NULL
,
973 args
->osa
? &oact
: NULL
);
976 if (args
->osa
!= NULL
&& !error
) {
977 bsd_to_linux_sigaction(&oact
, &linux_oact
);
978 osa
.lsa_handler
= linux_oact
.lsa_handler
;
979 osa
.lsa_flags
= linux_oact
.lsa_flags
;
980 osa
.lsa_restorer
= linux_oact
.lsa_restorer
;
981 osa
.lsa_mask
= linux_oact
.lsa_mask
.__bits
[0];
982 error
= copyout(&osa
, args
->osa
, sizeof(l_osigaction_t
));
988 * Linux has two extra args, restart and oldmask. We dont use these,
989 * but it seems that "restart" is actually a context pointer that
990 * enables the signal to happen with a different register set.
995 sys_linux_sigsuspend(struct linux_sigsuspend_args
*args
)
997 l_sigset_t linux_mask
;
1002 if (ldebug(sigsuspend
))
1003 kprintf(ARGS(sigsuspend
, "%08lx"), (unsigned long)args
->mask
);
1006 LINUX_SIGEMPTYSET(mask
);
1007 mask
.__bits
[0] = args
->mask
;
1008 linux_to_bsd_sigset(&linux_mask
, &mask
);
1011 error
= kern_sigsuspend(&mask
);
1021 sys_linux_rt_sigsuspend(struct linux_rt_sigsuspend_args
*uap
)
1023 l_sigset_t linux_mask
;
1028 if (ldebug(rt_sigsuspend
))
1029 kprintf(ARGS(rt_sigsuspend
, "%p, %d"),
1030 (void *)uap
->newset
, uap
->sigsetsize
);
1033 if (uap
->sigsetsize
!= sizeof(l_sigset_t
))
1036 error
= copyin(uap
->newset
, &linux_mask
, sizeof(l_sigset_t
));
1040 linux_to_bsd_sigset(&linux_mask
, &mask
);
1043 error
= kern_sigsuspend(&mask
);
1053 sys_linux_pause(struct linux_pause_args
*args
)
1055 struct thread
*td
= curthread
;
1056 struct lwp
*lp
= td
->td_lwp
;
1062 kprintf(ARGS(pause
, ""));
1065 mask
= lp
->lwp_sigmask
;
1068 error
= kern_sigsuspend(&mask
);
1078 sys_linux_sigaltstack(struct linux_sigaltstack_args
*uap
)
1085 if (ldebug(sigaltstack
))
1086 kprintf(ARGS(sigaltstack
, "%p, %p"), uap
->uss
, uap
->uoss
);
1090 error
= copyin(uap
->uss
, &linux_ss
, sizeof(l_stack_t
));
1094 ss
.ss_sp
= linux_ss
.ss_sp
;
1095 ss
.ss_size
= linux_ss
.ss_size
;
1096 ss
.ss_flags
= linux_to_bsd_sigaltstack(linux_ss
.ss_flags
);
1100 error
= kern_sigaltstack(uap
->uss
? &ss
: NULL
,
1101 uap
->uoss
? &oss
: NULL
);
1104 if (error
== 0 && uap
->uoss
) {
1105 linux_ss
.ss_sp
= oss
.ss_sp
;
1106 linux_ss
.ss_size
= oss
.ss_size
;
1107 linux_ss
.ss_flags
= bsd_to_linux_sigaltstack(oss
.ss_flags
);
1108 error
= copyout(&linux_ss
, uap
->uoss
, sizeof(l_stack_t
));
1115 sys_linux_set_thread_area(struct linux_set_thread_area_args
*args
)
1117 struct segment_descriptor
*desc
;
1118 struct l_user_desc info
;
1124 error
= copyin(args
->desc
, &info
, sizeof(struct l_user_desc
));
1129 if (ldebug(set_thread_area
))
1130 kprintf(ARGS(set_thread_area
, "%i, %x, %x, %i, %i, %i, %i, %i, %i\n"),
1136 info
.read_exec_only
,
1137 info
.limit_in_pages
,
1138 info
.seg_not_present
,
1142 idx
= info
.entry_number
;
1143 if (idx
!= -1 && (idx
< 6 || idx
> 8))
1147 /* -1 means finding the first free TLS entry */
1148 for (i
= 0; i
< NGTLS
; i
++) {
1150 * try to determine if the TLS entry is empty by looking
1151 * at the lolimit entry.
1153 if (curthread
->td_tls
.tls
[idx
].sd_lolimit
== 0) {
1161 * By now we should have an index. If not, it means
1162 * that no entry is free, so return ESRCH.
1167 /* translate the index from Linux to ours */
1172 /* Tell the caller about the allocated entry number */
1174 info
.entry_number
= idx
;
1177 info
.entry_number
= GTLS_START
+ mycpu
->gd_cpuid
* NGDT
+ idx
;
1179 info
.entry_number
= GTLS_START
+ idx
;
1182 error
= copyout(&info
, args
->desc
, sizeof(struct l_user_desc
));
1186 if (LINUX_LDT_empty(&info
)) {
1190 a
[0] = LINUX_LDT_entry_a(&info
);
1191 a
[1] = LINUX_LDT_entry_b(&info
);
1195 * Update the TLS and the TLS entries in the GDT, but hold a critical
1196 * section as required by set_user_TLS().
1199 desc
= &curthread
->td_tls
.tls
[idx
];
1200 memcpy(desc
, &a
, sizeof(a
));
1208 sys_linux_get_thread_area(struct linux_get_thread_area_args
*args
)
1210 struct segment_descriptor
*sd
;
1211 struct l_desc_struct desc
;
1212 struct l_user_desc info
;
1217 if (ldebug(get_thread_area
))
1218 kprintf(ARGS(get_thread_area
, "%p"), args
->desc
);
1221 error
= copyin(args
->desc
, &info
, sizeof(struct l_user_desc
));
1225 idx
= info
.entry_number
;
1226 if ((idx
< 6 || idx
> 8) && (idx
< GTLS_START
)) {
1227 kprintf("sys_linux_get_thread_area, invalid idx requested: %d\n", idx
);
1231 memset(&info
, 0, sizeof(info
));
1233 /* translate the index from Linux to ours */
1234 info
.entry_number
= idx
;
1235 if (idx
< GTLS_START
) {
1239 idx
-= (GTLS_START
+ mycpu
->gd_cpuid
* NGDT
);
1246 sd
= &curthread
->td_tls
.tls
[idx
];
1247 memcpy(&desc
, sd
, sizeof(desc
));
1248 info
.base_addr
= LINUX_GET_BASE(&desc
);
1249 info
.limit
= LINUX_GET_LIMIT(&desc
);
1250 info
.seg_32bit
= LINUX_GET_32BIT(&desc
);
1251 info
.contents
= LINUX_GET_CONTENTS(&desc
);
1252 info
.read_exec_only
= !LINUX_GET_WRITABLE(&desc
);
1253 info
.limit_in_pages
= LINUX_GET_LIMIT_PAGES(&desc
);
1254 info
.seg_not_present
= !LINUX_GET_PRESENT(&desc
);
1255 info
.useable
= LINUX_GET_USEABLE(&desc
);
1257 error
= copyout(&info
, args
->desc
, sizeof(struct l_user_desc
));