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