Tidy up code. Switch to ISO C
[binutils.git] / opcodes / fr30-desc.c
blob3309d54cf03ca3f2b9eea85d90ecc8310027a7bd
1 /* CPU data for fr30.
3 THIS FILE IS MACHINE GENERATED WITH CGEN.
5 Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
7 This file is part of the GNU Binutils and/or GDB, the GNU debugger.
9 This program 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 2, or (at your option)
12 any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
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 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
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 "fr30-desc.h"
32 #include "fr30-opc.h"
33 #include "opintl.h"
34 #include "libiberty.h"
35 #include "xregex.h"
37 /* Attributes. */
39 static const CGEN_ATTR_ENTRY bool_attr[] =
41 { "#f", 0 },
42 { "#t", 1 },
43 { 0, 0 }
46 static const CGEN_ATTR_ENTRY MACH_attr[] =
48 { "base", MACH_BASE },
49 { "fr30", MACH_FR30 },
50 { "max", MACH_MAX },
51 { 0, 0 }
54 static const CGEN_ATTR_ENTRY ISA_attr[] =
56 { "fr30", ISA_FR30 },
57 { "max", ISA_MAX },
58 { 0, 0 }
61 const CGEN_ATTR_TABLE fr30_cgen_ifield_attr_table[] =
63 { "MACH", & MACH_attr[0], & MACH_attr[0] },
64 { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
65 { "PCREL-ADDR", &bool_attr[0], &bool_attr[0] },
66 { "ABS-ADDR", &bool_attr[0], &bool_attr[0] },
67 { "RESERVED", &bool_attr[0], &bool_attr[0] },
68 { "SIGN-OPT", &bool_attr[0], &bool_attr[0] },
69 { "SIGNED", &bool_attr[0], &bool_attr[0] },
70 { 0, 0, 0 }
73 const CGEN_ATTR_TABLE fr30_cgen_hardware_attr_table[] =
75 { "MACH", & MACH_attr[0], & MACH_attr[0] },
76 { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
77 { "CACHE-ADDR", &bool_attr[0], &bool_attr[0] },
78 { "PC", &bool_attr[0], &bool_attr[0] },
79 { "PROFILE", &bool_attr[0], &bool_attr[0] },
80 { 0, 0, 0 }
83 const CGEN_ATTR_TABLE fr30_cgen_operand_attr_table[] =
85 { "MACH", & MACH_attr[0], & MACH_attr[0] },
86 { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
87 { "PCREL-ADDR", &bool_attr[0], &bool_attr[0] },
88 { "ABS-ADDR", &bool_attr[0], &bool_attr[0] },
89 { "SIGN-OPT", &bool_attr[0], &bool_attr[0] },
90 { "SIGNED", &bool_attr[0], &bool_attr[0] },
91 { "NEGATIVE", &bool_attr[0], &bool_attr[0] },
92 { "RELAX", &bool_attr[0], &bool_attr[0] },
93 { "SEM-ONLY", &bool_attr[0], &bool_attr[0] },
94 { "HASH-PREFIX", &bool_attr[0], &bool_attr[0] },
95 { 0, 0, 0 }
98 const CGEN_ATTR_TABLE fr30_cgen_insn_attr_table[] =
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 { "NOT-IN-DELAY-SLOT", &bool_attr[0], &bool_attr[0] },
112 { 0, 0, 0 }
115 /* Instruction set variants. */
117 static const CGEN_ISA fr30_cgen_isa_table[] = {
118 { "fr30", 16, 16, 16, 48 },
119 { 0, 0, 0, 0, 0 }
122 /* Machine variants. */
124 static const CGEN_MACH fr30_cgen_mach_table[] = {
125 { "fr30", "fr30", MACH_FR30, 0 },
126 { 0, 0, 0, 0 }
129 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_gr_names_entries[] =
131 { "r0", 0, {0, {0}}, 0, 0 },
132 { "r1", 1, {0, {0}}, 0, 0 },
133 { "r2", 2, {0, {0}}, 0, 0 },
134 { "r3", 3, {0, {0}}, 0, 0 },
135 { "r4", 4, {0, {0}}, 0, 0 },
136 { "r5", 5, {0, {0}}, 0, 0 },
137 { "r6", 6, {0, {0}}, 0, 0 },
138 { "r7", 7, {0, {0}}, 0, 0 },
139 { "r8", 8, {0, {0}}, 0, 0 },
140 { "r9", 9, {0, {0}}, 0, 0 },
141 { "r10", 10, {0, {0}}, 0, 0 },
142 { "r11", 11, {0, {0}}, 0, 0 },
143 { "r12", 12, {0, {0}}, 0, 0 },
144 { "r13", 13, {0, {0}}, 0, 0 },
145 { "r14", 14, {0, {0}}, 0, 0 },
146 { "r15", 15, {0, {0}}, 0, 0 },
147 { "ac", 13, {0, {0}}, 0, 0 },
148 { "fp", 14, {0, {0}}, 0, 0 },
149 { "sp", 15, {0, {0}}, 0, 0 }
152 CGEN_KEYWORD fr30_cgen_opval_gr_names =
154 & fr30_cgen_opval_gr_names_entries[0],
156 0, 0, 0, 0, ""
159 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_cr_names_entries[] =
161 { "cr0", 0, {0, {0}}, 0, 0 },
162 { "cr1", 1, {0, {0}}, 0, 0 },
163 { "cr2", 2, {0, {0}}, 0, 0 },
164 { "cr3", 3, {0, {0}}, 0, 0 },
165 { "cr4", 4, {0, {0}}, 0, 0 },
166 { "cr5", 5, {0, {0}}, 0, 0 },
167 { "cr6", 6, {0, {0}}, 0, 0 },
168 { "cr7", 7, {0, {0}}, 0, 0 },
169 { "cr8", 8, {0, {0}}, 0, 0 },
170 { "cr9", 9, {0, {0}}, 0, 0 },
171 { "cr10", 10, {0, {0}}, 0, 0 },
172 { "cr11", 11, {0, {0}}, 0, 0 },
173 { "cr12", 12, {0, {0}}, 0, 0 },
174 { "cr13", 13, {0, {0}}, 0, 0 },
175 { "cr14", 14, {0, {0}}, 0, 0 },
176 { "cr15", 15, {0, {0}}, 0, 0 }
179 CGEN_KEYWORD fr30_cgen_opval_cr_names =
181 & fr30_cgen_opval_cr_names_entries[0],
183 0, 0, 0, 0, ""
186 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_dr_names_entries[] =
188 { "tbr", 0, {0, {0}}, 0, 0 },
189 { "rp", 1, {0, {0}}, 0, 0 },
190 { "ssp", 2, {0, {0}}, 0, 0 },
191 { "usp", 3, {0, {0}}, 0, 0 },
192 { "mdh", 4, {0, {0}}, 0, 0 },
193 { "mdl", 5, {0, {0}}, 0, 0 }
196 CGEN_KEYWORD fr30_cgen_opval_dr_names =
198 & fr30_cgen_opval_dr_names_entries[0],
200 0, 0, 0, 0, ""
203 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_h_ps_entries[] =
205 { "ps", 0, {0, {0}}, 0, 0 }
208 CGEN_KEYWORD fr30_cgen_opval_h_ps =
210 & fr30_cgen_opval_h_ps_entries[0],
212 0, 0, 0, 0, ""
215 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_h_r13_entries[] =
217 { "r13", 0, {0, {0}}, 0, 0 }
220 CGEN_KEYWORD fr30_cgen_opval_h_r13 =
222 & fr30_cgen_opval_h_r13_entries[0],
224 0, 0, 0, 0, ""
227 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_h_r14_entries[] =
229 { "r14", 0, {0, {0}}, 0, 0 }
232 CGEN_KEYWORD fr30_cgen_opval_h_r14 =
234 & fr30_cgen_opval_h_r14_entries[0],
236 0, 0, 0, 0, ""
239 static CGEN_KEYWORD_ENTRY fr30_cgen_opval_h_r15_entries[] =
241 { "r15", 0, {0, {0}}, 0, 0 }
244 CGEN_KEYWORD fr30_cgen_opval_h_r15 =
246 & fr30_cgen_opval_h_r15_entries[0],
248 0, 0, 0, 0, ""
252 /* The hardware table. */
254 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
255 #define A(a) (1 << CGEN_HW_##a)
256 #else
257 #define A(a) (1 << CGEN_HW_/**/a)
258 #endif
260 const CGEN_HW_ENTRY fr30_cgen_hw_table[] =
262 { "h-memory", HW_H_MEMORY, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
263 { "h-sint", HW_H_SINT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
264 { "h-uint", HW_H_UINT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
265 { "h-addr", HW_H_ADDR, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
266 { "h-iaddr", HW_H_IADDR, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
267 { "h-pc", HW_H_PC, CGEN_ASM_NONE, 0, { 0|A(PROFILE)|A(PC), { (1<<MACH_BASE) } } },
268 { "h-gr", HW_H_GR, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_gr_names, { 0|A(CACHE_ADDR)|A(PROFILE), { (1<<MACH_BASE) } } },
269 { "h-cr", HW_H_CR, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_cr_names, { 0, { (1<<MACH_BASE) } } },
270 { "h-dr", HW_H_DR, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_dr_names, { 0, { (1<<MACH_BASE) } } },
271 { "h-ps", HW_H_PS, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_h_ps, { 0, { (1<<MACH_BASE) } } },
272 { "h-r13", HW_H_R13, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_h_r13, { 0, { (1<<MACH_BASE) } } },
273 { "h-r14", HW_H_R14, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_h_r14, { 0, { (1<<MACH_BASE) } } },
274 { "h-r15", HW_H_R15, CGEN_ASM_KEYWORD, (PTR) & fr30_cgen_opval_h_r15, { 0, { (1<<MACH_BASE) } } },
275 { "h-nbit", HW_H_NBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
276 { "h-zbit", HW_H_ZBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
277 { "h-vbit", HW_H_VBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
278 { "h-cbit", HW_H_CBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
279 { "h-ibit", HW_H_IBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
280 { "h-sbit", HW_H_SBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
281 { "h-tbit", HW_H_TBIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
282 { "h-d0bit", HW_H_D0BIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
283 { "h-d1bit", HW_H_D1BIT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
284 { "h-ccr", HW_H_CCR, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
285 { "h-scr", HW_H_SCR, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
286 { "h-ilm", HW_H_ILM, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
287 { 0, 0, CGEN_ASM_NONE, 0, {0, {0}} }
290 #undef A
293 /* The instruction field table. */
295 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
296 #define A(a) (1 << CGEN_IFLD_##a)
297 #else
298 #define A(a) (1 << CGEN_IFLD_/**/a)
299 #endif
301 const CGEN_IFLD fr30_cgen_ifld_table[] =
303 { FR30_F_NIL, "f-nil", 0, 0, 0, 0, { 0, { (1<<MACH_BASE) } } },
304 { FR30_F_ANYOF, "f-anyof", 0, 0, 0, 0, { 0, { (1<<MACH_BASE) } } },
305 { FR30_F_OP1, "f-op1", 0, 16, 0, 4, { 0, { (1<<MACH_BASE) } } },
306 { FR30_F_OP2, "f-op2", 0, 16, 4, 4, { 0, { (1<<MACH_BASE) } } },
307 { FR30_F_OP3, "f-op3", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
308 { FR30_F_OP4, "f-op4", 0, 16, 12, 4, { 0, { (1<<MACH_BASE) } } },
309 { FR30_F_OP5, "f-op5", 0, 16, 4, 1, { 0, { (1<<MACH_BASE) } } },
310 { FR30_F_CC, "f-cc", 0, 16, 4, 4, { 0, { (1<<MACH_BASE) } } },
311 { FR30_F_CCC, "f-ccc", 16, 16, 0, 8, { 0, { (1<<MACH_BASE) } } },
312 { FR30_F_RJ, "f-Rj", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
313 { FR30_F_RI, "f-Ri", 0, 16, 12, 4, { 0, { (1<<MACH_BASE) } } },
314 { FR30_F_RS1, "f-Rs1", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
315 { FR30_F_RS2, "f-Rs2", 0, 16, 12, 4, { 0, { (1<<MACH_BASE) } } },
316 { FR30_F_RJC, "f-Rjc", 16, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
317 { FR30_F_RIC, "f-Ric", 16, 16, 12, 4, { 0, { (1<<MACH_BASE) } } },
318 { FR30_F_CRJ, "f-CRj", 16, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
319 { FR30_F_CRI, "f-CRi", 16, 16, 12, 4, { 0, { (1<<MACH_BASE) } } },
320 { FR30_F_U4, "f-u4", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
321 { FR30_F_U4C, "f-u4c", 0, 16, 12, 4, { 0, { (1<<MACH_BASE) } } },
322 { FR30_F_I4, "f-i4", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
323 { FR30_F_M4, "f-m4", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
324 { FR30_F_U8, "f-u8", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
325 { FR30_F_I8, "f-i8", 0, 16, 4, 8, { 0, { (1<<MACH_BASE) } } },
326 { FR30_F_I20_4, "f-i20-4", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
327 { FR30_F_I20_16, "f-i20-16", 16, 16, 0, 16, { 0, { (1<<MACH_BASE) } } },
328 { FR30_F_I20, "f-i20", 0, 0, 0, 0,{ 0|A(VIRTUAL), { (1<<MACH_BASE) } } },
329 { FR30_F_I32, "f-i32", 16, 32, 0, 32, { 0|A(SIGN_OPT), { (1<<MACH_BASE) } } },
330 { FR30_F_UDISP6, "f-udisp6", 0, 16, 8, 4, { 0, { (1<<MACH_BASE) } } },
331 { FR30_F_DISP8, "f-disp8", 0, 16, 4, 8, { 0, { (1<<MACH_BASE) } } },
332 { FR30_F_DISP9, "f-disp9", 0, 16, 4, 8, { 0, { (1<<MACH_BASE) } } },
333 { FR30_F_DISP10, "f-disp10", 0, 16, 4, 8, { 0, { (1<<MACH_BASE) } } },
334 { FR30_F_S10, "f-s10", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
335 { FR30_F_U10, "f-u10", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
336 { FR30_F_REL9, "f-rel9", 0, 16, 8, 8, { 0|A(PCREL_ADDR), { (1<<MACH_BASE) } } },
337 { FR30_F_DIR8, "f-dir8", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
338 { FR30_F_DIR9, "f-dir9", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
339 { FR30_F_DIR10, "f-dir10", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
340 { FR30_F_REL12, "f-rel12", 0, 16, 5, 11, { 0|A(PCREL_ADDR), { (1<<MACH_BASE) } } },
341 { FR30_F_REGLIST_HI_ST, "f-reglist_hi_st", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
342 { FR30_F_REGLIST_LOW_ST, "f-reglist_low_st", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
343 { FR30_F_REGLIST_HI_LD, "f-reglist_hi_ld", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
344 { FR30_F_REGLIST_LOW_LD, "f-reglist_low_ld", 0, 16, 8, 8, { 0, { (1<<MACH_BASE) } } },
345 { 0, 0, 0, 0, 0, 0, {0, {0}} }
348 #undef A
352 /* multi ifield declarations */
354 const CGEN_MAYBE_MULTI_IFLD FR30_F_I20_MULTI_IFIELD [];
357 /* multi ifield definitions */
359 const CGEN_MAYBE_MULTI_IFLD FR30_F_I20_MULTI_IFIELD [] =
361 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_I20_4] } },
362 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_I20_16] } },
363 { 0, { (const PTR) 0 } }
366 /* The operand table. */
368 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
369 #define A(a) (1 << CGEN_OPERAND_##a)
370 #else
371 #define A(a) (1 << CGEN_OPERAND_/**/a)
372 #endif
373 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
374 #define OPERAND(op) FR30_OPERAND_##op
375 #else
376 #define OPERAND(op) FR30_OPERAND_/**/op
377 #endif
379 const CGEN_OPERAND fr30_cgen_operand_table[] =
381 /* pc: program counter */
382 { "pc", FR30_OPERAND_PC, HW_H_PC, 0, 0,
383 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_NIL] } },
384 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
385 /* Ri: destination register */
386 { "Ri", FR30_OPERAND_RI, HW_H_GR, 12, 4,
387 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_RI] } },
388 { 0, { (1<<MACH_BASE) } } },
389 /* Rj: source register */
390 { "Rj", FR30_OPERAND_RJ, HW_H_GR, 8, 4,
391 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_RJ] } },
392 { 0, { (1<<MACH_BASE) } } },
393 /* Ric: target register coproc insn */
394 { "Ric", FR30_OPERAND_RIC, HW_H_GR, 12, 4,
395 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_RIC] } },
396 { 0, { (1<<MACH_BASE) } } },
397 /* Rjc: source register coproc insn */
398 { "Rjc", FR30_OPERAND_RJC, HW_H_GR, 8, 4,
399 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_RJC] } },
400 { 0, { (1<<MACH_BASE) } } },
401 /* CRi: coprocessor register */
402 { "CRi", FR30_OPERAND_CRI, HW_H_CR, 12, 4,
403 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_CRI] } },
404 { 0, { (1<<MACH_BASE) } } },
405 /* CRj: coprocessor register */
406 { "CRj", FR30_OPERAND_CRJ, HW_H_CR, 8, 4,
407 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_CRJ] } },
408 { 0, { (1<<MACH_BASE) } } },
409 /* Rs1: dedicated register */
410 { "Rs1", FR30_OPERAND_RS1, HW_H_DR, 8, 4,
411 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_RS1] } },
412 { 0, { (1<<MACH_BASE) } } },
413 /* Rs2: dedicated register */
414 { "Rs2", FR30_OPERAND_RS2, HW_H_DR, 12, 4,
415 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_RS2] } },
416 { 0, { (1<<MACH_BASE) } } },
417 /* R13: General Register 13 */
418 { "R13", FR30_OPERAND_R13, HW_H_R13, 0, 0,
419 { 0, { (const PTR) 0 } },
420 { 0, { (1<<MACH_BASE) } } },
421 /* R14: General Register 14 */
422 { "R14", FR30_OPERAND_R14, HW_H_R14, 0, 0,
423 { 0, { (const PTR) 0 } },
424 { 0, { (1<<MACH_BASE) } } },
425 /* R15: General Register 15 */
426 { "R15", FR30_OPERAND_R15, HW_H_R15, 0, 0,
427 { 0, { (const PTR) 0 } },
428 { 0, { (1<<MACH_BASE) } } },
429 /* ps: Program Status register */
430 { "ps", FR30_OPERAND_PS, HW_H_PS, 0, 0,
431 { 0, { (const PTR) 0 } },
432 { 0, { (1<<MACH_BASE) } } },
433 /* u4: 4 bit unsigned immediate */
434 { "u4", FR30_OPERAND_U4, HW_H_UINT, 8, 4,
435 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_U4] } },
436 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
437 /* u4c: 4 bit unsigned immediate */
438 { "u4c", FR30_OPERAND_U4C, HW_H_UINT, 12, 4,
439 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_U4C] } },
440 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
441 /* u8: 8 bit unsigned immediate */
442 { "u8", FR30_OPERAND_U8, HW_H_UINT, 8, 8,
443 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_U8] } },
444 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
445 /* i8: 8 bit unsigned immediate */
446 { "i8", FR30_OPERAND_I8, HW_H_UINT, 4, 8,
447 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_I8] } },
448 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
449 /* udisp6: 6 bit unsigned immediate */
450 { "udisp6", FR30_OPERAND_UDISP6, HW_H_UINT, 8, 4,
451 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_UDISP6] } },
452 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
453 /* disp8: 8 bit signed immediate */
454 { "disp8", FR30_OPERAND_DISP8, HW_H_SINT, 4, 8,
455 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_DISP8] } },
456 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
457 /* disp9: 9 bit signed immediate */
458 { "disp9", FR30_OPERAND_DISP9, HW_H_SINT, 4, 8,
459 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_DISP9] } },
460 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
461 /* disp10: 10 bit signed immediate */
462 { "disp10", FR30_OPERAND_DISP10, HW_H_SINT, 4, 8,
463 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_DISP10] } },
464 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
465 /* s10: 10 bit signed immediate */
466 { "s10", FR30_OPERAND_S10, HW_H_SINT, 8, 8,
467 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_S10] } },
468 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
469 /* u10: 10 bit unsigned immediate */
470 { "u10", FR30_OPERAND_U10, HW_H_UINT, 8, 8,
471 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_U10] } },
472 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
473 /* i32: 32 bit immediate */
474 { "i32", FR30_OPERAND_I32, HW_H_UINT, 0, 32,
475 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_I32] } },
476 { 0|A(HASH_PREFIX)|A(SIGN_OPT), { (1<<MACH_BASE) } } },
477 /* m4: 4 bit negative immediate */
478 { "m4", FR30_OPERAND_M4, HW_H_SINT, 8, 4,
479 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_M4] } },
480 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
481 /* i20: 20 bit immediate */
482 { "i20", FR30_OPERAND_I20, HW_H_UINT, 0, 20,
483 { 2, { (const PTR) &FR30_F_I20_MULTI_IFIELD[0] } },
484 { 0|A(HASH_PREFIX)|A(VIRTUAL), { (1<<MACH_BASE) } } },
485 /* dir8: 8 bit direct address */
486 { "dir8", FR30_OPERAND_DIR8, HW_H_UINT, 8, 8,
487 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_DIR8] } },
488 { 0, { (1<<MACH_BASE) } } },
489 /* dir9: 9 bit direct address */
490 { "dir9", FR30_OPERAND_DIR9, HW_H_UINT, 8, 8,
491 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_DIR9] } },
492 { 0, { (1<<MACH_BASE) } } },
493 /* dir10: 10 bit direct address */
494 { "dir10", FR30_OPERAND_DIR10, HW_H_UINT, 8, 8,
495 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_DIR10] } },
496 { 0, { (1<<MACH_BASE) } } },
497 /* label9: 9 bit pc relative address */
498 { "label9", FR30_OPERAND_LABEL9, HW_H_IADDR, 8, 8,
499 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_REL9] } },
500 { 0|A(PCREL_ADDR), { (1<<MACH_BASE) } } },
501 /* label12: 12 bit pc relative address */
502 { "label12", FR30_OPERAND_LABEL12, HW_H_IADDR, 5, 11,
503 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_REL12] } },
504 { 0|A(PCREL_ADDR), { (1<<MACH_BASE) } } },
505 /* reglist_low_ld: 8 bit low register mask for ldm */
506 { "reglist_low_ld", FR30_OPERAND_REGLIST_LOW_LD, HW_H_UINT, 8, 8,
507 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_REGLIST_LOW_LD] } },
508 { 0, { (1<<MACH_BASE) } } },
509 /* reglist_hi_ld: 8 bit high register mask for ldm */
510 { "reglist_hi_ld", FR30_OPERAND_REGLIST_HI_LD, HW_H_UINT, 8, 8,
511 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_REGLIST_HI_LD] } },
512 { 0, { (1<<MACH_BASE) } } },
513 /* reglist_low_st: 8 bit low register mask for stm */
514 { "reglist_low_st", FR30_OPERAND_REGLIST_LOW_ST, HW_H_UINT, 8, 8,
515 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_REGLIST_LOW_ST] } },
516 { 0, { (1<<MACH_BASE) } } },
517 /* reglist_hi_st: 8 bit high register mask for stm */
518 { "reglist_hi_st", FR30_OPERAND_REGLIST_HI_ST, HW_H_UINT, 8, 8,
519 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_REGLIST_HI_ST] } },
520 { 0, { (1<<MACH_BASE) } } },
521 /* cc: condition codes */
522 { "cc", FR30_OPERAND_CC, HW_H_UINT, 4, 4,
523 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_CC] } },
524 { 0, { (1<<MACH_BASE) } } },
525 /* ccc: coprocessor calc */
526 { "ccc", FR30_OPERAND_CCC, HW_H_UINT, 0, 8,
527 { 0, { (const PTR) &fr30_cgen_ifld_table[FR30_F_CCC] } },
528 { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } } },
529 /* nbit: negative bit */
530 { "nbit", FR30_OPERAND_NBIT, HW_H_NBIT, 0, 0,
531 { 0, { (const PTR) 0 } },
532 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
533 /* vbit: overflow bit */
534 { "vbit", FR30_OPERAND_VBIT, HW_H_VBIT, 0, 0,
535 { 0, { (const PTR) 0 } },
536 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
537 /* zbit: zero bit */
538 { "zbit", FR30_OPERAND_ZBIT, HW_H_ZBIT, 0, 0,
539 { 0, { (const PTR) 0 } },
540 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
541 /* cbit: carry bit */
542 { "cbit", FR30_OPERAND_CBIT, HW_H_CBIT, 0, 0,
543 { 0, { (const PTR) 0 } },
544 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
545 /* ibit: interrupt bit */
546 { "ibit", FR30_OPERAND_IBIT, HW_H_IBIT, 0, 0,
547 { 0, { (const PTR) 0 } },
548 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
549 /* sbit: stack bit */
550 { "sbit", FR30_OPERAND_SBIT, HW_H_SBIT, 0, 0,
551 { 0, { (const PTR) 0 } },
552 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
553 /* tbit: trace trap bit */
554 { "tbit", FR30_OPERAND_TBIT, HW_H_TBIT, 0, 0,
555 { 0, { (const PTR) 0 } },
556 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
557 /* d0bit: division 0 bit */
558 { "d0bit", FR30_OPERAND_D0BIT, HW_H_D0BIT, 0, 0,
559 { 0, { (const PTR) 0 } },
560 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
561 /* d1bit: division 1 bit */
562 { "d1bit", FR30_OPERAND_D1BIT, HW_H_D1BIT, 0, 0,
563 { 0, { (const PTR) 0 } },
564 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
565 /* ccr: condition code bits */
566 { "ccr", FR30_OPERAND_CCR, HW_H_CCR, 0, 0,
567 { 0, { (const PTR) 0 } },
568 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
569 /* scr: system condition bits */
570 { "scr", FR30_OPERAND_SCR, HW_H_SCR, 0, 0,
571 { 0, { (const PTR) 0 } },
572 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
573 /* ilm: interrupt level mask */
574 { "ilm", FR30_OPERAND_ILM, HW_H_ILM, 0, 0,
575 { 0, { (const PTR) 0 } },
576 { 0|A(SEM_ONLY), { (1<<MACH_BASE) } } },
577 /* sentinel */
578 { 0, 0, 0, 0, 0,
579 { 0, { (const PTR) 0 } },
580 { 0, { 0 } } }
583 #undef A
586 /* The instruction table. */
588 #define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field))
589 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
590 #define A(a) (1 << CGEN_INSN_##a)
591 #else
592 #define A(a) (1 << CGEN_INSN_/**/a)
593 #endif
595 static const CGEN_IBASE fr30_cgen_insn_table[MAX_INSNS] =
597 /* Special null first entry.
598 A `num' value of zero is thus invalid.
599 Also, the special `invalid' insn resides here. */
600 { 0, 0, 0, 0, {0, {0}} },
601 /* add $Rj,$Ri */
603 FR30_INSN_ADD, "add", "add", 16,
604 { 0, { (1<<MACH_BASE) } }
606 /* add $u4,$Ri */
608 FR30_INSN_ADDI, "addi", "add", 16,
609 { 0, { (1<<MACH_BASE) } }
611 /* add2 $m4,$Ri */
613 FR30_INSN_ADD2, "add2", "add2", 16,
614 { 0, { (1<<MACH_BASE) } }
616 /* addc $Rj,$Ri */
618 FR30_INSN_ADDC, "addc", "addc", 16,
619 { 0, { (1<<MACH_BASE) } }
621 /* addn $Rj,$Ri */
623 FR30_INSN_ADDN, "addn", "addn", 16,
624 { 0, { (1<<MACH_BASE) } }
626 /* addn $u4,$Ri */
628 FR30_INSN_ADDNI, "addni", "addn", 16,
629 { 0, { (1<<MACH_BASE) } }
631 /* addn2 $m4,$Ri */
633 FR30_INSN_ADDN2, "addn2", "addn2", 16,
634 { 0, { (1<<MACH_BASE) } }
636 /* sub $Rj,$Ri */
638 FR30_INSN_SUB, "sub", "sub", 16,
639 { 0, { (1<<MACH_BASE) } }
641 /* subc $Rj,$Ri */
643 FR30_INSN_SUBC, "subc", "subc", 16,
644 { 0, { (1<<MACH_BASE) } }
646 /* subn $Rj,$Ri */
648 FR30_INSN_SUBN, "subn", "subn", 16,
649 { 0, { (1<<MACH_BASE) } }
651 /* cmp $Rj,$Ri */
653 FR30_INSN_CMP, "cmp", "cmp", 16,
654 { 0, { (1<<MACH_BASE) } }
656 /* cmp $u4,$Ri */
658 FR30_INSN_CMPI, "cmpi", "cmp", 16,
659 { 0, { (1<<MACH_BASE) } }
661 /* cmp2 $m4,$Ri */
663 FR30_INSN_CMP2, "cmp2", "cmp2", 16,
664 { 0, { (1<<MACH_BASE) } }
666 /* and $Rj,$Ri */
668 FR30_INSN_AND, "and", "and", 16,
669 { 0, { (1<<MACH_BASE) } }
671 /* or $Rj,$Ri */
673 FR30_INSN_OR, "or", "or", 16,
674 { 0, { (1<<MACH_BASE) } }
676 /* eor $Rj,$Ri */
678 FR30_INSN_EOR, "eor", "eor", 16,
679 { 0, { (1<<MACH_BASE) } }
681 /* and $Rj,@$Ri */
683 FR30_INSN_ANDM, "andm", "and", 16,
684 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
686 /* andh $Rj,@$Ri */
688 FR30_INSN_ANDH, "andh", "andh", 16,
689 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
691 /* andb $Rj,@$Ri */
693 FR30_INSN_ANDB, "andb", "andb", 16,
694 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
696 /* or $Rj,@$Ri */
698 FR30_INSN_ORM, "orm", "or", 16,
699 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
701 /* orh $Rj,@$Ri */
703 FR30_INSN_ORH, "orh", "orh", 16,
704 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
706 /* orb $Rj,@$Ri */
708 FR30_INSN_ORB, "orb", "orb", 16,
709 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
711 /* eor $Rj,@$Ri */
713 FR30_INSN_EORM, "eorm", "eor", 16,
714 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
716 /* eorh $Rj,@$Ri */
718 FR30_INSN_EORH, "eorh", "eorh", 16,
719 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
721 /* eorb $Rj,@$Ri */
723 FR30_INSN_EORB, "eorb", "eorb", 16,
724 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
726 /* bandl $u4,@$Ri */
728 FR30_INSN_BANDL, "bandl", "bandl", 16,
729 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
731 /* borl $u4,@$Ri */
733 FR30_INSN_BORL, "borl", "borl", 16,
734 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
736 /* beorl $u4,@$Ri */
738 FR30_INSN_BEORL, "beorl", "beorl", 16,
739 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
741 /* bandh $u4,@$Ri */
743 FR30_INSN_BANDH, "bandh", "bandh", 16,
744 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
746 /* borh $u4,@$Ri */
748 FR30_INSN_BORH, "borh", "borh", 16,
749 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
751 /* beorh $u4,@$Ri */
753 FR30_INSN_BEORH, "beorh", "beorh", 16,
754 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
756 /* btstl $u4,@$Ri */
758 FR30_INSN_BTSTL, "btstl", "btstl", 16,
759 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
761 /* btsth $u4,@$Ri */
763 FR30_INSN_BTSTH, "btsth", "btsth", 16,
764 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
766 /* mul $Rj,$Ri */
768 FR30_INSN_MUL, "mul", "mul", 16,
769 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
771 /* mulu $Rj,$Ri */
773 FR30_INSN_MULU, "mulu", "mulu", 16,
774 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
776 /* mulh $Rj,$Ri */
778 FR30_INSN_MULH, "mulh", "mulh", 16,
779 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
781 /* muluh $Rj,$Ri */
783 FR30_INSN_MULUH, "muluh", "muluh", 16,
784 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
786 /* div0s $Ri */
788 FR30_INSN_DIV0S, "div0s", "div0s", 16,
789 { 0, { (1<<MACH_BASE) } }
791 /* div0u $Ri */
793 FR30_INSN_DIV0U, "div0u", "div0u", 16,
794 { 0, { (1<<MACH_BASE) } }
796 /* div1 $Ri */
798 FR30_INSN_DIV1, "div1", "div1", 16,
799 { 0, { (1<<MACH_BASE) } }
801 /* div2 $Ri */
803 FR30_INSN_DIV2, "div2", "div2", 16,
804 { 0, { (1<<MACH_BASE) } }
806 /* div3 */
808 FR30_INSN_DIV3, "div3", "div3", 16,
809 { 0, { (1<<MACH_BASE) } }
811 /* div4s */
813 FR30_INSN_DIV4S, "div4s", "div4s", 16,
814 { 0, { (1<<MACH_BASE) } }
816 /* lsl $Rj,$Ri */
818 FR30_INSN_LSL, "lsl", "lsl", 16,
819 { 0, { (1<<MACH_BASE) } }
821 /* lsl $u4,$Ri */
823 FR30_INSN_LSLI, "lsli", "lsl", 16,
824 { 0, { (1<<MACH_BASE) } }
826 /* lsl2 $u4,$Ri */
828 FR30_INSN_LSL2, "lsl2", "lsl2", 16,
829 { 0, { (1<<MACH_BASE) } }
831 /* lsr $Rj,$Ri */
833 FR30_INSN_LSR, "lsr", "lsr", 16,
834 { 0, { (1<<MACH_BASE) } }
836 /* lsr $u4,$Ri */
838 FR30_INSN_LSRI, "lsri", "lsr", 16,
839 { 0, { (1<<MACH_BASE) } }
841 /* lsr2 $u4,$Ri */
843 FR30_INSN_LSR2, "lsr2", "lsr2", 16,
844 { 0, { (1<<MACH_BASE) } }
846 /* asr $Rj,$Ri */
848 FR30_INSN_ASR, "asr", "asr", 16,
849 { 0, { (1<<MACH_BASE) } }
851 /* asr $u4,$Ri */
853 FR30_INSN_ASRI, "asri", "asr", 16,
854 { 0, { (1<<MACH_BASE) } }
856 /* asr2 $u4,$Ri */
858 FR30_INSN_ASR2, "asr2", "asr2", 16,
859 { 0, { (1<<MACH_BASE) } }
861 /* ldi:8 $i8,$Ri */
863 FR30_INSN_LDI8, "ldi8", "ldi:8", 16,
864 { 0, { (1<<MACH_BASE) } }
866 /* ldi:20 $i20,$Ri */
868 FR30_INSN_LDI20, "ldi20", "ldi:20", 32,
869 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
871 /* ldi:32 $i32,$Ri */
873 FR30_INSN_LDI32, "ldi32", "ldi:32", 48,
874 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
876 /* ld @$Rj,$Ri */
878 FR30_INSN_LD, "ld", "ld", 16,
879 { 0, { (1<<MACH_BASE) } }
881 /* lduh @$Rj,$Ri */
883 FR30_INSN_LDUH, "lduh", "lduh", 16,
884 { 0, { (1<<MACH_BASE) } }
886 /* ldub @$Rj,$Ri */
888 FR30_INSN_LDUB, "ldub", "ldub", 16,
889 { 0, { (1<<MACH_BASE) } }
891 /* ld @($R13,$Rj),$Ri */
893 FR30_INSN_LDR13, "ldr13", "ld", 16,
894 { 0, { (1<<MACH_BASE) } }
896 /* lduh @($R13,$Rj),$Ri */
898 FR30_INSN_LDR13UH, "ldr13uh", "lduh", 16,
899 { 0, { (1<<MACH_BASE) } }
901 /* ldub @($R13,$Rj),$Ri */
903 FR30_INSN_LDR13UB, "ldr13ub", "ldub", 16,
904 { 0, { (1<<MACH_BASE) } }
906 /* ld @($R14,$disp10),$Ri */
908 FR30_INSN_LDR14, "ldr14", "ld", 16,
909 { 0, { (1<<MACH_BASE) } }
911 /* lduh @($R14,$disp9),$Ri */
913 FR30_INSN_LDR14UH, "ldr14uh", "lduh", 16,
914 { 0, { (1<<MACH_BASE) } }
916 /* ldub @($R14,$disp8),$Ri */
918 FR30_INSN_LDR14UB, "ldr14ub", "ldub", 16,
919 { 0, { (1<<MACH_BASE) } }
921 /* ld @($R15,$udisp6),$Ri */
923 FR30_INSN_LDR15, "ldr15", "ld", 16,
924 { 0, { (1<<MACH_BASE) } }
926 /* ld @$R15+,$Ri */
928 FR30_INSN_LDR15GR, "ldr15gr", "ld", 16,
929 { 0, { (1<<MACH_BASE) } }
931 /* ld @$R15+,$Rs2 */
933 FR30_INSN_LDR15DR, "ldr15dr", "ld", 16,
934 { 0, { (1<<MACH_BASE) } }
936 /* ld @$R15+,$ps */
938 FR30_INSN_LDR15PS, "ldr15ps", "ld", 16,
939 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
941 /* st $Ri,@$Rj */
943 FR30_INSN_ST, "st", "st", 16,
944 { 0, { (1<<MACH_BASE) } }
946 /* sth $Ri,@$Rj */
948 FR30_INSN_STH, "sth", "sth", 16,
949 { 0, { (1<<MACH_BASE) } }
951 /* stb $Ri,@$Rj */
953 FR30_INSN_STB, "stb", "stb", 16,
954 { 0, { (1<<MACH_BASE) } }
956 /* st $Ri,@($R13,$Rj) */
958 FR30_INSN_STR13, "str13", "st", 16,
959 { 0, { (1<<MACH_BASE) } }
961 /* sth $Ri,@($R13,$Rj) */
963 FR30_INSN_STR13H, "str13h", "sth", 16,
964 { 0, { (1<<MACH_BASE) } }
966 /* stb $Ri,@($R13,$Rj) */
968 FR30_INSN_STR13B, "str13b", "stb", 16,
969 { 0, { (1<<MACH_BASE) } }
971 /* st $Ri,@($R14,$disp10) */
973 FR30_INSN_STR14, "str14", "st", 16,
974 { 0, { (1<<MACH_BASE) } }
976 /* sth $Ri,@($R14,$disp9) */
978 FR30_INSN_STR14H, "str14h", "sth", 16,
979 { 0, { (1<<MACH_BASE) } }
981 /* stb $Ri,@($R14,$disp8) */
983 FR30_INSN_STR14B, "str14b", "stb", 16,
984 { 0, { (1<<MACH_BASE) } }
986 /* st $Ri,@($R15,$udisp6) */
988 FR30_INSN_STR15, "str15", "st", 16,
989 { 0, { (1<<MACH_BASE) } }
991 /* st $Ri,@-$R15 */
993 FR30_INSN_STR15GR, "str15gr", "st", 16,
994 { 0, { (1<<MACH_BASE) } }
996 /* st $Rs2,@-$R15 */
998 FR30_INSN_STR15DR, "str15dr", "st", 16,
999 { 0, { (1<<MACH_BASE) } }
1001 /* st $ps,@-$R15 */
1003 FR30_INSN_STR15PS, "str15ps", "st", 16,
1004 { 0, { (1<<MACH_BASE) } }
1006 /* mov $Rj,$Ri */
1008 FR30_INSN_MOV, "mov", "mov", 16,
1009 { 0, { (1<<MACH_BASE) } }
1011 /* mov $Rs1,$Ri */
1013 FR30_INSN_MOVDR, "movdr", "mov", 16,
1014 { 0, { (1<<MACH_BASE) } }
1016 /* mov $ps,$Ri */
1018 FR30_INSN_MOVPS, "movps", "mov", 16,
1019 { 0, { (1<<MACH_BASE) } }
1021 /* mov $Ri,$Rs1 */
1023 FR30_INSN_MOV2DR, "mov2dr", "mov", 16,
1024 { 0, { (1<<MACH_BASE) } }
1026 /* mov $Ri,$ps */
1028 FR30_INSN_MOV2PS, "mov2ps", "mov", 16,
1029 { 0, { (1<<MACH_BASE) } }
1031 /* jmp @$Ri */
1033 FR30_INSN_JMP, "jmp", "jmp", 16,
1034 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1036 /* jmp:d @$Ri */
1038 FR30_INSN_JMPD, "jmpd", "jmp:d", 16,
1039 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1041 /* call @$Ri */
1043 FR30_INSN_CALLR, "callr", "call", 16,
1044 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1046 /* call:d @$Ri */
1048 FR30_INSN_CALLRD, "callrd", "call:d", 16,
1049 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1051 /* call $label12 */
1053 FR30_INSN_CALL, "call", "call", 16,
1054 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1056 /* call:d $label12 */
1058 FR30_INSN_CALLD, "calld", "call:d", 16,
1059 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1061 /* ret */
1063 FR30_INSN_RET, "ret", "ret", 16,
1064 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1066 /* ret:d */
1068 FR30_INSN_RET_D, "ret:d", "ret:d", 16,
1069 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1071 /* int $u8 */
1073 FR30_INSN_INT, "int", "int", 16,
1074 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1076 /* inte */
1078 FR30_INSN_INTE, "inte", "inte", 16,
1079 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1081 /* reti */
1083 FR30_INSN_RETI, "reti", "reti", 16,
1084 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1086 /* bra:d $label9 */
1088 FR30_INSN_BRAD, "brad", "bra:d", 16,
1089 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1091 /* bra $label9 */
1093 FR30_INSN_BRA, "bra", "bra", 16,
1094 { 0|A(NOT_IN_DELAY_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE) } }
1096 /* bno:d $label9 */
1098 FR30_INSN_BNOD, "bnod", "bno:d", 16,
1099 { 0|A(NOT_IN_DELAY_SLOT)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1101 /* bno $label9 */
1103 FR30_INSN_BNO, "bno", "bno", 16,
1104 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1106 /* beq:d $label9 */
1108 FR30_INSN_BEQD, "beqd", "beq:d", 16,
1109 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1111 /* beq $label9 */
1113 FR30_INSN_BEQ, "beq", "beq", 16,
1114 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1116 /* bne:d $label9 */
1118 FR30_INSN_BNED, "bned", "bne:d", 16,
1119 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1121 /* bne $label9 */
1123 FR30_INSN_BNE, "bne", "bne", 16,
1124 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1126 /* bc:d $label9 */
1128 FR30_INSN_BCD, "bcd", "bc:d", 16,
1129 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1131 /* bc $label9 */
1133 FR30_INSN_BC, "bc", "bc", 16,
1134 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1136 /* bnc:d $label9 */
1138 FR30_INSN_BNCD, "bncd", "bnc:d", 16,
1139 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1141 /* bnc $label9 */
1143 FR30_INSN_BNC, "bnc", "bnc", 16,
1144 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1146 /* bn:d $label9 */
1148 FR30_INSN_BND, "bnd", "bn:d", 16,
1149 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1151 /* bn $label9 */
1153 FR30_INSN_BN, "bn", "bn", 16,
1154 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1156 /* bp:d $label9 */
1158 FR30_INSN_BPD, "bpd", "bp:d", 16,
1159 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1161 /* bp $label9 */
1163 FR30_INSN_BP, "bp", "bp", 16,
1164 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1166 /* bv:d $label9 */
1168 FR30_INSN_BVD, "bvd", "bv:d", 16,
1169 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1171 /* bv $label9 */
1173 FR30_INSN_BV, "bv", "bv", 16,
1174 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1176 /* bnv:d $label9 */
1178 FR30_INSN_BNVD, "bnvd", "bnv:d", 16,
1179 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1181 /* bnv $label9 */
1183 FR30_INSN_BNV, "bnv", "bnv", 16,
1184 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1186 /* blt:d $label9 */
1188 FR30_INSN_BLTD, "bltd", "blt:d", 16,
1189 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1191 /* blt $label9 */
1193 FR30_INSN_BLT, "blt", "blt", 16,
1194 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1196 /* bge:d $label9 */
1198 FR30_INSN_BGED, "bged", "bge:d", 16,
1199 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1201 /* bge $label9 */
1203 FR30_INSN_BGE, "bge", "bge", 16,
1204 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1206 /* ble:d $label9 */
1208 FR30_INSN_BLED, "bled", "ble:d", 16,
1209 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1211 /* ble $label9 */
1213 FR30_INSN_BLE, "ble", "ble", 16,
1214 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1216 /* bgt:d $label9 */
1218 FR30_INSN_BGTD, "bgtd", "bgt:d", 16,
1219 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1221 /* bgt $label9 */
1223 FR30_INSN_BGT, "bgt", "bgt", 16,
1224 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1226 /* bls:d $label9 */
1228 FR30_INSN_BLSD, "blsd", "bls:d", 16,
1229 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1231 /* bls $label9 */
1233 FR30_INSN_BLS, "bls", "bls", 16,
1234 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1236 /* bhi:d $label9 */
1238 FR30_INSN_BHID, "bhid", "bhi:d", 16,
1239 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI)|A(DELAY_SLOT), { (1<<MACH_BASE) } }
1241 /* bhi $label9 */
1243 FR30_INSN_BHI, "bhi", "bhi", 16,
1244 { 0|A(NOT_IN_DELAY_SLOT)|A(COND_CTI), { (1<<MACH_BASE) } }
1246 /* dmov $R13,@$dir10 */
1248 FR30_INSN_DMOVR13, "dmovr13", "dmov", 16,
1249 { 0, { (1<<MACH_BASE) } }
1251 /* dmovh $R13,@$dir9 */
1253 FR30_INSN_DMOVR13H, "dmovr13h", "dmovh", 16,
1254 { 0, { (1<<MACH_BASE) } }
1256 /* dmovb $R13,@$dir8 */
1258 FR30_INSN_DMOVR13B, "dmovr13b", "dmovb", 16,
1259 { 0, { (1<<MACH_BASE) } }
1261 /* dmov @$R13+,@$dir10 */
1263 FR30_INSN_DMOVR13PI, "dmovr13pi", "dmov", 16,
1264 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1266 /* dmovh @$R13+,@$dir9 */
1268 FR30_INSN_DMOVR13PIH, "dmovr13pih", "dmovh", 16,
1269 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1271 /* dmovb @$R13+,@$dir8 */
1273 FR30_INSN_DMOVR13PIB, "dmovr13pib", "dmovb", 16,
1274 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1276 /* dmov @$R15+,@$dir10 */
1278 FR30_INSN_DMOVR15PI, "dmovr15pi", "dmov", 16,
1279 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1281 /* dmov @$dir10,$R13 */
1283 FR30_INSN_DMOV2R13, "dmov2r13", "dmov", 16,
1284 { 0, { (1<<MACH_BASE) } }
1286 /* dmovh @$dir9,$R13 */
1288 FR30_INSN_DMOV2R13H, "dmov2r13h", "dmovh", 16,
1289 { 0, { (1<<MACH_BASE) } }
1291 /* dmovb @$dir8,$R13 */
1293 FR30_INSN_DMOV2R13B, "dmov2r13b", "dmovb", 16,
1294 { 0, { (1<<MACH_BASE) } }
1296 /* dmov @$dir10,@$R13+ */
1298 FR30_INSN_DMOV2R13PI, "dmov2r13pi", "dmov", 16,
1299 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1301 /* dmovh @$dir9,@$R13+ */
1303 FR30_INSN_DMOV2R13PIH, "dmov2r13pih", "dmovh", 16,
1304 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1306 /* dmovb @$dir8,@$R13+ */
1308 FR30_INSN_DMOV2R13PIB, "dmov2r13pib", "dmovb", 16,
1309 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1311 /* dmov @$dir10,@-$R15 */
1313 FR30_INSN_DMOV2R15PD, "dmov2r15pd", "dmov", 16,
1314 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1316 /* ldres @$Ri+,$u4 */
1318 FR30_INSN_LDRES, "ldres", "ldres", 16,
1319 { 0, { (1<<MACH_BASE) } }
1321 /* stres $u4,@$Ri+ */
1323 FR30_INSN_STRES, "stres", "stres", 16,
1324 { 0, { (1<<MACH_BASE) } }
1326 /* copop $u4c,$ccc,$CRj,$CRi */
1328 FR30_INSN_COPOP, "copop", "copop", 32,
1329 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1331 /* copld $u4c,$ccc,$Rjc,$CRi */
1333 FR30_INSN_COPLD, "copld", "copld", 32,
1334 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1336 /* copst $u4c,$ccc,$CRj,$Ric */
1338 FR30_INSN_COPST, "copst", "copst", 32,
1339 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1341 /* copsv $u4c,$ccc,$CRj,$Ric */
1343 FR30_INSN_COPSV, "copsv", "copsv", 32,
1344 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1346 /* nop */
1348 FR30_INSN_NOP, "nop", "nop", 16,
1349 { 0, { (1<<MACH_BASE) } }
1351 /* andccr $u8 */
1353 FR30_INSN_ANDCCR, "andccr", "andccr", 16,
1354 { 0, { (1<<MACH_BASE) } }
1356 /* orccr $u8 */
1358 FR30_INSN_ORCCR, "orccr", "orccr", 16,
1359 { 0, { (1<<MACH_BASE) } }
1361 /* stilm $u8 */
1363 FR30_INSN_STILM, "stilm", "stilm", 16,
1364 { 0, { (1<<MACH_BASE) } }
1366 /* addsp $s10 */
1368 FR30_INSN_ADDSP, "addsp", "addsp", 16,
1369 { 0, { (1<<MACH_BASE) } }
1371 /* extsb $Ri */
1373 FR30_INSN_EXTSB, "extsb", "extsb", 16,
1374 { 0, { (1<<MACH_BASE) } }
1376 /* extub $Ri */
1378 FR30_INSN_EXTUB, "extub", "extub", 16,
1379 { 0, { (1<<MACH_BASE) } }
1381 /* extsh $Ri */
1383 FR30_INSN_EXTSH, "extsh", "extsh", 16,
1384 { 0, { (1<<MACH_BASE) } }
1386 /* extuh $Ri */
1388 FR30_INSN_EXTUH, "extuh", "extuh", 16,
1389 { 0, { (1<<MACH_BASE) } }
1391 /* ldm0 ($reglist_low_ld) */
1393 FR30_INSN_LDM0, "ldm0", "ldm0", 16,
1394 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1396 /* ldm1 ($reglist_hi_ld) */
1398 FR30_INSN_LDM1, "ldm1", "ldm1", 16,
1399 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1401 /* stm0 ($reglist_low_st) */
1403 FR30_INSN_STM0, "stm0", "stm0", 16,
1404 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1406 /* stm1 ($reglist_hi_st) */
1408 FR30_INSN_STM1, "stm1", "stm1", 16,
1409 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1411 /* enter $u10 */
1413 FR30_INSN_ENTER, "enter", "enter", 16,
1414 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1416 /* leave */
1418 FR30_INSN_LEAVE, "leave", "leave", 16,
1419 { 0, { (1<<MACH_BASE) } }
1421 /* xchb @$Rj,$Ri */
1423 FR30_INSN_XCHB, "xchb", "xchb", 16,
1424 { 0|A(NOT_IN_DELAY_SLOT), { (1<<MACH_BASE) } }
1428 #undef OP
1429 #undef A
1431 /* Initialize anything needed to be done once, before any cpu_open call. */
1432 static void init_tables PARAMS ((void));
1434 static void
1435 init_tables ()
1439 static const CGEN_MACH * lookup_mach_via_bfd_name
1440 PARAMS ((const CGEN_MACH *, const char *));
1441 static void build_hw_table PARAMS ((CGEN_CPU_TABLE *));
1442 static void build_ifield_table PARAMS ((CGEN_CPU_TABLE *));
1443 static void build_operand_table PARAMS ((CGEN_CPU_TABLE *));
1444 static void build_insn_table PARAMS ((CGEN_CPU_TABLE *));
1445 static void fr30_cgen_rebuild_tables PARAMS ((CGEN_CPU_TABLE *));
1447 /* Subroutine of fr30_cgen_cpu_open to look up a mach via its bfd name. */
1449 static const CGEN_MACH *
1450 lookup_mach_via_bfd_name (table, name)
1451 const CGEN_MACH *table;
1452 const char *name;
1454 while (table->name)
1456 if (strcmp (name, table->bfd_name) == 0)
1457 return table;
1458 ++table;
1460 abort ();
1463 /* Subroutine of fr30_cgen_cpu_open to build the hardware table. */
1465 static void
1466 build_hw_table (cd)
1467 CGEN_CPU_TABLE *cd;
1469 int i;
1470 int machs = cd->machs;
1471 const CGEN_HW_ENTRY *init = & fr30_cgen_hw_table[0];
1472 /* MAX_HW is only an upper bound on the number of selected entries.
1473 However each entry is indexed by it's enum so there can be holes in
1474 the table. */
1475 const CGEN_HW_ENTRY **selected =
1476 (const CGEN_HW_ENTRY **) xmalloc (MAX_HW * sizeof (CGEN_HW_ENTRY *));
1478 cd->hw_table.init_entries = init;
1479 cd->hw_table.entry_size = sizeof (CGEN_HW_ENTRY);
1480 memset (selected, 0, MAX_HW * sizeof (CGEN_HW_ENTRY *));
1481 /* ??? For now we just use machs to determine which ones we want. */
1482 for (i = 0; init[i].name != NULL; ++i)
1483 if (CGEN_HW_ATTR_VALUE (&init[i], CGEN_HW_MACH)
1484 & machs)
1485 selected[init[i].type] = &init[i];
1486 cd->hw_table.entries = selected;
1487 cd->hw_table.num_entries = MAX_HW;
1490 /* Subroutine of fr30_cgen_cpu_open to build the hardware table. */
1492 static void
1493 build_ifield_table (cd)
1494 CGEN_CPU_TABLE *cd;
1496 cd->ifld_table = & fr30_cgen_ifld_table[0];
1499 /* Subroutine of fr30_cgen_cpu_open to build the hardware table. */
1501 static void
1502 build_operand_table (cd)
1503 CGEN_CPU_TABLE *cd;
1505 int i;
1506 int machs = cd->machs;
1507 const CGEN_OPERAND *init = & fr30_cgen_operand_table[0];
1508 /* MAX_OPERANDS is only an upper bound on the number of selected entries.
1509 However each entry is indexed by it's enum so there can be holes in
1510 the table. */
1511 const CGEN_OPERAND **selected =
1512 (const CGEN_OPERAND **) xmalloc (MAX_OPERANDS * sizeof (CGEN_OPERAND *));
1514 cd->operand_table.init_entries = init;
1515 cd->operand_table.entry_size = sizeof (CGEN_OPERAND);
1516 memset (selected, 0, MAX_OPERANDS * sizeof (CGEN_OPERAND *));
1517 /* ??? For now we just use mach to determine which ones we want. */
1518 for (i = 0; init[i].name != NULL; ++i)
1519 if (CGEN_OPERAND_ATTR_VALUE (&init[i], CGEN_OPERAND_MACH)
1520 & machs)
1521 selected[init[i].type] = &init[i];
1522 cd->operand_table.entries = selected;
1523 cd->operand_table.num_entries = MAX_OPERANDS;
1526 /* Subroutine of fr30_cgen_cpu_open to build the hardware table.
1527 ??? This could leave out insns not supported by the specified mach/isa,
1528 but that would cause errors like "foo only supported by bar" to become
1529 "unknown insn", so for now we include all insns and require the app to
1530 do the checking later.
1531 ??? On the other hand, parsing of such insns may require their hardware or
1532 operand elements to be in the table [which they mightn't be]. */
1534 static void
1535 build_insn_table (cd)
1536 CGEN_CPU_TABLE *cd;
1538 int i;
1539 const CGEN_IBASE *ib = & fr30_cgen_insn_table[0];
1540 CGEN_INSN *insns = (CGEN_INSN *) xmalloc (MAX_INSNS * sizeof (CGEN_INSN));
1542 memset (insns, 0, MAX_INSNS * sizeof (CGEN_INSN));
1543 for (i = 0; i < MAX_INSNS; ++i)
1544 insns[i].base = &ib[i];
1545 cd->insn_table.init_entries = insns;
1546 cd->insn_table.entry_size = sizeof (CGEN_IBASE);
1547 cd->insn_table.num_init_entries = MAX_INSNS;
1550 /* Subroutine of fr30_cgen_cpu_open to rebuild the tables. */
1552 static void
1553 fr30_cgen_rebuild_tables (cd)
1554 CGEN_CPU_TABLE *cd;
1556 int i;
1557 unsigned int isas = cd->isas;
1558 unsigned int machs = cd->machs;
1560 cd->int_insn_p = CGEN_INT_INSN_P;
1562 /* Data derived from the isa spec. */
1563 #define UNSET (CGEN_SIZE_UNKNOWN + 1)
1564 cd->default_insn_bitsize = UNSET;
1565 cd->base_insn_bitsize = UNSET;
1566 cd->min_insn_bitsize = 65535; /* some ridiculously big number */
1567 cd->max_insn_bitsize = 0;
1568 for (i = 0; i < MAX_ISAS; ++i)
1569 if (((1 << i) & isas) != 0)
1571 const CGEN_ISA *isa = & fr30_cgen_isa_table[i];
1573 /* Default insn sizes of all selected isas must be
1574 equal or we set the result to 0, meaning "unknown". */
1575 if (cd->default_insn_bitsize == UNSET)
1576 cd->default_insn_bitsize = isa->default_insn_bitsize;
1577 else if (isa->default_insn_bitsize == cd->default_insn_bitsize)
1578 ; /* this is ok */
1579 else
1580 cd->default_insn_bitsize = CGEN_SIZE_UNKNOWN;
1582 /* Base insn sizes of all selected isas must be equal
1583 or we set the result to 0, meaning "unknown". */
1584 if (cd->base_insn_bitsize == UNSET)
1585 cd->base_insn_bitsize = isa->base_insn_bitsize;
1586 else if (isa->base_insn_bitsize == cd->base_insn_bitsize)
1587 ; /* this is ok */
1588 else
1589 cd->base_insn_bitsize = CGEN_SIZE_UNKNOWN;
1591 /* Set min,max insn sizes. */
1592 if (isa->min_insn_bitsize < cd->min_insn_bitsize)
1593 cd->min_insn_bitsize = isa->min_insn_bitsize;
1594 if (isa->max_insn_bitsize > cd->max_insn_bitsize)
1595 cd->max_insn_bitsize = isa->max_insn_bitsize;
1598 /* Data derived from the mach spec. */
1599 for (i = 0; i < MAX_MACHS; ++i)
1600 if (((1 << i) & machs) != 0)
1602 const CGEN_MACH *mach = & fr30_cgen_mach_table[i];
1604 if (mach->insn_chunk_bitsize != 0)
1606 if (cd->insn_chunk_bitsize != 0 && cd->insn_chunk_bitsize != mach->insn_chunk_bitsize)
1608 fprintf (stderr, "fr30_cgen_rebuild_tables: conflicting insn-chunk-bitsize values: `%d' vs. `%d'\n",
1609 cd->insn_chunk_bitsize, mach->insn_chunk_bitsize);
1610 abort ();
1613 cd->insn_chunk_bitsize = mach->insn_chunk_bitsize;
1617 /* Determine which hw elements are used by MACH. */
1618 build_hw_table (cd);
1620 /* Build the ifield table. */
1621 build_ifield_table (cd);
1623 /* Determine which operands are used by MACH/ISA. */
1624 build_operand_table (cd);
1626 /* Build the instruction table. */
1627 build_insn_table (cd);
1630 /* Initialize a cpu table and return a descriptor.
1631 It's much like opening a file, and must be the first function called.
1632 The arguments are a set of (type/value) pairs, terminated with
1633 CGEN_CPU_OPEN_END.
1635 Currently supported values:
1636 CGEN_CPU_OPEN_ISAS: bitmap of values in enum isa_attr
1637 CGEN_CPU_OPEN_MACHS: bitmap of values in enum mach_attr
1638 CGEN_CPU_OPEN_BFDMACH: specify 1 mach using bfd name
1639 CGEN_CPU_OPEN_ENDIAN: specify endian choice
1640 CGEN_CPU_OPEN_END: terminates arguments
1642 ??? Simultaneous multiple isas might not make sense, but it's not (yet)
1643 precluded.
1645 ??? We only support ISO C stdargs here, not K&R.
1646 Laziness, plus experiment to see if anything requires K&R - eventually
1647 K&R will no longer be supported - e.g. GDB is currently trying this. */
1649 CGEN_CPU_DESC
1650 fr30_cgen_cpu_open (enum cgen_cpu_open_arg arg_type, ...)
1652 CGEN_CPU_TABLE *cd = (CGEN_CPU_TABLE *) xmalloc (sizeof (CGEN_CPU_TABLE));
1653 static int init_p;
1654 unsigned int isas = 0; /* 0 = "unspecified" */
1655 unsigned int machs = 0; /* 0 = "unspecified" */
1656 enum cgen_endian endian = CGEN_ENDIAN_UNKNOWN;
1657 va_list ap;
1659 if (! init_p)
1661 init_tables ();
1662 init_p = 1;
1665 memset (cd, 0, sizeof (*cd));
1667 va_start (ap, arg_type);
1668 while (arg_type != CGEN_CPU_OPEN_END)
1670 switch (arg_type)
1672 case CGEN_CPU_OPEN_ISAS :
1673 isas = va_arg (ap, unsigned int);
1674 break;
1675 case CGEN_CPU_OPEN_MACHS :
1676 machs = va_arg (ap, unsigned int);
1677 break;
1678 case CGEN_CPU_OPEN_BFDMACH :
1680 const char *name = va_arg (ap, const char *);
1681 const CGEN_MACH *mach =
1682 lookup_mach_via_bfd_name (fr30_cgen_mach_table, name);
1684 machs |= 1 << mach->num;
1685 break;
1687 case CGEN_CPU_OPEN_ENDIAN :
1688 endian = va_arg (ap, enum cgen_endian);
1689 break;
1690 default :
1691 fprintf (stderr, "fr30_cgen_cpu_open: unsupported argument `%d'\n",
1692 arg_type);
1693 abort (); /* ??? return NULL? */
1695 arg_type = va_arg (ap, enum cgen_cpu_open_arg);
1697 va_end (ap);
1699 /* mach unspecified means "all" */
1700 if (machs == 0)
1701 machs = (1 << MAX_MACHS) - 1;
1702 /* base mach is always selected */
1703 machs |= 1;
1704 /* isa unspecified means "all" */
1705 if (isas == 0)
1706 isas = (1 << MAX_ISAS) - 1;
1707 if (endian == CGEN_ENDIAN_UNKNOWN)
1709 /* ??? If target has only one, could have a default. */
1710 fprintf (stderr, "fr30_cgen_cpu_open: no endianness specified\n");
1711 abort ();
1714 cd->isas = isas;
1715 cd->machs = machs;
1716 cd->endian = endian;
1717 /* FIXME: for the sparc case we can determine insn-endianness statically.
1718 The worry here is where both data and insn endian can be independently
1719 chosen, in which case this function will need another argument.
1720 Actually, will want to allow for more arguments in the future anyway. */
1721 cd->insn_endian = endian;
1723 /* Table (re)builder. */
1724 cd->rebuild_tables = fr30_cgen_rebuild_tables;
1725 fr30_cgen_rebuild_tables (cd);
1727 /* Default to not allowing signed overflow. */
1728 cd->signed_overflow_ok_p = 0;
1730 return (CGEN_CPU_DESC) cd;
1733 /* Cover fn to fr30_cgen_cpu_open to handle the simple case of 1 isa, 1 mach.
1734 MACH_NAME is the bfd name of the mach. */
1736 CGEN_CPU_DESC
1737 fr30_cgen_cpu_open_1 (mach_name, endian)
1738 const char *mach_name;
1739 enum cgen_endian endian;
1741 return fr30_cgen_cpu_open (CGEN_CPU_OPEN_BFDMACH, mach_name,
1742 CGEN_CPU_OPEN_ENDIAN, endian,
1743 CGEN_CPU_OPEN_END);
1746 /* Close a cpu table.
1747 ??? This can live in a machine independent file, but there's currently
1748 no place to put this file (there's no libcgen). libopcodes is the wrong
1749 place as some simulator ports use this but they don't use libopcodes. */
1751 void
1752 fr30_cgen_cpu_close (cd)
1753 CGEN_CPU_DESC cd;
1755 unsigned int i;
1756 const CGEN_INSN *insns;
1758 if (cd->macro_insn_table.init_entries)
1760 insns = cd->macro_insn_table.init_entries;
1761 for (i = 0; i < cd->macro_insn_table.num_init_entries; ++i, ++insns)
1763 if (CGEN_INSN_RX ((insns)))
1764 regfree (CGEN_INSN_RX (insns));
1768 if (cd->insn_table.init_entries)
1770 insns = cd->insn_table.init_entries;
1771 for (i = 0; i < cd->insn_table.num_init_entries; ++i, ++insns)
1773 if (CGEN_INSN_RX (insns))
1774 regfree (CGEN_INSN_RX (insns));
1780 if (cd->macro_insn_table.init_entries)
1781 free ((CGEN_INSN *) cd->macro_insn_table.init_entries);
1783 if (cd->insn_table.init_entries)
1784 free ((CGEN_INSN *) cd->insn_table.init_entries);
1786 if (cd->hw_table.entries)
1787 free ((CGEN_HW_ENTRY *) cd->hw_table.entries);
1789 if (cd->operand_table.entries)
1790 free ((CGEN_HW_ENTRY *) cd->operand_table.entries);
1792 free (cd);