1 /* Disassembler code for Renesas RX. 2 Copyright (C) 2008-2016 Free Software Foundation, Inc. 3 Contributed by Red Hat. 4 Written by DJ Delorie. 5 6 This file is part of the GNU opcodes library. 7 8 This library is free software; you can redistribute it and/or modify 9 it under the terms of the GNU General Public License as published by 10 the Free Software Foundation; either version 3, or (at your option) 11 any later version. 12 13 It is distributed in the hope that it will be useful, but WITHOUT 14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY 15 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public 16 License for more details. 17 18 You should have received a copy of the GNU General Public License 19 along with this program; if not, write to the Free Software 20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 21 MA 02110-1301, USA. */ 22 23 #include "sysdep.h" 24 #include <stdio.h> 25 26 #include "bfd.h" 27 #include "dis-asm.h" 28 #include "opcode/rx.h" 29 30 typedef struct 31 { 32 bfd_vma pc; 33 disassemble_info * dis; 34 } RX_Data; 35 36 static int 37 rx_get_byte (void * vdata) 38 { 39 bfd_byte buf[1]; 40 RX_Data *rx_data = (RX_Data *) vdata; 41 42 rx_data->dis->read_memory_func (rx_data->pc, 43 buf, 44 1, 45 rx_data->dis); 46 47 rx_data->pc ++; 48 return buf[0]; 49 } 50 51 static char const * size_names[RX_MAX_SIZE] = 52 { 53 "", ".b", ".ub", ".b", ".w", ".uw", ".w", ".a", ".l", "<error>" 54 }; 55 56 static char const * opsize_names[RX_MAX_SIZE] = 57 { 58 "", ".b", ".b", ".b", ".w", ".w", ".w", ".a", ".l", "<error>" 59 }; 60 61 static char const * register_names[] = 62 { 63 /* general registers */ 64 "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", 65 "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15", 66 /* control register */ 67 "psw", "pc", "usp", "fpsw", NULL, NULL, NULL, NULL, 68 "bpsw", "bpc", "isp", "fintv", "intb", "extb", NULL, NULL, 69 "a0", "a1", NULL, NULL, NULL, NULL, NULL, NULL, 70 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, 71 }; 72 73 static char const * condition_names[] = 74 { 75 /* condition codes */ 76 "eq", "ne", "c", "nc", "gtu", "leu", "pz", "n", 77 "ge", "lt", "gt", "le", "o", "no", "<invalid>", "<invalid>" 78 }; 79 80 static const char * flag_names[] = 81 { 82 "c", "z", "s", "o", "", "", "", "", 83 "", "", "", "", "", "", "", "", 84 "i", "u", "", "", "", "", "", "" 85 "", "", "", "", "", "", "", "", 86 }; 87 88 int 89 print_insn_rx (bfd_vma addr, disassemble_info * dis) 90 { 91 int rv; 92 RX_Data rx_data; 93 RX_Opcode_Decoded opcode; 94 const char * s; 95 96 rx_data.pc = addr; 97 rx_data.dis = dis; 98 99 rv = rx_decode_opcode (addr, &opcode, rx_get_byte, &rx_data); 100 101 dis->bytes_per_line = 10; 102 103 #define PR (dis->fprintf_func) 104 #define PS (dis->stream) 105 #define PC(c) PR (PS, "%c", c) 106 107 /* Detect illegal instructions. */ 108 if (opcode.op[0].size == RX_Bad_Size 109 || register_names [opcode.op[0].reg] == NULL 110 || register_names [opcode.op[1].reg] == NULL 111 || register_names [opcode.op[2].reg] == NULL) 112 { 113 bfd_byte buf[10]; 114 int i; 115 116 PR (PS, ".byte "); 117 rx_data.dis->read_memory_func (rx_data.pc - rv, buf, rv, rx_data.dis); 118 119 for (i = 0 ; i < rv; i++) 120 PR (PS, "0x%02x ", buf[i]); 121 return rv; 122 } 123 124 for (s = opcode.syntax; *s; s++) 125 { 126 if (*s != '%') 127 { 128 PC (*s); 129 } 130 else 131 { 132 RX_Opcode_Operand * oper; 133 int do_size = 0; 134 int do_hex = 0; 135 int do_addr = 0; 136 137 s ++; 138 139 if (*s == 'S') 140 { 141 do_size = 1; 142 s++; 143 } 144 if (*s == 'x') 145 { 146 do_hex = 1; 147 s++; 148 } 149 if (*s == 'a') 150 { 151 do_addr = 1; 152 s++; 153 } 154 155 switch (*s) 156 { 157 case '%': 158 PC ('%'); 159 break; 160 161 case 's': 162 PR (PS, "%s", opsize_names[opcode.size]); 163 break; 164 165 case '0': 166 case '1': 167 case '2': 168 oper = opcode.op + *s - '0'; 169 if (do_size) 170 { 171 if (oper->type == RX_Operand_Indirect || oper->type == RX_Operand_Zero_Indirect) 172 PR (PS, "%s", size_names[oper->size]); 173 } 174 else 175 switch (oper->type) 176 { 177 case RX_Operand_Immediate: 178 if (do_addr) 179 dis->print_address_func (oper->addend, dis); 180 else if (do_hex 181 || oper->addend > 999 182 || oper->addend < -999) 183 PR (PS, "%#x", oper->addend); 184 else 185 PR (PS, "%d", oper->addend); 186 break; 187 case RX_Operand_Register: 188 case RX_Operand_TwoReg: 189 PR (PS, "%s", register_names[oper->reg]); 190 break; 191 case RX_Operand_Indirect: 192 PR (PS, "%d[%s]", oper->addend, register_names[oper->reg]); 193 break; 194 case RX_Operand_Zero_Indirect: 195 PR (PS, "[%s]", register_names[oper->reg]); 196 break; 197 case RX_Operand_Postinc: 198 PR (PS, "[%s+]", register_names[oper->reg]); 199 break; 200 case RX_Operand_Predec: 201 PR (PS, "[-%s]", register_names[oper->reg]); 202 break; 203 case RX_Operand_Condition: 204 PR (PS, "%s", condition_names[oper->reg]); 205 break; 206 case RX_Operand_Flag: 207 PR (PS, "%s", flag_names[oper->reg]); 208 break; 209 default: 210 PR (PS, "[???]"); 211 break; 212 } 213 } 214 } 215 } 216 217 return rv; 218 } 219