1ed0d50c3Schristos /* Altera Nios II disassemble routines
2*b88e3e88Schristos Copyright (C) 2012-2020 Free Software Foundation, Inc.
3ed0d50c3Schristos Contributed by Nigel Gray (ngray@altera.com).
4ed0d50c3Schristos Contributed by Mentor Graphics, Inc.
5ed0d50c3Schristos
6ed0d50c3Schristos This file is part of the GNU opcodes library.
7ed0d50c3Schristos
8ed0d50c3Schristos This library is free software; you can redistribute it and/or modify
9ed0d50c3Schristos it under the terms of the GNU General Public License as published by
10ed0d50c3Schristos the Free Software Foundation; either version 3, or (at your option)
11ed0d50c3Schristos any later version.
12ed0d50c3Schristos
13ed0d50c3Schristos It is distributed in the hope that it will be useful, but WITHOUT
14ed0d50c3Schristos ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
15ed0d50c3Schristos or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
16ed0d50c3Schristos License for more details.
17ed0d50c3Schristos
18ed0d50c3Schristos You should have received a copy of the GNU General Public License
19ed0d50c3Schristos along with this file; see the file COPYING. If not, write to the
20ed0d50c3Schristos Free Software Foundation, 51 Franklin Street - Fifth Floor, Boston,
21ed0d50c3Schristos MA 02110-1301, USA. */
22ed0d50c3Schristos
23ed0d50c3Schristos #include "sysdep.h"
2406324dcfSchristos #include "disassemble.h"
2506324dcfSchristos #include "opintl.h"
26ed0d50c3Schristos #include "opcode/nios2.h"
27ed0d50c3Schristos #include "libiberty.h"
28ed0d50c3Schristos #include <string.h>
29ed0d50c3Schristos #include <assert.h>
30ed0d50c3Schristos
31ed0d50c3Schristos /* No symbol table is available when this code runs out in an embedded
32ed0d50c3Schristos system as when it is used for disassembler support in a monitor. */
33ed0d50c3Schristos #if !defined(EMBEDDED_ENV)
34ed0d50c3Schristos #define SYMTAB_AVAILABLE 1
35ed0d50c3Schristos #include "elf-bfd.h"
36ed0d50c3Schristos #include "elf/nios2.h"
37ed0d50c3Schristos #endif
38ed0d50c3Schristos
39ed0d50c3Schristos /* Default length of Nios II instruction in bytes. */
40ed0d50c3Schristos #define INSNLEN 4
41ed0d50c3Schristos
42ed0d50c3Schristos /* Data structures used by the opcode hash table. */
43ed0d50c3Schristos typedef struct _nios2_opcode_hash
44ed0d50c3Schristos {
45ed0d50c3Schristos const struct nios2_opcode *opcode;
46ed0d50c3Schristos struct _nios2_opcode_hash *next;
47ed0d50c3Schristos } nios2_opcode_hash;
48ed0d50c3Schristos
49ed0d50c3Schristos /* Hash table size. */
50ed0d50c3Schristos #define OPCODE_HASH_SIZE (IW_R1_OP_UNSHIFTED_MASK + 1)
51ed0d50c3Schristos
52ed0d50c3Schristos /* Extract the opcode from an instruction word. */
53ed0d50c3Schristos static unsigned int
nios2_r1_extract_opcode(unsigned int x)54ed0d50c3Schristos nios2_r1_extract_opcode (unsigned int x)
55ed0d50c3Schristos {
56ed0d50c3Schristos return GET_IW_R1_OP (x);
57ed0d50c3Schristos }
58ed0d50c3Schristos
59ed0d50c3Schristos static unsigned int
nios2_r2_extract_opcode(unsigned int x)60ed0d50c3Schristos nios2_r2_extract_opcode (unsigned int x)
61ed0d50c3Schristos {
62ed0d50c3Schristos return GET_IW_R2_OP (x);
63ed0d50c3Schristos }
64ed0d50c3Schristos
65ed0d50c3Schristos /* We maintain separate hash tables for R1 and R2 opcodes, and pseudo-ops
66ed0d50c3Schristos are stored in a different table than regular instructions. */
67ed0d50c3Schristos
68ed0d50c3Schristos typedef struct _nios2_disassembler_state
69ed0d50c3Schristos {
70ed0d50c3Schristos const struct nios2_opcode *opcodes;
71ed0d50c3Schristos const int *num_opcodes;
72ed0d50c3Schristos unsigned int (*extract_opcode) (unsigned int);
73ed0d50c3Schristos nios2_opcode_hash *hash[OPCODE_HASH_SIZE];
74ed0d50c3Schristos nios2_opcode_hash *ps_hash[OPCODE_HASH_SIZE];
75ed0d50c3Schristos const struct nios2_opcode *nop;
76ed0d50c3Schristos bfd_boolean init;
77ed0d50c3Schristos } nios2_disassembler_state;
78ed0d50c3Schristos
79ed0d50c3Schristos static nios2_disassembler_state
80ed0d50c3Schristos nios2_r1_disassembler_state = {
81ed0d50c3Schristos nios2_r1_opcodes,
82ed0d50c3Schristos &nios2_num_r1_opcodes,
83ed0d50c3Schristos nios2_r1_extract_opcode,
84ed0d50c3Schristos {},
85ed0d50c3Schristos {},
86ed0d50c3Schristos NULL,
87ed0d50c3Schristos 0
88ed0d50c3Schristos };
89ed0d50c3Schristos
90ed0d50c3Schristos static nios2_disassembler_state
91ed0d50c3Schristos nios2_r2_disassembler_state = {
92ed0d50c3Schristos nios2_r2_opcodes,
93ed0d50c3Schristos &nios2_num_r2_opcodes,
94ed0d50c3Schristos nios2_r2_extract_opcode,
95ed0d50c3Schristos {},
96ed0d50c3Schristos {},
97ed0d50c3Schristos NULL,
98ed0d50c3Schristos 0
99ed0d50c3Schristos };
100ed0d50c3Schristos
101ed0d50c3Schristos /* Function to initialize the opcode hash table. */
102ed0d50c3Schristos static void
nios2_init_opcode_hash(nios2_disassembler_state * state)103ed0d50c3Schristos nios2_init_opcode_hash (nios2_disassembler_state *state)
104ed0d50c3Schristos {
105ed0d50c3Schristos unsigned int i;
106ed0d50c3Schristos register const struct nios2_opcode *op;
107ed0d50c3Schristos
108ed0d50c3Schristos for (i = 0; i < OPCODE_HASH_SIZE; i++)
109ed0d50c3Schristos for (op = state->opcodes; op < &state->opcodes[*(state->num_opcodes)]; op++)
110ed0d50c3Schristos {
111ed0d50c3Schristos nios2_opcode_hash *new_hash;
112ed0d50c3Schristos nios2_opcode_hash **bucket = NULL;
113ed0d50c3Schristos
114ed0d50c3Schristos if ((op->pinfo & NIOS2_INSN_MACRO) == NIOS2_INSN_MACRO)
115ed0d50c3Schristos {
116ed0d50c3Schristos if (i == state->extract_opcode (op->match)
117ed0d50c3Schristos && (op->pinfo & (NIOS2_INSN_MACRO_MOV | NIOS2_INSN_MACRO_MOVI)
118ed0d50c3Schristos & 0x7fffffff))
119ed0d50c3Schristos {
120ed0d50c3Schristos bucket = &(state->ps_hash[i]);
121ed0d50c3Schristos if (strcmp (op->name, "nop") == 0)
122ed0d50c3Schristos state->nop = op;
123ed0d50c3Schristos }
124ed0d50c3Schristos }
125ed0d50c3Schristos else if (i == state->extract_opcode (op->match))
126ed0d50c3Schristos bucket = &(state->hash[i]);
127ed0d50c3Schristos
128ed0d50c3Schristos if (bucket)
129ed0d50c3Schristos {
130ed0d50c3Schristos new_hash =
131ed0d50c3Schristos (nios2_opcode_hash *) malloc (sizeof (nios2_opcode_hash));
132ed0d50c3Schristos if (new_hash == NULL)
133ed0d50c3Schristos {
13406324dcfSchristos /* xgettext:c-format */
13506324dcfSchristos opcodes_error_handler (_("out of memory"));
13606324dcfSchristos exit (1);
137ed0d50c3Schristos }
138ed0d50c3Schristos new_hash->opcode = op;
139ed0d50c3Schristos new_hash->next = NULL;
140ed0d50c3Schristos while (*bucket)
141ed0d50c3Schristos bucket = &((*bucket)->next);
142ed0d50c3Schristos *bucket = new_hash;
143ed0d50c3Schristos }
144ed0d50c3Schristos }
145ed0d50c3Schristos state->init = 1;
146ed0d50c3Schristos
147ed0d50c3Schristos #ifdef DEBUG_HASHTABLE
148ed0d50c3Schristos for (i = 0; i < OPCODE_HASH_SIZE; ++i)
149ed0d50c3Schristos {
150ed0d50c3Schristos nios2_opcode_hash *tmp_hash = state->hash[i];
151ed0d50c3Schristos printf ("index: 0x%02X ops: ", i);
152ed0d50c3Schristos while (tmp_hash != NULL)
153ed0d50c3Schristos {
154ed0d50c3Schristos printf ("%s ", tmp_hash->opcode->name);
155ed0d50c3Schristos tmp_hash = tmp_hash->next;
156ed0d50c3Schristos }
157ed0d50c3Schristos printf ("\n");
158ed0d50c3Schristos }
159ed0d50c3Schristos
160ed0d50c3Schristos for (i = 0; i < OPCODE_HASH_SIZE; ++i)
161ed0d50c3Schristos {
162ed0d50c3Schristos nios2_opcode_hash *tmp_hash = state->ps_hash[i];
163ed0d50c3Schristos printf ("index: 0x%02X ops: ", i);
164ed0d50c3Schristos while (tmp_hash != NULL)
165ed0d50c3Schristos {
166ed0d50c3Schristos printf ("%s ", tmp_hash->opcode->name);
167ed0d50c3Schristos tmp_hash = tmp_hash->next;
168ed0d50c3Schristos }
169ed0d50c3Schristos printf ("\n");
170ed0d50c3Schristos }
171ed0d50c3Schristos #endif /* DEBUG_HASHTABLE */
172ed0d50c3Schristos }
173ed0d50c3Schristos
174ed0d50c3Schristos /* Return a pointer to an nios2_opcode struct for a given instruction
175ed0d50c3Schristos word OPCODE for bfd machine MACH, or NULL if there is an error. */
176ed0d50c3Schristos const struct nios2_opcode *
nios2_find_opcode_hash(unsigned long opcode,unsigned long mach)177ed0d50c3Schristos nios2_find_opcode_hash (unsigned long opcode, unsigned long mach)
178ed0d50c3Schristos {
179ed0d50c3Schristos nios2_opcode_hash *entry;
180ed0d50c3Schristos nios2_disassembler_state *state;
181ed0d50c3Schristos
182ed0d50c3Schristos /* Select the right instruction set, hash tables, and opcode accessor
183ed0d50c3Schristos for the mach variant. */
184ed0d50c3Schristos if (mach == bfd_mach_nios2r2)
185ed0d50c3Schristos state = &nios2_r2_disassembler_state;
186ed0d50c3Schristos else
187ed0d50c3Schristos state = &nios2_r1_disassembler_state;
188ed0d50c3Schristos
189ed0d50c3Schristos /* Build a hash table to shorten the search time. */
190ed0d50c3Schristos if (!state->init)
191ed0d50c3Schristos nios2_init_opcode_hash (state);
192ed0d50c3Schristos
193ed0d50c3Schristos /* Check for NOP first. Both NOP and MOV are macros that expand into
194ed0d50c3Schristos an ADD instruction, and we always want to give priority to NOP. */
195ed0d50c3Schristos if (state->nop->match == (opcode & state->nop->mask))
196ed0d50c3Schristos return state->nop;
197ed0d50c3Schristos
198ed0d50c3Schristos /* First look in the pseudo-op hashtable. */
199ed0d50c3Schristos for (entry = state->ps_hash[state->extract_opcode (opcode)];
200ed0d50c3Schristos entry; entry = entry->next)
201ed0d50c3Schristos if (entry->opcode->match == (opcode & entry->opcode->mask))
202ed0d50c3Schristos return entry->opcode;
203ed0d50c3Schristos
204ed0d50c3Schristos /* Otherwise look in the main hashtable. */
205ed0d50c3Schristos for (entry = state->hash[state->extract_opcode (opcode)];
206ed0d50c3Schristos entry; entry = entry->next)
207ed0d50c3Schristos if (entry->opcode->match == (opcode & entry->opcode->mask))
208ed0d50c3Schristos return entry->opcode;
209ed0d50c3Schristos
210ed0d50c3Schristos return NULL;
211ed0d50c3Schristos }
212ed0d50c3Schristos
213ed0d50c3Schristos /* There are 32 regular registers, 32 coprocessor registers,
214ed0d50c3Schristos and 32 control registers. */
215ed0d50c3Schristos #define NUMREGNAMES 32
216ed0d50c3Schristos
217ed0d50c3Schristos /* Return a pointer to the base of the coprocessor register name array. */
218ed0d50c3Schristos static struct nios2_reg *
nios2_coprocessor_regs(void)219ed0d50c3Schristos nios2_coprocessor_regs (void)
220ed0d50c3Schristos {
221ed0d50c3Schristos static struct nios2_reg *cached = NULL;
222ed0d50c3Schristos
223ed0d50c3Schristos if (!cached)
224ed0d50c3Schristos {
225ed0d50c3Schristos int i;
226ed0d50c3Schristos for (i = NUMREGNAMES; i < nios2_num_regs; i++)
227ed0d50c3Schristos if (!strcmp (nios2_regs[i].name, "c0"))
228ed0d50c3Schristos {
229ed0d50c3Schristos cached = nios2_regs + i;
230ed0d50c3Schristos break;
231ed0d50c3Schristos }
232ed0d50c3Schristos assert (cached);
233ed0d50c3Schristos }
234ed0d50c3Schristos return cached;
235ed0d50c3Schristos }
236ed0d50c3Schristos
237ed0d50c3Schristos /* Return a pointer to the base of the control register name array. */
238ed0d50c3Schristos static struct nios2_reg *
nios2_control_regs(void)239ed0d50c3Schristos nios2_control_regs (void)
240ed0d50c3Schristos {
241ed0d50c3Schristos static struct nios2_reg *cached = NULL;
242ed0d50c3Schristos
243ed0d50c3Schristos if (!cached)
244ed0d50c3Schristos {
245ed0d50c3Schristos int i;
246ed0d50c3Schristos for (i = NUMREGNAMES; i < nios2_num_regs; i++)
247ed0d50c3Schristos if (!strcmp (nios2_regs[i].name, "status"))
248ed0d50c3Schristos {
249ed0d50c3Schristos cached = nios2_regs + i;
250ed0d50c3Schristos break;
251ed0d50c3Schristos }
252ed0d50c3Schristos assert (cached);
253ed0d50c3Schristos }
254ed0d50c3Schristos return cached;
255ed0d50c3Schristos }
256ed0d50c3Schristos
257ed0d50c3Schristos /* Helper routine to report internal errors. */
258ed0d50c3Schristos static void
bad_opcode(const struct nios2_opcode * op)259ed0d50c3Schristos bad_opcode (const struct nios2_opcode *op)
260ed0d50c3Schristos {
26106324dcfSchristos opcodes_error_handler
26206324dcfSchristos /* xgettext:c-format */
26306324dcfSchristos (_("internal error: broken opcode descriptor for `%s %s'"),
264ed0d50c3Schristos op->name, op->args);
265ed0d50c3Schristos abort ();
266ed0d50c3Schristos }
267ed0d50c3Schristos
268ed0d50c3Schristos /* The function nios2_print_insn_arg uses the character pointed
269ed0d50c3Schristos to by ARGPTR to determine how it print the next token or separator
270ed0d50c3Schristos character in the arguments to an instruction. */
271ed0d50c3Schristos static int
nios2_print_insn_arg(const char * argptr,unsigned long opcode,bfd_vma address,disassemble_info * info,const struct nios2_opcode * op)272ed0d50c3Schristos nios2_print_insn_arg (const char *argptr,
273ed0d50c3Schristos unsigned long opcode, bfd_vma address,
274ed0d50c3Schristos disassemble_info *info,
275ed0d50c3Schristos const struct nios2_opcode *op)
276ed0d50c3Schristos {
277ed0d50c3Schristos unsigned long i = 0;
278*b88e3e88Schristos long s = 0;
279*b88e3e88Schristos bfd_signed_vma o = 0;
280ed0d50c3Schristos struct nios2_reg *reg_base;
281ed0d50c3Schristos
282ed0d50c3Schristos switch (*argptr)
283ed0d50c3Schristos {
284ed0d50c3Schristos case ',':
285ed0d50c3Schristos case '(':
286ed0d50c3Schristos case ')':
287ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%c", *argptr);
288ed0d50c3Schristos break;
289ed0d50c3Schristos
290ed0d50c3Schristos case 'c':
291ed0d50c3Schristos /* Control register index. */
292ed0d50c3Schristos switch (op->format)
293ed0d50c3Schristos {
294ed0d50c3Schristos case iw_r_type:
295ed0d50c3Schristos i = GET_IW_R_IMM5 (opcode);
296ed0d50c3Schristos break;
297ed0d50c3Schristos case iw_F3X6L5_type:
298ed0d50c3Schristos i = GET_IW_F3X6L5_IMM5 (opcode);
299ed0d50c3Schristos break;
300ed0d50c3Schristos default:
301ed0d50c3Schristos bad_opcode (op);
302ed0d50c3Schristos }
303ed0d50c3Schristos reg_base = nios2_control_regs ();
304ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", reg_base[i].name);
305ed0d50c3Schristos break;
306ed0d50c3Schristos
307ed0d50c3Schristos case 'd':
308ed0d50c3Schristos reg_base = nios2_regs;
309ed0d50c3Schristos switch (op->format)
310ed0d50c3Schristos {
311ed0d50c3Schristos case iw_r_type:
312ed0d50c3Schristos i = GET_IW_R_C (opcode);
313ed0d50c3Schristos break;
314ed0d50c3Schristos case iw_custom_type:
315ed0d50c3Schristos i = GET_IW_CUSTOM_C (opcode);
316ed0d50c3Schristos if (GET_IW_CUSTOM_READC (opcode) == 0)
317ed0d50c3Schristos reg_base = nios2_coprocessor_regs ();
318ed0d50c3Schristos break;
319ed0d50c3Schristos case iw_F3X6L5_type:
320ed0d50c3Schristos case iw_F3X6_type:
321ed0d50c3Schristos i = GET_IW_F3X6L5_C (opcode);
322ed0d50c3Schristos break;
323ed0d50c3Schristos case iw_F3X8_type:
324ed0d50c3Schristos i = GET_IW_F3X8_C (opcode);
325ed0d50c3Schristos if (GET_IW_F3X8_READC (opcode) == 0)
326ed0d50c3Schristos reg_base = nios2_coprocessor_regs ();
327ed0d50c3Schristos break;
328ed0d50c3Schristos case iw_F2_type:
329ed0d50c3Schristos i = GET_IW_F2_B (opcode);
330ed0d50c3Schristos break;
331ed0d50c3Schristos default:
332ed0d50c3Schristos bad_opcode (op);
333ed0d50c3Schristos }
334ed0d50c3Schristos if (i < NUMREGNAMES)
335ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", reg_base[i].name);
336ed0d50c3Schristos else
337ed0d50c3Schristos (*info->fprintf_func) (info->stream, "unknown");
338ed0d50c3Schristos break;
339ed0d50c3Schristos
340ed0d50c3Schristos case 's':
341ed0d50c3Schristos reg_base = nios2_regs;
342ed0d50c3Schristos switch (op->format)
343ed0d50c3Schristos {
344ed0d50c3Schristos case iw_r_type:
345ed0d50c3Schristos i = GET_IW_R_A (opcode);
346ed0d50c3Schristos break;
347ed0d50c3Schristos case iw_i_type:
348ed0d50c3Schristos i = GET_IW_I_A (opcode);
349ed0d50c3Schristos break;
350ed0d50c3Schristos case iw_custom_type:
351ed0d50c3Schristos i = GET_IW_CUSTOM_A (opcode);
352ed0d50c3Schristos if (GET_IW_CUSTOM_READA (opcode) == 0)
353ed0d50c3Schristos reg_base = nios2_coprocessor_regs ();
354ed0d50c3Schristos break;
355ed0d50c3Schristos case iw_F2I16_type:
356ed0d50c3Schristos i = GET_IW_F2I16_A (opcode);
357ed0d50c3Schristos break;
358ed0d50c3Schristos case iw_F2X4I12_type:
359ed0d50c3Schristos i = GET_IW_F2X4I12_A (opcode);
360ed0d50c3Schristos break;
361ed0d50c3Schristos case iw_F1X4I12_type:
362ed0d50c3Schristos i = GET_IW_F1X4I12_A (opcode);
363ed0d50c3Schristos break;
364ed0d50c3Schristos case iw_F1X4L17_type:
365ed0d50c3Schristos i = GET_IW_F1X4L17_A (opcode);
366ed0d50c3Schristos break;
367ed0d50c3Schristos case iw_F3X6L5_type:
368ed0d50c3Schristos case iw_F3X6_type:
369ed0d50c3Schristos i = GET_IW_F3X6L5_A (opcode);
370ed0d50c3Schristos break;
371ed0d50c3Schristos case iw_F2X6L10_type:
372ed0d50c3Schristos i = GET_IW_F2X6L10_A (opcode);
373ed0d50c3Schristos break;
374ed0d50c3Schristos case iw_F3X8_type:
375ed0d50c3Schristos i = GET_IW_F3X8_A (opcode);
376ed0d50c3Schristos if (GET_IW_F3X8_READA (opcode) == 0)
377ed0d50c3Schristos reg_base = nios2_coprocessor_regs ();
378ed0d50c3Schristos break;
379ed0d50c3Schristos case iw_F1X1_type:
380ed0d50c3Schristos i = GET_IW_F1X1_A (opcode);
381ed0d50c3Schristos break;
382ed0d50c3Schristos case iw_F1I5_type:
383ed0d50c3Schristos i = 27; /* Implicit stack pointer reference. */
384ed0d50c3Schristos break;
385ed0d50c3Schristos case iw_F2_type:
386ed0d50c3Schristos i = GET_IW_F2_A (opcode);
387ed0d50c3Schristos break;
388ed0d50c3Schristos default:
389ed0d50c3Schristos bad_opcode (op);
390ed0d50c3Schristos }
391ed0d50c3Schristos if (i < NUMREGNAMES)
392ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", reg_base[i].name);
393ed0d50c3Schristos else
394ed0d50c3Schristos (*info->fprintf_func) (info->stream, "unknown");
395ed0d50c3Schristos break;
396ed0d50c3Schristos
397ed0d50c3Schristos case 't':
398ed0d50c3Schristos reg_base = nios2_regs;
399ed0d50c3Schristos switch (op->format)
400ed0d50c3Schristos {
401ed0d50c3Schristos case iw_r_type:
402ed0d50c3Schristos i = GET_IW_R_B (opcode);
403ed0d50c3Schristos break;
404ed0d50c3Schristos case iw_i_type:
405ed0d50c3Schristos i = GET_IW_I_B (opcode);
406ed0d50c3Schristos break;
407ed0d50c3Schristos case iw_custom_type:
408ed0d50c3Schristos i = GET_IW_CUSTOM_B (opcode);
409ed0d50c3Schristos if (GET_IW_CUSTOM_READB (opcode) == 0)
410ed0d50c3Schristos reg_base = nios2_coprocessor_regs ();
411ed0d50c3Schristos break;
412ed0d50c3Schristos case iw_F2I16_type:
413ed0d50c3Schristos i = GET_IW_F2I16_B (opcode);
414ed0d50c3Schristos break;
415ed0d50c3Schristos case iw_F2X4I12_type:
416ed0d50c3Schristos i = GET_IW_F2X4I12_B (opcode);
417ed0d50c3Schristos break;
418ed0d50c3Schristos case iw_F3X6L5_type:
419ed0d50c3Schristos case iw_F3X6_type:
420ed0d50c3Schristos i = GET_IW_F3X6L5_B (opcode);
421ed0d50c3Schristos break;
422ed0d50c3Schristos case iw_F2X6L10_type:
423ed0d50c3Schristos i = GET_IW_F2X6L10_B (opcode);
424ed0d50c3Schristos break;
425ed0d50c3Schristos case iw_F3X8_type:
426ed0d50c3Schristos i = GET_IW_F3X8_B (opcode);
427ed0d50c3Schristos if (GET_IW_F3X8_READB (opcode) == 0)
428ed0d50c3Schristos reg_base = nios2_coprocessor_regs ();
429ed0d50c3Schristos break;
430ed0d50c3Schristos case iw_F1I5_type:
431ed0d50c3Schristos i = GET_IW_F1I5_B (opcode);
432ed0d50c3Schristos break;
433ed0d50c3Schristos case iw_F2_type:
434ed0d50c3Schristos i = GET_IW_F2_B (opcode);
435ed0d50c3Schristos break;
436ed0d50c3Schristos case iw_T1X1I6_type:
437ed0d50c3Schristos i = 0;
438ed0d50c3Schristos break;
439ed0d50c3Schristos default:
440ed0d50c3Schristos bad_opcode (op);
441ed0d50c3Schristos }
442ed0d50c3Schristos if (i < NUMREGNAMES)
443ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", reg_base[i].name);
444ed0d50c3Schristos else
445ed0d50c3Schristos (*info->fprintf_func) (info->stream, "unknown");
446ed0d50c3Schristos break;
447ed0d50c3Schristos
448ed0d50c3Schristos case 'D':
449ed0d50c3Schristos switch (op->format)
450ed0d50c3Schristos {
451ed0d50c3Schristos case iw_T1I7_type:
452ed0d50c3Schristos i = GET_IW_T1I7_A3 (opcode);
453ed0d50c3Schristos break;
454ed0d50c3Schristos case iw_T2X1L3_type:
455ed0d50c3Schristos i = GET_IW_T2X1L3_B3 (opcode);
456ed0d50c3Schristos break;
457ed0d50c3Schristos case iw_T2X1I3_type:
458ed0d50c3Schristos i = GET_IW_T2X1I3_B3 (opcode);
459ed0d50c3Schristos break;
460ed0d50c3Schristos case iw_T3X1_type:
461ed0d50c3Schristos i = GET_IW_T3X1_C3 (opcode);
462ed0d50c3Schristos break;
463ed0d50c3Schristos case iw_T2X3_type:
464ed0d50c3Schristos if (op->num_args == 3)
465ed0d50c3Schristos i = GET_IW_T2X3_A3 (opcode);
466ed0d50c3Schristos else
467ed0d50c3Schristos i = GET_IW_T2X3_B3 (opcode);
468ed0d50c3Schristos break;
469ed0d50c3Schristos default:
470ed0d50c3Schristos bad_opcode (op);
471ed0d50c3Schristos }
472ed0d50c3Schristos i = nios2_r2_reg3_mappings[i];
473ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", nios2_regs[i].name);
474ed0d50c3Schristos break;
475ed0d50c3Schristos
476ed0d50c3Schristos case 'M':
477ed0d50c3Schristos /* 6-bit unsigned immediate with no shift. */
478ed0d50c3Schristos switch (op->format)
479ed0d50c3Schristos {
480ed0d50c3Schristos case iw_T1X1I6_type:
481ed0d50c3Schristos i = GET_IW_T1X1I6_IMM6 (opcode);
482ed0d50c3Schristos break;
483ed0d50c3Schristos default:
484ed0d50c3Schristos bad_opcode (op);
485ed0d50c3Schristos }
486ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
487ed0d50c3Schristos break;
488ed0d50c3Schristos
489ed0d50c3Schristos case 'N':
490ed0d50c3Schristos /* 6-bit unsigned immediate with 2-bit shift. */
491ed0d50c3Schristos switch (op->format)
492ed0d50c3Schristos {
493ed0d50c3Schristos case iw_T1X1I6_type:
494ed0d50c3Schristos i = GET_IW_T1X1I6_IMM6 (opcode) << 2;
495ed0d50c3Schristos break;
496ed0d50c3Schristos default:
497ed0d50c3Schristos bad_opcode (op);
498ed0d50c3Schristos }
499ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
500ed0d50c3Schristos break;
501ed0d50c3Schristos
502ed0d50c3Schristos case 'S':
503ed0d50c3Schristos switch (op->format)
504ed0d50c3Schristos {
505ed0d50c3Schristos case iw_T1I7_type:
506ed0d50c3Schristos i = GET_IW_T1I7_A3 (opcode);
507ed0d50c3Schristos break;
508ed0d50c3Schristos case iw_T2I4_type:
509ed0d50c3Schristos i = GET_IW_T2I4_A3 (opcode);
510ed0d50c3Schristos break;
511ed0d50c3Schristos case iw_T2X1L3_type:
512ed0d50c3Schristos i = GET_IW_T2X1L3_A3 (opcode);
513ed0d50c3Schristos break;
514ed0d50c3Schristos case iw_T2X1I3_type:
515ed0d50c3Schristos i = GET_IW_T2X1I3_A3 (opcode);
516ed0d50c3Schristos break;
517ed0d50c3Schristos case iw_T3X1_type:
518ed0d50c3Schristos i = GET_IW_T3X1_A3 (opcode);
519ed0d50c3Schristos break;
520ed0d50c3Schristos case iw_T2X3_type:
521ed0d50c3Schristos i = GET_IW_T2X3_A3 (opcode);
522ed0d50c3Schristos break;
523ed0d50c3Schristos case iw_T1X1I6_type:
524ed0d50c3Schristos i = GET_IW_T1X1I6_A3 (opcode);
525ed0d50c3Schristos break;
526ed0d50c3Schristos default:
527ed0d50c3Schristos bad_opcode (op);
528ed0d50c3Schristos }
529ed0d50c3Schristos i = nios2_r2_reg3_mappings[i];
530ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", nios2_regs[i].name);
531ed0d50c3Schristos break;
532ed0d50c3Schristos
533ed0d50c3Schristos case 'T':
534ed0d50c3Schristos switch (op->format)
535ed0d50c3Schristos {
536ed0d50c3Schristos case iw_T2I4_type:
537ed0d50c3Schristos i = GET_IW_T2I4_B3 (opcode);
538ed0d50c3Schristos break;
539ed0d50c3Schristos case iw_T3X1_type:
540ed0d50c3Schristos i = GET_IW_T3X1_B3 (opcode);
541ed0d50c3Schristos break;
542ed0d50c3Schristos case iw_T2X3_type:
543ed0d50c3Schristos i = GET_IW_T2X3_B3 (opcode);
544ed0d50c3Schristos break;
545ed0d50c3Schristos default:
546ed0d50c3Schristos bad_opcode (op);
547ed0d50c3Schristos }
548ed0d50c3Schristos i = nios2_r2_reg3_mappings[i];
549ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", nios2_regs[i].name);
550ed0d50c3Schristos break;
551ed0d50c3Schristos
552ed0d50c3Schristos case 'i':
553ed0d50c3Schristos /* 16-bit signed immediate. */
554ed0d50c3Schristos switch (op->format)
555ed0d50c3Schristos {
556ed0d50c3Schristos case iw_i_type:
557*b88e3e88Schristos s = ((GET_IW_I_IMM16 (opcode) & 0xffff) ^ 0x8000) - 0x8000;
558ed0d50c3Schristos break;
559ed0d50c3Schristos case iw_F2I16_type:
560*b88e3e88Schristos s = ((GET_IW_F2I16_IMM16 (opcode) & 0xffff) ^ 0x8000) - 0x8000;
561ed0d50c3Schristos break;
562ed0d50c3Schristos default:
563ed0d50c3Schristos bad_opcode (op);
564ed0d50c3Schristos }
565*b88e3e88Schristos (*info->fprintf_func) (info->stream, "%ld", s);
566ed0d50c3Schristos break;
567ed0d50c3Schristos
568ed0d50c3Schristos case 'I':
569ed0d50c3Schristos /* 12-bit signed immediate. */
570ed0d50c3Schristos switch (op->format)
571ed0d50c3Schristos {
572ed0d50c3Schristos case iw_F2X4I12_type:
573*b88e3e88Schristos s = ((GET_IW_F2X4I12_IMM12 (opcode) & 0xfff) ^ 0x800) - 0x800;
574ed0d50c3Schristos break;
575ed0d50c3Schristos case iw_F1X4I12_type:
576*b88e3e88Schristos s = ((GET_IW_F1X4I12_IMM12 (opcode) & 0xfff) ^ 0x800) - 0x800;
577ed0d50c3Schristos break;
578ed0d50c3Schristos default:
579ed0d50c3Schristos bad_opcode (op);
580ed0d50c3Schristos }
581*b88e3e88Schristos (*info->fprintf_func) (info->stream, "%ld", s);
582ed0d50c3Schristos break;
583ed0d50c3Schristos
584ed0d50c3Schristos case 'u':
585ed0d50c3Schristos /* 16-bit unsigned immediate. */
586ed0d50c3Schristos switch (op->format)
587ed0d50c3Schristos {
588ed0d50c3Schristos case iw_i_type:
589ed0d50c3Schristos i = GET_IW_I_IMM16 (opcode);
590ed0d50c3Schristos break;
591ed0d50c3Schristos case iw_F2I16_type:
592ed0d50c3Schristos i = GET_IW_F2I16_IMM16 (opcode);
593ed0d50c3Schristos break;
594ed0d50c3Schristos default:
595ed0d50c3Schristos bad_opcode (op);
596ed0d50c3Schristos }
597ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
598ed0d50c3Schristos break;
599ed0d50c3Schristos
600ed0d50c3Schristos case 'U':
601ed0d50c3Schristos /* 7-bit unsigned immediate with 2-bit shift. */
602ed0d50c3Schristos switch (op->format)
603ed0d50c3Schristos {
604ed0d50c3Schristos case iw_T1I7_type:
605ed0d50c3Schristos i = GET_IW_T1I7_IMM7 (opcode) << 2;
606ed0d50c3Schristos break;
607ed0d50c3Schristos case iw_X1I7_type:
608ed0d50c3Schristos i = GET_IW_X1I7_IMM7 (opcode) << 2;
609ed0d50c3Schristos break;
610ed0d50c3Schristos default:
611ed0d50c3Schristos bad_opcode (op);
612ed0d50c3Schristos }
613ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
614ed0d50c3Schristos break;
615ed0d50c3Schristos
616ed0d50c3Schristos case 'V':
617ed0d50c3Schristos /* 5-bit unsigned immediate with 2-bit shift. */
618ed0d50c3Schristos switch (op->format)
619ed0d50c3Schristos {
620ed0d50c3Schristos case iw_F1I5_type:
621ed0d50c3Schristos i = GET_IW_F1I5_IMM5 (opcode) << 2;
622ed0d50c3Schristos break;
623ed0d50c3Schristos default:
624ed0d50c3Schristos bad_opcode (op);
625ed0d50c3Schristos }
626ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
627ed0d50c3Schristos break;
628ed0d50c3Schristos
629ed0d50c3Schristos case 'W':
630ed0d50c3Schristos /* 4-bit unsigned immediate with 2-bit shift. */
631ed0d50c3Schristos switch (op->format)
632ed0d50c3Schristos {
633ed0d50c3Schristos case iw_T2I4_type:
634ed0d50c3Schristos i = GET_IW_T2I4_IMM4 (opcode) << 2;
635ed0d50c3Schristos break;
636ed0d50c3Schristos case iw_L5I4X1_type:
637ed0d50c3Schristos i = GET_IW_L5I4X1_IMM4 (opcode) << 2;
638ed0d50c3Schristos break;
639ed0d50c3Schristos default:
640ed0d50c3Schristos bad_opcode (op);
641ed0d50c3Schristos }
642ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
643ed0d50c3Schristos break;
644ed0d50c3Schristos
645ed0d50c3Schristos case 'X':
646ed0d50c3Schristos /* 4-bit unsigned immediate with 1-bit shift. */
647ed0d50c3Schristos switch (op->format)
648ed0d50c3Schristos {
649ed0d50c3Schristos case iw_T2I4_type:
650ed0d50c3Schristos i = GET_IW_T2I4_IMM4 (opcode) << 1;
651ed0d50c3Schristos break;
652ed0d50c3Schristos default:
653ed0d50c3Schristos bad_opcode (op);
654ed0d50c3Schristos }
655ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
656ed0d50c3Schristos break;
657ed0d50c3Schristos
658ed0d50c3Schristos case 'Y':
659ed0d50c3Schristos /* 4-bit unsigned immediate without shift. */
660ed0d50c3Schristos switch (op->format)
661ed0d50c3Schristos {
662ed0d50c3Schristos case iw_T2I4_type:
663ed0d50c3Schristos i = GET_IW_T2I4_IMM4 (opcode);
664ed0d50c3Schristos break;
665ed0d50c3Schristos default:
666ed0d50c3Schristos bad_opcode (op);
667ed0d50c3Schristos }
668ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
669ed0d50c3Schristos break;
670ed0d50c3Schristos
671ed0d50c3Schristos case 'o':
672ed0d50c3Schristos /* 16-bit signed immediate address offset. */
673ed0d50c3Schristos switch (op->format)
674ed0d50c3Schristos {
675ed0d50c3Schristos case iw_i_type:
676*b88e3e88Schristos o = ((GET_IW_I_IMM16 (opcode) & 0xffff) ^ 0x8000) - 0x8000;
677ed0d50c3Schristos break;
678ed0d50c3Schristos case iw_F2I16_type:
679*b88e3e88Schristos o = ((GET_IW_F2I16_IMM16 (opcode) & 0xffff) ^ 0x8000) - 0x8000;
680ed0d50c3Schristos break;
681ed0d50c3Schristos default:
682ed0d50c3Schristos bad_opcode (op);
683ed0d50c3Schristos }
684*b88e3e88Schristos address = address + 4 + o;
685ed0d50c3Schristos (*info->print_address_func) (address, info);
686ed0d50c3Schristos break;
687ed0d50c3Schristos
688ed0d50c3Schristos case 'O':
689ed0d50c3Schristos /* 10-bit signed address offset with 1-bit shift. */
690ed0d50c3Schristos switch (op->format)
691ed0d50c3Schristos {
692ed0d50c3Schristos case iw_I10_type:
693*b88e3e88Schristos o = (((GET_IW_I10_IMM10 (opcode) & 0x3ff) ^ 0x400) - 0x400) << 1;
694ed0d50c3Schristos break;
695ed0d50c3Schristos default:
696ed0d50c3Schristos bad_opcode (op);
697ed0d50c3Schristos }
698*b88e3e88Schristos address = address + 2 + o;
699ed0d50c3Schristos (*info->print_address_func) (address, info);
700ed0d50c3Schristos break;
701ed0d50c3Schristos
702ed0d50c3Schristos case 'P':
703ed0d50c3Schristos /* 7-bit signed address offset with 1-bit shift. */
704ed0d50c3Schristos switch (op->format)
705ed0d50c3Schristos {
706ed0d50c3Schristos case iw_T1I7_type:
707*b88e3e88Schristos o = (((GET_IW_T1I7_IMM7 (opcode) & 0x7f) ^ 0x40) - 0x40) << 1;
708ed0d50c3Schristos break;
709ed0d50c3Schristos default:
710ed0d50c3Schristos bad_opcode (op);
711ed0d50c3Schristos }
712*b88e3e88Schristos address = address + 2 + o;
713ed0d50c3Schristos (*info->print_address_func) (address, info);
714ed0d50c3Schristos break;
715ed0d50c3Schristos
716ed0d50c3Schristos case 'j':
717ed0d50c3Schristos /* 5-bit unsigned immediate. */
718ed0d50c3Schristos switch (op->format)
719ed0d50c3Schristos {
720ed0d50c3Schristos case iw_r_type:
721ed0d50c3Schristos i = GET_IW_R_IMM5 (opcode);
722ed0d50c3Schristos break;
723ed0d50c3Schristos case iw_F3X6L5_type:
724ed0d50c3Schristos i = GET_IW_F3X6L5_IMM5 (opcode);
725ed0d50c3Schristos break;
726ed0d50c3Schristos case iw_F2X6L10_type:
727ed0d50c3Schristos i = GET_IW_F2X6L10_MSB (opcode);
728ed0d50c3Schristos break;
729ed0d50c3Schristos case iw_X2L5_type:
730ed0d50c3Schristos i = GET_IW_X2L5_IMM5 (opcode);
731ed0d50c3Schristos break;
732ed0d50c3Schristos default:
733ed0d50c3Schristos bad_opcode (op);
734ed0d50c3Schristos }
735ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
736ed0d50c3Schristos break;
737ed0d50c3Schristos
738ed0d50c3Schristos case 'k':
739ed0d50c3Schristos /* Second 5-bit unsigned immediate field. */
740ed0d50c3Schristos switch (op->format)
741ed0d50c3Schristos {
742ed0d50c3Schristos case iw_F2X6L10_type:
743ed0d50c3Schristos i = GET_IW_F2X6L10_LSB (opcode);
744ed0d50c3Schristos break;
745ed0d50c3Schristos default:
746ed0d50c3Schristos bad_opcode (op);
747ed0d50c3Schristos }
748ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
749ed0d50c3Schristos break;
750ed0d50c3Schristos
751ed0d50c3Schristos case 'l':
752ed0d50c3Schristos /* 8-bit unsigned immediate. */
753ed0d50c3Schristos switch (op->format)
754ed0d50c3Schristos {
755ed0d50c3Schristos case iw_custom_type:
756ed0d50c3Schristos i = GET_IW_CUSTOM_N (opcode);
757ed0d50c3Schristos break;
758ed0d50c3Schristos case iw_F3X8_type:
759ed0d50c3Schristos i = GET_IW_F3X8_N (opcode);
760ed0d50c3Schristos break;
761ed0d50c3Schristos default:
762ed0d50c3Schristos bad_opcode (op);
763ed0d50c3Schristos }
764ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%lu", i);
765ed0d50c3Schristos break;
766ed0d50c3Schristos
767ed0d50c3Schristos case 'm':
768ed0d50c3Schristos /* 26-bit unsigned immediate. */
769ed0d50c3Schristos switch (op->format)
770ed0d50c3Schristos {
771ed0d50c3Schristos case iw_j_type:
772ed0d50c3Schristos i = GET_IW_J_IMM26 (opcode);
773ed0d50c3Schristos break;
774ed0d50c3Schristos case iw_L26_type:
775ed0d50c3Schristos i = GET_IW_L26_IMM26 (opcode);
776ed0d50c3Schristos break;
777ed0d50c3Schristos default:
778ed0d50c3Schristos bad_opcode (op);
779ed0d50c3Schristos }
780ed0d50c3Schristos /* This translates to an address because it's only used in call
781ed0d50c3Schristos instructions. */
782ed0d50c3Schristos address = (address & 0xf0000000) | (i << 2);
783ed0d50c3Schristos (*info->print_address_func) (address, info);
784ed0d50c3Schristos break;
785ed0d50c3Schristos
786ed0d50c3Schristos case 'e':
787ed0d50c3Schristos /* Encoded enumeration for addi.n/subi.n. */
788ed0d50c3Schristos switch (op->format)
789ed0d50c3Schristos {
790ed0d50c3Schristos case iw_T2X1I3_type:
791ed0d50c3Schristos i = nios2_r2_asi_n_mappings[GET_IW_T2X1I3_IMM3 (opcode)];
792ed0d50c3Schristos break;
793ed0d50c3Schristos default:
794ed0d50c3Schristos bad_opcode (op);
795ed0d50c3Schristos }
796ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%lu", i);
797ed0d50c3Schristos break;
798ed0d50c3Schristos
799ed0d50c3Schristos case 'f':
800ed0d50c3Schristos /* Encoded enumeration for slli.n/srli.n. */
801ed0d50c3Schristos switch (op->format)
802ed0d50c3Schristos {
803ed0d50c3Schristos case iw_T2X1L3_type:
804ed0d50c3Schristos i = nios2_r2_shi_n_mappings[GET_IW_T2X1I3_IMM3 (opcode)];
805ed0d50c3Schristos break;
806ed0d50c3Schristos default:
807ed0d50c3Schristos bad_opcode (op);
808ed0d50c3Schristos }
809ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%lu", i);
810ed0d50c3Schristos break;
811ed0d50c3Schristos
812ed0d50c3Schristos case 'g':
813ed0d50c3Schristos /* Encoded enumeration for andi.n. */
814ed0d50c3Schristos switch (op->format)
815ed0d50c3Schristos {
816ed0d50c3Schristos case iw_T2I4_type:
817ed0d50c3Schristos i = nios2_r2_andi_n_mappings[GET_IW_T2I4_IMM4 (opcode)];
818ed0d50c3Schristos break;
819ed0d50c3Schristos default:
820ed0d50c3Schristos bad_opcode (op);
821ed0d50c3Schristos }
822ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%lu", i);
823ed0d50c3Schristos break;
824ed0d50c3Schristos
825ed0d50c3Schristos case 'h':
826ed0d50c3Schristos /* Encoded enumeration for movi.n. */
827ed0d50c3Schristos switch (op->format)
828ed0d50c3Schristos {
829ed0d50c3Schristos case iw_T1I7_type:
830ed0d50c3Schristos i = GET_IW_T1I7_IMM7 (opcode);
831ed0d50c3Schristos if (i == 125)
832ed0d50c3Schristos i = 0xff;
833ed0d50c3Schristos else if (i == 126)
834ed0d50c3Schristos i = -2;
835ed0d50c3Schristos else if (i == 127)
836ed0d50c3Schristos i = -1;
837ed0d50c3Schristos break;
838ed0d50c3Schristos default:
839ed0d50c3Schristos bad_opcode (op);
840ed0d50c3Schristos }
841ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%ld", i);
842ed0d50c3Schristos break;
843ed0d50c3Schristos
844ed0d50c3Schristos case 'R':
845ed0d50c3Schristos {
846ed0d50c3Schristos unsigned long reglist = 0;
847ed0d50c3Schristos int dir = 1;
848ed0d50c3Schristos int k, t;
849ed0d50c3Schristos
850ed0d50c3Schristos switch (op->format)
851ed0d50c3Schristos {
852ed0d50c3Schristos case iw_F1X4L17_type:
853ed0d50c3Schristos /* Encoding for ldwm/stwm. */
854ed0d50c3Schristos i = GET_IW_F1X4L17_REGMASK (opcode);
855ed0d50c3Schristos if (GET_IW_F1X4L17_RS (opcode))
856ed0d50c3Schristos {
857ed0d50c3Schristos reglist = ((i << 14) & 0x00ffc000);
858ed0d50c3Schristos if (i & (1 << 10))
859ed0d50c3Schristos reglist |= (1 << 28);
860ed0d50c3Schristos if (i & (1 << 11))
861*b88e3e88Schristos reglist |= (1u << 31);
862ed0d50c3Schristos }
863ed0d50c3Schristos else
864ed0d50c3Schristos reglist = i << 2;
865ed0d50c3Schristos dir = GET_IW_F1X4L17_REGMASK (opcode) ? 1 : -1;
866ed0d50c3Schristos break;
867ed0d50c3Schristos
868ed0d50c3Schristos case iw_L5I4X1_type:
869ed0d50c3Schristos /* Encoding for push.n/pop.n. */
870*b88e3e88Schristos reglist |= (1u << 31);
871ed0d50c3Schristos if (GET_IW_L5I4X1_FP (opcode))
872ed0d50c3Schristos reglist |= (1 << 28);
873ed0d50c3Schristos if (GET_IW_L5I4X1_CS (opcode))
874ed0d50c3Schristos {
875ed0d50c3Schristos int val = GET_IW_L5I4X1_REGRANGE (opcode);
876ed0d50c3Schristos reglist |= nios2_r2_reg_range_mappings[val];
877ed0d50c3Schristos }
878ed0d50c3Schristos dir = (op->match == MATCH_R2_POP_N ? 1 : -1);
879ed0d50c3Schristos break;
880ed0d50c3Schristos
881ed0d50c3Schristos default:
882ed0d50c3Schristos bad_opcode (op);
883ed0d50c3Schristos }
884ed0d50c3Schristos
885ed0d50c3Schristos t = 0;
886ed0d50c3Schristos (*info->fprintf_func) (info->stream, "{");
887ed0d50c3Schristos for (k = (dir == 1 ? 0 : 31);
888ed0d50c3Schristos (dir == 1 && k < 32) || (dir == -1 && k >= 0);
889ed0d50c3Schristos k += dir)
890*b88e3e88Schristos if (reglist & (1u << k))
891ed0d50c3Schristos {
892ed0d50c3Schristos if (t)
893ed0d50c3Schristos (*info->fprintf_func) (info->stream, ",");
894ed0d50c3Schristos else
895ed0d50c3Schristos t++;
896ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", nios2_regs[k].name);
897ed0d50c3Schristos }
898ed0d50c3Schristos (*info->fprintf_func) (info->stream, "}");
899ed0d50c3Schristos break;
900ed0d50c3Schristos }
901ed0d50c3Schristos
902ed0d50c3Schristos case 'B':
903ed0d50c3Schristos /* Base register and options for ldwm/stwm. */
904ed0d50c3Schristos switch (op->format)
905ed0d50c3Schristos {
906ed0d50c3Schristos case iw_F1X4L17_type:
907ed0d50c3Schristos if (GET_IW_F1X4L17_ID (opcode) == 0)
908ed0d50c3Schristos (*info->fprintf_func) (info->stream, "--");
909ed0d50c3Schristos
910ed0d50c3Schristos i = GET_IW_F1X4I12_A (opcode);
911ed0d50c3Schristos (*info->fprintf_func) (info->stream, "(%s)",
912ed0d50c3Schristos nios2_builtin_regs[i].name);
913ed0d50c3Schristos
914ed0d50c3Schristos if (GET_IW_F1X4L17_ID (opcode))
915ed0d50c3Schristos (*info->fprintf_func) (info->stream, "++");
916ed0d50c3Schristos if (GET_IW_F1X4L17_WB (opcode))
917ed0d50c3Schristos (*info->fprintf_func) (info->stream, ",writeback");
918ed0d50c3Schristos if (GET_IW_F1X4L17_PC (opcode))
919ed0d50c3Schristos (*info->fprintf_func) (info->stream, ",ret");
920ed0d50c3Schristos break;
921ed0d50c3Schristos default:
922ed0d50c3Schristos bad_opcode (op);
923ed0d50c3Schristos }
924ed0d50c3Schristos break;
925ed0d50c3Schristos
926ed0d50c3Schristos default:
927ed0d50c3Schristos (*info->fprintf_func) (info->stream, "unknown");
928ed0d50c3Schristos break;
929ed0d50c3Schristos }
930ed0d50c3Schristos return 0;
931ed0d50c3Schristos }
932ed0d50c3Schristos
933ed0d50c3Schristos /* nios2_disassemble does all the work of disassembling a Nios II
934ed0d50c3Schristos instruction opcode. */
935ed0d50c3Schristos static int
nios2_disassemble(bfd_vma address,unsigned long opcode,disassemble_info * info)936ed0d50c3Schristos nios2_disassemble (bfd_vma address, unsigned long opcode,
937ed0d50c3Schristos disassemble_info *info)
938ed0d50c3Schristos {
939ed0d50c3Schristos const struct nios2_opcode *op;
940ed0d50c3Schristos
941ed0d50c3Schristos info->bytes_per_line = INSNLEN;
942ed0d50c3Schristos info->bytes_per_chunk = INSNLEN;
943ed0d50c3Schristos info->display_endian = info->endian;
944ed0d50c3Schristos info->insn_info_valid = 1;
945ed0d50c3Schristos info->branch_delay_insns = 0;
946ed0d50c3Schristos info->data_size = 0;
947ed0d50c3Schristos info->insn_type = dis_nonbranch;
948ed0d50c3Schristos info->target = 0;
949ed0d50c3Schristos info->target2 = 0;
950ed0d50c3Schristos
951ed0d50c3Schristos /* Find the major opcode and use this to disassemble
952ed0d50c3Schristos the instruction and its arguments. */
953ed0d50c3Schristos op = nios2_find_opcode_hash (opcode, info->mach);
954ed0d50c3Schristos
955ed0d50c3Schristos if (op != NULL)
956ed0d50c3Schristos {
957ed0d50c3Schristos const char *argstr = op->args;
958ed0d50c3Schristos (*info->fprintf_func) (info->stream, "%s", op->name);
959ed0d50c3Schristos if (argstr != NULL && *argstr != '\0')
960ed0d50c3Schristos {
961ed0d50c3Schristos (*info->fprintf_func) (info->stream, "\t");
962ed0d50c3Schristos while (*argstr != '\0')
963ed0d50c3Schristos {
964ed0d50c3Schristos nios2_print_insn_arg (argstr, opcode, address, info, op);
965ed0d50c3Schristos ++argstr;
966ed0d50c3Schristos }
967ed0d50c3Schristos }
968ed0d50c3Schristos /* Tell the caller how far to advance the program counter. */
969ed0d50c3Schristos info->bytes_per_chunk = op->size;
970ed0d50c3Schristos return op->size;
971ed0d50c3Schristos }
972ed0d50c3Schristos else
973ed0d50c3Schristos {
974ed0d50c3Schristos /* Handle undefined instructions. */
975ed0d50c3Schristos info->insn_type = dis_noninsn;
976ed0d50c3Schristos (*info->fprintf_func) (info->stream, "0x%lx", opcode);
977ed0d50c3Schristos return INSNLEN;
978ed0d50c3Schristos }
979ed0d50c3Schristos }
980ed0d50c3Schristos
981ed0d50c3Schristos
982ed0d50c3Schristos /* print_insn_nios2 is the main disassemble function for Nios II.
983ed0d50c3Schristos The function diassembler(abfd) (source in disassemble.c) returns a
984ed0d50c3Schristos pointer to this either print_insn_big_nios2 or
985ed0d50c3Schristos print_insn_little_nios2, which in turn call this function when the
986ed0d50c3Schristos bfd machine type is Nios II. print_insn_nios2 reads the
987ed0d50c3Schristos instruction word at the address given, and prints the disassembled
988ed0d50c3Schristos instruction on the stream info->stream using info->fprintf_func. */
989ed0d50c3Schristos
990ed0d50c3Schristos static int
print_insn_nios2(bfd_vma address,disassemble_info * info,enum bfd_endian endianness)991ed0d50c3Schristos print_insn_nios2 (bfd_vma address, disassemble_info *info,
992ed0d50c3Schristos enum bfd_endian endianness)
993ed0d50c3Schristos {
994ed0d50c3Schristos bfd_byte buffer[INSNLEN];
995ed0d50c3Schristos int status;
996ed0d50c3Schristos
997ed0d50c3Schristos status = (*info->read_memory_func) (address, buffer, INSNLEN, info);
998ed0d50c3Schristos if (status == 0)
999ed0d50c3Schristos {
1000ed0d50c3Schristos unsigned long insn;
1001ed0d50c3Schristos if (endianness == BFD_ENDIAN_BIG)
1002ed0d50c3Schristos insn = (unsigned long) bfd_getb32 (buffer);
1003ed0d50c3Schristos else
1004ed0d50c3Schristos insn = (unsigned long) bfd_getl32 (buffer);
1005ed0d50c3Schristos return nios2_disassemble (address, insn, info);
1006ed0d50c3Schristos }
1007ed0d50c3Schristos
1008ed0d50c3Schristos /* We might have a 16-bit R2 instruction at the end of memory. Try that. */
1009ed0d50c3Schristos if (info->mach == bfd_mach_nios2r2)
1010ed0d50c3Schristos {
1011ed0d50c3Schristos status = (*info->read_memory_func) (address, buffer, 2, info);
1012ed0d50c3Schristos if (status == 0)
1013ed0d50c3Schristos {
1014ed0d50c3Schristos unsigned long insn;
1015ed0d50c3Schristos if (endianness == BFD_ENDIAN_BIG)
1016ed0d50c3Schristos insn = (unsigned long) bfd_getb16 (buffer);
1017ed0d50c3Schristos else
1018ed0d50c3Schristos insn = (unsigned long) bfd_getl16 (buffer);
1019ed0d50c3Schristos return nios2_disassemble (address, insn, info);
1020ed0d50c3Schristos }
1021ed0d50c3Schristos }
1022ed0d50c3Schristos
1023ed0d50c3Schristos /* If we got here, we couldn't read anything. */
1024ed0d50c3Schristos (*info->memory_error_func) (status, address, info);
1025ed0d50c3Schristos return -1;
1026ed0d50c3Schristos }
1027ed0d50c3Schristos
1028ed0d50c3Schristos /* These two functions are the main entry points, accessed from
1029ed0d50c3Schristos disassemble.c. */
1030ed0d50c3Schristos int
print_insn_big_nios2(bfd_vma address,disassemble_info * info)1031ed0d50c3Schristos print_insn_big_nios2 (bfd_vma address, disassemble_info *info)
1032ed0d50c3Schristos {
1033ed0d50c3Schristos return print_insn_nios2 (address, info, BFD_ENDIAN_BIG);
1034ed0d50c3Schristos }
1035ed0d50c3Schristos
1036ed0d50c3Schristos int
print_insn_little_nios2(bfd_vma address,disassemble_info * info)1037ed0d50c3Schristos print_insn_little_nios2 (bfd_vma address, disassemble_info *info)
1038ed0d50c3Schristos {
1039ed0d50c3Schristos return print_insn_nios2 (address, info, BFD_ENDIAN_LITTLE);
1040ed0d50c3Schristos }
1041