* scripttempl/elfd30v.sc: Place .gcc_except_table.
[deliverable/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 *}
149. bfd_arch_rs6000, {* IBM RS/6000 *}
150. bfd_arch_hppa, {* HP PA RISC *}
151. bfd_arch_d10v, {* Mitsubishi D10V *}
7af8cca9
MM
152.#define bfd_mach_d10v 0
153.#define bfd_mach_d10v_ts2 2
154.#define bfd_mach_d10v_ts3 3
252b5132
RH
155. bfd_arch_d30v, {* Mitsubishi D30V *}
156. bfd_arch_z8k, {* Zilog Z8000 *}
157.#define bfd_mach_z8001 1
158.#define bfd_mach_z8002 2
159. bfd_arch_h8500, {* Hitachi H8/500 *}
160. bfd_arch_sh, {* Hitachi SH *}
161.#define bfd_mach_sh 0
d4845d57
JR
162.#define bfd_mach_sh2 0x20
163.#define bfd_mach_sh_dsp 0x2d
252b5132 164.#define bfd_mach_sh3 0x30
d4845d57 165.#define bfd_mach_sh3_dsp 0x3d
252b5132 166.#define bfd_mach_sh3e 0x3e
d4845d57 167.#define bfd_mach_sh4 0x40
252b5132
RH
168. bfd_arch_alpha, {* Dec Alpha *}
169.#define bfd_mach_alpha_ev4 0x10
170.#define bfd_mach_alpha_ev5 0x20
171.#define bfd_mach_alpha_ev6 0x30
172. bfd_arch_arm, {* Advanced Risc Machines ARM *}
173.#define bfd_mach_arm_2 1
478d07d6 174.#define bfd_mach_arm_2a 2
252b5132
RH
175.#define bfd_mach_arm_3 3
176.#define bfd_mach_arm_3M 4
478d07d6 177.#define bfd_mach_arm_4 5
252b5132 178.#define bfd_mach_arm_4T 6
478d07d6
NC
179.#define bfd_mach_arm_5 7
180.#define bfd_mach_arm_5T 8
252b5132
RH
181. bfd_arch_ns32k, {* National Semiconductors ns32000 *}
182. bfd_arch_w65, {* WDC 65816 *}
183. bfd_arch_tic30, {* Texas Instruments TMS320C30 *}
81635ce4 184. bfd_arch_tic54x, {* Texas Instruments TMS320C54X *}
252b5132
RH
185. bfd_arch_tic80, {* TI TMS320c80 (MVP) *}
186. bfd_arch_v850, {* NEC V850 *}
187.#define bfd_mach_v850 0
188.#define bfd_mach_v850e 'E'
189.#define bfd_mach_v850ea 'A'
190. bfd_arch_arc, {* Argonaut RISC Core *}
191.#define bfd_mach_arc_base 0
192. bfd_arch_m32r, {* Mitsubishi M32R/D *}
193.#define bfd_mach_m32r 0 {* backwards compatibility *}
a23ef39f 194.#define bfd_mach_m32rx 'x'
252b5132
RH
195. bfd_arch_mn10200, {* Matsushita MN10200 *}
196. bfd_arch_mn10300, {* Matsushita MN10300 *}
197.#define bfd_mach_mn10300 300
31f8dc8f 198.#define bfd_mach_am33 330
252b5132
RH
199. bfd_arch_fr30,
200.#define bfd_mach_fr30 0x46523330
201. bfd_arch_mcore,
0bcb993b 202. bfd_arch_pj,
adde6300
AM
203. bfd_arch_avr, {* Atmel AVR microcontrollers *}
204.#define bfd_mach_avr1 1
205.#define bfd_mach_avr2 2
206.#define bfd_mach_avr3 3
207.#define bfd_mach_avr4 4
252b5132
RH
208. bfd_arch_last
209. };
210
211
212*/
213
214/*
215
216SUBSECTION
217 bfd_arch_info
218
219DESCRIPTION
220 This structure contains information on architectures for use
221 within BFD.
222
223.
224.typedef struct bfd_arch_info
225.{
226. int bits_per_word;
227. int bits_per_address;
228. int bits_per_byte;
229. enum bfd_architecture arch;
230. unsigned long mach;
231. const char *arch_name;
232. const char *printable_name;
233. unsigned int section_align_power;
234. {* true if this is the default machine for the architecture *}
235. boolean the_default;
236. const struct bfd_arch_info * (*compatible)
237. PARAMS ((const struct bfd_arch_info *a,
238. const struct bfd_arch_info *b));
239.
240. boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *));
241.
242. const struct bfd_arch_info *next;
243.} bfd_arch_info_type;
244*/
245
246extern const bfd_arch_info_type bfd_a29k_arch;
247extern const bfd_arch_info_type bfd_alpha_arch;
248extern const bfd_arch_info_type bfd_arc_arch;
249extern const bfd_arch_info_type bfd_arm_arch;
250extern const bfd_arch_info_type bfd_d10v_arch;
251extern const bfd_arch_info_type bfd_d30v_arch;
252extern const bfd_arch_info_type bfd_h8300_arch;
253extern const bfd_arch_info_type bfd_h8500_arch;
254extern const bfd_arch_info_type bfd_hppa_arch;
5b93d8bb 255extern const bfd_arch_info_type bfd_i370_arch;
252b5132
RH
256extern const bfd_arch_info_type bfd_i386_arch;
257extern const bfd_arch_info_type bfd_i860_arch;
258extern const bfd_arch_info_type bfd_i960_arch;
259extern const bfd_arch_info_type bfd_m32r_arch;
260extern const bfd_arch_info_type bfd_m68k_arch;
261extern const bfd_arch_info_type bfd_m88k_arch;
262extern const bfd_arch_info_type bfd_mips_arch;
263extern const bfd_arch_info_type bfd_mn10200_arch;
264extern const bfd_arch_info_type bfd_mn10300_arch;
265extern const bfd_arch_info_type bfd_powerpc_arch;
266extern const bfd_arch_info_type bfd_rs6000_arch;
0bcb993b 267extern const bfd_arch_info_type bfd_pj_arch;
252b5132
RH
268extern const bfd_arch_info_type bfd_sh_arch;
269extern const bfd_arch_info_type bfd_sparc_arch;
270extern const bfd_arch_info_type bfd_tic30_arch;
81635ce4 271extern const bfd_arch_info_type bfd_tic54x_arch;
252b5132
RH
272extern const bfd_arch_info_type bfd_tic80_arch;
273extern const bfd_arch_info_type bfd_vax_arch;
274extern const bfd_arch_info_type bfd_we32k_arch;
275extern const bfd_arch_info_type bfd_z8k_arch;
276extern const bfd_arch_info_type bfd_ns32k_arch;
277extern const bfd_arch_info_type bfd_w65_arch;
278extern const bfd_arch_info_type bfd_v850_arch;
279extern const bfd_arch_info_type bfd_fr30_arch;
280extern const bfd_arch_info_type bfd_mcore_arch;
adde6300 281extern const bfd_arch_info_type bfd_avr_arch;
252b5132
RH
282
283static const bfd_arch_info_type * const bfd_archures_list[] =
284{
285#ifdef SELECT_ARCHITECTURES
286 SELECT_ARCHITECTURES,
287#else
288 &bfd_a29k_arch,
289 &bfd_alpha_arch,
290 &bfd_arc_arch,
291 &bfd_arm_arch,
292 &bfd_d10v_arch,
293 &bfd_d30v_arch,
294 &bfd_h8300_arch,
295 &bfd_h8500_arch,
296 &bfd_hppa_arch,
5b93d8bb 297 &bfd_i370_arch,
252b5132
RH
298 &bfd_i386_arch,
299 &bfd_i860_arch,
300 &bfd_i960_arch,
301 &bfd_m32r_arch,
302 &bfd_m68k_arch,
303 &bfd_m88k_arch,
304 &bfd_mips_arch,
305 &bfd_mn10200_arch,
306 &bfd_mn10300_arch,
307 &bfd_powerpc_arch,
308 &bfd_rs6000_arch,
309 &bfd_sh_arch,
310 &bfd_sparc_arch,
311 &bfd_tic30_arch,
81635ce4 312 &bfd_tic54x_arch,
252b5132
RH
313 &bfd_tic80_arch,
314 &bfd_vax_arch,
315 &bfd_we32k_arch,
316 &bfd_z8k_arch,
317 &bfd_ns32k_arch,
318 &bfd_w65_arch,
319 &bfd_v850_arch,
320 &bfd_fr30_arch,
adde6300
AM
321 &bfd_mcore_arch,
322 &bfd_avr_arch,
252b5132
RH
323#endif
324 0
325};
326
327/*
328FUNCTION
329 bfd_printable_name
330
331SYNOPSIS
332 const char *bfd_printable_name(bfd *abfd);
333
334DESCRIPTION
335 Return a printable string representing the architecture and machine
336 from the pointer to the architecture info structure.
337
338*/
339
340const char *
341bfd_printable_name (abfd)
342 bfd *abfd;
343{
344 return abfd->arch_info->printable_name;
345}
346
347
348
349/*
350FUNCTION
351 bfd_scan_arch
352
353SYNOPSIS
354 const bfd_arch_info_type *bfd_scan_arch(const char *string);
355
356DESCRIPTION
357 Figure out if BFD supports any cpu which could be described with
358 the name @var{string}. Return a pointer to an <<arch_info>>
359 structure if a machine is found, otherwise NULL.
360
361*/
362
363const bfd_arch_info_type *
364bfd_scan_arch (string)
365 const char *string;
366{
367 const bfd_arch_info_type * const *app, *ap;
368
369 /* Look through all the installed architectures */
370 for (app = bfd_archures_list; *app != NULL; app++)
371 {
372 for (ap = *app; ap != NULL; ap = ap->next)
373 {
374 if (ap->scan (ap, string))
375 return ap;
376 }
377 }
378
379 return NULL;
380}
381
382
383
384/*
385FUNCTION
386 bfd_arch_list
387
388SYNOPSIS
389 const char **bfd_arch_list(void);
390
391DESCRIPTION
392 Return a freshly malloced NULL-terminated vector of the names
393 of all the valid BFD architectures. Do not modify the names.
394
395*/
396
397const char **
398bfd_arch_list ()
399{
400 int vec_length = 0;
401 const char **name_ptr;
402 const char **name_list;
403 const bfd_arch_info_type * const *app;
404
405 /* Determine the number of architectures */
406 vec_length = 0;
407 for (app = bfd_archures_list; *app != NULL; app++)
408 {
409 const bfd_arch_info_type *ap;
410 for (ap = *app; ap != NULL; ap = ap->next)
411 {
412 vec_length++;
413 }
414 }
415
416 name_list = (CONST char **)
417 bfd_malloc ((vec_length + 1) * sizeof (char **));
418 if (name_list == NULL)
419 return NULL;
420
421 /* Point the list at each of the names */
422 name_ptr = name_list;
423 for (app = bfd_archures_list; *app != NULL; app++)
424 {
425 const bfd_arch_info_type *ap;
426 for (ap = *app; ap != NULL; ap = ap->next)
427 {
428 *name_ptr = ap->printable_name;
429 name_ptr++;
430 }
431 }
432 *name_ptr = NULL;
433
434 return name_list;
435}
436
437
438
439/*
440FUNCTION
441 bfd_arch_get_compatible
442
443SYNOPSIS
444 const bfd_arch_info_type *bfd_arch_get_compatible(
445 const bfd *abfd,
446 const bfd *bbfd);
447
448DESCRIPTION
449 Determine whether two BFDs'
450 architectures and machine types are compatible. Calculates
451 the lowest common denominator between the two architectures
452 and machine types implied by the BFDs and returns a pointer to
453 an <<arch_info>> structure describing the compatible machine.
454*/
455
456const bfd_arch_info_type *
457bfd_arch_get_compatible (abfd, bbfd)
458 const bfd *abfd;
459 const bfd *bbfd;
460{
461 /* If either architecture is unknown, then all we can do is assume
462 the user knows what he's doing. */
463 if (abfd->arch_info->arch == bfd_arch_unknown)
464 return bbfd->arch_info;
465 if (bbfd->arch_info->arch == bfd_arch_unknown)
466 return abfd->arch_info;
467
468 /* Otherwise architecture-specific code has to decide. */
469 return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
470}
471
472
473/*
474INTERNAL_DEFINITION
475 bfd_default_arch_struct
476
477DESCRIPTION
478 The <<bfd_default_arch_struct>> is an item of
479 <<bfd_arch_info_type>> which has been initialized to a fairly
480 generic state. A BFD starts life by pointing to this
481 structure, until the correct back end has determined the real
482 architecture of the file.
483
484.extern const bfd_arch_info_type bfd_default_arch_struct;
485
486*/
487
488const bfd_arch_info_type bfd_default_arch_struct =
489{
490 32,32,8,bfd_arch_unknown,0,"unknown","unknown",2,true,
491 bfd_default_compatible,
492 bfd_default_scan,
493 0,
494};
495
496/*
497FUNCTION
498 bfd_set_arch_info
499
500SYNOPSIS
501 void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg);
502
503DESCRIPTION
504 Set the architecture info of @var{abfd} to @var{arg}.
505*/
506
507void
508bfd_set_arch_info (abfd, arg)
509 bfd *abfd;
510 const bfd_arch_info_type *arg;
511{
512 abfd->arch_info = arg;
513}
514
515/*
516INTERNAL_FUNCTION
517 bfd_default_set_arch_mach
518
519SYNOPSIS
520 boolean bfd_default_set_arch_mach(bfd *abfd,
521 enum bfd_architecture arch,
522 unsigned long mach);
523
524DESCRIPTION
525 Set the architecture and machine type in BFD @var{abfd}
526 to @var{arch} and @var{mach}. Find the correct
527 pointer to a structure and insert it into the <<arch_info>>
528 pointer.
529*/
530
531boolean
532bfd_default_set_arch_mach (abfd, arch, mach)
533 bfd *abfd;
534 enum bfd_architecture arch;
535 unsigned long mach;
536{
537 const bfd_arch_info_type * const *app, *ap;
538
539 for (app = bfd_archures_list; *app != NULL; app++)
540 {
541 for (ap = *app; ap != NULL; ap = ap->next)
542 {
543 if (ap->arch == arch
544 && (ap->mach == mach
545 || (mach == 0 && ap->the_default)))
546 {
547 abfd->arch_info = ap;
548 return true;
549 }
550 }
551 }
552
553 abfd->arch_info = &bfd_default_arch_struct;
554 bfd_set_error (bfd_error_bad_value);
555 return false;
556}
557
558
559/*
560FUNCTION
561 bfd_get_arch
562
563SYNOPSIS
564 enum bfd_architecture bfd_get_arch(bfd *abfd);
565
566DESCRIPTION
567 Return the enumerated type which describes the BFD @var{abfd}'s
568 architecture.
569
570*/
571
572enum bfd_architecture
573bfd_get_arch (abfd)
574 bfd *abfd;
575{
576 return abfd->arch_info->arch;
577}
578
579/*
580FUNCTION
581 bfd_get_mach
582
583SYNOPSIS
584 unsigned long bfd_get_mach(bfd *abfd);
585
586DESCRIPTION
587 Return the long type which describes the BFD @var{abfd}'s
588 machine.
589*/
590
591unsigned long
592bfd_get_mach (abfd)
593 bfd *abfd;
594{
595 return abfd->arch_info->mach;
596}
597
598/*
599FUNCTION
600 bfd_arch_bits_per_byte
601
602SYNOPSIS
603 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
604
605DESCRIPTION
606 Return the number of bits in one of the BFD @var{abfd}'s
607 architecture's bytes.
608
609*/
610
611unsigned int
612bfd_arch_bits_per_byte (abfd)
613 bfd *abfd;
614{
615 return abfd->arch_info->bits_per_byte;
616}
617
618/*
619FUNCTION
620 bfd_arch_bits_per_address
621
622SYNOPSIS
623 unsigned int bfd_arch_bits_per_address(bfd *abfd);
624
625DESCRIPTION
626 Return the number of bits in one of the BFD @var{abfd}'s
627 architecture's addresses.
628*/
629
630unsigned int
631bfd_arch_bits_per_address (abfd)
632 bfd *abfd;
633{
634 return abfd->arch_info->bits_per_address;
635}
636
637
638/*
639INTERNAL_FUNCTION
640 bfd_default_compatible
641
642SYNOPSIS
643 const bfd_arch_info_type *bfd_default_compatible
644 (const bfd_arch_info_type *a,
645 const bfd_arch_info_type *b);
646
647DESCRIPTION
648 The default function for testing for compatibility.
649*/
650
651const bfd_arch_info_type *
652bfd_default_compatible (a,b)
653 const bfd_arch_info_type *a;
654 const bfd_arch_info_type *b;
655{
656 if (a->arch != b->arch)
657 return NULL;
658
659 if (a->mach > b->mach)
660 return a;
661
662 if (b->mach > a->mach)
663 return b;
664
665 return a;
666}
667
668
669/*
670INTERNAL_FUNCTION
671 bfd_default_scan
672
673SYNOPSIS
674 boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string);
675
676DESCRIPTION
677 The default function for working out whether this is an
678 architecture hit and a machine hit.
679*/
680
681boolean
682bfd_default_scan (info, string)
683 const struct bfd_arch_info *info;
684 const char *string;
685{
686 const char *ptr_src;
687 const char *ptr_tst;
688 unsigned long number;
689 enum bfd_architecture arch;
690 const char *printable_name_colon;
691
692 /* Exact match of the architecture name (ARCH_NAME) and also the
693 default architecture? */
694 if (strcasecmp (string, info->arch_name) == 0
695 && info->the_default)
696 return true;
697
698 /* Exact match of the machine name (PRINTABLE_NAME)? */
699 if (strcasecmp (string, info->printable_name) == 0)
700 return true;
701
702 /* Given that printable_name contains no colon, attempt to match:
703 ARCH_NAME [ ":" ] PRINTABLE_NAME? */
704 printable_name_colon = strchr (info->printable_name, ':');
705 if (printable_name_colon == NULL)
706 {
707 int strlen_arch_name = strlen (info->arch_name);
708 if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
709 {
710 if (string[strlen_arch_name] == ':')
711 {
712 if (strcasecmp (string + strlen_arch_name + 1,
713 info->printable_name) == 0)
714 return true;
715 }
716 else
717 {
718 if (strcasecmp (string + strlen_arch_name,
719 info->printable_name) == 0)
720 return true;
721 }
722 }
723 }
724
725 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
726 Attempt to match: <arch> <mach>? */
727 if (printable_name_colon != NULL)
728 {
729 int colon_index = printable_name_colon - info->printable_name;
730 if (strncasecmp (string, info->printable_name, colon_index) == 0
731 && strcasecmp (string + colon_index,
732 info->printable_name + colon_index + 1) == 0)
733 return true;
734 }
735
736 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
737 attempt to match just <mach>, it could be ambigious. This test
738 is left until later. */
739
740 /* NOTE: The below is retained for compatibility only. Please do not
741 add to this code */
742
743 /* See how much of the supplied string matches with the
744 architecture, eg the string m68k:68020 would match the 68k entry
745 up to the :, then we get left with the machine number */
746
747 for (ptr_src = string, ptr_tst = info->arch_name;
748 *ptr_src && *ptr_tst;
749 ptr_src++, ptr_tst++)
750 {
751 if (*ptr_src != *ptr_tst) break;
752 }
753
754 /* Chewed up as much of the architecture as will match, skip any
755 colons */
756 if (*ptr_src == ':')
757 ptr_src++;
758
759 if (*ptr_src == 0)
760 {
761 /* nothing more, then only keep this one if it is the default
762 machine for this architecture */
763 return info->the_default;
764 }
765
766 number = 0;
767 while (isdigit ((unsigned char) *ptr_src))
768 {
769 number = number * 10 + *ptr_src - '0';
770 ptr_src++;
771 }
772
773 /* NOTE: The below is retained for compatibility only.
774 PLEASE DO NOT ADD TO THIS CODE. */
775
776 switch (number)
777 {
778 /* FIXME: These are needed to parse IEEE objects. */
779 case 68000:
780 arch = bfd_arch_m68k;
781 number = bfd_mach_m68000;
782 break;
783 case 68010:
784 arch = bfd_arch_m68k;
785 number = bfd_mach_m68010;
786 break;
787 case 68020:
788 arch = bfd_arch_m68k;
789 number = bfd_mach_m68020;
790 break;
791 case 68030:
792 arch = bfd_arch_m68k;
793 number = bfd_mach_m68030;
794 break;
795 case 68040:
796 arch = bfd_arch_m68k;
797 number = bfd_mach_m68040;
798 break;
799 case 68060:
800 arch = bfd_arch_m68k;
801 number = bfd_mach_m68060;
802 break;
803 case 68332:
804 arch = bfd_arch_m68k;
805 number = bfd_mach_cpu32;
806 break;
807
808 case 32000:
809 arch = bfd_arch_we32k;
810 break;
811
812 case 3000:
813 arch = bfd_arch_mips;
814 number = bfd_mach_mips3000;
815 break;
816
817 case 4000:
818 arch = bfd_arch_mips;
819 number = bfd_mach_mips4000;
820 break;
821
822 case 6000:
823 arch = bfd_arch_rs6000;
824 break;
825
d4845d57
JR
826 case 7410:
827 arch = bfd_arch_sh;
828 number = bfd_mach_sh_dsp;
829 break;
830
831 case 7708:
832 arch = bfd_arch_sh;
833 number = bfd_mach_sh3;
834 break;
835
836 case 7729:
837 arch = bfd_arch_sh;
838 number = bfd_mach_sh3_dsp;
839 break;
840
841 case 7750:
842 arch = bfd_arch_sh;
843 number = bfd_mach_sh4;
844 break;
845
252b5132
RH
846 default:
847 return false;
848 }
849
850 if (arch != info->arch)
851 return false;
852
853 if (number != info->mach)
854 return false;
855
856 return true;
857}
858
859
860/*
861FUNCTION
862 bfd_get_arch_info
863
864SYNOPSIS
865 const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd);
866
867DESCRIPTION
868 Return the architecture info struct in @var{abfd}.
869*/
870
871const bfd_arch_info_type *
872bfd_get_arch_info (abfd)
873 bfd *abfd;
874{
875 return abfd->arch_info;
876}
877
878
879/*
880FUNCTION
881 bfd_lookup_arch
882
883SYNOPSIS
884 const bfd_arch_info_type *bfd_lookup_arch
885 (enum bfd_architecture
886 arch,
887 unsigned long machine);
888
889DESCRIPTION
890 Look for the architecure info structure which matches the
891 arguments @var{arch} and @var{machine}. A machine of 0 matches the
892 machine/architecture structure which marks itself as the
893 default.
894*/
895
896const bfd_arch_info_type *
897bfd_lookup_arch (arch, machine)
898 enum bfd_architecture arch;
899 unsigned long machine;
900{
901 const bfd_arch_info_type * const *app, *ap;
902
903 for (app = bfd_archures_list; *app != NULL; app++)
904 {
905 for (ap = *app; ap != NULL; ap = ap->next)
906 {
907 if (ap->arch == arch
908 && (ap->mach == machine
909 || (machine == 0 && ap->the_default)))
910 return ap;
911 }
912 }
913
914 return NULL;
915}
916
917
918/*
919FUNCTION
920 bfd_printable_arch_mach
921
922SYNOPSIS
923 const char *bfd_printable_arch_mach
924 (enum bfd_architecture arch, unsigned long machine);
925
926DESCRIPTION
927 Return a printable string representing the architecture and
928 machine type.
929
930 This routine is depreciated.
931*/
932
933const char *
934bfd_printable_arch_mach (arch, machine)
935 enum bfd_architecture arch;
936 unsigned long machine;
937{
9a968f43 938 const bfd_arch_info_type * ap = bfd_lookup_arch (arch, machine);
252b5132
RH
939
940 if (ap)
941 return ap->printable_name;
942 return "UNKNOWN!";
943}
9a968f43
NC
944
945/*
946FUNCTION
947 bfd_octets_per_byte
948
949SYNOPSIS
f6af82bd 950 unsigned int bfd_octets_per_byte(bfd *abfd);
9a968f43
NC
951
952DESCRIPTION
953 Return the number of octets (8-bit quantities) per target byte
954 (minimum addressable unit). In most cases, this will be one, but some
955 DSP targets have 16, 32, or even 48 bits per byte.
956
957*/
958
f6af82bd 959unsigned int
9a968f43
NC
960bfd_octets_per_byte (abfd)
961 bfd * abfd;
962{
963 return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
964 bfd_get_mach (abfd));
965}
966
967/*
968FUNCTION
969 bfd_arch_mach_octets_per_byte
970
971SYNOPSIS
f6af82bd
AM
972 unsigned int bfd_arch_mach_octets_per_byte(enum bfd_architecture arch,
973 unsigned long machine);
9a968f43
NC
974
975DESCRIPTION
976 See bfd_octets_per_byte.
977
978 This routine is provided for those cases where a bfd * is not
979 available
980*/
981
f6af82bd 982unsigned int
9a968f43
NC
983bfd_arch_mach_octets_per_byte (arch, mach)
984 enum bfd_architecture arch;
985 unsigned long mach;
986{
987 const bfd_arch_info_type * ap = bfd_lookup_arch (arch, mach);
988
989 if (ap)
990 return ap->bits_per_byte / 8;
991 return 1;
992}
This page took 0.076747 seconds and 4 git commands to generate.