1 /* Disassemble h8500 instructions.
2 Copyright (C) 1993, 94, 95, 1998 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20 #define DISASSEMBLER_TABLE
24 #include "h8500-opc.h"
28 /* Maximum length of an instruction. */
35 /* Points to first byte not fetched. */
36 bfd_byte *max_fetched;
37 bfd_byte the_buffer[MAXLEN];
42 /* Make sure that bytes from INFO->PRIVATE_DATA->BUFFER (inclusive)
43 to ADDR (exclusive) are valid. Returns 1 for success, longjmps
45 #define FETCH_DATA(info, addr) \
46 ((addr) <= ((struct private *)(info->private_data))->max_fetched \
47 ? 1 : fetch_data ((info), (addr)))
50 fetch_data (info, addr)
51 struct disassemble_info *info;
55 struct private *priv = (struct private *) info->private_data;
56 bfd_vma start = priv->insn_start + (priv->max_fetched - priv->the_buffer);
58 status = (*info->read_memory_func) (start,
60 addr - priv->max_fetched,
64 (*info->memory_error_func) (status, start, info);
65 longjmp (priv->bailout, 1);
68 priv->max_fetched = addr;
72 static char *crname[] =
73 {"sr", "ccr", "*", "br", "ep", "dp", "*", "tp"};
76 print_insn_h8500 (addr, info)
78 disassemble_info *info;
80 h8500_opcode_info *opcode;
81 void *stream = info->stream;
82 fprintf_ftype func = info->fprintf_func;
85 bfd_byte *buffer = priv.the_buffer;
87 info->private_data = (PTR) & priv;
88 priv.max_fetched = priv.the_buffer;
89 priv.insn_start = addr;
90 if (setjmp (priv.bailout) != 0)
99 for (opcode = h8500_table; opcode->name; opcode++)
101 if ((opcode->bytes[0].contents & 0x8) == 0)
102 printf("%s\n", opcode->name);
108 /* Run down the table to find the one which matches */
109 for (opcode = h8500_table; opcode->name; opcode++)
122 for (byte = 0; byte < opcode->length; byte++)
124 FETCH_DATA (info, buffer + byte + 1);
125 if ((buffer[byte] & opcode->bytes[byte].mask)
126 != (opcode->bytes[byte].contents))
132 /* extract any info parts */
133 switch (opcode->bytes[byte].insert)
139 /* xgettext:c-format */
140 func (stream, _("can't cope with insert %d\n"),
141 opcode->bytes[byte].insert);
144 rn = buffer[byte] & 0x7;
147 rs = buffer[byte] & 0x7;
150 cr = buffer[byte] & 0x7;
155 cr = buffer[byte] & 0x7;
160 FETCH_DATA (info, buffer + byte + 2);
161 disp = (buffer[byte] << 8) | (buffer[byte + 1]);
165 disp = ((char) (buffer[byte]));
169 rd = buffer[byte] & 0x7;
172 FETCH_DATA (info, buffer + byte + 3);
175 | (buffer[byte + 1] << 8)
176 | (buffer[byte + 2]);
179 FETCH_DATA (info, buffer + byte + 2);
180 abs = (buffer[byte] << 8) | (buffer[byte + 1]);
183 abs = (buffer[byte]);
186 FETCH_DATA (info, buffer + byte + 2);
187 imm = (buffer[byte] << 8) | (buffer[byte + 1]);
190 imm = (buffer[byte]) & 0xf;
194 imm = (buffer[byte]);
197 FETCH_DATA (info, buffer + byte + 2);
198 pcrel = (buffer[byte] << 8) | (buffer[byte + 1]);
201 pcrel = (buffer[byte]);
204 switch (buffer[byte] & 0x7)
224 /* We get here when all the masks have passed so we can output the
226 FETCH_DATA (info, buffer + opcode->length);
227 for (i = 0; i < opcode->length; i++)
229 (func) (stream, "%02x ", buffer[i]);
233 (func) (stream, " ");
235 (func) (stream, "%s\t", opcode->name);
236 for (i = 0; i < opcode->nargs; i++)
239 (func) (stream, ",");
240 switch (opcode->arg_type[i])
246 func (stream, "@(0x%x:16,r%d)", disp, rn);
249 func (stream, "@(0x%x:8 (%d),r%d)", disp & 0xff, disp, rn);
252 func (stream, "@(0x%x:16,r%d)", disp, rd);
255 func (stream, "@(0x%x:8 (%d), r%d)", disp & 0xff, disp, rd);
258 func (stream, "@(0x%x:8 (%d), fp)", disp & 0xff, disp, rn);
262 func (stream, "%s", crname[cr]);
265 func (stream, "r%d", rn);
268 func (stream, "r%d", rd);
271 func (stream, "r%d", rs);
274 func (stream, "@-r%d", rn);
277 func (stream, "@r%d+", rn);
280 func (stream, "@r%d", rn);
283 func (stream, "@r%d", rd);
286 func (stream, "@sp+");
289 func (stream, "@-sp");
292 func (stream, "@0x%0x:24", abs);
295 func (stream, "@0x%0x:16", abs & 0xffff);
298 func (stream, "@0x%0x:8", abs & 0xff);
301 func (stream, "#0x%0x:16", imm & 0xffff);
308 for (i = 0; i < 8; i++)
312 func (stream, "r%d", i);
322 func (stream, "#0x%0x:8", imm & 0xff);
325 func (stream, "0x%0x:16", (pcrel + addr + opcode->length) & 0xffff);
328 func (stream, "#0x%0x:8",
329 ((char) pcrel + addr + opcode->length) & 0xffff);
332 func (stream, "#%d:q", qim);
335 func (stream, "#%d:4", imm);
339 return opcode->length;
343 /* Couldn't understand anything */
344 /* xgettext:c-format */
345 func (stream, _("%02x\t\t*unknown*"), buffer[0]);