1 //===-- DisassemblerLLVMC.cpp -----------------------------------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 #include "DisassemblerLLVMC.h"
12 #include "llvm-c/Disassembler.h"
13 #include "llvm/MC/MCAsmInfo.h"
14 #include "llvm/MC/MCContext.h"
15 #include "llvm/MC/MCDisassembler.h"
16 #include "llvm/MC/MCExternalSymbolizer.h"
17 #include "llvm/MC/MCInst.h"
18 #include "llvm/MC/MCInstPrinter.h"
19 #include "llvm/MC/MCInstrInfo.h"
20 #include "llvm/MC/MCRegisterInfo.h"
21 #include "llvm/MC/MCRelocationInfo.h"
22 #include "llvm/MC/MCSubtargetInfo.h"
23 #include "llvm/Support/ErrorHandling.h"
24 #include "llvm/Support/TargetRegistry.h"
25 #include "llvm/Support/TargetSelect.h"
26 #include "llvm/ADT/SmallString.h"
29 #include "lldb/Core/Address.h"
30 #include "lldb/Core/DataExtractor.h"
31 #include "lldb/Core/Module.h"
32 #include "lldb/Core/Stream.h"
33 #include "lldb/Symbol/SymbolContext.h"
34 #include "lldb/Target/ExecutionContext.h"
35 #include "lldb/Target/Process.h"
36 #include "lldb/Target/RegisterContext.h"
37 #include "lldb/Target/SectionLoadList.h"
38 #include "lldb/Target/Target.h"
39 #include "lldb/Target/StackFrame.h"
41 #include "lldb/Core/RegularExpression.h"
44 using namespace lldb_private;
46 class InstructionLLVMC : public lldb_private::Instruction
49 InstructionLLVMC (DisassemblerLLVMC &disasm,
50 const lldb_private::Address &address,
51 AddressClass addr_class) :
52 Instruction (address, addr_class),
53 m_disasm_sp (disasm.shared_from_this()),
54 m_does_branch (eLazyBoolCalculate),
56 m_using_file_addr (false)
68 if (m_does_branch == eLazyBoolCalculate)
70 GetDisassemblerLLVMC().Lock(this, NULL);
72 if (m_opcode.GetData(data))
74 bool is_alternate_isa;
75 lldb::addr_t pc = m_address.GetFileAddress();
77 DisassemblerLLVMC::LLVMCDisassembler *mc_disasm_ptr = GetDisasmToUse (is_alternate_isa);
78 const uint8_t *opcode_data = data.GetDataStart();
79 const size_t opcode_data_len = data.GetByteSize();
81 const size_t inst_size = mc_disasm_ptr->GetMCInst (opcode_data,
85 // Be conservative, if we didn't understand the instruction, say it might branch...
87 m_does_branch = eLazyBoolYes;
90 const bool can_branch = mc_disasm_ptr->CanBranch(inst);
92 m_does_branch = eLazyBoolYes;
94 m_does_branch = eLazyBoolNo;
97 GetDisassemblerLLVMC().Unlock();
99 return m_does_branch == eLazyBoolYes;
102 DisassemblerLLVMC::LLVMCDisassembler *
103 GetDisasmToUse (bool &is_alternate_isa)
105 is_alternate_isa = false;
106 DisassemblerLLVMC &llvm_disasm = GetDisassemblerLLVMC();
107 if (llvm_disasm.m_alternate_disasm_ap.get() != NULL)
109 const AddressClass address_class = GetAddressClass ();
111 if (address_class == eAddressClassCodeAlternateISA)
113 is_alternate_isa = true;
114 return llvm_disasm.m_alternate_disasm_ap.get();
117 return llvm_disasm.m_disasm_ap.get();
121 Decode (const lldb_private::Disassembler &disassembler,
122 const lldb_private::DataExtractor &data,
123 lldb::offset_t data_offset)
125 // All we have to do is read the opcode which can be easy for some
128 DisassemblerLLVMC &llvm_disasm = GetDisassemblerLLVMC();
129 const ArchSpec &arch = llvm_disasm.GetArchitecture();
130 const lldb::ByteOrder byte_order = data.GetByteOrder();
132 const uint32_t min_op_byte_size = arch.GetMinimumOpcodeByteSize();
133 const uint32_t max_op_byte_size = arch.GetMaximumOpcodeByteSize();
134 if (min_op_byte_size == max_op_byte_size)
136 // Fixed size instructions, just read that amount of data.
137 if (!data.ValidOffsetForDataOfSize(data_offset, min_op_byte_size))
140 switch (min_op_byte_size)
143 m_opcode.SetOpcode8 (data.GetU8 (&data_offset), byte_order);
148 m_opcode.SetOpcode16 (data.GetU16 (&data_offset), byte_order);
153 m_opcode.SetOpcode32 (data.GetU32 (&data_offset), byte_order);
158 m_opcode.SetOpcode64 (data.GetU64 (&data_offset), byte_order);
163 m_opcode.SetOpcodeBytes(data.PeekData(data_offset, min_op_byte_size), min_op_byte_size);
170 bool is_alternate_isa = false;
171 DisassemblerLLVMC::LLVMCDisassembler *mc_disasm_ptr = GetDisasmToUse (is_alternate_isa);
173 const llvm::Triple::ArchType machine = arch.GetMachine();
174 if (machine == llvm::Triple::arm || machine == llvm::Triple::thumb)
176 if (machine == llvm::Triple::thumb || is_alternate_isa)
178 uint32_t thumb_opcode = data.GetU16(&data_offset);
179 if ((thumb_opcode & 0xe000) != 0xe000 || ((thumb_opcode & 0x1800u) == 0))
181 m_opcode.SetOpcode16 (thumb_opcode, byte_order);
187 thumb_opcode |= data.GetU16(&data_offset);
188 m_opcode.SetOpcode16_2 (thumb_opcode, byte_order);
194 m_opcode.SetOpcode32 (data.GetU32(&data_offset), byte_order);
200 // The opcode isn't evenly sized, so we need to actually use the llvm
201 // disassembler to parse it and get the size.
202 uint8_t *opcode_data = const_cast<uint8_t *>(data.PeekData (data_offset, 1));
203 const size_t opcode_data_len = data.BytesLeft(data_offset);
204 const addr_t pc = m_address.GetFileAddress();
207 llvm_disasm.Lock(this, NULL);
208 const size_t inst_size = mc_disasm_ptr->GetMCInst(opcode_data,
212 llvm_disasm.Unlock();
217 m_opcode.SetOpcodeBytes(opcode_data, inst_size);
222 return m_opcode.GetByteSize();
226 AppendComment (std::string &description)
228 if (m_comment.empty())
229 m_comment.swap (description);
232 m_comment.append(", ");
233 m_comment.append(description);
238 CalculateMnemonicOperandsAndComment (const lldb_private::ExecutionContext *exe_ctx)
241 const AddressClass address_class = GetAddressClass ();
243 if (m_opcode.GetData(data))
245 char out_string[512];
247 DisassemblerLLVMC &llvm_disasm = GetDisassemblerLLVMC();
249 DisassemblerLLVMC::LLVMCDisassembler *mc_disasm_ptr;
251 if (address_class == eAddressClassCodeAlternateISA)
252 mc_disasm_ptr = llvm_disasm.m_alternate_disasm_ap.get();
254 mc_disasm_ptr = llvm_disasm.m_disasm_ap.get();
256 lldb::addr_t pc = m_address.GetFileAddress();
257 m_using_file_addr = true;
259 const bool data_from_file = GetDisassemblerLLVMC().m_data_from_file;
260 bool use_hex_immediates = true;
261 Disassembler::HexImmediateStyle hex_style = Disassembler::eHexStyleC;
265 Target *target = exe_ctx->GetTargetPtr();
268 use_hex_immediates = target->GetUseHexImmediates();
269 hex_style = target->GetHexImmediateStyle();
273 const lldb::addr_t load_addr = m_address.GetLoadAddress(target);
274 if (load_addr != LLDB_INVALID_ADDRESS)
277 m_using_file_addr = false;
283 llvm_disasm.Lock(this, exe_ctx);
285 const uint8_t *opcode_data = data.GetDataStart();
286 const size_t opcode_data_len = data.GetByteSize();
288 size_t inst_size = mc_disasm_ptr->GetMCInst (opcode_data,
295 mc_disasm_ptr->SetStyle(use_hex_immediates, hex_style);
296 mc_disasm_ptr->PrintMCInst(inst, out_string, sizeof(out_string));
299 llvm_disasm.Unlock();
303 m_comment.assign ("unknown opcode");
304 inst_size = m_opcode.GetByteSize();
305 StreamString mnemonic_strm;
306 lldb::offset_t offset = 0;
307 lldb::ByteOrder byte_order = data.GetByteOrder();
312 const uint8_t uval8 = data.GetU8 (&offset);
313 m_opcode.SetOpcode8 (uval8, byte_order);
314 m_opcode_name.assign (".byte");
315 mnemonic_strm.Printf("0x%2.2x", uval8);
320 const uint16_t uval16 = data.GetU16(&offset);
321 m_opcode.SetOpcode16(uval16, byte_order);
322 m_opcode_name.assign (".short");
323 mnemonic_strm.Printf("0x%4.4x", uval16);
328 const uint32_t uval32 = data.GetU32(&offset);
329 m_opcode.SetOpcode32(uval32, byte_order);
330 m_opcode_name.assign (".long");
331 mnemonic_strm.Printf("0x%8.8x", uval32);
336 const uint64_t uval64 = data.GetU64(&offset);
337 m_opcode.SetOpcode64(uval64, byte_order);
338 m_opcode_name.assign (".quad");
339 mnemonic_strm.Printf("0x%16.16" PRIx64, uval64);
347 const uint8_t *bytes = data.PeekData(offset, inst_size);
350 m_opcode_name.assign (".byte");
351 m_opcode.SetOpcodeBytes(bytes, inst_size);
352 mnemonic_strm.Printf("0x%2.2x", bytes[0]);
353 for (uint32_t i=1; i<inst_size; ++i)
354 mnemonic_strm.Printf(" 0x%2.2x", bytes[i]);
358 m_mnemonics.swap(mnemonic_strm.GetString());
363 if (m_does_branch == eLazyBoolCalculate)
365 const bool can_branch = mc_disasm_ptr->CanBranch(inst);
367 m_does_branch = eLazyBoolYes;
369 m_does_branch = eLazyBoolNo;
374 static RegularExpression s_regex("[ \t]*([^ ^\t]+)[ \t]*([^ ^\t].*)?", REG_EXTENDED);
376 RegularExpression::Match matches(3);
378 if (s_regex.Execute(out_string, &matches))
380 matches.GetMatchAtIndex(out_string, 1, m_opcode_name);
381 matches.GetMatchAtIndex(out_string, 2, m_mnemonics);
393 UsingFileAddress() const
395 return m_using_file_addr;
400 return m_opcode.GetByteSize();
404 GetDisassemblerLLVMC ()
406 return *(DisassemblerLLVMC *)m_disasm_sp.get();
410 DisassemblerSP m_disasm_sp; // for ownership
411 LazyBool m_does_branch;
413 bool m_using_file_addr;
418 DisassemblerLLVMC::LLVMCDisassembler::LLVMCDisassembler (const char *triple, unsigned flavor, DisassemblerLLVMC &owner):
422 const llvm::Target *curr_target = llvm::TargetRegistry::lookupTarget(triple, Error);
429 m_instr_info_ap.reset(curr_target->createMCInstrInfo());
430 m_reg_info_ap.reset (curr_target->createMCRegInfo(triple));
432 std::string features_str;
434 m_subtarget_info_ap.reset(curr_target->createMCSubtargetInfo(triple, "",
437 std::unique_ptr<llvm::MCRegisterInfo> reg_info(curr_target->createMCRegInfo(triple));
438 m_asm_info_ap.reset(curr_target->createMCAsmInfo(*reg_info, triple));
440 if (m_instr_info_ap.get() == NULL || m_reg_info_ap.get() == NULL || m_subtarget_info_ap.get() == NULL || m_asm_info_ap.get() == NULL)
446 m_context_ap.reset(new llvm::MCContext(m_asm_info_ap.get(), m_reg_info_ap.get(), 0));
448 m_disasm_ap.reset(curr_target->createMCDisassembler(*m_subtarget_info_ap.get(), *m_context_ap.get()));
449 if (m_disasm_ap.get() && m_context_ap.get())
451 std::unique_ptr<llvm::MCRelocationInfo> RelInfo(curr_target->createMCRelocationInfo(triple, *m_context_ap.get()));
457 std::unique_ptr<llvm::MCSymbolizer> symbolizer_up(curr_target->createMCSymbolizer(triple, NULL,
458 DisassemblerLLVMC::SymbolLookupCallback,
460 m_context_ap.get(), RelInfo.release()));
461 m_disasm_ap->setSymbolizer(std::move(symbolizer_up));
464 unsigned asm_printer_variant;
466 asm_printer_variant = m_asm_info_ap->getAssemblerDialect();
469 asm_printer_variant = flavor;
472 m_instr_printer_ap.reset(curr_target->createMCInstPrinter(asm_printer_variant,
473 *m_asm_info_ap.get(),
474 *m_instr_info_ap.get(),
475 *m_reg_info_ap.get(),
476 *m_subtarget_info_ap.get()));
477 if (m_instr_printer_ap.get() == NULL)
487 DisassemblerLLVMC::LLVMCDisassembler::~LLVMCDisassembler()
492 DisassemblerLLVMC::LLVMCDisassembler::GetMCInst (const uint8_t *opcode_data,
493 size_t opcode_data_len,
495 llvm::MCInst &mc_inst)
497 llvm::ArrayRef<uint8_t> data(opcode_data, opcode_data_len);
498 llvm::MCDisassembler::DecodeStatus status;
500 uint64_t new_inst_size;
501 status = m_disasm_ap->getInstruction(mc_inst,
507 if (status == llvm::MCDisassembler::Success)
508 return new_inst_size;
514 DisassemblerLLVMC::LLVMCDisassembler::PrintMCInst (llvm::MCInst &mc_inst,
518 llvm::StringRef unused_annotations;
519 llvm::SmallString<64> inst_string;
520 llvm::raw_svector_ostream inst_stream(inst_string);
521 m_instr_printer_ap->printInst (&mc_inst, inst_stream, unused_annotations);
523 const size_t output_size = std::min(dst_len - 1, inst_string.size());
524 std::memcpy(dst, inst_string.data(), output_size);
525 dst[output_size] = '\0';
531 DisassemblerLLVMC::LLVMCDisassembler::SetStyle (bool use_hex_immed, HexImmediateStyle hex_style)
533 m_instr_printer_ap->setPrintImmHex(use_hex_immed);
536 case eHexStyleC: m_instr_printer_ap->setPrintImmHex(llvm::HexStyle::C); break;
537 case eHexStyleAsm: m_instr_printer_ap->setPrintImmHex(llvm::HexStyle::Asm); break;
542 DisassemblerLLVMC::LLVMCDisassembler::CanBranch (llvm::MCInst &mc_inst)
544 return m_instr_info_ap->get(mc_inst.getOpcode()).mayAffectControlFlow(mc_inst, *m_reg_info_ap.get());
548 DisassemblerLLVMC::FlavorValidForArchSpec (const lldb_private::ArchSpec &arch, const char *flavor)
550 llvm::Triple triple = arch.GetTriple();
551 if (flavor == NULL || strcmp (flavor, "default") == 0)
554 if (triple.getArch() == llvm::Triple::x86 || triple.getArch() == llvm::Triple::x86_64)
556 if (strcmp (flavor, "intel") == 0 || strcmp (flavor, "att") == 0)
567 DisassemblerLLVMC::CreateInstance (const ArchSpec &arch, const char *flavor)
569 if (arch.GetTriple().getArch() != llvm::Triple::UnknownArch)
571 std::unique_ptr<DisassemblerLLVMC> disasm_ap (new DisassemblerLLVMC(arch, flavor));
573 if (disasm_ap.get() && disasm_ap->IsValid())
574 return disasm_ap.release();
579 DisassemblerLLVMC::DisassemblerLLVMC (const ArchSpec &arch, const char *flavor_string) :
580 Disassembler(arch, flavor_string),
583 m_data_from_file (false)
585 if (!FlavorValidForArchSpec (arch, m_flavor.c_str()))
587 m_flavor.assign("default");
590 const char *triple = arch.GetTriple().getTriple().c_str();
591 unsigned flavor = ~0U;
593 // So far the only supported flavor is "intel" on x86. The base class will set this
594 // correctly coming in.
595 if (arch.GetTriple().getArch() == llvm::Triple::x86
596 || arch.GetTriple().getArch() == llvm::Triple::x86_64)
598 if (m_flavor == "intel")
602 else if (m_flavor == "att")
608 ArchSpec thumb_arch(arch);
609 if (arch.GetTriple().getArch() == llvm::Triple::arm)
611 std::string thumb_arch_name (thumb_arch.GetTriple().getArchName().str());
612 // Replace "arm" with "thumb" so we get all thumb variants correct
613 if (thumb_arch_name.size() > 3)
615 thumb_arch_name.erase(0,3);
616 thumb_arch_name.insert(0, "thumb");
620 thumb_arch_name = "thumbv7";
622 thumb_arch.GetTriple().setArchName(llvm::StringRef(thumb_arch_name.c_str()));
625 // Cortex-M3 devices (e.g. armv7m) can only execute thumb (T2) instructions,
626 // so hardcode the primary disassembler to thumb mode. Same for Cortex-M4 (armv7em).
628 // Handle the Cortex-M0 (armv6m) the same; the ISA is a subset of the T and T32
629 // instructions defined in ARMv7-A.
631 if (arch.GetTriple().getArch() == llvm::Triple::arm
632 && (arch.GetCore() == ArchSpec::Core::eCore_arm_armv7m
633 || arch.GetCore() == ArchSpec::Core::eCore_arm_armv7em
634 || arch.GetCore() == ArchSpec::Core::eCore_arm_armv6m))
636 triple = thumb_arch.GetTriple().getTriple().c_str();
639 m_disasm_ap.reset (new LLVMCDisassembler(triple, flavor, *this));
640 if (!m_disasm_ap->IsValid())
642 // We use m_disasm_ap.get() to tell whether we are valid or not, so if this isn't good for some reason,
643 // we reset it, and then we won't be valid and FindPlugin will fail and we won't get used.
647 // For arm CPUs that can execute arm or thumb instructions, also create a thumb instruction disassembler.
648 if (arch.GetTriple().getArch() == llvm::Triple::arm)
650 std::string thumb_triple(thumb_arch.GetTriple().getTriple());
651 m_alternate_disasm_ap.reset(new LLVMCDisassembler(thumb_triple.c_str(), flavor, *this));
652 if (!m_alternate_disasm_ap->IsValid())
655 m_alternate_disasm_ap.reset();
660 DisassemblerLLVMC::~DisassemblerLLVMC()
665 DisassemblerLLVMC::DecodeInstructions (const Address &base_addr,
666 const DataExtractor& data,
667 lldb::offset_t data_offset,
668 size_t num_instructions,
673 m_instruction_list.Clear();
678 m_data_from_file = data_from_file;
679 uint32_t data_cursor = data_offset;
680 const size_t data_byte_size = data.GetByteSize();
681 uint32_t instructions_parsed = 0;
682 Address inst_addr(base_addr);
684 while (data_cursor < data_byte_size && instructions_parsed < num_instructions)
687 AddressClass address_class = eAddressClassCode;
689 if (m_alternate_disasm_ap.get() != NULL)
690 address_class = inst_addr.GetAddressClass ();
692 InstructionSP inst_sp(new InstructionLLVMC(*this,
699 uint32_t inst_size = inst_sp->Decode(*this, data, data_cursor);
704 m_instruction_list.Append(inst_sp);
705 data_cursor += inst_size;
706 inst_addr.Slide(inst_size);
707 instructions_parsed++;
710 return data_cursor - data_offset;
714 DisassemblerLLVMC::Initialize()
716 PluginManager::RegisterPlugin (GetPluginNameStatic(),
717 "Disassembler that uses LLVM MC to disassemble i386, x86_64, ARM, and ARM64.",
720 llvm::InitializeAllTargetInfos();
721 llvm::InitializeAllTargetMCs();
722 llvm::InitializeAllAsmParsers();
723 llvm::InitializeAllDisassemblers();
727 DisassemblerLLVMC::Terminate()
729 PluginManager::UnregisterPlugin (CreateInstance);
734 DisassemblerLLVMC::GetPluginNameStatic()
736 static ConstString g_name("llvm-mc");
740 int DisassemblerLLVMC::OpInfoCallback (void *disassembler,
747 return static_cast<DisassemblerLLVMC*>(disassembler)->OpInfo (pc,
754 const char *DisassemblerLLVMC::SymbolLookupCallback (void *disassembler,
760 return static_cast<DisassemblerLLVMC*>(disassembler)->SymbolLookup(value,
766 int DisassemblerLLVMC::OpInfo (uint64_t PC,
777 memset (tag_bug, 0, sizeof(::LLVMOpInfo1));
783 const char *DisassemblerLLVMC::SymbolLookup (uint64_t value,
790 if (m_exe_ctx && m_inst)
792 //std::string remove_this_prior_to_checkin;
793 Target *target = m_exe_ctx ? m_exe_ctx->GetTargetPtr() : NULL;
794 Address value_so_addr;
795 if (m_inst->UsingFileAddress())
797 ModuleSP module_sp(m_inst->GetAddress().GetModule());
799 module_sp->ResolveFileAddress(value, value_so_addr);
801 else if (target && !target->GetSectionLoadList().IsEmpty())
803 target->GetSectionLoadList().ResolveLoadAddress(value, value_so_addr);
806 if (value_so_addr.IsValid() && value_so_addr.GetSection())
810 value_so_addr.Dump (&ss,
812 Address::DumpStyleResolvedDescriptionNoFunctionArguments,
813 Address::DumpStyleSectionNameOffset);
815 if (!ss.GetString().empty())
817 // If Address::Dump returned a multi-line description, most commonly seen when we
818 // have multiple levels of inlined functions at an address, only show the first line.
819 std::string &str(ss.GetString());
820 size_t first_eol_char = str.find_first_of ("\r\n");
821 if (first_eol_char != std::string::npos)
823 str.erase (first_eol_char);
825 m_inst->AppendComment(ss.GetString());
831 *type_ptr = LLVMDisassembler_ReferenceType_InOut_None;
836 //------------------------------------------------------------------
837 // PluginInterface protocol
838 //------------------------------------------------------------------
840 DisassemblerLLVMC::GetPluginName()
842 return GetPluginNameStatic();
846 DisassemblerLLVMC::GetPluginVersion()