projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
2000-05-23 H.J. Lu <hjl@gnu.org>
[deliverable/binutils-gdb.git] / opcodes / arm-dis.c
CommitLineData
252b5132 1/* Instruction printing code for the ARM
01c7f630 2 Copyright (C) 1994, 95, 96, 97, 98, 99, 2000 Free Software Foundation, Inc.
252b5132
RH		 3 Contributed by Richard Earnshaw (rwe@pegasus.esprit.ec.org)
4 Modification by James G. Smith (jsmith@cygnus.co.uk)
5
6This file is part of libopcodes.
7
8This program is free software; you can redistribute it and/or modify it under
9the terms of the GNU General Public License as published by the Free
10Software Foundation; either version 2 of the License, or (at your option)
11any later version.
12
13This program is distributed in the hope that it will be useful, but WITHOUT
14ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
15FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16more details.
17
18You should have received a copy of the GNU General Public License
19along with this program; if not, write to the Free Software
20Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
21
cb6a5892 22#include "sysdep.h"
252b5132
RH		 23#include "dis-asm.h"
24#define DEFINE_TABLE
25#include "arm-opc.h"
26#include "coff/internal.h"
27#include "libcoff.h"
28#include "opintl.h"
29
30/* FIXME: This shouldn't be done here */
31#include "elf-bfd.h"
32#include "elf/internal.h"
33#include "elf/arm.h"
34
01c7f630 35#ifndef streq
58efb6c0 36#define streq(a,b) (strcmp ((a), (b)) == 0)
01c7f630 37#endif
58efb6c0 38
01c7f630 39#ifndef strneq
58efb6c0
NC		 40#define strneq(a,b,n) (strncmp ((a), (b), (n)) == 0)
41#endif
42
43#ifndef NUM_ELEM
44#define NUM_ELEM(a) (sizeof (a) / sizeof (a)[0])
01c7f630
NC		 45#endif
46
5876e06d 47static char * arm_conditional[] =
252b5132
RH		 48{"eq", "ne", "cs", "cc", "mi", "pl", "vs", "vc",
49 "hi", "ls", "ge", "lt", "gt", "le", "", "nv"};
50
58efb6c0
NC		 51typedef struct
52{
53 const char * name;
54 const char * description;
55 const char * reg_names[16];
56}
57arm_regname;
dd92f639 58
58efb6c0
NC		 59static arm_regname regnames[] =
60{
61 { "raw" , "Select raw register names",
62 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15"}},
63 { "std", "Select register names used in ARM's ISA documentation",
64 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12", "sp", "lr", "pc" }},
65 { "apcs", "Select register names used in the APCS",
66 { "a1", "a2", "a3", "a4", "v1", "v2", "v3", "v4", "v5", "v6", "sl", "fp", "ip", "sp", "lr", "pc" }},
67 { "atpcs", "Select register names used in the ATPCS",
68 { "a1", "a2", "a3", "a4", "v1", "v2", "v3", "v4", "v5", "v6", "v7", "v8", "IP", "SP", "LR", "PC" }},
a7f8487e 69 { "special-atpcs", "Select special register names used in the ATPCS",
58efb6c0
NC		 70 { "a1", "a2", "a3", "a4", "v1", "v2", "v3", "WR", "v5", "SB", "SL", "FP", "IP", "SP", "LR", "PC" }}
71};
72
73/* Default to standard register name set. */
74static unsigned int regname_selected = 1;
75
76#define NUM_ARM_REGNAMES NUM_ELEM (regnames)
77#define arm_regnames regnames[regname_selected].reg_names
252b5132 78
01c7f630
NC		 79static boolean force_thumb = false;
80
5876e06d 81static char * arm_fp_const[] =
252b5132
RH		 82{"0.0", "1.0", "2.0", "3.0", "4.0", "5.0", "0.5", "10.0"};
83
5876e06d 84static char * arm_shift[] =
252b5132 85{"lsl", "lsr", "asr", "ror"};
01c7f630
NC		 86\f
87/* Forward declarations. */
88static void arm_decode_shift PARAMS ((long, fprintf_ftype, void *));
89static int print_insn_arm PARAMS ((bfd_vma, struct disassemble_info *, long));
90static int print_insn_thumb PARAMS ((bfd_vma, struct disassemble_info *, long));
01c7f630 91static void parse_disassembler_options PARAMS ((char *));
58efb6c0 92static int print_insn PARAMS ((bfd_vma, struct disassemble_info *, boolean));
a7f8487e
FN		 93int get_arm_regname_num_options (void);
94int set_arm_regname_option (int option);
95int get_arm_regnames (int option, const char **setname,
96 const char **setdescription,
97 const char ***register_names);
01c7f630
NC		 98\f
99/* Functions. */
a7f8487e
FN		 100int
101get_arm_regname_num_options (void)
102{
103 return NUM_ARM_REGNAMES;
104}
105
106int
107set_arm_regname_option (int option)
108{
109 int old = regname_selected;
110 regname_selected = option;
111 return old;
112}
113
114int
115get_arm_regnames (int option, const char **setname,
116 const char **setdescription,
117 const char ***register_names)
118{
119 *setname = regnames[option].name;
120 *setdescription = regnames[option].description;
121 *register_names = regnames[option].reg_names;
122 return 16;
123}
124
252b5132
RH		 125static void
126arm_decode_shift (given, func, stream)
127 long given;
128 fprintf_ftype func;
5876e06d 129 void * stream;
252b5132
RH		 130{
131 func (stream, "%s", arm_regnames[given & 0xf]);
5876e06d 132
252b5132
RH		 133 if ((given & 0xff0) != 0)
134 {
135 if ((given & 0x10) == 0)
136 {
137 int amount = (given & 0xf80) >> 7;
138 int shift = (given & 0x60) >> 5;
5876e06d 139
252b5132
RH		 140 if (amount == 0)
141 {
142 if (shift == 3)
143 {
144 func (stream, ", rrx");
145 return;
146 }
5876e06d 147
252b5132
RH		 148 amount = 32;
149 }
5876e06d 150
252b5132
RH		 151 func (stream, ", %s #%d", arm_shift[shift], amount);
152 }
153 else
154 func (stream, ", %s %s", arm_shift[(given & 0x60) >> 5],
155 arm_regnames[(given & 0xf00) >> 8]);
156 }
157}
158
159/* Print one instruction from PC on INFO->STREAM.
160 Return the size of the instruction (always 4 on ARM). */
252b5132
RH		 161static int
162print_insn_arm (pc, info, given)
5876e06d
NC		 163 bfd_vma pc;
164 struct disassemble_info * info;
165 long given;
252b5132
RH		 166{
167 struct arm_opcode * insn;
168 void * stream = info->stream;
169 fprintf_ftype func = info->fprintf_func;
170
171 for (insn = arm_opcodes; insn->assembler; insn++)
172 {
173 if ((given & insn->mask) == insn->value)
174 {
175 char * c;
176
177 for (c = insn->assembler; *c; c++)
178 {
179 if (*c == '%')
180 {
181 switch (*++c)
182 {
183 case '%':
184 func (stream, "%%");
185 break;
186
187 case 'a':
188 if (((given & 0x000f0000) == 0x000f0000)
189 && ((given & 0x02000000) == 0))
190 {
191 int offset = given & 0xfff;
192
193 func (stream, "[pc");
194
195 if (given & 0x01000000)
196 {
197 if ((given & 0x00800000) == 0)
198 offset = - offset;
199
200 /* pre-indexed */
201 func (stream, ", #%x]", offset);
202
203 offset += pc + 8;
204
58efb6c0
NC		 205 /* Cope with the possibility of write-back
206 being used. Probably a very dangerous thing
207 for the programmer to do, but who are we to
208 argue ? */
252b5132
RH		 209 if (given & 0x00200000)
210 func (stream, "!");
211 }
212 else
213 {
58efb6c0 214 /* Post indexed. */
252b5132
RH		 215 func (stream, "], #%x", offset);
216
58efb6c0 217 offset = pc + 8; /* ie ignore the offset. */
252b5132
RH		 218 }
219
220 func (stream, "\t; ");
221 info->print_address_func (offset, info);
222 }
223 else
224 {
225 func (stream, "[%s",
226 arm_regnames[(given >> 16) & 0xf]);
227 if ((given & 0x01000000) != 0)
228 {
229 if ((given & 0x02000000) == 0)
230 {
231 int offset = given & 0xfff;
232 if (offset)
233 func (stream, ", %s#%d",
234 (((given & 0x00800000) == 0)
235 ? "-" : ""), offset);
236 }
237 else
238 {
239 func (stream, ", %s",
240 (((given & 0x00800000) == 0)
241 ? "-" : ""));
242 arm_decode_shift (given, func, stream);
243 }
244
245 func (stream, "]%s",
246 ((given & 0x00200000) != 0) ? "!" : "");
247 }
248 else
249 {
250 if ((given & 0x02000000) == 0)
251 {
252 int offset = given & 0xfff;
253 if (offset)
254 func (stream, "], %s#%d",
255 (((given & 0x00800000) == 0)
256 ? "-" : ""), offset);
257 else
258 func (stream, "]");
259 }
260 else
261 {
262 func (stream, "], %s",
263 (((given & 0x00800000) == 0)
264 ? "-" : ""));
265 arm_decode_shift (given, func, stream);
266 }
267 }
268 }
269 break;
270
271 case 's':
272 if ((given & 0x004f0000) == 0x004f0000)
273 {
58efb6c0 274 /* PC relative with immediate offset. */
252b5132 275 int offset = ((given & 0xf00) >> 4) | (given & 0xf);
886796f9 276
252b5132
RH		 277 if ((given & 0x00800000) == 0)
278 offset = -offset;
886796f9
NC		 279
280 func (stream, "[pc, #%x]\t; ", offset);
281
252b5132
RH		 282 (*info->print_address_func)
283 (offset + pc + 8, info);
284 }
285 else
286 {
287 func (stream, "[%s",
288 arm_regnames[(given >> 16) & 0xf]);
289 if ((given & 0x01000000) != 0)
290 {
58efb6c0 291 /* Pre-indexed. */
252b5132
RH		 292 if ((given & 0x00400000) == 0x00400000)
293 {
58efb6c0 294 /* Immediate. */
252b5132
RH		 295 int offset = ((given & 0xf00) >> 4) | (given & 0xf);
296 if (offset)
297 func (stream, ", %s#%d",
298 (((given & 0x00800000) == 0)
299 ? "-" : ""), offset);
300 }
301 else
302 {
58efb6c0 303 /* Register. */
252b5132
RH		 304 func (stream, ", %s%s",
305 (((given & 0x00800000) == 0)
306 ? "-" : ""),
307 arm_regnames[given & 0xf]);
308 }
309
310 func (stream, "]%s",
311 ((given & 0x00200000) != 0) ? "!" : "");
312 }
313 else
314 {
58efb6c0 315 /* Post-indexed. */
252b5132
RH		 316 if ((given & 0x00400000) == 0x00400000)
317 {
58efb6c0 318 /* Immediate. */
252b5132
RH		 319 int offset = ((given & 0xf00) >> 4) | (given & 0xf);
320 if (offset)
321 func (stream, "], %s#%d",
322 (((given & 0x00800000) == 0)
323 ? "-" : ""), offset);
324 else
325 func (stream, "]");
326 }
327 else
328 {
58efb6c0 329 /* Register. */
252b5132
RH		 330 func (stream, "], %s%s",
331 (((given & 0x00800000) == 0)
332 ? "-" : ""),
333 arm_regnames[given & 0xf]);
334 }
335 }
336 }
337 break;
338
339 case 'b':
340 (*info->print_address_func)
341 (BDISP (given) * 4 + pc + 8, info);
342 break;
343
344 case 'c':
345 func (stream, "%s",
346 arm_conditional [(given >> 28) & 0xf]);
347 break;
348
349 case 'm':
350 {
351 int started = 0;
352 int reg;
353
354 func (stream, "{");
355 for (reg = 0; reg < 16; reg++)
356 if ((given & (1 << reg)) != 0)
357 {
358 if (started)
359 func (stream, ", ");
360 started = 1;
361 func (stream, "%s", arm_regnames[reg]);
362 }
363 func (stream, "}");
364 }
365 break;
366
367 case 'o':
368 if ((given & 0x02000000) != 0)
369 {
370 int rotate = (given & 0xf00) >> 7;
371 int immed = (given & 0xff);
9f20bbfd
NC		 372 immed = (((immed << (32 - rotate))
373 | (immed >> rotate)) & 0xffffffff);
374 func (stream, "#%d\t; 0x%x", immed, immed);
252b5132
RH		 375 }
376 else
377 arm_decode_shift (given, func, stream);
378 break;
379
380 case 'p':
381 if ((given & 0x0000f000) == 0x0000f000)
382 func (stream, "p");
383 break;
384
385 case 't':
386 if ((given & 0x01200000) == 0x00200000)
387 func (stream, "t");
388 break;
389
390 case 'h':
391 if ((given & 0x00000020) == 0x00000020)
392 func (stream, "h");
393 else
394 func (stream, "b");
395 break;
396
397 case 'A':
398 func (stream, "[%s", arm_regnames [(given >> 16) & 0xf]);
399 if ((given & 0x01000000) != 0)
400 {
401 int offset = given & 0xff;
402 if (offset)
403 func (stream, ", %s#%d]%s",
404 ((given & 0x00800000) == 0 ? "-" : ""),
405 offset * 4,
406 ((given & 0x00200000) != 0 ? "!" : ""));
407 else
408 func (stream, "]");
409 }
410 else
411 {
412 int offset = given & 0xff;
413 if (offset)
414 func (stream, "], %s#%d",
415 ((given & 0x00800000) == 0 ? "-" : ""),
416 offset * 4);
417 else
418 func (stream, "]");
419 }
420 break;
421
422 case 'C':
322f2c45 423 switch (given & 0x000f0000)
252b5132
RH		 424 {
425 default:
426 func (stream, "_???");
427 break;
428 case 0x90000:
429 func (stream, "_all");
430 break;
431 case 0x10000:
322f2c45
NC		 432 func (stream, "_c");
433 break;
434 case 0x20000:
435 func (stream, "_x");
436 break;
437 case 0x40000:
438 func (stream, "_s");
252b5132
RH		 439 break;
440 case 0x80000:
322f2c45 441 func (stream, "_f");
252b5132
RH		 442 break;
443 }
444 break;
445
446 case 'F':
447 switch (given & 0x00408000)
448 {
449 case 0:
450 func (stream, "4");
451 break;
452 case 0x8000:
453 func (stream, "1");
454 break;
455 case 0x00400000:
456 func (stream, "2");
457 break;
458 default:
459 func (stream, "3");
460 }
461 break;
462
463 case 'P':
464 switch (given & 0x00080080)
465 {
466 case 0:
467 func (stream, "s");
468 break;
469 case 0x80:
470 func (stream, "d");
471 break;
472 case 0x00080000:
473 func (stream, "e");
474 break;
475 default:
476 func (stream, _("<illegal precision>"));
477 break;
478 }
479 break;
480 case 'Q':
481 switch (given & 0x00408000)
482 {
483 case 0:
484 func (stream, "s");
485 break;
486 case 0x8000:
487 func (stream, "d");
488 break;
489 case 0x00400000:
490 func (stream, "e");
491 break;
492 default:
493 func (stream, "p");
494 break;
495 }
496 break;
497 case 'R':
498 switch (given & 0x60)
499 {
500 case 0:
501 break;
502 case 0x20:
503 func (stream, "p");
504 break;
505 case 0x40:
506 func (stream, "m");
507 break;
508 default:
509 func (stream, "z");
510 break;
511 }
512 break;
513
514 case '0': case '1': case '2': case '3': case '4':
515 case '5': case '6': case '7': case '8': case '9':
516 {
517 int bitstart = *c++ - '0';
518 int bitend = 0;
519 while (*c >= '0' && *c <= '9')
520 bitstart = (bitstart * 10) + *c++ - '0';
521
522 switch (*c)
523 {
524 case '-':
525 c++;
58efb6c0 526
252b5132
RH		 527 while (*c >= '0' && *c <= '9')
528 bitend = (bitend * 10) + *c++ - '0';
58efb6c0 529
252b5132
RH		 530 if (!bitend)
531 abort ();
58efb6c0 532
252b5132
RH		 533 switch (*c)
534 {
535 case 'r':
536 {
537 long reg;
58efb6c0 538
252b5132
RH		 539 reg = given >> bitstart;
540 reg &= (2 << (bitend - bitstart)) - 1;
58efb6c0 541
252b5132
RH		 542 func (stream, "%s", arm_regnames[reg]);
543 }
544 break;
545 case 'd':
546 {
547 long reg;
58efb6c0 548
252b5132
RH		 549 reg = given >> bitstart;
550 reg &= (2 << (bitend - bitstart)) - 1;
58efb6c0 551
252b5132
RH		 552 func (stream, "%d", reg);
553 }
554 break;
555 case 'x':
556 {
557 long reg;
58efb6c0 558
252b5132
RH		 559 reg = given >> bitstart;
560 reg &= (2 << (bitend - bitstart)) - 1;
58efb6c0 561
252b5132 562 func (stream, "0x%08x", reg);
5876e06d 563
58efb6c0
NC		 564 /* Some SWI instructions have special
565 meanings. */
5876e06d
NC		 566 if ((given & 0x0fffffff) == 0x0FF00000)
567 func (stream, "\t; IMB");
568 else if ((given & 0x0fffffff) == 0x0FF00001)
569 func (stream, "\t; IMBRange");
252b5132
RH		 570 }
571 break;
cfbd315c
DL		 572 case 'X':
573 {
574 long reg;
58efb6c0 575
cfbd315c
DL		 576 reg = given >> bitstart;
577 reg &= (2 << (bitend - bitstart)) - 1;
58efb6c0 578
cfbd315c
DL		 579 func (stream, "%01x", reg & 0xf);
580 }
581 break;
252b5132
RH		 582 case 'f':
583 {
584 long reg;
58efb6c0 585
252b5132
RH		 586 reg = given >> bitstart;
587 reg &= (2 << (bitend - bitstart)) - 1;
58efb6c0 588
252b5132
RH		 589 if (reg > 7)
590 func (stream, "#%s",
591 arm_fp_const[reg & 7]);
592 else
593 func (stream, "f%d", reg);
594 }
595 break;
596 default:
597 abort ();
598 }
599 break;
58efb6c0 600
252b5132
RH		 601 case '`':
602 c++;
603 if ((given & (1 << bitstart)) == 0)
604 func (stream, "%c", *c);
605 break;
606 case '\'':
607 c++;
608 if ((given & (1 << bitstart)) != 0)
609 func (stream, "%c", *c);
610 break;
611 case '?':
612 ++c;
613 if ((given & (1 << bitstart)) != 0)
614 func (stream, "%c", *c++);
615 else
616 func (stream, "%c", *++c);
617 break;
618 default:
619 abort ();
620 }
621 break;
622
623 default:
624 abort ();
625 }
626 }
627 }
628 else
629 func (stream, "%c", *c);
630 }
631 return 4;
632 }
633 }
634 abort ();
635}
636
637/* Print one instruction from PC on INFO->STREAM.
638 Return the size of the instruction. */
252b5132
RH		 639static int
640print_insn_thumb (pc, info, given)
5876e06d
NC		 641 bfd_vma pc;
642 struct disassemble_info * info;
643 long given;
252b5132 644{
5876e06d
NC		 645 struct thumb_opcode * insn;
646 void * stream = info->stream;
647 fprintf_ftype func = info->fprintf_func;
252b5132
RH		 648
649 for (insn = thumb_opcodes; insn->assembler; insn++)
650 {
651 if ((given & insn->mask) == insn->value)
652 {
5876e06d 653 char * c = insn->assembler;
252b5132 654
58efb6c0
NC		 655 /* Special processing for Thumb 2 instruction BL sequence: */
656 if (!*c) /* Check for empty (not NULL) assembler string. */
252b5132
RH		 657 {
658 info->bytes_per_chunk = 4;
659 info->bytes_per_line = 4;
660
a3d9c82d
NC		 661 func (stream, "bl\t");
662
58efb6c0 663 info->print_address_func (BDISP23 (given) * 2 + pc + 4, info);
252b5132
RH		 664 return 4;
665 }
666 else
667 {
668 info->bytes_per_chunk = 2;
669 info->bytes_per_line = 4;
670
671 given &= 0xffff;
58efb6c0 672
252b5132
RH		 673 for (; *c; c++)
674 {
675 if (*c == '%')
676 {
677 int domaskpc = 0;
678 int domasklr = 0;
5876e06d 679
252b5132
RH		 680 switch (*++c)
681 {
682 case '%':
683 func (stream, "%%");
684 break;
685
686 case 'S':
687 {
688 long reg;
58efb6c0 689
252b5132
RH		 690 reg = (given >> 3) & 0x7;
691 if (given & (1 << 6))
692 reg += 8;
58efb6c0 693
252b5132
RH		 694 func (stream, "%s", arm_regnames[reg]);
695 }
696 break;
697
698 case 'D':
699 {
700 long reg;
5876e06d 701
252b5132
RH		 702 reg = given & 0x7;
703 if (given & (1 << 7))
704 reg += 8;
58efb6c0 705
252b5132
RH		 706 func (stream, "%s", arm_regnames[reg]);
707 }
708 break;
709
710 case 'T':
711 func (stream, "%s",
712 arm_conditional [(given >> 8) & 0xf]);
713 break;
714
715 case 'N':
716 if (given & (1 << 8))
717 domasklr = 1;
58efb6c0 718 /* Fall through. */
252b5132
RH		 719 case 'O':
720 if (*c == 'O' && (given & (1 << 8)))
721 domaskpc = 1;
58efb6c0 722 /* Fall through. */
252b5132
RH		 723 case 'M':
724 {
725 int started = 0;
726 int reg;
5876e06d 727
252b5132 728 func (stream, "{");
58efb6c0 729
252b5132
RH		 730 /* It would be nice if we could spot
731 ranges, and generate the rS-rE format: */
732 for (reg = 0; (reg < 8); reg++)
733 if ((given & (1 << reg)) != 0)
734 {
735 if (started)
736 func (stream, ", ");
737 started = 1;
738 func (stream, "%s", arm_regnames[reg]);
739 }
740
741 if (domasklr)
742 {
743 if (started)
744 func (stream, ", ");
745 started = 1;
a7f8487e 746 func (stream, arm_regnames[14] /* "lr" */);
252b5132
RH		 747 }
748
749 if (domaskpc)
750 {
751 if (started)
752 func (stream, ", ");
a7f8487e 753 func (stream, arm_regnames[15] /* "pc" */);
252b5132
RH		 754 }
755
756 func (stream, "}");
757 }
758 break;
759
760
761 case '0': case '1': case '2': case '3': case '4':
762 case '5': case '6': case '7': case '8': case '9':
763 {
764 int bitstart = *c++ - '0';
765 int bitend = 0;
5876e06d 766
252b5132
RH		 767 while (*c >= '0' && *c <= '9')
768 bitstart = (bitstart * 10) + *c++ - '0';
769
770 switch (*c)
771 {
772 case '-':
773 {
774 long reg;
5876e06d 775
252b5132
RH		 776 c++;
777 while (*c >= '0' && *c <= '9')
778 bitend = (bitend * 10) + *c++ - '0';
779 if (!bitend)
780 abort ();
781 reg = given >> bitstart;
782 reg &= (2 << (bitend - bitstart)) - 1;
783 switch (*c)
784 {
785 case 'r':
786 func (stream, "%s", arm_regnames[reg]);
787 break;
788
789 case 'd':
790 func (stream, "%d", reg);
791 break;
792
793 case 'H':
794 func (stream, "%d", reg << 1);
795 break;
796
797 case 'W':
798 func (stream, "%d", reg << 2);
799 break;
800
801 case 'a':
802 /* PC-relative address -- the bottom two
58efb6c0
NC		 803 bits of the address are dropped
804 before the calculation. */
252b5132
RH		 805 info->print_address_func
806 (((pc + 4) & ~3) + (reg << 2), info);
807 break;
808
809 case 'x':
810 func (stream, "0x%04x", reg);
811 break;
812
813 case 'I':
814 reg = ((reg ^ (1 << bitend)) - (1 << bitend));
815 func (stream, "%d", reg);
816 break;
817
818 case 'B':
819 reg = ((reg ^ (1 << bitend)) - (1 << bitend));
820 (*info->print_address_func)
821 (reg * 2 + pc + 4, info);
822 break;
823
824 default:
5876e06d 825 abort ();
252b5132
RH		 826 }
827 }
828 break;
829
830 case '\'':
831 c++;
832 if ((given & (1 << bitstart)) != 0)
833 func (stream, "%c", *c);
834 break;
835
836 case '?':
837 ++c;
838 if ((given & (1 << bitstart)) != 0)
839 func (stream, "%c", *c++);
840 else
841 func (stream, "%c", *++c);
842 break;
843
844 default:
5876e06d 845 abort ();
252b5132
RH		 846 }
847 }
848 break;
849
850 default:
851 abort ();
852 }
853 }
854 else
855 func (stream, "%c", *c);
856 }
857 }
858 return 2;
859 }
860 }
861
58efb6c0 862 /* No match. */
252b5132
RH		 863 abort ();
864}
865
58efb6c0 866/* Parse an individual disassembler option. */
a3d9c82d
NC		 867void
868parse_arm_disassembler_option (option)
01c7f630 869 char * option;
dd92f639 870{
01c7f630 871 if (option == NULL)
dd92f639
NC		 872 return;
873
01c7f630 874 if (strneq (option, "reg-names-", 10))
dd92f639 875 {
58efb6c0
NC		 876 int i;
877
01c7f630 878 option += 10;
58efb6c0
NC		 879
880 for (i = NUM_ARM_REGNAMES; i--;)
881 if (streq (option, regnames[i].name))
882 {
883 regname_selected = i;
884 break;
885 }
dd92f639 886
58efb6c0
NC		 887 if (i < 0)
888 fprintf (stderr, _("Unrecognised register name set: %s\n"), option);
dd92f639 889 }
01c7f630
NC		 890 else if (streq (option, "force-thumb"))
891 force_thumb = 1;
892 else if (streq (option, "no-force-thumb"))
893 force_thumb = 0;
dd92f639 894 else
58efb6c0 895 fprintf (stderr, _("Unrecognised disassembler option: %s\n"), option);
dd92f639
NC		 896
897 return;
898}
899
58efb6c0 900/* Parse the string of disassembler options, spliting it at whitespaces. */
01c7f630
NC		 901static void
902parse_disassembler_options (options)
903 char * options;
904{
905 char * space;
906
907 if (options == NULL)
908 return;
909
910 do
911 {
912 space = strchr (options, ' ');
913
914 if (space)
915 {
916 * space = '\0';
a3d9c82d 917 parse_arm_disassembler_option (options);
01c7f630
NC		 918 * space = ' ';
919 options = space + 1;
920 }
921 else
a3d9c82d 922 parse_arm_disassembler_option (options);
01c7f630
NC		 923 }
924 while (space);
925}
926
58efb6c0
NC		 927/* NOTE: There are no checks in these routines that
928 the relevant number of data bytes exist. */
929static int
930print_insn (pc, info, little)
252b5132 931 bfd_vma pc;
5876e06d 932 struct disassemble_info * info;
58efb6c0 933 boolean little;
252b5132
RH		 934{
935 unsigned char b[4];
936 long given;
937 int status;
252b5132 938 int is_thumb;
58efb6c0 939
dd92f639
NC		 940 if (info->disassembler_options)
941 {
942 parse_disassembler_options (info->disassembler_options);
943
58efb6c0 944 /* To avoid repeated parsing of these options, we remove them here. */
dd92f639
NC		 945 info->disassembler_options = NULL;
946 }
947
01c7f630
NC		 948 is_thumb = force_thumb;
949
950 if (!is_thumb && info->symbols != NULL)
252b5132 951 {
5876e06d
NC		 952 if (bfd_asymbol_flavour (*info->symbols) == bfd_target_coff_flavour)
953 {
2f0ca46a
NC		 954 coff_symbol_type * cs;
955
5876e06d
NC		 956 cs = coffsymbol (*info->symbols);
957 is_thumb = ( cs->native->u.syment.n_sclass == C_THUMBEXT
958 || cs->native->u.syment.n_sclass == C_THUMBSTAT
959 || cs->native->u.syment.n_sclass == C_THUMBLABEL
960 || cs->native->u.syment.n_sclass == C_THUMBEXTFUNC
961 || cs->native->u.syment.n_sclass == C_THUMBSTATFUNC);
962 }
963 else if (bfd_asymbol_flavour (*info->symbols) == bfd_target_elf_flavour)
964 {
2f0ca46a 965 elf_symbol_type * es;
58efb6c0 966 unsigned int type;
2f0ca46a 967
5876e06d 968 es = *(elf_symbol_type **)(info->symbols);
58efb6c0
NC		 969 type = ELF_ST_TYPE (es->internal_elf_sym.st_info);
970
971 is_thumb = (type == STT_ARM_TFUNC) || (type == STT_ARM_16BIT);
5876e06d
NC		 972 }
973 }
58efb6c0 974
252b5132 975 info->bytes_per_chunk = 4;
58efb6c0 976 info->display_endian = little ? BFD_ENDIAN_LITTLE : BFD_ENDIAN_BIG;
252b5132 977
58efb6c0 978 if (little)
252b5132 979 {
58efb6c0
NC		 980 status = info->read_memory_func (pc, (bfd_byte *) &b[0], 4, info);
981 if (status != 0 && is_thumb)
982 {
983 info->bytes_per_chunk = 2;
984
985 status = info->read_memory_func (pc, (bfd_byte *) b, 2, info);
986 b[3] = b[2] = 0;
987 }
988
989 if (status != 0)
990 {
991 info->memory_error_func (status, pc, info);
992 return -1;
993 }
994
995 given = (b[0]) | (b[1] << 8) | (b[2] << 16) | (b[3] << 24);
252b5132 996 }
58efb6c0 997 else
252b5132 998 {
58efb6c0
NC		 999 status = info->read_memory_func
1000 (pc & ~ 0x3, (bfd_byte *) &b[0], 4, info);
1001 if (status != 0)
252b5132 1002 {
58efb6c0
NC		 1003 info->memory_error_func (status, pc, info);
1004 return -1;
1005 }
1006
1007 if (is_thumb)
1008 {
1009 if (pc & 0x2)
252b5132 1010 {
58efb6c0
NC		 1011 given = (b[2] << 8) | b[3];
1012
1013 status = info->read_memory_func
1014 ((pc + 4) & ~ 0x3, (bfd_byte *) b, 4, info);
1015 if (status != 0)
1016 {
1017 info->memory_error_func (status, pc + 4, info);
1018 return -1;
1019 }
1020
1021 given |= (b[0] << 24) | (b[1] << 16);
252b5132 1022 }
58efb6c0
NC		 1023 else
1024 given = (b[0] << 8) | b[1] | (b[2] << 24) | (b[3] << 16);
252b5132
RH		 1025 }
1026 else
58efb6c0 1027 given = (b[0] << 24) | (b[1] << 16) | (b[2] << 8) | (b[3]);
252b5132 1028 }
58efb6c0 1029
252b5132 1030 if (is_thumb)
5876e06d 1031 status = print_insn_thumb (pc, info, given);
252b5132 1032 else
5876e06d 1033 status = print_insn_arm (pc, info, given);
252b5132
RH		 1034
1035 return status;
1036}
1037
1038int
58efb6c0 1039print_insn_big_arm (pc, info)
252b5132
RH		 1040 bfd_vma pc;
1041 struct disassemble_info * info;
1042{
58efb6c0
NC		 1043 return print_insn (pc, info, false);
1044}
01c7f630 1045
58efb6c0
NC		 1046int
1047print_insn_little_arm (pc, info)
1048 bfd_vma pc;
1049 struct disassemble_info * info;
1050{
1051 return print_insn (pc, info, true);
1052}
252b5132 1053
58efb6c0
NC		 1054void
1055print_arm_disassembler_options (FILE * stream)
1056{
1057 int i;
252b5132 1058
58efb6c0
NC		 1059 fprintf (stream, _("\n\
1060The following ARM specific disassembler options are supported for use with\n\
1061the -M switch:\n"));
01c7f630 1062
58efb6c0
NC		 1063 for (i = NUM_ARM_REGNAMES; i--;)
1064 fprintf (stream, " reg-names-%s %*c%s\n",
1065 regnames[i].name,
1066 14 - strlen (regnames[i].name), ' ',
1067 regnames[i].description);
1068
1069 fprintf (stream, " force-thumb Assume all insns are Thumb insns\n");
1070 fprintf (stream, " no-force-thumb Examine preceeding label to determine an insn's type\n\n");
252b5132 1071}
GDB Binutils - Deliverables
This page took 0.091716 seconds and 4 git commands to generate.