bfd/cpu-sh.c

   1 /* BFD library support routines for the Renesas / SuperH SH architecture.
   2    Copyright 1993, 1994, 1997, 1998, 2000, 2001, 2002, 2003, 2004
   3    Free Software Foundation, Inc.
   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
  22 #include "bfd.h"
  23 #include "sysdep.h"
  24 #include "libbfd.h"
  25 #include "../opcodes/sh-opc.h"
  26
  27 #define SH_NEXT      &arch_info_struct[0]
  28 #define SH2_NEXT     &arch_info_struct[1]
  29 #define SH2E_NEXT    &arch_info_struct[2]
  30 #define SH_DSP_NEXT  &arch_info_struct[3]
  31 #define SH3_NEXT     &arch_info_struct[4]
  32 #define SH3_NOMMU_NEXT &arch_info_struct[5]
  33 #define SH3_DSP_NEXT &arch_info_struct[6]
  34 #define SH3E_NEXT    &arch_info_struct[7]
  35 #define SH4_NEXT     &arch_info_struct[8]
  36 #define SH4A_NEXT    &arch_info_struct[9]
  37 #define SH4AL_DSP_NEXT &arch_info_struct[10]
  38 #define SH4_NOFPU_NEXT &arch_info_struct[11]
  39 #define SH4_NOMMU_NOFPU_NEXT &arch_info_struct[12]
  40 #define SH4A_NOFPU_NEXT &arch_info_struct[13]
  41 #define SH2A_NEXT       &arch_info_struct[14]
  42 #define SH2A_NOFPU_NEXT &arch_info_struct[15]
  43 #define SH64_NEXT    NULL
  44
  45 static const bfd_arch_info_type arch_info_struct[] =
  46 {
  47   {
  48     32,                         /* 32 bits in a word */
  49     32,                         /* 32 bits in an address */
  50     8,                          /* 8 bits in a byte */
  51     bfd_arch_sh,
  52     bfd_mach_sh2,
  53     "sh",                       /* arch_name  */
  54     "sh2",                      /* printable name */
  55     1,
  56     FALSE,                      /* not the default */
  57     bfd_default_compatible,
  58     bfd_default_scan,
  59     SH2_NEXT
  60   },
  61   {
  62     32,                         /* 32 bits in a word */
  63     32,                         /* 32 bits in an address */
  64     8,                          /* 8 bits in a byte */
  65     bfd_arch_sh,
  66     bfd_mach_sh2e,
  67     "sh",                       /* arch_name  */
  68     "sh2e",                     /* printable name */
  69     1,
  70     FALSE,                      /* not the default */
  71     bfd_default_compatible,
  72     bfd_default_scan,
  73     SH2E_NEXT
  74   },
  75   {
  76     32,                         /* 32 bits in a word */
  77     32,                         /* 32 bits in an address */
  78     8,                          /* 8 bits in a byte */
  79     bfd_arch_sh,
  80     bfd_mach_sh_dsp,
  81     "sh",                       /* arch_name  */
  82     "sh-dsp",                   /* printable name */
  83     1,
  84     FALSE,                      /* not the default */
  85     bfd_default_compatible,
  86     bfd_default_scan,
  87     SH_DSP_NEXT
  88   },
  89   {
  90     32,                         /* 32 bits in a word */
  91     32,                         /* 32 bits in an address */
  92     8,                          /* 8 bits in a byte */
  93     bfd_arch_sh,
  94     bfd_mach_sh3,
  95     "sh",                       /* arch_name  */
  96     "sh3",                      /* printable name */
  97     1,
  98     FALSE,                      /* not the default */
  99     bfd_default_compatible,
 100     bfd_default_scan,
 101     SH3_NEXT
 102   },
 103   {
 104     32,                         /* 32 bits in a word */
 105     32,                         /* 32 bits in an address */
 106     8,                          /* 8 bits in a byte */
 107     bfd_arch_sh,
 108     bfd_mach_sh3_nommu,
 109     "sh",                       /* arch_name  */
 110     "sh3-nommu",                /* printable name */
 111     1,
 112     FALSE,                      /* not the default */
 113     bfd_default_compatible,
 114     bfd_default_scan,
 115     SH3_NOMMU_NEXT
 116   },
 117   {
 118     32,                         /* 32 bits in a word */
 119     32,                         /* 32 bits in an address */
 120     8,                          /* 8 bits in a byte */
 121     bfd_arch_sh,
 122     bfd_mach_sh3_dsp,
 123     "sh",                       /* arch_name  */
 124     "sh3-dsp",                  /* printable name */
 125     1,
 126     FALSE,                      /* not the default */
 127     bfd_default_compatible,
 128     bfd_default_scan,
 129     SH3_DSP_NEXT
 130   },
 131   {
 132     32,                         /* 32 bits in a word */
 133     32,                         /* 32 bits in an address */
 134     8,                          /* 8 bits in a byte */
 135     bfd_arch_sh,
 136     bfd_mach_sh3e,
 137     "sh",                       /* arch_name  */
 138     "sh3e",                     /* printable name */
 139     1,
 140     FALSE,                      /* not the default */
 141     bfd_default_compatible,
 142     bfd_default_scan,
 143     SH3E_NEXT
 144   },
 145   {
 146     32,                         /* 32 bits in a word */
 147     32,                         /* 32 bits in an address */
 148     8,                          /* 8 bits in a byte */
 149     bfd_arch_sh,
 150     bfd_mach_sh4,
 151     "sh",                       /* arch_name  */
 152     "sh4",                      /* printable name */
 153     1,
 154     FALSE,                      /* not the default */
 155     bfd_default_compatible,
 156     bfd_default_scan,
 157     SH4_NEXT
 158   },
 159   {
 160     32,                         /* 32 bits in a word */
 161     32,                         /* 32 bits in an address */
 162     8,                          /* 8 bits in a byte */
 163     bfd_arch_sh,
 164     bfd_mach_sh4a,
 165     "sh",                       /* arch_name  */
 166     "sh4a",                     /* printable name */
 167     1,
 168     FALSE,                      /* not the default */
 169     bfd_default_compatible,
 170     bfd_default_scan,
 171     SH4A_NEXT
 172   },
 173   {
 174     32,                         /* 32 bits in a word */
 175     32,                         /* 32 bits in an address */
 176     8,                          /* 8 bits in a byte */
 177     bfd_arch_sh,
 178     bfd_mach_sh4al_dsp,
 179     "sh",                       /* arch_name  */
 180     "sh4al-dsp",                /* printable name */
 181     1,
 182     FALSE,                      /* not the default */
 183     bfd_default_compatible,
 184     bfd_default_scan,
 185     SH4AL_DSP_NEXT
 186   },
 187   {
 188     32,                         /* 32 bits in a word */
 189     32,                         /* 32 bits in an address */
 190     8,                          /* 8 bits in a byte */
 191     bfd_arch_sh,
 192     bfd_mach_sh4_nofpu,
 193     "sh",                       /* arch_name  */
 194     "sh4-nofpu",                /* printable name */
 195     1,
 196     FALSE,                      /* not the default */
 197     bfd_default_compatible,
 198     bfd_default_scan,
 199     SH4_NOFPU_NEXT
 200   },
 201   {
 202     32,                         /* 32 bits in a word */
 203     32,                         /* 32 bits in an address */
 204     8,                          /* 8 bits in a byte */
 205     bfd_arch_sh,
 206     bfd_mach_sh4_nommu_nofpu,
 207     "sh",                       /* arch_name  */
 208     "sh4-nommu-nofpu",          /* printable name */
 209     1,
 210     FALSE,                      /* not the default */
 211     bfd_default_compatible,
 212     bfd_default_scan,
 213     SH4_NOMMU_NOFPU_NEXT
 214   },
 215   {
 216     32,                         /* 32 bits in a word */
 217     32,                         /* 32 bits in an address */
 218     8,                          /* 8 bits in a byte */
 219     bfd_arch_sh,
 220     bfd_mach_sh4a_nofpu,
 221     "sh",                       /* arch_name  */
 222     "sh4a-nofpu",               /* printable name */
 223     1,
 224     FALSE,                      /* not the default */
 225     bfd_default_compatible,
 226     bfd_default_scan,
 227     SH4A_NOFPU_NEXT
 228   },
 229   {
 230     32,                         /* 32 bits in a word.  */
 231     32,                         /* 32 bits in an address.  */
 232     8,                          /* 8 bits in a byte.  */
 233     bfd_arch_sh,
 234     bfd_mach_sh2a,
 235     "sh",                       /* Arch_name.  */
 236     "sh2a",                     /* Printable name.  */
 237     1,
 238     FALSE,                      /* Not the default.  */
 239     bfd_default_compatible,
 240     bfd_default_scan,
 241     SH2A_NEXT
 242   },
 243   {
 244     32,                         /* 32 bits in a word.  */
 245     32,                         /* 32 bits in an address.  */
 246     8,                          /* 8 bits in a byte.  */
 247     bfd_arch_sh,
 248     bfd_mach_sh2a_nofpu,
 249     "sh",                       /* Arch_name.  */
 250     "sh2a-nofpu",               /* Printable name.  */
 251     1,
 252     FALSE,                      /* Not the default.  */
 253     bfd_default_compatible,
 254     bfd_default_scan,
 255     SH2A_NOFPU_NEXT
 256   },
 257   {
 258     64,                         /* 64 bits in a word */
 259     64,                         /* 64 bits in an address */
 260     8,                          /* 8 bits in a byte */
 261     bfd_arch_sh,
 262     bfd_mach_sh5,
 263     "sh",                       /* arch_name  */
 264     "sh5",                      /* printable name */
 265     1,
 266     FALSE,                      /* not the default */
 267     bfd_default_compatible,
 268     bfd_default_scan,
 269     SH64_NEXT
 270   },
 271 };
 272
 273 const bfd_arch_info_type bfd_sh_arch =
 274 {
 275   32,                           /* 32 bits in a word */
 276   32,                           /* 32 bits in an address */
 277   8,                            /* 8 bits in a byte */
 278   bfd_arch_sh,
 279   bfd_mach_sh,
 280   "sh",                         /* arch_name  */
 281   "sh",                         /* printable name */
 282   1,
 283   TRUE,                         /* the default machine */
 284   bfd_default_compatible,
 285   bfd_default_scan,
 286   SH_NEXT
 287 };
 288
 289
 290 /* This table defines the mappings from the BFD internal numbering
 291    system to the opcodes internal flags system.
 292    It is used by the functions defined below.
 293    The prototypes for these SH specific functions are found in
 294    sh-opc.h .  */
 295
 296 static struct { unsigned long bfd_mach, arch, arch_up; } bfd_to_arch_table[] =
 297 {
 298   { bfd_mach_sh,              arch_sh1,             arch_sh1_up },
 299   { bfd_mach_sh2,             arch_sh2,             arch_sh2_up },
 300   { bfd_mach_sh2e,            arch_sh2e,            arch_sh2e_up },
 301   { bfd_mach_sh_dsp,          arch_sh_dsp,          arch_sh_dsp_up },
 302   { bfd_mach_sh2a,            arch_sh2a,            arch_sh2a_up },
 303   { bfd_mach_sh2a_nofpu,      arch_sh2a_nofpu,      arch_sh2a_nofpu_up },
 304   { bfd_mach_sh3,             arch_sh3,             arch_sh3_up },
 305   { bfd_mach_sh3_nommu,       arch_sh3_nommu,       arch_sh3_nommu_up },
 306   { bfd_mach_sh3_dsp,         arch_sh3_dsp,         arch_sh3_dsp_up },
 307   { bfd_mach_sh3e,            arch_sh3e,            arch_sh3e_up },
 308   { bfd_mach_sh4,             arch_sh4,             arch_sh4_up },
 309   { bfd_mach_sh4a,            arch_sh4a,            arch_sh4a_up },
 310   { bfd_mach_sh4al_dsp,       arch_sh4al_dsp,       arch_sh4al_dsp_up },
 311   { bfd_mach_sh4_nofpu,       arch_sh4_nofpu,       arch_sh4_nofp_up },
 312   { bfd_mach_sh4_nommu_nofpu, arch_sh4_nommu_nofpu, arch_sh4_nommu_nofpu_up },
 313   { bfd_mach_sh4a_nofpu,      arch_sh4a_nofpu,      arch_sh4a_nofp_up },
 314   { 0, 0, 0 }   /* Terminator.  */
 315 };
 316
 317
 318 /* Convert a BFD mach number into the right opcodes arch flags
 319    using the table above.  */
 320
 321 unsigned int
 322 sh_get_arch_from_bfd_mach (unsigned long mach)
 323 {
 324   int i = 0;
 325
 326   while (bfd_to_arch_table[i].bfd_mach != 0)
 327     if (bfd_to_arch_table[i].bfd_mach == mach)
 328       return bfd_to_arch_table[i].arch;
 329     else
 330       i++;
 331
 332   /* mach not found.  */
 333   BFD_FAIL();
 334
 335   return SH_ARCH_UNKNOWN_ARCH;
 336 }
 337
 338
 339 /* Convert a BFD mach number into a set of opcodes arch flags
 340    describing all the compatible architectures (i.e. arch_up)
 341    using the table above.  */
 342
 343 unsigned int
 344 sh_get_arch_up_from_bfd_mach (unsigned long mach)
 345 {
 346   int i = 0;
 347
 348   while (bfd_to_arch_table[i].bfd_mach != 0)
 349     if (bfd_to_arch_table[i].bfd_mach == mach)
 350       return bfd_to_arch_table[i].arch_up;
 351     else
 352       i++;
 353
 354   /* mach not found.  */
 355   BFD_FAIL();
 356
 357   return SH_ARCH_UNKNOWN_ARCH;
 358 }
 359
 360
 361 /* Convert an arbitary arch_set - not necessarily corresponding
 362    directly to anything in the table above - to the most generic
 363    architecture which supports all the required features, and
 364    return the corresponding BFD mach.  */
 365
 366 unsigned long
 367 sh_get_bfd_mach_from_arch_set (unsigned int arch_set)
 368 {
 369   unsigned long result = 0;
 370   unsigned int best = ~arch_set;
 371   unsigned int co_mask = ~0;
 372   int i = 0;
 373
 374   /* If arch_set permits variants with no coprocessor then do not allow
 375      the other irrelevant co-processor bits to influence the choice:
 376        e.g. if dsp is disallowed by arch_set, then the algorithm would
 377        prefer fpu variants over nofpu variants because they also disallow
 378        dsp - even though the nofpu would be the most correct choice.
 379      This assumes that EVERY fpu/dsp variant has a no-coprocessor
 380      counter-part, or their non-fpu/dsp instructions do not have the
 381      no co-processor bit set.  */
 382   if (arch_set & arch_sh_no_co)
 383     co_mask = ~(arch_sh_sp_fpu | arch_sh_dp_fpu | arch_sh_has_dsp);
 384
 385   while (bfd_to_arch_table[i].bfd_mach != 0)
 386     {
 387       unsigned int try = bfd_to_arch_table[i].arch_up & co_mask;
 388
 389       /* Conceptually: Find the architecture with the least number
 390          of extra features or, if they have the same number, then
 391          the greatest number of required features.  Disregard
 392          architectures where the required features alone do
 393          not describe a valid architecture.  */
 394       if (((try & ~arch_set) < (best & ~arch_set)
 395            || ((try & ~arch_set) == (best & ~arch_set)
 396                && (~try & arch_set) < (~best & arch_set)))
 397           && SH_MERGE_ARCH_SET_VALID (try, arch_set))
 398         {
 399           result = bfd_to_arch_table[i].bfd_mach;
 400           best = try;
 401         }
 402
 403       i++;
 404     }
 405
 406   /* This might happen if a new variant is added to sh-opc.h
 407      but no corresponding entry is added to the table above.  */
 408   BFD_ASSERT (result != 0);
 409
 410   return result;
 411 }
 412
 413
 414 /* Merge the architecture type of two BFD files, such that the
 415    resultant architecture supports all the features required
 416    by the two input BFDs.
 417    If the input BFDs are multually incompatible - i.e. one uses
 418    DSP while the other uses FPU - or there is no known architecture
 419    that fits the requirements then an error is emitted.  */
 420
 421 bfd_boolean
 422 sh_merge_bfd_arch (bfd *ibfd, bfd *obfd)
 423 {
 424   unsigned int old_arch, new_arch, merged_arch;
 425
 426   if (! _bfd_generic_verify_endian_match (ibfd, obfd))
 427     return FALSE;
 428
 429   old_arch = sh_get_arch_up_from_bfd_mach (bfd_get_mach (obfd));
 430   new_arch = sh_get_arch_up_from_bfd_mach (bfd_get_mach (ibfd));
 431
 432   merged_arch = SH_MERGE_ARCH_SET (old_arch, new_arch);
 433
 434   if (!SH_VALID_CO_ARCH_SET (merged_arch))
 435     {
 436       (*_bfd_error_handler)
 437         ("%B: uses %s instructions while previous modules use %s instructions",
 438          ibfd,
 439          SH_ARCH_SET_HAS_DSP (new_arch) ? "dsp" : "floating point",
 440          SH_ARCH_SET_HAS_DSP (new_arch) ? "floating point" : "dsp");
 441       bfd_set_error (bfd_error_bad_value);
 442       return FALSE;
 443     }
 444   else if (!SH_VALID_ARCH_SET (merged_arch))
 445     {
 446       (*_bfd_error_handler)
 447         ("internal error: merge of architecture '%s' with architecture '%s' produced unknown architecture\n",
 448          bfd_printable_name (obfd),
 449          bfd_printable_name (ibfd));
 450       bfd_set_error (bfd_error_bad_value);
 451       return FALSE;
 452     }
 453
 454   bfd_default_set_arch_mach (obfd, bfd_arch_sh,
 455                              sh_get_bfd_mach_from_arch_set (merged_arch));
 456
 457   return TRUE;
 458 }