linux32_exec_elf32.c revision 1.1.10.2 1 1.1.10.2 simonb /* $NetBSD: linux32_exec_elf32.c,v 1.1.10.2 2006/04/22 11:38:14 simonb Exp $ */
2 1.1.10.2 simonb
3 1.1.10.2 simonb /*-
4 1.1.10.2 simonb * Copyright (c) 1995, 1998, 2000, 2001,2006 The NetBSD Foundation, Inc.
5 1.1.10.2 simonb * All rights reserved.
6 1.1.10.2 simonb *
7 1.1.10.2 simonb * This code is derived from software contributed to The NetBSD Foundation
8 1.1.10.2 simonb * by Christos Zoulas, Frank van der Linden, Eric Haszlakiewicz and
9 1.1.10.2 simonb * Emmanuel Dreyfus.
10 1.1.10.2 simonb *
11 1.1.10.2 simonb * Redistribution and use in source and binary forms, with or without
12 1.1.10.2 simonb * modification, are permitted provided that the following conditions
13 1.1.10.2 simonb * are met:
14 1.1.10.2 simonb * 1. Redistributions of source code must retain the above copyright
15 1.1.10.2 simonb * notice, this list of conditions and the following disclaimer.
16 1.1.10.2 simonb * 2. Redistributions in binary form must reproduce the above copyright
17 1.1.10.2 simonb * notice, this list of conditions and the following disclaimer in the
18 1.1.10.2 simonb * documentation and/or other materials provided with the distribution.
19 1.1.10.2 simonb * 3. All advertising materials mentioning features or use of this software
20 1.1.10.2 simonb * must display the following acknowledgement:
21 1.1.10.2 simonb * This product includes software developed by the NetBSD
22 1.1.10.2 simonb * Foundation, Inc. and its contributors.
23 1.1.10.2 simonb * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.1.10.2 simonb * contributors may be used to endorse or promote products derived
25 1.1.10.2 simonb * from this software without specific prior written permission.
26 1.1.10.2 simonb *
27 1.1.10.2 simonb * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.1.10.2 simonb * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.1.10.2 simonb * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.1.10.2 simonb * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.1.10.2 simonb * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.1.10.2 simonb * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.1.10.2 simonb * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.1.10.2 simonb * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.1.10.2 simonb * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.1.10.2 simonb * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.1.10.2 simonb * POSSIBILITY OF SUCH DAMAGE.
38 1.1.10.2 simonb */
39 1.1.10.2 simonb
40 1.1.10.2 simonb #include <sys/cdefs.h>
41 1.1.10.2 simonb __KERNEL_RCSID(0, "$NetBSD: linux32_exec_elf32.c,v 1.1.10.2 2006/04/22 11:38:14 simonb Exp $");
42 1.1.10.2 simonb
43 1.1.10.2 simonb #define ELFSIZE 32
44 1.1.10.2 simonb
45 1.1.10.2 simonb #include <sys/param.h>
46 1.1.10.2 simonb #include <sys/systm.h>
47 1.1.10.2 simonb #include <sys/proc.h>
48 1.1.10.2 simonb #include <sys/malloc.h>
49 1.1.10.2 simonb #include <sys/vnode.h>
50 1.1.10.2 simonb #include <sys/exec.h>
51 1.1.10.2 simonb #include <sys/exec_elf.h>
52 1.1.10.2 simonb #include <sys/kernel.h>
53 1.1.10.2 simonb #include <sys/resourcevar.h>
54 1.1.10.2 simonb #include <sys/signal.h>
55 1.1.10.2 simonb #include <sys/signalvar.h>
56 1.1.10.2 simonb
57 1.1.10.2 simonb #include <compat/linux/common/linux_exec.h>
58 1.1.10.2 simonb #include <compat/netbsd32/netbsd32.h>
59 1.1.10.2 simonb #include <compat/netbsd32/netbsd32_exec.h>
60 1.1.10.2 simonb #include <compat/linux32/common/linux32_exec.h>
61 1.1.10.2 simonb
62 1.1.10.2 simonb #include <machine/frame.h>
63 1.1.10.2 simonb
64 1.1.10.2 simonb #ifdef DEBUG_LINUX
65 1.1.10.2 simonb #define DPRINTF(a) uprintf a
66 1.1.10.2 simonb #else
67 1.1.10.2 simonb #define DPRINTF(a)
68 1.1.10.2 simonb #endif
69 1.1.10.2 simonb
70 1.1.10.2 simonb #if 0
71 1.1.10.2 simonb static int ELFNAME2(linux32,signature) __P((struct lwp *, struct exec_package *,
72 1.1.10.2 simonb Elf_Ehdr *, char *));
73 1.1.10.2 simonb #ifdef LINUX_GCC_SIGNATURE
74 1.1.10.2 simonb static int ELFNAME2(linux32,gcc_signature) __P((struct lwp *l,
75 1.1.10.2 simonb struct exec_package *, Elf_Ehdr *));
76 1.1.10.2 simonb #endif
77 1.1.10.2 simonb #ifdef LINUX_ATEXIT_SIGNATURE
78 1.1.10.2 simonb static int ELFNAME2(linux32,atexit_signature) __P((struct lwp *l,
79 1.1.10.2 simonb struct exec_package *, Elf_Ehdr *));
80 1.1.10.2 simonb #endif
81 1.1.10.2 simonb #endif
82 1.1.10.2 simonb int linux32_copyinargs(struct exec_package *, struct ps_strings *,
83 1.1.10.2 simonb void *, size_t, const void *, const void *);
84 1.1.10.2 simonb
85 1.1.10.2 simonb int
86 1.1.10.2 simonb ELFNAME2(linux32,probe)(l, epp, eh, itp, pos)
87 1.1.10.2 simonb struct lwp *l;
88 1.1.10.2 simonb struct exec_package *epp;
89 1.1.10.2 simonb void *eh;
90 1.1.10.2 simonb char *itp;
91 1.1.10.2 simonb vaddr_t *pos;
92 1.1.10.2 simonb {
93 1.1.10.2 simonb int error;
94 1.1.10.2 simonb
95 1.1.10.2 simonb if (((error = ELFNAME2(linux,signature)(l, epp, eh, itp)) != 0) &&
96 1.1.10.2 simonb #ifdef LINUX_GCC_SIGNATURE
97 1.1.10.2 simonb ((error = ELFNAME2(linux,gcc_signature)(l, epp, eh)) != 0) &&
98 1.1.10.2 simonb #endif
99 1.1.10.2 simonb #ifdef LINUX_ATEXIT_SIGNATURE
100 1.1.10.2 simonb ((error = ELFNAME2(linux,atexit_signature)(l, epp, eh)) != 0) &&
101 1.1.10.2 simonb #endif
102 1.1.10.2 simonb 1)
103 1.1.10.2 simonb return error;
104 1.1.10.2 simonb
105 1.1.10.2 simonb if (itp) {
106 1.1.10.2 simonb if ((error = emul_find_interp(l, epp->ep_esch->es_emul->e_path,
107 1.1.10.2 simonb itp)))
108 1.1.10.2 simonb return (error);
109 1.1.10.2 simonb }
110 1.1.10.2 simonb #if 0
111 1.1.10.2 simonb DPRINTF(("linux32_probe: returning 0\n"));
112 1.1.10.2 simonb #endif
113 1.1.10.2 simonb
114 1.1.10.2 simonb epp->ep_flags |= EXEC_32;
115 1.1.10.2 simonb epp->ep_vm_minaddr = VM_MIN_ADDRESS;
116 1.1.10.2 simonb epp->ep_vm_maxaddr = USRSTACK32;
117 1.1.10.2 simonb
118 1.1.10.2 simonb return 0;
119 1.1.10.2 simonb }
120 1.1.10.2 simonb
121 1.1.10.2 simonb /* round up and down to page boundaries. */
122 1.1.10.2 simonb #define ELF_ROUND(a, b) (((a) + (b) - 1) & ~((b) - 1))
123 1.1.10.2 simonb #define ELF_TRUNC(a, b) ((a) & ~((b) - 1))
124 1.1.10.2 simonb
125 1.1.10.2 simonb /*
126 1.1.10.2 simonb * Copy arguments onto the stack in the normal way, but add some
127 1.1.10.2 simonb * extra information in case of dynamic binding.
128 1.1.10.2 simonb */
129 1.1.10.2 simonb int
130 1.1.10.2 simonb linux32_elf32_copyargs(struct lwp *l, struct exec_package *pack,
131 1.1.10.2 simonb struct ps_strings *arginfo, char **stackp, void *argp)
132 1.1.10.2 simonb {
133 1.1.10.2 simonb struct linux32_extra_stack_data *esdp, esd;
134 1.1.10.2 simonb struct elf_args *ap;
135 1.1.10.2 simonb struct vattr *vap;
136 1.1.10.2 simonb struct proc *p;
137 1.1.10.2 simonb Elf_Ehdr *eh;
138 1.1.10.2 simonb Elf_Phdr *ph;
139 1.1.10.2 simonb Elf_Addr phdr = 0;
140 1.1.10.2 simonb u_long phsize;
141 1.1.10.2 simonb int error;
142 1.1.10.2 simonb int i;
143 1.1.10.2 simonb
144 1.1.10.2 simonb p = l->l_proc;
145 1.1.10.2 simonb
146 1.1.10.2 simonb if ((error = netbsd32_copyargs(l, pack, arginfo, stackp, argp)) != 0)
147 1.1.10.2 simonb return error;
148 1.1.10.2 simonb
149 1.1.10.2 simonb /*
150 1.1.10.2 simonb * Push extra arguments on the stack needed by dynamically
151 1.1.10.2 simonb * linked binaries and static binaries as well.
152 1.1.10.2 simonb */
153 1.1.10.2 simonb memset(&esd, 0, sizeof(esd));
154 1.1.10.2 simonb esdp = (struct linux32_extra_stack_data *)(*stackp);
155 1.1.10.2 simonb ap = (struct elf_args *)pack->ep_emul_arg;
156 1.1.10.2 simonb vap = pack->ep_vap;
157 1.1.10.2 simonb eh = (Elf_Ehdr *)pack->ep_hdr;
158 1.1.10.2 simonb
159 1.1.10.2 simonb /*
160 1.1.10.2 simonb * We forgot this, so we ned to reload it now. XXX keep track of it?
161 1.1.10.2 simonb */
162 1.1.10.2 simonb if (ap == NULL) {
163 1.1.10.2 simonb phsize = eh->e_phnum * sizeof(Elf_Phdr);
164 1.1.10.2 simonb ph = (Elf_Phdr *)malloc(phsize, M_TEMP, M_WAITOK);
165 1.1.10.2 simonb error = exec_read_from(l, pack->ep_vp, eh->e_phoff, ph, phsize);
166 1.1.10.2 simonb if (error != 0) {
167 1.1.10.2 simonb for (i = 0; i < eh->e_phnum; i++) {
168 1.1.10.2 simonb if (ph[i].p_type == PT_PHDR) {
169 1.1.10.2 simonb phdr = ph[i].p_vaddr;
170 1.1.10.2 simonb break;
171 1.1.10.2 simonb }
172 1.1.10.2 simonb }
173 1.1.10.2 simonb }
174 1.1.10.2 simonb free(ph, M_TEMP);
175 1.1.10.2 simonb }
176 1.1.10.2 simonb
177 1.1.10.2 simonb
178 1.1.10.2 simonb /*
179 1.1.10.2 simonb * The exec_package doesn't have a proc pointer and it's not
180 1.1.10.2 simonb * exactly trivial to add one since the credentials are
181 1.1.10.2 simonb * changing. XXX Linux uses curlwp's credentials.
182 1.1.10.2 simonb * Why can't we use them too?
183 1.1.10.2 simonb */
184 1.1.10.2 simonb
185 1.1.10.2 simonb i = 0;
186 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_SYSINFO;
187 1.1.10.2 simonb esd.ai[i++].a_v = (netbsd32_pointer_t)(long)&esdp->kernel_vsyscall[0];
188 1.1.10.2 simonb
189 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_SYSINFO_EHDR;
190 1.1.10.2 simonb esd.ai[i++].a_v = (netbsd32_pointer_t)(long)&esdp->elfhdr;
191 1.1.10.2 simonb
192 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_HWCAP;
193 1.1.10.2 simonb esd.ai[i++].a_v = LINUX32_CPUCAP;
194 1.1.10.2 simonb
195 1.1.10.2 simonb esd.ai[i].a_type = AT_PAGESZ;
196 1.1.10.2 simonb esd.ai[i++].a_v = PAGE_SIZE;
197 1.1.10.2 simonb
198 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_CLKTCK;
199 1.1.10.2 simonb esd.ai[i++].a_v = hz;
200 1.1.10.2 simonb
201 1.1.10.2 simonb esd.ai[i].a_type = AT_PHDR;
202 1.1.10.2 simonb esd.ai[i++].a_v = (ap ? ap->arg_phaddr: phdr);
203 1.1.10.2 simonb
204 1.1.10.2 simonb esd.ai[i].a_type = AT_PHENT;
205 1.1.10.2 simonb esd.ai[i++].a_v = (ap ? ap->arg_phentsize : eh->e_phentsize);
206 1.1.10.2 simonb
207 1.1.10.2 simonb esd.ai[i].a_type = AT_PHNUM;
208 1.1.10.2 simonb esd.ai[i++].a_v = (ap ? ap->arg_phnum : eh->e_phnum);
209 1.1.10.2 simonb
210 1.1.10.2 simonb esd.ai[i].a_type = AT_BASE;
211 1.1.10.2 simonb esd.ai[i++].a_v = (ap ? ap->arg_interp : 0);
212 1.1.10.2 simonb
213 1.1.10.2 simonb esd.ai[i].a_type = AT_FLAGS;
214 1.1.10.2 simonb esd.ai[i++].a_v = 0;
215 1.1.10.2 simonb
216 1.1.10.2 simonb esd.ai[i].a_type = AT_ENTRY;
217 1.1.10.2 simonb esd.ai[i++].a_v = (ap ? ap->arg_entry : eh->e_entry);
218 1.1.10.2 simonb
219 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_EGID;
220 1.1.10.2 simonb esd.ai[i++].a_v =
221 1.1.10.2 simonb ((vap->va_mode & S_ISGID) ? vap->va_gid : p->p_ucred->cr_gid);
222 1.1.10.2 simonb
223 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_GID;
224 1.1.10.2 simonb esd.ai[i++].a_v = p->p_cred->p_rgid;
225 1.1.10.2 simonb
226 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_EUID;
227 1.1.10.2 simonb esd.ai[i++].a_v =
228 1.1.10.2 simonb ((vap->va_mode & S_ISUID) ? vap->va_uid : p->p_ucred->cr_uid);
229 1.1.10.2 simonb
230 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_UID;
231 1.1.10.2 simonb esd.ai[i++].a_v = p->p_cred->p_ruid;
232 1.1.10.2 simonb
233 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_SECURE;
234 1.1.10.2 simonb esd.ai[i++].a_v = 0;
235 1.1.10.2 simonb
236 1.1.10.2 simonb esd.ai[i].a_type = LINUX_AT_PLATFORM;
237 1.1.10.2 simonb esd.ai[i++].a_v = (netbsd32_pointer_t)(long)&esdp->hw_platform[0];
238 1.1.10.2 simonb
239 1.1.10.2 simonb esd.ai[i].a_type = AT_NULL;
240 1.1.10.2 simonb esd.ai[i++].a_v = 0;
241 1.1.10.2 simonb
242 1.1.10.2 simonb #ifdef DEBUG_LINUX
243 1.1.10.2 simonb if (i != LINUX32_ELF_AUX_ENTRIES) {
244 1.1.10.2 simonb printf("linux32_elf32_copyargs: %d Aux entries\n", i);
245 1.1.10.2 simonb return EINVAL;
246 1.1.10.2 simonb }
247 1.1.10.2 simonb #endif
248 1.1.10.2 simonb
249 1.1.10.2 simonb memcpy(esd.kernel_vsyscall, linux32_kernel_vsyscall,
250 1.1.10.2 simonb sizeof(linux32_kernel_vsyscall));
251 1.1.10.2 simonb
252 1.1.10.2 simonb memcpy(&esd.elfhdr, eh, sizeof(*eh));
253 1.1.10.2 simonb
254 1.1.10.2 simonb strcpy(esd.hw_platform, LINUX32_PLATFORM);
255 1.1.10.2 simonb
256 1.1.10.2 simonb if (ap) {
257 1.1.10.2 simonb free((char *)ap, M_TEMP);
258 1.1.10.2 simonb pack->ep_emul_arg = NULL;
259 1.1.10.2 simonb }
260 1.1.10.2 simonb
261 1.1.10.2 simonb /*
262 1.1.10.2 simonb * Copy out the ELF auxiliary table and hw platform name
263 1.1.10.2 simonb */
264 1.1.10.2 simonb if ((error = copyout(&esd, esdp, sizeof(esd))) != 0)
265 1.1.10.2 simonb return error;
266 1.1.10.2 simonb *stackp += sizeof(esd);
267 1.1.10.2 simonb return 0;
268 1.1.10.2 simonb }
269 1.1.10.2 simonb
270