?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
2011-03-25 Tristan Gingold <gingold@adacore.com>
[binutils.git] / opcodes / bfin-dis.c
blob130dfc7719e5b4bc42517eea0a76445992ce59ba
1 /* Disassemble ADI Blackfin Instructions.
2 Copyright 2005, 2006, 2007, 2008, 2009, 2010, 2011
3 Free Software Foundation, Inc.
4
5 This file is part of libopcodes.
6
7 This library is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3, or (at your option)
10 any later version.
11
12 It is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
15 License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
21
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25
26 #include "opcode/bfin.h"
27
28 #ifndef PRINTF
29 #define PRINTF printf
30 #endif
31
32 #ifndef EXIT
33 #define EXIT exit
34 #endif
35
36 typedef long TIword;
37
38 #define HOST_LONG_WORD_SIZE (sizeof (long) * 8)
39 #define XFIELD(w,p,s) (((w) & ((1 << (s)) - 1) << (p)) >> (p))
40 #define SIGNEXTEND(v, n) ((v << (HOST_LONG_WORD_SIZE - (n))) >> (HOST_LONG_WORD_SIZE - (n)))
41 #define MASKBITS(val, bits) (val & ((1 << bits) - 1))
42
43 #include "dis-asm.h"
44
45 typedef unsigned int bu32;
46
47 static char comment = 0;
48 static char parallel = 0;
49
50 typedef enum
51 {
52 c_0, c_1, c_4, c_2, c_uimm2, c_uimm3, c_imm3, c_pcrel4,
53 c_imm4, c_uimm4s4, c_uimm4s4d, c_uimm4, c_uimm4s2, c_negimm5s4, c_imm5, c_imm5d, c_uimm5, c_imm6,
54 c_imm7, c_imm7d, c_imm8, c_uimm8, c_pcrel8, c_uimm8s4, c_pcrel8s4, c_lppcrel10, c_pcrel10,
55 c_pcrel12, c_imm16s4, c_luimm16, c_imm16, c_imm16d, c_huimm16, c_rimm16, c_imm16s2, c_uimm16s4,
56 c_uimm16s4d, c_uimm16, c_pcrel24, c_uimm32, c_imm32, c_huimm32, c_huimm32e,
57 } const_forms_t;
58
59 static const struct
60 {
61 const char *name;
62 const int nbits;
63 const char reloc;
64 const char issigned;
65 const char pcrel;
66 const char scale;
67 const char offset;
68 const char negative;
69 const char positive;
70 const char decimal;
71 const char leading;
72 const char exact;
73 } constant_formats[] =
74 {
75 { "0", 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
76 { "1", 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
77 { "4", 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
78 { "2", 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
79 { "uimm2", 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
80 { "uimm3", 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
81 { "imm3", 3, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
82 { "pcrel4", 4, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0},
83 { "imm4", 4, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
84 { "uimm4s4", 4, 0, 0, 0, 2, 0, 0, 1, 0, 0, 0},
85 { "uimm4s4d", 4, 0, 0, 0, 2, 0, 0, 1, 1, 0, 0},
86 { "uimm4", 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
87 { "uimm4s2", 4, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0},
88 { "negimm5s4", 5, 0, 1, 0, 2, 0, 1, 0, 0, 0, 0},
89 { "imm5", 5, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
90 { "imm5d", 5, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
91 { "uimm5", 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
92 { "imm6", 6, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
93 { "imm7", 7, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
94 { "imm7d", 7, 0, 1, 0, 0, 0, 0, 0, 1, 3, 0},
95 { "imm8", 8, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
96 { "uimm8", 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
97 { "pcrel8", 8, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0},
98 { "uimm8s4", 8, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0},
99 { "pcrel8s4", 8, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0},
100 { "lppcrel10", 10, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0},
101 { "pcrel10", 10, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0},
102 { "pcrel12", 12, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0},
103 { "imm16s4", 16, 0, 1, 0, 2, 0, 0, 0, 0, 0, 0},
104 { "luimm16", 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0},
105 { "imm16", 16, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
106 { "imm16d", 16, 0, 1, 0, 0, 0, 0, 0, 1, 3, 0},
107 { "huimm16", 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0},
108 { "rimm16", 16, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0},
109 { "imm16s2", 16, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0},
110 { "uimm16s4", 16, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0},
111 { "uimm16s4d", 16, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0},
112 { "uimm16", 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
113 { "pcrel24", 24, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0},
114 { "uimm32", 32, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
115 { "imm32", 32, 0, 1, 0, 0, 0, 0, 0, 1, 3, 0},
116 { "huimm32", 32, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0},
117 { "huimm32e", 32, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1},
118 };
119
120 static const char *
121 fmtconst (const_forms_t cf, TIword x, bfd_vma pc, disassemble_info *outf)
122 {
123 static char buf[60];
124
125 if (constant_formats[cf].reloc)
126 {
127 bfd_vma ea = (((constant_formats[cf].pcrel ? SIGNEXTEND (x, constant_formats[cf].nbits)
128 : x) + constant_formats[cf].offset) << constant_formats[cf].scale);
129 if (constant_formats[cf].pcrel)
130 ea += pc;
131
132 /* truncate to 32-bits for proper symbol lookup/matching */
133 ea = (bu32)ea;
134
135 if (outf->symbol_at_address_func (ea, outf) || !constant_formats[cf].exact)
136 {
137 outf->print_address_func (ea, outf);
138 return "";
139 }
140 else
141 {
142 sprintf (buf, "%lx", (unsigned long) x);
143 return buf;
144 }
145 }
146
147 /* Negative constants have an implied sign bit. */
148 if (constant_formats[cf].negative)
149 {
150 int nb = constant_formats[cf].nbits + 1;
151
152 x = x | (1 << constant_formats[cf].nbits);
153 x = SIGNEXTEND (x, nb);
154 }
155 else
156 x = constant_formats[cf].issigned ? SIGNEXTEND (x, constant_formats[cf].nbits) : x;
157
158 if (constant_formats[cf].offset)
159 x += constant_formats[cf].offset;
160
161 if (constant_formats[cf].scale)
162 x <<= constant_formats[cf].scale;
163
164 if (constant_formats[cf].decimal)
165 {
166 if (constant_formats[cf].leading)
167 {
168 char ps[10];
169 sprintf (ps, "%%%ii", constant_formats[cf].leading);
170 sprintf (buf, ps, x);
171 }
172 else
173 sprintf (buf, "%li", x);
174 }
175 else
176 {
177 if (constant_formats[cf].issigned && x < 0)
178 sprintf (buf, "-0x%x", abs (x));
179 else
180 sprintf (buf, "0x%lx", (unsigned long) x);
181 }
182
183 return buf;
184 }
185
186 static bu32
187 fmtconst_val (const_forms_t cf, unsigned int x, unsigned int pc)
188 {
189 if (0 && constant_formats[cf].reloc)
190 {
191 bu32 ea = (((constant_formats[cf].pcrel
192 ? SIGNEXTEND (x, constant_formats[cf].nbits)
193 : x) + constant_formats[cf].offset)
194 << constant_formats[cf].scale);
195 if (constant_formats[cf].pcrel)
196 ea += pc;
197
198 return ea;
199 }
200
201 /* Negative constants have an implied sign bit. */
202 if (constant_formats[cf].negative)
203 {
204 int nb = constant_formats[cf].nbits + 1;
205 x = x | (1 << constant_formats[cf].nbits);
206 x = SIGNEXTEND (x, nb);
207 }
208 else if (constant_formats[cf].issigned)
209 x = SIGNEXTEND (x, constant_formats[cf].nbits);
210
211 x += constant_formats[cf].offset;
212 x <<= constant_formats[cf].scale;
213
214 return x;
215 }
216
217 enum machine_registers
218 {
219 REG_RL0, REG_RL1, REG_RL2, REG_RL3, REG_RL4, REG_RL5, REG_RL6, REG_RL7,
220 REG_RH0, REG_RH1, REG_RH2, REG_RH3, REG_RH4, REG_RH5, REG_RH6, REG_RH7,
221 REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
222 REG_R1_0, REG_R3_2, REG_R5_4, REG_R7_6, REG_P0, REG_P1, REG_P2, REG_P3,
223 REG_P4, REG_P5, REG_SP, REG_FP, REG_A0x, REG_A1x, REG_A0w, REG_A1w,
224 REG_A0, REG_A1, REG_I0, REG_I1, REG_I2, REG_I3, REG_M0, REG_M1,
225 REG_M2, REG_M3, REG_B0, REG_B1, REG_B2, REG_B3, REG_L0, REG_L1,
226 REG_L2, REG_L3,
227 REG_AZ, REG_AN, REG_AC0, REG_AC1, REG_AV0, REG_AV1, REG_AV0S, REG_AV1S,
228 REG_AQ, REG_V, REG_VS,
229 REG_sftreset, REG_omode, REG_excause, REG_emucause, REG_idle_req, REG_hwerrcause, REG_CC, REG_LC0,
230 REG_LC1, REG_ASTAT, REG_RETS, REG_LT0, REG_LB0, REG_LT1, REG_LB1,
231 REG_CYCLES, REG_CYCLES2, REG_USP, REG_SEQSTAT, REG_SYSCFG, REG_RETI, REG_RETX, REG_RETN,
232 REG_RETE, REG_EMUDAT, REG_BR0, REG_BR1, REG_BR2, REG_BR3, REG_BR4, REG_BR5, REG_BR6,
233 REG_BR7, REG_PL0, REG_PL1, REG_PL2, REG_PL3, REG_PL4, REG_PL5, REG_SLP, REG_FLP,
234 REG_PH0, REG_PH1, REG_PH2, REG_PH3, REG_PH4, REG_PH5, REG_SHP, REG_FHP,
235 REG_IL0, REG_IL1, REG_IL2, REG_IL3, REG_ML0, REG_ML1, REG_ML2, REG_ML3,
236 REG_BL0, REG_BL1, REG_BL2, REG_BL3, REG_LL0, REG_LL1, REG_LL2, REG_LL3,
237 REG_IH0, REG_IH1, REG_IH2, REG_IH3, REG_MH0, REG_MH1, REG_MH2, REG_MH3,
238 REG_BH0, REG_BH1, REG_BH2, REG_BH3, REG_LH0, REG_LH1, REG_LH2, REG_LH3,
239 REG_AC0_COPY, REG_V_COPY, REG_RND_MOD,
240 REG_LASTREG,
241 };
242
243 enum reg_class
244 {
245 rc_dregs_lo, rc_dregs_hi, rc_dregs, rc_dregs_pair, rc_pregs, rc_spfp, rc_dregs_hilo, rc_accum_ext,
246 rc_accum_word, rc_accum, rc_iregs, rc_mregs, rc_bregs, rc_lregs, rc_dpregs, rc_gregs,
247 rc_regs, rc_statbits, rc_ignore_bits, rc_ccstat, rc_counters, rc_dregs2_sysregs1, rc_open, rc_sysregs2,
248 rc_sysregs3, rc_allregs,
249 LIM_REG_CLASSES
250 };
251
252 static const char * const reg_names[] =
253 {
254 "R0.L", "R1.L", "R2.L", "R3.L", "R4.L", "R5.L", "R6.L", "R7.L",
255 "R0.H", "R1.H", "R2.H", "R3.H", "R4.H", "R5.H", "R6.H", "R7.H",
256 "R0", "R1", "R2", "R3", "R4", "R5", "R6", "R7",
257 "R1:0", "R3:2", "R5:4", "R7:6", "P0", "P1", "P2", "P3",
258 "P4", "P5", "SP", "FP", "A0.X", "A1.X", "A0.W", "A1.W",
259 "A0", "A1", "I0", "I1", "I2", "I3", "M0", "M1",
260 "M2", "M3", "B0", "B1", "B2", "B3", "L0", "L1",
261 "L2", "L3",
262 "AZ", "AN", "AC0", "AC1", "AV0", "AV1", "AV0S", "AV1S",
263 "AQ", "V", "VS",
264 "sftreset", "omode", "excause", "emucause", "idle_req", "hwerrcause", "CC", "LC0",
265 "LC1", "ASTAT", "RETS", "LT0", "LB0", "LT1", "LB1",
266 "CYCLES", "CYCLES2", "USP", "SEQSTAT", "SYSCFG", "RETI", "RETX", "RETN",
267 "RETE", "EMUDAT",
268 "R0.B", "R1.B", "R2.B", "R3.B", "R4.B", "R5.B", "R6.B", "R7.B",
269 "P0.L", "P1.L", "P2.L", "P3.L", "P4.L", "P5.L", "SP.L", "FP.L",
270 "P0.H", "P1.H", "P2.H", "P3.H", "P4.H", "P5.H", "SP.H", "FP.H",
271 "I0.L", "I1.L", "I2.L", "I3.L", "M0.L", "M1.L", "M2.L", "M3.L",
272 "B0.L", "B1.L", "B2.L", "B3.L", "L0.L", "L1.L", "L2.L", "L3.L",
273 "I0.H", "I1.H", "I2.H", "I3.H", "M0.H", "M1.H", "M2.H", "M3.H",
274 "B0.H", "B1.H", "B2.H", "B3.H", "L0.H", "L1.H", "L2.H", "L3.H",
275 "AC0_COPY", "V_COPY", "RND_MOD",
276 "LASTREG",
277 0
278 };
279
280 #define REGNAME(x) ((x) < REG_LASTREG ? (reg_names[x]) : "...... Illegal register .......")
281
282 /* RL(0..7). */
283 static const enum machine_registers decode_dregs_lo[] =
284 {
285 REG_RL0, REG_RL1, REG_RL2, REG_RL3, REG_RL4, REG_RL5, REG_RL6, REG_RL7,
286 };
287
288 #define dregs_lo(x) REGNAME (decode_dregs_lo[(x) & 7])
289
290 /* RH(0..7). */
291 static const enum machine_registers decode_dregs_hi[] =
292 {
293 REG_RH0, REG_RH1, REG_RH2, REG_RH3, REG_RH4, REG_RH5, REG_RH6, REG_RH7,
294 };
295
296 #define dregs_hi(x) REGNAME (decode_dregs_hi[(x) & 7])
297
298 /* R(0..7). */
299 static const enum machine_registers decode_dregs[] =
300 {
301 REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
302 };
303
304 #define dregs(x) REGNAME (decode_dregs[(x) & 7])
305
306 /* R BYTE(0..7). */
307 static const enum machine_registers decode_dregs_byte[] =
308 {
309 REG_BR0, REG_BR1, REG_BR2, REG_BR3, REG_BR4, REG_BR5, REG_BR6, REG_BR7,
310 };
311
312 #define dregs_byte(x) REGNAME (decode_dregs_byte[(x) & 7])
313
314 /* P(0..5) SP FP. */
315 static const enum machine_registers decode_pregs[] =
316 {
317 REG_P0, REG_P1, REG_P2, REG_P3, REG_P4, REG_P5, REG_SP, REG_FP,
318 };
319
320 #define pregs(x) REGNAME (decode_pregs[(x) & 7])
321 #define spfp(x) REGNAME (decode_spfp[(x) & 1])
322 #define dregs_hilo(x, i) REGNAME (decode_dregs_hilo[((i) << 3) | (x)])
323 #define accum_ext(x) REGNAME (decode_accum_ext[(x) & 1])
324 #define accum_word(x) REGNAME (decode_accum_word[(x) & 1])
325 #define accum(x) REGNAME (decode_accum[(x) & 1])
326
327 /* I(0..3). */
328 static const enum machine_registers decode_iregs[] =
329 {
330 REG_I0, REG_I1, REG_I2, REG_I3,
331 };
332
333 #define iregs(x) REGNAME (decode_iregs[(x) & 3])
334
335 /* M(0..3). */
336 static const enum machine_registers decode_mregs[] =
337 {
338 REG_M0, REG_M1, REG_M2, REG_M3,
339 };
340
341 #define mregs(x) REGNAME (decode_mregs[(x) & 3])
342 #define bregs(x) REGNAME (decode_bregs[(x) & 3])
343 #define lregs(x) REGNAME (decode_lregs[(x) & 3])
344
345 /* dregs pregs. */
346 static const enum machine_registers decode_dpregs[] =
347 {
348 REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
349 REG_P0, REG_P1, REG_P2, REG_P3, REG_P4, REG_P5, REG_SP, REG_FP,
350 };
351
352 #define dpregs(x) REGNAME (decode_dpregs[(x) & 15])
353
354 /* [dregs pregs]. */
355 static const enum machine_registers decode_gregs[] =
356 {
357 REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
358 REG_P0, REG_P1, REG_P2, REG_P3, REG_P4, REG_P5, REG_SP, REG_FP,
359 };
360
361 #define gregs(x, i) REGNAME (decode_gregs[((i) << 3) | (x)])
362
363 /* [dregs pregs (iregs mregs) (bregs lregs)]. */
364 static const enum machine_registers decode_regs[] =
365 {
366 REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
367 REG_P0, REG_P1, REG_P2, REG_P3, REG_P4, REG_P5, REG_SP, REG_FP,
368 REG_I0, REG_I1, REG_I2, REG_I3, REG_M0, REG_M1, REG_M2, REG_M3,
369 REG_B0, REG_B1, REG_B2, REG_B3, REG_L0, REG_L1, REG_L2, REG_L3,
370 };
371
372 #define regs(x, i) REGNAME (decode_regs[((i) << 3) | (x)])
373
374 /* [dregs pregs (iregs mregs) (bregs lregs) Low Half]. */
375 static const enum machine_registers decode_regs_lo[] =
376 {
377 REG_RL0, REG_RL1, REG_RL2, REG_RL3, REG_RL4, REG_RL5, REG_RL6, REG_RL7,
378 REG_PL0, REG_PL1, REG_PL2, REG_PL3, REG_PL4, REG_PL5, REG_SLP, REG_FLP,
379 REG_IL0, REG_IL1, REG_IL2, REG_IL3, REG_ML0, REG_ML1, REG_ML2, REG_ML3,
380 REG_BL0, REG_BL1, REG_BL2, REG_BL3, REG_LL0, REG_LL1, REG_LL2, REG_LL3,
381 };
382
383 #define regs_lo(x, i) REGNAME (decode_regs_lo[((i) << 3) | (x)])
384
385 /* [dregs pregs (iregs mregs) (bregs lregs) High Half]. */
386 static const enum machine_registers decode_regs_hi[] =
387 {
388 REG_RH0, REG_RH1, REG_RH2, REG_RH3, REG_RH4, REG_RH5, REG_RH6, REG_RH7,
389 REG_PH0, REG_PH1, REG_PH2, REG_PH3, REG_PH4, REG_PH5, REG_SHP, REG_FHP,
390 REG_IH0, REG_IH1, REG_IH2, REG_IH3, REG_MH0, REG_MH1, REG_MH2, REG_MH3,
391 REG_BH0, REG_BH1, REG_BH2, REG_BH3, REG_LH0, REG_LH1, REG_LH2, REG_LH3,
392 };
393
394 #define regs_hi(x, i) REGNAME (decode_regs_hi[((i) << 3) | (x)])
395
396 static const enum machine_registers decode_statbits[] =
397 {
398 REG_AZ, REG_AN, REG_AC0_COPY, REG_V_COPY,
399 REG_LASTREG, REG_LASTREG, REG_AQ, REG_LASTREG,
400 REG_RND_MOD, REG_LASTREG, REG_LASTREG, REG_LASTREG,
401 REG_AC0, REG_AC1, REG_LASTREG, REG_LASTREG,
402 REG_AV0, REG_AV0S, REG_AV1, REG_AV1S,
403 REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG,
404 REG_V, REG_VS, REG_LASTREG, REG_LASTREG,
405 REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG,
406 };
407
408 #define statbits(x) REGNAME (decode_statbits[(x) & 31])
409
410 /* LC0 LC1. */
411 static const enum machine_registers decode_counters[] =
412 {
413 REG_LC0, REG_LC1,
414 };
415
416 #define counters(x) REGNAME (decode_counters[(x) & 1])
417 #define dregs2_sysregs1(x) REGNAME (decode_dregs2_sysregs1[(x) & 7])
418
419 /* [dregs pregs (iregs mregs) (bregs lregs)
420 dregs2_sysregs1 open sysregs2 sysregs3]. */
421 static const enum machine_registers decode_allregs[] =
422 {
423 REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
424 REG_P0, REG_P1, REG_P2, REG_P3, REG_P4, REG_P5, REG_SP, REG_FP,
425 REG_I0, REG_I1, REG_I2, REG_I3, REG_M0, REG_M1, REG_M2, REG_M3,
426 REG_B0, REG_B1, REG_B2, REG_B3, REG_L0, REG_L1, REG_L2, REG_L3,
427 REG_A0x, REG_A0w, REG_A1x, REG_A1w, REG_LASTREG, REG_LASTREG, REG_ASTAT, REG_RETS,
428 REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG, REG_LASTREG,
429 REG_LC0, REG_LT0, REG_LB0, REG_LC1, REG_LT1, REG_LB1, REG_CYCLES, REG_CYCLES2,
430 REG_USP, REG_SEQSTAT, REG_SYSCFG, REG_RETI, REG_RETX, REG_RETN, REG_RETE, REG_EMUDAT,
431 REG_LASTREG,
432 };
433
434 #define IS_DREG(g,r) ((g) == 0 && (r) < 8)
435 #define IS_PREG(g,r) ((g) == 1 && (r) < 8)
436 #define IS_AREG(g,r) ((g) == 4 && (r) >= 0 && (r) < 4)
437 #define IS_GENREG(g,r) ((((g) == 0 || (g) == 1) && (r) < 8) || IS_AREG (g, r))
438 #define IS_DAGREG(g,r) (((g) == 2 || (g) == 3) && (r) < 8)
439 #define IS_SYSREG(g,r) \
440 (((g) == 4 && ((r) == 6 || (r) == 7)) || (g) == 6 || (g) == 7)
441 #define IS_RESERVEDREG(g,r) \
442 (((r) > 7) || ((g) == 4 && ((r) == 4 || (r) == 5)) || (g) == 5)
443
444 #define allreg(r,g) (!IS_RESERVEDREG (g, r))
445 #define mostreg(r,g) (!(IS_DREG (g, r) || IS_PREG (g, r) || IS_RESERVEDREG (g, r)))
446
447 #define allregs(x, i) REGNAME (decode_allregs[((i) << 3) | (x)])
448 #define uimm16s4(x) fmtconst (c_uimm16s4, x, 0, outf)
449 #define uimm16s4d(x) fmtconst (c_uimm16s4d, x, 0, outf)
450 #define pcrel4(x) fmtconst (c_pcrel4, x, pc, outf)
451 #define pcrel8(x) fmtconst (c_pcrel8, x, pc, outf)
452 #define pcrel8s4(x) fmtconst (c_pcrel8s4, x, pc, outf)
453 #define pcrel10(x) fmtconst (c_pcrel10, x, pc, outf)
454 #define pcrel12(x) fmtconst (c_pcrel12, x, pc, outf)
455 #define negimm5s4(x) fmtconst (c_negimm5s4, x, 0, outf)
456 #define rimm16(x) fmtconst (c_rimm16, x, 0, outf)
457 #define huimm16(x) fmtconst (c_huimm16, x, 0, outf)
458 #define imm16(x) fmtconst (c_imm16, x, 0, outf)
459 #define imm16d(x) fmtconst (c_imm16d, x, 0, outf)
460 #define uimm2(x) fmtconst (c_uimm2, x, 0, outf)
461 #define uimm3(x) fmtconst (c_uimm3, x, 0, outf)
462 #define luimm16(x) fmtconst (c_luimm16, x, 0, outf)
463 #define uimm4(x) fmtconst (c_uimm4, x, 0, outf)
464 #define uimm5(x) fmtconst (c_uimm5, x, 0, outf)
465 #define imm16s2(x) fmtconst (c_imm16s2, x, 0, outf)
466 #define uimm8(x) fmtconst (c_uimm8, x, 0, outf)
467 #define imm16s4(x) fmtconst (c_imm16s4, x, 0, outf)
468 #define uimm4s2(x) fmtconst (c_uimm4s2, x, 0, outf)
469 #define uimm4s4(x) fmtconst (c_uimm4s4, x, 0, outf)
470 #define uimm4s4d(x) fmtconst (c_uimm4s4d, x, 0, outf)
471 #define lppcrel10(x) fmtconst (c_lppcrel10, x, pc, outf)
472 #define imm3(x) fmtconst (c_imm3, x, 0, outf)
473 #define imm4(x) fmtconst (c_imm4, x, 0, outf)
474 #define uimm8s4(x) fmtconst (c_uimm8s4, x, 0, outf)
475 #define imm5(x) fmtconst (c_imm5, x, 0, outf)
476 #define imm5d(x) fmtconst (c_imm5d, x, 0, outf)
477 #define imm6(x) fmtconst (c_imm6, x, 0, outf)
478 #define imm7(x) fmtconst (c_imm7, x, 0, outf)
479 #define imm7d(x) fmtconst (c_imm7d, x, 0, outf)
480 #define imm8(x) fmtconst (c_imm8, x, 0, outf)
481 #define pcrel24(x) fmtconst (c_pcrel24, x, pc, outf)
482 #define uimm16(x) fmtconst (c_uimm16, x, 0, outf)
483 #define uimm32(x) fmtconst (c_uimm32, x, 0, outf)
484 #define imm32(x) fmtconst (c_imm32, x, 0, outf)
485 #define huimm32(x) fmtconst (c_huimm32, x, 0, outf)
486 #define huimm32e(x) fmtconst (c_huimm32e, x, 0, outf)
487 #define imm7_val(x) fmtconst_val (c_imm7, x, 0)
488 #define imm16_val(x) fmtconst_val (c_uimm16, x, 0)
489 #define luimm16_val(x) fmtconst_val (c_luimm16, x, 0)
490
491 /* (arch.pm)arch_disassembler_functions. */
492 #ifndef OUTS
493 #define OUTS(p, txt) (p)->fprintf_func ((p)->stream, "%s", txt)
494 #endif
495
496 static void
497 amod0 (int s0, int x0, disassemble_info *outf)
498 {
499 if (s0 == 1 && x0 == 0)
500 OUTS (outf, " (S)");
501 else if (s0 == 0 && x0 == 1)
502 OUTS (outf, " (CO)");
503 else if (s0 == 1 && x0 == 1)
504 OUTS (outf, " (SCO)");
505 }
506
507 static void
508 amod1 (int s0, int x0, disassemble_info *outf)
509 {
510 if (s0 == 0 && x0 == 0)
511 OUTS (outf, " (NS)");
512 else if (s0 == 1 && x0 == 0)
513 OUTS (outf, " (S)");
514 }
515
516 static void
517 amod0amod2 (int s0, int x0, int aop0, disassemble_info *outf)
518 {
519 if (s0 == 1 && x0 == 0 && aop0 == 0)
520 OUTS (outf, " (S)");
521 else if (s0 == 0 && x0 == 1 && aop0 == 0)
522 OUTS (outf, " (CO)");
523 else if (s0 == 1 && x0 == 1 && aop0 == 0)
524 OUTS (outf, " (SCO)");
525 else if (s0 == 0 && x0 == 0 && aop0 == 2)
526 OUTS (outf, " (ASR)");
527 else if (s0 == 1 && x0 == 0 && aop0 == 2)
528 OUTS (outf, " (S, ASR)");
529 else if (s0 == 0 && x0 == 1 && aop0 == 2)
530 OUTS (outf, " (CO, ASR)");
531 else if (s0 == 1 && x0 == 1 && aop0 == 2)
532 OUTS (outf, " (SCO, ASR)");
533 else if (s0 == 0 && x0 == 0 && aop0 == 3)
534 OUTS (outf, " (ASL)");
535 else if (s0 == 1 && x0 == 0 && aop0 == 3)
536 OUTS (outf, " (S, ASL)");
537 else if (s0 == 0 && x0 == 1 && aop0 == 3)
538 OUTS (outf, " (CO, ASL)");
539 else if (s0 == 1 && x0 == 1 && aop0 == 3)
540 OUTS (outf, " (SCO, ASL)");
541 }
542
543 static void
544 searchmod (int r0, disassemble_info *outf)
545 {
546 if (r0 == 0)
547 OUTS (outf, "GT");
548 else if (r0 == 1)
549 OUTS (outf, "GE");
550 else if (r0 == 2)
551 OUTS (outf, "LT");
552 else if (r0 == 3)
553 OUTS (outf, "LE");
554 }
555
556 static void
557 aligndir (int r0, disassemble_info *outf)
558 {
559 if (r0 == 1)
560 OUTS (outf, " (R)");
561 }
562
563 static int
564 decode_multfunc (int h0, int h1, int src0, int src1, disassemble_info *outf)
565 {
566 const char *s0, *s1;
567
568 if (h0)
569 s0 = dregs_hi (src0);
570 else
571 s0 = dregs_lo (src0);
572
573 if (h1)
574 s1 = dregs_hi (src1);
575 else
576 s1 = dregs_lo (src1);
577
578 OUTS (outf, s0);
579 OUTS (outf, " * ");
580 OUTS (outf, s1);
581 return 0;
582 }
583
584 static int
585 decode_macfunc (int which, int op, int h0, int h1, int src0, int src1, disassemble_info *outf)
586 {
587 const char *a;
588 const char *sop = "<unknown op>";
589
590 if (which)
591 a = "A1";
592 else
593 a = "A0";
594
595 if (op == 3)
596 {
597 OUTS (outf, a);
598 return 0;
599 }
600
601 switch (op)
602 {
603 case 0: sop = " = "; break;
604 case 1: sop = " += "; break;
605 case 2: sop = " -= "; break;
606 default: break;
607 }
608
609 OUTS (outf, a);
610 OUTS (outf, sop);
611 decode_multfunc (h0, h1, src0, src1, outf);
612
613 return 0;
614 }
615
616 static void
617 decode_optmode (int mod, int MM, disassemble_info *outf)
618 {
619 if (mod == 0 && MM == 0)
620 return;
621
622 OUTS (outf, " (");
623
624 if (MM && !mod)
625 {
626 OUTS (outf, "M)");
627 return;
628 }
629
630 if (MM)
631 OUTS (outf, "M, ");
632
633 if (mod == M_S2RND)
634 OUTS (outf, "S2RND");
635 else if (mod == M_T)
636 OUTS (outf, "T");
637 else if (mod == M_W32)
638 OUTS (outf, "W32");
639 else if (mod == M_FU)
640 OUTS (outf, "FU");
641 else if (mod == M_TFU)
642 OUTS (outf, "TFU");
643 else if (mod == M_IS)
644 OUTS (outf, "IS");
645 else if (mod == M_ISS2)
646 OUTS (outf, "ISS2");
647 else if (mod == M_IH)
648 OUTS (outf, "IH");
649 else if (mod == M_IU)
650 OUTS (outf, "IU");
651 else
652 abort ();
653
654 OUTS (outf, ")");
655 }
656
657 static struct saved_state
658 {
659 bu32 dpregs[16], iregs[4], mregs[4], bregs[4], lregs[4];
660 bu32 ax[2], aw[2];
661 bu32 lt[2], lc[2], lb[2];
662 bu32 rets;
663 } saved_state;
664
665 #define DREG(x) (saved_state.dpregs[x])
666 #define GREG(x, i) DPREG ((x) | ((i) << 3))
667 #define DPREG(x) (saved_state.dpregs[x])
668 #define DREG(x) (saved_state.dpregs[x])
669 #define PREG(x) (saved_state.dpregs[(x) + 8])
670 #define SPREG PREG (6)
671 #define FPREG PREG (7)
672 #define IREG(x) (saved_state.iregs[x])
673 #define MREG(x) (saved_state.mregs[x])
674 #define BREG(x) (saved_state.bregs[x])
675 #define LREG(x) (saved_state.lregs[x])
676 #define AXREG(x) (saved_state.ax[x])
677 #define AWREG(x) (saved_state.aw[x])
678 #define LCREG(x) (saved_state.lc[x])
679 #define LTREG(x) (saved_state.lt[x])
680 #define LBREG(x) (saved_state.lb[x])
681 #define RETSREG (saved_state.rets)
682
683 static bu32 *
684 get_allreg (int grp, int reg)
685 {
686 int fullreg = (grp << 3) | reg;
687 /* REG_R0, REG_R1, REG_R2, REG_R3, REG_R4, REG_R5, REG_R6, REG_R7,
688 REG_P0, REG_P1, REG_P2, REG_P3, REG_P4, REG_P5, REG_SP, REG_FP,
689 REG_I0, REG_I1, REG_I2, REG_I3, REG_M0, REG_M1, REG_M2, REG_M3,
690 REG_B0, REG_B1, REG_B2, REG_B3, REG_L0, REG_L1, REG_L2, REG_L3,
691 REG_A0x, REG_A0w, REG_A1x, REG_A1w, , , REG_ASTAT, REG_RETS,
692 , , , , , , , ,
693 REG_LC0, REG_LT0, REG_LB0, REG_LC1, REG_LT1, REG_LB1, REG_CYCLES,
694 REG_CYCLES2,
695 REG_USP, REG_SEQSTAT, REG_SYSCFG, REG_RETI, REG_RETX, REG_RETN, REG_RETE,
696 REG_LASTREG */
697 switch (fullreg >> 2)
698 {
699 case 0: case 1: return &DREG (reg);
700 case 2: case 3: return &PREG (reg);
701 case 4: return &IREG (reg & 3);
702 case 5: return &MREG (reg & 3);
703 case 6: return &BREG (reg & 3);
704 case 7: return &LREG (reg & 3);
705 default:
706 switch (fullreg)
707 {
708 case 32: return &AXREG (0);
709 case 33: return &AWREG (0);
710 case 34: return &AXREG (1);
711 case 35: return &AWREG (1);
712 case 39: return &RETSREG;
713 case 48: return &LCREG (0);
714 case 49: return &LTREG (0);
715 case 50: return &LBREG (0);
716 case 51: return &LCREG (1);
717 case 52: return &LTREG (1);
718 case 53: return &LBREG (1);
719 }
720 }
721 abort ();
722 }
723
724 static int
725 decode_ProgCtrl_0 (TIword iw0, disassemble_info *outf)
726 {
727 /* ProgCtrl
728 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
729 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |.prgfunc.......|.poprnd........|
730 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
731 int poprnd = ((iw0 >> ProgCtrl_poprnd_bits) & ProgCtrl_poprnd_mask);
732 int prgfunc = ((iw0 >> ProgCtrl_prgfunc_bits) & ProgCtrl_prgfunc_mask);
733
734 if (prgfunc == 0 && poprnd == 0)
735 OUTS (outf, "NOP");
736 else if (parallel)
737 return 0;
738 else if (prgfunc == 1 && poprnd == 0)
739 OUTS (outf, "RTS");
740 else if (prgfunc == 1 && poprnd == 1)
741 OUTS (outf, "RTI");
742 else if (prgfunc == 1 && poprnd == 2)
743 OUTS (outf, "RTX");
744 else if (prgfunc == 1 && poprnd == 3)
745 OUTS (outf, "RTN");
746 else if (prgfunc == 1 && poprnd == 4)
747 OUTS (outf, "RTE");
748 else if (prgfunc == 2 && poprnd == 0)
749 OUTS (outf, "IDLE");
750 else if (prgfunc == 2 && poprnd == 3)
751 OUTS (outf, "CSYNC");
752 else if (prgfunc == 2 && poprnd == 4)
753 OUTS (outf, "SSYNC");
754 else if (prgfunc == 2 && poprnd == 5)
755 OUTS (outf, "EMUEXCPT");
756 else if (prgfunc == 3 && IS_DREG (0, poprnd))
757 {
758 OUTS (outf, "CLI ");
759 OUTS (outf, dregs (poprnd));
760 }
761 else if (prgfunc == 4 && IS_DREG (0, poprnd))
762 {
763 OUTS (outf, "STI ");
764 OUTS (outf, dregs (poprnd));
765 }
766 else if (prgfunc == 5 && IS_PREG (1, poprnd))
767 {
768 OUTS (outf, "JUMP (");
769 OUTS (outf, pregs (poprnd));
770 OUTS (outf, ")");
771 }
772 else if (prgfunc == 6 && IS_PREG (1, poprnd))
773 {
774 OUTS (outf, "CALL (");
775 OUTS (outf, pregs (poprnd));
776 OUTS (outf, ")");
777 }
778 else if (prgfunc == 7 && IS_PREG (1, poprnd))
779 {
780 OUTS (outf, "CALL (PC + ");
781 OUTS (outf, pregs (poprnd));
782 OUTS (outf, ")");
783 }
784 else if (prgfunc == 8 && IS_PREG (1, poprnd))
785 {
786 OUTS (outf, "JUMP (PC + ");
787 OUTS (outf, pregs (poprnd));
788 OUTS (outf, ")");
789 }
790 else if (prgfunc == 9)
791 {
792 OUTS (outf, "RAISE ");
793 OUTS (outf, uimm4 (poprnd));
794 }
795 else if (prgfunc == 10)
796 {
797 OUTS (outf, "EXCPT ");
798 OUTS (outf, uimm4 (poprnd));
799 }
800 else if (prgfunc == 11 && IS_PREG (1, poprnd) && poprnd <= 5)
801 {
802 OUTS (outf, "TESTSET (");
803 OUTS (outf, pregs (poprnd));
804 OUTS (outf, ")");
805 }
806 else
807 return 0;
808 return 2;
809 }
810
811 static int
812 decode_CaCTRL_0 (TIword iw0, disassemble_info *outf)
813 {
814 /* CaCTRL
815 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
816 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 0 | 0 | 1 |.a.|.op....|.reg.......|
817 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
818 int a = ((iw0 >> CaCTRL_a_bits) & CaCTRL_a_mask);
819 int op = ((iw0 >> CaCTRL_op_bits) & CaCTRL_op_mask);
820 int reg = ((iw0 >> CaCTRL_reg_bits) & CaCTRL_reg_mask);
821
822 if (parallel)
823 return 0;
824
825 if (a == 0 && op == 0)
826 {
827 OUTS (outf, "PREFETCH[");
828 OUTS (outf, pregs (reg));
829 OUTS (outf, "]");
830 }
831 else if (a == 0 && op == 1)
832 {
833 OUTS (outf, "FLUSHINV[");
834 OUTS (outf, pregs (reg));
835 OUTS (outf, "]");
836 }
837 else if (a == 0 && op == 2)
838 {
839 OUTS (outf, "FLUSH[");
840 OUTS (outf, pregs (reg));
841 OUTS (outf, "]");
842 }
843 else if (a == 0 && op == 3)
844 {
845 OUTS (outf, "IFLUSH[");
846 OUTS (outf, pregs (reg));
847 OUTS (outf, "]");
848 }
849 else if (a == 1 && op == 0)
850 {
851 OUTS (outf, "PREFETCH[");
852 OUTS (outf, pregs (reg));
853 OUTS (outf, "++]");
854 }
855 else if (a == 1 && op == 1)
856 {
857 OUTS (outf, "FLUSHINV[");
858 OUTS (outf, pregs (reg));
859 OUTS (outf, "++]");
860 }
861 else if (a == 1 && op == 2)
862 {
863 OUTS (outf, "FLUSH[");
864 OUTS (outf, pregs (reg));
865 OUTS (outf, "++]");
866 }
867 else if (a == 1 && op == 3)
868 {
869 OUTS (outf, "IFLUSH[");
870 OUTS (outf, pregs (reg));
871 OUTS (outf, "++]");
872 }
873 else
874 return 0;
875 return 2;
876 }
877
878 static int
879 decode_PushPopReg_0 (TIword iw0, disassemble_info *outf)
880 {
881 /* PushPopReg
882 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
883 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 0 |.W.|.grp.......|.reg.......|
884 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
885 int W = ((iw0 >> PushPopReg_W_bits) & PushPopReg_W_mask);
886 int grp = ((iw0 >> PushPopReg_grp_bits) & PushPopReg_grp_mask);
887 int reg = ((iw0 >> PushPopReg_reg_bits) & PushPopReg_reg_mask);
888
889 if (parallel)
890 return 0;
891
892 if (W == 0 && mostreg (reg, grp))
893 {
894 OUTS (outf, allregs (reg, grp));
895 OUTS (outf, " = [SP++]");
896 }
897 else if (W == 1 && allreg (reg, grp) && !(grp == 1 && reg == 6))
898 {
899 OUTS (outf, "[--SP] = ");
900 OUTS (outf, allregs (reg, grp));
901 }
902 else
903 return 0;
904 return 2;
905 }
906
907 static int
908 decode_PushPopMultiple_0 (TIword iw0, disassemble_info *outf)
909 {
910 /* PushPopMultiple
911 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
912 | 0 | 0 | 0 | 0 | 0 | 1 | 0 |.d.|.p.|.W.|.dr........|.pr........|
913 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
914 int p = ((iw0 >> PushPopMultiple_p_bits) & PushPopMultiple_p_mask);
915 int d = ((iw0 >> PushPopMultiple_d_bits) & PushPopMultiple_d_mask);
916 int W = ((iw0 >> PushPopMultiple_W_bits) & PushPopMultiple_W_mask);
917 int dr = ((iw0 >> PushPopMultiple_dr_bits) & PushPopMultiple_dr_mask);
918 int pr = ((iw0 >> PushPopMultiple_pr_bits) & PushPopMultiple_pr_mask);
919
920 if (parallel)
921 return 0;
922
923 if (pr > 5)
924 return 0;
925
926 if (W == 1 && d == 1 && p == 1)
927 {
928 OUTS (outf, "[--SP] = (R7:");
929 OUTS (outf, imm5d (dr));
930 OUTS (outf, ", P5:");
931 OUTS (outf, imm5d (pr));
932 OUTS (outf, ")");
933 }
934 else if (W == 1 && d == 1 && p == 0 && pr == 0)
935 {
936 OUTS (outf, "[--SP] = (R7:");
937 OUTS (outf, imm5d (dr));
938 OUTS (outf, ")");
939 }
940 else if (W == 1 && d == 0 && p == 1 && dr == 0)
941 {
942 OUTS (outf, "[--SP] = (P5:");
943 OUTS (outf, imm5d (pr));
944 OUTS (outf, ")");
945 }
946 else if (W == 0 && d == 1 && p == 1)
947 {
948 OUTS (outf, "(R7:");
949 OUTS (outf, imm5d (dr));
950 OUTS (outf, ", P5:");
951 OUTS (outf, imm5d (pr));
952 OUTS (outf, ") = [SP++]");
953 }
954 else if (W == 0 && d == 1 && p == 0 && pr == 0)
955 {
956 OUTS (outf, "(R7:");
957 OUTS (outf, imm5d (dr));
958 OUTS (outf, ") = [SP++]");
959 }
960 else if (W == 0 && d == 0 && p == 1 && dr == 0)
961 {
962 OUTS (outf, "(P5:");
963 OUTS (outf, imm5d (pr));
964 OUTS (outf, ") = [SP++]");
965 }
966 else
967 return 0;
968 return 2;
969 }
970
971 static int
972 decode_ccMV_0 (TIword iw0, disassemble_info *outf)
973 {
974 /* ccMV
975 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
976 | 0 | 0 | 0 | 0 | 0 | 1 | 1 |.T.|.d.|.s.|.dst.......|.src.......|
977 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
978 int s = ((iw0 >> CCmv_s_bits) & CCmv_s_mask);
979 int d = ((iw0 >> CCmv_d_bits) & CCmv_d_mask);
980 int T = ((iw0 >> CCmv_T_bits) & CCmv_T_mask);
981 int src = ((iw0 >> CCmv_src_bits) & CCmv_src_mask);
982 int dst = ((iw0 >> CCmv_dst_bits) & CCmv_dst_mask);
983
984 if (parallel)
985 return 0;
986
987 if (T == 1)
988 {
989 OUTS (outf, "IF CC ");
990 OUTS (outf, gregs (dst, d));
991 OUTS (outf, " = ");
992 OUTS (outf, gregs (src, s));
993 }
994 else if (T == 0)
995 {
996 OUTS (outf, "IF !CC ");
997 OUTS (outf, gregs (dst, d));
998 OUTS (outf, " = ");
999 OUTS (outf, gregs (src, s));
1000 }
1001 else
1002 return 0;
1003 return 2;
1004 }
1005
1006 static int
1007 decode_CCflag_0 (TIword iw0, disassemble_info *outf)
1008 {
1009 /* CCflag
1010 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1011 | 0 | 0 | 0 | 0 | 1 |.I.|.opc.......|.G.|.y.........|.x.........|
1012 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1013 int x = ((iw0 >> CCflag_x_bits) & CCflag_x_mask);
1014 int y = ((iw0 >> CCflag_y_bits) & CCflag_y_mask);
1015 int I = ((iw0 >> CCflag_I_bits) & CCflag_I_mask);
1016 int G = ((iw0 >> CCflag_G_bits) & CCflag_G_mask);
1017 int opc = ((iw0 >> CCflag_opc_bits) & CCflag_opc_mask);
1018
1019 if (parallel)
1020 return 0;
1021
1022 if (opc == 0 && I == 0 && G == 0)
1023 {
1024 OUTS (outf, "CC = ");
1025 OUTS (outf, dregs (x));
1026 OUTS (outf, " == ");
1027 OUTS (outf, dregs (y));
1028 }
1029 else if (opc == 1 && I == 0 && G == 0)
1030 {
1031 OUTS (outf, "CC = ");
1032 OUTS (outf, dregs (x));
1033 OUTS (outf, " < ");
1034 OUTS (outf, dregs (y));
1035 }
1036 else if (opc == 2 && I == 0 && G == 0)
1037 {
1038 OUTS (outf, "CC = ");
1039 OUTS (outf, dregs (x));
1040 OUTS (outf, " <= ");
1041 OUTS (outf, dregs (y));
1042 }
1043 else if (opc == 3 && I == 0 && G == 0)
1044 {
1045 OUTS (outf, "CC = ");
1046 OUTS (outf, dregs (x));
1047 OUTS (outf, " < ");
1048 OUTS (outf, dregs (y));
1049 OUTS (outf, " (IU)");
1050 }
1051 else if (opc == 4 && I == 0 && G == 0)
1052 {
1053 OUTS (outf, "CC = ");
1054 OUTS (outf, dregs (x));
1055 OUTS (outf, " <= ");
1056 OUTS (outf, dregs (y));
1057 OUTS (outf, " (IU)");
1058 }
1059 else if (opc == 0 && I == 1 && G == 0)
1060 {
1061 OUTS (outf, "CC = ");
1062 OUTS (outf, dregs (x));
1063 OUTS (outf, " == ");
1064 OUTS (outf, imm3 (y));
1065 }
1066 else if (opc == 1 && I == 1 && G == 0)
1067 {
1068 OUTS (outf, "CC = ");
1069 OUTS (outf, dregs (x));
1070 OUTS (outf, " < ");
1071 OUTS (outf, imm3 (y));
1072 }
1073 else if (opc == 2 && I == 1 && G == 0)
1074 {
1075 OUTS (outf, "CC = ");
1076 OUTS (outf, dregs (x));
1077 OUTS (outf, " <= ");
1078 OUTS (outf, imm3 (y));
1079 }
1080 else if (opc == 3 && I == 1 && G == 0)
1081 {
1082 OUTS (outf, "CC = ");
1083 OUTS (outf, dregs (x));
1084 OUTS (outf, " < ");
1085 OUTS (outf, uimm3 (y));
1086 OUTS (outf, " (IU)");
1087 }
1088 else if (opc == 4 && I == 1 && G == 0)
1089 {
1090 OUTS (outf, "CC = ");
1091 OUTS (outf, dregs (x));
1092 OUTS (outf, " <= ");
1093 OUTS (outf, uimm3 (y));
1094 OUTS (outf, " (IU)");
1095 }
1096 else if (opc == 0 && I == 0 && G == 1)
1097 {
1098 OUTS (outf, "CC = ");
1099 OUTS (outf, pregs (x));
1100 OUTS (outf, " == ");
1101 OUTS (outf, pregs (y));
1102 }
1103 else if (opc == 1 && I == 0 && G == 1)
1104 {
1105 OUTS (outf, "CC = ");
1106 OUTS (outf, pregs (x));
1107 OUTS (outf, " < ");
1108 OUTS (outf, pregs (y));
1109 }
1110 else if (opc == 2 && I == 0 && G == 1)
1111 {
1112 OUTS (outf, "CC = ");
1113 OUTS (outf, pregs (x));
1114 OUTS (outf, " <= ");
1115 OUTS (outf, pregs (y));
1116 }
1117 else if (opc == 3 && I == 0 && G == 1)
1118 {
1119 OUTS (outf, "CC = ");
1120 OUTS (outf, pregs (x));
1121 OUTS (outf, " < ");
1122 OUTS (outf, pregs (y));
1123 OUTS (outf, " (IU)");
1124 }
1125 else if (opc == 4 && I == 0 && G == 1)
1126 {
1127 OUTS (outf, "CC = ");
1128 OUTS (outf, pregs (x));
1129 OUTS (outf, " <= ");
1130 OUTS (outf, pregs (y));
1131 OUTS (outf, " (IU)");
1132 }
1133 else if (opc == 0 && I == 1 && G == 1)
1134 {
1135 OUTS (outf, "CC = ");
1136 OUTS (outf, pregs (x));
1137 OUTS (outf, " == ");
1138 OUTS (outf, imm3 (y));
1139 }
1140 else if (opc == 1 && I == 1 && G == 1)
1141 {
1142 OUTS (outf, "CC = ");
1143 OUTS (outf, pregs (x));
1144 OUTS (outf, " < ");
1145 OUTS (outf, imm3 (y));
1146 }
1147 else if (opc == 2 && I == 1 && G == 1)
1148 {
1149 OUTS (outf, "CC = ");
1150 OUTS (outf, pregs (x));
1151 OUTS (outf, " <= ");
1152 OUTS (outf, imm3 (y));
1153 }
1154 else if (opc == 3 && I == 1 && G == 1)
1155 {
1156 OUTS (outf, "CC = ");
1157 OUTS (outf, pregs (x));
1158 OUTS (outf, " < ");
1159 OUTS (outf, uimm3 (y));
1160 OUTS (outf, " (IU)");
1161 }
1162 else if (opc == 4 && I == 1 && G == 1)
1163 {
1164 OUTS (outf, "CC = ");
1165 OUTS (outf, pregs (x));
1166 OUTS (outf, " <= ");
1167 OUTS (outf, uimm3 (y));
1168 OUTS (outf, " (IU)");
1169 }
1170 else if (opc == 5 && I == 0 && G == 0 && x == 0 && y == 0)
1171 OUTS (outf, "CC = A0 == A1");
1172
1173 else if (opc == 6 && I == 0 && G == 0 && x == 0 && y == 0)
1174 OUTS (outf, "CC = A0 < A1");
1175
1176 else if (opc == 7 && I == 0 && G == 0 && x == 0 && y == 0)
1177 OUTS (outf, "CC = A0 <= A1");
1178
1179 else
1180 return 0;
1181 return 2;
1182 }
1183
1184 static int
1185 decode_CC2dreg_0 (TIword iw0, disassemble_info *outf)
1186 {
1187 /* CC2dreg
1188 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1189 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 0 | 0 | 0 | 0 |.op....|.reg.......|
1190 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1191 int op = ((iw0 >> CC2dreg_op_bits) & CC2dreg_op_mask);
1192 int reg = ((iw0 >> CC2dreg_reg_bits) & CC2dreg_reg_mask);
1193
1194 if (parallel)
1195 return 0;
1196
1197 if (op == 0)
1198 {
1199 OUTS (outf, dregs (reg));
1200 OUTS (outf, " = CC");
1201 }
1202 else if (op == 1)
1203 {
1204 OUTS (outf, "CC = ");
1205 OUTS (outf, dregs (reg));
1206 }
1207 else if (op == 3 && reg == 0)
1208 OUTS (outf, "CC = !CC");
1209 else
1210 return 0;
1211
1212 return 2;
1213 }
1214
1215 static int
1216 decode_CC2stat_0 (TIword iw0, disassemble_info *outf)
1217 {
1218 /* CC2stat
1219 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1220 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 1 |.D.|.op....|.cbit..............|
1221 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1222 int D = ((iw0 >> CC2stat_D_bits) & CC2stat_D_mask);
1223 int op = ((iw0 >> CC2stat_op_bits) & CC2stat_op_mask);
1224 int cbit = ((iw0 >> CC2stat_cbit_bits) & CC2stat_cbit_mask);
1225
1226 const char *bitname = statbits (cbit);
1227
1228 if (parallel)
1229 return 0;
1230
1231 if (decode_statbits[cbit] == REG_LASTREG)
1232 {
1233 /* All ASTAT bits except CC may be operated on in hardware, but may
1234 not have a dedicated insn, so still decode "valid" insns. */
1235 static char bitnames[64];
1236 if (cbit != 5)
1237 sprintf (bitnames, "ASTAT[%i /* unused bit */]", cbit);
1238 else
1239 return 0;
1240
1241 bitname = bitnames;
1242 }
1243
1244 if (op == 0 && D == 0)
1245 {
1246 OUTS (outf, "CC = ");
1247 OUTS (outf, bitname);
1248 }
1249 else if (op == 1 && D == 0)
1250 {
1251 OUTS (outf, "CC |= ");
1252 OUTS (outf, bitname);
1253 }
1254 else if (op == 2 && D == 0)
1255 {
1256 OUTS (outf, "CC &= ");
1257 OUTS (outf, bitname);
1258 }
1259 else if (op == 3 && D == 0)
1260 {
1261 OUTS (outf, "CC ^= ");
1262 OUTS (outf, bitname);
1263 }
1264 else if (op == 0 && D == 1)
1265 {
1266 OUTS (outf, bitname);
1267 OUTS (outf, " = CC");
1268 }
1269 else if (op == 1 && D == 1)
1270 {
1271 OUTS (outf, bitname);
1272 OUTS (outf, " |= CC");
1273 }
1274 else if (op == 2 && D == 1)
1275 {
1276 OUTS (outf, bitname);
1277 OUTS (outf, " &= CC");
1278 }
1279 else if (op == 3 && D == 1)
1280 {
1281 OUTS (outf, bitname);
1282 OUTS (outf, " ^= CC");
1283 }
1284 else
1285 return 0;
1286
1287 return 2;
1288 }
1289
1290 static int
1291 decode_BRCC_0 (TIword iw0, bfd_vma pc, disassemble_info *outf)
1292 {
1293 /* BRCC
1294 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1295 | 0 | 0 | 0 | 1 |.T.|.B.|.offset................................|
1296 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1297 int B = ((iw0 >> BRCC_B_bits) & BRCC_B_mask);
1298 int T = ((iw0 >> BRCC_T_bits) & BRCC_T_mask);
1299 int offset = ((iw0 >> BRCC_offset_bits) & BRCC_offset_mask);
1300
1301 if (parallel)
1302 return 0;
1303
1304 if (T == 1 && B == 1)
1305 {
1306 OUTS (outf, "IF CC JUMP 0x");
1307 OUTS (outf, pcrel10 (offset));
1308 OUTS (outf, " (BP)");
1309 }
1310 else if (T == 0 && B == 1)
1311 {
1312 OUTS (outf, "IF !CC JUMP 0x");
1313 OUTS (outf, pcrel10 (offset));
1314 OUTS (outf, " (BP)");
1315 }
1316 else if (T == 1)
1317 {
1318 OUTS (outf, "IF CC JUMP 0x");
1319 OUTS (outf, pcrel10 (offset));
1320 }
1321 else if (T == 0)
1322 {
1323 OUTS (outf, "IF !CC JUMP 0x");
1324 OUTS (outf, pcrel10 (offset));
1325 }
1326 else
1327 return 0;
1328
1329 return 2;
1330 }
1331
1332 static int
1333 decode_UJUMP_0 (TIword iw0, bfd_vma pc, disassemble_info *outf)
1334 {
1335 /* UJUMP
1336 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1337 | 0 | 0 | 1 | 0 |.offset........................................|
1338 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1339 int offset = ((iw0 >> UJump_offset_bits) & UJump_offset_mask);
1340
1341 if (parallel)
1342 return 0;
1343
1344 OUTS (outf, "JUMP.S 0x");
1345 OUTS (outf, pcrel12 (offset));
1346 return 2;
1347 }
1348
1349 static int
1350 decode_REGMV_0 (TIword iw0, disassemble_info *outf)
1351 {
1352 /* REGMV
1353 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1354 | 0 | 0 | 1 | 1 |.gd........|.gs........|.dst.......|.src.......|
1355 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1356 int gs = ((iw0 >> RegMv_gs_bits) & RegMv_gs_mask);
1357 int gd = ((iw0 >> RegMv_gd_bits) & RegMv_gd_mask);
1358 int src = ((iw0 >> RegMv_src_bits) & RegMv_src_mask);
1359 int dst = ((iw0 >> RegMv_dst_bits) & RegMv_dst_mask);
1360
1361 /* Reserved slots cannot be a src/dst. */
1362 if (IS_RESERVEDREG (gs, src) || IS_RESERVEDREG (gd, dst))
1363 goto invalid_move;
1364
1365 /* Standard register moves */
1366 if ((gs < 2) || /* Dregs/Pregs as source */
1367 (gd < 2) || /* Dregs/Pregs as dest */
1368 (gs == 4 && src < 4) || /* Accumulators as source */
1369 (gd == 4 && dst < 4 && (gs < 4)) || /* Accumulators as dest */
1370 (gs == 7 && src == 7 && !(gd == 4 && dst < 4)) || /* EMUDAT as src */
1371 (gd == 7 && dst == 7)) /* EMUDAT as dest */
1372 goto valid_move;
1373
1374 /* dareg = dareg (IMBL) */
1375 if (gs < 4 && gd < 4)
1376 goto valid_move;
1377
1378 /* USP can be src to sysregs, but not dagregs. */
1379 if ((gs == 7 && src == 0) && (gd >= 4))
1380 goto valid_move;
1381
1382 /* USP can move between genregs (only check Accumulators). */
1383 if (((gs == 7 && src == 0) && (gd == 4 && dst < 4)) ||
1384 ((gd == 7 && dst == 0) && (gs == 4 && src < 4)))
1385 goto valid_move;
1386
1387 /* Still here ? Invalid reg pair. */
1388 invalid_move:
1389 return 0;
1390
1391 valid_move:
1392 OUTS (outf, allregs (dst, gd));
1393 OUTS (outf, " = ");
1394 OUTS (outf, allregs (src, gs));
1395 return 2;
1396 }
1397
1398 static int
1399 decode_ALU2op_0 (TIword iw0, disassemble_info *outf)
1400 {
1401 /* ALU2op
1402 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1403 | 0 | 1 | 0 | 0 | 0 | 0 |.opc...........|.src.......|.dst.......|
1404 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1405 int src = ((iw0 >> ALU2op_src_bits) & ALU2op_src_mask);
1406 int opc = ((iw0 >> ALU2op_opc_bits) & ALU2op_opc_mask);
1407 int dst = ((iw0 >> ALU2op_dst_bits) & ALU2op_dst_mask);
1408
1409 if (opc == 0)
1410 {
1411 OUTS (outf, dregs (dst));
1412 OUTS (outf, " >>>= ");
1413 OUTS (outf, dregs (src));
1414 }
1415 else if (opc == 1)
1416 {
1417 OUTS (outf, dregs (dst));
1418 OUTS (outf, " >>= ");
1419 OUTS (outf, dregs (src));
1420 }
1421 else if (opc == 2)
1422 {
1423 OUTS (outf, dregs (dst));
1424 OUTS (outf, " <<= ");
1425 OUTS (outf, dregs (src));
1426 }
1427 else if (opc == 3)
1428 {
1429 OUTS (outf, dregs (dst));
1430 OUTS (outf, " *= ");
1431 OUTS (outf, dregs (src));
1432 }
1433 else if (opc == 4)
1434 {
1435 OUTS (outf, dregs (dst));
1436 OUTS (outf, " = (");
1437 OUTS (outf, dregs (dst));
1438 OUTS (outf, " + ");
1439 OUTS (outf, dregs (src));
1440 OUTS (outf, ") << 0x1");
1441 }
1442 else if (opc == 5)
1443 {
1444 OUTS (outf, dregs (dst));
1445 OUTS (outf, " = (");
1446 OUTS (outf, dregs (dst));
1447 OUTS (outf, " + ");
1448 OUTS (outf, dregs (src));
1449 OUTS (outf, ") << 0x2");
1450 }
1451 else if (opc == 8)
1452 {
1453 OUTS (outf, "DIVQ (");
1454 OUTS (outf, dregs (dst));
1455 OUTS (outf, ", ");
1456 OUTS (outf, dregs (src));
1457 OUTS (outf, ")");
1458 }
1459 else if (opc == 9)
1460 {
1461 OUTS (outf, "DIVS (");
1462 OUTS (outf, dregs (dst));
1463 OUTS (outf, ", ");
1464 OUTS (outf, dregs (src));
1465 OUTS (outf, ")");
1466 }
1467 else if (opc == 10)
1468 {
1469 OUTS (outf, dregs (dst));
1470 OUTS (outf, " = ");
1471 OUTS (outf, dregs_lo (src));
1472 OUTS (outf, " (X)");
1473 }
1474 else if (opc == 11)
1475 {
1476 OUTS (outf, dregs (dst));
1477 OUTS (outf, " = ");
1478 OUTS (outf, dregs_lo (src));
1479 OUTS (outf, " (Z)");
1480 }
1481 else if (opc == 12)
1482 {
1483 OUTS (outf, dregs (dst));
1484 OUTS (outf, " = ");
1485 OUTS (outf, dregs_byte (src));
1486 OUTS (outf, " (X)");
1487 }
1488 else if (opc == 13)
1489 {
1490 OUTS (outf, dregs (dst));
1491 OUTS (outf, " = ");
1492 OUTS (outf, dregs_byte (src));
1493 OUTS (outf, " (Z)");
1494 }
1495 else if (opc == 14)
1496 {
1497 OUTS (outf, dregs (dst));
1498 OUTS (outf, " = -");
1499 OUTS (outf, dregs (src));
1500 }
1501 else if (opc == 15)
1502 {
1503 OUTS (outf, dregs (dst));
1504 OUTS (outf, " =~ ");
1505 OUTS (outf, dregs (src));
1506 }
1507 else
1508 return 0;
1509
1510 return 2;
1511 }
1512
1513 static int
1514 decode_PTR2op_0 (TIword iw0, disassemble_info *outf)
1515 {
1516 /* PTR2op
1517 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1518 | 0 | 1 | 0 | 0 | 0 | 1 | 0 |.opc.......|.src.......|.dst.......|
1519 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1520 int src = ((iw0 >> PTR2op_src_bits) & PTR2op_dst_mask);
1521 int opc = ((iw0 >> PTR2op_opc_bits) & PTR2op_opc_mask);
1522 int dst = ((iw0 >> PTR2op_dst_bits) & PTR2op_dst_mask);
1523
1524 if (opc == 0)
1525 {
1526 OUTS (outf, pregs (dst));
1527 OUTS (outf, " -= ");
1528 OUTS (outf, pregs (src));
1529 }
1530 else if (opc == 1)
1531 {
1532 OUTS (outf, pregs (dst));
1533 OUTS (outf, " = ");
1534 OUTS (outf, pregs (src));
1535 OUTS (outf, " << 0x2");
1536 }
1537 else if (opc == 3)
1538 {
1539 OUTS (outf, pregs (dst));
1540 OUTS (outf, " = ");
1541 OUTS (outf, pregs (src));
1542 OUTS (outf, " >> 0x2");
1543 }
1544 else if (opc == 4)
1545 {
1546 OUTS (outf, pregs (dst));
1547 OUTS (outf, " = ");
1548 OUTS (outf, pregs (src));
1549 OUTS (outf, " >> 0x1");
1550 }
1551 else if (opc == 5)
1552 {
1553 OUTS (outf, pregs (dst));
1554 OUTS (outf, " += ");
1555 OUTS (outf, pregs (src));
1556 OUTS (outf, " (BREV)");
1557 }
1558 else if (opc == 6)
1559 {
1560 OUTS (outf, pregs (dst));
1561 OUTS (outf, " = (");
1562 OUTS (outf, pregs (dst));
1563 OUTS (outf, " + ");
1564 OUTS (outf, pregs (src));
1565 OUTS (outf, ") << 0x1");
1566 }
1567 else if (opc == 7)
1568 {
1569 OUTS (outf, pregs (dst));
1570 OUTS (outf, " = (");
1571 OUTS (outf, pregs (dst));
1572 OUTS (outf, " + ");
1573 OUTS (outf, pregs (src));
1574 OUTS (outf, ") << 0x2");
1575 }
1576 else
1577 return 0;
1578
1579 return 2;
1580 }
1581
1582 static int
1583 decode_LOGI2op_0 (TIword iw0, disassemble_info *outf)
1584 {
1585 /* LOGI2op
1586 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1587 | 0 | 1 | 0 | 0 | 1 |.opc.......|.src...............|.dst.......|
1588 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1589 int src = ((iw0 >> LOGI2op_src_bits) & LOGI2op_src_mask);
1590 int opc = ((iw0 >> LOGI2op_opc_bits) & LOGI2op_opc_mask);
1591 int dst = ((iw0 >> LOGI2op_dst_bits) & LOGI2op_dst_mask);
1592
1593 if (parallel)
1594 return 0;
1595
1596 if (opc == 0)
1597 {
1598 OUTS (outf, "CC = !BITTST (");
1599 OUTS (outf, dregs (dst));
1600 OUTS (outf, ", ");
1601 OUTS (outf, uimm5 (src));
1602 OUTS (outf, ");\t\t/* bit");
1603 OUTS (outf, imm7d (src));
1604 OUTS (outf, " */");
1605 comment = 1;
1606 }
1607 else if (opc == 1)
1608 {
1609 OUTS (outf, "CC = BITTST (");
1610 OUTS (outf, dregs (dst));
1611 OUTS (outf, ", ");
1612 OUTS (outf, uimm5 (src));
1613 OUTS (outf, ");\t\t/* bit");
1614 OUTS (outf, imm7d (src));
1615 OUTS (outf, " */");
1616 comment = 1;
1617 }
1618 else if (opc == 2)
1619 {
1620 OUTS (outf, "BITSET (");
1621 OUTS (outf, dregs (dst));
1622 OUTS (outf, ", ");
1623 OUTS (outf, uimm5 (src));
1624 OUTS (outf, ");\t\t/* bit");
1625 OUTS (outf, imm7d (src));
1626 OUTS (outf, " */");
1627 comment = 1;
1628 }
1629 else if (opc == 3)
1630 {
1631 OUTS (outf, "BITTGL (");
1632 OUTS (outf, dregs (dst));
1633 OUTS (outf, ", ");
1634 OUTS (outf, uimm5 (src));
1635 OUTS (outf, ");\t\t/* bit");
1636 OUTS (outf, imm7d (src));
1637 OUTS (outf, " */");
1638 comment = 1;
1639 }
1640 else if (opc == 4)
1641 {
1642 OUTS (outf, "BITCLR (");
1643 OUTS (outf, dregs (dst));
1644 OUTS (outf, ", ");
1645 OUTS (outf, uimm5 (src));
1646 OUTS (outf, ");\t\t/* bit");
1647 OUTS (outf, imm7d (src));
1648 OUTS (outf, " */");
1649 comment = 1;
1650 }
1651 else if (opc == 5)
1652 {
1653 OUTS (outf, dregs (dst));
1654 OUTS (outf, " >>>= ");
1655 OUTS (outf, uimm5 (src));
1656 }
1657 else if (opc == 6)
1658 {
1659 OUTS (outf, dregs (dst));
1660 OUTS (outf, " >>= ");
1661 OUTS (outf, uimm5 (src));
1662 }
1663 else if (opc == 7)
1664 {
1665 OUTS (outf, dregs (dst));
1666 OUTS (outf, " <<= ");
1667 OUTS (outf, uimm5 (src));
1668 }
1669 else
1670 return 0;
1671
1672 return 2;
1673 }
1674
1675 static int
1676 decode_COMP3op_0 (TIword iw0, disassemble_info *outf)
1677 {
1678 /* COMP3op
1679 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1680 | 0 | 1 | 0 | 1 |.opc.......|.dst.......|.src1......|.src0......|
1681 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1682 int opc = ((iw0 >> COMP3op_opc_bits) & COMP3op_opc_mask);
1683 int dst = ((iw0 >> COMP3op_dst_bits) & COMP3op_dst_mask);
1684 int src0 = ((iw0 >> COMP3op_src0_bits) & COMP3op_src0_mask);
1685 int src1 = ((iw0 >> COMP3op_src1_bits) & COMP3op_src1_mask);
1686
1687 if (opc == 5 && src1 == src0)
1688 {
1689 OUTS (outf, pregs (dst));
1690 OUTS (outf, " = ");
1691 OUTS (outf, pregs (src0));
1692 OUTS (outf, " << 0x1");
1693 }
1694 else if (opc == 1)
1695 {
1696 OUTS (outf, dregs (dst));
1697 OUTS (outf, " = ");
1698 OUTS (outf, dregs (src0));
1699 OUTS (outf, " - ");
1700 OUTS (outf, dregs (src1));
1701 }
1702 else if (opc == 2)
1703 {
1704 OUTS (outf, dregs (dst));
1705 OUTS (outf, " = ");
1706 OUTS (outf, dregs (src0));
1707 OUTS (outf, " & ");
1708 OUTS (outf, dregs (src1));
1709 }
1710 else if (opc == 3)
1711 {
1712 OUTS (outf, dregs (dst));
1713 OUTS (outf, " = ");
1714 OUTS (outf, dregs (src0));
1715 OUTS (outf, " | ");
1716 OUTS (outf, dregs (src1));
1717 }
1718 else if (opc == 4)
1719 {
1720 OUTS (outf, dregs (dst));
1721 OUTS (outf, " = ");
1722 OUTS (outf, dregs (src0));
1723 OUTS (outf, " ^ ");
1724 OUTS (outf, dregs (src1));
1725 }
1726 else if (opc == 5)
1727 {
1728 OUTS (outf, pregs (dst));
1729 OUTS (outf, " = ");
1730 OUTS (outf, pregs (src0));
1731 OUTS (outf, " + ");
1732 OUTS (outf, pregs (src1));
1733 }
1734 else if (opc == 6)
1735 {
1736 OUTS (outf, pregs (dst));
1737 OUTS (outf, " = ");
1738 OUTS (outf, pregs (src0));
1739 OUTS (outf, " + (");
1740 OUTS (outf, pregs (src1));
1741 OUTS (outf, " << 0x1)");
1742 }
1743 else if (opc == 7)
1744 {
1745 OUTS (outf, pregs (dst));
1746 OUTS (outf, " = ");
1747 OUTS (outf, pregs (src0));
1748 OUTS (outf, " + (");
1749 OUTS (outf, pregs (src1));
1750 OUTS (outf, " << 0x2)");
1751 }
1752 else if (opc == 0)
1753 {
1754 OUTS (outf, dregs (dst));
1755 OUTS (outf, " = ");
1756 OUTS (outf, dregs (src0));
1757 OUTS (outf, " + ");
1758 OUTS (outf, dregs (src1));
1759 }
1760 else
1761 return 0;
1762
1763 return 2;
1764 }
1765
1766 static int
1767 decode_COMPI2opD_0 (TIword iw0, disassemble_info *outf)
1768 {
1769 /* COMPI2opD
1770 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1771 | 0 | 1 | 1 | 0 | 0 |.op|..src......................|.dst.......|
1772 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1773 int op = ((iw0 >> COMPI2opD_op_bits) & COMPI2opD_op_mask);
1774 int dst = ((iw0 >> COMPI2opD_dst_bits) & COMPI2opD_dst_mask);
1775 int src = ((iw0 >> COMPI2opD_src_bits) & COMPI2opD_src_mask);
1776
1777 bu32 *pval = get_allreg (0, dst);
1778
1779 if (parallel)
1780 return 0;
1781
1782 /* Since we don't have 32-bit immediate loads, we allow the disassembler
1783 to combine them, so it prints out the right values.
1784 Here we keep track of the registers. */
1785 if (op == 0)
1786 {
1787 *pval = imm7_val (src);
1788 if (src & 0x40)
1789 *pval |= 0xFFFFFF80;
1790 else
1791 *pval &= 0x7F;
1792 }
1793
1794 if (op == 0)
1795 {
1796 OUTS (outf, dregs (dst));
1797 OUTS (outf, " = ");
1798 OUTS (outf, imm7 (src));
1799 OUTS (outf, " (X);\t\t/*\t\t");
1800 OUTS (outf, dregs (dst));
1801 OUTS (outf, "=");
1802 OUTS (outf, uimm32 (*pval));
1803 OUTS (outf, "(");
1804 OUTS (outf, imm32 (*pval));
1805 OUTS (outf, ") */");
1806 comment = 1;
1807 }
1808 else if (op == 1)
1809 {
1810 OUTS (outf, dregs (dst));
1811 OUTS (outf, " += ");
1812 OUTS (outf, imm7 (src));
1813 OUTS (outf, ";\t\t/* (");
1814 OUTS (outf, imm7d (src));
1815 OUTS (outf, ") */");
1816 comment = 1;
1817 }
1818 else
1819 return 0;
1820
1821 return 2;
1822 }
1823
1824 static int
1825 decode_COMPI2opP_0 (TIword iw0, disassemble_info *outf)
1826 {
1827 /* COMPI2opP
1828 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1829 | 0 | 1 | 1 | 0 | 1 |.op|.src.......................|.dst.......|
1830 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1831 int op = ((iw0 >> COMPI2opP_op_bits) & COMPI2opP_op_mask);
1832 int src = ((iw0 >> COMPI2opP_src_bits) & COMPI2opP_src_mask);
1833 int dst = ((iw0 >> COMPI2opP_dst_bits) & COMPI2opP_dst_mask);
1834
1835 bu32 *pval = get_allreg (1, dst);
1836
1837 if (parallel)
1838 return 0;
1839
1840 if (op == 0)
1841 {
1842 *pval = imm7_val (src);
1843 if (src & 0x40)
1844 *pval |= 0xFFFFFF80;
1845 else
1846 *pval &= 0x7F;
1847 }
1848
1849 if (op == 0)
1850 {
1851 OUTS (outf, pregs (dst));
1852 OUTS (outf, " = ");
1853 OUTS (outf, imm7 (src));
1854 OUTS (outf, " (X);\t\t/*\t\t");
1855 OUTS (outf, pregs (dst));
1856 OUTS (outf, "=");
1857 OUTS (outf, uimm32 (*pval));
1858 OUTS (outf, "(");
1859 OUTS (outf, imm32 (*pval));
1860 OUTS (outf, ") */");
1861 comment = 1;
1862 }
1863 else if (op == 1)
1864 {
1865 OUTS (outf, pregs (dst));
1866 OUTS (outf, " += ");
1867 OUTS (outf, imm7 (src));
1868 OUTS (outf, ";\t\t/* (");
1869 OUTS (outf, imm7d (src));
1870 OUTS (outf, ") */");
1871 comment = 1;
1872 }
1873 else
1874 return 0;
1875
1876 return 2;
1877 }
1878
1879 static int
1880 decode_LDSTpmod_0 (TIword iw0, disassemble_info *outf)
1881 {
1882 /* LDSTpmod
1883 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
1884 | 1 | 0 | 0 | 0 |.W.|.aop...|.reg.......|.idx.......|.ptr.......|
1885 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
1886 int W = ((iw0 >> LDSTpmod_W_bits) & LDSTpmod_W_mask);
1887 int aop = ((iw0 >> LDSTpmod_aop_bits) & LDSTpmod_aop_mask);
1888 int idx = ((iw0 >> LDSTpmod_idx_bits) & LDSTpmod_idx_mask);
1889 int ptr = ((iw0 >> LDSTpmod_ptr_bits) & LDSTpmod_ptr_mask);
1890 int reg = ((iw0 >> LDSTpmod_reg_bits) & LDSTpmod_reg_mask);
1891
1892 if (aop == 1 && W == 0 && idx == ptr)
1893 {
1894 OUTS (outf, dregs_lo (reg));
1895 OUTS (outf, " = W[");
1896 OUTS (outf, pregs (ptr));
1897 OUTS (outf, "]");
1898 }
1899 else if (aop == 2 && W == 0 && idx == ptr)
1900 {
1901 OUTS (outf, dregs_hi (reg));
1902 OUTS (outf, " = W[");
1903 OUTS (outf, pregs (ptr));
1904 OUTS (outf, "]");
1905 }
1906 else if (aop == 1 && W == 1 && idx == ptr)
1907 {
1908 OUTS (outf, "W[");
1909 OUTS (outf, pregs (ptr));
1910 OUTS (outf, "] = ");
1911 OUTS (outf, dregs_lo (reg));
1912 }
1913 else if (aop == 2 && W == 1 && idx == ptr)
1914 {
1915 OUTS (outf, "W[");
1916 OUTS (outf, pregs (ptr));
1917 OUTS (outf, "] = ");
1918 OUTS (outf, dregs_hi (reg));
1919 }
1920 else if (aop == 0 && W == 0)
1921 {
1922 OUTS (outf, dregs (reg));
1923 OUTS (outf, " = [");
1924 OUTS (outf, pregs (ptr));
1925 OUTS (outf, " ++ ");
1926 OUTS (outf, pregs (idx));
1927 OUTS (outf, "]");
1928 }
1929 else if (aop == 1 && W == 0)
1930 {
1931 OUTS (outf, dregs_lo (reg));
1932 OUTS (outf, " = W[");
1933 OUTS (outf, pregs (ptr));
1934 OUTS (outf, " ++ ");
1935 OUTS (outf, pregs (idx));
1936 OUTS (outf, "]");
1937 }
1938 else if (aop == 2 && W == 0)
1939 {
1940 OUTS (outf, dregs_hi (reg));
1941 OUTS (outf, " = W[");
1942 OUTS (outf, pregs (ptr));
1943 OUTS (outf, " ++ ");
1944 OUTS (outf, pregs (idx));
1945 OUTS (outf, "]");
1946 }
1947 else if (aop == 3 && W == 0)
1948 {
1949 OUTS (outf, dregs (reg));
1950 OUTS (outf, " = W[");
1951 OUTS (outf, pregs (ptr));
1952 OUTS (outf, " ++ ");
1953 OUTS (outf, pregs (idx));
1954 OUTS (outf, "] (Z)");
1955 }
1956 else if (aop == 3 && W == 1)
1957 {
1958 OUTS (outf, dregs (reg));
1959 OUTS (outf, " = W[");
1960 OUTS (outf, pregs (ptr));
1961 OUTS (outf, " ++ ");
1962 OUTS (outf, pregs (idx));
1963 OUTS (outf, "] (X)");
1964 }
1965 else if (aop == 0 && W == 1)
1966 {
1967 OUTS (outf, "[");
1968 OUTS (outf, pregs (ptr));
1969 OUTS (outf, " ++ ");
1970 OUTS (outf, pregs (idx));
1971 OUTS (outf, "] = ");
1972 OUTS (outf, dregs (reg));
1973 }
1974 else if (aop == 1 && W == 1)
1975 {
1976 OUTS (outf, "W[");
1977 OUTS (outf, pregs (ptr));
1978 OUTS (outf, " ++ ");
1979 OUTS (outf, pregs (idx));
1980 OUTS (outf, "] = ");
1981 OUTS (outf, dregs_lo (reg));
1982 }
1983 else if (aop == 2 && W == 1)
1984 {
1985 OUTS (outf, "W[");
1986 OUTS (outf, pregs (ptr));
1987 OUTS (outf, " ++ ");
1988 OUTS (outf, pregs (idx));
1989 OUTS (outf, "] = ");
1990 OUTS (outf, dregs_hi (reg));
1991 }
1992 else
1993 return 0;
1994
1995 return 2;
1996 }
1997
1998 static int
1999 decode_dagMODim_0 (TIword iw0, disassemble_info *outf)
2000 {
2001 /* dagMODim
2002 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2003 | 1 | 0 | 0 | 1 | 1 | 1 | 1 | 0 |.br| 1 | 1 |.op|.m.....|.i.....|
2004 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2005 int i = ((iw0 >> DagMODim_i_bits) & DagMODim_i_mask);
2006 int m = ((iw0 >> DagMODim_m_bits) & DagMODim_m_mask);
2007 int br = ((iw0 >> DagMODim_br_bits) & DagMODim_br_mask);
2008 int op = ((iw0 >> DagMODim_op_bits) & DagMODim_op_mask);
2009
2010 if (op == 0 && br == 1)
2011 {
2012 OUTS (outf, iregs (i));
2013 OUTS (outf, " += ");
2014 OUTS (outf, mregs (m));
2015 OUTS (outf, " (BREV)");
2016 }
2017 else if (op == 0)
2018 {
2019 OUTS (outf, iregs (i));
2020 OUTS (outf, " += ");
2021 OUTS (outf, mregs (m));
2022 }
2023 else if (op == 1 && br == 0)
2024 {
2025 OUTS (outf, iregs (i));
2026 OUTS (outf, " -= ");
2027 OUTS (outf, mregs (m));
2028 }
2029 else
2030 return 0;
2031
2032 return 2;
2033 }
2034
2035 static int
2036 decode_dagMODik_0 (TIword iw0, disassemble_info *outf)
2037 {
2038 /* dagMODik
2039 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2040 | 1 | 0 | 0 | 1 | 1 | 1 | 1 | 1 | 0 | 1 | 1 | 0 |.op....|.i.....|
2041 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2042 int i = ((iw0 >> DagMODik_i_bits) & DagMODik_i_mask);
2043 int op = ((iw0 >> DagMODik_op_bits) & DagMODik_op_mask);
2044
2045 if (op == 0)
2046 {
2047 OUTS (outf, iregs (i));
2048 OUTS (outf, " += 0x2");
2049 }
2050 else if (op == 1)
2051 {
2052 OUTS (outf, iregs (i));
2053 OUTS (outf, " -= 0x2");
2054 }
2055 else if (op == 2)
2056 {
2057 OUTS (outf, iregs (i));
2058 OUTS (outf, " += 0x4");
2059 }
2060 else if (op == 3)
2061 {
2062 OUTS (outf, iregs (i));
2063 OUTS (outf, " -= 0x4");
2064 }
2065 else
2066 return 0;
2067
2068 if (! parallel)
2069 {
2070 OUTS (outf, ";\t\t/* ( ");
2071 if (op == 0 || op == 1)
2072 OUTS (outf, "2");
2073 else if (op == 2 || op == 3)
2074 OUTS (outf, "4");
2075 OUTS (outf, ") */");
2076 comment = 1;
2077 }
2078
2079 return 2;
2080 }
2081
2082 static int
2083 decode_dspLDST_0 (TIword iw0, disassemble_info *outf)
2084 {
2085 /* dspLDST
2086 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2087 | 1 | 0 | 0 | 1 | 1 | 1 |.W.|.aop...|.m.....|.i.....|.reg.......|
2088 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2089 int i = ((iw0 >> DspLDST_i_bits) & DspLDST_i_mask);
2090 int m = ((iw0 >> DspLDST_m_bits) & DspLDST_m_mask);
2091 int W = ((iw0 >> DspLDST_W_bits) & DspLDST_W_mask);
2092 int aop = ((iw0 >> DspLDST_aop_bits) & DspLDST_aop_mask);
2093 int reg = ((iw0 >> DspLDST_reg_bits) & DspLDST_reg_mask);
2094
2095 if (aop == 0 && W == 0 && m == 0)
2096 {
2097 OUTS (outf, dregs (reg));
2098 OUTS (outf, " = [");
2099 OUTS (outf, iregs (i));
2100 OUTS (outf, "++]");
2101 }
2102 else if (aop == 0 && W == 0 && m == 1)
2103 {
2104 OUTS (outf, dregs_lo (reg));
2105 OUTS (outf, " = W[");
2106 OUTS (outf, iregs (i));
2107 OUTS (outf, "++]");
2108 }
2109 else if (aop == 0 && W == 0 && m == 2)
2110 {
2111 OUTS (outf, dregs_hi (reg));
2112 OUTS (outf, " = W[");
2113 OUTS (outf, iregs (i));
2114 OUTS (outf, "++]");
2115 }
2116 else if (aop == 1 && W == 0 && m == 0)
2117 {
2118 OUTS (outf, dregs (reg));
2119 OUTS (outf, " = [");
2120 OUTS (outf, iregs (i));
2121 OUTS (outf, "--]");
2122 }
2123 else if (aop == 1 && W == 0 && m == 1)
2124 {
2125 OUTS (outf, dregs_lo (reg));
2126 OUTS (outf, " = W[");
2127 OUTS (outf, iregs (i));
2128 OUTS (outf, "--]");
2129 }
2130 else if (aop == 1 && W == 0 && m == 2)
2131 {
2132 OUTS (outf, dregs_hi (reg));
2133 OUTS (outf, " = W[");
2134 OUTS (outf, iregs (i));
2135 OUTS (outf, "--]");
2136 }
2137 else if (aop == 2 && W == 0 && m == 0)
2138 {
2139 OUTS (outf, dregs (reg));
2140 OUTS (outf, " = [");
2141 OUTS (outf, iregs (i));
2142 OUTS (outf, "]");
2143 }
2144 else if (aop == 2 && W == 0 && m == 1)
2145 {
2146 OUTS (outf, dregs_lo (reg));
2147 OUTS (outf, " = W[");
2148 OUTS (outf, iregs (i));
2149 OUTS (outf, "]");
2150 }
2151 else if (aop == 2 && W == 0 && m == 2)
2152 {
2153 OUTS (outf, dregs_hi (reg));
2154 OUTS (outf, " = W[");
2155 OUTS (outf, iregs (i));
2156 OUTS (outf, "]");
2157 }
2158 else if (aop == 0 && W == 1 && m == 0)
2159 {
2160 OUTS (outf, "[");
2161 OUTS (outf, iregs (i));
2162 OUTS (outf, "++] = ");
2163 OUTS (outf, dregs (reg));
2164 }
2165 else if (aop == 0 && W == 1 && m == 1)
2166 {
2167 OUTS (outf, "W[");
2168 OUTS (outf, iregs (i));
2169 OUTS (outf, "++] = ");
2170 OUTS (outf, dregs_lo (reg));
2171 }
2172 else if (aop == 0 && W == 1 && m == 2)
2173 {
2174 OUTS (outf, "W[");
2175 OUTS (outf, iregs (i));
2176 OUTS (outf, "++] = ");
2177 OUTS (outf, dregs_hi (reg));
2178 }
2179 else if (aop == 1 && W == 1 && m == 0)
2180 {
2181 OUTS (outf, "[");
2182 OUTS (outf, iregs (i));
2183 OUTS (outf, "--] = ");
2184 OUTS (outf, dregs (reg));
2185 }
2186 else if (aop == 1 && W == 1 && m == 1)
2187 {
2188 OUTS (outf, "W[");
2189 OUTS (outf, iregs (i));
2190 OUTS (outf, "--] = ");
2191 OUTS (outf, dregs_lo (reg));
2192 }
2193 else if (aop == 1 && W == 1 && m == 2)
2194 {
2195 OUTS (outf, "W[");
2196 OUTS (outf, iregs (i));
2197 OUTS (outf, "--] = ");
2198 OUTS (outf, dregs_hi (reg));
2199 }
2200 else if (aop == 2 && W == 1 && m == 0)
2201 {
2202 OUTS (outf, "[");
2203 OUTS (outf, iregs (i));
2204 OUTS (outf, "] = ");
2205 OUTS (outf, dregs (reg));
2206 }
2207 else if (aop == 2 && W == 1 && m == 1)
2208 {
2209 OUTS (outf, "W[");
2210 OUTS (outf, iregs (i));
2211 OUTS (outf, "] = ");
2212 OUTS (outf, dregs_lo (reg));
2213 }
2214 else if (aop == 2 && W == 1 && m == 2)
2215 {
2216 OUTS (outf, "W[");
2217 OUTS (outf, iregs (i));
2218 OUTS (outf, "] = ");
2219 OUTS (outf, dregs_hi (reg));
2220 }
2221 else if (aop == 3 && W == 0)
2222 {
2223 OUTS (outf, dregs (reg));
2224 OUTS (outf, " = [");
2225 OUTS (outf, iregs (i));
2226 OUTS (outf, " ++ ");
2227 OUTS (outf, mregs (m));
2228 OUTS (outf, "]");
2229 }
2230 else if (aop == 3 && W == 1)
2231 {
2232 OUTS (outf, "[");
2233 OUTS (outf, iregs (i));
2234 OUTS (outf, " ++ ");
2235 OUTS (outf, mregs (m));
2236 OUTS (outf, "] = ");
2237 OUTS (outf, dregs (reg));
2238 }
2239 else
2240 return 0;
2241
2242 return 2;
2243 }
2244
2245 static int
2246 decode_LDST_0 (TIword iw0, disassemble_info *outf)
2247 {
2248 /* LDST
2249 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2250 | 1 | 0 | 0 | 1 |.sz....|.W.|.aop...|.Z.|.ptr.......|.reg.......|
2251 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2252 int Z = ((iw0 >> LDST_Z_bits) & LDST_Z_mask);
2253 int W = ((iw0 >> LDST_W_bits) & LDST_W_mask);
2254 int sz = ((iw0 >> LDST_sz_bits) & LDST_sz_mask);
2255 int aop = ((iw0 >> LDST_aop_bits) & LDST_aop_mask);
2256 int reg = ((iw0 >> LDST_reg_bits) & LDST_reg_mask);
2257 int ptr = ((iw0 >> LDST_ptr_bits) & LDST_ptr_mask);
2258
2259 if (aop == 0 && sz == 0 && Z == 0 && W == 0)
2260 {
2261 OUTS (outf, dregs (reg));
2262 OUTS (outf, " = [");
2263 OUTS (outf, pregs (ptr));
2264 OUTS (outf, "++]");
2265 }
2266 else if (aop == 0 && sz == 0 && Z == 1 && W == 0 && reg != ptr)
2267 {
2268 OUTS (outf, pregs (reg));
2269 OUTS (outf, " = [");
2270 OUTS (outf, pregs (ptr));
2271 OUTS (outf, "++]");
2272 }
2273 else if (aop == 0 && sz == 1 && Z == 0 && W == 0)
2274 {
2275 OUTS (outf, dregs (reg));
2276 OUTS (outf, " = W[");
2277 OUTS (outf, pregs (ptr));
2278 OUTS (outf, "++] (Z)");
2279 }
2280 else if (aop == 0 && sz == 1 && Z == 1 && W == 0)
2281 {
2282 OUTS (outf, dregs (reg));
2283 OUTS (outf, " = W[");
2284 OUTS (outf, pregs (ptr));
2285 OUTS (outf, "++] (X)");
2286 }
2287 else if (aop == 0 && sz == 2 && Z == 0 && W == 0)
2288 {
2289 OUTS (outf, dregs (reg));
2290 OUTS (outf, " = B[");
2291 OUTS (outf, pregs (ptr));
2292 OUTS (outf, "++] (Z)");
2293 }
2294 else if (aop == 0 && sz == 2 && Z == 1 && W == 0)
2295 {
2296 OUTS (outf, dregs (reg));
2297 OUTS (outf, " = B[");
2298 OUTS (outf, pregs (ptr));
2299 OUTS (outf, "++] (X)");
2300 }
2301 else if (aop == 1 && sz == 0 && Z == 0 && W == 0)
2302 {
2303 OUTS (outf, dregs (reg));
2304 OUTS (outf, " = [");
2305 OUTS (outf, pregs (ptr));
2306 OUTS (outf, "--]");
2307 }
2308 else if (aop == 1 && sz == 0 && Z == 1 && W == 0 && reg != ptr)
2309 {
2310 OUTS (outf, pregs (reg));
2311 OUTS (outf, " = [");
2312 OUTS (outf, pregs (ptr));
2313 OUTS (outf, "--]");
2314 }
2315 else if (aop == 1 && sz == 1 && Z == 0 && W == 0)
2316 {
2317 OUTS (outf, dregs (reg));
2318 OUTS (outf, " = W[");
2319 OUTS (outf, pregs (ptr));
2320 OUTS (outf, "--] (Z)");
2321 }
2322 else if (aop == 1 && sz == 1 && Z == 1 && W == 0)
2323 {
2324 OUTS (outf, dregs (reg));
2325 OUTS (outf, " = W[");
2326 OUTS (outf, pregs (ptr));
2327 OUTS (outf, "--] (X)");
2328 }
2329 else if (aop == 1 && sz == 2 && Z == 0 && W == 0)
2330 {
2331 OUTS (outf, dregs (reg));
2332 OUTS (outf, " = B[");
2333 OUTS (outf, pregs (ptr));
2334 OUTS (outf, "--] (Z)");
2335 }
2336 else if (aop == 1 && sz == 2 && Z == 1 && W == 0)
2337 {
2338 OUTS (outf, dregs (reg));
2339 OUTS (outf, " = B[");
2340 OUTS (outf, pregs (ptr));
2341 OUTS (outf, "--] (X)");
2342 }
2343 else if (aop == 2 && sz == 0 && Z == 0 && W == 0)
2344 {
2345 OUTS (outf, dregs (reg));
2346 OUTS (outf, " = [");
2347 OUTS (outf, pregs (ptr));
2348 OUTS (outf, "]");
2349 }
2350 else if (aop == 2 && sz == 0 && Z == 1 && W == 0)
2351 {
2352 OUTS (outf, pregs (reg));
2353 OUTS (outf, " = [");
2354 OUTS (outf, pregs (ptr));
2355 OUTS (outf, "]");
2356 }
2357 else if (aop == 2 && sz == 1 && Z == 0 && W == 0)
2358 {
2359 OUTS (outf, dregs (reg));
2360 OUTS (outf, " = W[");
2361 OUTS (outf, pregs (ptr));
2362 OUTS (outf, "] (Z)");
2363 }
2364 else if (aop == 2 && sz == 1 && Z == 1 && W == 0)
2365 {
2366 OUTS (outf, dregs (reg));
2367 OUTS (outf, " = W[");
2368 OUTS (outf, pregs (ptr));
2369 OUTS (outf, "] (X)");
2370 }
2371 else if (aop == 2 && sz == 2 && Z == 0 && W == 0)
2372 {
2373 OUTS (outf, dregs (reg));
2374 OUTS (outf, " = B[");
2375 OUTS (outf, pregs (ptr));
2376 OUTS (outf, "] (Z)");
2377 }
2378 else if (aop == 2 && sz == 2 && Z == 1 && W == 0)
2379 {
2380 OUTS (outf, dregs (reg));
2381 OUTS (outf, " = B[");
2382 OUTS (outf, pregs (ptr));
2383 OUTS (outf, "] (X)");
2384 }
2385 else if (aop == 0 && sz == 0 && Z == 0 && W == 1)
2386 {
2387 OUTS (outf, "[");
2388 OUTS (outf, pregs (ptr));
2389 OUTS (outf, "++] = ");
2390 OUTS (outf, dregs (reg));
2391 }
2392 else if (aop == 0 && sz == 0 && Z == 1 && W == 1)
2393 {
2394 OUTS (outf, "[");
2395 OUTS (outf, pregs (ptr));
2396 OUTS (outf, "++] = ");
2397 OUTS (outf, pregs (reg));
2398 }
2399 else if (aop == 0 && sz == 1 && Z == 0 && W == 1)
2400 {
2401 OUTS (outf, "W[");
2402 OUTS (outf, pregs (ptr));
2403 OUTS (outf, "++] = ");
2404 OUTS (outf, dregs (reg));
2405 }
2406 else if (aop == 0 && sz == 2 && Z == 0 && W == 1)
2407 {
2408 OUTS (outf, "B[");
2409 OUTS (outf, pregs (ptr));
2410 OUTS (outf, "++] = ");
2411 OUTS (outf, dregs (reg));
2412 }
2413 else if (aop == 1 && sz == 0 && Z == 0 && W == 1)
2414 {
2415 OUTS (outf, "[");
2416 OUTS (outf, pregs (ptr));
2417 OUTS (outf, "--] = ");
2418 OUTS (outf, dregs (reg));
2419 }
2420 else if (aop == 1 && sz == 0 && Z == 1 && W == 1)
2421 {
2422 OUTS (outf, "[");
2423 OUTS (outf, pregs (ptr));
2424 OUTS (outf, "--] = ");
2425 OUTS (outf, pregs (reg));
2426 }
2427 else if (aop == 1 && sz == 1 && Z == 0 && W == 1)
2428 {
2429 OUTS (outf, "W[");
2430 OUTS (outf, pregs (ptr));
2431 OUTS (outf, "--] = ");
2432 OUTS (outf, dregs (reg));
2433 }
2434 else if (aop == 1 && sz == 2 && Z == 0 && W == 1)
2435 {
2436 OUTS (outf, "B[");
2437 OUTS (outf, pregs (ptr));
2438 OUTS (outf, "--] = ");
2439 OUTS (outf, dregs (reg));
2440 }
2441 else if (aop == 2 && sz == 0 && Z == 0 && W == 1)
2442 {
2443 OUTS (outf, "[");
2444 OUTS (outf, pregs (ptr));
2445 OUTS (outf, "] = ");
2446 OUTS (outf, dregs (reg));
2447 }
2448 else if (aop == 2 && sz == 0 && Z == 1 && W == 1)
2449 {
2450 OUTS (outf, "[");
2451 OUTS (outf, pregs (ptr));
2452 OUTS (outf, "] = ");
2453 OUTS (outf, pregs (reg));
2454 }
2455 else if (aop == 2 && sz == 1 && Z == 0 && W == 1)
2456 {
2457 OUTS (outf, "W[");
2458 OUTS (outf, pregs (ptr));
2459 OUTS (outf, "] = ");
2460 OUTS (outf, dregs (reg));
2461 }
2462 else if (aop == 2 && sz == 2 && Z == 0 && W == 1)
2463 {
2464 OUTS (outf, "B[");
2465 OUTS (outf, pregs (ptr));
2466 OUTS (outf, "] = ");
2467 OUTS (outf, dregs (reg));
2468 }
2469 else
2470 return 0;
2471
2472 return 2;
2473 }
2474
2475 static int
2476 decode_LDSTiiFP_0 (TIword iw0, disassemble_info *outf)
2477 {
2478 /* LDSTiiFP
2479 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2480 | 1 | 0 | 1 | 1 | 1 | 0 |.W.|.offset............|.reg...........|
2481 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2482 int reg = ((iw0 >> LDSTiiFP_reg_bits) & LDSTiiFP_reg_mask);
2483 int offset = ((iw0 >> LDSTiiFP_offset_bits) & LDSTiiFP_offset_mask);
2484 int W = ((iw0 >> LDSTiiFP_W_bits) & LDSTiiFP_W_mask);
2485
2486 if (W == 0)
2487 {
2488 OUTS (outf, dpregs (reg));
2489 OUTS (outf, " = [FP ");
2490 OUTS (outf, negimm5s4 (offset));
2491 OUTS (outf, "]");
2492 }
2493 else if (W == 1)
2494 {
2495 OUTS (outf, "[FP ");
2496 OUTS (outf, negimm5s4 (offset));
2497 OUTS (outf, "] = ");
2498 OUTS (outf, dpregs (reg));
2499 }
2500 else
2501 return 0;
2502
2503 return 2;
2504 }
2505
2506 static int
2507 decode_LDSTii_0 (TIword iw0, disassemble_info *outf)
2508 {
2509 /* LDSTii
2510 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2511 | 1 | 0 | 1 |.W.|.op....|.offset........|.ptr.......|.reg.......|
2512 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2513 int reg = ((iw0 >> LDSTii_reg_bit) & LDSTii_reg_mask);
2514 int ptr = ((iw0 >> LDSTii_ptr_bit) & LDSTii_ptr_mask);
2515 int offset = ((iw0 >> LDSTii_offset_bit) & LDSTii_offset_mask);
2516 int op = ((iw0 >> LDSTii_op_bit) & LDSTii_op_mask);
2517 int W = ((iw0 >> LDSTii_W_bit) & LDSTii_W_mask);
2518
2519 if (W == 0 && op == 0)
2520 {
2521 OUTS (outf, dregs (reg));
2522 OUTS (outf, " = [");
2523 OUTS (outf, pregs (ptr));
2524 OUTS (outf, " + ");
2525 OUTS (outf, uimm4s4 (offset));
2526 OUTS (outf, "]");
2527 }
2528 else if (W == 0 && op == 1)
2529 {
2530 OUTS (outf, dregs (reg));
2531 OUTS (outf, " = W[");
2532 OUTS (outf, pregs (ptr));
2533 OUTS (outf, " + ");
2534 OUTS (outf, uimm4s2 (offset));
2535 OUTS (outf, "] (Z)");
2536 }
2537 else if (W == 0 && op == 2)
2538 {
2539 OUTS (outf, dregs (reg));
2540 OUTS (outf, " = W[");
2541 OUTS (outf, pregs (ptr));
2542 OUTS (outf, " + ");
2543 OUTS (outf, uimm4s2 (offset));
2544 OUTS (outf, "] (X)");
2545 }
2546 else if (W == 0 && op == 3)
2547 {
2548 OUTS (outf, pregs (reg));
2549 OUTS (outf, " = [");
2550 OUTS (outf, pregs (ptr));
2551 OUTS (outf, " + ");
2552 OUTS (outf, uimm4s4 (offset));
2553 OUTS (outf, "]");
2554 }
2555 else if (W == 1 && op == 0)
2556 {
2557 OUTS (outf, "[");
2558 OUTS (outf, pregs (ptr));
2559 OUTS (outf, " + ");
2560 OUTS (outf, uimm4s4 (offset));
2561 OUTS (outf, "] = ");
2562 OUTS (outf, dregs (reg));
2563 }
2564 else if (W == 1 && op == 1)
2565 {
2566 OUTS (outf, "W[");
2567 OUTS (outf, pregs (ptr));
2568 OUTS (outf, " + ");
2569 OUTS (outf, uimm4s2 (offset));
2570 OUTS (outf, "] = ");
2571 OUTS (outf, dregs (reg));
2572 }
2573 else if (W == 1 && op == 3)
2574 {
2575 OUTS (outf, "[");
2576 OUTS (outf, pregs (ptr));
2577 OUTS (outf, " + ");
2578 OUTS (outf, uimm4s4 (offset));
2579 OUTS (outf, "] = ");
2580 OUTS (outf, pregs (reg));
2581 }
2582 else
2583 return 0;
2584
2585 return 2;
2586 }
2587
2588 static int
2589 decode_LoopSetup_0 (TIword iw0, TIword iw1, bfd_vma pc, disassemble_info *outf)
2590 {
2591 /* LoopSetup
2592 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2593 | 1 | 1 | 1 | 0 | 0 | 0 | 0 | 0 | 1 |.rop...|.c.|.soffset.......|
2594 |.reg...........| - | - |.eoffset...............................|
2595 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2596 int c = ((iw0 >> (LoopSetup_c_bits - 16)) & LoopSetup_c_mask);
2597 int reg = ((iw1 >> LoopSetup_reg_bits) & LoopSetup_reg_mask);
2598 int rop = ((iw0 >> (LoopSetup_rop_bits - 16)) & LoopSetup_rop_mask);
2599 int soffset = ((iw0 >> (LoopSetup_soffset_bits - 16)) & LoopSetup_soffset_mask);
2600 int eoffset = ((iw1 >> LoopSetup_eoffset_bits) & LoopSetup_eoffset_mask);
2601
2602 if (parallel)
2603 return 0;
2604
2605 if (reg > 7)
2606 return 0;
2607
2608 if (rop == 0)
2609 {
2610 OUTS (outf, "LSETUP");
2611 OUTS (outf, "(0x");
2612 OUTS (outf, pcrel4 (soffset));
2613 OUTS (outf, ", 0x");
2614 OUTS (outf, lppcrel10 (eoffset));
2615 OUTS (outf, ") ");
2616 OUTS (outf, counters (c));
2617 }
2618 else if (rop == 1)
2619 {
2620 OUTS (outf, "LSETUP");
2621 OUTS (outf, "(0x");
2622 OUTS (outf, pcrel4 (soffset));
2623 OUTS (outf, ", 0x");
2624 OUTS (outf, lppcrel10 (eoffset));
2625 OUTS (outf, ") ");
2626 OUTS (outf, counters (c));
2627 OUTS (outf, " = ");
2628 OUTS (outf, pregs (reg));
2629 }
2630 else if (rop == 3)
2631 {
2632 OUTS (outf, "LSETUP");
2633 OUTS (outf, "(0x");
2634 OUTS (outf, pcrel4 (soffset));
2635 OUTS (outf, ", 0x");
2636 OUTS (outf, lppcrel10 (eoffset));
2637 OUTS (outf, ") ");
2638 OUTS (outf, counters (c));
2639 OUTS (outf, " = ");
2640 OUTS (outf, pregs (reg));
2641 OUTS (outf, " >> 0x1");
2642 }
2643 else
2644 return 0;
2645
2646 return 4;
2647 }
2648
2649 static int
2650 decode_LDIMMhalf_0 (TIword iw0, TIword iw1, disassemble_info *outf)
2651 {
2652 /* LDIMMhalf
2653 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2654 | 1 | 1 | 1 | 0 | 0 | 0 | 0 | 1 |.Z.|.H.|.S.|.grp...|.reg.......|
2655 |.hword.........................................................|
2656 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2657 int H = ((iw0 >> (LDIMMhalf_H_bits - 16)) & LDIMMhalf_H_mask);
2658 int Z = ((iw0 >> (LDIMMhalf_Z_bits - 16)) & LDIMMhalf_Z_mask);
2659 int S = ((iw0 >> (LDIMMhalf_S_bits - 16)) & LDIMMhalf_S_mask);
2660 int reg = ((iw0 >> (LDIMMhalf_reg_bits - 16)) & LDIMMhalf_reg_mask);
2661 int grp = ((iw0 >> (LDIMMhalf_grp_bits - 16)) & LDIMMhalf_grp_mask);
2662 int hword = ((iw1 >> LDIMMhalf_hword_bits) & LDIMMhalf_hword_mask);
2663
2664 bu32 *pval = get_allreg (grp, reg);
2665
2666 if (parallel)
2667 return 0;
2668
2669 /* Since we don't have 32-bit immediate loads, we allow the disassembler
2670 to combine them, so it prints out the right values.
2671 Here we keep track of the registers. */
2672 if (H == 0 && S == 1 && Z == 0)
2673 {
2674 /* regs = imm16 (x) */
2675 *pval = imm16_val (hword);
2676 if (hword & 0x8000)
2677 *pval |= 0xFFFF0000;
2678 else
2679 *pval &= 0xFFFF;
2680 }
2681 else if (H == 0 && S == 0 && Z == 1)
2682 {
2683 /* regs = luimm16 (Z) */
2684 *pval = luimm16_val (hword);
2685 *pval &= 0xFFFF;
2686 }
2687 else if (H == 0 && S == 0 && Z == 0)
2688 {
2689 /* regs_lo = luimm16 */
2690 *pval &= 0xFFFF0000;
2691 *pval |= luimm16_val (hword);
2692 }
2693 else if (H == 1 && S == 0 && Z == 0)
2694 {
2695 /* regs_hi = huimm16 */
2696 *pval &= 0xFFFF;
2697 *pval |= luimm16_val (hword) << 16;
2698 }
2699
2700 /* Here we do the disassembly */
2701 if (grp == 0 && H == 0 && S == 0 && Z == 0)
2702 {
2703 OUTS (outf, dregs_lo (reg));
2704 OUTS (outf, " = ");
2705 OUTS (outf, uimm16 (hword));
2706 }
2707 else if (grp == 0 && H == 1 && S == 0 && Z == 0)
2708 {
2709 OUTS (outf, dregs_hi (reg));
2710 OUTS (outf, " = ");
2711 OUTS (outf, uimm16 (hword));
2712 }
2713 else if (grp == 0 && H == 0 && S == 1 && Z == 0)
2714 {
2715 OUTS (outf, dregs (reg));
2716 OUTS (outf, " = ");
2717 OUTS (outf, imm16 (hword));
2718 OUTS (outf, " (X)");
2719 }
2720 else if (H == 0 && S == 1 && Z == 0)
2721 {
2722 OUTS (outf, regs (reg, grp));
2723 OUTS (outf, " = ");
2724 OUTS (outf, imm16 (hword));
2725 OUTS (outf, " (X)");
2726 }
2727 else if (H == 0 && S == 0 && Z == 1)
2728 {
2729 OUTS (outf, regs (reg, grp));
2730 OUTS (outf, " = ");
2731 OUTS (outf, uimm16 (hword));
2732 OUTS (outf, " (Z)");
2733 }
2734 else if (H == 0 && S == 0 && Z == 0)
2735 {
2736 OUTS (outf, regs_lo (reg, grp));
2737 OUTS (outf, " = ");
2738 OUTS (outf, uimm16 (hword));
2739 }
2740 else if (H == 1 && S == 0 && Z == 0)
2741 {
2742 OUTS (outf, regs_hi (reg, grp));
2743 OUTS (outf, " = ");
2744 OUTS (outf, uimm16 (hword));
2745 }
2746 else
2747 return 0;
2748
2749 /* And we print out the 32-bit value if it is a pointer. */
2750 if (S == 0 && Z == 0)
2751 {
2752 OUTS (outf, ";\t\t/* (");
2753 OUTS (outf, imm16d (hword));
2754 OUTS (outf, ")\t");
2755
2756 /* If it is an MMR, don't print the symbol. */
2757 if (*pval < 0xFFC00000 && grp == 1)
2758 {
2759 OUTS (outf, regs (reg, grp));
2760 OUTS (outf, "=0x");
2761 OUTS (outf, huimm32e (*pval));
2762 }
2763 else
2764 {
2765 OUTS (outf, regs (reg, grp));
2766 OUTS (outf, "=0x");
2767 OUTS (outf, huimm32e (*pval));
2768 OUTS (outf, "(");
2769 OUTS (outf, imm32 (*pval));
2770 OUTS (outf, ")");
2771 }
2772
2773 OUTS (outf, " */");
2774 comment = 1;
2775 }
2776 if (S == 1 || Z == 1)
2777 {
2778 OUTS (outf, ";\t\t/*\t\t");
2779 OUTS (outf, regs (reg, grp));
2780 OUTS (outf, "=0x");
2781 OUTS (outf, huimm32e (*pval));
2782 OUTS (outf, "(");
2783 OUTS (outf, imm32 (*pval));
2784 OUTS (outf, ") */");
2785 comment = 1;
2786 }
2787 return 4;
2788 }
2789
2790 static int
2791 decode_CALLa_0 (TIword iw0, TIword iw1, bfd_vma pc, disassemble_info *outf)
2792 {
2793 /* CALLa
2794 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2795 | 1 | 1 | 1 | 0 | 0 | 0 | 1 |.S.|.msw...........................|
2796 |.lsw...........................................................|
2797 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2798 int S = ((iw0 >> (CALLa_S_bits - 16)) & CALLa_S_mask);
2799 int lsw = ((iw1 >> 0) & 0xffff);
2800 int msw = ((iw0 >> 0) & 0xff);
2801
2802 if (parallel)
2803 return 0;
2804
2805 if (S == 1)
2806 OUTS (outf, "CALL 0x");
2807 else if (S == 0)
2808 OUTS (outf, "JUMP.L 0x");
2809 else
2810 return 0;
2811
2812 OUTS (outf, pcrel24 (((msw) << 16) | (lsw)));
2813 return 4;
2814 }
2815
2816 static int
2817 decode_LDSTidxI_0 (TIword iw0, TIword iw1, disassemble_info *outf)
2818 {
2819 /* LDSTidxI
2820 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2821 | 1 | 1 | 1 | 0 | 0 | 1 |.W.|.Z.|.sz....|.ptr.......|.reg.......|
2822 |.offset........................................................|
2823 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2824 int Z = ((iw0 >> (LDSTidxI_Z_bits - 16)) & LDSTidxI_Z_mask);
2825 int W = ((iw0 >> (LDSTidxI_W_bits - 16)) & LDSTidxI_W_mask);
2826 int sz = ((iw0 >> (LDSTidxI_sz_bits - 16)) & LDSTidxI_sz_mask);
2827 int reg = ((iw0 >> (LDSTidxI_reg_bits - 16)) & LDSTidxI_reg_mask);
2828 int ptr = ((iw0 >> (LDSTidxI_ptr_bits - 16)) & LDSTidxI_ptr_mask);
2829 int offset = ((iw1 >> LDSTidxI_offset_bits) & LDSTidxI_offset_mask);
2830
2831 if (W == 0 && sz == 0 && Z == 0)
2832 {
2833 OUTS (outf, dregs (reg));
2834 OUTS (outf, " = [");
2835 OUTS (outf, pregs (ptr));
2836 OUTS (outf, " + ");
2837 OUTS (outf, imm16s4 (offset));
2838 OUTS (outf, "]");
2839 }
2840 else if (W == 0 && sz == 0 && Z == 1)
2841 {
2842 OUTS (outf, pregs (reg));
2843 OUTS (outf, " = [");
2844 OUTS (outf, pregs (ptr));
2845 OUTS (outf, " + ");
2846 OUTS (outf, imm16s4 (offset));
2847 OUTS (outf, "]");
2848 }
2849 else if (W == 0 && sz == 1 && Z == 0)
2850 {
2851 OUTS (outf, dregs (reg));
2852 OUTS (outf, " = W[");
2853 OUTS (outf, pregs (ptr));
2854 OUTS (outf, " + ");
2855 OUTS (outf, imm16s2 (offset));
2856 OUTS (outf, "] (Z)");
2857 }
2858 else if (W == 0 && sz == 1 && Z == 1)
2859 {
2860 OUTS (outf, dregs (reg));
2861 OUTS (outf, " = W[");
2862 OUTS (outf, pregs (ptr));
2863 OUTS (outf, " + ");
2864 OUTS (outf, imm16s2 (offset));
2865 OUTS (outf, "] (X)");
2866 }
2867 else if (W == 0 && sz == 2 && Z == 0)
2868 {
2869 OUTS (outf, dregs (reg));
2870 OUTS (outf, " = B[");
2871 OUTS (outf, pregs (ptr));
2872 OUTS (outf, " + ");
2873 OUTS (outf, imm16 (offset));
2874 OUTS (outf, "] (Z)");
2875 }
2876 else if (W == 0 && sz == 2 && Z == 1)
2877 {
2878 OUTS (outf, dregs (reg));
2879 OUTS (outf, " = B[");
2880 OUTS (outf, pregs (ptr));
2881 OUTS (outf, " + ");
2882 OUTS (outf, imm16 (offset));
2883 OUTS (outf, "] (X)");
2884 }
2885 else if (W == 1 && sz == 0 && Z == 0)
2886 {
2887 OUTS (outf, "[");
2888 OUTS (outf, pregs (ptr));
2889 OUTS (outf, " + ");
2890 OUTS (outf, imm16s4 (offset));
2891 OUTS (outf, "] = ");
2892 OUTS (outf, dregs (reg));
2893 }
2894 else if (W == 1 && sz == 0 && Z == 1)
2895 {
2896 OUTS (outf, "[");
2897 OUTS (outf, pregs (ptr));
2898 OUTS (outf, " + ");
2899 OUTS (outf, imm16s4 (offset));
2900 OUTS (outf, "] = ");
2901 OUTS (outf, pregs (reg));
2902 }
2903 else if (W == 1 && sz == 1 && Z == 0)
2904 {
2905 OUTS (outf, "W[");
2906 OUTS (outf, pregs (ptr));
2907 OUTS (outf, " + ");
2908 OUTS (outf, imm16s2 (offset));
2909 OUTS (outf, "] = ");
2910 OUTS (outf, dregs (reg));
2911 }
2912 else if (W == 1 && sz == 2 && Z == 0)
2913 {
2914 OUTS (outf, "B[");
2915 OUTS (outf, pregs (ptr));
2916 OUTS (outf, " + ");
2917 OUTS (outf, imm16 (offset));
2918 OUTS (outf, "] = ");
2919 OUTS (outf, dregs (reg));
2920 }
2921 else
2922 return 0;
2923
2924 return 4;
2925 }
2926
2927 static int
2928 decode_linkage_0 (TIword iw0, TIword iw1, disassemble_info *outf)
2929 {
2930 /* linkage
2931 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2932 | 1 | 1 | 1 | 0 | 1 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |.R.|
2933 |.framesize.....................................................|
2934 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2935 int R = ((iw0 >> (Linkage_R_bits - 16)) & Linkage_R_mask);
2936 int framesize = ((iw1 >> Linkage_framesize_bits) & Linkage_framesize_mask);
2937
2938 if (parallel)
2939 return 0;
2940
2941 if (R == 0)
2942 {
2943 OUTS (outf, "LINK ");
2944 OUTS (outf, uimm16s4 (framesize));
2945 OUTS (outf, ";\t\t/* (");
2946 OUTS (outf, uimm16s4d (framesize));
2947 OUTS (outf, ") */");
2948 comment = 1;
2949 }
2950 else if (R == 1)
2951 OUTS (outf, "UNLINK");
2952 else
2953 return 0;
2954
2955 return 4;
2956 }
2957
2958 static int
2959 decode_dsp32mac_0 (TIword iw0, TIword iw1, disassemble_info *outf)
2960 {
2961 /* dsp32mac
2962 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
2963 | 1 | 1 | 0 | 0 |.M.| 0 | 0 |.mmod..........|.MM|.P.|.w1|.op1...|
2964 |.h01|.h11|.w0|.op0...|.h00|.h10|.dst.......|.src0......|.src1..|
2965 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
2966 int op1 = ((iw0 >> (DSP32Mac_op1_bits - 16)) & DSP32Mac_op1_mask);
2967 int w1 = ((iw0 >> (DSP32Mac_w1_bits - 16)) & DSP32Mac_w1_mask);
2968 int P = ((iw0 >> (DSP32Mac_p_bits - 16)) & DSP32Mac_p_mask);
2969 int MM = ((iw0 >> (DSP32Mac_MM_bits - 16)) & DSP32Mac_MM_mask);
2970 int mmod = ((iw0 >> (DSP32Mac_mmod_bits - 16)) & DSP32Mac_mmod_mask);
2971 int w0 = ((iw1 >> DSP32Mac_w0_bits) & DSP32Mac_w0_mask);
2972 int src0 = ((iw1 >> DSP32Mac_src0_bits) & DSP32Mac_src0_mask);
2973 int src1 = ((iw1 >> DSP32Mac_src1_bits) & DSP32Mac_src1_mask);
2974 int dst = ((iw1 >> DSP32Mac_dst_bits) & DSP32Mac_dst_mask);
2975 int h10 = ((iw1 >> DSP32Mac_h10_bits) & DSP32Mac_h10_mask);
2976 int h00 = ((iw1 >> DSP32Mac_h00_bits) & DSP32Mac_h00_mask);
2977 int op0 = ((iw1 >> DSP32Mac_op0_bits) & DSP32Mac_op0_mask);
2978 int h11 = ((iw1 >> DSP32Mac_h11_bits) & DSP32Mac_h11_mask);
2979 int h01 = ((iw1 >> DSP32Mac_h01_bits) & DSP32Mac_h01_mask);
2980
2981 if (w0 == 0 && w1 == 0 && op1 == 3 && op0 == 3)
2982 return 0;
2983
2984 if (op1 == 3 && MM)
2985 return 0;
2986
2987 if ((w1 || w0) && mmod == M_W32)
2988 return 0;
2989
2990 if (((1 << mmod) & (P ? 0x131b : 0x1b5f)) == 0)
2991 return 0;
2992
2993 if (w1 == 1 || op1 != 3)
2994 {
2995 if (w1)
2996 OUTS (outf, P ? dregs (dst + 1) : dregs_hi (dst));
2997
2998 if (op1 == 3)
2999 OUTS (outf, " = A1");
3000 else
3001 {
3002 if (w1)
3003 OUTS (outf, " = (");
3004 decode_macfunc (1, op1, h01, h11, src0, src1, outf);
3005 if (w1)
3006 OUTS (outf, ")");
3007 }
3008
3009 if (w0 == 1 || op0 != 3)
3010 {
3011 if (MM)
3012 OUTS (outf, " (M)");
3013 OUTS (outf, ", ");
3014 }
3015 }
3016
3017 if (w0 == 1 || op0 != 3)
3018 {
3019 /* Clear MM option since it only matters for MAC1, and if we made
3020 it this far, we've already shown it or we want to ignore it. */
3021 MM = 0;
3022
3023 if (w0)
3024 OUTS (outf, P ? dregs (dst) : dregs_lo (dst));
3025
3026 if (op0 == 3)
3027 OUTS (outf, " = A0");
3028 else
3029 {
3030 if (w0)
3031 OUTS (outf, " = (");
3032 decode_macfunc (0, op0, h00, h10, src0, src1, outf);
3033 if (w0)
3034 OUTS (outf, ")");
3035 }
3036 }
3037
3038 decode_optmode (mmod, MM, outf);
3039
3040 return 4;
3041 }
3042
3043 static int
3044 decode_dsp32mult_0 (TIword iw0, TIword iw1, disassemble_info *outf)
3045 {
3046 /* dsp32mult
3047 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
3048 | 1 | 1 | 0 | 0 |.M.| 0 | 1 |.mmod..........|.MM|.P.|.w1|.op1...|
3049 |.h01|.h11|.w0|.op0...|.h00|.h10|.dst.......|.src0......|.src1..|
3050 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
3051 int w1 = ((iw0 >> (DSP32Mac_w1_bits - 16)) & DSP32Mac_w1_mask);
3052 int P = ((iw0 >> (DSP32Mac_p_bits - 16)) & DSP32Mac_p_mask);
3053 int MM = ((iw0 >> (DSP32Mac_MM_bits - 16)) & DSP32Mac_MM_mask);
3054 int mmod = ((iw0 >> (DSP32Mac_mmod_bits - 16)) & DSP32Mac_mmod_mask);
3055 int w0 = ((iw1 >> DSP32Mac_w0_bits) & DSP32Mac_w0_mask);
3056 int src0 = ((iw1 >> DSP32Mac_src0_bits) & DSP32Mac_src0_mask);
3057 int src1 = ((iw1 >> DSP32Mac_src1_bits) & DSP32Mac_src1_mask);
3058 int dst = ((iw1 >> DSP32Mac_dst_bits) & DSP32Mac_dst_mask);
3059 int h10 = ((iw1 >> DSP32Mac_h10_bits) & DSP32Mac_h10_mask);
3060 int h00 = ((iw1 >> DSP32Mac_h00_bits) & DSP32Mac_h00_mask);
3061 int h11 = ((iw1 >> DSP32Mac_h11_bits) & DSP32Mac_h11_mask);
3062 int h01 = ((iw1 >> DSP32Mac_h01_bits) & DSP32Mac_h01_mask);
3063
3064 if (w1 == 0 && w0 == 0)
3065 return 0;
3066
3067 if (((1 << mmod) & (P ? 0x313 : 0x1b57)) == 0)
3068 return 0;
3069
3070 if (w1)
3071 {
3072 OUTS (outf, P ? dregs (dst + 1) : dregs_hi (dst));
3073 OUTS (outf, " = ");
3074 decode_multfunc (h01, h11, src0, src1, outf);
3075
3076 if (w0)
3077 {
3078 if (MM)
3079 OUTS (outf, " (M)");
3080 MM = 0;
3081 OUTS (outf, ", ");
3082 }
3083 }
3084
3085 if (w0)
3086 {
3087 OUTS (outf, P ? dregs (dst) : dregs_lo (dst));
3088 OUTS (outf, " = ");
3089 decode_multfunc (h00, h10, src0, src1, outf);
3090 }
3091
3092 decode_optmode (mmod, MM, outf);
3093 return 4;
3094 }
3095
3096 static int
3097 decode_dsp32alu_0 (TIword iw0, TIword iw1, disassemble_info *outf)
3098 {
3099 /* dsp32alu
3100 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
3101 | 1 | 1 | 0 | 0 |.M.| 1 | 0 | - | - | - |.HL|.aopcde............|
3102 |.aop...|.s.|.x.|.dst0......|.dst1......|.src0......|.src1......|
3103 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
3104 int s = ((iw1 >> DSP32Alu_s_bits) & DSP32Alu_s_mask);
3105 int x = ((iw1 >> DSP32Alu_x_bits) & DSP32Alu_x_mask);
3106 int aop = ((iw1 >> DSP32Alu_aop_bits) & DSP32Alu_aop_mask);
3107 int src0 = ((iw1 >> DSP32Alu_src0_bits) & DSP32Alu_src0_mask);
3108 int src1 = ((iw1 >> DSP32Alu_src1_bits) & DSP32Alu_src1_mask);
3109 int dst0 = ((iw1 >> DSP32Alu_dst0_bits) & DSP32Alu_dst0_mask);
3110 int dst1 = ((iw1 >> DSP32Alu_dst1_bits) & DSP32Alu_dst1_mask);
3111 int HL = ((iw0 >> (DSP32Alu_HL_bits - 16)) & DSP32Alu_HL_mask);
3112 int aopcde = ((iw0 >> (DSP32Alu_aopcde_bits - 16)) & DSP32Alu_aopcde_mask);
3113
3114 if (aop == 0 && aopcde == 9 && HL == 0 && s == 0)
3115 {
3116 OUTS (outf, "A0.L = ");
3117 OUTS (outf, dregs_lo (src0));
3118 }
3119 else if (aop == 2 && aopcde == 9 && HL == 1 && s == 0)
3120 {
3121 OUTS (outf, "A1.H = ");
3122 OUTS (outf, dregs_hi (src0));
3123 }
3124 else if (aop == 2 && aopcde == 9 && HL == 0 && s == 0)
3125 {
3126 OUTS (outf, "A1.L = ");
3127 OUTS (outf, dregs_lo (src0));
3128 }
3129 else if (aop == 0 && aopcde == 9 && HL == 1 && s == 0)
3130 {
3131 OUTS (outf, "A0.H = ");
3132 OUTS (outf, dregs_hi (src0));
3133 }
3134 else if (x == 1 && HL == 1 && aop == 3 && aopcde == 5)
3135 {
3136 OUTS (outf, dregs_hi (dst0));
3137 OUTS (outf, " = ");
3138 OUTS (outf, dregs (src0));
3139 OUTS (outf, " - ");
3140 OUTS (outf, dregs (src1));
3141 OUTS (outf, " (RND20)");
3142 }
3143 else if (x == 1 && HL == 1 && aop == 2 && aopcde == 5)
3144 {
3145 OUTS (outf, dregs_hi (dst0));
3146 OUTS (outf, " = ");
3147 OUTS (outf, dregs (src0));
3148 OUTS (outf, " + ");
3149 OUTS (outf, dregs (src1));
3150 OUTS (outf, " (RND20)");
3151 }
3152 else if (x == 0 && HL == 0 && aop == 1 && aopcde == 5)
3153 {
3154 OUTS (outf, dregs_lo (dst0));
3155 OUTS (outf, " = ");
3156 OUTS (outf, dregs (src0));
3157 OUTS (outf, " - ");
3158 OUTS (outf, dregs (src1));
3159 OUTS (outf, " (RND12)");
3160 }
3161 else if (x == 0 && HL == 0 && aop == 0 && aopcde == 5)
3162 {
3163 OUTS (outf, dregs_lo (dst0));
3164 OUTS (outf, " = ");
3165 OUTS (outf, dregs (src0));
3166 OUTS (outf, " + ");
3167 OUTS (outf, dregs (src1));
3168 OUTS (outf, " (RND12)");
3169 }
3170 else if (x == 1 && HL == 0 && aop == 3 && aopcde == 5)
3171 {
3172 OUTS (outf, dregs_lo (dst0));
3173 OUTS (outf, " = ");
3174 OUTS (outf, dregs (src0));
3175 OUTS (outf, " - ");
3176 OUTS (outf, dregs (src1));
3177 OUTS (outf, " (RND20)");
3178 }
3179 else if (x == 0 && HL == 1 && aop == 0 && aopcde == 5)
3180 {
3181 OUTS (outf, dregs_hi (dst0));
3182 OUTS (outf, " = ");
3183 OUTS (outf, dregs (src0));
3184 OUTS (outf, " + ");
3185 OUTS (outf, dregs (src1));
3186 OUTS (outf, " (RND12)");
3187 }
3188 else if (x == 1 && HL == 0 && aop == 2 && aopcde == 5)
3189 {
3190 OUTS (outf, dregs_lo (dst0));
3191 OUTS (outf, " = ");
3192 OUTS (outf, dregs (src0));
3193 OUTS (outf, " + ");
3194 OUTS (outf, dregs (src1));
3195 OUTS (outf, " (RND20)");
3196 }
3197 else if (x == 0 && HL == 1 && aop == 1 && aopcde == 5)
3198 {
3199 OUTS (outf, dregs_hi (dst0));
3200 OUTS (outf, " = ");
3201 OUTS (outf, dregs (src0));
3202 OUTS (outf, " - ");
3203 OUTS (outf, dregs (src1));
3204 OUTS (outf, " (RND12)");
3205 }
3206 else if (HL == 1 && aop == 0 && aopcde == 2)
3207 {
3208 OUTS (outf, dregs_hi (dst0));
3209 OUTS (outf, " = ");
3210 OUTS (outf, dregs_lo (src0));
3211 OUTS (outf, " + ");
3212 OUTS (outf, dregs_lo (src1));
3213 amod1 (s, x, outf);
3214 }
3215 else if (HL == 1 && aop == 1 && aopcde == 2)
3216 {
3217 OUTS (outf, dregs_hi (dst0));
3218 OUTS (outf, " = ");
3219 OUTS (outf, dregs_lo (src0));
3220 OUTS (outf, " + ");
3221 OUTS (outf, dregs_hi (src1));
3222 amod1 (s, x, outf);
3223 }
3224 else if (HL == 1 && aop == 2 && aopcde == 2)
3225 {
3226 OUTS (outf, dregs_hi (dst0));
3227 OUTS (outf, " = ");
3228 OUTS (outf, dregs_hi (src0));
3229 OUTS (outf, " + ");
3230 OUTS (outf, dregs_lo (src1));
3231 amod1 (s, x, outf);
3232 }
3233 else if (HL == 1 && aop == 3 && aopcde == 2)
3234 {
3235 OUTS (outf, dregs_hi (dst0));
3236 OUTS (outf, " = ");
3237 OUTS (outf, dregs_hi (src0));
3238 OUTS (outf, " + ");
3239 OUTS (outf, dregs_hi (src1));
3240 amod1 (s, x, outf);
3241 }
3242 else if (HL == 0 && aop == 0 && aopcde == 3)
3243 {
3244 OUTS (outf, dregs_lo (dst0));
3245 OUTS (outf, " = ");
3246 OUTS (outf, dregs_lo (src0));
3247 OUTS (outf, " - ");
3248 OUTS (outf, dregs_lo (src1));
3249 amod1 (s, x, outf);
3250 }
3251 else if (HL == 0 && aop == 1 && aopcde == 3)
3252 {
3253 OUTS (outf, dregs_lo (dst0));
3254 OUTS (outf, " = ");
3255 OUTS (outf, dregs_lo (src0));
3256 OUTS (outf, " - ");
3257 OUTS (outf, dregs_hi (src1));
3258 amod1 (s, x, outf);
3259 }
3260 else if (HL == 0 && aop == 3 && aopcde == 2)
3261 {
3262 OUTS (outf, dregs_lo (dst0));
3263 OUTS (outf, " = ");
3264 OUTS (outf, dregs_hi (src0));
3265 OUTS (outf, " + ");
3266 OUTS (outf, dregs_hi (src1));
3267 amod1 (s, x, outf);
3268 }
3269 else if (HL == 1 && aop == 0 && aopcde == 3)
3270 {
3271 OUTS (outf, dregs_hi (dst0));
3272 OUTS (outf, " = ");
3273 OUTS (outf, dregs_lo (src0));
3274 OUTS (outf, " - ");
3275 OUTS (outf, dregs_lo (src1));
3276 amod1 (s, x, outf);
3277 }
3278 else if (HL == 1 && aop == 1 && aopcde == 3)
3279 {
3280 OUTS (outf, dregs_hi (dst0));
3281 OUTS (outf, " = ");
3282 OUTS (outf, dregs_lo (src0));
3283 OUTS (outf, " - ");
3284 OUTS (outf, dregs_hi (src1));
3285 amod1 (s, x, outf);
3286 }
3287 else if (HL == 1 && aop == 2 && aopcde == 3)
3288 {
3289 OUTS (outf, dregs_hi (dst0));
3290 OUTS (outf, " = ");
3291 OUTS (outf, dregs_hi (src0));
3292 OUTS (outf, " - ");
3293 OUTS (outf, dregs_lo (src1));
3294 amod1 (s, x, outf);
3295 }
3296 else if (HL == 1 && aop == 3 && aopcde == 3)
3297 {
3298 OUTS (outf, dregs_hi (dst0));
3299 OUTS (outf, " = ");
3300 OUTS (outf, dregs_hi (src0));
3301 OUTS (outf, " - ");
3302 OUTS (outf, dregs_hi (src1));
3303 amod1 (s, x, outf);
3304 }
3305 else if (HL == 0 && aop == 2 && aopcde == 2)
3306 {
3307 OUTS (outf, dregs_lo (dst0));
3308 OUTS (outf, " = ");
3309 OUTS (outf, dregs_hi (src0));
3310 OUTS (outf, " + ");
3311 OUTS (outf, dregs_lo (src1));
3312 amod1 (s, x, outf);
3313 }
3314 else if (HL == 0 && aop == 1 && aopcde == 2)
3315 {
3316 OUTS (outf, dregs_lo (dst0));
3317 OUTS (outf, " = ");
3318 OUTS (outf, dregs_lo (src0));
3319 OUTS (outf, " + ");
3320 OUTS (outf, dregs_hi (src1));
3321 amod1 (s, x, outf);
3322 }
3323 else if (HL == 0 && aop == 2 && aopcde == 3)
3324 {
3325 OUTS (outf, dregs_lo (dst0));
3326 OUTS (outf, " = ");
3327 OUTS (outf, dregs_hi (src0));
3328 OUTS (outf, " - ");
3329 OUTS (outf, dregs_lo (src1));
3330 amod1 (s, x, outf);
3331 }
3332 else if (HL == 0 && aop == 3 && aopcde == 3)
3333 {
3334 OUTS (outf, dregs_lo (dst0));
3335 OUTS (outf, " = ");
3336 OUTS (outf, dregs_hi (src0));
3337 OUTS (outf, " - ");
3338 OUTS (outf, dregs_hi (src1));
3339 amod1 (s, x, outf);
3340 }
3341 else if (HL == 0 && aop == 0 && aopcde == 2)
3342 {
3343 OUTS (outf, dregs_lo (dst0));
3344 OUTS (outf, " = ");
3345 OUTS (outf, dregs_lo (src0));
3346 OUTS (outf, " + ");
3347 OUTS (outf, dregs_lo (src1));
3348 amod1 (s, x, outf);
3349 }
3350 else if (aop == 0 && aopcde == 9 && s == 1)
3351 {
3352 OUTS (outf, "A0 = ");
3353 OUTS (outf, dregs (src0));
3354 }
3355 else if (aop == 3 && aopcde == 11 && s == 0)
3356 OUTS (outf, "A0 -= A1");
3357
3358 else if (aop == 3 && aopcde == 11 && s == 1)
3359 OUTS (outf, "A0 -= A1 (W32)");
3360
3361 else if (aop == 1 && aopcde == 22 && HL == 1)
3362 {
3363 OUTS (outf, dregs (dst0));
3364 OUTS (outf, " = BYTEOP2P (");
3365 OUTS (outf, dregs (src0 + 1));
3366 OUTS (outf, ":");
3367 OUTS (outf, imm5d (src0));
3368 OUTS (outf, ", ");
3369 OUTS (outf, dregs (src1 + 1));
3370 OUTS (outf, ":");
3371 OUTS (outf, imm5d (src1));
3372 OUTS (outf, ") (TH");
3373 if (s == 1)
3374 OUTS (outf, ", R)");
3375 else
3376 OUTS (outf, ")");
3377 }
3378 else if (aop == 1 && aopcde == 22 && HL == 0)
3379 {
3380 OUTS (outf, dregs (dst0));
3381 OUTS (outf, " = BYTEOP2P (");
3382 OUTS (outf, dregs (src0 + 1));
3383 OUTS (outf, ":");
3384 OUTS (outf, imm5d (src0));
3385 OUTS (outf, ", ");
3386 OUTS (outf, dregs (src1 + 1));
3387 OUTS (outf, ":");
3388 OUTS (outf, imm5d (src1));
3389 OUTS (outf, ") (TL");
3390 if (s == 1)
3391 OUTS (outf, ", R)");
3392 else
3393 OUTS (outf, ")");
3394 }
3395 else if (aop == 0 && aopcde == 22 && HL == 1)
3396 {
3397 OUTS (outf, dregs (dst0));
3398 OUTS (outf, " = BYTEOP2P (");
3399 OUTS (outf, dregs (src0 + 1));
3400 OUTS (outf, ":");
3401 OUTS (outf, imm5d (src0));
3402 OUTS (outf, ", ");
3403 OUTS (outf, dregs (src1 + 1));
3404 OUTS (outf, ":");
3405 OUTS (outf, imm5d (src1));
3406 OUTS (outf, ") (RNDH");
3407 if (s == 1)
3408 OUTS (outf, ", R)");
3409 else
3410 OUTS (outf, ")");
3411 }
3412 else if (aop == 0 && aopcde == 22 && HL == 0)
3413 {
3414 OUTS (outf, dregs (dst0));
3415 OUTS (outf, " = BYTEOP2P (");
3416 OUTS (outf, dregs (src0 + 1));
3417 OUTS (outf, ":");
3418 OUTS (outf, imm5d (src0));
3419 OUTS (outf, ", ");
3420 OUTS (outf, dregs (src1 + 1));
3421 OUTS (outf, ":");
3422 OUTS (outf, imm5d (src1));
3423 OUTS (outf, ") (RNDL");
3424 if (s == 1)
3425 OUTS (outf, ", R)");
3426 else
3427 OUTS (outf, ")");
3428 }
3429 else if (aop == 0 && s == 0 && aopcde == 8)
3430 OUTS (outf, "A0 = 0");
3431
3432 else if (aop == 0 && s == 1 && aopcde == 8)
3433 OUTS (outf, "A0 = A0 (S)");
3434
3435 else if (aop == 1 && s == 0 && aopcde == 8)
3436 OUTS (outf, "A1 = 0");
3437
3438 else if (aop == 1 && s == 1 && aopcde == 8)
3439 OUTS (outf, "A1 = A1 (S)");
3440
3441 else if (aop == 2 && s == 0 && aopcde == 8)
3442 OUTS (outf, "A1 = A0 = 0");
3443
3444 else if (aop == 2 && s == 1 && aopcde == 8)
3445 OUTS (outf, "A1 = A1 (S), A0 = A0 (S)");
3446
3447 else if (aop == 3 && s == 0 && aopcde == 8)
3448 OUTS (outf, "A0 = A1");
3449
3450 else if (aop == 3 && s == 1 && aopcde == 8)
3451 OUTS (outf, "A1 = A0");
3452
3453 else if (aop == 1 && aopcde == 9 && s == 0)
3454 {
3455 OUTS (outf, "A0.X = ");
3456 OUTS (outf, dregs_lo (src0));
3457 }
3458 else if (aop == 1 && HL == 0 && aopcde == 11)
3459 {
3460 OUTS (outf, dregs_lo (dst0));
3461 OUTS (outf, " = (A0 += A1)");
3462 }
3463 else if (aop == 3 && HL == 0 && aopcde == 16)
3464 OUTS (outf, "A1 = ABS A1, A0 = ABS A0");
3465
3466 else if (aop == 0 && aopcde == 23 && HL == 1)
3467 {
3468 OUTS (outf, dregs (dst0));
3469 OUTS (outf, " = BYTEOP3P (");
3470 OUTS (outf, dregs (src0 + 1));
3471 OUTS (outf, ":");
3472 OUTS (outf, imm5d (src0));
3473 OUTS (outf, ", ");
3474 OUTS (outf, dregs (src1 + 1));
3475 OUTS (outf, ":");
3476 OUTS (outf, imm5d (src1));
3477 OUTS (outf, ") (HI");
3478 if (s == 1)
3479 OUTS (outf, ", R)");
3480 else
3481 OUTS (outf, ")");
3482 }
3483 else if (aop == 3 && aopcde == 9 && s == 0)
3484 {
3485 OUTS (outf, "A1.X = ");
3486 OUTS (outf, dregs_lo (src0));
3487 }
3488 else if (aop == 1 && HL == 1 && aopcde == 16)
3489 OUTS (outf, "A1 = ABS A1");
3490
3491 else if (aop == 0 && HL == 1 && aopcde == 16)
3492 OUTS (outf, "A1 = ABS A0");
3493
3494 else if (aop == 2 && aopcde == 9 && s == 1)
3495 {
3496 OUTS (outf, "A1 = ");
3497 OUTS (outf, dregs (src0));
3498 }
3499 else if (HL == 0 && aop == 3 && aopcde == 12)
3500 {
3501 OUTS (outf, dregs_lo (dst0));
3502 OUTS (outf, " = ");
3503 OUTS (outf, dregs (src0));
3504 OUTS (outf, " (RND)");
3505 }
3506 else if (aop == 1 && HL == 0 && aopcde == 16)
3507 OUTS (outf, "A0 = ABS A1");
3508
3509 else if (aop == 0 && HL == 0 && aopcde == 16)
3510 OUTS (outf, "A0 = ABS A0");
3511
3512 else if (aop == 3 && HL == 0 && aopcde == 15)
3513 {
3514 OUTS (outf, dregs (dst0));
3515 OUTS (outf, " = -");
3516 OUTS (outf, dregs (src0));
3517 OUTS (outf, " (V)");
3518 }
3519 else if (aop == 3 && s == 1 && HL == 0 && aopcde == 7)
3520 {
3521 OUTS (outf, dregs (dst0));
3522 OUTS (outf, " = -");
3523 OUTS (outf, dregs (src0));
3524 OUTS (outf, " (S)");
3525 }
3526 else if (aop == 3 && s == 0 && HL == 0 && aopcde == 7)
3527 {
3528 OUTS (outf, dregs (dst0));
3529 OUTS (outf, " = -");
3530 OUTS (outf, dregs (src0));
3531 OUTS (outf, " (NS)");
3532 }
3533 else if (aop == 1 && HL == 1 && aopcde == 11)
3534 {
3535 OUTS (outf, dregs_hi (dst0));
3536 OUTS (outf, " = (A0 += A1)");
3537 }
3538 else if (aop == 2 && aopcde == 11 && s == 0)
3539 OUTS (outf, "A0 += A1");
3540
3541 else if (aop == 2 && aopcde == 11 && s == 1)
3542 OUTS (outf, "A0 += A1 (W32)");
3543
3544 else if (aop == 3 && HL == 0 && aopcde == 14)
3545 OUTS (outf, "A1 = -A1, A0 = -A0");
3546
3547 else if (HL == 1 && aop == 3 && aopcde == 12)
3548 {
3549 OUTS (outf, dregs_hi (dst0));
3550 OUTS (outf, " = ");
3551 OUTS (outf, dregs (src0));
3552 OUTS (outf, " (RND)");
3553 }
3554 else if (aop == 0 && aopcde == 23 && HL == 0)
3555 {
3556 OUTS (outf, dregs (dst0));
3557 OUTS (outf, " = BYTEOP3P (");
3558 OUTS (outf, dregs (src0 + 1));
3559 OUTS (outf, ":");
3560 OUTS (outf, imm5d (src0));
3561 OUTS (outf, ", ");
3562 OUTS (outf, dregs (src1 + 1));
3563 OUTS (outf, ":");
3564 OUTS (outf, imm5d (src1));
3565 OUTS (outf, ") (LO");
3566 if (s == 1)
3567 OUTS (outf, ", R)");
3568 else
3569 OUTS (outf, ")");
3570 }
3571 else if (aop == 0 && HL == 0 && aopcde == 14)
3572 OUTS (outf, "A0 = -A0");
3573
3574 else if (aop == 1 && HL == 0 && aopcde == 14)
3575 OUTS (outf, "A0 = -A1");
3576
3577 else if (aop == 0 && HL == 1 && aopcde == 14)
3578 OUTS (outf, "A1 = -A0");
3579
3580 else if (aop == 1 && HL == 1 && aopcde == 14)
3581 OUTS (outf, "A1 = -A1");
3582
3583 else if (aop == 0 && aopcde == 12)
3584 {
3585 OUTS (outf, dregs_hi (dst0));
3586 OUTS (outf, " = ");
3587 OUTS (outf, dregs_lo (dst0));
3588 OUTS (outf, " = SIGN (");
3589 OUTS (outf, dregs_hi (src0));
3590 OUTS (outf, ") * ");
3591 OUTS (outf, dregs_hi (src1));
3592 OUTS (outf, " + SIGN (");
3593 OUTS (outf, dregs_lo (src0));
3594 OUTS (outf, ") * ");
3595 OUTS (outf, dregs_lo (src1));
3596 }
3597 else if (aop == 2 && aopcde == 0)
3598 {
3599 OUTS (outf, dregs (dst0));
3600 OUTS (outf, " = ");
3601 OUTS (outf, dregs (src0));
3602 OUTS (outf, " -|+ ");
3603 OUTS (outf, dregs (src1));
3604 amod0 (s, x, outf);
3605 }
3606 else if (aop == 1 && aopcde == 12)
3607 {
3608 OUTS (outf, dregs (dst1));
3609 OUTS (outf, " = A1.L + A1.H, ");
3610 OUTS (outf, dregs (dst0));
3611 OUTS (outf, " = A0.L + A0.H");
3612 }
3613 else if (aop == 2 && aopcde == 4)
3614 {
3615 OUTS (outf, dregs (dst1));
3616 OUTS (outf, " = ");
3617 OUTS (outf, dregs (src0));
3618 OUTS (outf, " + ");
3619 OUTS (outf, dregs (src1));
3620 OUTS (outf, ", ");
3621 OUTS (outf, dregs (dst0));
3622 OUTS (outf, " = ");
3623 OUTS (outf, dregs (src0));
3624 OUTS (outf, " - ");
3625 OUTS (outf, dregs (src1));
3626 amod1 (s, x, outf);
3627 }
3628 else if (HL == 0 && aopcde == 1)
3629 {
3630 OUTS (outf, dregs (dst1));
3631 OUTS (outf, " = ");
3632 OUTS (outf, dregs (src0));
3633 OUTS (outf, " +|+ ");
3634 OUTS (outf, dregs (src1));
3635 OUTS (outf, ", ");
3636 OUTS (outf, dregs (dst0));
3637 OUTS (outf, " = ");
3638 OUTS (outf, dregs (src0));
3639 OUTS (outf, " -|- ");
3640 OUTS (outf, dregs (src1));
3641 amod0amod2 (s, x, aop, outf);
3642 }
3643 else if (aop == 0 && aopcde == 11)
3644 {
3645 OUTS (outf, dregs (dst0));
3646 OUTS (outf, " = (A0 += A1)");
3647 }
3648 else if (aop == 0 && aopcde == 10)
3649 {
3650 OUTS (outf, dregs_lo (dst0));
3651 OUTS (outf, " = A0.X");
3652 }
3653 else if (aop == 1 && aopcde == 10)
3654 {
3655 OUTS (outf, dregs_lo (dst0));
3656 OUTS (outf, " = A1.X");
3657 }
3658 else if (aop == 1 && aopcde == 0)
3659 {
3660 OUTS (outf, dregs (dst0));
3661 OUTS (outf, " = ");
3662 OUTS (outf, dregs (src0));
3663 OUTS (outf, " +|- ");
3664 OUTS (outf, dregs (src1));
3665 amod0 (s, x, outf);
3666 }
3667 else if (aop == 3 && aopcde == 0)
3668 {
3669 OUTS (outf, dregs (dst0));
3670 OUTS (outf, " = ");
3671 OUTS (outf, dregs (src0));
3672 OUTS (outf, " -|- ");
3673 OUTS (outf, dregs (src1));
3674 amod0 (s, x, outf);
3675 }
3676 else if (aop == 1 && aopcde == 4)
3677 {
3678 OUTS (outf, dregs (dst0));
3679 OUTS (outf, " = ");
3680 OUTS (outf, dregs (src0));
3681 OUTS (outf, " - ");
3682 OUTS (outf, dregs (src1));
3683 amod1 (s, x, outf);
3684 }
3685 else if (aop == 0 && aopcde == 17)
3686 {
3687 OUTS (outf, dregs (dst1));
3688 OUTS (outf, " = A1 + A0, ");
3689 OUTS (outf, dregs (dst0));
3690 OUTS (outf, " = A1 - A0");
3691 amod1 (s, x, outf);
3692 }
3693 else if (aop == 1 && aopcde == 17)
3694 {
3695 OUTS (outf, dregs (dst1));
3696 OUTS (outf, " = A0 + A1, ");
3697 OUTS (outf, dregs (dst0));
3698 OUTS (outf, " = A0 - A1");
3699 amod1 (s, x, outf);
3700 }
3701 else if (aop == 0 && aopcde == 18)
3702 {
3703 OUTS (outf, "SAA (");
3704 OUTS (outf, dregs (src0 + 1));
3705 OUTS (outf, ":");
3706 OUTS (outf, imm5d (src0));
3707 OUTS (outf, ", ");
3708 OUTS (outf, dregs (src1 + 1));
3709 OUTS (outf, ":");
3710 OUTS (outf, imm5d (src1));
3711 OUTS (outf, ")");
3712 aligndir (s, outf);
3713 }
3714 else if (aop == 3 && aopcde == 18)
3715 OUTS (outf, "DISALGNEXCPT");
3716
3717 else if (aop == 0 && aopcde == 20)
3718 {
3719 OUTS (outf, dregs (dst0));
3720 OUTS (outf, " = BYTEOP1P (");
3721 OUTS (outf, dregs (src0 + 1));
3722 OUTS (outf, ":");
3723 OUTS (outf, imm5d (src0));
3724 OUTS (outf, ", ");
3725 OUTS (outf, dregs (src1 + 1));
3726 OUTS (outf, ":");
3727 OUTS (outf, imm5d (src1));
3728 OUTS (outf, ")");
3729 aligndir (s, outf);
3730 }
3731 else if (aop == 1 && aopcde == 20)
3732 {
3733 OUTS (outf, dregs (dst0));
3734 OUTS (outf, " = BYTEOP1P (");
3735 OUTS (outf, dregs (src0 + 1));
3736 OUTS (outf, ":");
3737 OUTS (outf, imm5d (src0));
3738 OUTS (outf, ", ");
3739 OUTS (outf, dregs (src1 + 1));
3740 OUTS (outf, ":");
3741 OUTS (outf, imm5d (src1));
3742 OUTS (outf, ") (T");
3743 if (s == 1)
3744 OUTS (outf, ", R)");
3745 else
3746 OUTS (outf, ")");
3747 }
3748 else if (aop == 0 && aopcde == 21)
3749 {
3750 OUTS (outf, "(");
3751 OUTS (outf, dregs (dst1));
3752 OUTS (outf, ", ");
3753 OUTS (outf, dregs (dst0));
3754 OUTS (outf, ") = BYTEOP16P (");
3755 OUTS (outf, dregs (src0 + 1));
3756 OUTS (outf, ":");
3757 OUTS (outf, imm5d (src0));
3758 OUTS (outf, ", ");
3759 OUTS (outf, dregs (src1 + 1));
3760 OUTS (outf, ":");
3761 OUTS (outf, imm5d (src1));
3762 OUTS (outf, ")");
3763 aligndir (s, outf);
3764 }
3765 else if (aop == 1 && aopcde == 21)
3766 {
3767 OUTS (outf, "(");
3768 OUTS (outf, dregs (dst1));
3769 OUTS (outf, ", ");
3770 OUTS (outf, dregs (dst0));
3771 OUTS (outf, ") = BYTEOP16M (");
3772 OUTS (outf, dregs (src0 + 1));
3773 OUTS (outf, ":");
3774 OUTS (outf, imm5d (src0));
3775 OUTS (outf, ", ");
3776 OUTS (outf, dregs (src1 + 1));
3777 OUTS (outf, ":");
3778 OUTS (outf, imm5d (src1));
3779 OUTS (outf, ")");
3780 aligndir (s, outf);
3781 }
3782 else if (aop == 2 && aopcde == 7)
3783 {
3784 OUTS (outf, dregs (dst0));
3785 OUTS (outf, " = ABS ");
3786 OUTS (outf, dregs (src0));
3787 }
3788 else if (aop == 1 && aopcde == 7)
3789 {
3790 OUTS (outf, dregs (dst0));
3791 OUTS (outf, " = MIN (");
3792 OUTS (outf, dregs (src0));
3793 OUTS (outf, ", ");
3794 OUTS (outf, dregs (src1));
3795 OUTS (outf, ")");
3796 }
3797 else if (aop == 0 && aopcde == 7)
3798 {
3799 OUTS (outf, dregs (dst0));
3800 OUTS (outf, " = MAX (");
3801 OUTS (outf, dregs (src0));
3802 OUTS (outf, ", ");
3803 OUTS (outf, dregs (src1));
3804 OUTS (outf, ")");
3805 }
3806 else if (aop == 2 && aopcde == 6)
3807 {
3808 OUTS (outf, dregs (dst0));
3809 OUTS (outf, " = ABS ");
3810 OUTS (outf, dregs (src0));
3811 OUTS (outf, " (V)");
3812 }
3813 else if (aop == 1 && aopcde == 6)
3814 {
3815 OUTS (outf, dregs (dst0));
3816 OUTS (outf, " = MIN (");
3817 OUTS (outf, dregs (src0));
3818 OUTS (outf, ", ");
3819 OUTS (outf, dregs (src1));
3820 OUTS (outf, ") (V)");
3821 }
3822 else if (aop == 0 && aopcde == 6)
3823 {
3824 OUTS (outf, dregs (dst0));
3825 OUTS (outf, " = MAX (");
3826 OUTS (outf, dregs (src0));
3827 OUTS (outf, ", ");
3828 OUTS (outf, dregs (src1));
3829 OUTS (outf, ") (V)");
3830 }
3831 else if (HL == 1 && aopcde == 1)
3832 {
3833 OUTS (outf, dregs (dst1));
3834 OUTS (outf, " = ");
3835 OUTS (outf, dregs (src0));
3836 OUTS (outf, " +|- ");
3837 OUTS (outf, dregs (src1));
3838 OUTS (outf, ", ");
3839 OUTS (outf, dregs (dst0));
3840 OUTS (outf, " = ");
3841 OUTS (outf, dregs (src0));
3842 OUTS (outf, " -|+ ");
3843 OUTS (outf, dregs (src1));
3844 amod0amod2 (s, x, aop, outf);
3845 }
3846 else if (aop == 0 && aopcde == 4)
3847 {
3848 OUTS (outf, dregs (dst0));
3849 OUTS (outf, " = ");
3850 OUTS (outf, dregs (src0));
3851 OUTS (outf, " + ");
3852 OUTS (outf, dregs (src1));
3853 amod1 (s, x, outf);
3854 }
3855 else if (aop == 0 && aopcde == 0)
3856 {
3857 OUTS (outf, dregs (dst0));
3858 OUTS (outf, " = ");
3859 OUTS (outf, dregs (src0));
3860 OUTS (outf, " +|+ ");
3861 OUTS (outf, dregs (src1));
3862 amod0 (s, x, outf);
3863 }
3864 else if (aop == 0 && aopcde == 24)
3865 {
3866 OUTS (outf, dregs (dst0));
3867 OUTS (outf, " = BYTEPACK (");
3868 OUTS (outf, dregs (src0));
3869 OUTS (outf, ", ");
3870 OUTS (outf, dregs (src1));
3871 OUTS (outf, ")");
3872 }
3873 else if (aop == 1 && aopcde == 24)
3874 {
3875 OUTS (outf, "(");
3876 OUTS (outf, dregs (dst1));
3877 OUTS (outf, ", ");
3878 OUTS (outf, dregs (dst0));
3879 OUTS (outf, ") = BYTEUNPACK ");
3880 OUTS (outf, dregs (src0 + 1));
3881 OUTS (outf, ":");
3882 OUTS (outf, imm5d (src0));
3883 aligndir (s, outf);
3884 }
3885 else if (aopcde == 13)
3886 {
3887 OUTS (outf, "(");
3888 OUTS (outf, dregs (dst1));
3889 OUTS (outf, ", ");
3890 OUTS (outf, dregs (dst0));
3891 OUTS (outf, ") = SEARCH ");
3892 OUTS (outf, dregs (src0));
3893 OUTS (outf, " (");
3894 searchmod (aop, outf);
3895 OUTS (outf, ")");
3896 }
3897 else
3898 return 0;
3899
3900 return 4;
3901 }
3902
3903 static int
3904 decode_dsp32shift_0 (TIword iw0, TIword iw1, disassemble_info *outf)
3905 {
3906 /* dsp32shift
3907 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
3908 | 1 | 1 | 0 | 0 |.M.| 1 | 1 | 0 | 0 | - | - |.sopcde............|
3909 |.sop...|.HLs...|.dst0......| - | - | - |.src0......|.src1......|
3910 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
3911 int HLs = ((iw1 >> DSP32Shift_HLs_bits) & DSP32Shift_HLs_mask);
3912 int sop = ((iw1 >> DSP32Shift_sop_bits) & DSP32Shift_sop_mask);
3913 int src0 = ((iw1 >> DSP32Shift_src0_bits) & DSP32Shift_src0_mask);
3914 int src1 = ((iw1 >> DSP32Shift_src1_bits) & DSP32Shift_src1_mask);
3915 int dst0 = ((iw1 >> DSP32Shift_dst0_bits) & DSP32Shift_dst0_mask);
3916 int sopcde = ((iw0 >> (DSP32Shift_sopcde_bits - 16)) & DSP32Shift_sopcde_mask);
3917 const char *acc01 = (HLs & 1) == 0 ? "A0" : "A1";
3918
3919 if (HLs == 0 && sop == 0 && sopcde == 0)
3920 {
3921 OUTS (outf, dregs_lo (dst0));
3922 OUTS (outf, " = ASHIFT ");
3923 OUTS (outf, dregs_lo (src1));
3924 OUTS (outf, " BY ");
3925 OUTS (outf, dregs_lo (src0));
3926 }
3927 else if (HLs == 1 && sop == 0 && sopcde == 0)
3928 {
3929 OUTS (outf, dregs_lo (dst0));
3930 OUTS (outf, " = ASHIFT ");
3931 OUTS (outf, dregs_hi (src1));
3932 OUTS (outf, " BY ");
3933 OUTS (outf, dregs_lo (src0));
3934 }
3935 else if (HLs == 2 && sop == 0 && sopcde == 0)
3936 {
3937 OUTS (outf, dregs_hi (dst0));
3938 OUTS (outf, " = ASHIFT ");
3939 OUTS (outf, dregs_lo (src1));
3940 OUTS (outf, " BY ");
3941 OUTS (outf, dregs_lo (src0));
3942 }
3943 else if (HLs == 3 && sop == 0 && sopcde == 0)
3944 {
3945 OUTS (outf, dregs_hi (dst0));
3946 OUTS (outf, " = ASHIFT ");
3947 OUTS (outf, dregs_hi (src1));
3948 OUTS (outf, " BY ");
3949 OUTS (outf, dregs_lo (src0));
3950 }
3951 else if (HLs == 0 && sop == 1 && sopcde == 0)
3952 {
3953 OUTS (outf, dregs_lo (dst0));
3954 OUTS (outf, " = ASHIFT ");
3955 OUTS (outf, dregs_lo (src1));
3956 OUTS (outf, " BY ");
3957 OUTS (outf, dregs_lo (src0));
3958 OUTS (outf, " (S)");
3959 }
3960 else if (HLs == 1 && sop == 1 && sopcde == 0)
3961 {
3962 OUTS (outf, dregs_lo (dst0));
3963 OUTS (outf, " = ASHIFT ");
3964 OUTS (outf, dregs_hi (src1));
3965 OUTS (outf, " BY ");
3966 OUTS (outf, dregs_lo (src0));
3967 OUTS (outf, " (S)");
3968 }
3969 else if (HLs == 2 && sop == 1 && sopcde == 0)
3970 {
3971 OUTS (outf, dregs_hi (dst0));
3972 OUTS (outf, " = ASHIFT ");
3973 OUTS (outf, dregs_lo (src1));
3974 OUTS (outf, " BY ");
3975 OUTS (outf, dregs_lo (src0));
3976 OUTS (outf, " (S)");
3977 }
3978 else if (HLs == 3 && sop == 1 && sopcde == 0)
3979 {
3980 OUTS (outf, dregs_hi (dst0));
3981 OUTS (outf, " = ASHIFT ");
3982 OUTS (outf, dregs_hi (src1));
3983 OUTS (outf, " BY ");
3984 OUTS (outf, dregs_lo (src0));
3985 OUTS (outf, " (S)");
3986 }
3987 else if (sop == 2 && sopcde == 0)
3988 {
3989 OUTS (outf, (HLs & 2) == 0 ? dregs_lo (dst0) : dregs_hi (dst0));
3990 OUTS (outf, " = LSHIFT ");
3991 OUTS (outf, (HLs & 1) == 0 ? dregs_lo (src1) : dregs_hi (src1));
3992 OUTS (outf, " BY ");
3993 OUTS (outf, dregs_lo (src0));
3994 }
3995 else if (sop == 0 && sopcde == 3)
3996 {
3997 OUTS (outf, acc01);
3998 OUTS (outf, " = ASHIFT ");
3999 OUTS (outf, acc01);
4000 OUTS (outf, " BY ");
4001 OUTS (outf, dregs_lo (src0));
4002 }
4003 else if (sop == 1 && sopcde == 3)
4004 {
4005 OUTS (outf, acc01);
4006 OUTS (outf, " = LSHIFT ");
4007 OUTS (outf, acc01);
4008 OUTS (outf, " BY ");
4009 OUTS (outf, dregs_lo (src0));
4010 }
4011 else if (sop == 2 && sopcde == 3)
4012 {
4013 OUTS (outf, acc01);
4014 OUTS (outf, " = ROT ");
4015 OUTS (outf, acc01);
4016 OUTS (outf, " BY ");
4017 OUTS (outf, dregs_lo (src0));
4018 }
4019 else if (sop == 3 && sopcde == 3)
4020 {
4021 OUTS (outf, dregs (dst0));
4022 OUTS (outf, " = ROT ");
4023 OUTS (outf, dregs (src1));
4024 OUTS (outf, " BY ");
4025 OUTS (outf, dregs_lo (src0));
4026 }
4027 else if (sop == 1 && sopcde == 1)
4028 {
4029 OUTS (outf, dregs (dst0));
4030 OUTS (outf, " = ASHIFT ");
4031 OUTS (outf, dregs (src1));
4032 OUTS (outf, " BY ");
4033 OUTS (outf, dregs_lo (src0));
4034 OUTS (outf, " (V, S)");
4035 }
4036 else if (sop == 0 && sopcde == 1)
4037 {
4038 OUTS (outf, dregs (dst0));
4039 OUTS (outf, " = ASHIFT ");
4040 OUTS (outf, dregs (src1));
4041 OUTS (outf, " BY ");
4042 OUTS (outf, dregs_lo (src0));
4043 OUTS (outf, " (V)");
4044 }
4045 else if (sop == 0 && sopcde == 2)
4046 {
4047 OUTS (outf, dregs (dst0));
4048 OUTS (outf, " = ASHIFT ");
4049 OUTS (outf, dregs (src1));
4050 OUTS (outf, " BY ");
4051 OUTS (outf, dregs_lo (src0));
4052 }
4053 else if (sop == 1 && sopcde == 2)
4054 {
4055 OUTS (outf, dregs (dst0));
4056 OUTS (outf, " = ASHIFT ");
4057 OUTS (outf, dregs (src1));
4058 OUTS (outf, " BY ");
4059 OUTS (outf, dregs_lo (src0));
4060 OUTS (outf, " (S)");
4061 }
4062 else if (sop == 2 && sopcde == 2)
4063 {
4064 OUTS (outf, dregs (dst0));
4065 OUTS (outf, " = LSHIFT ");
4066 OUTS (outf, dregs (src1));
4067 OUTS (outf, " BY ");
4068 OUTS (outf, dregs_lo (src0));
4069 }
4070 else if (sop == 3 && sopcde == 2)
4071 {
4072 OUTS (outf, dregs (dst0));
4073 OUTS (outf, " = ROT ");
4074 OUTS (outf, dregs (src1));
4075 OUTS (outf, " BY ");
4076 OUTS (outf, dregs_lo (src0));
4077 }
4078 else if (sop == 2 && sopcde == 1)
4079 {
4080 OUTS (outf, dregs (dst0));
4081 OUTS (outf, " = LSHIFT ");
4082 OUTS (outf, dregs (src1));
4083 OUTS (outf, " BY ");
4084 OUTS (outf, dregs_lo (src0));
4085 OUTS (outf, " (V)");
4086 }
4087 else if (sop == 0 && sopcde == 4)
4088 {
4089 OUTS (outf, dregs (dst0));
4090 OUTS (outf, " = PACK (");
4091 OUTS (outf, dregs_lo (src1));
4092 OUTS (outf, ", ");
4093 OUTS (outf, dregs_lo (src0));
4094 OUTS (outf, ")");
4095 }
4096 else if (sop == 1 && sopcde == 4)
4097 {
4098 OUTS (outf, dregs (dst0));
4099 OUTS (outf, " = PACK (");
4100 OUTS (outf, dregs_lo (src1));
4101 OUTS (outf, ", ");
4102 OUTS (outf, dregs_hi (src0));
4103 OUTS (outf, ")");
4104 }
4105 else if (sop == 2 && sopcde == 4)
4106 {
4107 OUTS (outf, dregs (dst0));
4108 OUTS (outf, " = PACK (");
4109 OUTS (outf, dregs_hi (src1));
4110 OUTS (outf, ", ");
4111 OUTS (outf, dregs_lo (src0));
4112 OUTS (outf, ")");
4113 }
4114 else if (sop == 3 && sopcde == 4)
4115 {
4116 OUTS (outf, dregs (dst0));
4117 OUTS (outf, " = PACK (");
4118 OUTS (outf, dregs_hi (src1));
4119 OUTS (outf, ", ");
4120 OUTS (outf, dregs_hi (src0));
4121 OUTS (outf, ")");
4122 }
4123 else if (sop == 0 && sopcde == 5)
4124 {
4125 OUTS (outf, dregs_lo (dst0));
4126 OUTS (outf, " = SIGNBITS ");
4127 OUTS (outf, dregs (src1));
4128 }
4129 else if (sop == 1 && sopcde == 5)
4130 {
4131 OUTS (outf, dregs_lo (dst0));
4132 OUTS (outf, " = SIGNBITS ");
4133 OUTS (outf, dregs_lo (src1));
4134 }
4135 else if (sop == 2 && sopcde == 5)
4136 {
4137 OUTS (outf, dregs_lo (dst0));
4138 OUTS (outf, " = SIGNBITS ");
4139 OUTS (outf, dregs_hi (src1));
4140 }
4141 else if (sop == 0 && sopcde == 6)
4142 {
4143 OUTS (outf, dregs_lo (dst0));
4144 OUTS (outf, " = SIGNBITS A0");
4145 }
4146 else if (sop == 1 && sopcde == 6)
4147 {
4148 OUTS (outf, dregs_lo (dst0));
4149 OUTS (outf, " = SIGNBITS A1");
4150 }
4151 else if (sop == 3 && sopcde == 6)
4152 {
4153 OUTS (outf, dregs_lo (dst0));
4154 OUTS (outf, " = ONES ");
4155 OUTS (outf, dregs (src1));
4156 }
4157 else if (sop == 0 && sopcde == 7)
4158 {
4159 OUTS (outf, dregs_lo (dst0));
4160 OUTS (outf, " = EXPADJ (");
4161 OUTS (outf, dregs (src1));
4162 OUTS (outf, ", ");
4163 OUTS (outf, dregs_lo (src0));
4164 OUTS (outf, ")");
4165 }
4166 else if (sop == 1 && sopcde == 7)
4167 {
4168 OUTS (outf, dregs_lo (dst0));
4169 OUTS (outf, " = EXPADJ (");
4170 OUTS (outf, dregs (src1));
4171 OUTS (outf, ", ");
4172 OUTS (outf, dregs_lo (src0));
4173 OUTS (outf, ") (V)");
4174 }
4175 else if (sop == 2 && sopcde == 7)
4176 {
4177 OUTS (outf, dregs_lo (dst0));
4178 OUTS (outf, " = EXPADJ (");
4179 OUTS (outf, dregs_lo (src1));
4180 OUTS (outf, ", ");
4181 OUTS (outf, dregs_lo (src0));
4182 OUTS (outf, ")");
4183 }
4184 else if (sop == 3 && sopcde == 7)
4185 {
4186 OUTS (outf, dregs_lo (dst0));
4187 OUTS (outf, " = EXPADJ (");
4188 OUTS (outf, dregs_hi (src1));
4189 OUTS (outf, ", ");
4190 OUTS (outf, dregs_lo (src0));
4191 OUTS (outf, ")");
4192 }
4193 else if (sop == 0 && sopcde == 8)
4194 {
4195 OUTS (outf, "BITMUX (");
4196 OUTS (outf, dregs (src0));
4197 OUTS (outf, ", ");
4198 OUTS (outf, dregs (src1));
4199 OUTS (outf, ", A0) (ASR)");
4200 }
4201 else if (sop == 1 && sopcde == 8)
4202 {
4203 OUTS (outf, "BITMUX (");
4204 OUTS (outf, dregs (src0));
4205 OUTS (outf, ", ");
4206 OUTS (outf, dregs (src1));
4207 OUTS (outf, ", A0) (ASL)");
4208 }
4209 else if (sop == 0 && sopcde == 9)
4210 {
4211 OUTS (outf, dregs_lo (dst0));
4212 OUTS (outf, " = VIT_MAX (");
4213 OUTS (outf, dregs (src1));
4214 OUTS (outf, ") (ASL)");
4215 }
4216 else if (sop == 1 && sopcde == 9)
4217 {
4218 OUTS (outf, dregs_lo (dst0));
4219 OUTS (outf, " = VIT_MAX (");
4220 OUTS (outf, dregs (src1));
4221 OUTS (outf, ") (ASR)");
4222 }
4223 else if (sop == 2 && sopcde == 9)
4224 {
4225 OUTS (outf, dregs (dst0));
4226 OUTS (outf, " = VIT_MAX (");
4227 OUTS (outf, dregs (src1));
4228 OUTS (outf, ", ");
4229 OUTS (outf, dregs (src0));
4230 OUTS (outf, ") (ASL)");
4231 }
4232 else if (sop == 3 && sopcde == 9)
4233 {
4234 OUTS (outf, dregs (dst0));
4235 OUTS (outf, " = VIT_MAX (");
4236 OUTS (outf, dregs (src1));
4237 OUTS (outf, ", ");
4238 OUTS (outf, dregs (src0));
4239 OUTS (outf, ") (ASR)");
4240 }
4241 else if (sop == 0 && sopcde == 10)
4242 {
4243 OUTS (outf, dregs (dst0));
4244 OUTS (outf, " = EXTRACT (");
4245 OUTS (outf, dregs (src1));
4246 OUTS (outf, ", ");
4247 OUTS (outf, dregs_lo (src0));
4248 OUTS (outf, ") (Z)");
4249 }
4250 else if (sop == 1 && sopcde == 10)
4251 {
4252 OUTS (outf, dregs (dst0));
4253 OUTS (outf, " = EXTRACT (");
4254 OUTS (outf, dregs (src1));
4255 OUTS (outf, ", ");
4256 OUTS (outf, dregs_lo (src0));
4257 OUTS (outf, ") (X)");
4258 }
4259 else if (sop == 2 && sopcde == 10)
4260 {
4261 OUTS (outf, dregs (dst0));
4262 OUTS (outf, " = DEPOSIT (");
4263 OUTS (outf, dregs (src1));
4264 OUTS (outf, ", ");
4265 OUTS (outf, dregs (src0));
4266 OUTS (outf, ")");
4267 }
4268 else if (sop == 3 && sopcde == 10)
4269 {
4270 OUTS (outf, dregs (dst0));
4271 OUTS (outf, " = DEPOSIT (");
4272 OUTS (outf, dregs (src1));
4273 OUTS (outf, ", ");
4274 OUTS (outf, dregs (src0));
4275 OUTS (outf, ") (X)");
4276 }
4277 else if (sop == 0 && sopcde == 11)
4278 {
4279 OUTS (outf, dregs_lo (dst0));
4280 OUTS (outf, " = CC = BXORSHIFT (A0, ");
4281 OUTS (outf, dregs (src0));
4282 OUTS (outf, ")");
4283 }
4284 else if (sop == 1 && sopcde == 11)
4285 {
4286 OUTS (outf, dregs_lo (dst0));
4287 OUTS (outf, " = CC = BXOR (A0, ");
4288 OUTS (outf, dregs (src0));
4289 OUTS (outf, ")");
4290 }
4291 else if (sop == 0 && sopcde == 12)
4292 OUTS (outf, "A0 = BXORSHIFT (A0, A1, CC)");
4293
4294 else if (sop == 1 && sopcde == 12)
4295 {
4296 OUTS (outf, dregs_lo (dst0));
4297 OUTS (outf, " = CC = BXOR (A0, A1, CC)");
4298 }
4299 else if (sop == 0 && sopcde == 13)
4300 {
4301 OUTS (outf, dregs (dst0));
4302 OUTS (outf, " = ALIGN8 (");
4303 OUTS (outf, dregs (src1));
4304 OUTS (outf, ", ");
4305 OUTS (outf, dregs (src0));
4306 OUTS (outf, ")");
4307 }
4308 else if (sop == 1 && sopcde == 13)
4309 {
4310 OUTS (outf, dregs (dst0));
4311 OUTS (outf, " = ALIGN16 (");
4312 OUTS (outf, dregs (src1));
4313 OUTS (outf, ", ");
4314 OUTS (outf, dregs (src0));
4315 OUTS (outf, ")");
4316 }
4317 else if (sop == 2 && sopcde == 13)
4318 {
4319 OUTS (outf, dregs (dst0));
4320 OUTS (outf, " = ALIGN24 (");
4321 OUTS (outf, dregs (src1));
4322 OUTS (outf, ", ");
4323 OUTS (outf, dregs (src0));
4324 OUTS (outf, ")");
4325 }
4326 else
4327 return 0;
4328
4329 return 4;
4330 }
4331
4332 static int
4333 decode_dsp32shiftimm_0 (TIword iw0, TIword iw1, disassemble_info *outf)
4334 {
4335 /* dsp32shiftimm
4336 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
4337 | 1 | 1 | 0 | 0 |.M.| 1 | 1 | 0 | 1 | - | - |.sopcde............|
4338 |.sop...|.HLs...|.dst0......|.immag.................|.src1......|
4339 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
4340 int src1 = ((iw1 >> DSP32ShiftImm_src1_bits) & DSP32ShiftImm_src1_mask);
4341 int sop = ((iw1 >> DSP32ShiftImm_sop_bits) & DSP32ShiftImm_sop_mask);
4342 int bit8 = ((iw1 >> 8) & 0x1);
4343 int immag = ((iw1 >> DSP32ShiftImm_immag_bits) & DSP32ShiftImm_immag_mask);
4344 int newimmag = (-(iw1 >> DSP32ShiftImm_immag_bits) & DSP32ShiftImm_immag_mask);
4345 int dst0 = ((iw1 >> DSP32ShiftImm_dst0_bits) & DSP32ShiftImm_dst0_mask);
4346 int sopcde = ((iw0 >> (DSP32ShiftImm_sopcde_bits - 16)) & DSP32ShiftImm_sopcde_mask);
4347 int HLs = ((iw1 >> DSP32ShiftImm_HLs_bits) & DSP32ShiftImm_HLs_mask);
4348
4349 if (sop == 0 && sopcde == 0)
4350 {
4351 OUTS (outf, (HLs & 2) ? dregs_hi (dst0) : dregs_lo (dst0));
4352 OUTS (outf, " = ");
4353 OUTS (outf, (HLs & 1) ? dregs_hi (src1) : dregs_lo (src1));
4354 OUTS (outf, " >>> ");
4355 OUTS (outf, uimm4 (newimmag));
4356 }
4357 else if (sop == 1 && sopcde == 0 && bit8 == 0)
4358 {
4359 OUTS (outf, (HLs & 2) ? dregs_hi (dst0) : dregs_lo (dst0));
4360 OUTS (outf, " = ");
4361 OUTS (outf, (HLs & 1) ? dregs_hi (src1) : dregs_lo (src1));
4362 OUTS (outf, " << ");
4363 OUTS (outf, uimm4 (immag));
4364 OUTS (outf, " (S)");
4365 }
4366 else if (sop == 1 && sopcde == 0 && bit8 == 1)
4367 {
4368 OUTS (outf, (HLs & 2) ? dregs_hi (dst0) : dregs_lo (dst0));
4369 OUTS (outf, " = ");
4370 OUTS (outf, (HLs & 1) ? dregs_hi (src1) : dregs_lo (src1));
4371 OUTS (outf, " >>> ");
4372 OUTS (outf, uimm4 (newimmag));
4373 OUTS (outf, " (S)");
4374 }
4375 else if (sop == 2 && sopcde == 0 && bit8 == 0)
4376 {
4377 OUTS (outf, (HLs & 2) ? dregs_hi (dst0) : dregs_lo (dst0));
4378 OUTS (outf, " = ");
4379 OUTS (outf, (HLs & 1) ? dregs_hi (src1) : dregs_lo (src1));
4380 OUTS (outf, " << ");
4381 OUTS (outf, uimm4 (immag));
4382 }
4383 else if (sop == 2 && sopcde == 0 && bit8 == 1)
4384 {
4385 OUTS (outf, (HLs & 2) ? dregs_hi (dst0) : dregs_lo (dst0));
4386 OUTS (outf, " = ");
4387 OUTS (outf, (HLs & 1) ? dregs_hi (src1) : dregs_lo (src1));
4388 OUTS (outf, " >> ");
4389 OUTS (outf, uimm4 (newimmag));
4390 }
4391 else if (sop == 2 && sopcde == 3 && HLs == 1)
4392 {
4393 OUTS (outf, "A1 = ROT A1 BY ");
4394 OUTS (outf, imm6 (immag));
4395 }
4396 else if (sop == 0 && sopcde == 3 && HLs == 0 && bit8 == 0)
4397 {
4398 OUTS (outf, "A0 = A0 << ");
4399 OUTS (outf, uimm5 (immag));
4400 }
4401 else if (sop == 0 && sopcde == 3 && HLs == 0 && bit8 == 1)
4402 {
4403 OUTS (outf, "A0 = A0 >>> ");
4404 OUTS (outf, uimm5 (newimmag));
4405 }
4406 else if (sop == 0 && sopcde == 3 && HLs == 1 && bit8 == 0)
4407 {
4408 OUTS (outf, "A1 = A1 << ");
4409 OUTS (outf, uimm5 (immag));
4410 }
4411 else if (sop == 0 && sopcde == 3 && HLs == 1 && bit8 == 1)
4412 {
4413 OUTS (outf, "A1 = A1 >>> ");
4414 OUTS (outf, uimm5 (newimmag));
4415 }
4416 else if (sop == 1 && sopcde == 3 && HLs == 0)
4417 {
4418 OUTS (outf, "A0 = A0 >> ");
4419 OUTS (outf, uimm5 (newimmag));
4420 }
4421 else if (sop == 1 && sopcde == 3 && HLs == 1)
4422 {
4423 OUTS (outf, "A1 = A1 >> ");
4424 OUTS (outf, uimm5 (newimmag));
4425 }
4426 else if (sop == 2 && sopcde == 3 && HLs == 0)
4427 {
4428 OUTS (outf, "A0 = ROT A0 BY ");
4429 OUTS (outf, imm6 (immag));
4430 }
4431 else if (sop == 1 && sopcde == 1 && bit8 == 0)
4432 {
4433 OUTS (outf, dregs (dst0));
4434 OUTS (outf, " = ");
4435 OUTS (outf, dregs (src1));
4436 OUTS (outf, " << ");
4437 OUTS (outf, uimm5 (immag));
4438 OUTS (outf, " (V, S)");
4439 }
4440 else if (sop == 1 && sopcde == 1 && bit8 == 1)
4441 {
4442 OUTS (outf, dregs (dst0));
4443 OUTS (outf, " = ");
4444 OUTS (outf, dregs (src1));
4445 OUTS (outf, " >>> ");
4446 OUTS (outf, imm5 (-immag));
4447 OUTS (outf, " (V, S)");
4448 }
4449 else if (sop == 2 && sopcde == 1 && bit8 == 1)
4450 {
4451 OUTS (outf, dregs (dst0));
4452 OUTS (outf, " = ");
4453 OUTS (outf, dregs (src1));
4454 OUTS (outf, " >> ");
4455 OUTS (outf, uimm5 (newimmag));
4456 OUTS (outf, " (V)");
4457 }
4458 else if (sop == 2 && sopcde == 1 && bit8 == 0)
4459 {
4460 OUTS (outf, dregs (dst0));
4461 OUTS (outf, " = ");
4462 OUTS (outf, dregs (src1));
4463 OUTS (outf, " << ");
4464 OUTS (outf, imm5 (immag));
4465 OUTS (outf, " (V)");
4466 }
4467 else if (sop == 0 && sopcde == 1)
4468 {
4469 OUTS (outf, dregs (dst0));
4470 OUTS (outf, " = ");
4471 OUTS (outf, dregs (src1));
4472 OUTS (outf, " >>> ");
4473 OUTS (outf, uimm5 (newimmag));
4474 OUTS (outf, " (V)");
4475 }
4476 else if (sop == 1 && sopcde == 2)
4477 {
4478 OUTS (outf, dregs (dst0));
4479 OUTS (outf, " = ");
4480 OUTS (outf, dregs (src1));
4481 OUTS (outf, " << ");
4482 OUTS (outf, uimm5 (immag));
4483 OUTS (outf, " (S)");
4484 }
4485 else if (sop == 2 && sopcde == 2 && bit8 == 1)
4486 {
4487 OUTS (outf, dregs (dst0));
4488 OUTS (outf, " = ");
4489 OUTS (outf, dregs (src1));
4490 OUTS (outf, " >> ");
4491 OUTS (outf, uimm5 (newimmag));
4492 }
4493 else if (sop == 2 && sopcde == 2 && bit8 == 0)
4494 {
4495 OUTS (outf, dregs (dst0));
4496 OUTS (outf, " = ");
4497 OUTS (outf, dregs (src1));
4498 OUTS (outf, " << ");
4499 OUTS (outf, uimm5 (immag));
4500 }
4501 else if (sop == 3 && sopcde == 2)
4502 {
4503 OUTS (outf, dregs (dst0));
4504 OUTS (outf, " = ROT ");
4505 OUTS (outf, dregs (src1));
4506 OUTS (outf, " BY ");
4507 OUTS (outf, imm6 (immag));
4508 }
4509 else if (sop == 0 && sopcde == 2)
4510 {
4511 OUTS (outf, dregs (dst0));
4512 OUTS (outf, " = ");
4513 OUTS (outf, dregs (src1));
4514 OUTS (outf, " >>> ");
4515 OUTS (outf, uimm5 (newimmag));
4516 }
4517 else
4518 return 0;
4519
4520 return 4;
4521 }
4522
4523 static int
4524 decode_pseudoDEBUG_0 (TIword iw0, disassemble_info *outf)
4525 {
4526 /* pseudoDEBUG
4527 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
4528 | 1 | 1 | 1 | 1 | 1 | 0 | 0 | 0 |.fn....|.grp.......|.reg.......|
4529 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
4530 int fn = ((iw0 >> PseudoDbg_fn_bits) & PseudoDbg_fn_mask);
4531 int grp = ((iw0 >> PseudoDbg_grp_bits) & PseudoDbg_grp_mask);
4532 int reg = ((iw0 >> PseudoDbg_reg_bits) & PseudoDbg_reg_mask);
4533
4534 if (parallel)
4535 return 0;
4536
4537 if (reg == 0 && fn == 3)
4538 OUTS (outf, "DBG A0");
4539
4540 else if (reg == 1 && fn == 3)
4541 OUTS (outf, "DBG A1");
4542
4543 else if (reg == 3 && fn == 3)
4544 OUTS (outf, "ABORT");
4545
4546 else if (reg == 4 && fn == 3)
4547 OUTS (outf, "HLT");
4548
4549 else if (reg == 5 && fn == 3)
4550 OUTS (outf, "DBGHALT");
4551
4552 else if (reg == 6 && fn == 3)
4553 {
4554 OUTS (outf, "DBGCMPLX (");
4555 OUTS (outf, dregs (grp));
4556 OUTS (outf, ")");
4557 }
4558 else if (reg == 7 && fn == 3)
4559 OUTS (outf, "DBG");
4560
4561 else if (grp == 0 && fn == 2)
4562 {
4563 OUTS (outf, "OUTC ");
4564 OUTS (outf, dregs (reg));
4565 }
4566 else if (fn == 0)
4567 {
4568 OUTS (outf, "DBG ");
4569 OUTS (outf, allregs (reg, grp));
4570 }
4571 else if (fn == 1)
4572 {
4573 OUTS (outf, "PRNT ");
4574 OUTS (outf, allregs (reg, grp));
4575 }
4576 else
4577 return 0;
4578
4579 return 2;
4580 }
4581
4582 static int
4583 decode_pseudoOChar_0 (TIword iw0, disassemble_info *outf)
4584 {
4585 /* psedoOChar
4586 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
4587 | 1 | 1 | 1 | 1 | 1 | 0 | 0 | 1 |.ch............................|
4588 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
4589 int ch = ((iw0 >> PseudoChr_ch_bits) & PseudoChr_ch_mask);
4590
4591 if (parallel)
4592 return 0;
4593
4594 OUTS (outf, "OUTC ");
4595 OUTS (outf, uimm8 (ch));
4596
4597 return 2;
4598 }
4599
4600 static int
4601 decode_pseudodbg_assert_0 (TIword iw0, TIword iw1, disassemble_info *outf)
4602 {
4603 /* pseudodbg_assert
4604 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+
4605 | 1 | 1 | 1 | 1 | 0 | - | - | - | dbgop |.grp.......|.regtest...|
4606 |.expected......................................................|
4607 +---+---+---+---|---+---+---+---|---+---+---+---|---+---+---+---+ */
4608 int expected = ((iw1 >> PseudoDbg_Assert_expected_bits) & PseudoDbg_Assert_expected_mask);
4609 int dbgop = ((iw0 >> (PseudoDbg_Assert_dbgop_bits - 16)) & PseudoDbg_Assert_dbgop_mask);
4610 int grp = ((iw0 >> (PseudoDbg_Assert_grp_bits - 16)) & PseudoDbg_Assert_grp_mask);
4611 int regtest = ((iw0 >> (PseudoDbg_Assert_regtest_bits - 16)) & PseudoDbg_Assert_regtest_mask);
4612
4613 if (parallel)
4614 return 0;
4615
4616 if (dbgop == 0)
4617 {
4618 OUTS (outf, "DBGA (");
4619 OUTS (outf, regs_lo (regtest, grp));
4620 OUTS (outf, ", ");
4621 OUTS (outf, uimm16 (expected));
4622 OUTS (outf, ")");
4623 }
4624 else if (dbgop == 1)
4625 {
4626 OUTS (outf, "DBGA (");
4627 OUTS (outf, regs_hi (regtest, grp));
4628 OUTS (outf, ", ");
4629 OUTS (outf, uimm16 (expected));
4630 OUTS (outf, ")");
4631 }
4632 else if (dbgop == 2)
4633 {
4634 OUTS (outf, "DBGAL (");
4635 OUTS (outf, allregs (regtest, grp));
4636 OUTS (outf, ", ");
4637 OUTS (outf, uimm16 (expected));
4638 OUTS (outf, ")");
4639 }
4640 else if (dbgop == 3)
4641 {
4642 OUTS (outf, "DBGAH (");
4643 OUTS (outf, allregs (regtest, grp));
4644 OUTS (outf, ", ");
4645 OUTS (outf, uimm16 (expected));
4646 OUTS (outf, ")");
4647 }
4648 else
4649 return 0;
4650 return 4;
4651 }
4652
4653 static int
4654 _print_insn_bfin (bfd_vma pc, disassemble_info *outf)
4655 {
4656 bfd_byte buf[4];
4657 TIword iw0;
4658 TIword iw1;
4659 int status;
4660 int rv = 0;
4661
4662 status = (*outf->read_memory_func) (pc & ~0x1, buf, 2, outf);
4663 /* FIXME */
4664 (void) status;
4665 status = (*outf->read_memory_func) ((pc + 2) & ~0x1, buf + 2, 2, outf);
4666 /* FIXME */
4667 (void) status;
4668
4669 iw0 = bfd_getl16 (buf);
4670 iw1 = bfd_getl16 (buf + 2);
4671
4672 if ((iw0 & 0xf7ff) == 0xc003 && iw1 == 0x1800)
4673 {
4674 if (parallel)
4675 {
4676 OUTS (outf, "ILLEGAL");
4677 return 0;
4678 }
4679 OUTS (outf, "MNOP");
4680 return 4;
4681 }
4682 else if ((iw0 & 0xff00) == 0x0000)
4683 rv = decode_ProgCtrl_0 (iw0, outf);
4684 else if ((iw0 & 0xffc0) == 0x0240)
4685 rv = decode_CaCTRL_0 (iw0, outf);
4686 else if ((iw0 & 0xff80) == 0x0100)
4687 rv = decode_PushPopReg_0 (iw0, outf);
4688 else if ((iw0 & 0xfe00) == 0x0400)
4689 rv = decode_PushPopMultiple_0 (iw0, outf);
4690 else if ((iw0 & 0xfe00) == 0x0600)
4691 rv = decode_ccMV_0 (iw0, outf);
4692 else if ((iw0 & 0xf800) == 0x0800)
4693 rv = decode_CCflag_0 (iw0, outf);
4694 else if ((iw0 & 0xffe0) == 0x0200)
4695 rv = decode_CC2dreg_0 (iw0, outf);
4696 else if ((iw0 & 0xff00) == 0x0300)
4697 rv = decode_CC2stat_0 (iw0, outf);
4698 else if ((iw0 & 0xf000) == 0x1000)
4699 rv = decode_BRCC_0 (iw0, pc, outf);
4700 else if ((iw0 & 0xf000) == 0x2000)
4701 rv = decode_UJUMP_0 (iw0, pc, outf);
4702 else if ((iw0 & 0xf000) == 0x3000)
4703 rv = decode_REGMV_0 (iw0, outf);
4704 else if ((iw0 & 0xfc00) == 0x4000)
4705 rv = decode_ALU2op_0 (iw0, outf);
4706 else if ((iw0 & 0xfe00) == 0x4400)
4707 rv = decode_PTR2op_0 (iw0, outf);
4708 else if ((iw0 & 0xf800) == 0x4800)
4709 rv = decode_LOGI2op_0 (iw0, outf);
4710 else if ((iw0 & 0xf000) == 0x5000)
4711 rv = decode_COMP3op_0 (iw0, outf);
4712 else if ((iw0 & 0xf800) == 0x6000)
4713 rv = decode_COMPI2opD_0 (iw0, outf);
4714 else if ((iw0 & 0xf800) == 0x6800)
4715 rv = decode_COMPI2opP_0 (iw0, outf);
4716 else if ((iw0 & 0xf000) == 0x8000)
4717 rv = decode_LDSTpmod_0 (iw0, outf);
4718 else if ((iw0 & 0xff60) == 0x9e60)
4719 rv = decode_dagMODim_0 (iw0, outf);
4720 else if ((iw0 & 0xfff0) == 0x9f60)
4721 rv = decode_dagMODik_0 (iw0, outf);
4722 else if ((iw0 & 0xfc00) == 0x9c00)
4723 rv = decode_dspLDST_0 (iw0, outf);
4724 else if ((iw0 & 0xf000) == 0x9000)
4725 rv = decode_LDST_0 (iw0, outf);
4726 else if ((iw0 & 0xfc00) == 0xb800)
4727 rv = decode_LDSTiiFP_0 (iw0, outf);
4728 else if ((iw0 & 0xe000) == 0xA000)
4729 rv = decode_LDSTii_0 (iw0, outf);
4730 else if ((iw0 & 0xff80) == 0xe080 && (iw1 & 0x0C00) == 0x0000)
4731 rv = decode_LoopSetup_0 (iw0, iw1, pc, outf);
4732 else if ((iw0 & 0xff00) == 0xe100 && (iw1 & 0x0000) == 0x0000)
4733 rv = decode_LDIMMhalf_0 (iw0, iw1, outf);
4734 else if ((iw0 & 0xfe00) == 0xe200 && (iw1 & 0x0000) == 0x0000)
4735 rv = decode_CALLa_0 (iw0, iw1, pc, outf);
4736 else if ((iw0 & 0xfc00) == 0xe400 && (iw1 & 0x0000) == 0x0000)
4737 rv = decode_LDSTidxI_0 (iw0, iw1, outf);
4738 else if ((iw0 & 0xfffe) == 0xe800 && (iw1 & 0x0000) == 0x0000)
4739 rv = decode_linkage_0 (iw0, iw1, outf);
4740 else if ((iw0 & 0xf600) == 0xc000 && (iw1 & 0x0000) == 0x0000)
4741 rv = decode_dsp32mac_0 (iw0, iw1, outf);
4742 else if ((iw0 & 0xf600) == 0xc200 && (iw1 & 0x0000) == 0x0000)
4743 rv = decode_dsp32mult_0 (iw0, iw1, outf);
4744 else if ((iw0 & 0xf7c0) == 0xc400 && (iw1 & 0x0000) == 0x0000)
4745 rv = decode_dsp32alu_0 (iw0, iw1, outf);
4746 else if ((iw0 & 0xf780) == 0xc600 && (iw1 & 0x01c0) == 0x0000)
4747 rv = decode_dsp32shift_0 (iw0, iw1, outf);
4748 else if ((iw0 & 0xf780) == 0xc680 && (iw1 & 0x0000) == 0x0000)
4749 rv = decode_dsp32shiftimm_0 (iw0, iw1, outf);
4750 else if ((iw0 & 0xff00) == 0xf800)
4751 rv = decode_pseudoDEBUG_0 (iw0, outf);
4752 else if ((iw0 & 0xFF00) == 0xF900)
4753 rv = decode_pseudoOChar_0 (iw0, outf);
4754 else if ((iw0 & 0xFF00) == 0xf000 && (iw1 & 0x0000) == 0x0000)
4755 rv = decode_pseudodbg_assert_0 (iw0, iw1, outf);
4756
4757 if (rv == 0)
4758 OUTS (outf, "ILLEGAL");
4759
4760 return rv;
4761 }
4762
4763 int
4764 print_insn_bfin (bfd_vma pc, disassemble_info *outf)
4765 {
4766 bfd_byte buf[2];
4767 unsigned short iw0;
4768 int status;
4769 int count = 0;
4770
4771 status = (*outf->read_memory_func) (pc & ~0x01, buf, 2, outf);
4772 /* FIXME */
4773 (void) status;
4774 iw0 = bfd_getl16 (buf);
4775
4776 count += _print_insn_bfin (pc, outf);
4777
4778 /* Proper display of multiple issue instructions. */
4779
4780 if (count == 4 && (iw0 & 0xc000) == 0xc000 && (iw0 & BIT_MULTI_INS)
4781 && ((iw0 & 0xe800) != 0xe800 /* Not Linkage. */ ))
4782 {
4783 int legal = 1;
4784 int len;
4785
4786 parallel = 1;
4787 OUTS (outf, " || ");
4788 len = _print_insn_bfin (pc + 4, outf);
4789 OUTS (outf, " || ");
4790 if (len != 2)
4791 legal = 0;
4792 len = _print_insn_bfin (pc + 6, outf);
4793 if (len != 2)
4794 legal = 0;
4795
4796 if (legal)
4797 count = 8;
4798 else
4799 {
4800 OUTS (outf, ";\t\t/* ILLEGAL PARALLEL INSTRUCTION */");
4801 comment = 1;
4802 count = 0;
4803 }
4804 parallel = 0;
4805 }
4806
4807 if (!comment)
4808 OUTS (outf, ";");
4809
4810 if (count == 0)
4811 return 2;
4812
4813 comment = 0;
4814
4815 return count;
4816 }
git-cvsimport of binutils cvsroot