| Index: src/arm/disasm-arm.cc
 | 
| diff --git a/src/arm/disasm-arm.cc b/src/arm/disasm-arm.cc
 | 
| new file mode 100644
 | 
| index 0000000000000000000000000000000000000000..3b7474dbacfe647e1a0fa3127dcac548576ce153
 | 
| --- /dev/null
 | 
| +++ b/src/arm/disasm-arm.cc
 | 
| @@ -0,0 +1,900 @@
 | 
| +// Copyright 2007-2008 the V8 project authors. All rights reserved.
 | 
| +// Redistribution and use in source and binary forms, with or without
 | 
| +// modification, are permitted provided that the following conditions are
 | 
| +// met:
 | 
| +//
 | 
| +//     * Redistributions of source code must retain the above copyright
 | 
| +//       notice, this list of conditions and the following disclaimer.
 | 
| +//     * Redistributions in binary form must reproduce the above
 | 
| +//       copyright notice, this list of conditions and the following
 | 
| +//       disclaimer in the documentation and/or other materials provided
 | 
| +//       with the distribution.
 | 
| +//     * Neither the name of Google Inc. nor the names of its
 | 
| +//       contributors may be used to endorse or promote products derived
 | 
| +//       from this software without specific prior written permission.
 | 
| +//
 | 
| +// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 | 
| +// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 | 
| +// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 | 
| +// A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 | 
| +// OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 | 
| +// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 | 
| +// LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 | 
| +// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 | 
| +// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 | 
| +// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 | 
| +// OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 | 
| +
 | 
| +// A Disassembler object is used to disassemble a block of code instruction by
 | 
| +// instruction. The default implementation of the NameConverter object can be
 | 
| +// overriden to modify register names or to do symbol lookup on addresses.
 | 
| +//
 | 
| +// The example below will disassemble a block of code and print it to stdout.
 | 
| +//
 | 
| +//   NameConverter converter;
 | 
| +//   Disassembler d(converter);
 | 
| +//   for (byte* pc = begin; pc < end;) {
 | 
| +//     char buffer[128];
 | 
| +//     buffer[0] = '\0';
 | 
| +//     byte* prev_pc = pc;
 | 
| +//     pc += d.InstructionDecode(buffer, sizeof buffer, pc);
 | 
| +//     printf("%p    %08x      %s\n",
 | 
| +//            prev_pc, *reinterpret_cast<int32_t*>(prev_pc), buffer);
 | 
| +//   }
 | 
| +//
 | 
| +// The Disassembler class also has a convenience method to disassemble a block
 | 
| +// of code into a FILE*, meaning that the above functionality could also be
 | 
| +// achieved by just calling Disassembler::Disassemble(stdout, begin, end);
 | 
| +
 | 
| +
 | 
| +#include <assert.h>
 | 
| +#include <stdio.h>
 | 
| +#include <stdarg.h>
 | 
| +#include <string.h>
 | 
| +#ifndef WIN32
 | 
| +#include <stdint.h>
 | 
| +#endif
 | 
| +
 | 
| +#include "v8.h"
 | 
| +
 | 
| +#include "disasm.h"
 | 
| +#include "macro-assembler.h"
 | 
| +#include "platform.h"
 | 
| +
 | 
| +
 | 
| +namespace assembler { namespace arm {
 | 
| +
 | 
| +namespace v8i = v8::internal;
 | 
| +
 | 
| +
 | 
| +//------------------------------------------------------------------------------
 | 
| +
 | 
| +// Decoder decodes and disassembles instructions into an output buffer.
 | 
| +// It uses the converter to convert register names and call destinations into
 | 
| +// more informative description.
 | 
| +class Decoder {
 | 
| + public:
 | 
| +  Decoder(const disasm::NameConverter& converter,
 | 
| +          v8::internal::Vector<char> out_buffer)
 | 
| +    : converter_(converter),
 | 
| +      out_buffer_(out_buffer),
 | 
| +      out_buffer_pos_(0) {
 | 
| +    out_buffer_[out_buffer_pos_] = '\0';
 | 
| +  }
 | 
| +
 | 
| +  ~Decoder() {}
 | 
| +
 | 
| +  // Writes one disassembled instruction into 'buffer' (0-terminated).
 | 
| +  // Returns the length of the disassembled machine instruction in bytes.
 | 
| +  int InstructionDecode(byte* instruction);
 | 
| +
 | 
| + private:
 | 
| +  // Bottleneck functions to print into the out_buffer.
 | 
| +  void PrintChar(const char ch);
 | 
| +  void Print(const char* str);
 | 
| +
 | 
| +  // Printing of common values.
 | 
| +  void PrintRegister(int reg);
 | 
| +  void PrintCondition(Instr* instr);
 | 
| +  void PrintShiftRm(Instr* instr);
 | 
| +  void PrintShiftImm(Instr* instr);
 | 
| +  void PrintPU(Instr* instr);
 | 
| +  void PrintSoftwareInterrupt(SoftwareInterruptCodes swi);
 | 
| +
 | 
| +  // Handle formatting of instructions and their options.
 | 
| +  int FormatRegister(Instr* instr, const char* option);
 | 
| +  int FormatOption(Instr* instr, const char* option);
 | 
| +  void Format(Instr* instr, const char* format);
 | 
| +  void Unknown(Instr* instr);
 | 
| +
 | 
| +  // Each of these functions decodes one particular instruction type, a 3-bit
 | 
| +  // field in the instruction encoding.
 | 
| +  // Types 0 and 1 are combined as they are largely the same except for the way
 | 
| +  // they interpret the shifter operand.
 | 
| +  void DecodeType01(Instr* instr);
 | 
| +  void DecodeType2(Instr* instr);
 | 
| +  void DecodeType3(Instr* instr);
 | 
| +  void DecodeType4(Instr* instr);
 | 
| +  void DecodeType5(Instr* instr);
 | 
| +  void DecodeType6(Instr* instr);
 | 
| +  void DecodeType7(Instr* instr);
 | 
| +
 | 
| +  const disasm::NameConverter& converter_;
 | 
| +  v8::internal::Vector<char> out_buffer_;
 | 
| +  int out_buffer_pos_;
 | 
| +
 | 
| +  DISALLOW_COPY_AND_ASSIGN(Decoder);
 | 
| +};
 | 
| +
 | 
| +
 | 
| +// Support for assertions in the Decoder formatting functions.
 | 
| +#define STRING_STARTS_WITH(string, compare_string) \
 | 
| +  (strncmp(string, compare_string, strlen(compare_string)) == 0)
 | 
| +
 | 
| +
 | 
| +// Append the ch to the output buffer.
 | 
| +void Decoder::PrintChar(const char ch) {
 | 
| +  out_buffer_[out_buffer_pos_++] = ch;
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Append the str to the output buffer.
 | 
| +void Decoder::Print(const char* str) {
 | 
| +  char cur = *str++;
 | 
| +  while (cur != '\0' && (out_buffer_pos_ < (out_buffer_.length() - 1))) {
 | 
| +    PrintChar(cur);
 | 
| +    cur = *str++;
 | 
| +  }
 | 
| +  out_buffer_[out_buffer_pos_] = 0;
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// These condition names are defined in a way to match the native disassembler
 | 
| +// formatting. See for example the command "objdump -d <binary file>".
 | 
| +static const char* cond_names[max_condition] = {
 | 
| +  "eq", "ne", "cs" , "cc" , "mi" , "pl" , "vs" , "vc" ,
 | 
| +  "hi", "ls", "ge", "lt", "gt", "le", "", "invalid",
 | 
| +};
 | 
| +
 | 
| +
 | 
| +// Print the condition guarding the instruction.
 | 
| +void Decoder::PrintCondition(Instr* instr) {
 | 
| +  Print(cond_names[instr->ConditionField()]);
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Print the register name according to the active name converter.
 | 
| +void Decoder::PrintRegister(int reg) {
 | 
| +  Print(converter_.NameOfCPURegister(reg));
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// These shift names are defined in a way to match the native disassembler
 | 
| +// formatting. See for example the command "objdump -d <binary file>".
 | 
| +static const char* shift_names[max_shift] = {
 | 
| +  "lsl", "lsr", "asr", "ror"
 | 
| +};
 | 
| +
 | 
| +
 | 
| +// Print the register shift operands for the instruction. Generally used for
 | 
| +// data processing instructions.
 | 
| +void Decoder::PrintShiftRm(Instr* instr) {
 | 
| +  Shift shift = instr->ShiftField();
 | 
| +  int shift_amount = instr->ShiftAmountField();
 | 
| +  int rm = instr->RmField();
 | 
| +
 | 
| +  PrintRegister(rm);
 | 
| +
 | 
| +  if ((instr->RegShiftField() == 0) && (shift == LSL) && (shift_amount == 0)) {
 | 
| +    // Special case for using rm only.
 | 
| +    return;
 | 
| +  }
 | 
| +  if (instr->RegShiftField() == 0) {
 | 
| +    // by immediate
 | 
| +    if ((shift == ROR) && (shift_amount == 0)) {
 | 
| +      Print(", RRX");
 | 
| +      return;
 | 
| +    } else if (((shift == LSR) || (shift == ASR)) && (shift_amount == 0)) {
 | 
| +      shift_amount = 32;
 | 
| +    }
 | 
| +    out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                         ", %s #%d",
 | 
| +                                         shift_names[shift], shift_amount);
 | 
| +  } else {
 | 
| +    // by register
 | 
| +    int rs = instr->RsField();
 | 
| +    out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                         ", %s ", shift_names[shift]);
 | 
| +    PrintRegister(rs);
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Print the immediate operand for the instruction. Generally used for data
 | 
| +// processing instructions.
 | 
| +void Decoder::PrintShiftImm(Instr* instr) {
 | 
| +  int rotate = instr->RotateField() * 2;
 | 
| +  int immed8 = instr->Immed8Field();
 | 
| +  int imm = (immed8 >> rotate) | (immed8 << (32 - rotate));
 | 
| +  out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                       "#%d", imm);
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Print PU formatting to reduce complexity of FormatOption.
 | 
| +void Decoder::PrintPU(Instr* instr) {
 | 
| +  switch (instr->PUField()) {
 | 
| +    case 0: {
 | 
| +      Print("da");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 1: {
 | 
| +      Print("ia");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 2: {
 | 
| +      Print("db");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 3: {
 | 
| +      Print("ib");
 | 
| +      break;
 | 
| +    }
 | 
| +    default: {
 | 
| +      UNREACHABLE();
 | 
| +      break;
 | 
| +    }
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Print SoftwareInterrupt codes. Factoring this out reduces the complexity of
 | 
| +// the FormatOption method.
 | 
| +void Decoder::PrintSoftwareInterrupt(SoftwareInterruptCodes swi) {
 | 
| +  switch (swi) {
 | 
| +    case call_rt_r5:
 | 
| +      Print("call_rt_r5");
 | 
| +      return;
 | 
| +    case call_rt_r2:
 | 
| +      Print("call_rt_r2");
 | 
| +      return;
 | 
| +    case break_point:
 | 
| +      Print("break_point");
 | 
| +      return;
 | 
| +    case simulator_fp_add:
 | 
| +      Print("simulator_fp_add");
 | 
| +      return;
 | 
| +    case simulator_fp_mul:
 | 
| +      Print("simulator_fp_mul");
 | 
| +      return;
 | 
| +    case simulator_fp_sub:
 | 
| +      Print("simulator_fp_sub");
 | 
| +      return;
 | 
| +    default:
 | 
| +      out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                           "%d",
 | 
| +                                           swi);
 | 
| +      return;
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Handle all register based formatting in this function to reduce the
 | 
| +// complexity of FormatOption.
 | 
| +int Decoder::FormatRegister(Instr* instr, const char* format) {
 | 
| +  ASSERT(format[0] == 'r');
 | 
| +  if (format[1] == 'n') {  // 'rn: Rn register
 | 
| +    int reg = instr->RnField();
 | 
| +    PrintRegister(reg);
 | 
| +    return 2;
 | 
| +  } else if (format[1] == 'd') {  // 'rd: Rd register
 | 
| +    int reg = instr->RdField();
 | 
| +    PrintRegister(reg);
 | 
| +    return 2;
 | 
| +  } else if (format[1] == 's') {  // 'rs: Rs register
 | 
| +    int reg = instr->RsField();
 | 
| +    PrintRegister(reg);
 | 
| +    return 2;
 | 
| +  } else if (format[1] == 'm') {  // 'rm: Rm register
 | 
| +    int reg = instr->RmField();
 | 
| +    PrintRegister(reg);
 | 
| +    return 2;
 | 
| +  } else if (format[1] == 'l') {
 | 
| +    // 'rlist: register list for load and store multiple instructions
 | 
| +    ASSERT(STRING_STARTS_WITH(format, "rlist"));
 | 
| +    int rlist = instr->RlistField();
 | 
| +    int reg = 0;
 | 
| +    Print("{");
 | 
| +    // Print register list in ascending order, by scanning the bit mask.
 | 
| +    while (rlist != 0) {
 | 
| +      if ((rlist & 1) != 0) {
 | 
| +        PrintRegister(reg);
 | 
| +        if ((rlist >> 1) != 0) {
 | 
| +          Print(", ");
 | 
| +        }
 | 
| +      }
 | 
| +      reg++;
 | 
| +      rlist >>= 1;
 | 
| +    }
 | 
| +    Print("}");
 | 
| +    return 5;
 | 
| +  }
 | 
| +  UNREACHABLE();
 | 
| +  return -1;
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// FormatOption takes a formatting string and interprets it based on
 | 
| +// the current instructions. The format string points to the first
 | 
| +// character of the option string (the option escape has already been
 | 
| +// consumed by the caller.)  FormatOption returns the number of
 | 
| +// characters that were consumed from the formatting string.
 | 
| +int Decoder::FormatOption(Instr* instr, const char* format) {
 | 
| +  switch (format[0]) {
 | 
| +    case 'a': {  // 'a: accumulate multiplies
 | 
| +      if (instr->Bit(21) == 0) {
 | 
| +        Print("ul");
 | 
| +      } else {
 | 
| +        Print("la");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    case 'b': {  // 'b: byte loads or stores
 | 
| +      if (instr->HasB()) {
 | 
| +        Print("b");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    case 'c': {  // 'cond: conditional execution
 | 
| +      ASSERT(STRING_STARTS_WITH(format, "cond"));
 | 
| +      PrintCondition(instr);
 | 
| +      return 4;
 | 
| +    }
 | 
| +    case 'h': {  // 'h: halfword operation for extra loads and stores
 | 
| +      if (instr->HasH()) {
 | 
| +        Print("h");
 | 
| +      } else {
 | 
| +        Print("b");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    case 'l': {  // 'l: branch and link
 | 
| +      if (instr->HasLink()) {
 | 
| +        Print("l");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    case 'm': {
 | 
| +      if (format[1] == 'e') {  // 'memop: load/store instructions
 | 
| +        ASSERT(STRING_STARTS_WITH(format, "memop"));
 | 
| +        if (instr->HasL()) {
 | 
| +          Print("ldr");
 | 
| +        } else {
 | 
| +          Print("str");
 | 
| +        }
 | 
| +        return 5;
 | 
| +      }
 | 
| +      // 'msg: for simulator break instructions
 | 
| +      ASSERT(STRING_STARTS_WITH(format, "msg"));
 | 
| +      byte* str =
 | 
| +          reinterpret_cast<byte*>(instr->InstructionBits() & 0x0fffffff);
 | 
| +      out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                           "%s", converter_.NameInCode(str));
 | 
| +      return 3;
 | 
| +    }
 | 
| +    case 'o': {
 | 
| +      if (format[3] == '1') {
 | 
| +        // 'off12: 12-bit offset for load and store instructions
 | 
| +        ASSERT(STRING_STARTS_WITH(format, "off12"));
 | 
| +        out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                             "%d", instr->Offset12Field());
 | 
| +        return 5;
 | 
| +      }
 | 
| +      // 'off8: 8-bit offset for extra load and store instructions
 | 
| +      ASSERT(STRING_STARTS_WITH(format, "off8"));
 | 
| +      int offs8 = (instr->ImmedHField() << 4) | instr->ImmedLField();
 | 
| +      out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                           "%d", offs8);
 | 
| +      return 4;
 | 
| +    }
 | 
| +    case 'p': {  // 'pu: P and U bits for load and store instructions
 | 
| +      ASSERT(STRING_STARTS_WITH(format, "pu"));
 | 
| +      PrintPU(instr);
 | 
| +      return 2;
 | 
| +    }
 | 
| +    case 'r': {
 | 
| +      return FormatRegister(instr, format);
 | 
| +    }
 | 
| +    case 's': {
 | 
| +      if (format[1] == 'h') {  // 'shift_op or 'shift_rm
 | 
| +        if (format[6] == 'o') {  // 'shift_op
 | 
| +          ASSERT(STRING_STARTS_WITH(format, "shift_op"));
 | 
| +          if (instr->TypeField() == 0) {
 | 
| +            PrintShiftRm(instr);
 | 
| +          } else {
 | 
| +            ASSERT(instr->TypeField() == 1);
 | 
| +            PrintShiftImm(instr);
 | 
| +          }
 | 
| +          return 8;
 | 
| +        } else {  // 'shift_rm
 | 
| +          ASSERT(STRING_STARTS_WITH(format, "shift_rm"));
 | 
| +          PrintShiftRm(instr);
 | 
| +          return 8;
 | 
| +        }
 | 
| +      } else if (format[1] == 'w') {  // 'swi
 | 
| +        ASSERT(STRING_STARTS_WITH(format, "swi"));
 | 
| +        PrintSoftwareInterrupt(instr->SwiField());
 | 
| +        return 3;
 | 
| +      } else if (format[1] == 'i') {  // 'sign: signed extra loads and stores
 | 
| +        ASSERT(STRING_STARTS_WITH(format, "sign"));
 | 
| +        if (instr->HasSign()) {
 | 
| +          Print("s");
 | 
| +        }
 | 
| +        return 4;
 | 
| +      }
 | 
| +      // 's: S field of data processing instructions
 | 
| +      if (instr->HasS()) {
 | 
| +        Print("s");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    case 't': {  // 'target: target of branch instructions
 | 
| +      ASSERT(STRING_STARTS_WITH(format, "target"));
 | 
| +      int off = (instr->SImmed24Field() << 2) + 8;
 | 
| +      out_buffer_pos_ += v8i::OS::SNPrintF(
 | 
| +          out_buffer_ + out_buffer_pos_,
 | 
| +          "%+d -> %s",
 | 
| +          off,
 | 
| +          converter_.NameOfAddress(reinterpret_cast<byte*>(instr) + off));
 | 
| +      return 6;
 | 
| +    }
 | 
| +    case 'u': {  // 'u: signed or unsigned multiplies
 | 
| +      if (instr->Bit(22) == 0) {
 | 
| +        Print("u");
 | 
| +      } else {
 | 
| +        Print("s");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    case 'w': {  // 'w: W field of load and store instructions
 | 
| +      if (instr->HasW()) {
 | 
| +        Print("!");
 | 
| +      }
 | 
| +      return 1;
 | 
| +    }
 | 
| +    default: {
 | 
| +      UNREACHABLE();
 | 
| +      break;
 | 
| +    }
 | 
| +  }
 | 
| +  UNREACHABLE();
 | 
| +  return -1;
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Format takes a formatting string for a whole instruction and prints it into
 | 
| +// the output buffer. All escaped options are handed to FormatOption to be
 | 
| +// parsed further.
 | 
| +void Decoder::Format(Instr* instr, const char* format) {
 | 
| +  char cur = *format++;
 | 
| +  while ((cur != 0) && (out_buffer_pos_ < (out_buffer_.length() - 1))) {
 | 
| +    if (cur == '\'') {  // Single quote is used as the formatting escape.
 | 
| +      format += FormatOption(instr, format);
 | 
| +    } else {
 | 
| +      out_buffer_[out_buffer_pos_++] = cur;
 | 
| +    }
 | 
| +    cur = *format++;
 | 
| +  }
 | 
| +  out_buffer_[out_buffer_pos_]  = '\0';
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// For currently unimplemented decodings the disassembler calls Unknown(instr)
 | 
| +// which will just print "unknown" of the instruction bits.
 | 
| +void Decoder::Unknown(Instr* instr) {
 | 
| +  Format(instr, "unknown");
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType01(Instr* instr) {
 | 
| +  int type = instr->TypeField();
 | 
| +  if ((type == 0) && instr->IsSpecialType0()) {
 | 
| +    // multiply instruction or extra loads and stores
 | 
| +    if (instr->Bits(7, 4) == 9) {
 | 
| +      if (instr->Bit(24) == 0) {
 | 
| +        // multiply instructions
 | 
| +        if (instr->Bit(23) == 0) {
 | 
| +          if (instr->Bit(21) == 0) {
 | 
| +            Format(instr, "mul'cond's 'rd, 'rm, 'rs");
 | 
| +          } else {
 | 
| +            Format(instr, "mla'cond's 'rd, 'rm, 'rs, 'rn");
 | 
| +          }
 | 
| +        } else {
 | 
| +          Format(instr, "'um'al'cond's 'rn, 'rd, 'rs, 'rm");
 | 
| +        }
 | 
| +      } else {
 | 
| +        Unknown(instr);  // not used by V8
 | 
| +      }
 | 
| +    } else {
 | 
| +      // extra load/store instructions
 | 
| +      switch (instr->PUField()) {
 | 
| +        case 0: {
 | 
| +          if (instr->Bit(22) == 0) {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn], -'rm");
 | 
| +          } else {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn], #-'off8");
 | 
| +          }
 | 
| +          break;
 | 
| +        }
 | 
| +        case 1: {
 | 
| +          if (instr->Bit(22) == 0) {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn], +'rm");
 | 
| +          } else {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn], #+'off8");
 | 
| +          }
 | 
| +          break;
 | 
| +        }
 | 
| +        case 2: {
 | 
| +          if (instr->Bit(22) == 0) {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn, -'rm]'w");
 | 
| +          } else {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn, #-'off8]'w");
 | 
| +          }
 | 
| +          break;
 | 
| +        }
 | 
| +        case 3: {
 | 
| +          if (instr->Bit(22) == 0) {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn, +'rm]'w");
 | 
| +          } else {
 | 
| +            Format(instr, "'memop'cond'sign'h 'rd, ['rn, #+'off8]'w");
 | 
| +          }
 | 
| +          break;
 | 
| +        }
 | 
| +        default: {
 | 
| +          // The PU field is a 2-bit field.
 | 
| +          UNREACHABLE();
 | 
| +          break;
 | 
| +        }
 | 
| +      }
 | 
| +      return;
 | 
| +    }
 | 
| +  } else {
 | 
| +    switch (instr->OpcodeField()) {
 | 
| +      case AND: {
 | 
| +        Format(instr, "and'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case EOR: {
 | 
| +        Format(instr, "eor'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case SUB: {
 | 
| +        Format(instr, "sub'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case RSB: {
 | 
| +        Format(instr, "rsb'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case ADD: {
 | 
| +        Format(instr, "add'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case ADC: {
 | 
| +        Format(instr, "adc'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case SBC: {
 | 
| +        Format(instr, "sbc'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case RSC: {
 | 
| +        Format(instr, "rsc'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case TST: {
 | 
| +        if (instr->HasS()) {
 | 
| +          Format(instr, "tst'cond 'rn, 'shift_op");
 | 
| +        } else {
 | 
| +          Unknown(instr);  // not used by V8
 | 
| +        }
 | 
| +        break;
 | 
| +      }
 | 
| +      case TEQ: {
 | 
| +        if (instr->HasS()) {
 | 
| +          Format(instr, "teq'cond 'rn, 'shift_op");
 | 
| +        } else {
 | 
| +          Unknown(instr);  // not used by V8
 | 
| +        }
 | 
| +        break;
 | 
| +      }
 | 
| +      case CMP: {
 | 
| +        if (instr->HasS()) {
 | 
| +          Format(instr, "cmp'cond 'rn, 'shift_op");
 | 
| +        } else {
 | 
| +          Unknown(instr);  // not used by V8
 | 
| +        }
 | 
| +        break;
 | 
| +      }
 | 
| +      case CMN: {
 | 
| +        if (instr->HasS()) {
 | 
| +          Format(instr, "cmn'cond 'rn, 'shift_op");
 | 
| +        } else {
 | 
| +          Unknown(instr);  // not used by V8
 | 
| +        }
 | 
| +        break;
 | 
| +      }
 | 
| +      case ORR: {
 | 
| +        Format(instr, "orr'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case MOV: {
 | 
| +        Format(instr, "mov'cond's 'rd, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case BIC: {
 | 
| +        Format(instr, "bic'cond's 'rd, 'rn, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      case MVN: {
 | 
| +        Format(instr, "mvn'cond's 'rd, 'shift_op");
 | 
| +        break;
 | 
| +      }
 | 
| +      default: {
 | 
| +        // The Opcode field is a 4-bit field.
 | 
| +        UNREACHABLE();
 | 
| +        break;
 | 
| +      }
 | 
| +    }
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType2(Instr* instr) {
 | 
| +  switch (instr->PUField()) {
 | 
| +    case 0: {
 | 
| +      if (instr->HasW()) {
 | 
| +        Unknown(instr);  // not used in V8
 | 
| +      }
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn], #-'off12");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 1: {
 | 
| +      if (instr->HasW()) {
 | 
| +        Unknown(instr);  // not used in V8
 | 
| +      }
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn], #+'off12");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 2: {
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn, #-'off12]'w");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 3: {
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn, #+'off12]'w");
 | 
| +      break;
 | 
| +    }
 | 
| +    default: {
 | 
| +      // The PU field is a 2-bit field.
 | 
| +      UNREACHABLE();
 | 
| +      break;
 | 
| +    }
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType3(Instr* instr) {
 | 
| +  switch (instr->PUField()) {
 | 
| +    case 0: {
 | 
| +      ASSERT(!instr->HasW());
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn], -'shift_rm");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 1: {
 | 
| +      ASSERT(!instr->HasW());
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn], +'shift_rm");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 2: {
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn, -'shift_rm]'w");
 | 
| +      break;
 | 
| +    }
 | 
| +    case 3: {
 | 
| +      Format(instr, "'memop'cond'b 'rd, ['rn, +'shift_rm]'w");
 | 
| +      break;
 | 
| +    }
 | 
| +    default: {
 | 
| +      // The PU field is a 2-bit field.
 | 
| +      UNREACHABLE();
 | 
| +      break;
 | 
| +    }
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType4(Instr* instr) {
 | 
| +  ASSERT(instr->Bit(22) == 0);  // Privileged mode currently not supported.
 | 
| +  if (instr->HasL()) {
 | 
| +    Format(instr, "ldm'cond'pu 'rn'w, 'rlist");
 | 
| +  } else {
 | 
| +    Format(instr, "stm'cond'pu 'rn'w, 'rlist");
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType5(Instr* instr) {
 | 
| +  Format(instr, "b'l'cond 'target");
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType6(Instr* instr) {
 | 
| +  // Coprocessor instructions currently not supported.
 | 
| +  Unknown(instr);
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Decoder::DecodeType7(Instr* instr) {
 | 
| +  if (instr->Bit(24) == 1) {
 | 
| +    Format(instr, "swi'cond 'swi");
 | 
| +  } else {
 | 
| +    // Coprocessor instructions currently not supported.
 | 
| +    Unknown(instr);
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +// Disassemble the instruction at *instr_ptr into the output buffer.
 | 
| +int Decoder::InstructionDecode(byte* instr_ptr) {
 | 
| +  Instr* instr = Instr::At(instr_ptr);
 | 
| +  // Print raw instruction bytes.
 | 
| +  out_buffer_pos_ += v8i::OS::SNPrintF(out_buffer_ + out_buffer_pos_,
 | 
| +                                       "%08x       ",
 | 
| +                                       instr->InstructionBits());
 | 
| +  if (instr->ConditionField() == special_condition) {
 | 
| +    Format(instr, "break 'msg");
 | 
| +    return Instr::kInstrSize;
 | 
| +  }
 | 
| +  switch (instr->TypeField()) {
 | 
| +    case 0:
 | 
| +    case 1: {
 | 
| +      DecodeType01(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    case 2: {
 | 
| +      DecodeType2(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    case 3: {
 | 
| +      DecodeType3(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    case 4: {
 | 
| +      DecodeType4(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    case 5: {
 | 
| +      DecodeType5(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    case 6: {
 | 
| +      DecodeType6(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    case 7: {
 | 
| +      DecodeType7(instr);
 | 
| +      break;
 | 
| +    }
 | 
| +    default: {
 | 
| +      // The type field is 3-bits in the ARM encoding.
 | 
| +      UNREACHABLE();
 | 
| +      break;
 | 
| +    }
 | 
| +  }
 | 
| +  return Instr::kInstrSize;
 | 
| +}
 | 
| +
 | 
| +
 | 
| +} }  // namespace assembler::arm
 | 
| +
 | 
| +
 | 
| +
 | 
| +//------------------------------------------------------------------------------
 | 
| +
 | 
| +namespace disasm {
 | 
| +
 | 
| +namespace v8i = v8::internal;
 | 
| +
 | 
| +
 | 
| +static const int kMaxRegisters = 16;
 | 
| +
 | 
| +// These register names are defined in a way to match the native disassembler
 | 
| +// formatting. See for example the command "objdump -d <binary file>".
 | 
| +static const char* reg_names[kMaxRegisters] = {
 | 
| +  "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",
 | 
| +  "r8", "r9", "sl", "fp", "ip", "sp", "lr", "pc",
 | 
| +};
 | 
| +
 | 
| +
 | 
| +const char* NameConverter::NameOfAddress(byte* addr) const {
 | 
| +  static v8::internal::EmbeddedVector<char, 32> tmp_buffer;
 | 
| +  v8::internal::OS::SNPrintF(tmp_buffer, "%p", addr);
 | 
| +  return tmp_buffer.start();
 | 
| +}
 | 
| +
 | 
| +
 | 
| +const char* NameConverter::NameOfConstant(byte* addr) const {
 | 
| +  return NameOfAddress(addr);
 | 
| +}
 | 
| +
 | 
| +
 | 
| +const char* NameConverter::NameOfCPURegister(int reg) const {
 | 
| +  const char* result;
 | 
| +  if ((0 <= reg) && (reg < kMaxRegisters)) {
 | 
| +    result = reg_names[reg];
 | 
| +  } else {
 | 
| +    result = "noreg";
 | 
| +  }
 | 
| +  return result;
 | 
| +}
 | 
| +
 | 
| +
 | 
| +const char* NameConverter::NameOfByteCPURegister(int reg) const {
 | 
| +  UNREACHABLE();  // ARM does not have the concept of a byte register
 | 
| +  return "nobytereg";
 | 
| +}
 | 
| +
 | 
| +
 | 
| +const char* NameConverter::NameOfXMMRegister(int reg) const {
 | 
| +  UNREACHABLE();  // ARM does not have any XMM registers
 | 
| +  return "noxmmreg";
 | 
| +}
 | 
| +
 | 
| +
 | 
| +const char* NameConverter::NameInCode(byte* addr) const {
 | 
| +  // The default name converter is called for unknown code. So we will not try
 | 
| +  // to access any memory.
 | 
| +  return "";
 | 
| +}
 | 
| +
 | 
| +
 | 
| +//------------------------------------------------------------------------------
 | 
| +
 | 
| +Disassembler::Disassembler(const NameConverter& converter)
 | 
| +    : converter_(converter) {}
 | 
| +
 | 
| +
 | 
| +Disassembler::~Disassembler() {}
 | 
| +
 | 
| +
 | 
| +int Disassembler::InstructionDecode(v8::internal::Vector<char> buffer,
 | 
| +                                    byte* instruction) {
 | 
| +  assembler::arm::Decoder d(converter_, buffer);
 | 
| +  return d.InstructionDecode(instruction);
 | 
| +}
 | 
| +
 | 
| +
 | 
| +int Disassembler::ConstantPoolSizeAt(byte* instruction) {
 | 
| +  int instruction_bits = *(reinterpret_cast<int*>(instruction));
 | 
| +  if ((instruction_bits & 0xfff00000) == 0x03000000) {
 | 
| +    return instruction_bits & 0x0000ffff;
 | 
| +  } else {
 | 
| +    return -1;
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +void Disassembler::Disassemble(FILE* f, byte* begin, byte* end) {
 | 
| +  NameConverter converter;
 | 
| +  Disassembler d(converter);
 | 
| +  for (byte* pc = begin; pc < end;) {
 | 
| +    v8::internal::EmbeddedVector<char, 128> buffer;
 | 
| +    buffer[0] = '\0';
 | 
| +    byte* prev_pc = pc;
 | 
| +    pc += d.InstructionDecode(buffer, pc);
 | 
| +    fprintf(f, "%p    %08x      %s\n",
 | 
| +            prev_pc, *reinterpret_cast<int32_t*>(prev_pc), buffer.start());
 | 
| +  }
 | 
| +}
 | 
| +
 | 
| +
 | 
| +}  // namespace disasm
 | 
| 
 |