1 /* Define a target vector and some small routines for a variant of a.out.
2 Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
3 2000, 2001, 2002, 2003, 2004, 2005
4 Free Software Foundation, Inc.
6 This file is part of BFD, the Binary File Descriptor library.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
22 #include "aout/aout64.h"
23 #include "aout/stab_gnu.h"
25 /*#include "libaout.h"*/
28 #define SEGMENT_SIZE TARGET_PAGE_SIZE
31 extern reloc_howto_type
* NAME (aout
, reloc_type_lookup
) (bfd
*, bfd_reloc_code_real_type
);
33 /* Set parameters about this a.out file that are machine-dependent.
34 This routine is called from some_aout_object_p just before it returns. */
37 static const bfd_target
*
38 MY (callback
) (bfd
*abfd
)
40 struct internal_exec
*execp
= exec_hdr (abfd
);
41 unsigned int arch_align_power
;
42 unsigned long arch_align
;
44 /* Calculate the file positions of the parts of a newly read aout header. */
45 obj_textsec (abfd
)->size
= N_TXTSIZE (*execp
);
47 /* The virtual memory addresses of the sections. */
48 obj_textsec (abfd
)->vma
= N_TXTADDR (*execp
);
49 obj_datasec (abfd
)->vma
= N_DATADDR (*execp
);
50 obj_bsssec (abfd
)->vma
= N_BSSADDR (*execp
);
52 /* For some targets, if the entry point is not in the same page
53 as the start of the text, then adjust the VMA so that it is.
54 FIXME: Do this with a macro like SET_ARCH_MACH instead? */
55 if (aout_backend_info (abfd
)->entry_is_text_address
56 && execp
->a_entry
> obj_textsec (abfd
)->vma
)
60 adjust
= execp
->a_entry
- obj_textsec (abfd
)->vma
;
61 /* Adjust only by whole pages. */
62 adjust
&= ~(TARGET_PAGE_SIZE
- 1);
63 obj_textsec (abfd
)->vma
+= adjust
;
64 obj_datasec (abfd
)->vma
+= adjust
;
65 obj_bsssec (abfd
)->vma
+= adjust
;
68 /* Set the load addresses to be the same as the virtual addresses. */
69 obj_textsec (abfd
)->lma
= obj_textsec (abfd
)->vma
;
70 obj_datasec (abfd
)->lma
= obj_datasec (abfd
)->vma
;
71 obj_bsssec (abfd
)->lma
= obj_bsssec (abfd
)->vma
;
73 /* The file offsets of the sections. */
74 obj_textsec (abfd
)->filepos
= N_TXTOFF (*execp
);
75 obj_datasec (abfd
)->filepos
= N_DATOFF (*execp
);
77 /* The file offsets of the relocation info. */
78 obj_textsec (abfd
)->rel_filepos
= N_TRELOFF (*execp
);
79 obj_datasec (abfd
)->rel_filepos
= N_DRELOFF (*execp
);
81 /* The file offsets of the string table and symbol table. */
82 obj_sym_filepos (abfd
) = N_SYMOFF (*execp
);
83 obj_str_filepos (abfd
) = N_STROFF (*execp
);
85 /* Determine the architecture and machine type of the object file. */
87 SET_ARCH_MACH (abfd
, *execp
);
89 bfd_default_set_arch_mach (abfd
, DEFAULT_ARCH
, 0);
92 /* The number of relocation records. This must be called after
93 SET_ARCH_MACH. It assumes that SET_ARCH_MACH will set
94 obj_reloc_entry_size correctly, if the reloc size is not
96 obj_textsec (abfd
)->reloc_count
=
97 execp
->a_trsize
/ obj_reloc_entry_size (abfd
);
98 obj_datasec (abfd
)->reloc_count
=
99 execp
->a_drsize
/ obj_reloc_entry_size (abfd
);
101 /* Now that we know the architecture, set the alignments of the
102 sections. This is normally done by NAME (aout,new_section_hook),
103 but when the initial sections were created the architecture had
104 not yet been set. However, for backward compatibility, we don't
105 set the alignment power any higher than as required by the size
107 arch_align_power
= bfd_get_arch_info (abfd
)->section_align_power
;
108 arch_align
= 1 << arch_align_power
;
109 if ((BFD_ALIGN (obj_textsec (abfd
)->size
, arch_align
)
110 == obj_textsec (abfd
)->size
)
111 && (BFD_ALIGN (obj_datasec (abfd
)->size
, arch_align
)
112 == obj_datasec (abfd
)->size
)
113 && (BFD_ALIGN (obj_bsssec (abfd
)->size
, arch_align
)
114 == obj_bsssec (abfd
)->size
))
116 obj_textsec (abfd
)->alignment_power
= arch_align_power
;
117 obj_datasec (abfd
)->alignment_power
= arch_align_power
;
118 obj_bsssec (abfd
)->alignment_power
= arch_align_power
;
121 /* Don't set sizes now -- can't be sure until we know arch & mach.
122 Sizes get set in set_sizes callback, later. */
129 /* Finish up the reading of an a.out file header. */
131 static const bfd_target
*
132 MY (object_p
) (bfd
*abfd
)
134 struct external_exec exec_bytes
; /* Raw exec header from file. */
135 struct internal_exec exec
; /* Cleaned-up exec header. */
136 const bfd_target
*target
;
137 bfd_size_type amt
= EXEC_BYTES_SIZE
;
139 if (bfd_bread ((void *) &exec_bytes
, amt
, abfd
) != amt
)
141 if (bfd_get_error () != bfd_error_system_call
)
142 bfd_set_error (bfd_error_wrong_format
);
147 exec
.a_info
= SWAP_MAGIC (exec_bytes
.e_info
);
149 exec
.a_info
= GET_MAGIC (abfd
, exec_bytes
.e_info
);
156 if (!(MACHTYPE_OK (N_MACHTYPE (exec
))))
160 NAME (aout
, swap_exec_header_in
) (abfd
, &exec_bytes
, &exec
);
163 /* Swap_exec_header_in read in a_info with the wrong byte order. */
164 exec
.a_info
= SWAP_MAGIC (exec_bytes
.e_info
);
167 target
= NAME (aout
, some_aout_object_p
) (abfd
, &exec
, MY (callback
));
169 #ifdef ENTRY_CAN_BE_ZERO
170 /* The NEWSOS3 entry-point is/was 0, which (amongst other lossage)
171 means that it isn't obvious if EXEC_P should be set.
172 All of the following must be true for an executable:
173 There must be no relocations, the bfd can be neither an
174 archive nor an archive element, and the file must be executable. */
176 if (exec
.a_trsize
+ exec
.a_drsize
== 0
177 && bfd_get_format(abfd
) == bfd_object
&& abfd
->my_archive
== NULL
)
181 #define S_IXUSR 0100 /* Execute by owner. */
183 if (stat(abfd
->filename
, &buf
) == 0 && (buf
.st_mode
& S_IXUSR
))
184 abfd
->flags
|= EXEC_P
;
186 #endif /* ENTRY_CAN_BE_ZERO */
190 #define MY_object_p MY (object_p)
196 MY (mkobject
) (bfd
*abfd
)
198 return NAME (aout
, mkobject (abfd
));
201 #define MY_mkobject MY (mkobject)
204 #ifndef MY_bfd_copy_private_section_data
206 /* Copy private section data. This actually does nothing with the
207 sections. It copies the subformat field. We copy it here, because
208 we need to know whether this is a QMAGIC file before we set the
209 section contents, and copy_private_bfd_data is not called until
210 after the section contents have been set. */
213 MY_bfd_copy_private_section_data (bfd
*ibfd
,
214 asection
*isec ATTRIBUTE_UNUSED
,
216 asection
*osec ATTRIBUTE_UNUSED
)
218 if (bfd_get_flavour (ibfd
) == bfd_target_aout_flavour
219 && bfd_get_flavour (obfd
) == bfd_target_aout_flavour
)
220 obj_aout_subformat (obfd
) = obj_aout_subformat (ibfd
);
226 /* Write an object file.
227 Section contents have already been written. We write the
228 file header, symbols, and relocation. */
230 #ifndef MY_write_object_contents
233 MY (write_object_contents
) (bfd
*abfd
)
235 struct external_exec exec_bytes
;
236 struct internal_exec
*execp
= exec_hdr (abfd
);
238 obj_reloc_entry_size (abfd
) = RELOC_STD_SIZE
;
240 WRITE_HEADERS (abfd
, execp
);
244 #define MY_write_object_contents MY (write_object_contents)
250 MY (set_sizes
) (bfd
*abfd
)
252 adata(abfd
).page_size
= TARGET_PAGE_SIZE
;
253 adata(abfd
).segment_size
= SEGMENT_SIZE
;
255 #ifdef ZMAGIC_DISK_BLOCK_SIZE
256 adata(abfd
).zmagic_disk_block_size
= ZMAGIC_DISK_BLOCK_SIZE
;
258 adata(abfd
).zmagic_disk_block_size
= TARGET_PAGE_SIZE
;
261 adata(abfd
).exec_bytes_size
= EXEC_BYTES_SIZE
;
264 #define MY_set_sizes MY (set_sizes)
267 #ifndef MY_exec_hdr_flags
268 #define MY_exec_hdr_flags 0
271 #ifndef MY_backend_data
273 #ifndef MY_zmagic_contiguous
274 #define MY_zmagic_contiguous 0
276 #ifndef MY_text_includes_header
277 #define MY_text_includes_header 0
279 #ifndef MY_entry_is_text_address
280 #define MY_entry_is_text_address 0
282 #ifndef MY_exec_header_not_counted
283 #define MY_exec_header_not_counted 0
285 #ifndef MY_add_dynamic_symbols
286 #define MY_add_dynamic_symbols 0
288 #ifndef MY_add_one_symbol
289 #define MY_add_one_symbol 0
291 #ifndef MY_link_dynamic_object
292 #define MY_link_dynamic_object 0
294 #ifndef MY_write_dynamic_symbol
295 #define MY_write_dynamic_symbol 0
297 #ifndef MY_check_dynamic_reloc
298 #define MY_check_dynamic_reloc 0
300 #ifndef MY_finish_dynamic_link
301 #define MY_finish_dynamic_link 0
304 static const struct aout_backend_data
MY (backend_data
) =
306 MY_zmagic_contiguous
,
307 MY_text_includes_header
,
308 MY_entry_is_text_address
,
312 MY_exec_header_not_counted
,
313 MY_add_dynamic_symbols
,
315 MY_link_dynamic_object
,
316 MY_write_dynamic_symbol
,
317 MY_check_dynamic_reloc
,
318 MY_finish_dynamic_link
320 #define MY_backend_data &MY (backend_data)
323 #ifndef MY_final_link_callback
325 /* Callback for the final_link routine to set the section offsets. */
328 MY_final_link_callback (bfd
*abfd
,
333 struct internal_exec
*execp
= exec_hdr (abfd
);
335 *ptreloff
= N_TRELOFF (*execp
);
336 *pdreloff
= N_DRELOFF (*execp
);
337 *psymoff
= N_SYMOFF (*execp
);
342 #ifndef MY_bfd_final_link
344 /* Final link routine. We need to use a call back to get the correct
345 offsets in the output file. */
348 MY_bfd_final_link (bfd
*abfd
, struct bfd_link_info
*info
)
350 return NAME (aout
, final_link
) (abfd
, info
, MY_final_link_callback
);
355 /* We assume BFD generic archive files. */
356 #ifndef MY_openr_next_archived_file
357 #define MY_openr_next_archived_file bfd_generic_openr_next_archived_file
359 #ifndef MY_get_elt_at_index
360 #define MY_get_elt_at_index _bfd_generic_get_elt_at_index
362 #ifndef MY_generic_stat_arch_elt
363 #define MY_generic_stat_arch_elt bfd_generic_stat_arch_elt
365 #ifndef MY_slurp_armap
366 #define MY_slurp_armap bfd_slurp_bsd_armap
368 #ifndef MY_slurp_extended_name_table
369 #define MY_slurp_extended_name_table _bfd_slurp_extended_name_table
371 #ifndef MY_construct_extended_name_table
372 #define MY_construct_extended_name_table \
373 _bfd_archive_bsd_construct_extended_name_table
375 #ifndef MY_write_armap
376 #define MY_write_armap bsd_write_armap
378 #ifndef MY_read_ar_hdr
379 #define MY_read_ar_hdr _bfd_generic_read_ar_hdr
381 #ifndef MY_truncate_arname
382 #define MY_truncate_arname bfd_bsd_truncate_arname
384 #ifndef MY_update_armap_timestamp
385 #define MY_update_armap_timestamp _bfd_archive_bsd_update_armap_timestamp
388 /* No core file defined here -- configure in trad-core.c separately. */
389 #ifndef MY_core_file_failing_command
390 #define MY_core_file_failing_command _bfd_nocore_core_file_failing_command
392 #ifndef MY_core_file_failing_signal
393 #define MY_core_file_failing_signal _bfd_nocore_core_file_failing_signal
395 #ifndef MY_core_file_matches_executable_p
396 #define MY_core_file_matches_executable_p \
397 _bfd_nocore_core_file_matches_executable_p
399 #ifndef MY_core_file_p
400 #define MY_core_file_p _bfd_dummy_target
403 #ifndef MY_bfd_debug_info_start
404 #define MY_bfd_debug_info_start bfd_void
406 #ifndef MY_bfd_debug_info_end
407 #define MY_bfd_debug_info_end bfd_void
409 #ifndef MY_bfd_debug_info_accumulate
410 #define MY_bfd_debug_info_accumulate \
411 (void (*) (bfd *, struct bfd_section *)) bfd_void
414 #ifndef MY_core_file_failing_command
415 #define MY_core_file_failing_command NAME (aout, core_file_failing_command)
417 #ifndef MY_core_file_failing_signal
418 #define MY_core_file_failing_signal NAME (aout, core_file_failing_signal)
420 #ifndef MY_core_file_matches_executable_p
421 #define MY_core_file_matches_executable_p NAME (aout, core_file_matches_executable_p)
423 #ifndef MY_set_section_contents
424 #define MY_set_section_contents NAME (aout, set_section_contents)
426 #ifndef MY_get_section_contents
427 #define MY_get_section_contents NAME (aout, get_section_contents)
429 #ifndef MY_get_section_contents_in_window
430 #define MY_get_section_contents_in_window _bfd_generic_get_section_contents_in_window
432 #ifndef MY_new_section_hook
433 #define MY_new_section_hook NAME (aout, new_section_hook)
435 #ifndef MY_get_symtab_upper_bound
436 #define MY_get_symtab_upper_bound NAME (aout, get_symtab_upper_bound)
438 #ifndef MY_canonicalize_symtab
439 #define MY_canonicalize_symtab NAME (aout, canonicalize_symtab)
441 #ifndef MY_get_reloc_upper_bound
442 #define MY_get_reloc_upper_bound NAME (aout,get_reloc_upper_bound)
444 #ifndef MY_canonicalize_reloc
445 #define MY_canonicalize_reloc NAME (aout, canonicalize_reloc)
447 #ifndef MY_make_empty_symbol
448 #define MY_make_empty_symbol NAME (aout, make_empty_symbol)
450 #ifndef MY_print_symbol
451 #define MY_print_symbol NAME (aout, print_symbol)
453 #ifndef MY_get_symbol_info
454 #define MY_get_symbol_info NAME (aout, get_symbol_info)
456 #ifndef MY_get_lineno
457 #define MY_get_lineno NAME (aout, get_lineno)
459 #ifndef MY_set_arch_mach
460 #define MY_set_arch_mach NAME (aout, set_arch_mach)
462 #ifndef MY_find_nearest_line
463 #define MY_find_nearest_line NAME (aout, find_nearest_line)
465 #ifndef MY_find_inliner_info
466 #define MY_find_inliner_info _bfd_nosymbols_find_inliner_info
468 #ifndef MY_sizeof_headers
469 #define MY_sizeof_headers NAME (aout, sizeof_headers)
471 #ifndef MY_bfd_get_relocated_section_contents
472 #define MY_bfd_get_relocated_section_contents \
473 bfd_generic_get_relocated_section_contents
475 #ifndef MY_bfd_relax_section
476 #define MY_bfd_relax_section bfd_generic_relax_section
478 #ifndef MY_bfd_gc_sections
479 #define MY_bfd_gc_sections bfd_generic_gc_sections
481 #ifndef MY_bfd_merge_sections
482 #define MY_bfd_merge_sections bfd_generic_merge_sections
484 #ifndef MY_bfd_is_group_section
485 #define MY_bfd_is_group_section bfd_generic_is_group_section
487 #ifndef MY_bfd_discard_group
488 #define MY_bfd_discard_group bfd_generic_discard_group
490 #ifndef MY_section_already_linked
491 #define MY_section_already_linked \
492 _bfd_generic_section_already_linked
494 #ifndef MY_bfd_reloc_type_lookup
495 #define MY_bfd_reloc_type_lookup NAME (aout, reloc_type_lookup)
497 #ifndef MY_bfd_make_debug_symbol
498 #define MY_bfd_make_debug_symbol 0
500 #ifndef MY_read_minisymbols
501 #define MY_read_minisymbols NAME (aout, read_minisymbols)
503 #ifndef MY_minisymbol_to_symbol
504 #define MY_minisymbol_to_symbol NAME (aout, minisymbol_to_symbol)
506 #ifndef MY_bfd_link_hash_table_create
507 #define MY_bfd_link_hash_table_create NAME (aout, link_hash_table_create)
509 #ifndef MY_bfd_link_hash_table_free
510 #define MY_bfd_link_hash_table_free _bfd_generic_link_hash_table_free
512 #ifndef MY_bfd_link_add_symbols
513 #define MY_bfd_link_add_symbols NAME (aout, link_add_symbols)
515 #ifndef MY_bfd_link_just_syms
516 #define MY_bfd_link_just_syms _bfd_generic_link_just_syms
518 #ifndef MY_bfd_link_split_section
519 #define MY_bfd_link_split_section _bfd_generic_link_split_section
522 #ifndef MY_bfd_copy_private_bfd_data
523 #define MY_bfd_copy_private_bfd_data _bfd_generic_bfd_copy_private_bfd_data
526 #ifndef MY_bfd_merge_private_bfd_data
527 #define MY_bfd_merge_private_bfd_data _bfd_generic_bfd_merge_private_bfd_data
530 #ifndef MY_bfd_copy_private_symbol_data
531 #define MY_bfd_copy_private_symbol_data _bfd_generic_bfd_copy_private_symbol_data
534 #ifndef MY_bfd_copy_private_header_data
535 #define MY_bfd_copy_private_header_data _bfd_generic_bfd_copy_private_header_data
538 #ifndef MY_bfd_print_private_bfd_data
539 #define MY_bfd_print_private_bfd_data _bfd_generic_bfd_print_private_bfd_data
542 #ifndef MY_bfd_set_private_flags
543 #define MY_bfd_set_private_flags _bfd_generic_bfd_set_private_flags
546 #ifndef MY_bfd_is_local_label_name
547 #define MY_bfd_is_local_label_name bfd_generic_is_local_label_name
550 #ifndef MY_bfd_is_target_special_symbol
551 #define MY_bfd_is_target_special_symbol ((bfd_boolean (*) (bfd *, asymbol *)) bfd_false)
554 #ifndef MY_bfd_free_cached_info
555 #define MY_bfd_free_cached_info NAME (aout, bfd_free_cached_info)
558 #ifndef MY_close_and_cleanup
559 #define MY_close_and_cleanup MY_bfd_free_cached_info
562 #ifndef MY_get_dynamic_symtab_upper_bound
563 #define MY_get_dynamic_symtab_upper_bound \
564 _bfd_nodynamic_get_dynamic_symtab_upper_bound
566 #ifndef MY_canonicalize_dynamic_symtab
567 #define MY_canonicalize_dynamic_symtab \
568 _bfd_nodynamic_canonicalize_dynamic_symtab
570 #ifndef MY_get_synthetic_symtab
571 #define MY_get_synthetic_symtab \
572 _bfd_nodynamic_get_synthetic_symtab
574 #ifndef MY_get_dynamic_reloc_upper_bound
575 #define MY_get_dynamic_reloc_upper_bound \
576 _bfd_nodynamic_get_dynamic_reloc_upper_bound
578 #ifndef MY_canonicalize_dynamic_reloc
579 #define MY_canonicalize_dynamic_reloc \
580 _bfd_nodynamic_canonicalize_dynamic_reloc
583 /* Aout symbols normally have leading underscores. */
584 #ifndef MY_symbol_leading_char
585 #define MY_symbol_leading_char '_'
588 /* Aout archives normally use spaces for padding. */
590 #define AR_PAD_CHAR ' '
593 #ifndef MY_BFD_TARGET
594 const bfd_target
MY (vec
) =
596 TARGETNAME
, /* Name. */
597 bfd_target_aout_flavour
,
598 #ifdef TARGET_IS_BIG_ENDIAN_P
599 BFD_ENDIAN_BIG
, /* Target byte order (big). */
600 BFD_ENDIAN_BIG
, /* Target headers byte order (big). */
602 BFD_ENDIAN_LITTLE
, /* Target byte order (little). */
603 BFD_ENDIAN_LITTLE
, /* Target headers byte order (little). */
605 (HAS_RELOC
| EXEC_P
| /* Object flags. */
606 HAS_LINENO
| HAS_DEBUG
|
607 HAS_SYMS
| HAS_LOCALS
| DYNAMIC
| WP_TEXT
| D_PAGED
),
608 (SEC_HAS_CONTENTS
| SEC_ALLOC
| SEC_LOAD
| SEC_RELOC
| SEC_CODE
| SEC_DATA
),
609 MY_symbol_leading_char
,
610 AR_PAD_CHAR
, /* AR_pad_char. */
611 15, /* AR_max_namelen. */
612 #ifdef TARGET_IS_BIG_ENDIAN_P
613 bfd_getb64
, bfd_getb_signed_64
, bfd_putb64
,
614 bfd_getb32
, bfd_getb_signed_32
, bfd_putb32
,
615 bfd_getb16
, bfd_getb_signed_16
, bfd_putb16
, /* Data. */
616 bfd_getb64
, bfd_getb_signed_64
, bfd_putb64
,
617 bfd_getb32
, bfd_getb_signed_32
, bfd_putb32
,
618 bfd_getb16
, bfd_getb_signed_16
, bfd_putb16
, /* Headers. */
620 bfd_getl64
, bfd_getl_signed_64
, bfd_putl64
,
621 bfd_getl32
, bfd_getl_signed_32
, bfd_putl32
,
622 bfd_getl16
, bfd_getl_signed_16
, bfd_putl16
, /* Data. */
623 bfd_getl64
, bfd_getl_signed_64
, bfd_putl64
,
624 bfd_getl32
, bfd_getl_signed_32
, bfd_putl32
,
625 bfd_getl16
, bfd_getl_signed_16
, bfd_putl16
, /* Headers. */
627 {_bfd_dummy_target
, MY_object_p
, /* bfd_check_format. */
628 bfd_generic_archive_p
, MY_core_file_p
},
629 {bfd_false
, MY_mkobject
, /* bfd_set_format. */
630 _bfd_generic_mkarchive
, bfd_false
},
631 {bfd_false
, MY_write_object_contents
, /* bfd_write_contents. */
632 _bfd_write_archive_contents
, bfd_false
},
634 BFD_JUMP_TABLE_GENERIC (MY
),
635 BFD_JUMP_TABLE_COPY (MY
),
636 BFD_JUMP_TABLE_CORE (MY
),
637 BFD_JUMP_TABLE_ARCHIVE (MY
),
638 BFD_JUMP_TABLE_SYMBOLS (MY
),
639 BFD_JUMP_TABLE_RELOCS (MY
),
640 BFD_JUMP_TABLE_WRITE (MY
),
641 BFD_JUMP_TABLE_LINK (MY
),
642 BFD_JUMP_TABLE_DYNAMIC (MY
),
644 /* Alternative_target. */
649 #endif /* MY_BFD_TARGET */