Commit | Line | Data |
---|---|---|
4e6f9223 SC |
1 | /* Generic target-file-type support for the BFD library. |
2 | Copyright (C) 1990-1991 Free Software Foundation, Inc. | |
3 | Written by Cygnus Support. | |
4a81b561 | 4 | |
4e6f9223 | 5 | This file is part of BFD, the Binary File Descriptor library. |
4a81b561 | 6 | |
4e6f9223 | 7 | This program is free software; you can redistribute it and/or modify |
4a81b561 | 8 | it under the terms of the GNU General Public License as published by |
4e6f9223 SC |
9 | the Free Software Foundation; either version 2 of the License, or |
10 | (at your option) any later version. | |
4a81b561 | 11 | |
4e6f9223 | 12 | This program is distributed in the hope that it will be useful, |
4a81b561 DHW |
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 | |
4e6f9223 SC |
18 | along with this program; if not, write to the Free Software |
19 | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ | |
4a81b561 DHW |
20 | |
21 | /* $Id$ */ | |
22 | ||
4a81b561 | 23 | #include "bfd.h" |
bbc8d484 | 24 | #include "sysdep.h" |
4a81b561 DHW |
25 | #include "libbfd.h" |
26 | ||
0cda46cf SC |
27 | /* |
28 | SECTION | |
29 | Targets | |
30 | ||
31 | DESCRIPTION | |
32 | Each port of BFD to a different machine requries the creation | |
33 | of a target back end. All the back end provides to the root | |
34 | part of BFD is a structure containing pointers to functions | |
35 | which perform certain low level operations on files. BFD | |
36 | translates the applications's requests through a pointer into | |
37 | calls to the back end routines. | |
38 | ||
39 | When a file is opened with <<bfd_openr>>, its format and | |
40 | target are unknown. BFD uses various mechanisms to determine | |
41 | how to interpret the file. The operations performed are: | |
42 | ||
43 | o First a BFD is created by calling the internal routine | |
44 | <<new_bfd>>, then <<bfd_find_target>> is called with the | |
45 | target string supplied to <<bfd_openr>> and the new BFD pointer. | |
46 | ||
47 | o If a null target string was provided to <<bfd_find_target>>, | |
48 | it looks up the environment variable <<GNUTARGET>> and uses | |
49 | that as the target string. | |
50 | ||
51 | o If the target string is still NULL, or the target string is | |
52 | <<default>>, then the first item in the target vector is used | |
53 | as the target type. @xref{bfd_target}. | |
54 | ||
55 | o Otherwise, the elements in the target vector are inspected | |
56 | one by one, until a match on target name is found. When found, | |
57 | that is used. | |
58 | ||
59 | o Otherwise the error <<invalid_target>> is returned to | |
60 | <<bfd_openr>>. | |
61 | ||
62 | o <<bfd_openr>> attempts to open the file using | |
63 | <<bfd_open_file>>, and returns the BFD. | |
64 | ||
65 | Once the BFD has been opened and the target selected, the file | |
66 | format may be determined. This is done by calling | |
67 | <<bfd_check_format>> on the BFD with a suggested format. The | |
68 | routine returns <<true>> when the application guesses right. | |
92c78ee6 RP |
69 | @menu |
70 | * bfd_target:: | |
71 | @end menu | |
6f715d66 SC |
72 | */ |
73 | ||
74 | ||
0cda46cf SC |
75 | /* |
76 | ||
92c78ee6 | 77 | @node bfd_target, , Targets, Targets |
6f715d66 | 78 | |
0cda46cf SC |
79 | SUBSECTION |
80 | bfd_target | |
81 | ||
82 | DESCRIPTION | |
83 | This structure contains everything that BFD knows about a | |
84 | target. It includes things like its byte order, name, what | |
85 | routines to call to do various operations, etc. | |
6f715d66 | 86 | |
0cda46cf SC |
87 | Every BFD points to a target structure with its <<xvec>> |
88 | member. | |
6f715d66 | 89 | |
0cda46cf SC |
90 | Shortcut for declaring fields which are prototyped function |
91 | pointers, while avoiding anguish on compilers that don't | |
92 | support protos. | |
6f715d66 | 93 | |
0cda46cf SC |
94 | .#define SDEF(ret, name, arglist) \ |
95 | . PROTO(ret,(*name),arglist) | |
96 | .#define SDEF_FMT(ret, name, arglist) \ | |
97 | . PROTO(ret,(*name[bfd_type_end]),arglist) | |
6f715d66 | 98 | |
0cda46cf SC |
99 | These macros are used to dispatch to functions through the |
100 | bfd_target vector. They are used in a number of macros further | |
101 | down in @file{bfd.h}, and are also used when calling various | |
102 | routines by hand inside the BFD implementation. The "arglist" | |
103 | argument must be parenthesized; it contains all the arguments | |
104 | to the called function. | |
6f715d66 | 105 | |
6f715d66 | 106 | |
0cda46cf SC |
107 | .#define BFD_SEND(bfd, message, arglist) \ |
108 | . ((*((bfd)->xvec->message)) arglist) | |
6f715d66 | 109 | |
0cda46cf | 110 | For operations which index on the BFD format |
6f715d66 | 111 | |
0cda46cf SC |
112 | .#define BFD_SEND_FMT(bfd, message, arglist) \ |
113 | . (((bfd)->xvec->message[(int)((bfd)->format)]) arglist) | |
6f715d66 | 114 | |
0cda46cf SC |
115 | This is the struct which defines the type of BFD this is. The |
116 | <<xvec>> member of the struct <<bfd>> itself points here. Each | |
117 | module that implements access to a different target under BFD, | |
118 | defines one of these. | |
6f715d66 | 119 | |
6f715d66 | 120 | |
0cda46cf SC |
121 | FIXME, these names should be rationalised with the names of |
122 | the entry points which call them. Too bad we can't have one | |
123 | macro to define them both! | |
124 | ||
125 | .typedef struct bfd_target | |
126 | .{ | |
6f715d66 SC |
127 | |
128 | identifies the kind of target, eg SunOS4, Ultrix, etc | |
129 | ||
0cda46cf | 130 | . char *name; |
6f715d66 SC |
131 | |
132 | The "flavour" of a back end is a general indication about the contents | |
133 | of a file. | |
134 | ||
0cda46cf SC |
135 | . enum target_flavour { |
136 | . bfd_target_unknown_flavour, | |
137 | . bfd_target_aout_flavour, | |
138 | . bfd_target_coff_flavour, | |
139 | . bfd_target_elf_flavour, | |
140 | . bfd_target_ieee_flavour, | |
141 | . bfd_target_oasys_flavour, | |
142 | . bfd_target_srec_flavour} flavour; | |
6f715d66 SC |
143 | |
144 | The order of bytes within the data area of a file. | |
145 | ||
0cda46cf | 146 | . boolean byteorder_big_p; |
6f715d66 SC |
147 | |
148 | The order of bytes within the header parts of a file. | |
149 | ||
0cda46cf | 150 | . boolean header_byteorder_big_p; |
6f715d66 SC |
151 | |
152 | This is a mask of all the flags which an executable may have set - | |
0cda46cf | 153 | from the set <<NO_FLAGS>>, <<HAS_RELOC>>, ...<<D_PAGED>>. |
6f715d66 | 154 | |
0cda46cf | 155 | . flagword object_flags; |
6f715d66 SC |
156 | |
157 | This is a mask of all the flags which a section may have set - from | |
0cda46cf | 158 | the set <<SEC_NO_FLAGS>>, <<SEC_ALLOC>>, ...<<SET_NEVER_LOAD>>. |
6f715d66 | 159 | |
0cda46cf | 160 | . flagword section_flags; |
6f715d66 SC |
161 | |
162 | The pad character for filenames within an archive header. | |
163 | ||
0cda46cf | 164 | . char ar_pad_char; |
6f715d66 SC |
165 | |
166 | The maximum number of characters in an archive header. | |
167 | ||
0cda46cf | 168 | . unsigned short ar_max_namelen; |
6f715d66 SC |
169 | |
170 | The minimum alignment restriction for any section. | |
171 | ||
0cda46cf | 172 | . unsigned int align_power_min; |
6f715d66 SC |
173 | |
174 | Entries for byte swapping for data. These are different to the other | |
4e6f9223 | 175 | entry points, since they don't take BFD as first arg. Certain other handlers |
6f715d66 SC |
176 | could do the same. |
177 | ||
0cda46cf SC |
178 | . SDEF (bfd_vma, bfd_getx64, (bfd_byte *)); |
179 | . SDEF (void, bfd_putx64, (bfd_vma, bfd_byte *)); | |
180 | . SDEF (bfd_vma, bfd_getx32, (bfd_byte *)); | |
181 | . SDEF (void, bfd_putx32, (bfd_vma, bfd_byte *)); | |
182 | . SDEF (bfd_vma, bfd_getx16, (bfd_byte *)); | |
183 | . SDEF (void, bfd_putx16, (bfd_vma, bfd_byte *)); | |
6f715d66 SC |
184 | |
185 | Byte swapping for the headers | |
186 | ||
0cda46cf SC |
187 | . SDEF (bfd_vma, bfd_h_getx64, (bfd_byte *)); |
188 | . SDEF (void, bfd_h_putx64, (bfd_vma, bfd_byte *)); | |
189 | . SDEF (bfd_vma, bfd_h_getx32, (bfd_byte *)); | |
190 | . SDEF (void, bfd_h_putx32, (bfd_vma, bfd_byte *)); | |
191 | . SDEF (bfd_vma, bfd_h_getx16, (bfd_byte *)); | |
192 | . SDEF (void, bfd_h_putx16, (bfd_vma, bfd_byte *)); | |
6f715d66 SC |
193 | |
194 | Format dependent routines, these turn into vectors of entry points | |
195 | within the target vector structure; one for each format to check. | |
196 | ||
197 | Check the format of a file being read. Return bfd_target * or zero. | |
198 | ||
0cda46cf | 199 | . SDEF_FMT (struct bfd_target *, _bfd_check_format, (bfd *)); |
6f715d66 SC |
200 | |
201 | Set the format of a file being written. | |
202 | ||
0cda46cf | 203 | . SDEF_FMT (boolean, _bfd_set_format, (bfd *)); |
6f715d66 SC |
204 | |
205 | Write cached information into a file being written, at bfd_close. | |
206 | ||
0cda46cf | 207 | . SDEF_FMT (boolean, _bfd_write_contents, (bfd *)); |
6f715d66 | 208 | |
0cda46cf SC |
209 | The following functions are defined in <<JUMP_TABLE>>. The idea is |
210 | that the back end writer of <<foo>> names all the routines | |
211 | <<foo_>>@var{entry_point}, <<JUMP_TABLE>> will built the entries | |
6f715d66 SC |
212 | in this structure in the right order. |
213 | ||
214 | Core file entry points | |
215 | ||
0cda46cf SC |
216 | . SDEF (char *, _core_file_failing_command, (bfd *)); |
217 | . SDEF (int, _core_file_failing_signal, (bfd *)); | |
218 | . SDEF (boolean, _core_file_matches_executable_p, (bfd *, bfd *)); | |
6f715d66 SC |
219 | |
220 | Archive entry points | |
221 | ||
0cda46cf SC |
222 | . SDEF (boolean, _bfd_slurp_armap, (bfd *)); |
223 | . SDEF (boolean, _bfd_slurp_extended_name_table, (bfd *)); | |
224 | . SDEF (void, _bfd_truncate_arname, (bfd *, CONST char *, char *)); | |
225 | . SDEF (boolean, write_armap, (bfd *arch, | |
226 | . unsigned int elength, | |
227 | . struct orl *map, | |
228 | . unsigned int orl_count, | |
229 | . int stridx)); | |
6f715d66 SC |
230 | |
231 | Standard stuff. | |
232 | ||
0cda46cf SC |
233 | . SDEF (boolean, _close_and_cleanup, (bfd *)); |
234 | . SDEF (boolean, _bfd_set_section_contents, (bfd *, sec_ptr, PTR, | |
235 | . file_ptr, bfd_size_type)); | |
236 | . SDEF (boolean, _bfd_get_section_contents, (bfd *, sec_ptr, PTR, | |
237 | . file_ptr, bfd_size_type)); | |
238 | . SDEF (boolean, _new_section_hook, (bfd *, sec_ptr)); | |
6f715d66 SC |
239 | |
240 | Symbols and reloctions | |
241 | ||
0cda46cf SC |
242 | . SDEF (unsigned int, _get_symtab_upper_bound, (bfd *)); |
243 | . SDEF (unsigned int, _bfd_canonicalize_symtab, | |
244 | . (bfd *, struct symbol_cache_entry **)); | |
245 | . SDEF (unsigned int, _get_reloc_upper_bound, (bfd *, sec_ptr)); | |
246 | . SDEF (unsigned int, _bfd_canonicalize_reloc, (bfd *, sec_ptr, arelent **, | |
247 | . struct symbol_cache_entry**)); | |
248 | . SDEF (struct symbol_cache_entry *, _bfd_make_empty_symbol, (bfd *)); | |
249 | . SDEF (void, _bfd_print_symbol, (bfd *, PTR, struct symbol_cache_entry *, | |
250 | . bfd_print_symbol_type)); | |
251 | .#define bfd_print_symbol(b,p,s,e) BFD_SEND(b, _bfd_print_symbol, (b,p,s,e)) | |
252 | . SDEF (alent *, _get_lineno, (bfd *, struct symbol_cache_entry *)); | |
253 | . | |
254 | . SDEF (boolean, _bfd_set_arch_mach, (bfd *, enum bfd_architecture, | |
255 | . unsigned long)); | |
256 | . | |
257 | . SDEF (bfd *, openr_next_archived_file, (bfd *arch, bfd *prev)); | |
258 | . SDEF (boolean, _bfd_find_nearest_line, | |
259 | . (bfd *abfd, struct sec *section, | |
260 | . struct symbol_cache_entry **symbols,bfd_vma offset, | |
261 | . CONST char **file, CONST char **func, unsigned int *line)); | |
262 | . SDEF (int, _bfd_stat_arch_elt, (bfd *, struct stat *)); | |
263 | . | |
264 | . SDEF (int, _bfd_sizeof_headers, (bfd *, boolean)); | |
265 | . | |
266 | . SDEF (void, _bfd_debug_info_start, (bfd *)); | |
267 | . SDEF (void, _bfd_debug_info_end, (bfd *)); | |
268 | . SDEF (void, _bfd_debug_info_accumulate, (bfd *, struct sec *)); | |
6f715d66 SC |
269 | |
270 | Special entry points for gdb to swap in coff symbol table parts | |
271 | ||
0cda46cf SC |
272 | . SDEF(void, _bfd_coff_swap_aux_in,( |
273 | . bfd *abfd , | |
274 | . PTR ext, | |
275 | . int type, | |
276 | . int class , | |
277 | . PTR in)); | |
278 | . | |
279 | . SDEF(void, _bfd_coff_swap_sym_in,( | |
280 | . bfd *abfd , | |
281 | . PTR ext, | |
282 | . PTR in)); | |
283 | . | |
284 | . SDEF(void, _bfd_coff_swap_lineno_in, ( | |
285 | . bfd *abfd, | |
286 | . PTR ext, | |
287 | . PTR in)); | |
288 | . | |
0d740984 SC |
289 | |
290 | Special entry points for gas to swap coff parts | |
291 | ||
0cda46cf SC |
292 | . SDEF(unsigned int, _bfd_coff_swap_aux_out,( |
293 | . bfd *abfd, | |
294 | . PTR in, | |
295 | . int type, | |
296 | . int class, | |
297 | . PTR ext)); | |
298 | . | |
299 | . SDEF(unsigned int, _bfd_coff_swap_sym_out,( | |
300 | . bfd *abfd, | |
301 | . PTR in, | |
302 | . PTR ext)); | |
303 | . | |
304 | . SDEF(unsigned int, _bfd_coff_swap_lineno_out,( | |
305 | . bfd *abfd, | |
306 | . PTR in, | |
307 | . PTR ext)); | |
308 | . | |
309 | . SDEF(unsigned int, _bfd_coff_swap_reloc_out,( | |
310 | . bfd *abfd, | |
311 | . PTR src, | |
312 | . PTR dst)); | |
313 | . | |
314 | . SDEF(unsigned int, _bfd_coff_swap_filehdr_out,( | |
315 | . bfd *abfd, | |
316 | . PTR in, | |
317 | . PTR out)); | |
318 | . | |
319 | . SDEF(unsigned int, _bfd_coff_swap_aouthdr_out,( | |
320 | . bfd *abfd, | |
321 | . PTR in, | |
322 | . PTR out)); | |
323 | . | |
324 | . SDEF(unsigned int, _bfd_coff_swap_scnhdr_out,( | |
325 | . bfd *abfd, | |
326 | . PTR in, | |
327 | . PTR out)); | |
328 | . | |
329 | .} bfd_target; | |
6f715d66 SC |
330 | |
331 | */ | |
f8adc62d JG |
332 | |
333 | /* The default is to define a target_vector containing just the | |
334 | DEFAULT_TARGET. (This is to save space in the executables.) | |
335 | You can override this by giving an explicit target_vector using | |
336 | the SELECT_VECTOR macro. | |
337 | Or define ALL_TARGETS macro to get all of the available targets. */ | |
338 | ||
339 | ||
340 | #if MINIMIZE && defined(DEFAULT_VECTOR) && !defined(SELECT_VECS) | |
341 | #ifdef TRAD_CORE | |
342 | #define SELECT_VECS &DEFAULT_VECTOR,&trad_core_vec | |
343 | #else | |
344 | #define SELECT_VECS &DEFAULT_VECTOR | |
345 | #endif | |
346 | #endif | |
347 | ||
23b0b558 JG |
348 | extern bfd_target ecoff_little_vec; |
349 | extern bfd_target ecoff_big_vec; | |
2b1d8a50 | 350 | extern bfd_target sunos_big_vec; |
7ed4093a | 351 | extern bfd_target demo_64_vec; |
4a81b561 DHW |
352 | extern bfd_target srec_vec; |
353 | extern bfd_target b_out_vec_little_host; | |
354 | extern bfd_target b_out_vec_big_host; | |
355 | extern bfd_target icoff_little_vec; | |
356 | extern bfd_target icoff_big_vec; | |
3f85ebce JG |
357 | extern bfd_target elf_little_vec; |
358 | extern bfd_target elf_big_vec; | |
aacf30e3 DHW |
359 | extern bfd_target ieee_vec; |
360 | extern bfd_target oasys_vec; | |
f8adc62d | 361 | extern bfd_target m88kbcs_vec; |
c407897e | 362 | extern bfd_target m68kcoff_vec; |
20fdc627 | 363 | extern bfd_target i386coff_vec; |
bbc8d484 | 364 | extern bfd_target i386aout_vec; |
41f50af0 | 365 | extern bfd_target a29kcoff_big_vec; |
f58809fd | 366 | extern bfd_target trad_core_vec; |
cbdc7909 | 367 | extern bfd_target rs6000coff_vec; |
3b4f1a5d | 368 | extern bfd_target h8300coff_vec; |
4e6f9223 | 369 | |
f8adc62d JG |
370 | #ifdef DEFAULT_VECTOR |
371 | extern bfd_target DEFAULT_VECTOR; | |
372 | #endif | |
373 | ||
4e6f9223 SC |
374 | #ifdef SELECT_VECS |
375 | ||
376 | bfd_target *target_vector[] = { | |
377 | SELECT_VECS, | |
378 | 0 | |
379 | ||
380 | }; | |
381 | #else | |
c0e5039e | 382 | |
7d774e01 | 383 | #ifdef GNU960 |
6f715d66 SC |
384 | #define ICOFF_LITTLE_VEC icoff_little_vec |
385 | #define ICOFF_BIG_VEC icoff_big_vec | |
386 | #define B_OUT_VEC_LITTLE_HOST b_out_vec_little_host | |
387 | #define B_OUT_VEC_BIG_HOST b_out_vec_big_host | |
7d774e01 | 388 | #endif /* GNU960 */ |
9846338e | 389 | |
9872a49c | 390 | #ifndef RESTRICTED |
6f715d66 SC |
391 | #define ECOFF_LITTLE_VEC ecoff_little_vec |
392 | #define ECOFF_BIG_VEC ecoff_big_vec | |
393 | #define ICOFF_LITTLE_VEC icoff_little_vec | |
394 | #define ICOFF_BIG_VEC icoff_big_vec | |
3f85ebce JG |
395 | #define ELF_LITTLE_VEC elf_little_vec |
396 | #define ELF_BIG_VEC elf_big_vec | |
6f715d66 SC |
397 | #define ZB_OUT_VEC_LITTLE_HOST b_out_vec_little_host |
398 | #define ZB_OUT_VEC_BIG_HOST b_out_vec_big_host | |
399 | #define SUNOS_VEC_BIG_HOST sunos_big_vec | |
400 | #define DEMO_64_VEC demo_64_vec | |
92c78ee6 RP |
401 | |
402 | /* We have no oasys tools anymore, so we can't test any of this | |
403 | anymore. If you want to test the stuff yourself, go ahead... | |
404 | steve@cygnus.com */ | |
405 | #if 0 | |
6f715d66 | 406 | #define OASYS_VEC oasys_vec |
92c78ee6 RP |
407 | #endif |
408 | ||
6f715d66 | 409 | #define IEEE_VEC ieee_vec |
f8adc62d | 410 | #define M88KBCS_VEC m88kbcs_vec |
6f715d66 SC |
411 | #define SREC_VEC srec_vec |
412 | #define M68KCOFF_VEC m68kcoff_vec | |
413 | #define I386COFF_VEC i386coff_vec | |
bbc8d484 | 414 | #define I386AOUT_VEC i386aout_vec |
41f50af0 | 415 | #define A29KCOFF_BIG_VEC a29kcoff_big_vec |
cbdc7909 | 416 | #define RS6000COFF_VEC rs6000coff_vec |
3b4f1a5d | 417 | #define H8300COFF_VEC h8300coff_vec |
9872a49c | 418 | #endif |
4e6f9223 | 419 | |
7d774e01 | 420 | bfd_target *target_vector[] = { |
9846338e | 421 | |
7d774e01 | 422 | #ifdef DEFAULT_VECTOR |
6f715d66 | 423 | &DEFAULT_VECTOR, |
92c78ee6 | 424 | #endif |
7d774e01 | 425 | |
6f715d66 SC |
426 | #ifdef I386COFF_VEC |
427 | &I386COFF_VEC, | |
92c78ee6 | 428 | #endif |
20fdc627 | 429 | |
bbc8d484 JG |
430 | #ifdef I386AOUT_VEC |
431 | &I386AOUT_VEC, | |
432 | #endif | |
433 | ||
23b0b558 | 434 | #ifdef ECOFF_LITTLE_VEC |
6f715d66 | 435 | &ECOFF_LITTLE_VEC, |
23b0b558 JG |
436 | #endif |
437 | ||
438 | #ifdef ECOFF_BIG_VEC | |
6f715d66 | 439 | &ECOFF_BIG_VEC, |
23b0b558 | 440 | #endif |
92c78ee6 | 441 | |
7d774e01 | 442 | #ifdef IEEE_VEC |
6f715d66 | 443 | &IEEE_VEC, |
92c78ee6 | 444 | #endif |
7d774e01 RP |
445 | |
446 | #ifdef OASYS_VEC | |
6f715d66 | 447 | &OASYS_VEC, |
92c78ee6 | 448 | #endif |
7d774e01 | 449 | |
2b1d8a50 | 450 | #ifdef SUNOS_VEC_BIG_HOST |
6f715d66 | 451 | &SUNOS_VEC_BIG_HOST, |
92c78ee6 | 452 | #endif |
7ed4093a SC |
453 | |
454 | #ifdef HOST_64_BIT | |
455 | #ifdef DEMO_64_VEC | |
6f715d66 | 456 | &DEMO_64_VEC, |
7ed4093a SC |
457 | #endif |
458 | #endif | |
459 | ||
3b4f1a5d SC |
460 | #ifdef H300COFF_VEC |
461 | &h8300coff_vec, | |
462 | #endif | |
f8adc62d JG |
463 | #ifdef M88KBCS_VEC |
464 | &M88KBCS_VEC, | |
92c78ee6 | 465 | #endif |
7d774e01 RP |
466 | |
467 | #ifdef SREC_VEC | |
6f715d66 | 468 | &SREC_VEC, |
92c78ee6 | 469 | #endif |
6f715d66 | 470 | |
7d774e01 | 471 | #ifdef ICOFF_LITTLE_VEC |
6f715d66 | 472 | &ICOFF_LITTLE_VEC, |
92c78ee6 | 473 | #endif |
7d774e01 RP |
474 | |
475 | #ifdef ICOFF_BIG_VEC | |
6f715d66 | 476 | &ICOFF_BIG_VEC, |
92c78ee6 | 477 | #endif |
7d774e01 | 478 | |
3f85ebce JG |
479 | #ifdef ELF_LITTLE_VEC |
480 | &ELF_LITTLE_VEC, | |
92c78ee6 | 481 | #endif |
3f85ebce JG |
482 | |
483 | #ifdef ELF_BIG_VEC | |
484 | &ELF_BIG_VEC, | |
92c78ee6 | 485 | #endif |
3f85ebce | 486 | |
7d774e01 | 487 | #ifdef B_OUT_VEC_LITTLE_HOST |
6f715d66 | 488 | &B_OUT_VEC_LITTLE_HOST, |
92c78ee6 | 489 | #endif |
9846338e | 490 | |
7d774e01 | 491 | #ifdef B_OUT_VEC_BIG_HOST |
6f715d66 | 492 | &B_OUT_VEC_BIG_HOST, |
92c78ee6 | 493 | #endif |
9846338e | 494 | |
6f715d66 SC |
495 | #ifdef M68KCOFF_VEC |
496 | &M68KCOFF_VEC, | |
92c78ee6 | 497 | #endif |
20fdc627 | 498 | |
41f50af0 SC |
499 | #ifdef A29KCOFF_BIG_VEC |
500 | &A29KCOFF_BIG_VEC, | |
92c78ee6 RP |
501 | #endif |
502 | ||
503 | #ifdef TRAD_CORE | |
f58809fd | 504 | &trad_core_vec, |
92c78ee6 | 505 | #endif |
41f50af0 | 506 | |
cbdc7909 JG |
507 | #ifdef RS6000COFF_VEC |
508 | &RS6000COFF_VEC, | |
509 | #endif | |
510 | ||
6f715d66 | 511 | NULL, /* end of list marker */ |
7d774e01 | 512 | }; |
c0e5039e | 513 | |
4e6f9223 | 514 | #endif |
c0e5039e JG |
515 | |
516 | /* default_vector[0] contains either the address of the default vector, | |
517 | if there is one, or zero if there isn't. */ | |
518 | ||
519 | bfd_target *default_vector[] = { | |
520 | #ifdef DEFAULT_VECTOR | |
6f715d66 | 521 | &DEFAULT_VECTOR, |
c0e5039e | 522 | #endif |
6f715d66 | 523 | 0, |
c0e5039e | 524 | }; |
6f715d66 SC |
525 | |
526 | ||
527 | ||
528 | ||
0cda46cf SC |
529 | /* |
530 | FUNCTION | |
531 | bfd_find_target | |
532 | ||
533 | DESCRIPTION | |
534 | Returns a pointer to the transfer vector for the object target | |
535 | named target_name. If target_name is NULL, chooses the one in | |
536 | the environment variable GNUTARGET; if that is null or not | |
537 | defined thenthe first entry in the target list is chosen. | |
538 | Passing in the string "default" or setting the environment | |
539 | variable to "default" will cause the first entry in the target | |
540 | list to be returned, and "target_defaulted" will be set in the | |
541 | BFD. This causes <<bfd_check_format>> to loop over all the | |
542 | targets to find the one that matches the file being read. | |
543 | ||
544 | SYNOPSIS | |
545 | bfd_target *bfd_find_target(CONST char *, bfd *); | |
546 | */ | |
6f715d66 SC |
547 | |
548 | bfd_target * | |
549 | DEFUN(bfd_find_target,(target_name, abfd), | |
550 | CONST char *target_name AND | |
551 | bfd *abfd) | |
552 | { | |
553 | bfd_target **target; | |
554 | extern char *getenv (); | |
f8adc62d JG |
555 | CONST char *targname = (target_name ? target_name : |
556 | (CONST char *) getenv ("GNUTARGET")); | |
6f715d66 SC |
557 | |
558 | /* This is safe; the vector cannot be null */ | |
559 | if (targname == NULL || !strcmp (targname, "default")) { | |
560 | abfd->target_defaulted = true; | |
561 | return abfd->xvec = target_vector[0]; | |
562 | } | |
563 | ||
564 | abfd->target_defaulted = false; | |
565 | ||
566 | for (target = &target_vector[0]; *target != NULL; target++) { | |
567 | if (!strcmp (targname, (*target)->name)) | |
568 | return abfd->xvec = *target; | |
569 | } | |
570 | ||
571 | bfd_error = invalid_target; | |
572 | return NULL; | |
573 | } | |
574 | ||
575 | ||
0cda46cf SC |
576 | /* |
577 | FUNCTION | |
578 | bfd_target_list | |
579 | ||
580 | DESCRIPTION | |
581 | This function returns a freshly malloced NULL-terminated | |
582 | vector of the names of all the valid BFD targets. Do not | |
583 | modify the names | |
6f715d66 | 584 | |
0cda46cf SC |
585 | SYNOPSIS |
586 | CONST char **bfd_target_list(); | |
587 | ||
588 | */ | |
6f715d66 SC |
589 | |
590 | CONST char ** | |
591 | DEFUN_VOID(bfd_target_list) | |
592 | { | |
593 | int vec_length= 0; | |
594 | bfd_target **target; | |
4e6f9223 | 595 | CONST char **name_list, **name_ptr; |
6f715d66 SC |
596 | |
597 | for (target = &target_vector[0]; *target != NULL; target++) | |
598 | vec_length++; | |
599 | ||
600 | name_ptr = | |
601 | name_list = (CONST char **) zalloc ((vec_length + 1) * sizeof (char **)); | |
602 | ||
603 | if (name_list == NULL) { | |
604 | bfd_error = no_memory; | |
605 | return NULL; | |
606 | } | |
607 | ||
6f715d66 SC |
608 | for (target = &target_vector[0]; *target != NULL; target++) |
609 | *(name_ptr++) = (*target)->name; | |
610 | ||
611 | return name_list; | |
612 | } |