bfd/cpu-i960.c

   1 /* BFD library support routines for the i960 architecture.
   2    Copyright (C) 1990, 91, 92, 93, 94 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 (string[1] == '\0' || string[2] != '\0') /* rest are 2-char */
  63     return false;
  64   else if (string[0] == 'k' && string[1] == 'b')
  65     machine = bfd_mach_i960_kb_sb;
  66   else if (string[0] == 's' && string[1] == 'b')
  67     machine = bfd_mach_i960_kb_sb;
  68   else if (string[0] == 'm' && string[1] == 'c')
  69     machine = bfd_mach_i960_mc;
  70   else if (string[0] == 'x' && string[1] == 'a')
  71     machine = bfd_mach_i960_xa;
  72   else if (string[0] == 'c' && string[1] == 'a')
  73     machine = bfd_mach_i960_ca;
  74   else if (string[0] == 'k' && string[1] == 'a')
  75     machine = bfd_mach_i960_ka_sa;
  76   else if (string[0] == 's' && string[1] == 'a')
  77     machine = bfd_mach_i960_ka_sa;
  78   /* start-sanitize-i960xl */
  79   else if (string[0] == 'x' && string[1] == 'l')
  80     machine = bfd_mach_i960_xl;
  81   /* end-sanitize-i960xl */
  82   else
  83     return false;
  84   if (machine == ap->mach)   return true;
  85   return false;
  86 }
  87
  88
  89
  90 /* This routine is provided two arch_infos and works out the i960
  91    machine which would be compatible with both and returns a pointer
  92    to its info structure */
  93
  94 static CONST bfd_arch_info_type *
  95 compatible (a,b)
  96      CONST bfd_arch_info_type *a;
  97      CONST bfd_arch_info_type *b;
  98 {
  99
 100   /* The i960 has distinct subspecies which may not interbreed:
 101         CORE CA
 102         CORE KA KB MC XA
 103      start-sanitize-i960xl
 104         CORE XL
 105      end-sanitize-i960xl
 106      Any architecture on the same line is compatible, the one on
 107      the right is the least restrictive.
 108
 109      We represent this information in an array, each machine to a side */
 110
 111 #define ERROR   0
 112 #define CORE    bfd_mach_i960_core  /*1*/
 113 #define KA      bfd_mach_i960_ka_sa /*2*/
 114 #define KB      bfd_mach_i960_kb_sb /*3*/
 115 #define MC      bfd_mach_i960_mc    /*4*/
 116 #define XA      bfd_mach_i960_xa    /*5*/
 117 #define CA      bfd_mach_i960_ca    /*6*/
 118 #define MAX_ARCH ((int)CA)
 119
 120 /* start-sanitize-i960xl */
 121 #define XL      bfd_mach_i960_xl    /*7*/
 122 #undef MAX_ARCH
 123 #define MAX_ARCH ((int)XL)
 124 /* end-sanitize-i960xl */
 125
 126
 127   static CONST unsigned long matrix[MAX_ARCH+1][MAX_ARCH+1] =
 128     {
 129       { ERROR,  CORE,   KA,     KB,     MC,     XA,     CA },
 130       { CORE,   CORE,   KA,     KB,     MC,     XA,     CA },
 131       { KA,     KA,     KA,     KB,     MC,     XA,     ERROR },
 132       { KB,     KB,     KB,     KB,     MC,     XA,     ERROR },
 133       { MC,     MC,     MC,     MC,     MC,     XA,     ERROR },
 134       { XA,     XA,     XA,     XA,     XA,     XA,     ERROR },
 135       { CA,     CA,     ERROR,  ERROR,  ERROR,  ERROR,  CA },
 136       /* start-sanitize-i960xl */
 137       { XL,     ERROR,  ERROR,  ERROR,  ERROR,  ERROR,  ERROR,  XL },
 138       /* end-sanitize-i960xl */
 139     };
 140
 141
 142   if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR)
 143     {
 144     return NULL;
 145     }
 146   else
 147     {
 148     return (a->mach  ==  matrix[a->mach][b->mach]) ?  a : b;
 149     }
 150 }
 151
 152
 153
 154 int bfd_default_scan_num_mach();
 155 #define N(a,b,d) \
 156 { 32, 32, 8,bfd_arch_i960,a,"i960",b,3,d,compatible,scan_960_mach,0,}
 157
 158 static bfd_arch_info_type arch_info_struct[] =
 159 {
 160   N(bfd_mach_i960_core, "i960:core", true),
 161   N(bfd_mach_i960_ka_sa,"i960:ka_sa",false),
 162   N(bfd_mach_i960_kb_sb,"i960:kb_sb",false),
 163   N(bfd_mach_i960_mc,   "i960:mc",   false),
 164   N(bfd_mach_i960_xa,   "i960:xa",   false),
 165   N(bfd_mach_i960_ca,   "i960:ca",   false),
 166   /* start-sanitize-i960xl */
 167   N(bfd_mach_i960_xl,   "i960:xl",   false),
 168   /* end-sanitize-i960xl */
 169 };
 170
 171
 172 void
 173 bfd_i960_arch ()
 174 {
 175   unsigned int i;
 176   for (i = 0; i < sizeof(arch_info_struct)/sizeof (*arch_info_struct); i++)  {
 177     bfd_arch_linkin(arch_info_struct + i);
 178   }
 179 }