projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
ubsan: m32r: left shift of negative value
[deliverable/binutils-gdb.git] / opcodes / m10300-dis.c
CommitLineData
252b5132 1/* Disassemble MN10300 instructions.
b3adc24a 2 Copyright (C) 1996-2020 Free Software Foundation, Inc.
252b5132 3
9b201bb5
NC		 4 This file is part of the GNU opcodes library.
5
6 This library is free software; you can redistribute it and/or modify
47b0e7ad 7 it under the terms of the GNU General Public License as published by
9b201bb5
NC		 8 the Free Software Foundation; either version 3, or (at your option)
9 any later version.
252b5132 10
9b201bb5
NC		 11 It is distributed in the hope that it will be useful, but WITHOUT
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
14 License for more details.
252b5132 15
47b0e7ad
NC		 16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
252b5132 20
0d8dfecf 21#include "sysdep.h"
df7b86aa 22#include <stdio.h>
33822a8e 23#include "opcode/mn10300.h"
88c1242d 24#include "disassemble.h"
252b5132
RH		 25#include "opintl.h"
26
40fa0207 27#define HAVE_AM33_2 (info->mach == AM33_2)
47b0e7ad
NC		 28#define HAVE_AM33 (info->mach == AM33 || HAVE_AM33_2)
29#define HAVE_AM30 (info->mach == AM30)
252b5132
RH		 30
31static void
47b0e7ad
NC		 32disassemble (bfd_vma memaddr,
33 struct disassemble_info *info,
34 unsigned long insn,
35 unsigned int size)
252b5132 36{
47b0e7ad 37 struct mn10300_opcode *op = (struct mn10300_opcode *) mn10300_opcodes;
252b5132
RH		 38 const struct mn10300_operand *operand;
39 bfd_byte buffer[4];
40 unsigned long extension = 0;
41 int status, match = 0;
42
43 /* Find the opcode. */
44 while (op->name)
45 {
46 int mysize, extra_shift;
47
48 if (op->format == FMT_S0)
49 mysize = 1;
50 else if (op->format == FMT_S1
51 || op->format == FMT_D0)
52 mysize = 2;
53 else if (op->format == FMT_S2
54 || op->format == FMT_D1)
55 mysize = 3;
56 else if (op->format == FMT_S4)
57 mysize = 5;
58 else if (op->format == FMT_D2)
59 mysize = 4;
40fa0207
AO		 60 else if (op->format == FMT_D3)
61 mysize = 5;
252b5132
RH		 62 else if (op->format == FMT_D4)
63 mysize = 6;
a9af5e04
JL		 64 else if (op->format == FMT_D6)
65 mysize = 3;
66 else if (op->format == FMT_D7 || op->format == FMT_D10)
67 mysize = 4;
68 else if (op->format == FMT_D8)
69 mysize = 6;
70 else if (op->format == FMT_D9)
71 mysize = 7;
252b5132
RH		 72 else
73 mysize = 7;
33822a8e 74
252b5132
RH		 75 if ((op->mask & insn) == op->opcode
76 && size == (unsigned int) mysize
77 && (op->machine == 0
40fa0207 78 || (op->machine == AM33_2 && HAVE_AM33_2)
4d85706b
AO		 79 || (op->machine == AM33 && HAVE_AM33)
80 || (op->machine == AM30 && HAVE_AM30)))
252b5132
RH		 81 {
82 const unsigned char *opindex_ptr;
83 unsigned int nocomma;
84 int paren = 0;
33822a8e 85
252b5132
RH		 86 if (op->format == FMT_D1 || op->format == FMT_S1)
87 extra_shift = 8;
88 else if (op->format == FMT_D2 || op->format == FMT_D4
89 || op->format == FMT_S2 || op->format == FMT_S4
90 || op->format == FMT_S6 || op->format == FMT_D5)
91 extra_shift = 16;
a9af5e04
JL		 92 else if (op->format == FMT_D7
93 || op->format == FMT_D8
94 || op->format == FMT_D9)
95 extra_shift = 8;
252b5132
RH		 96 else
97 extra_shift = 0;
98
99 if (size == 1 || size == 2)
47b0e7ad
NC		 100 extension = 0;
101
252b5132
RH		 102 else if (size == 3
103 && (op->format == FMT_D1
104 || op->opcode == 0xdf0000
105 || op->opcode == 0xde0000))
47b0e7ad
NC		 106 extension = 0;
107
a9af5e04
JL		 108 else if (size == 3
109 && op->format == FMT_D6)
47b0e7ad
NC		 110 extension = 0;
111
252b5132
RH		 112 else if (size == 3)
113 {
114 insn &= 0xff0000;
115 status = (*info->read_memory_func) (memaddr + 1, buffer, 2, info);
116 if (status != 0)
117 {
118 (*info->memory_error_func) (status, memaddr, info);
119 return;
120 }
121
122 insn |= bfd_getl16 (buffer);
123 extension = 0;
124 }
125 else if (size == 4
126 && (op->opcode == 0xfaf80000
127 || op->opcode == 0xfaf00000
128 || op->opcode == 0xfaf40000))
47b0e7ad
NC		 129 extension = 0;
130
a9af5e04
JL		 131 else if (size == 4
132 && (op->format == FMT_D7
133 || op->format == FMT_D10))
47b0e7ad
NC		 134 extension = 0;
135
252b5132
RH		 136 else if (size == 4)
137 {
138 insn &= 0xffff0000;
139 status = (*info->read_memory_func) (memaddr + 2, buffer, 2, info);
140 if (status != 0)
141 {
142 (*info->memory_error_func) (status, memaddr, info);
143 return;
144 }
145
146 insn |= bfd_getl16 (buffer);
147 extension = 0;
148 }
149 else if (size == 5 && op->opcode == 0xdc000000)
150 {
151 unsigned long temp = 0;
47b0e7ad 152
252b5132
RH		 153 status = (*info->read_memory_func) (memaddr + 1, buffer, 4, info);
154 if (status != 0)
155 {
156 (*info->memory_error_func) (status, memaddr, info);
157 return;
158 }
159 temp |= bfd_getl32 (buffer);
160
161 insn &= 0xff000000;
162 insn |= (temp & 0xffffff00) >> 8;
163 extension = temp & 0xff;
164 }
40fa0207
AO		 165 else if (size == 5 && op->format == FMT_D3)
166 {
167 status = (*info->read_memory_func) (memaddr + 2, buffer, 2, info);
168 if (status != 0)
169 {
170 (*info->memory_error_func) (status, memaddr, info);
171 return;
172 }
173 insn &= 0xffff0000;
174 insn |= bfd_getl16 (buffer);
175
176 status = (*info->read_memory_func) (memaddr + 4, buffer, 1, info);
177 if (status != 0)
178 {
179 (*info->memory_error_func) (status, memaddr, info);
180 return;
181 }
182 extension = *(unsigned char *) buffer;
183 }
252b5132
RH		 184 else if (size == 5)
185 {
186 unsigned long temp = 0;
47b0e7ad 187
252b5132
RH		 188 status = (*info->read_memory_func) (memaddr + 1, buffer, 2, info);
189 if (status != 0)
190 {
191 (*info->memory_error_func) (status, memaddr, info);
192 return;
193 }
194 temp |= bfd_getl16 (buffer);
195
196 insn &= 0xff0000ff;
197 insn |= temp << 8;
198
199 status = (*info->read_memory_func) (memaddr + 4, buffer, 1, info);
200 if (status != 0)
201 {
202 (*info->memory_error_func) (status, memaddr, info);
203 return;
204 }
33822a8e 205 extension = *(unsigned char *) buffer;
252b5132 206 }
a9af5e04
JL		 207 else if (size == 6 && op->format == FMT_D8)
208 {
209 insn &= 0xffffff00;
210 status = (*info->read_memory_func) (memaddr + 5, buffer, 1, info);
211 if (status != 0)
212 {
213 (*info->memory_error_func) (status, memaddr, info);
214 return;
215 }
33822a8e 216 insn |= *(unsigned char *) buffer;
a9af5e04
JL		 217
218 status = (*info->read_memory_func) (memaddr + 3, buffer, 2, info);
219 if (status != 0)
220 {
221 (*info->memory_error_func) (status, memaddr, info);
222 return;
223 }
224 extension = bfd_getl16 (buffer);
225 }
252b5132
RH		 226 else if (size == 6)
227 {
228 unsigned long temp = 0;
47b0e7ad 229
252b5132
RH		 230 status = (*info->read_memory_func) (memaddr + 2, buffer, 4, info);
231 if (status != 0)
232 {
233 (*info->memory_error_func) (status, memaddr, info);
234 return;
235 }
236 temp |= bfd_getl32 (buffer);
237
238 insn &= 0xffff0000;
239 insn |= (temp >> 16) & 0xffff;
240 extension = temp & 0xffff;
241 }
a9af5e04
JL		 242 else if (size == 7 && op->format == FMT_D9)
243 {
244 insn &= 0xffffff00;
245 status = (*info->read_memory_func) (memaddr + 3, buffer, 4, info);
246 if (status != 0)
247 {
248 (*info->memory_error_func) (status, memaddr, info);
249 return;
250 }
251 extension = bfd_getl32 (buffer);
252 insn |= (extension & 0xff000000) >> 24;
253 extension &= 0xffffff;
254 }
252b5132
RH		 255 else if (size == 7 && op->opcode == 0xdd000000)
256 {
257 unsigned long temp = 0;
47b0e7ad 258
252b5132
RH		 259 status = (*info->read_memory_func) (memaddr + 1, buffer, 4, info);
260 if (status != 0)
261 {
262 (*info->memory_error_func) (status, memaddr, info);
263 return;
264 }
265 temp |= bfd_getl32 (buffer);
266
267 insn &= 0xff000000;
268 insn |= (temp >> 8) & 0xffffff;
269 extension = (temp & 0xff) << 16;
33822a8e 270
252b5132
RH		 271 status = (*info->read_memory_func) (memaddr + 5, buffer, 2, info);
272 if (status != 0)
273 {
274 (*info->memory_error_func) (status, memaddr, info);
275 return;
276 }
277 extension |= bfd_getb16 (buffer);
278 }
279 else if (size == 7)
280 {
281 unsigned long temp = 0;
47b0e7ad 282
252b5132
RH		 283 status = (*info->read_memory_func) (memaddr + 2, buffer, 4, info);
284 if (status != 0)
285 {
286 (*info->memory_error_func) (status, memaddr, info);
287 return;
288 }
289 temp |= bfd_getl32 (buffer);
290
291 insn &= 0xffff0000;
292 insn |= (temp >> 16) & 0xffff;
293 extension = (temp & 0xffff) << 8;
33822a8e 294
252b5132
RH		 295 status = (*info->read_memory_func) (memaddr + 6, buffer, 1, info);
296 if (status != 0)
297 {
298 (*info->memory_error_func) (status, memaddr, info);
299 return;
300 }
33822a8e 301 extension |= *(unsigned char *) buffer;
252b5132
RH		 302 }
303
304 match = 1;
305 (*info->fprintf_func) (info->stream, "%s\t", op->name);
306
307 /* Now print the operands. */
308 for (opindex_ptr = op->operands, nocomma = 1;
309 *opindex_ptr != 0;
310 opindex_ptr++)
311 {
312 unsigned long value;
313
314 operand = &mn10300_operands[*opindex_ptr];
315
a9af5e04
JL		 316 /* If this operand is a PLUS (autoincrement), then do not emit
317 a comma before emitting the plus. */
318 if ((operand->flags & MN10300_OPERAND_PLUS) != 0)
319 nocomma = 1;
252b5132
RH		 320
321 if ((operand->flags & MN10300_OPERAND_SPLIT) != 0)
322 {
323 unsigned long temp;
47b0e7ad 324
252b5132
RH		 325 value = insn & ((1 << operand->bits) - 1);
326 value <<= (32 - operand->bits);
327 temp = extension >> operand->shift;
328 temp &= ((1 << (32 - operand->bits)) - 1);
329 value |= temp;
33822a8e
KH		 330 value = ((value ^ (((unsigned long) 1) << 31))
331 - (((unsigned long) 1) << 31));
252b5132 332 }
a9af5e04
JL		 333 else if ((operand->flags & MN10300_OPERAND_24BIT) != 0)
334 {
335 unsigned long temp;
47b0e7ad 336
a9af5e04
JL		 337 value = insn & ((1 << operand->bits) - 1);
338 value <<= (24 - operand->bits);
339 temp = extension >> operand->shift;
340 temp &= ((1 << (24 - operand->bits)) - 1);
341 value |= temp;
342 if ((operand->flags & MN10300_OPERAND_SIGNED) != 0)
d6062282 343 value = ((value & 0xffffff) ^ 0x800000) - 0x800000;
a9af5e04 344 }
40fa0207
AO		 345 else if ((operand->flags & (MN10300_OPERAND_FSREG
346 | MN10300_OPERAND_FDREG)))
347 {
348 /* See m10300-opc.c just before #define FSM0 for an
349 explanation of these variables. Note that
350 FMT-implied shifts are not taken into account for
351 FP registers. */
352 unsigned long mask_low, mask_high;
353 int shl_low, shr_high, shl_high;
354
355 switch (operand->bits)
356 {
357 case 5:
358 /* Handle regular FP registers. */
359 if (operand->shift >= 0)
360 {
361 /* This is an `m' register. */
362 shl_low = operand->shift;
363 shl_high = 8 + (8 & shl_low) + (shl_low & 4) / 4;
364 }
365 else
366 {
367 /* This is an `n' register. */
368 shl_low = -operand->shift;
369 shl_high = shl_low / 4;
370 }
371 mask_low = 0x0f;
372 mask_high = 0x10;
373 shr_high = 4;
374 break;
375
376 case 3:
377 /* Handle accumulators. */
378 shl_low = -operand->shift;
379 shl_high = 0;
380 mask_low = 0x03;
381 mask_high = 0x04;
382 shr_high = 2;
383 break;
384
385 default:
386 abort ();
387 }
388 value = ((((insn >> shl_high) << shr_high) & mask_high)
389 | ((insn >> shl_low) & mask_low));
390 }
252b5132 391 else if ((operand->flags & MN10300_OPERAND_EXTENDED) != 0)
47b0e7ad
NC		 392 value = ((extension >> (operand->shift))
393 & ((1 << operand->bits) - 1));
394
252b5132 395 else
47b0e7ad
NC		 396 value = ((insn >> (operand->shift))
397 & ((1 << operand->bits) - 1));
252b5132
RH		 398
399 if ((operand->flags & MN10300_OPERAND_SIGNED) != 0
d6062282
AO		 400 /* These are properly extended by the code above. */
401 && ((operand->flags & MN10300_OPERAND_24BIT) == 0))
33822a8e
KH		 402 value = ((value ^ (((unsigned long) 1) << (operand->bits - 1)))
403 - (((unsigned long) 1) << (operand->bits - 1)));
252b5132
RH		 404
405 if (!nocomma
406 && (!paren
407 || ((operand->flags & MN10300_OPERAND_PAREN) == 0)))
408 (*info->fprintf_func) (info->stream, ",");
409
410 nocomma = 0;
33822a8e 411
252b5132
RH		 412 if ((operand->flags & MN10300_OPERAND_DREG) != 0)
413 {
414 value = ((insn >> (operand->shift + extra_shift))
415 & ((1 << operand->bits) - 1));
33822a8e 416 (*info->fprintf_func) (info->stream, "d%d", (int) value);
252b5132
RH		 417 }
418
419 else if ((operand->flags & MN10300_OPERAND_AREG) != 0)
420 {
421 value = ((insn >> (operand->shift + extra_shift))
422 & ((1 << operand->bits) - 1));
33822a8e 423 (*info->fprintf_func) (info->stream, "a%d", (int) value);
252b5132
RH		 424 }
425
426 else if ((operand->flags & MN10300_OPERAND_SP) != 0)
427 (*info->fprintf_func) (info->stream, "sp");
428
429 else if ((operand->flags & MN10300_OPERAND_PSW) != 0)
430 (*info->fprintf_func) (info->stream, "psw");
431
432 else if ((operand->flags & MN10300_OPERAND_MDR) != 0)
433 (*info->fprintf_func) (info->stream, "mdr");
434
a9af5e04
JL		 435 else if ((operand->flags & MN10300_OPERAND_RREG) != 0)
436 {
437 value = ((insn >> (operand->shift + extra_shift))
438 & ((1 << operand->bits) - 1));
439 if (value < 8)
33822a8e 440 (*info->fprintf_func) (info->stream, "r%d", (int) value);
a9af5e04 441 else if (value < 12)
33822a8e 442 (*info->fprintf_func) (info->stream, "a%d", (int) value - 8);
a9af5e04 443 else
33822a8e 444 (*info->fprintf_func) (info->stream, "d%d", (int) value - 12);
a9af5e04
JL		 445 }
446
447 else if ((operand->flags & MN10300_OPERAND_XRREG) != 0)
448 {
449 value = ((insn >> (operand->shift + extra_shift))
450 & ((1 << operand->bits) - 1));
451 if (value == 0)
0fd3a477 452 (*info->fprintf_func) (info->stream, "sp");
a9af5e04 453 else
33822a8e 454 (*info->fprintf_func) (info->stream, "xr%d", (int) value);
a9af5e04
JL		 455 }
456
40fa0207
AO		 457 else if ((operand->flags & MN10300_OPERAND_FSREG) != 0)
458 (*info->fprintf_func) (info->stream, "fs%d", (int) value);
459
460 else if ((operand->flags & MN10300_OPERAND_FDREG) != 0)
461 (*info->fprintf_func) (info->stream, "fd%d", (int) value);
462
463 else if ((operand->flags & MN10300_OPERAND_FPCR) != 0)
464 (*info->fprintf_func) (info->stream, "fpcr");
465
a9af5e04
JL		 466 else if ((operand->flags & MN10300_OPERAND_USP) != 0)
467 (*info->fprintf_func) (info->stream, "usp");
468
469 else if ((operand->flags & MN10300_OPERAND_SSP) != 0)
470 (*info->fprintf_func) (info->stream, "ssp");
471
472 else if ((operand->flags & MN10300_OPERAND_MSP) != 0)
473 (*info->fprintf_func) (info->stream, "msp");
474
475 else if ((operand->flags & MN10300_OPERAND_PC) != 0)
476 (*info->fprintf_func) (info->stream, "pc");
477
478 else if ((operand->flags & MN10300_OPERAND_EPSW) != 0)
479 (*info->fprintf_func) (info->stream, "epsw");
480
481 else if ((operand->flags & MN10300_OPERAND_PLUS) != 0)
482 (*info->fprintf_func) (info->stream, "+");
252b5132
RH		 483
484 else if ((operand->flags & MN10300_OPERAND_PAREN) != 0)
485 {
486 if (paren)
487 (*info->fprintf_func) (info->stream, ")");
488 else
489 {
490 (*info->fprintf_func) (info->stream, "(");
491 nocomma = 1;
492 }
493 paren = !paren;
494 }
495
496 else if ((operand->flags & MN10300_OPERAND_PCREL) != 0)
497 (*info->print_address_func) ((long) value + memaddr, info);
498
499 else if ((operand->flags & MN10300_OPERAND_MEMADDR) != 0)
500 (*info->print_address_func) (value, info);
501
502 else if ((operand->flags & MN10300_OPERAND_REG_LIST) != 0)
503 {
504 int comma = 0;
505
506 (*info->fprintf_func) (info->stream, "[");
507 if (value & 0x80)
508 {
509 (*info->fprintf_func) (info->stream, "d2");
510 comma = 1;
511 }
512
513 if (value & 0x40)
514 {
515 if (comma)
516 (*info->fprintf_func) (info->stream, ",");
517 (*info->fprintf_func) (info->stream, "d3");
518 comma = 1;
519 }
520
521 if (value & 0x20)
522 {
523 if (comma)
524 (*info->fprintf_func) (info->stream, ",");
525 (*info->fprintf_func) (info->stream, "a2");
526 comma = 1;
527 }
528
529 if (value & 0x10)
530 {
531 if (comma)
532 (*info->fprintf_func) (info->stream, ",");
533 (*info->fprintf_func) (info->stream, "a3");
534 comma = 1;
535 }
536
537 if (value & 0x08)
538 {
539 if (comma)
540 (*info->fprintf_func) (info->stream, ",");
541 (*info->fprintf_func) (info->stream, "other");
542 comma = 1;
543 }
544
a9af5e04
JL		 545 if (value & 0x04)
546 {
547 if (comma)
548 (*info->fprintf_func) (info->stream, ",");
549 (*info->fprintf_func) (info->stream, "exreg0");
550 comma = 1;
551 }
552 if (value & 0x02)
553 {
554 if (comma)
555 (*info->fprintf_func) (info->stream, ",");
556 (*info->fprintf_func) (info->stream, "exreg1");
557 comma = 1;
558 }
559 if (value & 0x01)
560 {
561 if (comma)
562 (*info->fprintf_func) (info->stream, ",");
563 (*info->fprintf_func) (info->stream, "exother");
564 comma = 1;
565 }
252b5132
RH		 566 (*info->fprintf_func) (info->stream, "]");
567 }
568
33822a8e
KH		 569 else
570 (*info->fprintf_func) (info->stream, "%ld", (long) value);
252b5132
RH		 571 }
572 /* All done. */
573 break;
574 }
575 op++;
576 }
577
578 if (!match)
47b0e7ad 579 /* xgettext:c-format */
0fd3a477 580 (*info->fprintf_func) (info->stream, _("unknown\t0x%04lx"), insn);
47b0e7ad
NC		 581}
582
583int
584print_insn_mn10300 (bfd_vma memaddr, struct disassemble_info *info)
585{
586 int status;
587 bfd_byte buffer[4];
588 unsigned long insn;
589 unsigned int consume;
590
591 /* First figure out how big the opcode is. */
592 status = (*info->read_memory_func) (memaddr, buffer, 1, info);
593 if (status != 0)
594 {
595 (*info->memory_error_func) (status, memaddr, info);
596 return -1;
597 }
598 insn = *(unsigned char *) buffer;
599
600 /* These are one byte insns. */
601 if ((insn & 0xf3) == 0x00
602 || (insn & 0xf0) == 0x10
603 || (insn & 0xfc) == 0x3c
604 || (insn & 0xf3) == 0x41
605 || (insn & 0xf3) == 0x40
606 || (insn & 0xfc) == 0x50
607 || (insn & 0xfc) == 0x54
608 || (insn & 0xf0) == 0x60
609 || (insn & 0xf0) == 0x70
610 || ((insn & 0xf0) == 0x80
611 && (insn & 0x0c) >> 2 != (insn & 0x03))
612 || ((insn & 0xf0) == 0x90
613 && (insn & 0x0c) >> 2 != (insn & 0x03))
614 || ((insn & 0xf0) == 0xa0
615 && (insn & 0x0c) >> 2 != (insn & 0x03))
616 || ((insn & 0xf0) == 0xb0
617 && (insn & 0x0c) >> 2 != (insn & 0x03))
618 || (insn & 0xff) == 0xcb
619 || (insn & 0xfc) == 0xd0
620 || (insn & 0xfc) == 0xd4
621 || (insn & 0xfc) == 0xd8
622 || (insn & 0xf0) == 0xe0
623 || (insn & 0xff) == 0xff)
252b5132 624 {
47b0e7ad 625 consume = 1;
252b5132 626 }
47b0e7ad
NC		 627
628 /* These are two byte insns. */
629 else if ((insn & 0xf0) == 0x80
630 || (insn & 0xf0) == 0x90
631 || (insn & 0xf0) == 0xa0
632 || (insn & 0xf0) == 0xb0
633 || (insn & 0xfc) == 0x20
634 || (insn & 0xfc) == 0x28
635 || (insn & 0xf3) == 0x43
636 || (insn & 0xf3) == 0x42
637 || (insn & 0xfc) == 0x58
638 || (insn & 0xfc) == 0x5c
639 || ((insn & 0xf0) == 0xc0
640 && (insn & 0xff) != 0xcb
641 && (insn & 0xff) != 0xcc
642 && (insn & 0xff) != 0xcd)
643 || (insn & 0xff) == 0xf0
644 || (insn & 0xff) == 0xf1
645 || (insn & 0xff) == 0xf2
646 || (insn & 0xff) == 0xf3
647 || (insn & 0xff) == 0xf4
648 || (insn & 0xff) == 0xf5
649 || (insn & 0xff) == 0xf6)
650 {
651 status = (*info->read_memory_func) (memaddr, buffer, 2, info);
652 if (status != 0)
653 {
654 (*info->memory_error_func) (status, memaddr, info);
655 return -1;
656 }
657 insn = bfd_getb16 (buffer);
658 consume = 2;
659 }
660
661 /* These are three byte insns. */
662 else if ((insn & 0xff) == 0xf8
663 || (insn & 0xff) == 0xcc
664 || (insn & 0xff) == 0xf9
665 || (insn & 0xf3) == 0x01
666 || (insn & 0xf3) == 0x02
667 || (insn & 0xf3) == 0x03
668 || (insn & 0xfc) == 0x24
669 || (insn & 0xfc) == 0x2c
670 || (insn & 0xfc) == 0x30
671 || (insn & 0xfc) == 0x34
672 || (insn & 0xfc) == 0x38
673 || (insn & 0xff) == 0xde
674 || (insn & 0xff) == 0xdf
675 || (insn & 0xff) == 0xf9
676 || (insn & 0xff) == 0xcc)
677 {
678 status = (*info->read_memory_func) (memaddr, buffer, 2, info);
679 if (status != 0)
680 {
681 (*info->memory_error_func) (status, memaddr, info);
682 return -1;
683 }
684 insn = bfd_getb16 (buffer);
685 insn <<= 8;
686 status = (*info->read_memory_func) (memaddr + 2, buffer, 1, info);
687 if (status != 0)
688 {
689 (*info->memory_error_func) (status, memaddr, info);
690 return -1;
691 }
692 insn |= *(unsigned char *) buffer;
693 consume = 3;
694 }
695
696 /* These are four byte insns. */
697 else if ((insn & 0xff) == 0xfa
698 || (insn & 0xff) == 0xf7
699 || (insn & 0xff) == 0xfb)
700 {
701 status = (*info->read_memory_func) (memaddr, buffer, 4, info);
702 if (status != 0)
703 {
704 (*info->memory_error_func) (status, memaddr, info);
705 return -1;
706 }
707 insn = bfd_getb32 (buffer);
708 consume = 4;
709 }
710
711 /* These are five byte insns. */
712 else if ((insn & 0xff) == 0xcd
713 || (insn & 0xff) == 0xdc)
714 {
715 status = (*info->read_memory_func) (memaddr, buffer, 4, info);
716 if (status != 0)
717 {
718 (*info->memory_error_func) (status, memaddr, info);
719 return -1;
720 }
721 insn = bfd_getb32 (buffer);
722 consume = 5;
723 }
724
725 /* These are six byte insns. */
726 else if ((insn & 0xff) == 0xfd
727 || (insn & 0xff) == 0xfc)
728 {
729 status = (*info->read_memory_func) (memaddr, buffer, 4, info);
730 if (status != 0)
731 {
732 (*info->memory_error_func) (status, memaddr, info);
733 return -1;
734 }
735
736 insn = bfd_getb32 (buffer);
737 consume = 6;
738 }
739
740 /* Else its a seven byte insns (in theory). */
741 else
742 {
743 status = (*info->read_memory_func) (memaddr, buffer, 4, info);
744 if (status != 0)
745 {
746 (*info->memory_error_func) (status, memaddr, info);
747 return -1;
748 }
749
750 insn = bfd_getb32 (buffer);
751 consume = 7;
752 /* Handle the 5-byte extended instruction codes. */
753 if ((insn & 0xfff80000) == 0xfe800000)
754 consume = 5;
755 }
756
757 disassemble (memaddr, info, insn, consume);
758
759 return consume;
252b5132 760}
GDB Binutils - Deliverables
This page took 0.937338 seconds and 4 git commands to generate.