forked from OSchip/llvm-project
				
			
		
			
				
	
	
		
			432 lines
		
	
	
		
			13 KiB
		
	
	
	
		
			C++
		
	
	
	
			
		
		
	
	
			432 lines
		
	
	
		
			13 KiB
		
	
	
	
		
			C++
		
	
	
	
| //===-- LibStdcpp.cpp -------------------------------------------*- C++ -*-===//
 | |
| //
 | |
| //                     The LLVM Compiler Infrastructure
 | |
| //
 | |
| // This file is distributed under the University of Illinois Open Source
 | |
| // License. See LICENSE.TXT for details.
 | |
| //
 | |
| //===----------------------------------------------------------------------===//
 | |
| 
 | |
| #include "LibStdcpp.h"
 | |
| 
 | |
| // C Includes
 | |
| // C++ Includes
 | |
| // Other libraries and framework includes
 | |
| // Project includes
 | |
| #include "lldb/Core/ValueObject.h"
 | |
| #include "lldb/Core/ValueObjectConstResult.h"
 | |
| #include "lldb/DataFormatters/StringPrinter.h"
 | |
| #include "lldb/DataFormatters/VectorIterator.h"
 | |
| #include "lldb/Symbol/ClangASTContext.h"
 | |
| #include "lldb/Target/Target.h"
 | |
| #include "lldb/Utility/DataBufferHeap.h"
 | |
| #include "lldb/Utility/Endian.h"
 | |
| #include "lldb/Utility/Status.h"
 | |
| #include "lldb/Utility/Stream.h"
 | |
| 
 | |
| using namespace lldb;
 | |
| using namespace lldb_private;
 | |
| using namespace lldb_private::formatters;
 | |
| 
 | |
| namespace {
 | |
| 
 | |
| class LibstdcppMapIteratorSyntheticFrontEnd : public SyntheticChildrenFrontEnd {
 | |
|   /*
 | |
|    (std::_Rb_tree_iterator<std::pair<const int, std::basic_string<char,
 | |
|    std::char_traits<char>, std::allocator<char> > > >) ibeg = {
 | |
|    (_Base_ptr) _M_node = 0x0000000100103910 {
 | |
|    (std::_Rb_tree_color) _M_color = _S_black
 | |
|    (std::_Rb_tree_node_base::_Base_ptr) _M_parent = 0x00000001001038c0
 | |
|    (std::_Rb_tree_node_base::_Base_ptr) _M_left = 0x0000000000000000
 | |
|    (std::_Rb_tree_node_base::_Base_ptr) _M_right = 0x0000000000000000
 | |
|    }
 | |
|    }
 | |
|    */
 | |
| 
 | |
| public:
 | |
|   explicit LibstdcppMapIteratorSyntheticFrontEnd(lldb::ValueObjectSP valobj_sp);
 | |
| 
 | |
|   size_t CalculateNumChildren() override;
 | |
| 
 | |
|   lldb::ValueObjectSP GetChildAtIndex(size_t idx) override;
 | |
| 
 | |
|   bool Update() override;
 | |
| 
 | |
|   bool MightHaveChildren() override;
 | |
| 
 | |
|   size_t GetIndexOfChildWithName(const ConstString &name) override;
 | |
| 
 | |
| private:
 | |
|   ExecutionContextRef m_exe_ctx_ref;
 | |
|   lldb::addr_t m_pair_address;
 | |
|   CompilerType m_pair_type;
 | |
|   lldb::ValueObjectSP m_pair_sp;
 | |
| };
 | |
| 
 | |
| class LibStdcppSharedPtrSyntheticFrontEnd : public SyntheticChildrenFrontEnd {
 | |
| public:
 | |
|   explicit LibStdcppSharedPtrSyntheticFrontEnd(lldb::ValueObjectSP valobj_sp);
 | |
| 
 | |
|   size_t CalculateNumChildren() override;
 | |
| 
 | |
|   lldb::ValueObjectSP GetChildAtIndex(size_t idx) override;
 | |
| 
 | |
|   bool Update() override;
 | |
| 
 | |
|   bool MightHaveChildren() override;
 | |
| 
 | |
|   size_t GetIndexOfChildWithName(const ConstString &name) override;
 | |
| };
 | |
| 
 | |
| } // end of anonymous namespace
 | |
| 
 | |
| LibstdcppMapIteratorSyntheticFrontEnd::LibstdcppMapIteratorSyntheticFrontEnd(
 | |
|     lldb::ValueObjectSP valobj_sp)
 | |
|     : SyntheticChildrenFrontEnd(*valobj_sp), m_exe_ctx_ref(), m_pair_address(0),
 | |
|       m_pair_type(), m_pair_sp() {
 | |
|   if (valobj_sp)
 | |
|     Update();
 | |
| }
 | |
| 
 | |
| bool LibstdcppMapIteratorSyntheticFrontEnd::Update() {
 | |
|   ValueObjectSP valobj_sp = m_backend.GetSP();
 | |
|   if (!valobj_sp)
 | |
|     return false;
 | |
| 
 | |
|   TargetSP target_sp(valobj_sp->GetTargetSP());
 | |
| 
 | |
|   if (!target_sp)
 | |
|     return false;
 | |
| 
 | |
|   bool is_64bit = (target_sp->GetArchitecture().GetAddressByteSize() == 8);
 | |
| 
 | |
|   if (!valobj_sp)
 | |
|     return false;
 | |
|   m_exe_ctx_ref = valobj_sp->GetExecutionContextRef();
 | |
| 
 | |
|   ValueObjectSP _M_node_sp(
 | |
|       valobj_sp->GetChildMemberWithName(ConstString("_M_node"), true));
 | |
|   if (!_M_node_sp)
 | |
|     return false;
 | |
| 
 | |
|   m_pair_address = _M_node_sp->GetValueAsUnsigned(0);
 | |
|   if (m_pair_address == 0)
 | |
|     return false;
 | |
| 
 | |
|   m_pair_address += (is_64bit ? 32 : 16);
 | |
| 
 | |
|   CompilerType my_type(valobj_sp->GetCompilerType());
 | |
|   if (my_type.GetNumTemplateArguments() >= 1) {
 | |
|     TemplateArgumentKind kind;
 | |
|     CompilerType pair_type = my_type.GetTemplateArgument(0, kind);
 | |
|     if (kind != eTemplateArgumentKindType &&
 | |
|         kind != eTemplateArgumentKindTemplate &&
 | |
|         kind != eTemplateArgumentKindTemplateExpansion)
 | |
|       return false;
 | |
|     m_pair_type = pair_type;
 | |
|   } else
 | |
|     return false;
 | |
| 
 | |
|   return true;
 | |
| }
 | |
| 
 | |
| size_t LibstdcppMapIteratorSyntheticFrontEnd::CalculateNumChildren() {
 | |
|   return 2;
 | |
| }
 | |
| 
 | |
| lldb::ValueObjectSP
 | |
| LibstdcppMapIteratorSyntheticFrontEnd::GetChildAtIndex(size_t idx) {
 | |
|   if (m_pair_address != 0 && m_pair_type) {
 | |
|     if (!m_pair_sp)
 | |
|       m_pair_sp = CreateValueObjectFromAddress("pair", m_pair_address,
 | |
|                                                m_exe_ctx_ref, m_pair_type);
 | |
|     if (m_pair_sp)
 | |
|       return m_pair_sp->GetChildAtIndex(idx, true);
 | |
|   }
 | |
|   return lldb::ValueObjectSP();
 | |
| }
 | |
| 
 | |
| bool LibstdcppMapIteratorSyntheticFrontEnd::MightHaveChildren() { return true; }
 | |
| 
 | |
| size_t LibstdcppMapIteratorSyntheticFrontEnd::GetIndexOfChildWithName(
 | |
|     const ConstString &name) {
 | |
|   if (name == ConstString("first"))
 | |
|     return 0;
 | |
|   if (name == ConstString("second"))
 | |
|     return 1;
 | |
|   return UINT32_MAX;
 | |
| }
 | |
| 
 | |
| SyntheticChildrenFrontEnd *
 | |
| lldb_private::formatters::LibstdcppMapIteratorSyntheticFrontEndCreator(
 | |
|     CXXSyntheticChildren *, lldb::ValueObjectSP valobj_sp) {
 | |
|   return (valobj_sp ? new LibstdcppMapIteratorSyntheticFrontEnd(valobj_sp)
 | |
|                     : nullptr);
 | |
| }
 | |
| 
 | |
| /*
 | |
|  (lldb) fr var ibeg --ptr-depth 1
 | |
|  (__gnu_cxx::__normal_iterator<int *, std::vector<int, std::allocator<int> > >)
 | |
|  ibeg = {
 | |
|  _M_current = 0x00000001001037a0 {
 | |
|  *_M_current = 1
 | |
|  }
 | |
|  }
 | |
|  */
 | |
| 
 | |
| SyntheticChildrenFrontEnd *
 | |
| lldb_private::formatters::LibStdcppVectorIteratorSyntheticFrontEndCreator(
 | |
|     CXXSyntheticChildren *, lldb::ValueObjectSP valobj_sp) {
 | |
|   static ConstString g_item_name;
 | |
|   if (!g_item_name)
 | |
|     g_item_name.SetCString("_M_current");
 | |
|   return (valobj_sp
 | |
|               ? new VectorIteratorSyntheticFrontEnd(valobj_sp, g_item_name)
 | |
|               : nullptr);
 | |
| }
 | |
| 
 | |
| lldb_private::formatters::VectorIteratorSyntheticFrontEnd::
 | |
|     VectorIteratorSyntheticFrontEnd(lldb::ValueObjectSP valobj_sp,
 | |
|                                     ConstString item_name)
 | |
|     : SyntheticChildrenFrontEnd(*valobj_sp), m_exe_ctx_ref(),
 | |
|       m_item_name(item_name), m_item_sp() {
 | |
|   if (valobj_sp)
 | |
|     Update();
 | |
| }
 | |
| 
 | |
| bool VectorIteratorSyntheticFrontEnd::Update() {
 | |
|   m_item_sp.reset();
 | |
| 
 | |
|   ValueObjectSP valobj_sp = m_backend.GetSP();
 | |
|   if (!valobj_sp)
 | |
|     return false;
 | |
| 
 | |
|   if (!valobj_sp)
 | |
|     return false;
 | |
| 
 | |
|   ValueObjectSP item_ptr(valobj_sp->GetChildMemberWithName(m_item_name, true));
 | |
|   if (!item_ptr)
 | |
|     return false;
 | |
|   if (item_ptr->GetValueAsUnsigned(0) == 0)
 | |
|     return false;
 | |
|   Status err;
 | |
|   m_exe_ctx_ref = valobj_sp->GetExecutionContextRef();
 | |
|   m_item_sp = CreateValueObjectFromAddress(
 | |
|       "item", item_ptr->GetValueAsUnsigned(0), m_exe_ctx_ref,
 | |
|       item_ptr->GetCompilerType().GetPointeeType());
 | |
|   if (err.Fail())
 | |
|     m_item_sp.reset();
 | |
|   return false;
 | |
| }
 | |
| 
 | |
| size_t VectorIteratorSyntheticFrontEnd::CalculateNumChildren() { return 1; }
 | |
| 
 | |
| lldb::ValueObjectSP
 | |
| VectorIteratorSyntheticFrontEnd::GetChildAtIndex(size_t idx) {
 | |
|   if (idx == 0)
 | |
|     return m_item_sp;
 | |
|   return lldb::ValueObjectSP();
 | |
| }
 | |
| 
 | |
| bool VectorIteratorSyntheticFrontEnd::MightHaveChildren() { return true; }
 | |
| 
 | |
| size_t VectorIteratorSyntheticFrontEnd::GetIndexOfChildWithName(
 | |
|     const ConstString &name) {
 | |
|   if (name == ConstString("item"))
 | |
|     return 0;
 | |
|   return UINT32_MAX;
 | |
| }
 | |
| 
 | |
| bool lldb_private::formatters::LibStdcppStringSummaryProvider(
 | |
|     ValueObject &valobj, Stream &stream, const TypeSummaryOptions &options) {
 | |
|   const bool scalar_is_load_addr = true;
 | |
|   AddressType addr_type;
 | |
|   lldb::addr_t addr_of_string =
 | |
|       valobj.GetAddressOf(scalar_is_load_addr, &addr_type);
 | |
|   if (addr_of_string != LLDB_INVALID_ADDRESS) {
 | |
|     switch (addr_type) {
 | |
|     case eAddressTypeLoad: {
 | |
|       ProcessSP process_sp(valobj.GetProcessSP());
 | |
|       if (!process_sp)
 | |
|         return false;
 | |
| 
 | |
|       StringPrinter::ReadStringAndDumpToStreamOptions options(valobj);
 | |
|       Status error;
 | |
|       lldb::addr_t addr_of_data =
 | |
|           process_sp->ReadPointerFromMemory(addr_of_string, error);
 | |
|       if (error.Fail() || addr_of_data == 0 ||
 | |
|           addr_of_data == LLDB_INVALID_ADDRESS)
 | |
|         return false;
 | |
|       options.SetLocation(addr_of_data);
 | |
|       options.SetProcessSP(process_sp);
 | |
|       options.SetStream(&stream);
 | |
|       options.SetNeedsZeroTermination(false);
 | |
|       options.SetBinaryZeroIsTerminator(true);
 | |
|       lldb::addr_t size_of_data = process_sp->ReadPointerFromMemory(
 | |
|           addr_of_string + process_sp->GetAddressByteSize(), error);
 | |
|       if (error.Fail())
 | |
|         return false;
 | |
|       options.SetSourceSize(size_of_data);
 | |
| 
 | |
|       if (!StringPrinter::ReadStringAndDumpToStream<
 | |
|               StringPrinter::StringElementType::UTF8>(options)) {
 | |
|         stream.Printf("Summary Unavailable");
 | |
|         return true;
 | |
|       } else
 | |
|         return true;
 | |
|     } break;
 | |
|     case eAddressTypeHost:
 | |
|       break;
 | |
|     case eAddressTypeInvalid:
 | |
|     case eAddressTypeFile:
 | |
|       break;
 | |
|     }
 | |
|   }
 | |
|   return false;
 | |
| }
 | |
| 
 | |
| bool lldb_private::formatters::LibStdcppWStringSummaryProvider(
 | |
|     ValueObject &valobj, Stream &stream, const TypeSummaryOptions &options) {
 | |
|   const bool scalar_is_load_addr = true;
 | |
|   AddressType addr_type;
 | |
|   lldb::addr_t addr_of_string =
 | |
|       valobj.GetAddressOf(scalar_is_load_addr, &addr_type);
 | |
|   if (addr_of_string != LLDB_INVALID_ADDRESS) {
 | |
|     switch (addr_type) {
 | |
|     case eAddressTypeLoad: {
 | |
|       ProcessSP process_sp(valobj.GetProcessSP());
 | |
|       if (!process_sp)
 | |
|         return false;
 | |
| 
 | |
|       CompilerType wchar_compiler_type =
 | |
|           valobj.GetCompilerType().GetBasicTypeFromAST(lldb::eBasicTypeWChar);
 | |
| 
 | |
|       if (!wchar_compiler_type)
 | |
|         return false;
 | |
| 
 | |
|       const uint32_t wchar_size = wchar_compiler_type.GetBitSize(
 | |
|           nullptr); // Safe to pass NULL for exe_scope here
 | |
| 
 | |
|       StringPrinter::ReadStringAndDumpToStreamOptions options(valobj);
 | |
|       Status error;
 | |
|       lldb::addr_t addr_of_data =
 | |
|           process_sp->ReadPointerFromMemory(addr_of_string, error);
 | |
|       if (error.Fail() || addr_of_data == 0 ||
 | |
|           addr_of_data == LLDB_INVALID_ADDRESS)
 | |
|         return false;
 | |
|       options.SetLocation(addr_of_data);
 | |
|       options.SetProcessSP(process_sp);
 | |
|       options.SetStream(&stream);
 | |
|       options.SetNeedsZeroTermination(false);
 | |
|       options.SetBinaryZeroIsTerminator(false);
 | |
|       lldb::addr_t size_of_data = process_sp->ReadPointerFromMemory(
 | |
|           addr_of_string + process_sp->GetAddressByteSize(), error);
 | |
|       if (error.Fail())
 | |
|         return false;
 | |
|       options.SetSourceSize(size_of_data);
 | |
|       options.SetPrefixToken("L");
 | |
| 
 | |
|       switch (wchar_size) {
 | |
|       case 8:
 | |
|         return StringPrinter::ReadStringAndDumpToStream<
 | |
|             StringPrinter::StringElementType::UTF8>(options);
 | |
|       case 16:
 | |
|         return StringPrinter::ReadStringAndDumpToStream<
 | |
|             StringPrinter::StringElementType::UTF16>(options);
 | |
|       case 32:
 | |
|         return StringPrinter::ReadStringAndDumpToStream<
 | |
|             StringPrinter::StringElementType::UTF32>(options);
 | |
|       default:
 | |
|         stream.Printf("size for wchar_t is not valid");
 | |
|         return true;
 | |
|       }
 | |
|       return true;
 | |
|     } break;
 | |
|     case eAddressTypeHost:
 | |
|       break;
 | |
|     case eAddressTypeInvalid:
 | |
|     case eAddressTypeFile:
 | |
|       break;
 | |
|     }
 | |
|   }
 | |
|   return false;
 | |
| }
 | |
| 
 | |
| LibStdcppSharedPtrSyntheticFrontEnd::LibStdcppSharedPtrSyntheticFrontEnd(
 | |
|     lldb::ValueObjectSP valobj_sp)
 | |
|     : SyntheticChildrenFrontEnd(*valobj_sp) {
 | |
|   if (valobj_sp)
 | |
|     Update();
 | |
| }
 | |
| 
 | |
| size_t LibStdcppSharedPtrSyntheticFrontEnd::CalculateNumChildren() { return 1; }
 | |
| 
 | |
| lldb::ValueObjectSP
 | |
| LibStdcppSharedPtrSyntheticFrontEnd::GetChildAtIndex(size_t idx) {
 | |
|   ValueObjectSP valobj_sp = m_backend.GetSP();
 | |
|   if (!valobj_sp)
 | |
|     return lldb::ValueObjectSP();
 | |
| 
 | |
|   if (idx == 0)
 | |
|     return valobj_sp->GetChildMemberWithName(ConstString("_M_ptr"), true);
 | |
|   else
 | |
|     return lldb::ValueObjectSP();
 | |
| }
 | |
| 
 | |
| bool LibStdcppSharedPtrSyntheticFrontEnd::Update() { return false; }
 | |
| 
 | |
| bool LibStdcppSharedPtrSyntheticFrontEnd::MightHaveChildren() { return true; }
 | |
| 
 | |
| size_t LibStdcppSharedPtrSyntheticFrontEnd::GetIndexOfChildWithName(
 | |
|     const ConstString &name) {
 | |
|   if (name == ConstString("_M_ptr"))
 | |
|     return 0;
 | |
|   return UINT32_MAX;
 | |
| }
 | |
| 
 | |
| SyntheticChildrenFrontEnd *
 | |
| lldb_private::formatters::LibStdcppSharedPtrSyntheticFrontEndCreator(
 | |
|     CXXSyntheticChildren *, lldb::ValueObjectSP valobj_sp) {
 | |
|   return (valobj_sp ? new LibStdcppSharedPtrSyntheticFrontEnd(valobj_sp)
 | |
|                     : nullptr);
 | |
| }
 | |
| 
 | |
| bool lldb_private::formatters::LibStdcppSmartPointerSummaryProvider(
 | |
|     ValueObject &valobj, Stream &stream, const TypeSummaryOptions &options) {
 | |
|   ValueObjectSP valobj_sp(valobj.GetNonSyntheticValue());
 | |
|   if (!valobj_sp)
 | |
|     return false;
 | |
| 
 | |
|   ValueObjectSP ptr_sp(
 | |
|       valobj_sp->GetChildMemberWithName(ConstString("_M_ptr"), true));
 | |
|   if (!ptr_sp)
 | |
|     return false;
 | |
| 
 | |
|   ValueObjectSP usecount_sp(valobj_sp->GetChildAtNamePath(
 | |
|       {ConstString("_M_refcount"), ConstString("_M_pi"),
 | |
|        ConstString("_M_use_count")}));
 | |
|   if (!usecount_sp)
 | |
|     return false;
 | |
| 
 | |
|   if (ptr_sp->GetValueAsUnsigned(0) == 0 ||
 | |
|       usecount_sp->GetValueAsUnsigned(0) == 0) {
 | |
|     stream.Printf("nullptr");
 | |
|     return true;
 | |
|   }
 | |
| 
 | |
|   Status error;
 | |
|   ValueObjectSP pointee_sp = ptr_sp->Dereference(error);
 | |
|   if (pointee_sp && error.Success()) {
 | |
|     if (pointee_sp->DumpPrintableRepresentation(
 | |
|             stream, ValueObject::eValueObjectRepresentationStyleSummary,
 | |
|             lldb::eFormatInvalid,
 | |
|             ValueObject::PrintableRepresentationSpecialCases::eDisable,
 | |
|             false)) {
 | |
|       return true;
 | |
|     }
 | |
|   }
 | |
| 
 | |
|   stream.Printf("ptr = 0x%" PRIx64, ptr_sp->GetValueAsUnsigned(0));
 | |
|   return true;
 | |
| }
 |