Commit 450d4ff553af32fc9d83fef20d7106b0151526b8
1 parent
9b22787c
CRIS disassembler, originally from binutils, by Edgar E. Iglesias.
git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@3356 c046a42c-6fe2-441c-8c8c-71466251a162
Showing
2 changed files
with
3273 additions
and
0 deletions
cris-dis.c
0 → 100644
1 | +/* Disassembler code for CRIS. | |
2 | + Copyright 2000, 2001, 2002, 2004, 2005, 2006 Free Software Foundation, Inc. | |
3 | + Contributed by Axis Communications AB, Lund, Sweden. | |
4 | + Written by Hans-Peter Nilsson. | |
5 | + | |
6 | + This file is part of the GNU binutils and GDB, the GNU debugger. | |
7 | + | |
8 | + This program is free software; you can redistribute it and/or modify it | |
9 | + under the terms of the GNU General Public License as published by the | |
10 | + Free Software Foundation; either version 2, or (at your option) any later | |
11 | + version. | |
12 | + | |
13 | + This program is distributed in the hope that it will be useful, but WITHOUT | |
14 | + ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
15 | + FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for | |
16 | + more details. | |
17 | + | |
18 | + You should have received a copy of the GNU General Public License | |
19 | + along with this program; if not, write to the Free Software | |
20 | + Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, | |
21 | + MA 02110-1301, USA. */ | |
22 | + | |
23 | +#include "dis-asm.h" | |
24 | +//#include "sysdep.h" | |
25 | +#include "target-cris/opcode-cris.h" | |
26 | +//#include "libiberty.h" | |
27 | + | |
28 | + | |
29 | +#define FALSE 0 | |
30 | +#define TRUE 1 | |
31 | +#define CONST_STRNEQ(STR1,STR2) (strncmp ((STR1), (STR2), sizeof (STR2) - 1) == 0) | |
32 | + | |
33 | +/* cris-opc.c -- Table of opcodes for the CRIS processor. | |
34 | + Copyright 2000, 2001, 2004 Free Software Foundation, Inc. | |
35 | + Contributed by Axis Communications AB, Lund, Sweden. | |
36 | + Originally written for GAS 1.38.1 by Mikael Asker. | |
37 | + Reorganized by Hans-Peter Nilsson. | |
38 | + | |
39 | +This file is part of GAS, GDB and the GNU binutils. | |
40 | + | |
41 | +GAS, GDB, and GNU binutils is free software; you can redistribute it | |
42 | +and/or modify it under the terms of the GNU General Public License as | |
43 | +published by the Free Software Foundation; either version 2, or (at your | |
44 | +option) any later version. | |
45 | + | |
46 | +GAS, GDB, and GNU binutils are distributed in the hope that they will be | |
47 | +useful, but WITHOUT ANY WARRANTY; without even the implied warranty of | |
48 | +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
49 | +GNU General Public License for more details. | |
50 | + | |
51 | +You should have received a copy of the GNU General Public License | |
52 | +along with this program; if not, write to the Free Software | |
53 | +Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ | |
54 | + | |
55 | +#ifndef NULL | |
56 | +#define NULL (0) | |
57 | +#endif | |
58 | + | |
59 | +/* This table isn't used for CRISv32 and the size of immediate operands. */ | |
60 | +const struct cris_spec_reg | |
61 | +cris_spec_regs[] = | |
62 | +{ | |
63 | + {"bz", 0, 1, cris_ver_v32p, NULL}, | |
64 | + {"p0", 0, 1, 0, NULL}, | |
65 | + {"vr", 1, 1, 0, NULL}, | |
66 | + {"p1", 1, 1, 0, NULL}, | |
67 | + {"pid", 2, 1, cris_ver_v32p, NULL}, | |
68 | + {"p2", 2, 1, cris_ver_v32p, NULL}, | |
69 | + {"p2", 2, 1, cris_ver_warning, NULL}, | |
70 | + {"srs", 3, 1, cris_ver_v32p, NULL}, | |
71 | + {"p3", 3, 1, cris_ver_v32p, NULL}, | |
72 | + {"p3", 3, 1, cris_ver_warning, NULL}, | |
73 | + {"wz", 4, 2, cris_ver_v32p, NULL}, | |
74 | + {"p4", 4, 2, 0, NULL}, | |
75 | + {"ccr", 5, 2, cris_ver_v0_10, NULL}, | |
76 | + {"exs", 5, 4, cris_ver_v32p, NULL}, | |
77 | + {"p5", 5, 2, cris_ver_v0_10, NULL}, | |
78 | + {"p5", 5, 4, cris_ver_v32p, NULL}, | |
79 | + {"dcr0",6, 2, cris_ver_v0_3, NULL}, | |
80 | + {"eda", 6, 4, cris_ver_v32p, NULL}, | |
81 | + {"p6", 6, 2, cris_ver_v0_3, NULL}, | |
82 | + {"p6", 6, 4, cris_ver_v32p, NULL}, | |
83 | + {"dcr1/mof", 7, 4, cris_ver_v10p, | |
84 | + "Register `dcr1/mof' with ambiguous size specified. Guessing 4 bytes"}, | |
85 | + {"dcr1/mof", 7, 2, cris_ver_v0_3, | |
86 | + "Register `dcr1/mof' with ambiguous size specified. Guessing 2 bytes"}, | |
87 | + {"mof", 7, 4, cris_ver_v10p, NULL}, | |
88 | + {"dcr1",7, 2, cris_ver_v0_3, NULL}, | |
89 | + {"p7", 7, 4, cris_ver_v10p, NULL}, | |
90 | + {"p7", 7, 2, cris_ver_v0_3, NULL}, | |
91 | + {"dz", 8, 4, cris_ver_v32p, NULL}, | |
92 | + {"p8", 8, 4, 0, NULL}, | |
93 | + {"ibr", 9, 4, cris_ver_v0_10, NULL}, | |
94 | + {"ebp", 9, 4, cris_ver_v32p, NULL}, | |
95 | + {"p9", 9, 4, 0, NULL}, | |
96 | + {"irp", 10, 4, cris_ver_v0_10, NULL}, | |
97 | + {"erp", 10, 4, cris_ver_v32p, NULL}, | |
98 | + {"p10", 10, 4, 0, NULL}, | |
99 | + {"srp", 11, 4, 0, NULL}, | |
100 | + {"p11", 11, 4, 0, NULL}, | |
101 | + /* For disassembly use only. Accept at assembly with a warning. */ | |
102 | + {"bar/dtp0", 12, 4, cris_ver_warning, | |
103 | + "Ambiguous register `bar/dtp0' specified"}, | |
104 | + {"nrp", 12, 4, cris_ver_v32p, NULL}, | |
105 | + {"bar", 12, 4, cris_ver_v8_10, NULL}, | |
106 | + {"dtp0",12, 4, cris_ver_v0_3, NULL}, | |
107 | + {"p12", 12, 4, 0, NULL}, | |
108 | + /* For disassembly use only. Accept at assembly with a warning. */ | |
109 | + {"dccr/dtp1",13, 4, cris_ver_warning, | |
110 | + "Ambiguous register `dccr/dtp1' specified"}, | |
111 | + {"ccs", 13, 4, cris_ver_v32p, NULL}, | |
112 | + {"dccr",13, 4, cris_ver_v8_10, NULL}, | |
113 | + {"dtp1",13, 4, cris_ver_v0_3, NULL}, | |
114 | + {"p13", 13, 4, 0, NULL}, | |
115 | + {"brp", 14, 4, cris_ver_v3_10, NULL}, | |
116 | + {"usp", 14, 4, cris_ver_v32p, NULL}, | |
117 | + {"p14", 14, 4, cris_ver_v3p, NULL}, | |
118 | + {"usp", 15, 4, cris_ver_v10, NULL}, | |
119 | + {"spc", 15, 4, cris_ver_v32p, NULL}, | |
120 | + {"p15", 15, 4, cris_ver_v10p, NULL}, | |
121 | + {NULL, 0, 0, cris_ver_version_all, NULL} | |
122 | +}; | |
123 | + | |
124 | +/* Add version specifiers to this table when necessary. | |
125 | + The (now) regular coding of register names suggests a simpler | |
126 | + implementation. */ | |
127 | +const struct cris_support_reg cris_support_regs[] = | |
128 | +{ | |
129 | + {"s0", 0}, | |
130 | + {"s1", 1}, | |
131 | + {"s2", 2}, | |
132 | + {"s3", 3}, | |
133 | + {"s4", 4}, | |
134 | + {"s5", 5}, | |
135 | + {"s6", 6}, | |
136 | + {"s7", 7}, | |
137 | + {"s8", 8}, | |
138 | + {"s9", 9}, | |
139 | + {"s10", 10}, | |
140 | + {"s11", 11}, | |
141 | + {"s12", 12}, | |
142 | + {"s13", 13}, | |
143 | + {"s14", 14}, | |
144 | + {"s15", 15}, | |
145 | + {NULL, 0} | |
146 | +}; | |
147 | + | |
148 | +/* All CRIS opcodes are 16 bits. | |
149 | + | |
150 | + - The match component is a mask saying which bits must match a | |
151 | + particular opcode in order for an instruction to be an instance | |
152 | + of that opcode. | |
153 | + | |
154 | + - The args component is a string containing characters symbolically | |
155 | + matching the operands of an instruction. Used for both assembly | |
156 | + and disassembly. | |
157 | + | |
158 | + Operand-matching characters: | |
159 | + [ ] , space | |
160 | + Verbatim. | |
161 | + A The string "ACR" (case-insensitive). | |
162 | + B Not really an operand. It causes a "BDAP -size,SP" prefix to be | |
163 | + output for the PUSH alias-instructions and recognizes a push- | |
164 | + prefix at disassembly. This letter isn't recognized for v32. | |
165 | + Must be followed by a R or P letter. | |
166 | + ! Non-match pattern, will not match if there's a prefix insn. | |
167 | + b Non-matching operand, used for branches with 16-bit | |
168 | + displacement. Only recognized by the disassembler. | |
169 | + c 5-bit unsigned immediate in bits <4:0>. | |
170 | + C 4-bit unsigned immediate in bits <3:0>. | |
171 | + d At assembly, optionally (as in put other cases before this one) | |
172 | + ".d" or ".D" at the start of the operands, followed by one space | |
173 | + character. At disassembly, nothing. | |
174 | + D General register in bits <15:12> and <3:0>. | |
175 | + f List of flags in bits <15:12> and <3:0>. | |
176 | + i 6-bit signed immediate in bits <5:0>. | |
177 | + I 6-bit unsigned immediate in bits <5:0>. | |
178 | + M Size modifier (B, W or D) for CLEAR instructions. | |
179 | + m Size modifier (B, W or D) in bits <5:4> | |
180 | + N A 32-bit dword, like in the difference between s and y. | |
181 | + This has no effect on bits in the opcode. Can also be expressed | |
182 | + as "[pc+]" in input. | |
183 | + n As N, but PC-relative (to the start of the instruction). | |
184 | + o [-128..127] word offset in bits <7:1> and <0>. Used by 8-bit | |
185 | + branch instructions. | |
186 | + O [-128..127] offset in bits <7:0>. Also matches a comma and a | |
187 | + general register after the expression, in bits <15:12>. Used | |
188 | + only for the BDAP prefix insn (in v32 the ADDOQ insn; same opcode). | |
189 | + P Special register in bits <15:12>. | |
190 | + p Indicates that the insn is a prefix insn. Must be first | |
191 | + character. | |
192 | + Q As O, but don't relax; force an 8-bit offset. | |
193 | + R General register in bits <15:12>. | |
194 | + r General register in bits <3:0>. | |
195 | + S Source operand in bit <10> and a prefix; a 3-operand prefix | |
196 | + without side-effect. | |
197 | + s Source operand in bits <10> and <3:0>, optionally with a | |
198 | + side-effect prefix, except [pc] (the name, not R15 as in ACR) | |
199 | + isn't allowed for v32 and higher. | |
200 | + T Support register in bits <15:12>. | |
201 | + u 4-bit (PC-relative) unsigned immediate word offset in bits <3:0>. | |
202 | + U Relaxes to either u or n, instruction is assumed LAPCQ or LAPC. | |
203 | + Not recognized at disassembly. | |
204 | + x Register-dot-modifier, for example "r5.w" in bits <15:12> and <5:4>. | |
205 | + y Like 's' but do not allow an integer at assembly. | |
206 | + Y The difference s-y; only an integer is allowed. | |
207 | + z Size modifier (B or W) in bit <4>. */ | |
208 | + | |
209 | + | |
210 | +/* Please note the order of the opcodes in this table is significant. | |
211 | + The assembler requires that all instances of the same mnemonic must | |
212 | + be consecutive. If they aren't, the assembler might not recognize | |
213 | + them, or may indicate an internal error. | |
214 | + | |
215 | + The disassembler should not normally care about the order of the | |
216 | + opcodes, but will prefer an earlier alternative if the "match-score" | |
217 | + (see cris-dis.c) is computed as equal. | |
218 | + | |
219 | + It should not be significant for proper execution that this table is | |
220 | + in alphabetical order, but please follow that convention for an easy | |
221 | + overview. */ | |
222 | + | |
223 | +const struct cris_opcode | |
224 | +cris_opcodes[] = | |
225 | +{ | |
226 | + {"abs", 0x06B0, 0x0940, "r,R", 0, SIZE_NONE, 0, | |
227 | + cris_abs_op}, | |
228 | + | |
229 | + {"add", 0x0600, 0x09c0, "m r,R", 0, SIZE_NONE, 0, | |
230 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
231 | + | |
232 | + {"add", 0x0A00, 0x01c0, "m s,R", 0, SIZE_FIELD, 0, | |
233 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
234 | + | |
235 | + {"add", 0x0A00, 0x01c0, "m S,D", 0, SIZE_NONE, | |
236 | + cris_ver_v0_10, | |
237 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
238 | + | |
239 | + {"add", 0x0a00, 0x05c0, "m S,R,r", 0, SIZE_NONE, | |
240 | + cris_ver_v0_10, | |
241 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
242 | + | |
243 | + {"add", 0x0A00, 0x01c0, "m s,R", 0, SIZE_FIELD, | |
244 | + cris_ver_v32p, | |
245 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
246 | + | |
247 | + {"addc", 0x0570, 0x0A80, "r,R", 0, SIZE_FIX_32, | |
248 | + cris_ver_v32p, | |
249 | + cris_not_implemented_op}, | |
250 | + | |
251 | + {"addc", 0x09A0, 0x0250, "s,R", 0, SIZE_FIX_32, | |
252 | + cris_ver_v32p, | |
253 | + cris_not_implemented_op}, | |
254 | + | |
255 | + {"addi", 0x0540, 0x0A80, "x,r,A", 0, SIZE_NONE, | |
256 | + cris_ver_v32p, | |
257 | + cris_addi_op}, | |
258 | + | |
259 | + {"addi", 0x0500, 0x0Ac0, "x,r", 0, SIZE_NONE, 0, | |
260 | + cris_addi_op}, | |
261 | + | |
262 | + /* This collates after "addo", but we want to disassemble as "addoq", | |
263 | + not "addo". */ | |
264 | + {"addoq", 0x0100, 0x0E00, "Q,A", 0, SIZE_NONE, | |
265 | + cris_ver_v32p, | |
266 | + cris_not_implemented_op}, | |
267 | + | |
268 | + {"addo", 0x0940, 0x0280, "m s,R,A", 0, SIZE_FIELD_SIGNED, | |
269 | + cris_ver_v32p, | |
270 | + cris_not_implemented_op}, | |
271 | + | |
272 | + /* This must be located after the insn above, lest we misinterpret | |
273 | + "addo.b -1,r0,acr" as "addo .b-1,r0,acr". FIXME: Sounds like a | |
274 | + parser bug. */ | |
275 | + {"addo", 0x0100, 0x0E00, "O,A", 0, SIZE_NONE, | |
276 | + cris_ver_v32p, | |
277 | + cris_not_implemented_op}, | |
278 | + | |
279 | + {"addq", 0x0200, 0x0Dc0, "I,R", 0, SIZE_NONE, 0, | |
280 | + cris_quick_mode_add_sub_op}, | |
281 | + | |
282 | + {"adds", 0x0420, 0x0Bc0, "z r,R", 0, SIZE_NONE, 0, | |
283 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
284 | + | |
285 | + /* FIXME: SIZE_FIELD_SIGNED and all necessary changes. */ | |
286 | + {"adds", 0x0820, 0x03c0, "z s,R", 0, SIZE_FIELD, 0, | |
287 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
288 | + | |
289 | + {"adds", 0x0820, 0x03c0, "z S,D", 0, SIZE_NONE, | |
290 | + cris_ver_v0_10, | |
291 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
292 | + | |
293 | + {"adds", 0x0820, 0x07c0, "z S,R,r", 0, SIZE_NONE, | |
294 | + cris_ver_v0_10, | |
295 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
296 | + | |
297 | + {"addu", 0x0400, 0x0be0, "z r,R", 0, SIZE_NONE, 0, | |
298 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
299 | + | |
300 | + /* FIXME: SIZE_FIELD_UNSIGNED and all necessary changes. */ | |
301 | + {"addu", 0x0800, 0x03e0, "z s,R", 0, SIZE_FIELD, 0, | |
302 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
303 | + | |
304 | + {"addu", 0x0800, 0x03e0, "z S,D", 0, SIZE_NONE, | |
305 | + cris_ver_v0_10, | |
306 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
307 | + | |
308 | + {"addu", 0x0800, 0x07e0, "z S,R,r", 0, SIZE_NONE, | |
309 | + cris_ver_v0_10, | |
310 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
311 | + | |
312 | + {"and", 0x0700, 0x08C0, "m r,R", 0, SIZE_NONE, 0, | |
313 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
314 | + | |
315 | + {"and", 0x0B00, 0x00C0, "m s,R", 0, SIZE_FIELD, 0, | |
316 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
317 | + | |
318 | + {"and", 0x0B00, 0x00C0, "m S,D", 0, SIZE_NONE, | |
319 | + cris_ver_v0_10, | |
320 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
321 | + | |
322 | + {"and", 0x0B00, 0x04C0, "m S,R,r", 0, SIZE_NONE, | |
323 | + cris_ver_v0_10, | |
324 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
325 | + | |
326 | + {"andq", 0x0300, 0x0CC0, "i,R", 0, SIZE_NONE, 0, | |
327 | + cris_quick_mode_and_cmp_move_or_op}, | |
328 | + | |
329 | + {"asr", 0x0780, 0x0840, "m r,R", 0, SIZE_NONE, 0, | |
330 | + cris_asr_op}, | |
331 | + | |
332 | + {"asrq", 0x03a0, 0x0c40, "c,R", 0, SIZE_NONE, 0, | |
333 | + cris_asrq_op}, | |
334 | + | |
335 | + {"ax", 0x15B0, 0xEA4F, "", 0, SIZE_NONE, 0, | |
336 | + cris_ax_ei_setf_op}, | |
337 | + | |
338 | + /* FIXME: Should use branch #defines. */ | |
339 | + {"b", 0x0dff, 0x0200, "b", 1, SIZE_NONE, 0, | |
340 | + cris_sixteen_bit_offset_branch_op}, | |
341 | + | |
342 | + {"ba", | |
343 | + BA_QUICK_OPCODE, | |
344 | + 0x0F00+(0xF-CC_A)*0x1000, "o", 1, SIZE_NONE, 0, | |
345 | + cris_eight_bit_offset_branch_op}, | |
346 | + | |
347 | + /* Needs to come after the usual "ba o", which might be relaxed to | |
348 | + this one. */ | |
349 | + {"ba", BA_DWORD_OPCODE, | |
350 | + 0xffff & (~BA_DWORD_OPCODE), "n", 0, SIZE_FIX_32, | |
351 | + cris_ver_v32p, | |
352 | + cris_none_reg_mode_jump_op}, | |
353 | + | |
354 | + {"bas", 0x0EBF, 0x0140, "n,P", 0, SIZE_FIX_32, | |
355 | + cris_ver_v32p, | |
356 | + cris_none_reg_mode_jump_op}, | |
357 | + | |
358 | + {"basc", 0x0EFF, 0x0100, "n,P", 0, SIZE_FIX_32, | |
359 | + cris_ver_v32p, | |
360 | + cris_none_reg_mode_jump_op}, | |
361 | + | |
362 | + {"bcc", | |
363 | + BRANCH_QUICK_OPCODE+CC_CC*0x1000, | |
364 | + 0x0f00+(0xF-CC_CC)*0x1000, "o", 1, SIZE_NONE, 0, | |
365 | + cris_eight_bit_offset_branch_op}, | |
366 | + | |
367 | + {"bcs", | |
368 | + BRANCH_QUICK_OPCODE+CC_CS*0x1000, | |
369 | + 0x0f00+(0xF-CC_CS)*0x1000, "o", 1, SIZE_NONE, 0, | |
370 | + cris_eight_bit_offset_branch_op}, | |
371 | + | |
372 | + {"bdap", | |
373 | + BDAP_INDIR_OPCODE, BDAP_INDIR_Z_BITS, "pm s,R", 0, SIZE_FIELD_SIGNED, | |
374 | + cris_ver_v0_10, | |
375 | + cris_bdap_prefix}, | |
376 | + | |
377 | + {"bdap", | |
378 | + BDAP_QUICK_OPCODE, BDAP_QUICK_Z_BITS, "pO", 0, SIZE_NONE, | |
379 | + cris_ver_v0_10, | |
380 | + cris_quick_mode_bdap_prefix}, | |
381 | + | |
382 | + {"beq", | |
383 | + BRANCH_QUICK_OPCODE+CC_EQ*0x1000, | |
384 | + 0x0f00+(0xF-CC_EQ)*0x1000, "o", 1, SIZE_NONE, 0, | |
385 | + cris_eight_bit_offset_branch_op}, | |
386 | + | |
387 | + /* This is deliberately put before "bext" to trump it, even though not | |
388 | + in alphabetical order, since we don't do excluding version checks | |
389 | + for v0..v10. */ | |
390 | + {"bwf", | |
391 | + BRANCH_QUICK_OPCODE+CC_EXT*0x1000, | |
392 | + 0x0f00+(0xF-CC_EXT)*0x1000, "o", 1, SIZE_NONE, | |
393 | + cris_ver_v10, | |
394 | + cris_eight_bit_offset_branch_op}, | |
395 | + | |
396 | + {"bext", | |
397 | + BRANCH_QUICK_OPCODE+CC_EXT*0x1000, | |
398 | + 0x0f00+(0xF-CC_EXT)*0x1000, "o", 1, SIZE_NONE, | |
399 | + cris_ver_v0_3, | |
400 | + cris_eight_bit_offset_branch_op}, | |
401 | + | |
402 | + {"bge", | |
403 | + BRANCH_QUICK_OPCODE+CC_GE*0x1000, | |
404 | + 0x0f00+(0xF-CC_GE)*0x1000, "o", 1, SIZE_NONE, 0, | |
405 | + cris_eight_bit_offset_branch_op}, | |
406 | + | |
407 | + {"bgt", | |
408 | + BRANCH_QUICK_OPCODE+CC_GT*0x1000, | |
409 | + 0x0f00+(0xF-CC_GT)*0x1000, "o", 1, SIZE_NONE, 0, | |
410 | + cris_eight_bit_offset_branch_op}, | |
411 | + | |
412 | + {"bhi", | |
413 | + BRANCH_QUICK_OPCODE+CC_HI*0x1000, | |
414 | + 0x0f00+(0xF-CC_HI)*0x1000, "o", 1, SIZE_NONE, 0, | |
415 | + cris_eight_bit_offset_branch_op}, | |
416 | + | |
417 | + {"bhs", | |
418 | + BRANCH_QUICK_OPCODE+CC_HS*0x1000, | |
419 | + 0x0f00+(0xF-CC_HS)*0x1000, "o", 1, SIZE_NONE, 0, | |
420 | + cris_eight_bit_offset_branch_op}, | |
421 | + | |
422 | + {"biap", BIAP_OPCODE, BIAP_Z_BITS, "pm r,R", 0, SIZE_NONE, | |
423 | + cris_ver_v0_10, | |
424 | + cris_biap_prefix}, | |
425 | + | |
426 | + {"ble", | |
427 | + BRANCH_QUICK_OPCODE+CC_LE*0x1000, | |
428 | + 0x0f00+(0xF-CC_LE)*0x1000, "o", 1, SIZE_NONE, 0, | |
429 | + cris_eight_bit_offset_branch_op}, | |
430 | + | |
431 | + {"blo", | |
432 | + BRANCH_QUICK_OPCODE+CC_LO*0x1000, | |
433 | + 0x0f00+(0xF-CC_LO)*0x1000, "o", 1, SIZE_NONE, 0, | |
434 | + cris_eight_bit_offset_branch_op}, | |
435 | + | |
436 | + {"bls", | |
437 | + BRANCH_QUICK_OPCODE+CC_LS*0x1000, | |
438 | + 0x0f00+(0xF-CC_LS)*0x1000, "o", 1, SIZE_NONE, 0, | |
439 | + cris_eight_bit_offset_branch_op}, | |
440 | + | |
441 | + {"blt", | |
442 | + BRANCH_QUICK_OPCODE+CC_LT*0x1000, | |
443 | + 0x0f00+(0xF-CC_LT)*0x1000, "o", 1, SIZE_NONE, 0, | |
444 | + cris_eight_bit_offset_branch_op}, | |
445 | + | |
446 | + {"bmi", | |
447 | + BRANCH_QUICK_OPCODE+CC_MI*0x1000, | |
448 | + 0x0f00+(0xF-CC_MI)*0x1000, "o", 1, SIZE_NONE, 0, | |
449 | + cris_eight_bit_offset_branch_op}, | |
450 | + | |
451 | + {"bmod", 0x0ab0, 0x0140, "s,R", 0, SIZE_FIX_32, | |
452 | + cris_ver_sim_v0_10, | |
453 | + cris_not_implemented_op}, | |
454 | + | |
455 | + {"bmod", 0x0ab0, 0x0140, "S,D", 0, SIZE_NONE, | |
456 | + cris_ver_sim_v0_10, | |
457 | + cris_not_implemented_op}, | |
458 | + | |
459 | + {"bmod", 0x0ab0, 0x0540, "S,R,r", 0, SIZE_NONE, | |
460 | + cris_ver_sim_v0_10, | |
461 | + cris_not_implemented_op}, | |
462 | + | |
463 | + {"bne", | |
464 | + BRANCH_QUICK_OPCODE+CC_NE*0x1000, | |
465 | + 0x0f00+(0xF-CC_NE)*0x1000, "o", 1, SIZE_NONE, 0, | |
466 | + cris_eight_bit_offset_branch_op}, | |
467 | + | |
468 | + {"bound", 0x05c0, 0x0A00, "m r,R", 0, SIZE_NONE, 0, | |
469 | + cris_two_operand_bound_op}, | |
470 | + /* FIXME: SIZE_FIELD_UNSIGNED and all necessary changes. */ | |
471 | + {"bound", 0x09c0, 0x0200, "m s,R", 0, SIZE_FIELD, | |
472 | + cris_ver_v0_10, | |
473 | + cris_two_operand_bound_op}, | |
474 | + /* FIXME: SIZE_FIELD_UNSIGNED and all necessary changes. */ | |
475 | + {"bound", 0x0dcf, 0x0200, "m Y,R", 0, SIZE_FIELD, 0, | |
476 | + cris_two_operand_bound_op}, | |
477 | + {"bound", 0x09c0, 0x0200, "m S,D", 0, SIZE_NONE, | |
478 | + cris_ver_v0_10, | |
479 | + cris_two_operand_bound_op}, | |
480 | + {"bound", 0x09c0, 0x0600, "m S,R,r", 0, SIZE_NONE, | |
481 | + cris_ver_v0_10, | |
482 | + cris_three_operand_bound_op}, | |
483 | + | |
484 | + {"bpl", | |
485 | + BRANCH_QUICK_OPCODE+CC_PL*0x1000, | |
486 | + 0x0f00+(0xF-CC_PL)*0x1000, "o", 1, SIZE_NONE, 0, | |
487 | + cris_eight_bit_offset_branch_op}, | |
488 | + | |
489 | + {"break", 0xe930, 0x16c0, "C", 0, SIZE_NONE, | |
490 | + cris_ver_v3p, | |
491 | + cris_break_op}, | |
492 | + | |
493 | + {"bsb", | |
494 | + BRANCH_QUICK_OPCODE+CC_EXT*0x1000, | |
495 | + 0x0f00+(0xF-CC_EXT)*0x1000, "o", 1, SIZE_NONE, | |
496 | + cris_ver_v32p, | |
497 | + cris_eight_bit_offset_branch_op}, | |
498 | + | |
499 | + {"bsr", 0xBEBF, 0x4140, "n", 0, SIZE_FIX_32, | |
500 | + cris_ver_v32p, | |
501 | + cris_none_reg_mode_jump_op}, | |
502 | + | |
503 | + {"bsrc", 0xBEFF, 0x4100, "n", 0, SIZE_FIX_32, | |
504 | + cris_ver_v32p, | |
505 | + cris_none_reg_mode_jump_op}, | |
506 | + | |
507 | + {"bstore", 0x0af0, 0x0100, "s,R", 0, SIZE_FIX_32, | |
508 | + cris_ver_warning, | |
509 | + cris_not_implemented_op}, | |
510 | + | |
511 | + {"bstore", 0x0af0, 0x0100, "S,D", 0, SIZE_NONE, | |
512 | + cris_ver_warning, | |
513 | + cris_not_implemented_op}, | |
514 | + | |
515 | + {"bstore", 0x0af0, 0x0500, "S,R,r", 0, SIZE_NONE, | |
516 | + cris_ver_warning, | |
517 | + cris_not_implemented_op}, | |
518 | + | |
519 | + {"btst", 0x04F0, 0x0B00, "r,R", 0, SIZE_NONE, 0, | |
520 | + cris_btst_nop_op}, | |
521 | + {"btstq", 0x0380, 0x0C60, "c,R", 0, SIZE_NONE, 0, | |
522 | + cris_btst_nop_op}, | |
523 | + | |
524 | + {"bvc", | |
525 | + BRANCH_QUICK_OPCODE+CC_VC*0x1000, | |
526 | + 0x0f00+(0xF-CC_VC)*0x1000, "o", 1, SIZE_NONE, 0, | |
527 | + cris_eight_bit_offset_branch_op}, | |
528 | + | |
529 | + {"bvs", | |
530 | + BRANCH_QUICK_OPCODE+CC_VS*0x1000, | |
531 | + 0x0f00+(0xF-CC_VS)*0x1000, "o", 1, SIZE_NONE, 0, | |
532 | + cris_eight_bit_offset_branch_op}, | |
533 | + | |
534 | + {"clear", 0x0670, 0x3980, "M r", 0, SIZE_NONE, 0, | |
535 | + cris_reg_mode_clear_op}, | |
536 | + | |
537 | + {"clear", 0x0A70, 0x3180, "M y", 0, SIZE_NONE, 0, | |
538 | + cris_none_reg_mode_clear_test_op}, | |
539 | + | |
540 | + {"clear", 0x0A70, 0x3180, "M S", 0, SIZE_NONE, | |
541 | + cris_ver_v0_10, | |
542 | + cris_none_reg_mode_clear_test_op}, | |
543 | + | |
544 | + {"clearf", 0x05F0, 0x0A00, "f", 0, SIZE_NONE, 0, | |
545 | + cris_clearf_di_op}, | |
546 | + | |
547 | + {"cmp", 0x06C0, 0x0900, "m r,R", 0, SIZE_NONE, 0, | |
548 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
549 | + | |
550 | + {"cmp", 0x0Ac0, 0x0100, "m s,R", 0, SIZE_FIELD, 0, | |
551 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
552 | + | |
553 | + {"cmp", 0x0Ac0, 0x0100, "m S,D", 0, SIZE_NONE, | |
554 | + cris_ver_v0_10, | |
555 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
556 | + | |
557 | + {"cmpq", 0x02C0, 0x0D00, "i,R", 0, SIZE_NONE, 0, | |
558 | + cris_quick_mode_and_cmp_move_or_op}, | |
559 | + | |
560 | + /* FIXME: SIZE_FIELD_SIGNED and all necessary changes. */ | |
561 | + {"cmps", 0x08e0, 0x0300, "z s,R", 0, SIZE_FIELD, 0, | |
562 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
563 | + | |
564 | + {"cmps", 0x08e0, 0x0300, "z S,D", 0, SIZE_NONE, | |
565 | + cris_ver_v0_10, | |
566 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
567 | + | |
568 | + /* FIXME: SIZE_FIELD_UNSIGNED and all necessary changes. */ | |
569 | + {"cmpu", 0x08c0, 0x0320, "z s,R" , 0, SIZE_FIELD, 0, | |
570 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
571 | + | |
572 | + {"cmpu", 0x08c0, 0x0320, "z S,D", 0, SIZE_NONE, | |
573 | + cris_ver_v0_10, | |
574 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
575 | + | |
576 | + {"di", 0x25F0, 0xDA0F, "", 0, SIZE_NONE, 0, | |
577 | + cris_clearf_di_op}, | |
578 | + | |
579 | + {"dip", DIP_OPCODE, DIP_Z_BITS, "ps", 0, SIZE_FIX_32, | |
580 | + cris_ver_v0_10, | |
581 | + cris_dip_prefix}, | |
582 | + | |
583 | + {"div", 0x0980, 0x0640, "m R,r", 0, SIZE_FIELD, 0, | |
584 | + cris_not_implemented_op}, | |
585 | + | |
586 | + {"dstep", 0x06f0, 0x0900, "r,R", 0, SIZE_NONE, 0, | |
587 | + cris_dstep_logshift_mstep_neg_not_op}, | |
588 | + | |
589 | + {"ei", 0x25B0, 0xDA4F, "", 0, SIZE_NONE, 0, | |
590 | + cris_ax_ei_setf_op}, | |
591 | + | |
592 | + {"fidxd", 0x0ab0, 0xf540, "[r]", 0, SIZE_NONE, | |
593 | + cris_ver_v32p, | |
594 | + cris_not_implemented_op}, | |
595 | + | |
596 | + {"fidxi", 0x0d30, 0xF2C0, "[r]", 0, SIZE_NONE, | |
597 | + cris_ver_v32p, | |
598 | + cris_not_implemented_op}, | |
599 | + | |
600 | + {"ftagd", 0x1AB0, 0xE540, "[r]", 0, SIZE_NONE, | |
601 | + cris_ver_v32p, | |
602 | + cris_not_implemented_op}, | |
603 | + | |
604 | + {"ftagi", 0x1D30, 0xE2C0, "[r]", 0, SIZE_NONE, | |
605 | + cris_ver_v32p, | |
606 | + cris_not_implemented_op}, | |
607 | + | |
608 | + {"halt", 0xF930, 0x06CF, "", 0, SIZE_NONE, | |
609 | + cris_ver_v32p, | |
610 | + cris_not_implemented_op}, | |
611 | + | |
612 | + {"jas", 0x09B0, 0x0640, "r,P", 0, SIZE_NONE, | |
613 | + cris_ver_v32p, | |
614 | + cris_reg_mode_jump_op}, | |
615 | + | |
616 | + {"jas", 0x0DBF, 0x0240, "N,P", 0, SIZE_FIX_32, | |
617 | + cris_ver_v32p, | |
618 | + cris_reg_mode_jump_op}, | |
619 | + | |
620 | + {"jasc", 0x0B30, 0x04C0, "r,P", 0, SIZE_NONE, | |
621 | + cris_ver_v32p, | |
622 | + cris_reg_mode_jump_op}, | |
623 | + | |
624 | + {"jasc", 0x0F3F, 0x00C0, "N,P", 0, SIZE_FIX_32, | |
625 | + cris_ver_v32p, | |
626 | + cris_reg_mode_jump_op}, | |
627 | + | |
628 | + {"jbrc", 0x69b0, 0x9640, "r", 0, SIZE_NONE, | |
629 | + cris_ver_v8_10, | |
630 | + cris_reg_mode_jump_op}, | |
631 | + | |
632 | + {"jbrc", 0x6930, 0x92c0, "s", 0, SIZE_FIX_32, | |
633 | + cris_ver_v8_10, | |
634 | + cris_none_reg_mode_jump_op}, | |
635 | + | |
636 | + {"jbrc", 0x6930, 0x92c0, "S", 0, SIZE_NONE, | |
637 | + cris_ver_v8_10, | |
638 | + cris_none_reg_mode_jump_op}, | |
639 | + | |
640 | + {"jir", 0xA9b0, 0x5640, "r", 0, SIZE_NONE, | |
641 | + cris_ver_v8_10, | |
642 | + cris_reg_mode_jump_op}, | |
643 | + | |
644 | + {"jir", 0xA930, 0x52c0, "s", 0, SIZE_FIX_32, | |
645 | + cris_ver_v8_10, | |
646 | + cris_none_reg_mode_jump_op}, | |
647 | + | |
648 | + {"jir", 0xA930, 0x52c0, "S", 0, SIZE_NONE, | |
649 | + cris_ver_v8_10, | |
650 | + cris_none_reg_mode_jump_op}, | |
651 | + | |
652 | + {"jirc", 0x29b0, 0xd640, "r", 0, SIZE_NONE, | |
653 | + cris_ver_v8_10, | |
654 | + cris_reg_mode_jump_op}, | |
655 | + | |
656 | + {"jirc", 0x2930, 0xd2c0, "s", 0, SIZE_FIX_32, | |
657 | + cris_ver_v8_10, | |
658 | + cris_none_reg_mode_jump_op}, | |
659 | + | |
660 | + {"jirc", 0x2930, 0xd2c0, "S", 0, SIZE_NONE, | |
661 | + cris_ver_v8_10, | |
662 | + cris_none_reg_mode_jump_op}, | |
663 | + | |
664 | + {"jsr", 0xB9b0, 0x4640, "r", 0, SIZE_NONE, 0, | |
665 | + cris_reg_mode_jump_op}, | |
666 | + | |
667 | + {"jsr", 0xB930, 0x42c0, "s", 0, SIZE_FIX_32, | |
668 | + cris_ver_v0_10, | |
669 | + cris_none_reg_mode_jump_op}, | |
670 | + | |
671 | + {"jsr", 0xBDBF, 0x4240, "N", 0, SIZE_FIX_32, | |
672 | + cris_ver_v32p, | |
673 | + cris_none_reg_mode_jump_op}, | |
674 | + | |
675 | + {"jsr", 0xB930, 0x42c0, "S", 0, SIZE_NONE, | |
676 | + cris_ver_v0_10, | |
677 | + cris_none_reg_mode_jump_op}, | |
678 | + | |
679 | + {"jsrc", 0x39b0, 0xc640, "r", 0, SIZE_NONE, | |
680 | + cris_ver_v8_10, | |
681 | + cris_reg_mode_jump_op}, | |
682 | + | |
683 | + {"jsrc", 0x3930, 0xc2c0, "s", 0, SIZE_FIX_32, | |
684 | + cris_ver_v8_10, | |
685 | + cris_none_reg_mode_jump_op}, | |
686 | + | |
687 | + {"jsrc", 0x3930, 0xc2c0, "S", 0, SIZE_NONE, | |
688 | + cris_ver_v8_10, | |
689 | + cris_none_reg_mode_jump_op}, | |
690 | + | |
691 | + {"jsrc", 0xBB30, 0x44C0, "r", 0, SIZE_NONE, | |
692 | + cris_ver_v32p, | |
693 | + cris_reg_mode_jump_op}, | |
694 | + | |
695 | + {"jsrc", 0xBF3F, 0x40C0, "N", 0, SIZE_FIX_32, | |
696 | + cris_ver_v32p, | |
697 | + cris_reg_mode_jump_op}, | |
698 | + | |
699 | + {"jump", 0x09b0, 0xF640, "r", 0, SIZE_NONE, 0, | |
700 | + cris_reg_mode_jump_op}, | |
701 | + | |
702 | + {"jump", | |
703 | + JUMP_INDIR_OPCODE, JUMP_INDIR_Z_BITS, "s", 0, SIZE_FIX_32, | |
704 | + cris_ver_v0_10, | |
705 | + cris_none_reg_mode_jump_op}, | |
706 | + | |
707 | + {"jump", | |
708 | + JUMP_INDIR_OPCODE, JUMP_INDIR_Z_BITS, "S", 0, SIZE_NONE, | |
709 | + cris_ver_v0_10, | |
710 | + cris_none_reg_mode_jump_op}, | |
711 | + | |
712 | + {"jump", 0x09F0, 0x060F, "P", 0, SIZE_NONE, | |
713 | + cris_ver_v32p, | |
714 | + cris_none_reg_mode_jump_op}, | |
715 | + | |
716 | + {"jump", | |
717 | + JUMP_PC_INCR_OPCODE_V32, | |
718 | + (0xffff & ~JUMP_PC_INCR_OPCODE_V32), "N", 0, SIZE_FIX_32, | |
719 | + cris_ver_v32p, | |
720 | + cris_none_reg_mode_jump_op}, | |
721 | + | |
722 | + {"jmpu", 0x8930, 0x72c0, "s", 0, SIZE_FIX_32, | |
723 | + cris_ver_v10, | |
724 | + cris_none_reg_mode_jump_op}, | |
725 | + | |
726 | + {"jmpu", 0x8930, 0x72c0, "S", 0, SIZE_NONE, | |
727 | + cris_ver_v10, | |
728 | + cris_none_reg_mode_jump_op}, | |
729 | + | |
730 | + {"lapc", 0x0970, 0x0680, "U,R", 0, SIZE_NONE, | |
731 | + cris_ver_v32p, | |
732 | + cris_not_implemented_op}, | |
733 | + | |
734 | + {"lapc", 0x0D7F, 0x0280, "dn,R", 0, SIZE_FIX_32, | |
735 | + cris_ver_v32p, | |
736 | + cris_not_implemented_op}, | |
737 | + | |
738 | + {"lapcq", 0x0970, 0x0680, "u,R", 0, SIZE_NONE, | |
739 | + cris_ver_v32p, | |
740 | + cris_addi_op}, | |
741 | + | |
742 | + {"lsl", 0x04C0, 0x0B00, "m r,R", 0, SIZE_NONE, 0, | |
743 | + cris_dstep_logshift_mstep_neg_not_op}, | |
744 | + | |
745 | + {"lslq", 0x03c0, 0x0C20, "c,R", 0, SIZE_NONE, 0, | |
746 | + cris_dstep_logshift_mstep_neg_not_op}, | |
747 | + | |
748 | + {"lsr", 0x07C0, 0x0800, "m r,R", 0, SIZE_NONE, 0, | |
749 | + cris_dstep_logshift_mstep_neg_not_op}, | |
750 | + | |
751 | + {"lsrq", 0x03e0, 0x0C00, "c,R", 0, SIZE_NONE, 0, | |
752 | + cris_dstep_logshift_mstep_neg_not_op}, | |
753 | + | |
754 | + {"lz", 0x0730, 0x08C0, "r,R", 0, SIZE_NONE, | |
755 | + cris_ver_v3p, | |
756 | + cris_not_implemented_op}, | |
757 | + | |
758 | + {"mcp", 0x07f0, 0x0800, "P,r", 0, SIZE_NONE, | |
759 | + cris_ver_v32p, | |
760 | + cris_not_implemented_op}, | |
761 | + | |
762 | + {"move", 0x0640, 0x0980, "m r,R", 0, SIZE_NONE, 0, | |
763 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
764 | + | |
765 | + {"move", 0x0A40, 0x0180, "m s,R", 0, SIZE_FIELD, 0, | |
766 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
767 | + | |
768 | + {"move", 0x0A40, 0x0180, "m S,D", 0, SIZE_NONE, | |
769 | + cris_ver_v0_10, | |
770 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
771 | + | |
772 | + {"move", 0x0630, 0x09c0, "r,P", 0, SIZE_NONE, 0, | |
773 | + cris_move_to_preg_op}, | |
774 | + | |
775 | + {"move", 0x0670, 0x0980, "P,r", 0, SIZE_NONE, 0, | |
776 | + cris_reg_mode_move_from_preg_op}, | |
777 | + | |
778 | + {"move", 0x0BC0, 0x0000, "m R,y", 0, SIZE_FIELD, 0, | |
779 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
780 | + | |
781 | + {"move", 0x0BC0, 0x0000, "m D,S", 0, SIZE_NONE, | |
782 | + cris_ver_v0_10, | |
783 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
784 | + | |
785 | + {"move", | |
786 | + MOVE_M_TO_PREG_OPCODE, MOVE_M_TO_PREG_ZBITS, | |
787 | + "s,P", 0, SIZE_SPEC_REG, 0, | |
788 | + cris_move_to_preg_op}, | |
789 | + | |
790 | + {"move", 0x0A30, 0x01c0, "S,P", 0, SIZE_NONE, | |
791 | + cris_ver_v0_10, | |
792 | + cris_move_to_preg_op}, | |
793 | + | |
794 | + {"move", 0x0A70, 0x0180, "P,y", 0, SIZE_SPEC_REG, 0, | |
795 | + cris_none_reg_mode_move_from_preg_op}, | |
796 | + | |
797 | + {"move", 0x0A70, 0x0180, "P,S", 0, SIZE_NONE, | |
798 | + cris_ver_v0_10, | |
799 | + cris_none_reg_mode_move_from_preg_op}, | |
800 | + | |
801 | + {"move", 0x0B70, 0x0480, "r,T", 0, SIZE_NONE, | |
802 | + cris_ver_v32p, | |
803 | + cris_not_implemented_op}, | |
804 | + | |
805 | + {"move", 0x0F70, 0x0080, "T,r", 0, SIZE_NONE, | |
806 | + cris_ver_v32p, | |
807 | + cris_not_implemented_op}, | |
808 | + | |
809 | + {"movem", 0x0BF0, 0x0000, "R,y", 0, SIZE_FIX_32, 0, | |
810 | + cris_move_reg_to_mem_movem_op}, | |
811 | + | |
812 | + {"movem", 0x0BF0, 0x0000, "D,S", 0, SIZE_NONE, | |
813 | + cris_ver_v0_10, | |
814 | + cris_move_reg_to_mem_movem_op}, | |
815 | + | |
816 | + {"movem", 0x0BB0, 0x0040, "s,R", 0, SIZE_FIX_32, 0, | |
817 | + cris_move_mem_to_reg_movem_op}, | |
818 | + | |
819 | + {"movem", 0x0BB0, 0x0040, "S,D", 0, SIZE_NONE, | |
820 | + cris_ver_v0_10, | |
821 | + cris_move_mem_to_reg_movem_op}, | |
822 | + | |
823 | + {"moveq", 0x0240, 0x0D80, "i,R", 0, SIZE_NONE, 0, | |
824 | + cris_quick_mode_and_cmp_move_or_op}, | |
825 | + | |
826 | + {"movs", 0x0460, 0x0B80, "z r,R", 0, SIZE_NONE, 0, | |
827 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
828 | + | |
829 | + /* FIXME: SIZE_FIELD_SIGNED and all necessary changes. */ | |
830 | + {"movs", 0x0860, 0x0380, "z s,R", 0, SIZE_FIELD, 0, | |
831 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
832 | + | |
833 | + {"movs", 0x0860, 0x0380, "z S,D", 0, SIZE_NONE, | |
834 | + cris_ver_v0_10, | |
835 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
836 | + | |
837 | + {"movu", 0x0440, 0x0Ba0, "z r,R", 0, SIZE_NONE, 0, | |
838 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
839 | + | |
840 | + /* FIXME: SIZE_FIELD_UNSIGNED and all necessary changes. */ | |
841 | + {"movu", 0x0840, 0x03a0, "z s,R", 0, SIZE_FIELD, 0, | |
842 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
843 | + | |
844 | + {"movu", 0x0840, 0x03a0, "z S,D", 0, SIZE_NONE, | |
845 | + cris_ver_v0_10, | |
846 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
847 | + | |
848 | + {"mstep", 0x07f0, 0x0800, "r,R", 0, SIZE_NONE, | |
849 | + cris_ver_v0_10, | |
850 | + cris_dstep_logshift_mstep_neg_not_op}, | |
851 | + | |
852 | + {"muls", 0x0d00, 0x02c0, "m r,R", 0, SIZE_NONE, | |
853 | + cris_ver_v10p, | |
854 | + cris_muls_op}, | |
855 | + | |
856 | + {"mulu", 0x0900, 0x06c0, "m r,R", 0, SIZE_NONE, | |
857 | + cris_ver_v10p, | |
858 | + cris_mulu_op}, | |
859 | + | |
860 | + {"neg", 0x0580, 0x0A40, "m r,R", 0, SIZE_NONE, 0, | |
861 | + cris_dstep_logshift_mstep_neg_not_op}, | |
862 | + | |
863 | + {"nop", NOP_OPCODE, NOP_Z_BITS, "", 0, SIZE_NONE, | |
864 | + cris_ver_v0_10, | |
865 | + cris_btst_nop_op}, | |
866 | + | |
867 | + {"nop", NOP_OPCODE_V32, NOP_Z_BITS_V32, "", 0, SIZE_NONE, | |
868 | + cris_ver_v32p, | |
869 | + cris_btst_nop_op}, | |
870 | + | |
871 | + {"not", 0x8770, 0x7880, "r", 0, SIZE_NONE, 0, | |
872 | + cris_dstep_logshift_mstep_neg_not_op}, | |
873 | + | |
874 | + {"or", 0x0740, 0x0880, "m r,R", 0, SIZE_NONE, 0, | |
875 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
876 | + | |
877 | + {"or", 0x0B40, 0x0080, "m s,R", 0, SIZE_FIELD, 0, | |
878 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
879 | + | |
880 | + {"or", 0x0B40, 0x0080, "m S,D", 0, SIZE_NONE, | |
881 | + cris_ver_v0_10, | |
882 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
883 | + | |
884 | + {"or", 0x0B40, 0x0480, "m S,R,r", 0, SIZE_NONE, | |
885 | + cris_ver_v0_10, | |
886 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
887 | + | |
888 | + {"orq", 0x0340, 0x0C80, "i,R", 0, SIZE_NONE, 0, | |
889 | + cris_quick_mode_and_cmp_move_or_op}, | |
890 | + | |
891 | + {"pop", 0x0E6E, 0x0191, "!R", 0, SIZE_NONE, | |
892 | + cris_ver_v0_10, | |
893 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
894 | + | |
895 | + {"pop", 0x0e3e, 0x01c1, "!P", 0, SIZE_NONE, | |
896 | + cris_ver_v0_10, | |
897 | + cris_none_reg_mode_move_from_preg_op}, | |
898 | + | |
899 | + {"push", 0x0FEE, 0x0011, "BR", 0, SIZE_NONE, | |
900 | + cris_ver_v0_10, | |
901 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
902 | + | |
903 | + {"push", 0x0E7E, 0x0181, "BP", 0, SIZE_NONE, | |
904 | + cris_ver_v0_10, | |
905 | + cris_move_to_preg_op}, | |
906 | + | |
907 | + {"rbf", 0x3b30, 0xc0c0, "y", 0, SIZE_NONE, | |
908 | + cris_ver_v10, | |
909 | + cris_not_implemented_op}, | |
910 | + | |
911 | + {"rbf", 0x3b30, 0xc0c0, "S", 0, SIZE_NONE, | |
912 | + cris_ver_v10, | |
913 | + cris_not_implemented_op}, | |
914 | + | |
915 | + {"rfe", 0x2930, 0xD6CF, "", 0, SIZE_NONE, | |
916 | + cris_ver_v32p, | |
917 | + cris_not_implemented_op}, | |
918 | + | |
919 | + {"rfg", 0x4930, 0xB6CF, "", 0, SIZE_NONE, | |
920 | + cris_ver_v32p, | |
921 | + cris_not_implemented_op}, | |
922 | + | |
923 | + {"rfn", 0x5930, 0xA6CF, "", 0, SIZE_NONE, | |
924 | + cris_ver_v32p, | |
925 | + cris_not_implemented_op}, | |
926 | + | |
927 | + {"ret", 0xB67F, 0x4980, "", 1, SIZE_NONE, | |
928 | + cris_ver_v0_10, | |
929 | + cris_reg_mode_move_from_preg_op}, | |
930 | + | |
931 | + {"ret", 0xB9F0, 0x460F, "", 1, SIZE_NONE, | |
932 | + cris_ver_v32p, | |
933 | + cris_reg_mode_move_from_preg_op}, | |
934 | + | |
935 | + {"retb", 0xe67f, 0x1980, "", 1, SIZE_NONE, | |
936 | + cris_ver_v0_10, | |
937 | + cris_reg_mode_move_from_preg_op}, | |
938 | + | |
939 | + {"rete", 0xA9F0, 0x560F, "", 1, SIZE_NONE, | |
940 | + cris_ver_v32p, | |
941 | + cris_reg_mode_move_from_preg_op}, | |
942 | + | |
943 | + {"reti", 0xA67F, 0x5980, "", 1, SIZE_NONE, | |
944 | + cris_ver_v0_10, | |
945 | + cris_reg_mode_move_from_preg_op}, | |
946 | + | |
947 | + {"retn", 0xC9F0, 0x360F, "", 1, SIZE_NONE, | |
948 | + cris_ver_v32p, | |
949 | + cris_reg_mode_move_from_preg_op}, | |
950 | + | |
951 | + {"sbfs", 0x3b70, 0xc080, "y", 0, SIZE_NONE, | |
952 | + cris_ver_v10, | |
953 | + cris_not_implemented_op}, | |
954 | + | |
955 | + {"sbfs", 0x3b70, 0xc080, "S", 0, SIZE_NONE, | |
956 | + cris_ver_v10, | |
957 | + cris_not_implemented_op}, | |
958 | + | |
959 | + {"sa", | |
960 | + 0x0530+CC_A*0x1000, | |
961 | + 0x0AC0+(0xf-CC_A)*0x1000, "r", 0, SIZE_NONE, 0, | |
962 | + cris_scc_op}, | |
963 | + | |
964 | + {"ssb", | |
965 | + 0x0530+CC_EXT*0x1000, | |
966 | + 0x0AC0+(0xf-CC_EXT)*0x1000, "r", 0, SIZE_NONE, | |
967 | + cris_ver_v32p, | |
968 | + cris_scc_op}, | |
969 | + | |
970 | + {"scc", | |
971 | + 0x0530+CC_CC*0x1000, | |
972 | + 0x0AC0+(0xf-CC_CC)*0x1000, "r", 0, SIZE_NONE, 0, | |
973 | + cris_scc_op}, | |
974 | + | |
975 | + {"scs", | |
976 | + 0x0530+CC_CS*0x1000, | |
977 | + 0x0AC0+(0xf-CC_CS)*0x1000, "r", 0, SIZE_NONE, 0, | |
978 | + cris_scc_op}, | |
979 | + | |
980 | + {"seq", | |
981 | + 0x0530+CC_EQ*0x1000, | |
982 | + 0x0AC0+(0xf-CC_EQ)*0x1000, "r", 0, SIZE_NONE, 0, | |
983 | + cris_scc_op}, | |
984 | + | |
985 | + {"setf", 0x05b0, 0x0A40, "f", 0, SIZE_NONE, 0, | |
986 | + cris_ax_ei_setf_op}, | |
987 | + | |
988 | + {"sfe", 0x3930, 0xC6CF, "", 0, SIZE_NONE, | |
989 | + cris_ver_v32p, | |
990 | + cris_not_implemented_op}, | |
991 | + | |
992 | + /* Need to have "swf" in front of "sext" so it is the one displayed in | |
993 | + disassembly. */ | |
994 | + {"swf", | |
995 | + 0x0530+CC_EXT*0x1000, | |
996 | + 0x0AC0+(0xf-CC_EXT)*0x1000, "r", 0, SIZE_NONE, | |
997 | + cris_ver_v10, | |
998 | + cris_scc_op}, | |
999 | + | |
1000 | + {"sext", | |
1001 | + 0x0530+CC_EXT*0x1000, | |
1002 | + 0x0AC0+(0xf-CC_EXT)*0x1000, "r", 0, SIZE_NONE, | |
1003 | + cris_ver_v0_3, | |
1004 | + cris_scc_op}, | |
1005 | + | |
1006 | + {"sge", | |
1007 | + 0x0530+CC_GE*0x1000, | |
1008 | + 0x0AC0+(0xf-CC_GE)*0x1000, "r", 0, SIZE_NONE, 0, | |
1009 | + cris_scc_op}, | |
1010 | + | |
1011 | + {"sgt", | |
1012 | + 0x0530+CC_GT*0x1000, | |
1013 | + 0x0AC0+(0xf-CC_GT)*0x1000, "r", 0, SIZE_NONE, 0, | |
1014 | + cris_scc_op}, | |
1015 | + | |
1016 | + {"shi", | |
1017 | + 0x0530+CC_HI*0x1000, | |
1018 | + 0x0AC0+(0xf-CC_HI)*0x1000, "r", 0, SIZE_NONE, 0, | |
1019 | + cris_scc_op}, | |
1020 | + | |
1021 | + {"shs", | |
1022 | + 0x0530+CC_HS*0x1000, | |
1023 | + 0x0AC0+(0xf-CC_HS)*0x1000, "r", 0, SIZE_NONE, 0, | |
1024 | + cris_scc_op}, | |
1025 | + | |
1026 | + {"sle", | |
1027 | + 0x0530+CC_LE*0x1000, | |
1028 | + 0x0AC0+(0xf-CC_LE)*0x1000, "r", 0, SIZE_NONE, 0, | |
1029 | + cris_scc_op}, | |
1030 | + | |
1031 | + {"slo", | |
1032 | + 0x0530+CC_LO*0x1000, | |
1033 | + 0x0AC0+(0xf-CC_LO)*0x1000, "r", 0, SIZE_NONE, 0, | |
1034 | + cris_scc_op}, | |
1035 | + | |
1036 | + {"sls", | |
1037 | + 0x0530+CC_LS*0x1000, | |
1038 | + 0x0AC0+(0xf-CC_LS)*0x1000, "r", 0, SIZE_NONE, 0, | |
1039 | + cris_scc_op}, | |
1040 | + | |
1041 | + {"slt", | |
1042 | + 0x0530+CC_LT*0x1000, | |
1043 | + 0x0AC0+(0xf-CC_LT)*0x1000, "r", 0, SIZE_NONE, 0, | |
1044 | + cris_scc_op}, | |
1045 | + | |
1046 | + {"smi", | |
1047 | + 0x0530+CC_MI*0x1000, | |
1048 | + 0x0AC0+(0xf-CC_MI)*0x1000, "r", 0, SIZE_NONE, 0, | |
1049 | + cris_scc_op}, | |
1050 | + | |
1051 | + {"sne", | |
1052 | + 0x0530+CC_NE*0x1000, | |
1053 | + 0x0AC0+(0xf-CC_NE)*0x1000, "r", 0, SIZE_NONE, 0, | |
1054 | + cris_scc_op}, | |
1055 | + | |
1056 | + {"spl", | |
1057 | + 0x0530+CC_PL*0x1000, | |
1058 | + 0x0AC0+(0xf-CC_PL)*0x1000, "r", 0, SIZE_NONE, 0, | |
1059 | + cris_scc_op}, | |
1060 | + | |
1061 | + {"sub", 0x0680, 0x0940, "m r,R", 0, SIZE_NONE, 0, | |
1062 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
1063 | + | |
1064 | + {"sub", 0x0a80, 0x0140, "m s,R", 0, SIZE_FIELD, 0, | |
1065 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
1066 | + | |
1067 | + {"sub", 0x0a80, 0x0140, "m S,D", 0, SIZE_NONE, | |
1068 | + cris_ver_v0_10, | |
1069 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
1070 | + | |
1071 | + {"sub", 0x0a80, 0x0540, "m S,R,r", 0, SIZE_NONE, | |
1072 | + cris_ver_v0_10, | |
1073 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
1074 | + | |
1075 | + {"subq", 0x0280, 0x0d40, "I,R", 0, SIZE_NONE, 0, | |
1076 | + cris_quick_mode_add_sub_op}, | |
1077 | + | |
1078 | + {"subs", 0x04a0, 0x0b40, "z r,R", 0, SIZE_NONE, 0, | |
1079 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
1080 | + | |
1081 | + /* FIXME: SIZE_FIELD_SIGNED and all necessary changes. */ | |
1082 | + {"subs", 0x08a0, 0x0340, "z s,R", 0, SIZE_FIELD, 0, | |
1083 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
1084 | + | |
1085 | + {"subs", 0x08a0, 0x0340, "z S,D", 0, SIZE_NONE, | |
1086 | + cris_ver_v0_10, | |
1087 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
1088 | + | |
1089 | + {"subs", 0x08a0, 0x0740, "z S,R,r", 0, SIZE_NONE, | |
1090 | + cris_ver_v0_10, | |
1091 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
1092 | + | |
1093 | + {"subu", 0x0480, 0x0b60, "z r,R", 0, SIZE_NONE, 0, | |
1094 | + cris_reg_mode_add_sub_cmp_and_or_move_op}, | |
1095 | + | |
1096 | + /* FIXME: SIZE_FIELD_UNSIGNED and all necessary changes. */ | |
1097 | + {"subu", 0x0880, 0x0360, "z s,R", 0, SIZE_FIELD, 0, | |
1098 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
1099 | + | |
1100 | + {"subu", 0x0880, 0x0360, "z S,D", 0, SIZE_NONE, | |
1101 | + cris_ver_v0_10, | |
1102 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op}, | |
1103 | + | |
1104 | + {"subu", 0x0880, 0x0760, "z S,R,r", 0, SIZE_NONE, | |
1105 | + cris_ver_v0_10, | |
1106 | + cris_three_operand_add_sub_cmp_and_or_op}, | |
1107 | + | |
1108 | + {"svc", | |
1109 | + 0x0530+CC_VC*0x1000, | |
1110 | + 0x0AC0+(0xf-CC_VC)*0x1000, "r", 0, SIZE_NONE, 0, | |
1111 | + cris_scc_op}, | |
1112 | + | |
1113 | + {"svs", | |
1114 | + 0x0530+CC_VS*0x1000, | |
1115 | + 0x0AC0+(0xf-CC_VS)*0x1000, "r", 0, SIZE_NONE, 0, | |
1116 | + cris_scc_op}, | |
1117 | + | |
1118 | + /* The insn "swapn" is the same as "not" and will be disassembled as | |
1119 | + such, but the swap* family of mnmonics are generally v8-and-higher | |
1120 | + only, so count it in. */ | |
1121 | + {"swapn", 0x8770, 0x7880, "r", 0, SIZE_NONE, | |
1122 | + cris_ver_v8p, | |
1123 | + cris_not_implemented_op}, | |
1124 | + | |
1125 | + {"swapw", 0x4770, 0xb880, "r", 0, SIZE_NONE, | |
1126 | + cris_ver_v8p, | |
1127 | + cris_not_implemented_op}, | |
1128 | + | |
1129 | + {"swapnw", 0xc770, 0x3880, "r", 0, SIZE_NONE, | |
1130 | + cris_ver_v8p, | |
1131 | + cris_not_implemented_op}, | |
1132 | + | |
1133 | + {"swapb", 0x2770, 0xd880, "r", 0, SIZE_NONE, | |
1134 | + cris_ver_v8p, | |
1135 | + cris_not_implemented_op}, | |
1136 | + | |
1137 | + {"swapnb", 0xA770, 0x5880, "r", 0, SIZE_NONE, | |
1138 | + cris_ver_v8p, | |
1139 | + cris_not_implemented_op}, | |
1140 | + | |
1141 | + {"swapwb", 0x6770, 0x9880, "r", 0, SIZE_NONE, | |
1142 | + cris_ver_v8p, | |
1143 | + cris_not_implemented_op}, | |
1144 | + | |
1145 | + {"swapnwb", 0xE770, 0x1880, "r", 0, SIZE_NONE, | |
1146 | + cris_ver_v8p, | |
1147 | + cris_not_implemented_op}, | |
1148 | + | |
1149 | + {"swapr", 0x1770, 0xe880, "r", 0, SIZE_NONE, | |
1150 | + cris_ver_v8p, | |
1151 | + cris_not_implemented_op}, | |
1152 | + | |
1153 | + {"swapnr", 0x9770, 0x6880, "r", 0, SIZE_NONE, | |
1154 | + cris_ver_v8p, | |
1155 | + cris_not_implemented_op}, | |
1156 | + | |
1157 | + {"swapwr", 0x5770, 0xa880, "r", 0, SIZE_NONE, | |
1158 | + cris_ver_v8p, | |
1159 | + cris_not_implemented_op}, | |
1160 | + | |
1161 | + {"swapnwr", 0xd770, 0x2880, "r", 0, SIZE_NONE, | |
1162 | + cris_ver_v8p, | |
1163 | + cris_not_implemented_op}, | |
1164 | + | |
1165 | + {"swapbr", 0x3770, 0xc880, "r", 0, SIZE_NONE, | |
1166 | + cris_ver_v8p, | |
1167 | + cris_not_implemented_op}, | |
1168 | + | |
1169 | + {"swapnbr", 0xb770, 0x4880, "r", 0, SIZE_NONE, | |
1170 | + cris_ver_v8p, | |
1171 | + cris_not_implemented_op}, | |
1172 | + | |
1173 | + {"swapwbr", 0x7770, 0x8880, "r", 0, SIZE_NONE, | |
1174 | + cris_ver_v8p, | |
1175 | + cris_not_implemented_op}, | |
1176 | + | |
1177 | + {"swapnwbr", 0xf770, 0x0880, "r", 0, SIZE_NONE, | |
1178 | + cris_ver_v8p, | |
1179 | + cris_not_implemented_op}, | |
1180 | + | |
1181 | + {"test", 0x0640, 0x0980, "m D", 0, SIZE_NONE, | |
1182 | + cris_ver_v0_10, | |
1183 | + cris_reg_mode_test_op}, | |
1184 | + | |
1185 | + {"test", 0x0b80, 0xf040, "m y", 0, SIZE_FIELD, 0, | |
1186 | + cris_none_reg_mode_clear_test_op}, | |
1187 | + | |
1188 | + {"test", 0x0b80, 0xf040, "m S", 0, SIZE_NONE, | |
1189 | + cris_ver_v0_10, | |
1190 | + cris_none_reg_mode_clear_test_op}, | |
1191 | + | |
1192 | + {"xor", 0x07B0, 0x0840, "r,R", 0, SIZE_NONE, 0, | |
1193 | + cris_xor_op}, | |
1194 | + | |
1195 | + {NULL, 0, 0, NULL, 0, 0, 0, cris_not_implemented_op} | |
1196 | +}; | |
1197 | + | |
1198 | +/* Condition-names, indexed by the CC_* numbers as found in cris.h. */ | |
1199 | +const char * const | |
1200 | +cris_cc_strings[] = | |
1201 | +{ | |
1202 | + "hs", | |
1203 | + "lo", | |
1204 | + "ne", | |
1205 | + "eq", | |
1206 | + "vc", | |
1207 | + "vs", | |
1208 | + "pl", | |
1209 | + "mi", | |
1210 | + "ls", | |
1211 | + "hi", | |
1212 | + "ge", | |
1213 | + "lt", | |
1214 | + "gt", | |
1215 | + "le", | |
1216 | + "a", | |
1217 | + /* This is a placeholder. In v0, this would be "ext". In v32, this | |
1218 | + is "sb". See cris_conds15. */ | |
1219 | + "wf" | |
1220 | +}; | |
1221 | + | |
1222 | +/* Different names and semantics for condition 1111 (0xf). */ | |
1223 | +const struct cris_cond15 cris_cond15s[] = | |
1224 | +{ | |
1225 | + /* FIXME: In what version did condition "ext" disappear? */ | |
1226 | + {"ext", cris_ver_v0_3}, | |
1227 | + {"wf", cris_ver_v10}, | |
1228 | + {"sb", cris_ver_v32p}, | |
1229 | + {NULL, 0} | |
1230 | +}; | |
1231 | + | |
1232 | + | |
1233 | +/* | |
1234 | + * Local variables: | |
1235 | + * eval: (c-set-style "gnu") | |
1236 | + * indent-tabs-mode: t | |
1237 | + * End: | |
1238 | + */ | |
1239 | + | |
1240 | + | |
1241 | +/* No instruction will be disassembled longer than this. In theory, and | |
1242 | + in silicon, address prefixes can be cascaded. In practice, cascading | |
1243 | + is not used by GCC, and not supported by the assembler. */ | |
1244 | +#ifndef MAX_BYTES_PER_CRIS_INSN | |
1245 | +#define MAX_BYTES_PER_CRIS_INSN 8 | |
1246 | +#endif | |
1247 | + | |
1248 | +/* Whether or not to decode prefixes, folding it into the following | |
1249 | + instruction. FIXME: Make this optional later. */ | |
1250 | +#ifndef PARSE_PREFIX | |
1251 | +#define PARSE_PREFIX 1 | |
1252 | +#endif | |
1253 | + | |
1254 | +/* Sometimes we prefix all registers with this character. */ | |
1255 | +#define REGISTER_PREFIX_CHAR '$' | |
1256 | + | |
1257 | +/* Whether or not to trace the following sequence: | |
1258 | + sub* X,r%d | |
1259 | + bound* Y,r%d | |
1260 | + adds.w [pc+r%d.w],pc | |
1261 | + | |
1262 | + This is the assembly form of a switch-statement in C. | |
1263 | + The "sub is optional. If there is none, then X will be zero. | |
1264 | + X is the value of the first case, | |
1265 | + Y is the number of cases (including default). | |
1266 | + | |
1267 | + This results in case offsets printed on the form: | |
1268 | + case N: -> case_address | |
1269 | + where N is an estimation on the corresponding 'case' operand in C, | |
1270 | + and case_address is where execution of that case continues after the | |
1271 | + sequence presented above. | |
1272 | + | |
1273 | + The old style of output was to print the offsets as instructions, | |
1274 | + which made it hard to follow "case"-constructs in the disassembly, | |
1275 | + and caused a lot of annoying warnings about undefined instructions. | |
1276 | + | |
1277 | + FIXME: Make this optional later. */ | |
1278 | +#ifndef TRACE_CASE | |
1279 | +#define TRACE_CASE (disdata->trace_case) | |
1280 | +#endif | |
1281 | + | |
1282 | +enum cris_disass_family | |
1283 | + { cris_dis_v0_v10, cris_dis_common_v10_v32, cris_dis_v32 }; | |
1284 | + | |
1285 | +/* Stored in the disasm_info->private_data member. */ | |
1286 | +struct cris_disasm_data | |
1287 | +{ | |
1288 | + /* Whether to print something less confusing if we find something | |
1289 | + matching a switch-construct. */ | |
1290 | + bfd_boolean trace_case; | |
1291 | + | |
1292 | + /* Whether this code is flagged as crisv32. FIXME: Should be an enum | |
1293 | + that includes "compatible". */ | |
1294 | + enum cris_disass_family distype; | |
1295 | +}; | |
1296 | + | |
1297 | +/* Value of first element in switch. */ | |
1298 | +static long case_offset = 0; | |
1299 | + | |
1300 | +/* How many more case-offsets to print. */ | |
1301 | +static long case_offset_counter = 0; | |
1302 | + | |
1303 | +/* Number of case offsets. */ | |
1304 | +static long no_of_case_offsets = 0; | |
1305 | + | |
1306 | +/* Candidate for next case_offset. */ | |
1307 | +static long last_immediate = 0; | |
1308 | + | |
1309 | +static int cris_constraint | |
1310 | + (const char *, unsigned, unsigned, struct cris_disasm_data *); | |
1311 | + | |
1312 | +/* Parse disassembler options and store state in info. FIXME: For the | |
1313 | + time being, we abuse static variables. */ | |
1314 | + | |
1315 | +static bfd_boolean | |
1316 | +cris_parse_disassembler_options (disassemble_info *info, | |
1317 | + enum cris_disass_family distype) | |
1318 | +{ | |
1319 | + struct cris_disasm_data *disdata; | |
1320 | + | |
1321 | + info->private_data = calloc (1, sizeof (struct cris_disasm_data)); | |
1322 | + disdata = (struct cris_disasm_data *) info->private_data; | |
1323 | + if (disdata == NULL) | |
1324 | + return FALSE; | |
1325 | + | |
1326 | + /* Default true. */ | |
1327 | + disdata->trace_case | |
1328 | + = (info->disassembler_options == NULL | |
1329 | + || (strcmp (info->disassembler_options, "nocase") != 0)); | |
1330 | + | |
1331 | + disdata->distype = distype; | |
1332 | + return TRUE; | |
1333 | +} | |
1334 | + | |
1335 | +static const struct cris_spec_reg * | |
1336 | +spec_reg_info (unsigned int sreg, enum cris_disass_family distype) | |
1337 | +{ | |
1338 | + int i; | |
1339 | + | |
1340 | + for (i = 0; cris_spec_regs[i].name != NULL; i++) | |
1341 | + { | |
1342 | + if (cris_spec_regs[i].number == sreg) | |
1343 | + { | |
1344 | + if (distype == cris_dis_v32) | |
1345 | + switch (cris_spec_regs[i].applicable_version) | |
1346 | + { | |
1347 | + case cris_ver_warning: | |
1348 | + case cris_ver_version_all: | |
1349 | + case cris_ver_v3p: | |
1350 | + case cris_ver_v8p: | |
1351 | + case cris_ver_v10p: | |
1352 | + case cris_ver_v32p: | |
1353 | + /* No ambiguous sizes or register names with CRISv32. */ | |
1354 | + if (cris_spec_regs[i].warning == NULL) | |
1355 | + return &cris_spec_regs[i]; | |
1356 | + default: | |
1357 | + ; | |
1358 | + } | |
1359 | + else if (cris_spec_regs[i].applicable_version != cris_ver_v32p) | |
1360 | + return &cris_spec_regs[i]; | |
1361 | + } | |
1362 | + } | |
1363 | + | |
1364 | + return NULL; | |
1365 | +} | |
1366 | + | |
1367 | +/* Return the number of bits in the argument. */ | |
1368 | + | |
1369 | +static int | |
1370 | +number_of_bits (unsigned int val) | |
1371 | +{ | |
1372 | + int bits; | |
1373 | + | |
1374 | + for (bits = 0; val != 0; val &= val - 1) | |
1375 | + bits++; | |
1376 | + | |
1377 | + return bits; | |
1378 | +} | |
1379 | + | |
1380 | +/* Get an entry in the opcode-table. */ | |
1381 | + | |
1382 | +static const struct cris_opcode * | |
1383 | +get_opcode_entry (unsigned int insn, | |
1384 | + unsigned int prefix_insn, | |
1385 | + struct cris_disasm_data *disdata) | |
1386 | +{ | |
1387 | + /* For non-prefixed insns, we keep a table of pointers, indexed by the | |
1388 | + insn code. Each entry is initialized when found to be NULL. */ | |
1389 | + static const struct cris_opcode **opc_table = NULL; | |
1390 | + | |
1391 | + const struct cris_opcode *max_matchedp = NULL; | |
1392 | + const struct cris_opcode **prefix_opc_table = NULL; | |
1393 | + | |
1394 | + /* We hold a table for each prefix that need to be handled differently. */ | |
1395 | + static const struct cris_opcode **dip_prefixes = NULL; | |
1396 | + static const struct cris_opcode **bdapq_m1_prefixes = NULL; | |
1397 | + static const struct cris_opcode **bdapq_m2_prefixes = NULL; | |
1398 | + static const struct cris_opcode **bdapq_m4_prefixes = NULL; | |
1399 | + static const struct cris_opcode **rest_prefixes = NULL; | |
1400 | + | |
1401 | + /* Allocate and clear the opcode-table. */ | |
1402 | + if (opc_table == NULL) | |
1403 | + { | |
1404 | + opc_table = malloc (65536 * sizeof (opc_table[0])); | |
1405 | + if (opc_table == NULL) | |
1406 | + return NULL; | |
1407 | + | |
1408 | + memset (opc_table, 0, 65536 * sizeof (const struct cris_opcode *)); | |
1409 | + | |
1410 | + dip_prefixes | |
1411 | + = malloc (65536 * sizeof (const struct cris_opcode **)); | |
1412 | + if (dip_prefixes == NULL) | |
1413 | + return NULL; | |
1414 | + | |
1415 | + memset (dip_prefixes, 0, 65536 * sizeof (dip_prefixes[0])); | |
1416 | + | |
1417 | + bdapq_m1_prefixes | |
1418 | + = malloc (65536 * sizeof (const struct cris_opcode **)); | |
1419 | + if (bdapq_m1_prefixes == NULL) | |
1420 | + return NULL; | |
1421 | + | |
1422 | + memset (bdapq_m1_prefixes, 0, 65536 * sizeof (bdapq_m1_prefixes[0])); | |
1423 | + | |
1424 | + bdapq_m2_prefixes | |
1425 | + = malloc (65536 * sizeof (const struct cris_opcode **)); | |
1426 | + if (bdapq_m2_prefixes == NULL) | |
1427 | + return NULL; | |
1428 | + | |
1429 | + memset (bdapq_m2_prefixes, 0, 65536 * sizeof (bdapq_m2_prefixes[0])); | |
1430 | + | |
1431 | + bdapq_m4_prefixes | |
1432 | + = malloc (65536 * sizeof (const struct cris_opcode **)); | |
1433 | + if (bdapq_m4_prefixes == NULL) | |
1434 | + return NULL; | |
1435 | + | |
1436 | + memset (bdapq_m4_prefixes, 0, 65536 * sizeof (bdapq_m4_prefixes[0])); | |
1437 | + | |
1438 | + rest_prefixes | |
1439 | + = malloc (65536 * sizeof (const struct cris_opcode **)); | |
1440 | + if (rest_prefixes == NULL) | |
1441 | + return NULL; | |
1442 | + | |
1443 | + memset (rest_prefixes, 0, 65536 * sizeof (rest_prefixes[0])); | |
1444 | + } | |
1445 | + | |
1446 | + /* Get the right table if this is a prefix. | |
1447 | + This code is connected to cris_constraints in that it knows what | |
1448 | + prefixes play a role in recognition of patterns; the necessary | |
1449 | + state is reflected by which table is used. If constraints | |
1450 | + involving match or non-match of prefix insns are changed, then this | |
1451 | + probably needs changing too. */ | |
1452 | + if (prefix_insn != NO_CRIS_PREFIX) | |
1453 | + { | |
1454 | + const struct cris_opcode *popcodep | |
1455 | + = (opc_table[prefix_insn] != NULL | |
1456 | + ? opc_table[prefix_insn] | |
1457 | + : get_opcode_entry (prefix_insn, NO_CRIS_PREFIX, disdata)); | |
1458 | + | |
1459 | + if (popcodep == NULL) | |
1460 | + return NULL; | |
1461 | + | |
1462 | + if (popcodep->match == BDAP_QUICK_OPCODE) | |
1463 | + { | |
1464 | + /* Since some offsets are recognized with "push" macros, we | |
1465 | + have to have different tables for them. */ | |
1466 | + int offset = (prefix_insn & 255); | |
1467 | + | |
1468 | + if (offset > 127) | |
1469 | + offset -= 256; | |
1470 | + | |
1471 | + switch (offset) | |
1472 | + { | |
1473 | + case -4: | |
1474 | + prefix_opc_table = bdapq_m4_prefixes; | |
1475 | + break; | |
1476 | + | |
1477 | + case -2: | |
1478 | + prefix_opc_table = bdapq_m2_prefixes; | |
1479 | + break; | |
1480 | + | |
1481 | + case -1: | |
1482 | + prefix_opc_table = bdapq_m1_prefixes; | |
1483 | + break; | |
1484 | + | |
1485 | + default: | |
1486 | + prefix_opc_table = rest_prefixes; | |
1487 | + break; | |
1488 | + } | |
1489 | + } | |
1490 | + else if (popcodep->match == DIP_OPCODE) | |
1491 | + /* We don't allow postincrement when the prefix is DIP, so use a | |
1492 | + different table for DIP. */ | |
1493 | + prefix_opc_table = dip_prefixes; | |
1494 | + else | |
1495 | + prefix_opc_table = rest_prefixes; | |
1496 | + } | |
1497 | + | |
1498 | + if (prefix_insn != NO_CRIS_PREFIX | |
1499 | + && prefix_opc_table[insn] != NULL) | |
1500 | + max_matchedp = prefix_opc_table[insn]; | |
1501 | + else if (prefix_insn == NO_CRIS_PREFIX && opc_table[insn] != NULL) | |
1502 | + max_matchedp = opc_table[insn]; | |
1503 | + else | |
1504 | + { | |
1505 | + const struct cris_opcode *opcodep; | |
1506 | + int max_level_of_match = -1; | |
1507 | + | |
1508 | + for (opcodep = cris_opcodes; | |
1509 | + opcodep->name != NULL; | |
1510 | + opcodep++) | |
1511 | + { | |
1512 | + int level_of_match; | |
1513 | + | |
1514 | + if (disdata->distype == cris_dis_v32) | |
1515 | + { | |
1516 | + switch (opcodep->applicable_version) | |
1517 | + { | |
1518 | + case cris_ver_version_all: | |
1519 | + break; | |
1520 | + | |
1521 | + case cris_ver_v0_3: | |
1522 | + case cris_ver_v0_10: | |
1523 | + case cris_ver_v3_10: | |
1524 | + case cris_ver_sim_v0_10: | |
1525 | + case cris_ver_v8_10: | |
1526 | + case cris_ver_v10: | |
1527 | + case cris_ver_warning: | |
1528 | + continue; | |
1529 | + | |
1530 | + case cris_ver_v3p: | |
1531 | + case cris_ver_v8p: | |
1532 | + case cris_ver_v10p: | |
1533 | + case cris_ver_v32p: | |
1534 | + break; | |
1535 | + | |
1536 | + case cris_ver_v8: | |
1537 | + abort (); | |
1538 | + default: | |
1539 | + abort (); | |
1540 | + } | |
1541 | + } | |
1542 | + else | |
1543 | + { | |
1544 | + switch (opcodep->applicable_version) | |
1545 | + { | |
1546 | + case cris_ver_version_all: | |
1547 | + case cris_ver_v0_3: | |
1548 | + case cris_ver_v3p: | |
1549 | + case cris_ver_v0_10: | |
1550 | + case cris_ver_v8p: | |
1551 | + case cris_ver_v8_10: | |
1552 | + case cris_ver_v10: | |
1553 | + case cris_ver_sim_v0_10: | |
1554 | + case cris_ver_v10p: | |
1555 | + case cris_ver_warning: | |
1556 | + break; | |
1557 | + | |
1558 | + case cris_ver_v32p: | |
1559 | + continue; | |
1560 | + | |
1561 | + case cris_ver_v8: | |
1562 | + abort (); | |
1563 | + default: | |
1564 | + abort (); | |
1565 | + } | |
1566 | + } | |
1567 | + | |
1568 | + /* We give a double lead for bits matching the template in | |
1569 | + cris_opcodes. Not even, because then "move p8,r10" would | |
1570 | + be given 2 bits lead over "clear.d r10". When there's a | |
1571 | + tie, the first entry in the table wins. This is | |
1572 | + deliberate, to avoid a more complicated recognition | |
1573 | + formula. */ | |
1574 | + if ((opcodep->match & insn) == opcodep->match | |
1575 | + && (opcodep->lose & insn) == 0 | |
1576 | + && ((level_of_match | |
1577 | + = cris_constraint (opcodep->args, | |
1578 | + insn, | |
1579 | + prefix_insn, | |
1580 | + disdata)) | |
1581 | + >= 0) | |
1582 | + && ((level_of_match | |
1583 | + += 2 * number_of_bits (opcodep->match | |
1584 | + | opcodep->lose)) | |
1585 | + > max_level_of_match)) | |
1586 | + { | |
1587 | + max_matchedp = opcodep; | |
1588 | + max_level_of_match = level_of_match; | |
1589 | + | |
1590 | + /* If there was a full match, never mind looking | |
1591 | + further. */ | |
1592 | + if (level_of_match >= 2 * 16) | |
1593 | + break; | |
1594 | + } | |
1595 | + } | |
1596 | + /* Fill in the new entry. | |
1597 | + | |
1598 | + If there are changes to the opcode-table involving prefixes, and | |
1599 | + disassembly then does not work correctly, try removing the | |
1600 | + else-clause below that fills in the prefix-table. If that | |
1601 | + helps, you need to change the prefix_opc_table setting above, or | |
1602 | + something related. */ | |
1603 | + if (prefix_insn == NO_CRIS_PREFIX) | |
1604 | + opc_table[insn] = max_matchedp; | |
1605 | + else | |
1606 | + prefix_opc_table[insn] = max_matchedp; | |
1607 | + } | |
1608 | + | |
1609 | + return max_matchedp; | |
1610 | +} | |
1611 | + | |
1612 | +/* Return -1 if the constraints of a bitwise-matched instruction say | |
1613 | + that there is no match. Otherwise return a nonnegative number | |
1614 | + indicating the confidence in the match (higher is better). */ | |
1615 | + | |
1616 | +static int | |
1617 | +cris_constraint (const char *cs, | |
1618 | + unsigned int insn, | |
1619 | + unsigned int prefix_insn, | |
1620 | + struct cris_disasm_data *disdata) | |
1621 | +{ | |
1622 | + int retval = 0; | |
1623 | + int tmp; | |
1624 | + int prefix_ok = 0; | |
1625 | + const char *s; | |
1626 | + | |
1627 | + for (s = cs; *s; s++) | |
1628 | + switch (*s) | |
1629 | + { | |
1630 | + case '!': | |
1631 | + /* Do not recognize "pop" if there's a prefix and then only for | |
1632 | + v0..v10. */ | |
1633 | + if (prefix_insn != NO_CRIS_PREFIX | |
1634 | + || disdata->distype != cris_dis_v0_v10) | |
1635 | + return -1; | |
1636 | + break; | |
1637 | + | |
1638 | + case 'U': | |
1639 | + /* Not recognized at disassembly. */ | |
1640 | + return -1; | |
1641 | + | |
1642 | + case 'M': | |
1643 | + /* Size modifier for "clear", i.e. special register 0, 4 or 8. | |
1644 | + Check that it is one of them. Only special register 12 could | |
1645 | + be mismatched, but checking for matches is more logical than | |
1646 | + checking for mismatches when there are only a few cases. */ | |
1647 | + tmp = ((insn >> 12) & 0xf); | |
1648 | + if (tmp != 0 && tmp != 4 && tmp != 8) | |
1649 | + return -1; | |
1650 | + break; | |
1651 | + | |
1652 | + case 'm': | |
1653 | + if ((insn & 0x30) == 0x30) | |
1654 | + return -1; | |
1655 | + break; | |
1656 | + | |
1657 | + case 'S': | |
1658 | + /* A prefix operand without side-effect. */ | |
1659 | + if (prefix_insn != NO_CRIS_PREFIX && (insn & 0x400) == 0) | |
1660 | + { | |
1661 | + prefix_ok = 1; | |
1662 | + break; | |
1663 | + } | |
1664 | + else | |
1665 | + return -1; | |
1666 | + | |
1667 | + case 's': | |
1668 | + case 'y': | |
1669 | + case 'Y': | |
1670 | + /* If this is a prefixed insn with postincrement (side-effect), | |
1671 | + the prefix must not be DIP. */ | |
1672 | + if (prefix_insn != NO_CRIS_PREFIX) | |
1673 | + { | |
1674 | + if (insn & 0x400) | |
1675 | + { | |
1676 | + const struct cris_opcode *prefix_opcodep | |
1677 | + = get_opcode_entry (prefix_insn, NO_CRIS_PREFIX, disdata); | |
1678 | + | |
1679 | + if (prefix_opcodep->match == DIP_OPCODE) | |
1680 | + return -1; | |
1681 | + } | |
1682 | + | |
1683 | + prefix_ok = 1; | |
1684 | + } | |
1685 | + break; | |
1686 | + | |
1687 | + case 'B': | |
1688 | + /* If we don't fall through, then the prefix is ok. */ | |
1689 | + prefix_ok = 1; | |
1690 | + | |
1691 | + /* A "push" prefix. Check for valid "push" size. | |
1692 | + In case of special register, it may be != 4. */ | |
1693 | + if (prefix_insn != NO_CRIS_PREFIX) | |
1694 | + { | |
1695 | + /* Match the prefix insn to BDAPQ. */ | |
1696 | + const struct cris_opcode *prefix_opcodep | |
1697 | + = get_opcode_entry (prefix_insn, NO_CRIS_PREFIX, disdata); | |
1698 | + | |
1699 | + if (prefix_opcodep->match == BDAP_QUICK_OPCODE) | |
1700 | + { | |
1701 | + int pushsize = (prefix_insn & 255); | |
1702 | + | |
1703 | + if (pushsize > 127) | |
1704 | + pushsize -= 256; | |
1705 | + | |
1706 | + if (s[1] == 'P') | |
1707 | + { | |
1708 | + unsigned int spec_reg = (insn >> 12) & 15; | |
1709 | + const struct cris_spec_reg *sregp | |
1710 | + = spec_reg_info (spec_reg, disdata->distype); | |
1711 | + | |
1712 | + /* For a special-register, the "prefix size" must | |
1713 | + match the size of the register. */ | |
1714 | + if (sregp && sregp->reg_size == (unsigned int) -pushsize) | |
1715 | + break; | |
1716 | + } | |
1717 | + else if (s[1] == 'R') | |
1718 | + { | |
1719 | + if ((insn & 0x30) == 0x20 && pushsize == -4) | |
1720 | + break; | |
1721 | + } | |
1722 | + /* FIXME: Should abort here; next constraint letter | |
1723 | + *must* be 'P' or 'R'. */ | |
1724 | + } | |
1725 | + } | |
1726 | + return -1; | |
1727 | + | |
1728 | + case 'D': | |
1729 | + retval = (((insn >> 12) & 15) == (insn & 15)); | |
1730 | + if (!retval) | |
1731 | + return -1; | |
1732 | + else | |
1733 | + retval += 4; | |
1734 | + break; | |
1735 | + | |
1736 | + case 'P': | |
1737 | + { | |
1738 | + const struct cris_spec_reg *sregp | |
1739 | + = spec_reg_info ((insn >> 12) & 15, disdata->distype); | |
1740 | + | |
1741 | + /* Since we match four bits, we will give a value of 4-1 = 3 | |
1742 | + in a match. If there is a corresponding exact match of a | |
1743 | + special register in another pattern, it will get a value of | |
1744 | + 4, which will be higher. This should be correct in that an | |
1745 | + exact pattern would match better than a general pattern. | |
1746 | + | |
1747 | + Note that there is a reason for not returning zero; the | |
1748 | + pattern for "clear" is partly matched in the bit-pattern | |
1749 | + (the two lower bits must be zero), while the bit-pattern | |
1750 | + for a move from a special register is matched in the | |
1751 | + register constraint. */ | |
1752 | + | |
1753 | + if (sregp != NULL) | |
1754 | + { | |
1755 | + retval += 3; | |
1756 | + break; | |
1757 | + } | |
1758 | + else | |
1759 | + return -1; | |
1760 | + } | |
1761 | + } | |
1762 | + | |
1763 | + if (prefix_insn != NO_CRIS_PREFIX && ! prefix_ok) | |
1764 | + return -1; | |
1765 | + | |
1766 | + return retval; | |
1767 | +} | |
1768 | + | |
1769 | +/* Format number as hex with a leading "0x" into outbuffer. */ | |
1770 | + | |
1771 | +static char * | |
1772 | +format_hex (unsigned long number, | |
1773 | + char *outbuffer, | |
1774 | + struct cris_disasm_data *disdata) | |
1775 | +{ | |
1776 | + /* Truncate negative numbers on >32-bit hosts. */ | |
1777 | + number &= 0xffffffff; | |
1778 | + | |
1779 | + sprintf (outbuffer, "0x%lx", number); | |
1780 | + | |
1781 | + /* Save this value for the "case" support. */ | |
1782 | + if (TRACE_CASE) | |
1783 | + last_immediate = number; | |
1784 | + | |
1785 | + return outbuffer + strlen (outbuffer); | |
1786 | +} | |
1787 | + | |
1788 | +/* Format number as decimal into outbuffer. Parameter signedp says | |
1789 | + whether the number should be formatted as signed (!= 0) or | |
1790 | + unsigned (== 0). */ | |
1791 | + | |
1792 | +static char * | |
1793 | +format_dec (long number, char *outbuffer, int signedp) | |
1794 | +{ | |
1795 | + last_immediate = number; | |
1796 | + sprintf (outbuffer, signedp ? "%ld" : "%lu", number); | |
1797 | + | |
1798 | + return outbuffer + strlen (outbuffer); | |
1799 | +} | |
1800 | + | |
1801 | +/* Format the name of the general register regno into outbuffer. */ | |
1802 | + | |
1803 | +static char * | |
1804 | +format_reg (struct cris_disasm_data *disdata, | |
1805 | + int regno, | |
1806 | + char *outbuffer_start, | |
1807 | + bfd_boolean with_reg_prefix) | |
1808 | +{ | |
1809 | + char *outbuffer = outbuffer_start; | |
1810 | + | |
1811 | + if (with_reg_prefix) | |
1812 | + *outbuffer++ = REGISTER_PREFIX_CHAR; | |
1813 | + | |
1814 | + switch (regno) | |
1815 | + { | |
1816 | + case 15: | |
1817 | + /* For v32, there is no context in which we output PC. */ | |
1818 | + if (disdata->distype == cris_dis_v32) | |
1819 | + strcpy (outbuffer, "acr"); | |
1820 | + else | |
1821 | + strcpy (outbuffer, "pc"); | |
1822 | + break; | |
1823 | + | |
1824 | + case 14: | |
1825 | + strcpy (outbuffer, "sp"); | |
1826 | + break; | |
1827 | + | |
1828 | + default: | |
1829 | + sprintf (outbuffer, "r%d", regno); | |
1830 | + break; | |
1831 | + } | |
1832 | + | |
1833 | + return outbuffer_start + strlen (outbuffer_start); | |
1834 | +} | |
1835 | + | |
1836 | +/* Format the name of a support register into outbuffer. */ | |
1837 | + | |
1838 | +static char * | |
1839 | +format_sup_reg (unsigned int regno, | |
1840 | + char *outbuffer_start, | |
1841 | + bfd_boolean with_reg_prefix) | |
1842 | +{ | |
1843 | + char *outbuffer = outbuffer_start; | |
1844 | + int i; | |
1845 | + | |
1846 | + if (with_reg_prefix) | |
1847 | + *outbuffer++ = REGISTER_PREFIX_CHAR; | |
1848 | + | |
1849 | + for (i = 0; cris_support_regs[i].name != NULL; i++) | |
1850 | + if (cris_support_regs[i].number == regno) | |
1851 | + { | |
1852 | + sprintf (outbuffer, "%s", cris_support_regs[i].name); | |
1853 | + return outbuffer_start + strlen (outbuffer_start); | |
1854 | + } | |
1855 | + | |
1856 | + /* There's supposed to be register names covering all numbers, though | |
1857 | + some may be generic names. */ | |
1858 | + sprintf (outbuffer, "format_sup_reg-BUG"); | |
1859 | + return outbuffer_start + strlen (outbuffer_start); | |
1860 | +} | |
1861 | + | |
1862 | +/* Return the length of an instruction. */ | |
1863 | + | |
1864 | +static unsigned | |
1865 | +bytes_to_skip (unsigned int insn, | |
1866 | + const struct cris_opcode *matchedp, | |
1867 | + enum cris_disass_family distype, | |
1868 | + const struct cris_opcode *prefix_matchedp) | |
1869 | +{ | |
1870 | + /* Each insn is a word plus "immediate" operands. */ | |
1871 | + unsigned to_skip = 2; | |
1872 | + const char *template = matchedp->args; | |
1873 | + const char *s; | |
1874 | + | |
1875 | + for (s = template; *s; s++) | |
1876 | + if ((*s == 's' || *s == 'N' || *s == 'Y') | |
1877 | + && (insn & 0x400) && (insn & 15) == 15 | |
1878 | + && prefix_matchedp == NULL) | |
1879 | + { | |
1880 | + /* Immediate via [pc+], so we have to check the size of the | |
1881 | + operand. */ | |
1882 | + int mode_size = 1 << ((insn >> 4) & (*template == 'z' ? 1 : 3)); | |
1883 | + | |
1884 | + if (matchedp->imm_oprnd_size == SIZE_FIX_32) | |
1885 | + to_skip += 4; | |
1886 | + else if (matchedp->imm_oprnd_size == SIZE_SPEC_REG) | |
1887 | + { | |
1888 | + const struct cris_spec_reg *sregp | |
1889 | + = spec_reg_info ((insn >> 12) & 15, distype); | |
1890 | + | |
1891 | + /* FIXME: Improve error handling; should have been caught | |
1892 | + earlier. */ | |
1893 | + if (sregp == NULL) | |
1894 | + return 2; | |
1895 | + | |
1896 | + /* PC is incremented by two, not one, for a byte. Except on | |
1897 | + CRISv32, where constants are always DWORD-size for | |
1898 | + special registers. */ | |
1899 | + to_skip += | |
1900 | + distype == cris_dis_v32 ? 4 : (sregp->reg_size + 1) & ~1; | |
1901 | + } | |
1902 | + else | |
1903 | + to_skip += (mode_size + 1) & ~1; | |
1904 | + } | |
1905 | + else if (*s == 'n') | |
1906 | + to_skip += 4; | |
1907 | + else if (*s == 'b') | |
1908 | + to_skip += 2; | |
1909 | + | |
1910 | + return to_skip; | |
1911 | +} | |
1912 | + | |
1913 | +/* Print condition code flags. */ | |
1914 | + | |
1915 | +static char * | |
1916 | +print_flags (struct cris_disasm_data *disdata, unsigned int insn, char *cp) | |
1917 | +{ | |
1918 | + /* Use the v8 (Etrax 100) flag definitions for disassembly. | |
1919 | + The differences with v0 (Etrax 1..4) vs. Svinto are: | |
1920 | + v0 'd' <=> v8 'm' | |
1921 | + v0 'e' <=> v8 'b'. | |
1922 | + FIXME: Emit v0..v3 flag names somehow. */ | |
1923 | + static const char v8_fnames[] = "cvznxibm"; | |
1924 | + static const char v32_fnames[] = "cvznxiup"; | |
1925 | + const char *fnames | |
1926 | + = disdata->distype == cris_dis_v32 ? v32_fnames : v8_fnames; | |
1927 | + | |
1928 | + unsigned char flagbits = (((insn >> 8) & 0xf0) | (insn & 15)); | |
1929 | + int i; | |
1930 | + | |
1931 | + for (i = 0; i < 8; i++) | |
1932 | + if (flagbits & (1 << i)) | |
1933 | + *cp++ = fnames[i]; | |
1934 | + | |
1935 | + return cp; | |
1936 | +} | |
1937 | + | |
1938 | +/* Print out an insn with its operands, and update the info->insn_type | |
1939 | + fields. The prefix_opcodep and the rest hold a prefix insn that is | |
1940 | + supposed to be output as an address mode. */ | |
1941 | + | |
1942 | +static void | |
1943 | +print_with_operands (const struct cris_opcode *opcodep, | |
1944 | + unsigned int insn, | |
1945 | + unsigned char *buffer, | |
1946 | + bfd_vma addr, | |
1947 | + disassemble_info *info, | |
1948 | + /* If a prefix insn was before this insn (and is supposed | |
1949 | + to be output as an address), here is a description of | |
1950 | + it. */ | |
1951 | + const struct cris_opcode *prefix_opcodep, | |
1952 | + unsigned int prefix_insn, | |
1953 | + unsigned char *prefix_buffer, | |
1954 | + bfd_boolean with_reg_prefix) | |
1955 | +{ | |
1956 | + /* Get a buffer of somewhat reasonable size where we store | |
1957 | + intermediate parts of the insn. */ | |
1958 | + char temp[sizeof (".d [$r13=$r12-2147483648],$r10") * 2]; | |
1959 | + char *tp = temp; | |
1960 | + static const char mode_char[] = "bwd?"; | |
1961 | + const char *s; | |
1962 | + const char *cs; | |
1963 | + struct cris_disasm_data *disdata | |
1964 | + = (struct cris_disasm_data *) info->private_data; | |
1965 | + | |
1966 | + /* Print out the name first thing we do. */ | |
1967 | + (*info->fprintf_func) (info->stream, "%s", opcodep->name); | |
1968 | + | |
1969 | + cs = opcodep->args; | |
1970 | + s = cs; | |
1971 | + | |
1972 | + /* Ignore any prefix indicator. */ | |
1973 | + if (*s == 'p') | |
1974 | + s++; | |
1975 | + | |
1976 | + if (*s == 'm' || *s == 'M' || *s == 'z') | |
1977 | + { | |
1978 | + *tp++ = '.'; | |
1979 | + | |
1980 | + /* Get the size-letter. */ | |
1981 | + *tp++ = *s == 'M' | |
1982 | + ? (insn & 0x8000 ? 'd' | |
1983 | + : insn & 0x4000 ? 'w' : 'b') | |
1984 | + : mode_char[(insn >> 4) & (*s == 'z' ? 1 : 3)]; | |
1985 | + | |
1986 | + /* Ignore the size and the space character that follows. */ | |
1987 | + s += 2; | |
1988 | + } | |
1989 | + | |
1990 | + /* Add a space if this isn't a long-branch, because for those will add | |
1991 | + the condition part of the name later. */ | |
1992 | + if (opcodep->match != (BRANCH_PC_LOW + BRANCH_INCR_HIGH * 256)) | |
1993 | + *tp++ = ' '; | |
1994 | + | |
1995 | + /* Fill in the insn-type if deducible from the name (and there's no | |
1996 | + better way). */ | |
1997 | + if (opcodep->name[0] == 'j') | |
1998 | + { | |
1999 | + if (CONST_STRNEQ (opcodep->name, "jsr")) | |
2000 | + /* It's "jsr" or "jsrc". */ | |
2001 | + info->insn_type = dis_jsr; | |
2002 | + else | |
2003 | + /* Any other jump-type insn is considered a branch. */ | |
2004 | + info->insn_type = dis_branch; | |
2005 | + } | |
2006 | + | |
2007 | + /* We might know some more fields right now. */ | |
2008 | + info->branch_delay_insns = opcodep->delayed; | |
2009 | + | |
2010 | + /* Handle operands. */ | |
2011 | + for (; *s; s++) | |
2012 | + { | |
2013 | + switch (*s) | |
2014 | + { | |
2015 | + case 'T': | |
2016 | + tp = format_sup_reg ((insn >> 12) & 15, tp, with_reg_prefix); | |
2017 | + break; | |
2018 | + | |
2019 | + case 'A': | |
2020 | + if (with_reg_prefix) | |
2021 | + *tp++ = REGISTER_PREFIX_CHAR; | |
2022 | + *tp++ = 'a'; | |
2023 | + *tp++ = 'c'; | |
2024 | + *tp++ = 'r'; | |
2025 | + break; | |
2026 | + | |
2027 | + case '[': | |
2028 | + case ']': | |
2029 | + case ',': | |
2030 | + *tp++ = *s; | |
2031 | + break; | |
2032 | + | |
2033 | + case '!': | |
2034 | + /* Ignore at this point; used at earlier stages to avoid | |
2035 | + recognition if there's a prefix at something that in other | |
2036 | + ways looks like a "pop". */ | |
2037 | + break; | |
2038 | + | |
2039 | + case 'd': | |
2040 | + /* Ignore. This is an optional ".d " on the large one of | |
2041 | + relaxable insns. */ | |
2042 | + break; | |
2043 | + | |
2044 | + case 'B': | |
2045 | + /* This was the prefix that made this a "push". We've already | |
2046 | + handled it by recognizing it, so signal that the prefix is | |
2047 | + handled by setting it to NULL. */ | |
2048 | + prefix_opcodep = NULL; | |
2049 | + break; | |
2050 | + | |
2051 | + case 'D': | |
2052 | + case 'r': | |
2053 | + tp = format_reg (disdata, insn & 15, tp, with_reg_prefix); | |
2054 | + break; | |
2055 | + | |
2056 | + case 'R': | |
2057 | + tp = format_reg (disdata, (insn >> 12) & 15, tp, with_reg_prefix); | |
2058 | + break; | |
2059 | + | |
2060 | + case 'n': | |
2061 | + { | |
2062 | + /* Like N but pc-relative to the start of the insn. */ | |
2063 | + unsigned long number | |
2064 | + = (buffer[2] + buffer[3] * 256 + buffer[4] * 65536 | |
2065 | + + buffer[5] * 0x1000000 + addr); | |
2066 | + | |
2067 | + /* Finish off and output previous formatted bytes. */ | |
2068 | + *tp = 0; | |
2069 | + if (temp[0]) | |
2070 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2071 | + tp = temp; | |
2072 | + | |
2073 | + (*info->print_address_func) ((bfd_vma) number, info); | |
2074 | + } | |
2075 | + break; | |
2076 | + | |
2077 | + case 'u': | |
2078 | + { | |
2079 | + /* Like n but the offset is bits <3:0> in the instruction. */ | |
2080 | + unsigned long number = (buffer[0] & 0xf) * 2 + addr; | |
2081 | + | |
2082 | + /* Finish off and output previous formatted bytes. */ | |
2083 | + *tp = 0; | |
2084 | + if (temp[0]) | |
2085 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2086 | + tp = temp; | |
2087 | + | |
2088 | + (*info->print_address_func) ((bfd_vma) number, info); | |
2089 | + } | |
2090 | + break; | |
2091 | + | |
2092 | + case 'N': | |
2093 | + case 'y': | |
2094 | + case 'Y': | |
2095 | + case 'S': | |
2096 | + case 's': | |
2097 | + /* Any "normal" memory operand. */ | |
2098 | + if ((insn & 0x400) && (insn & 15) == 15 && prefix_opcodep == NULL) | |
2099 | + { | |
2100 | + /* We're looking at [pc+], i.e. we need to output an immediate | |
2101 | + number, where the size can depend on different things. */ | |
2102 | + long number; | |
2103 | + int signedp | |
2104 | + = ((*cs == 'z' && (insn & 0x20)) | |
2105 | + || opcodep->match == BDAP_QUICK_OPCODE); | |
2106 | + int nbytes; | |
2107 | + | |
2108 | + if (opcodep->imm_oprnd_size == SIZE_FIX_32) | |
2109 | + nbytes = 4; | |
2110 | + else if (opcodep->imm_oprnd_size == SIZE_SPEC_REG) | |
2111 | + { | |
2112 | + const struct cris_spec_reg *sregp | |
2113 | + = spec_reg_info ((insn >> 12) & 15, disdata->distype); | |
2114 | + | |
2115 | + /* A NULL return should have been as a non-match earlier, | |
2116 | + so catch it as an internal error in the error-case | |
2117 | + below. */ | |
2118 | + if (sregp == NULL) | |
2119 | + /* Whatever non-valid size. */ | |
2120 | + nbytes = 42; | |
2121 | + else | |
2122 | + /* PC is always incremented by a multiple of two. | |
2123 | + For CRISv32, immediates are always 4 bytes for | |
2124 | + special registers. */ | |
2125 | + nbytes = disdata->distype == cris_dis_v32 | |
2126 | + ? 4 : (sregp->reg_size + 1) & ~1; | |
2127 | + } | |
2128 | + else | |
2129 | + { | |
2130 | + int mode_size = 1 << ((insn >> 4) & (*cs == 'z' ? 1 : 3)); | |
2131 | + | |
2132 | + if (mode_size == 1) | |
2133 | + nbytes = 2; | |
2134 | + else | |
2135 | + nbytes = mode_size; | |
2136 | + } | |
2137 | + | |
2138 | + switch (nbytes) | |
2139 | + { | |
2140 | + case 1: | |
2141 | + number = buffer[2]; | |
2142 | + if (signedp && number > 127) | |
2143 | + number -= 256; | |
2144 | + break; | |
2145 | + | |
2146 | + case 2: | |
2147 | + number = buffer[2] + buffer[3] * 256; | |
2148 | + if (signedp && number > 32767) | |
2149 | + number -= 65536; | |
2150 | + break; | |
2151 | + | |
2152 | + case 4: | |
2153 | + number | |
2154 | + = buffer[2] + buffer[3] * 256 + buffer[4] * 65536 | |
2155 | + + buffer[5] * 0x1000000; | |
2156 | + break; | |
2157 | + | |
2158 | + default: | |
2159 | + strcpy (tp, "bug"); | |
2160 | + tp += 3; | |
2161 | + number = 42; | |
2162 | + } | |
2163 | + | |
2164 | + if ((*cs == 'z' && (insn & 0x20)) | |
2165 | + || (opcodep->match == BDAP_QUICK_OPCODE | |
2166 | + && (nbytes <= 2 || buffer[1 + nbytes] == 0))) | |
2167 | + tp = format_dec (number, tp, signedp); | |
2168 | + else | |
2169 | + { | |
2170 | + unsigned int highbyte = (number >> 24) & 0xff; | |
2171 | + | |
2172 | + /* Either output this as an address or as a number. If it's | |
2173 | + a dword with the same high-byte as the address of the | |
2174 | + insn, assume it's an address, and also if it's a non-zero | |
2175 | + non-0xff high-byte. If this is a jsr or a jump, then | |
2176 | + it's definitely an address. */ | |
2177 | + if (nbytes == 4 | |
2178 | + && (highbyte == ((addr >> 24) & 0xff) | |
2179 | + || (highbyte != 0 && highbyte != 0xff) | |
2180 | + || info->insn_type == dis_branch | |
2181 | + || info->insn_type == dis_jsr)) | |
2182 | + { | |
2183 | + /* Finish off and output previous formatted bytes. */ | |
2184 | + *tp = 0; | |
2185 | + tp = temp; | |
2186 | + if (temp[0]) | |
2187 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2188 | + | |
2189 | + (*info->print_address_func) ((bfd_vma) number, info); | |
2190 | + | |
2191 | + info->target = number; | |
2192 | + } | |
2193 | + else | |
2194 | + tp = format_hex (number, tp, disdata); | |
2195 | + } | |
2196 | + } | |
2197 | + else | |
2198 | + { | |
2199 | + /* Not an immediate number. Then this is a (possibly | |
2200 | + prefixed) memory operand. */ | |
2201 | + if (info->insn_type != dis_nonbranch) | |
2202 | + { | |
2203 | + int mode_size | |
2204 | + = 1 << ((insn >> 4) | |
2205 | + & (opcodep->args[0] == 'z' ? 1 : 3)); | |
2206 | + int size; | |
2207 | + info->insn_type = dis_dref; | |
2208 | + info->flags |= CRIS_DIS_FLAG_MEMREF; | |
2209 | + | |
2210 | + if (opcodep->imm_oprnd_size == SIZE_FIX_32) | |
2211 | + size = 4; | |
2212 | + else if (opcodep->imm_oprnd_size == SIZE_SPEC_REG) | |
2213 | + { | |
2214 | + const struct cris_spec_reg *sregp | |
2215 | + = spec_reg_info ((insn >> 12) & 15, disdata->distype); | |
2216 | + | |
2217 | + /* FIXME: Improve error handling; should have been caught | |
2218 | + earlier. */ | |
2219 | + if (sregp == NULL) | |
2220 | + size = 4; | |
2221 | + else | |
2222 | + size = sregp->reg_size; | |
2223 | + } | |
2224 | + else | |
2225 | + size = mode_size; | |
2226 | + | |
2227 | + info->data_size = size; | |
2228 | + } | |
2229 | + | |
2230 | + *tp++ = '['; | |
2231 | + | |
2232 | + if (prefix_opcodep | |
2233 | + /* We don't match dip with a postincremented field | |
2234 | + as a side-effect address mode. */ | |
2235 | + && ((insn & 0x400) == 0 | |
2236 | + || prefix_opcodep->match != DIP_OPCODE)) | |
2237 | + { | |
2238 | + if (insn & 0x400) | |
2239 | + { | |
2240 | + tp = format_reg (disdata, insn & 15, tp, with_reg_prefix); | |
2241 | + *tp++ = '='; | |
2242 | + } | |
2243 | + | |
2244 | + | |
2245 | + /* We mainly ignore the prefix format string when the | |
2246 | + address-mode syntax is output. */ | |
2247 | + switch (prefix_opcodep->match) | |
2248 | + { | |
2249 | + case DIP_OPCODE: | |
2250 | + /* It's [r], [r+] or [pc+]. */ | |
2251 | + if ((prefix_insn & 0x400) && (prefix_insn & 15) == 15) | |
2252 | + { | |
2253 | + /* It's [pc+]. This cannot possibly be anything | |
2254 | + but an address. */ | |
2255 | + unsigned long number | |
2256 | + = prefix_buffer[2] + prefix_buffer[3] * 256 | |
2257 | + + prefix_buffer[4] * 65536 | |
2258 | + + prefix_buffer[5] * 0x1000000; | |
2259 | + | |
2260 | + info->target = (bfd_vma) number; | |
2261 | + | |
2262 | + /* Finish off and output previous formatted | |
2263 | + data. */ | |
2264 | + *tp = 0; | |
2265 | + tp = temp; | |
2266 | + if (temp[0]) | |
2267 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2268 | + | |
2269 | + (*info->print_address_func) ((bfd_vma) number, info); | |
2270 | + } | |
2271 | + else | |
2272 | + { | |
2273 | + /* For a memref in an address, we use target2. | |
2274 | + In this case, target is zero. */ | |
2275 | + info->flags | |
2276 | + |= (CRIS_DIS_FLAG_MEM_TARGET2_IS_REG | |
2277 | + | CRIS_DIS_FLAG_MEM_TARGET2_MEM); | |
2278 | + | |
2279 | + info->target2 = prefix_insn & 15; | |
2280 | + | |
2281 | + *tp++ = '['; | |
2282 | + tp = format_reg (disdata, prefix_insn & 15, tp, | |
2283 | + with_reg_prefix); | |
2284 | + if (prefix_insn & 0x400) | |
2285 | + *tp++ = '+'; | |
2286 | + *tp++ = ']'; | |
2287 | + } | |
2288 | + break; | |
2289 | + | |
2290 | + case BDAP_QUICK_OPCODE: | |
2291 | + { | |
2292 | + int number; | |
2293 | + | |
2294 | + number = prefix_buffer[0]; | |
2295 | + if (number > 127) | |
2296 | + number -= 256; | |
2297 | + | |
2298 | + /* Output "reg+num" or, if num < 0, "reg-num". */ | |
2299 | + tp = format_reg (disdata, (prefix_insn >> 12) & 15, tp, | |
2300 | + with_reg_prefix); | |
2301 | + if (number >= 0) | |
2302 | + *tp++ = '+'; | |
2303 | + tp = format_dec (number, tp, 1); | |
2304 | + | |
2305 | + info->flags |= CRIS_DIS_FLAG_MEM_TARGET_IS_REG; | |
2306 | + info->target = (prefix_insn >> 12) & 15; | |
2307 | + info->target2 = (bfd_vma) number; | |
2308 | + break; | |
2309 | + } | |
2310 | + | |
2311 | + case BIAP_OPCODE: | |
2312 | + /* Output "r+R.m". */ | |
2313 | + tp = format_reg (disdata, prefix_insn & 15, tp, | |
2314 | + with_reg_prefix); | |
2315 | + *tp++ = '+'; | |
2316 | + tp = format_reg (disdata, (prefix_insn >> 12) & 15, tp, | |
2317 | + with_reg_prefix); | |
2318 | + *tp++ = '.'; | |
2319 | + *tp++ = mode_char[(prefix_insn >> 4) & 3]; | |
2320 | + | |
2321 | + info->flags | |
2322 | + |= (CRIS_DIS_FLAG_MEM_TARGET2_IS_REG | |
2323 | + | CRIS_DIS_FLAG_MEM_TARGET_IS_REG | |
2324 | + | |
2325 | + | ((prefix_insn & 0x8000) | |
2326 | + ? CRIS_DIS_FLAG_MEM_TARGET2_MULT4 | |
2327 | + : ((prefix_insn & 0x8000) | |
2328 | + ? CRIS_DIS_FLAG_MEM_TARGET2_MULT2 : 0))); | |
2329 | + | |
2330 | + /* Is it the casejump? It's a "adds.w [pc+r%d.w],pc". */ | |
2331 | + if (insn == 0xf83f && (prefix_insn & ~0xf000) == 0x55f) | |
2332 | + /* Then start interpreting data as offsets. */ | |
2333 | + case_offset_counter = no_of_case_offsets; | |
2334 | + break; | |
2335 | + | |
2336 | + case BDAP_INDIR_OPCODE: | |
2337 | + /* Output "r+s.m", or, if "s" is [pc+], "r+s" or | |
2338 | + "r-s". */ | |
2339 | + tp = format_reg (disdata, (prefix_insn >> 12) & 15, tp, | |
2340 | + with_reg_prefix); | |
2341 | + | |
2342 | + if ((prefix_insn & 0x400) && (prefix_insn & 15) == 15) | |
2343 | + { | |
2344 | + long number; | |
2345 | + unsigned int nbytes; | |
2346 | + | |
2347 | + /* It's a value. Get its size. */ | |
2348 | + int mode_size = 1 << ((prefix_insn >> 4) & 3); | |
2349 | + | |
2350 | + if (mode_size == 1) | |
2351 | + nbytes = 2; | |
2352 | + else | |
2353 | + nbytes = mode_size; | |
2354 | + | |
2355 | + switch (nbytes) | |
2356 | + { | |
2357 | + case 1: | |
2358 | + number = prefix_buffer[2]; | |
2359 | + if (number > 127) | |
2360 | + number -= 256; | |
2361 | + break; | |
2362 | + | |
2363 | + case 2: | |
2364 | + number = prefix_buffer[2] + prefix_buffer[3] * 256; | |
2365 | + if (number > 32767) | |
2366 | + number -= 65536; | |
2367 | + break; | |
2368 | + | |
2369 | + case 4: | |
2370 | + number | |
2371 | + = prefix_buffer[2] + prefix_buffer[3] * 256 | |
2372 | + + prefix_buffer[4] * 65536 | |
2373 | + + prefix_buffer[5] * 0x1000000; | |
2374 | + break; | |
2375 | + | |
2376 | + default: | |
2377 | + strcpy (tp, "bug"); | |
2378 | + tp += 3; | |
2379 | + number = 42; | |
2380 | + } | |
2381 | + | |
2382 | + info->flags |= CRIS_DIS_FLAG_MEM_TARGET_IS_REG; | |
2383 | + info->target2 = (bfd_vma) number; | |
2384 | + | |
2385 | + /* If the size is dword, then assume it's an | |
2386 | + address. */ | |
2387 | + if (nbytes == 4) | |
2388 | + { | |
2389 | + /* Finish off and output previous formatted | |
2390 | + bytes. */ | |
2391 | + *tp++ = '+'; | |
2392 | + *tp = 0; | |
2393 | + tp = temp; | |
2394 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2395 | + | |
2396 | + (*info->print_address_func) ((bfd_vma) number, info); | |
2397 | + } | |
2398 | + else | |
2399 | + { | |
2400 | + if (number >= 0) | |
2401 | + *tp++ = '+'; | |
2402 | + tp = format_dec (number, tp, 1); | |
2403 | + } | |
2404 | + } | |
2405 | + else | |
2406 | + { | |
2407 | + /* Output "r+[R].m" or "r+[R+].m". */ | |
2408 | + *tp++ = '+'; | |
2409 | + *tp++ = '['; | |
2410 | + tp = format_reg (disdata, prefix_insn & 15, tp, | |
2411 | + with_reg_prefix); | |
2412 | + if (prefix_insn & 0x400) | |
2413 | + *tp++ = '+'; | |
2414 | + *tp++ = ']'; | |
2415 | + *tp++ = '.'; | |
2416 | + *tp++ = mode_char[(prefix_insn >> 4) & 3]; | |
2417 | + | |
2418 | + info->flags | |
2419 | + |= (CRIS_DIS_FLAG_MEM_TARGET2_IS_REG | |
2420 | + | CRIS_DIS_FLAG_MEM_TARGET2_MEM | |
2421 | + | CRIS_DIS_FLAG_MEM_TARGET_IS_REG | |
2422 | + | |
2423 | + | (((prefix_insn >> 4) == 2) | |
2424 | + ? 0 | |
2425 | + : (((prefix_insn >> 4) & 3) == 1 | |
2426 | + ? CRIS_DIS_FLAG_MEM_TARGET2_MEM_WORD | |
2427 | + : CRIS_DIS_FLAG_MEM_TARGET2_MEM_BYTE))); | |
2428 | + } | |
2429 | + break; | |
2430 | + | |
2431 | + default: | |
2432 | + (*info->fprintf_func) (info->stream, "?prefix-bug"); | |
2433 | + } | |
2434 | + | |
2435 | + /* To mark that the prefix is used, reset it. */ | |
2436 | + prefix_opcodep = NULL; | |
2437 | + } | |
2438 | + else | |
2439 | + { | |
2440 | + tp = format_reg (disdata, insn & 15, tp, with_reg_prefix); | |
2441 | + | |
2442 | + info->flags |= CRIS_DIS_FLAG_MEM_TARGET_IS_REG; | |
2443 | + info->target = insn & 15; | |
2444 | + | |
2445 | + if (insn & 0x400) | |
2446 | + *tp++ = '+'; | |
2447 | + } | |
2448 | + *tp++ = ']'; | |
2449 | + } | |
2450 | + break; | |
2451 | + | |
2452 | + case 'x': | |
2453 | + tp = format_reg (disdata, (insn >> 12) & 15, tp, with_reg_prefix); | |
2454 | + *tp++ = '.'; | |
2455 | + *tp++ = mode_char[(insn >> 4) & 3]; | |
2456 | + break; | |
2457 | + | |
2458 | + case 'I': | |
2459 | + tp = format_dec (insn & 63, tp, 0); | |
2460 | + break; | |
2461 | + | |
2462 | + case 'b': | |
2463 | + { | |
2464 | + int where = buffer[2] + buffer[3] * 256; | |
2465 | + | |
2466 | + if (where > 32767) | |
2467 | + where -= 65536; | |
2468 | + | |
2469 | + where += addr + ((disdata->distype == cris_dis_v32) ? 0 : 4); | |
2470 | + | |
2471 | + if (insn == BA_PC_INCR_OPCODE) | |
2472 | + info->insn_type = dis_branch; | |
2473 | + else | |
2474 | + info->insn_type = dis_condbranch; | |
2475 | + | |
2476 | + info->target = (bfd_vma) where; | |
2477 | + | |
2478 | + *tp = 0; | |
2479 | + tp = temp; | |
2480 | + (*info->fprintf_func) (info->stream, "%s%s ", | |
2481 | + temp, cris_cc_strings[insn >> 12]); | |
2482 | + | |
2483 | + (*info->print_address_func) ((bfd_vma) where, info); | |
2484 | + } | |
2485 | + break; | |
2486 | + | |
2487 | + case 'c': | |
2488 | + tp = format_dec (insn & 31, tp, 0); | |
2489 | + break; | |
2490 | + | |
2491 | + case 'C': | |
2492 | + tp = format_dec (insn & 15, tp, 0); | |
2493 | + break; | |
2494 | + | |
2495 | + case 'o': | |
2496 | + { | |
2497 | + long offset = insn & 0xfe; | |
2498 | + bfd_vma target; | |
2499 | + | |
2500 | + if (insn & 1) | |
2501 | + offset |= ~0xff; | |
2502 | + | |
2503 | + if (opcodep->match == BA_QUICK_OPCODE) | |
2504 | + info->insn_type = dis_branch; | |
2505 | + else | |
2506 | + info->insn_type = dis_condbranch; | |
2507 | + | |
2508 | + target = addr + ((disdata->distype == cris_dis_v32) ? 0 : 2) + offset; | |
2509 | + info->target = target; | |
2510 | + *tp = 0; | |
2511 | + tp = temp; | |
2512 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2513 | + (*info->print_address_func) (target, info); | |
2514 | + } | |
2515 | + break; | |
2516 | + | |
2517 | + case 'Q': | |
2518 | + case 'O': | |
2519 | + { | |
2520 | + long number = buffer[0]; | |
2521 | + | |
2522 | + if (number > 127) | |
2523 | + number = number - 256; | |
2524 | + | |
2525 | + tp = format_dec (number, tp, 1); | |
2526 | + *tp++ = ','; | |
2527 | + tp = format_reg (disdata, (insn >> 12) & 15, tp, with_reg_prefix); | |
2528 | + } | |
2529 | + break; | |
2530 | + | |
2531 | + case 'f': | |
2532 | + tp = print_flags (disdata, insn, tp); | |
2533 | + break; | |
2534 | + | |
2535 | + case 'i': | |
2536 | + tp = format_dec ((insn & 32) ? (insn & 31) | ~31L : insn & 31, tp, 1); | |
2537 | + break; | |
2538 | + | |
2539 | + case 'P': | |
2540 | + { | |
2541 | + const struct cris_spec_reg *sregp | |
2542 | + = spec_reg_info ((insn >> 12) & 15, disdata->distype); | |
2543 | + | |
2544 | + if (sregp->name == NULL) | |
2545 | + /* Should have been caught as a non-match eariler. */ | |
2546 | + *tp++ = '?'; | |
2547 | + else | |
2548 | + { | |
2549 | + if (with_reg_prefix) | |
2550 | + *tp++ = REGISTER_PREFIX_CHAR; | |
2551 | + strcpy (tp, sregp->name); | |
2552 | + tp += strlen (tp); | |
2553 | + } | |
2554 | + } | |
2555 | + break; | |
2556 | + | |
2557 | + default: | |
2558 | + strcpy (tp, "???"); | |
2559 | + tp += 3; | |
2560 | + } | |
2561 | + } | |
2562 | + | |
2563 | + *tp = 0; | |
2564 | + | |
2565 | + if (prefix_opcodep) | |
2566 | + (*info->fprintf_func) (info->stream, " (OOPS unused prefix \"%s: %s\")", | |
2567 | + prefix_opcodep->name, prefix_opcodep->args); | |
2568 | + | |
2569 | + (*info->fprintf_func) (info->stream, "%s", temp); | |
2570 | + | |
2571 | + /* Get info for matching case-tables, if we don't have any active. | |
2572 | + We assume that the last constant seen is used; either in the insn | |
2573 | + itself or in a "move.d const,rN, sub.d rN,rM"-like sequence. */ | |
2574 | + if (TRACE_CASE && case_offset_counter == 0) | |
2575 | + { | |
2576 | + if (CONST_STRNEQ (opcodep->name, "sub")) | |
2577 | + case_offset = last_immediate; | |
2578 | + | |
2579 | + /* It could also be an "add", if there are negative case-values. */ | |
2580 | + else if (CONST_STRNEQ (opcodep->name, "add")) | |
2581 | + /* The first case is the negated operand to the add. */ | |
2582 | + case_offset = -last_immediate; | |
2583 | + | |
2584 | + /* A bound insn will tell us the number of cases. */ | |
2585 | + else if (CONST_STRNEQ (opcodep->name, "bound")) | |
2586 | + no_of_case_offsets = last_immediate + 1; | |
2587 | + | |
2588 | + /* A jump or jsr or branch breaks the chain of insns for a | |
2589 | + case-table, so assume default first-case again. */ | |
2590 | + else if (info->insn_type == dis_jsr | |
2591 | + || info->insn_type == dis_branch | |
2592 | + || info->insn_type == dis_condbranch) | |
2593 | + case_offset = 0; | |
2594 | + } | |
2595 | +} | |
2596 | + | |
2597 | + | |
2598 | +/* Print the CRIS instruction at address memaddr on stream. Returns | |
2599 | + length of the instruction, in bytes. Prefix register names with `$' if | |
2600 | + WITH_REG_PREFIX. */ | |
2601 | + | |
2602 | +static int | |
2603 | +print_insn_cris_generic (bfd_vma memaddr, | |
2604 | + disassemble_info *info, | |
2605 | + bfd_boolean with_reg_prefix) | |
2606 | +{ | |
2607 | + int nbytes; | |
2608 | + unsigned int insn; | |
2609 | + const struct cris_opcode *matchedp; | |
2610 | + int advance = 0; | |
2611 | + struct cris_disasm_data *disdata | |
2612 | + = (struct cris_disasm_data *) info->private_data; | |
2613 | + | |
2614 | + /* No instruction will be disassembled as longer than this number of | |
2615 | + bytes; stacked prefixes will not be expanded. */ | |
2616 | + unsigned char buffer[MAX_BYTES_PER_CRIS_INSN]; | |
2617 | + unsigned char *bufp; | |
2618 | + int status = 0; | |
2619 | + bfd_vma addr; | |
2620 | + | |
2621 | + /* There will be an "out of range" error after the last instruction. | |
2622 | + Reading pairs of bytes in decreasing number, we hope that we will get | |
2623 | + at least the amount that we will consume. | |
2624 | + | |
2625 | + If we can't get any data, or we do not get enough data, we print | |
2626 | + the error message. */ | |
2627 | + | |
2628 | + for (nbytes = MAX_BYTES_PER_CRIS_INSN; nbytes > 0; nbytes -= 2) | |
2629 | + { | |
2630 | + status = (*info->read_memory_func) (memaddr, buffer, nbytes, info); | |
2631 | + if (status == 0) | |
2632 | + break; | |
2633 | + } | |
2634 | + | |
2635 | + /* If we did not get all we asked for, then clear the rest. | |
2636 | + Hopefully this makes a reproducible result in case of errors. */ | |
2637 | + if (nbytes != MAX_BYTES_PER_CRIS_INSN) | |
2638 | + memset (buffer + nbytes, 0, MAX_BYTES_PER_CRIS_INSN - nbytes); | |
2639 | + | |
2640 | + addr = memaddr; | |
2641 | + bufp = buffer; | |
2642 | + | |
2643 | + /* Set some defaults for the insn info. */ | |
2644 | + info->insn_info_valid = 1; | |
2645 | + info->branch_delay_insns = 0; | |
2646 | + info->data_size = 0; | |
2647 | + info->insn_type = dis_nonbranch; | |
2648 | + info->flags = 0; | |
2649 | + info->target = 0; | |
2650 | + info->target2 = 0; | |
2651 | + | |
2652 | + /* If we got any data, disassemble it. */ | |
2653 | + if (nbytes != 0) | |
2654 | + { | |
2655 | + matchedp = NULL; | |
2656 | + | |
2657 | + insn = bufp[0] + bufp[1] * 256; | |
2658 | + | |
2659 | + /* If we're in a case-table, don't disassemble the offsets. */ | |
2660 | + if (TRACE_CASE && case_offset_counter != 0) | |
2661 | + { | |
2662 | + info->insn_type = dis_noninsn; | |
2663 | + advance += 2; | |
2664 | + | |
2665 | + /* If to print data as offsets, then shortcut here. */ | |
2666 | + (*info->fprintf_func) (info->stream, "case %ld%s: -> ", | |
2667 | + case_offset + no_of_case_offsets | |
2668 | + - case_offset_counter, | |
2669 | + case_offset_counter == 1 ? "/default" : | |
2670 | + ""); | |
2671 | + | |
2672 | + (*info->print_address_func) ((bfd_vma) | |
2673 | + ((short) (insn) | |
2674 | + + (long) (addr | |
2675 | + - (no_of_case_offsets | |
2676 | + - case_offset_counter) | |
2677 | + * 2)), info); | |
2678 | + case_offset_counter--; | |
2679 | + | |
2680 | + /* The default case start (without a "sub" or "add") must be | |
2681 | + zero. */ | |
2682 | + if (case_offset_counter == 0) | |
2683 | + case_offset = 0; | |
2684 | + } | |
2685 | + else if (insn == 0) | |
2686 | + { | |
2687 | + /* We're often called to disassemble zeroes. While this is a | |
2688 | + valid "bcc .+2" insn, it is also useless enough and enough | |
2689 | + of a nuiscance that we will just output "bcc .+2" for it | |
2690 | + and signal it as a noninsn. */ | |
2691 | + (*info->fprintf_func) (info->stream, | |
2692 | + disdata->distype == cris_dis_v32 | |
2693 | + ? "bcc ." : "bcc .+2"); | |
2694 | + info->insn_type = dis_noninsn; | |
2695 | + advance += 2; | |
2696 | + } | |
2697 | + else | |
2698 | + { | |
2699 | + const struct cris_opcode *prefix_opcodep = NULL; | |
2700 | + unsigned char *prefix_buffer = bufp; | |
2701 | + unsigned int prefix_insn = insn; | |
2702 | + int prefix_size = 0; | |
2703 | + | |
2704 | + matchedp = get_opcode_entry (insn, NO_CRIS_PREFIX, disdata); | |
2705 | + | |
2706 | + /* Check if we're supposed to write out prefixes as address | |
2707 | + modes and if this was a prefix. */ | |
2708 | + if (matchedp != NULL && PARSE_PREFIX && matchedp->args[0] == 'p') | |
2709 | + { | |
2710 | + /* If it's a prefix, put it into the prefix vars and get the | |
2711 | + main insn. */ | |
2712 | + prefix_size = bytes_to_skip (prefix_insn, matchedp, | |
2713 | + disdata->distype, NULL); | |
2714 | + prefix_opcodep = matchedp; | |
2715 | + | |
2716 | + insn = bufp[prefix_size] + bufp[prefix_size + 1] * 256; | |
2717 | + matchedp = get_opcode_entry (insn, prefix_insn, disdata); | |
2718 | + | |
2719 | + if (matchedp != NULL) | |
2720 | + { | |
2721 | + addr += prefix_size; | |
2722 | + bufp += prefix_size; | |
2723 | + advance += prefix_size; | |
2724 | + } | |
2725 | + else | |
2726 | + { | |
2727 | + /* The "main" insn wasn't valid, at least not when | |
2728 | + prefixed. Put back things enough to output the | |
2729 | + prefix insn only, as a normal insn. */ | |
2730 | + matchedp = prefix_opcodep; | |
2731 | + insn = prefix_insn; | |
2732 | + prefix_opcodep = NULL; | |
2733 | + } | |
2734 | + } | |
2735 | + | |
2736 | + if (matchedp == NULL) | |
2737 | + { | |
2738 | + (*info->fprintf_func) (info->stream, "??0x%x", insn); | |
2739 | + advance += 2; | |
2740 | + | |
2741 | + info->insn_type = dis_noninsn; | |
2742 | + } | |
2743 | + else | |
2744 | + { | |
2745 | + advance | |
2746 | + += bytes_to_skip (insn, matchedp, disdata->distype, | |
2747 | + prefix_opcodep); | |
2748 | + | |
2749 | + /* The info_type and assorted fields will be set according | |
2750 | + to the operands. */ | |
2751 | + print_with_operands (matchedp, insn, bufp, addr, info, | |
2752 | + prefix_opcodep, prefix_insn, | |
2753 | + prefix_buffer, with_reg_prefix); | |
2754 | + } | |
2755 | + } | |
2756 | + } | |
2757 | + else | |
2758 | + info->insn_type = dis_noninsn; | |
2759 | + | |
2760 | + /* If we read less than MAX_BYTES_PER_CRIS_INSN, i.e. we got an error | |
2761 | + status when reading that much, and the insn decoding indicated a | |
2762 | + length exceeding what we read, there is an error. */ | |
2763 | + if (status != 0 && (nbytes == 0 || advance > nbytes)) | |
2764 | + { | |
2765 | + (*info->memory_error_func) (status, memaddr, info); | |
2766 | + return -1; | |
2767 | + } | |
2768 | + | |
2769 | + /* Max supported insn size with one folded prefix insn. */ | |
2770 | + info->bytes_per_line = MAX_BYTES_PER_CRIS_INSN; | |
2771 | + | |
2772 | + /* I would like to set this to a fixed value larger than the actual | |
2773 | + number of bytes to print in order to avoid spaces between bytes, | |
2774 | + but objdump.c (2.9.1) does not like that, so we print 16-bit | |
2775 | + chunks, which is the next choice. */ | |
2776 | + info->bytes_per_chunk = 2; | |
2777 | + | |
2778 | + /* Printing bytes in order of increasing addresses makes sense, | |
2779 | + especially on a little-endian target. | |
2780 | + This is completely the opposite of what you think; setting this to | |
2781 | + BFD_ENDIAN_LITTLE will print bytes in order N..0 rather than the 0..N | |
2782 | + we want. */ | |
2783 | + info->display_endian = BFD_ENDIAN_BIG; | |
2784 | + | |
2785 | + return advance; | |
2786 | +} | |
2787 | + | |
2788 | +/* Disassemble, prefixing register names with `$'. CRIS v0..v10. */ | |
2789 | +#if 0 | |
2790 | +static int | |
2791 | +print_insn_cris_with_register_prefix (bfd_vma vma, | |
2792 | + disassemble_info *info) | |
2793 | +{ | |
2794 | + if (info->private_data == NULL | |
2795 | + && !cris_parse_disassembler_options (info, cris_dis_v0_v10)) | |
2796 | + return -1; | |
2797 | + return print_insn_cris_generic (vma, info, TRUE); | |
2798 | +} | |
2799 | +#endif | |
2800 | +/* Disassemble, prefixing register names with `$'. CRIS v32. */ | |
2801 | + | |
2802 | +static int | |
2803 | +print_insn_crisv32_with_register_prefix (bfd_vma vma, | |
2804 | + disassemble_info *info) | |
2805 | +{ | |
2806 | + if (info->private_data == NULL | |
2807 | + && !cris_parse_disassembler_options (info, cris_dis_v32)) | |
2808 | + return -1; | |
2809 | + return print_insn_cris_generic (vma, info, TRUE); | |
2810 | +} | |
2811 | + | |
2812 | +#if 0 | |
2813 | +/* Disassemble, prefixing register names with `$'. | |
2814 | + Common v10 and v32 subset. */ | |
2815 | + | |
2816 | +static int | |
2817 | +print_insn_crisv10_v32_with_register_prefix (bfd_vma vma, | |
2818 | + disassemble_info *info) | |
2819 | +{ | |
2820 | + if (info->private_data == NULL | |
2821 | + && !cris_parse_disassembler_options (info, cris_dis_common_v10_v32)) | |
2822 | + return -1; | |
2823 | + return print_insn_cris_generic (vma, info, TRUE); | |
2824 | +} | |
2825 | + | |
2826 | +/* Disassemble, no prefixes on register names. CRIS v0..v10. */ | |
2827 | + | |
2828 | +static int | |
2829 | +print_insn_cris_without_register_prefix (bfd_vma vma, | |
2830 | + disassemble_info *info) | |
2831 | +{ | |
2832 | + if (info->private_data == NULL | |
2833 | + && !cris_parse_disassembler_options (info, cris_dis_v0_v10)) | |
2834 | + return -1; | |
2835 | + return print_insn_cris_generic (vma, info, FALSE); | |
2836 | +} | |
2837 | + | |
2838 | +/* Disassemble, no prefixes on register names. CRIS v32. */ | |
2839 | + | |
2840 | +static int | |
2841 | +print_insn_crisv32_without_register_prefix (bfd_vma vma, | |
2842 | + disassemble_info *info) | |
2843 | +{ | |
2844 | + if (info->private_data == NULL | |
2845 | + && !cris_parse_disassembler_options (info, cris_dis_v32)) | |
2846 | + return -1; | |
2847 | + return print_insn_cris_generic (vma, info, FALSE); | |
2848 | +} | |
2849 | + | |
2850 | +/* Disassemble, no prefixes on register names. | |
2851 | + Common v10 and v32 subset. */ | |
2852 | + | |
2853 | +static int | |
2854 | +print_insn_crisv10_v32_without_register_prefix (bfd_vma vma, | |
2855 | + disassemble_info *info) | |
2856 | +{ | |
2857 | + if (info->private_data == NULL | |
2858 | + && !cris_parse_disassembler_options (info, cris_dis_common_v10_v32)) | |
2859 | + return -1; | |
2860 | + return print_insn_cris_generic (vma, info, FALSE); | |
2861 | +} | |
2862 | +#endif | |
2863 | + | |
2864 | +int | |
2865 | +print_insn_crisv32 (bfd_vma vma, | |
2866 | + disassemble_info *info) | |
2867 | +{ | |
2868 | + return print_insn_crisv32_with_register_prefix(vma, info); | |
2869 | +} | |
2870 | + | |
2871 | +/* Return a disassembler-function that prints registers with a `$' prefix, | |
2872 | + or one that prints registers without a prefix. | |
2873 | + FIXME: We should improve the solution to avoid the multitude of | |
2874 | + functions seen above. */ | |
2875 | +#if 0 | |
2876 | +disassembler_ftype | |
2877 | +cris_get_disassembler (bfd *abfd) | |
2878 | +{ | |
2879 | + /* If there's no bfd in sight, we return what is valid as input in all | |
2880 | + contexts if fed back to the assembler: disassembly *with* register | |
2881 | + prefix. Unfortunately this will be totally wrong for v32. */ | |
2882 | + if (abfd == NULL) | |
2883 | + return print_insn_cris_with_register_prefix; | |
2884 | + | |
2885 | + if (bfd_get_symbol_leading_char (abfd) == 0) | |
2886 | + { | |
2887 | + if (bfd_get_mach (abfd) == bfd_mach_cris_v32) | |
2888 | + return print_insn_crisv32_with_register_prefix; | |
2889 | + if (bfd_get_mach (abfd) == bfd_mach_cris_v10_v32) | |
2890 | + return print_insn_crisv10_v32_with_register_prefix; | |
2891 | + | |
2892 | + /* We default to v10. This may be specifically specified in the | |
2893 | + bfd mach, but is also the default setting. */ | |
2894 | + return print_insn_cris_with_register_prefix; | |
2895 | + } | |
2896 | + | |
2897 | + if (bfd_get_mach (abfd) == bfd_mach_cris_v32) | |
2898 | + return print_insn_crisv32_without_register_prefix; | |
2899 | + if (bfd_get_mach (abfd) == bfd_mach_cris_v10_v32) | |
2900 | + return print_insn_crisv10_v32_without_register_prefix; | |
2901 | + return print_insn_cris_without_register_prefix; | |
2902 | +} | |
2903 | +#endif | |
2904 | +/* Local variables: | |
2905 | + eval: (c-set-style "gnu") | |
2906 | + indent-tabs-mode: t | |
2907 | + End: */ | ... | ... |
target-cris/opcode-cris.h
0 → 100644
1 | +/* cris.h -- Header file for CRIS opcode and register tables. | |
2 | + Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc. | |
3 | + Contributed by Axis Communications AB, Lund, Sweden. | |
4 | + Originally written for GAS 1.38.1 by Mikael Asker. | |
5 | + Updated, BFDized and GNUified by Hans-Peter Nilsson. | |
6 | + | |
7 | +This file is part of GAS, GDB and the GNU binutils. | |
8 | + | |
9 | +GAS, GDB, and GNU binutils is free software; you can redistribute it | |
10 | +and/or modify it under the terms of the GNU General Public License as | |
11 | +published by the Free Software Foundation; either version 2, or (at your | |
12 | +option) any later version. | |
13 | + | |
14 | +GAS, GDB, and GNU binutils are distributed in the hope that they will be | |
15 | +useful, but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | +GNU General Public License for more details. | |
18 | + | |
19 | +You should have received a copy of the GNU General Public License | |
20 | +along with this program; if not, write to the Free Software | |
21 | +Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ | |
22 | + | |
23 | +#ifndef __CRIS_H_INCLUDED_ | |
24 | +#define __CRIS_H_INCLUDED_ | |
25 | + | |
26 | +#if !defined(__STDC__) && !defined(const) | |
27 | +#define const | |
28 | +#endif | |
29 | + | |
30 | + | |
31 | +/* Registers. */ | |
32 | +#define MAX_REG (15) | |
33 | +#define REG_SP (14) | |
34 | +#define REG_PC (15) | |
35 | + | |
36 | +/* CPU version control of disassembly and assembly of instructions. | |
37 | + May affect how the instruction is assembled, at least the size of | |
38 | + immediate operands. */ | |
39 | +enum cris_insn_version_usage | |
40 | +{ | |
41 | + /* Any version. */ | |
42 | + cris_ver_version_all=0, | |
43 | + | |
44 | + /* Indeterminate (intended for disassembly only, or obsolete). */ | |
45 | + cris_ver_warning, | |
46 | + | |
47 | + /* Only for v0..3 (Etrax 1..4). */ | |
48 | + cris_ver_v0_3, | |
49 | + | |
50 | + /* Only for v3 or higher (ETRAX 4 and beyond). */ | |
51 | + cris_ver_v3p, | |
52 | + | |
53 | + /* Only for v8 (Etrax 100). */ | |
54 | + cris_ver_v8, | |
55 | + | |
56 | + /* Only for v8 or higher (ETRAX 100, ETRAX 100 LX). */ | |
57 | + cris_ver_v8p, | |
58 | + | |
59 | + /* Only for v0..10. FIXME: Not sure what to do with this. */ | |
60 | + cris_ver_sim_v0_10, | |
61 | + | |
62 | + /* Only for v0..10. */ | |
63 | + cris_ver_v0_10, | |
64 | + | |
65 | + /* Only for v3..10. (ETRAX 4, ETRAX 100 and ETRAX 100 LX). */ | |
66 | + cris_ver_v3_10, | |
67 | + | |
68 | + /* Only for v8..10 (ETRAX 100 and ETRAX 100 LX). */ | |
69 | + cris_ver_v8_10, | |
70 | + | |
71 | + /* Only for v10 (ETRAX 100 LX) and same series. */ | |
72 | + cris_ver_v10, | |
73 | + | |
74 | + /* Only for v10 (ETRAX 100 LX) and same series. */ | |
75 | + cris_ver_v10p, | |
76 | + | |
77 | + /* Only for v32 or higher (codename GUINNESS). | |
78 | + Of course some or all these of may change to cris_ver_v32p if/when | |
79 | + there's a new revision. */ | |
80 | + cris_ver_v32p | |
81 | +}; | |
82 | + | |
83 | + | |
84 | +/* Special registers. */ | |
85 | +struct cris_spec_reg | |
86 | +{ | |
87 | + const char *const name; | |
88 | + unsigned int number; | |
89 | + | |
90 | + /* The size of the register. */ | |
91 | + unsigned int reg_size; | |
92 | + | |
93 | + /* What CPU version the special register of that name is implemented | |
94 | + in. If cris_ver_warning, emit an unimplemented-warning. */ | |
95 | + enum cris_insn_version_usage applicable_version; | |
96 | + | |
97 | + /* There might be a specific warning for using a special register | |
98 | + here. */ | |
99 | + const char *const warning; | |
100 | +}; | |
101 | +extern const struct cris_spec_reg cris_spec_regs[]; | |
102 | + | |
103 | + | |
104 | +/* Support registers (kind of special too, but not named as such). */ | |
105 | +struct cris_support_reg | |
106 | +{ | |
107 | + const char *const name; | |
108 | + unsigned int number; | |
109 | +}; | |
110 | +extern const struct cris_support_reg cris_support_regs[]; | |
111 | + | |
112 | +struct cris_cond15 | |
113 | +{ | |
114 | + /* The name of the condition. */ | |
115 | + const char *const name; | |
116 | + | |
117 | + /* What CPU version this condition name applies to. */ | |
118 | + enum cris_insn_version_usage applicable_version; | |
119 | +}; | |
120 | +extern const struct cris_cond15 cris_conds15[]; | |
121 | + | |
122 | +/* Opcode-dependent constants. */ | |
123 | +#define AUTOINCR_BIT (0x04) | |
124 | + | |
125 | +/* Prefixes. */ | |
126 | +#define BDAP_QUICK_OPCODE (0x0100) | |
127 | +#define BDAP_QUICK_Z_BITS (0x0e00) | |
128 | + | |
129 | +#define BIAP_OPCODE (0x0540) | |
130 | +#define BIAP_Z_BITS (0x0a80) | |
131 | + | |
132 | +#define DIP_OPCODE (0x0970) | |
133 | +#define DIP_Z_BITS (0xf280) | |
134 | + | |
135 | +#define BDAP_INDIR_LOW (0x40) | |
136 | +#define BDAP_INDIR_LOW_Z (0x80) | |
137 | +#define BDAP_INDIR_HIGH (0x09) | |
138 | +#define BDAP_INDIR_HIGH_Z (0x02) | |
139 | + | |
140 | +#define BDAP_INDIR_OPCODE (BDAP_INDIR_HIGH * 0x0100 + BDAP_INDIR_LOW) | |
141 | +#define BDAP_INDIR_Z_BITS (BDAP_INDIR_HIGH_Z * 0x100 + BDAP_INDIR_LOW_Z) | |
142 | +#define BDAP_PC_LOW (BDAP_INDIR_LOW + REG_PC) | |
143 | +#define BDAP_INCR_HIGH (BDAP_INDIR_HIGH + AUTOINCR_BIT) | |
144 | + | |
145 | +/* No prefix must have this code for its "match" bits in the | |
146 | + opcode-table. "BCC .+2" will do nicely. */ | |
147 | +#define NO_CRIS_PREFIX 0 | |
148 | + | |
149 | +/* Definitions for condition codes. */ | |
150 | +#define CC_CC 0x0 | |
151 | +#define CC_HS 0x0 | |
152 | +#define CC_CS 0x1 | |
153 | +#define CC_LO 0x1 | |
154 | +#define CC_NE 0x2 | |
155 | +#define CC_EQ 0x3 | |
156 | +#define CC_VC 0x4 | |
157 | +#define CC_VS 0x5 | |
158 | +#define CC_PL 0x6 | |
159 | +#define CC_MI 0x7 | |
160 | +#define CC_LS 0x8 | |
161 | +#define CC_HI 0x9 | |
162 | +#define CC_GE 0xA | |
163 | +#define CC_LT 0xB | |
164 | +#define CC_GT 0xC | |
165 | +#define CC_LE 0xD | |
166 | +#define CC_A 0xE | |
167 | +#define CC_EXT 0xF | |
168 | + | |
169 | +/* A table of strings "cc", "cs"... indexed with condition code | |
170 | + values as above. */ | |
171 | +extern const char *const cris_cc_strings[]; | |
172 | + | |
173 | +/* Bcc quick. */ | |
174 | +#define BRANCH_QUICK_LOW (0) | |
175 | +#define BRANCH_QUICK_HIGH (0) | |
176 | +#define BRANCH_QUICK_OPCODE (BRANCH_QUICK_HIGH * 0x0100 + BRANCH_QUICK_LOW) | |
177 | +#define BRANCH_QUICK_Z_BITS (0x0F00) | |
178 | + | |
179 | +/* BA quick. */ | |
180 | +#define BA_QUICK_HIGH (BRANCH_QUICK_HIGH + CC_A * 0x10) | |
181 | +#define BA_QUICK_OPCODE (BA_QUICK_HIGH * 0x100 + BRANCH_QUICK_LOW) | |
182 | + | |
183 | +/* Bcc [PC+]. */ | |
184 | +#define BRANCH_PC_LOW (0xFF) | |
185 | +#define BRANCH_INCR_HIGH (0x0D) | |
186 | +#define BA_PC_INCR_OPCODE \ | |
187 | + ((BRANCH_INCR_HIGH + CC_A * 0x10) * 0x0100 + BRANCH_PC_LOW) | |
188 | + | |
189 | +/* Jump. */ | |
190 | +/* Note that old versions generated special register 8 (in high bits) | |
191 | + and not-that-old versions recognized it as a jump-instruction. | |
192 | + That opcode now belongs to JUMPU. */ | |
193 | +#define JUMP_INDIR_OPCODE (0x0930) | |
194 | +#define JUMP_INDIR_Z_BITS (0xf2c0) | |
195 | +#define JUMP_PC_INCR_OPCODE \ | |
196 | + (JUMP_INDIR_OPCODE + AUTOINCR_BIT * 0x0100 + REG_PC) | |
197 | + | |
198 | +#define MOVE_M_TO_PREG_OPCODE 0x0a30 | |
199 | +#define MOVE_M_TO_PREG_ZBITS 0x01c0 | |
200 | + | |
201 | +/* BDAP.D N,PC. */ | |
202 | +#define MOVE_PC_INCR_OPCODE_PREFIX \ | |
203 | + (((BDAP_INCR_HIGH | (REG_PC << 4)) << 8) | BDAP_PC_LOW | (2 << 4)) | |
204 | +#define MOVE_PC_INCR_OPCODE_SUFFIX \ | |
205 | + (MOVE_M_TO_PREG_OPCODE | REG_PC | (AUTOINCR_BIT << 8)) | |
206 | + | |
207 | +#define JUMP_PC_INCR_OPCODE_V32 (0x0DBF) | |
208 | + | |
209 | +/* BA DWORD (V32). */ | |
210 | +#define BA_DWORD_OPCODE (0x0EBF) | |
211 | + | |
212 | +/* Nop. */ | |
213 | +#define NOP_OPCODE (0x050F) | |
214 | +#define NOP_Z_BITS (0xFFFF ^ NOP_OPCODE) | |
215 | + | |
216 | +#define NOP_OPCODE_V32 (0x05B0) | |
217 | +#define NOP_Z_BITS_V32 (0xFFFF ^ NOP_OPCODE_V32) | |
218 | + | |
219 | +/* For the compatibility mode, let's use "MOVE R0,P0". Doesn't affect | |
220 | + registers or flags. Unfortunately shuts off interrupts for one cycle | |
221 | + for < v32, but there doesn't seem to be any alternative without that | |
222 | + effect. */ | |
223 | +#define NOP_OPCODE_COMMON (0x630) | |
224 | +#define NOP_OPCODE_ZBITS_COMMON (0xffff & ~NOP_OPCODE_COMMON) | |
225 | + | |
226 | +/* LAPC.D */ | |
227 | +#define LAPC_DWORD_OPCODE (0x0D7F) | |
228 | +#define LAPC_DWORD_Z_BITS (0x0fff & ~LAPC_DWORD_OPCODE) | |
229 | + | |
230 | +/* Structure of an opcode table entry. */ | |
231 | +enum cris_imm_oprnd_size_type | |
232 | +{ | |
233 | + /* No size is applicable. */ | |
234 | + SIZE_NONE, | |
235 | + | |
236 | + /* Always 32 bits. */ | |
237 | + SIZE_FIX_32, | |
238 | + | |
239 | + /* Indicated by size of special register. */ | |
240 | + SIZE_SPEC_REG, | |
241 | + | |
242 | + /* Indicated by size field, signed. */ | |
243 | + SIZE_FIELD_SIGNED, | |
244 | + | |
245 | + /* Indicated by size field, unsigned. */ | |
246 | + SIZE_FIELD_UNSIGNED, | |
247 | + | |
248 | + /* Indicated by size field, no sign implied. */ | |
249 | + SIZE_FIELD | |
250 | +}; | |
251 | + | |
252 | +/* For GDB. FIXME: Is this the best way to handle opcode | |
253 | + interpretation? */ | |
254 | +enum cris_op_type | |
255 | +{ | |
256 | + cris_not_implemented_op = 0, | |
257 | + cris_abs_op, | |
258 | + cris_addi_op, | |
259 | + cris_asr_op, | |
260 | + cris_asrq_op, | |
261 | + cris_ax_ei_setf_op, | |
262 | + cris_bdap_prefix, | |
263 | + cris_biap_prefix, | |
264 | + cris_break_op, | |
265 | + cris_btst_nop_op, | |
266 | + cris_clearf_di_op, | |
267 | + cris_dip_prefix, | |
268 | + cris_dstep_logshift_mstep_neg_not_op, | |
269 | + cris_eight_bit_offset_branch_op, | |
270 | + cris_move_mem_to_reg_movem_op, | |
271 | + cris_move_reg_to_mem_movem_op, | |
272 | + cris_move_to_preg_op, | |
273 | + cris_muls_op, | |
274 | + cris_mulu_op, | |
275 | + cris_none_reg_mode_add_sub_cmp_and_or_move_op, | |
276 | + cris_none_reg_mode_clear_test_op, | |
277 | + cris_none_reg_mode_jump_op, | |
278 | + cris_none_reg_mode_move_from_preg_op, | |
279 | + cris_quick_mode_add_sub_op, | |
280 | + cris_quick_mode_and_cmp_move_or_op, | |
281 | + cris_quick_mode_bdap_prefix, | |
282 | + cris_reg_mode_add_sub_cmp_and_or_move_op, | |
283 | + cris_reg_mode_clear_op, | |
284 | + cris_reg_mode_jump_op, | |
285 | + cris_reg_mode_move_from_preg_op, | |
286 | + cris_reg_mode_test_op, | |
287 | + cris_scc_op, | |
288 | + cris_sixteen_bit_offset_branch_op, | |
289 | + cris_three_operand_add_sub_cmp_and_or_op, | |
290 | + cris_three_operand_bound_op, | |
291 | + cris_two_operand_bound_op, | |
292 | + cris_xor_op | |
293 | +}; | |
294 | + | |
295 | +struct cris_opcode | |
296 | +{ | |
297 | + /* The name of the insn. */ | |
298 | + const char *name; | |
299 | + | |
300 | + /* Bits that must be 1 for a match. */ | |
301 | + unsigned int match; | |
302 | + | |
303 | + /* Bits that must be 0 for a match. */ | |
304 | + unsigned int lose; | |
305 | + | |
306 | + /* See the table in "opcodes/cris-opc.c". */ | |
307 | + const char *args; | |
308 | + | |
309 | + /* Nonzero if this is a delayed branch instruction. */ | |
310 | + char delayed; | |
311 | + | |
312 | + /* Size of immediate operands. */ | |
313 | + enum cris_imm_oprnd_size_type imm_oprnd_size; | |
314 | + | |
315 | + /* Indicates which version this insn was first implemented in. */ | |
316 | + enum cris_insn_version_usage applicable_version; | |
317 | + | |
318 | + /* What kind of operation this is. */ | |
319 | + enum cris_op_type op; | |
320 | +}; | |
321 | +extern const struct cris_opcode cris_opcodes[]; | |
322 | + | |
323 | + | |
324 | +/* These macros are for the target-specific flags in disassemble_info | |
325 | + used at disassembly. */ | |
326 | + | |
327 | +/* This insn accesses memory. This flag is more trustworthy than | |
328 | + checking insn_type for "dis_dref" which does not work for | |
329 | + e.g. "JSR [foo]". */ | |
330 | +#define CRIS_DIS_FLAG_MEMREF (1 << 0) | |
331 | + | |
332 | +/* The "target" field holds a register number. */ | |
333 | +#define CRIS_DIS_FLAG_MEM_TARGET_IS_REG (1 << 1) | |
334 | + | |
335 | +/* The "target2" field holds a register number; add it to "target". */ | |
336 | +#define CRIS_DIS_FLAG_MEM_TARGET2_IS_REG (1 << 2) | |
337 | + | |
338 | +/* Yet another add-on: the register in "target2" must be multiplied | |
339 | + by 2 before adding to "target". */ | |
340 | +#define CRIS_DIS_FLAG_MEM_TARGET2_MULT2 (1 << 3) | |
341 | + | |
342 | +/* Yet another add-on: the register in "target2" must be multiplied | |
343 | + by 4 (mutually exclusive with .._MULT2). */ | |
344 | +#define CRIS_DIS_FLAG_MEM_TARGET2_MULT4 (1 << 4) | |
345 | + | |
346 | +/* The register in "target2" is an indirect memory reference (of the | |
347 | + register there), add to "target". Assumed size is dword (mutually | |
348 | + exclusive with .._MULT[24]). */ | |
349 | +#define CRIS_DIS_FLAG_MEM_TARGET2_MEM (1 << 5) | |
350 | + | |
351 | +/* Add-on to CRIS_DIS_FLAG_MEM_TARGET2_MEM; the memory access is "byte"; | |
352 | + sign-extended before adding to "target". */ | |
353 | +#define CRIS_DIS_FLAG_MEM_TARGET2_MEM_BYTE (1 << 6) | |
354 | + | |
355 | +/* Add-on to CRIS_DIS_FLAG_MEM_TARGET2_MEM; the memory access is "word"; | |
356 | + sign-extended before adding to "target". */ | |
357 | +#define CRIS_DIS_FLAG_MEM_TARGET2_MEM_WORD (1 << 7) | |
358 | + | |
359 | +#endif /* __CRIS_H_INCLUDED_ */ | |
360 | + | |
361 | +/* | |
362 | + * Local variables: | |
363 | + * eval: (c-set-style "gnu") | |
364 | + * indent-tabs-mode: t | |
365 | + * End: | |
366 | + */ | ... | ... |