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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [binutils-2.20.1/] [opcodes/] [m32c-dis.c] - Blame information for rev 843

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

Line No. Rev Author Line
1 205 julius 
/* Disassembler interface for targets using CGEN. -*- C -*-
2 
   CGEN: Cpu tools GENerator
3 
 
4 
   THIS FILE IS MACHINE GENERATED WITH CGEN.
5 
   - the resultant file is machine generated, cgen-dis.in isn't
6 
 
7 
   Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2005, 2007,
8 
   2008  Free Software Foundation, Inc.
9 
 
10 
   This file is part of libopcodes.
11 
 
12 
   This library 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 3, or (at your option)
15 
   any later version.
16 
 
17 
   It is distributed in the hope that it will be useful, but WITHOUT
18 
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
19 
   or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
20 
   License for more details.
21 
 
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.  */
25 
 
26 
/* ??? Eventually more and more of this stuff can go to cpu-independent files.
27 
   Keep that in mind.  */
28 
 
29 
#include "sysdep.h"
30 
#include <stdio.h>
31 
#include "ansidecl.h"
32 
#include "dis-asm.h"
33 
#include "bfd.h"
34 
#include "symcat.h"
35 
#include "libiberty.h"
36 
#include "m32c-desc.h"
37 
#include "m32c-opc.h"
38 
#include "opintl.h"
39 
 
40 
/* Default text to print if an instruction isn't recognized.  */
41 
#define UNKNOWN_INSN_MSG _("*unknown*")
42 
 
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);
51 
static int print_insn
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;
55 
static int read_insn
56 
  (CGEN_CPU_DESC, bfd_vma, disassemble_info *, bfd_byte *, int, CGEN_EXTRACT_INFO *,
57 
   unsigned long *);
58 
 
59 
/* -- disassembler routines inserted here.  */
60 
 
61 
/* -- dis.c */
62 
 
63 
#include "elf/m32c.h"
64 
#include "elf-bfd.h"
65 
 
66 
/* Always print the short insn format suffix as ':<char>'.  */
67 
 
68 
static void
69 
print_suffix (void * dis_info, char suffix)
70 
{
71 
  disassemble_info *info = dis_info;
72 
 
73 
  (*info->fprintf_func) (info->stream, ":%c", suffix);
74 
}
75 
 
76 
static void
77 
print_S (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
78 
         void * dis_info,
79 
         long value ATTRIBUTE_UNUSED,
80 
         unsigned int attrs ATTRIBUTE_UNUSED,
81 
         bfd_vma pc ATTRIBUTE_UNUSED,
82 
         int length ATTRIBUTE_UNUSED)
83 
{
84 
  print_suffix (dis_info, 's');
85 
}
86 
 
87 
 
88 
static void
89 
print_G (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
90 
         void * dis_info,
91 
         long value ATTRIBUTE_UNUSED,
92 
         unsigned int attrs ATTRIBUTE_UNUSED,
93 
         bfd_vma pc ATTRIBUTE_UNUSED,
94 
         int length ATTRIBUTE_UNUSED)
95 
{
96 
  print_suffix (dis_info, 'g');
97 
}
98 
 
99 
static void
100 
print_Q (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
101 
         void * dis_info,
102 
         long value ATTRIBUTE_UNUSED,
103 
         unsigned int attrs ATTRIBUTE_UNUSED,
104 
         bfd_vma pc ATTRIBUTE_UNUSED,
105 
         int length ATTRIBUTE_UNUSED)
106 
{
107 
  print_suffix (dis_info, 'q');
108 
}
109 
 
110 
static void
111 
print_Z (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
112 
         void * dis_info,
113 
         long value ATTRIBUTE_UNUSED,
114 
         unsigned int attrs ATTRIBUTE_UNUSED,
115 
         bfd_vma pc ATTRIBUTE_UNUSED,
116 
         int length ATTRIBUTE_UNUSED)
117 
{
118 
  print_suffix (dis_info, 'z');
119 
}
120 
 
121 
/* Print the empty suffix.  */
122 
 
123 
static void
124 
print_X (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
125 
         void * dis_info ATTRIBUTE_UNUSED,
126 
         long value ATTRIBUTE_UNUSED,
127 
         unsigned int attrs ATTRIBUTE_UNUSED,
128 
         bfd_vma pc ATTRIBUTE_UNUSED,
129 
         int length ATTRIBUTE_UNUSED)
130 
{
131 
  return;
132 
}
133 
 
134 
static void
135 
print_r0l_r0h (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
136 
               void * dis_info,
137 
               long value,
138 
               unsigned int attrs ATTRIBUTE_UNUSED,
139 
               bfd_vma pc ATTRIBUTE_UNUSED,
140 
               int length ATTRIBUTE_UNUSED)
141 
{
142 
  disassemble_info *info = dis_info;
143 
 
144 
  if (value == 0)
145 
    (*info->fprintf_func) (info->stream, "r0h,r0l");
146 
  else
147 
    (*info->fprintf_func) (info->stream, "r0l,r0h");
148 
}
149 
 
150 
static void
151 
print_unsigned_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
152 
                        void * dis_info,
153 
                        unsigned long value,
154 
                        unsigned int attrs ATTRIBUTE_UNUSED,
155 
                        bfd_vma pc ATTRIBUTE_UNUSED,
156 
                        int length ATTRIBUTE_UNUSED)
157 
{
158 
  disassemble_info *info = dis_info;
159 
 
160 
  (*info->fprintf_func) (info->stream, "%ld,0x%lx", value & 0x7, value >> 3);
161 
}
162 
 
163 
static void
164 
print_signed_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
165 
                      void * dis_info,
166 
                      signed long value,
167 
                      unsigned int attrs ATTRIBUTE_UNUSED,
168 
                      bfd_vma pc ATTRIBUTE_UNUSED,
169 
                      int length ATTRIBUTE_UNUSED)
170 
{
171 
  disassemble_info *info = dis_info;
172 
 
173 
  (*info->fprintf_func) (info->stream, "%ld,%ld", value & 0x7, value >> 3);
174 
}
175 
 
176 
static void
177 
print_size (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
178 
            void * dis_info,
179 
            long value ATTRIBUTE_UNUSED,
180 
            unsigned int attrs ATTRIBUTE_UNUSED,
181 
            bfd_vma pc ATTRIBUTE_UNUSED,
182 
            int length ATTRIBUTE_UNUSED)
183 
{
184 
  /* Always print the size as '.w'.  */
185 
  disassemble_info *info = dis_info;
186 
 
187 
  (*info->fprintf_func) (info->stream, ".w");
188 
}
189 
 
190 
#define POP  0
191 
#define PUSH 1
192 
 
193 
static void print_pop_regset  (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
194 
static void print_push_regset (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
195 
 
196 
/* Print a set of registers, R0,R1,A0,A1,SB,FB.  */
197 
 
198 
static void
199 
print_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
200 
              void * dis_info,
201 
              long value,
202 
              unsigned int attrs ATTRIBUTE_UNUSED,
203 
              bfd_vma pc ATTRIBUTE_UNUSED,
204 
              int length ATTRIBUTE_UNUSED,
205 
              int push)
206 
{
207 
  static char * m16c_register_names [] =
208 
  {
209 
    "r0", "r1", "r2", "r3", "a0", "a1", "sb", "fb"
210 
  };
211 
  disassemble_info *info = dis_info;
212 
  int mask;
213 
  int index = 0;
214 
  char* comma = "";
215 
 
216 
  if (push)
217 
    mask = 0x80;
218 
  else
219 
    mask = 1;
220 
 
221 
  if (value & mask)
222 
    {
223 
      (*info->fprintf_func) (info->stream, "%s", m16c_register_names [0]);
224 
      comma = ",";
225 
    }
226 
 
227 
  for (index = 1; index <= 7; ++index)
228 
    {
229 
      if (push)
230 
        mask >>= 1;
231 
      else
232 
        mask <<= 1;
233 
 
234 
      if (value & mask)
235 
        {
236 
          (*info->fprintf_func) (info->stream, "%s%s", comma,
237 
                                 m16c_register_names [index]);
238 
          comma = ",";
239 
        }
240 
    }
241 
}
242 
 
243 
static void
244 
print_pop_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
245 
                  void * dis_info,
246 
                  long value,
247 
                  unsigned int attrs ATTRIBUTE_UNUSED,
248 
                  bfd_vma pc ATTRIBUTE_UNUSED,
249 
                  int length ATTRIBUTE_UNUSED)
250 
{
251 
  print_regset (cd, dis_info, value, attrs, pc, length, POP);
252 
}
253 
 
254 
static void
255 
print_push_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
256 
                   void * dis_info,
257 
                   long value,
258 
                   unsigned int attrs ATTRIBUTE_UNUSED,
259 
                   bfd_vma pc ATTRIBUTE_UNUSED,
260 
                   int length ATTRIBUTE_UNUSED)
261 
{
262 
  print_regset (cd, dis_info, value, attrs, pc, length, PUSH);
263 
}
264 
 
265 
static void
266 
print_signed4n (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
267 
                void * dis_info,
268 
                signed long value,
269 
                unsigned int attrs ATTRIBUTE_UNUSED,
270 
                bfd_vma pc ATTRIBUTE_UNUSED,
271 
                int length ATTRIBUTE_UNUSED)
272 
{
273 
  disassemble_info *info = dis_info;
274 
 
275 
  (*info->fprintf_func) (info->stream, "%ld", -value);
276 
}
277 
 
278 
void m32c_cgen_print_operand
279 
  (CGEN_CPU_DESC, int, PTR, CGEN_FIELDS *, void const *, bfd_vma, int);
280 
 
281 
/* Main entry point for printing operands.
282 
   XINFO is a `void *' and not a `disassemble_info *' to not put a requirement
283 
   of dis-asm.h on cgen.h.
284 
 
285 
   This function is basically just a big switch statement.  Earlier versions
286 
   used tables to look up the function to use, but
287 
   - if the table contains both assembler and disassembler functions then
288 
     the disassembler contains much of the assembler and vice-versa,
289 
   - there's a lot of inlining possibilities as things grow,
290 
   - using a switch statement avoids the function call overhead.
291 
 
292 
   This function could be moved into `print_insn_normal', but keeping it
293 
   separate makes clear the interface between `print_insn_normal' and each of
294 
   the handlers.  */
295 
 
296 
void
297 
m32c_cgen_print_operand (CGEN_CPU_DESC cd,
298 
                           int opindex,
299 
                           void * xinfo,
300 
                           CGEN_FIELDS *fields,
301 
                           void const *attrs ATTRIBUTE_UNUSED,
302 
                           bfd_vma pc,
303 
                           int length)
304 
{
305 
  disassemble_info *info = (disassemble_info *) xinfo;
306 
 
307 
  switch (opindex)
308 
    {
309 
    case M32C_OPERAND_A0 :
310 
      print_keyword (cd, info, & m32c_cgen_opval_h_a0, 0, 0);
311 
      break;
312 
    case M32C_OPERAND_A1 :
313 
      print_keyword (cd, info, & m32c_cgen_opval_h_a1, 0, 0);
314 
      break;
315 
    case M32C_OPERAND_AN16_PUSH_S :
316 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_4_1, 0);
317 
      break;
318 
    case M32C_OPERAND_BIT16AN :
319 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst16_an, 0);
320 
      break;
321 
    case M32C_OPERAND_BIT16RN :
322 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_dst16_rn, 0);
323 
      break;
324 
    case M32C_OPERAND_BIT3_S :
325 
      print_normal (cd, info, fields->f_imm3_S, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
326 
      break;
327 
    case M32C_OPERAND_BIT32ANPREFIXED :
328 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_prefixed, 0);
329 
      break;
330 
    case M32C_OPERAND_BIT32ANUNPREFIXED :
331 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_unprefixed, 0);
332 
      break;
333 
    case M32C_OPERAND_BIT32RNPREFIXED :
334 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_dst32_rn_prefixed_QI, 0);
335 
      break;
336 
    case M32C_OPERAND_BIT32RNUNPREFIXED :
337 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_dst32_rn_unprefixed_QI, 0);
338 
      break;
339 
    case M32C_OPERAND_BITBASE16_16_S8 :
340 
      print_signed_bitbase (cd, info, fields->f_dsp_16_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
341 
      break;
342 
    case M32C_OPERAND_BITBASE16_16_U16 :
343 
      print_unsigned_bitbase (cd, info, fields->f_dsp_16_u16, 0, pc, length);
344 
      break;
345 
    case M32C_OPERAND_BITBASE16_16_U8 :
346 
      print_unsigned_bitbase (cd, info, fields->f_dsp_16_u8, 0, pc, length);
347 
      break;
348 
    case M32C_OPERAND_BITBASE16_8_U11_S :
349 
      print_unsigned_bitbase (cd, info, fields->f_bitbase16_u11_S, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
350 
      break;
351 
    case M32C_OPERAND_BITBASE32_16_S11_UNPREFIXED :
352 
      print_signed_bitbase (cd, info, fields->f_bitbase32_16_s11_unprefixed, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
353 
      break;
354 
    case M32C_OPERAND_BITBASE32_16_S19_UNPREFIXED :
355 
      print_signed_bitbase (cd, info, fields->f_bitbase32_16_s19_unprefixed, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
356 
      break;
357 
    case M32C_OPERAND_BITBASE32_16_U11_UNPREFIXED :
358 
      print_unsigned_bitbase (cd, info, fields->f_bitbase32_16_u11_unprefixed, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
359 
      break;
360 
    case M32C_OPERAND_BITBASE32_16_U19_UNPREFIXED :
361 
      print_unsigned_bitbase (cd, info, fields->f_bitbase32_16_u19_unprefixed, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
362 
      break;
363 
    case M32C_OPERAND_BITBASE32_16_U27_UNPREFIXED :
364 
      print_unsigned_bitbase (cd, info, fields->f_bitbase32_16_u27_unprefixed, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
365 
      break;
366 
    case M32C_OPERAND_BITBASE32_24_S11_PREFIXED :
367 
      print_signed_bitbase (cd, info, fields->f_bitbase32_24_s11_prefixed, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
368 
      break;
369 
    case M32C_OPERAND_BITBASE32_24_S19_PREFIXED :
370 
      print_signed_bitbase (cd, info, fields->f_bitbase32_24_s19_prefixed, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
371 
      break;
372 
    case M32C_OPERAND_BITBASE32_24_U11_PREFIXED :
373 
      print_unsigned_bitbase (cd, info, fields->f_bitbase32_24_u11_prefixed, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
374 
      break;
375 
    case M32C_OPERAND_BITBASE32_24_U19_PREFIXED :
376 
      print_unsigned_bitbase (cd, info, fields->f_bitbase32_24_u19_prefixed, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
377 
      break;
378 
    case M32C_OPERAND_BITBASE32_24_U27_PREFIXED :
379 
      print_unsigned_bitbase (cd, info, fields->f_bitbase32_24_u27_prefixed, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
380 
      break;
381 
    case M32C_OPERAND_BITNO16R :
382 
      print_normal (cd, info, fields->f_dsp_16_u8, 0, pc, length);
383 
      break;
384 
    case M32C_OPERAND_BITNO32PREFIXED :
385 
      print_normal (cd, info, fields->f_bitno32_prefixed, 0, pc, length);
386 
      break;
387 
    case M32C_OPERAND_BITNO32UNPREFIXED :
388 
      print_normal (cd, info, fields->f_bitno32_unprefixed, 0, pc, length);
389 
      break;
390 
    case M32C_OPERAND_DSP_10_U6 :
391 
      print_normal (cd, info, fields->f_dsp_10_u6, 0, pc, length);
392 
      break;
393 
    case M32C_OPERAND_DSP_16_S16 :
394 
      print_normal (cd, info, fields->f_dsp_16_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
395 
      break;
396 
    case M32C_OPERAND_DSP_16_S8 :
397 
      print_normal (cd, info, fields->f_dsp_16_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
398 
      break;
399 
    case M32C_OPERAND_DSP_16_U16 :
400 
      print_normal (cd, info, fields->f_dsp_16_u16, 0, pc, length);
401 
      break;
402 
    case M32C_OPERAND_DSP_16_U20 :
403 
      print_normal (cd, info, fields->f_dsp_16_u24, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
404 
      break;
405 
    case M32C_OPERAND_DSP_16_U24 :
406 
      print_normal (cd, info, fields->f_dsp_16_u24, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
407 
      break;
408 
    case M32C_OPERAND_DSP_16_U8 :
409 
      print_normal (cd, info, fields->f_dsp_16_u8, 0, pc, length);
410 
      break;
411 
    case M32C_OPERAND_DSP_24_S16 :
412 
      print_normal (cd, info, fields->f_dsp_24_s16, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
413 
      break;
414 
    case M32C_OPERAND_DSP_24_S8 :
415 
      print_normal (cd, info, fields->f_dsp_24_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
416 
      break;
417 
    case M32C_OPERAND_DSP_24_U16 :
418 
      print_normal (cd, info, fields->f_dsp_24_u16, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
419 
      break;
420 
    case M32C_OPERAND_DSP_24_U20 :
421 
      print_normal (cd, info, fields->f_dsp_24_u24, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
422 
      break;
423 
    case M32C_OPERAND_DSP_24_U24 :
424 
      print_normal (cd, info, fields->f_dsp_24_u24, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
425 
      break;
426 
    case M32C_OPERAND_DSP_24_U8 :
427 
      print_normal (cd, info, fields->f_dsp_24_u8, 0, pc, length);
428 
      break;
429 
    case M32C_OPERAND_DSP_32_S16 :
430 
      print_normal (cd, info, fields->f_dsp_32_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
431 
      break;
432 
    case M32C_OPERAND_DSP_32_S8 :
433 
      print_normal (cd, info, fields->f_dsp_32_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
434 
      break;
435 
    case M32C_OPERAND_DSP_32_U16 :
436 
      print_normal (cd, info, fields->f_dsp_32_u16, 0, pc, length);
437 
      break;
438 
    case M32C_OPERAND_DSP_32_U20 :
439 
      print_normal (cd, info, fields->f_dsp_32_u24, 0, pc, length);
440 
      break;
441 
    case M32C_OPERAND_DSP_32_U24 :
442 
      print_normal (cd, info, fields->f_dsp_32_u24, 0, pc, length);
443 
      break;
444 
    case M32C_OPERAND_DSP_32_U8 :
445 
      print_normal (cd, info, fields->f_dsp_32_u8, 0, pc, length);
446 
      break;
447 
    case M32C_OPERAND_DSP_40_S16 :
448 
      print_normal (cd, info, fields->f_dsp_40_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
449 
      break;
450 
    case M32C_OPERAND_DSP_40_S8 :
451 
      print_normal (cd, info, fields->f_dsp_40_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
452 
      break;
453 
    case M32C_OPERAND_DSP_40_U16 :
454 
      print_normal (cd, info, fields->f_dsp_40_u16, 0, pc, length);
455 
      break;
456 
    case M32C_OPERAND_DSP_40_U20 :
457 
      print_normal (cd, info, fields->f_dsp_40_u20, 0, pc, length);
458 
      break;
459 
    case M32C_OPERAND_DSP_40_U24 :
460 
      print_normal (cd, info, fields->f_dsp_40_u24, 0, pc, length);
461 
      break;
462 
    case M32C_OPERAND_DSP_40_U8 :
463 
      print_normal (cd, info, fields->f_dsp_40_u8, 0, pc, length);
464 
      break;
465 
    case M32C_OPERAND_DSP_48_S16 :
466 
      print_normal (cd, info, fields->f_dsp_48_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
467 
      break;
468 
    case M32C_OPERAND_DSP_48_S8 :
469 
      print_normal (cd, info, fields->f_dsp_48_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
470 
      break;
471 
    case M32C_OPERAND_DSP_48_U16 :
472 
      print_normal (cd, info, fields->f_dsp_48_u16, 0, pc, length);
473 
      break;
474 
    case M32C_OPERAND_DSP_48_U20 :
475 
      print_normal (cd, info, fields->f_dsp_48_u20, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
476 
      break;
477 
    case M32C_OPERAND_DSP_48_U24 :
478 
      print_normal (cd, info, fields->f_dsp_48_u24, 0|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
479 
      break;
480 
    case M32C_OPERAND_DSP_48_U8 :
481 
      print_normal (cd, info, fields->f_dsp_48_u8, 0, pc, length);
482 
      break;
483 
    case M32C_OPERAND_DSP_8_S24 :
484 
      print_normal (cd, info, fields->f_dsp_8_s24, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
485 
      break;
486 
    case M32C_OPERAND_DSP_8_S8 :
487 
      print_normal (cd, info, fields->f_dsp_8_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
488 
      break;
489 
    case M32C_OPERAND_DSP_8_U16 :
490 
      print_normal (cd, info, fields->f_dsp_8_u16, 0, pc, length);
491 
      break;
492 
    case M32C_OPERAND_DSP_8_U24 :
493 
      print_normal (cd, info, fields->f_dsp_8_u24, 0, pc, length);
494 
      break;
495 
    case M32C_OPERAND_DSP_8_U6 :
496 
      print_normal (cd, info, fields->f_dsp_8_u6, 0, pc, length);
497 
      break;
498 
    case M32C_OPERAND_DSP_8_U8 :
499 
      print_normal (cd, info, fields->f_dsp_8_u8, 0, pc, length);
500 
      break;
501 
    case M32C_OPERAND_DST16AN :
502 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst16_an, 0);
503 
      break;
504 
    case M32C_OPERAND_DST16AN_S :
505 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_dst16_an_s, 0);
506 
      break;
507 
    case M32C_OPERAND_DST16ANHI :
508 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_dst16_an, 0);
509 
      break;
510 
    case M32C_OPERAND_DST16ANQI :
511 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_dst16_an, 0);
512 
      break;
513 
    case M32C_OPERAND_DST16ANQI_S :
514 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_dst16_rn_QI_s, 0);
515 
      break;
516 
    case M32C_OPERAND_DST16ANSI :
517 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_SI, fields->f_dst16_an, 0);
518 
      break;
519 
    case M32C_OPERAND_DST16RNEXTQI :
520 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_ext_QI, fields->f_dst16_rn_ext, 0);
521 
      break;
522 
    case M32C_OPERAND_DST16RNHI :
523 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_dst16_rn, 0);
524 
      break;
525 
    case M32C_OPERAND_DST16RNQI :
526 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_dst16_rn, 0);
527 
      break;
528 
    case M32C_OPERAND_DST16RNQI_S :
529 
      print_keyword (cd, info, & m32c_cgen_opval_h_r0l_r0h, fields->f_dst16_rn_QI_s, 0);
530 
      break;
531 
    case M32C_OPERAND_DST16RNSI :
532 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_SI, fields->f_dst16_rn, 0);
533 
      break;
534 
    case M32C_OPERAND_DST32ANEXTUNPREFIXED :
535 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_unprefixed, 0);
536 
      break;
537 
    case M32C_OPERAND_DST32ANPREFIXED :
538 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_prefixed, 0);
539 
      break;
540 
    case M32C_OPERAND_DST32ANPREFIXEDHI :
541 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_dst32_an_prefixed, 0);
542 
      break;
543 
    case M32C_OPERAND_DST32ANPREFIXEDQI :
544 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_dst32_an_prefixed, 0);
545 
      break;
546 
    case M32C_OPERAND_DST32ANPREFIXEDSI :
547 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_prefixed, 0);
548 
      break;
549 
    case M32C_OPERAND_DST32ANUNPREFIXED :
550 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_unprefixed, 0);
551 
      break;
552 
    case M32C_OPERAND_DST32ANUNPREFIXEDHI :
553 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_dst32_an_unprefixed, 0);
554 
      break;
555 
    case M32C_OPERAND_DST32ANUNPREFIXEDQI :
556 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_dst32_an_unprefixed, 0);
557 
      break;
558 
    case M32C_OPERAND_DST32ANUNPREFIXEDSI :
559 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_dst32_an_unprefixed, 0);
560 
      break;
561 
    case M32C_OPERAND_DST32R0HI_S :
562 
      print_keyword (cd, info, & m32c_cgen_opval_h_r0, 0, 0);
563 
      break;
564 
    case M32C_OPERAND_DST32R0QI_S :
565 
      print_keyword (cd, info, & m32c_cgen_opval_h_r0l, 0, 0);
566 
      break;
567 
    case M32C_OPERAND_DST32RNEXTUNPREFIXEDHI :
568 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_ext_HI, fields->f_dst32_rn_ext_unprefixed, 0);
569 
      break;
570 
    case M32C_OPERAND_DST32RNEXTUNPREFIXEDQI :
571 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_ext_QI, fields->f_dst32_rn_ext_unprefixed, 0);
572 
      break;
573 
    case M32C_OPERAND_DST32RNPREFIXEDHI :
574 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_dst32_rn_prefixed_HI, 0);
575 
      break;
576 
    case M32C_OPERAND_DST32RNPREFIXEDQI :
577 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_dst32_rn_prefixed_QI, 0);
578 
      break;
579 
    case M32C_OPERAND_DST32RNPREFIXEDSI :
580 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_SI, fields->f_dst32_rn_prefixed_SI, 0);
581 
      break;
582 
    case M32C_OPERAND_DST32RNUNPREFIXEDHI :
583 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_dst32_rn_unprefixed_HI, 0);
584 
      break;
585 
    case M32C_OPERAND_DST32RNUNPREFIXEDQI :
586 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_dst32_rn_unprefixed_QI, 0);
587 
      break;
588 
    case M32C_OPERAND_DST32RNUNPREFIXEDSI :
589 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_SI, fields->f_dst32_rn_unprefixed_SI, 0);
590 
      break;
591 
    case M32C_OPERAND_G :
592 
      print_G (cd, info, 0, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
593 
      break;
594 
    case M32C_OPERAND_IMM_12_S4 :
595 
      print_normal (cd, info, fields->f_imm_12_s4, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
596 
      break;
597 
    case M32C_OPERAND_IMM_12_S4N :
598 
      print_signed4n (cd, info, fields->f_imm_12_s4, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
599 
      break;
600 
    case M32C_OPERAND_IMM_13_U3 :
601 
      print_normal (cd, info, fields->f_imm_13_u3, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
602 
      break;
603 
    case M32C_OPERAND_IMM_16_HI :
604 
      print_normal (cd, info, fields->f_dsp_16_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
605 
      break;
606 
    case M32C_OPERAND_IMM_16_QI :
607 
      print_normal (cd, info, fields->f_dsp_16_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
608 
      break;
609 
    case M32C_OPERAND_IMM_16_SI :
610 
      print_normal (cd, info, fields->f_dsp_16_s32, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
611 
      break;
612 
    case M32C_OPERAND_IMM_20_S4 :
613 
      print_normal (cd, info, fields->f_imm_20_s4, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
614 
      break;
615 
    case M32C_OPERAND_IMM_24_HI :
616 
      print_normal (cd, info, fields->f_dsp_24_s16, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
617 
      break;
618 
    case M32C_OPERAND_IMM_24_QI :
619 
      print_normal (cd, info, fields->f_dsp_24_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
620 
      break;
621 
    case M32C_OPERAND_IMM_24_SI :
622 
      print_normal (cd, info, fields->f_dsp_24_s32, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
623 
      break;
624 
    case M32C_OPERAND_IMM_32_HI :
625 
      print_normal (cd, info, fields->f_dsp_32_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
626 
      break;
627 
    case M32C_OPERAND_IMM_32_QI :
628 
      print_normal (cd, info, fields->f_dsp_32_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
629 
      break;
630 
    case M32C_OPERAND_IMM_32_SI :
631 
      print_normal (cd, info, fields->f_dsp_32_s32, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
632 
      break;
633 
    case M32C_OPERAND_IMM_40_HI :
634 
      print_normal (cd, info, fields->f_dsp_40_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
635 
      break;
636 
    case M32C_OPERAND_IMM_40_QI :
637 
      print_normal (cd, info, fields->f_dsp_40_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
638 
      break;
639 
    case M32C_OPERAND_IMM_40_SI :
640 
      print_normal (cd, info, fields->f_dsp_40_s32, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
641 
      break;
642 
    case M32C_OPERAND_IMM_48_HI :
643 
      print_normal (cd, info, fields->f_dsp_48_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
644 
      break;
645 
    case M32C_OPERAND_IMM_48_QI :
646 
      print_normal (cd, info, fields->f_dsp_48_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
647 
      break;
648 
    case M32C_OPERAND_IMM_48_SI :
649 
      print_normal (cd, info, fields->f_dsp_48_s32, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
650 
      break;
651 
    case M32C_OPERAND_IMM_56_HI :
652 
      print_normal (cd, info, fields->f_dsp_56_s16, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
653 
      break;
654 
    case M32C_OPERAND_IMM_56_QI :
655 
      print_normal (cd, info, fields->f_dsp_56_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
656 
      break;
657 
    case M32C_OPERAND_IMM_64_HI :
658 
      print_normal (cd, info, fields->f_dsp_64_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
659 
      break;
660 
    case M32C_OPERAND_IMM_8_HI :
661 
      print_normal (cd, info, fields->f_dsp_8_s16, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
662 
      break;
663 
    case M32C_OPERAND_IMM_8_QI :
664 
      print_normal (cd, info, fields->f_dsp_8_s8, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
665 
      break;
666 
    case M32C_OPERAND_IMM_8_S4 :
667 
      print_normal (cd, info, fields->f_imm_8_s4, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
668 
      break;
669 
    case M32C_OPERAND_IMM_8_S4N :
670 
      print_signed4n (cd, info, fields->f_imm_8_s4, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
671 
      break;
672 
    case M32C_OPERAND_IMM_SH_12_S4 :
673 
      print_keyword (cd, info, & m32c_cgen_opval_h_shimm, fields->f_imm_12_s4, 0);
674 
      break;
675 
    case M32C_OPERAND_IMM_SH_20_S4 :
676 
      print_keyword (cd, info, & m32c_cgen_opval_h_shimm, fields->f_imm_20_s4, 0);
677 
      break;
678 
    case M32C_OPERAND_IMM_SH_8_S4 :
679 
      print_keyword (cd, info, & m32c_cgen_opval_h_shimm, fields->f_imm_8_s4, 0);
680 
      break;
681 
    case M32C_OPERAND_IMM1_S :
682 
      print_normal (cd, info, fields->f_imm1_S, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
683 
      break;
684 
    case M32C_OPERAND_IMM3_S :
685 
      print_normal (cd, info, fields->f_imm3_S, 0|(1<<CGEN_OPERAND_SIGNED)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
686 
      break;
687 
    case M32C_OPERAND_LAB_16_8 :
688 
      print_address (cd, info, fields->f_lab_16_8, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
689 
      break;
690 
    case M32C_OPERAND_LAB_24_8 :
691 
      print_address (cd, info, fields->f_lab_24_8, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
692 
      break;
693 
    case M32C_OPERAND_LAB_32_8 :
694 
      print_address (cd, info, fields->f_lab_32_8, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
695 
      break;
696 
    case M32C_OPERAND_LAB_40_8 :
697 
      print_address (cd, info, fields->f_lab_40_8, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
698 
      break;
699 
    case M32C_OPERAND_LAB_5_3 :
700 
      print_address (cd, info, fields->f_lab_5_3, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
701 
      break;
702 
    case M32C_OPERAND_LAB_8_16 :
703 
      print_address (cd, info, fields->f_lab_8_16, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_SIGN_OPT)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
704 
      break;
705 
    case M32C_OPERAND_LAB_8_24 :
706 
      print_address (cd, info, fields->f_lab_8_24, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_ABS_ADDR), pc, length);
707 
      break;
708 
    case M32C_OPERAND_LAB_8_8 :
709 
      print_address (cd, info, fields->f_lab_8_8, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
710 
      break;
711 
    case M32C_OPERAND_LAB32_JMP_S :
712 
      print_address (cd, info, fields->f_lab32_jmp_s, 0|(1<<CGEN_OPERAND_RELAX)|(1<<CGEN_OPERAND_PCREL_ADDR)|(1<<CGEN_OPERAND_VIRTUAL), pc, length);
713 
      break;
714 
    case M32C_OPERAND_Q :
715 
      print_Q (cd, info, 0, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
716 
      break;
717 
    case M32C_OPERAND_R0 :
718 
      print_keyword (cd, info, & m32c_cgen_opval_h_r0, 0, 0);
719 
      break;
720 
    case M32C_OPERAND_R0H :
721 
      print_keyword (cd, info, & m32c_cgen_opval_h_r0h, 0, 0);
722 
      break;
723 
    case M32C_OPERAND_R0L :
724 
      print_keyword (cd, info, & m32c_cgen_opval_h_r0l, 0, 0);
725 
      break;
726 
    case M32C_OPERAND_R1 :
727 
      print_keyword (cd, info, & m32c_cgen_opval_h_r1, 0, 0);
728 
      break;
729 
    case M32C_OPERAND_R1R2R0 :
730 
      print_keyword (cd, info, & m32c_cgen_opval_h_r1r2r0, 0, 0);
731 
      break;
732 
    case M32C_OPERAND_R2 :
733 
      print_keyword (cd, info, & m32c_cgen_opval_h_r2, 0, 0);
734 
      break;
735 
    case M32C_OPERAND_R2R0 :
736 
      print_keyword (cd, info, & m32c_cgen_opval_h_r2r0, 0, 0);
737 
      break;
738 
    case M32C_OPERAND_R3 :
739 
      print_keyword (cd, info, & m32c_cgen_opval_h_r3, 0, 0);
740 
      break;
741 
    case M32C_OPERAND_R3R1 :
742 
      print_keyword (cd, info, & m32c_cgen_opval_h_r3r1, 0, 0);
743 
      break;
744 
    case M32C_OPERAND_REGSETPOP :
745 
      print_pop_regset (cd, info, fields->f_8_8, 0, pc, length);
746 
      break;
747 
    case M32C_OPERAND_REGSETPUSH :
748 
      print_push_regset (cd, info, fields->f_8_8, 0, pc, length);
749 
      break;
750 
    case M32C_OPERAND_RN16_PUSH_S :
751 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_4_1, 0);
752 
      break;
753 
    case M32C_OPERAND_S :
754 
      print_S (cd, info, 0, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
755 
      break;
756 
    case M32C_OPERAND_SRC16AN :
757 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_src16_an, 0);
758 
      break;
759 
    case M32C_OPERAND_SRC16ANHI :
760 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_src16_an, 0);
761 
      break;
762 
    case M32C_OPERAND_SRC16ANQI :
763 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_src16_an, 0);
764 
      break;
765 
    case M32C_OPERAND_SRC16RNHI :
766 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_src16_rn, 0);
767 
      break;
768 
    case M32C_OPERAND_SRC16RNQI :
769 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_src16_rn, 0);
770 
      break;
771 
    case M32C_OPERAND_SRC32ANPREFIXED :
772 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_src32_an_prefixed, 0);
773 
      break;
774 
    case M32C_OPERAND_SRC32ANPREFIXEDHI :
775 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_src32_an_prefixed, 0);
776 
      break;
777 
    case M32C_OPERAND_SRC32ANPREFIXEDQI :
778 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_src32_an_prefixed, 0);
779 
      break;
780 
    case M32C_OPERAND_SRC32ANPREFIXEDSI :
781 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_src32_an_prefixed, 0);
782 
      break;
783 
    case M32C_OPERAND_SRC32ANUNPREFIXED :
784 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_src32_an_unprefixed, 0);
785 
      break;
786 
    case M32C_OPERAND_SRC32ANUNPREFIXEDHI :
787 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_HI, fields->f_src32_an_unprefixed, 0);
788 
      break;
789 
    case M32C_OPERAND_SRC32ANUNPREFIXEDQI :
790 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar_QI, fields->f_src32_an_unprefixed, 0);
791 
      break;
792 
    case M32C_OPERAND_SRC32ANUNPREFIXEDSI :
793 
      print_keyword (cd, info, & m32c_cgen_opval_h_ar, fields->f_src32_an_unprefixed, 0);
794 
      break;
795 
    case M32C_OPERAND_SRC32RNPREFIXEDHI :
796 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_src32_rn_prefixed_HI, 0);
797 
      break;
798 
    case M32C_OPERAND_SRC32RNPREFIXEDQI :
799 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_src32_rn_prefixed_QI, 0);
800 
      break;
801 
    case M32C_OPERAND_SRC32RNPREFIXEDSI :
802 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_SI, fields->f_src32_rn_prefixed_SI, 0);
803 
      break;
804 
    case M32C_OPERAND_SRC32RNUNPREFIXEDHI :
805 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_HI, fields->f_src32_rn_unprefixed_HI, 0);
806 
      break;
807 
    case M32C_OPERAND_SRC32RNUNPREFIXEDQI :
808 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_QI, fields->f_src32_rn_unprefixed_QI, 0);
809 
      break;
810 
    case M32C_OPERAND_SRC32RNUNPREFIXEDSI :
811 
      print_keyword (cd, info, & m32c_cgen_opval_h_gr_SI, fields->f_src32_rn_unprefixed_SI, 0);
812 
      break;
813 
    case M32C_OPERAND_SRCDST16_R0L_R0H_S_NORMAL :
814 
      print_r0l_r0h (cd, info, fields->f_5_1, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
815 
      break;
816 
    case M32C_OPERAND_X :
817 
      print_X (cd, info, 0, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
818 
      break;
819 
    case M32C_OPERAND_Z :
820 
      print_Z (cd, info, 0, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
821 
      break;
822 
    case M32C_OPERAND_COND16_16 :
823 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond16, fields->f_dsp_16_u8, 0);
824 
      break;
825 
    case M32C_OPERAND_COND16_24 :
826 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond16, fields->f_dsp_24_u8, 0);
827 
      break;
828 
    case M32C_OPERAND_COND16_32 :
829 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond16, fields->f_dsp_32_u8, 0);
830 
      break;
831 
    case M32C_OPERAND_COND16C :
832 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond16c, fields->f_cond16, 0);
833 
      break;
834 
    case M32C_OPERAND_COND16J :
835 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond16j, fields->f_cond16, 0);
836 
      break;
837 
    case M32C_OPERAND_COND16J5 :
838 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond16j_5, fields->f_cond16j_5, 0);
839 
      break;
840 
    case M32C_OPERAND_COND32 :
841 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_cond32, 0|(1<<CGEN_OPERAND_VIRTUAL));
842 
      break;
843 
    case M32C_OPERAND_COND32_16 :
844 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_dsp_16_u8, 0);
845 
      break;
846 
    case M32C_OPERAND_COND32_24 :
847 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_dsp_24_u8, 0);
848 
      break;
849 
    case M32C_OPERAND_COND32_32 :
850 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_dsp_32_u8, 0);
851 
      break;
852 
    case M32C_OPERAND_COND32_40 :
853 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_dsp_40_u8, 0);
854 
      break;
855 
    case M32C_OPERAND_COND32J :
856 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_cond32j, 0|(1<<CGEN_OPERAND_VIRTUAL));
857 
      break;
858 
    case M32C_OPERAND_CR1_PREFIXED_32 :
859 
      print_keyword (cd, info, & m32c_cgen_opval_h_cr1_32, fields->f_21_3, 0);
860 
      break;
861 
    case M32C_OPERAND_CR1_UNPREFIXED_32 :
862 
      print_keyword (cd, info, & m32c_cgen_opval_h_cr1_32, fields->f_13_3, 0);
863 
      break;
864 
    case M32C_OPERAND_CR16 :
865 
      print_keyword (cd, info, & m32c_cgen_opval_h_cr_16, fields->f_9_3, 0);
866 
      break;
867 
    case M32C_OPERAND_CR2_32 :
868 
      print_keyword (cd, info, & m32c_cgen_opval_h_cr2_32, fields->f_13_3, 0);
869 
      break;
870 
    case M32C_OPERAND_CR3_PREFIXED_32 :
871 
      print_keyword (cd, info, & m32c_cgen_opval_h_cr3_32, fields->f_21_3, 0);
872 
      break;
873 
    case M32C_OPERAND_CR3_UNPREFIXED_32 :
874 
      print_keyword (cd, info, & m32c_cgen_opval_h_cr3_32, fields->f_13_3, 0);
875 
      break;
876 
    case M32C_OPERAND_FLAGS16 :
877 
      print_keyword (cd, info, & m32c_cgen_opval_h_flags, fields->f_9_3, 0);
878 
      break;
879 
    case M32C_OPERAND_FLAGS32 :
880 
      print_keyword (cd, info, & m32c_cgen_opval_h_flags, fields->f_13_3, 0);
881 
      break;
882 
    case M32C_OPERAND_SCCOND32 :
883 
      print_keyword (cd, info, & m32c_cgen_opval_h_cond32, fields->f_cond16, 0);
884 
      break;
885 
    case M32C_OPERAND_SIZE :
886 
      print_size (cd, info, 0, 0|(1<<CGEN_OPERAND_SIGNED), pc, length);
887 
      break;
888 
 
889 
    default :
890 
      /* xgettext:c-format */
891 
      fprintf (stderr, _("Unrecognized field %d while printing insn.\n"),
892 
               opindex);
893 
    abort ();
894 
  }
895 
}
896 
 
897 
cgen_print_fn * const m32c_cgen_print_handlers[] =
898 
{
899 
  print_insn_normal,
900 
};
901 
 
902 
 
903 
void
904 
m32c_cgen_init_dis (CGEN_CPU_DESC cd)
905 
{
906 
  m32c_cgen_init_opcode_table (cd);
907 
  m32c_cgen_init_ibld_table (cd);
908 
  cd->print_handlers = & m32c_cgen_print_handlers[0];
909 
  cd->print_operand = m32c_cgen_print_operand;
910 
}
911 
 
912 
 
913 
/* Default print handler.  */
914 
 
915 
static void
916 
print_normal (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
917 
              void *dis_info,
918 
              long value,
919 
              unsigned int attrs,
920 
              bfd_vma pc ATTRIBUTE_UNUSED,
921 
              int length ATTRIBUTE_UNUSED)
922 
{
923 
  disassemble_info *info = (disassemble_info *) dis_info;
924 
 
925 
#ifdef CGEN_PRINT_NORMAL
926 
  CGEN_PRINT_NORMAL (cd, info, value, attrs, pc, length);
927 
#endif
928 
 
929 
  /* Print the operand as directed by the attributes.  */
930 
  if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SEM_ONLY))
931 
    ; /* nothing to do */
932 
  else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SIGNED))
933 
    (*info->fprintf_func) (info->stream, "%ld", value);
934 
  else
935 
    (*info->fprintf_func) (info->stream, "0x%lx", value);
936 
}
937 
 
938 
/* Default address handler.  */
939 
 
940 
static void
941 
print_address (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
942 
               void *dis_info,
943 
               bfd_vma value,
944 
               unsigned int attrs,
945 
               bfd_vma pc ATTRIBUTE_UNUSED,
946 
               int length ATTRIBUTE_UNUSED)
947 
{
948 
  disassemble_info *info = (disassemble_info *) dis_info;
949 
 
950 
#ifdef CGEN_PRINT_ADDRESS
951 
  CGEN_PRINT_ADDRESS (cd, info, value, attrs, pc, length);
952 
#endif
953 
 
954 
  /* Print the operand as directed by the attributes.  */
955 
  if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SEM_ONLY))
956 
    ; /* Nothing to do.  */
957 
  else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_PCREL_ADDR))
958 
    (*info->print_address_func) (value, info);
959 
  else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_ABS_ADDR))
960 
    (*info->print_address_func) (value, info);
961 
  else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SIGNED))
962 
    (*info->fprintf_func) (info->stream, "%ld", (long) value);
963 
  else
964 
    (*info->fprintf_func) (info->stream, "0x%lx", (long) value);
965 
}
966 
 
967 
/* Keyword print handler.  */
968 
 
969 
static void
970 
print_keyword (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
971 
               void *dis_info,
972 
               CGEN_KEYWORD *keyword_table,
973 
               long value,
974 
               unsigned int attrs ATTRIBUTE_UNUSED)
975 
{
976 
  disassemble_info *info = (disassemble_info *) dis_info;
977 
  const CGEN_KEYWORD_ENTRY *ke;
978 
 
979 
  ke = cgen_keyword_lookup_value (keyword_table, value);
980 
  if (ke != NULL)
981 
    (*info->fprintf_func) (info->stream, "%s", ke->name);
982 
  else
983 
    (*info->fprintf_func) (info->stream, "???");
984 
}
985 
 
986 
/* Default insn printer.
987 
 
988 
   DIS_INFO is defined as `void *' so the disassembler needn't know anything
989 
   about disassemble_info.  */
990 
 
991 
static void
992 
print_insn_normal (CGEN_CPU_DESC cd,
993 
                   void *dis_info,
994 
                   const CGEN_INSN *insn,
995 
                   CGEN_FIELDS *fields,
996 
                   bfd_vma pc,
997 
                   int length)
998 
{
999 
  const CGEN_SYNTAX *syntax = CGEN_INSN_SYNTAX (insn);
1000 
  disassemble_info *info = (disassemble_info *) dis_info;
1001 
  const CGEN_SYNTAX_CHAR_TYPE *syn;
1002 
 
1003 
  CGEN_INIT_PRINT (cd);
1004 
 
1005 
  for (syn = CGEN_SYNTAX_STRING (syntax); *syn; ++syn)
1006 
    {
1007 
      if (CGEN_SYNTAX_MNEMONIC_P (*syn))
1008 
        {
1009 
          (*info->fprintf_func) (info->stream, "%s", CGEN_INSN_MNEMONIC (insn));
1010 
          continue;
1011 
        }
1012 
      if (CGEN_SYNTAX_CHAR_P (*syn))
1013 
        {
1014 
          (*info->fprintf_func) (info->stream, "%c", CGEN_SYNTAX_CHAR (*syn));
1015 
          continue;
1016 
        }
1017 
 
1018 
      /* We have an operand.  */
1019 
      m32c_cgen_print_operand (cd, CGEN_SYNTAX_FIELD (*syn), info,
1020 
                                 fields, CGEN_INSN_ATTRS (insn), pc, length);
1021 
    }
1022 
}
1023 
 
1024 
/* Subroutine of print_insn. Reads an insn into the given buffers and updates
1025 
   the extract info.
1026 
   Returns 0 if all is well, non-zero otherwise.  */
1027 
 
1028 
static int
1029 
read_insn (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
1030 
           bfd_vma pc,
1031 
           disassemble_info *info,
1032 
           bfd_byte *buf,
1033 
           int buflen,
1034 
           CGEN_EXTRACT_INFO *ex_info,
1035 
           unsigned long *insn_value)
1036 
{
1037 
  int status = (*info->read_memory_func) (pc, buf, buflen, info);
1038 
 
1039 
  if (status != 0)
1040 
    {
1041 
      (*info->memory_error_func) (status, pc, info);
1042 
      return -1;
1043 
    }
1044 
 
1045 
  ex_info->dis_info = info;
1046 
  ex_info->valid = (1 << buflen) - 1;
1047 
  ex_info->insn_bytes = buf;
1048 
 
1049 
  *insn_value = bfd_get_bits (buf, buflen * 8, info->endian == BFD_ENDIAN_BIG);
1050 
  return 0;
1051 
}
1052 
 
1053 
/* Utility to print an insn.
1054 
   BUF is the base part of the insn, target byte order, BUFLEN bytes long.
1055 
   The result is the size of the insn in bytes or zero for an unknown insn
1056 
   or -1 if an error occurs fetching data (memory_error_func will have
1057 
   been called).  */
1058 
 
1059 
static int
1060 
print_insn (CGEN_CPU_DESC cd,
1061 
            bfd_vma pc,
1062 
            disassemble_info *info,
1063 
            bfd_byte *buf,
1064 
            unsigned int buflen)
1065 
{
1066 
  CGEN_INSN_INT insn_value;
1067 
  const CGEN_INSN_LIST *insn_list;
1068 
  CGEN_EXTRACT_INFO ex_info;
1069 
  int basesize;
1070 
 
1071 
  /* Extract base part of instruction, just in case CGEN_DIS_* uses it. */
1072 
  basesize = cd->base_insn_bitsize < buflen * 8 ?
1073 
                                     cd->base_insn_bitsize : buflen * 8;
1074 
  insn_value = cgen_get_insn_value (cd, buf, basesize);
1075 
 
1076 
 
1077 
  /* Fill in ex_info fields like read_insn would.  Don't actually call
1078 
     read_insn, since the incoming buffer is already read (and possibly
1079 
     modified a la m32r).  */
1080 
  ex_info.valid = (1 << buflen) - 1;
1081 
  ex_info.dis_info = info;
1082 
  ex_info.insn_bytes = buf;
1083 
 
1084 
  /* The instructions are stored in hash lists.
1085 
     Pick the first one and keep trying until we find the right one.  */
1086 
 
1087 
  insn_list = CGEN_DIS_LOOKUP_INSN (cd, (char *) buf, insn_value);
1088 
  while (insn_list != NULL)
1089 
    {
1090 
      const CGEN_INSN *insn = insn_list->insn;
1091 
      CGEN_FIELDS fields;
1092 
      int length;
1093 
      unsigned long insn_value_cropped;
1094 
 
1095 
#ifdef CGEN_VALIDATE_INSN_SUPPORTED
1096 
      /* Not needed as insn shouldn't be in hash lists if not supported.  */
1097 
      /* Supported by this cpu?  */
1098 
      if (! m32c_cgen_insn_supported (cd, insn))
1099 
        {
1100 
          insn_list = CGEN_DIS_NEXT_INSN (insn_list);
1101 
          continue;
1102 
        }
1103 
#endif
1104 
 
1105 
      /* Basic bit mask must be correct.  */
1106 
      /* ??? May wish to allow target to defer this check until the extract
1107 
         handler.  */
1108 
 
1109 
      /* Base size may exceed this instruction's size.  Extract the
1110 
         relevant part from the buffer. */
1111 
      if ((unsigned) (CGEN_INSN_BITSIZE (insn) / 8) < buflen &&
1112 
          (unsigned) (CGEN_INSN_BITSIZE (insn) / 8) <= sizeof (unsigned long))
1113 
        insn_value_cropped = bfd_get_bits (buf, CGEN_INSN_BITSIZE (insn),
1114 
                                           info->endian == BFD_ENDIAN_BIG);
1115 
      else
1116 
        insn_value_cropped = insn_value;
1117 
 
1118 
      if ((insn_value_cropped & CGEN_INSN_BASE_MASK (insn))
1119 
          == CGEN_INSN_BASE_VALUE (insn))
1120 
        {
1121 
          /* Printing is handled in two passes.  The first pass parses the
1122 
             machine insn and extracts the fields.  The second pass prints
1123 
             them.  */
1124 
 
1125 
          /* Make sure the entire insn is loaded into insn_value, if it
1126 
             can fit.  */
1127 
          if (((unsigned) CGEN_INSN_BITSIZE (insn) > cd->base_insn_bitsize) &&
1128 
              (unsigned) (CGEN_INSN_BITSIZE (insn) / 8) <= sizeof (unsigned long))
1129 
            {
1130 
              unsigned long full_insn_value;
1131 
              int rc = read_insn (cd, pc, info, buf,
1132 
                                  CGEN_INSN_BITSIZE (insn) / 8,
1133 
                                  & ex_info, & full_insn_value);
1134 
              if (rc != 0)
1135 
                return rc;
1136 
              length = CGEN_EXTRACT_FN (cd, insn)
1137 
                (cd, insn, &ex_info, full_insn_value, &fields, pc);
1138 
            }
1139 
          else
1140 
            length = CGEN_EXTRACT_FN (cd, insn)
1141 
              (cd, insn, &ex_info, insn_value_cropped, &fields, pc);
1142 
 
1143 
          /* Length < 0 -> error.  */
1144 
          if (length < 0)
1145 
            return length;
1146 
          if (length > 0)
1147 
            {
1148 
              CGEN_PRINT_FN (cd, insn) (cd, info, insn, &fields, pc, length);
1149 
              /* Length is in bits, result is in bytes.  */
1150 
              return length / 8;
1151 
            }
1152 
        }
1153 
 
1154 
      insn_list = CGEN_DIS_NEXT_INSN (insn_list);
1155 
    }
1156 
 
1157 
  return 0;
1158 
}
1159 
 
1160 
/* Default value for CGEN_PRINT_INSN.
1161 
   The result is the size of the insn in bytes or zero for an unknown insn
1162 
   or -1 if an error occured fetching bytes.  */
1163 
 
1164 
#ifndef CGEN_PRINT_INSN
1165 
#define CGEN_PRINT_INSN default_print_insn
1166 
#endif
1167 
 
1168 
static int
1169 
default_print_insn (CGEN_CPU_DESC cd, bfd_vma pc, disassemble_info *info)
1170 
{
1171 
  bfd_byte buf[CGEN_MAX_INSN_SIZE];
1172 
  int buflen;
1173 
  int status;
1174 
 
1175 
  /* Attempt to read the base part of the insn.  */
1176 
  buflen = cd->base_insn_bitsize / 8;
1177 
  status = (*info->read_memory_func) (pc, buf, buflen, info);
1178 
 
1179 
  /* Try again with the minimum part, if min < base.  */
1180 
  if (status != 0 && (cd->min_insn_bitsize < cd->base_insn_bitsize))
1181 
    {
1182 
      buflen = cd->min_insn_bitsize / 8;
1183 
      status = (*info->read_memory_func) (pc, buf, buflen, info);
1184 
    }
1185 
 
1186 
  if (status != 0)
1187 
    {
1188 
      (*info->memory_error_func) (status, pc, info);
1189 
      return -1;
1190 
    }
1191 
 
1192 
  return print_insn (cd, pc, info, buf, buflen);
1193 
}
1194 
 
1195 
/* Main entry point.
1196 
   Print one instruction from PC on INFO->STREAM.
1197 
   Return the size of the instruction (in bytes).  */
1198 
 
1199 
typedef struct cpu_desc_list
1200 
{
1201 
  struct cpu_desc_list *next;
1202 
  CGEN_BITSET *isa;
1203 
  int mach;
1204 
  int endian;
1205 
  CGEN_CPU_DESC cd;
1206 
} cpu_desc_list;
1207 
 
1208 
int
1209 
print_insn_m32c (bfd_vma pc, disassemble_info *info)
1210 
{
1211 
  static cpu_desc_list *cd_list = 0;
1212 
  cpu_desc_list *cl = 0;
1213 
  static CGEN_CPU_DESC cd = 0;
1214 
  static CGEN_BITSET *prev_isa;
1215 
  static int prev_mach;
1216 
  static int prev_endian;
1217 
  int length;
1218 
  CGEN_BITSET *isa;
1219 
  int mach;
1220 
  int endian = (info->endian == BFD_ENDIAN_BIG
1221 
                ? CGEN_ENDIAN_BIG
1222 
                : CGEN_ENDIAN_LITTLE);
1223 
  enum bfd_architecture arch;
1224 
 
1225 
  /* ??? gdb will set mach but leave the architecture as "unknown" */
1226 
#ifndef CGEN_BFD_ARCH
1227 
#define CGEN_BFD_ARCH bfd_arch_m32c
1228 
#endif
1229 
  arch = info->arch;
1230 
  if (arch == bfd_arch_unknown)
1231 
    arch = CGEN_BFD_ARCH;
1232 
 
1233 
  /* There's no standard way to compute the machine or isa number
1234 
     so we leave it to the target.  */
1235 
#ifdef CGEN_COMPUTE_MACH
1236 
  mach = CGEN_COMPUTE_MACH (info);
1237 
#else
1238 
  mach = info->mach;
1239 
#endif
1240 
 
1241 
#ifdef CGEN_COMPUTE_ISA
1242 
  {
1243 
    static CGEN_BITSET *permanent_isa;
1244 
 
1245 
    if (!permanent_isa)
1246 
      permanent_isa = cgen_bitset_create (MAX_ISAS);
1247 
    isa = permanent_isa;
1248 
    cgen_bitset_clear (isa);
1249 
    cgen_bitset_add (isa, CGEN_COMPUTE_ISA (info));
1250 
  }
1251 
#else
1252 
  isa = info->insn_sets;
1253 
#endif
1254 
 
1255 
  /* If we've switched cpu's, try to find a handle we've used before */
1256 
  if (cd
1257 
      && (cgen_bitset_compare (isa, prev_isa) != 0
1258 
          || mach != prev_mach
1259 
          || endian != prev_endian))
1260 
    {
1261 
      cd = 0;
1262 
      for (cl = cd_list; cl; cl = cl->next)
1263 
        {
1264 
          if (cgen_bitset_compare (cl->isa, isa) == 0 &&
1265 
              cl->mach == mach &&
1266 
              cl->endian == endian)
1267 
            {
1268 
              cd = cl->cd;
1269 
              prev_isa = cd->isas;
1270 
              break;
1271 
            }
1272 
        }
1273 
    }
1274 
 
1275 
  /* If we haven't initialized yet, initialize the opcode table.  */
1276 
  if (! cd)
1277 
    {
1278 
      const bfd_arch_info_type *arch_type = bfd_lookup_arch (arch, mach);
1279 
      const char *mach_name;
1280 
 
1281 
      if (!arch_type)
1282 
        abort ();
1283 
      mach_name = arch_type->printable_name;
1284 
 
1285 
      prev_isa = cgen_bitset_copy (isa);
1286 
      prev_mach = mach;
1287 
      prev_endian = endian;
1288 
      cd = m32c_cgen_cpu_open (CGEN_CPU_OPEN_ISAS, prev_isa,
1289 
                                 CGEN_CPU_OPEN_BFDMACH, mach_name,
1290 
                                 CGEN_CPU_OPEN_ENDIAN, prev_endian,
1291 
                                 CGEN_CPU_OPEN_END);
1292 
      if (!cd)
1293 
        abort ();
1294 
 
1295 
      /* Save this away for future reference.  */
1296 
      cl = xmalloc (sizeof (struct cpu_desc_list));
1297 
      cl->cd = cd;
1298 
      cl->isa = prev_isa;
1299 
      cl->mach = mach;
1300 
      cl->endian = endian;
1301 
      cl->next = cd_list;
1302 
      cd_list = cl;
1303 
 
1304 
      m32c_cgen_init_dis (cd);
1305 
    }
1306 
 
1307 
  /* We try to have as much common code as possible.
1308 
     But at this point some targets need to take over.  */
1309 
  /* ??? Some targets may need a hook elsewhere.  Try to avoid this,
1310 
     but if not possible try to move this hook elsewhere rather than
1311 
     have two hooks.  */
1312 
  length = CGEN_PRINT_INSN (cd, pc, info);
1313 
  if (length > 0)
1314 
    return length;
1315 
  if (length < 0)
1316 
    return -1;
1317 
 
1318 
  (*info->fprintf_func) (info->stream, UNKNOWN_INSN_MSG);
1319 
  return cd->default_insn_bitsize / 8;
1320 
}

powered by: WebSVN 2.1.0

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