Commit | Line | Data |
---|---|---|
252b5132 | 1 | /* Disassemble h8500 instructions. |
060d22b0 | 2 | Copyright 1993, 1998, 2000 Free Software Foundation, Inc. |
252b5132 RH |
3 | |
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. | |
8 | ||
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. | |
13 | ||
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. */ | |
17 | ||
18 | #include <stdio.h> | |
19 | ||
20 | #define DISASSEMBLER_TABLE | |
21 | #define DEFINE_TABLE | |
22 | ||
0d8dfecf | 23 | #include "sysdep.h" |
252b5132 RH |
24 | #include "h8500-opc.h" |
25 | #include "dis-asm.h" | |
26 | #include "opintl.h" | |
27 | ||
28 | /* Maximum length of an instruction. */ | |
29 | #define MAXLEN 8 | |
30 | ||
31 | #include <setjmp.h> | |
32 | ||
33 | struct private | |
34 | { | |
35 | /* Points to first byte not fetched. */ | |
36 | bfd_byte *max_fetched; | |
37 | bfd_byte the_buffer[MAXLEN]; | |
38 | bfd_vma insn_start; | |
39 | jmp_buf bailout; | |
40 | }; | |
41 | ||
42 | /* Make sure that bytes from INFO->PRIVATE_DATA->BUFFER (inclusive) | |
43 | to ADDR (exclusive) are valid. Returns 1 for success, longjmps | |
44 | on error. */ | |
45 | #define FETCH_DATA(info, addr) \ | |
46 | ((addr) <= ((struct private *)(info->private_data))->max_fetched \ | |
47 | ? 1 : fetch_data ((info), (addr))) | |
48 | ||
49 | static int | |
50 | fetch_data (info, addr) | |
51 | struct disassemble_info *info; | |
52 | bfd_byte *addr; | |
53 | { | |
54 | int status; | |
55 | struct private *priv = (struct private *) info->private_data; | |
56 | bfd_vma start = priv->insn_start + (priv->max_fetched - priv->the_buffer); | |
57 | ||
58 | status = (*info->read_memory_func) (start, | |
59 | priv->max_fetched, | |
60 | addr - priv->max_fetched, | |
61 | info); | |
62 | if (status != 0) | |
63 | { | |
64 | (*info->memory_error_func) (status, start, info); | |
65 | longjmp (priv->bailout, 1); | |
66 | } | |
67 | else | |
68 | priv->max_fetched = addr; | |
69 | return 1; | |
70 | } | |
71 | ||
c07ab2ec | 72 | static char *crname[] = { "sr", "ccr", "*", "br", "ep", "dp", "*", "tp" }; |
252b5132 RH |
73 | |
74 | int | |
75 | print_insn_h8500 (addr, info) | |
76 | bfd_vma addr; | |
77 | disassemble_info *info; | |
78 | { | |
79 | h8500_opcode_info *opcode; | |
80 | void *stream = info->stream; | |
81 | fprintf_ftype func = info->fprintf_func; | |
82 | ||
83 | struct private priv; | |
84 | bfd_byte *buffer = priv.the_buffer; | |
85 | ||
86 | info->private_data = (PTR) & priv; | |
87 | priv.max_fetched = priv.the_buffer; | |
88 | priv.insn_start = addr; | |
89 | if (setjmp (priv.bailout) != 0) | |
90 | /* Error return. */ | |
91 | return -1; | |
92 | ||
c07ab2ec NC |
93 | if (0) |
94 | { | |
95 | static int one; | |
252b5132 | 96 | |
c07ab2ec NC |
97 | if (!one) |
98 | { | |
99 | one = 1; | |
100 | for (opcode = h8500_table; opcode->name; opcode++) | |
101 | { | |
102 | if ((opcode->bytes[0].contents & 0x8) == 0) | |
103 | printf ("%s\n", opcode->name); | |
104 | } | |
105 | } | |
106 | } | |
252b5132 | 107 | |
c07ab2ec | 108 | /* Run down the table to find the one which matches. */ |
252b5132 RH |
109 | for (opcode = h8500_table; opcode->name; opcode++) |
110 | { | |
111 | int byte; | |
112 | int rn = 0; | |
113 | int rd = 0; | |
114 | int rs = 0; | |
115 | int disp = 0; | |
116 | int abs = 0; | |
117 | int imm = 0; | |
118 | int pcrel = 0; | |
119 | int qim = 0; | |
120 | int i; | |
121 | int cr = 0; | |
c07ab2ec | 122 | |
252b5132 RH |
123 | for (byte = 0; byte < opcode->length; byte++) |
124 | { | |
125 | FETCH_DATA (info, buffer + byte + 1); | |
126 | if ((buffer[byte] & opcode->bytes[byte].mask) | |
127 | != (opcode->bytes[byte].contents)) | |
128 | { | |
129 | goto next; | |
130 | } | |
131 | else | |
132 | { | |
c07ab2ec | 133 | /* Extract any info parts. */ |
252b5132 RH |
134 | switch (opcode->bytes[byte].insert) |
135 | { | |
136 | case 0: | |
137 | case FP: | |
138 | break; | |
139 | default: | |
140 | /* xgettext:c-format */ | |
141 | func (stream, _("can't cope with insert %d\n"), | |
142 | opcode->bytes[byte].insert); | |
143 | break; | |
144 | case RN: | |
145 | rn = buffer[byte] & 0x7; | |
146 | break; | |
147 | case RS: | |
148 | rs = buffer[byte] & 0x7; | |
149 | break; | |
150 | case CRB: | |
151 | cr = buffer[byte] & 0x7; | |
152 | if (cr == 0) | |
153 | goto next; | |
154 | break; | |
155 | case CRW: | |
156 | cr = buffer[byte] & 0x7; | |
157 | if (cr != 0) | |
158 | goto next; | |
159 | break; | |
160 | case DISP16: | |
161 | FETCH_DATA (info, buffer + byte + 2); | |
162 | disp = (buffer[byte] << 8) | (buffer[byte + 1]); | |
163 | break; | |
164 | case FPIND_D8: | |
165 | case DISP8: | |
166 | disp = ((char) (buffer[byte])); | |
167 | break; | |
168 | case RD: | |
169 | case RDIND: | |
170 | rd = buffer[byte] & 0x7; | |
171 | break; | |
172 | case ABS24: | |
173 | FETCH_DATA (info, buffer + byte + 3); | |
174 | abs = | |
175 | (buffer[byte] << 16) | |
176 | | (buffer[byte + 1] << 8) | |
177 | | (buffer[byte + 2]); | |
178 | break; | |
179 | case ABS16: | |
180 | FETCH_DATA (info, buffer + byte + 2); | |
181 | abs = (buffer[byte] << 8) | (buffer[byte + 1]); | |
182 | break; | |
183 | case ABS8: | |
184 | abs = (buffer[byte]); | |
185 | break; | |
186 | case IMM16: | |
187 | FETCH_DATA (info, buffer + byte + 2); | |
188 | imm = (buffer[byte] << 8) | (buffer[byte + 1]); | |
189 | break; | |
190 | case IMM4: | |
191 | imm = (buffer[byte]) & 0xf; | |
192 | break; | |
193 | case IMM8: | |
194 | case RLIST: | |
195 | imm = (buffer[byte]); | |
196 | break; | |
197 | case PCREL16: | |
198 | FETCH_DATA (info, buffer + byte + 2); | |
199 | pcrel = (buffer[byte] << 8) | (buffer[byte + 1]); | |
200 | break; | |
201 | case PCREL8: | |
202 | pcrel = (buffer[byte]); | |
203 | break; | |
204 | case QIM: | |
205 | switch (buffer[byte] & 0x7) | |
206 | { | |
207 | case 0: | |
208 | qim = 1; | |
209 | break; | |
210 | case 1: | |
211 | qim = 2; | |
212 | break; | |
213 | case 4: | |
214 | qim = -1; | |
215 | break; | |
216 | case 5: | |
217 | qim = -2; | |
218 | break; | |
219 | } | |
220 | break; | |
221 | ||
222 | } | |
223 | } | |
224 | } | |
c07ab2ec NC |
225 | /* We get here when all the masks have passed so we can output |
226 | the operands. */ | |
252b5132 RH |
227 | FETCH_DATA (info, buffer + opcode->length); |
228 | for (i = 0; i < opcode->length; i++) | |
229 | { | |
230 | (func) (stream, "%02x ", buffer[i]); | |
231 | } | |
232 | for (; i < 6; i++) | |
233 | { | |
234 | (func) (stream, " "); | |
235 | } | |
236 | (func) (stream, "%s\t", opcode->name); | |
237 | for (i = 0; i < opcode->nargs; i++) | |
238 | { | |
239 | if (i) | |
240 | (func) (stream, ","); | |
241 | switch (opcode->arg_type[i]) | |
242 | { | |
243 | case FP: | |
244 | func (stream, "fp"); | |
245 | break; | |
246 | case RNIND_D16: | |
247 | func (stream, "@(0x%x:16,r%d)", disp, rn); | |
248 | break; | |
249 | case RNIND_D8: | |
250 | func (stream, "@(0x%x:8 (%d),r%d)", disp & 0xff, disp, rn); | |
251 | break; | |
252 | case RDIND_D16: | |
253 | func (stream, "@(0x%x:16,r%d)", disp, rd); | |
254 | break; | |
255 | case RDIND_D8: | |
256 | func (stream, "@(0x%x:8 (%d), r%d)", disp & 0xff, disp, rd); | |
257 | break; | |
258 | case FPIND_D8: | |
259 | func (stream, "@(0x%x:8 (%d), fp)", disp & 0xff, disp, rn); | |
260 | break; | |
261 | case CRB: | |
262 | case CRW: | |
263 | func (stream, "%s", crname[cr]); | |
264 | break; | |
265 | case RN: | |
266 | func (stream, "r%d", rn); | |
267 | break; | |
268 | case RD: | |
269 | func (stream, "r%d", rd); | |
270 | break; | |
271 | case RS: | |
272 | func (stream, "r%d", rs); | |
273 | break; | |
274 | case RNDEC: | |
275 | func (stream, "@-r%d", rn); | |
276 | break; | |
277 | case RNINC: | |
278 | func (stream, "@r%d+", rn); | |
279 | break; | |
280 | case RNIND: | |
281 | func (stream, "@r%d", rn); | |
282 | break; | |
283 | case RDIND: | |
284 | func (stream, "@r%d", rd); | |
285 | break; | |
286 | case SPINC: | |
287 | func (stream, "@sp+"); | |
288 | break; | |
289 | case SPDEC: | |
290 | func (stream, "@-sp"); | |
291 | break; | |
292 | case ABS24: | |
293 | func (stream, "@0x%0x:24", abs); | |
294 | break; | |
295 | case ABS16: | |
296 | func (stream, "@0x%0x:16", abs & 0xffff); | |
297 | break; | |
298 | case ABS8: | |
299 | func (stream, "@0x%0x:8", abs & 0xff); | |
300 | break; | |
301 | case IMM16: | |
302 | func (stream, "#0x%0x:16", imm & 0xffff); | |
303 | break; | |
304 | case RLIST: | |
305 | { | |
306 | int i; | |
307 | int nc = 0; | |
308 | func (stream, "("); | |
309 | for (i = 0; i < 8; i++) | |
310 | { | |
311 | if (imm & (1 << i)) | |
312 | { | |
313 | func (stream, "r%d", i); | |
314 | if (nc) | |
315 | func (stream, ","); | |
316 | nc = 1; | |
317 | } | |
318 | } | |
319 | func (stream, ")"); | |
320 | } | |
321 | break; | |
322 | case IMM8: | |
323 | func (stream, "#0x%0x:8", imm & 0xff); | |
324 | break; | |
325 | case PCREL16: | |
c07ab2ec NC |
326 | func (stream, "0x%0x:16", |
327 | (pcrel + addr + opcode->length) & 0xffff); | |
252b5132 RH |
328 | break; |
329 | case PCREL8: | |
330 | func (stream, "#0x%0x:8", | |
331 | ((char) pcrel + addr + opcode->length) & 0xffff); | |
332 | break; | |
333 | case QIM: | |
334 | func (stream, "#%d:q", qim); | |
335 | break; | |
336 | case IMM4: | |
337 | func (stream, "#%d:4", imm); | |
338 | break; | |
339 | } | |
340 | } | |
341 | return opcode->length; | |
c07ab2ec NC |
342 | next: |
343 | ; | |
252b5132 RH |
344 | } |
345 | ||
c07ab2ec | 346 | /* Couldn't understand anything. */ |
252b5132 RH |
347 | /* xgettext:c-format */ |
348 | func (stream, _("%02x\t\t*unknown*"), buffer[0]); | |
349 | return 1; | |
252b5132 | 350 | } |