* Most files:
[deliverable/binutils-gdb.git] / bfd / aout-target.h
CommitLineData
582bc90a 1/* Define a target vector and some small routines for a variant of a.out.
4c3721d5 2 Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc.
e98e6ec1
SC
3
4This file is part of BFD, the Binary File Descriptor library.
5
6This program is free software; you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation; either version 2 of the License, or
9(at your option) any later version.
10
11This program is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with this program; if not, write to the Free Software
18Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
19
582bc90a
PB
20#include "aout/aout64.h"
21#include "aout/stab_gnu.h"
22#include "aout/ar.h"
23/*#include "libaout.h"*/
24
214f8f23
KR
25extern CONST struct reloc_howto_struct * NAME(aout,reloc_type_lookup) ();
26
e98e6ec1
SC
27/* Set parameters about this a.out file that are machine-dependent.
28 This routine is called from some_aout_object_p just before it returns. */
214f8f23 29#ifndef MY_callback
e98e6ec1 30static bfd_target *
57a1867e
DM
31MY(callback) (abfd)
32 bfd *abfd;
e98e6ec1
SC
33{
34 struct internal_exec *execp = exec_hdr (abfd);
294eaca4
SC
35
36 /* Calculate the file positions of the parts of a newly read aout header */
e98e6ec1
SC
37 obj_textsec (abfd)->_raw_size = N_TXTSIZE(*execp);
38
39 /* The virtual memory addresses of the sections */
40 obj_textsec (abfd)->vma = N_TXTADDR(*execp);
41 obj_datasec (abfd)->vma = N_DATADDR(*execp);
42 obj_bsssec (abfd)->vma = N_BSSADDR(*execp);
43
44 /* The file offsets of the sections */
45 obj_textsec (abfd)->filepos = N_TXTOFF (*execp);
46 obj_datasec (abfd)->filepos = N_DATOFF (*execp);
47
48 /* The file offsets of the relocation info */
49 obj_textsec (abfd)->rel_filepos = N_TRELOFF(*execp);
50 obj_datasec (abfd)->rel_filepos = N_DRELOFF(*execp);
51
52 /* The file offsets of the string table and symbol table. */
53 obj_sym_filepos (abfd) = N_SYMOFF (*execp);
54 obj_str_filepos (abfd) = N_STROFF (*execp);
55
582bc90a 56 /* Determine the architecture and machine type of the object file. */
e98e6ec1
SC
57#ifdef SET_ARCH_MACH
58 SET_ARCH_MACH(abfd, *execp);
59#else
60 bfd_default_set_arch_mach(abfd, DEFAULT_ARCH, 0);
61#endif
62
294eaca4
SC
63 /* Don't set sizes now -- can't be sure until we know arch & mach.
64 Sizes get set in set_sizes callback, later. */
65#if 0
e98e6ec1
SC
66 adata(abfd).page_size = PAGE_SIZE;
67#ifdef SEGMENT_SIZE
68 adata(abfd).segment_size = SEGMENT_SIZE;
69#else
70 adata(abfd).segment_size = PAGE_SIZE;
71#endif
72 adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
294eaca4 73#endif
e98e6ec1
SC
74
75 return abfd->xvec;
76}
214f8f23 77#endif
e98e6ec1
SC
78
79#ifndef MY_object_p
80/* Finish up the reading of an a.out file header */
81
82static bfd_target *
57a1867e
DM
83MY(object_p) (abfd)
84 bfd *abfd;
e98e6ec1
SC
85{
86 struct external_exec exec_bytes; /* Raw exec header from file */
87 struct internal_exec exec; /* Cleaned-up exec header */
88 bfd_target *target;
89
90 if (bfd_read ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd)
91 != EXEC_BYTES_SIZE) {
57a1867e 92 bfd_set_error (bfd_error_wrong_format);
e98e6ec1
SC
93 return 0;
94 }
95
3f99570e
JK
96#ifdef SWAP_MAGIC
97 exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
4c3721d5 98#else
e98e6ec1 99 exec.a_info = bfd_h_get_32 (abfd, exec_bytes.e_info);
3f99570e 100#endif /* SWAP_MAGIC */
e98e6ec1
SC
101
102 if (N_BADMAG (exec)) return 0;
4c3721d5
ILT
103#ifdef MACHTYPE_OK
104 if (!(MACHTYPE_OK (N_MACHTYPE (exec)))) return 0;
105#endif
e98e6ec1
SC
106
107 NAME(aout,swap_exec_header_in)(abfd, &exec_bytes, &exec);
108 target = NAME(aout,some_aout_object_p) (abfd, &exec, MY(callback));
109
110#ifdef ENTRY_CAN_BE_ZERO
111 /* The NEWSOS3 entry-point is/was 0, which (amongst other lossage)
112 * means that it isn't obvious if EXEC_P should be set.
113 * All of the following must be true for an executable:
114 * There must be no relocations, the bfd can be neither an
115 * archive nor an archive element, and the file must be executable. */
116
117 if (exec.a_trsize + exec.a_drsize == 0
118 && bfd_get_format(abfd) == bfd_object && abfd->my_archive == NULL)
119 {
120 struct stat buf;
121#ifndef S_IXUSR
122#define S_IXUSR 0100 /* Execute by owner. */
123#endif
124 if (stat(abfd->filename, &buf) == 0 && (buf.st_mode & S_IXUSR))
125 abfd->flags |= EXEC_P;
126 }
127#endif /* ENTRY_CAN_BE_ZERO */
128
129 return target;
130}
131#define MY_object_p MY(object_p)
132#endif
133
134
135#ifndef MY_mkobject
136static boolean
57a1867e
DM
137MY(mkobject) (abfd)
138 bfd *abfd;
e98e6ec1
SC
139{
140 if (NAME(aout,mkobject)(abfd) == false)
141 return false;
294eaca4
SC
142#if 0 /* Sizes get set in set_sizes callback, later, after we know
143 the architecture and machine. */
e98e6ec1
SC
144 adata(abfd).page_size = PAGE_SIZE;
145#ifdef SEGMENT_SIZE
146 adata(abfd).segment_size = SEGMENT_SIZE;
147#else
148 adata(abfd).segment_size = PAGE_SIZE;
149#endif
150 adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
294eaca4 151#endif
e98e6ec1
SC
152 return true;
153}
154#define MY_mkobject MY(mkobject)
155#endif
156
157/* Write an object file.
158 Section contents have already been written. We write the
159 file header, symbols, and relocation. */
160
161#ifndef MY_write_object_contents
162static boolean
57a1867e
DM
163MY(write_object_contents) (abfd)
164 bfd *abfd;
e98e6ec1 165{
e98e6ec1
SC
166 struct external_exec exec_bytes;
167 struct internal_exec *execp = exec_hdr (abfd);
168
582bc90a
PB
169#if CHOOSE_RELOC_SIZE
170 CHOOSE_RELOC_SIZE(abfd);
171#else
172 obj_reloc_entry_size (abfd) = RELOC_STD_SIZE;
173#endif
174
e98e6ec1 175 WRITE_HEADERS(abfd, execp);
582bc90a 176
e98e6ec1
SC
177 return true;
178}
179#define MY_write_object_contents MY(write_object_contents)
180#endif
181
294eaca4
SC
182#ifndef MY_set_sizes
183static boolean
57a1867e
DM
184MY(set_sizes) (abfd)
185 bfd *abfd;
294eaca4
SC
186{
187 adata(abfd).page_size = PAGE_SIZE;
188#ifdef SEGMENT_SIZE
189 adata(abfd).segment_size = SEGMENT_SIZE;
190#else
191 adata(abfd).segment_size = PAGE_SIZE;
192#endif
193 adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
194 return true;
195}
196#define MY_set_sizes MY(set_sizes)
197#endif
198
199#ifndef MY_backend_data
57a1867e
DM
200
201#ifndef MY_read_dynamic_symbols
202#define MY_read_dynamic_symbols 0
203#endif
204#ifndef MY_read_dynamic_relocs
205#define MY_read_dynamic_relocs 0
206#endif
207
294eaca4
SC
208static CONST struct aout_backend_data MY(backend_data) = {
209 0, /* zmagic contiguous */
210 0, /* text incl header */
211 0, /* text vma? */
212 MY_set_sizes,
1f29e30b 213 0, /* exec header is counted */
57a1867e
DM
214 MY_read_dynamic_symbols,
215 MY_read_dynamic_relocs
294eaca4
SC
216};
217#define MY_backend_data &MY(backend_data)
218#endif
219
4c3721d5
ILT
220#ifndef MY_bfd_final_link
221
222/* Final link routine. We need to use a call back to get the correct
223 offsets in the output file. */
224
225static void final_link_callback
226 PARAMS ((bfd *, file_ptr *, file_ptr *, file_ptr *));
227
228static void
229final_link_callback (abfd, ptreloff, pdreloff, psymoff)
230 bfd *abfd;
231 file_ptr *ptreloff;
232 file_ptr *pdreloff;
233 file_ptr *psymoff;
234{
235 struct internal_exec *execp = exec_hdr (abfd);
236
237 *ptreloff = N_TRELOFF (*execp);
238 *pdreloff = N_DRELOFF (*execp);
239 *psymoff = N_SYMOFF (*execp);
240}
241
242static boolean
243MY_bfd_final_link (abfd, info)
244 bfd *abfd;
245 struct bfd_link_info *info;
246{
247 return NAME(aout,final_link) (abfd, info, final_link_callback);
248}
249
250#endif
251
e98e6ec1
SC
252/* We assume BFD generic archive files. */
253#ifndef MY_openr_next_archived_file
254#define MY_openr_next_archived_file bfd_generic_openr_next_archived_file
255#endif
256#ifndef MY_generic_stat_arch_elt
257#define MY_generic_stat_arch_elt bfd_generic_stat_arch_elt
258#endif
259#ifndef MY_slurp_armap
260#define MY_slurp_armap bfd_slurp_bsd_armap
261#endif
262#ifndef MY_slurp_extended_name_table
582bc90a 263#define MY_slurp_extended_name_table _bfd_slurp_extended_name_table
e98e6ec1
SC
264#endif
265#ifndef MY_write_armap
266#define MY_write_armap bsd_write_armap
267#endif
268#ifndef MY_truncate_arname
269#define MY_truncate_arname bfd_bsd_truncate_arname
270#endif
271
272/* No core file defined here -- configure in trad-core.c separately. */
273#ifndef MY_core_file_failing_command
274#define MY_core_file_failing_command _bfd_dummy_core_file_failing_command
275#endif
276#ifndef MY_core_file_failing_signal
277#define MY_core_file_failing_signal _bfd_dummy_core_file_failing_signal
278#endif
279#ifndef MY_core_file_matches_executable_p
280#define MY_core_file_matches_executable_p \
281 _bfd_dummy_core_file_matches_executable_p
282#endif
283#ifndef MY_core_file_p
284#define MY_core_file_p _bfd_dummy_target
285#endif
286
287#ifndef MY_bfd_debug_info_start
288#define MY_bfd_debug_info_start bfd_void
289#endif
290#ifndef MY_bfd_debug_info_end
291#define MY_bfd_debug_info_end bfd_void
292#endif
293#ifndef MY_bfd_debug_info_accumulate
1f29e30b
JG
294#define MY_bfd_debug_info_accumulate \
295 (void (*) PARAMS ((bfd*, struct sec *))) bfd_void
e98e6ec1
SC
296#endif
297
298#ifndef MY_core_file_failing_command
299#define MY_core_file_failing_command NAME(aout,core_file_failing_command)
300#endif
301#ifndef MY_core_file_failing_signal
302#define MY_core_file_failing_signal NAME(aout,core_file_failing_signal)
303#endif
304#ifndef MY_core_file_matches_executable_p
305#define MY_core_file_matches_executable_p NAME(aout,core_file_matches_executable_p)
306#endif
307#ifndef MY_slurp_armap
308#define MY_slurp_armap NAME(aout,slurp_armap)
309#endif
310#ifndef MY_slurp_extended_name_table
311#define MY_slurp_extended_name_table NAME(aout,slurp_extended_name_table)
312#endif
313#ifndef MY_truncate_arname
314#define MY_truncate_arname NAME(aout,truncate_arname)
315#endif
316#ifndef MY_write_armap
317#define MY_write_armap NAME(aout,write_armap)
318#endif
319#ifndef MY_close_and_cleanup
320#define MY_close_and_cleanup NAME(aout,close_and_cleanup)
321#endif
322#ifndef MY_set_section_contents
323#define MY_set_section_contents NAME(aout,set_section_contents)
324#endif
325#ifndef MY_get_section_contents
326#define MY_get_section_contents NAME(aout,get_section_contents)
327#endif
328#ifndef MY_new_section_hook
329#define MY_new_section_hook NAME(aout,new_section_hook)
330#endif
331#ifndef MY_get_symtab_upper_bound
332#define MY_get_symtab_upper_bound NAME(aout,get_symtab_upper_bound)
333#endif
334#ifndef MY_get_symtab
335#define MY_get_symtab NAME(aout,get_symtab)
336#endif
337#ifndef MY_get_reloc_upper_bound
338#define MY_get_reloc_upper_bound NAME(aout,get_reloc_upper_bound)
339#endif
340#ifndef MY_canonicalize_reloc
341#define MY_canonicalize_reloc NAME(aout,canonicalize_reloc)
342#endif
343#ifndef MY_make_empty_symbol
344#define MY_make_empty_symbol NAME(aout,make_empty_symbol)
345#endif
346#ifndef MY_print_symbol
347#define MY_print_symbol NAME(aout,print_symbol)
348#endif
4c3721d5
ILT
349#ifndef MY_get_symbol_info
350#define MY_get_symbol_info NAME(aout,get_symbol_info)
351#endif
e98e6ec1
SC
352#ifndef MY_get_lineno
353#define MY_get_lineno NAME(aout,get_lineno)
354#endif
355#ifndef MY_set_arch_mach
356#define MY_set_arch_mach NAME(aout,set_arch_mach)
357#endif
358#ifndef MY_openr_next_archived_file
359#define MY_openr_next_archived_file NAME(aout,openr_next_archived_file)
360#endif
361#ifndef MY_find_nearest_line
362#define MY_find_nearest_line NAME(aout,find_nearest_line)
363#endif
364#ifndef MY_generic_stat_arch_elt
365#define MY_generic_stat_arch_elt NAME(aout,generic_stat_arch_elt)
366#endif
367#ifndef MY_sizeof_headers
368#define MY_sizeof_headers NAME(aout,sizeof_headers)
369#endif
4c3721d5
ILT
370#ifndef MY_bfd_get_relocated_section_contents
371#define MY_bfd_get_relocated_section_contents \
372 bfd_generic_get_relocated_section_contents
e98e6ec1 373#endif
4c3721d5
ILT
374#ifndef MY_bfd_relax_section
375#define MY_bfd_relax_section bfd_generic_relax_section
376#endif
377#ifndef MY_bfd_reloc_type_lookup
378#define MY_bfd_reloc_type_lookup NAME(aout,reloc_type_lookup)
e98e6ec1 379#endif
4c3721d5
ILT
380#ifndef MY_bfd_make_debug_symbol
381#define MY_bfd_make_debug_symbol 0
e98e6ec1 382#endif
4c3721d5
ILT
383#ifndef MY_bfd_link_hash_table_create
384#define MY_bfd_link_hash_table_create NAME(aout,link_hash_table_create)
582bc90a 385#endif
4c3721d5
ILT
386#ifndef MY_bfd_link_add_symbols
387#define MY_bfd_link_add_symbols NAME(aout,link_add_symbols)
582bc90a 388#endif
294eaca4
SC
389
390/* Aout symbols normally have leading underscores */
391#ifndef MY_symbol_leading_char
392#define MY_symbol_leading_char '_'
582bc90a 393#endif
e98e6ec1 394
4c3721d5
ILT
395/* Aout archives normally use spaces for padding */
396#ifndef AR_PAD_CHAR
397#define AR_PAD_CHAR ' '
398#endif
399
400#ifndef MY_BFD_TARGET
e98e6ec1
SC
401bfd_target MY(vec) =
402{
403 TARGETNAME, /* name */
404 bfd_target_aout_flavour,
582bc90a
PB
405#ifdef TARGET_IS_BIG_ENDIAN_P
406 true, /* target byte order (big) */
407 true, /* target headers byte order (big) */
408#else
409 false, /* target byte order (little) */
410 false, /* target headers byte order (little) */
411#endif
e98e6ec1
SC
412 (HAS_RELOC | EXEC_P | /* object flags */
413 HAS_LINENO | HAS_DEBUG |
57a1867e 414 HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
e98e6ec1 415 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
294eaca4 416 MY_symbol_leading_char,
4c3721d5 417 AR_PAD_CHAR, /* ar_pad_char */
582bc90a 418 15, /* ar_max_namelen */
4c3721d5 419 3, /* minimum alignment */
e98e6ec1 420#ifdef TARGET_IS_BIG_ENDIAN_P
4c3721d5
ILT
421 bfd_getb64, bfd_getb_signed_64, bfd_putb64,
422 bfd_getb32, bfd_getb_signed_32, bfd_putb32,
423 bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
424 bfd_getb64, bfd_getb_signed_64, bfd_putb64,
425 bfd_getb32, bfd_getb_signed_32, bfd_putb32,
426 bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
e98e6ec1 427#else
4c3721d5
ILT
428 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
429 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
430 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
431 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
432 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
433 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
e98e6ec1
SC
434#endif
435 {_bfd_dummy_target, MY_object_p, /* bfd_check_format */
436 bfd_generic_archive_p, MY_core_file_p},
437 {bfd_false, MY_mkobject, /* bfd_set_format */
438 _bfd_generic_mkarchive, bfd_false},
439 {bfd_false, MY_write_object_contents, /* bfd_write_contents */
440 _bfd_write_archive_contents, bfd_false},
441
4c3721d5 442 JUMP_TABLE (MY),
582bc90a 443 (PTR) MY_backend_data,
e98e6ec1 444};
4c3721d5 445#endif /* MY_BFD_TARGET */
This page took 0.099734 seconds and 4 git commands to generate.