1*3d8817e4Smiod /* Disassembler interface for targets using CGEN. -*- C -*-
2*3d8817e4Smiod CGEN: Cpu tools GENerator
3*3d8817e4Smiod
4*3d8817e4Smiod THIS FILE IS MACHINE GENERATED WITH CGEN.
5*3d8817e4Smiod - the resultant file is machine generated, cgen-dis.in isn't
6*3d8817e4Smiod
7*3d8817e4Smiod Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2005
8*3d8817e4Smiod Free Software Foundation, Inc.
9*3d8817e4Smiod
10*3d8817e4Smiod This file is part of the GNU Binutils and GDB, the GNU debugger.
11*3d8817e4Smiod
12*3d8817e4Smiod This program is free software; you can redistribute it and/or modify
13*3d8817e4Smiod it under the terms of the GNU General Public License as published by
14*3d8817e4Smiod the Free Software Foundation; either version 2, or (at your option)
15*3d8817e4Smiod any later version.
16*3d8817e4Smiod
17*3d8817e4Smiod This program is distributed in the hope that it will be useful,
18*3d8817e4Smiod but WITHOUT ANY WARRANTY; without even the implied warranty of
19*3d8817e4Smiod MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20*3d8817e4Smiod GNU General Public License for more details.
21*3d8817e4Smiod
22*3d8817e4Smiod You should have received a copy of the GNU General Public License
23*3d8817e4Smiod along with this program; if not, write to the Free Software Foundation, Inc.,
24*3d8817e4Smiod 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
25*3d8817e4Smiod
26*3d8817e4Smiod /* ??? Eventually more and more of this stuff can go to cpu-independent files.
27*3d8817e4Smiod Keep that in mind. */
28*3d8817e4Smiod
29*3d8817e4Smiod #include "sysdep.h"
30*3d8817e4Smiod #include <stdio.h>
31*3d8817e4Smiod #include "ansidecl.h"
32*3d8817e4Smiod #include "dis-asm.h"
33*3d8817e4Smiod #include "bfd.h"
34*3d8817e4Smiod #include "symcat.h"
35*3d8817e4Smiod #include "libiberty.h"
36*3d8817e4Smiod #include "iq2000-desc.h"
37*3d8817e4Smiod #include "iq2000-opc.h"
38*3d8817e4Smiod #include "opintl.h"
39*3d8817e4Smiod
40*3d8817e4Smiod /* Default text to print if an instruction isn't recognized. */
41*3d8817e4Smiod #define UNKNOWN_INSN_MSG _("*unknown*")
42*3d8817e4Smiod
43*3d8817e4Smiod static void print_normal
44*3d8817e4Smiod (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
45*3d8817e4Smiod static void print_address
46*3d8817e4Smiod (CGEN_CPU_DESC, void *, bfd_vma, unsigned int, bfd_vma, int) ATTRIBUTE_UNUSED;
47*3d8817e4Smiod static void print_keyword
48*3d8817e4Smiod (CGEN_CPU_DESC, void *, CGEN_KEYWORD *, long, unsigned int) ATTRIBUTE_UNUSED;
49*3d8817e4Smiod static void print_insn_normal
50*3d8817e4Smiod (CGEN_CPU_DESC, void *, const CGEN_INSN *, CGEN_FIELDS *, bfd_vma, int);
51*3d8817e4Smiod static int print_insn
52*3d8817e4Smiod (CGEN_CPU_DESC, bfd_vma, disassemble_info *, bfd_byte *, unsigned);
53*3d8817e4Smiod static int default_print_insn
54*3d8817e4Smiod (CGEN_CPU_DESC, bfd_vma, disassemble_info *) ATTRIBUTE_UNUSED;
55*3d8817e4Smiod static int read_insn
56*3d8817e4Smiod (CGEN_CPU_DESC, bfd_vma, disassemble_info *, bfd_byte *, int, CGEN_EXTRACT_INFO *,
57*3d8817e4Smiod unsigned long *);
58*3d8817e4Smiod
59*3d8817e4Smiod /* -- disassembler routines inserted here. */
60*3d8817e4Smiod
61*3d8817e4Smiod
62*3d8817e4Smiod void iq2000_cgen_print_operand
63*3d8817e4Smiod (CGEN_CPU_DESC, int, PTR, CGEN_FIELDS *, void const *, bfd_vma, int);
64*3d8817e4Smiod
65*3d8817e4Smiod /* Main entry point for printing operands.
66*3d8817e4Smiod XINFO is a `void *' and not a `disassemble_info *' to not put a requirement
67*3d8817e4Smiod of dis-asm.h on cgen.h.
68*3d8817e4Smiod
69*3d8817e4Smiod This function is basically just a big switch statement. Earlier versions
70*3d8817e4Smiod used tables to look up the function to use, but
71*3d8817e4Smiod - if the table contains both assembler and disassembler functions then
72*3d8817e4Smiod the disassembler contains much of the assembler and vice-versa,
73*3d8817e4Smiod - there's a lot of inlining possibilities as things grow,
74*3d8817e4Smiod - using a switch statement avoids the function call overhead.
75*3d8817e4Smiod
76*3d8817e4Smiod This function could be moved into `print_insn_normal', but keeping it
77*3d8817e4Smiod separate makes clear the interface between `print_insn_normal' and each of
78*3d8817e4Smiod the handlers. */
79*3d8817e4Smiod
80*3d8817e4Smiod void
iq2000_cgen_print_operand(CGEN_CPU_DESC cd,int opindex,void * xinfo,CGEN_FIELDS * fields,void const * attrs ATTRIBUTE_UNUSED,bfd_vma pc,int length)81*3d8817e4Smiod iq2000_cgen_print_operand (CGEN_CPU_DESC cd,
82*3d8817e4Smiod int opindex,
83*3d8817e4Smiod void * xinfo,
84*3d8817e4Smiod CGEN_FIELDS *fields,
85*3d8817e4Smiod void const *attrs ATTRIBUTE_UNUSED,
86*3d8817e4Smiod bfd_vma pc,
87*3d8817e4Smiod int length)
88*3d8817e4Smiod {
89*3d8817e4Smiod disassemble_info *info = (disassemble_info *) xinfo;
90*3d8817e4Smiod
91*3d8817e4Smiod switch (opindex)
92*3d8817e4Smiod {
93*3d8817e4Smiod case IQ2000_OPERAND__INDEX :
94*3d8817e4Smiod print_normal (cd, info, fields->f_index, 0, pc, length);
95*3d8817e4Smiod break;
96*3d8817e4Smiod case IQ2000_OPERAND_BASE :
97*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rs, 0);
98*3d8817e4Smiod break;
99*3d8817e4Smiod case IQ2000_OPERAND_BASEOFF :
100*3d8817e4Smiod print_address (cd, info, fields->f_imm, 0, pc, length);
101*3d8817e4Smiod break;
102*3d8817e4Smiod case IQ2000_OPERAND_BITNUM :
103*3d8817e4Smiod print_normal (cd, info, fields->f_rt, 0, pc, length);
104*3d8817e4Smiod break;
105*3d8817e4Smiod case IQ2000_OPERAND_BYTECOUNT :
106*3d8817e4Smiod print_normal (cd, info, fields->f_bytecount, 0, pc, length);
107*3d8817e4Smiod break;
108*3d8817e4Smiod case IQ2000_OPERAND_CAM_Y :
109*3d8817e4Smiod print_normal (cd, info, fields->f_cam_y, 0, pc, length);
110*3d8817e4Smiod break;
111*3d8817e4Smiod case IQ2000_OPERAND_CAM_Z :
112*3d8817e4Smiod print_normal (cd, info, fields->f_cam_z, 0, pc, length);
113*3d8817e4Smiod break;
114*3d8817e4Smiod case IQ2000_OPERAND_CM_3FUNC :
115*3d8817e4Smiod print_normal (cd, info, fields->f_cm_3func, 0, pc, length);
116*3d8817e4Smiod break;
117*3d8817e4Smiod case IQ2000_OPERAND_CM_3Z :
118*3d8817e4Smiod print_normal (cd, info, fields->f_cm_3z, 0, pc, length);
119*3d8817e4Smiod break;
120*3d8817e4Smiod case IQ2000_OPERAND_CM_4FUNC :
121*3d8817e4Smiod print_normal (cd, info, fields->f_cm_4func, 0, pc, length);
122*3d8817e4Smiod break;
123*3d8817e4Smiod case IQ2000_OPERAND_CM_4Z :
124*3d8817e4Smiod print_normal (cd, info, fields->f_cm_4z, 0, pc, length);
125*3d8817e4Smiod break;
126*3d8817e4Smiod case IQ2000_OPERAND_COUNT :
127*3d8817e4Smiod print_normal (cd, info, fields->f_count, 0, pc, length);
128*3d8817e4Smiod break;
129*3d8817e4Smiod case IQ2000_OPERAND_EXECODE :
130*3d8817e4Smiod print_normal (cd, info, fields->f_excode, 0, pc, length);
131*3d8817e4Smiod break;
132*3d8817e4Smiod case IQ2000_OPERAND_HI16 :
133*3d8817e4Smiod print_normal (cd, info, fields->f_imm, 0, pc, length);
134*3d8817e4Smiod break;
135*3d8817e4Smiod case IQ2000_OPERAND_IMM :
136*3d8817e4Smiod print_normal (cd, info, fields->f_imm, 0, pc, length);
137*3d8817e4Smiod break;
138*3d8817e4Smiod case IQ2000_OPERAND_JMPTARG :
139*3d8817e4Smiod print_address (cd, info, fields->f_jtarg, 0|(1<<CGEN_OPERAND_ABS_ADDR), pc, length);
140*3d8817e4Smiod break;
141*3d8817e4Smiod case IQ2000_OPERAND_JMPTARGQ10 :
142*3d8817e4Smiod print_address (cd, info, fields->f_jtargq10, 0|(1<<CGEN_OPERAND_ABS_ADDR), pc, length);
143*3d8817e4Smiod break;
144*3d8817e4Smiod case IQ2000_OPERAND_LO16 :
145*3d8817e4Smiod print_normal (cd, info, fields->f_imm, 0, pc, length);
146*3d8817e4Smiod break;
147*3d8817e4Smiod case IQ2000_OPERAND_MASK :
148*3d8817e4Smiod print_normal (cd, info, fields->f_mask, 0, pc, length);
149*3d8817e4Smiod break;
150*3d8817e4Smiod case IQ2000_OPERAND_MASKL :
151*3d8817e4Smiod print_normal (cd, info, fields->f_maskl, 0, pc, length);
152*3d8817e4Smiod break;
153*3d8817e4Smiod case IQ2000_OPERAND_MASKQ10 :
154*3d8817e4Smiod print_normal (cd, info, fields->f_maskq10, 0, pc, length);
155*3d8817e4Smiod break;
156*3d8817e4Smiod case IQ2000_OPERAND_MASKR :
157*3d8817e4Smiod print_normal (cd, info, fields->f_rs, 0, pc, length);
158*3d8817e4Smiod break;
159*3d8817e4Smiod case IQ2000_OPERAND_MLO16 :
160*3d8817e4Smiod print_normal (cd, info, fields->f_imm, 0, pc, length);
161*3d8817e4Smiod break;
162*3d8817e4Smiod case IQ2000_OPERAND_OFFSET :
163*3d8817e4Smiod print_address (cd, info, fields->f_offset, 0|(1<<CGEN_OPERAND_PCREL_ADDR), pc, length);
164*3d8817e4Smiod break;
165*3d8817e4Smiod case IQ2000_OPERAND_RD :
166*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rd, 0);
167*3d8817e4Smiod break;
168*3d8817e4Smiod case IQ2000_OPERAND_RD_RS :
169*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rd_rs, 0|(1<<CGEN_OPERAND_VIRTUAL));
170*3d8817e4Smiod break;
171*3d8817e4Smiod case IQ2000_OPERAND_RD_RT :
172*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rd_rt, 0|(1<<CGEN_OPERAND_VIRTUAL));
173*3d8817e4Smiod break;
174*3d8817e4Smiod case IQ2000_OPERAND_RS :
175*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rs, 0);
176*3d8817e4Smiod break;
177*3d8817e4Smiod case IQ2000_OPERAND_RT :
178*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rt, 0);
179*3d8817e4Smiod break;
180*3d8817e4Smiod case IQ2000_OPERAND_RT_RS :
181*3d8817e4Smiod print_keyword (cd, info, & iq2000_cgen_opval_gr_names, fields->f_rt_rs, 0|(1<<CGEN_OPERAND_VIRTUAL));
182*3d8817e4Smiod break;
183*3d8817e4Smiod case IQ2000_OPERAND_SHAMT :
184*3d8817e4Smiod print_normal (cd, info, fields->f_shamt, 0, pc, length);
185*3d8817e4Smiod break;
186*3d8817e4Smiod
187*3d8817e4Smiod default :
188*3d8817e4Smiod /* xgettext:c-format */
189*3d8817e4Smiod fprintf (stderr, _("Unrecognized field %d while printing insn.\n"),
190*3d8817e4Smiod opindex);
191*3d8817e4Smiod abort ();
192*3d8817e4Smiod }
193*3d8817e4Smiod }
194*3d8817e4Smiod
195*3d8817e4Smiod cgen_print_fn * const iq2000_cgen_print_handlers[] =
196*3d8817e4Smiod {
197*3d8817e4Smiod print_insn_normal,
198*3d8817e4Smiod };
199*3d8817e4Smiod
200*3d8817e4Smiod
201*3d8817e4Smiod void
iq2000_cgen_init_dis(CGEN_CPU_DESC cd)202*3d8817e4Smiod iq2000_cgen_init_dis (CGEN_CPU_DESC cd)
203*3d8817e4Smiod {
204*3d8817e4Smiod iq2000_cgen_init_opcode_table (cd);
205*3d8817e4Smiod iq2000_cgen_init_ibld_table (cd);
206*3d8817e4Smiod cd->print_handlers = & iq2000_cgen_print_handlers[0];
207*3d8817e4Smiod cd->print_operand = iq2000_cgen_print_operand;
208*3d8817e4Smiod }
209*3d8817e4Smiod
210*3d8817e4Smiod
211*3d8817e4Smiod /* Default print handler. */
212*3d8817e4Smiod
213*3d8817e4Smiod static void
print_normal(CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,void * dis_info,long value,unsigned int attrs,bfd_vma pc ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED)214*3d8817e4Smiod print_normal (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
215*3d8817e4Smiod void *dis_info,
216*3d8817e4Smiod long value,
217*3d8817e4Smiod unsigned int attrs,
218*3d8817e4Smiod bfd_vma pc ATTRIBUTE_UNUSED,
219*3d8817e4Smiod int length ATTRIBUTE_UNUSED)
220*3d8817e4Smiod {
221*3d8817e4Smiod disassemble_info *info = (disassemble_info *) dis_info;
222*3d8817e4Smiod
223*3d8817e4Smiod #ifdef CGEN_PRINT_NORMAL
224*3d8817e4Smiod CGEN_PRINT_NORMAL (cd, info, value, attrs, pc, length);
225*3d8817e4Smiod #endif
226*3d8817e4Smiod
227*3d8817e4Smiod /* Print the operand as directed by the attributes. */
228*3d8817e4Smiod if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SEM_ONLY))
229*3d8817e4Smiod ; /* nothing to do */
230*3d8817e4Smiod else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SIGNED))
231*3d8817e4Smiod (*info->fprintf_func) (info->stream, "%ld", value);
232*3d8817e4Smiod else
233*3d8817e4Smiod (*info->fprintf_func) (info->stream, "0x%lx", value);
234*3d8817e4Smiod }
235*3d8817e4Smiod
236*3d8817e4Smiod /* Default address handler. */
237*3d8817e4Smiod
238*3d8817e4Smiod static void
print_address(CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,void * dis_info,bfd_vma value,unsigned int attrs,bfd_vma pc ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED)239*3d8817e4Smiod print_address (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
240*3d8817e4Smiod void *dis_info,
241*3d8817e4Smiod bfd_vma value,
242*3d8817e4Smiod unsigned int attrs,
243*3d8817e4Smiod bfd_vma pc ATTRIBUTE_UNUSED,
244*3d8817e4Smiod int length ATTRIBUTE_UNUSED)
245*3d8817e4Smiod {
246*3d8817e4Smiod disassemble_info *info = (disassemble_info *) dis_info;
247*3d8817e4Smiod
248*3d8817e4Smiod #ifdef CGEN_PRINT_ADDRESS
249*3d8817e4Smiod CGEN_PRINT_ADDRESS (cd, info, value, attrs, pc, length);
250*3d8817e4Smiod #endif
251*3d8817e4Smiod
252*3d8817e4Smiod /* Print the operand as directed by the attributes. */
253*3d8817e4Smiod if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SEM_ONLY))
254*3d8817e4Smiod ; /* Nothing to do. */
255*3d8817e4Smiod else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_PCREL_ADDR))
256*3d8817e4Smiod (*info->print_address_func) (value, info);
257*3d8817e4Smiod else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_ABS_ADDR))
258*3d8817e4Smiod (*info->print_address_func) (value, info);
259*3d8817e4Smiod else if (CGEN_BOOL_ATTR (attrs, CGEN_OPERAND_SIGNED))
260*3d8817e4Smiod (*info->fprintf_func) (info->stream, "%ld", (long) value);
261*3d8817e4Smiod else
262*3d8817e4Smiod (*info->fprintf_func) (info->stream, "0x%lx", (long) value);
263*3d8817e4Smiod }
264*3d8817e4Smiod
265*3d8817e4Smiod /* Keyword print handler. */
266*3d8817e4Smiod
267*3d8817e4Smiod static void
print_keyword(CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,void * dis_info,CGEN_KEYWORD * keyword_table,long value,unsigned int attrs ATTRIBUTE_UNUSED)268*3d8817e4Smiod print_keyword (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
269*3d8817e4Smiod void *dis_info,
270*3d8817e4Smiod CGEN_KEYWORD *keyword_table,
271*3d8817e4Smiod long value,
272*3d8817e4Smiod unsigned int attrs ATTRIBUTE_UNUSED)
273*3d8817e4Smiod {
274*3d8817e4Smiod disassemble_info *info = (disassemble_info *) dis_info;
275*3d8817e4Smiod const CGEN_KEYWORD_ENTRY *ke;
276*3d8817e4Smiod
277*3d8817e4Smiod ke = cgen_keyword_lookup_value (keyword_table, value);
278*3d8817e4Smiod if (ke != NULL)
279*3d8817e4Smiod (*info->fprintf_func) (info->stream, "%s", ke->name);
280*3d8817e4Smiod else
281*3d8817e4Smiod (*info->fprintf_func) (info->stream, "???");
282*3d8817e4Smiod }
283*3d8817e4Smiod
284*3d8817e4Smiod /* Default insn printer.
285*3d8817e4Smiod
286*3d8817e4Smiod DIS_INFO is defined as `void *' so the disassembler needn't know anything
287*3d8817e4Smiod about disassemble_info. */
288*3d8817e4Smiod
289*3d8817e4Smiod static void
print_insn_normal(CGEN_CPU_DESC cd,void * dis_info,const CGEN_INSN * insn,CGEN_FIELDS * fields,bfd_vma pc,int length)290*3d8817e4Smiod print_insn_normal (CGEN_CPU_DESC cd,
291*3d8817e4Smiod void *dis_info,
292*3d8817e4Smiod const CGEN_INSN *insn,
293*3d8817e4Smiod CGEN_FIELDS *fields,
294*3d8817e4Smiod bfd_vma pc,
295*3d8817e4Smiod int length)
296*3d8817e4Smiod {
297*3d8817e4Smiod const CGEN_SYNTAX *syntax = CGEN_INSN_SYNTAX (insn);
298*3d8817e4Smiod disassemble_info *info = (disassemble_info *) dis_info;
299*3d8817e4Smiod const CGEN_SYNTAX_CHAR_TYPE *syn;
300*3d8817e4Smiod
301*3d8817e4Smiod CGEN_INIT_PRINT (cd);
302*3d8817e4Smiod
303*3d8817e4Smiod for (syn = CGEN_SYNTAX_STRING (syntax); *syn; ++syn)
304*3d8817e4Smiod {
305*3d8817e4Smiod if (CGEN_SYNTAX_MNEMONIC_P (*syn))
306*3d8817e4Smiod {
307*3d8817e4Smiod (*info->fprintf_func) (info->stream, "%s", CGEN_INSN_MNEMONIC (insn));
308*3d8817e4Smiod continue;
309*3d8817e4Smiod }
310*3d8817e4Smiod if (CGEN_SYNTAX_CHAR_P (*syn))
311*3d8817e4Smiod {
312*3d8817e4Smiod (*info->fprintf_func) (info->stream, "%c", CGEN_SYNTAX_CHAR (*syn));
313*3d8817e4Smiod continue;
314*3d8817e4Smiod }
315*3d8817e4Smiod
316*3d8817e4Smiod /* We have an operand. */
317*3d8817e4Smiod iq2000_cgen_print_operand (cd, CGEN_SYNTAX_FIELD (*syn), info,
318*3d8817e4Smiod fields, CGEN_INSN_ATTRS (insn), pc, length);
319*3d8817e4Smiod }
320*3d8817e4Smiod }
321*3d8817e4Smiod
322*3d8817e4Smiod /* Subroutine of print_insn. Reads an insn into the given buffers and updates
323*3d8817e4Smiod the extract info.
324*3d8817e4Smiod Returns 0 if all is well, non-zero otherwise. */
325*3d8817e4Smiod
326*3d8817e4Smiod static int
read_insn(CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,bfd_vma pc,disassemble_info * info,bfd_byte * buf,int buflen,CGEN_EXTRACT_INFO * ex_info,unsigned long * insn_value)327*3d8817e4Smiod read_insn (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
328*3d8817e4Smiod bfd_vma pc,
329*3d8817e4Smiod disassemble_info *info,
330*3d8817e4Smiod bfd_byte *buf,
331*3d8817e4Smiod int buflen,
332*3d8817e4Smiod CGEN_EXTRACT_INFO *ex_info,
333*3d8817e4Smiod unsigned long *insn_value)
334*3d8817e4Smiod {
335*3d8817e4Smiod int status = (*info->read_memory_func) (pc, buf, buflen, info);
336*3d8817e4Smiod
337*3d8817e4Smiod if (status != 0)
338*3d8817e4Smiod {
339*3d8817e4Smiod (*info->memory_error_func) (status, pc, info);
340*3d8817e4Smiod return -1;
341*3d8817e4Smiod }
342*3d8817e4Smiod
343*3d8817e4Smiod ex_info->dis_info = info;
344*3d8817e4Smiod ex_info->valid = (1 << buflen) - 1;
345*3d8817e4Smiod ex_info->insn_bytes = buf;
346*3d8817e4Smiod
347*3d8817e4Smiod *insn_value = bfd_get_bits (buf, buflen * 8, info->endian == BFD_ENDIAN_BIG);
348*3d8817e4Smiod return 0;
349*3d8817e4Smiod }
350*3d8817e4Smiod
351*3d8817e4Smiod /* Utility to print an insn.
352*3d8817e4Smiod BUF is the base part of the insn, target byte order, BUFLEN bytes long.
353*3d8817e4Smiod The result is the size of the insn in bytes or zero for an unknown insn
354*3d8817e4Smiod or -1 if an error occurs fetching data (memory_error_func will have
355*3d8817e4Smiod been called). */
356*3d8817e4Smiod
357*3d8817e4Smiod static int
print_insn(CGEN_CPU_DESC cd,bfd_vma pc,disassemble_info * info,bfd_byte * buf,unsigned int buflen)358*3d8817e4Smiod print_insn (CGEN_CPU_DESC cd,
359*3d8817e4Smiod bfd_vma pc,
360*3d8817e4Smiod disassemble_info *info,
361*3d8817e4Smiod bfd_byte *buf,
362*3d8817e4Smiod unsigned int buflen)
363*3d8817e4Smiod {
364*3d8817e4Smiod CGEN_INSN_INT insn_value;
365*3d8817e4Smiod const CGEN_INSN_LIST *insn_list;
366*3d8817e4Smiod CGEN_EXTRACT_INFO ex_info;
367*3d8817e4Smiod int basesize;
368*3d8817e4Smiod
369*3d8817e4Smiod /* Extract base part of instruction, just in case CGEN_DIS_* uses it. */
370*3d8817e4Smiod basesize = cd->base_insn_bitsize < buflen * 8 ?
371*3d8817e4Smiod cd->base_insn_bitsize : buflen * 8;
372*3d8817e4Smiod insn_value = cgen_get_insn_value (cd, buf, basesize);
373*3d8817e4Smiod
374*3d8817e4Smiod
375*3d8817e4Smiod /* Fill in ex_info fields like read_insn would. Don't actually call
376*3d8817e4Smiod read_insn, since the incoming buffer is already read (and possibly
377*3d8817e4Smiod modified a la m32r). */
378*3d8817e4Smiod ex_info.valid = (1 << buflen) - 1;
379*3d8817e4Smiod ex_info.dis_info = info;
380*3d8817e4Smiod ex_info.insn_bytes = buf;
381*3d8817e4Smiod
382*3d8817e4Smiod /* The instructions are stored in hash lists.
383*3d8817e4Smiod Pick the first one and keep trying until we find the right one. */
384*3d8817e4Smiod
385*3d8817e4Smiod insn_list = CGEN_DIS_LOOKUP_INSN (cd, (char *) buf, insn_value);
386*3d8817e4Smiod while (insn_list != NULL)
387*3d8817e4Smiod {
388*3d8817e4Smiod const CGEN_INSN *insn = insn_list->insn;
389*3d8817e4Smiod CGEN_FIELDS fields;
390*3d8817e4Smiod int length;
391*3d8817e4Smiod unsigned long insn_value_cropped;
392*3d8817e4Smiod
393*3d8817e4Smiod #ifdef CGEN_VALIDATE_INSN_SUPPORTED
394*3d8817e4Smiod /* Not needed as insn shouldn't be in hash lists if not supported. */
395*3d8817e4Smiod /* Supported by this cpu? */
396*3d8817e4Smiod if (! iq2000_cgen_insn_supported (cd, insn))
397*3d8817e4Smiod {
398*3d8817e4Smiod insn_list = CGEN_DIS_NEXT_INSN (insn_list);
399*3d8817e4Smiod continue;
400*3d8817e4Smiod }
401*3d8817e4Smiod #endif
402*3d8817e4Smiod
403*3d8817e4Smiod /* Basic bit mask must be correct. */
404*3d8817e4Smiod /* ??? May wish to allow target to defer this check until the extract
405*3d8817e4Smiod handler. */
406*3d8817e4Smiod
407*3d8817e4Smiod /* Base size may exceed this instruction's size. Extract the
408*3d8817e4Smiod relevant part from the buffer. */
409*3d8817e4Smiod if ((unsigned) (CGEN_INSN_BITSIZE (insn) / 8) < buflen &&
410*3d8817e4Smiod (unsigned) (CGEN_INSN_BITSIZE (insn) / 8) <= sizeof (unsigned long))
411*3d8817e4Smiod insn_value_cropped = bfd_get_bits (buf, CGEN_INSN_BITSIZE (insn),
412*3d8817e4Smiod info->endian == BFD_ENDIAN_BIG);
413*3d8817e4Smiod else
414*3d8817e4Smiod insn_value_cropped = insn_value;
415*3d8817e4Smiod
416*3d8817e4Smiod if ((insn_value_cropped & CGEN_INSN_BASE_MASK (insn))
417*3d8817e4Smiod == CGEN_INSN_BASE_VALUE (insn))
418*3d8817e4Smiod {
419*3d8817e4Smiod /* Printing is handled in two passes. The first pass parses the
420*3d8817e4Smiod machine insn and extracts the fields. The second pass prints
421*3d8817e4Smiod them. */
422*3d8817e4Smiod
423*3d8817e4Smiod /* Make sure the entire insn is loaded into insn_value, if it
424*3d8817e4Smiod can fit. */
425*3d8817e4Smiod if (((unsigned) CGEN_INSN_BITSIZE (insn) > cd->base_insn_bitsize) &&
426*3d8817e4Smiod (unsigned) (CGEN_INSN_BITSIZE (insn) / 8) <= sizeof (unsigned long))
427*3d8817e4Smiod {
428*3d8817e4Smiod unsigned long full_insn_value;
429*3d8817e4Smiod int rc = read_insn (cd, pc, info, buf,
430*3d8817e4Smiod CGEN_INSN_BITSIZE (insn) / 8,
431*3d8817e4Smiod & ex_info, & full_insn_value);
432*3d8817e4Smiod if (rc != 0)
433*3d8817e4Smiod return rc;
434*3d8817e4Smiod length = CGEN_EXTRACT_FN (cd, insn)
435*3d8817e4Smiod (cd, insn, &ex_info, full_insn_value, &fields, pc);
436*3d8817e4Smiod }
437*3d8817e4Smiod else
438*3d8817e4Smiod length = CGEN_EXTRACT_FN (cd, insn)
439*3d8817e4Smiod (cd, insn, &ex_info, insn_value_cropped, &fields, pc);
440*3d8817e4Smiod
441*3d8817e4Smiod /* Length < 0 -> error. */
442*3d8817e4Smiod if (length < 0)
443*3d8817e4Smiod return length;
444*3d8817e4Smiod if (length > 0)
445*3d8817e4Smiod {
446*3d8817e4Smiod CGEN_PRINT_FN (cd, insn) (cd, info, insn, &fields, pc, length);
447*3d8817e4Smiod /* Length is in bits, result is in bytes. */
448*3d8817e4Smiod return length / 8;
449*3d8817e4Smiod }
450*3d8817e4Smiod }
451*3d8817e4Smiod
452*3d8817e4Smiod insn_list = CGEN_DIS_NEXT_INSN (insn_list);
453*3d8817e4Smiod }
454*3d8817e4Smiod
455*3d8817e4Smiod return 0;
456*3d8817e4Smiod }
457*3d8817e4Smiod
458*3d8817e4Smiod /* Default value for CGEN_PRINT_INSN.
459*3d8817e4Smiod The result is the size of the insn in bytes or zero for an unknown insn
460*3d8817e4Smiod or -1 if an error occured fetching bytes. */
461*3d8817e4Smiod
462*3d8817e4Smiod #ifndef CGEN_PRINT_INSN
463*3d8817e4Smiod #define CGEN_PRINT_INSN default_print_insn
464*3d8817e4Smiod #endif
465*3d8817e4Smiod
466*3d8817e4Smiod static int
default_print_insn(CGEN_CPU_DESC cd,bfd_vma pc,disassemble_info * info)467*3d8817e4Smiod default_print_insn (CGEN_CPU_DESC cd, bfd_vma pc, disassemble_info *info)
468*3d8817e4Smiod {
469*3d8817e4Smiod bfd_byte buf[CGEN_MAX_INSN_SIZE];
470*3d8817e4Smiod int buflen;
471*3d8817e4Smiod int status;
472*3d8817e4Smiod
473*3d8817e4Smiod /* Attempt to read the base part of the insn. */
474*3d8817e4Smiod buflen = cd->base_insn_bitsize / 8;
475*3d8817e4Smiod status = (*info->read_memory_func) (pc, buf, buflen, info);
476*3d8817e4Smiod
477*3d8817e4Smiod /* Try again with the minimum part, if min < base. */
478*3d8817e4Smiod if (status != 0 && (cd->min_insn_bitsize < cd->base_insn_bitsize))
479*3d8817e4Smiod {
480*3d8817e4Smiod buflen = cd->min_insn_bitsize / 8;
481*3d8817e4Smiod status = (*info->read_memory_func) (pc, buf, buflen, info);
482*3d8817e4Smiod }
483*3d8817e4Smiod
484*3d8817e4Smiod if (status != 0)
485*3d8817e4Smiod {
486*3d8817e4Smiod (*info->memory_error_func) (status, pc, info);
487*3d8817e4Smiod return -1;
488*3d8817e4Smiod }
489*3d8817e4Smiod
490*3d8817e4Smiod return print_insn (cd, pc, info, buf, buflen);
491*3d8817e4Smiod }
492*3d8817e4Smiod
493*3d8817e4Smiod /* Main entry point.
494*3d8817e4Smiod Print one instruction from PC on INFO->STREAM.
495*3d8817e4Smiod Return the size of the instruction (in bytes). */
496*3d8817e4Smiod
497*3d8817e4Smiod typedef struct cpu_desc_list
498*3d8817e4Smiod {
499*3d8817e4Smiod struct cpu_desc_list *next;
500*3d8817e4Smiod CGEN_BITSET *isa;
501*3d8817e4Smiod int mach;
502*3d8817e4Smiod int endian;
503*3d8817e4Smiod CGEN_CPU_DESC cd;
504*3d8817e4Smiod } cpu_desc_list;
505*3d8817e4Smiod
506*3d8817e4Smiod int
print_insn_iq2000(bfd_vma pc,disassemble_info * info)507*3d8817e4Smiod print_insn_iq2000 (bfd_vma pc, disassemble_info *info)
508*3d8817e4Smiod {
509*3d8817e4Smiod static cpu_desc_list *cd_list = 0;
510*3d8817e4Smiod cpu_desc_list *cl = 0;
511*3d8817e4Smiod static CGEN_CPU_DESC cd = 0;
512*3d8817e4Smiod static CGEN_BITSET *prev_isa;
513*3d8817e4Smiod static int prev_mach;
514*3d8817e4Smiod static int prev_endian;
515*3d8817e4Smiod int length;
516*3d8817e4Smiod CGEN_BITSET *isa;
517*3d8817e4Smiod int mach;
518*3d8817e4Smiod int endian = (info->endian == BFD_ENDIAN_BIG
519*3d8817e4Smiod ? CGEN_ENDIAN_BIG
520*3d8817e4Smiod : CGEN_ENDIAN_LITTLE);
521*3d8817e4Smiod enum bfd_architecture arch;
522*3d8817e4Smiod
523*3d8817e4Smiod /* ??? gdb will set mach but leave the architecture as "unknown" */
524*3d8817e4Smiod #ifndef CGEN_BFD_ARCH
525*3d8817e4Smiod #define CGEN_BFD_ARCH bfd_arch_iq2000
526*3d8817e4Smiod #endif
527*3d8817e4Smiod arch = info->arch;
528*3d8817e4Smiod if (arch == bfd_arch_unknown)
529*3d8817e4Smiod arch = CGEN_BFD_ARCH;
530*3d8817e4Smiod
531*3d8817e4Smiod /* There's no standard way to compute the machine or isa number
532*3d8817e4Smiod so we leave it to the target. */
533*3d8817e4Smiod #ifdef CGEN_COMPUTE_MACH
534*3d8817e4Smiod mach = CGEN_COMPUTE_MACH (info);
535*3d8817e4Smiod #else
536*3d8817e4Smiod mach = info->mach;
537*3d8817e4Smiod #endif
538*3d8817e4Smiod
539*3d8817e4Smiod #ifdef CGEN_COMPUTE_ISA
540*3d8817e4Smiod {
541*3d8817e4Smiod static CGEN_BITSET *permanent_isa;
542*3d8817e4Smiod
543*3d8817e4Smiod if (!permanent_isa)
544*3d8817e4Smiod permanent_isa = cgen_bitset_create (MAX_ISAS);
545*3d8817e4Smiod isa = permanent_isa;
546*3d8817e4Smiod cgen_bitset_clear (isa);
547*3d8817e4Smiod cgen_bitset_add (isa, CGEN_COMPUTE_ISA (info));
548*3d8817e4Smiod }
549*3d8817e4Smiod #else
550*3d8817e4Smiod isa = info->insn_sets;
551*3d8817e4Smiod #endif
552*3d8817e4Smiod
553*3d8817e4Smiod /* If we've switched cpu's, try to find a handle we've used before */
554*3d8817e4Smiod if (cd
555*3d8817e4Smiod && (cgen_bitset_compare (isa, prev_isa) != 0
556*3d8817e4Smiod || mach != prev_mach
557*3d8817e4Smiod || endian != prev_endian))
558*3d8817e4Smiod {
559*3d8817e4Smiod cd = 0;
560*3d8817e4Smiod for (cl = cd_list; cl; cl = cl->next)
561*3d8817e4Smiod {
562*3d8817e4Smiod if (cgen_bitset_compare (cl->isa, isa) == 0 &&
563*3d8817e4Smiod cl->mach == mach &&
564*3d8817e4Smiod cl->endian == endian)
565*3d8817e4Smiod {
566*3d8817e4Smiod cd = cl->cd;
567*3d8817e4Smiod prev_isa = cd->isas;
568*3d8817e4Smiod break;
569*3d8817e4Smiod }
570*3d8817e4Smiod }
571*3d8817e4Smiod }
572*3d8817e4Smiod
573*3d8817e4Smiod /* If we haven't initialized yet, initialize the opcode table. */
574*3d8817e4Smiod if (! cd)
575*3d8817e4Smiod {
576*3d8817e4Smiod const bfd_arch_info_type *arch_type = bfd_lookup_arch (arch, mach);
577*3d8817e4Smiod const char *mach_name;
578*3d8817e4Smiod
579*3d8817e4Smiod if (!arch_type)
580*3d8817e4Smiod abort ();
581*3d8817e4Smiod mach_name = arch_type->printable_name;
582*3d8817e4Smiod
583*3d8817e4Smiod prev_isa = cgen_bitset_copy (isa);
584*3d8817e4Smiod prev_mach = mach;
585*3d8817e4Smiod prev_endian = endian;
586*3d8817e4Smiod cd = iq2000_cgen_cpu_open (CGEN_CPU_OPEN_ISAS, prev_isa,
587*3d8817e4Smiod CGEN_CPU_OPEN_BFDMACH, mach_name,
588*3d8817e4Smiod CGEN_CPU_OPEN_ENDIAN, prev_endian,
589*3d8817e4Smiod CGEN_CPU_OPEN_END);
590*3d8817e4Smiod if (!cd)
591*3d8817e4Smiod abort ();
592*3d8817e4Smiod
593*3d8817e4Smiod /* Save this away for future reference. */
594*3d8817e4Smiod cl = xmalloc (sizeof (struct cpu_desc_list));
595*3d8817e4Smiod cl->cd = cd;
596*3d8817e4Smiod cl->isa = prev_isa;
597*3d8817e4Smiod cl->mach = mach;
598*3d8817e4Smiod cl->endian = endian;
599*3d8817e4Smiod cl->next = cd_list;
600*3d8817e4Smiod cd_list = cl;
601*3d8817e4Smiod
602*3d8817e4Smiod iq2000_cgen_init_dis (cd);
603*3d8817e4Smiod }
604*3d8817e4Smiod
605*3d8817e4Smiod /* We try to have as much common code as possible.
606*3d8817e4Smiod But at this point some targets need to take over. */
607*3d8817e4Smiod /* ??? Some targets may need a hook elsewhere. Try to avoid this,
608*3d8817e4Smiod but if not possible try to move this hook elsewhere rather than
609*3d8817e4Smiod have two hooks. */
610*3d8817e4Smiod length = CGEN_PRINT_INSN (cd, pc, info);
611*3d8817e4Smiod if (length > 0)
612*3d8817e4Smiod return length;
613*3d8817e4Smiod if (length < 0)
614*3d8817e4Smiod return -1;
615*3d8817e4Smiod
616*3d8817e4Smiod (*info->fprintf_func) (info->stream, UNKNOWN_INSN_MSG);
617*3d8817e4Smiod return cd->default_insn_bitsize / 8;
618*3d8817e4Smiod }
619