Change linker's default behaviour - it will now reject binary files whoes
[deliverable/binutils-gdb.git] / bfd / archures.c
1 /* BFD library support routines for architectures.
2 Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
3 2000, 2001, 2002
4 Free Software Foundation, Inc.
5 Hacked by John Gilmore and Steve Chamberlain of Cygnus Support.
6
7 This file is part of BFD, the Binary File Descriptor library.
8
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
13
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
18
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
22
23 #include "bfd.h"
24 #include "sysdep.h"
25 #include "libbfd.h"
26 #include "safe-ctype.h"
27
28 /*
29
30 SECTION
31 Architectures
32
33 BFD keeps one atom in a BFD describing the
34 architecture of the data attached to the BFD: a pointer to a
35 <<bfd_arch_info_type>>.
36
37 Pointers to structures can be requested independently of a BFD
38 so that an architecture's information can be interrogated
39 without access to an open BFD.
40
41 The architecture information is provided by each architecture package.
42 The set of default architectures is selected by the macro
43 <<SELECT_ARCHITECTURES>>. This is normally set up in the
44 @file{config/@var{target}.mt} file of your choice. If the name is not
45 defined, then all the architectures supported are included.
46
47 When BFD starts up, all the architectures are called with an
48 initialize method. It is up to the architecture back end to
49 insert as many items into the list of architectures as it wants to;
50 generally this would be one for each machine and one for the
51 default case (an item with a machine field of 0).
52
53 BFD's idea of an architecture is implemented in @file{archures.c}.
54 */
55
56 /*
57
58 SUBSECTION
59 bfd_architecture
60
61 DESCRIPTION
62 This enum gives the object file's CPU architecture, in a
63 global sense---i.e., what processor family does it belong to?
64 Another field indicates which processor within
65 the family is in use. The machine gives a number which
66 distinguishes different versions of the architecture,
67 containing, for example, 2 and 3 for Intel i960 KA and i960 KB,
68 and 68020 and 68030 for Motorola 68020 and 68030.
69
70 .enum bfd_architecture
71 .{
72 . bfd_arch_unknown, {* File arch not known. *}
73 . bfd_arch_obscure, {* Arch known, not one of these. *}
74 . bfd_arch_m68k, {* Motorola 68xxx *}
75 .#define bfd_mach_m68000 1
76 .#define bfd_mach_m68008 2
77 .#define bfd_mach_m68010 3
78 .#define bfd_mach_m68020 4
79 .#define bfd_mach_m68030 5
80 .#define bfd_mach_m68040 6
81 .#define bfd_mach_m68060 7
82 .#define bfd_mach_cpu32 8
83 .#define bfd_mach_mcf5200 9
84 .#define bfd_mach_mcf5206e 10
85 .#define bfd_mach_mcf5307 11
86 .#define bfd_mach_mcf5407 12
87 . bfd_arch_vax, {* DEC Vax *}
88 . bfd_arch_i960, {* Intel 960 *}
89 . {* The order of the following is important.
90 . lower number indicates a machine type that
91 . only accepts a subset of the instructions
92 . available to machines with higher numbers.
93 . The exception is the "ca", which is
94 . incompatible with all other machines except
95 . "core". *}
96 .
97 .#define bfd_mach_i960_core 1
98 .#define bfd_mach_i960_ka_sa 2
99 .#define bfd_mach_i960_kb_sb 3
100 .#define bfd_mach_i960_mc 4
101 .#define bfd_mach_i960_xa 5
102 .#define bfd_mach_i960_ca 6
103 .#define bfd_mach_i960_jx 7
104 .#define bfd_mach_i960_hx 8
105 .
106 . bfd_arch_or32, {* OpenRISC 32 *}
107 .
108 . bfd_arch_a29k, {* AMD 29000 *}
109 . bfd_arch_sparc, {* SPARC *}
110 .#define bfd_mach_sparc 1
111 .{* The difference between v8plus and v9 is that v9 is a true 64 bit env. *}
112 .#define bfd_mach_sparc_sparclet 2
113 .#define bfd_mach_sparc_sparclite 3
114 .#define bfd_mach_sparc_v8plus 4
115 .#define bfd_mach_sparc_v8plusa 5 {* with ultrasparc add'ns. *}
116 .#define bfd_mach_sparc_sparclite_le 6
117 .#define bfd_mach_sparc_v9 7
118 .#define bfd_mach_sparc_v9a 8 {* with ultrasparc add'ns. *}
119 .#define bfd_mach_sparc_v8plusb 9 {* with cheetah add'ns. *}
120 .#define bfd_mach_sparc_v9b 10 {* with cheetah add'ns. *}
121 .{* Nonzero if MACH has the v9 instruction set. *}
122 .#define bfd_mach_sparc_v9_p(mach) \
123 . ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b \
124 . && (mach) != bfd_mach_sparc_sparclite_le)
125 . bfd_arch_mips, {* MIPS Rxxxx *}
126 .#define bfd_mach_mips3000 3000
127 .#define bfd_mach_mips3900 3900
128 .#define bfd_mach_mips4000 4000
129 .#define bfd_mach_mips4010 4010
130 .#define bfd_mach_mips4100 4100
131 .#define bfd_mach_mips4111 4111
132 .#define bfd_mach_mips4120 4120
133 .#define bfd_mach_mips4300 4300
134 .#define bfd_mach_mips4400 4400
135 .#define bfd_mach_mips4600 4600
136 .#define bfd_mach_mips4650 4650
137 .#define bfd_mach_mips5000 5000
138 .#define bfd_mach_mips5400 5400
139 .#define bfd_mach_mips5500 5500
140 .#define bfd_mach_mips6000 6000
141 .#define bfd_mach_mips8000 8000
142 .#define bfd_mach_mips10000 10000
143 .#define bfd_mach_mips12000 12000
144 .#define bfd_mach_mips16 16
145 .#define bfd_mach_mips5 5
146 .#define bfd_mach_mips_sb1 12310201 {* octal 'SB', 01 *}
147 .#define bfd_mach_mipsisa32 32
148 .#define bfd_mach_mipsisa64 64
149 . bfd_arch_i386, {* Intel 386 *}
150 .#define bfd_mach_i386_i386 1
151 .#define bfd_mach_i386_i8086 2
152 .#define bfd_mach_i386_i386_intel_syntax 3
153 .#define bfd_mach_x86_64 64
154 .#define bfd_mach_x86_64_intel_syntax 65
155 . bfd_arch_we32k, {* AT&T WE32xxx *}
156 . bfd_arch_tahoe, {* CCI/Harris Tahoe *}
157 . bfd_arch_i860, {* Intel 860 *}
158 . bfd_arch_i370, {* IBM 360/370 Mainframes *}
159 . bfd_arch_romp, {* IBM ROMP PC/RT *}
160 . bfd_arch_alliant, {* Alliant *}
161 . bfd_arch_convex, {* Convex *}
162 . bfd_arch_m88k, {* Motorola 88xxx *}
163 . bfd_arch_m98k, {* Motorola 98xxx *}
164 . bfd_arch_pyramid, {* Pyramid Technology *}
165 . bfd_arch_h8300, {* Hitachi H8/300 *}
166 .#define bfd_mach_h8300 1
167 .#define bfd_mach_h8300h 2
168 .#define bfd_mach_h8300s 3
169 . bfd_arch_pdp11, {* DEC PDP-11 *}
170 . bfd_arch_powerpc, {* PowerPC *}
171 .#define bfd_mach_ppc 32
172 .#define bfd_mach_ppc64 64
173 .#define bfd_mach_ppc_403 403
174 .#define bfd_mach_ppc_403gc 4030
175 .#define bfd_mach_ppc_505 505
176 .#define bfd_mach_ppc_601 601
177 .#define bfd_mach_ppc_602 602
178 .#define bfd_mach_ppc_603 603
179 .#define bfd_mach_ppc_ec603e 6031
180 .#define bfd_mach_ppc_604 604
181 .#define bfd_mach_ppc_620 620
182 .#define bfd_mach_ppc_630 630
183 .#define bfd_mach_ppc_750 750
184 .#define bfd_mach_ppc_860 860
185 .#define bfd_mach_ppc_a35 35
186 .#define bfd_mach_ppc_rs64ii 642
187 .#define bfd_mach_ppc_rs64iii 643
188 .#define bfd_mach_ppc_7400 7400
189 .#define bfd_mach_ppc_e500 500
190 . bfd_arch_rs6000, {* IBM RS/6000 *}
191 .#define bfd_mach_rs6k 6000
192 .#define bfd_mach_rs6k_rs1 6001
193 .#define bfd_mach_rs6k_rsc 6003
194 .#define bfd_mach_rs6k_rs2 6002
195 . bfd_arch_hppa, {* HP PA RISC *}
196 . bfd_arch_d10v, {* Mitsubishi D10V *}
197 .#define bfd_mach_d10v 1
198 .#define bfd_mach_d10v_ts2 2
199 .#define bfd_mach_d10v_ts3 3
200 . bfd_arch_d30v, {* Mitsubishi D30V *}
201 . bfd_arch_dlx, {* DLX *}
202 . bfd_arch_m68hc11, {* Motorola 68HC11 *}
203 . bfd_arch_m68hc12, {* Motorola 68HC12 *}
204 .#define bfd_mach_m6812_default 0
205 .#define bfd_mach_m6812 1
206 .#define bfd_mach_m6812s 2
207 . bfd_arch_z8k, {* Zilog Z8000 *}
208 .#define bfd_mach_z8001 1
209 .#define bfd_mach_z8002 2
210 . bfd_arch_h8500, {* Hitachi H8/500 *}
211 . bfd_arch_sh, {* Hitachi SH *}
212 .#define bfd_mach_sh 1
213 .#define bfd_mach_sh2 0x20
214 .#define bfd_mach_sh_dsp 0x2d
215 .#define bfd_mach_sh3 0x30
216 .#define bfd_mach_sh3_dsp 0x3d
217 .#define bfd_mach_sh3e 0x3e
218 .#define bfd_mach_sh4 0x40
219 .#define bfd_mach_sh5 0x50
220 . bfd_arch_alpha, {* Dec Alpha *}
221 .#define bfd_mach_alpha_ev4 0x10
222 .#define bfd_mach_alpha_ev5 0x20
223 .#define bfd_mach_alpha_ev6 0x30
224 . bfd_arch_arm, {* Advanced Risc Machines ARM. *}
225 .#define bfd_mach_arm_2 1
226 .#define bfd_mach_arm_2a 2
227 .#define bfd_mach_arm_3 3
228 .#define bfd_mach_arm_3M 4
229 .#define bfd_mach_arm_4 5
230 .#define bfd_mach_arm_4T 6
231 .#define bfd_mach_arm_5 7
232 .#define bfd_mach_arm_5T 8
233 .#define bfd_mach_arm_5TE 9
234 .#define bfd_mach_arm_XScale 10
235 . bfd_arch_ns32k, {* National Semiconductors ns32000 *}
236 . bfd_arch_w65, {* WDC 65816 *}
237 . bfd_arch_tic30, {* Texas Instruments TMS320C30 *}
238 . bfd_arch_tic4x, {* Texas Instruments TMS320C3X/4X *}
239 .#define bfd_mach_c3x 30
240 .#define bfd_mach_c4x 40
241 . bfd_arch_tic54x, {* Texas Instruments TMS320C54X *}
242 . bfd_arch_tic80, {* TI TMS320c80 (MVP) *}
243 . bfd_arch_v850, {* NEC V850 *}
244 .#define bfd_mach_v850 1
245 .#define bfd_mach_v850e 'E'
246 . bfd_arch_arc, {* ARC Cores *}
247 .#define bfd_mach_arc_5 5
248 .#define bfd_mach_arc_6 6
249 .#define bfd_mach_arc_7 7
250 .#define bfd_mach_arc_8 8
251 . bfd_arch_m32r, {* Mitsubishi M32R/D *}
252 .#define bfd_mach_m32r 1 {* For backwards compatibility. *}
253 .#define bfd_mach_m32rx 'x'
254 . bfd_arch_mn10200, {* Matsushita MN10200 *}
255 . bfd_arch_mn10300, {* Matsushita MN10300 *}
256 .#define bfd_mach_mn10300 300
257 .#define bfd_mach_am33 330
258 . bfd_arch_fr30,
259 .#define bfd_mach_fr30 0x46523330
260 . bfd_arch_frv,
261 .#define bfd_mach_frv 1
262 .#define bfd_mach_frvsimple 2
263 .#define bfd_mach_fr300 300
264 .#define bfd_mach_fr400 400
265 .#define bfd_mach_frvtomcat 499 {* fr500 prototype *}
266 .#define bfd_mach_fr500 500
267 . bfd_arch_mcore,
268 . bfd_arch_ia64, {* HP/Intel ia64 *}
269 .#define bfd_mach_ia64_elf64 64
270 .#define bfd_mach_ia64_elf32 32
271 . bfd_arch_ip2k, {* Ubicom IP2K microcontrollers. *}
272 .#define bfd_mach_ip2022 1
273 .#define bfd_mach_ip2022ext 2
274 . bfd_arch_pj,
275 . bfd_arch_avr, {* Atmel AVR microcontrollers. *}
276 .#define bfd_mach_avr1 1
277 .#define bfd_mach_avr2 2
278 .#define bfd_mach_avr3 3
279 .#define bfd_mach_avr4 4
280 .#define bfd_mach_avr5 5
281 . bfd_arch_cris, {* Axis CRIS *}
282 . bfd_arch_s390, {* IBM s390 *}
283 .#define bfd_mach_s390_31 31
284 .#define bfd_mach_s390_64 64
285 . bfd_arch_openrisc, {* OpenRISC *}
286 . bfd_arch_mmix, {* Donald Knuth's educational processor. *}
287 . bfd_arch_xstormy16,
288 .#define bfd_mach_xstormy16 1
289 . bfd_arch_last
290 . };
291 */
292
293 /*
294 SUBSECTION
295 bfd_arch_info
296
297 DESCRIPTION
298 This structure contains information on architectures for use
299 within BFD.
300
301 .
302 .typedef struct bfd_arch_info
303 .{
304 . int bits_per_word;
305 . int bits_per_address;
306 . int bits_per_byte;
307 . enum bfd_architecture arch;
308 . unsigned long mach;
309 . const char *arch_name;
310 . const char *printable_name;
311 . unsigned int section_align_power;
312 . {* TRUE if this is the default machine for the architecture.
313 . The default arch should be the first entry for an arch so that
314 . all the entries for that arch can be accessed via <<next>>. *}
315 . bfd_boolean the_default;
316 . const struct bfd_arch_info * (*compatible)
317 . PARAMS ((const struct bfd_arch_info *a,
318 . const struct bfd_arch_info *b));
319 .
320 . bfd_boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *));
321 .
322 . const struct bfd_arch_info *next;
323 .}
324 .bfd_arch_info_type;
325 .
326 */
327
328 extern const bfd_arch_info_type bfd_a29k_arch;
329 extern const bfd_arch_info_type bfd_alpha_arch;
330 extern const bfd_arch_info_type bfd_arc_arch;
331 extern const bfd_arch_info_type bfd_arm_arch;
332 extern const bfd_arch_info_type bfd_avr_arch;
333 extern const bfd_arch_info_type bfd_cris_arch;
334 extern const bfd_arch_info_type bfd_d10v_arch;
335 extern const bfd_arch_info_type bfd_d30v_arch;
336 extern const bfd_arch_info_type bfd_dlx_arch;
337 extern const bfd_arch_info_type bfd_fr30_arch;
338 extern const bfd_arch_info_type bfd_frv_arch;
339 extern const bfd_arch_info_type bfd_h8300_arch;
340 extern const bfd_arch_info_type bfd_h8500_arch;
341 extern const bfd_arch_info_type bfd_hppa_arch;
342 extern const bfd_arch_info_type bfd_i370_arch;
343 extern const bfd_arch_info_type bfd_i386_arch;
344 extern const bfd_arch_info_type bfd_i860_arch;
345 extern const bfd_arch_info_type bfd_i960_arch;
346 extern const bfd_arch_info_type bfd_ia64_arch;
347 extern const bfd_arch_info_type bfd_ip2k_arch;
348 extern const bfd_arch_info_type bfd_m32r_arch;
349 extern const bfd_arch_info_type bfd_m68hc11_arch;
350 extern const bfd_arch_info_type bfd_m68hc12_arch;
351 extern const bfd_arch_info_type bfd_m68k_arch;
352 extern const bfd_arch_info_type bfd_m88k_arch;
353 extern const bfd_arch_info_type bfd_mcore_arch;
354 extern const bfd_arch_info_type bfd_mips_arch;
355 extern const bfd_arch_info_type bfd_mmix_arch;
356 extern const bfd_arch_info_type bfd_mn10200_arch;
357 extern const bfd_arch_info_type bfd_mn10300_arch;
358 extern const bfd_arch_info_type bfd_ns32k_arch;
359 extern const bfd_arch_info_type bfd_openrisc_arch;
360 extern const bfd_arch_info_type bfd_or32_arch;
361 extern const bfd_arch_info_type bfd_pdp11_arch;
362 extern const bfd_arch_info_type bfd_pj_arch;
363 extern const bfd_arch_info_type bfd_powerpc_archs[];
364 #define bfd_powerpc_arch bfd_powerpc_archs[0]
365 extern const bfd_arch_info_type bfd_rs6000_arch;
366 extern const bfd_arch_info_type bfd_s390_arch;
367 extern const bfd_arch_info_type bfd_sh_arch;
368 extern const bfd_arch_info_type bfd_sparc_arch;
369 extern const bfd_arch_info_type bfd_tic30_arch;
370 extern const bfd_arch_info_type bfd_tic4x_arch;
371 extern const bfd_arch_info_type bfd_tic54x_arch;
372 extern const bfd_arch_info_type bfd_tic80_arch;
373 extern const bfd_arch_info_type bfd_v850_arch;
374 extern const bfd_arch_info_type bfd_vax_arch;
375 extern const bfd_arch_info_type bfd_we32k_arch;
376 extern const bfd_arch_info_type bfd_w65_arch;
377 extern const bfd_arch_info_type bfd_xstormy16_arch;
378 extern const bfd_arch_info_type bfd_z8k_arch;
379
380 static const bfd_arch_info_type * const bfd_archures_list[] =
381 {
382 #ifdef SELECT_ARCHITECTURES
383 SELECT_ARCHITECTURES,
384 #else
385 &bfd_a29k_arch,
386 &bfd_alpha_arch,
387 &bfd_arc_arch,
388 &bfd_arm_arch,
389 &bfd_avr_arch,
390 &bfd_cris_arch,
391 &bfd_d10v_arch,
392 &bfd_d30v_arch,
393 &bfd_dlx_arch,
394 &bfd_fr30_arch,
395 &bfd_frv_arch,
396 &bfd_h8300_arch,
397 &bfd_h8500_arch,
398 &bfd_hppa_arch,
399 &bfd_i370_arch,
400 &bfd_i386_arch,
401 &bfd_i860_arch,
402 &bfd_i960_arch,
403 &bfd_ia64_arch,
404 &bfd_ip2k_arch,
405 &bfd_m32r_arch,
406 &bfd_m68hc11_arch,
407 &bfd_m68hc12_arch,
408 &bfd_m68k_arch,
409 &bfd_m88k_arch,
410 &bfd_mcore_arch,
411 &bfd_mips_arch,
412 &bfd_mmix_arch,
413 &bfd_mn10200_arch,
414 &bfd_mn10300_arch,
415 &bfd_ns32k_arch,
416 &bfd_openrisc_arch,
417 &bfd_or32_arch,
418 &bfd_pdp11_arch,
419 &bfd_powerpc_arch,
420 &bfd_rs6000_arch,
421 &bfd_s390_arch,
422 &bfd_sh_arch,
423 &bfd_sparc_arch,
424 &bfd_tic30_arch,
425 &bfd_tic4x_arch,
426 &bfd_tic54x_arch,
427 &bfd_tic80_arch,
428 &bfd_v850_arch,
429 &bfd_vax_arch,
430 &bfd_w65_arch,
431 &bfd_we32k_arch,
432 &bfd_xstormy16_arch,
433 &bfd_z8k_arch,
434 #endif
435 0
436 };
437
438 /*
439 FUNCTION
440 bfd_printable_name
441
442 SYNOPSIS
443 const char *bfd_printable_name(bfd *abfd);
444
445 DESCRIPTION
446 Return a printable string representing the architecture and machine
447 from the pointer to the architecture info structure.
448
449 */
450
451 const char *
452 bfd_printable_name (abfd)
453 bfd *abfd;
454 {
455 return abfd->arch_info->printable_name;
456 }
457
458 /*
459 FUNCTION
460 bfd_scan_arch
461
462 SYNOPSIS
463 const bfd_arch_info_type *bfd_scan_arch(const char *string);
464
465 DESCRIPTION
466 Figure out if BFD supports any cpu which could be described with
467 the name @var{string}. Return a pointer to an <<arch_info>>
468 structure if a machine is found, otherwise NULL.
469 */
470
471 const bfd_arch_info_type *
472 bfd_scan_arch (string)
473 const char *string;
474 {
475 const bfd_arch_info_type * const *app, *ap;
476
477 /* Look through all the installed architectures. */
478 for (app = bfd_archures_list; *app != NULL; app++)
479 {
480 for (ap = *app; ap != NULL; ap = ap->next)
481 {
482 if (ap->scan (ap, string))
483 return ap;
484 }
485 }
486
487 return NULL;
488 }
489
490 /*
491 FUNCTION
492 bfd_arch_list
493
494 SYNOPSIS
495 const char **bfd_arch_list(void);
496
497 DESCRIPTION
498 Return a freshly malloced NULL-terminated vector of the names
499 of all the valid BFD architectures. Do not modify the names.
500 */
501
502 const char **
503 bfd_arch_list ()
504 {
505 int vec_length = 0;
506 const char **name_ptr;
507 const char **name_list;
508 const bfd_arch_info_type * const *app;
509 bfd_size_type amt;
510
511 /* Determine the number of architectures. */
512 vec_length = 0;
513 for (app = bfd_archures_list; *app != NULL; app++)
514 {
515 const bfd_arch_info_type *ap;
516 for (ap = *app; ap != NULL; ap = ap->next)
517 {
518 vec_length++;
519 }
520 }
521
522 amt = (vec_length + 1) * sizeof (char **);
523 name_list = (const char **) bfd_malloc (amt);
524 if (name_list == NULL)
525 return NULL;
526
527 /* Point the list at each of the names. */
528 name_ptr = name_list;
529 for (app = bfd_archures_list; *app != NULL; app++)
530 {
531 const bfd_arch_info_type *ap;
532 for (ap = *app; ap != NULL; ap = ap->next)
533 {
534 *name_ptr = ap->printable_name;
535 name_ptr++;
536 }
537 }
538 *name_ptr = NULL;
539
540 return name_list;
541 }
542
543 /*
544 FUNCTION
545 bfd_arch_get_compatible
546
547 SYNOPSIS
548 const bfd_arch_info_type *bfd_arch_get_compatible(
549 const bfd *abfd,
550 const bfd *bbfd,
551 bfd_boolean accept_unknowns);
552
553 DESCRIPTION
554 Determine whether two BFDs' architectures and machine types
555 are compatible. Calculates the lowest common denominator
556 between the two architectures and machine types implied by
557 the BFDs and returns a pointer to an <<arch_info>> structure
558 describing the compatible machine.
559 */
560
561 const bfd_arch_info_type *
562 bfd_arch_get_compatible (abfd, bbfd, accept_unknowns)
563 const bfd *abfd;
564 const bfd *bbfd;
565 bfd_boolean accept_unknowns;
566 {
567 const bfd * ubfd = NULL;
568
569 /* Look for an unknown architecture. */
570 if (((ubfd = abfd) && ubfd->arch_info->arch == bfd_arch_unknown)
571 || ((ubfd = bbfd) && ubfd->arch_info->arch == bfd_arch_unknown))
572 {
573 /* We can allow an unknown architecture if accept_unknowns
574 is true, or if the target is the "binary" format, which
575 has an unknown architecture. Since the binary format can
576 only be set by explicit request from the user, it is safe
577 to assume that they know what they are doing. */
578 if (accept_unknowns
579 || strcmp (bfd_get_target (ubfd), "binary") == 0)
580 return ubfd->arch_info;
581 return NULL;
582 }
583
584 /* Otherwise architecture-specific code has to decide. */
585 return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
586 }
587
588 /*
589 INTERNAL_DEFINITION
590 bfd_default_arch_struct
591
592 DESCRIPTION
593 The <<bfd_default_arch_struct>> is an item of
594 <<bfd_arch_info_type>> which has been initialized to a fairly
595 generic state. A BFD starts life by pointing to this
596 structure, until the correct back end has determined the real
597 architecture of the file.
598
599 .extern const bfd_arch_info_type bfd_default_arch_struct;
600 */
601
602 const bfd_arch_info_type bfd_default_arch_struct = {
603 32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, TRUE,
604 bfd_default_compatible,
605 bfd_default_scan,
606 0,
607 };
608
609 /*
610 FUNCTION
611 bfd_set_arch_info
612
613 SYNOPSIS
614 void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg);
615
616 DESCRIPTION
617 Set the architecture info of @var{abfd} to @var{arg}.
618 */
619
620 void
621 bfd_set_arch_info (abfd, arg)
622 bfd *abfd;
623 const bfd_arch_info_type *arg;
624 {
625 abfd->arch_info = arg;
626 }
627
628 /*
629 INTERNAL_FUNCTION
630 bfd_default_set_arch_mach
631
632 SYNOPSIS
633 bfd_boolean bfd_default_set_arch_mach(bfd *abfd,
634 enum bfd_architecture arch,
635 unsigned long mach);
636
637 DESCRIPTION
638 Set the architecture and machine type in BFD @var{abfd}
639 to @var{arch} and @var{mach}. Find the correct
640 pointer to a structure and insert it into the <<arch_info>>
641 pointer.
642 */
643
644 bfd_boolean
645 bfd_default_set_arch_mach (abfd, arch, mach)
646 bfd *abfd;
647 enum bfd_architecture arch;
648 unsigned long mach;
649 {
650 abfd->arch_info = bfd_lookup_arch (arch, mach);
651 if (abfd->arch_info != NULL)
652 return TRUE;
653
654 abfd->arch_info = &bfd_default_arch_struct;
655 bfd_set_error (bfd_error_bad_value);
656 return FALSE;
657 }
658
659 /*
660 FUNCTION
661 bfd_get_arch
662
663 SYNOPSIS
664 enum bfd_architecture bfd_get_arch(bfd *abfd);
665
666 DESCRIPTION
667 Return the enumerated type which describes the BFD @var{abfd}'s
668 architecture.
669 */
670
671 enum bfd_architecture
672 bfd_get_arch (abfd)
673 bfd *abfd;
674 {
675 return abfd->arch_info->arch;
676 }
677
678 /*
679 FUNCTION
680 bfd_get_mach
681
682 SYNOPSIS
683 unsigned long bfd_get_mach(bfd *abfd);
684
685 DESCRIPTION
686 Return the long type which describes the BFD @var{abfd}'s
687 machine.
688 */
689
690 unsigned long
691 bfd_get_mach (abfd)
692 bfd *abfd;
693 {
694 return abfd->arch_info->mach;
695 }
696
697 /*
698 FUNCTION
699 bfd_arch_bits_per_byte
700
701 SYNOPSIS
702 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
703
704 DESCRIPTION
705 Return the number of bits in one of the BFD @var{abfd}'s
706 architecture's bytes.
707 */
708
709 unsigned int
710 bfd_arch_bits_per_byte (abfd)
711 bfd *abfd;
712 {
713 return abfd->arch_info->bits_per_byte;
714 }
715
716 /*
717 FUNCTION
718 bfd_arch_bits_per_address
719
720 SYNOPSIS
721 unsigned int bfd_arch_bits_per_address(bfd *abfd);
722
723 DESCRIPTION
724 Return the number of bits in one of the BFD @var{abfd}'s
725 architecture's addresses.
726 */
727
728 unsigned int
729 bfd_arch_bits_per_address (abfd)
730 bfd *abfd;
731 {
732 return abfd->arch_info->bits_per_address;
733 }
734
735 /*
736 INTERNAL_FUNCTION
737 bfd_default_compatible
738
739 SYNOPSIS
740 const bfd_arch_info_type *bfd_default_compatible
741 (const bfd_arch_info_type *a,
742 const bfd_arch_info_type *b);
743
744 DESCRIPTION
745 The default function for testing for compatibility.
746 */
747
748 const bfd_arch_info_type *
749 bfd_default_compatible (a, b)
750 const bfd_arch_info_type *a;
751 const bfd_arch_info_type *b;
752 {
753 if (a->arch != b->arch)
754 return NULL;
755
756 if (a->bits_per_word != b->bits_per_word)
757 return NULL;
758
759 if (a->mach > b->mach)
760 return a;
761
762 if (b->mach > a->mach)
763 return b;
764
765 return a;
766 }
767
768 /*
769 INTERNAL_FUNCTION
770 bfd_default_scan
771
772 SYNOPSIS
773 bfd_boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string);
774
775 DESCRIPTION
776 The default function for working out whether this is an
777 architecture hit and a machine hit.
778 */
779
780 bfd_boolean
781 bfd_default_scan (info, string)
782 const bfd_arch_info_type *info;
783 const char *string;
784 {
785 const char *ptr_src;
786 const char *ptr_tst;
787 unsigned long number;
788 enum bfd_architecture arch;
789 const char *printable_name_colon;
790
791 /* Exact match of the architecture name (ARCH_NAME) and also the
792 default architecture? */
793 if (strcasecmp (string, info->arch_name) == 0
794 && info->the_default)
795 return TRUE;
796
797 /* Exact match of the machine name (PRINTABLE_NAME)? */
798 if (strcasecmp (string, info->printable_name) == 0)
799 return TRUE;
800
801 /* Given that printable_name contains no colon, attempt to match:
802 ARCH_NAME [ ":" ] PRINTABLE_NAME? */
803 printable_name_colon = strchr (info->printable_name, ':');
804 if (printable_name_colon == NULL)
805 {
806 size_t strlen_arch_name = strlen (info->arch_name);
807 if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
808 {
809 if (string[strlen_arch_name] == ':')
810 {
811 if (strcasecmp (string + strlen_arch_name + 1,
812 info->printable_name) == 0)
813 return TRUE;
814 }
815 else
816 {
817 if (strcasecmp (string + strlen_arch_name,
818 info->printable_name) == 0)
819 return TRUE;
820 }
821 }
822 }
823
824 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
825 Attempt to match: <arch> <mach>? */
826 if (printable_name_colon != NULL)
827 {
828 size_t colon_index = printable_name_colon - info->printable_name;
829 if (strncasecmp (string, info->printable_name, colon_index) == 0
830 && strcasecmp (string + colon_index,
831 info->printable_name + colon_index + 1) == 0)
832 return TRUE;
833 }
834
835 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
836 attempt to match just <mach>, it could be ambigious. This test
837 is left until later. */
838
839 /* NOTE: The below is retained for compatibility only. Please do
840 not add to this code. */
841
842 /* See how much of the supplied string matches with the
843 architecture, eg the string m68k:68020 would match the 68k entry
844 up to the :, then we get left with the machine number. */
845
846 for (ptr_src = string, ptr_tst = info->arch_name;
847 *ptr_src && *ptr_tst;
848 ptr_src++, ptr_tst++)
849 {
850 if (*ptr_src != *ptr_tst)
851 break;
852 }
853
854 /* Chewed up as much of the architecture as will match, skip any
855 colons. */
856 if (*ptr_src == ':')
857 ptr_src++;
858
859 if (*ptr_src == 0)
860 {
861 /* Nothing more, then only keep this one if it is the default
862 machine for this architecture. */
863 return info->the_default;
864 }
865
866 number = 0;
867 while (ISDIGIT (*ptr_src))
868 {
869 number = number * 10 + *ptr_src - '0';
870 ptr_src++;
871 }
872
873 /* NOTE: The below is retained for compatibility only.
874 PLEASE DO NOT ADD TO THIS CODE. */
875
876 switch (number)
877 {
878 /* FIXME: These are needed to parse IEEE objects. */
879 /* The following seven case's are here only for compatibility with
880 older binutils (at least IEEE objects from binutils 2.9.1 require
881 them). */
882 case bfd_mach_m68000:
883 case bfd_mach_m68010:
884 case bfd_mach_m68020:
885 case bfd_mach_m68030:
886 case bfd_mach_m68040:
887 case bfd_mach_m68060:
888 case bfd_mach_cpu32:
889 arch = bfd_arch_m68k;
890 break;
891 case 68000:
892 arch = bfd_arch_m68k;
893 number = bfd_mach_m68000;
894 break;
895 case 68010:
896 arch = bfd_arch_m68k;
897 number = bfd_mach_m68010;
898 break;
899 case 68020:
900 arch = bfd_arch_m68k;
901 number = bfd_mach_m68020;
902 break;
903 case 68030:
904 arch = bfd_arch_m68k;
905 number = bfd_mach_m68030;
906 break;
907 case 68040:
908 arch = bfd_arch_m68k;
909 number = bfd_mach_m68040;
910 break;
911 case 68060:
912 arch = bfd_arch_m68k;
913 number = bfd_mach_m68060;
914 break;
915 case 68332:
916 arch = bfd_arch_m68k;
917 number = bfd_mach_cpu32;
918 break;
919 case 5200:
920 arch = bfd_arch_m68k;
921 number = bfd_mach_mcf5200;
922 break;
923 case 5206:
924 arch = bfd_arch_m68k;
925 number = bfd_mach_mcf5206e;
926 break;
927 case 5307:
928 arch = bfd_arch_m68k;
929 number = bfd_mach_mcf5307;
930 break;
931 case 5407:
932 arch = bfd_arch_m68k;
933 number = bfd_mach_mcf5407;
934 break;
935
936 case 32000:
937 arch = bfd_arch_we32k;
938 break;
939
940 case 3000:
941 arch = bfd_arch_mips;
942 number = bfd_mach_mips3000;
943 break;
944
945 case 4000:
946 arch = bfd_arch_mips;
947 number = bfd_mach_mips4000;
948 break;
949
950 case 6000:
951 arch = bfd_arch_rs6000;
952 break;
953
954 case 7410:
955 arch = bfd_arch_sh;
956 number = bfd_mach_sh_dsp;
957 break;
958
959 case 7708:
960 arch = bfd_arch_sh;
961 number = bfd_mach_sh3;
962 break;
963
964 case 7729:
965 arch = bfd_arch_sh;
966 number = bfd_mach_sh3_dsp;
967 break;
968
969 case 7750:
970 arch = bfd_arch_sh;
971 number = bfd_mach_sh4;
972 break;
973
974 default:
975 return FALSE;
976 }
977
978 if (arch != info->arch)
979 return FALSE;
980
981 if (number != info->mach)
982 return FALSE;
983
984 return TRUE;
985 }
986
987 /*
988 FUNCTION
989 bfd_get_arch_info
990
991 SYNOPSIS
992 const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd);
993
994 DESCRIPTION
995 Return the architecture info struct in @var{abfd}.
996 */
997
998 const bfd_arch_info_type *
999 bfd_get_arch_info (abfd)
1000 bfd *abfd;
1001 {
1002 return abfd->arch_info;
1003 }
1004
1005 /*
1006 FUNCTION
1007 bfd_lookup_arch
1008
1009 SYNOPSIS
1010 const bfd_arch_info_type *bfd_lookup_arch
1011 (enum bfd_architecture
1012 arch,
1013 unsigned long machine);
1014
1015 DESCRIPTION
1016 Look for the architecure info structure which matches the
1017 arguments @var{arch} and @var{machine}. A machine of 0 matches the
1018 machine/architecture structure which marks itself as the
1019 default.
1020 */
1021
1022 const bfd_arch_info_type *
1023 bfd_lookup_arch (arch, machine)
1024 enum bfd_architecture arch;
1025 unsigned long machine;
1026 {
1027 const bfd_arch_info_type * const *app, *ap;
1028
1029 for (app = bfd_archures_list; *app != NULL; app++)
1030 {
1031 for (ap = *app; ap != NULL; ap = ap->next)
1032 {
1033 if (ap->arch == arch
1034 && (ap->mach == machine
1035 || (machine == 0 && ap->the_default)))
1036 return ap;
1037 }
1038 }
1039
1040 return NULL;
1041 }
1042
1043 /*
1044 FUNCTION
1045 bfd_printable_arch_mach
1046
1047 SYNOPSIS
1048 const char *bfd_printable_arch_mach
1049 (enum bfd_architecture arch, unsigned long machine);
1050
1051 DESCRIPTION
1052 Return a printable string representing the architecture and
1053 machine type.
1054
1055 This routine is depreciated.
1056 */
1057
1058 const char *
1059 bfd_printable_arch_mach (arch, machine)
1060 enum bfd_architecture arch;
1061 unsigned long machine;
1062 {
1063 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
1064
1065 if (ap)
1066 return ap->printable_name;
1067 return "UNKNOWN!";
1068 }
1069
1070 /*
1071 FUNCTION
1072 bfd_octets_per_byte
1073
1074 SYNOPSIS
1075 unsigned int bfd_octets_per_byte(bfd *abfd);
1076
1077 DESCRIPTION
1078 Return the number of octets (8-bit quantities) per target byte
1079 (minimum addressable unit). In most cases, this will be one, but some
1080 DSP targets have 16, 32, or even 48 bits per byte.
1081 */
1082
1083 unsigned int
1084 bfd_octets_per_byte (abfd)
1085 bfd *abfd;
1086 {
1087 return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1088 bfd_get_mach (abfd));
1089 }
1090
1091 /*
1092 FUNCTION
1093 bfd_arch_mach_octets_per_byte
1094
1095 SYNOPSIS
1096 unsigned int bfd_arch_mach_octets_per_byte(enum bfd_architecture arch,
1097 unsigned long machine);
1098
1099 DESCRIPTION
1100 See bfd_octets_per_byte.
1101
1102 This routine is provided for those cases where a bfd * is not
1103 available
1104 */
1105
1106 unsigned int
1107 bfd_arch_mach_octets_per_byte (arch, mach)
1108 enum bfd_architecture arch;
1109 unsigned long mach;
1110 {
1111 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
1112
1113 if (ap)
1114 return ap->bits_per_byte / 8;
1115 return 1;
1116 }
This page took 0.05543 seconds and 5 git commands to generate.