1 /* BFD library support routines for the i960 architecture. 2 Copyright (C) 1990, 91, 92, 93, 94, 95, 1996 Free Software Foundation, Inc. 3 Hacked by Steve Chamberlain of Cygnus Support. 4 5 This file is part of BFD, the Binary File Descriptor library. 6 7 This program is free software; you can redistribute it and/or modify 8 it under the terms of the GNU General Public License as published by 9 the Free Software Foundation; either version 2 of the License, or 10 (at your option) any later version. 11 12 This program is distributed in the hope that it will be useful, 13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 GNU General Public License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with this program; if not, write to the Free Software 19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ 20 21 22 #include "bfd.h" 23 #include "sysdep.h" 24 #include "libbfd.h" 25 26 27 /* This routine is provided a string, and tries to work out if it 28 could possibly refer to the i960 machine pointed at in the 29 info_struct pointer */ 30 31 static boolean 32 scan_960_mach (ap, string) 33 const bfd_arch_info_type *ap; 34 const char *string; 35 { 36 unsigned long machine; 37 38 /* Look for the string i960, or somesuch at the front of the string */ 39 40 if (strncmp("i960",string,4) == 0) { 41 string+=4; 42 } 43 else { 44 /* no match, can be us */ 45 return false; 46 } 47 if (string[0] == 0) { 48 /* i960 on it's own means core to us*/ 49 if (ap->mach == bfd_mach_i960_core) return true; 50 return false; 51 } 52 53 if (string[0] != ':') { 54 return false; 55 } 56 string++; 57 if (string[0] == '\0') 58 return false; 59 if (string[0] == 'c' && string[1] == 'o' && string[2] == 'r' && 60 string[3] == 'e' && string[4] == '\0') 61 machine = bfd_mach_i960_core; 62 else if (strcmp (string, "ka_sa") == 0) 63 machine = bfd_mach_i960_ka_sa; 64 else if (strcmp (string, "kb_sb") == 0) 65 machine = bfd_mach_i960_kb_sb; 66 else if (string[1] == '\0' || string[2] != '\0') /* rest are 2-char */ 67 return false; 68 else if (string[0] == 'k' && string[1] == 'b') 69 machine = bfd_mach_i960_kb_sb; 70 else if (string[0] == 's' && string[1] == 'b') 71 machine = bfd_mach_i960_kb_sb; 72 else if (string[0] == 'm' && string[1] == 'c') 73 machine = bfd_mach_i960_mc; 74 else if (string[0] == 'x' && string[1] == 'a') 75 machine = bfd_mach_i960_xa; 76 else if (string[0] == 'c' && string[1] == 'a') 77 machine = bfd_mach_i960_ca; 78 else if (string[0] == 'k' && string[1] == 'a') 79 machine = bfd_mach_i960_ka_sa; 80 else if (string[0] == 's' && string[1] == 'a') 81 machine = bfd_mach_i960_ka_sa; 82 else if (string[0] == 'j' && string[1] == 'x') 83 machine = bfd_mach_i960_jx; 84 else if (string[0] == 'h' && string[1] == 'x') 85 machine = bfd_mach_i960_hx; 86 else 87 return false; 88 if (machine == ap->mach) return true; 89 return false; 90 } 91 92 93 94 /* This routine is provided two arch_infos and works out the i960 95 machine which would be compatible with both and returns a pointer 96 to its info structure */ 97 98 static const bfd_arch_info_type * 99 compatible (a,b) 100 const bfd_arch_info_type *a; 101 const bfd_arch_info_type *b; 102 { 103 104 /* The i960 has distinct subspecies which may not interbreed: 105 CORE CA 106 CORE KA KB MC XA 107 CORE HX JX 108 Any architecture on the same line is compatible, the one on 109 the right is the least restrictive. 110 111 We represent this information in an array, each machine to a side */ 112 113 #define ERROR 0 114 #define CORE bfd_mach_i960_core /*1*/ 115 #define KA bfd_mach_i960_ka_sa /*2*/ 116 #define KB bfd_mach_i960_kb_sb /*3*/ 117 #define MC bfd_mach_i960_mc /*4*/ 118 #define XA bfd_mach_i960_xa /*5*/ 119 #define CA bfd_mach_i960_ca /*6*/ 120 #define JX bfd_mach_i960_jx /*7*/ 121 #define HX bfd_mach_i960_hx /*8*/ 122 #define MAX_ARCH ((int)HX) 123 124 static CONST unsigned long matrix[MAX_ARCH+1][MAX_ARCH+1] = 125 { 126 { ERROR, CORE, KA, KB, MC, XA, CA, JX, HX }, 127 { CORE, CORE, KA, KB, MC, XA, CA, JX, HX }, 128 { KA, KA, KA, KB, MC, XA, ERROR, ERROR, ERROR}, 129 { KB, KB, KB, KB, MC, XA, ERROR, ERROR, ERROR}, 130 { MC, MC, MC, MC, MC, XA, ERROR, ERROR, ERROR}, 131 { XA, XA, XA, XA, XA, XA, ERROR, ERROR, ERROR}, 132 { CA, CA, ERROR, ERROR, ERROR, ERROR, CA, ERROR, ERROR}, 133 { JX, JX, ERROR, ERROR, ERROR, ERROR, ERROR, JX, HX }, 134 { HX, HX, ERROR, ERROR, ERROR, ERROR, ERROR, HX, HX }, 135 }; 136 137 138 if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR) 139 { 140 return NULL; 141 } 142 else 143 { 144 return (a->mach == matrix[a->mach][b->mach]) ? a : b; 145 } 146 } 147 148 149 150 int bfd_default_scan_num_mach(); 151 #define N(a,b,d,n) \ 152 { 32, 32, 8,bfd_arch_i960,a,"i960",b,3,d,compatible,scan_960_mach,n,} 153 154 static const bfd_arch_info_type arch_info_struct[] = 155 { 156 N(bfd_mach_i960_ka_sa,"i960:ka_sa",false, &arch_info_struct[1]), 157 N(bfd_mach_i960_kb_sb,"i960:kb_sb",false, &arch_info_struct[2]), 158 N(bfd_mach_i960_mc, "i960:mc", false, &arch_info_struct[3]), 159 N(bfd_mach_i960_xa, "i960:xa", false, &arch_info_struct[4]), 160 N(bfd_mach_i960_ca, "i960:ca", false, &arch_info_struct[5]), 161 N(bfd_mach_i960_jx, "i960:jx", false, &arch_info_struct[6]), 162 N(bfd_mach_i960_hx, "i960:hx", false, 0), 163 }; 164 165 const bfd_arch_info_type bfd_i960_arch = 166 N(bfd_mach_i960_core, "i960:core", true, &arch_info_struct[0]); 167