2 * Copyright (c) 2002 Doug Rabson
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 * 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.
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
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
30 #include "opt_compat.h"
32 #define __ELF_WORD_SIZE 32
34 #include <sys/param.h>
36 #include <sys/fcntl.h>
37 #include <sys/imgact.h>
38 #include <sys/kernel.h>
40 #include <sys/malloc.h>
41 #include <sys/mutex.h>
43 #include <sys/namei.h>
44 #include <sys/pioctl.h>
46 #include <sys/procfs.h>
47 #include <sys/resourcevar.h>
48 #include <sys/systm.h>
49 #include <sys/signalvar.h>
52 #include <sys/syscall.h>
53 #include <sys/sysctl.h>
54 #include <sys/sysent.h>
55 #include <sys/vnode.h>
56 #include <sys/imgact_elf.h>
57 #include <sys/sysproto.h>
59 #include <machine/frame.h>
60 #include <machine/md_var.h>
61 #include <machine/pcb.h>
64 #include <vm/vm_kern.h>
65 #include <vm/vm_param.h>
67 #include <vm/vm_map.h>
68 #include <vm/vm_object.h>
69 #include <vm/vm_extern.h>
71 #include <compat/freebsd32/freebsd32_signal.h>
72 #include <compat/freebsd32/freebsd32_util.h>
73 #include <compat/freebsd32/freebsd32_proto.h>
74 #include <compat/ia32/ia32_signal.h>
75 #include <x86/include/psl.h>
76 #include <x86/include/segments.h>
77 #include <x86/include/specialreg.h>
79 char ia32_sigcode[] = {
80 0xff, 0x54, 0x24, 0x10, /* call *SIGF_HANDLER(%esp) */
81 0x8d, 0x44, 0x24, 0x14, /* lea SIGF_UC(%esp),%eax */
82 0x50, /* pushl %eax */
83 0xf7, 0x40, 0x54, 0x00, 0x00, 0x02, 0x02, /* testl $PSL_VM,UC_EFLAGS(%ea
85 0x75, 0x03, /* jne 9f */
86 0x8e, 0x68, 0x14, /* movl UC_GS(%eax),%gs */
87 0xb8, 0x57, 0x01, 0x00, 0x00, /* 9: movl $SYS_sigreturn,%eax */
88 0x50, /* pushl %eax */
89 0xcd, 0x80, /* int $0x80 */
90 0xeb, 0xfe, /* 0: jmp 0b */
93 int sz_ia32_sigcode = sizeof(ia32_sigcode);
97 ofreebsd32_sigreturn(struct thread *td, struct ofreebsd32_sigreturn_args *uap)
105 * Signal sending has not been implemented on ia64. This causes
106 * the sigtramp code to not understand the arguments and the application
107 * will generally crash if it tries to handle a signal. Calling
108 * sendsig() means that at least untrapped signals will work.
111 ia32_sendsig(sig_t catcher, ksiginfo_t *ksi, sigset_t *mask)
113 sendsig(catcher, ksi, mask);
116 #ifdef COMPAT_FREEBSD4
118 freebsd4_freebsd32_sigreturn(struct thread *td, struct freebsd4_freebsd32_sigreturn_args *uap)
120 return (sys_sigreturn(td, (struct sigreturn_args *)uap));
125 freebsd32_sigreturn(struct thread *td, struct freebsd32_sigreturn_args *uap)
127 return (sys_sigreturn(td, (struct sigreturn_args *)uap));
132 ia32_setregs(struct thread *td, struct image_params *imgp, u_long stack)
134 struct trapframe *tf = td->td_frame;
135 vm_offset_t gdt, ldt;
136 u_int64_t codesel, datasel, ldtsel;
137 u_int64_t codeseg, dataseg, gdtseg, ldtseg;
138 struct segment_descriptor desc;
139 struct vmspace *vmspace = td->td_proc->p_vmspace;
140 struct sysentvec *sv;
142 sv = td->td_proc->p_sysent;
143 exec_setregs(td, imgp, stack);
145 /* Non-syscall frames are cleared by exec_setregs() */
146 if (tf->tf_flags & FRAME_SYSCALL) {
147 bzero(&tf->tf_scratch, sizeof(tf->tf_scratch));
148 bzero(&tf->tf_scratch_fp, sizeof(tf->tf_scratch_fp));
150 tf->tf_special.ndirty = 0;
152 tf->tf_special.psr |= IA64_PSR_IS;
153 tf->tf_special.sp = stack;
155 /* Point the RSE backstore to something harmless. */
156 tf->tf_special.bspstore = (sv->sv_psstrings - sz_ia32_sigcode -
157 SPARE_USRSPACE + 15) & ~15;
159 codesel = LSEL(LUCODE_SEL, SEL_UPL);
160 datasel = LSEL(LUDATA_SEL, SEL_UPL);
161 ldtsel = GSEL(GLDT_SEL, SEL_UPL);
163 /* Setup ia32 segment registers. */
164 tf->tf_scratch.gr16 = (datasel << 48) | (datasel << 32) |
165 (datasel << 16) | datasel;
166 tf->tf_scratch.gr17 = (ldtsel << 32) | (datasel << 16) | codesel;
169 * Build the GDT and LDT.
171 gdt = sv->sv_usrstack;
172 vm_map_find(&vmspace->vm_map, NULL, 0, &gdt, IA32_PAGE_SIZE << 1, 0,
173 VMFS_NO_SPACE, VM_PROT_ALL, VM_PROT_ALL, 0);
174 ldt = gdt + IA32_PAGE_SIZE;
176 desc.sd_lolimit = 8*NLDT-1;
177 desc.sd_lobase = ldt & 0xffffff;
178 desc.sd_type = SDT_SYSLDT;
179 desc.sd_dpl = SEL_UPL;
184 desc.sd_hibase = ldt >> 24;
185 copyout(&desc, (caddr_t) gdt + 8*GLDT_SEL, sizeof(desc));
187 desc.sd_lolimit = ((sv->sv_usrstack >> 12) - 1) & 0xffff;
189 desc.sd_type = SDT_MEMERA;
190 desc.sd_dpl = SEL_UPL;
192 desc.sd_hilimit = ((sv->sv_usrstack >> 12) - 1) >> 16;
196 copyout(&desc, (caddr_t) ldt + 8*LUCODE_SEL, sizeof(desc));
197 desc.sd_type = SDT_MEMRWA;
198 copyout(&desc, (caddr_t) ldt + 8*LUDATA_SEL, sizeof(desc));
200 codeseg = 0 /* base */
201 + (((sv->sv_usrstack >> 12) - 1) << 32) /* limit */
202 + ((long)SDT_MEMERA << 52)
203 + ((long)SEL_UPL << 57)
204 + (1L << 59) /* present */
205 + (1L << 62) /* 32 bits */
206 + (1L << 63); /* page granularity */
207 dataseg = 0 /* base */
208 + (((sv->sv_usrstack >> 12) - 1) << 32) /* limit */
209 + ((long)SDT_MEMRWA << 52)
210 + ((long)SEL_UPL << 57)
211 + (1L << 59) /* present */
212 + (1L << 62) /* 32 bits */
213 + (1L << 63); /* page granularity */
215 tf->tf_scratch.csd = codeseg;
216 tf->tf_scratch.ssd = dataseg;
217 tf->tf_scratch.gr24 = dataseg; /* ESD */
218 tf->tf_scratch.gr27 = dataseg; /* DSD */
219 tf->tf_scratch.gr28 = dataseg; /* FSD */
220 tf->tf_scratch.gr29 = dataseg; /* GSD */
222 gdtseg = gdt /* base */
223 + ((8L*NGDT - 1) << 32) /* limit */
224 + ((long)SDT_SYSNULL << 52)
225 + ((long)SEL_UPL << 57)
226 + (1L << 59) /* present */
227 + (0L << 62) /* 16 bits */
228 + (0L << 63); /* byte granularity */
229 ldtseg = ldt /* base */
230 + ((8L*NLDT - 1) << 32) /* limit */
231 + ((long)SDT_SYSLDT << 52)
232 + ((long)SEL_UPL << 57)
233 + (1L << 59) /* present */
234 + (0L << 62) /* 16 bits */
235 + (0L << 63); /* byte granularity */
237 tf->tf_scratch.gr30 = ldtseg; /* LDTD */
238 tf->tf_scratch.gr31 = gdtseg; /* GDTD */
240 /* Set ia32 control registers on this processor. */
241 ia64_set_cflg(CR0_PE | CR0_PG | ((long)(CR4_XMM | CR4_FXSR) << 32));
242 ia64_set_eflag(PSL_USER);
244 /* PS_STRINGS value for BSD/OS binaries. It is 0 for non-BSD/OS. */
245 tf->tf_scratch.gr11 = td->td_proc->p_sysent->sv_psstrings;
248 * XXX - Linux emulator
249 * Make sure sure edx is 0x0 on entry. Linux binaries depend
252 td->td_retval[1] = 0;
256 ia32_restorectx(struct pcb *pcb)
259 ia64_set_cflg(pcb->pcb_ia32_cflg);
260 ia64_set_eflag(pcb->pcb_ia32_eflag);
261 ia64_set_fcr(pcb->pcb_ia32_fcr);
262 ia64_set_fdr(pcb->pcb_ia32_fdr);
263 ia64_set_fir(pcb->pcb_ia32_fir);
264 ia64_set_fsr(pcb->pcb_ia32_fsr);
268 ia32_savectx(struct pcb *pcb)
271 pcb->pcb_ia32_cflg = ia64_get_cflg();
272 pcb->pcb_ia32_eflag = ia64_get_eflag();
273 pcb->pcb_ia32_fcr = ia64_get_fcr();
274 pcb->pcb_ia32_fdr = ia64_get_fdr();
275 pcb->pcb_ia32_fir = ia64_get_fir();
276 pcb->pcb_ia32_fsr = ia64_get_fsr();
280 freebsd32_getcontext(struct thread *td, struct freebsd32_getcontext_args *uap)
283 return (nosys(td, NULL));
287 freebsd32_setcontext(struct thread *td, struct freebsd32_setcontext_args *uap)
290 return (nosys(td, NULL));
294 freebsd32_swapcontext(struct thread *td, struct freebsd32_swapcontext_args *uap)
297 return (nosys(td, NULL));