exec_ecoff.c revision 1.5 1 1.5 cgd /* $NetBSD: exec_ecoff.c,v 1.5 1994/08/18 22:09:35 cgd Exp $ */
2 1.3 cgd
3 1.1 glass /*
4 1.1 glass * Copyright (c) 1994 Adam Glass
5 1.1 glass * Copyright (c) 1993, 1994 Christopher G. Demetriou
6 1.1 glass * All rights reserved.
7 1.1 glass *
8 1.1 glass * Redistribution and use in source and binary forms, with or without
9 1.1 glass * modification, are permitted provided that the following conditions
10 1.1 glass * are met:
11 1.1 glass * 1. Redistributions of source code must retain the above copyright
12 1.1 glass * notice, this list of conditions and the following disclaimer.
13 1.1 glass * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 glass * notice, this list of conditions and the following disclaimer in the
15 1.1 glass * documentation and/or other materials provided with the distribution.
16 1.1 glass * 3. All advertising materials mentioning features or use of this software
17 1.1 glass * must display the following acknowledgement:
18 1.1 glass * This product includes software developed by Christopher G. Demetriou.
19 1.1 glass * 4. The name of the author may not be used to endorse or promote products
20 1.1 glass * derived from this software without specific prior written permission
21 1.1 glass *
22 1.1 glass * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 1.1 glass * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 1.1 glass * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 1.1 glass * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 1.1 glass * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 1.1 glass * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 1.1 glass * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 1.1 glass * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 1.1 glass * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 1.1 glass * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 1.1 glass */
33 1.1 glass
34 1.1 glass #include <sys/param.h>
35 1.1 glass #include <sys/systm.h>
36 1.1 glass #include <sys/proc.h>
37 1.1 glass #include <sys/malloc.h>
38 1.1 glass #include <sys/vnode.h>
39 1.1 glass #include <sys/exec.h>
40 1.1 glass #include <sys/resourcevar.h>
41 1.1 glass #include <vm/vm.h>
42 1.1 glass
43 1.1 glass #include <sys/exec_ecoff.h>
44 1.1 glass
45 1.2 glass int exec_ecoff_prep_omagic __P((struct proc *, struct exec_package *,
46 1.2 glass struct ecoff_filehdr *,
47 1.2 glass struct ecoff_aouthdr *));
48 1.2 glass int exec_ecoff_prep_nmagic __P((struct proc *, struct exec_package *,
49 1.1 glass struct ecoff_filehdr *,
50 1.1 glass struct ecoff_aouthdr *));
51 1.2 glass int exec_ecoff_prep_zmagic __P((struct proc *, struct exec_package *,
52 1.1 glass struct ecoff_filehdr *,
53 1.1 glass struct ecoff_aouthdr *));
54 1.1 glass int exec_ecoff_setup_stack __P((struct proc *, struct exec_package *));
55 1.1 glass
56 1.1 glass /*
57 1.1 glass * exec_ecoff_makecmds(): Check if it's an ecoff-format executable.
58 1.1 glass *
59 1.1 glass * Given a proc pointer and an exec package pointer, see if the referent
60 1.1 glass * of the epp is in ecoff format. Check 'standard' magic numbers for
61 1.1 glass * this architecture. If that fails, return failure.
62 1.1 glass *
63 1.1 glass * This function is responsible for creating a set of vmcmds which can be
64 1.1 glass * used to build the process's vm space and inserting them into the exec
65 1.1 glass * package.
66 1.1 glass */
67 1.1 glass
68 1.1 glass int
69 1.1 glass exec_ecoff_makecmds(p, epp)
70 1.1 glass struct proc *p;
71 1.1 glass struct exec_package *epp;
72 1.1 glass {
73 1.1 glass u_long midmag, magic;
74 1.1 glass u_short mid;
75 1.1 glass int error;
76 1.1 glass struct ecoff_filehdr *efp = epp->ep_hdr;
77 1.1 glass struct ecoff_aouthdr *eap;
78 1.1 glass
79 1.1 glass if (epp->ep_hdrvalid < ECOFF_HDR_SIZE)
80 1.1 glass return ENOEXEC;
81 1.1 glass
82 1.1 glass if (ECOFF_BADMAG(efp))
83 1.1 glass return ENOEXEC;
84 1.1 glass
85 1.5 cgd eap = (struct ecoff_aouthdr *)
86 1.5 cgd ((caddr_t)epp->ep_hdr + sizeof(struct ecoff_filehdr));
87 1.1 glass switch (eap->ea_magic) {
88 1.2 glass case ECOFF_OMAGIC:
89 1.2 glass error = exec_ecoff_prep_omagic(p, epp, efp, eap);
90 1.2 glass break;
91 1.2 glass case ECOFF_NMAGIC:
92 1.2 glass error = exec_ecoff_prep_nmagic(p, epp, efp, eap);
93 1.2 glass break;
94 1.1 glass case ECOFF_ZMAGIC:
95 1.1 glass error = exec_ecoff_prep_zmagic(p, epp, efp, eap);
96 1.1 glass break;
97 1.1 glass default:
98 1.1 glass return ENOEXEC;
99 1.1 glass }
100 1.1 glass
101 1.1 glass if (error == 0)
102 1.1 glass error = cpu_exec_ecoff_hook(p, epp, eap);
103 1.1 glass
104 1.1 glass if (error)
105 1.1 glass kill_vmcmds(&epp->ep_vmcmds);
106 1.1 glass
107 1.1 glass bad:
108 1.1 glass return error;
109 1.1 glass }
110 1.1 glass
111 1.1 glass /*
112 1.2 glass * exec_ecoff_setup_stack(): Set up the stack segment for an ecoff
113 1.2 glass * executable.
114 1.1 glass *
115 1.2 glass * Note that the ep_ssize parameter must be set to be the current stack
116 1.2 glass * limit; this is adjusted in the body of execve() to yield the
117 1.2 glass * appropriate stack segment usage once the argument length is
118 1.2 glass * calculated.
119 1.1 glass *
120 1.2 glass * This function returns an int for uniformity with other (future) formats'
121 1.2 glass * stack setup functions. They might have errors to return.
122 1.1 glass */
123 1.1 glass
124 1.2 glass int
125 1.2 glass exec_ecoff_setup_stack(p, epp)
126 1.1 glass struct proc *p;
127 1.1 glass struct exec_package *epp;
128 1.1 glass {
129 1.2 glass
130 1.2 glass epp->ep_maxsaddr = USRSTACK - MAXSSIZ;
131 1.2 glass epp->ep_minsaddr = USRSTACK;
132 1.2 glass epp->ep_ssize = p->p_rlimit[RLIMIT_STACK].rlim_cur;
133 1.1 glass
134 1.1 glass /*
135 1.2 glass * set up commands for stack. note that this takes *two*, one to
136 1.2 glass * map the part of the stack which we can access, and one to map
137 1.2 glass * the part which we can't.
138 1.2 glass *
139 1.2 glass * arguably, it could be made into one, but that would require the
140 1.2 glass * addition of another mapping proc, which is unnecessary
141 1.2 glass *
142 1.2 glass * note that in memory, things assumed to be: 0 ....... ep_maxsaddr
143 1.2 glass * <stack> ep_minsaddr
144 1.1 glass */
145 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero,
146 1.2 glass ((epp->ep_minsaddr - epp->ep_ssize) - epp->ep_maxsaddr),
147 1.2 glass epp->ep_maxsaddr, NULLVP, 0, VM_PROT_NONE);
148 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, epp->ep_ssize,
149 1.2 glass (epp->ep_minsaddr - epp->ep_ssize), NULLVP, 0,
150 1.1 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
151 1.1 glass
152 1.2 glass return 0;
153 1.2 glass }
154 1.1 glass
155 1.1 glass
156 1.1 glass /*
157 1.1 glass * exec_ecoff_prep_omagic(): Prepare a ECOFF OMAGIC binary's exec package
158 1.1 glass */
159 1.2 glass
160 1.2 glass int
161 1.2 glass exec_ecoff_prep_omagic(p, epp, efp, eap)
162 1.1 glass struct proc *p;
163 1.1 glass struct exec_package *epp;
164 1.1 glass struct ecoff_filehdr *efp;
165 1.1 glass struct ecoff_aouthdr *eap;
166 1.1 glass {
167 1.2 glass epp->ep_taddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_text_start);
168 1.1 glass epp->ep_tsize = eap->ea_tsize;
169 1.2 glass epp->ep_daddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_data_start);
170 1.4 glass epp->ep_dsize = eap->ea_dsize + eap->ea_bsize;
171 1.1 glass epp->ep_entry = eap->ea_entry;
172 1.1 glass
173 1.1 glass /* set up command for text and data segments */
174 1.1 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn,
175 1.1 glass eap->ea_tsize + eap->ea_dsize, epp->ep_taddr, epp->ep_vp,
176 1.1 glass ECOFF_TXTOFF(efp, eap),
177 1.1 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
178 1.1 glass
179 1.1 glass /* set up command for bss segment */
180 1.1 glass if (eap->ea_bsize > 0)
181 1.1 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, eap->ea_bsize,
182 1.2 glass ECOFF_SEGMENT_ALIGN(eap, eap->ea_bss_start),
183 1.2 glass NULLVP, 0,
184 1.1 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
185 1.1 glass
186 1.1 glass return exec_ecoff_setup_stack(p, epp);
187 1.1 glass }
188 1.1 glass
189 1.1 glass /*
190 1.2 glass * exec_ecoff_prep_nmagic(): Prepare a 'native' NMAGIC ECOFF binary's exec
191 1.2 glass * package.
192 1.2 glass */
193 1.2 glass
194 1.2 glass int
195 1.2 glass exec_ecoff_prep_nmagic(p, epp, efp, eap)
196 1.2 glass struct proc *p;
197 1.2 glass struct exec_package *epp;
198 1.2 glass struct ecoff_filehdr *efp;
199 1.2 glass struct ecoff_aouthdr *eap;
200 1.2 glass {
201 1.2 glass epp->ep_taddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_text_start);
202 1.2 glass epp->ep_tsize = eap->ea_tsize;
203 1.2 glass epp->ep_daddr = ECOFF_ROUND(eap->ea_data_start, ECOFF_LDPGSZ);
204 1.4 glass epp->ep_dsize = eap->ea_dsize + eap->ea_bsize;
205 1.2 glass epp->ep_entry = eap->ea_entry;
206 1.2 glass
207 1.2 glass /* set up command for text segment */
208 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, epp->ep_tsize,
209 1.2 glass epp->ep_taddr, epp->ep_vp, ECOFF_TXTOFF(efp, eap),
210 1.2 glass VM_PROT_READ|VM_PROT_EXECUTE);
211 1.2 glass
212 1.2 glass /* set up command for data segment */
213 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, epp->ep_dsize,
214 1.2 glass epp->ep_daddr, epp->ep_vp, ECOFF_DATOFF(efp, eap),
215 1.2 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
216 1.2 glass
217 1.2 glass /* set up command for bss segment */
218 1.2 glass if (eap->ea_bsize > 0)
219 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, eap->ea_bsize,
220 1.2 glass ECOFF_SEGMENT_ALIGN(eap, eap->ea_bss_start),
221 1.2 glass NULLVP, 0,
222 1.2 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
223 1.2 glass
224 1.2 glass return exec_ecoff_setup_stack(p, epp);
225 1.2 glass }
226 1.2 glass
227 1.2 glass /*
228 1.2 glass * exec_ecoff_prep_zmagic(): Prepare a ECOFF ZMAGIC binary's exec package
229 1.1 glass *
230 1.2 glass * First, set the various offsets/lengths in the exec package.
231 1.1 glass *
232 1.2 glass * Then, mark the text image busy (so it can be demand paged) or error
233 1.2 glass * out if this is not possible. Finally, set up vmcmds for the
234 1.2 glass * text, data, bss, and stack segments.
235 1.1 glass */
236 1.1 glass
237 1.1 glass int
238 1.2 glass exec_ecoff_prep_zmagic(p, epp, efp, eap)
239 1.1 glass struct proc *p;
240 1.1 glass struct exec_package *epp;
241 1.2 glass struct ecoff_filehdr *efp;
242 1.2 glass struct ecoff_aouthdr *eap;
243 1.1 glass {
244 1.2 glass epp->ep_taddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_text_start);
245 1.2 glass epp->ep_tsize = eap->ea_tsize;
246 1.2 glass epp->ep_daddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_data_start);
247 1.4 glass epp->ep_dsize = eap->ea_dsize + eap->ea_bsize;
248 1.2 glass epp->ep_entry = eap->ea_entry;
249 1.1 glass
250 1.1 glass /*
251 1.2 glass * check if vnode is in open for writing, because we want to
252 1.2 glass * demand-page out of it. if it is, don't do it, for various
253 1.2 glass * reasons
254 1.1 glass */
255 1.2 glass if ((eap->ea_tsize != 0 || eap->ea_dsize != 0) &&
256 1.2 glass epp->ep_vp->v_writecount != 0) {
257 1.2 glass #ifdef DIAGNOSTIC
258 1.2 glass if (epp->ep_vp->v_flag & VTEXT)
259 1.2 glass panic("exec: a VTEXT vnode has writecount != 0\n");
260 1.2 glass #endif
261 1.2 glass return ETXTBSY;
262 1.2 glass }
263 1.2 glass epp->ep_vp->v_flag |= VTEXT;
264 1.2 glass
265 1.2 glass /* set up command for text segment */
266 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, eap->ea_tsize,
267 1.2 glass epp->ep_taddr, epp->ep_vp, ECOFF_TXTOFF(efp, eap),
268 1.2 glass VM_PROT_READ|VM_PROT_EXECUTE);
269 1.2 glass
270 1.2 glass /* set up command for data segment */
271 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, eap->ea_dsize,
272 1.2 glass epp->ep_daddr, epp->ep_vp,
273 1.2 glass ECOFF_DATOFF(efp, eap),
274 1.2 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
275 1.2 glass
276 1.2 glass /* set up command for bss segment */
277 1.2 glass NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, eap->ea_bsize,
278 1.2 glass ECOFF_SEGMENT_ALIGN(eap, eap->ea_bss_start), NULLVP, 0,
279 1.2 glass VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
280 1.1 glass
281 1.2 glass return exec_ecoff_setup_stack(p, epp);
282 1.1 glass }
283