1 /* Disassembler interface for targets using CGEN. -*- C -*-
2 CGEN: Cpu tools GENerator
4 THIS FILE IS MACHINE GENERATED WITH CGEN.
5 - the resultant file is machine generated, cgen-dis.in isn't
7 Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2005
8 Free Software Foundation, Inc.
10 This file is part of the GNU Binutils and GDB, the GNU debugger.
12 This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2, or (at your option)
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
22 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software Foundation, Inc.,
24 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
26 /* ??? Eventually more and more of this stuff can go to cpu-independent files.
35 #include "libiberty.h"
36 #include "m32c-desc.h"
40 /* Default text to print if an instruction isn't recognized. */
41 #define UNKNOWN_INSN_MSG _("*unknown*")
43 static void print_normal
44 (CGEN_CPU_DESC
, void *, long, unsigned int, bfd_vma
, int);
45 static void print_address
46 (CGEN_CPU_DESC
, void *, bfd_vma
, unsigned int, bfd_vma
, int) ATTRIBUTE_UNUSED
;
47 static void print_keyword
48 (CGEN_CPU_DESC
, void *, CGEN_KEYWORD
*, long, unsigned int) ATTRIBUTE_UNUSED
;
49 static void print_insn_normal
50 (CGEN_CPU_DESC
, void *, const CGEN_INSN
*, CGEN_FIELDS
*, bfd_vma
, int);
52 (CGEN_CPU_DESC
, bfd_vma
, disassemble_info
*, bfd_byte
*, unsigned);
53 static int default_print_insn
54 (CGEN_CPU_DESC
, bfd_vma
, disassemble_info
*) ATTRIBUTE_UNUSED
;
56 (CGEN_CPU_DESC
, bfd_vma
, disassemble_info
*, bfd_byte
*, int, CGEN_EXTRACT_INFO
*,
59 /* -- disassembler routines inserted here */
66 /* Always print the short insn format suffix as ':<char>' */
68 print_suffix (PTR dis_info
, char suffix
)
70 disassemble_info
*info
= dis_info
;
71 (*info
->fprintf_func
) (info
->stream
, ":%c", suffix
);
75 print_S (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
77 long value ATTRIBUTE_UNUSED
,
78 unsigned int attrs ATTRIBUTE_UNUSED
,
79 bfd_vma pc ATTRIBUTE_UNUSED
,
80 int length ATTRIBUTE_UNUSED
)
82 print_suffix (dis_info
, 's');
87 print_G (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
89 long value ATTRIBUTE_UNUSED
,
90 unsigned int attrs ATTRIBUTE_UNUSED
,
91 bfd_vma pc ATTRIBUTE_UNUSED
,
92 int length ATTRIBUTE_UNUSED
)
94 print_suffix (dis_info
, 'g');
98 print_Q (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
100 long value ATTRIBUTE_UNUSED
,
101 unsigned int attrs ATTRIBUTE_UNUSED
,
102 bfd_vma pc ATTRIBUTE_UNUSED
,
103 int length ATTRIBUTE_UNUSED
)
105 print_suffix (dis_info
, 'q');
109 print_Z (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
111 long value ATTRIBUTE_UNUSED
,
112 unsigned int attrs ATTRIBUTE_UNUSED
,
113 bfd_vma pc ATTRIBUTE_UNUSED
,
114 int length ATTRIBUTE_UNUSED
)
116 print_suffix (dis_info
, 'z');
119 /* Print the empty suffix */
121 print_X (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
122 PTR dis_info ATTRIBUTE_UNUSED
,
123 long value ATTRIBUTE_UNUSED
,
124 unsigned int attrs ATTRIBUTE_UNUSED
,
125 bfd_vma pc ATTRIBUTE_UNUSED
,
126 int length ATTRIBUTE_UNUSED
)
132 print_r0l_r0h (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
135 unsigned int attrs ATTRIBUTE_UNUSED
,
136 bfd_vma pc ATTRIBUTE_UNUSED
,
137 int length ATTRIBUTE_UNUSED
)
139 disassemble_info
*info
= dis_info
;
141 (*info
->fprintf_func
) (info
->stream
, "r0h,r0l");
143 (*info
->fprintf_func
) (info
->stream
, "r0l,r0h");
147 print_unsigned_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
150 unsigned int attrs ATTRIBUTE_UNUSED
,
151 bfd_vma pc ATTRIBUTE_UNUSED
,
152 int length ATTRIBUTE_UNUSED
)
154 disassemble_info
*info
= dis_info
;
155 (*info
->fprintf_func
) (info
->stream
, "%ld,0x%lx", value
& 0x7, value
>> 3);
159 print_signed_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
162 unsigned int attrs ATTRIBUTE_UNUSED
,
163 bfd_vma pc ATTRIBUTE_UNUSED
,
164 int length ATTRIBUTE_UNUSED
)
166 disassemble_info
*info
= dis_info
;
167 (*info
->fprintf_func
) (info
->stream
, "%ld,%ld", value
& 0x7, value
>> 3);
171 print_size (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
173 long value ATTRIBUTE_UNUSED
,
174 unsigned int attrs ATTRIBUTE_UNUSED
,
175 bfd_vma pc ATTRIBUTE_UNUSED
,
176 int length ATTRIBUTE_UNUSED
)
178 /* Always print the size as '.w' */
179 disassemble_info
*info
= dis_info
;
180 (*info
->fprintf_func
) (info
->stream
, ".w");
186 static void print_pop_regset (CGEN_CPU_DESC
, PTR
, long, unsigned int, bfd_vma
, int);
187 static void print_push_regset (CGEN_CPU_DESC
, PTR
, long, unsigned int, bfd_vma
, int);
189 /* Print a set of registers, R0,R1,A0,A1,SB,FB. */
192 print_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
195 unsigned int attrs ATTRIBUTE_UNUSED
,
196 bfd_vma pc ATTRIBUTE_UNUSED
,
197 int length ATTRIBUTE_UNUSED
,
200 static char * m16c_register_names
[] =
202 "r0", "r1", "r2", "r3", "a0", "a1", "sb", "fb"
204 disassemble_info
*info
= dis_info
;
216 (*info
->fprintf_func
) (info
->stream
, "%s", m16c_register_names
[0]);
220 for (index
= 1; index
<= 7; ++index
)
229 (*info
->fprintf_func
) (info
->stream
, "%s%s", comma
,
230 m16c_register_names
[index
]);
237 print_pop_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
240 unsigned int attrs ATTRIBUTE_UNUSED
,
241 bfd_vma pc ATTRIBUTE_UNUSED
,
242 int length ATTRIBUTE_UNUSED
)
244 print_regset (cd
, dis_info
, value
, attrs
, pc
, length
, POP
);
248 print_push_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
251 unsigned int attrs ATTRIBUTE_UNUSED
,
252 bfd_vma pc ATTRIBUTE_UNUSED
,
253 int length ATTRIBUTE_UNUSED
)
255 print_regset (cd
, dis_info
, value
, attrs
, pc
, length
, PUSH
);
257 #if 0 /* not used? */
259 print_boff (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
262 unsigned int attrs ATTRIBUTE_UNUSED
,
263 bfd_vma pc ATTRIBUTE_UNUSED
,
264 int length ATTRIBUTE_UNUSED
)
266 disassemble_info
*info
= dis_info
;
268 info
->fprintf_func (info
->stream
, "%d,%d", value
% 16,
272 #endif /* not used? */
274 void m32c_cgen_print_operand
275 PARAMS ((CGEN_CPU_DESC
, int, PTR
, CGEN_FIELDS
*,
276 void const *, bfd_vma
, int));
278 /* Main entry point for printing operands.
279 XINFO is a `void *' and not a `disassemble_info *' to not put a requirement
280 of dis-asm.h on cgen.h.
282 This function is basically just a big switch statement. Earlier versions
283 used tables to look up the function to use, but
284 - if the table contains both assembler and disassembler functions then
285 the disassembler contains much of the assembler and vice-versa,
286 - there's a lot of inlining possibilities as things grow,
287 - using a switch statement avoids the function call overhead.
289 This function could be moved into `print_insn_normal', but keeping it
290 separate makes clear the interface between `print_insn_normal' and each of
294 m32c_cgen_print_operand (cd
, opindex
, xinfo
, fields
, attrs
, pc
, length
)
299 void const *attrs ATTRIBUTE_UNUSED
;
303 disassemble_info
*info
= (disassemble_info
*) xinfo
;
307 case M32C_OPERAND_A0
:
308 print_keyword (cd
, info
, & m32c_cgen_opval_h_a0
, 0, 0);
310 case M32C_OPERAND_A1
:
311 print_keyword (cd
, info
, & m32c_cgen_opval_h_a1
, 0, 0);
313 case M32C_OPERAND_AN16_PUSH_S
:
314 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_4_1
, 0);
316 case M32C_OPERAND_BIT16AN
:
317 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst16_an
, 0);
319 case M32C_OPERAND_BIT16RN
:
320 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_dst16_rn
, 0);
322 case M32C_OPERAND_BIT32ANPREFIXED
:
323 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_prefixed
, 0);
325 case M32C_OPERAND_BIT32ANUNPREFIXED
:
326 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_unprefixed
, 0);
328 case M32C_OPERAND_BIT32RNPREFIXED
:
329 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_dst32_rn_prefixed_QI
, 0);
331 case M32C_OPERAND_BIT32RNUNPREFIXED
:
332 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_dst32_rn_unprefixed_QI
, 0);
334 case M32C_OPERAND_BITBASE16_16_S8
:
335 print_signed_bitbase (cd
, info
, fields
->f_dsp_16_s8
, 0, pc
, length
);
337 case M32C_OPERAND_BITBASE16_16_U16
:
338 print_unsigned_bitbase (cd
, info
, fields
->f_dsp_16_u16
, 0, pc
, length
);
340 case M32C_OPERAND_BITBASE16_16_U8
:
341 print_unsigned_bitbase (cd
, info
, fields
->f_dsp_16_u8
, 0, pc
, length
);
343 case M32C_OPERAND_BITBASE16_8_U11_S
:
344 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase16_u11_S
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
346 case M32C_OPERAND_BITBASE32_16_S11_UNPREFIXED
:
347 print_signed_bitbase (cd
, info
, fields
->f_bitbase32_16_s11_unprefixed
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
349 case M32C_OPERAND_BITBASE32_16_S19_UNPREFIXED
:
350 print_signed_bitbase (cd
, info
, fields
->f_bitbase32_16_s19_unprefixed
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
352 case M32C_OPERAND_BITBASE32_16_U11_UNPREFIXED
:
353 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase32_16_u11_unprefixed
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
355 case M32C_OPERAND_BITBASE32_16_U19_UNPREFIXED
:
356 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase32_16_u19_unprefixed
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
358 case M32C_OPERAND_BITBASE32_16_U27_UNPREFIXED
:
359 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase32_16_u27_unprefixed
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
361 case M32C_OPERAND_BITBASE32_24_S11_PREFIXED
:
362 print_signed_bitbase (cd
, info
, fields
->f_bitbase32_24_s11_prefixed
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
364 case M32C_OPERAND_BITBASE32_24_S19_PREFIXED
:
365 print_signed_bitbase (cd
, info
, fields
->f_bitbase32_24_s19_prefixed
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
367 case M32C_OPERAND_BITBASE32_24_U11_PREFIXED
:
368 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase32_24_u11_prefixed
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
370 case M32C_OPERAND_BITBASE32_24_U19_PREFIXED
:
371 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase32_24_u19_prefixed
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
373 case M32C_OPERAND_BITBASE32_24_U27_PREFIXED
:
374 print_unsigned_bitbase (cd
, info
, fields
->f_bitbase32_24_u27_prefixed
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
376 case M32C_OPERAND_BITNO16R
:
377 print_normal (cd
, info
, fields
->f_dsp_16_u8
, 0, pc
, length
);
379 case M32C_OPERAND_BITNO32PREFIXED
:
380 print_normal (cd
, info
, fields
->f_bitno32_prefixed
, 0, pc
, length
);
382 case M32C_OPERAND_BITNO32UNPREFIXED
:
383 print_normal (cd
, info
, fields
->f_bitno32_unprefixed
, 0, pc
, length
);
385 case M32C_OPERAND_DSP_10_U6
:
386 print_normal (cd
, info
, fields
->f_dsp_10_u6
, 0, pc
, length
);
388 case M32C_OPERAND_DSP_16_S16
:
389 print_normal (cd
, info
, fields
->f_dsp_16_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
391 case M32C_OPERAND_DSP_16_S8
:
392 print_normal (cd
, info
, fields
->f_dsp_16_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
394 case M32C_OPERAND_DSP_16_U16
:
395 print_normal (cd
, info
, fields
->f_dsp_16_u16
, 0, pc
, length
);
397 case M32C_OPERAND_DSP_16_U20
:
398 print_normal (cd
, info
, fields
->f_dsp_16_u24
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
400 case M32C_OPERAND_DSP_16_U24
:
401 print_normal (cd
, info
, fields
->f_dsp_16_u24
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
403 case M32C_OPERAND_DSP_16_U8
:
404 print_normal (cd
, info
, fields
->f_dsp_16_u8
, 0, pc
, length
);
406 case M32C_OPERAND_DSP_24_S16
:
407 print_normal (cd
, info
, fields
->f_dsp_24_s16
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
409 case M32C_OPERAND_DSP_24_S8
:
410 print_normal (cd
, info
, fields
->f_dsp_24_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
412 case M32C_OPERAND_DSP_24_U16
:
413 print_normal (cd
, info
, fields
->f_dsp_24_u16
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
415 case M32C_OPERAND_DSP_24_U20
:
416 print_normal (cd
, info
, fields
->f_dsp_24_u24
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
418 case M32C_OPERAND_DSP_24_U24
:
419 print_normal (cd
, info
, fields
->f_dsp_24_u24
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
421 case M32C_OPERAND_DSP_24_U8
:
422 print_normal (cd
, info
, fields
->f_dsp_24_u8
, 0, pc
, length
);
424 case M32C_OPERAND_DSP_32_S16
:
425 print_normal (cd
, info
, fields
->f_dsp_32_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
427 case M32C_OPERAND_DSP_32_S8
:
428 print_normal (cd
, info
, fields
->f_dsp_32_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
430 case M32C_OPERAND_DSP_32_U16
:
431 print_normal (cd
, info
, fields
->f_dsp_32_u16
, 0, pc
, length
);
433 case M32C_OPERAND_DSP_32_U20
:
434 print_normal (cd
, info
, fields
->f_dsp_32_u24
, 0, pc
, length
);
436 case M32C_OPERAND_DSP_32_U24
:
437 print_normal (cd
, info
, fields
->f_dsp_32_u24
, 0, pc
, length
);
439 case M32C_OPERAND_DSP_32_U8
:
440 print_normal (cd
, info
, fields
->f_dsp_32_u8
, 0, pc
, length
);
442 case M32C_OPERAND_DSP_40_S16
:
443 print_normal (cd
, info
, fields
->f_dsp_40_s16
, 0, pc
, length
);
445 case M32C_OPERAND_DSP_40_S8
:
446 print_normal (cd
, info
, fields
->f_dsp_40_s8
, 0, pc
, length
);
448 case M32C_OPERAND_DSP_40_U16
:
449 print_normal (cd
, info
, fields
->f_dsp_40_u16
, 0, pc
, length
);
451 case M32C_OPERAND_DSP_40_U24
:
452 print_normal (cd
, info
, fields
->f_dsp_40_u24
, 0, pc
, length
);
454 case M32C_OPERAND_DSP_40_U8
:
455 print_normal (cd
, info
, fields
->f_dsp_40_u8
, 0, pc
, length
);
457 case M32C_OPERAND_DSP_48_S16
:
458 print_normal (cd
, info
, fields
->f_dsp_48_s16
, 0, pc
, length
);
460 case M32C_OPERAND_DSP_48_S8
:
461 print_normal (cd
, info
, fields
->f_dsp_48_s8
, 0, pc
, length
);
463 case M32C_OPERAND_DSP_48_U16
:
464 print_normal (cd
, info
, fields
->f_dsp_48_u16
, 0, pc
, length
);
466 case M32C_OPERAND_DSP_48_U24
:
467 print_normal (cd
, info
, fields
->f_dsp_48_u24
, 0|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
469 case M32C_OPERAND_DSP_48_U8
:
470 print_normal (cd
, info
, fields
->f_dsp_48_u8
, 0, pc
, length
);
472 case M32C_OPERAND_DSP_8_S8
:
473 print_normal (cd
, info
, fields
->f_dsp_8_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
475 case M32C_OPERAND_DSP_8_U16
:
476 print_normal (cd
, info
, fields
->f_dsp_8_u16
, 0, pc
, length
);
478 case M32C_OPERAND_DSP_8_U6
:
479 print_normal (cd
, info
, fields
->f_dsp_8_u6
, 0, pc
, length
);
481 case M32C_OPERAND_DSP_8_U8
:
482 print_normal (cd
, info
, fields
->f_dsp_8_u8
, 0, pc
, length
);
484 case M32C_OPERAND_DST16AN
:
485 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst16_an
, 0);
487 case M32C_OPERAND_DST16AN_S
:
488 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_dst16_an_s
, 0);
490 case M32C_OPERAND_DST16ANHI
:
491 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_dst16_an
, 0);
493 case M32C_OPERAND_DST16ANQI
:
494 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_dst16_an
, 0);
496 case M32C_OPERAND_DST16ANQI_S
:
497 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_dst16_rn_QI_s
, 0);
499 case M32C_OPERAND_DST16ANSI
:
500 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_SI
, fields
->f_dst16_an
, 0);
502 case M32C_OPERAND_DST16RNEXTQI
:
503 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_ext_QI
, fields
->f_dst16_rn_ext
, 0);
505 case M32C_OPERAND_DST16RNHI
:
506 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_dst16_rn
, 0);
508 case M32C_OPERAND_DST16RNQI
:
509 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_dst16_rn
, 0);
511 case M32C_OPERAND_DST16RNQI_S
:
512 print_keyword (cd
, info
, & m32c_cgen_opval_h_r0l_r0h
, fields
->f_dst16_rn_QI_s
, 0);
514 case M32C_OPERAND_DST16RNSI
:
515 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_SI
, fields
->f_dst16_rn
, 0);
517 case M32C_OPERAND_DST32ANEXTUNPREFIXED
:
518 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_unprefixed
, 0);
520 case M32C_OPERAND_DST32ANPREFIXED
:
521 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_prefixed
, 0);
523 case M32C_OPERAND_DST32ANPREFIXEDHI
:
524 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_dst32_an_prefixed
, 0);
526 case M32C_OPERAND_DST32ANPREFIXEDQI
:
527 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_dst32_an_prefixed
, 0);
529 case M32C_OPERAND_DST32ANPREFIXEDSI
:
530 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_prefixed
, 0);
532 case M32C_OPERAND_DST32ANUNPREFIXED
:
533 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_unprefixed
, 0);
535 case M32C_OPERAND_DST32ANUNPREFIXEDHI
:
536 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_dst32_an_unprefixed
, 0);
538 case M32C_OPERAND_DST32ANUNPREFIXEDQI
:
539 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_dst32_an_unprefixed
, 0);
541 case M32C_OPERAND_DST32ANUNPREFIXEDSI
:
542 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_dst32_an_unprefixed
, 0);
544 case M32C_OPERAND_DST32R0HI_S
:
545 print_keyword (cd
, info
, & m32c_cgen_opval_h_r0
, 0, 0);
547 case M32C_OPERAND_DST32R0QI_S
:
548 print_keyword (cd
, info
, & m32c_cgen_opval_h_r0l
, 0, 0);
550 case M32C_OPERAND_DST32RNEXTUNPREFIXEDHI
:
551 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_ext_HI
, fields
->f_dst32_rn_ext_unprefixed
, 0);
553 case M32C_OPERAND_DST32RNEXTUNPREFIXEDQI
:
554 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_ext_QI
, fields
->f_dst32_rn_ext_unprefixed
, 0);
556 case M32C_OPERAND_DST32RNPREFIXEDHI
:
557 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_dst32_rn_prefixed_HI
, 0);
559 case M32C_OPERAND_DST32RNPREFIXEDQI
:
560 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_dst32_rn_prefixed_QI
, 0);
562 case M32C_OPERAND_DST32RNPREFIXEDSI
:
563 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_SI
, fields
->f_dst32_rn_prefixed_SI
, 0);
565 case M32C_OPERAND_DST32RNUNPREFIXEDHI
:
566 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_dst32_rn_unprefixed_HI
, 0);
568 case M32C_OPERAND_DST32RNUNPREFIXEDQI
:
569 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_dst32_rn_unprefixed_QI
, 0);
571 case M32C_OPERAND_DST32RNUNPREFIXEDSI
:
572 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_SI
, fields
->f_dst32_rn_unprefixed_SI
, 0);
574 case M32C_OPERAND_G
:
575 print_G (cd
, info
, 0, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
577 case M32C_OPERAND_IMM_12_S4
:
578 print_normal (cd
, info
, fields
->f_imm_12_s4
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
580 case M32C_OPERAND_IMM_13_U3
:
581 print_normal (cd
, info
, fields
->f_imm_13_u3
, 0, pc
, length
);
583 case M32C_OPERAND_IMM_16_HI
:
584 print_normal (cd
, info
, fields
->f_dsp_16_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
586 case M32C_OPERAND_IMM_16_QI
:
587 print_normal (cd
, info
, fields
->f_dsp_16_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
589 case M32C_OPERAND_IMM_16_SI
:
590 print_normal (cd
, info
, fields
->f_dsp_16_s32
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
592 case M32C_OPERAND_IMM_20_S4
:
593 print_normal (cd
, info
, fields
->f_imm_20_s4
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
595 case M32C_OPERAND_IMM_24_HI
:
596 print_normal (cd
, info
, fields
->f_dsp_24_s16
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
598 case M32C_OPERAND_IMM_24_QI
:
599 print_normal (cd
, info
, fields
->f_dsp_24_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
601 case M32C_OPERAND_IMM_24_SI
:
602 print_normal (cd
, info
, fields
->f_dsp_24_s32
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
604 case M32C_OPERAND_IMM_32_HI
:
605 print_normal (cd
, info
, fields
->f_dsp_32_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
607 case M32C_OPERAND_IMM_32_QI
:
608 print_normal (cd
, info
, fields
->f_dsp_32_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
610 case M32C_OPERAND_IMM_32_SI
:
611 print_normal (cd
, info
, fields
->f_dsp_32_s32
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
613 case M32C_OPERAND_IMM_40_HI
:
614 print_normal (cd
, info
, fields
->f_dsp_40_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
616 case M32C_OPERAND_IMM_40_QI
:
617 print_normal (cd
, info
, fields
->f_dsp_40_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
619 case M32C_OPERAND_IMM_40_SI
:
620 print_normal (cd
, info
, fields
->f_dsp_40_s32
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
622 case M32C_OPERAND_IMM_48_HI
:
623 print_normal (cd
, info
, fields
->f_dsp_48_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
625 case M32C_OPERAND_IMM_48_QI
:
626 print_normal (cd
, info
, fields
->f_dsp_48_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
628 case M32C_OPERAND_IMM_48_SI
:
629 print_normal (cd
, info
, fields
->f_dsp_48_s32
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
631 case M32C_OPERAND_IMM_56_HI
:
632 print_normal (cd
, info
, fields
->f_dsp_56_s16
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
634 case M32C_OPERAND_IMM_56_QI
:
635 print_normal (cd
, info
, fields
->f_dsp_56_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
637 case M32C_OPERAND_IMM_64_HI
:
638 print_normal (cd
, info
, fields
->f_dsp_64_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
640 case M32C_OPERAND_IMM_8_HI
:
641 print_normal (cd
, info
, fields
->f_dsp_8_s16
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
643 case M32C_OPERAND_IMM_8_QI
:
644 print_normal (cd
, info
, fields
->f_dsp_8_s8
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
646 case M32C_OPERAND_IMM_8_S4
:
647 print_normal (cd
, info
, fields
->f_imm_8_s4
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
649 case M32C_OPERAND_IMM_SH_12_S4
:
650 print_keyword (cd
, info
, & m32c_cgen_opval_h_shimm
, fields
->f_imm_12_s4
, 0);
652 case M32C_OPERAND_IMM_SH_20_S4
:
653 print_keyword (cd
, info
, & m32c_cgen_opval_h_shimm
, fields
->f_imm_20_s4
, 0);
655 case M32C_OPERAND_IMM_SH_8_S4
:
656 print_keyword (cd
, info
, & m32c_cgen_opval_h_shimm
, fields
->f_imm_8_s4
, 0);
658 case M32C_OPERAND_IMM1_S
:
659 print_normal (cd
, info
, fields
->f_imm1_S
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
661 case M32C_OPERAND_IMM3_S
:
662 print_normal (cd
, info
, fields
->f_imm3_S
, 0|(1<<CGEN_OPERAND_SIGNED
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
664 case M32C_OPERAND_LAB_16_8
:
665 print_address (cd
, info
, fields
->f_lab_16_8
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
667 case M32C_OPERAND_LAB_24_8
:
668 print_address (cd
, info
, fields
->f_lab_24_8
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
670 case M32C_OPERAND_LAB_32_8
:
671 print_address (cd
, info
, fields
->f_lab_32_8
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
673 case M32C_OPERAND_LAB_40_8
:
674 print_address (cd
, info
, fields
->f_lab_40_8
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
676 case M32C_OPERAND_LAB_5_3
:
677 print_address (cd
, info
, fields
->f_lab_5_3
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
679 case M32C_OPERAND_LAB_8_16
:
680 print_address (cd
, info
, fields
->f_lab_8_16
, 0|(1<<CGEN_OPERAND_SIGN_OPT
)|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
682 case M32C_OPERAND_LAB_8_24
:
683 print_address (cd
, info
, fields
->f_lab_8_24
, 0|(1<<CGEN_OPERAND_ABS_ADDR
), pc
, length
);
685 case M32C_OPERAND_LAB_8_8
:
686 print_address (cd
, info
, fields
->f_lab_8_8
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
), pc
, length
);
688 case M32C_OPERAND_LAB32_JMP_S
:
689 print_address (cd
, info
, fields
->f_lab32_jmp_s
, 0|(1<<CGEN_OPERAND_PCREL_ADDR
)|(1<<CGEN_OPERAND_VIRTUAL
), pc
, length
);
691 case M32C_OPERAND_Q
:
692 print_Q (cd
, info
, 0, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
694 case M32C_OPERAND_R0
:
695 print_keyword (cd
, info
, & m32c_cgen_opval_h_r0
, 0, 0);
697 case M32C_OPERAND_R0H
:
698 print_keyword (cd
, info
, & m32c_cgen_opval_h_r0h
, 0, 0);
700 case M32C_OPERAND_R0L
:
701 print_keyword (cd
, info
, & m32c_cgen_opval_h_r0l
, 0, 0);
703 case M32C_OPERAND_R1
:
704 print_keyword (cd
, info
, & m32c_cgen_opval_h_r1
, 0, 0);
706 case M32C_OPERAND_R1R2R0
:
707 print_keyword (cd
, info
, & m32c_cgen_opval_h_r1r2r0
, 0, 0);
709 case M32C_OPERAND_R2
:
710 print_keyword (cd
, info
, & m32c_cgen_opval_h_r2
, 0, 0);
712 case M32C_OPERAND_R2R0
:
713 print_keyword (cd
, info
, & m32c_cgen_opval_h_r2r0
, 0, 0);
715 case M32C_OPERAND_R3
:
716 print_keyword (cd
, info
, & m32c_cgen_opval_h_r3
, 0, 0);
718 case M32C_OPERAND_R3R1
:
719 print_keyword (cd
, info
, & m32c_cgen_opval_h_r3r1
, 0, 0);
721 case M32C_OPERAND_REGSETPOP
:
722 print_pop_regset (cd
, info
, fields
->f_8_8
, 0, pc
, length
);
724 case M32C_OPERAND_REGSETPUSH
:
725 print_push_regset (cd
, info
, fields
->f_8_8
, 0, pc
, length
);
727 case M32C_OPERAND_RN16_PUSH_S
:
728 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_4_1
, 0);
730 case M32C_OPERAND_S
:
731 print_S (cd
, info
, 0, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
733 case M32C_OPERAND_SRC16AN
:
734 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_src16_an
, 0);
736 case M32C_OPERAND_SRC16ANHI
:
737 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_src16_an
, 0);
739 case M32C_OPERAND_SRC16ANQI
:
740 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_src16_an
, 0);
742 case M32C_OPERAND_SRC16RNHI
:
743 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_src16_rn
, 0);
745 case M32C_OPERAND_SRC16RNQI
:
746 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_src16_rn
, 0);
748 case M32C_OPERAND_SRC32ANPREFIXED
:
749 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_src32_an_prefixed
, 0);
751 case M32C_OPERAND_SRC32ANPREFIXEDHI
:
752 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_src32_an_prefixed
, 0);
754 case M32C_OPERAND_SRC32ANPREFIXEDQI
:
755 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_src32_an_prefixed
, 0);
757 case M32C_OPERAND_SRC32ANPREFIXEDSI
:
758 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_src32_an_prefixed
, 0);
760 case M32C_OPERAND_SRC32ANUNPREFIXED
:
761 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_src32_an_unprefixed
, 0);
763 case M32C_OPERAND_SRC32ANUNPREFIXEDHI
:
764 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_HI
, fields
->f_src32_an_unprefixed
, 0);
766 case M32C_OPERAND_SRC32ANUNPREFIXEDQI
:
767 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar_QI
, fields
->f_src32_an_unprefixed
, 0);
769 case M32C_OPERAND_SRC32ANUNPREFIXEDSI
:
770 print_keyword (cd
, info
, & m32c_cgen_opval_h_ar
, fields
->f_src32_an_unprefixed
, 0);
772 case M32C_OPERAND_SRC32RNPREFIXEDHI
:
773 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_src32_rn_prefixed_HI
, 0);
775 case M32C_OPERAND_SRC32RNPREFIXEDQI
:
776 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_src32_rn_prefixed_QI
, 0);
778 case M32C_OPERAND_SRC32RNPREFIXEDSI
:
779 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_SI
, fields
->f_src32_rn_prefixed_SI
, 0);
781 case M32C_OPERAND_SRC32RNUNPREFIXEDHI
:
782 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_HI
, fields
->f_src32_rn_unprefixed_HI
, 0);
784 case M32C_OPERAND_SRC32RNUNPREFIXEDQI
:
785 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_QI
, fields
->f_src32_rn_unprefixed_QI
, 0);
787 case M32C_OPERAND_SRC32RNUNPREFIXEDSI
:
788 print_keyword (cd
, info
, & m32c_cgen_opval_h_gr_SI
, fields
->f_src32_rn_unprefixed_SI
, 0);
790 case M32C_OPERAND_SRCDST16_R0L_R0H_S_NORMAL
:
791 print_r0l_r0h (cd
, info
, fields
->f_5_1
, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
793 case M32C_OPERAND_X
:
794 print_X (cd
, info
, 0, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
796 case M32C_OPERAND_Z
:
797 print_Z (cd
, info
, 0, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
799 case M32C_OPERAND_COND16_16
:
800 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond16
, fields
->f_dsp_16_u8
, 0);
802 case M32C_OPERAND_COND16_24
:
803 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond16
, fields
->f_dsp_24_u8
, 0);
805 case M32C_OPERAND_COND16_32
:
806 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond16
, fields
->f_dsp_32_u8
, 0);
808 case M32C_OPERAND_COND16C
:
809 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond16c
, fields
->f_cond16
, 0);
811 case M32C_OPERAND_COND16J
:
812 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond16j
, fields
->f_cond16
, 0);
814 case M32C_OPERAND_COND16J5
:
815 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond16j_5
, fields
->f_cond16j_5
, 0);
817 case M32C_OPERAND_COND32
:
818 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_cond32
, 0|(1<<CGEN_OPERAND_VIRTUAL
));
820 case M32C_OPERAND_COND32_16
:
821 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_dsp_16_u8
, 0);
823 case M32C_OPERAND_COND32_24
:
824 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_dsp_24_u8
, 0);
826 case M32C_OPERAND_COND32_32
:
827 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_dsp_32_u8
, 0);
829 case M32C_OPERAND_COND32_40
:
830 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_dsp_40_u8
, 0);
832 case M32C_OPERAND_COND32J
:
833 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_cond32j
, 0|(1<<CGEN_OPERAND_VIRTUAL
));
835 case M32C_OPERAND_CR1_PREFIXED_32
:
836 print_keyword (cd
, info
, & m32c_cgen_opval_h_cr1_32
, fields
->f_21_3
, 0);
838 case M32C_OPERAND_CR1_UNPREFIXED_32
:
839 print_keyword (cd
, info
, & m32c_cgen_opval_h_cr1_32
, fields
->f_13_3
, 0);
841 case M32C_OPERAND_CR16
:
842 print_keyword (cd
, info
, & m32c_cgen_opval_h_cr_16
, fields
->f_9_3
, 0);
844 case M32C_OPERAND_CR2_32
:
845 print_keyword (cd
, info
, & m32c_cgen_opval_h_cr2_32
, fields
->f_13_3
, 0);
847 case M32C_OPERAND_CR3_PREFIXED_32
:
848 print_keyword (cd
, info
, & m32c_cgen_opval_h_cr3_32
, fields
->f_21_3
, 0);
850 case M32C_OPERAND_CR3_UNPREFIXED_32
:
851 print_keyword (cd
, info
, & m32c_cgen_opval_h_cr3_32
, fields
->f_13_3
, 0);
853 case M32C_OPERAND_FLAGS16
:
854 print_keyword (cd
, info
, & m32c_cgen_opval_h_flags
, fields
->f_9_3
, 0);
856 case M32C_OPERAND_FLAGS32
:
857 print_keyword (cd
, info
, & m32c_cgen_opval_h_flags
, fields
->f_13_3
, 0);
859 case M32C_OPERAND_SCCOND32
:
860 print_keyword (cd
, info
, & m32c_cgen_opval_h_cond32
, fields
->f_cond16
, 0);
862 case M32C_OPERAND_SIZE
:
863 print_size (cd
, info
, 0, 0|(1<<CGEN_OPERAND_SIGNED
), pc
, length
);
867 /* xgettext:c-format */
868 fprintf (stderr
, _("Unrecognized field %d while printing insn.\n"),
874 cgen_print_fn
* const m32c_cgen_print_handlers
[] =
881 m32c_cgen_init_dis (cd
)
884 m32c_cgen_init_opcode_table (cd
);
885 m32c_cgen_init_ibld_table (cd
);
886 cd
->print_handlers
= & m32c_cgen_print_handlers
[0];
887 cd
->print_operand
= m32c_cgen_print_operand
;
891 /* Default print handler. */
894 print_normal (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
898 bfd_vma pc ATTRIBUTE_UNUSED
,
899 int length ATTRIBUTE_UNUSED
)
901 disassemble_info
*info
= (disassemble_info
*) dis_info
;
903 #ifdef CGEN_PRINT_NORMAL
904 CGEN_PRINT_NORMAL (cd
, info
, value
, attrs
, pc
, length
);
907 /* Print the operand as directed by the attributes. */
908 if (CGEN_BOOL_ATTR (attrs
, CGEN_OPERAND_SEM_ONLY
))
909 ; /* nothing to do */
910 else if (CGEN_BOOL_ATTR (attrs
, CGEN_OPERAND_SIGNED
))
911 (*info
->fprintf_func
) (info
->stream
, "%ld", value
);
913 (*info
->fprintf_func
) (info
->stream
, "0x%lx", value
);
916 /* Default address handler. */
919 print_address (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
923 bfd_vma pc ATTRIBUTE_UNUSED
,
924 int length ATTRIBUTE_UNUSED
)
926 disassemble_info
*info
= (disassemble_info
*) dis_info
;
928 #ifdef CGEN_PRINT_ADDRESS
929 CGEN_PRINT_ADDRESS (cd
, info
, value
, attrs
, pc
, length
);
932 /* Print the operand as directed by the attributes. */
933 if (CGEN_BOOL_ATTR (attrs
, CGEN_OPERAND_SEM_ONLY
))
934 ; /* nothing to do */
935 else if (CGEN_BOOL_ATTR (attrs
, CGEN_OPERAND_PCREL_ADDR
))
936 (*info
->print_address_func
) (value
, info
);
937 else if (CGEN_BOOL_ATTR (attrs
, CGEN_OPERAND_ABS_ADDR
))
938 (*info
->print_address_func
) (value
, info
);
939 else if (CGEN_BOOL_ATTR (attrs
, CGEN_OPERAND_SIGNED
))
940 (*info
->fprintf_func
) (info
->stream
, "%ld", (long) value
);
942 (*info
->fprintf_func
) (info
->stream
, "0x%lx", (long) value
);
945 /* Keyword print handler. */
948 print_keyword (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
950 CGEN_KEYWORD
*keyword_table
,
952 unsigned int attrs ATTRIBUTE_UNUSED
)
954 disassemble_info
*info
= (disassemble_info
*) dis_info
;
955 const CGEN_KEYWORD_ENTRY
*ke
;
957 ke
= cgen_keyword_lookup_value (keyword_table
, value
);
959 (*info
->fprintf_func
) (info
->stream
, "%s", ke
->name
);
961 (*info
->fprintf_func
) (info
->stream
, "???");
964 /* Default insn printer.
966 DIS_INFO is defined as `void *' so the disassembler needn't know anything
967 about disassemble_info. */
970 print_insn_normal (CGEN_CPU_DESC cd
,
972 const CGEN_INSN
*insn
,
977 const CGEN_SYNTAX
*syntax
= CGEN_INSN_SYNTAX (insn
);
978 disassemble_info
*info
= (disassemble_info
*) dis_info
;
979 const CGEN_SYNTAX_CHAR_TYPE
*syn
;
981 CGEN_INIT_PRINT (cd
);
983 for (syn
= CGEN_SYNTAX_STRING (syntax
); *syn
; ++syn
)
985 if (CGEN_SYNTAX_MNEMONIC_P (*syn
))
987 (*info
->fprintf_func
) (info
->stream
, "%s", CGEN_INSN_MNEMONIC (insn
));
990 if (CGEN_SYNTAX_CHAR_P (*syn
))
992 (*info
->fprintf_func
) (info
->stream
, "%c", CGEN_SYNTAX_CHAR (*syn
));
996 /* We have an operand. */
997 m32c_cgen_print_operand (cd
, CGEN_SYNTAX_FIELD (*syn
), info
,
998 fields
, CGEN_INSN_ATTRS (insn
), pc
, length
);
1002 /* Subroutine of print_insn. Reads an insn into the given buffers and updates
1004 Returns 0 if all is well, non-zero otherwise. */
1007 read_insn (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED
,
1009 disassemble_info
*info
,
1012 CGEN_EXTRACT_INFO
*ex_info
,
1013 unsigned long *insn_value
)
1015 int status
= (*info
->read_memory_func
) (pc
, buf
, buflen
, info
);
1018 (*info
->memory_error_func
) (status
, pc
, info
);
1022 ex_info
->dis_info
= info
;
1023 ex_info
->valid
= (1 << buflen
) - 1;
1024 ex_info
->insn_bytes
= buf
;
1026 *insn_value
= bfd_get_bits (buf
, buflen
* 8, info
->endian
== BFD_ENDIAN_BIG
);
1030 /* Utility to print an insn.
1031 BUF is the base part of the insn, target byte order, BUFLEN bytes long.
1032 The result is the size of the insn in bytes or zero for an unknown insn
1033 or -1 if an error occurs fetching data (memory_error_func will have
1037 print_insn (CGEN_CPU_DESC cd
,
1039 disassemble_info
*info
,
1041 unsigned int buflen
)
1043 CGEN_INSN_INT insn_value
;
1044 const CGEN_INSN_LIST
*insn_list
;
1045 CGEN_EXTRACT_INFO ex_info
;
1048 /* Extract base part of instruction, just in case CGEN_DIS_* uses it. */
1049 basesize
= cd
->base_insn_bitsize
< buflen
* 8 ?
1050 cd
->base_insn_bitsize
: buflen
* 8;
1051 insn_value
= cgen_get_insn_value (cd
, buf
, basesize
);
1054 /* Fill in ex_info fields like read_insn would. Don't actually call
1055 read_insn, since the incoming buffer is already read (and possibly
1056 modified a la m32r). */
1057 ex_info
.valid
= (1 << buflen
) - 1;
1058 ex_info
.dis_info
= info
;
1059 ex_info
.insn_bytes
= buf
;
1061 /* The instructions are stored in hash lists.
1062 Pick the first one and keep trying until we find the right one. */
1064 insn_list
= CGEN_DIS_LOOKUP_INSN (cd
, (char *) buf
, insn_value
);
1065 while (insn_list
!= NULL
)
1067 const CGEN_INSN
*insn
= insn_list
->insn
;
1070 unsigned long insn_value_cropped
;
1072 #ifdef CGEN_VALIDATE_INSN_SUPPORTED
1073 /* Not needed as insn shouldn't be in hash lists if not supported. */
1074 /* Supported by this cpu? */
1075 if (! m32c_cgen_insn_supported (cd
, insn
))
1077 insn_list
= CGEN_DIS_NEXT_INSN (insn_list
);
1082 /* Basic bit mask must be correct. */
1083 /* ??? May wish to allow target to defer this check until the extract
1086 /* Base size may exceed this instruction's size. Extract the
1087 relevant part from the buffer. */
1088 if ((unsigned) (CGEN_INSN_BITSIZE (insn
) / 8) < buflen
&&
1089 (unsigned) (CGEN_INSN_BITSIZE (insn
) / 8) <= sizeof (unsigned long))
1090 insn_value_cropped
= bfd_get_bits (buf
, CGEN_INSN_BITSIZE (insn
),
1091 info
->endian
== BFD_ENDIAN_BIG
);
1093 insn_value_cropped
= insn_value
;
1095 if ((insn_value_cropped
& CGEN_INSN_BASE_MASK (insn
))
1096 == CGEN_INSN_BASE_VALUE (insn
))
1098 /* Printing is handled in two passes. The first pass parses the
1099 machine insn and extracts the fields. The second pass prints
1102 /* Make sure the entire insn is loaded into insn_value, if it
1104 if (((unsigned) CGEN_INSN_BITSIZE (insn
) > cd
->base_insn_bitsize
) &&
1105 (unsigned) (CGEN_INSN_BITSIZE (insn
) / 8) <= sizeof (unsigned long))
1107 unsigned long full_insn_value
;
1108 int rc
= read_insn (cd
, pc
, info
, buf
,
1109 CGEN_INSN_BITSIZE (insn
) / 8,
1110 & ex_info
, & full_insn_value
);
1113 length
= CGEN_EXTRACT_FN (cd
, insn
)
1114 (cd
, insn
, &ex_info
, full_insn_value
, &fields
, pc
);
1117 length
= CGEN_EXTRACT_FN (cd
, insn
)
1118 (cd
, insn
, &ex_info
, insn_value_cropped
, &fields
, pc
);
1120 /* length < 0 -> error */
1125 CGEN_PRINT_FN (cd
, insn
) (cd
, info
, insn
, &fields
, pc
, length
);
1126 /* length is in bits, result is in bytes */
1131 insn_list
= CGEN_DIS_NEXT_INSN (insn_list
);
1137 /* Default value for CGEN_PRINT_INSN.
1138 The result is the size of the insn in bytes or zero for an unknown insn
1139 or -1 if an error occured fetching bytes. */
1141 #ifndef CGEN_PRINT_INSN
1142 #define CGEN_PRINT_INSN default_print_insn
1146 default_print_insn (CGEN_CPU_DESC cd
, bfd_vma pc
, disassemble_info
*info
)
1148 bfd_byte buf
[CGEN_MAX_INSN_SIZE
];
1152 /* Attempt to read the base part of the insn. */
1153 buflen
= cd
->base_insn_bitsize
/ 8;
1154 status
= (*info
->read_memory_func
) (pc
, buf
, buflen
, info
);
1156 /* Try again with the minimum part, if min < base. */
1157 if (status
!= 0 && (cd
->min_insn_bitsize
< cd
->base_insn_bitsize
))
1159 buflen
= cd
->min_insn_bitsize
/ 8;
1160 status
= (*info
->read_memory_func
) (pc
, buf
, buflen
, info
);
1165 (*info
->memory_error_func
) (status
, pc
, info
);
1169 return print_insn (cd
, pc
, info
, buf
, buflen
);
1172 /* Main entry point.
1173 Print one instruction from PC on INFO->STREAM.
1174 Return the size of the instruction (in bytes). */
1176 typedef struct cpu_desc_list
{
1177 struct cpu_desc_list
*next
;
1185 print_insn_m32c (bfd_vma pc
, disassemble_info
*info
)
1187 static cpu_desc_list
*cd_list
= 0;
1188 cpu_desc_list
*cl
= 0;
1189 static CGEN_CPU_DESC cd
= 0;
1190 static int prev_isa
;
1191 static int prev_mach
;
1192 static int prev_endian
;
1195 int endian
= (info
->endian
== BFD_ENDIAN_BIG
1197 : CGEN_ENDIAN_LITTLE
);
1198 enum bfd_architecture arch
;
1200 /* ??? gdb will set mach but leave the architecture as "unknown" */
1201 #ifndef CGEN_BFD_ARCH
1202 #define CGEN_BFD_ARCH bfd_arch_m32c
1205 if (arch
== bfd_arch_unknown
)
1206 arch
= CGEN_BFD_ARCH
;
1208 /* There's no standard way to compute the machine or isa number
1209 so we leave it to the target. */
1210 #ifdef CGEN_COMPUTE_MACH
1211 mach
= CGEN_COMPUTE_MACH (info
);
1216 #ifdef CGEN_COMPUTE_ISA
1217 isa
= CGEN_COMPUTE_ISA (info
);
1219 isa
= info
->insn_sets
;
1222 /* If we've switched cpu's, try to find a handle we've used before */
1225 || mach
!= prev_mach
1226 || endian
!= prev_endian
))
1229 for (cl
= cd_list
; cl
; cl
= cl
->next
)
1231 if (cl
->isa
== isa
&&
1233 cl
->endian
== endian
)
1241 /* If we haven't initialized yet, initialize the opcode table. */
1244 const bfd_arch_info_type
*arch_type
= bfd_lookup_arch (arch
, mach
);
1245 const char *mach_name
;
1249 mach_name
= arch_type
->printable_name
;
1253 prev_endian
= endian
;
1254 cd
= m32c_cgen_cpu_open (CGEN_CPU_OPEN_ISAS
, prev_isa
,
1255 CGEN_CPU_OPEN_BFDMACH
, mach_name
,
1256 CGEN_CPU_OPEN_ENDIAN
, prev_endian
,
1261 /* save this away for future reference */
1262 cl
= xmalloc (sizeof (struct cpu_desc_list
));
1266 cl
->endian
= endian
;
1270 m32c_cgen_init_dis (cd
);
1273 /* We try to have as much common code as possible.
1274 But at this point some targets need to take over. */
1275 /* ??? Some targets may need a hook elsewhere. Try to avoid this,
1276 but if not possible try to move this hook elsewhere rather than
1278 length
= CGEN_PRINT_INSN (cd
, pc
, info
);
1284 (*info
->fprintf_func
) (info
->stream
, UNKNOWN_INSN_MSG
);
1285 return cd
->default_insn_bitsize
/ 8;