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
32 #define __ELF_WORD_SIZE 32
33
34 #include <sys/param.h>
35 #include <sys/exec.h>
36 #include <sys/fcntl.h>
37 #include <sys/imgact.h>
38 #include <sys/kernel.h>
39 #include <sys/lock.h>
40 #include <sys/malloc.h>
41 #include <sys/mutex.h>
42 #include <sys/mman.h>
43 #include <sys/namei.h>
44 #include <sys/pioctl.h>
45 #include <sys/proc.h>
46 #include <sys/procfs.h>
47 #include <sys/resourcevar.h>
48 #include <sys/systm.h>
49 #include <sys/signalvar.h>
50 #include <sys/stat.h>
51 #include <sys/sx.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>
58
59 #include <machine/frame.h>
60 #include <machine/md_var.h>
61 #include <machine/pcb.h>
62
63 #include <vm/vm.h>
64 #include <vm/vm_kern.h>
65 #include <vm/vm_param.h>
66 #include <vm/pmap.h>
67 #include <vm/vm_map.h>
68 #include <vm/vm_object.h>
69 #include <vm/vm_extern.h>
70
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 <i386/include/psl.h>
76 #include <i386/include/segments.h>
77 #include <i386/include/specialreg.h>
78
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
84 x) */
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 */
91 0
92 };
93 int sz_ia32_sigcode = sizeof(ia32_sigcode);
94
95 /*
96 * Signal sending has not been implemented on ia64. This causes
97 * the sigtramp code to not understand the arguments and the application
98 * will generally crash if it tries to handle a signal. Calling
99 * sendsig() means that at least untrapped signals will work.
100 */
101 void
102 ia32_sendsig(sig_t catcher, ksiginfo_t *ksi, sigset_t *mask)
103 {
104 sendsig(catcher, ksi, mask);
105 }
106
107 #ifdef COMPAT_FREEBSD4
108 int
109 freebsd4_freebsd32_sigreturn(struct thread *td, struct freebsd4_freebsd32_sigreturn_args *uap)
110 {
111 return (sigreturn(td, (struct sigreturn_args *)uap));
112 }
113 #endif
114
115 int
116 freebsd32_sigreturn(struct thread *td, struct freebsd32_sigreturn_args *uap)
117 {
118 return (sigreturn(td, (struct sigreturn_args *)uap));
119 }
120
121
122 void
123 ia32_setregs(struct thread *td, u_long entry, u_long stack, u_long ps_strings)
124 {
125 struct trapframe *tf = td->td_frame;
126 vm_offset_t gdt, ldt;
127 u_int64_t codesel, datasel, ldtsel;
128 u_int64_t codeseg, dataseg, gdtseg, ldtseg;
129 struct segment_descriptor desc;
130 struct vmspace *vmspace = td->td_proc->p_vmspace;
131 struct sysentvec *sv;
132
133 sv = td->td_proc->p_sysent;
134 exec_setregs(td, entry, stack, ps_strings);
135
136 /* Non-syscall frames are cleared by exec_setregs() */
137 if (tf->tf_flags & FRAME_SYSCALL) {
138 bzero(&tf->tf_scratch, sizeof(tf->tf_scratch));
139 bzero(&tf->tf_scratch_fp, sizeof(tf->tf_scratch_fp));
140 } else
141 tf->tf_special.ndirty = 0;
142
143 tf->tf_special.psr |= IA64_PSR_IS;
144 tf->tf_special.sp = stack;
145
146 /* Point the RSE backstore to something harmless. */
147 tf->tf_special.bspstore = (sv->sv_psstrings - sz_ia32_sigcode -
148 SPARE_USRSPACE + 15) & ~15;
149
150 codesel = LSEL(LUCODE_SEL, SEL_UPL);
151 datasel = LSEL(LUDATA_SEL, SEL_UPL);
152 ldtsel = GSEL(GLDT_SEL, SEL_UPL);
153
154 /* Setup ia32 segment registers. */
155 tf->tf_scratch.gr16 = (datasel << 48) | (datasel << 32) |
156 (datasel << 16) | datasel;
157 tf->tf_scratch.gr17 = (ldtsel << 32) | (datasel << 16) | codesel;
158
159 /*
160 * Build the GDT and LDT.
161 */
162 gdt = sv->sv_usrstack;
163 vm_map_find(&vmspace->vm_map, 0, 0, &gdt, IA32_PAGE_SIZE << 1, 0,
164 VM_PROT_ALL, VM_PROT_ALL, 0);
165 ldt = gdt + IA32_PAGE_SIZE;
166
167 desc.sd_lolimit = 8*NLDT-1;
168 desc.sd_lobase = ldt & 0xffffff;
169 desc.sd_type = SDT_SYSLDT;
170 desc.sd_dpl = SEL_UPL;
171 desc.sd_p = 1;
172 desc.sd_hilimit = 0;
173 desc.sd_def32 = 0;
174 desc.sd_gran = 0;
175 desc.sd_hibase = ldt >> 24;
176 copyout(&desc, (caddr_t) gdt + 8*GLDT_SEL, sizeof(desc));
177
178 desc.sd_lolimit = ((sv->sv_usrstack >> 12) - 1) & 0xffff;
179 desc.sd_lobase = 0;
180 desc.sd_type = SDT_MEMERA;
181 desc.sd_dpl = SEL_UPL;
182 desc.sd_p = 1;
183 desc.sd_hilimit = ((sv->sv_usrstack >> 12) - 1) >> 16;
184 desc.sd_def32 = 1;
185 desc.sd_gran = 1;
186 desc.sd_hibase = 0;
187 copyout(&desc, (caddr_t) ldt + 8*LUCODE_SEL, sizeof(desc));
188 desc.sd_type = SDT_MEMRWA;
189 copyout(&desc, (caddr_t) ldt + 8*LUDATA_SEL, sizeof(desc));
190
191 codeseg = 0 /* base */
192 + (((sv->sv_usrstack >> 12) - 1) << 32) /* limit */
193 + ((long)SDT_MEMERA << 52)
194 + ((long)SEL_UPL << 57)
195 + (1L << 59) /* present */
196 + (1L << 62) /* 32 bits */
197 + (1L << 63); /* page granularity */
198 dataseg = 0 /* base */
199 + (((sv->sv_usrstack >> 12) - 1) << 32) /* limit */
200 + ((long)SDT_MEMRWA << 52)
201 + ((long)SEL_UPL << 57)
202 + (1L << 59) /* present */
203 + (1L << 62) /* 32 bits */
204 + (1L << 63); /* page granularity */
205
206 tf->tf_scratch.csd = codeseg;
207 tf->tf_scratch.ssd = dataseg;
208 tf->tf_scratch.gr24 = dataseg; /* ESD */
209 tf->tf_scratch.gr27 = dataseg; /* DSD */
210 tf->tf_scratch.gr28 = dataseg; /* FSD */
211 tf->tf_scratch.gr29 = dataseg; /* GSD */
212
213 gdtseg = gdt /* base */
214 + ((8L*NGDT - 1) << 32) /* limit */
215 + ((long)SDT_SYSNULL << 52)
216 + ((long)SEL_UPL << 57)
217 + (1L << 59) /* present */
218 + (0L << 62) /* 16 bits */
219 + (0L << 63); /* byte granularity */
220 ldtseg = ldt /* base */
221 + ((8L*NLDT - 1) << 32) /* limit */
222 + ((long)SDT_SYSLDT << 52)
223 + ((long)SEL_UPL << 57)
224 + (1L << 59) /* present */
225 + (0L << 62) /* 16 bits */
226 + (0L << 63); /* byte granularity */
227
228 tf->tf_scratch.gr30 = ldtseg; /* LDTD */
229 tf->tf_scratch.gr31 = gdtseg; /* GDTD */
230
231 /* Set ia32 control registers on this processor. */
232 ia64_set_cflg(CR0_PE | CR0_PG | ((long)(CR4_XMM | CR4_FXSR) << 32));
233 ia64_set_eflag(PSL_USER);
234
235 /* PS_STRINGS value for BSD/OS binaries. It is 0 for non-BSD/OS. */
236 tf->tf_scratch.gr11 = td->td_proc->p_sysent->sv_psstrings;
237
238 /*
239 * XXX - Linux emulator
240 * Make sure sure edx is 0x0 on entry. Linux binaries depend
241 * on it.
242 */
243 td->td_retval[1] = 0;
244 }
245
246 void
247 ia32_restorectx(struct pcb *pcb)
248 {
249
250 ia64_set_cflg(pcb->pcb_ia32_cflg);
251 ia64_set_eflag(pcb->pcb_ia32_eflag);
252 ia64_set_fcr(pcb->pcb_ia32_fcr);
253 ia64_set_fdr(pcb->pcb_ia32_fdr);
254 ia64_set_fir(pcb->pcb_ia32_fir);
255 ia64_set_fsr(pcb->pcb_ia32_fsr);
256 }
257
258 void
259 ia32_savectx(struct pcb *pcb)
260 {
261
262 pcb->pcb_ia32_cflg = ia64_get_cflg();
263 pcb->pcb_ia32_eflag = ia64_get_eflag();
264 pcb->pcb_ia32_fcr = ia64_get_fcr();
265 pcb->pcb_ia32_fdr = ia64_get_fdr();
266 pcb->pcb_ia32_fir = ia64_get_fir();
267 pcb->pcb_ia32_fsr = ia64_get_fsr();
268 }
269
270 int
271 freebsd32_getcontext(struct thread *td, struct freebsd32_getcontext_args *uap)
272 {
273
274 return (nosys(td, NULL));
275 }
276
277 int
278 freebsd32_setcontext(struct thread *td, struct freebsd32_setcontext_args *uap)
279 {
280
281 return (nosys(td, NULL));
282 }
283
284 int
285 freebsd32_swapcontext(struct thread *td, struct freebsd32_swapcontext_args *uap)
286 {
287
288 return (nosys(td, NULL));
289 }
Cache object: 8944b41ea4117c37926c95e384a6c94c
|