sunos_exec_aout.c revision 1.4 1 1.4 fredette /* $NetBSD: sunos_exec_aout.c,v 1.4 2001/11/26 18:15:16 fredette Exp $ */
2 1.1 jdolecek
3 1.1 jdolecek /*
4 1.1 jdolecek * Copyright (c) 1993 Theo de Raadt
5 1.1 jdolecek * All rights reserved.
6 1.1 jdolecek *
7 1.1 jdolecek * Redistribution and use in source and binary forms, with or without
8 1.1 jdolecek * modification, are permitted provided that the following conditions
9 1.1 jdolecek * are met:
10 1.1 jdolecek * 1. Redistributions of source code must retain the above copyright
11 1.1 jdolecek * notice, this list of conditions and the following disclaimer.
12 1.1 jdolecek * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 jdolecek * notice, this list of conditions and the following disclaimer in the
14 1.1 jdolecek * documentation and/or other materials provided with the distribution.
15 1.1 jdolecek * 3. The name of the author may not be used to endorse or promote products
16 1.1 jdolecek * derived from this software without specific prior written permission
17 1.1 jdolecek *
18 1.1 jdolecek * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 1.1 jdolecek * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 1.1 jdolecek * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 1.1 jdolecek * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 1.1 jdolecek * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 1.1 jdolecek * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 1.1 jdolecek * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 1.1 jdolecek * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 1.1 jdolecek * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 1.1 jdolecek * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 1.1 jdolecek */
29 1.3 lukem
30 1.3 lukem #include <sys/cdefs.h>
31 1.4 fredette __KERNEL_RCSID(0, "$NetBSD: sunos_exec_aout.c,v 1.4 2001/11/26 18:15:16 fredette Exp $");
32 1.1 jdolecek
33 1.1 jdolecek #include <sys/param.h>
34 1.1 jdolecek #include <sys/systm.h>
35 1.1 jdolecek #include <sys/filedesc.h>
36 1.1 jdolecek #include <sys/kernel.h>
37 1.1 jdolecek #include <sys/proc.h>
38 1.1 jdolecek #include <sys/mount.h>
39 1.1 jdolecek #include <sys/malloc.h>
40 1.1 jdolecek #include <sys/namei.h>
41 1.1 jdolecek #include <sys/signalvar.h>
42 1.1 jdolecek #include <sys/vnode.h>
43 1.1 jdolecek #include <sys/file.h>
44 1.1 jdolecek #include <sys/exec.h>
45 1.1 jdolecek #include <sys/resourcevar.h>
46 1.1 jdolecek #include <sys/wait.h>
47 1.1 jdolecek
48 1.1 jdolecek #include <sys/mman.h>
49 1.1 jdolecek
50 1.1 jdolecek #include <machine/cpu.h>
51 1.1 jdolecek #include <machine/reg.h>
52 1.1 jdolecek
53 1.1 jdolecek #include <compat/sunos/sunos.h>
54 1.1 jdolecek #include <compat/sunos/sunos_exec.h>
55 1.1 jdolecek #include <compat/sunos/sunos_syscall.h>
56 1.1 jdolecek
57 1.1 jdolecek #ifdef __sparc__
58 1.1 jdolecek #define sunos_exec_aout_prep_zmagic exec_aout_prep_zmagic
59 1.1 jdolecek #define sunos_exec_aout_prep_nmagic exec_aout_prep_nmagic
60 1.1 jdolecek #define sunos_exec_aout_prep_omagic exec_aout_prep_omagic
61 1.1 jdolecek #endif
62 1.1 jdolecek
63 1.1 jdolecek int sunos_exec_aout_prep_zmagic __P((struct proc *, struct exec_package *));
64 1.1 jdolecek int sunos_exec_aout_prep_nmagic __P((struct proc *, struct exec_package *));
65 1.1 jdolecek int sunos_exec_aout_prep_omagic __P((struct proc *, struct exec_package *));
66 1.1 jdolecek
67 1.1 jdolecek int
68 1.1 jdolecek exec_sunos_aout_makecmds(p, epp)
69 1.1 jdolecek struct proc *p;
70 1.1 jdolecek struct exec_package *epp;
71 1.1 jdolecek {
72 1.1 jdolecek struct sunos_exec *sunmag = epp->ep_hdr;
73 1.1 jdolecek int error = ENOEXEC;
74 1.1 jdolecek
75 1.4 fredette if (!SUNOS_M_NATIVE(sunmag->a_machtype))
76 1.1 jdolecek return (ENOEXEC);
77 1.1 jdolecek
78 1.1 jdolecek switch (sunmag->a_magic) {
79 1.1 jdolecek case ZMAGIC:
80 1.1 jdolecek error = sunos_exec_aout_prep_zmagic(p, epp);
81 1.1 jdolecek break;
82 1.1 jdolecek case NMAGIC:
83 1.1 jdolecek error = sunos_exec_aout_prep_nmagic(p, epp);
84 1.1 jdolecek break;
85 1.1 jdolecek case OMAGIC:
86 1.1 jdolecek error = sunos_exec_aout_prep_omagic(p, epp);
87 1.1 jdolecek break;
88 1.1 jdolecek }
89 1.1 jdolecek return error;
90 1.1 jdolecek }
91 1.1 jdolecek
92 1.1 jdolecek /*
93 1.4 fredette * the code below is only needed for sun2/sun3 emulation.
94 1.1 jdolecek */
95 1.1 jdolecek #ifndef __sparc__
96 1.1 jdolecek
97 1.1 jdolecek /* suns keep data seg aligned to SEGSIZ because of sun custom mmu */
98 1.1 jdolecek #define SEGSIZ 0x20000
99 1.4 fredette #define SUNOS_N_TXTADDR(x,m) 0x2000
100 1.1 jdolecek #define SUNOS_N_DATADDR(x,m) (((m)==OMAGIC) ? \
101 1.1 jdolecek (SUNOS_N_TXTADDR(x,m) + (x).a_text) : \
102 1.1 jdolecek (SEGSIZ + ((SUNOS_N_TXTADDR(x,m) + (x).a_text - 1) & ~(SEGSIZ-1))))
103 1.1 jdolecek #define SUNOS_N_BSSADDR(x,m) (SUNOS_N_DATADDR(x,m)+(x).a_data)
104 1.1 jdolecek
105 1.1 jdolecek #define SUNOS_N_TXTOFF(x,m) ((m)==ZMAGIC ? 0 : sizeof (struct exec))
106 1.1 jdolecek #define SUNOS_N_DATOFF(x,m) (SUNOS_N_TXTOFF(x,m) + (x).a_text)
107 1.1 jdolecek
108 1.1 jdolecek /*
109 1.1 jdolecek * sunos_exec_aout_prep_zmagic(): Prepare a SunOS ZMAGIC binary's exec package
110 1.1 jdolecek *
111 1.1 jdolecek * First, set of the various offsets/lengths in the exec package.
112 1.1 jdolecek *
113 1.1 jdolecek * Then, mark the text image busy (so it can be demand paged) or error
114 1.1 jdolecek * out if this is not possible. Finally, set up vmcmds for the
115 1.1 jdolecek * text, data, bss, and stack segments.
116 1.1 jdolecek */
117 1.1 jdolecek int
118 1.1 jdolecek sunos_exec_aout_prep_zmagic(p, epp)
119 1.1 jdolecek struct proc *p;
120 1.1 jdolecek struct exec_package *epp;
121 1.1 jdolecek {
122 1.1 jdolecek struct exec *execp = epp->ep_hdr;
123 1.1 jdolecek
124 1.1 jdolecek epp->ep_taddr = SUNOS_N_TXTADDR(*execp, ZMAGIC);
125 1.1 jdolecek epp->ep_tsize = execp->a_text;
126 1.1 jdolecek epp->ep_daddr = SUNOS_N_DATADDR(*execp, ZMAGIC);
127 1.1 jdolecek epp->ep_dsize = execp->a_data + execp->a_bss;
128 1.1 jdolecek epp->ep_entry = execp->a_entry;
129 1.1 jdolecek
130 1.1 jdolecek /*
131 1.1 jdolecek * check if vnode is in open for writing, because we want to
132 1.1 jdolecek * demand-page out of it. if it is, don't do it, for various
133 1.1 jdolecek * reasons
134 1.1 jdolecek */
135 1.1 jdolecek if ((execp->a_text != 0 || execp->a_data != 0) &&
136 1.1 jdolecek epp->ep_vp->v_writecount != 0) {
137 1.1 jdolecek #ifdef DIAGNOSTIC
138 1.1 jdolecek if (epp->ep_vp->v_flag & VTEXT)
139 1.1 jdolecek panic("exec: a VTEXT vnode has writecount != 0\n");
140 1.1 jdolecek #endif
141 1.1 jdolecek return ETXTBSY;
142 1.1 jdolecek }
143 1.2 thorpej epp->ep_vp->v_flag |= VTEXT;
144 1.1 jdolecek
145 1.1 jdolecek /* set up command for text segment */
146 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, execp->a_text,
147 1.1 jdolecek epp->ep_taddr, epp->ep_vp, SUNOS_N_TXTOFF(*execp, ZMAGIC),
148 1.1 jdolecek VM_PROT_READ|VM_PROT_EXECUTE);
149 1.1 jdolecek
150 1.1 jdolecek /* set up command for data segment */
151 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, execp->a_data,
152 1.1 jdolecek epp->ep_daddr, epp->ep_vp, SUNOS_N_DATOFF(*execp, ZMAGIC),
153 1.1 jdolecek VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
154 1.1 jdolecek
155 1.1 jdolecek /* set up command for bss segment */
156 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, execp->a_bss,
157 1.1 jdolecek epp->ep_daddr + execp->a_data, NULLVP, 0,
158 1.1 jdolecek VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
159 1.1 jdolecek
160 1.1 jdolecek return exec_aout_setup_stack(p, epp);
161 1.1 jdolecek }
162 1.1 jdolecek
163 1.1 jdolecek /*
164 1.1 jdolecek * sunos_exec_aout_prep_nmagic(): Prepare a SunOS NMAGIC binary's exec package
165 1.1 jdolecek */
166 1.1 jdolecek int
167 1.1 jdolecek sunos_exec_aout_prep_nmagic(p, epp)
168 1.1 jdolecek struct proc *p;
169 1.1 jdolecek struct exec_package *epp;
170 1.1 jdolecek {
171 1.1 jdolecek struct exec *execp = epp->ep_hdr;
172 1.1 jdolecek long bsize, baddr;
173 1.1 jdolecek
174 1.1 jdolecek epp->ep_taddr = SUNOS_N_TXTADDR(*execp, NMAGIC);
175 1.1 jdolecek epp->ep_tsize = execp->a_text;
176 1.1 jdolecek epp->ep_daddr = SUNOS_N_DATADDR(*execp, NMAGIC);
177 1.1 jdolecek epp->ep_dsize = execp->a_data + execp->a_bss;
178 1.1 jdolecek epp->ep_entry = execp->a_entry;
179 1.1 jdolecek
180 1.1 jdolecek /* set up command for text segment */
181 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, execp->a_text,
182 1.1 jdolecek epp->ep_taddr, epp->ep_vp, SUNOS_N_TXTOFF(*execp, NMAGIC),
183 1.1 jdolecek VM_PROT_READ|VM_PROT_EXECUTE);
184 1.1 jdolecek
185 1.1 jdolecek /* set up command for data segment */
186 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, execp->a_data,
187 1.1 jdolecek epp->ep_daddr, epp->ep_vp, SUNOS_N_DATOFF(*execp, NMAGIC),
188 1.1 jdolecek VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
189 1.1 jdolecek
190 1.1 jdolecek /* set up command for bss segment */
191 1.1 jdolecek baddr = roundup(epp->ep_daddr + execp->a_data, NBPG);
192 1.1 jdolecek bsize = epp->ep_daddr + epp->ep_dsize - baddr;
193 1.1 jdolecek if (bsize > 0)
194 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, bsize, baddr,
195 1.1 jdolecek NULLVP, 0, VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
196 1.1 jdolecek
197 1.1 jdolecek return exec_aout_setup_stack(p, epp);
198 1.1 jdolecek }
199 1.1 jdolecek
200 1.1 jdolecek /*
201 1.1 jdolecek * sunos_exec_aout_prep_omagic(): Prepare a SunOS OMAGIC binary's exec package
202 1.1 jdolecek */
203 1.1 jdolecek int
204 1.1 jdolecek sunos_exec_aout_prep_omagic(p, epp)
205 1.1 jdolecek struct proc *p;
206 1.1 jdolecek struct exec_package *epp;
207 1.1 jdolecek {
208 1.1 jdolecek struct exec *execp = epp->ep_hdr;
209 1.1 jdolecek long bsize, baddr;
210 1.1 jdolecek
211 1.1 jdolecek epp->ep_taddr = SUNOS_N_TXTADDR(*execp, OMAGIC);
212 1.1 jdolecek epp->ep_tsize = execp->a_text;
213 1.1 jdolecek epp->ep_daddr = SUNOS_N_DATADDR(*execp, OMAGIC);
214 1.1 jdolecek epp->ep_dsize = execp->a_data + execp->a_bss;
215 1.1 jdolecek epp->ep_entry = execp->a_entry;
216 1.1 jdolecek
217 1.1 jdolecek /* set up command for text and data segments */
218 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn,
219 1.1 jdolecek execp->a_text + execp->a_data, epp->ep_taddr, epp->ep_vp,
220 1.1 jdolecek SUNOS_N_TXTOFF(*execp, OMAGIC), VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
221 1.1 jdolecek
222 1.1 jdolecek /* set up command for bss segment */
223 1.1 jdolecek baddr = roundup(epp->ep_daddr + execp->a_data, NBPG);
224 1.1 jdolecek bsize = epp->ep_daddr + epp->ep_dsize - baddr;
225 1.1 jdolecek if (bsize > 0)
226 1.1 jdolecek NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, bsize, baddr,
227 1.1 jdolecek NULLVP, 0, VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
228 1.1 jdolecek
229 1.1 jdolecek return exec_aout_setup_stack(p, epp);
230 1.1 jdolecek }
231 1.1 jdolecek #endif /* !sparc */
232