Rev 5197 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
5197 | serge | 1 | /* Assorted BFD support routines, only used internally. |
6324 | serge | 2 | Copyright (C) 1990-2015 Free Software Foundation, Inc. |
5197 | serge | 3 | Written by Cygnus Support. |
4 | |||
5 | This file is part of BFD, the Binary File Descriptor library. |
||
6 | |||
7 | This program is free software; you can redistribute it and/or modify |
||
8 | it under the terms of the GNU General Public License as published by |
||
9 | the Free Software Foundation; either version 3 of the License, or |
||
10 | (at your option) any later version. |
||
11 | |||
12 | This program is distributed in the hope that it will be useful, |
||
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
||
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||
15 | GNU General Public License for more details. |
||
16 | |||
17 | You should have received a copy of the GNU General Public License |
||
18 | along with this program; if not, write to the Free Software |
||
19 | Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, |
||
20 | MA 02110-1301, USA. */ |
||
21 | |||
22 | #include "sysdep.h" |
||
23 | #include "bfd.h" |
||
24 | #include "libbfd.h" |
||
25 | |||
26 | #ifndef HAVE_GETPAGESIZE |
||
27 | #define getpagesize() 2048 |
||
28 | #endif |
||
29 | |||
30 | /* |
||
31 | SECTION |
||
32 | Implementation details |
||
33 | |||
34 | SUBSECTION |
||
35 | Internal functions |
||
36 | |||
37 | DESCRIPTION |
||
38 | These routines are used within BFD. |
||
39 | They are not intended for export, but are documented here for |
||
40 | completeness. |
||
41 | */ |
||
42 | |||
43 | /* A routine which is used in target vectors for unsupported |
||
44 | operations. */ |
||
45 | |||
46 | bfd_boolean |
||
47 | bfd_false (bfd *ignore ATTRIBUTE_UNUSED) |
||
48 | { |
||
49 | bfd_set_error (bfd_error_invalid_operation); |
||
50 | return FALSE; |
||
51 | } |
||
52 | |||
53 | /* A routine which is used in target vectors for supported operations |
||
54 | which do not actually do anything. */ |
||
55 | |||
56 | bfd_boolean |
||
57 | bfd_true (bfd *ignore ATTRIBUTE_UNUSED) |
||
58 | { |
||
59 | return TRUE; |
||
60 | } |
||
61 | |||
62 | /* A routine which is used in target vectors for unsupported |
||
63 | operations which return a pointer value. */ |
||
64 | |||
65 | void * |
||
66 | bfd_nullvoidptr (bfd *ignore ATTRIBUTE_UNUSED) |
||
67 | { |
||
68 | bfd_set_error (bfd_error_invalid_operation); |
||
69 | return NULL; |
||
70 | } |
||
71 | |||
72 | int |
||
73 | bfd_0 (bfd *ignore ATTRIBUTE_UNUSED) |
||
74 | { |
||
75 | return 0; |
||
76 | } |
||
77 | |||
78 | unsigned int |
||
79 | bfd_0u (bfd *ignore ATTRIBUTE_UNUSED) |
||
80 | { |
||
81 | return 0; |
||
82 | } |
||
83 | |||
84 | long |
||
85 | bfd_0l (bfd *ignore ATTRIBUTE_UNUSED) |
||
86 | { |
||
87 | return 0; |
||
88 | } |
||
89 | |||
90 | /* A routine which is used in target vectors for unsupported |
||
91 | operations which return -1 on error. */ |
||
92 | |||
93 | long |
||
94 | _bfd_n1 (bfd *ignore_abfd ATTRIBUTE_UNUSED) |
||
95 | { |
||
96 | bfd_set_error (bfd_error_invalid_operation); |
||
97 | return -1; |
||
98 | } |
||
99 | |||
100 | void |
||
101 | bfd_void (bfd *ignore ATTRIBUTE_UNUSED) |
||
102 | { |
||
103 | } |
||
104 | |||
105 | long |
||
106 | _bfd_norelocs_get_reloc_upper_bound (bfd *abfd ATTRIBUTE_UNUSED, |
||
107 | asection *sec ATTRIBUTE_UNUSED) |
||
108 | { |
||
109 | return sizeof (arelent *); |
||
110 | } |
||
111 | |||
112 | long |
||
113 | _bfd_norelocs_canonicalize_reloc (bfd *abfd ATTRIBUTE_UNUSED, |
||
114 | asection *sec ATTRIBUTE_UNUSED, |
||
115 | arelent **relptr, |
||
116 | asymbol **symbols ATTRIBUTE_UNUSED) |
||
117 | { |
||
118 | *relptr = NULL; |
||
119 | return 0; |
||
120 | } |
||
121 | |||
122 | bfd_boolean |
||
123 | _bfd_nocore_core_file_matches_executable_p |
||
124 | (bfd *ignore_core_bfd ATTRIBUTE_UNUSED, |
||
125 | bfd *ignore_exec_bfd ATTRIBUTE_UNUSED) |
||
126 | { |
||
127 | bfd_set_error (bfd_error_invalid_operation); |
||
128 | return FALSE; |
||
129 | } |
||
130 | |||
131 | /* Routine to handle core_file_failing_command entry point for targets |
||
132 | without core file support. */ |
||
133 | |||
134 | char * |
||
135 | _bfd_nocore_core_file_failing_command (bfd *ignore_abfd ATTRIBUTE_UNUSED) |
||
136 | { |
||
137 | bfd_set_error (bfd_error_invalid_operation); |
||
138 | return NULL; |
||
139 | } |
||
140 | |||
141 | /* Routine to handle core_file_failing_signal entry point for targets |
||
142 | without core file support. */ |
||
143 | |||
144 | int |
||
145 | _bfd_nocore_core_file_failing_signal (bfd *ignore_abfd ATTRIBUTE_UNUSED) |
||
146 | { |
||
147 | bfd_set_error (bfd_error_invalid_operation); |
||
148 | return 0; |
||
149 | } |
||
150 | |||
151 | /* Routine to handle the core_file_pid entry point for targets without |
||
152 | core file support. */ |
||
153 | |||
154 | int |
||
155 | _bfd_nocore_core_file_pid (bfd *ignore_abfd ATTRIBUTE_UNUSED) |
||
156 | { |
||
157 | bfd_set_error (bfd_error_invalid_operation); |
||
158 | return 0; |
||
159 | } |
||
160 | |||
161 | const bfd_target * |
||
162 | _bfd_dummy_target (bfd *ignore_abfd ATTRIBUTE_UNUSED) |
||
163 | { |
||
164 | bfd_set_error (bfd_error_wrong_format); |
||
165 | return 0; |
||
166 | } |
||
167 | |||
168 | /* Allocate memory using malloc. */ |
||
169 | |||
170 | void * |
||
171 | bfd_malloc (bfd_size_type size) |
||
172 | { |
||
173 | void *ptr; |
||
6324 | serge | 174 | size_t sz = (size_t) size; |
5197 | serge | 175 | |
6324 | serge | 176 | if (size != sz |
177 | /* This is to pacify memory checkers like valgrind. */ |
||
178 | || ((signed long) sz) < 0) |
||
5197 | serge | 179 | { |
180 | bfd_set_error (bfd_error_no_memory); |
||
181 | return NULL; |
||
182 | } |
||
183 | |||
6324 | serge | 184 | ptr = malloc (sz); |
185 | if (ptr == NULL && sz != 0) |
||
5197 | serge | 186 | bfd_set_error (bfd_error_no_memory); |
187 | |||
188 | return ptr; |
||
189 | } |
||
190 | |||
191 | /* Allocate memory using malloc, nmemb * size with overflow checking. */ |
||
192 | |||
193 | void * |
||
194 | bfd_malloc2 (bfd_size_type nmemb, bfd_size_type size) |
||
195 | { |
||
196 | if ((nmemb | size) >= HALF_BFD_SIZE_TYPE |
||
197 | && size != 0 |
||
198 | && nmemb > ~(bfd_size_type) 0 / size) |
||
199 | { |
||
200 | bfd_set_error (bfd_error_no_memory); |
||
201 | return NULL; |
||
202 | } |
||
203 | |||
6324 | serge | 204 | return bfd_malloc (size * nmemb); |
5197 | serge | 205 | } |
206 | |||
207 | /* Reallocate memory using realloc. */ |
||
208 | |||
209 | void * |
||
210 | bfd_realloc (void *ptr, bfd_size_type size) |
||
211 | { |
||
212 | void *ret; |
||
6324 | serge | 213 | size_t sz = (size_t) size; |
5197 | serge | 214 | |
6324 | serge | 215 | if (ptr == NULL) |
216 | return bfd_malloc (size); |
||
217 | |||
218 | if (size != sz |
||
219 | /* This is to pacify memory checkers like valgrind. */ |
||
220 | || ((signed long) sz) < 0) |
||
5197 | serge | 221 | { |
222 | bfd_set_error (bfd_error_no_memory); |
||
223 | return NULL; |
||
224 | } |
||
225 | |||
6324 | serge | 226 | ret = realloc (ptr, sz); |
5197 | serge | 227 | |
6324 | serge | 228 | if (ret == NULL && sz != 0) |
5197 | serge | 229 | bfd_set_error (bfd_error_no_memory); |
230 | |||
231 | return ret; |
||
232 | } |
||
233 | |||
234 | /* Reallocate memory using realloc, nmemb * size with overflow checking. */ |
||
235 | |||
236 | void * |
||
237 | bfd_realloc2 (void *ptr, bfd_size_type nmemb, bfd_size_type size) |
||
238 | { |
||
239 | if ((nmemb | size) >= HALF_BFD_SIZE_TYPE |
||
240 | && size != 0 |
||
241 | && nmemb > ~(bfd_size_type) 0 / size) |
||
242 | { |
||
243 | bfd_set_error (bfd_error_no_memory); |
||
244 | return NULL; |
||
245 | } |
||
246 | |||
6324 | serge | 247 | return bfd_realloc (ptr, size * nmemb); |
5197 | serge | 248 | } |
249 | |||
250 | /* Reallocate memory using realloc. |
||
251 | If this fails the pointer is freed before returning. */ |
||
252 | |||
253 | void * |
||
254 | bfd_realloc_or_free (void *ptr, bfd_size_type size) |
||
255 | { |
||
6324 | serge | 256 | void *ret = bfd_realloc (ptr, size); |
5197 | serge | 257 | |
6324 | serge | 258 | if (ret == NULL && ptr != NULL) |
5197 | serge | 259 | free (ptr); |
260 | |||
261 | return ret; |
||
262 | } |
||
263 | |||
264 | /* Allocate memory using malloc and clear it. */ |
||
265 | |||
266 | void * |
||
267 | bfd_zmalloc (bfd_size_type size) |
||
268 | { |
||
6324 | serge | 269 | void *ptr = bfd_malloc (size); |
5197 | serge | 270 | |
6324 | serge | 271 | if (ptr != NULL && size > 0) |
5197 | serge | 272 | memset (ptr, 0, (size_t) size); |
273 | |||
274 | return ptr; |
||
275 | } |
||
276 | |||
277 | /* Allocate memory using malloc (nmemb * size) with overflow checking |
||
278 | and clear it. */ |
||
279 | |||
280 | void * |
||
281 | bfd_zmalloc2 (bfd_size_type nmemb, bfd_size_type size) |
||
282 | { |
||
6324 | serge | 283 | void *ptr = bfd_malloc2 (nmemb, size); |
5197 | serge | 284 | |
6324 | serge | 285 | if (ptr != NULL) |
5197 | serge | 286 | { |
6324 | serge | 287 | size_t sz = nmemb * size; |
5197 | serge | 288 | |
6324 | serge | 289 | if (sz > 0) |
290 | memset (ptr, 0, sz); |
||
5197 | serge | 291 | } |
292 | |||
293 | return ptr; |
||
294 | } |
||
295 | |||
296 | /* |
||
297 | INTERNAL_FUNCTION |
||
298 | bfd_write_bigendian_4byte_int |
||
299 | |||
300 | SYNOPSIS |
||
301 | bfd_boolean bfd_write_bigendian_4byte_int (bfd *, unsigned int); |
||
302 | |||
303 | DESCRIPTION |
||
304 | Write a 4 byte integer @var{i} to the output BFD @var{abfd}, in big |
||
305 | endian order regardless of what else is going on. This is useful in |
||
306 | archives. |
||
307 | |||
308 | */ |
||
309 | bfd_boolean |
||
310 | bfd_write_bigendian_4byte_int (bfd *abfd, unsigned int i) |
||
311 | { |
||
312 | bfd_byte buffer[4]; |
||
313 | bfd_putb32 ((bfd_vma) i, buffer); |
||
314 | return bfd_bwrite (buffer, (bfd_size_type) 4, abfd) == 4; |
||
315 | } |
||
316 | |||
317 | |||
318 | /** The do-it-yourself (byte) sex-change kit */ |
||
319 | |||
320 | /* The middle letter e.g. getshort indicates Big or Little endian |
||
321 | target machine. It doesn't matter what the byte order of the host |
||
322 | machine is; these routines work for either. */ |
||
323 | |||
324 | /* FIXME: Should these take a count argument? |
||
325 | Answer (gnu@cygnus.com): No, but perhaps they should be inline |
||
326 | functions in swap.h #ifdef __GNUC__. |
||
327 | Gprof them later and find out. */ |
||
328 | |||
329 | /* |
||
330 | FUNCTION |
||
331 | bfd_put_size |
||
332 | FUNCTION |
||
333 | bfd_get_size |
||
334 | |||
335 | DESCRIPTION |
||
336 | These macros as used for reading and writing raw data in |
||
337 | sections; each access (except for bytes) is vectored through |
||
338 | the target format of the BFD and mangled accordingly. The |
||
339 | mangling performs any necessary endian translations and |
||
340 | removes alignment restrictions. Note that types accepted and |
||
341 | returned by these macros are identical so they can be swapped |
||
342 | around in macros---for example, @file{libaout.h} defines < |
||
343 | to either < |
||
344 | |||
345 | In the put routines, @var{val} must be a < |
||
346 | system without prototypes, the caller is responsible for making |
||
347 | sure that is true, with a cast if necessary. We don't cast |
||
348 | them in the macro definitions because that would prevent < |
||
349 | or < |
||
350 | To detect calling these with less than a < |
||
351 | < |
||
352 | |||
353 | . |
||
354 | .{* Byte swapping macros for user section data. *} |
||
355 | . |
||
356 | .#define bfd_put_8(abfd, val, ptr) \ |
||
357 | . ((void) (*((unsigned char *) (ptr)) = (val) & 0xff)) |
||
358 | .#define bfd_put_signed_8 \ |
||
359 | . bfd_put_8 |
||
360 | .#define bfd_get_8(abfd, ptr) \ |
||
361 | . (*(const unsigned char *) (ptr) & 0xff) |
||
362 | .#define bfd_get_signed_8(abfd, ptr) \ |
||
363 | . (((*(const unsigned char *) (ptr) & 0xff) ^ 0x80) - 0x80) |
||
364 | . |
||
365 | .#define bfd_put_16(abfd, val, ptr) \ |
||
366 | . BFD_SEND (abfd, bfd_putx16, ((val),(ptr))) |
||
367 | .#define bfd_put_signed_16 \ |
||
368 | . bfd_put_16 |
||
369 | .#define bfd_get_16(abfd, ptr) \ |
||
370 | . BFD_SEND (abfd, bfd_getx16, (ptr)) |
||
371 | .#define bfd_get_signed_16(abfd, ptr) \ |
||
372 | . BFD_SEND (abfd, bfd_getx_signed_16, (ptr)) |
||
373 | . |
||
374 | .#define bfd_put_32(abfd, val, ptr) \ |
||
375 | . BFD_SEND (abfd, bfd_putx32, ((val),(ptr))) |
||
376 | .#define bfd_put_signed_32 \ |
||
377 | . bfd_put_32 |
||
378 | .#define bfd_get_32(abfd, ptr) \ |
||
379 | . BFD_SEND (abfd, bfd_getx32, (ptr)) |
||
380 | .#define bfd_get_signed_32(abfd, ptr) \ |
||
381 | . BFD_SEND (abfd, bfd_getx_signed_32, (ptr)) |
||
382 | . |
||
383 | .#define bfd_put_64(abfd, val, ptr) \ |
||
384 | . BFD_SEND (abfd, bfd_putx64, ((val), (ptr))) |
||
385 | .#define bfd_put_signed_64 \ |
||
386 | . bfd_put_64 |
||
387 | .#define bfd_get_64(abfd, ptr) \ |
||
388 | . BFD_SEND (abfd, bfd_getx64, (ptr)) |
||
389 | .#define bfd_get_signed_64(abfd, ptr) \ |
||
390 | . BFD_SEND (abfd, bfd_getx_signed_64, (ptr)) |
||
391 | . |
||
392 | .#define bfd_get(bits, abfd, ptr) \ |
||
393 | . ((bits) == 8 ? (bfd_vma) bfd_get_8 (abfd, ptr) \ |
||
394 | . : (bits) == 16 ? bfd_get_16 (abfd, ptr) \ |
||
395 | . : (bits) == 32 ? bfd_get_32 (abfd, ptr) \ |
||
396 | . : (bits) == 64 ? bfd_get_64 (abfd, ptr) \ |
||
397 | . : (abort (), (bfd_vma) - 1)) |
||
398 | . |
||
399 | .#define bfd_put(bits, abfd, val, ptr) \ |
||
400 | . ((bits) == 8 ? bfd_put_8 (abfd, val, ptr) \ |
||
401 | . : (bits) == 16 ? bfd_put_16 (abfd, val, ptr) \ |
||
402 | . : (bits) == 32 ? bfd_put_32 (abfd, val, ptr) \ |
||
403 | . : (bits) == 64 ? bfd_put_64 (abfd, val, ptr) \ |
||
404 | . : (abort (), (void) 0)) |
||
405 | . |
||
406 | */ |
||
407 | |||
408 | /* |
||
409 | FUNCTION |
||
410 | bfd_h_put_size |
||
411 | bfd_h_get_size |
||
412 | |||
413 | DESCRIPTION |
||
414 | These macros have the same function as their < |
||
415 | brethren, except that they are used for removing information |
||
416 | for the header records of object files. Believe it or not, |
||
417 | some object files keep their header records in big endian |
||
418 | order and their data in little endian order. |
||
419 | . |
||
420 | .{* Byte swapping macros for file header data. *} |
||
421 | . |
||
422 | .#define bfd_h_put_8(abfd, val, ptr) \ |
||
423 | . bfd_put_8 (abfd, val, ptr) |
||
424 | .#define bfd_h_put_signed_8(abfd, val, ptr) \ |
||
425 | . bfd_put_8 (abfd, val, ptr) |
||
426 | .#define bfd_h_get_8(abfd, ptr) \ |
||
427 | . bfd_get_8 (abfd, ptr) |
||
428 | .#define bfd_h_get_signed_8(abfd, ptr) \ |
||
429 | . bfd_get_signed_8 (abfd, ptr) |
||
430 | . |
||
431 | .#define bfd_h_put_16(abfd, val, ptr) \ |
||
432 | . BFD_SEND (abfd, bfd_h_putx16, (val, ptr)) |
||
433 | .#define bfd_h_put_signed_16 \ |
||
434 | . bfd_h_put_16 |
||
435 | .#define bfd_h_get_16(abfd, ptr) \ |
||
436 | . BFD_SEND (abfd, bfd_h_getx16, (ptr)) |
||
437 | .#define bfd_h_get_signed_16(abfd, ptr) \ |
||
438 | . BFD_SEND (abfd, bfd_h_getx_signed_16, (ptr)) |
||
439 | . |
||
440 | .#define bfd_h_put_32(abfd, val, ptr) \ |
||
441 | . BFD_SEND (abfd, bfd_h_putx32, (val, ptr)) |
||
442 | .#define bfd_h_put_signed_32 \ |
||
443 | . bfd_h_put_32 |
||
444 | .#define bfd_h_get_32(abfd, ptr) \ |
||
445 | . BFD_SEND (abfd, bfd_h_getx32, (ptr)) |
||
446 | .#define bfd_h_get_signed_32(abfd, ptr) \ |
||
447 | . BFD_SEND (abfd, bfd_h_getx_signed_32, (ptr)) |
||
448 | . |
||
449 | .#define bfd_h_put_64(abfd, val, ptr) \ |
||
450 | . BFD_SEND (abfd, bfd_h_putx64, (val, ptr)) |
||
451 | .#define bfd_h_put_signed_64 \ |
||
452 | . bfd_h_put_64 |
||
453 | .#define bfd_h_get_64(abfd, ptr) \ |
||
454 | . BFD_SEND (abfd, bfd_h_getx64, (ptr)) |
||
455 | .#define bfd_h_get_signed_64(abfd, ptr) \ |
||
456 | . BFD_SEND (abfd, bfd_h_getx_signed_64, (ptr)) |
||
457 | . |
||
458 | .{* Aliases for the above, which should eventually go away. *} |
||
459 | . |
||
460 | .#define H_PUT_64 bfd_h_put_64 |
||
461 | .#define H_PUT_32 bfd_h_put_32 |
||
462 | .#define H_PUT_16 bfd_h_put_16 |
||
463 | .#define H_PUT_8 bfd_h_put_8 |
||
464 | .#define H_PUT_S64 bfd_h_put_signed_64 |
||
465 | .#define H_PUT_S32 bfd_h_put_signed_32 |
||
466 | .#define H_PUT_S16 bfd_h_put_signed_16 |
||
467 | .#define H_PUT_S8 bfd_h_put_signed_8 |
||
468 | .#define H_GET_64 bfd_h_get_64 |
||
469 | .#define H_GET_32 bfd_h_get_32 |
||
470 | .#define H_GET_16 bfd_h_get_16 |
||
471 | .#define H_GET_8 bfd_h_get_8 |
||
472 | .#define H_GET_S64 bfd_h_get_signed_64 |
||
473 | .#define H_GET_S32 bfd_h_get_signed_32 |
||
474 | .#define H_GET_S16 bfd_h_get_signed_16 |
||
475 | .#define H_GET_S8 bfd_h_get_signed_8 |
||
476 | . |
||
477 | .*/ |
||
478 | |||
479 | /* Sign extension to bfd_signed_vma. */ |
||
6324 | serge | 480 | #define COERCE16(x) (((bfd_vma) (x) ^ 0x8000) - 0x8000) |
481 | #define COERCE32(x) (((bfd_vma) (x) ^ 0x80000000) - 0x80000000) |
||
5197 | serge | 482 | #define COERCE64(x) \ |
6324 | serge | 483 | (((bfd_uint64_t) (x) ^ ((bfd_uint64_t) 1 << 63)) - ((bfd_uint64_t) 1 << 63)) |
5197 | serge | 484 | |
485 | bfd_vma |
||
486 | bfd_getb16 (const void *p) |
||
487 | { |
||
488 | const bfd_byte *addr = (const bfd_byte *) p; |
||
489 | return (addr[0] << 8) | addr[1]; |
||
490 | } |
||
491 | |||
492 | bfd_vma |
||
493 | bfd_getl16 (const void *p) |
||
494 | { |
||
495 | const bfd_byte *addr = (const bfd_byte *) p; |
||
496 | return (addr[1] << 8) | addr[0]; |
||
497 | } |
||
498 | |||
499 | bfd_signed_vma |
||
500 | bfd_getb_signed_16 (const void *p) |
||
501 | { |
||
502 | const bfd_byte *addr = (const bfd_byte *) p; |
||
503 | return COERCE16 ((addr[0] << 8) | addr[1]); |
||
504 | } |
||
505 | |||
506 | bfd_signed_vma |
||
507 | bfd_getl_signed_16 (const void *p) |
||
508 | { |
||
509 | const bfd_byte *addr = (const bfd_byte *) p; |
||
510 | return COERCE16 ((addr[1] << 8) | addr[0]); |
||
511 | } |
||
512 | |||
513 | void |
||
514 | bfd_putb16 (bfd_vma data, void *p) |
||
515 | { |
||
516 | bfd_byte *addr = (bfd_byte *) p; |
||
517 | addr[0] = (data >> 8) & 0xff; |
||
518 | addr[1] = data & 0xff; |
||
519 | } |
||
520 | |||
521 | void |
||
522 | bfd_putl16 (bfd_vma data, void *p) |
||
523 | { |
||
524 | bfd_byte *addr = (bfd_byte *) p; |
||
525 | addr[0] = data & 0xff; |
||
526 | addr[1] = (data >> 8) & 0xff; |
||
527 | } |
||
528 | |||
529 | bfd_vma |
||
530 | bfd_getb32 (const void *p) |
||
531 | { |
||
532 | const bfd_byte *addr = (const bfd_byte *) p; |
||
533 | unsigned long v; |
||
534 | |||
535 | v = (unsigned long) addr[0] << 24; |
||
536 | v |= (unsigned long) addr[1] << 16; |
||
537 | v |= (unsigned long) addr[2] << 8; |
||
538 | v |= (unsigned long) addr[3]; |
||
539 | return v; |
||
540 | } |
||
541 | |||
542 | bfd_vma |
||
543 | bfd_getl32 (const void *p) |
||
544 | { |
||
545 | const bfd_byte *addr = (const bfd_byte *) p; |
||
546 | unsigned long v; |
||
547 | |||
548 | v = (unsigned long) addr[0]; |
||
549 | v |= (unsigned long) addr[1] << 8; |
||
550 | v |= (unsigned long) addr[2] << 16; |
||
551 | v |= (unsigned long) addr[3] << 24; |
||
552 | return v; |
||
553 | } |
||
554 | |||
555 | bfd_signed_vma |
||
556 | bfd_getb_signed_32 (const void *p) |
||
557 | { |
||
558 | const bfd_byte *addr = (const bfd_byte *) p; |
||
559 | unsigned long v; |
||
560 | |||
561 | v = (unsigned long) addr[0] << 24; |
||
562 | v |= (unsigned long) addr[1] << 16; |
||
563 | v |= (unsigned long) addr[2] << 8; |
||
564 | v |= (unsigned long) addr[3]; |
||
565 | return COERCE32 (v); |
||
566 | } |
||
567 | |||
568 | bfd_signed_vma |
||
569 | bfd_getl_signed_32 (const void *p) |
||
570 | { |
||
571 | const bfd_byte *addr = (const bfd_byte *) p; |
||
572 | unsigned long v; |
||
573 | |||
574 | v = (unsigned long) addr[0]; |
||
575 | v |= (unsigned long) addr[1] << 8; |
||
576 | v |= (unsigned long) addr[2] << 16; |
||
577 | v |= (unsigned long) addr[3] << 24; |
||
578 | return COERCE32 (v); |
||
579 | } |
||
580 | |||
581 | bfd_uint64_t |
||
582 | bfd_getb64 (const void *p ATTRIBUTE_UNUSED) |
||
583 | { |
||
584 | #ifdef BFD_HOST_64_BIT |
||
585 | const bfd_byte *addr = (const bfd_byte *) p; |
||
586 | bfd_uint64_t v; |
||
587 | |||
588 | v = addr[0]; v <<= 8; |
||
589 | v |= addr[1]; v <<= 8; |
||
590 | v |= addr[2]; v <<= 8; |
||
591 | v |= addr[3]; v <<= 8; |
||
592 | v |= addr[4]; v <<= 8; |
||
593 | v |= addr[5]; v <<= 8; |
||
594 | v |= addr[6]; v <<= 8; |
||
595 | v |= addr[7]; |
||
596 | |||
597 | return v; |
||
598 | #else |
||
599 | BFD_FAIL(); |
||
600 | return 0; |
||
601 | #endif |
||
602 | } |
||
603 | |||
604 | bfd_uint64_t |
||
605 | bfd_getl64 (const void *p ATTRIBUTE_UNUSED) |
||
606 | { |
||
607 | #ifdef BFD_HOST_64_BIT |
||
608 | const bfd_byte *addr = (const bfd_byte *) p; |
||
609 | bfd_uint64_t v; |
||
610 | |||
611 | v = addr[7]; v <<= 8; |
||
612 | v |= addr[6]; v <<= 8; |
||
613 | v |= addr[5]; v <<= 8; |
||
614 | v |= addr[4]; v <<= 8; |
||
615 | v |= addr[3]; v <<= 8; |
||
616 | v |= addr[2]; v <<= 8; |
||
617 | v |= addr[1]; v <<= 8; |
||
618 | v |= addr[0]; |
||
619 | |||
620 | return v; |
||
621 | #else |
||
622 | BFD_FAIL(); |
||
623 | return 0; |
||
624 | #endif |
||
625 | |||
626 | } |
||
627 | |||
628 | bfd_int64_t |
||
629 | bfd_getb_signed_64 (const void *p ATTRIBUTE_UNUSED) |
||
630 | { |
||
631 | #ifdef BFD_HOST_64_BIT |
||
632 | const bfd_byte *addr = (const bfd_byte *) p; |
||
633 | bfd_uint64_t v; |
||
634 | |||
635 | v = addr[0]; v <<= 8; |
||
636 | v |= addr[1]; v <<= 8; |
||
637 | v |= addr[2]; v <<= 8; |
||
638 | v |= addr[3]; v <<= 8; |
||
639 | v |= addr[4]; v <<= 8; |
||
640 | v |= addr[5]; v <<= 8; |
||
641 | v |= addr[6]; v <<= 8; |
||
642 | v |= addr[7]; |
||
643 | |||
644 | return COERCE64 (v); |
||
645 | #else |
||
646 | BFD_FAIL(); |
||
647 | return 0; |
||
648 | #endif |
||
649 | } |
||
650 | |||
651 | bfd_int64_t |
||
652 | bfd_getl_signed_64 (const void *p ATTRIBUTE_UNUSED) |
||
653 | { |
||
654 | #ifdef BFD_HOST_64_BIT |
||
655 | const bfd_byte *addr = (const bfd_byte *) p; |
||
656 | bfd_uint64_t v; |
||
657 | |||
658 | v = addr[7]; v <<= 8; |
||
659 | v |= addr[6]; v <<= 8; |
||
660 | v |= addr[5]; v <<= 8; |
||
661 | v |= addr[4]; v <<= 8; |
||
662 | v |= addr[3]; v <<= 8; |
||
663 | v |= addr[2]; v <<= 8; |
||
664 | v |= addr[1]; v <<= 8; |
||
665 | v |= addr[0]; |
||
666 | |||
667 | return COERCE64 (v); |
||
668 | #else |
||
669 | BFD_FAIL(); |
||
670 | return 0; |
||
671 | #endif |
||
672 | } |
||
673 | |||
674 | void |
||
675 | bfd_putb32 (bfd_vma data, void *p) |
||
676 | { |
||
677 | bfd_byte *addr = (bfd_byte *) p; |
||
678 | addr[0] = (data >> 24) & 0xff; |
||
679 | addr[1] = (data >> 16) & 0xff; |
||
680 | addr[2] = (data >> 8) & 0xff; |
||
681 | addr[3] = data & 0xff; |
||
682 | } |
||
683 | |||
684 | void |
||
685 | bfd_putl32 (bfd_vma data, void *p) |
||
686 | { |
||
687 | bfd_byte *addr = (bfd_byte *) p; |
||
688 | addr[0] = data & 0xff; |
||
689 | addr[1] = (data >> 8) & 0xff; |
||
690 | addr[2] = (data >> 16) & 0xff; |
||
691 | addr[3] = (data >> 24) & 0xff; |
||
692 | } |
||
693 | |||
694 | void |
||
695 | bfd_putb64 (bfd_uint64_t data ATTRIBUTE_UNUSED, void *p ATTRIBUTE_UNUSED) |
||
696 | { |
||
697 | #ifdef BFD_HOST_64_BIT |
||
698 | bfd_byte *addr = (bfd_byte *) p; |
||
699 | addr[0] = (data >> (7*8)) & 0xff; |
||
700 | addr[1] = (data >> (6*8)) & 0xff; |
||
701 | addr[2] = (data >> (5*8)) & 0xff; |
||
702 | addr[3] = (data >> (4*8)) & 0xff; |
||
703 | addr[4] = (data >> (3*8)) & 0xff; |
||
704 | addr[5] = (data >> (2*8)) & 0xff; |
||
705 | addr[6] = (data >> (1*8)) & 0xff; |
||
706 | addr[7] = (data >> (0*8)) & 0xff; |
||
707 | #else |
||
708 | BFD_FAIL(); |
||
709 | #endif |
||
710 | } |
||
711 | |||
712 | void |
||
713 | bfd_putl64 (bfd_uint64_t data ATTRIBUTE_UNUSED, void *p ATTRIBUTE_UNUSED) |
||
714 | { |
||
715 | #ifdef BFD_HOST_64_BIT |
||
716 | bfd_byte *addr = (bfd_byte *) p; |
||
717 | addr[7] = (data >> (7*8)) & 0xff; |
||
718 | addr[6] = (data >> (6*8)) & 0xff; |
||
719 | addr[5] = (data >> (5*8)) & 0xff; |
||
720 | addr[4] = (data >> (4*8)) & 0xff; |
||
721 | addr[3] = (data >> (3*8)) & 0xff; |
||
722 | addr[2] = (data >> (2*8)) & 0xff; |
||
723 | addr[1] = (data >> (1*8)) & 0xff; |
||
724 | addr[0] = (data >> (0*8)) & 0xff; |
||
725 | #else |
||
726 | BFD_FAIL(); |
||
727 | #endif |
||
728 | } |
||
729 | |||
730 | void |
||
731 | bfd_put_bits (bfd_uint64_t data, void *p, int bits, bfd_boolean big_p) |
||
732 | { |
||
733 | bfd_byte *addr = (bfd_byte *) p; |
||
734 | int i; |
||
735 | int bytes; |
||
736 | |||
737 | if (bits % 8 != 0) |
||
738 | abort (); |
||
739 | |||
740 | bytes = bits / 8; |
||
741 | for (i = 0; i < bytes; i++) |
||
742 | { |
||
743 | int addr_index = big_p ? bytes - i - 1 : i; |
||
744 | |||
745 | addr[addr_index] = data & 0xff; |
||
746 | data >>= 8; |
||
747 | } |
||
748 | } |
||
749 | |||
750 | bfd_uint64_t |
||
751 | bfd_get_bits (const void *p, int bits, bfd_boolean big_p) |
||
752 | { |
||
753 | const bfd_byte *addr = (const bfd_byte *) p; |
||
754 | bfd_uint64_t data; |
||
755 | int i; |
||
756 | int bytes; |
||
757 | |||
758 | if (bits % 8 != 0) |
||
759 | abort (); |
||
760 | |||
761 | data = 0; |
||
762 | bytes = bits / 8; |
||
763 | for (i = 0; i < bytes; i++) |
||
764 | { |
||
765 | int addr_index = big_p ? i : bytes - i - 1; |
||
766 | |||
767 | data = (data << 8) | addr[addr_index]; |
||
768 | } |
||
769 | |||
770 | return data; |
||
771 | } |
||
772 | |||
773 | /* Default implementation */ |
||
774 | |||
775 | bfd_boolean |
||
776 | _bfd_generic_get_section_contents (bfd *abfd, |
||
777 | sec_ptr section, |
||
778 | void *location, |
||
779 | file_ptr offset, |
||
780 | bfd_size_type count) |
||
781 | { |
||
782 | bfd_size_type sz; |
||
783 | if (count == 0) |
||
784 | return TRUE; |
||
785 | |||
786 | if (section->compress_status != COMPRESS_SECTION_NONE) |
||
787 | { |
||
788 | (*_bfd_error_handler) |
||
789 | (_("%B: unable to get decompressed section %A"), |
||
790 | abfd, section); |
||
791 | bfd_set_error (bfd_error_invalid_operation); |
||
792 | return FALSE; |
||
793 | } |
||
794 | |||
795 | /* We do allow reading of a section after bfd_final_link has |
||
796 | written the contents out to disk. In that situation, rawsize is |
||
797 | just a stale version of size, so ignore it. Otherwise we must be |
||
798 | reading an input section, where rawsize, if different to size, |
||
799 | is the on-disk size. */ |
||
800 | if (abfd->direction != write_direction && section->rawsize != 0) |
||
801 | sz = section->rawsize; |
||
802 | else |
||
803 | sz = section->size; |
||
804 | if (offset + count < count |
||
805 | || offset + count > sz) |
||
806 | { |
||
807 | bfd_set_error (bfd_error_invalid_operation); |
||
808 | return FALSE; |
||
809 | } |
||
810 | |||
811 | if (bfd_seek (abfd, section->filepos + offset, SEEK_SET) != 0 |
||
812 | || bfd_bread (location, count, abfd) != count) |
||
813 | return FALSE; |
||
814 | |||
815 | return TRUE; |
||
816 | } |
||
817 | |||
818 | bfd_boolean |
||
819 | _bfd_generic_get_section_contents_in_window |
||
820 | (bfd *abfd ATTRIBUTE_UNUSED, |
||
821 | sec_ptr section ATTRIBUTE_UNUSED, |
||
822 | bfd_window *w ATTRIBUTE_UNUSED, |
||
823 | file_ptr offset ATTRIBUTE_UNUSED, |
||
824 | bfd_size_type count ATTRIBUTE_UNUSED) |
||
825 | { |
||
826 | #ifdef USE_MMAP |
||
827 | bfd_size_type sz; |
||
828 | |||
829 | if (count == 0) |
||
830 | return TRUE; |
||
831 | if (abfd->xvec->_bfd_get_section_contents |
||
832 | != _bfd_generic_get_section_contents) |
||
833 | { |
||
834 | /* We don't know what changes the bfd's get_section_contents |
||
835 | method may have to make. So punt trying to map the file |
||
836 | window, and let get_section_contents do its thing. */ |
||
837 | /* @@ FIXME : If the internal window has a refcount of 1 and was |
||
838 | allocated with malloc instead of mmap, just reuse it. */ |
||
839 | bfd_free_window (w); |
||
840 | w->i = bfd_zmalloc (sizeof (bfd_window_internal)); |
||
841 | if (w->i == NULL) |
||
842 | return FALSE; |
||
843 | w->i->data = bfd_malloc (count); |
||
844 | if (w->i->data == NULL) |
||
845 | { |
||
846 | free (w->i); |
||
847 | w->i = NULL; |
||
848 | return FALSE; |
||
849 | } |
||
850 | w->i->mapped = 0; |
||
851 | w->i->refcount = 1; |
||
852 | w->size = w->i->size = count; |
||
853 | w->data = w->i->data; |
||
854 | return bfd_get_section_contents (abfd, section, w->data, offset, count); |
||
855 | } |
||
856 | if (abfd->direction != write_direction && section->rawsize != 0) |
||
857 | sz = section->rawsize; |
||
858 | else |
||
859 | sz = section->size; |
||
860 | if (offset + count > sz |
||
861 | || ! bfd_get_file_window (abfd, section->filepos + offset, count, w, |
||
862 | TRUE)) |
||
863 | return FALSE; |
||
864 | return TRUE; |
||
865 | #else |
||
866 | abort (); |
||
867 | #endif |
||
868 | } |
||
869 | |||
870 | /* This generic function can only be used in implementations where creating |
||
871 | NEW sections is disallowed. It is useful in patching existing sections |
||
872 | in read-write files, though. See other set_section_contents functions |
||
873 | to see why it doesn't work for new sections. */ |
||
874 | bfd_boolean |
||
875 | _bfd_generic_set_section_contents (bfd *abfd, |
||
876 | sec_ptr section, |
||
877 | const void *location, |
||
878 | file_ptr offset, |
||
879 | bfd_size_type count) |
||
880 | { |
||
881 | if (count == 0) |
||
882 | return TRUE; |
||
883 | |||
884 | if (bfd_seek (abfd, section->filepos + offset, SEEK_SET) != 0 |
||
885 | || bfd_bwrite (location, count, abfd) != count) |
||
886 | return FALSE; |
||
887 | |||
888 | return TRUE; |
||
889 | } |
||
890 | |||
891 | /* |
||
892 | INTERNAL_FUNCTION |
||
893 | bfd_log2 |
||
894 | |||
895 | SYNOPSIS |
||
896 | unsigned int bfd_log2 (bfd_vma x); |
||
897 | |||
898 | DESCRIPTION |
||
899 | Return the log base 2 of the value supplied, rounded up. E.g., an |
||
900 | @var{x} of 1025 returns 11. A @var{x} of 0 returns 0. |
||
901 | */ |
||
902 | |||
903 | unsigned int |
||
904 | bfd_log2 (bfd_vma x) |
||
905 | { |
||
906 | unsigned int result = 0; |
||
907 | |||
908 | if (x <= 1) |
||
909 | return result; |
||
910 | --x; |
||
911 | do |
||
912 | ++result; |
||
913 | while ((x >>= 1) != 0); |
||
914 | return result; |
||
915 | } |
||
916 | |||
917 | bfd_boolean |
||
918 | bfd_generic_is_local_label_name (bfd *abfd, const char *name) |
||
919 | { |
||
920 | char locals_prefix = (bfd_get_symbol_leading_char (abfd) == '_') ? 'L' : '.'; |
||
921 | |||
922 | return name[0] == locals_prefix; |
||
923 | } |
||
924 | |||
925 | /* Can be used from / for bfd_merge_private_bfd_data to check that |
||
926 | endianness matches between input and output file. Returns |
||
927 | TRUE for a match, otherwise returns FALSE and emits an error. */ |
||
928 | bfd_boolean |
||
929 | _bfd_generic_verify_endian_match (bfd *ibfd, bfd *obfd) |
||
930 | { |
||
931 | if (ibfd->xvec->byteorder != obfd->xvec->byteorder |
||
932 | && ibfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN |
||
933 | && obfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN) |
||
934 | { |
||
935 | const char *msg; |
||
936 | |||
937 | if (bfd_big_endian (ibfd)) |
||
938 | msg = _("%B: compiled for a big endian system and target is little endian"); |
||
939 | else |
||
940 | msg = _("%B: compiled for a little endian system and target is big endian"); |
||
941 | |||
942 | (*_bfd_error_handler) (msg, ibfd); |
||
943 | |||
944 | bfd_set_error (bfd_error_wrong_format); |
||
945 | return FALSE; |
||
946 | } |
||
947 | |||
948 | return TRUE; |
||
949 | } |
||
950 | |||
951 | /* Give a warning at runtime if someone compiles code which calls |
||
952 | old routines. */ |
||
953 | |||
954 | void |
||
955 | warn_deprecated (const char *what, |
||
956 | const char *file, |
||
957 | int line, |
||
958 | const char *func) |
||
959 | { |
||
960 | /* Poor man's tracking of functions we've already warned about. */ |
||
961 | static size_t mask = 0; |
||
962 | |||
963 | if (~(size_t) func & ~mask) |
||
964 | { |
||
965 | fflush (stdout); |
||
966 | /* Note: separate sentences in order to allow |
||
967 | for translation into other languages. */ |
||
968 | if (func) |
||
969 | fprintf (stderr, _("Deprecated %s called at %s line %d in %s\n"), |
||
970 | what, file, line, func); |
||
971 | else |
||
972 | fprintf (stderr, _("Deprecated %s called\n"), what); |
||
973 | fflush (stderr); |
||
974 | mask |= ~(size_t) func; |
||
975 | } |
||
976 | } |
||
977 | |||
978 | /* Helper function for reading uleb128 encoded data. */ |
||
979 | |||
980 | bfd_vma |
||
981 | read_unsigned_leb128 (bfd *abfd ATTRIBUTE_UNUSED, |
||
982 | bfd_byte *buf, |
||
983 | unsigned int *bytes_read_ptr) |
||
984 | { |
||
985 | bfd_vma result; |
||
986 | unsigned int num_read; |
||
987 | unsigned int shift; |
||
988 | unsigned char byte; |
||
989 | |||
990 | result = 0; |
||
991 | shift = 0; |
||
992 | num_read = 0; |
||
993 | do |
||
994 | { |
||
995 | byte = bfd_get_8 (abfd, buf); |
||
996 | buf++; |
||
997 | num_read++; |
||
998 | result |= (((bfd_vma) byte & 0x7f) << shift); |
||
999 | shift += 7; |
||
1000 | } |
||
1001 | while (byte & 0x80); |
||
1002 | *bytes_read_ptr = num_read; |
||
1003 | return result; |
||
1004 | } |
||
1005 | |||
6324 | serge | 1006 | /* Read in a LEB128 encoded value from ABFD starting at DATA. |
1007 | If SIGN is true, return a signed LEB128 value. |
||
1008 | If LENGTH_RETURN is not NULL, return in it the number of bytes read. |
||
1009 | No bytes will be read at address END or beyond. */ |
||
1010 | |||
1011 | bfd_vma |
||
1012 | safe_read_leb128 (bfd *abfd ATTRIBUTE_UNUSED, |
||
1013 | bfd_byte *data, |
||
1014 | unsigned int *length_return, |
||
1015 | bfd_boolean sign, |
||
1016 | const bfd_byte * const end) |
||
1017 | { |
||
1018 | bfd_vma result = 0; |
||
1019 | unsigned int num_read = 0; |
||
1020 | unsigned int shift = 0; |
||
1021 | unsigned char byte = 0; |
||
1022 | |||
1023 | while (data < end) |
||
1024 | { |
||
1025 | byte = bfd_get_8 (abfd, data); |
||
1026 | data++; |
||
1027 | num_read++; |
||
1028 | |||
1029 | result |= ((bfd_vma) (byte & 0x7f)) << shift; |
||
1030 | |||
1031 | shift += 7; |
||
1032 | if ((byte & 0x80) == 0) |
||
1033 | break; |
||
1034 | } |
||
1035 | |||
1036 | if (length_return != NULL) |
||
1037 | *length_return = num_read; |
||
1038 | |||
1039 | if (sign && (shift < 8 * sizeof (result)) && (byte & 0x40)) |
||
1040 | result |= -((bfd_vma) 1 << shift); |
||
1041 | |||
1042 | return result; |
||
1043 | } |
||
1044 | |||
5197 | serge | 1045 | /* Helper function for reading sleb128 encoded data. */ |
1046 | |||
1047 | bfd_signed_vma |
||
1048 | read_signed_leb128 (bfd *abfd ATTRIBUTE_UNUSED, |
||
1049 | bfd_byte *buf, |
||
1050 | unsigned int *bytes_read_ptr) |
||
1051 | { |
||
1052 | bfd_vma result; |
||
1053 | unsigned int shift; |
||
1054 | unsigned int num_read; |
||
1055 | unsigned char byte; |
||
1056 | |||
1057 | result = 0; |
||
1058 | shift = 0; |
||
1059 | num_read = 0; |
||
1060 | do |
||
1061 | { |
||
1062 | byte = bfd_get_8 (abfd, buf); |
||
1063 | buf ++; |
||
1064 | num_read ++; |
||
1065 | result |= (((bfd_vma) byte & 0x7f) << shift); |
||
1066 | shift += 7; |
||
1067 | } |
||
1068 | while (byte & 0x80); |
||
1069 | if (shift < 8 * sizeof (result) && (byte & 0x40)) |
||
1070 | result |= (((bfd_vma) -1) << shift); |
||
1071 | *bytes_read_ptr = num_read; |
||
1072 | return result; |
||
1073 | } |
||
1074 | |||
1075 | bfd_boolean |
||
1076 | _bfd_generic_init_private_section_data (bfd *ibfd ATTRIBUTE_UNUSED, |
||
1077 | asection *isec ATTRIBUTE_UNUSED, |
||
1078 | bfd *obfd ATTRIBUTE_UNUSED, |
||
1079 | asection *osec ATTRIBUTE_UNUSED, |
||
1080 | struct bfd_link_info *link_info ATTRIBUTE_UNUSED) |
||
1081 | { |
||
1082 | return TRUE; |
||
1083 | }><>>><>><>>><>>><>=>>><>>>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>=><=>><>><>><>><>><>><>><>><>><>><>><>><>><>><>><>><>><>><> |