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

Subversion Repositories open8_urisc

[/] [open8_urisc/] [trunk/] [gnu/] [binutils/] [opcodes/] [ip2k-desc.c] - Blame information for rev 52

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 18 khays
/* CPU data for ip2k.
2
 
3
THIS FILE IS MACHINE GENERATED WITH CGEN.
4
 
5
Copyright 1996-2010 Free Software Foundation, Inc.
6
 
7
This file is part of the GNU Binutils and/or GDB, the GNU debugger.
8
 
9
   This file is free software; you can redistribute it and/or modify
10
   it under the terms of the GNU General Public License as published by
11
   the Free Software Foundation; either version 3, or (at your option)
12
   any later version.
13
 
14
   It is distributed in the hope that it will be useful, but WITHOUT
15
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
16
   or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
17
   License for more details.
18
 
19
   You should have received a copy of the GNU General Public License along
20
   with this program; if not, write to the Free Software Foundation, Inc.,
21
   51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
22
 
23
*/
24
 
25
#include "sysdep.h"
26
#include <stdio.h>
27
#include <stdarg.h>
28
#include "ansidecl.h"
29
#include "bfd.h"
30
#include "symcat.h"
31
#include "ip2k-desc.h"
32
#include "ip2k-opc.h"
33
#include "opintl.h"
34
#include "libiberty.h"
35
#include "xregex.h"
36
 
37
/* Attributes.  */
38
 
39
static const CGEN_ATTR_ENTRY bool_attr[] =
40
{
41
  { "#f", 0 },
42
  { "#t", 1 },
43
  { 0, 0 }
44
};
45
 
46
static const CGEN_ATTR_ENTRY MACH_attr[] ATTRIBUTE_UNUSED =
47
{
48
  { "base", MACH_BASE },
49
  { "ip2022", MACH_IP2022 },
50
  { "ip2022ext", MACH_IP2022EXT },
51
  { "max", MACH_MAX },
52
  { 0, 0 }
53
};
54
 
55
static const CGEN_ATTR_ENTRY ISA_attr[] ATTRIBUTE_UNUSED =
56
{
57
  { "ip2k", ISA_IP2K },
58
  { "max", ISA_MAX },
59
  { 0, 0 }
60
};
61
 
62
const CGEN_ATTR_TABLE ip2k_cgen_ifield_attr_table[] =
63
{
64
  { "MACH", & MACH_attr[0], & MACH_attr[0] },
65
  { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
66
  { "PCREL-ADDR", &bool_attr[0], &bool_attr[0] },
67
  { "ABS-ADDR", &bool_attr[0], &bool_attr[0] },
68
  { "RESERVED", &bool_attr[0], &bool_attr[0] },
69
  { "SIGN-OPT", &bool_attr[0], &bool_attr[0] },
70
  { "SIGNED", &bool_attr[0], &bool_attr[0] },
71
  { 0, 0, 0 }
72
};
73
 
74
const CGEN_ATTR_TABLE ip2k_cgen_hardware_attr_table[] =
75
{
76
  { "MACH", & MACH_attr[0], & MACH_attr[0] },
77
  { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
78
  { "CACHE-ADDR", &bool_attr[0], &bool_attr[0] },
79
  { "PC", &bool_attr[0], &bool_attr[0] },
80
  { "PROFILE", &bool_attr[0], &bool_attr[0] },
81
  { 0, 0, 0 }
82
};
83
 
84
const CGEN_ATTR_TABLE ip2k_cgen_operand_attr_table[] =
85
{
86
  { "MACH", & MACH_attr[0], & MACH_attr[0] },
87
  { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
88
  { "PCREL-ADDR", &bool_attr[0], &bool_attr[0] },
89
  { "ABS-ADDR", &bool_attr[0], &bool_attr[0] },
90
  { "SIGN-OPT", &bool_attr[0], &bool_attr[0] },
91
  { "SIGNED", &bool_attr[0], &bool_attr[0] },
92
  { "NEGATIVE", &bool_attr[0], &bool_attr[0] },
93
  { "RELAX", &bool_attr[0], &bool_attr[0] },
94
  { "SEM-ONLY", &bool_attr[0], &bool_attr[0] },
95
  { 0, 0, 0 }
96
};
97
 
98
const CGEN_ATTR_TABLE ip2k_cgen_insn_attr_table[] =
99
{
100
  { "MACH", & MACH_attr[0], & MACH_attr[0] },
101
  { "ALIAS", &bool_attr[0], &bool_attr[0] },
102
  { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
103
  { "UNCOND-CTI", &bool_attr[0], &bool_attr[0] },
104
  { "COND-CTI", &bool_attr[0], &bool_attr[0] },
105
  { "SKIP-CTI", &bool_attr[0], &bool_attr[0] },
106
  { "DELAY-SLOT", &bool_attr[0], &bool_attr[0] },
107
  { "RELAXABLE", &bool_attr[0], &bool_attr[0] },
108
  { "RELAXED", &bool_attr[0], &bool_attr[0] },
109
  { "NO-DIS", &bool_attr[0], &bool_attr[0] },
110
  { "PBB", &bool_attr[0], &bool_attr[0] },
111
  { "EXT-SKIP-INSN", &bool_attr[0], &bool_attr[0] },
112
  { "SKIPA", &bool_attr[0], &bool_attr[0] },
113
  { 0, 0, 0 }
114
};
115
 
116
/* Instruction set variants.  */
117
 
118
static const CGEN_ISA ip2k_cgen_isa_table[] = {
119
  { "ip2k", 16, 16, 16, 16 },
120
  { 0, 0, 0, 0, 0 }
121
};
122
 
123
/* Machine variants.  */
124
 
125
static const CGEN_MACH ip2k_cgen_mach_table[] = {
126
  { "ip2022", "ip2022", MACH_IP2022, 0 },
127
  { "ip2022ext", "ip2022ext", MACH_IP2022EXT, 0 },
128
  { 0, 0, 0, 0 }
129
};
130
 
131
static CGEN_KEYWORD_ENTRY ip2k_cgen_opval_register_names_entries[] =
132
{
133
  { "ADDRSEL", 2, {0, {{{0, 0}}}}, 0, 0 },
134
  { "ADDRX", 3, {0, {{{0, 0}}}}, 0, 0 },
135
  { "IPH", 4, {0, {{{0, 0}}}}, 0, 0 },
136
  { "IPL", 5, {0, {{{0, 0}}}}, 0, 0 },
137
  { "SPH", 6, {0, {{{0, 0}}}}, 0, 0 },
138
  { "SPL", 7, {0, {{{0, 0}}}}, 0, 0 },
139
  { "PCH", 8, {0, {{{0, 0}}}}, 0, 0 },
140
  { "PCL", 9, {0, {{{0, 0}}}}, 0, 0 },
141
  { "WREG", 10, {0, {{{0, 0}}}}, 0, 0 },
142
  { "STATUS", 11, {0, {{{0, 0}}}}, 0, 0 },
143
  { "DPH", 12, {0, {{{0, 0}}}}, 0, 0 },
144
  { "DPL", 13, {0, {{{0, 0}}}}, 0, 0 },
145
  { "SPDREG", 14, {0, {{{0, 0}}}}, 0, 0 },
146
  { "MULH", 15, {0, {{{0, 0}}}}, 0, 0 },
147
  { "ADDRH", 16, {0, {{{0, 0}}}}, 0, 0 },
148
  { "ADDRL", 17, {0, {{{0, 0}}}}, 0, 0 },
149
  { "DATAH", 18, {0, {{{0, 0}}}}, 0, 0 },
150
  { "DATAL", 19, {0, {{{0, 0}}}}, 0, 0 },
151
  { "INTVECH", 20, {0, {{{0, 0}}}}, 0, 0 },
152
  { "INTVECL", 21, {0, {{{0, 0}}}}, 0, 0 },
153
  { "INTSPD", 22, {0, {{{0, 0}}}}, 0, 0 },
154
  { "INTF", 23, {0, {{{0, 0}}}}, 0, 0 },
155
  { "INTE", 24, {0, {{{0, 0}}}}, 0, 0 },
156
  { "INTED", 25, {0, {{{0, 0}}}}, 0, 0 },
157
  { "FCFG", 26, {0, {{{0, 0}}}}, 0, 0 },
158
  { "TCTRL", 27, {0, {{{0, 0}}}}, 0, 0 },
159
  { "XCFG", 28, {0, {{{0, 0}}}}, 0, 0 },
160
  { "EMCFG", 29, {0, {{{0, 0}}}}, 0, 0 },
161
  { "IPCH", 30, {0, {{{0, 0}}}}, 0, 0 },
162
  { "IPCL", 31, {0, {{{0, 0}}}}, 0, 0 },
163
  { "RAIN", 32, {0, {{{0, 0}}}}, 0, 0 },
164
  { "RAOUT", 33, {0, {{{0, 0}}}}, 0, 0 },
165
  { "RADIR", 34, {0, {{{0, 0}}}}, 0, 0 },
166
  { "LFSRH", 35, {0, {{{0, 0}}}}, 0, 0 },
167
  { "RBIN", 36, {0, {{{0, 0}}}}, 0, 0 },
168
  { "RBOUT", 37, {0, {{{0, 0}}}}, 0, 0 },
169
  { "RBDIR", 38, {0, {{{0, 0}}}}, 0, 0 },
170
  { "LFSRL", 39, {0, {{{0, 0}}}}, 0, 0 },
171
  { "RCIN", 40, {0, {{{0, 0}}}}, 0, 0 },
172
  { "RCOUT", 41, {0, {{{0, 0}}}}, 0, 0 },
173
  { "RCDIR", 42, {0, {{{0, 0}}}}, 0, 0 },
174
  { "LFSRA", 43, {0, {{{0, 0}}}}, 0, 0 },
175
  { "RDIN", 44, {0, {{{0, 0}}}}, 0, 0 },
176
  { "RDOUT", 45, {0, {{{0, 0}}}}, 0, 0 },
177
  { "RDDIR", 46, {0, {{{0, 0}}}}, 0, 0 },
178
  { "REIN", 48, {0, {{{0, 0}}}}, 0, 0 },
179
  { "REOUT", 49, {0, {{{0, 0}}}}, 0, 0 },
180
  { "REDIR", 50, {0, {{{0, 0}}}}, 0, 0 },
181
  { "RFIN", 52, {0, {{{0, 0}}}}, 0, 0 },
182
  { "RFOUT", 53, {0, {{{0, 0}}}}, 0, 0 },
183
  { "RFDIR", 54, {0, {{{0, 0}}}}, 0, 0 },
184
  { "RGOUT", 57, {0, {{{0, 0}}}}, 0, 0 },
185
  { "RGDIR", 58, {0, {{{0, 0}}}}, 0, 0 },
186
  { "RTTMR", 64, {0, {{{0, 0}}}}, 0, 0 },
187
  { "RTCFG", 65, {0, {{{0, 0}}}}, 0, 0 },
188
  { "T0TMR", 66, {0, {{{0, 0}}}}, 0, 0 },
189
  { "T0CFG", 67, {0, {{{0, 0}}}}, 0, 0 },
190
  { "T1CNTH", 68, {0, {{{0, 0}}}}, 0, 0 },
191
  { "T1CNTL", 69, {0, {{{0, 0}}}}, 0, 0 },
192
  { "T1CAP1H", 70, {0, {{{0, 0}}}}, 0, 0 },
193
  { "T1CAP1L", 71, {0, {{{0, 0}}}}, 0, 0 },
194
  { "T1CAP2H", 72, {0, {{{0, 0}}}}, 0, 0 },
195
  { "T1CMP2H", 72, {0, {{{0, 0}}}}, 0, 0 },
196
  { "T1CAP2L", 73, {0, {{{0, 0}}}}, 0, 0 },
197
  { "T1CMP2L", 73, {0, {{{0, 0}}}}, 0, 0 },
198
  { "T1CMP1H", 74, {0, {{{0, 0}}}}, 0, 0 },
199
  { "T1CMP1L", 75, {0, {{{0, 0}}}}, 0, 0 },
200
  { "T1CFG1H", 76, {0, {{{0, 0}}}}, 0, 0 },
201
  { "T1CFG1L", 77, {0, {{{0, 0}}}}, 0, 0 },
202
  { "T1CFG2H", 78, {0, {{{0, 0}}}}, 0, 0 },
203
  { "T1CFG2L", 79, {0, {{{0, 0}}}}, 0, 0 },
204
  { "ADCH", 80, {0, {{{0, 0}}}}, 0, 0 },
205
  { "ADCL", 81, {0, {{{0, 0}}}}, 0, 0 },
206
  { "ADCCFG", 82, {0, {{{0, 0}}}}, 0, 0 },
207
  { "ADCTMR", 83, {0, {{{0, 0}}}}, 0, 0 },
208
  { "T2CNTH", 84, {0, {{{0, 0}}}}, 0, 0 },
209
  { "T2CNTL", 85, {0, {{{0, 0}}}}, 0, 0 },
210
  { "T2CAP1H", 86, {0, {{{0, 0}}}}, 0, 0 },
211
  { "T2CAP1L", 87, {0, {{{0, 0}}}}, 0, 0 },
212
  { "T2CAP2H", 88, {0, {{{0, 0}}}}, 0, 0 },
213
  { "T2CMP2H", 88, {0, {{{0, 0}}}}, 0, 0 },
214
  { "T2CAP2L", 89, {0, {{{0, 0}}}}, 0, 0 },
215
  { "T2CMP2L", 89, {0, {{{0, 0}}}}, 0, 0 },
216
  { "T2CMP1H", 90, {0, {{{0, 0}}}}, 0, 0 },
217
  { "T2CMP1L", 91, {0, {{{0, 0}}}}, 0, 0 },
218
  { "T2CFG1H", 92, {0, {{{0, 0}}}}, 0, 0 },
219
  { "T2CFG1L", 93, {0, {{{0, 0}}}}, 0, 0 },
220
  { "T2CFG2H", 94, {0, {{{0, 0}}}}, 0, 0 },
221
  { "T2CFG2L", 95, {0, {{{0, 0}}}}, 0, 0 },
222
  { "S1TMRH", 96, {0, {{{0, 0}}}}, 0, 0 },
223
  { "S1TMRL", 97, {0, {{{0, 0}}}}, 0, 0 },
224
  { "S1TBUFH", 98, {0, {{{0, 0}}}}, 0, 0 },
225
  { "S1TBUFL", 99, {0, {{{0, 0}}}}, 0, 0 },
226
  { "S1TCFG", 100, {0, {{{0, 0}}}}, 0, 0 },
227
  { "S1RCNT", 101, {0, {{{0, 0}}}}, 0, 0 },
228
  { "S1RBUFH", 102, {0, {{{0, 0}}}}, 0, 0 },
229
  { "S1RBUFL", 103, {0, {{{0, 0}}}}, 0, 0 },
230
  { "S1RCFG", 104, {0, {{{0, 0}}}}, 0, 0 },
231
  { "S1RSYNC", 105, {0, {{{0, 0}}}}, 0, 0 },
232
  { "S1INTF", 106, {0, {{{0, 0}}}}, 0, 0 },
233
  { "S1INTE", 107, {0, {{{0, 0}}}}, 0, 0 },
234
  { "S1MODE", 108, {0, {{{0, 0}}}}, 0, 0 },
235
  { "S1SMASK", 109, {0, {{{0, 0}}}}, 0, 0 },
236
  { "PSPCFG", 110, {0, {{{0, 0}}}}, 0, 0 },
237
  { "CMPCFG", 111, {0, {{{0, 0}}}}, 0, 0 },
238
  { "S2TMRH", 112, {0, {{{0, 0}}}}, 0, 0 },
239
  { "S2TMRL", 113, {0, {{{0, 0}}}}, 0, 0 },
240
  { "S2TBUFH", 114, {0, {{{0, 0}}}}, 0, 0 },
241
  { "S2TBUFL", 115, {0, {{{0, 0}}}}, 0, 0 },
242
  { "S2TCFG", 116, {0, {{{0, 0}}}}, 0, 0 },
243
  { "S2RCNT", 117, {0, {{{0, 0}}}}, 0, 0 },
244
  { "S2RBUFH", 118, {0, {{{0, 0}}}}, 0, 0 },
245
  { "S2RBUFL", 119, {0, {{{0, 0}}}}, 0, 0 },
246
  { "S2RCFG", 120, {0, {{{0, 0}}}}, 0, 0 },
247
  { "S2RSYNC", 121, {0, {{{0, 0}}}}, 0, 0 },
248
  { "S2INTF", 122, {0, {{{0, 0}}}}, 0, 0 },
249
  { "S2INTE", 123, {0, {{{0, 0}}}}, 0, 0 },
250
  { "S2MODE", 124, {0, {{{0, 0}}}}, 0, 0 },
251
  { "S2SMASK", 125, {0, {{{0, 0}}}}, 0, 0 },
252
  { "CALLH", 126, {0, {{{0, 0}}}}, 0, 0 },
253
  { "CALLL", 127, {0, {{{0, 0}}}}, 0, 0 }
254
};
255
 
256
CGEN_KEYWORD ip2k_cgen_opval_register_names =
257
{
258
  & ip2k_cgen_opval_register_names_entries[0],
259
  121,
260
  0, 0, 0, 0, ""
261
};
262
 
263
 
264
/* The hardware table.  */
265
 
266
#define A(a) (1 << CGEN_HW_##a)
267
 
268
const CGEN_HW_ENTRY ip2k_cgen_hw_table[] =
269
{
270
  { "h-memory", HW_H_MEMORY, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
271
  { "h-sint", HW_H_SINT, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
272
  { "h-uint", HW_H_UINT, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
273
  { "h-addr", HW_H_ADDR, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
274
  { "h-iaddr", HW_H_IADDR, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
275
  { "h-spr", HW_H_SPR, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
276
  { "h-registers", HW_H_REGISTERS, CGEN_ASM_NONE, 0, { 0|A(VIRTUAL), { { { (1<<MACH_BASE), 0 } } } } },
277
  { "h-stack", HW_H_STACK, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
278
  { "h-pabits", HW_H_PABITS, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
279
  { "h-zbit", HW_H_ZBIT, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
280
  { "h-cbit", HW_H_CBIT, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
281
  { "h-dcbit", HW_H_DCBIT, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
282
  { "h-pc", HW_H_PC, CGEN_ASM_NONE, 0, { 0|A(PROFILE)|A(PC), { { { (1<<MACH_BASE), 0 } } } } },
283
  { 0, 0, CGEN_ASM_NONE, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } }
284
};
285
 
286
#undef A
287
 
288
 
289
/* The instruction field table.  */
290
 
291
#define A(a) (1 << CGEN_IFLD_##a)
292
 
293
const CGEN_IFLD ip2k_cgen_ifld_table[] =
294
{
295
  { IP2K_F_NIL, "f-nil", 0, 0, 0, 0, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
296
  { IP2K_F_ANYOF, "f-anyof", 0, 0, 0, 0, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
297
  { IP2K_F_IMM8, "f-imm8", 0, 16, 7, 8, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
298
  { IP2K_F_REG, "f-reg", 0, 16, 8, 9, { 0|A(ABS_ADDR), { { { (1<<MACH_BASE), 0 } } } }  },
299
  { IP2K_F_ADDR16CJP, "f-addr16cjp", 0, 16, 12, 13, { 0|A(ABS_ADDR), { { { (1<<MACH_BASE), 0 } } } }  },
300
  { IP2K_F_DIR, "f-dir", 0, 16, 9, 1, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
301
  { IP2K_F_BITNO, "f-bitno", 0, 16, 11, 3, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
302
  { IP2K_F_OP3, "f-op3", 0, 16, 15, 3, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
303
  { IP2K_F_OP4, "f-op4", 0, 16, 15, 4, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
304
  { IP2K_F_OP4MID, "f-op4mid", 0, 16, 11, 4, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
305
  { IP2K_F_OP6, "f-op6", 0, 16, 15, 6, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
306
  { IP2K_F_OP8, "f-op8", 0, 16, 15, 8, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
307
  { IP2K_F_OP6_10LOW, "f-op6-10low", 0, 16, 9, 10, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
308
  { IP2K_F_OP6_7LOW, "f-op6-7low", 0, 16, 9, 7, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
309
  { IP2K_F_RETI3, "f-reti3", 0, 16, 2, 3, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
310
  { IP2K_F_SKIPB, "f-skipb", 0, 16, 12, 1, { 0|A(ABS_ADDR), { { { (1<<MACH_BASE), 0 } } } }  },
311
  { IP2K_F_PAGE3, "f-page3", 0, 16, 2, 3, { 0, { { { (1<<MACH_BASE), 0 } } } }  },
312
  { 0, 0, 0, 0, 0, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } }
313
};
314
 
315
#undef A
316
 
317
 
318
 
319
/* multi ifield declarations */
320
 
321
 
322
 
323
/* multi ifield definitions */
324
 
325
 
326
/* The operand table.  */
327
 
328
#define A(a) (1 << CGEN_OPERAND_##a)
329
#define OPERAND(op) IP2K_OPERAND_##op
330
 
331
const CGEN_OPERAND ip2k_cgen_operand_table[] =
332
{
333
/* pc: program counter */
334
  { "pc", IP2K_OPERAND_PC, HW_H_PC, 0, 0,
335
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_NIL] } },
336
    { 0|A(SEM_ONLY), { { { (1<<MACH_BASE), 0 } } } }  },
337
/* addr16cjp: 13-bit address */
338
  { "addr16cjp", IP2K_OPERAND_ADDR16CJP, HW_H_UINT, 12, 13,
339
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_ADDR16CJP] } },
340
    { 0|A(ABS_ADDR), { { { (1<<MACH_BASE), 0 } } } }  },
341
/* fr: register */
342
  { "fr", IP2K_OPERAND_FR, HW_H_REGISTERS, 8, 9,
343
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_REG] } },
344
    { 0|A(ABS_ADDR), { { { (1<<MACH_BASE), 0 } } } }  },
345
/* lit8: 8-bit signed literal */
346
  { "lit8", IP2K_OPERAND_LIT8, HW_H_SINT, 7, 8,
347
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_IMM8] } },
348
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
349
/* bitno: bit number */
350
  { "bitno", IP2K_OPERAND_BITNO, HW_H_UINT, 11, 3,
351
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_BITNO] } },
352
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
353
/* addr16p: page number */
354
  { "addr16p", IP2K_OPERAND_ADDR16P, HW_H_UINT, 2, 3,
355
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_PAGE3] } },
356
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
357
/* addr16h: high 8 bits of address */
358
  { "addr16h", IP2K_OPERAND_ADDR16H, HW_H_UINT, 7, 8,
359
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_IMM8] } },
360
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
361
/* addr16l: low 8 bits of address */
362
  { "addr16l", IP2K_OPERAND_ADDR16L, HW_H_UINT, 7, 8,
363
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_IMM8] } },
364
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
365
/* reti3: reti flags */
366
  { "reti3", IP2K_OPERAND_RETI3, HW_H_UINT, 2, 3,
367
    { 0, { (const PTR) &ip2k_cgen_ifld_table[IP2K_F_RETI3] } },
368
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
369
/* pabits: page bits */
370
  { "pabits", IP2K_OPERAND_PABITS, HW_H_PABITS, 0, 0,
371
    { 0, { (const PTR) 0 } },
372
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
373
/* zbit: zero bit */
374
  { "zbit", IP2K_OPERAND_ZBIT, HW_H_ZBIT, 0, 0,
375
    { 0, { (const PTR) 0 } },
376
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
377
/* cbit: carry bit */
378
  { "cbit", IP2K_OPERAND_CBIT, HW_H_CBIT, 0, 0,
379
    { 0, { (const PTR) 0 } },
380
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
381
/* dcbit: digit carry bit */
382
  { "dcbit", IP2K_OPERAND_DCBIT, HW_H_DCBIT, 0, 0,
383
    { 0, { (const PTR) 0 } },
384
    { 0, { { { (1<<MACH_BASE), 0 } } } }  },
385
/* sentinel */
386
  { 0, 0, 0, 0, 0,
387
    { 0, { (const PTR) 0 } },
388
    { 0, { { { (1<<MACH_BASE), 0 } } } } }
389
};
390
 
391
#undef A
392
 
393
 
394
/* The instruction table.  */
395
 
396
#define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field))
397
#define A(a) (1 << CGEN_INSN_##a)
398
 
399
static const CGEN_IBASE ip2k_cgen_insn_table[MAX_INSNS] =
400
{
401
  /* Special null first entry.
402
     A `num' value of zero is thus invalid.
403
     Also, the special `invalid' insn resides here.  */
404
  { 0, 0, 0, 0, { 0, { { { (1<<MACH_BASE), 0 } } } } },
405
/* jmp $addr16cjp */
406
  {
407
    IP2K_INSN_JMP, "jmp", "jmp", 16,
408
    { 0|A(UNCOND_CTI), { { { (1<<MACH_BASE), 0 } } } }
409
  },
410
/* call $addr16cjp */
411
  {
412
    IP2K_INSN_CALL, "call", "call", 16,
413
    { 0|A(UNCOND_CTI), { { { (1<<MACH_BASE), 0 } } } }
414
  },
415
/* sb $fr,$bitno */
416
  {
417
    IP2K_INSN_SB, "sb", "sb", 16,
418
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
419
  },
420
/* snb $fr,$bitno */
421
  {
422
    IP2K_INSN_SNB, "snb", "snb", 16,
423
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
424
  },
425
/* setb $fr,$bitno */
426
  {
427
    IP2K_INSN_SETB, "setb", "setb", 16,
428
    { 0, { { { (1<<MACH_BASE), 0 } } } }
429
  },
430
/* clrb $fr,$bitno */
431
  {
432
    IP2K_INSN_CLRB, "clrb", "clrb", 16,
433
    { 0, { { { (1<<MACH_BASE), 0 } } } }
434
  },
435
/* xor W,#$lit8 */
436
  {
437
    IP2K_INSN_XORW_L, "xorw_l", "xor", 16,
438
    { 0, { { { (1<<MACH_BASE), 0 } } } }
439
  },
440
/* and W,#$lit8 */
441
  {
442
    IP2K_INSN_ANDW_L, "andw_l", "and", 16,
443
    { 0, { { { (1<<MACH_BASE), 0 } } } }
444
  },
445
/* or W,#$lit8 */
446
  {
447
    IP2K_INSN_ORW_L, "orw_l", "or", 16,
448
    { 0, { { { (1<<MACH_BASE), 0 } } } }
449
  },
450
/* add W,#$lit8 */
451
  {
452
    IP2K_INSN_ADDW_L, "addw_l", "add", 16,
453
    { 0, { { { (1<<MACH_BASE), 0 } } } }
454
  },
455
/* sub W,#$lit8 */
456
  {
457
    IP2K_INSN_SUBW_L, "subw_l", "sub", 16,
458
    { 0, { { { (1<<MACH_BASE), 0 } } } }
459
  },
460
/* cmp W,#$lit8 */
461
  {
462
    IP2K_INSN_CMPW_L, "cmpw_l", "cmp", 16,
463
    { 0, { { { (1<<MACH_BASE), 0 } } } }
464
  },
465
/* retw #$lit8 */
466
  {
467
    IP2K_INSN_RETW_L, "retw_l", "retw", 16,
468
    { 0|A(UNCOND_CTI), { { { (1<<MACH_BASE), 0 } } } }
469
  },
470
/* cse W,#$lit8 */
471
  {
472
    IP2K_INSN_CSEW_L, "csew_l", "cse", 16,
473
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
474
  },
475
/* csne W,#$lit8 */
476
  {
477
    IP2K_INSN_CSNEW_L, "csnew_l", "csne", 16,
478
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
479
  },
480
/* push #$lit8 */
481
  {
482
    IP2K_INSN_PUSH_L, "push_l", "push", 16,
483
    { 0, { { { (1<<MACH_BASE), 0 } } } }
484
  },
485
/* muls W,#$lit8 */
486
  {
487
    IP2K_INSN_MULSW_L, "mulsw_l", "muls", 16,
488
    { 0, { { { (1<<MACH_BASE), 0 } } } }
489
  },
490
/* mulu W,#$lit8 */
491
  {
492
    IP2K_INSN_MULUW_L, "muluw_l", "mulu", 16,
493
    { 0, { { { (1<<MACH_BASE), 0 } } } }
494
  },
495
/* loadl #$lit8 */
496
  {
497
    IP2K_INSN_LOADL_L, "loadl_l", "loadl", 16,
498
    { 0|A(EXT_SKIP_INSN), { { { (1<<MACH_BASE), 0 } } } }
499
  },
500
/* loadh #$lit8 */
501
  {
502
    IP2K_INSN_LOADH_L, "loadh_l", "loadh", 16,
503
    { 0|A(EXT_SKIP_INSN), { { { (1<<MACH_BASE), 0 } } } }
504
  },
505
/* loadl $addr16l */
506
  {
507
    IP2K_INSN_LOADL_A, "loadl_a", "loadl", 16,
508
    { 0|A(EXT_SKIP_INSN), { { { (1<<MACH_BASE), 0 } } } }
509
  },
510
/* loadh $addr16h */
511
  {
512
    IP2K_INSN_LOADH_A, "loadh_a", "loadh", 16,
513
    { 0|A(EXT_SKIP_INSN), { { { (1<<MACH_BASE), 0 } } } }
514
  },
515
/* addc $fr,W */
516
  {
517
    IP2K_INSN_ADDCFR_W, "addcfr_w", "addc", 16,
518
    { 0, { { { (1<<MACH_BASE), 0 } } } }
519
  },
520
/* addc W,$fr */
521
  {
522
    IP2K_INSN_ADDCW_FR, "addcw_fr", "addc", 16,
523
    { 0, { { { (1<<MACH_BASE), 0 } } } }
524
  },
525
/* incsnz $fr */
526
  {
527
    IP2K_INSN_INCSNZ_FR, "incsnz_fr", "incsnz", 16,
528
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
529
  },
530
/* incsnz W,$fr */
531
  {
532
    IP2K_INSN_INCSNZW_FR, "incsnzw_fr", "incsnz", 16,
533
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
534
  },
535
/* muls W,$fr */
536
  {
537
    IP2K_INSN_MULSW_FR, "mulsw_fr", "muls", 16,
538
    { 0, { { { (1<<MACH_BASE), 0 } } } }
539
  },
540
/* mulu W,$fr */
541
  {
542
    IP2K_INSN_MULUW_FR, "muluw_fr", "mulu", 16,
543
    { 0, { { { (1<<MACH_BASE), 0 } } } }
544
  },
545
/* decsnz $fr */
546
  {
547
    IP2K_INSN_DECSNZ_FR, "decsnz_fr", "decsnz", 16,
548
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
549
  },
550
/* decsnz W,$fr */
551
  {
552
    IP2K_INSN_DECSNZW_FR, "decsnzw_fr", "decsnz", 16,
553
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
554
  },
555
/* subc W,$fr */
556
  {
557
    IP2K_INSN_SUBCW_FR, "subcw_fr", "subc", 16,
558
    { 0, { { { (1<<MACH_BASE), 0 } } } }
559
  },
560
/* subc $fr,W */
561
  {
562
    IP2K_INSN_SUBCFR_W, "subcfr_w", "subc", 16,
563
    { 0, { { { (1<<MACH_BASE), 0 } } } }
564
  },
565
/* pop $fr */
566
  {
567
    IP2K_INSN_POP_FR, "pop_fr", "pop", 16,
568
    { 0, { { { (1<<MACH_BASE), 0 } } } }
569
  },
570
/* push $fr */
571
  {
572
    IP2K_INSN_PUSH_FR, "push_fr", "push", 16,
573
    { 0, { { { (1<<MACH_BASE), 0 } } } }
574
  },
575
/* cse W,$fr */
576
  {
577
    IP2K_INSN_CSEW_FR, "csew_fr", "cse", 16,
578
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
579
  },
580
/* csne W,$fr */
581
  {
582
    IP2K_INSN_CSNEW_FR, "csnew_fr", "csne", 16,
583
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
584
  },
585
/* incsz $fr */
586
  {
587
    IP2K_INSN_INCSZ_FR, "incsz_fr", "incsz", 16,
588
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
589
  },
590
/* incsz W,$fr */
591
  {
592
    IP2K_INSN_INCSZW_FR, "incszw_fr", "incsz", 16,
593
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
594
  },
595
/* swap $fr */
596
  {
597
    IP2K_INSN_SWAP_FR, "swap_fr", "swap", 16,
598
    { 0, { { { (1<<MACH_BASE), 0 } } } }
599
  },
600
/* swap W,$fr */
601
  {
602
    IP2K_INSN_SWAPW_FR, "swapw_fr", "swap", 16,
603
    { 0, { { { (1<<MACH_BASE), 0 } } } }
604
  },
605
/* rl $fr */
606
  {
607
    IP2K_INSN_RL_FR, "rl_fr", "rl", 16,
608
    { 0, { { { (1<<MACH_BASE), 0 } } } }
609
  },
610
/* rl W,$fr */
611
  {
612
    IP2K_INSN_RLW_FR, "rlw_fr", "rl", 16,
613
    { 0, { { { (1<<MACH_BASE), 0 } } } }
614
  },
615
/* rr $fr */
616
  {
617
    IP2K_INSN_RR_FR, "rr_fr", "rr", 16,
618
    { 0, { { { (1<<MACH_BASE), 0 } } } }
619
  },
620
/* rr W,$fr */
621
  {
622
    IP2K_INSN_RRW_FR, "rrw_fr", "rr", 16,
623
    { 0, { { { (1<<MACH_BASE), 0 } } } }
624
  },
625
/* decsz $fr */
626
  {
627
    IP2K_INSN_DECSZ_FR, "decsz_fr", "decsz", 16,
628
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
629
  },
630
/* decsz W,$fr */
631
  {
632
    IP2K_INSN_DECSZW_FR, "decszw_fr", "decsz", 16,
633
    { 0|A(SKIP_CTI), { { { (1<<MACH_BASE), 0 } } } }
634
  },
635
/* inc $fr */
636
  {
637
    IP2K_INSN_INC_FR, "inc_fr", "inc", 16,
638
    { 0, { { { (1<<MACH_BASE), 0 } } } }
639
  },
640
/* inc W,$fr */
641
  {
642
    IP2K_INSN_INCW_FR, "incw_fr", "inc", 16,
643
    { 0, { { { (1<<MACH_BASE), 0 } } } }
644
  },
645
/* not $fr */
646
  {
647
    IP2K_INSN_NOT_FR, "not_fr", "not", 16,
648
    { 0, { { { (1<<MACH_BASE), 0 } } } }
649
  },
650
/* not W,$fr */
651
  {
652
    IP2K_INSN_NOTW_FR, "notw_fr", "not", 16,
653
    { 0, { { { (1<<MACH_BASE), 0 } } } }
654
  },
655
/* test $fr */
656
  {
657
    IP2K_INSN_TEST_FR, "test_fr", "test", 16,
658
    { 0, { { { (1<<MACH_BASE), 0 } } } }
659
  },
660
/* mov W,#$lit8 */
661
  {
662
    IP2K_INSN_MOVW_L, "movw_l", "mov", 16,
663
    { 0, { { { (1<<MACH_BASE), 0 } } } }
664
  },
665
/* mov $fr,W */
666
  {
667
    IP2K_INSN_MOVFR_W, "movfr_w", "mov", 16,
668
    { 0, { { { (1<<MACH_BASE), 0 } } } }
669
  },
670
/* mov W,$fr */
671
  {
672
    IP2K_INSN_MOVW_FR, "movw_fr", "mov", 16,
673
    { 0, { { { (1<<MACH_BASE), 0 } } } }
674
  },
675
/* add $fr,W */
676
  {
677
    IP2K_INSN_ADDFR_W, "addfr_w", "add", 16,
678
    { 0, { { { (1<<MACH_BASE), 0 } } } }
679
  },
680
/* add W,$fr */
681
  {
682
    IP2K_INSN_ADDW_FR, "addw_fr", "add", 16,
683
    { 0, { { { (1<<MACH_BASE), 0 } } } }
684
  },
685
/* xor $fr,W */
686
  {
687
    IP2K_INSN_XORFR_W, "xorfr_w", "xor", 16,
688
    { 0, { { { (1<<MACH_BASE), 0 } } } }
689
  },
690
/* xor W,$fr */
691
  {
692
    IP2K_INSN_XORW_FR, "xorw_fr", "xor", 16,
693
    { 0, { { { (1<<MACH_BASE), 0 } } } }
694
  },
695
/* and $fr,W */
696
  {
697
    IP2K_INSN_ANDFR_W, "andfr_w", "and", 16,
698
    { 0, { { { (1<<MACH_BASE), 0 } } } }
699
  },
700
/* and W,$fr */
701
  {
702
    IP2K_INSN_ANDW_FR, "andw_fr", "and", 16,
703
    { 0, { { { (1<<MACH_BASE), 0 } } } }
704
  },
705
/* or $fr,W */
706
  {
707
    IP2K_INSN_ORFR_W, "orfr_w", "or", 16,
708
    { 0, { { { (1<<MACH_BASE), 0 } } } }
709
  },
710
/* or W,$fr */
711
  {
712
    IP2K_INSN_ORW_FR, "orw_fr", "or", 16,
713
    { 0, { { { (1<<MACH_BASE), 0 } } } }
714
  },
715
/* dec $fr */
716
  {
717
    IP2K_INSN_DEC_FR, "dec_fr", "dec", 16,
718
    { 0, { { { (1<<MACH_BASE), 0 } } } }
719
  },
720
/* dec W,$fr */
721
  {
722
    IP2K_INSN_DECW_FR, "decw_fr", "dec", 16,
723
    { 0, { { { (1<<MACH_BASE), 0 } } } }
724
  },
725
/* sub $fr,W */
726
  {
727
    IP2K_INSN_SUBFR_W, "subfr_w", "sub", 16,
728
    { 0, { { { (1<<MACH_BASE), 0 } } } }
729
  },
730
/* sub W,$fr */
731
  {
732
    IP2K_INSN_SUBW_FR, "subw_fr", "sub", 16,
733
    { 0, { { { (1<<MACH_BASE), 0 } } } }
734
  },
735
/* clr $fr */
736
  {
737
    IP2K_INSN_CLR_FR, "clr_fr", "clr", 16,
738
    { 0, { { { (1<<MACH_BASE), 0 } } } }
739
  },
740
/* cmp W,$fr */
741
  {
742
    IP2K_INSN_CMPW_FR, "cmpw_fr", "cmp", 16,
743
    { 0, { { { (1<<MACH_BASE), 0 } } } }
744
  },
745
/* speed #$lit8 */
746
  {
747
    IP2K_INSN_SPEED, "speed", "speed", 16,
748
    { 0, { { { (1<<MACH_BASE), 0 } } } }
749
  },
750
/* ireadi */
751
  {
752
    IP2K_INSN_IREADI, "ireadi", "ireadi", 16,
753
    { 0, { { { (1<<MACH_BASE), 0 } } } }
754
  },
755
/* iwritei */
756
  {
757
    IP2K_INSN_IWRITEI, "iwritei", "iwritei", 16,
758
    { 0, { { { (1<<MACH_BASE), 0 } } } }
759
  },
760
/* fread */
761
  {
762
    IP2K_INSN_FREAD, "fread", "fread", 16,
763
    { 0, { { { (1<<MACH_BASE), 0 } } } }
764
  },
765
/* fwrite */
766
  {
767
    IP2K_INSN_FWRITE, "fwrite", "fwrite", 16,
768
    { 0, { { { (1<<MACH_BASE), 0 } } } }
769
  },
770
/* iread */
771
  {
772
    IP2K_INSN_IREAD, "iread", "iread", 16,
773
    { 0, { { { (1<<MACH_BASE), 0 } } } }
774
  },
775
/* iwrite */
776
  {
777
    IP2K_INSN_IWRITE, "iwrite", "iwrite", 16,
778
    { 0, { { { (1<<MACH_BASE), 0 } } } }
779
  },
780
/* page $addr16p */
781
  {
782
    IP2K_INSN_PAGE, "page", "page", 16,
783
    { 0|A(EXT_SKIP_INSN), { { { (1<<MACH_BASE), 0 } } } }
784
  },
785
/* system */
786
  {
787
    IP2K_INSN_SYSTEM, "system", "system", 16,
788
    { 0, { { { (1<<MACH_BASE), 0 } } } }
789
  },
790
/* reti #$reti3 */
791
  {
792
    IP2K_INSN_RETI, "reti", "reti", 16,
793
    { 0, { { { (1<<MACH_BASE), 0 } } } }
794
  },
795
/* ret */
796
  {
797
    IP2K_INSN_RET, "ret", "ret", 16,
798
    { 0|A(UNCOND_CTI), { { { (1<<MACH_BASE), 0 } } } }
799
  },
800
/* int */
801
  {
802
    IP2K_INSN_INT, "int", "int", 16,
803
    { 0, { { { (1<<MACH_BASE), 0 } } } }
804
  },
805
/* breakx */
806
  {
807
    IP2K_INSN_BREAKX, "breakx", "breakx", 16,
808
    { 0|A(EXT_SKIP_INSN), { { { (1<<MACH_BASE), 0 } } } }
809
  },
810
/* cwdt */
811
  {
812
    IP2K_INSN_CWDT, "cwdt", "cwdt", 16,
813
    { 0, { { { (1<<MACH_BASE), 0 } } } }
814
  },
815
/* ferase */
816
  {
817
    IP2K_INSN_FERASE, "ferase", "ferase", 16,
818
    { 0, { { { (1<<MACH_BASE), 0 } } } }
819
  },
820
/* retnp */
821
  {
822
    IP2K_INSN_RETNP, "retnp", "retnp", 16,
823
    { 0|A(UNCOND_CTI), { { { (1<<MACH_BASE), 0 } } } }
824
  },
825
/* break */
826
  {
827
    IP2K_INSN_BREAK, "break", "break", 16,
828
    { 0, { { { (1<<MACH_BASE), 0 } } } }
829
  },
830
/* nop */
831
  {
832
    IP2K_INSN_NOP, "nop", "nop", 16,
833
    { 0, { { { (1<<MACH_BASE), 0 } } } }
834
  },
835
};
836
 
837
#undef OP
838
#undef A
839
 
840
/* Initialize anything needed to be done once, before any cpu_open call.  */
841
 
842
static void
843
init_tables (void)
844
{
845
}
846
 
847
static const CGEN_MACH * lookup_mach_via_bfd_name (const CGEN_MACH *, const char *);
848
static void build_hw_table      (CGEN_CPU_TABLE *);
849
static void build_ifield_table  (CGEN_CPU_TABLE *);
850
static void build_operand_table (CGEN_CPU_TABLE *);
851
static void build_insn_table    (CGEN_CPU_TABLE *);
852
static void ip2k_cgen_rebuild_tables (CGEN_CPU_TABLE *);
853
 
854
/* Subroutine of ip2k_cgen_cpu_open to look up a mach via its bfd name.  */
855
 
856
static const CGEN_MACH *
857
lookup_mach_via_bfd_name (const CGEN_MACH *table, const char *name)
858
{
859
  while (table->name)
860
    {
861
      if (strcmp (name, table->bfd_name) == 0)
862
        return table;
863
      ++table;
864
    }
865
  abort ();
866
}
867
 
868
/* Subroutine of ip2k_cgen_cpu_open to build the hardware table.  */
869
 
870
static void
871
build_hw_table (CGEN_CPU_TABLE *cd)
872
{
873
  int i;
874
  int machs = cd->machs;
875
  const CGEN_HW_ENTRY *init = & ip2k_cgen_hw_table[0];
876
  /* MAX_HW is only an upper bound on the number of selected entries.
877
     However each entry is indexed by it's enum so there can be holes in
878
     the table.  */
879
  const CGEN_HW_ENTRY **selected =
880
    (const CGEN_HW_ENTRY **) xmalloc (MAX_HW * sizeof (CGEN_HW_ENTRY *));
881
 
882
  cd->hw_table.init_entries = init;
883
  cd->hw_table.entry_size = sizeof (CGEN_HW_ENTRY);
884
  memset (selected, 0, MAX_HW * sizeof (CGEN_HW_ENTRY *));
885
  /* ??? For now we just use machs to determine which ones we want.  */
886
  for (i = 0; init[i].name != NULL; ++i)
887
    if (CGEN_HW_ATTR_VALUE (&init[i], CGEN_HW_MACH)
888
        & machs)
889
      selected[init[i].type] = &init[i];
890
  cd->hw_table.entries = selected;
891
  cd->hw_table.num_entries = MAX_HW;
892
}
893
 
894
/* Subroutine of ip2k_cgen_cpu_open to build the hardware table.  */
895
 
896
static void
897
build_ifield_table (CGEN_CPU_TABLE *cd)
898
{
899
  cd->ifld_table = & ip2k_cgen_ifld_table[0];
900
}
901
 
902
/* Subroutine of ip2k_cgen_cpu_open to build the hardware table.  */
903
 
904
static void
905
build_operand_table (CGEN_CPU_TABLE *cd)
906
{
907
  int i;
908
  int machs = cd->machs;
909
  const CGEN_OPERAND *init = & ip2k_cgen_operand_table[0];
910
  /* MAX_OPERANDS is only an upper bound on the number of selected entries.
911
     However each entry is indexed by it's enum so there can be holes in
912
     the table.  */
913
  const CGEN_OPERAND **selected = xmalloc (MAX_OPERANDS * sizeof (* selected));
914
 
915
  cd->operand_table.init_entries = init;
916
  cd->operand_table.entry_size = sizeof (CGEN_OPERAND);
917
  memset (selected, 0, MAX_OPERANDS * sizeof (CGEN_OPERAND *));
918
  /* ??? For now we just use mach to determine which ones we want.  */
919
  for (i = 0; init[i].name != NULL; ++i)
920
    if (CGEN_OPERAND_ATTR_VALUE (&init[i], CGEN_OPERAND_MACH)
921
        & machs)
922
      selected[init[i].type] = &init[i];
923
  cd->operand_table.entries = selected;
924
  cd->operand_table.num_entries = MAX_OPERANDS;
925
}
926
 
927
/* Subroutine of ip2k_cgen_cpu_open to build the hardware table.
928
   ??? This could leave out insns not supported by the specified mach/isa,
929
   but that would cause errors like "foo only supported by bar" to become
930
   "unknown insn", so for now we include all insns and require the app to
931
   do the checking later.
932
   ??? On the other hand, parsing of such insns may require their hardware or
933
   operand elements to be in the table [which they mightn't be].  */
934
 
935
static void
936
build_insn_table (CGEN_CPU_TABLE *cd)
937
{
938
  int i;
939
  const CGEN_IBASE *ib = & ip2k_cgen_insn_table[0];
940
  CGEN_INSN *insns = xmalloc (MAX_INSNS * sizeof (CGEN_INSN));
941
 
942
  memset (insns, 0, MAX_INSNS * sizeof (CGEN_INSN));
943
  for (i = 0; i < MAX_INSNS; ++i)
944
    insns[i].base = &ib[i];
945
  cd->insn_table.init_entries = insns;
946
  cd->insn_table.entry_size = sizeof (CGEN_IBASE);
947
  cd->insn_table.num_init_entries = MAX_INSNS;
948
}
949
 
950
/* Subroutine of ip2k_cgen_cpu_open to rebuild the tables.  */
951
 
952
static void
953
ip2k_cgen_rebuild_tables (CGEN_CPU_TABLE *cd)
954
{
955
  int i;
956
  CGEN_BITSET *isas = cd->isas;
957
  unsigned int machs = cd->machs;
958
 
959
  cd->int_insn_p = CGEN_INT_INSN_P;
960
 
961
  /* Data derived from the isa spec.  */
962
#define UNSET (CGEN_SIZE_UNKNOWN + 1)
963
  cd->default_insn_bitsize = UNSET;
964
  cd->base_insn_bitsize = UNSET;
965
  cd->min_insn_bitsize = 65535; /* Some ridiculously big number.  */
966
  cd->max_insn_bitsize = 0;
967
  for (i = 0; i < MAX_ISAS; ++i)
968
    if (cgen_bitset_contains (isas, i))
969
      {
970
        const CGEN_ISA *isa = & ip2k_cgen_isa_table[i];
971
 
972
        /* Default insn sizes of all selected isas must be
973
           equal or we set the result to 0, meaning "unknown".  */
974
        if (cd->default_insn_bitsize == UNSET)
975
          cd->default_insn_bitsize = isa->default_insn_bitsize;
976
        else if (isa->default_insn_bitsize == cd->default_insn_bitsize)
977
          ; /* This is ok.  */
978
        else
979
          cd->default_insn_bitsize = CGEN_SIZE_UNKNOWN;
980
 
981
        /* Base insn sizes of all selected isas must be equal
982
           or we set the result to 0, meaning "unknown".  */
983
        if (cd->base_insn_bitsize == UNSET)
984
          cd->base_insn_bitsize = isa->base_insn_bitsize;
985
        else if (isa->base_insn_bitsize == cd->base_insn_bitsize)
986
          ; /* This is ok.  */
987
        else
988
          cd->base_insn_bitsize = CGEN_SIZE_UNKNOWN;
989
 
990
        /* Set min,max insn sizes.  */
991
        if (isa->min_insn_bitsize < cd->min_insn_bitsize)
992
          cd->min_insn_bitsize = isa->min_insn_bitsize;
993
        if (isa->max_insn_bitsize > cd->max_insn_bitsize)
994
          cd->max_insn_bitsize = isa->max_insn_bitsize;
995
      }
996
 
997
  /* Data derived from the mach spec.  */
998
  for (i = 0; i < MAX_MACHS; ++i)
999
    if (((1 << i) & machs) != 0)
1000
      {
1001
        const CGEN_MACH *mach = & ip2k_cgen_mach_table[i];
1002
 
1003
        if (mach->insn_chunk_bitsize != 0)
1004
        {
1005
          if (cd->insn_chunk_bitsize != 0 && cd->insn_chunk_bitsize != mach->insn_chunk_bitsize)
1006
            {
1007
              fprintf (stderr, "ip2k_cgen_rebuild_tables: conflicting insn-chunk-bitsize values: `%d' vs. `%d'\n",
1008
                       cd->insn_chunk_bitsize, mach->insn_chunk_bitsize);
1009
              abort ();
1010
            }
1011
 
1012
          cd->insn_chunk_bitsize = mach->insn_chunk_bitsize;
1013
        }
1014
      }
1015
 
1016
  /* Determine which hw elements are used by MACH.  */
1017
  build_hw_table (cd);
1018
 
1019
  /* Build the ifield table.  */
1020
  build_ifield_table (cd);
1021
 
1022
  /* Determine which operands are used by MACH/ISA.  */
1023
  build_operand_table (cd);
1024
 
1025
  /* Build the instruction table.  */
1026
  build_insn_table (cd);
1027
}
1028
 
1029
/* Initialize a cpu table and return a descriptor.
1030
   It's much like opening a file, and must be the first function called.
1031
   The arguments are a set of (type/value) pairs, terminated with
1032
   CGEN_CPU_OPEN_END.
1033
 
1034
   Currently supported values:
1035
   CGEN_CPU_OPEN_ISAS:    bitmap of values in enum isa_attr
1036
   CGEN_CPU_OPEN_MACHS:   bitmap of values in enum mach_attr
1037
   CGEN_CPU_OPEN_BFDMACH: specify 1 mach using bfd name
1038
   CGEN_CPU_OPEN_ENDIAN:  specify endian choice
1039
   CGEN_CPU_OPEN_END:     terminates arguments
1040
 
1041
   ??? Simultaneous multiple isas might not make sense, but it's not (yet)
1042
   precluded.  */
1043
 
1044
CGEN_CPU_DESC
1045
ip2k_cgen_cpu_open (enum cgen_cpu_open_arg arg_type, ...)
1046
{
1047
  CGEN_CPU_TABLE *cd = (CGEN_CPU_TABLE *) xmalloc (sizeof (CGEN_CPU_TABLE));
1048
  static int init_p;
1049
  CGEN_BITSET *isas = 0;  /* 0 = "unspecified" */
1050
  unsigned int machs = 0; /* 0 = "unspecified" */
1051
  enum cgen_endian endian = CGEN_ENDIAN_UNKNOWN;
1052
  va_list ap;
1053
 
1054
  if (! init_p)
1055
    {
1056
      init_tables ();
1057
      init_p = 1;
1058
    }
1059
 
1060
  memset (cd, 0, sizeof (*cd));
1061
 
1062
  va_start (ap, arg_type);
1063
  while (arg_type != CGEN_CPU_OPEN_END)
1064
    {
1065
      switch (arg_type)
1066
        {
1067
        case CGEN_CPU_OPEN_ISAS :
1068
          isas = va_arg (ap, CGEN_BITSET *);
1069
          break;
1070
        case CGEN_CPU_OPEN_MACHS :
1071
          machs = va_arg (ap, unsigned int);
1072
          break;
1073
        case CGEN_CPU_OPEN_BFDMACH :
1074
          {
1075
            const char *name = va_arg (ap, const char *);
1076
            const CGEN_MACH *mach =
1077
              lookup_mach_via_bfd_name (ip2k_cgen_mach_table, name);
1078
 
1079
            machs |= 1 << mach->num;
1080
            break;
1081
          }
1082
        case CGEN_CPU_OPEN_ENDIAN :
1083
          endian = va_arg (ap, enum cgen_endian);
1084
          break;
1085
        default :
1086
          fprintf (stderr, "ip2k_cgen_cpu_open: unsupported argument `%d'\n",
1087
                   arg_type);
1088
          abort (); /* ??? return NULL? */
1089
        }
1090
      arg_type = va_arg (ap, enum cgen_cpu_open_arg);
1091
    }
1092
  va_end (ap);
1093
 
1094
  /* Mach unspecified means "all".  */
1095
  if (machs == 0)
1096
    machs = (1 << MAX_MACHS) - 1;
1097
  /* Base mach is always selected.  */
1098
  machs |= 1;
1099
  if (endian == CGEN_ENDIAN_UNKNOWN)
1100
    {
1101
      /* ??? If target has only one, could have a default.  */
1102
      fprintf (stderr, "ip2k_cgen_cpu_open: no endianness specified\n");
1103
      abort ();
1104
    }
1105
 
1106
  cd->isas = cgen_bitset_copy (isas);
1107
  cd->machs = machs;
1108
  cd->endian = endian;
1109
  /* FIXME: for the sparc case we can determine insn-endianness statically.
1110
     The worry here is where both data and insn endian can be independently
1111
     chosen, in which case this function will need another argument.
1112
     Actually, will want to allow for more arguments in the future anyway.  */
1113
  cd->insn_endian = endian;
1114
 
1115
  /* Table (re)builder.  */
1116
  cd->rebuild_tables = ip2k_cgen_rebuild_tables;
1117
  ip2k_cgen_rebuild_tables (cd);
1118
 
1119
  /* Default to not allowing signed overflow.  */
1120
  cd->signed_overflow_ok_p = 0;
1121
 
1122
  return (CGEN_CPU_DESC) cd;
1123
}
1124
 
1125
/* Cover fn to ip2k_cgen_cpu_open to handle the simple case of 1 isa, 1 mach.
1126
   MACH_NAME is the bfd name of the mach.  */
1127
 
1128
CGEN_CPU_DESC
1129
ip2k_cgen_cpu_open_1 (const char *mach_name, enum cgen_endian endian)
1130
{
1131
  return ip2k_cgen_cpu_open (CGEN_CPU_OPEN_BFDMACH, mach_name,
1132
                               CGEN_CPU_OPEN_ENDIAN, endian,
1133
                               CGEN_CPU_OPEN_END);
1134
}
1135
 
1136
/* Close a cpu table.
1137
   ??? This can live in a machine independent file, but there's currently
1138
   no place to put this file (there's no libcgen).  libopcodes is the wrong
1139
   place as some simulator ports use this but they don't use libopcodes.  */
1140
 
1141
void
1142
ip2k_cgen_cpu_close (CGEN_CPU_DESC cd)
1143
{
1144
  unsigned int i;
1145
  const CGEN_INSN *insns;
1146
 
1147
  if (cd->macro_insn_table.init_entries)
1148
    {
1149
      insns = cd->macro_insn_table.init_entries;
1150
      for (i = 0; i < cd->macro_insn_table.num_init_entries; ++i, ++insns)
1151
        if (CGEN_INSN_RX ((insns)))
1152
          regfree (CGEN_INSN_RX (insns));
1153
    }
1154
 
1155
  if (cd->insn_table.init_entries)
1156
    {
1157
      insns = cd->insn_table.init_entries;
1158
      for (i = 0; i < cd->insn_table.num_init_entries; ++i, ++insns)
1159
        if (CGEN_INSN_RX (insns))
1160
          regfree (CGEN_INSN_RX (insns));
1161
    }
1162
 
1163
  if (cd->macro_insn_table.init_entries)
1164
    free ((CGEN_INSN *) cd->macro_insn_table.init_entries);
1165
 
1166
  if (cd->insn_table.init_entries)
1167
    free ((CGEN_INSN *) cd->insn_table.init_entries);
1168
 
1169
  if (cd->hw_table.entries)
1170
    free ((CGEN_HW_ENTRY *) cd->hw_table.entries);
1171
 
1172
  if (cd->operand_table.entries)
1173
    free ((CGEN_HW_ENTRY *) cd->operand_table.entries);
1174
 
1175
  free (cd);
1176
}
1177
 

powered by: WebSVN 2.1.0

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