Mercurial > emacs
annotate src/unexelf.c @ 20279:69a6030e443a
(kill-region): Detect read-only text
by getting an error trying to delete it.
Handle the cases where we can, and can't, get the killed text
from the undo list with much the same code.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 19 Nov 1997 21:36:56 +0000 |
parents | 027030dd12c4 |
children | 9c3fc93e7957 |
rev | line source |
---|---|
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1 /* Copyright (C) 1985, 1986, 1987, 1988, 1990, 1992 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
2 Free Software Foundation, Inc. |
484 | 3 |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
4 This file is part of GNU Emacs. |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
5 |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
6 GNU Emacs is free software; you can redistribute it and/or modify |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
7 it under the terms of the GNU General Public License as published by |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
8 the Free Software Foundation; either version 2, or (at your option) |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
9 any later version. |
484 | 10 |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
11 GNU Emacs is distributed in the hope that it will be useful, |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
14 GNU General Public License for more details. |
484 | 15 |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
16 You should have received a copy of the GNU General Public License |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
17 along with GNU Emacs; see the file COPYING. If not, write to |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14054
diff
changeset
|
19 Boston, MA 02111-1307, USA. |
484 | 20 |
21 In other words, you are welcome to use, share and improve this program. | |
22 You are forbidden to forbid anyone else to use, share and improve | |
23 what you give them. Help stamp out software-hoarding! */ | |
24 | |
25 | |
26 /* | |
27 * unexec.c - Convert a running program into an a.out file. | |
28 * | |
29 * Author: Spencer W. Thomas | |
30 * Computer Science Dept. | |
31 * University of Utah | |
32 * Date: Tue Mar 2 1982 | |
33 * Modified heavily since then. | |
34 * | |
35 * Synopsis: | |
19201
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
36 * unexec (new_name, old_name, data_start, bss_start, entry_address) |
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
37 * char *new_name, *old_name; |
484 | 38 * unsigned data_start, bss_start, entry_address; |
39 * | |
40 * Takes a snapshot of the program and makes an a.out format file in the | |
41 * file named by the string argument new_name. | |
19201
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
42 * If old_name is non-NULL, the symbol table will be taken from the given file. |
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
43 * On some machines, an existing old_name file is required. |
484 | 44 * |
45 * The boundaries within the a.out file may be adjusted with the data_start | |
46 * and bss_start arguments. Either or both may be given as 0 for defaults. | |
47 * | |
48 * Data_start gives the boundary between the text segment and the data | |
49 * segment of the program. The text segment can contain shared, read-only | |
50 * program code and literal data, while the data segment is always unshared | |
51 * and unprotected. Data_start gives the lowest unprotected address. | |
52 * The value you specify may be rounded down to a suitable boundary | |
53 * as required by the machine you are using. | |
54 * | |
55 * Specifying zero for data_start means the boundary between text and data | |
56 * should not be the same as when the program was loaded. | |
57 * If NO_REMAP is defined, the argument data_start is ignored and the | |
58 * segment boundaries are never changed. | |
59 * | |
60 * Bss_start indicates how much of the data segment is to be saved in the | |
61 * a.out file and restored when the program is executed. It gives the lowest | |
62 * unsaved address, and is rounded up to a page boundary. The default when 0 | |
63 * is given assumes that the entire data segment is to be stored, including | |
64 * the previous data and bss as well as any additional storage allocated with | |
65 * break (2). | |
66 * | |
67 * The new file is set up to start at entry_address. | |
68 * | |
69 * If you make improvements I'd like to get them too. | |
70 * harpo!utah-cs!thomas, thomas@Utah-20 | |
71 * | |
72 */ | |
73 | |
74 /* Even more heavily modified by james@bigtex.cactus.org of Dell Computer Co. | |
75 * ELF support added. | |
76 * | |
77 * Basic theory: the data space of the running process needs to be | |
78 * dumped to the output file. Normally we would just enlarge the size | |
79 * of .data, scooting everything down. But we can't do that in ELF, | |
80 * because there is often something between the .data space and the | |
81 * .bss space. | |
82 * | |
83 * In the temacs dump below, notice that the Global Offset Table | |
84 * (.got) and the Dynamic link data (.dynamic) come between .data1 and | |
85 * .bss. It does not work to overlap .data with these fields. | |
86 * | |
87 * The solution is to create a new .data segment. This segment is | |
88 * filled with data from the current process. Since the contents of | |
89 * various sections refer to sections by index, the new .data segment | |
90 * is made the last in the table to avoid changing any existing index. | |
91 | |
92 * This is an example of how the section headers are changed. "Addr" | |
93 * is a process virtual address. "Offset" is a file offset. | |
94 | |
95 raid:/nfs/raid/src/dist-18.56/src> dump -h temacs | |
96 | |
97 temacs: | |
98 | |
99 **** SECTION HEADER TABLE **** | |
100 [No] Type Flags Addr Offset Size Name | |
101 Link Info Adralgn Entsize | |
102 | |
103 [1] 1 2 0x80480d4 0xd4 0x13 .interp | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
104 0 0 0x1 0 |
484 | 105 |
106 [2] 5 2 0x80480e8 0xe8 0x388 .hash | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
107 3 0 0x4 0x4 |
484 | 108 |
109 [3] 11 2 0x8048470 0x470 0x7f0 .dynsym | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
110 4 1 0x4 0x10 |
484 | 111 |
112 [4] 3 2 0x8048c60 0xc60 0x3ad .dynstr | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
113 0 0 0x1 0 |
484 | 114 |
115 [5] 9 2 0x8049010 0x1010 0x338 .rel.plt | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
116 3 7 0x4 0x8 |
484 | 117 |
118 [6] 1 6 0x8049348 0x1348 0x3 .init | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
119 0 0 0x4 0 |
484 | 120 |
121 [7] 1 6 0x804934c 0x134c 0x680 .plt | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
122 0 0 0x4 0x4 |
484 | 123 |
124 [8] 1 6 0x80499cc 0x19cc 0x3c56f .text | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
125 0 0 0x4 0 |
484 | 126 |
127 [9] 1 6 0x8085f3c 0x3df3c 0x3 .fini | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
128 0 0 0x4 0 |
484 | 129 |
130 [10] 1 2 0x8085f40 0x3df40 0x69c .rodata | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
131 0 0 0x4 0 |
484 | 132 |
133 [11] 1 2 0x80865dc 0x3e5dc 0xd51 .rodata1 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
134 0 0 0x4 0 |
484 | 135 |
136 [12] 1 3 0x8088330 0x3f330 0x20afc .data | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
137 0 0 0x4 0 |
484 | 138 |
139 [13] 1 3 0x80a8e2c 0x5fe2c 0x89d .data1 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
140 0 0 0x4 0 |
484 | 141 |
142 [14] 1 3 0x80a96cc 0x606cc 0x1a8 .got | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
143 0 0 0x4 0x4 |
484 | 144 |
145 [15] 6 3 0x80a9874 0x60874 0x80 .dynamic | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
146 4 0 0x4 0x8 |
484 | 147 |
148 [16] 8 3 0x80a98f4 0x608f4 0x449c .bss | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
149 0 0 0x4 0 |
484 | 150 |
151 [17] 2 0 0 0x608f4 0x9b90 .symtab | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
152 18 371 0x4 0x10 |
484 | 153 |
154 [18] 3 0 0 0x6a484 0x8526 .strtab | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
155 0 0 0x1 0 |
484 | 156 |
157 [19] 3 0 0 0x729aa 0x93 .shstrtab | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
158 0 0 0x1 0 |
484 | 159 |
160 [20] 1 0 0 0x72a3d 0x68b7 .comment | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
161 0 0 0x1 0 |
484 | 162 |
163 raid:/nfs/raid/src/dist-18.56/src> dump -h xemacs | |
164 | |
165 xemacs: | |
166 | |
167 **** SECTION HEADER TABLE **** | |
168 [No] Type Flags Addr Offset Size Name | |
169 Link Info Adralgn Entsize | |
170 | |
171 [1] 1 2 0x80480d4 0xd4 0x13 .interp | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
172 0 0 0x1 0 |
484 | 173 |
174 [2] 5 2 0x80480e8 0xe8 0x388 .hash | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
175 3 0 0x4 0x4 |
484 | 176 |
177 [3] 11 2 0x8048470 0x470 0x7f0 .dynsym | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
178 4 1 0x4 0x10 |
484 | 179 |
180 [4] 3 2 0x8048c60 0xc60 0x3ad .dynstr | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
181 0 0 0x1 0 |
484 | 182 |
183 [5] 9 2 0x8049010 0x1010 0x338 .rel.plt | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
184 3 7 0x4 0x8 |
484 | 185 |
186 [6] 1 6 0x8049348 0x1348 0x3 .init | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
187 0 0 0x4 0 |
484 | 188 |
189 [7] 1 6 0x804934c 0x134c 0x680 .plt | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
190 0 0 0x4 0x4 |
484 | 191 |
192 [8] 1 6 0x80499cc 0x19cc 0x3c56f .text | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
193 0 0 0x4 0 |
484 | 194 |
195 [9] 1 6 0x8085f3c 0x3df3c 0x3 .fini | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
196 0 0 0x4 0 |
484 | 197 |
198 [10] 1 2 0x8085f40 0x3df40 0x69c .rodata | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
199 0 0 0x4 0 |
484 | 200 |
201 [11] 1 2 0x80865dc 0x3e5dc 0xd51 .rodata1 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
202 0 0 0x4 0 |
484 | 203 |
204 [12] 1 3 0x8088330 0x3f330 0x20afc .data | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
205 0 0 0x4 0 |
484 | 206 |
207 [13] 1 3 0x80a8e2c 0x5fe2c 0x89d .data1 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
208 0 0 0x4 0 |
484 | 209 |
210 [14] 1 3 0x80a96cc 0x606cc 0x1a8 .got | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
211 0 0 0x4 0x4 |
484 | 212 |
213 [15] 6 3 0x80a9874 0x60874 0x80 .dynamic | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
214 4 0 0x4 0x8 |
484 | 215 |
216 [16] 8 3 0x80c6800 0x7d800 0 .bss | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
217 0 0 0x4 0 |
484 | 218 |
219 [17] 2 0 0 0x7d800 0x9b90 .symtab | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
220 18 371 0x4 0x10 |
484 | 221 |
222 [18] 3 0 0 0x87390 0x8526 .strtab | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
223 0 0 0x1 0 |
484 | 224 |
225 [19] 3 0 0 0x8f8b6 0x93 .shstrtab | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
226 0 0 0x1 0 |
484 | 227 |
228 [20] 1 0 0 0x8f949 0x68b7 .comment | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
229 0 0 0x1 0 |
484 | 230 |
231 [21] 1 3 0x80a98f4 0x608f4 0x1cf0c .data | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
232 0 0 0x4 0 |
484 | 233 |
234 * This is an example of how the file header is changed. "Shoff" is | |
235 * the section header offset within the file. Since that table is | |
236 * after the new .data section, it is moved. "Shnum" is the number of | |
237 * sections, which we increment. | |
238 * | |
239 * "Phoff" is the file offset to the program header. "Phentsize" and | |
240 * "Shentsz" are the program and section header entries sizes respectively. | |
241 * These can be larger than the apparent struct sizes. | |
242 | |
243 raid:/nfs/raid/src/dist-18.56/src> dump -f temacs | |
244 | |
245 temacs: | |
246 | |
247 **** ELF HEADER **** | |
248 Class Data Type Machine Version | |
249 Entry Phoff Shoff Flags Ehsize | |
250 Phentsize Phnum Shentsz Shnum Shstrndx | |
251 | |
252 1 1 2 3 1 | |
253 0x80499cc 0x34 0x792f4 0 0x34 | |
254 0x20 5 0x28 21 19 | |
255 | |
256 raid:/nfs/raid/src/dist-18.56/src> dump -f xemacs | |
257 | |
258 xemacs: | |
259 | |
260 **** ELF HEADER **** | |
261 Class Data Type Machine Version | |
262 Entry Phoff Shoff Flags Ehsize | |
263 Phentsize Phnum Shentsz Shnum Shstrndx | |
264 | |
265 1 1 2 3 1 | |
266 0x80499cc 0x34 0x96200 0 0x34 | |
267 0x20 5 0x28 22 19 | |
268 | |
269 * These are the program headers. "Offset" is the file offset to the | |
270 * segment. "Vaddr" is the memory load address. "Filesz" is the | |
271 * segment size as it appears in the file, and "Memsz" is the size in | |
272 * memory. Below, the third segment is the code and the fourth is the | |
273 * data: the difference between Filesz and Memsz is .bss | |
274 | |
275 raid:/nfs/raid/src/dist-18.56/src> dump -o temacs | |
276 | |
277 temacs: | |
278 ***** PROGRAM EXECUTION HEADER ***** | |
279 Type Offset Vaddr Paddr | |
280 Filesz Memsz Flags Align | |
281 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
282 6 0x34 0x8048034 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
283 0xa0 0xa0 5 0 |
484 | 284 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
285 3 0xd4 0 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
286 0x13 0 4 0 |
484 | 287 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
288 1 0x34 0x8048034 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
289 0x3f2f9 0x3f2f9 5 0x1000 |
484 | 290 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
291 1 0x3f330 0x8088330 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
292 0x215c4 0x25a60 7 0x1000 |
484 | 293 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
294 2 0x60874 0x80a9874 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
295 0x80 0 7 0 |
484 | 296 |
297 raid:/nfs/raid/src/dist-18.56/src> dump -o xemacs | |
298 | |
299 xemacs: | |
300 ***** PROGRAM EXECUTION HEADER ***** | |
301 Type Offset Vaddr Paddr | |
302 Filesz Memsz Flags Align | |
303 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
304 6 0x34 0x8048034 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
305 0xa0 0xa0 5 0 |
484 | 306 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
307 3 0xd4 0 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
308 0x13 0 4 0 |
484 | 309 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
310 1 0x34 0x8048034 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
311 0x3f2f9 0x3f2f9 5 0x1000 |
484 | 312 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
313 1 0x3f330 0x8088330 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
314 0x3e4d0 0x3e4d0 7 0x1000 |
484 | 315 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
316 2 0x60874 0x80a9874 0 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
317 0x80 0 7 0 |
484 | 318 |
319 | |
320 */ | |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
321 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
322 /* Modified by wtien@urbana.mcd.mot.com of Motorola Inc. |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
323 * |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
324 * The above mechanism does not work if the unexeced ELF file is being |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
325 * re-layout by other applications (such as `strip'). All the applications |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
326 * that re-layout the internal of ELF will layout all sections in ascending |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
327 * order of their file offsets. After the re-layout, the data2 section will |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
328 * still be the LAST section in the section header vector, but its file offset |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
329 * is now being pushed far away down, and causes part of it not to be mapped |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
330 * in (ie. not covered by the load segment entry in PHDR vector), therefore |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
331 * causes the new binary to fail. |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
332 * |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
333 * The solution is to modify the unexec algorithm to insert the new data2 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
334 * section header right before the new bss section header, so their file |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
335 * offsets will be in the ascending order. Since some of the section's (all |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
336 * sections AFTER the bss section) indexes are now changed, we also need to |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
337 * modify some fields to make them point to the right sections. This is done |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
338 * by macro PATCH_INDEX. All the fields that need to be patched are: |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
339 * |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
340 * 1. ELF header e_shstrndx field. |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
341 * 2. section header sh_link and sh_info field. |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
342 * 3. symbol table entry st_shndx field. |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
343 * |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
344 * The above example now should look like: |
484 | 345 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
346 **** SECTION HEADER TABLE **** |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
347 [No] Type Flags Addr Offset Size Name |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
348 Link Info Adralgn Entsize |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
349 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
350 [1] 1 2 0x80480d4 0xd4 0x13 .interp |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
351 0 0 0x1 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
352 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
353 [2] 5 2 0x80480e8 0xe8 0x388 .hash |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
354 3 0 0x4 0x4 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
355 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
356 [3] 11 2 0x8048470 0x470 0x7f0 .dynsym |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
357 4 1 0x4 0x10 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
358 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
359 [4] 3 2 0x8048c60 0xc60 0x3ad .dynstr |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
360 0 0 0x1 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
361 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
362 [5] 9 2 0x8049010 0x1010 0x338 .rel.plt |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
363 3 7 0x4 0x8 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
364 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
365 [6] 1 6 0x8049348 0x1348 0x3 .init |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
366 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
367 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
368 [7] 1 6 0x804934c 0x134c 0x680 .plt |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
369 0 0 0x4 0x4 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
370 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
371 [8] 1 6 0x80499cc 0x19cc 0x3c56f .text |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
372 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
373 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
374 [9] 1 6 0x8085f3c 0x3df3c 0x3 .fini |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
375 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
376 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
377 [10] 1 2 0x8085f40 0x3df40 0x69c .rodata |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
378 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
379 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
380 [11] 1 2 0x80865dc 0x3e5dc 0xd51 .rodata1 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
381 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
382 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
383 [12] 1 3 0x8088330 0x3f330 0x20afc .data |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
384 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
385 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
386 [13] 1 3 0x80a8e2c 0x5fe2c 0x89d .data1 |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
387 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
388 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
389 [14] 1 3 0x80a96cc 0x606cc 0x1a8 .got |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
390 0 0 0x4 0x4 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
391 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
392 [15] 6 3 0x80a9874 0x60874 0x80 .dynamic |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
393 4 0 0x4 0x8 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
394 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
395 [16] 1 3 0x80a98f4 0x608f4 0x1cf0c .data |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
396 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
397 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
398 [17] 8 3 0x80c6800 0x7d800 0 .bss |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
399 0 0 0x4 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
400 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
401 [18] 2 0 0 0x7d800 0x9b90 .symtab |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
402 19 371 0x4 0x10 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
403 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
404 [19] 3 0 0 0x87390 0x8526 .strtab |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
405 0 0 0x1 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
406 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
407 [20] 3 0 0 0x8f8b6 0x93 .shstrtab |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
408 0 0 0x1 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
409 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
410 [21] 1 0 0 0x8f949 0x68b7 .comment |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
411 0 0 0x1 0 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
412 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
413 */ |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
414 |
484 | 415 #include <sys/types.h> |
416 #include <stdio.h> | |
417 #include <sys/stat.h> | |
418 #include <memory.h> | |
419 #include <string.h> | |
420 #include <errno.h> | |
421 #include <unistd.h> | |
422 #include <fcntl.h> | |
19776
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
423 #if !defined (__NetBSD__) && !defined (__OpenBSD__) |
484 | 424 #include <elf.h> |
18475
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
425 #endif |
484 | 426 #include <sys/mman.h> |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
427 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
428 #include <sys/elf_mips.h> |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
429 #include <sym.h> |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
430 #endif /* __sony_news && _SYSTYPE_SYSV */ |
484 | 431 |
19776
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
432 #if defined (__alpha__) && !defined (__NetBSD__) && !defined (__OpenBSD__) |
18475
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
433 #include <sym.h> /* get COFF debugging symbol table declaration */ |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
434 #endif |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
435 |
18475
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
436 #ifdef __NetBSD__ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
437 /* |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
438 * NetBSD does not have normal-looking user-land ELF support. |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
439 */ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
440 # ifdef __alpha__ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
441 # define ELFSIZE 64 |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
442 # else |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
443 # define ELFSIZE 32 |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
444 # endif |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
445 # include <sys/exec_elf.h> |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
446 |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
447 # define PT_LOAD Elf_pt_load |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
448 # define SHT_SYMTAB Elf_sht_symtab |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
449 # define SHT_DYNSYM Elf_sht_dynsym |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
450 # define SHT_NULL Elf_sht_null |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
451 # define SHT_NOBITS Elf_sht_nobits |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
452 # define SHT_REL Elf_sht_rel |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
453 # define SHT_RELA Elf_sht_rela |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
454 |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
455 # define SHN_UNDEF Elf_eshn_undefined |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
456 # define SHN_ABS Elf_eshn_absolute |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
457 # define SHN_COMMON Elf_eshn_common |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
458 |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
459 /* |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
460 * The magic of picking the right size types is handled by the ELFSIZE |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
461 * definition above. |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
462 */ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
463 # ifdef __STDC__ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
464 # define ElfW(type) Elf_##type |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
465 # else |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
466 # define ElfW(type) Elf_/**/type |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
467 # endif |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
468 |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
469 # ifdef __alpha__ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
470 # include <sys/exec_ecoff.h> |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
471 # define HDRR struct ecoff_symhdr |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
472 # define pHDRR HDRR * |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
473 # endif |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
474 #endif /* __NetBSD__ */ |
ee209ce34d8a
[__NetBSD__]: Add some conditionals for NetBSD.
Richard M. Stallman <rms@gnu.org>
parents:
18474
diff
changeset
|
475 |
19776
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
476 #ifdef __OpenBSD__ |
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
477 # include <sys/exec_elf.h> |
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
478 #endif |
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
479 |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
480 #if __GNU_LIBRARY__ - 0 >= 6 |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
481 # include <link.h> /* get ElfW etc */ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
482 #endif |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
483 |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
484 #ifndef ElfW |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
485 # ifdef __STDC__ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
486 # define ElfW(type) Elf32_##type |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
487 # else |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
488 # define ElfW(type) Elf32_/**/type |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
489 # endif |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
490 #endif |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
491 |
484 | 492 #ifndef emacs |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
493 #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) |
484 | 494 #else |
14593
52c43dd2a83b
Use <config.h>, not "config.h".
Richard M. Stallman <rms@gnu.org>
parents:
14251
diff
changeset
|
495 #include <config.h> |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
496 extern void fatal (char *, ...); |
484 | 497 #endif |
498 | |
6052
cff556bf85e8
(ELF_BSS_SECTION_NAME): New macro (config.h may override).
Richard M. Stallman <rms@gnu.org>
parents:
4505
diff
changeset
|
499 #ifndef ELF_BSS_SECTION_NAME |
cff556bf85e8
(ELF_BSS_SECTION_NAME): New macro (config.h may override).
Richard M. Stallman <rms@gnu.org>
parents:
4505
diff
changeset
|
500 #define ELF_BSS_SECTION_NAME ".bss" |
cff556bf85e8
(ELF_BSS_SECTION_NAME): New macro (config.h may override).
Richard M. Stallman <rms@gnu.org>
parents:
4505
diff
changeset
|
501 #endif |
cff556bf85e8
(ELF_BSS_SECTION_NAME): New macro (config.h may override).
Richard M. Stallman <rms@gnu.org>
parents:
4505
diff
changeset
|
502 |
484 | 503 /* Get the address of a particular section or program header entry, |
504 * accounting for the size of the entries. | |
505 */ | |
15073
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
506 /* |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
507 On PPC Reference Platform running Solaris 2.5.1 |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
508 the plt section is also of type NOBI like the bss section. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
509 (not really stored) and therefore sections after the bss |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
510 section start at the plt offset. The plt section is always |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
511 the one just before the bss section. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
512 Thus, we modify the test from |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
513 if (NEW_SECTION_H (nn).sh_offset >= new_data2_offset) |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
514 to |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
515 if (NEW_SECTION_H (nn).sh_offset >= |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
516 OLD_SECTION_H (old_bss_index-1).sh_offset) |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
517 This is just a hack. We should put the new data section |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
518 before the .plt section. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
519 And we should not have this routine at all but use |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
520 the libelf library to read the old file and create the new |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
521 file. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
522 The changed code is minimal and depends on prep set in m/prep.h |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
523 Erik Deumens |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
524 Quantum Theory Project |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
525 University of Florida |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
526 deumens@qtp.ufl.edu |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
527 Apr 23, 1996 |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
528 */ |
484 | 529 |
530 #define OLD_SECTION_H(n) \ | |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
531 (*(ElfW(Shdr) *) ((byte *) old_section_h + old_file_h->e_shentsize * (n))) |
484 | 532 #define NEW_SECTION_H(n) \ |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
533 (*(ElfW(Shdr) *) ((byte *) new_section_h + new_file_h->e_shentsize * (n))) |
484 | 534 #define OLD_PROGRAM_H(n) \ |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
535 (*(ElfW(Phdr) *) ((byte *) old_program_h + old_file_h->e_phentsize * (n))) |
484 | 536 #define NEW_PROGRAM_H(n) \ |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
537 (*(ElfW(Phdr) *) ((byte *) new_program_h + new_file_h->e_phentsize * (n))) |
484 | 538 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
539 #define PATCH_INDEX(n) \ |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
540 do { \ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
541 if ((int) (n) >= old_bss_index) \ |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
542 (n)++; } while (0) |
484 | 543 typedef unsigned char byte; |
544 | |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
545 /* Round X up to a multiple of Y. */ |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
546 |
20026
027030dd12c4
(round_up): Make arguments and return type unsigned.
Karl Heuer <kwzh@gnu.org>
parents:
19776
diff
changeset
|
547 ElfW(Addr) |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
548 round_up (x, y) |
20026
027030dd12c4
(round_up): Make arguments and return type unsigned.
Karl Heuer <kwzh@gnu.org>
parents:
19776
diff
changeset
|
549 ElfW(Addr) x, y; |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
550 { |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
551 int rem = x % y; |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
552 if (rem == 0) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
553 return x; |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
554 return x - rem + y; |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
555 } |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
556 |
484 | 557 /* **************************************************************** |
558 * unexec | |
559 * | |
560 * driving logic. | |
561 * | |
562 * In ELF, this works by replacing the old .bss section with a new | |
563 * .data section, and inserting an empty .bss immediately afterwards. | |
564 * | |
565 */ | |
566 void | |
567 unexec (new_name, old_name, data_start, bss_start, entry_address) | |
568 char *new_name, *old_name; | |
569 unsigned data_start, bss_start, entry_address; | |
570 { | |
571 int new_file, old_file, new_file_size; | |
572 | |
573 /* Pointers to the base of the image of the two files. */ | |
574 caddr_t old_base, new_base; | |
575 | |
576 /* Pointers to the file, program and section headers for the old and new | |
577 * files. | |
578 */ | |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
579 ElfW(Ehdr) *old_file_h, *new_file_h; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
580 ElfW(Phdr) *old_program_h, *new_program_h; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
581 ElfW(Shdr) *old_section_h, *new_section_h; |
484 | 582 |
583 /* Point to the section name table in the old file */ | |
584 char *old_section_names; | |
585 | |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
586 ElfW(Addr) old_bss_addr, new_bss_addr; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
587 ElfW(Word) old_bss_size, new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
588 ElfW(Off) new_data2_offset; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
589 ElfW(Addr) new_data2_addr; |
484 | 590 |
15719 | 591 int n, nn, old_bss_index, old_data_index, new_data2_index; |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
592 #if defined ( __sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
593 int old_sbss_index, old_mdebug_index; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
594 #endif /* __sony_news && _SYSTYPE_SYSV */ |
484 | 595 struct stat stat_buf; |
596 | |
597 /* Open the old file & map it into the address space. */ | |
598 | |
599 old_file = open (old_name, O_RDONLY); | |
600 | |
601 if (old_file < 0) | |
602 fatal ("Can't open %s for reading: errno %d\n", old_name, errno); | |
603 | |
604 if (fstat (old_file, &stat_buf) == -1) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
605 fatal ("Can't fstat (%s): errno %d\n", old_name, errno); |
484 | 606 |
19201
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
607 old_base = mmap ((caddr_t) 0, stat_buf.st_size, PROT_READ, MAP_SHARED, |
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
608 old_file, 0); |
484 | 609 |
610 if (old_base == (caddr_t) -1) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
611 fatal ("Can't mmap (%s): errno %d\n", old_name, errno); |
484 | 612 |
613 #ifdef DEBUG | |
15719 | 614 fprintf (stderr, "mmap (%s, %x) -> %x\n", old_name, stat_buf.st_size, |
615 old_base); | |
484 | 616 #endif |
617 | |
618 /* Get pointers to headers & section names */ | |
619 | |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
620 old_file_h = (ElfW(Ehdr) *) old_base; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
621 old_program_h = (ElfW(Phdr) *) ((byte *) old_base + old_file_h->e_phoff); |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
622 old_section_h = (ElfW(Shdr) *) ((byte *) old_base + old_file_h->e_shoff); |
484 | 623 old_section_names = (char *) old_base |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
624 + OLD_SECTION_H (old_file_h->e_shstrndx).sh_offset; |
484 | 625 |
626 /* Find the old .bss section. Figure out parameters of the new | |
627 * data2 and bss sections. | |
628 */ | |
629 | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
630 for (old_bss_index = 1; old_bss_index < (int) old_file_h->e_shnum; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
631 old_bss_index++) |
484 | 632 { |
633 #ifdef DEBUG | |
634 fprintf (stderr, "Looking for .bss - found %s\n", | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
635 old_section_names + OLD_SECTION_H (old_bss_index).sh_name); |
484 | 636 #endif |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
637 if (!strcmp (old_section_names + OLD_SECTION_H (old_bss_index).sh_name, |
6052
cff556bf85e8
(ELF_BSS_SECTION_NAME): New macro (config.h may override).
Richard M. Stallman <rms@gnu.org>
parents:
4505
diff
changeset
|
638 ELF_BSS_SECTION_NAME)) |
484 | 639 break; |
640 } | |
641 if (old_bss_index == old_file_h->e_shnum) | |
642 fatal ("Can't find .bss in %s.\n", old_name, 0); | |
643 | |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
644 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
645 for (old_sbss_index = 1; old_sbss_index < (int) old_file_h->e_shnum; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
646 old_sbss_index++) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
647 { |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
648 #ifdef DEBUG |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
649 fprintf (stderr, "Looking for .sbss - found %s\n", |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
650 old_section_names + OLD_SECTION_H (old_sbss_index).sh_name); |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
651 #endif |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
652 if (!strcmp (old_section_names + OLD_SECTION_H (old_sbss_index).sh_name, |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
653 ".sbss")) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
654 break; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
655 } |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
656 if (old_sbss_index == old_file_h->e_shnum) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
657 { |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
658 old_bss_addr = OLD_SECTION_H(old_bss_index).sh_addr; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
659 old_bss_size = OLD_SECTION_H(old_bss_index).sh_size; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
660 new_data2_offset = OLD_SECTION_H(old_bss_index).sh_offset; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
661 new_data2_index = old_bss_index; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
662 } |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
663 else |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
664 { |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
665 old_bss_addr = OLD_SECTION_H(old_sbss_index).sh_addr; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
666 old_bss_size = OLD_SECTION_H(old_bss_index).sh_size |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
667 + OLD_SECTION_H(old_sbss_index).sh_size; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
668 new_data2_offset = OLD_SECTION_H(old_sbss_index).sh_offset; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
669 new_data2_index = old_sbss_index; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
670 } |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
671 |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
672 for (old_mdebug_index = 1; old_mdebug_index < (int) old_file_h->e_shnum; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
673 old_mdebug_index++) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
674 { |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
675 #ifdef DEBUG |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
676 fprintf (stderr, "Looking for .mdebug - found %s\n", |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
677 old_section_names + OLD_SECTION_H (old_mdebug_index).sh_name); |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
678 #endif |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
679 if (!strcmp (old_section_names + OLD_SECTION_H (old_mdebug_index).sh_name, |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
680 ".mdebug")) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
681 break; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
682 } |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
683 if (old_mdebug_index == old_file_h->e_shnum) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
684 old_mdebug_index = 0; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
685 #else /* not (__sony_news && _SYSTYPE_SYSV) */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
686 old_bss_addr = OLD_SECTION_H (old_bss_index).sh_addr; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
687 old_bss_size = OLD_SECTION_H (old_bss_index).sh_size; |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
688 #endif /* not (__sony_news && _SYSTYPE_SYSV) */ |
19776
6910bd6de0d9
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
19201
diff
changeset
|
689 #if defined (emacs) || !defined (DEBUG) |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
690 new_bss_addr = (ElfW(Addr)) sbrk (0); |
484 | 691 #else |
692 new_bss_addr = old_bss_addr + old_bss_size + 0x1234; | |
693 #endif | |
694 new_data2_addr = old_bss_addr; | |
695 new_data2_size = new_bss_addr - old_bss_addr; | |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
696 #if !defined (__sony_news) || !defined (_SYSTYPE_SYSV) |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
697 new_data2_offset = OLD_SECTION_H (old_bss_index).sh_offset; |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
698 #endif /* not (__sony_news && _SYSTYPE_SYSV) */ |
484 | 699 |
700 #ifdef DEBUG | |
701 fprintf (stderr, "old_bss_index %d\n", old_bss_index); | |
15719 | 702 fprintf (stderr, "old_bss_addr %x\n", old_bss_addr); |
703 fprintf (stderr, "old_bss_size %x\n", old_bss_size); | |
704 fprintf (stderr, "new_bss_addr %x\n", new_bss_addr); | |
705 fprintf (stderr, "new_data2_addr %x\n", new_data2_addr); | |
706 fprintf (stderr, "new_data2_size %x\n", new_data2_size); | |
707 fprintf (stderr, "new_data2_offset %x\n", new_data2_offset); | |
484 | 708 #endif |
709 | |
15719 | 710 if ((unsigned) new_bss_addr < (unsigned) old_bss_addr + old_bss_size) |
484 | 711 fatal (".bss shrank when undumping???\n", 0, 0); |
712 | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
713 /* Set the output file to the right size and mmap it. Set |
484 | 714 * pointers to various interesting objects. stat_buf still has |
715 * old_file data. | |
716 */ | |
717 | |
718 new_file = open (new_name, O_RDWR | O_CREAT, 0666); | |
719 if (new_file < 0) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
720 fatal ("Can't creat (%s): errno %d\n", new_name, errno); |
484 | 721 |
722 new_file_size = stat_buf.st_size + old_file_h->e_shentsize + new_data2_size; | |
723 | |
724 if (ftruncate (new_file, new_file_size)) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
725 fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno); |
484 | 726 |
11827
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
727 #ifdef UNEXEC_USE_MAP_PRIVATE |
19201
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
728 new_base = mmap ((caddr_t) 0, new_file_size, PROT_READ | PROT_WRITE, |
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
729 MAP_PRIVATE, new_file, 0); |
11827
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
730 #else |
19201
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
731 new_base = mmap ((caddr_t) 0, new_file_size, PROT_READ | PROT_WRITE, |
f502f8e2322a
(unexec): Cast 1st arg in mmap calls.
Richard M. Stallman <rms@gnu.org>
parents:
18475
diff
changeset
|
732 MAP_SHARED, new_file, 0); |
11827
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
733 #endif |
484 | 734 |
735 if (new_base == (caddr_t) -1) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
736 fatal ("Can't mmap (%s): errno %d\n", new_name, errno); |
484 | 737 |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
738 new_file_h = (ElfW(Ehdr) *) new_base; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
739 new_program_h = (ElfW(Phdr) *) ((byte *) new_base + old_file_h->e_phoff); |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
740 new_section_h = (ElfW(Shdr) *) |
484 | 741 ((byte *) new_base + old_file_h->e_shoff + new_data2_size); |
742 | |
743 /* Make our new file, program and section headers as copies of the | |
744 * originals. | |
745 */ | |
746 | |
747 memcpy (new_file_h, old_file_h, old_file_h->e_ehsize); | |
748 memcpy (new_program_h, old_program_h, | |
749 old_file_h->e_phnum * old_file_h->e_phentsize); | |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
750 |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
751 /* Modify the e_shstrndx if necessary. */ |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
752 PATCH_INDEX (new_file_h->e_shstrndx); |
484 | 753 |
754 /* Fix up file header. We'll add one section. Section header is | |
755 * further away now. | |
756 */ | |
757 | |
758 new_file_h->e_shoff += new_data2_size; | |
759 new_file_h->e_shnum += 1; | |
760 | |
761 #ifdef DEBUG | |
15719 | 762 fprintf (stderr, "Old section offset %x\n", old_file_h->e_shoff); |
484 | 763 fprintf (stderr, "Old section count %d\n", old_file_h->e_shnum); |
15719 | 764 fprintf (stderr, "New section offset %x\n", new_file_h->e_shoff); |
484 | 765 fprintf (stderr, "New section count %d\n", new_file_h->e_shnum); |
766 #endif | |
767 | |
768 /* Fix up a new program header. Extend the writable data segment so | |
769 * that the bss area is covered too. Find that segment by looking | |
770 * for a segment that ends just before the .bss area. Make sure | |
771 * that no segments are above the new .data2. Put a loop at the end | |
772 * to adjust the offset and address of any segment that is above | |
773 * data2, just in case we decide to allow this later. | |
774 */ | |
775 | |
776 for (n = new_file_h->e_phnum - 1; n >= 0; n--) | |
777 { | |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
778 /* Compute maximum of all requirements for alignment of section. */ |
15719 | 779 int alignment = (NEW_PROGRAM_H (n)).p_align; |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
780 if ((OLD_SECTION_H (old_bss_index)).sh_addralign > alignment) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
781 alignment = OLD_SECTION_H (old_bss_index).sh_addralign; |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
782 |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
783 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
784 if (NEW_PROGRAM_H (n).p_vaddr + NEW_PROGRAM_H (n).p_filesz |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
785 > round_up (old_bss_addr, alignment)) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
786 fatal ("Program segment above .bss in %s\n", old_name, 0); |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
787 #else /* not (__sony_news && _SYSTYPE_SYSV) */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
788 if (NEW_PROGRAM_H (n).p_vaddr + NEW_PROGRAM_H (n).p_filesz > old_bss_addr) |
484 | 789 fatal ("Program segment above .bss in %s\n", old_name, 0); |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
790 #endif /* not (__sony_news && _SYSTYPE_SYSV) */ |
484 | 791 |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
792 if (NEW_PROGRAM_H (n).p_type == PT_LOAD |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
793 && (round_up ((NEW_PROGRAM_H (n)).p_vaddr |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
794 + (NEW_PROGRAM_H (n)).p_filesz, |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
795 alignment) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
796 == round_up (old_bss_addr, alignment))) |
484 | 797 break; |
798 } | |
799 if (n < 0) | |
800 fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | |
801 | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
802 NEW_PROGRAM_H (n).p_filesz += new_data2_size; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
803 NEW_PROGRAM_H (n).p_memsz = NEW_PROGRAM_H (n).p_filesz; |
484 | 804 |
805 #if 0 /* Maybe allow section after data2 - does this ever happen? */ | |
806 for (n = new_file_h->e_phnum - 1; n >= 0; n--) | |
807 { | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
808 if (NEW_PROGRAM_H (n).p_vaddr |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
809 && NEW_PROGRAM_H (n).p_vaddr >= new_data2_addr) |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
810 NEW_PROGRAM_H (n).p_vaddr += new_data2_size - old_bss_size; |
484 | 811 |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
812 if (NEW_PROGRAM_H (n).p_offset >= new_data2_offset) |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
813 NEW_PROGRAM_H (n).p_offset += new_data2_size; |
484 | 814 } |
815 #endif | |
816 | |
817 /* Fix up section headers based on new .data2 section. Any section | |
818 * whose offset or virtual address is after the new .data2 section | |
819 * gets its value adjusted. .bss size becomes zero and new address | |
820 * is set. data2 section header gets added by copying the existing | |
821 * .data header and modifying the offset, address and size. | |
822 */ | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
823 for (old_data_index = 1; old_data_index < (int) old_file_h->e_shnum; |
484 | 824 old_data_index++) |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
825 if (!strcmp (old_section_names + OLD_SECTION_H (old_data_index).sh_name, |
484 | 826 ".data")) |
827 break; | |
828 if (old_data_index == old_file_h->e_shnum) | |
829 fatal ("Can't find .data in %s.\n", old_name, 0); | |
830 | |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
831 /* Walk through all section headers, insert the new data2 section right |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
832 before the new bss section. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
833 for (n = 1, nn = 1; n < (int) old_file_h->e_shnum; n++, nn++) |
484 | 834 { |
835 caddr_t src; | |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
836 int temp_index; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
837 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
838 /* If it is (s)bss section, insert the new data2 section before it. */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
839 /* new_data2_index is the index of either old_sbss or old_bss, that was |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
840 chosen as a section for new_data2. */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
841 temp_index = new_data2_index; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
842 #else /* not (__sony_news && _SYSTYPE_SYSV) */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
843 /* If it is bss section, insert the new data2 section before it. */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
844 temp_index = old_bss_index; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
845 #endif /* not (__sony_news && _SYSTYPE_SYSV) */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
846 if (n == temp_index) |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
847 { |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
848 /* Steal the data section header for this data2 section. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
849 memcpy (&NEW_SECTION_H (nn), &OLD_SECTION_H (old_data_index), |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
850 new_file_h->e_shentsize); |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
851 |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
852 NEW_SECTION_H (nn).sh_addr = new_data2_addr; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
853 NEW_SECTION_H (nn).sh_offset = new_data2_offset; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
854 NEW_SECTION_H (nn).sh_size = new_data2_size; |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
855 /* Use the bss section's alignment. This will assure that the |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
856 new data2 section always be placed in the same spot as the old |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
857 bss section by any other application. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
858 NEW_SECTION_H (nn).sh_addralign = OLD_SECTION_H (n).sh_addralign; |
484 | 859 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
860 /* Now copy over what we have in the memory now. */ |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
861 memcpy (NEW_SECTION_H (nn).sh_offset + new_base, |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
862 (caddr_t) OLD_SECTION_H (n).sh_addr, |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
863 new_data2_size); |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
864 nn++; |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
865 } |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
866 |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
867 memcpy (&NEW_SECTION_H (nn), &OLD_SECTION_H (n), |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
868 old_file_h->e_shentsize); |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
869 |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
870 if (n == old_bss_index |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
871 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
872 /* The new bss and sbss section's size is zero, and its file offset |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
873 and virtual address should be off by NEW_DATA2_SIZE. */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
874 || n == old_sbss_index |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
875 #endif /* __sony_news and _SYSTYPE_SYSV */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
876 ) |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
877 { |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
878 /* NN should be `old_bss_index + 1' at this point. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
879 NEW_SECTION_H (nn).sh_offset += new_data2_size; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
880 NEW_SECTION_H (nn).sh_addr += new_data2_size; |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
881 /* Let the new bss section address alignment be the same as the |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
882 section address alignment followed the old bss section, so |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
883 this section will be placed in exactly the same place. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
884 NEW_SECTION_H (nn).sh_addralign = OLD_SECTION_H (nn).sh_addralign; |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
885 NEW_SECTION_H (nn).sh_size = 0; |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
886 } |
10995
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
887 else |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
888 { |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
889 /* Any section that was original placed AFTER the bss |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
890 section should now be off by NEW_DATA2_SIZE. */ |
15073
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
891 #ifdef SOLARIS_POWERPC |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
892 /* On PPC Reference Platform running Solaris 2.5.1 |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
893 the plt section is also of type NOBI like the bss section. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
894 (not really stored) and therefore sections after the bss |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
895 section start at the plt offset. The plt section is always |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
896 the one just before the bss section. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
897 It would be better to put the new data section before |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
898 the .plt section, or use libelf instead. |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
899 Erik Deumens, deumens@qtp.ufl.edu. */ |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
900 if (NEW_SECTION_H (nn).sh_offset |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
901 >= OLD_SECTION_H (old_bss_index-1).sh_offset) |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
902 NEW_SECTION_H (nn).sh_offset += new_data2_size; |
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
903 #else |
15504
a01d40110af0
(unexec): Round up section header offset to bss alignment
Richard M. Stallman <rms@gnu.org>
parents:
15073
diff
changeset
|
904 if (round_up (NEW_SECTION_H (nn).sh_offset, |
a01d40110af0
(unexec): Round up section header offset to bss alignment
Richard M. Stallman <rms@gnu.org>
parents:
15073
diff
changeset
|
905 OLD_SECTION_H (old_bss_index).sh_addralign) |
a01d40110af0
(unexec): Round up section header offset to bss alignment
Richard M. Stallman <rms@gnu.org>
parents:
15073
diff
changeset
|
906 >= new_data2_offset) |
10995
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
907 NEW_SECTION_H (nn).sh_offset += new_data2_size; |
15073
e98682eae98b
(unexec): Add conditional for SOLARIS_POWERPC.
Richard M. Stallman <rms@gnu.org>
parents:
14593
diff
changeset
|
908 #endif |
10995
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
909 /* Any section that was originally placed after the section |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
910 header table should now be off by the size of one section |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
911 header table entry. */ |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
912 if (NEW_SECTION_H (nn).sh_offset > new_file_h->e_shoff) |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
913 NEW_SECTION_H (nn).sh_offset += new_file_h->e_shentsize; |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
914 } |
842974f9ab7d
(unexec): Adjust the file offset of sections located
Richard M. Stallman <rms@gnu.org>
parents:
9502
diff
changeset
|
915 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
916 /* If any section hdr refers to the section after the new .data |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
917 section, make it refer to next one because we have inserted |
8595
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
918 a new section in between. */ |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
919 |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
920 PATCH_INDEX (NEW_SECTION_H (nn).sh_link); |
8595
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
921 /* For symbol tables, info is a symbol table index, |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
922 so don't change it. */ |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
923 if (NEW_SECTION_H (nn).sh_type != SHT_SYMTAB |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
924 && NEW_SECTION_H (nn).sh_type != SHT_DYNSYM) |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
925 PATCH_INDEX (NEW_SECTION_H (nn).sh_info); |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
926 |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
927 /* Now, start to copy the content of sections. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
928 if (NEW_SECTION_H (nn).sh_type == SHT_NULL |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
929 || NEW_SECTION_H (nn).sh_type == SHT_NOBITS) |
484 | 930 continue; |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
931 |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
932 /* Write out the sections. .data and .data1 (and data2, called |
8595
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
933 ".data" in the strings table) get copied from the current process |
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
934 instead of the old file. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
935 if (!strcmp (old_section_names + NEW_SECTION_H (n).sh_name, ".data") |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
936 #ifdef _nec_ews_svr4 /* hir, 1994.6.13 */ |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
937 || !strcmp ((old_section_names + NEW_SECTION_H(n).sh_name), |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
938 ".sdata") |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
939 #endif |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
940 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
941 || !strcmp ((old_section_names + NEW_SECTION_H (n).sh_name), |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
942 ".sdata") |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
943 || !strcmp ((old_section_names + NEW_SECTION_H (n).sh_name), |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
944 ".lit4") |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
945 || !strcmp ((old_section_names + NEW_SECTION_H (n).sh_name), |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
946 ".lit8") |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
947 #endif /* __sony_news && _SYSTYPE_SYSV */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
948 || !strcmp ((old_section_names + NEW_SECTION_H (n).sh_name), |
484 | 949 ".data1")) |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
950 src = (caddr_t) OLD_SECTION_H (n).sh_addr; |
484 | 951 else |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
952 src = old_base + OLD_SECTION_H (n).sh_offset; |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
953 |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
954 memcpy (NEW_SECTION_H (nn).sh_offset + new_base, src, |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
955 NEW_SECTION_H (nn).sh_size); |
484 | 956 |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
957 #ifdef __alpha__ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
958 /* Update Alpha COFF symbol table: */ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
959 if (strcmp (old_section_names + OLD_SECTION_H (n).sh_name, ".mdebug") |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
960 == 0) |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
961 { |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
962 pHDRR symhdr = (pHDRR) (NEW_SECTION_H (nn).sh_offset + new_base); |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
963 |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
964 symhdr->cbLineOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
965 symhdr->cbDnOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
966 symhdr->cbPdOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
967 symhdr->cbSymOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
968 symhdr->cbOptOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
969 symhdr->cbAuxOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
970 symhdr->cbSsOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
971 symhdr->cbSsExtOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
972 symhdr->cbFdOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
973 symhdr->cbRfdOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
974 symhdr->cbExtOffset += new_data2_size; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
975 } |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
976 #endif /* __alpha__ */ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
977 |
18474
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
978 #if defined (__sony_news) && defined (_SYSTYPE_SYSV) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
979 if (NEW_SECTION_H (nn).sh_type == SHT_MIPS_DEBUG && old_mdebug_index) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
980 { |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
981 int diff = NEW_SECTION_H(nn).sh_offset |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
982 - OLD_SECTION_H(old_mdebug_index).sh_offset; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
983 HDRR *phdr = (HDRR *)(NEW_SECTION_H (nn).sh_offset + new_base); |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
984 |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
985 if (diff) |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
986 { |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
987 phdr->cbLineOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
988 phdr->cbDnOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
989 phdr->cbPdOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
990 phdr->cbSymOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
991 phdr->cbOptOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
992 phdr->cbAuxOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
993 phdr->cbSsOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
994 phdr->cbSsExtOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
995 phdr->cbFdOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
996 phdr->cbRfdOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
997 phdr->cbExtOffset += diff; |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
998 } |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
999 } |
c21ad324c249
[__sony_news && _SYSTYPE_SYSV]: Include sym.h and sys/elf_mips.h.
Richard M. Stallman <rms@gnu.org>
parents:
16120
diff
changeset
|
1000 #endif /* __sony_news && _SYSTYPE_SYSV */ |
8595
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
1001 /* If it is the symbol table, its st_shndx field needs to be patched. */ |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1002 if (NEW_SECTION_H (nn).sh_type == SHT_SYMTAB |
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1003 || NEW_SECTION_H (nn).sh_type == SHT_DYNSYM) |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1004 { |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1005 ElfW(Shdr) *spt = &NEW_SECTION_H (nn); |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1006 unsigned int num = spt->sh_size / spt->sh_entsize; |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1007 ElfW(Sym) * sym = (ElfW(Sym) *) (NEW_SECTION_H (nn).sh_offset + |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1008 new_base); |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1009 for (; num--; sym++) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1010 { |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1011 if ((sym->st_shndx == SHN_UNDEF) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1012 || (sym->st_shndx == SHN_ABS) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1013 || (sym->st_shndx == SHN_COMMON)) |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1014 continue; |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
1015 |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1016 PATCH_INDEX (sym->st_shndx); |
2005
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1017 } |
9b80d7737d2b
(unexec): Move data2 section header up so all section
Richard M. Stallman <rms@gnu.org>
parents:
484
diff
changeset
|
1018 } |
484 | 1019 } |
1020 | |
8595
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
1021 /* Update the symbol values of _edata and _end. */ |
8574
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1022 for (n = new_file_h->e_shnum - 1; n; n--) |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1023 { |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1024 byte *symnames; |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1025 ElfW(Sym) *symp, *symendp; |
8574
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1026 |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1027 if (NEW_SECTION_H (n).sh_type != SHT_DYNSYM |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1028 && NEW_SECTION_H (n).sh_type != SHT_SYMTAB) |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1029 continue; |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1030 |
11796 | 1031 symnames = ((byte *) new_base |
1032 + NEW_SECTION_H (NEW_SECTION_H (n).sh_link).sh_offset); | |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1033 symp = (ElfW(Sym) *) (NEW_SECTION_H (n).sh_offset + new_base); |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1034 symendp = (ElfW(Sym) *) ((byte *)symp + NEW_SECTION_H (n).sh_size); |
8574
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1035 |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1036 for (; symp < symendp; symp ++) |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1037 if (strcmp ((char *) (symnames + symp->st_name), "_end") == 0 |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1038 || strcmp ((char *) (symnames + symp->st_name), "_edata") == 0) |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1039 memcpy (&symp->st_value, &new_bss_addr, sizeof (new_bss_addr)); |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1040 } |
dd787a5353d1
Eliminate local var bss_end.
Richard M. Stallman <rms@gnu.org>
parents:
6052
diff
changeset
|
1041 |
14054
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1042 /* This loop seeks out relocation sections for the data section, so |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1043 that it can undo relocations performed by the runtime linker. */ |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1044 for (n = new_file_h->e_shnum - 1; n; n--) |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1045 { |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1046 ElfW(Shdr) section = NEW_SECTION_H (n); |
14054
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1047 switch (section.sh_type) { |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1048 default: |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1049 break; |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1050 case SHT_REL: |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1051 case SHT_RELA: |
14251
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
1052 /* This code handles two different size structs, but there should |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
1053 be no harm in that provided that r_offset is always the first |
9cacb2dd365c
(unexec): Undo data relocations unconditionally, not #ifdef SOLARIS2.
Roland McGrath <roland@gnu.org>
parents:
14186
diff
changeset
|
1054 member. */ |
14054
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1055 nn = section.sh_info; |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1056 if (!strcmp (old_section_names + NEW_SECTION_H (nn).sh_name, ".data") |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1057 || !strcmp ((old_section_names + NEW_SECTION_H (nn).sh_name), |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1058 ".data1")) |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1059 { |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1060 ElfW(Addr) offset = NEW_SECTION_H (nn).sh_addr - |
14054
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1061 NEW_SECTION_H (nn).sh_offset; |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1062 caddr_t reloc = old_base + section.sh_offset, end; |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1063 for (end = reloc + section.sh_size; reloc < end; |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1064 reloc += section.sh_entsize) |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1065 { |
16120
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1066 ElfW(Addr) addr = ((ElfW(Rel) *) reloc)->r_offset - offset; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1067 #ifdef __alpha__ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1068 /* The Alpha ELF binutils currently have a bug that |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1069 sometimes results in relocs that contain all |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1070 zeroes. Work around this for now... */ |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1071 if (((ElfW(Rel) *) reloc)->r_offset == 0) |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1072 continue; |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1073 #endif |
2c15b1cd3b84
unexelf1.c merged into this file.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
1074 memcpy (new_base + addr, old_base + addr, sizeof(ElfW(Addr))); |
14054
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1075 } |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1076 } |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1077 break; |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1078 } |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1079 } |
103a1b22fcd8
(unexec) [SOLARIS2]: Undo relocations performed by the
Karl Heuer <kwzh@gnu.org>
parents:
11827
diff
changeset
|
1080 |
11827
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1081 #ifdef UNEXEC_USE_MAP_PRIVATE |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1082 if (lseek (new_file, 0, SEEK_SET) == -1) |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1083 fatal ("Can't rewind (%s): errno %d\n", new_name, errno); |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1084 |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1085 if (write (new_file, new_base, new_file_size) != new_file_size) |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1086 fatal ("Can't write (%s): errno %d\n", new_name, errno); |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1087 #endif |
16a95d5d252e
(unexec) [UNEXEC_USE_MAP_PRIVATE]: New logic for
Karl Heuer <kwzh@gnu.org>
parents:
11796
diff
changeset
|
1088 |
8595
099f80df77bf
(unexec): Don't alter the info field of SHT_SYMTAB and SHT_DYNSYM sections.
Richard M. Stallman <rms@gnu.org>
parents:
8574
diff
changeset
|
1089 /* Close the files and make the new file executable. */ |
484 | 1090 |
1091 if (close (old_file)) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1092 fatal ("Can't close (%s): errno %d\n", old_name, errno); |
484 | 1093 |
1094 if (close (new_file)) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1095 fatal ("Can't close (%s): errno %d\n", new_name, errno); |
484 | 1096 |
1097 if (stat (new_name, &stat_buf) == -1) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1098 fatal ("Can't stat (%s): errno %d\n", new_name, errno); |
484 | 1099 |
1100 n = umask (777); | |
1101 umask (n); | |
1102 stat_buf.st_mode |= 0111 & ~n; | |
1103 if (chmod (new_name, stat_buf.st_mode) == -1) | |
4505
348f6a32d9b5
(unexec): Add casts for some comparisons.
Richard M. Stallman <rms@gnu.org>
parents:
2005
diff
changeset
|
1104 fatal ("Can't chmod (%s): errno %d\n", new_name, errno); |
484 | 1105 } |