1 /* BFD library support routines for the i960 architecture.
2 Copyright 1990, 1991, 1993, 1994, 1996, 1999, 2000, 2001, 2002, 2006
3 Free Software Foundation, Inc.
4 Hacked by Steve Chamberlain of Cygnus Support.
6 This file is part of BFD, the Binary File Descriptor library.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
26 static bfd_boolean scan_960_mach
27 PARAMS ((const bfd_arch_info_type *, const char *));
28 static const bfd_arch_info_type *compatible
29 PARAMS ((const bfd_arch_info_type *, const bfd_arch_info_type *));
31 /* This routine is provided a string, and tries to work out if it
32 could possibly refer to the i960 machine pointed at in the
33 info_struct pointer */
36 scan_960_mach (ap, string)
37 const bfd_arch_info_type *ap;
40 unsigned long machine;
41 int fail_because_not_80960 = FALSE;
43 /* Look for the string i960 at the front of the string. */
44 if (strncasecmp ("i960", string, 4) == 0)
48 /* i960 on it's own means core to us. */
50 return ap->mach == bfd_mach_i960_core;
52 /* "i960:*" is valid, anything else is not. */
58 /* In some bfds the cpu-id is written as "80960KA", "80960KB",
59 "80960CA" or "80960MC". */
60 else if (CONST_STRNEQ (string, "80960"))
64 /* Set this to TRUE here. If a correct matching postfix
65 is detected below it will be reset to FALSE. */
66 fail_because_not_80960 = TRUE;
68 /* No match, can't be us. */
75 if (string[0] == 'c' && string[1] == 'o' && string[2] == 'r' &&
76 string[3] == 'e' && string[4] == '\0')
77 machine = bfd_mach_i960_core;
78 else if (strcasecmp (string, "ka_sa") == 0)
79 machine = bfd_mach_i960_ka_sa;
80 else if (strcasecmp (string, "kb_sb") == 0)
81 machine = bfd_mach_i960_kb_sb;
82 else if (string[1] == '\0' || string[2] != '\0') /* rest are 2-char. */
84 else if (string[0] == 'k' && string[1] == 'b')
85 { machine = bfd_mach_i960_kb_sb; fail_because_not_80960 = FALSE; }
86 else if (string[0] == 's' && string[1] == 'b')
87 machine = bfd_mach_i960_kb_sb;
88 else if (string[0] == 'm' && string[1] == 'c')
89 { machine = bfd_mach_i960_mc; fail_because_not_80960 = FALSE; }
90 else if (string[0] == 'x' && string[1] == 'a')
91 machine = bfd_mach_i960_xa;
92 else if (string[0] == 'c' && string[1] == 'a')
93 { machine = bfd_mach_i960_ca; fail_because_not_80960 = FALSE; }
94 else if (string[0] == 'k' && string[1] == 'a')
95 { machine = bfd_mach_i960_ka_sa; fail_because_not_80960 = FALSE; }
96 else if (string[0] == 's' && string[1] == 'a')
97 machine = bfd_mach_i960_ka_sa;
98 else if (string[0] == 'j' && string[1] == 'x')
99 machine = bfd_mach_i960_jx;
100 else if (string[0] == 'h' && string[1] == 'x')
101 machine = bfd_mach_i960_hx;
105 if (fail_because_not_80960)
108 if (machine == ap->mach)
114 /* This routine is provided two arch_infos and works out the i960
115 machine which would be compatible with both and returns a pointer
116 to its info structure */
118 static const bfd_arch_info_type *
120 const bfd_arch_info_type *a;
121 const bfd_arch_info_type *b;
124 /* The i960 has distinct subspecies which may not interbreed:
128 Any architecture on the same line is compatible, the one on
129 the right is the least restrictive.
131 We represent this information in an array, each machine to a side */
134 #define CORE bfd_mach_i960_core /*1*/
135 #define KA bfd_mach_i960_ka_sa /*2*/
136 #define KB bfd_mach_i960_kb_sb /*3*/
137 #define MC bfd_mach_i960_mc /*4*/
138 #define XA bfd_mach_i960_xa /*5*/
139 #define CA bfd_mach_i960_ca /*6*/
140 #define JX bfd_mach_i960_jx /*7*/
141 #define HX bfd_mach_i960_hx /*8*/
142 #define MAX_ARCH ((int)HX)
144 static const unsigned long matrix[MAX_ARCH+1][MAX_ARCH+1] =
146 { ERROR, CORE, KA, KB, MC, XA, CA, JX, HX },
147 { CORE, CORE, KA, KB, MC, XA, CA, JX, HX },
148 { KA, KA, KA, KB, MC, XA, ERROR, ERROR, ERROR},
149 { KB, KB, KB, KB, MC, XA, ERROR, ERROR, ERROR},
150 { MC, MC, MC, MC, MC, XA, ERROR, ERROR, ERROR},
151 { XA, XA, XA, XA, XA, XA, ERROR, ERROR, ERROR},
152 { CA, CA, ERROR, ERROR, ERROR, ERROR, CA, ERROR, ERROR},
153 { JX, JX, ERROR, ERROR, ERROR, ERROR, ERROR, JX, HX },
154 { HX, HX, ERROR, ERROR, ERROR, ERROR, ERROR, HX, HX },
157 if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR)
163 return (a->mach == matrix[a->mach][b->mach]) ? a : b;
168 { 32, 32, 8,bfd_arch_i960,a,"i960",b,3,d,compatible,scan_960_mach,n,}
170 static const bfd_arch_info_type arch_info_struct[] =
172 N(bfd_mach_i960_ka_sa,"i960:ka_sa",FALSE, &arch_info_struct[1]),
173 N(bfd_mach_i960_kb_sb,"i960:kb_sb",FALSE, &arch_info_struct[2]),
174 N(bfd_mach_i960_mc, "i960:mc", FALSE, &arch_info_struct[3]),
175 N(bfd_mach_i960_xa, "i960:xa", FALSE, &arch_info_struct[4]),
176 N(bfd_mach_i960_ca, "i960:ca", FALSE, &arch_info_struct[5]),
177 N(bfd_mach_i960_jx, "i960:jx", FALSE, &arch_info_struct[6]),
178 N(bfd_mach_i960_hx, "i960:hx", FALSE, 0),
181 const bfd_arch_info_type bfd_i960_arch =
182 N(bfd_mach_i960_core, "i960:core", TRUE, &arch_info_struct[0]);