binutils-gdb/bfd/cpu-i960.c

180 lines
5.1 KiB
C
Raw Normal View History

1991-10-01 04:43:11 +01:00
/* BFD library support routines for the i960 architecture.
Copyright (C) 1990, 91, 92, 93, 94 Free Software Foundation, Inc.
1991-10-01 04:43:11 +01:00
Hacked by Steve Chamberlain of Cygnus Support.
This file is part of BFD, the Binary File Descriptor library.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
1991-10-01 04:43:11 +01:00
#include "bfd.h"
#include "sysdep.h"
1991-10-01 04:43:11 +01:00
#include "libbfd.h"
/* This routine is provided a string, and tries to work out if it
could possibly refer to the i960 machine pointed at in the
info_struct pointer */
static boolean
scan_960_mach (ap, string)
CONST bfd_arch_info_type *ap;
CONST char *string;
1991-10-01 04:43:11 +01:00
{
unsigned long machine;
/* Look for the string i960, or somesuch at the front of the string */
if (strncmp("i960",string,4) == 0) {
1991-10-01 04:43:11 +01:00
string+=4;
}
else {
/* no match, can be us */
return false;
}
if (string[0] == 0) {
/* i960 on it's own means core to us*/
if (ap->mach == bfd_mach_i960_core) return true;
return false;
}
if (string[0] != ':') {
return false;
}
string++;
if (string[0] == '\0')
return false;
if (string[0] == 'c' && string[1] == 'o' && string[2] == 'r' &&
string[3] == 'e' && string[4] == '\0')
machine = bfd_mach_i960_core;
else if (string[1] == '\0' || string[2] != '\0') /* rest are 2-char */
return false;
else if (string[0] == 'k' && string[1] == 'b')
machine = bfd_mach_i960_kb_sb;
else if (string[0] == 's' && string[1] == 'b')
machine = bfd_mach_i960_kb_sb;
else if (string[0] == 'm' && string[1] == 'c')
machine = bfd_mach_i960_mc;
else if (string[0] == 'x' && string[1] == 'a')
machine = bfd_mach_i960_xa;
else if (string[0] == 'c' && string[1] == 'a')
machine = bfd_mach_i960_ca;
else if (string[0] == 'k' && string[1] == 'a')
machine = bfd_mach_i960_ka_sa;
else if (string[0] == 's' && string[1] == 'a')
machine = bfd_mach_i960_ka_sa;
/* start-sanitize-i960xl */
else if (string[0] == 'x' && string[1] == 'l')
machine = bfd_mach_i960_xl;
/* end-sanitize-i960xl */
1991-10-01 04:43:11 +01:00
else
return false;
if (machine == ap->mach) return true;
return false;
}
/* This routine is provided two arch_infos and works out the i960
machine which would be compatible with both and returns a pointer
to its info structure */
static CONST bfd_arch_info_type *
compatible (a,b)
CONST bfd_arch_info_type *a;
CONST bfd_arch_info_type *b;
1991-10-01 04:43:11 +01:00
{
/* The i960 has distinct subspecies which may not interbreed:
CORE CA
CORE KA KB MC XA
start-sanitize-i960xl
CORE XL
end-sanitize-i960xl
1991-10-01 04:43:11 +01:00
Any architecture on the same line is compatible, the one on
the right is the least restrictive.
We represent this information in an array, each machine to a side */
#define ERROR 0
#define CORE bfd_mach_i960_core /*1*/
#define KA bfd_mach_i960_ka_sa /*2*/
#define KB bfd_mach_i960_kb_sb /*3*/
#define MC bfd_mach_i960_mc /*4*/
#define XA bfd_mach_i960_xa /*5*/
#define CA bfd_mach_i960_ca /*6*/
#define MAX_ARCH ((int)CA)
1991-10-01 04:43:11 +01:00
/* start-sanitize-i960xl */
#define XL bfd_mach_i960_xl /*7*/
#undef MAX_ARCH
#define MAX_ARCH ((int)XL)
/* end-sanitize-i960xl */
1991-10-01 04:43:11 +01:00
static CONST unsigned long matrix[MAX_ARCH+1][MAX_ARCH+1] =
{
{ ERROR, CORE, KA, KB, MC, XA, CA },
{ CORE, CORE, KA, KB, MC, XA, CA },
{ KA, KA, KA, KB, MC, XA, ERROR },
{ KB, KB, KB, KB, MC, XA, ERROR },
{ MC, MC, MC, MC, MC, XA, ERROR },
{ XA, XA, XA, XA, XA, XA, ERROR },
{ CA, CA, ERROR, ERROR, ERROR, ERROR, CA },
/* start-sanitize-i960xl */
{ XL, ERROR, ERROR, ERROR, ERROR, ERROR, ERROR, XL },
/* end-sanitize-i960xl */
};
1991-10-01 04:43:11 +01:00
if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR)
{
return NULL;
1991-10-01 04:43:11 +01:00
}
else
{
return (a->mach == matrix[a->mach][b->mach]) ? a : b;
}
}
int bfd_default_scan_num_mach();
#define N(a,b,d) \
{ 32, 32, 8,bfd_arch_i960,a,"i960",b,3,d,compatible,scan_960_mach,0,}
1991-10-01 04:43:11 +01:00
static bfd_arch_info_type arch_info_struct[] =
1991-10-01 04:43:11 +01:00
{
N(bfd_mach_i960_core, "i960:core", true),
1991-10-01 04:43:11 +01:00
N(bfd_mach_i960_ka_sa,"i960:ka_sa",false),
N(bfd_mach_i960_kb_sb,"i960:kb_sb",false),
N(bfd_mach_i960_mc, "i960:mc", false),
N(bfd_mach_i960_xa, "i960:xa", false),
N(bfd_mach_i960_ca, "i960:ca", false),
/* start-sanitize-i960xl */
N(bfd_mach_i960_xl, "i960:xl", false),
/* end-sanitize-i960xl */
};
1991-10-01 04:43:11 +01:00
void
bfd_i960_arch ()
1991-10-01 04:43:11 +01:00
{
unsigned int i;
for (i = 0; i < sizeof(arch_info_struct)/sizeof (*arch_info_struct); i++) {
1991-10-01 04:43:11 +01:00
bfd_arch_linkin(arch_info_struct + i);
}
}