X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=opcodes%2Frx-dis.c;h=80144bb6127d9034999394f817fb2d2340e30ca0;hb=fb46334198d8d4f82133033758cb75f086d864ad;hp=cab0385d3c3d3770d12e6fa862784d5c11b8b718;hpb=f04265eceb78a33e452faa8727562e96af374f39;p=deliverable%2Fbinutils-gdb.git diff --git a/opcodes/rx-dis.c b/opcodes/rx-dis.c index cab0385d3c..80144bb612 100644 --- a/opcodes/rx-dis.c +++ b/opcodes/rx-dis.c @@ -1,5 +1,5 @@ /* Disassembler code for Renesas RX. - Copyright (C) 2008-2015 Free Software Foundation, Inc. + Copyright (C) 2008-2019 Free Software Foundation, Inc. Contributed by Red Hat. Written by DJ Delorie. @@ -26,6 +26,10 @@ #include "bfd.h" #include "dis-asm.h" #include "opcode/rx.h" +#include "libiberty.h" +#include "opintl.h" + +#include typedef struct { @@ -33,16 +37,30 @@ typedef struct disassemble_info * dis; } RX_Data; +struct private +{ + OPCODES_SIGJMP_BUF bailout; +}; + static int rx_get_byte (void * vdata) { bfd_byte buf[1]; RX_Data *rx_data = (RX_Data *) vdata; + int status; - rx_data->dis->read_memory_func (rx_data->pc, - buf, - 1, - rx_data->dis); + status = rx_data->dis->read_memory_func (rx_data->pc, + buf, + 1, + rx_data->dis); + if (status != 0) + { + struct private *priv = (struct private *) rx_data->dis->private_data; + + rx_data->dis->memory_error_func (status, rx_data->pc, + rx_data->dis); + OPCODES_SIGLONGJMP (priv->bailout, 1); + } rx_data->pc ++; return buf[0]; @@ -50,31 +68,31 @@ rx_get_byte (void * vdata) static char const * size_names[RX_MAX_SIZE] = { - "", ".b", ".ub", ".b", ".w", ".uw", ".w", ".a", ".l", "" + "", ".b", ".ub", ".b", ".w", ".uw", ".w", ".a", ".l", "", "" }; static char const * opsize_names[RX_MAX_SIZE] = { - "", ".b", ".b", ".b", ".w", ".w", ".w", ".a", ".l", "" + "", ".b", ".b", ".b", ".w", ".w", ".w", ".a", ".l", ".d", "" }; static char const * register_names[] = { - /* general registers */ + /* General registers. */ "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15", - /* control register */ + /* Control registers. */ "psw", "pc", "usp", "fpsw", NULL, NULL, NULL, NULL, - "bpsw", "bpc", "isp", "fintv", "intb", NULL, NULL, NULL, + "bpsw", "bpc", "isp", "fintv", "intb", "extb", NULL, NULL, + "a0", "a1", NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, - NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL }; static char const * condition_names[] = { - /* condition codes */ + /* Condition codes. */ "eq", "ne", "c", "nc", "gtu", "leu", "pz", "n", - "ge", "lt", "gt", "le", "o", "no", "always", "never" + "ge", "lt", "gt", "le", "o", "no", "", "" }; static const char * flag_names[] = @@ -85,6 +103,115 @@ static const char * flag_names[] = "", "", "", "", "", "", "", "", }; +static const char * double_register_names[] = +{ + "dr0", "dr1", "dr2", "dr3", "dr4", "dr5", "dr6", "dr7", + "dr8", "dr9", "dr10", "dr11", "dr12", "dr13", "dr14", "dr15", +}; + +static const char * double_register_high_names[] = +{ + "drh0", "drh1", "drh2", "drh3", "drh4", "drh5", "drh6", "drh7", + "drh8", "drh9", "drh10", "drh11", "drh12", "drh13", "drh14", "drh15", +}; + +static const char * double_register_low_names[] = +{ + "drl0", "drl1", "drl2", "drl3", "drl4", "drl5", "drl6", "drl7", + "drl8", "drl9", "drl10", "drl11", "drl12", "drl13", "drl14", "drl15", +}; + +static const char * double_control_register_names[] = +{ + "dpsw", "dcmr", "decnt", "depc", +}; + +static const char * double_condition_names[] = +{ + "", "un", "eq", "", "lt", "", "le", +}; + +static inline const char * +get_register_name (unsigned int reg) +{ + if (reg < ARRAY_SIZE (register_names)) + return register_names[reg]; + return _(""); +} + +static inline const char * +get_condition_name (unsigned int cond) +{ + if (cond < ARRAY_SIZE (condition_names)) + return condition_names[cond]; + return _(""); +} + +static inline const char * +get_flag_name (unsigned int flag) +{ + if (flag < ARRAY_SIZE (flag_names)) + return flag_names[flag]; + return _(""); +} + +static inline const char * +get_double_register_name (unsigned int reg) +{ + if (reg < ARRAY_SIZE (double_register_names)) + return double_register_names[reg]; + return _(""); +} + +static inline const char * +get_double_register_high_name (unsigned int reg) +{ + if (reg < ARRAY_SIZE (double_register_high_names)) + return double_register_high_names[reg]; + return _(""); +} + +static inline const char * +get_double_register_low_name (unsigned int reg) +{ + if (reg < ARRAY_SIZE (double_register_low_names)) + return double_register_low_names[reg]; + return _(""); +} + +static inline const char * +get_double_control_register_name (unsigned int reg) +{ + if (reg < ARRAY_SIZE (double_control_register_names)) + return double_control_register_names[reg]; + return _(""); +} + +static inline const char * +get_double_condition_name (unsigned int cond) +{ + if (cond < ARRAY_SIZE (double_condition_names)) + return double_condition_names[cond]; + return _(""); +} + +static inline const char * +get_opsize_name (unsigned int opsize) +{ + if (opsize < ARRAY_SIZE (opsize_names)) + return opsize_names[opsize]; + return _(""); +} + +static inline const char * +get_size_name (unsigned int size) +{ + if (size < ARRAY_SIZE (size_names)) + return size_names[size]; + return _(""); +} + + int print_insn_rx (bfd_vma addr, disassemble_info * dis) { @@ -92,10 +219,18 @@ print_insn_rx (bfd_vma addr, disassemble_info * dis) RX_Data rx_data; RX_Opcode_Decoded opcode; const char * s; + struct private priv; + dis->private_data = (PTR) &priv; rx_data.pc = addr; rx_data.dis = dis; + if (OPCODES_SIGSETJMP (priv.bailout) != 0) + { + /* Error return. */ + return -1; + } + rv = rx_decode_opcode (addr, &opcode, rx_get_byte, &rx_data); dis->bytes_per_line = 10; @@ -159,17 +294,36 @@ print_insn_rx (bfd_vma addr, disassemble_info * dis) break; case 's': - PR (PS, "%s", opsize_names[opcode.size]); + PR (PS, "%s", get_opsize_name (opcode.size)); break; + case 'b': + s ++; + if (*s == 'f') + { + int imm = opcode.op[2].addend; + int slsb, dlsb, width; + + dlsb = (imm >> 5) & 0x1f; + slsb = (imm & 0x1f); + slsb = (slsb >= 0x10?(slsb ^ 0x1f) + 1:slsb); + slsb = dlsb - slsb; + slsb = (slsb < 0?-slsb:slsb); + width = ((imm >> 10) & 0x1f) - dlsb; + PR (PS, "#%d, #%d, #%d, %s, %s", + slsb, dlsb, width, + get_register_name (opcode.op[1].reg), + get_register_name (opcode.op[0].reg)); + } + break; case '0': case '1': case '2': - oper = opcode.op + *s - '0'; + oper = opcode.op + (*s - '0'); if (do_size) { - if (oper->type == RX_Operand_Indirect) - PR (PS, "%s", size_names[oper->size]); + if (oper->type == RX_Operand_Indirect || oper->type == RX_Operand_Zero_Indirect) + PR (PS, "%s", get_size_name (oper->size)); } else switch (oper->type) @@ -186,25 +340,40 @@ print_insn_rx (bfd_vma addr, disassemble_info * dis) break; case RX_Operand_Register: case RX_Operand_TwoReg: - PR (PS, "%s", register_names[oper->reg]); + PR (PS, "%s", get_register_name (oper->reg)); break; case RX_Operand_Indirect: - if (oper->addend) - PR (PS, "%d[%s]", oper->addend, register_names[oper->reg]); - else - PR (PS, "[%s]", register_names[oper->reg]); + PR (PS, "%d[%s]", oper->addend, get_register_name (oper->reg)); + break; + case RX_Operand_Zero_Indirect: + PR (PS, "[%s]", get_register_name (oper->reg)); break; case RX_Operand_Postinc: - PR (PS, "[%s+]", register_names[oper->reg]); + PR (PS, "[%s+]", get_register_name (oper->reg)); break; case RX_Operand_Predec: - PR (PS, "[-%s]", register_names[oper->reg]); + PR (PS, "[-%s]", get_register_name (oper->reg)); break; case RX_Operand_Condition: - PR (PS, "%s", condition_names[oper->reg]); + PR (PS, "%s", get_condition_name (oper->reg)); break; case RX_Operand_Flag: - PR (PS, "%s", flag_names[oper->reg]); + PR (PS, "%s", get_flag_name (oper->reg)); + break; + case RX_Operand_DoubleReg: + PR (PS, "%s", get_double_register_name (oper->reg)); + break; + case RX_Operand_DoubleRegH: + PR (PS, "%s", get_double_register_high_name (oper->reg)); + break; + case RX_Operand_DoubleRegL: + PR (PS, "%s", get_double_register_low_name (oper->reg)); + break; + case RX_Operand_DoubleCReg: + PR (PS, "%s", get_double_control_register_name (oper->reg)); + break; + case RX_Operand_DoubleCond: + PR (PS, "%s", get_double_condition_name (oper->reg)); break; default: PR (PS, "[???]");