1 /* tilegx-dis.c. Disassembly routines for the TILE-Gx architecture. 2 Copyright (C) 2011-2014 Free Software Foundation, Inc. 3 4 This file is part of the GNU opcodes library. 5 6 This program is free software; you can redistribute it and/or modify 7 it under the terms of the GNU General Public License as published by 8 the Free Software Foundation; either version 3 of the License, or 9 (at your option) any later version. 10 11 This program is distributed in the hope that it will be useful, 12 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 GNU General Public License for more details. 15 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. */ 20 21 #include "sysdep.h" 22 #include <stddef.h> 23 #include <assert.h> 24 #include "bfd.h" 25 #include "elf/tilegx.h" 26 #include "elf-bfd.h" 27 #include "dis-asm.h" 28 #include "opcode/tilegx.h" 29 30 31 int 32 print_insn_tilegx (bfd_vma memaddr, disassemble_info *info) 33 { 34 struct tilegx_decoded_instruction 35 decoded[TILEGX_MAX_INSTRUCTIONS_PER_BUNDLE]; 36 bfd_byte opbuf[TILEGX_BUNDLE_SIZE_IN_BYTES]; 37 int status, i, num_instructions, num_printed; 38 tilegx_mnemonic padding_mnemonic; 39 40 status = (*info->read_memory_func) (memaddr, opbuf, 41 TILEGX_BUNDLE_SIZE_IN_BYTES, info); 42 if (status != 0) 43 { 44 (*info->memory_error_func) (status, memaddr, info); 45 return -1; 46 } 47 48 info->bytes_per_line = TILEGX_BUNDLE_SIZE_IN_BYTES; 49 info->bytes_per_chunk = TILEGX_BUNDLE_SIZE_IN_BYTES; 50 info->octets_per_byte = 1; 51 info->display_endian = BFD_ENDIAN_LITTLE; 52 53 /* Parse the instructions in the bundle. */ 54 num_instructions = 55 parse_insn_tilegx (bfd_getl64 (opbuf), memaddr, decoded); 56 57 /* Print the instructions in the bundle. */ 58 info->fprintf_func (info->stream, "{ "); 59 num_printed = 0; 60 61 /* Determine which nop opcode is used for padding and should be skipped. */ 62 padding_mnemonic = TILEGX_OPC_FNOP; 63 for (i = 0; i < num_instructions; i++) 64 { 65 if (!decoded[i].opcode->can_bundle) 66 { 67 /* Instructions that cannot be bundled are padded out with nops, 68 rather than fnops. Displaying them is always clutter. */ 69 padding_mnemonic = TILEGX_OPC_NOP; 70 break; 71 } 72 } 73 74 for (i = 0; i < num_instructions; i++) 75 { 76 const struct tilegx_opcode *opcode = decoded[i].opcode; 77 const char *name; 78 int j; 79 80 /* Do not print out fnops, unless everything is an fnop, in 81 which case we will print out just the last one. */ 82 if (opcode->mnemonic == padding_mnemonic 83 && (num_printed > 0 || i + 1 < num_instructions)) 84 continue; 85 86 if (num_printed > 0) 87 info->fprintf_func (info->stream, " ; "); 88 ++num_printed; 89 90 name = opcode->name; 91 if (name == NULL) 92 name = "<invalid>"; 93 info->fprintf_func (info->stream, "%s", name); 94 95 for (j = 0; j < opcode->num_operands; j++) 96 { 97 bfd_vma num; 98 const struct tilegx_operand *op; 99 const char *spr_name; 100 101 if (j > 0) 102 info->fprintf_func (info->stream, ","); 103 info->fprintf_func (info->stream, " "); 104 105 num = decoded[i].operand_values[j]; 106 107 op = decoded[i].operands[j]; 108 switch (op->type) 109 { 110 case TILEGX_OP_TYPE_REGISTER: 111 info->fprintf_func (info->stream, "%s", 112 tilegx_register_names[(int) num]); 113 break; 114 case TILEGX_OP_TYPE_SPR: 115 spr_name = get_tilegx_spr_name (num); 116 if (spr_name != NULL) 117 info->fprintf_func (info->stream, "%s", spr_name); 118 else 119 info->fprintf_func (info->stream, "%d", (int)num); 120 break; 121 case TILEGX_OP_TYPE_IMMEDIATE: 122 info->fprintf_func (info->stream, "%d", (int)num); 123 break; 124 case TILEGX_OP_TYPE_ADDRESS: 125 info->print_address_func (num, info); 126 break; 127 default: 128 abort (); 129 } 130 } 131 } 132 info->fprintf_func (info->stream, " }"); 133 134 return TILEGX_BUNDLE_SIZE_IN_BYTES; 135 } 136
