1 /* CPU data for m32r.
2 
3 THIS FILE IS MACHINE GENERATED WITH CGEN.
4 
5 Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
6 
7 This file is part of the GNU Binutils and/or GDB, the GNU debugger.
8 
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.
13 
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.
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 59 Temple Place - Suite 330, Boston, MA 02111-1307, 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 "m32r-desc.h"
32 #include "m32r-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[] =
47 {
48   { "base", MACH_BASE },
49   { "m32r", MACH_M32R },
50   { "m32rx", MACH_M32RX },
51   { "m32r2", MACH_M32R2 },
52   { "max", MACH_MAX },
53   { 0, 0 }
54 };
55 
56 static const CGEN_ATTR_ENTRY ISA_attr[] =
57 {
58   { "m32r", ISA_M32R },
59   { "max", ISA_MAX },
60   { 0, 0 }
61 };
62 
63 static const CGEN_ATTR_ENTRY PIPE_attr[] =
64 {
65   { "NONE", PIPE_NONE },
66   { "O", PIPE_O },
67   { "S", PIPE_S },
68   { "OS", PIPE_OS },
69   { "O_OS", PIPE_O_OS },
70   { 0, 0 }
71 };
72 
73 const CGEN_ATTR_TABLE m32r_cgen_ifield_attr_table[] =
74 {
75   { "MACH", & MACH_attr[0], & MACH_attr[0] },
76   { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
77   { "PCREL-ADDR", &bool_attr[0], &bool_attr[0] },
78   { "ABS-ADDR", &bool_attr[0], &bool_attr[0] },
79   { "RESERVED", &bool_attr[0], &bool_attr[0] },
80   { "SIGN-OPT", &bool_attr[0], &bool_attr[0] },
81   { "SIGNED", &bool_attr[0], &bool_attr[0] },
82   { "RELOC", &bool_attr[0], &bool_attr[0] },
83   { 0, 0, 0 }
84 };
85 
86 const CGEN_ATTR_TABLE m32r_cgen_hardware_attr_table[] =
87 {
88   { "MACH", & MACH_attr[0], & MACH_attr[0] },
89   { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
90   { "CACHE-ADDR", &bool_attr[0], &bool_attr[0] },
91   { "PC", &bool_attr[0], &bool_attr[0] },
92   { "PROFILE", &bool_attr[0], &bool_attr[0] },
93   { 0, 0, 0 }
94 };
95 
96 const CGEN_ATTR_TABLE m32r_cgen_operand_attr_table[] =
97 {
98   { "MACH", & MACH_attr[0], & MACH_attr[0] },
99   { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
100   { "PCREL-ADDR", &bool_attr[0], &bool_attr[0] },
101   { "ABS-ADDR", &bool_attr[0], &bool_attr[0] },
102   { "SIGN-OPT", &bool_attr[0], &bool_attr[0] },
103   { "SIGNED", &bool_attr[0], &bool_attr[0] },
104   { "NEGATIVE", &bool_attr[0], &bool_attr[0] },
105   { "RELAX", &bool_attr[0], &bool_attr[0] },
106   { "SEM-ONLY", &bool_attr[0], &bool_attr[0] },
107   { "RELOC", &bool_attr[0], &bool_attr[0] },
108   { "HASH-PREFIX", &bool_attr[0], &bool_attr[0] },
109   { 0, 0, 0 }
110 };
111 
112 const CGEN_ATTR_TABLE m32r_cgen_insn_attr_table[] =
113 {
114   { "MACH", & MACH_attr[0], & MACH_attr[0] },
115   { "PIPE", & PIPE_attr[0], & PIPE_attr[0] },
116   { "ALIAS", &bool_attr[0], &bool_attr[0] },
117   { "VIRTUAL", &bool_attr[0], &bool_attr[0] },
118   { "UNCOND-CTI", &bool_attr[0], &bool_attr[0] },
119   { "COND-CTI", &bool_attr[0], &bool_attr[0] },
120   { "SKIP-CTI", &bool_attr[0], &bool_attr[0] },
121   { "DELAY-SLOT", &bool_attr[0], &bool_attr[0] },
122   { "RELAXABLE", &bool_attr[0], &bool_attr[0] },
123   { "RELAXED", &bool_attr[0], &bool_attr[0] },
124   { "NO-DIS", &bool_attr[0], &bool_attr[0] },
125   { "PBB", &bool_attr[0], &bool_attr[0] },
126   { "FILL-SLOT", &bool_attr[0], &bool_attr[0] },
127   { "SPECIAL", &bool_attr[0], &bool_attr[0] },
128   { "SPECIAL_M32R", &bool_attr[0], &bool_attr[0] },
129   { "SPECIAL_FLOAT", &bool_attr[0], &bool_attr[0] },
130   { 0, 0, 0 }
131 };
132 
133 /* Instruction set variants.  */
134 
135 static const CGEN_ISA m32r_cgen_isa_table[] = {
136   { "m32r", 32, 32, 16, 32 },
137   { 0, 0, 0, 0, 0 }
138 };
139 
140 /* Machine variants.  */
141 
142 static const CGEN_MACH m32r_cgen_mach_table[] = {
143   { "m32r", "m32r", MACH_M32R, 0 },
144   { "m32rx", "m32rx", MACH_M32RX, 0 },
145   { "m32r2", "m32r2", MACH_M32R2, 0 },
146   { 0, 0, 0, 0 }
147 };
148 
149 static CGEN_KEYWORD_ENTRY m32r_cgen_opval_gr_names_entries[] =
150 {
151   { "fp", 13, {0, {0}}, 0, 0 },
152   { "lr", 14, {0, {0}}, 0, 0 },
153   { "sp", 15, {0, {0}}, 0, 0 },
154   { "r0", 0, {0, {0}}, 0, 0 },
155   { "r1", 1, {0, {0}}, 0, 0 },
156   { "r2", 2, {0, {0}}, 0, 0 },
157   { "r3", 3, {0, {0}}, 0, 0 },
158   { "r4", 4, {0, {0}}, 0, 0 },
159   { "r5", 5, {0, {0}}, 0, 0 },
160   { "r6", 6, {0, {0}}, 0, 0 },
161   { "r7", 7, {0, {0}}, 0, 0 },
162   { "r8", 8, {0, {0}}, 0, 0 },
163   { "r9", 9, {0, {0}}, 0, 0 },
164   { "r10", 10, {0, {0}}, 0, 0 },
165   { "r11", 11, {0, {0}}, 0, 0 },
166   { "r12", 12, {0, {0}}, 0, 0 },
167   { "r13", 13, {0, {0}}, 0, 0 },
168   { "r14", 14, {0, {0}}, 0, 0 },
169   { "r15", 15, {0, {0}}, 0, 0 }
170 };
171 
172 CGEN_KEYWORD m32r_cgen_opval_gr_names =
173 {
174   & m32r_cgen_opval_gr_names_entries[0],
175   19,
176   0, 0, 0, 0, ""
177 };
178 
179 static CGEN_KEYWORD_ENTRY m32r_cgen_opval_cr_names_entries[] =
180 {
181   { "psw", 0, {0, {0}}, 0, 0 },
182   { "cbr", 1, {0, {0}}, 0, 0 },
183   { "spi", 2, {0, {0}}, 0, 0 },
184   { "spu", 3, {0, {0}}, 0, 0 },
185   { "bpc", 6, {0, {0}}, 0, 0 },
186   { "bbpsw", 8, {0, {0}}, 0, 0 },
187   { "bbpc", 14, {0, {0}}, 0, 0 },
188   { "evb", 5, {0, {0}}, 0, 0 },
189   { "cr0", 0, {0, {0}}, 0, 0 },
190   { "cr1", 1, {0, {0}}, 0, 0 },
191   { "cr2", 2, {0, {0}}, 0, 0 },
192   { "cr3", 3, {0, {0}}, 0, 0 },
193   { "cr4", 4, {0, {0}}, 0, 0 },
194   { "cr5", 5, {0, {0}}, 0, 0 },
195   { "cr6", 6, {0, {0}}, 0, 0 },
196   { "cr7", 7, {0, {0}}, 0, 0 },
197   { "cr8", 8, {0, {0}}, 0, 0 },
198   { "cr9", 9, {0, {0}}, 0, 0 },
199   { "cr10", 10, {0, {0}}, 0, 0 },
200   { "cr11", 11, {0, {0}}, 0, 0 },
201   { "cr12", 12, {0, {0}}, 0, 0 },
202   { "cr13", 13, {0, {0}}, 0, 0 },
203   { "cr14", 14, {0, {0}}, 0, 0 },
204   { "cr15", 15, {0, {0}}, 0, 0 }
205 };
206 
207 CGEN_KEYWORD m32r_cgen_opval_cr_names =
208 {
209   & m32r_cgen_opval_cr_names_entries[0],
210   24,
211   0, 0, 0, 0, ""
212 };
213 
214 static CGEN_KEYWORD_ENTRY m32r_cgen_opval_h_accums_entries[] =
215 {
216   { "a0", 0, {0, {0}}, 0, 0 },
217   { "a1", 1, {0, {0}}, 0, 0 }
218 };
219 
220 CGEN_KEYWORD m32r_cgen_opval_h_accums =
221 {
222   & m32r_cgen_opval_h_accums_entries[0],
223   2,
224   0, 0, 0, 0, ""
225 };
226 
227 
228 /* The hardware table.  */
229 
230 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
231 #define A(a) (1 << CGEN_HW_##a)
232 #else
233 #define A(a) (1 << CGEN_HW_/**/a)
234 #endif
235 
236 const CGEN_HW_ENTRY m32r_cgen_hw_table[] =
237 {
238   { "h-memory", HW_H_MEMORY, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
239   { "h-sint", HW_H_SINT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
240   { "h-uint", HW_H_UINT, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
241   { "h-addr", HW_H_ADDR, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
242   { "h-iaddr", HW_H_IADDR, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
243   { "h-pc", HW_H_PC, CGEN_ASM_NONE, 0, { 0|A(PROFILE)|A(PC), { (1<<MACH_BASE) } } },
244   { "h-hi16", HW_H_HI16, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
245   { "h-slo16", HW_H_SLO16, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
246   { "h-ulo16", HW_H_ULO16, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
247   { "h-gr", HW_H_GR, CGEN_ASM_KEYWORD, (PTR) & m32r_cgen_opval_gr_names, { 0|A(CACHE_ADDR)|A(PROFILE), { (1<<MACH_BASE) } } },
248   { "h-cr", HW_H_CR, CGEN_ASM_KEYWORD, (PTR) & m32r_cgen_opval_cr_names, { 0, { (1<<MACH_BASE) } } },
249   { "h-accum", HW_H_ACCUM, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
250   { "h-accums", HW_H_ACCUMS, CGEN_ASM_KEYWORD, (PTR) & m32r_cgen_opval_h_accums, { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2) } } },
251   { "h-cond", HW_H_COND, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
252   { "h-psw", HW_H_PSW, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
253   { "h-bpsw", HW_H_BPSW, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
254   { "h-bbpsw", HW_H_BBPSW, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
255   { "h-lock", HW_H_LOCK, CGEN_ASM_NONE, 0, { 0, { (1<<MACH_BASE) } } },
256   { 0, 0, CGEN_ASM_NONE, 0, {0, {0}} }
257 };
258 
259 #undef A
260 
261 
262 /* The instruction field table.  */
263 
264 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
265 #define A(a) (1 << CGEN_IFLD_##a)
266 #else
267 #define A(a) (1 << CGEN_IFLD_/**/a)
268 #endif
269 
270 const CGEN_IFLD m32r_cgen_ifld_table[] =
271 {
272   { M32R_F_NIL, "f-nil", 0, 0, 0, 0, { 0, { (1<<MACH_BASE) } }  },
273   { M32R_F_ANYOF, "f-anyof", 0, 0, 0, 0, { 0, { (1<<MACH_BASE) } }  },
274   { M32R_F_OP1, "f-op1", 0, 32, 0, 4, { 0, { (1<<MACH_BASE) } }  },
275   { M32R_F_OP2, "f-op2", 0, 32, 8, 4, { 0, { (1<<MACH_BASE) } }  },
276   { M32R_F_COND, "f-cond", 0, 32, 4, 4, { 0, { (1<<MACH_BASE) } }  },
277   { M32R_F_R1, "f-r1", 0, 32, 4, 4, { 0, { (1<<MACH_BASE) } }  },
278   { M32R_F_R2, "f-r2", 0, 32, 12, 4, { 0, { (1<<MACH_BASE) } }  },
279   { M32R_F_SIMM8, "f-simm8", 0, 32, 8, 8, { 0, { (1<<MACH_BASE) } }  },
280   { M32R_F_SIMM16, "f-simm16", 0, 32, 16, 16, { 0, { (1<<MACH_BASE) } }  },
281   { M32R_F_SHIFT_OP2, "f-shift-op2", 0, 32, 8, 3, { 0, { (1<<MACH_BASE) } }  },
282   { M32R_F_UIMM3, "f-uimm3", 0, 32, 5, 3, { 0, { (1<<MACH_BASE) } }  },
283   { M32R_F_UIMM4, "f-uimm4", 0, 32, 12, 4, { 0, { (1<<MACH_BASE) } }  },
284   { M32R_F_UIMM5, "f-uimm5", 0, 32, 11, 5, { 0, { (1<<MACH_BASE) } }  },
285   { M32R_F_UIMM8, "f-uimm8", 0, 32, 8, 8, { 0, { (1<<MACH_BASE) } }  },
286   { M32R_F_UIMM16, "f-uimm16", 0, 32, 16, 16, { 0, { (1<<MACH_BASE) } }  },
287   { M32R_F_UIMM24, "f-uimm24", 0, 32, 8, 24, { 0|A(RELOC)|A(ABS_ADDR), { (1<<MACH_BASE) } }  },
288   { M32R_F_HI16, "f-hi16", 0, 32, 16, 16, { 0|A(SIGN_OPT), { (1<<MACH_BASE) } }  },
289   { M32R_F_DISP8, "f-disp8", 0, 32, 8, 8, { 0|A(RELOC)|A(PCREL_ADDR), { (1<<MACH_BASE) } }  },
290   { M32R_F_DISP16, "f-disp16", 0, 32, 16, 16, { 0|A(RELOC)|A(PCREL_ADDR), { (1<<MACH_BASE) } }  },
291   { M32R_F_DISP24, "f-disp24", 0, 32, 8, 24, { 0|A(RELOC)|A(PCREL_ADDR), { (1<<MACH_BASE) } }  },
292   { M32R_F_OP23, "f-op23", 0, 32, 9, 3, { 0, { (1<<MACH_BASE) } }  },
293   { M32R_F_OP3, "f-op3", 0, 32, 14, 2, { 0, { (1<<MACH_BASE) } }  },
294   { M32R_F_ACC, "f-acc", 0, 32, 8, 1, { 0, { (1<<MACH_BASE) } }  },
295   { M32R_F_ACCS, "f-accs", 0, 32, 12, 2, { 0, { (1<<MACH_BASE) } }  },
296   { M32R_F_ACCD, "f-accd", 0, 32, 4, 2, { 0, { (1<<MACH_BASE) } }  },
297   { M32R_F_BITS67, "f-bits67", 0, 32, 6, 2, { 0, { (1<<MACH_BASE) } }  },
298   { M32R_F_BIT4, "f-bit4", 0, 32, 4, 1, { 0, { (1<<MACH_BASE) } }  },
299   { M32R_F_BIT14, "f-bit14", 0, 32, 14, 1, { 0, { (1<<MACH_BASE) } }  },
300   { M32R_F_IMM1, "f-imm1", 0, 32, 15, 1, { 0, { (1<<MACH_BASE) } }  },
301   { 0, 0, 0, 0, 0, 0, {0, {0}} }
302 };
303 
304 #undef A
305 
306 
307 
308 /* multi ifield declarations */
309 
310 
311 
312 /* multi ifield definitions */
313 
314 
315 /* The operand table.  */
316 
317 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
318 #define A(a) (1 << CGEN_OPERAND_##a)
319 #else
320 #define A(a) (1 << CGEN_OPERAND_/**/a)
321 #endif
322 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
323 #define OPERAND(op) M32R_OPERAND_##op
324 #else
325 #define OPERAND(op) M32R_OPERAND_/**/op
326 #endif
327 
328 const CGEN_OPERAND m32r_cgen_operand_table[] =
329 {
330 /* pc: program counter */
331   { "pc", M32R_OPERAND_PC, HW_H_PC, 0, 0,
332     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_NIL] } },
333     { 0|A(SEM_ONLY), { (1<<MACH_BASE) } }  },
334 /* sr: source register */
335   { "sr", M32R_OPERAND_SR, HW_H_GR, 12, 4,
336     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_R2] } },
337     { 0, { (1<<MACH_BASE) } }  },
338 /* dr: destination register */
339   { "dr", M32R_OPERAND_DR, HW_H_GR, 4, 4,
340     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_R1] } },
341     { 0, { (1<<MACH_BASE) } }  },
342 /* src1: source register 1 */
343   { "src1", M32R_OPERAND_SRC1, HW_H_GR, 4, 4,
344     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_R1] } },
345     { 0, { (1<<MACH_BASE) } }  },
346 /* src2: source register 2 */
347   { "src2", M32R_OPERAND_SRC2, HW_H_GR, 12, 4,
348     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_R2] } },
349     { 0, { (1<<MACH_BASE) } }  },
350 /* scr: source control register */
351   { "scr", M32R_OPERAND_SCR, HW_H_CR, 12, 4,
352     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_R2] } },
353     { 0, { (1<<MACH_BASE) } }  },
354 /* dcr: destination control register */
355   { "dcr", M32R_OPERAND_DCR, HW_H_CR, 4, 4,
356     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_R1] } },
357     { 0, { (1<<MACH_BASE) } }  },
358 /* simm8: 8 bit signed immediate */
359   { "simm8", M32R_OPERAND_SIMM8, HW_H_SINT, 8, 8,
360     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_SIMM8] } },
361     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
362 /* simm16: 16 bit signed immediate */
363   { "simm16", M32R_OPERAND_SIMM16, HW_H_SINT, 16, 16,
364     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_SIMM16] } },
365     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
366 /* uimm3: 3 bit unsigned number */
367   { "uimm3", M32R_OPERAND_UIMM3, HW_H_UINT, 5, 3,
368     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM3] } },
369     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
370 /* uimm4: 4 bit trap number */
371   { "uimm4", M32R_OPERAND_UIMM4, HW_H_UINT, 12, 4,
372     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM4] } },
373     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
374 /* uimm5: 5 bit shift count */
375   { "uimm5", M32R_OPERAND_UIMM5, HW_H_UINT, 11, 5,
376     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM5] } },
377     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
378 /* uimm8: 8 bit unsigned immediate */
379   { "uimm8", M32R_OPERAND_UIMM8, HW_H_UINT, 8, 8,
380     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM8] } },
381     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
382 /* uimm16: 16 bit unsigned immediate */
383   { "uimm16", M32R_OPERAND_UIMM16, HW_H_UINT, 16, 16,
384     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM16] } },
385     { 0|A(HASH_PREFIX), { (1<<MACH_BASE) } }  },
386 /* imm1: 1 bit immediate */
387   { "imm1", M32R_OPERAND_IMM1, HW_H_UINT, 15, 1,
388     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_IMM1] } },
389     { 0|A(HASH_PREFIX), { (1<<MACH_M32RX)|(1<<MACH_M32R2) } }  },
390 /* accd: accumulator destination register */
391   { "accd", M32R_OPERAND_ACCD, HW_H_ACCUMS, 4, 2,
392     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_ACCD] } },
393     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2) } }  },
394 /* accs: accumulator source register */
395   { "accs", M32R_OPERAND_ACCS, HW_H_ACCUMS, 12, 2,
396     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_ACCS] } },
397     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2) } }  },
398 /* acc: accumulator reg (d) */
399   { "acc", M32R_OPERAND_ACC, HW_H_ACCUMS, 8, 1,
400     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_ACC] } },
401     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2) } }  },
402 /* hash: # prefix */
403   { "hash", M32R_OPERAND_HASH, HW_H_SINT, 0, 0,
404     { 0, { (const PTR) 0 } },
405     { 0, { (1<<MACH_BASE) } }  },
406 /* hi16: high 16 bit immediate, sign optional */
407   { "hi16", M32R_OPERAND_HI16, HW_H_HI16, 16, 16,
408     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_HI16] } },
409     { 0|A(SIGN_OPT), { (1<<MACH_BASE) } }  },
410 /* slo16: 16 bit signed immediate, for low() */
411   { "slo16", M32R_OPERAND_SLO16, HW_H_SLO16, 16, 16,
412     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_SIMM16] } },
413     { 0, { (1<<MACH_BASE) } }  },
414 /* ulo16: 16 bit unsigned immediate, for low() */
415   { "ulo16", M32R_OPERAND_ULO16, HW_H_ULO16, 16, 16,
416     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM16] } },
417     { 0, { (1<<MACH_BASE) } }  },
418 /* uimm24: 24 bit address */
419   { "uimm24", M32R_OPERAND_UIMM24, HW_H_ADDR, 8, 24,
420     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_UIMM24] } },
421     { 0|A(HASH_PREFIX)|A(RELOC)|A(ABS_ADDR), { (1<<MACH_BASE) } }  },
422 /* disp8: 8 bit displacement */
423   { "disp8", M32R_OPERAND_DISP8, HW_H_IADDR, 8, 8,
424     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_DISP8] } },
425     { 0|A(RELAX)|A(RELOC)|A(PCREL_ADDR), { (1<<MACH_BASE) } }  },
426 /* disp16: 16 bit displacement */
427   { "disp16", M32R_OPERAND_DISP16, HW_H_IADDR, 16, 16,
428     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_DISP16] } },
429     { 0|A(RELOC)|A(PCREL_ADDR), { (1<<MACH_BASE) } }  },
430 /* disp24: 24 bit displacement */
431   { "disp24", M32R_OPERAND_DISP24, HW_H_IADDR, 8, 24,
432     { 0, { (const PTR) &m32r_cgen_ifld_table[M32R_F_DISP24] } },
433     { 0|A(RELAX)|A(RELOC)|A(PCREL_ADDR), { (1<<MACH_BASE) } }  },
434 /* condbit: condition bit */
435   { "condbit", M32R_OPERAND_CONDBIT, HW_H_COND, 0, 0,
436     { 0, { (const PTR) 0 } },
437     { 0|A(SEM_ONLY), { (1<<MACH_BASE) } }  },
438 /* accum: accumulator */
439   { "accum", M32R_OPERAND_ACCUM, HW_H_ACCUM, 0, 0,
440     { 0, { (const PTR) 0 } },
441     { 0|A(SEM_ONLY), { (1<<MACH_BASE) } }  },
442 /* sentinel */
443   { 0, 0, 0, 0, 0,
444     { 0, { (const PTR) 0 } },
445     { 0, { 0 } } }
446 };
447 
448 #undef A
449 
450 
451 /* The instruction table.  */
452 
453 #define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field))
454 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
455 #define A(a) (1 << CGEN_INSN_##a)
456 #else
457 #define A(a) (1 << CGEN_INSN_/**/a)
458 #endif
459 
460 static const CGEN_IBASE m32r_cgen_insn_table[MAX_INSNS] =
461 {
462   /* Special null first entry.
463      A `num' value of zero is thus invalid.
464      Also, the special `invalid' insn resides here.  */
465   { 0, 0, 0, 0, {0, {0}} },
466 /* add $dr,$sr */
467   {
468     M32R_INSN_ADD, "add", "add", 16,
469     { 0, { (1<<MACH_BASE), PIPE_OS } }
470   },
471 /* add3 $dr,$sr,$hash$slo16 */
472   {
473     M32R_INSN_ADD3, "add3", "add3", 32,
474     { 0, { (1<<MACH_BASE), PIPE_NONE } }
475   },
476 /* and $dr,$sr */
477   {
478     M32R_INSN_AND, "and", "and", 16,
479     { 0, { (1<<MACH_BASE), PIPE_OS } }
480   },
481 /* and3 $dr,$sr,$uimm16 */
482   {
483     M32R_INSN_AND3, "and3", "and3", 32,
484     { 0, { (1<<MACH_BASE), PIPE_NONE } }
485   },
486 /* or $dr,$sr */
487   {
488     M32R_INSN_OR, "or", "or", 16,
489     { 0, { (1<<MACH_BASE), PIPE_OS } }
490   },
491 /* or3 $dr,$sr,$hash$ulo16 */
492   {
493     M32R_INSN_OR3, "or3", "or3", 32,
494     { 0, { (1<<MACH_BASE), PIPE_NONE } }
495   },
496 /* xor $dr,$sr */
497   {
498     M32R_INSN_XOR, "xor", "xor", 16,
499     { 0, { (1<<MACH_BASE), PIPE_OS } }
500   },
501 /* xor3 $dr,$sr,$uimm16 */
502   {
503     M32R_INSN_XOR3, "xor3", "xor3", 32,
504     { 0, { (1<<MACH_BASE), PIPE_NONE } }
505   },
506 /* addi $dr,$simm8 */
507   {
508     M32R_INSN_ADDI, "addi", "addi", 16,
509     { 0, { (1<<MACH_BASE), PIPE_OS } }
510   },
511 /* addv $dr,$sr */
512   {
513     M32R_INSN_ADDV, "addv", "addv", 16,
514     { 0, { (1<<MACH_BASE), PIPE_OS } }
515   },
516 /* addv3 $dr,$sr,$simm16 */
517   {
518     M32R_INSN_ADDV3, "addv3", "addv3", 32,
519     { 0, { (1<<MACH_BASE), PIPE_NONE } }
520   },
521 /* addx $dr,$sr */
522   {
523     M32R_INSN_ADDX, "addx", "addx", 16,
524     { 0, { (1<<MACH_BASE), PIPE_OS } }
525   },
526 /* bc.s $disp8 */
527   {
528     M32R_INSN_BC8, "bc8", "bc.s", 16,
529     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_O } }
530   },
531 /* bc.l $disp24 */
532   {
533     M32R_INSN_BC24, "bc24", "bc.l", 32,
534     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
535   },
536 /* beq $src1,$src2,$disp16 */
537   {
538     M32R_INSN_BEQ, "beq", "beq", 32,
539     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
540   },
541 /* beqz $src2,$disp16 */
542   {
543     M32R_INSN_BEQZ, "beqz", "beqz", 32,
544     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
545   },
546 /* bgez $src2,$disp16 */
547   {
548     M32R_INSN_BGEZ, "bgez", "bgez", 32,
549     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
550   },
551 /* bgtz $src2,$disp16 */
552   {
553     M32R_INSN_BGTZ, "bgtz", "bgtz", 32,
554     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
555   },
556 /* blez $src2,$disp16 */
557   {
558     M32R_INSN_BLEZ, "blez", "blez", 32,
559     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
560   },
561 /* bltz $src2,$disp16 */
562   {
563     M32R_INSN_BLTZ, "bltz", "bltz", 32,
564     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
565   },
566 /* bnez $src2,$disp16 */
567   {
568     M32R_INSN_BNEZ, "bnez", "bnez", 32,
569     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
570   },
571 /* bl.s $disp8 */
572   {
573     M32R_INSN_BL8, "bl8", "bl.s", 16,
574     { 0|A(FILL_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_O } }
575   },
576 /* bl.l $disp24 */
577   {
578     M32R_INSN_BL24, "bl24", "bl.l", 32,
579     { 0|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
580   },
581 /* bcl.s $disp8 */
582   {
583     M32R_INSN_BCL8, "bcl8", "bcl.s", 16,
584     { 0|A(FILL_SLOT)|A(COND_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
585   },
586 /* bcl.l $disp24 */
587   {
588     M32R_INSN_BCL24, "bcl24", "bcl.l", 32,
589     { 0|A(COND_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_NONE } }
590   },
591 /* bnc.s $disp8 */
592   {
593     M32R_INSN_BNC8, "bnc8", "bnc.s", 16,
594     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_O } }
595   },
596 /* bnc.l $disp24 */
597   {
598     M32R_INSN_BNC24, "bnc24", "bnc.l", 32,
599     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
600   },
601 /* bne $src1,$src2,$disp16 */
602   {
603     M32R_INSN_BNE, "bne", "bne", 32,
604     { 0|A(COND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
605   },
606 /* bra.s $disp8 */
607   {
608     M32R_INSN_BRA8, "bra8", "bra.s", 16,
609     { 0|A(FILL_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_O } }
610   },
611 /* bra.l $disp24 */
612   {
613     M32R_INSN_BRA24, "bra24", "bra.l", 32,
614     { 0|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_NONE } }
615   },
616 /* bncl.s $disp8 */
617   {
618     M32R_INSN_BNCL8, "bncl8", "bncl.s", 16,
619     { 0|A(FILL_SLOT)|A(COND_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
620   },
621 /* bncl.l $disp24 */
622   {
623     M32R_INSN_BNCL24, "bncl24", "bncl.l", 32,
624     { 0|A(COND_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_NONE } }
625   },
626 /* cmp $src1,$src2 */
627   {
628     M32R_INSN_CMP, "cmp", "cmp", 16,
629     { 0, { (1<<MACH_BASE), PIPE_OS } }
630   },
631 /* cmpi $src2,$simm16 */
632   {
633     M32R_INSN_CMPI, "cmpi", "cmpi", 32,
634     { 0, { (1<<MACH_BASE), PIPE_NONE } }
635   },
636 /* cmpu $src1,$src2 */
637   {
638     M32R_INSN_CMPU, "cmpu", "cmpu", 16,
639     { 0, { (1<<MACH_BASE), PIPE_OS } }
640   },
641 /* cmpui $src2,$simm16 */
642   {
643     M32R_INSN_CMPUI, "cmpui", "cmpui", 32,
644     { 0, { (1<<MACH_BASE), PIPE_NONE } }
645   },
646 /* cmpeq $src1,$src2 */
647   {
648     M32R_INSN_CMPEQ, "cmpeq", "cmpeq", 16,
649     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_OS } }
650   },
651 /* cmpz $src2 */
652   {
653     M32R_INSN_CMPZ, "cmpz", "cmpz", 16,
654     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_OS } }
655   },
656 /* div $dr,$sr */
657   {
658     M32R_INSN_DIV, "div", "div", 32,
659     { 0, { (1<<MACH_BASE), PIPE_NONE } }
660   },
661 /* divu $dr,$sr */
662   {
663     M32R_INSN_DIVU, "divu", "divu", 32,
664     { 0, { (1<<MACH_BASE), PIPE_NONE } }
665   },
666 /* rem $dr,$sr */
667   {
668     M32R_INSN_REM, "rem", "rem", 32,
669     { 0, { (1<<MACH_BASE), PIPE_NONE } }
670   },
671 /* remu $dr,$sr */
672   {
673     M32R_INSN_REMU, "remu", "remu", 32,
674     { 0, { (1<<MACH_BASE), PIPE_NONE } }
675   },
676 /* remh $dr,$sr */
677   {
678     M32R_INSN_REMH, "remh", "remh", 32,
679     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
680   },
681 /* remuh $dr,$sr */
682   {
683     M32R_INSN_REMUH, "remuh", "remuh", 32,
684     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
685   },
686 /* remb $dr,$sr */
687   {
688     M32R_INSN_REMB, "remb", "remb", 32,
689     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
690   },
691 /* remub $dr,$sr */
692   {
693     M32R_INSN_REMUB, "remub", "remub", 32,
694     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
695   },
696 /* divuh $dr,$sr */
697   {
698     M32R_INSN_DIVUH, "divuh", "divuh", 32,
699     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
700   },
701 /* divb $dr,$sr */
702   {
703     M32R_INSN_DIVB, "divb", "divb", 32,
704     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
705   },
706 /* divub $dr,$sr */
707   {
708     M32R_INSN_DIVUB, "divub", "divub", 32,
709     { 0, { (1<<MACH_M32R2), PIPE_NONE } }
710   },
711 /* divh $dr,$sr */
712   {
713     M32R_INSN_DIVH, "divh", "divh", 32,
714     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_NONE } }
715   },
716 /* jc $sr */
717   {
718     M32R_INSN_JC, "jc", "jc", 16,
719     { 0|A(SPECIAL)|A(COND_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
720   },
721 /* jnc $sr */
722   {
723     M32R_INSN_JNC, "jnc", "jnc", 16,
724     { 0|A(SPECIAL)|A(COND_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
725   },
726 /* jl $sr */
727   {
728     M32R_INSN_JL, "jl", "jl", 16,
729     { 0|A(FILL_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_O } }
730   },
731 /* jmp $sr */
732   {
733     M32R_INSN_JMP, "jmp", "jmp", 16,
734     { 0|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_O } }
735   },
736 /* ld $dr,@$sr */
737   {
738     M32R_INSN_LD, "ld", "ld", 16,
739     { 0, { (1<<MACH_BASE), PIPE_O } }
740   },
741 /* ld $dr,@($slo16,$sr) */
742   {
743     M32R_INSN_LD_D, "ld-d", "ld", 32,
744     { 0, { (1<<MACH_BASE), PIPE_NONE } }
745   },
746 /* ldb $dr,@$sr */
747   {
748     M32R_INSN_LDB, "ldb", "ldb", 16,
749     { 0, { (1<<MACH_BASE), PIPE_O } }
750   },
751 /* ldb $dr,@($slo16,$sr) */
752   {
753     M32R_INSN_LDB_D, "ldb-d", "ldb", 32,
754     { 0, { (1<<MACH_BASE), PIPE_NONE } }
755   },
756 /* ldh $dr,@$sr */
757   {
758     M32R_INSN_LDH, "ldh", "ldh", 16,
759     { 0, { (1<<MACH_BASE), PIPE_O } }
760   },
761 /* ldh $dr,@($slo16,$sr) */
762   {
763     M32R_INSN_LDH_D, "ldh-d", "ldh", 32,
764     { 0, { (1<<MACH_BASE), PIPE_NONE } }
765   },
766 /* ldub $dr,@$sr */
767   {
768     M32R_INSN_LDUB, "ldub", "ldub", 16,
769     { 0, { (1<<MACH_BASE), PIPE_O } }
770   },
771 /* ldub $dr,@($slo16,$sr) */
772   {
773     M32R_INSN_LDUB_D, "ldub-d", "ldub", 32,
774     { 0, { (1<<MACH_BASE), PIPE_NONE } }
775   },
776 /* lduh $dr,@$sr */
777   {
778     M32R_INSN_LDUH, "lduh", "lduh", 16,
779     { 0, { (1<<MACH_BASE), PIPE_O } }
780   },
781 /* lduh $dr,@($slo16,$sr) */
782   {
783     M32R_INSN_LDUH_D, "lduh-d", "lduh", 32,
784     { 0, { (1<<MACH_BASE), PIPE_NONE } }
785   },
786 /* ld $dr,@$sr+ */
787   {
788     M32R_INSN_LD_PLUS, "ld-plus", "ld", 16,
789     { 0, { (1<<MACH_BASE), PIPE_O } }
790   },
791 /* ld24 $dr,$uimm24 */
792   {
793     M32R_INSN_LD24, "ld24", "ld24", 32,
794     { 0, { (1<<MACH_BASE), PIPE_NONE } }
795   },
796 /* ldi8 $dr,$simm8 */
797   {
798     M32R_INSN_LDI8, "ldi8", "ldi8", 16,
799     { 0, { (1<<MACH_BASE), PIPE_OS } }
800   },
801 /* ldi16 $dr,$hash$slo16 */
802   {
803     M32R_INSN_LDI16, "ldi16", "ldi16", 32,
804     { 0, { (1<<MACH_BASE), PIPE_NONE } }
805   },
806 /* lock $dr,@$sr */
807   {
808     M32R_INSN_LOCK, "lock", "lock", 16,
809     { 0, { (1<<MACH_BASE), PIPE_O } }
810   },
811 /* machi $src1,$src2 */
812   {
813     M32R_INSN_MACHI, "machi", "machi", 16,
814     { 0, { (1<<MACH_M32R), PIPE_S } }
815   },
816 /* machi $src1,$src2,$acc */
817   {
818     M32R_INSN_MACHI_A, "machi-a", "machi", 16,
819     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
820   },
821 /* maclo $src1,$src2 */
822   {
823     M32R_INSN_MACLO, "maclo", "maclo", 16,
824     { 0, { (1<<MACH_M32R), PIPE_S } }
825   },
826 /* maclo $src1,$src2,$acc */
827   {
828     M32R_INSN_MACLO_A, "maclo-a", "maclo", 16,
829     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
830   },
831 /* macwhi $src1,$src2 */
832   {
833     M32R_INSN_MACWHI, "macwhi", "macwhi", 16,
834     { 0, { (1<<MACH_M32R), PIPE_S } }
835   },
836 /* macwhi $src1,$src2,$acc */
837   {
838     M32R_INSN_MACWHI_A, "macwhi-a", "macwhi", 16,
839     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
840   },
841 /* macwlo $src1,$src2 */
842   {
843     M32R_INSN_MACWLO, "macwlo", "macwlo", 16,
844     { 0, { (1<<MACH_M32R), PIPE_S } }
845   },
846 /* macwlo $src1,$src2,$acc */
847   {
848     M32R_INSN_MACWLO_A, "macwlo-a", "macwlo", 16,
849     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
850   },
851 /* mul $dr,$sr */
852   {
853     M32R_INSN_MUL, "mul", "mul", 16,
854     { 0, { (1<<MACH_BASE), PIPE_S } }
855   },
856 /* mulhi $src1,$src2 */
857   {
858     M32R_INSN_MULHI, "mulhi", "mulhi", 16,
859     { 0, { (1<<MACH_M32R), PIPE_S } }
860   },
861 /* mulhi $src1,$src2,$acc */
862   {
863     M32R_INSN_MULHI_A, "mulhi-a", "mulhi", 16,
864     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
865   },
866 /* mullo $src1,$src2 */
867   {
868     M32R_INSN_MULLO, "mullo", "mullo", 16,
869     { 0, { (1<<MACH_M32R), PIPE_S } }
870   },
871 /* mullo $src1,$src2,$acc */
872   {
873     M32R_INSN_MULLO_A, "mullo-a", "mullo", 16,
874     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
875   },
876 /* mulwhi $src1,$src2 */
877   {
878     M32R_INSN_MULWHI, "mulwhi", "mulwhi", 16,
879     { 0, { (1<<MACH_M32R), PIPE_S } }
880   },
881 /* mulwhi $src1,$src2,$acc */
882   {
883     M32R_INSN_MULWHI_A, "mulwhi-a", "mulwhi", 16,
884     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
885   },
886 /* mulwlo $src1,$src2 */
887   {
888     M32R_INSN_MULWLO, "mulwlo", "mulwlo", 16,
889     { 0, { (1<<MACH_M32R), PIPE_S } }
890   },
891 /* mulwlo $src1,$src2,$acc */
892   {
893     M32R_INSN_MULWLO_A, "mulwlo-a", "mulwlo", 16,
894     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
895   },
896 /* mv $dr,$sr */
897   {
898     M32R_INSN_MV, "mv", "mv", 16,
899     { 0, { (1<<MACH_BASE), PIPE_OS } }
900   },
901 /* mvfachi $dr */
902   {
903     M32R_INSN_MVFACHI, "mvfachi", "mvfachi", 16,
904     { 0, { (1<<MACH_M32R), PIPE_S } }
905   },
906 /* mvfachi $dr,$accs */
907   {
908     M32R_INSN_MVFACHI_A, "mvfachi-a", "mvfachi", 16,
909     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
910   },
911 /* mvfaclo $dr */
912   {
913     M32R_INSN_MVFACLO, "mvfaclo", "mvfaclo", 16,
914     { 0, { (1<<MACH_M32R), PIPE_S } }
915   },
916 /* mvfaclo $dr,$accs */
917   {
918     M32R_INSN_MVFACLO_A, "mvfaclo-a", "mvfaclo", 16,
919     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
920   },
921 /* mvfacmi $dr */
922   {
923     M32R_INSN_MVFACMI, "mvfacmi", "mvfacmi", 16,
924     { 0, { (1<<MACH_M32R), PIPE_S } }
925   },
926 /* mvfacmi $dr,$accs */
927   {
928     M32R_INSN_MVFACMI_A, "mvfacmi-a", "mvfacmi", 16,
929     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
930   },
931 /* mvfc $dr,$scr */
932   {
933     M32R_INSN_MVFC, "mvfc", "mvfc", 16,
934     { 0, { (1<<MACH_BASE), PIPE_O } }
935   },
936 /* mvtachi $src1 */
937   {
938     M32R_INSN_MVTACHI, "mvtachi", "mvtachi", 16,
939     { 0, { (1<<MACH_M32R), PIPE_S } }
940   },
941 /* mvtachi $src1,$accs */
942   {
943     M32R_INSN_MVTACHI_A, "mvtachi-a", "mvtachi", 16,
944     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
945   },
946 /* mvtaclo $src1 */
947   {
948     M32R_INSN_MVTACLO, "mvtaclo", "mvtaclo", 16,
949     { 0, { (1<<MACH_M32R), PIPE_S } }
950   },
951 /* mvtaclo $src1,$accs */
952   {
953     M32R_INSN_MVTACLO_A, "mvtaclo-a", "mvtaclo", 16,
954     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
955   },
956 /* mvtc $sr,$dcr */
957   {
958     M32R_INSN_MVTC, "mvtc", "mvtc", 16,
959     { 0, { (1<<MACH_BASE), PIPE_O } }
960   },
961 /* neg $dr,$sr */
962   {
963     M32R_INSN_NEG, "neg", "neg", 16,
964     { 0, { (1<<MACH_BASE), PIPE_OS } }
965   },
966 /* nop */
967   {
968     M32R_INSN_NOP, "nop", "nop", 16,
969     { 0, { (1<<MACH_BASE), PIPE_OS } }
970   },
971 /* not $dr,$sr */
972   {
973     M32R_INSN_NOT, "not", "not", 16,
974     { 0, { (1<<MACH_BASE), PIPE_OS } }
975   },
976 /* rac */
977   {
978     M32R_INSN_RAC, "rac", "rac", 16,
979     { 0, { (1<<MACH_M32R), PIPE_S } }
980   },
981 /* rac $accd,$accs,$imm1 */
982   {
983     M32R_INSN_RAC_DSI, "rac-dsi", "rac", 16,
984     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
985   },
986 /* rach */
987   {
988     M32R_INSN_RACH, "rach", "rach", 16,
989     { 0, { (1<<MACH_M32R), PIPE_S } }
990   },
991 /* rach $accd,$accs,$imm1 */
992   {
993     M32R_INSN_RACH_DSI, "rach-dsi", "rach", 16,
994     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
995   },
996 /* rte */
997   {
998     M32R_INSN_RTE, "rte", "rte", 16,
999     { 0|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_O } }
1000   },
1001 /* seth $dr,$hash$hi16 */
1002   {
1003     M32R_INSN_SETH, "seth", "seth", 32,
1004     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1005   },
1006 /* sll $dr,$sr */
1007   {
1008     M32R_INSN_SLL, "sll", "sll", 16,
1009     { 0, { (1<<MACH_BASE), PIPE_O_OS } }
1010   },
1011 /* sll3 $dr,$sr,$simm16 */
1012   {
1013     M32R_INSN_SLL3, "sll3", "sll3", 32,
1014     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1015   },
1016 /* slli $dr,$uimm5 */
1017   {
1018     M32R_INSN_SLLI, "slli", "slli", 16,
1019     { 0, { (1<<MACH_BASE), PIPE_O_OS } }
1020   },
1021 /* sra $dr,$sr */
1022   {
1023     M32R_INSN_SRA, "sra", "sra", 16,
1024     { 0, { (1<<MACH_BASE), PIPE_O_OS } }
1025   },
1026 /* sra3 $dr,$sr,$simm16 */
1027   {
1028     M32R_INSN_SRA3, "sra3", "sra3", 32,
1029     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1030   },
1031 /* srai $dr,$uimm5 */
1032   {
1033     M32R_INSN_SRAI, "srai", "srai", 16,
1034     { 0, { (1<<MACH_BASE), PIPE_O_OS } }
1035   },
1036 /* srl $dr,$sr */
1037   {
1038     M32R_INSN_SRL, "srl", "srl", 16,
1039     { 0, { (1<<MACH_BASE), PIPE_O_OS } }
1040   },
1041 /* srl3 $dr,$sr,$simm16 */
1042   {
1043     M32R_INSN_SRL3, "srl3", "srl3", 32,
1044     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1045   },
1046 /* srli $dr,$uimm5 */
1047   {
1048     M32R_INSN_SRLI, "srli", "srli", 16,
1049     { 0, { (1<<MACH_BASE), PIPE_O_OS } }
1050   },
1051 /* st $src1,@$src2 */
1052   {
1053     M32R_INSN_ST, "st", "st", 16,
1054     { 0, { (1<<MACH_BASE), PIPE_O } }
1055   },
1056 /* st $src1,@($slo16,$src2) */
1057   {
1058     M32R_INSN_ST_D, "st-d", "st", 32,
1059     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1060   },
1061 /* stb $src1,@$src2 */
1062   {
1063     M32R_INSN_STB, "stb", "stb", 16,
1064     { 0, { (1<<MACH_BASE), PIPE_O } }
1065   },
1066 /* stb $src1,@($slo16,$src2) */
1067   {
1068     M32R_INSN_STB_D, "stb-d", "stb", 32,
1069     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1070   },
1071 /* sth $src1,@$src2 */
1072   {
1073     M32R_INSN_STH, "sth", "sth", 16,
1074     { 0, { (1<<MACH_BASE), PIPE_O } }
1075   },
1076 /* sth $src1,@($slo16,$src2) */
1077   {
1078     M32R_INSN_STH_D, "sth-d", "sth", 32,
1079     { 0, { (1<<MACH_BASE), PIPE_NONE } }
1080   },
1081 /* st $src1,@+$src2 */
1082   {
1083     M32R_INSN_ST_PLUS, "st-plus", "st", 16,
1084     { 0, { (1<<MACH_BASE), PIPE_O } }
1085   },
1086 /* sth $src1,@$src2+ */
1087   {
1088     M32R_INSN_STH_PLUS, "sth-plus", "sth", 16,
1089     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
1090   },
1091 /* stb $src1,@$src2+ */
1092   {
1093     M32R_INSN_STB_PLUS, "stb-plus", "stb", 16,
1094     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
1095   },
1096 /* st $src1,@-$src2 */
1097   {
1098     M32R_INSN_ST_MINUS, "st-minus", "st", 16,
1099     { 0, { (1<<MACH_BASE), PIPE_O } }
1100   },
1101 /* sub $dr,$sr */
1102   {
1103     M32R_INSN_SUB, "sub", "sub", 16,
1104     { 0, { (1<<MACH_BASE), PIPE_OS } }
1105   },
1106 /* subv $dr,$sr */
1107   {
1108     M32R_INSN_SUBV, "subv", "subv", 16,
1109     { 0, { (1<<MACH_BASE), PIPE_OS } }
1110   },
1111 /* subx $dr,$sr */
1112   {
1113     M32R_INSN_SUBX, "subx", "subx", 16,
1114     { 0, { (1<<MACH_BASE), PIPE_OS } }
1115   },
1116 /* trap $uimm4 */
1117   {
1118     M32R_INSN_TRAP, "trap", "trap", 16,
1119     { 0|A(FILL_SLOT)|A(UNCOND_CTI), { (1<<MACH_BASE), PIPE_O } }
1120   },
1121 /* unlock $src1,@$src2 */
1122   {
1123     M32R_INSN_UNLOCK, "unlock", "unlock", 16,
1124     { 0, { (1<<MACH_BASE), PIPE_O } }
1125   },
1126 /* satb $dr,$sr */
1127   {
1128     M32R_INSN_SATB, "satb", "satb", 32,
1129     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_NONE } }
1130   },
1131 /* sath $dr,$sr */
1132   {
1133     M32R_INSN_SATH, "sath", "sath", 32,
1134     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_NONE } }
1135   },
1136 /* sat $dr,$sr */
1137   {
1138     M32R_INSN_SAT, "sat", "sat", 32,
1139     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_NONE } }
1140   },
1141 /* pcmpbz $src2 */
1142   {
1143     M32R_INSN_PCMPBZ, "pcmpbz", "pcmpbz", 16,
1144     { 0|A(SPECIAL), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_OS } }
1145   },
1146 /* sadd */
1147   {
1148     M32R_INSN_SADD, "sadd", "sadd", 16,
1149     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
1150   },
1151 /* macwu1 $src1,$src2 */
1152   {
1153     M32R_INSN_MACWU1, "macwu1", "macwu1", 16,
1154     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
1155   },
1156 /* msblo $src1,$src2 */
1157   {
1158     M32R_INSN_MSBLO, "msblo", "msblo", 16,
1159     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
1160   },
1161 /* mulwu1 $src1,$src2 */
1162   {
1163     M32R_INSN_MULWU1, "mulwu1", "mulwu1", 16,
1164     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
1165   },
1166 /* maclh1 $src1,$src2 */
1167   {
1168     M32R_INSN_MACLH1, "maclh1", "maclh1", 16,
1169     { 0, { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_S } }
1170   },
1171 /* sc */
1172   {
1173     M32R_INSN_SC, "sc", "sc", 16,
1174     { 0|A(SPECIAL)|A(SKIP_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
1175   },
1176 /* snc */
1177   {
1178     M32R_INSN_SNC, "snc", "snc", 16,
1179     { 0|A(SPECIAL)|A(SKIP_CTI), { (1<<MACH_M32RX)|(1<<MACH_M32R2), PIPE_O } }
1180   },
1181 /* clrpsw $uimm8 */
1182   {
1183     M32R_INSN_CLRPSW, "clrpsw", "clrpsw", 16,
1184     { 0|A(SPECIAL_M32R), { (1<<MACH_BASE), PIPE_O } }
1185   },
1186 /* setpsw $uimm8 */
1187   {
1188     M32R_INSN_SETPSW, "setpsw", "setpsw", 16,
1189     { 0|A(SPECIAL_M32R), { (1<<MACH_BASE), PIPE_O } }
1190   },
1191 /* bset $uimm3,@($slo16,$sr) */
1192   {
1193     M32R_INSN_BSET, "bset", "bset", 32,
1194     { 0|A(SPECIAL_M32R), { (1<<MACH_BASE), PIPE_NONE } }
1195   },
1196 /* bclr $uimm3,@($slo16,$sr) */
1197   {
1198     M32R_INSN_BCLR, "bclr", "bclr", 32,
1199     { 0|A(SPECIAL_M32R), { (1<<MACH_BASE), PIPE_NONE } }
1200   },
1201 /* btst $uimm3,$sr */
1202   {
1203     M32R_INSN_BTST, "btst", "btst", 16,
1204     { 0|A(SPECIAL_M32R), { (1<<MACH_BASE), PIPE_O } }
1205   },
1206 };
1207 
1208 #undef OP
1209 #undef A
1210 
1211 /* Initialize anything needed to be done once, before any cpu_open call.  */
1212 static void init_tables PARAMS ((void));
1213 
1214 static void
init_tables()1215 init_tables ()
1216 {
1217 }
1218 
1219 static const CGEN_MACH * lookup_mach_via_bfd_name
1220   PARAMS ((const CGEN_MACH *, const char *));
1221 static void build_hw_table  PARAMS ((CGEN_CPU_TABLE *));
1222 static void build_ifield_table  PARAMS ((CGEN_CPU_TABLE *));
1223 static void build_operand_table PARAMS ((CGEN_CPU_TABLE *));
1224 static void build_insn_table    PARAMS ((CGEN_CPU_TABLE *));
1225 static void m32r_cgen_rebuild_tables PARAMS ((CGEN_CPU_TABLE *));
1226 
1227 /* Subroutine of m32r_cgen_cpu_open to look up a mach via its bfd name.  */
1228 
1229 static const CGEN_MACH *
lookup_mach_via_bfd_name(table,name)1230 lookup_mach_via_bfd_name (table, name)
1231      const CGEN_MACH *table;
1232      const char *name;
1233 {
1234   while (table->name)
1235     {
1236       if (strcmp (name, table->bfd_name) == 0)
1237 	return table;
1238       ++table;
1239     }
1240   abort ();
1241 }
1242 
1243 /* Subroutine of m32r_cgen_cpu_open to build the hardware table.  */
1244 
1245 static void
build_hw_table(cd)1246 build_hw_table (cd)
1247      CGEN_CPU_TABLE *cd;
1248 {
1249   int i;
1250   int machs = cd->machs;
1251   const CGEN_HW_ENTRY *init = & m32r_cgen_hw_table[0];
1252   /* MAX_HW is only an upper bound on the number of selected entries.
1253      However each entry is indexed by it's enum so there can be holes in
1254      the table.  */
1255   const CGEN_HW_ENTRY **selected =
1256     (const CGEN_HW_ENTRY **) xmalloc (MAX_HW * sizeof (CGEN_HW_ENTRY *));
1257 
1258   cd->hw_table.init_entries = init;
1259   cd->hw_table.entry_size = sizeof (CGEN_HW_ENTRY);
1260   memset (selected, 0, MAX_HW * sizeof (CGEN_HW_ENTRY *));
1261   /* ??? For now we just use machs to determine which ones we want.  */
1262   for (i = 0; init[i].name != NULL; ++i)
1263     if (CGEN_HW_ATTR_VALUE (&init[i], CGEN_HW_MACH)
1264 	& machs)
1265       selected[init[i].type] = &init[i];
1266   cd->hw_table.entries = selected;
1267   cd->hw_table.num_entries = MAX_HW;
1268 }
1269 
1270 /* Subroutine of m32r_cgen_cpu_open to build the hardware table.  */
1271 
1272 static void
build_ifield_table(cd)1273 build_ifield_table (cd)
1274      CGEN_CPU_TABLE *cd;
1275 {
1276   cd->ifld_table = & m32r_cgen_ifld_table[0];
1277 }
1278 
1279 /* Subroutine of m32r_cgen_cpu_open to build the hardware table.  */
1280 
1281 static void
build_operand_table(cd)1282 build_operand_table (cd)
1283      CGEN_CPU_TABLE *cd;
1284 {
1285   int i;
1286   int machs = cd->machs;
1287   const CGEN_OPERAND *init = & m32r_cgen_operand_table[0];
1288   /* MAX_OPERANDS is only an upper bound on the number of selected entries.
1289      However each entry is indexed by it's enum so there can be holes in
1290      the table.  */
1291   const CGEN_OPERAND **selected =
1292     (const CGEN_OPERAND **) xmalloc (MAX_OPERANDS * sizeof (CGEN_OPERAND *));
1293 
1294   cd->operand_table.init_entries = init;
1295   cd->operand_table.entry_size = sizeof (CGEN_OPERAND);
1296   memset (selected, 0, MAX_OPERANDS * sizeof (CGEN_OPERAND *));
1297   /* ??? For now we just use mach to determine which ones we want.  */
1298   for (i = 0; init[i].name != NULL; ++i)
1299     if (CGEN_OPERAND_ATTR_VALUE (&init[i], CGEN_OPERAND_MACH)
1300 	& machs)
1301       selected[init[i].type] = &init[i];
1302   cd->operand_table.entries = selected;
1303   cd->operand_table.num_entries = MAX_OPERANDS;
1304 }
1305 
1306 /* Subroutine of m32r_cgen_cpu_open to build the hardware table.
1307    ??? This could leave out insns not supported by the specified mach/isa,
1308    but that would cause errors like "foo only supported by bar" to become
1309    "unknown insn", so for now we include all insns and require the app to
1310    do the checking later.
1311    ??? On the other hand, parsing of such insns may require their hardware or
1312    operand elements to be in the table [which they mightn't be].  */
1313 
1314 static void
build_insn_table(cd)1315 build_insn_table (cd)
1316      CGEN_CPU_TABLE *cd;
1317 {
1318   int i;
1319   const CGEN_IBASE *ib = & m32r_cgen_insn_table[0];
1320   CGEN_INSN *insns = (CGEN_INSN *) xmalloc (MAX_INSNS * sizeof (CGEN_INSN));
1321 
1322   memset (insns, 0, MAX_INSNS * sizeof (CGEN_INSN));
1323   for (i = 0; i < MAX_INSNS; ++i)
1324     insns[i].base = &ib[i];
1325   cd->insn_table.init_entries = insns;
1326   cd->insn_table.entry_size = sizeof (CGEN_IBASE);
1327   cd->insn_table.num_init_entries = MAX_INSNS;
1328 }
1329 
1330 /* Subroutine of m32r_cgen_cpu_open to rebuild the tables.  */
1331 
1332 static void
m32r_cgen_rebuild_tables(cd)1333 m32r_cgen_rebuild_tables (cd)
1334      CGEN_CPU_TABLE *cd;
1335 {
1336   int i;
1337   unsigned int isas = cd->isas;
1338   unsigned int machs = cd->machs;
1339 
1340   cd->int_insn_p = CGEN_INT_INSN_P;
1341 
1342   /* Data derived from the isa spec.  */
1343 #define UNSET (CGEN_SIZE_UNKNOWN + 1)
1344   cd->default_insn_bitsize = UNSET;
1345   cd->base_insn_bitsize = UNSET;
1346   cd->min_insn_bitsize = 65535; /* some ridiculously big number */
1347   cd->max_insn_bitsize = 0;
1348   for (i = 0; i < MAX_ISAS; ++i)
1349     if (((1 << i) & isas) != 0)
1350       {
1351 	const CGEN_ISA *isa = & m32r_cgen_isa_table[i];
1352 
1353 	/* Default insn sizes of all selected isas must be
1354 	   equal or we set the result to 0, meaning "unknown".  */
1355 	if (cd->default_insn_bitsize == UNSET)
1356 	  cd->default_insn_bitsize = isa->default_insn_bitsize;
1357 	else if (isa->default_insn_bitsize == cd->default_insn_bitsize)
1358 	  ; /* this is ok */
1359 	else
1360 	  cd->default_insn_bitsize = CGEN_SIZE_UNKNOWN;
1361 
1362 	/* Base insn sizes of all selected isas must be equal
1363 	   or we set the result to 0, meaning "unknown".  */
1364 	if (cd->base_insn_bitsize == UNSET)
1365 	  cd->base_insn_bitsize = isa->base_insn_bitsize;
1366 	else if (isa->base_insn_bitsize == cd->base_insn_bitsize)
1367 	  ; /* this is ok */
1368 	else
1369 	  cd->base_insn_bitsize = CGEN_SIZE_UNKNOWN;
1370 
1371 	/* Set min,max insn sizes.  */
1372 	if (isa->min_insn_bitsize < cd->min_insn_bitsize)
1373 	  cd->min_insn_bitsize = isa->min_insn_bitsize;
1374 	if (isa->max_insn_bitsize > cd->max_insn_bitsize)
1375 	  cd->max_insn_bitsize = isa->max_insn_bitsize;
1376       }
1377 
1378   /* Data derived from the mach spec.  */
1379   for (i = 0; i < MAX_MACHS; ++i)
1380     if (((1 << i) & machs) != 0)
1381       {
1382 	const CGEN_MACH *mach = & m32r_cgen_mach_table[i];
1383 
1384 	if (mach->insn_chunk_bitsize != 0)
1385 	{
1386 	  if (cd->insn_chunk_bitsize != 0 && cd->insn_chunk_bitsize != mach->insn_chunk_bitsize)
1387 	    {
1388 	      fprintf (stderr, "m32r_cgen_rebuild_tables: conflicting insn-chunk-bitsize values: `%d' vs. `%d'\n",
1389 		       cd->insn_chunk_bitsize, mach->insn_chunk_bitsize);
1390 	      abort ();
1391 	    }
1392 
1393  	  cd->insn_chunk_bitsize = mach->insn_chunk_bitsize;
1394 	}
1395       }
1396 
1397   /* Determine which hw elements are used by MACH.  */
1398   build_hw_table (cd);
1399 
1400   /* Build the ifield table.  */
1401   build_ifield_table (cd);
1402 
1403   /* Determine which operands are used by MACH/ISA.  */
1404   build_operand_table (cd);
1405 
1406   /* Build the instruction table.  */
1407   build_insn_table (cd);
1408 }
1409 
1410 /* Initialize a cpu table and return a descriptor.
1411    It's much like opening a file, and must be the first function called.
1412    The arguments are a set of (type/value) pairs, terminated with
1413    CGEN_CPU_OPEN_END.
1414 
1415    Currently supported values:
1416    CGEN_CPU_OPEN_ISAS:    bitmap of values in enum isa_attr
1417    CGEN_CPU_OPEN_MACHS:   bitmap of values in enum mach_attr
1418    CGEN_CPU_OPEN_BFDMACH: specify 1 mach using bfd name
1419    CGEN_CPU_OPEN_ENDIAN:  specify endian choice
1420    CGEN_CPU_OPEN_END:     terminates arguments
1421 
1422    ??? Simultaneous multiple isas might not make sense, but it's not (yet)
1423    precluded.
1424 
1425    ??? We only support ISO C stdargs here, not K&R.
1426    Laziness, plus experiment to see if anything requires K&R - eventually
1427    K&R will no longer be supported - e.g. GDB is currently trying this.  */
1428 
1429 CGEN_CPU_DESC
m32r_cgen_cpu_open(enum cgen_cpu_open_arg arg_type,...)1430 m32r_cgen_cpu_open (enum cgen_cpu_open_arg arg_type, ...)
1431 {
1432   CGEN_CPU_TABLE *cd = (CGEN_CPU_TABLE *) xmalloc (sizeof (CGEN_CPU_TABLE));
1433   static int init_p;
1434   unsigned int isas = 0;  /* 0 = "unspecified" */
1435   unsigned int machs = 0; /* 0 = "unspecified" */
1436   enum cgen_endian endian = CGEN_ENDIAN_UNKNOWN;
1437   va_list ap;
1438 
1439   if (! init_p)
1440     {
1441       init_tables ();
1442       init_p = 1;
1443     }
1444 
1445   memset (cd, 0, sizeof (*cd));
1446 
1447   va_start (ap, arg_type);
1448   while (arg_type != CGEN_CPU_OPEN_END)
1449     {
1450       switch (arg_type)
1451 	{
1452 	case CGEN_CPU_OPEN_ISAS :
1453 	  isas = va_arg (ap, unsigned int);
1454 	  break;
1455 	case CGEN_CPU_OPEN_MACHS :
1456 	  machs = va_arg (ap, unsigned int);
1457 	  break;
1458 	case CGEN_CPU_OPEN_BFDMACH :
1459 	  {
1460 	    const char *name = va_arg (ap, const char *);
1461 	    const CGEN_MACH *mach =
1462 	      lookup_mach_via_bfd_name (m32r_cgen_mach_table, name);
1463 
1464 	    machs |= 1 << mach->num;
1465 	    break;
1466 	  }
1467 	case CGEN_CPU_OPEN_ENDIAN :
1468 	  endian = va_arg (ap, enum cgen_endian);
1469 	  break;
1470 	default :
1471 	  fprintf (stderr, "m32r_cgen_cpu_open: unsupported argument `%d'\n",
1472 		   arg_type);
1473 	  abort (); /* ??? return NULL? */
1474 	}
1475       arg_type = va_arg (ap, enum cgen_cpu_open_arg);
1476     }
1477   va_end (ap);
1478 
1479   /* mach unspecified means "all" */
1480   if (machs == 0)
1481     machs = (1 << MAX_MACHS) - 1;
1482   /* base mach is always selected */
1483   machs |= 1;
1484   /* isa unspecified means "all" */
1485   if (isas == 0)
1486     isas = (1 << MAX_ISAS) - 1;
1487   if (endian == CGEN_ENDIAN_UNKNOWN)
1488     {
1489       /* ??? If target has only one, could have a default.  */
1490       fprintf (stderr, "m32r_cgen_cpu_open: no endianness specified\n");
1491       abort ();
1492     }
1493 
1494   cd->isas = isas;
1495   cd->machs = machs;
1496   cd->endian = endian;
1497   /* FIXME: for the sparc case we can determine insn-endianness statically.
1498      The worry here is where both data and insn endian can be independently
1499      chosen, in which case this function will need another argument.
1500      Actually, will want to allow for more arguments in the future anyway.  */
1501   cd->insn_endian = endian;
1502 
1503   /* Table (re)builder.  */
1504   cd->rebuild_tables = m32r_cgen_rebuild_tables;
1505   m32r_cgen_rebuild_tables (cd);
1506 
1507   /* Default to not allowing signed overflow.  */
1508   cd->signed_overflow_ok_p = 0;
1509 
1510   return (CGEN_CPU_DESC) cd;
1511 }
1512 
1513 /* Cover fn to m32r_cgen_cpu_open to handle the simple case of 1 isa, 1 mach.
1514    MACH_NAME is the bfd name of the mach.  */
1515 
1516 CGEN_CPU_DESC
m32r_cgen_cpu_open_1(mach_name,endian)1517 m32r_cgen_cpu_open_1 (mach_name, endian)
1518      const char *mach_name;
1519      enum cgen_endian endian;
1520 {
1521   return m32r_cgen_cpu_open (CGEN_CPU_OPEN_BFDMACH, mach_name,
1522 			       CGEN_CPU_OPEN_ENDIAN, endian,
1523 			       CGEN_CPU_OPEN_END);
1524 }
1525 
1526 /* Close a cpu table.
1527    ??? This can live in a machine independent file, but there's currently
1528    no place to put this file (there's no libcgen).  libopcodes is the wrong
1529    place as some simulator ports use this but they don't use libopcodes.  */
1530 
1531 void
m32r_cgen_cpu_close(cd)1532 m32r_cgen_cpu_close (cd)
1533      CGEN_CPU_DESC cd;
1534 {
1535   unsigned int i;
1536   const CGEN_INSN *insns;
1537 
1538   if (cd->macro_insn_table.init_entries)
1539     {
1540       insns = cd->macro_insn_table.init_entries;
1541       for (i = 0; i < cd->macro_insn_table.num_init_entries; ++i, ++insns)
1542 	{
1543 	  if (CGEN_INSN_RX ((insns)))
1544 	    regfree (CGEN_INSN_RX (insns));
1545 	}
1546     }
1547 
1548   if (cd->insn_table.init_entries)
1549     {
1550       insns = cd->insn_table.init_entries;
1551       for (i = 0; i < cd->insn_table.num_init_entries; ++i, ++insns)
1552 	{
1553 	  if (CGEN_INSN_RX (insns))
1554 	    regfree (CGEN_INSN_RX (insns));
1555 	}
1556     }
1557 
1558 
1559 
1560   if (cd->macro_insn_table.init_entries)
1561     free ((CGEN_INSN *) cd->macro_insn_table.init_entries);
1562 
1563   if (cd->insn_table.init_entries)
1564     free ((CGEN_INSN *) cd->insn_table.init_entries);
1565 
1566   if (cd->hw_table.entries)
1567     free ((CGEN_HW_ENTRY *) cd->hw_table.entries);
1568 
1569   if (cd->operand_table.entries)
1570     free ((CGEN_HW_ENTRY *) cd->operand_table.entries);
1571 
1572   free (cd);
1573 }
1574 
1575