OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [branches/] [oc/] [gdb-5.0/] [bfd/] [cpu-i960.c] - Blame information for rev 1765

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 104 markom
/* 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]);

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.