xref: /freebsd/sys/amd64/linux32/linux32_sysvec.c (revision 2a988f7cb58bc0cd8de5da43a30522156ec6c460)
1ea0fabbcSTim J. Robbins /*-
2ea0fabbcSTim J. Robbins  * Copyright (c) 2004 Tim J. Robbins
3ea0fabbcSTim J. Robbins  * Copyright (c) 2003 Peter Wemm
4ea0fabbcSTim J. Robbins  * Copyright (c) 2002 Doug Rabson
5ea0fabbcSTim J. Robbins  * Copyright (c) 1998-1999 Andrew Gallatin
6ea0fabbcSTim J. Robbins  * Copyright (c) 1994-1996 S�ren Schmidt
7ea0fabbcSTim J. Robbins  * All rights reserved.
8ea0fabbcSTim J. Robbins  *
9ea0fabbcSTim J. Robbins  * Redistribution and use in source and binary forms, with or without
10ea0fabbcSTim J. Robbins  * modification, are permitted provided that the following conditions
11ea0fabbcSTim J. Robbins  * are met:
12ea0fabbcSTim J. Robbins  * 1. Redistributions of source code must retain the above copyright
13ea0fabbcSTim J. Robbins  *    notice, this list of conditions and the following disclaimer
14ea0fabbcSTim J. Robbins  *    in this position and unchanged.
15ea0fabbcSTim J. Robbins  * 2. Redistributions in binary form must reproduce the above copyright
16ea0fabbcSTim J. Robbins  *    notice, this list of conditions and the following disclaimer in the
17ea0fabbcSTim J. Robbins  *    documentation and/or other materials provided with the distribution.
18ea0fabbcSTim J. Robbins  * 3. The name of the author may not be used to endorse or promote products
19ea0fabbcSTim J. Robbins  *    derived from this software without specific prior written permission
20ea0fabbcSTim J. Robbins  *
21ea0fabbcSTim J. Robbins  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22ea0fabbcSTim J. Robbins  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23ea0fabbcSTim J. Robbins  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24ea0fabbcSTim J. Robbins  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25ea0fabbcSTim J. Robbins  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26ea0fabbcSTim J. Robbins  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27ea0fabbcSTim J. Robbins  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28ea0fabbcSTim J. Robbins  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29ea0fabbcSTim J. Robbins  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30ea0fabbcSTim J. Robbins  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31ea0fabbcSTim J. Robbins  */
32ea0fabbcSTim J. Robbins 
33ea0fabbcSTim J. Robbins #include <sys/cdefs.h>
34ea0fabbcSTim J. Robbins __FBSDID("$FreeBSD$");
35ea0fabbcSTim J. Robbins 
36ea0fabbcSTim J. Robbins /* XXX we use functions that might not exist. */
37ea0fabbcSTim J. Robbins #include "opt_compat.h"
38ea0fabbcSTim J. Robbins 
39ea0fabbcSTim J. Robbins #ifndef COMPAT_43
40ea0fabbcSTim J. Robbins #error "Unable to compile Linux-emulator due to missing COMPAT_43 option!"
41ea0fabbcSTim J. Robbins #endif
42c680f6b1SDavid E. O'Brien #ifndef COMPAT_IA32
43ce55a234SDavid E. O'Brien #error "Unable to compile Linux-emulator due to missing COMPAT_IA32 option!"
44ea0fabbcSTim J. Robbins #endif
45ea0fabbcSTim J. Robbins 
46ea0fabbcSTim J. Robbins #define	__ELF_WORD_SIZE	32
47ea0fabbcSTim J. Robbins 
48ea0fabbcSTim J. Robbins #include <sys/param.h>
49ea0fabbcSTim J. Robbins #include <sys/systm.h>
50ea0fabbcSTim J. Robbins #include <sys/exec.h>
51ea0fabbcSTim J. Robbins #include <sys/imgact.h>
52ea0fabbcSTim J. Robbins #include <sys/imgact_elf.h>
53ea0fabbcSTim J. Robbins #include <sys/kernel.h>
54ea0fabbcSTim J. Robbins #include <sys/lock.h>
55ea0fabbcSTim J. Robbins #include <sys/malloc.h>
56ea0fabbcSTim J. Robbins #include <sys/module.h>
57ea0fabbcSTim J. Robbins #include <sys/mutex.h>
58ea0fabbcSTim J. Robbins #include <sys/proc.h>
596004362eSDavid Schultz #include <sys/resourcevar.h>
60ea0fabbcSTim J. Robbins #include <sys/signalvar.h>
61ea0fabbcSTim J. Robbins #include <sys/sysctl.h>
62ea0fabbcSTim J. Robbins #include <sys/syscallsubr.h>
63ea0fabbcSTim J. Robbins #include <sys/sysent.h>
64ea0fabbcSTim J. Robbins #include <sys/sysproto.h>
65ea0fabbcSTim J. Robbins #include <sys/vnode.h>
66ea0fabbcSTim J. Robbins 
67ea0fabbcSTim J. Robbins #include <vm/vm.h>
68ea0fabbcSTim J. Robbins #include <vm/pmap.h>
69ea0fabbcSTim J. Robbins #include <vm/vm_extern.h>
70ea0fabbcSTim J. Robbins #include <vm/vm_map.h>
71ea0fabbcSTim J. Robbins #include <vm/vm_object.h>
72ea0fabbcSTim J. Robbins #include <vm/vm_page.h>
73ea0fabbcSTim J. Robbins #include <vm/vm_param.h>
74ea0fabbcSTim J. Robbins 
75ea0fabbcSTim J. Robbins #include <machine/cpu.h>
76ea0fabbcSTim J. Robbins #include <machine/md_var.h>
776004362eSDavid Schultz #include <machine/pcb.h>
78ea0fabbcSTim J. Robbins #include <machine/specialreg.h>
79ea0fabbcSTim J. Robbins 
80ea0fabbcSTim J. Robbins #include <amd64/linux32/linux.h>
81ea0fabbcSTim J. Robbins #include <amd64/linux32/linux32_proto.h>
82ea0fabbcSTim J. Robbins #include <compat/linux/linux_mib.h>
83ea0fabbcSTim J. Robbins #include <compat/linux/linux_signal.h>
84ea0fabbcSTim J. Robbins #include <compat/linux/linux_util.h>
85ea0fabbcSTim J. Robbins 
86ea0fabbcSTim J. Robbins MODULE_VERSION(linux, 1);
87ea0fabbcSTim J. Robbins 
88ea0fabbcSTim J. Robbins MALLOC_DEFINE(M_LINUX, "linux", "Linux mode structures");
89ea0fabbcSTim J. Robbins 
90ea0fabbcSTim J. Robbins #define	AUXARGS_ENTRY_32(pos, id, val)	\
91ea0fabbcSTim J. Robbins 	do {				\
92ea0fabbcSTim J. Robbins 		suword32(pos++, id);	\
93ea0fabbcSTim J. Robbins 		suword32(pos++, val);	\
94ea0fabbcSTim J. Robbins 	} while (0)
95ea0fabbcSTim J. Robbins 
96ea0fabbcSTim J. Robbins #if BYTE_ORDER == LITTLE_ENDIAN
97ea0fabbcSTim J. Robbins #define SHELLMAGIC      0x2123 /* #! */
98ea0fabbcSTim J. Robbins #else
99ea0fabbcSTim J. Robbins #define SHELLMAGIC      0x2321
100ea0fabbcSTim J. Robbins #endif
101ea0fabbcSTim J. Robbins 
102ea0fabbcSTim J. Robbins /*
103ea0fabbcSTim J. Robbins  * Allow the sendsig functions to use the ldebug() facility
104ea0fabbcSTim J. Robbins  * even though they are not syscalls themselves. Map them
105ea0fabbcSTim J. Robbins  * to syscall 0. This is slightly less bogus than using
106ea0fabbcSTim J. Robbins  * ldebug(sigreturn).
107ea0fabbcSTim J. Robbins  */
108ea0fabbcSTim J. Robbins #define	LINUX_SYS_linux_rt_sendsig	0
109ea0fabbcSTim J. Robbins #define	LINUX_SYS_linux_sendsig		0
110ea0fabbcSTim J. Robbins 
111ea0fabbcSTim J. Robbins extern char linux_sigcode[];
112ea0fabbcSTim J. Robbins extern int linux_szsigcode;
113ea0fabbcSTim J. Robbins 
114ea0fabbcSTim J. Robbins extern struct sysent linux_sysent[LINUX_SYS_MAXSYSCALL];
115ea0fabbcSTim J. Robbins 
116ea0fabbcSTim J. Robbins SET_DECLARE(linux_ioctl_handler_set, struct linux_ioctl_handler);
117ea0fabbcSTim J. Robbins 
118ea0fabbcSTim J. Robbins static int	elf_linux_fixup(register_t **stack_base,
119ea0fabbcSTim J. Robbins 		    struct image_params *iparams);
120ea0fabbcSTim J. Robbins static register_t *linux_copyout_strings(struct image_params *imgp);
121ea0fabbcSTim J. Robbins static void	linux_prepsyscall(struct trapframe *tf, int *args, u_int *code,
122ea0fabbcSTim J. Robbins 		    caddr_t *params);
123ea0fabbcSTim J. Robbins static void     linux_sendsig(sig_t catcher, int sig, sigset_t *mask,
124ea0fabbcSTim J. Robbins 		    u_long code);
125ea0fabbcSTim J. Robbins static void	exec_linux_setregs(struct thread *td, u_long entry,
126ea0fabbcSTim J. Robbins 				   u_long stack, u_long ps_strings);
127ea0fabbcSTim J. Robbins static void	linux32_fixlimits(struct image_params *imgp);
128ea0fabbcSTim J. Robbins 
129ea0fabbcSTim J. Robbins /*
130ea0fabbcSTim J. Robbins  * Linux syscalls return negative errno's, we do positive and map them
131ea0fabbcSTim J. Robbins  */
132ea0fabbcSTim J. Robbins static int bsd_to_linux_errno[ELAST + 1] = {
133ea0fabbcSTim J. Robbins 	-0,  -1,  -2,  -3,  -4,  -5,  -6,  -7,  -8,  -9,
134ea0fabbcSTim J. Robbins 	-10, -35, -12, -13, -14, -15, -16, -17, -18, -19,
135ea0fabbcSTim J. Robbins 	-20, -21, -22, -23, -24, -25, -26, -27, -28, -29,
136ea0fabbcSTim J. Robbins 	-30, -31, -32, -33, -34, -11,-115,-114, -88, -89,
137ea0fabbcSTim J. Robbins 	-90, -91, -92, -93, -94, -95, -96, -97, -98, -99,
138ea0fabbcSTim J. Robbins 	-100,-101,-102,-103,-104,-105,-106,-107,-108,-109,
139ea0fabbcSTim J. Robbins 	-110,-111, -40, -36,-112,-113, -39, -11, -87,-122,
140ea0fabbcSTim J. Robbins 	-116, -66,  -6,  -6,  -6,  -6,  -6, -37, -38,  -9,
141ea0fabbcSTim J. Robbins 	-6, -6, -43, -42, -75, -6, -84
142ea0fabbcSTim J. Robbins };
143ea0fabbcSTim J. Robbins 
144ea0fabbcSTim J. Robbins int bsd_to_linux_signal[LINUX_SIGTBLSZ] = {
145ea0fabbcSTim J. Robbins 	LINUX_SIGHUP, LINUX_SIGINT, LINUX_SIGQUIT, LINUX_SIGILL,
146ea0fabbcSTim J. Robbins 	LINUX_SIGTRAP, LINUX_SIGABRT, 0, LINUX_SIGFPE,
147ea0fabbcSTim J. Robbins 	LINUX_SIGKILL, LINUX_SIGBUS, LINUX_SIGSEGV, LINUX_SIGSYS,
148ea0fabbcSTim J. Robbins 	LINUX_SIGPIPE, LINUX_SIGALRM, LINUX_SIGTERM, LINUX_SIGURG,
149ea0fabbcSTim J. Robbins 	LINUX_SIGSTOP, LINUX_SIGTSTP, LINUX_SIGCONT, LINUX_SIGCHLD,
150ea0fabbcSTim J. Robbins 	LINUX_SIGTTIN, LINUX_SIGTTOU, LINUX_SIGIO, LINUX_SIGXCPU,
151ea0fabbcSTim J. Robbins 	LINUX_SIGXFSZ, LINUX_SIGVTALRM, LINUX_SIGPROF, LINUX_SIGWINCH,
152ea0fabbcSTim J. Robbins 	0, LINUX_SIGUSR1, LINUX_SIGUSR2
153ea0fabbcSTim J. Robbins };
154ea0fabbcSTim J. Robbins 
155ea0fabbcSTim J. Robbins int linux_to_bsd_signal[LINUX_SIGTBLSZ] = {
156ea0fabbcSTim J. Robbins 	SIGHUP, SIGINT, SIGQUIT, SIGILL,
157ea0fabbcSTim J. Robbins 	SIGTRAP, SIGABRT, SIGBUS, SIGFPE,
158ea0fabbcSTim J. Robbins 	SIGKILL, SIGUSR1, SIGSEGV, SIGUSR2,
159ea0fabbcSTim J. Robbins 	SIGPIPE, SIGALRM, SIGTERM, SIGBUS,
160ea0fabbcSTim J. Robbins 	SIGCHLD, SIGCONT, SIGSTOP, SIGTSTP,
161ea0fabbcSTim J. Robbins 	SIGTTIN, SIGTTOU, SIGURG, SIGXCPU,
162ea0fabbcSTim J. Robbins 	SIGXFSZ, SIGVTALRM, SIGPROF, SIGWINCH,
163ea0fabbcSTim J. Robbins 	SIGIO, SIGURG, SIGSYS
164ea0fabbcSTim J. Robbins };
165ea0fabbcSTim J. Robbins 
166ea0fabbcSTim J. Robbins #define LINUX_T_UNKNOWN  255
167ea0fabbcSTim J. Robbins static int _bsd_to_linux_trapcode[] = {
168ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 0 */
169ea0fabbcSTim J. Robbins 	6,			/* 1  T_PRIVINFLT */
170ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 2 */
171ea0fabbcSTim J. Robbins 	3,			/* 3  T_BPTFLT */
172ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 4 */
173ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 5 */
174ea0fabbcSTim J. Robbins 	16,			/* 6  T_ARITHTRAP */
175ea0fabbcSTim J. Robbins 	254,			/* 7  T_ASTFLT */
176ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 8 */
177ea0fabbcSTim J. Robbins 	13,			/* 9  T_PROTFLT */
178ea0fabbcSTim J. Robbins 	1,			/* 10 T_TRCTRAP */
179ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 11 */
180ea0fabbcSTim J. Robbins 	14,			/* 12 T_PAGEFLT */
181ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 13 */
182ea0fabbcSTim J. Robbins 	17,			/* 14 T_ALIGNFLT */
183ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 15 */
184ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 16 */
185ea0fabbcSTim J. Robbins 	LINUX_T_UNKNOWN,	/* 17 */
186ea0fabbcSTim J. Robbins 	0,			/* 18 T_DIVIDE */
187ea0fabbcSTim J. Robbins 	2,			/* 19 T_NMI */
188ea0fabbcSTim J. Robbins 	4,			/* 20 T_OFLOW */
189ea0fabbcSTim J. Robbins 	5,			/* 21 T_BOUND */
190ea0fabbcSTim J. Robbins 	7,			/* 22 T_DNA */
191ea0fabbcSTim J. Robbins 	8,			/* 23 T_DOUBLEFLT */
192ea0fabbcSTim J. Robbins 	9,			/* 24 T_FPOPFLT */
193ea0fabbcSTim J. Robbins 	10,			/* 25 T_TSSFLT */
194ea0fabbcSTim J. Robbins 	11,			/* 26 T_SEGNPFLT */
195ea0fabbcSTim J. Robbins 	12,			/* 27 T_STKFLT */
196ea0fabbcSTim J. Robbins 	18,			/* 28 T_MCHK */
197ea0fabbcSTim J. Robbins 	19,			/* 29 T_XMMFLT */
198ea0fabbcSTim J. Robbins 	15			/* 30 T_RESERVED */
199ea0fabbcSTim J. Robbins };
200ea0fabbcSTim J. Robbins #define bsd_to_linux_trapcode(code) \
201ea0fabbcSTim J. Robbins     ((code)<sizeof(_bsd_to_linux_trapcode)/sizeof(*_bsd_to_linux_trapcode)? \
202ea0fabbcSTim J. Robbins      _bsd_to_linux_trapcode[(code)]: \
203ea0fabbcSTim J. Robbins      LINUX_T_UNKNOWN)
204ea0fabbcSTim J. Robbins 
205ea0fabbcSTim J. Robbins struct linux32_ps_strings {
206ea0fabbcSTim J. Robbins 	u_int32_t ps_argvstr;	/* first of 0 or more argument strings */
207f2c7668eSDavid Schultz 	u_int ps_nargvstr;	/* the number of argument strings */
208ea0fabbcSTim J. Robbins 	u_int32_t ps_envstr;	/* first of 0 or more environment strings */
209f2c7668eSDavid Schultz 	u_int ps_nenvstr;	/* the number of environment strings */
210ea0fabbcSTim J. Robbins };
211ea0fabbcSTim J. Robbins 
212ea0fabbcSTim J. Robbins /*
213ea0fabbcSTim J. Robbins  * If FreeBSD & Linux have a difference of opinion about what a trap
214ea0fabbcSTim J. Robbins  * means, deal with it here.
215ea0fabbcSTim J. Robbins  *
216ea0fabbcSTim J. Robbins  * MPSAFE
217ea0fabbcSTim J. Robbins  */
218ea0fabbcSTim J. Robbins static int
219ea0fabbcSTim J. Robbins translate_traps(int signal, int trap_code)
220ea0fabbcSTim J. Robbins {
221ea0fabbcSTim J. Robbins 	if (signal != SIGBUS)
222ea0fabbcSTim J. Robbins 		return signal;
223ea0fabbcSTim J. Robbins 	switch (trap_code) {
224ea0fabbcSTim J. Robbins 	case T_PROTFLT:
225ea0fabbcSTim J. Robbins 	case T_TSSFLT:
226ea0fabbcSTim J. Robbins 	case T_DOUBLEFLT:
227ea0fabbcSTim J. Robbins 	case T_PAGEFLT:
228ea0fabbcSTim J. Robbins 		return SIGSEGV;
229ea0fabbcSTim J. Robbins 	default:
230ea0fabbcSTim J. Robbins 		return signal;
231ea0fabbcSTim J. Robbins 	}
232ea0fabbcSTim J. Robbins }
233ea0fabbcSTim J. Robbins 
234ea0fabbcSTim J. Robbins static int
235ea0fabbcSTim J. Robbins elf_linux_fixup(register_t **stack_base, struct image_params *imgp)
236ea0fabbcSTim J. Robbins {
237ea0fabbcSTim J. Robbins 	Elf32_Auxargs *args;
238ea0fabbcSTim J. Robbins 	Elf32_Addr *base;
239ea0fabbcSTim J. Robbins 	Elf32_Addr *pos;
240ea0fabbcSTim J. Robbins 
241ea0fabbcSTim J. Robbins 	KASSERT(curthread->td_proc == imgp->proc &&
242ea0fabbcSTim J. Robbins 	    (curthread->td_proc->p_flag & P_SA) == 0,
243ea0fabbcSTim J. Robbins 	    ("unsafe elf_linux_fixup(), should be curproc"));
244ea0fabbcSTim J. Robbins 	base = (Elf32_Addr *)*stack_base;
245ea0fabbcSTim J. Robbins 	args = (Elf32_Auxargs *)imgp->auxargs;
246610ecfe0SMaxim Sobolev 	pos = base + (imgp->args->argc + imgp->args->envc + 2);
247ea0fabbcSTim J. Robbins 
248ea0fabbcSTim J. Robbins 	if (args->trace)
249ea0fabbcSTim J. Robbins 		AUXARGS_ENTRY_32(pos, AT_DEBUG, 1);
250ea0fabbcSTim J. Robbins 	if (args->execfd != -1)
251ea0fabbcSTim J. Robbins 		AUXARGS_ENTRY_32(pos, AT_EXECFD, args->execfd);
252ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_PHDR, args->phdr);
253ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_PHENT, args->phent);
254ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_PHNUM, args->phnum);
255ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_PAGESZ, args->pagesz);
256ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_FLAGS, args->flags);
257ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_ENTRY, args->entry);
258ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_BASE, args->base);
259ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_UID, imgp->proc->p_ucred->cr_ruid);
260ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_EUID, imgp->proc->p_ucred->cr_svuid);
261ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_GID, imgp->proc->p_ucred->cr_rgid);
262ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_EGID, imgp->proc->p_ucred->cr_svgid);
263ea0fabbcSTim J. Robbins 	AUXARGS_ENTRY_32(pos, AT_NULL, 0);
264ea0fabbcSTim J. Robbins 
265ea0fabbcSTim J. Robbins 	free(imgp->auxargs, M_TEMP);
266ea0fabbcSTim J. Robbins 	imgp->auxargs = NULL;
267ea0fabbcSTim J. Robbins 
268ea0fabbcSTim J. Robbins 	base--;
269610ecfe0SMaxim Sobolev 	suword32(base, (uint32_t)imgp->args->argc);
270ea0fabbcSTim J. Robbins 	*stack_base = (register_t *)base;
271ea0fabbcSTim J. Robbins 	return 0;
272ea0fabbcSTim J. Robbins }
273ea0fabbcSTim J. Robbins 
274ea0fabbcSTim J. Robbins extern int _ucodesel, _ucode32sel, _udatasel;
275ea0fabbcSTim J. Robbins extern unsigned long linux_sznonrtsigcode;
276ea0fabbcSTim J. Robbins 
277ea0fabbcSTim J. Robbins static void
278ea0fabbcSTim J. Robbins linux_rt_sendsig(sig_t catcher, int sig, sigset_t *mask, u_long code)
279ea0fabbcSTim J. Robbins {
280ea0fabbcSTim J. Robbins 	struct thread *td = curthread;
281ea0fabbcSTim J. Robbins 	struct proc *p = td->td_proc;
282ea0fabbcSTim J. Robbins 	struct sigacts *psp;
283ea0fabbcSTim J. Robbins 	struct trapframe *regs;
284ea0fabbcSTim J. Robbins 	struct l_rt_sigframe *fp, frame;
285ea0fabbcSTim J. Robbins 	int oonstack;
286ea0fabbcSTim J. Robbins 
287ea0fabbcSTim J. Robbins 	PROC_LOCK_ASSERT(p, MA_OWNED);
288ea0fabbcSTim J. Robbins 	psp = p->p_sigacts;
289ea0fabbcSTim J. Robbins 	mtx_assert(&psp->ps_mtx, MA_OWNED);
290ea0fabbcSTim J. Robbins 	regs = td->td_frame;
291ea0fabbcSTim J. Robbins 	oonstack = sigonstack(regs->tf_rsp);
292ea0fabbcSTim J. Robbins 
293ea0fabbcSTim J. Robbins #ifdef DEBUG
294ea0fabbcSTim J. Robbins 	if (ldebug(rt_sendsig))
295ea0fabbcSTim J. Robbins 		printf(ARGS(rt_sendsig, "%p, %d, %p, %lu"),
296ea0fabbcSTim J. Robbins 		    catcher, sig, (void*)mask, code);
297ea0fabbcSTim J. Robbins #endif
298ea0fabbcSTim J. Robbins 	/*
299ea0fabbcSTim J. Robbins 	 * Allocate space for the signal handler context.
300ea0fabbcSTim J. Robbins 	 */
301ea0fabbcSTim J. Robbins 	if ((td->td_pflags & TDP_ALTSTACK) && !oonstack &&
302ea0fabbcSTim J. Robbins 	    SIGISMEMBER(psp->ps_sigonstack, sig)) {
303ea0fabbcSTim J. Robbins 		fp = (struct l_rt_sigframe *)(td->td_sigstk.ss_sp +
304ea0fabbcSTim J. Robbins 		    td->td_sigstk.ss_size - sizeof(struct l_rt_sigframe));
305ea0fabbcSTim J. Robbins 	} else
306ea0fabbcSTim J. Robbins 		fp = (struct l_rt_sigframe *)regs->tf_rsp - 1;
307ea0fabbcSTim J. Robbins 	mtx_unlock(&psp->ps_mtx);
308ea0fabbcSTim J. Robbins 
309ea0fabbcSTim J. Robbins 	/*
310ea0fabbcSTim J. Robbins 	 * Build the argument list for the signal handler.
311ea0fabbcSTim J. Robbins 	 */
312ea0fabbcSTim J. Robbins 	if (p->p_sysent->sv_sigtbl)
313ea0fabbcSTim J. Robbins 		if (sig <= p->p_sysent->sv_sigsize)
314ea0fabbcSTim J. Robbins 			sig = p->p_sysent->sv_sigtbl[_SIG_IDX(sig)];
315ea0fabbcSTim J. Robbins 
316ea0fabbcSTim J. Robbins 	bzero(&frame, sizeof(frame));
317ea0fabbcSTim J. Robbins 
318ea0fabbcSTim J. Robbins 	frame.sf_handler = PTROUT(catcher);
319ea0fabbcSTim J. Robbins 	frame.sf_sig = sig;
320ea0fabbcSTim J. Robbins 	frame.sf_siginfo = PTROUT(&fp->sf_si);
321ea0fabbcSTim J. Robbins 	frame.sf_ucontext = PTROUT(&fp->sf_sc);
322ea0fabbcSTim J. Robbins 
323ea0fabbcSTim J. Robbins 	/* Fill in POSIX parts */
324ea0fabbcSTim J. Robbins 	frame.sf_si.lsi_signo = sig;
325ea0fabbcSTim J. Robbins 	frame.sf_si.lsi_code = code;
326ea0fabbcSTim J. Robbins 	frame.sf_si.lsi_addr = PTROUT(regs->tf_err);
327ea0fabbcSTim J. Robbins 
328ea0fabbcSTim J. Robbins 	/*
329ea0fabbcSTim J. Robbins 	 * Build the signal context to be used by sigreturn.
330ea0fabbcSTim J. Robbins 	 */
331ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_flags = 0;		/* XXX ??? */
332ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_link = 0;		/* XXX ??? */
333ea0fabbcSTim J. Robbins 
334ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_stack.ss_sp = PTROUT(td->td_sigstk.ss_sp);
335ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_stack.ss_size = td->td_sigstk.ss_size;
336ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_stack.ss_flags = (td->td_pflags & TDP_ALTSTACK)
337ea0fabbcSTim J. Robbins 	    ? ((oonstack) ? LINUX_SS_ONSTACK : 0) : LINUX_SS_DISABLE;
338ea0fabbcSTim J. Robbins 	PROC_UNLOCK(p);
339ea0fabbcSTim J. Robbins 
340ea0fabbcSTim J. Robbins 	bsd_to_linux_sigset(mask, &frame.sf_sc.uc_sigmask);
341ea0fabbcSTim J. Robbins 
342ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_mask   = frame.sf_sc.uc_sigmask.__bits[0];
343ea0fabbcSTim J. Robbins         frame.sf_sc.uc_mcontext.sc_gs     = rgs();
344ea0fabbcSTim J. Robbins         frame.sf_sc.uc_mcontext.sc_fs     = rfs();
345ea0fabbcSTim J. Robbins         __asm __volatile("movl %%es,%0" :
346ea0fabbcSTim J. Robbins 	    "=rm" (frame.sf_sc.uc_mcontext.sc_es));
347ea0fabbcSTim J. Robbins         __asm __volatile("movl %%ds,%0" :
348ea0fabbcSTim J. Robbins 	    "=rm" (frame.sf_sc.uc_mcontext.sc_ds));
349ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_edi    = regs->tf_rdi;
350ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_esi    = regs->tf_rsi;
351ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_ebp    = regs->tf_rbp;
352ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_ebx    = regs->tf_rbx;
353ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_edx    = regs->tf_rdx;
354ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_ecx    = regs->tf_rcx;
355ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_eax    = regs->tf_rax;
356ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_eip    = regs->tf_rip;
357ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_cs     = regs->tf_cs;
358ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_eflags = regs->tf_rflags;
359ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_esp_at_signal = regs->tf_rsp;
360ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_ss     = regs->tf_ss;
361ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_err    = regs->tf_err;
362ea0fabbcSTim J. Robbins 	frame.sf_sc.uc_mcontext.sc_trapno = bsd_to_linux_trapcode(code);
363ea0fabbcSTim J. Robbins 
364ea0fabbcSTim J. Robbins #ifdef DEBUG
365ea0fabbcSTim J. Robbins 	if (ldebug(rt_sendsig))
366c680f6b1SDavid E. O'Brien 		printf(LMSG("rt_sendsig flags: 0x%x, sp: %p, ss: 0x%lx, mask: 0x%x"),
367ea0fabbcSTim J. Robbins 		    frame.sf_sc.uc_stack.ss_flags, td->td_sigstk.ss_sp,
368ea0fabbcSTim J. Robbins 		    td->td_sigstk.ss_size, frame.sf_sc.uc_mcontext.sc_mask);
369ea0fabbcSTim J. Robbins #endif
370ea0fabbcSTim J. Robbins 
371ea0fabbcSTim J. Robbins 	if (copyout(&frame, fp, sizeof(frame)) != 0) {
372ea0fabbcSTim J. Robbins 		/*
373ea0fabbcSTim J. Robbins 		 * Process has trashed its stack; give it an illegal
374ea0fabbcSTim J. Robbins 		 * instruction to halt it in its tracks.
375ea0fabbcSTim J. Robbins 		 */
376ea0fabbcSTim J. Robbins #ifdef DEBUG
377ea0fabbcSTim J. Robbins 		if (ldebug(rt_sendsig))
378ea0fabbcSTim J. Robbins 			printf(LMSG("rt_sendsig: bad stack %p, oonstack=%x"),
379ea0fabbcSTim J. Robbins 			    fp, oonstack);
380ea0fabbcSTim J. Robbins #endif
381ea0fabbcSTim J. Robbins 		PROC_LOCK(p);
382ea0fabbcSTim J. Robbins 		sigexit(td, SIGILL);
383ea0fabbcSTim J. Robbins 	}
384ea0fabbcSTim J. Robbins 
385ea0fabbcSTim J. Robbins 	/*
386ea0fabbcSTim J. Robbins 	 * Build context to run handler in.
387ea0fabbcSTim J. Robbins 	 */
388ea0fabbcSTim J. Robbins 	regs->tf_rsp = PTROUT(fp);
389ea0fabbcSTim J. Robbins 	regs->tf_rip = LINUX32_PS_STRINGS - *(p->p_sysent->sv_szsigcode) +
390ea0fabbcSTim J. Robbins 	    linux_sznonrtsigcode;
391ea0fabbcSTim J. Robbins 	regs->tf_rflags &= ~PSL_T;
392ea0fabbcSTim J. Robbins 	regs->tf_cs = _ucode32sel;
393ea0fabbcSTim J. Robbins 	regs->tf_ss = _udatasel;
394ea0fabbcSTim J. Robbins 	load_ds(_udatasel);
395ea0fabbcSTim J. Robbins 	td->td_pcb->pcb_ds = _udatasel;
396ea0fabbcSTim J. Robbins 	load_es(_udatasel);
397ea0fabbcSTim J. Robbins 	td->td_pcb->pcb_es = _udatasel;
398ea0fabbcSTim J. Robbins 	PROC_LOCK(p);
399ea0fabbcSTim J. Robbins 	mtx_lock(&psp->ps_mtx);
400ea0fabbcSTim J. Robbins }
401ea0fabbcSTim J. Robbins 
402ea0fabbcSTim J. Robbins 
403ea0fabbcSTim J. Robbins /*
404ea0fabbcSTim J. Robbins  * Send an interrupt to process.
405ea0fabbcSTim J. Robbins  *
406ea0fabbcSTim J. Robbins  * Stack is set up to allow sigcode stored
407ea0fabbcSTim J. Robbins  * in u. to call routine, followed by kcall
408ea0fabbcSTim J. Robbins  * to sigreturn routine below.  After sigreturn
409ea0fabbcSTim J. Robbins  * resets the signal mask, the stack, and the
410ea0fabbcSTim J. Robbins  * frame pointer, it returns to the user
411ea0fabbcSTim J. Robbins  * specified pc, psl.
412ea0fabbcSTim J. Robbins  */
413ea0fabbcSTim J. Robbins static void
414ea0fabbcSTim J. Robbins linux_sendsig(sig_t catcher, int sig, sigset_t *mask, u_long code)
415ea0fabbcSTim J. Robbins {
416ea0fabbcSTim J. Robbins 	struct thread *td = curthread;
417ea0fabbcSTim J. Robbins 	struct proc *p = td->td_proc;
418ea0fabbcSTim J. Robbins 	struct sigacts *psp;
419ea0fabbcSTim J. Robbins 	struct trapframe *regs;
420ea0fabbcSTim J. Robbins 	struct l_sigframe *fp, frame;
421ea0fabbcSTim J. Robbins 	l_sigset_t lmask;
422ea0fabbcSTim J. Robbins 	int oonstack, i;
423ea0fabbcSTim J. Robbins 
424ea0fabbcSTim J. Robbins 	PROC_LOCK_ASSERT(p, MA_OWNED);
425ea0fabbcSTim J. Robbins 	psp = p->p_sigacts;
426ea0fabbcSTim J. Robbins 	mtx_assert(&psp->ps_mtx, MA_OWNED);
427ea0fabbcSTim J. Robbins 	if (SIGISMEMBER(psp->ps_siginfo, sig)) {
428ea0fabbcSTim J. Robbins 		/* Signal handler installed with SA_SIGINFO. */
429ea0fabbcSTim J. Robbins 		linux_rt_sendsig(catcher, sig, mask, code);
430ea0fabbcSTim J. Robbins 		return;
431ea0fabbcSTim J. Robbins 	}
432ea0fabbcSTim J. Robbins 
433ea0fabbcSTim J. Robbins 	regs = td->td_frame;
434ea0fabbcSTim J. Robbins 	oonstack = sigonstack(regs->tf_rsp);
435ea0fabbcSTim J. Robbins 
436ea0fabbcSTim J. Robbins #ifdef DEBUG
437ea0fabbcSTim J. Robbins 	if (ldebug(sendsig))
438ea0fabbcSTim J. Robbins 		printf(ARGS(sendsig, "%p, %d, %p, %lu"),
439ea0fabbcSTim J. Robbins 		    catcher, sig, (void*)mask, code);
440ea0fabbcSTim J. Robbins #endif
441ea0fabbcSTim J. Robbins 
442ea0fabbcSTim J. Robbins 	/*
443ea0fabbcSTim J. Robbins 	 * Allocate space for the signal handler context.
444ea0fabbcSTim J. Robbins 	 */
445ea0fabbcSTim J. Robbins 	if ((td->td_pflags & TDP_ALTSTACK) && !oonstack &&
446ea0fabbcSTim J. Robbins 	    SIGISMEMBER(psp->ps_sigonstack, sig)) {
447ea0fabbcSTim J. Robbins 		fp = (struct l_sigframe *)(td->td_sigstk.ss_sp +
448ea0fabbcSTim J. Robbins 		    td->td_sigstk.ss_size - sizeof(struct l_sigframe));
449ea0fabbcSTim J. Robbins 	} else
450ea0fabbcSTim J. Robbins 		fp = (struct l_sigframe *)regs->tf_rsp - 1;
451ea0fabbcSTim J. Robbins 	mtx_unlock(&psp->ps_mtx);
452ea0fabbcSTim J. Robbins 	PROC_UNLOCK(p);
453ea0fabbcSTim J. Robbins 
454ea0fabbcSTim J. Robbins 	/*
455ea0fabbcSTim J. Robbins 	 * Build the argument list for the signal handler.
456ea0fabbcSTim J. Robbins 	 */
457ea0fabbcSTim J. Robbins 	if (p->p_sysent->sv_sigtbl)
458ea0fabbcSTim J. Robbins 		if (sig <= p->p_sysent->sv_sigsize)
459ea0fabbcSTim J. Robbins 			sig = p->p_sysent->sv_sigtbl[_SIG_IDX(sig)];
460ea0fabbcSTim J. Robbins 
461ea0fabbcSTim J. Robbins 	bzero(&frame, sizeof(frame));
462ea0fabbcSTim J. Robbins 
463ea0fabbcSTim J. Robbins 	frame.sf_handler = PTROUT(catcher);
464ea0fabbcSTim J. Robbins 	frame.sf_sig = sig;
465ea0fabbcSTim J. Robbins 
466ea0fabbcSTim J. Robbins 	bsd_to_linux_sigset(mask, &lmask);
467ea0fabbcSTim J. Robbins 
468ea0fabbcSTim J. Robbins 	/*
469ea0fabbcSTim J. Robbins 	 * Build the signal context to be used by sigreturn.
470ea0fabbcSTim J. Robbins 	 */
471ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_mask   = lmask.__bits[0];
472ea0fabbcSTim J. Robbins         frame.sf_sc.sc_gs     = rgs();
473ea0fabbcSTim J. Robbins         frame.sf_sc.sc_fs     = rfs();
474ea0fabbcSTim J. Robbins         __asm __volatile("movl %%es,%0" : "=rm" (frame.sf_sc.sc_es));
475ea0fabbcSTim J. Robbins         __asm __volatile("movl %%ds,%0" : "=rm" (frame.sf_sc.sc_ds));
476ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_edi    = regs->tf_rdi;
477ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_esi    = regs->tf_rsi;
478ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_ebp    = regs->tf_rbp;
479ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_ebx    = regs->tf_rbx;
480ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_edx    = regs->tf_rdx;
481ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_ecx    = regs->tf_rcx;
482ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_eax    = regs->tf_rax;
483ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_eip    = regs->tf_rip;
484ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_cs     = regs->tf_cs;
485ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_eflags = regs->tf_rflags;
486ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_esp_at_signal = regs->tf_rsp;
487ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_ss     = regs->tf_ss;
488ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_err    = regs->tf_err;
489ea0fabbcSTim J. Robbins 	frame.sf_sc.sc_trapno = bsd_to_linux_trapcode(code);
490ea0fabbcSTim J. Robbins 
491ea0fabbcSTim J. Robbins 	for (i = 0; i < (LINUX_NSIG_WORDS-1); i++)
492ea0fabbcSTim J. Robbins 		frame.sf_extramask[i] = lmask.__bits[i+1];
493ea0fabbcSTim J. Robbins 
494ea0fabbcSTim J. Robbins 	if (copyout(&frame, fp, sizeof(frame)) != 0) {
495ea0fabbcSTim J. Robbins 		/*
496ea0fabbcSTim J. Robbins 		 * Process has trashed its stack; give it an illegal
497ea0fabbcSTim J. Robbins 		 * instruction to halt it in its tracks.
498ea0fabbcSTim J. Robbins 		 */
499ea0fabbcSTim J. Robbins 		PROC_LOCK(p);
500ea0fabbcSTim J. Robbins 		sigexit(td, SIGILL);
501ea0fabbcSTim J. Robbins 	}
502ea0fabbcSTim J. Robbins 
503ea0fabbcSTim J. Robbins 	/*
504ea0fabbcSTim J. Robbins 	 * Build context to run handler in.
505ea0fabbcSTim J. Robbins 	 */
506ea0fabbcSTim J. Robbins 	regs->tf_rsp = PTROUT(fp);
507ea0fabbcSTim J. Robbins 	regs->tf_rip = LINUX32_PS_STRINGS - *(p->p_sysent->sv_szsigcode);
508ea0fabbcSTim J. Robbins 	regs->tf_rflags &= ~PSL_T;
509ea0fabbcSTim J. Robbins 	regs->tf_cs = _ucode32sel;
510ea0fabbcSTim J. Robbins 	regs->tf_ss = _udatasel;
511ea0fabbcSTim J. Robbins 	load_ds(_udatasel);
512ea0fabbcSTim J. Robbins 	td->td_pcb->pcb_ds = _udatasel;
513ea0fabbcSTim J. Robbins 	load_es(_udatasel);
514ea0fabbcSTim J. Robbins 	td->td_pcb->pcb_es = _udatasel;
515ea0fabbcSTim J. Robbins 	PROC_LOCK(p);
516ea0fabbcSTim J. Robbins 	mtx_lock(&psp->ps_mtx);
517ea0fabbcSTim J. Robbins }
518ea0fabbcSTim J. Robbins 
519ea0fabbcSTim J. Robbins /*
520ea0fabbcSTim J. Robbins  * System call to cleanup state after a signal
521ea0fabbcSTim J. Robbins  * has been taken.  Reset signal mask and
522ea0fabbcSTim J. Robbins  * stack state from context left by sendsig (above).
523ea0fabbcSTim J. Robbins  * Return to previous pc and psl as specified by
524ea0fabbcSTim J. Robbins  * context left by sendsig. Check carefully to
525ea0fabbcSTim J. Robbins  * make sure that the user has not modified the
526ea0fabbcSTim J. Robbins  * psl to gain improper privileges or to cause
527ea0fabbcSTim J. Robbins  * a machine fault.
528ea0fabbcSTim J. Robbins  */
529ea0fabbcSTim J. Robbins int
530ea0fabbcSTim J. Robbins linux_sigreturn(struct thread *td, struct linux_sigreturn_args *args)
531ea0fabbcSTim J. Robbins {
532ea0fabbcSTim J. Robbins 	struct proc *p = td->td_proc;
533ea0fabbcSTim J. Robbins 	struct l_sigframe frame;
534ea0fabbcSTim J. Robbins 	struct trapframe *regs;
535ea0fabbcSTim J. Robbins 	l_sigset_t lmask;
536ea0fabbcSTim J. Robbins 	int eflags, i;
537ea0fabbcSTim J. Robbins 
538ea0fabbcSTim J. Robbins 	regs = td->td_frame;
539ea0fabbcSTim J. Robbins 
540ea0fabbcSTim J. Robbins #ifdef DEBUG
541ea0fabbcSTim J. Robbins 	if (ldebug(sigreturn))
542ea0fabbcSTim J. Robbins 		printf(ARGS(sigreturn, "%p"), (void *)args->sfp);
543ea0fabbcSTim J. Robbins #endif
544ea0fabbcSTim J. Robbins 	/*
545ea0fabbcSTim J. Robbins 	 * The trampoline code hands us the sigframe.
546ea0fabbcSTim J. Robbins 	 * It is unsafe to keep track of it ourselves, in the event that a
547ea0fabbcSTim J. Robbins 	 * program jumps out of a signal handler.
548ea0fabbcSTim J. Robbins 	 */
549ea0fabbcSTim J. Robbins 	if (copyin(args->sfp, &frame, sizeof(frame)) != 0)
550ea0fabbcSTim J. Robbins 		return (EFAULT);
551ea0fabbcSTim J. Robbins 
552ea0fabbcSTim J. Robbins 	/*
553ea0fabbcSTim J. Robbins 	 * Check for security violations.
554ea0fabbcSTim J. Robbins 	 */
555ea0fabbcSTim J. Robbins #define	EFLAGS_SECURE(ef, oef)	((((ef) ^ (oef)) & ~PSL_USERCHANGE) == 0)
556ea0fabbcSTim J. Robbins 	eflags = frame.sf_sc.sc_eflags;
557ea0fabbcSTim J. Robbins 	/*
558ea0fabbcSTim J. Robbins 	 * XXX do allow users to change the privileged flag PSL_RF.  The
559ea0fabbcSTim J. Robbins 	 * cpu sets PSL_RF in tf_eflags for faults.  Debuggers should
560ea0fabbcSTim J. Robbins 	 * sometimes set it there too.  tf_eflags is kept in the signal
561ea0fabbcSTim J. Robbins 	 * context during signal handling and there is no other place
562ea0fabbcSTim J. Robbins 	 * to remember it, so the PSL_RF bit may be corrupted by the
563ea0fabbcSTim J. Robbins 	 * signal handler without us knowing.  Corruption of the PSL_RF
564ea0fabbcSTim J. Robbins 	 * bit at worst causes one more or one less debugger trap, so
565ea0fabbcSTim J. Robbins 	 * allowing it is fairly harmless.
566ea0fabbcSTim J. Robbins 	 */
567ea0fabbcSTim J. Robbins 	if (!EFLAGS_SECURE(eflags & ~PSL_RF, regs->tf_rflags & ~PSL_RF))
568ea0fabbcSTim J. Robbins 		return(EINVAL);
569ea0fabbcSTim J. Robbins 
570ea0fabbcSTim J. Robbins 	/*
571ea0fabbcSTim J. Robbins 	 * Don't allow users to load a valid privileged %cs.  Let the
572ea0fabbcSTim J. Robbins 	 * hardware check for invalid selectors, excess privilege in
573ea0fabbcSTim J. Robbins 	 * other selectors, invalid %eip's and invalid %esp's.
574ea0fabbcSTim J. Robbins 	 */
575ea0fabbcSTim J. Robbins #define	CS_SECURE(cs)	(ISPL(cs) == SEL_UPL)
576ea0fabbcSTim J. Robbins 	if (!CS_SECURE(frame.sf_sc.sc_cs)) {
577ea0fabbcSTim J. Robbins 		trapsignal(td, SIGBUS, T_PROTFLT);
578ea0fabbcSTim J. Robbins 		return(EINVAL);
579ea0fabbcSTim J. Robbins 	}
580ea0fabbcSTim J. Robbins 
581ea0fabbcSTim J. Robbins 	lmask.__bits[0] = frame.sf_sc.sc_mask;
582ea0fabbcSTim J. Robbins 	for (i = 0; i < (LINUX_NSIG_WORDS-1); i++)
583ea0fabbcSTim J. Robbins 		lmask.__bits[i+1] = frame.sf_extramask[i];
584ea0fabbcSTim J. Robbins 	PROC_LOCK(p);
585ea0fabbcSTim J. Robbins 	linux_to_bsd_sigset(&lmask, &td->td_sigmask);
586ea0fabbcSTim J. Robbins 	SIG_CANTMASK(td->td_sigmask);
587ea0fabbcSTim J. Robbins 	signotify(td);
588ea0fabbcSTim J. Robbins 	PROC_UNLOCK(p);
589ea0fabbcSTim J. Robbins 
590ea0fabbcSTim J. Robbins 	/*
591ea0fabbcSTim J. Robbins 	 * Restore signal context.
592ea0fabbcSTim J. Robbins 	 */
593ea0fabbcSTim J. Robbins 	/* Selectors were restored by the trampoline. */
594ea0fabbcSTim J. Robbins 	regs->tf_rdi    = frame.sf_sc.sc_edi;
595ea0fabbcSTim J. Robbins 	regs->tf_rsi    = frame.sf_sc.sc_esi;
596ea0fabbcSTim J. Robbins 	regs->tf_rbp    = frame.sf_sc.sc_ebp;
597ea0fabbcSTim J. Robbins 	regs->tf_rbx    = frame.sf_sc.sc_ebx;
598ea0fabbcSTim J. Robbins 	regs->tf_rdx    = frame.sf_sc.sc_edx;
599ea0fabbcSTim J. Robbins 	regs->tf_rcx    = frame.sf_sc.sc_ecx;
600ea0fabbcSTim J. Robbins 	regs->tf_rax    = frame.sf_sc.sc_eax;
601ea0fabbcSTim J. Robbins 	regs->tf_rip    = frame.sf_sc.sc_eip;
602ea0fabbcSTim J. Robbins 	regs->tf_cs     = frame.sf_sc.sc_cs;
603ea0fabbcSTim J. Robbins 	regs->tf_rflags = eflags;
604ea0fabbcSTim J. Robbins 	regs->tf_rsp    = frame.sf_sc.sc_esp_at_signal;
605ea0fabbcSTim J. Robbins 	regs->tf_ss     = frame.sf_sc.sc_ss;
606ea0fabbcSTim J. Robbins 
607ea0fabbcSTim J. Robbins 	return (EJUSTRETURN);
608ea0fabbcSTim J. Robbins }
609ea0fabbcSTim J. Robbins 
610ea0fabbcSTim J. Robbins /*
611ea0fabbcSTim J. Robbins  * System call to cleanup state after a signal
612ea0fabbcSTim J. Robbins  * has been taken.  Reset signal mask and
613ea0fabbcSTim J. Robbins  * stack state from context left by rt_sendsig (above).
614ea0fabbcSTim J. Robbins  * Return to previous pc and psl as specified by
615ea0fabbcSTim J. Robbins  * context left by sendsig. Check carefully to
616ea0fabbcSTim J. Robbins  * make sure that the user has not modified the
617ea0fabbcSTim J. Robbins  * psl to gain improper privileges or to cause
618ea0fabbcSTim J. Robbins  * a machine fault.
619ea0fabbcSTim J. Robbins  */
620ea0fabbcSTim J. Robbins int
621ea0fabbcSTim J. Robbins linux_rt_sigreturn(struct thread *td, struct linux_rt_sigreturn_args *args)
622ea0fabbcSTim J. Robbins {
623ea0fabbcSTim J. Robbins 	struct proc *p = td->td_proc;
624ea0fabbcSTim J. Robbins 	struct l_ucontext uc;
625ea0fabbcSTim J. Robbins 	struct l_sigcontext *context;
626ea0fabbcSTim J. Robbins 	l_stack_t *lss;
627ea0fabbcSTim J. Robbins 	stack_t ss;
628ea0fabbcSTim J. Robbins 	struct trapframe *regs;
629ea0fabbcSTim J. Robbins 	int eflags;
630ea0fabbcSTim J. Robbins 
631ea0fabbcSTim J. Robbins 	regs = td->td_frame;
632ea0fabbcSTim J. Robbins 
633ea0fabbcSTim J. Robbins #ifdef DEBUG
634ea0fabbcSTim J. Robbins 	if (ldebug(rt_sigreturn))
635ea0fabbcSTim J. Robbins 		printf(ARGS(rt_sigreturn, "%p"), (void *)args->ucp);
636ea0fabbcSTim J. Robbins #endif
637ea0fabbcSTim J. Robbins 	/*
638ea0fabbcSTim J. Robbins 	 * The trampoline code hands us the ucontext.
639ea0fabbcSTim J. Robbins 	 * It is unsafe to keep track of it ourselves, in the event that a
640ea0fabbcSTim J. Robbins 	 * program jumps out of a signal handler.
641ea0fabbcSTim J. Robbins 	 */
642ea0fabbcSTim J. Robbins 	if (copyin(args->ucp, &uc, sizeof(uc)) != 0)
643ea0fabbcSTim J. Robbins 		return (EFAULT);
644ea0fabbcSTim J. Robbins 
645ea0fabbcSTim J. Robbins 	context = &uc.uc_mcontext;
646ea0fabbcSTim J. Robbins 
647ea0fabbcSTim J. Robbins 	/*
648ea0fabbcSTim J. Robbins 	 * Check for security violations.
649ea0fabbcSTim J. Robbins 	 */
650ea0fabbcSTim J. Robbins #define	EFLAGS_SECURE(ef, oef)	((((ef) ^ (oef)) & ~PSL_USERCHANGE) == 0)
651ea0fabbcSTim J. Robbins 	eflags = context->sc_eflags;
652ea0fabbcSTim J. Robbins 	/*
653ea0fabbcSTim J. Robbins 	 * XXX do allow users to change the privileged flag PSL_RF.  The
654ea0fabbcSTim J. Robbins 	 * cpu sets PSL_RF in tf_eflags for faults.  Debuggers should
655ea0fabbcSTim J. Robbins 	 * sometimes set it there too.  tf_eflags is kept in the signal
656ea0fabbcSTim J. Robbins 	 * context during signal handling and there is no other place
657ea0fabbcSTim J. Robbins 	 * to remember it, so the PSL_RF bit may be corrupted by the
658ea0fabbcSTim J. Robbins 	 * signal handler without us knowing.  Corruption of the PSL_RF
659ea0fabbcSTim J. Robbins 	 * bit at worst causes one more or one less debugger trap, so
660ea0fabbcSTim J. Robbins 	 * allowing it is fairly harmless.
661ea0fabbcSTim J. Robbins 	 */
662ea0fabbcSTim J. Robbins 	if (!EFLAGS_SECURE(eflags & ~PSL_RF, regs->tf_rflags & ~PSL_RF))
663ea0fabbcSTim J. Robbins 		return(EINVAL);
664ea0fabbcSTim J. Robbins 
665ea0fabbcSTim J. Robbins 	/*
666ea0fabbcSTim J. Robbins 	 * Don't allow users to load a valid privileged %cs.  Let the
667ea0fabbcSTim J. Robbins 	 * hardware check for invalid selectors, excess privilege in
668ea0fabbcSTim J. Robbins 	 * other selectors, invalid %eip's and invalid %esp's.
669ea0fabbcSTim J. Robbins 	 */
670ea0fabbcSTim J. Robbins #define	CS_SECURE(cs)	(ISPL(cs) == SEL_UPL)
671ea0fabbcSTim J. Robbins 	if (!CS_SECURE(context->sc_cs)) {
672ea0fabbcSTim J. Robbins 		trapsignal(td, SIGBUS, T_PROTFLT);
673ea0fabbcSTim J. Robbins 		return(EINVAL);
674ea0fabbcSTim J. Robbins 	}
675ea0fabbcSTim J. Robbins 
676ea0fabbcSTim J. Robbins 	PROC_LOCK(p);
677ea0fabbcSTim J. Robbins 	linux_to_bsd_sigset(&uc.uc_sigmask, &td->td_sigmask);
678ea0fabbcSTim J. Robbins 	SIG_CANTMASK(td->td_sigmask);
679ea0fabbcSTim J. Robbins 	signotify(td);
680ea0fabbcSTim J. Robbins 	PROC_UNLOCK(p);
681ea0fabbcSTim J. Robbins 
682ea0fabbcSTim J. Robbins 	/*
683ea0fabbcSTim J. Robbins 	 * Restore signal context
684ea0fabbcSTim J. Robbins 	 */
685ea0fabbcSTim J. Robbins 	/* Selectors were restored by the trampoline. */
686ea0fabbcSTim J. Robbins 	regs->tf_rdi    = context->sc_edi;
687ea0fabbcSTim J. Robbins 	regs->tf_rsi    = context->sc_esi;
688ea0fabbcSTim J. Robbins 	regs->tf_rbp    = context->sc_ebp;
689ea0fabbcSTim J. Robbins 	regs->tf_rbx    = context->sc_ebx;
690ea0fabbcSTim J. Robbins 	regs->tf_rdx    = context->sc_edx;
691ea0fabbcSTim J. Robbins 	regs->tf_rcx    = context->sc_ecx;
692ea0fabbcSTim J. Robbins 	regs->tf_rax    = context->sc_eax;
693ea0fabbcSTim J. Robbins 	regs->tf_rip    = context->sc_eip;
694ea0fabbcSTim J. Robbins 	regs->tf_cs     = context->sc_cs;
695ea0fabbcSTim J. Robbins 	regs->tf_rflags = eflags;
696ea0fabbcSTim J. Robbins 	regs->tf_rsp    = context->sc_esp_at_signal;
697ea0fabbcSTim J. Robbins 	regs->tf_ss     = context->sc_ss;
698ea0fabbcSTim J. Robbins 
699ea0fabbcSTim J. Robbins 	/*
700ea0fabbcSTim J. Robbins 	 * call sigaltstack & ignore results..
701ea0fabbcSTim J. Robbins 	 */
702ea0fabbcSTim J. Robbins 	lss = &uc.uc_stack;
703ea0fabbcSTim J. Robbins 	ss.ss_sp = PTRIN(lss->ss_sp);
704ea0fabbcSTim J. Robbins 	ss.ss_size = lss->ss_size;
705ea0fabbcSTim J. Robbins 	ss.ss_flags = linux_to_bsd_sigaltstack(lss->ss_flags);
706ea0fabbcSTim J. Robbins 
707ea0fabbcSTim J. Robbins #ifdef DEBUG
708ea0fabbcSTim J. Robbins 	if (ldebug(rt_sigreturn))
709c680f6b1SDavid E. O'Brien 		printf(LMSG("rt_sigret flags: 0x%x, sp: %p, ss: 0x%lx, mask: 0x%x"),
710ea0fabbcSTim J. Robbins 		    ss.ss_flags, ss.ss_sp, ss.ss_size, context->sc_mask);
711ea0fabbcSTim J. Robbins #endif
712ea0fabbcSTim J. Robbins 	(void)kern_sigaltstack(td, &ss, NULL);
713ea0fabbcSTim J. Robbins 
714ea0fabbcSTim J. Robbins 	return (EJUSTRETURN);
715ea0fabbcSTim J. Robbins }
716ea0fabbcSTim J. Robbins 
717ea0fabbcSTim J. Robbins /*
718ea0fabbcSTim J. Robbins  * MPSAFE
719ea0fabbcSTim J. Robbins  */
720ea0fabbcSTim J. Robbins static void
721ea0fabbcSTim J. Robbins linux_prepsyscall(struct trapframe *tf, int *args, u_int *code, caddr_t *params)
722ea0fabbcSTim J. Robbins {
723ea0fabbcSTim J. Robbins 	args[0] = tf->tf_rbx;
724ea0fabbcSTim J. Robbins 	args[1] = tf->tf_rcx;
725ea0fabbcSTim J. Robbins 	args[2] = tf->tf_rdx;
726ea0fabbcSTim J. Robbins 	args[3] = tf->tf_rsi;
727ea0fabbcSTim J. Robbins 	args[4] = tf->tf_rdi;
728ea0fabbcSTim J. Robbins 	args[5] = tf->tf_rbp;	/* Unconfirmed */
729ea0fabbcSTim J. Robbins 	*params = NULL;		/* no copyin */
730ea0fabbcSTim J. Robbins }
731ea0fabbcSTim J. Robbins 
732ea0fabbcSTim J. Robbins /*
733ea0fabbcSTim J. Robbins  * If a linux binary is exec'ing something, try this image activator
734ea0fabbcSTim J. Robbins  * first.  We override standard shell script execution in order to
735ea0fabbcSTim J. Robbins  * be able to modify the interpreter path.  We only do this if a linux
736ea0fabbcSTim J. Robbins  * binary is doing the exec, so we do not create an EXEC module for it.
737ea0fabbcSTim J. Robbins  */
738ea0fabbcSTim J. Robbins static int	exec_linux_imgact_try(struct image_params *iparams);
739ea0fabbcSTim J. Robbins 
740ea0fabbcSTim J. Robbins static int
741ea0fabbcSTim J. Robbins exec_linux_imgact_try(struct image_params *imgp)
742ea0fabbcSTim J. Robbins {
743ea0fabbcSTim J. Robbins     const char *head = (const char *)imgp->image_header;
7441d15fdd9SJohn Baldwin     char *rpath;
7451d15fdd9SJohn Baldwin     int error = -1, len;
746ea0fabbcSTim J. Robbins 
747ea0fabbcSTim J. Robbins     /*
748ea0fabbcSTim J. Robbins      * The interpreter for shell scripts run from a linux binary needs
749ea0fabbcSTim J. Robbins      * to be located in /compat/linux if possible in order to recursively
750ea0fabbcSTim J. Robbins      * maintain linux path emulation.
751ea0fabbcSTim J. Robbins      */
752ea0fabbcSTim J. Robbins     if (((const short *)head)[0] == SHELLMAGIC) {
753ea0fabbcSTim J. Robbins 	    /*
754ea0fabbcSTim J. Robbins 	     * Run our normal shell image activator.  If it succeeds attempt
755ea0fabbcSTim J. Robbins 	     * to use the alternate path for the interpreter.  If an alternate
756ea0fabbcSTim J. Robbins 	     * path is found, use our stringspace to store it.
757ea0fabbcSTim J. Robbins 	     */
758ea0fabbcSTim J. Robbins 	    if ((error = exec_shell_imgact(imgp)) == 0) {
7591d15fdd9SJohn Baldwin 		    linux_emul_convpath(FIRST_THREAD_IN_PROC(imgp->proc),
7601d15fdd9SJohn Baldwin 			imgp->interpreter_name, UIO_SYSSPACE, &rpath, 0);
7611d15fdd9SJohn Baldwin 		    if (rpath != NULL) {
7621d15fdd9SJohn Baldwin 			    len = strlen(rpath) + 1;
763ea0fabbcSTim J. Robbins 
764ea0fabbcSTim J. Robbins 			    if (len <= MAXSHELLCMDLEN) {
765ea0fabbcSTim J. Robbins 				    memcpy(imgp->interpreter_name, rpath, len);
766ea0fabbcSTim J. Robbins 			    }
767ea0fabbcSTim J. Robbins 			    free(rpath, M_TEMP);
768ea0fabbcSTim J. Robbins 		    }
769ea0fabbcSTim J. Robbins 	    }
770ea0fabbcSTim J. Robbins     }
771ea0fabbcSTim J. Robbins     return(error);
772ea0fabbcSTim J. Robbins }
773ea0fabbcSTim J. Robbins 
774ea0fabbcSTim J. Robbins /*
775ea0fabbcSTim J. Robbins  * Clear registers on exec
776ea0fabbcSTim J. Robbins  * XXX copied from ia32_signal.c.
777ea0fabbcSTim J. Robbins  */
778ea0fabbcSTim J. Robbins static void
779ea0fabbcSTim J. Robbins exec_linux_setregs(td, entry, stack, ps_strings)
780ea0fabbcSTim J. Robbins 	struct thread *td;
781ea0fabbcSTim J. Robbins 	u_long entry;
782ea0fabbcSTim J. Robbins 	u_long stack;
783ea0fabbcSTim J. Robbins 	u_long ps_strings;
784ea0fabbcSTim J. Robbins {
785ea0fabbcSTim J. Robbins 	struct trapframe *regs = td->td_frame;
786ea0fabbcSTim J. Robbins 	struct pcb *pcb = td->td_pcb;
787ea0fabbcSTim J. Robbins 
788ea0fabbcSTim J. Robbins 	wrmsr(MSR_FSBASE, 0);
789ea0fabbcSTim J. Robbins 	wrmsr(MSR_KGSBASE, 0);	/* User value while we're in the kernel */
790ea0fabbcSTim J. Robbins 	pcb->pcb_fsbase = 0;
791ea0fabbcSTim J. Robbins 	pcb->pcb_gsbase = 0;
792ea0fabbcSTim J. Robbins 	load_ds(_udatasel);
793ea0fabbcSTim J. Robbins 	load_es(_udatasel);
794ea0fabbcSTim J. Robbins 	load_fs(_udatasel);
795ea0fabbcSTim J. Robbins 	load_gs(0);
796ea0fabbcSTim J. Robbins 	pcb->pcb_ds = _udatasel;
797ea0fabbcSTim J. Robbins 	pcb->pcb_es = _udatasel;
798ea0fabbcSTim J. Robbins 	pcb->pcb_fs = _udatasel;
799ea0fabbcSTim J. Robbins 	pcb->pcb_gs = 0;
800ea0fabbcSTim J. Robbins 
801ea0fabbcSTim J. Robbins 	bzero((char *)regs, sizeof(struct trapframe));
802ea0fabbcSTim J. Robbins 	regs->tf_rip = entry;
803ea0fabbcSTim J. Robbins 	regs->tf_rsp = stack;
804ea0fabbcSTim J. Robbins 	regs->tf_rflags = PSL_USER | (regs->tf_rflags & PSL_T);
805ea0fabbcSTim J. Robbins 	regs->tf_ss = _udatasel;
806ea0fabbcSTim J. Robbins 	regs->tf_cs = _ucode32sel;
807ea0fabbcSTim J. Robbins 	regs->tf_rbx = ps_strings;
808ea0fabbcSTim J. Robbins 	load_cr0(rcr0() | CR0_MP | CR0_TS);
8092a988f7cSStephan Uphoff 	fpstate_drop(td);
810ea0fabbcSTim J. Robbins 
811ea0fabbcSTim J. Robbins 	/* Return via doreti so that we can change to a different %cs */
812ea0fabbcSTim J. Robbins 	pcb->pcb_flags |= PCB_FULLCTX;
813ea0fabbcSTim J. Robbins 	td->td_retval[1] = 0;
814ea0fabbcSTim J. Robbins }
815ea0fabbcSTim J. Robbins 
816ea0fabbcSTim J. Robbins /*
817ea0fabbcSTim J. Robbins  * XXX copied from ia32_sysvec.c.
818ea0fabbcSTim J. Robbins  */
819ea0fabbcSTim J. Robbins static register_t *
820ea0fabbcSTim J. Robbins linux_copyout_strings(struct image_params *imgp)
821ea0fabbcSTim J. Robbins {
822ea0fabbcSTim J. Robbins 	int argc, envc;
823ea0fabbcSTim J. Robbins 	u_int32_t *vectp;
824ea0fabbcSTim J. Robbins 	char *stringp, *destp;
825ea0fabbcSTim J. Robbins 	u_int32_t *stack_base;
826ea0fabbcSTim J. Robbins 	struct linux32_ps_strings *arginfo;
827ea0fabbcSTim J. Robbins 	int sigcodesz;
828ea0fabbcSTim J. Robbins 
829ea0fabbcSTim J. Robbins 	/*
830ea0fabbcSTim J. Robbins 	 * Calculate string base and vector table pointers.
831ea0fabbcSTim J. Robbins 	 * Also deal with signal trampoline code for this exec type.
832ea0fabbcSTim J. Robbins 	 */
833ea0fabbcSTim J. Robbins 	arginfo = (struct linux32_ps_strings *)LINUX32_PS_STRINGS;
834ea0fabbcSTim J. Robbins 	sigcodesz = *(imgp->proc->p_sysent->sv_szsigcode);
835ea0fabbcSTim J. Robbins 	destp =	(caddr_t)arginfo - sigcodesz - SPARE_USRSPACE -
836610ecfe0SMaxim Sobolev 		roundup((ARG_MAX - imgp->args->stringspace), sizeof(char *));
837ea0fabbcSTim J. Robbins 
838ea0fabbcSTim J. Robbins 	/*
839ea0fabbcSTim J. Robbins 	 * install sigcode
840ea0fabbcSTim J. Robbins 	 */
841ea0fabbcSTim J. Robbins 	if (sigcodesz)
842ea0fabbcSTim J. Robbins 		copyout(imgp->proc->p_sysent->sv_sigcode,
843ea0fabbcSTim J. Robbins 			((caddr_t)arginfo - sigcodesz), szsigcode);
844ea0fabbcSTim J. Robbins 
845ea0fabbcSTim J. Robbins 	/*
846ea0fabbcSTim J. Robbins 	 * If we have a valid auxargs ptr, prepare some room
847ea0fabbcSTim J. Robbins 	 * on the stack.
848ea0fabbcSTim J. Robbins 	 */
849ea0fabbcSTim J. Robbins 	if (imgp->auxargs) {
850ea0fabbcSTim J. Robbins 		/*
851ea0fabbcSTim J. Robbins 		 * 'AT_COUNT*2' is size for the ELF Auxargs data. This is for
852ea0fabbcSTim J. Robbins 		 * lower compatibility.
853ea0fabbcSTim J. Robbins 		 */
854ea0fabbcSTim J. Robbins 		imgp->auxarg_size = (imgp->auxarg_size) ? imgp->auxarg_size
855ea0fabbcSTim J. Robbins 			: (AT_COUNT * 2);
856ea0fabbcSTim J. Robbins 		/*
857ea0fabbcSTim J. Robbins 		 * The '+ 2' is for the null pointers at the end of each of
858ea0fabbcSTim J. Robbins 		 * the arg and env vector sets,and imgp->auxarg_size is room
859ea0fabbcSTim J. Robbins 		 * for argument of Runtime loader.
860ea0fabbcSTim J. Robbins 		 */
861610ecfe0SMaxim Sobolev 		vectp = (u_int32_t *) (destp - (imgp->args->argc + imgp->args->envc + 2 +
862ea0fabbcSTim J. Robbins 				       imgp->auxarg_size) * sizeof(u_int32_t));
863ea0fabbcSTim J. Robbins 
864ea0fabbcSTim J. Robbins 	} else
865ea0fabbcSTim J. Robbins 		/*
866ea0fabbcSTim J. Robbins 		 * The '+ 2' is for the null pointers at the end of each of
867ea0fabbcSTim J. Robbins 		 * the arg and env vector sets
868ea0fabbcSTim J. Robbins 		 */
869ea0fabbcSTim J. Robbins 		vectp = (u_int32_t *)
870610ecfe0SMaxim Sobolev 			(destp - (imgp->args->argc + imgp->args->envc + 2) * sizeof(u_int32_t));
871ea0fabbcSTim J. Robbins 
872ea0fabbcSTim J. Robbins 	/*
873ea0fabbcSTim J. Robbins 	 * vectp also becomes our initial stack base
874ea0fabbcSTim J. Robbins 	 */
875ea0fabbcSTim J. Robbins 	stack_base = vectp;
876ea0fabbcSTim J. Robbins 
877610ecfe0SMaxim Sobolev 	stringp = imgp->args->begin_argv;
878610ecfe0SMaxim Sobolev 	argc = imgp->args->argc;
879610ecfe0SMaxim Sobolev 	envc = imgp->args->envc;
880ea0fabbcSTim J. Robbins 	/*
881ea0fabbcSTim J. Robbins 	 * Copy out strings - arguments and environment.
882ea0fabbcSTim J. Robbins 	 */
883610ecfe0SMaxim Sobolev 	copyout(stringp, destp, ARG_MAX - imgp->args->stringspace);
884ea0fabbcSTim J. Robbins 
885ea0fabbcSTim J. Robbins 	/*
886ea0fabbcSTim J. Robbins 	 * Fill in "ps_strings" struct for ps, w, etc.
887ea0fabbcSTim J. Robbins 	 */
888ea0fabbcSTim J. Robbins 	suword32(&arginfo->ps_argvstr, (u_int32_t)(intptr_t)vectp);
889ea0fabbcSTim J. Robbins 	suword32(&arginfo->ps_nargvstr, argc);
890ea0fabbcSTim J. Robbins 
891ea0fabbcSTim J. Robbins 	/*
892ea0fabbcSTim J. Robbins 	 * Fill in argument portion of vector table.
893ea0fabbcSTim J. Robbins 	 */
894ea0fabbcSTim J. Robbins 	for (; argc > 0; --argc) {
895ea0fabbcSTim J. Robbins 		suword32(vectp++, (u_int32_t)(intptr_t)destp);
896ea0fabbcSTim J. Robbins 		while (*stringp++ != 0)
897ea0fabbcSTim J. Robbins 			destp++;
898ea0fabbcSTim J. Robbins 		destp++;
899ea0fabbcSTim J. Robbins 	}
900ea0fabbcSTim J. Robbins 
901ea0fabbcSTim J. Robbins 	/* a null vector table pointer separates the argp's from the envp's */
902ea0fabbcSTim J. Robbins 	suword32(vectp++, 0);
903ea0fabbcSTim J. Robbins 
904ea0fabbcSTim J. Robbins 	suword32(&arginfo->ps_envstr, (u_int32_t)(intptr_t)vectp);
905ea0fabbcSTim J. Robbins 	suword32(&arginfo->ps_nenvstr, envc);
906ea0fabbcSTim J. Robbins 
907ea0fabbcSTim J. Robbins 	/*
908ea0fabbcSTim J. Robbins 	 * Fill in environment portion of vector table.
909ea0fabbcSTim J. Robbins 	 */
910ea0fabbcSTim J. Robbins 	for (; envc > 0; --envc) {
911ea0fabbcSTim J. Robbins 		suword32(vectp++, (u_int32_t)(intptr_t)destp);
912ea0fabbcSTim J. Robbins 		while (*stringp++ != 0)
913ea0fabbcSTim J. Robbins 			destp++;
914ea0fabbcSTim J. Robbins 		destp++;
915ea0fabbcSTim J. Robbins 	}
916ea0fabbcSTim J. Robbins 
917ea0fabbcSTim J. Robbins 	/* end of vector table is a null pointer */
918ea0fabbcSTim J. Robbins 	suword32(vectp, 0);
919ea0fabbcSTim J. Robbins 
920ea0fabbcSTim J. Robbins 	return ((register_t *)stack_base);
921ea0fabbcSTim J. Robbins }
922ea0fabbcSTim J. Robbins 
923ea0fabbcSTim J. Robbins SYSCTL_NODE(_compat, OID_AUTO, linux32, CTLFLAG_RW, 0,
924ea0fabbcSTim J. Robbins     "32-bit Linux emulation");
925ea0fabbcSTim J. Robbins 
926ea0fabbcSTim J. Robbins static u_long	linux32_maxdsiz = LINUX32_MAXDSIZ;
927ea0fabbcSTim J. Robbins SYSCTL_ULONG(_compat_linux32, OID_AUTO, maxdsiz, CTLFLAG_RW,
928ea0fabbcSTim J. Robbins     &linux32_maxdsiz, 0, "");
929ea0fabbcSTim J. Robbins static u_long	linux32_maxssiz = LINUX32_MAXSSIZ;
930ea0fabbcSTim J. Robbins SYSCTL_ULONG(_compat_linux32, OID_AUTO, maxssiz, CTLFLAG_RW,
931ea0fabbcSTim J. Robbins     &linux32_maxssiz, 0, "");
932ea0fabbcSTim J. Robbins static u_long	linux32_maxvmem = LINUX32_MAXVMEM;
933ea0fabbcSTim J. Robbins SYSCTL_ULONG(_compat_linux32, OID_AUTO, maxvmem, CTLFLAG_RW,
934ea0fabbcSTim J. Robbins     &linux32_maxvmem, 0, "");
935ea0fabbcSTim J. Robbins 
936ea0fabbcSTim J. Robbins /*
937ea0fabbcSTim J. Robbins  * XXX copied from ia32_sysvec.c.
938ea0fabbcSTim J. Robbins  */
939ea0fabbcSTim J. Robbins static void
940ea0fabbcSTim J. Robbins linux32_fixlimits(struct image_params *imgp)
941ea0fabbcSTim J. Robbins {
942ea0fabbcSTim J. Robbins 	struct proc *p = imgp->proc;
943ea0fabbcSTim J. Robbins 	struct plimit *oldlim, *newlim;
944ea0fabbcSTim J. Robbins 
945ea0fabbcSTim J. Robbins 	if (linux32_maxdsiz == 0 && linux32_maxssiz == 0 &&
946ea0fabbcSTim J. Robbins 	    linux32_maxvmem == 0)
947ea0fabbcSTim J. Robbins 		return;
948ea0fabbcSTim J. Robbins 	newlim = lim_alloc();
949ea0fabbcSTim J. Robbins 	PROC_LOCK(p);
950ea0fabbcSTim J. Robbins 	oldlim = p->p_limit;
951ea0fabbcSTim J. Robbins 	lim_copy(newlim, oldlim);
952ea0fabbcSTim J. Robbins 	if (linux32_maxdsiz != 0) {
953ea0fabbcSTim J. Robbins 		if (newlim->pl_rlimit[RLIMIT_DATA].rlim_cur > linux32_maxdsiz)
954ea0fabbcSTim J. Robbins 		    newlim->pl_rlimit[RLIMIT_DATA].rlim_cur = linux32_maxdsiz;
955ea0fabbcSTim J. Robbins 		if (newlim->pl_rlimit[RLIMIT_DATA].rlim_max > linux32_maxdsiz)
956ea0fabbcSTim J. Robbins 		    newlim->pl_rlimit[RLIMIT_DATA].rlim_max = linux32_maxdsiz;
957ea0fabbcSTim J. Robbins 	}
958ea0fabbcSTim J. Robbins 	if (linux32_maxssiz != 0) {
959ea0fabbcSTim J. Robbins 		if (newlim->pl_rlimit[RLIMIT_STACK].rlim_cur > linux32_maxssiz)
960ea0fabbcSTim J. Robbins 		    newlim->pl_rlimit[RLIMIT_STACK].rlim_cur = linux32_maxssiz;
961ea0fabbcSTim J. Robbins 		if (newlim->pl_rlimit[RLIMIT_STACK].rlim_max > linux32_maxssiz)
962ea0fabbcSTim J. Robbins 		    newlim->pl_rlimit[RLIMIT_STACK].rlim_max = linux32_maxssiz;
963ea0fabbcSTim J. Robbins 	}
964ea0fabbcSTim J. Robbins 	if (linux32_maxvmem != 0) {
965ea0fabbcSTim J. Robbins 		if (newlim->pl_rlimit[RLIMIT_VMEM].rlim_cur > linux32_maxvmem)
966ea0fabbcSTim J. Robbins 		    newlim->pl_rlimit[RLIMIT_VMEM].rlim_cur = linux32_maxvmem;
967ea0fabbcSTim J. Robbins 		if (newlim->pl_rlimit[RLIMIT_VMEM].rlim_max > linux32_maxvmem)
968ea0fabbcSTim J. Robbins 		    newlim->pl_rlimit[RLIMIT_VMEM].rlim_max = linux32_maxvmem;
969ea0fabbcSTim J. Robbins 	}
970ea0fabbcSTim J. Robbins 	p->p_limit = newlim;
971ea0fabbcSTim J. Robbins 	PROC_UNLOCK(p);
972ea0fabbcSTim J. Robbins 	lim_free(oldlim);
973ea0fabbcSTim J. Robbins }
974ea0fabbcSTim J. Robbins 
975ea0fabbcSTim J. Robbins struct sysentvec elf_linux_sysvec = {
976ea0fabbcSTim J. Robbins 	LINUX_SYS_MAXSYSCALL,
977ea0fabbcSTim J. Robbins 	linux_sysent,
978ea0fabbcSTim J. Robbins 	0xff,
979ea0fabbcSTim J. Robbins 	LINUX_SIGTBLSZ,
980ea0fabbcSTim J. Robbins 	bsd_to_linux_signal,
981ea0fabbcSTim J. Robbins 	ELAST + 1,
982ea0fabbcSTim J. Robbins 	bsd_to_linux_errno,
983ea0fabbcSTim J. Robbins 	translate_traps,
984ea0fabbcSTim J. Robbins 	elf_linux_fixup,
985ea0fabbcSTim J. Robbins 	linux_sendsig,
986ea0fabbcSTim J. Robbins 	linux_sigcode,
987ea0fabbcSTim J. Robbins 	&linux_szsigcode,
988ea0fabbcSTim J. Robbins 	linux_prepsyscall,
989ea0fabbcSTim J. Robbins 	"Linux ELF32",
990ea0fabbcSTim J. Robbins 	elf32_coredump,
991ea0fabbcSTim J. Robbins 	exec_linux_imgact_try,
992ea0fabbcSTim J. Robbins 	LINUX_MINSIGSTKSZ,
993ea0fabbcSTim J. Robbins 	PAGE_SIZE,
994ea0fabbcSTim J. Robbins 	VM_MIN_ADDRESS,
995ea0fabbcSTim J. Robbins 	LINUX32_USRSTACK,
996ea0fabbcSTim J. Robbins 	LINUX32_USRSTACK,
997ea0fabbcSTim J. Robbins 	LINUX32_PS_STRINGS,
998ea0fabbcSTim J. Robbins 	VM_PROT_ALL,
999ea0fabbcSTim J. Robbins 	linux_copyout_strings,
1000ea0fabbcSTim J. Robbins 	exec_linux_setregs,
1001ea0fabbcSTim J. Robbins 	linux32_fixlimits
1002ea0fabbcSTim J. Robbins };
1003ea0fabbcSTim J. Robbins 
1004ea0fabbcSTim J. Robbins static Elf32_Brandinfo linux_brand = {
1005ea0fabbcSTim J. Robbins 					ELFOSABI_LINUX,
1006ea0fabbcSTim J. Robbins 					EM_386,
1007ea0fabbcSTim J. Robbins 					"Linux",
1008ea0fabbcSTim J. Robbins 					"/compat/linux",
1009ea0fabbcSTim J. Robbins 					"/lib/ld-linux.so.1",
1010ea0fabbcSTim J. Robbins 					&elf_linux_sysvec,
1011ea0fabbcSTim J. Robbins 					NULL,
1012ea0fabbcSTim J. Robbins 				 };
1013ea0fabbcSTim J. Robbins 
1014ea0fabbcSTim J. Robbins static Elf32_Brandinfo linux_glibc2brand = {
1015ea0fabbcSTim J. Robbins 					ELFOSABI_LINUX,
1016ea0fabbcSTim J. Robbins 					EM_386,
1017ea0fabbcSTim J. Robbins 					"Linux",
1018ea0fabbcSTim J. Robbins 					"/compat/linux",
1019ea0fabbcSTim J. Robbins 					"/lib/ld-linux.so.2",
1020ea0fabbcSTim J. Robbins 					&elf_linux_sysvec,
1021ea0fabbcSTim J. Robbins 					NULL,
1022ea0fabbcSTim J. Robbins 				 };
1023ea0fabbcSTim J. Robbins 
1024ea0fabbcSTim J. Robbins Elf32_Brandinfo *linux_brandlist[] = {
1025ea0fabbcSTim J. Robbins 					&linux_brand,
1026ea0fabbcSTim J. Robbins 					&linux_glibc2brand,
1027ea0fabbcSTim J. Robbins 					NULL
1028ea0fabbcSTim J. Robbins 				};
1029ea0fabbcSTim J. Robbins 
1030ea0fabbcSTim J. Robbins static int
1031ea0fabbcSTim J. Robbins linux_elf_modevent(module_t mod, int type, void *data)
1032ea0fabbcSTim J. Robbins {
1033ea0fabbcSTim J. Robbins 	Elf32_Brandinfo **brandinfo;
1034ea0fabbcSTim J. Robbins 	int error;
1035ea0fabbcSTim J. Robbins 	struct linux_ioctl_handler **lihp;
1036ea0fabbcSTim J. Robbins 
1037ea0fabbcSTim J. Robbins 	error = 0;
1038ea0fabbcSTim J. Robbins 
1039ea0fabbcSTim J. Robbins 	switch(type) {
1040ea0fabbcSTim J. Robbins 	case MOD_LOAD:
1041ea0fabbcSTim J. Robbins 		for (brandinfo = &linux_brandlist[0]; *brandinfo != NULL;
1042ea0fabbcSTim J. Robbins 		     ++brandinfo)
1043ea0fabbcSTim J. Robbins 			if (elf32_insert_brand_entry(*brandinfo) < 0)
1044ea0fabbcSTim J. Robbins 				error = EINVAL;
1045ea0fabbcSTim J. Robbins 		if (error == 0) {
1046ea0fabbcSTim J. Robbins 			SET_FOREACH(lihp, linux_ioctl_handler_set)
1047ea0fabbcSTim J. Robbins 				linux_ioctl_register_handler(*lihp);
1048ea0fabbcSTim J. Robbins 			if (bootverbose)
1049ea0fabbcSTim J. Robbins 				printf("Linux ELF exec handler installed\n");
1050ea0fabbcSTim J. Robbins 		} else
1051ea0fabbcSTim J. Robbins 			printf("cannot insert Linux ELF brand handler\n");
1052ea0fabbcSTim J. Robbins 		break;
1053ea0fabbcSTim J. Robbins 	case MOD_UNLOAD:
1054ea0fabbcSTim J. Robbins 		for (brandinfo = &linux_brandlist[0]; *brandinfo != NULL;
1055ea0fabbcSTim J. Robbins 		     ++brandinfo)
1056ea0fabbcSTim J. Robbins 			if (elf32_brand_inuse(*brandinfo))
1057ea0fabbcSTim J. Robbins 				error = EBUSY;
1058ea0fabbcSTim J. Robbins 		if (error == 0) {
1059ea0fabbcSTim J. Robbins 			for (brandinfo = &linux_brandlist[0];
1060ea0fabbcSTim J. Robbins 			     *brandinfo != NULL; ++brandinfo)
1061ea0fabbcSTim J. Robbins 				if (elf32_remove_brand_entry(*brandinfo) < 0)
1062ea0fabbcSTim J. Robbins 					error = EINVAL;
1063ea0fabbcSTim J. Robbins 		}
1064ea0fabbcSTim J. Robbins 		if (error == 0) {
1065ea0fabbcSTim J. Robbins 			SET_FOREACH(lihp, linux_ioctl_handler_set)
1066ea0fabbcSTim J. Robbins 				linux_ioctl_unregister_handler(*lihp);
1067ea0fabbcSTim J. Robbins 			if (bootverbose)
1068ea0fabbcSTim J. Robbins 				printf("Linux ELF exec handler removed\n");
1069ea0fabbcSTim J. Robbins 			linux_mib_destroy();
1070ea0fabbcSTim J. Robbins 		} else
1071ea0fabbcSTim J. Robbins 			printf("Could not deinstall ELF interpreter entry\n");
1072ea0fabbcSTim J. Robbins 		break;
1073ea0fabbcSTim J. Robbins 	default:
1074ea0fabbcSTim J. Robbins 		break;
1075ea0fabbcSTim J. Robbins 	}
1076ea0fabbcSTim J. Robbins 	return error;
1077ea0fabbcSTim J. Robbins }
1078ea0fabbcSTim J. Robbins 
1079ea0fabbcSTim J. Robbins static moduledata_t linux_elf_mod = {
1080ea0fabbcSTim J. Robbins 	"linuxelf",
1081ea0fabbcSTim J. Robbins 	linux_elf_modevent,
1082ea0fabbcSTim J. Robbins 	0
1083ea0fabbcSTim J. Robbins };
1084ea0fabbcSTim J. Robbins 
1085ea0fabbcSTim J. Robbins DECLARE_MODULE(linuxelf, linux_elf_mod, SI_SUB_EXEC, SI_ORDER_ANY);
1086