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