OSDN Git Service

Merge commit '97841852f4cb6c2' into tmp
[pf3gnuchains/pf3gnuchains4x.git] / opcodes / ip2k-opc.c
1 /* Instruction opcode table for ip2k.
2
3 THIS FILE IS MACHINE GENERATED WITH CGEN.
4
5 Copyright 1996-2010 Free Software Foundation, Inc.
6
7 This file is part of the GNU Binutils and/or GDB, the GNU debugger.
8
9    This file is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3, or (at your option)
12    any later version.
13
14    It is distributed in the hope that it will be useful, but WITHOUT
15    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
16    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
17    License for more details.
18
19    You should have received a copy of the GNU General Public License along
20    with this program; if not, write to the Free Software Foundation, Inc.,
21    51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
22
23 */
24
25 #include "sysdep.h"
26 #include "ansidecl.h"
27 #include "bfd.h"
28 #include "symcat.h"
29 #include "ip2k-desc.h"
30 #include "ip2k-opc.h"
31 #include "libiberty.h"
32
33 /* -- opc.c */
34
35 #include "safe-ctype.h"
36
37 /* A better hash function for instruction mnemonics.  */
38 unsigned int
39 ip2k_asm_hash (const char* insn)
40 {
41   unsigned int hash;
42   const char* m = insn;
43
44   for (hash = 0; *m && ! ISSPACE (*m); m++)
45     hash = (hash * 23) ^ (0x1F & TOLOWER (*m));
46
47   /* printf ("%s %d\n", insn, (hash % CGEN_ASM_HASH_SIZE)); */
48
49   return hash % CGEN_ASM_HASH_SIZE;
50 }
51
52
53 /* Special check to ensure that instruction exists for given machine.  */
54
55 int
56 ip2k_cgen_insn_supported (CGEN_CPU_DESC cd, const CGEN_INSN *insn)
57 {
58   int machs = CGEN_INSN_ATTR_VALUE (insn, CGEN_INSN_MACH);
59
60   /* No mach attribute?  Assume it's supported for all machs.  */
61   if (machs == 0)
62     return 1;
63   
64   return (machs & cd->machs) != 0;
65 }
66
67 \f
68 /* -- asm.c */
69 /* The hash functions are recorded here to help keep assembler code out of
70    the disassembler and vice versa.  */
71
72 static int asm_hash_insn_p        (const CGEN_INSN *);
73 static unsigned int asm_hash_insn (const char *);
74 static int dis_hash_insn_p        (const CGEN_INSN *);
75 static unsigned int dis_hash_insn (const char *, CGEN_INSN_INT);
76
77 /* Instruction formats.  */
78
79 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
80 #define F(f) & ip2k_cgen_ifld_table[IP2K_##f]
81 #else
82 #define F(f) & ip2k_cgen_ifld_table[IP2K_/**/f]
83 #endif
84 static const CGEN_IFMT ifmt_empty ATTRIBUTE_UNUSED = {
85   0, 0, 0x0, { { 0 } }
86 };
87
88 static const CGEN_IFMT ifmt_jmp ATTRIBUTE_UNUSED = {
89   16, 16, 0xe000, { { F (F_OP3) }, { F (F_ADDR16CJP) }, { 0 } }
90 };
91
92 static const CGEN_IFMT ifmt_sb ATTRIBUTE_UNUSED = {
93   16, 16, 0xf000, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
94 };
95
96 static const CGEN_IFMT ifmt_xorw_l ATTRIBUTE_UNUSED = {
97   16, 16, 0xff00, { { F (F_OP4) }, { F (F_OP4MID) }, { F (F_IMM8) }, { 0 } }
98 };
99
100 static const CGEN_IFMT ifmt_loadl_a ATTRIBUTE_UNUSED = {
101   16, 16, 0xff00, { { F (F_OP4) }, { F (F_OP4MID) }, { F (F_IMM8) }, { 0 } }
102 };
103
104 static const CGEN_IFMT ifmt_loadh_a ATTRIBUTE_UNUSED = {
105   16, 16, 0xff00, { { F (F_OP4) }, { F (F_OP4MID) }, { F (F_IMM8) }, { 0 } }
106 };
107
108 static const CGEN_IFMT ifmt_addcfr_w ATTRIBUTE_UNUSED = {
109   16, 16, 0xfe00, { { F (F_OP6) }, { F (F_DIR) }, { F (F_REG) }, { 0 } }
110 };
111
112 static const CGEN_IFMT ifmt_speed ATTRIBUTE_UNUSED = {
113   16, 16, 0xff00, { { F (F_OP8) }, { F (F_IMM8) }, { 0 } }
114 };
115
116 static const CGEN_IFMT ifmt_ireadi ATTRIBUTE_UNUSED = {
117   16, 16, 0xffff, { { F (F_OP6) }, { F (F_OP6_10LOW) }, { 0 } }
118 };
119
120 static const CGEN_IFMT ifmt_page ATTRIBUTE_UNUSED = {
121   16, 16, 0xfff8, { { F (F_OP6) }, { F (F_OP6_7LOW) }, { F (F_PAGE3) }, { 0 } }
122 };
123
124 static const CGEN_IFMT ifmt_reti ATTRIBUTE_UNUSED = {
125   16, 16, 0xfff8, { { F (F_OP6) }, { F (F_OP6_7LOW) }, { F (F_RETI3) }, { 0 } }
126 };
127
128 #undef F
129
130 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
131 #define A(a) (1 << CGEN_INSN_##a)
132 #else
133 #define A(a) (1 << CGEN_INSN_/**/a)
134 #endif
135 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
136 #define OPERAND(op) IP2K_OPERAND_##op
137 #else
138 #define OPERAND(op) IP2K_OPERAND_/**/op
139 #endif
140 #define MNEM CGEN_SYNTAX_MNEMONIC /* syntax value for mnemonic */
141 #define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field))
142
143 /* The instruction table.  */
144
145 static const CGEN_OPCODE ip2k_cgen_insn_opcode_table[MAX_INSNS] =
146 {
147   /* Special null first entry.
148      A `num' value of zero is thus invalid.
149      Also, the special `invalid' insn resides here.  */
150   { { 0, 0, 0, 0 }, {{0}}, 0, {0}},
151 /* jmp $addr16cjp */
152   {
153     { 0, 0, 0, 0 },
154     { { MNEM, ' ', OP (ADDR16CJP), 0 } },
155     & ifmt_jmp, { 0xe000 }
156   },
157 /* call $addr16cjp */
158   {
159     { 0, 0, 0, 0 },
160     { { MNEM, ' ', OP (ADDR16CJP), 0 } },
161     & ifmt_jmp, { 0xc000 }
162   },
163 /* sb $fr,$bitno */
164   {
165     { 0, 0, 0, 0 },
166     { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } },
167     & ifmt_sb, { 0xb000 }
168   },
169 /* snb $fr,$bitno */
170   {
171     { 0, 0, 0, 0 },
172     { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } },
173     & ifmt_sb, { 0xa000 }
174   },
175 /* setb $fr,$bitno */
176   {
177     { 0, 0, 0, 0 },
178     { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } },
179     & ifmt_sb, { 0x9000 }
180   },
181 /* clrb $fr,$bitno */
182   {
183     { 0, 0, 0, 0 },
184     { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } },
185     & ifmt_sb, { 0x8000 }
186   },
187 /* xor W,#$lit8 */
188   {
189     { 0, 0, 0, 0 },
190     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
191     & ifmt_xorw_l, { 0x7f00 }
192   },
193 /* and W,#$lit8 */
194   {
195     { 0, 0, 0, 0 },
196     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
197     & ifmt_xorw_l, { 0x7e00 }
198   },
199 /* or W,#$lit8 */
200   {
201     { 0, 0, 0, 0 },
202     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
203     & ifmt_xorw_l, { 0x7d00 }
204   },
205 /* add W,#$lit8 */
206   {
207     { 0, 0, 0, 0 },
208     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
209     & ifmt_xorw_l, { 0x7b00 }
210   },
211 /* sub W,#$lit8 */
212   {
213     { 0, 0, 0, 0 },
214     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
215     & ifmt_xorw_l, { 0x7a00 }
216   },
217 /* cmp W,#$lit8 */
218   {
219     { 0, 0, 0, 0 },
220     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
221     & ifmt_xorw_l, { 0x7900 }
222   },
223 /* retw #$lit8 */
224   {
225     { 0, 0, 0, 0 },
226     { { MNEM, ' ', '#', OP (LIT8), 0 } },
227     & ifmt_xorw_l, { 0x7800 }
228   },
229 /* cse W,#$lit8 */
230   {
231     { 0, 0, 0, 0 },
232     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
233     & ifmt_xorw_l, { 0x7700 }
234   },
235 /* csne W,#$lit8 */
236   {
237     { 0, 0, 0, 0 },
238     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
239     & ifmt_xorw_l, { 0x7600 }
240   },
241 /* push #$lit8 */
242   {
243     { 0, 0, 0, 0 },
244     { { MNEM, ' ', '#', OP (LIT8), 0 } },
245     & ifmt_xorw_l, { 0x7400 }
246   },
247 /* muls W,#$lit8 */
248   {
249     { 0, 0, 0, 0 },
250     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
251     & ifmt_xorw_l, { 0x7300 }
252   },
253 /* mulu W,#$lit8 */
254   {
255     { 0, 0, 0, 0 },
256     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
257     & ifmt_xorw_l, { 0x7200 }
258   },
259 /* loadl #$lit8 */
260   {
261     { 0, 0, 0, 0 },
262     { { MNEM, ' ', '#', OP (LIT8), 0 } },
263     & ifmt_xorw_l, { 0x7100 }
264   },
265 /* loadh #$lit8 */
266   {
267     { 0, 0, 0, 0 },
268     { { MNEM, ' ', '#', OP (LIT8), 0 } },
269     & ifmt_xorw_l, { 0x7000 }
270   },
271 /* loadl $addr16l */
272   {
273     { 0, 0, 0, 0 },
274     { { MNEM, ' ', OP (ADDR16L), 0 } },
275     & ifmt_loadl_a, { 0x7100 }
276   },
277 /* loadh $addr16h */
278   {
279     { 0, 0, 0, 0 },
280     { { MNEM, ' ', OP (ADDR16H), 0 } },
281     & ifmt_loadh_a, { 0x7000 }
282   },
283 /* addc $fr,W */
284   {
285     { 0, 0, 0, 0 },
286     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
287     & ifmt_addcfr_w, { 0x5e00 }
288   },
289 /* addc W,$fr */
290   {
291     { 0, 0, 0, 0 },
292     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
293     & ifmt_addcfr_w, { 0x5c00 }
294   },
295 /* incsnz $fr */
296   {
297     { 0, 0, 0, 0 },
298     { { MNEM, ' ', OP (FR), 0 } },
299     & ifmt_addcfr_w, { 0x5a00 }
300   },
301 /* incsnz W,$fr */
302   {
303     { 0, 0, 0, 0 },
304     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
305     & ifmt_addcfr_w, { 0x5800 }
306   },
307 /* muls W,$fr */
308   {
309     { 0, 0, 0, 0 },
310     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
311     & ifmt_addcfr_w, { 0x5400 }
312   },
313 /* mulu W,$fr */
314   {
315     { 0, 0, 0, 0 },
316     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
317     & ifmt_addcfr_w, { 0x5000 }
318   },
319 /* decsnz $fr */
320   {
321     { 0, 0, 0, 0 },
322     { { MNEM, ' ', OP (FR), 0 } },
323     & ifmt_addcfr_w, { 0x4e00 }
324   },
325 /* decsnz W,$fr */
326   {
327     { 0, 0, 0, 0 },
328     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
329     & ifmt_addcfr_w, { 0x4c00 }
330   },
331 /* subc W,$fr */
332   {
333     { 0, 0, 0, 0 },
334     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
335     & ifmt_addcfr_w, { 0x4800 }
336   },
337 /* subc $fr,W */
338   {
339     { 0, 0, 0, 0 },
340     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
341     & ifmt_addcfr_w, { 0x4a00 }
342   },
343 /* pop $fr */
344   {
345     { 0, 0, 0, 0 },
346     { { MNEM, ' ', OP (FR), 0 } },
347     & ifmt_addcfr_w, { 0x4600 }
348   },
349 /* push $fr */
350   {
351     { 0, 0, 0, 0 },
352     { { MNEM, ' ', OP (FR), 0 } },
353     & ifmt_addcfr_w, { 0x4400 }
354   },
355 /* cse W,$fr */
356   {
357     { 0, 0, 0, 0 },
358     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
359     & ifmt_addcfr_w, { 0x4200 }
360   },
361 /* csne W,$fr */
362   {
363     { 0, 0, 0, 0 },
364     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
365     & ifmt_addcfr_w, { 0x4000 }
366   },
367 /* incsz $fr */
368   {
369     { 0, 0, 0, 0 },
370     { { MNEM, ' ', OP (FR), 0 } },
371     & ifmt_addcfr_w, { 0x3e00 }
372   },
373 /* incsz W,$fr */
374   {
375     { 0, 0, 0, 0 },
376     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
377     & ifmt_addcfr_w, { 0x3c00 }
378   },
379 /* swap $fr */
380   {
381     { 0, 0, 0, 0 },
382     { { MNEM, ' ', OP (FR), 0 } },
383     & ifmt_addcfr_w, { 0x3a00 }
384   },
385 /* swap W,$fr */
386   {
387     { 0, 0, 0, 0 },
388     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
389     & ifmt_addcfr_w, { 0x3800 }
390   },
391 /* rl $fr */
392   {
393     { 0, 0, 0, 0 },
394     { { MNEM, ' ', OP (FR), 0 } },
395     & ifmt_addcfr_w, { 0x3600 }
396   },
397 /* rl W,$fr */
398   {
399     { 0, 0, 0, 0 },
400     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
401     & ifmt_addcfr_w, { 0x3400 }
402   },
403 /* rr $fr */
404   {
405     { 0, 0, 0, 0 },
406     { { MNEM, ' ', OP (FR), 0 } },
407     & ifmt_addcfr_w, { 0x3200 }
408   },
409 /* rr W,$fr */
410   {
411     { 0, 0, 0, 0 },
412     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
413     & ifmt_addcfr_w, { 0x3000 }
414   },
415 /* decsz $fr */
416   {
417     { 0, 0, 0, 0 },
418     { { MNEM, ' ', OP (FR), 0 } },
419     & ifmt_addcfr_w, { 0x2e00 }
420   },
421 /* decsz W,$fr */
422   {
423     { 0, 0, 0, 0 },
424     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
425     & ifmt_addcfr_w, { 0x2c00 }
426   },
427 /* inc $fr */
428   {
429     { 0, 0, 0, 0 },
430     { { MNEM, ' ', OP (FR), 0 } },
431     & ifmt_addcfr_w, { 0x2a00 }
432   },
433 /* inc W,$fr */
434   {
435     { 0, 0, 0, 0 },
436     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
437     & ifmt_addcfr_w, { 0x2800 }
438   },
439 /* not $fr */
440   {
441     { 0, 0, 0, 0 },
442     { { MNEM, ' ', OP (FR), 0 } },
443     & ifmt_addcfr_w, { 0x2600 }
444   },
445 /* not W,$fr */
446   {
447     { 0, 0, 0, 0 },
448     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
449     & ifmt_addcfr_w, { 0x2400 }
450   },
451 /* test $fr */
452   {
453     { 0, 0, 0, 0 },
454     { { MNEM, ' ', OP (FR), 0 } },
455     & ifmt_addcfr_w, { 0x2200 }
456   },
457 /* mov W,#$lit8 */
458   {
459     { 0, 0, 0, 0 },
460     { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } },
461     & ifmt_xorw_l, { 0x7c00 }
462   },
463 /* mov $fr,W */
464   {
465     { 0, 0, 0, 0 },
466     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
467     & ifmt_addcfr_w, { 0x200 }
468   },
469 /* mov W,$fr */
470   {
471     { 0, 0, 0, 0 },
472     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
473     & ifmt_addcfr_w, { 0x2000 }
474   },
475 /* add $fr,W */
476   {
477     { 0, 0, 0, 0 },
478     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
479     & ifmt_addcfr_w, { 0x1e00 }
480   },
481 /* add W,$fr */
482   {
483     { 0, 0, 0, 0 },
484     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
485     & ifmt_addcfr_w, { 0x1c00 }
486   },
487 /* xor $fr,W */
488   {
489     { 0, 0, 0, 0 },
490     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
491     & ifmt_addcfr_w, { 0x1a00 }
492   },
493 /* xor W,$fr */
494   {
495     { 0, 0, 0, 0 },
496     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
497     & ifmt_addcfr_w, { 0x1800 }
498   },
499 /* and $fr,W */
500   {
501     { 0, 0, 0, 0 },
502     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
503     & ifmt_addcfr_w, { 0x1600 }
504   },
505 /* and W,$fr */
506   {
507     { 0, 0, 0, 0 },
508     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
509     & ifmt_addcfr_w, { 0x1400 }
510   },
511 /* or $fr,W */
512   {
513     { 0, 0, 0, 0 },
514     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
515     & ifmt_addcfr_w, { 0x1200 }
516   },
517 /* or W,$fr */
518   {
519     { 0, 0, 0, 0 },
520     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
521     & ifmt_addcfr_w, { 0x1000 }
522   },
523 /* dec $fr */
524   {
525     { 0, 0, 0, 0 },
526     { { MNEM, ' ', OP (FR), 0 } },
527     & ifmt_addcfr_w, { 0xe00 }
528   },
529 /* dec W,$fr */
530   {
531     { 0, 0, 0, 0 },
532     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
533     & ifmt_addcfr_w, { 0xc00 }
534   },
535 /* sub $fr,W */
536   {
537     { 0, 0, 0, 0 },
538     { { MNEM, ' ', OP (FR), ',', 'W', 0 } },
539     & ifmt_addcfr_w, { 0xa00 }
540   },
541 /* sub W,$fr */
542   {
543     { 0, 0, 0, 0 },
544     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
545     & ifmt_addcfr_w, { 0x800 }
546   },
547 /* clr $fr */
548   {
549     { 0, 0, 0, 0 },
550     { { MNEM, ' ', OP (FR), 0 } },
551     & ifmt_addcfr_w, { 0x600 }
552   },
553 /* cmp W,$fr */
554   {
555     { 0, 0, 0, 0 },
556     { { MNEM, ' ', 'W', ',', OP (FR), 0 } },
557     & ifmt_addcfr_w, { 0x400 }
558   },
559 /* speed #$lit8 */
560   {
561     { 0, 0, 0, 0 },
562     { { MNEM, ' ', '#', OP (LIT8), 0 } },
563     & ifmt_speed, { 0x100 }
564   },
565 /* ireadi */
566   {
567     { 0, 0, 0, 0 },
568     { { MNEM, 0 } },
569     & ifmt_ireadi, { 0x1d }
570   },
571 /* iwritei */
572   {
573     { 0, 0, 0, 0 },
574     { { MNEM, 0 } },
575     & ifmt_ireadi, { 0x1c }
576   },
577 /* fread */
578   {
579     { 0, 0, 0, 0 },
580     { { MNEM, 0 } },
581     & ifmt_ireadi, { 0x1b }
582   },
583 /* fwrite */
584   {
585     { 0, 0, 0, 0 },
586     { { MNEM, 0 } },
587     & ifmt_ireadi, { 0x1a }
588   },
589 /* iread */
590   {
591     { 0, 0, 0, 0 },
592     { { MNEM, 0 } },
593     & ifmt_ireadi, { 0x19 }
594   },
595 /* iwrite */
596   {
597     { 0, 0, 0, 0 },
598     { { MNEM, 0 } },
599     & ifmt_ireadi, { 0x18 }
600   },
601 /* page $addr16p */
602   {
603     { 0, 0, 0, 0 },
604     { { MNEM, ' ', OP (ADDR16P), 0 } },
605     & ifmt_page, { 0x10 }
606   },
607 /* system */
608   {
609     { 0, 0, 0, 0 },
610     { { MNEM, 0 } },
611     & ifmt_ireadi, { 0xff }
612   },
613 /* reti #$reti3 */
614   {
615     { 0, 0, 0, 0 },
616     { { MNEM, ' ', '#', OP (RETI3), 0 } },
617     & ifmt_reti, { 0x8 }
618   },
619 /* ret */
620   {
621     { 0, 0, 0, 0 },
622     { { MNEM, 0 } },
623     & ifmt_ireadi, { 0x7 }
624   },
625 /* int */
626   {
627     { 0, 0, 0, 0 },
628     { { MNEM, 0 } },
629     & ifmt_ireadi, { 0x6 }
630   },
631 /* breakx */
632   {
633     { 0, 0, 0, 0 },
634     { { MNEM, 0 } },
635     & ifmt_ireadi, { 0x5 }
636   },
637 /* cwdt */
638   {
639     { 0, 0, 0, 0 },
640     { { MNEM, 0 } },
641     & ifmt_ireadi, { 0x4 }
642   },
643 /* ferase */
644   {
645     { 0, 0, 0, 0 },
646     { { MNEM, 0 } },
647     & ifmt_ireadi, { 0x3 }
648   },
649 /* retnp */
650   {
651     { 0, 0, 0, 0 },
652     { { MNEM, 0 } },
653     & ifmt_ireadi, { 0x2 }
654   },
655 /* break */
656   {
657     { 0, 0, 0, 0 },
658     { { MNEM, 0 } },
659     & ifmt_ireadi, { 0x1 }
660   },
661 /* nop */
662   {
663     { 0, 0, 0, 0 },
664     { { MNEM, 0 } },
665     & ifmt_ireadi, { 0x0 }
666   },
667 };
668
669 #undef A
670 #undef OPERAND
671 #undef MNEM
672 #undef OP
673
674 /* Formats for ALIAS macro-insns.  */
675
676 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
677 #define F(f) & ip2k_cgen_ifld_table[IP2K_##f]
678 #else
679 #define F(f) & ip2k_cgen_ifld_table[IP2K_/**/f]
680 #endif
681 static const CGEN_IFMT ifmt_sc ATTRIBUTE_UNUSED = {
682   16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
683 };
684
685 static const CGEN_IFMT ifmt_snc ATTRIBUTE_UNUSED = {
686   16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
687 };
688
689 static const CGEN_IFMT ifmt_sz ATTRIBUTE_UNUSED = {
690   16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
691 };
692
693 static const CGEN_IFMT ifmt_snz ATTRIBUTE_UNUSED = {
694   16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
695 };
696
697 static const CGEN_IFMT ifmt_skip ATTRIBUTE_UNUSED = {
698   16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
699 };
700
701 static const CGEN_IFMT ifmt_skipb ATTRIBUTE_UNUSED = {
702   16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } }
703 };
704
705 #undef F
706
707 /* Each non-simple macro entry points to an array of expansion possibilities.  */
708
709 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
710 #define A(a) (1 << CGEN_INSN_##a)
711 #else
712 #define A(a) (1 << CGEN_INSN_/**/a)
713 #endif
714 #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
715 #define OPERAND(op) IP2K_OPERAND_##op
716 #else
717 #define OPERAND(op) IP2K_OPERAND_/**/op
718 #endif
719 #define MNEM CGEN_SYNTAX_MNEMONIC /* syntax value for mnemonic */
720 #define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field))
721
722 /* The macro instruction table.  */
723
724 static const CGEN_IBASE ip2k_cgen_macro_insn_table[] =
725 {
726 /* sc */
727   {
728     -1, "sc", "sc", 16,
729     { 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
730   },
731 /* snc */
732   {
733     -1, "snc", "snc", 16,
734     { 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
735   },
736 /* sz */
737   {
738     -1, "sz", "sz", 16,
739     { 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
740   },
741 /* snz */
742   {
743     -1, "snz", "snz", 16,
744     { 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
745   },
746 /* skip */
747   {
748     -1, "skip", "skip", 16,
749     { 0|A(SKIPA)|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
750   },
751 /* skip */
752   {
753     -1, "skipb", "skip", 16,
754     { 0|A(SKIPA)|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
755   },
756 };
757
758 /* The macro instruction opcode table.  */
759
760 static const CGEN_OPCODE ip2k_cgen_macro_insn_opcode_table[] =
761 {
762 /* sc */
763   {
764     { 0, 0, 0, 0 },
765     { { MNEM, 0 } },
766     & ifmt_sc, { 0xb00b }
767   },
768 /* snc */
769   {
770     { 0, 0, 0, 0 },
771     { { MNEM, 0 } },
772     & ifmt_snc, { 0xa00b }
773   },
774 /* sz */
775   {
776     { 0, 0, 0, 0 },
777     { { MNEM, 0 } },
778     & ifmt_sz, { 0xb40b }
779   },
780 /* snz */
781   {
782     { 0, 0, 0, 0 },
783     { { MNEM, 0 } },
784     & ifmt_snz, { 0xa40b }
785   },
786 /* skip */
787   {
788     { 0, 0, 0, 0 },
789     { { MNEM, 0 } },
790     & ifmt_skip, { 0xa009 }
791   },
792 /* skip */
793   {
794     { 0, 0, 0, 0 },
795     { { MNEM, 0 } },
796     & ifmt_skipb, { 0xb009 }
797   },
798 };
799
800 #undef A
801 #undef OPERAND
802 #undef MNEM
803 #undef OP
804
805 #ifndef CGEN_ASM_HASH_P
806 #define CGEN_ASM_HASH_P(insn) 1
807 #endif
808
809 #ifndef CGEN_DIS_HASH_P
810 #define CGEN_DIS_HASH_P(insn) 1
811 #endif
812
813 /* Return non-zero if INSN is to be added to the hash table.
814    Targets are free to override CGEN_{ASM,DIS}_HASH_P in the .opc file.  */
815
816 static int
817 asm_hash_insn_p (insn)
818      const CGEN_INSN *insn ATTRIBUTE_UNUSED;
819 {
820   return CGEN_ASM_HASH_P (insn);
821 }
822
823 static int
824 dis_hash_insn_p (insn)
825      const CGEN_INSN *insn;
826 {
827   /* If building the hash table and the NO-DIS attribute is present,
828      ignore.  */
829   if (CGEN_INSN_ATTR_VALUE (insn, CGEN_INSN_NO_DIS))
830     return 0;
831   return CGEN_DIS_HASH_P (insn);
832 }
833
834 #ifndef CGEN_ASM_HASH
835 #define CGEN_ASM_HASH_SIZE 127
836 #ifdef CGEN_MNEMONIC_OPERANDS
837 #define CGEN_ASM_HASH(mnem) (*(unsigned char *) (mnem) % CGEN_ASM_HASH_SIZE)
838 #else
839 #define CGEN_ASM_HASH(mnem) (*(unsigned char *) (mnem) % CGEN_ASM_HASH_SIZE) /*FIXME*/
840 #endif
841 #endif
842
843 /* It doesn't make much sense to provide a default here,
844    but while this is under development we do.
845    BUFFER is a pointer to the bytes of the insn, target order.
846    VALUE is the first base_insn_bitsize bits as an int in host order.  */
847
848 #ifndef CGEN_DIS_HASH
849 #define CGEN_DIS_HASH_SIZE 256
850 #define CGEN_DIS_HASH(buf, value) (*(unsigned char *) (buf))
851 #endif
852
853 /* The result is the hash value of the insn.
854    Targets are free to override CGEN_{ASM,DIS}_HASH in the .opc file.  */
855
856 static unsigned int
857 asm_hash_insn (mnem)
858      const char * mnem;
859 {
860   return CGEN_ASM_HASH (mnem);
861 }
862
863 /* BUF is a pointer to the bytes of the insn, target order.
864    VALUE is the first base_insn_bitsize bits as an int in host order.  */
865
866 static unsigned int
867 dis_hash_insn (buf, value)
868      const char * buf ATTRIBUTE_UNUSED;
869      CGEN_INSN_INT value ATTRIBUTE_UNUSED;
870 {
871   return CGEN_DIS_HASH (buf, value);
872 }
873
874 /* Set the recorded length of the insn in the CGEN_FIELDS struct.  */
875
876 static void
877 set_fields_bitsize (CGEN_FIELDS *fields, int size)
878 {
879   CGEN_FIELDS_BITSIZE (fields) = size;
880 }
881
882 /* Function to call before using the operand instance table.
883    This plugs the opcode entries and macro instructions into the cpu table.  */
884
885 void
886 ip2k_cgen_init_opcode_table (CGEN_CPU_DESC cd)
887 {
888   int i;
889   int num_macros = (sizeof (ip2k_cgen_macro_insn_table) /
890                     sizeof (ip2k_cgen_macro_insn_table[0]));
891   const CGEN_IBASE *ib = & ip2k_cgen_macro_insn_table[0];
892   const CGEN_OPCODE *oc = & ip2k_cgen_macro_insn_opcode_table[0];
893   CGEN_INSN *insns = xmalloc (num_macros * sizeof (CGEN_INSN));
894
895   /* This test has been added to avoid a warning generated
896      if memset is called with a third argument of value zero.  */
897   if (num_macros >= 1)
898     memset (insns, 0, num_macros * sizeof (CGEN_INSN));
899   for (i = 0; i < num_macros; ++i)
900     {
901       insns[i].base = &ib[i];
902       insns[i].opcode = &oc[i];
903       ip2k_cgen_build_insn_regex (& insns[i]);
904     }
905   cd->macro_insn_table.init_entries = insns;
906   cd->macro_insn_table.entry_size = sizeof (CGEN_IBASE);
907   cd->macro_insn_table.num_init_entries = num_macros;
908
909   oc = & ip2k_cgen_insn_opcode_table[0];
910   insns = (CGEN_INSN *) cd->insn_table.init_entries;
911   for (i = 0; i < MAX_INSNS; ++i)
912     {
913       insns[i].opcode = &oc[i];
914       ip2k_cgen_build_insn_regex (& insns[i]);
915     }
916
917   cd->sizeof_fields = sizeof (CGEN_FIELDS);
918   cd->set_fields_bitsize = set_fields_bitsize;
919
920   cd->asm_hash_p = asm_hash_insn_p;
921   cd->asm_hash = asm_hash_insn;
922   cd->asm_hash_size = CGEN_ASM_HASH_SIZE;
923
924   cd->dis_hash_p = dis_hash_insn_p;
925   cd->dis_hash = dis_hash_insn;
926   cd->dis_hash_size = CGEN_DIS_HASH_SIZE;
927 }