Commit | Line | Data |
---|---|---|
252b5132 | 1 | /* BFD library support routines for the i960 architecture. |
7898deda NC |
2 | Copyright 1990, 1991, 1993, 1994, 1996, 1999, 2000 |
3 | Free Software Foundation, Inc. | |
252b5132 RH |
4 | Hacked by Steve Chamberlain of Cygnus Support. |
5 | ||
6 | This file is part of BFD, the Binary File Descriptor library. | |
7 | ||
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. | |
12 | ||
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. | |
17 | ||
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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
21 | ||
252b5132 RH |
22 | #include "bfd.h" |
23 | #include "sysdep.h" | |
24 | #include "libbfd.h" | |
25 | ||
252b5132 RH |
26 | /* This routine is provided a string, and tries to work out if it |
27 | could possibly refer to the i960 machine pointed at in the | |
28 | info_struct pointer */ | |
29 | ||
30 | static boolean | |
31 | scan_960_mach (ap, string) | |
32 | const bfd_arch_info_type *ap; | |
33 | const char *string; | |
34 | { | |
35 | unsigned long machine; | |
96f6d4c4 | 36 | int fail_because_not_80960 = false; |
71f6b586 | 37 | |
96f6d4c4 | 38 | /* Look for the string i960 at the front of the string. */ |
6cbac8b9 | 39 | if (strncasecmp ("i960", string, 4) == 0) |
96f6d4c4 NC |
40 | { |
41 | string += 4; | |
42 | ||
43 | /* i960 on it's own means core to us. */ | |
44 | if (* string == 0) | |
45 | return ap->mach == bfd_mach_i960_core; | |
71f6b586 | 46 | |
96f6d4c4 NC |
47 | /* "i960:*" is valid, anything else is not. */ |
48 | if (* string != ':') | |
49 | return false; | |
50 | ||
51 | string ++; | |
52 | } | |
53 | /* In some bfds the cpu-id is written as "80960KA", "80960KB", | |
54 | "80960CA" or "80960MC". */ | |
55 | else if (strncmp ("80960", string, 5) == 0) | |
56 | { | |
57 | string += 5; | |
58 | ||
59 | /* Sett his to true here. If a correct matching postfix | |
60 | is detected below it will be reset to false. */ | |
61 | fail_because_not_80960 = true; | |
62 | } | |
63 | /* No match, can't be us. */ | |
64 | else | |
252b5132 | 65 | return false; |
71f6b586 | 66 | |
96f6d4c4 | 67 | if (* string == '\0') |
252b5132 | 68 | return false; |
71f6b586 | 69 | |
252b5132 RH |
70 | if (string[0] == 'c' && string[1] == 'o' && string[2] == 'r' && |
71 | string[3] == 'e' && string[4] == '\0') | |
72 | machine = bfd_mach_i960_core; | |
6cbac8b9 | 73 | else if (strcasecmp (string, "ka_sa") == 0) |
252b5132 | 74 | machine = bfd_mach_i960_ka_sa; |
6cbac8b9 | 75 | else if (strcasecmp (string, "kb_sb") == 0) |
252b5132 | 76 | machine = bfd_mach_i960_kb_sb; |
96f6d4c4 | 77 | else if (string[1] == '\0' || string[2] != '\0') /* rest are 2-char. */ |
252b5132 RH |
78 | return false; |
79 | else if (string[0] == 'k' && string[1] == 'b') | |
96f6d4c4 | 80 | { machine = bfd_mach_i960_kb_sb; fail_because_not_80960 = false; } |
252b5132 RH |
81 | else if (string[0] == 's' && string[1] == 'b') |
82 | machine = bfd_mach_i960_kb_sb; | |
83 | else if (string[0] == 'm' && string[1] == 'c') | |
96f6d4c4 | 84 | { machine = bfd_mach_i960_mc; fail_because_not_80960 = false; } |
252b5132 RH |
85 | else if (string[0] == 'x' && string[1] == 'a') |
86 | machine = bfd_mach_i960_xa; | |
87 | else if (string[0] == 'c' && string[1] == 'a') | |
96f6d4c4 | 88 | { machine = bfd_mach_i960_ca; fail_because_not_80960 = false; } |
252b5132 | 89 | else if (string[0] == 'k' && string[1] == 'a') |
96f6d4c4 | 90 | { machine = bfd_mach_i960_ka_sa; fail_because_not_80960 = false; } |
252b5132 RH |
91 | else if (string[0] == 's' && string[1] == 'a') |
92 | machine = bfd_mach_i960_ka_sa; | |
93 | else if (string[0] == 'j' && string[1] == 'x') | |
94 | machine = bfd_mach_i960_jx; | |
95 | else if (string[0] == 'h' && string[1] == 'x') | |
96 | machine = bfd_mach_i960_hx; | |
97 | else | |
98 | return false; | |
96f6d4c4 NC |
99 | |
100 | if (fail_because_not_80960) | |
101 | return false; | |
71f6b586 | 102 | |
96f6d4c4 NC |
103 | if (machine == ap->mach) |
104 | return true; | |
71f6b586 | 105 | |
252b5132 RH |
106 | return false; |
107 | } | |
108 | ||
252b5132 RH |
109 | /* This routine is provided two arch_infos and works out the i960 |
110 | machine which would be compatible with both and returns a pointer | |
111 | to its info structure */ | |
112 | ||
113 | static const bfd_arch_info_type * | |
114 | compatible (a,b) | |
115 | const bfd_arch_info_type *a; | |
116 | const bfd_arch_info_type *b; | |
117 | { | |
118 | ||
119 | /* The i960 has distinct subspecies which may not interbreed: | |
71f6b586 | 120 | CORE CA |
252b5132 RH |
121 | CORE KA KB MC XA |
122 | CORE HX JX | |
123 | Any architecture on the same line is compatible, the one on | |
71f6b586 KH |
124 | the right is the least restrictive. |
125 | ||
252b5132 RH |
126 | We represent this information in an array, each machine to a side */ |
127 | ||
128 | #define ERROR 0 | |
71f6b586 KH |
129 | #define CORE bfd_mach_i960_core /*1*/ |
130 | #define KA bfd_mach_i960_ka_sa /*2*/ | |
252b5132 RH |
131 | #define KB bfd_mach_i960_kb_sb /*3*/ |
132 | #define MC bfd_mach_i960_mc /*4*/ | |
133 | #define XA bfd_mach_i960_xa /*5*/ | |
134 | #define CA bfd_mach_i960_ca /*6*/ | |
135 | #define JX bfd_mach_i960_jx /*7*/ | |
136 | #define HX bfd_mach_i960_hx /*8*/ | |
137 | #define MAX_ARCH ((int)HX) | |
138 | ||
71f6b586 | 139 | static CONST unsigned long matrix[MAX_ARCH+1][MAX_ARCH+1] = |
252b5132 RH |
140 | { |
141 | { ERROR, CORE, KA, KB, MC, XA, CA, JX, HX }, | |
142 | { CORE, CORE, KA, KB, MC, XA, CA, JX, HX }, | |
143 | { KA, KA, KA, KB, MC, XA, ERROR, ERROR, ERROR}, | |
144 | { KB, KB, KB, KB, MC, XA, ERROR, ERROR, ERROR}, | |
145 | { MC, MC, MC, MC, MC, XA, ERROR, ERROR, ERROR}, | |
146 | { XA, XA, XA, XA, XA, XA, ERROR, ERROR, ERROR}, | |
147 | { CA, CA, ERROR, ERROR, ERROR, ERROR, CA, ERROR, ERROR}, | |
148 | { JX, JX, ERROR, ERROR, ERROR, ERROR, ERROR, JX, HX }, | |
149 | { HX, HX, ERROR, ERROR, ERROR, ERROR, ERROR, HX, HX }, | |
150 | }; | |
151 | ||
71f6b586 | 152 | if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR) |
252b5132 RH |
153 | { |
154 | return NULL; | |
155 | } | |
71f6b586 | 156 | else |
252b5132 RH |
157 | { |
158 | return (a->mach == matrix[a->mach][b->mach]) ? a : b; | |
159 | } | |
160 | } | |
161 | ||
252b5132 RH |
162 | int bfd_default_scan_num_mach(); |
163 | #define N(a,b,d,n) \ | |
164 | { 32, 32, 8,bfd_arch_i960,a,"i960",b,3,d,compatible,scan_960_mach,n,} | |
165 | ||
71f6b586 KH |
166 | static const bfd_arch_info_type arch_info_struct[] = |
167 | { | |
252b5132 RH |
168 | N(bfd_mach_i960_ka_sa,"i960:ka_sa",false, &arch_info_struct[1]), |
169 | N(bfd_mach_i960_kb_sb,"i960:kb_sb",false, &arch_info_struct[2]), | |
170 | N(bfd_mach_i960_mc, "i960:mc", false, &arch_info_struct[3]), | |
171 | N(bfd_mach_i960_xa, "i960:xa", false, &arch_info_struct[4]), | |
172 | N(bfd_mach_i960_ca, "i960:ca", false, &arch_info_struct[5]), | |
173 | N(bfd_mach_i960_jx, "i960:jx", false, &arch_info_struct[6]), | |
174 | N(bfd_mach_i960_hx, "i960:hx", false, 0), | |
175 | }; | |
176 | ||
177 | const bfd_arch_info_type bfd_i960_arch = | |
178 | N(bfd_mach_i960_core, "i960:core", true, &arch_info_struct[0]); |