contrib/llvm/tools/lldb/source/Core/ValueObjectCast.cpp

   1 //===-- ValueObjectDynamicValue.cpp ---------------------------------*- C++ -*-===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9
  10
  11 #include "lldb/Core/ValueObjectCast.h"
  12
  13 // C Includes
  14 // C++ Includes
  15 // Other libraries and framework includes
  16 // Project includes
  17 #include "lldb/Core/Log.h"
  18 #include "lldb/Core/Module.h"
  19 #include "lldb/Core/ValueObjectList.h"
  20 #include "lldb/Core/Value.h"
  21 #include "lldb/Core/ValueObject.h"
  22
  23 #include "lldb/Symbol/ClangASTType.h"
  24 #include "lldb/Symbol/ObjectFile.h"
  25 #include "lldb/Symbol/SymbolContext.h"
  26 #include "lldb/Symbol/Type.h"
  27 #include "lldb/Symbol/Variable.h"
  28
  29 #include "lldb/Target/ExecutionContext.h"
  30 #include "lldb/Target/LanguageRuntime.h"
  31 #include "lldb/Target/Process.h"
  32 #include "lldb/Target/RegisterContext.h"
  33 #include "lldb/Target/Target.h"
  34 #include "lldb/Target/Thread.h"
  35
  36 using namespace lldb_private;
  37
  38 lldb::ValueObjectSP
  39 ValueObjectCast::Create (ValueObject &parent,
  40                          const ConstString &name,
  41                          const ClangASTType &cast_type)
  42 {
  43     ValueObjectCast *cast_valobj_ptr = new ValueObjectCast (parent, name, cast_type);
  44     return cast_valobj_ptr->GetSP();
  45 }
  46
  47 ValueObjectCast::ValueObjectCast
  48 (
  49     ValueObject &parent,
  50     const ConstString &name,
  51     const ClangASTType &cast_type
  52 ) :
  53     ValueObject(parent),
  54     m_cast_type (cast_type)
  55 {
  56     SetName (name);
  57     //m_value.SetContext (Value::eContextTypeClangType, cast_type.GetOpaqueQualType());
  58     m_value.SetClangType (cast_type);
  59 }
  60
  61 ValueObjectCast::~ValueObjectCast()
  62 {
  63 }
  64
  65 ClangASTType
  66 ValueObjectCast::GetClangTypeImpl ()
  67 {
  68     return m_cast_type;
  69 }
  70
  71 size_t
  72 ValueObjectCast::CalculateNumChildren()
  73 {
  74     return GetClangType().GetNumChildren (true);
  75 }
  76
  77 uint64_t
  78 ValueObjectCast::GetByteSize()
  79 {
  80     return m_value.GetValueByteSize(NULL);
  81 }
  82
  83 lldb::ValueType
  84 ValueObjectCast::GetValueType() const
  85 {
  86     // Let our parent answer global, local, argument, etc...
  87     return m_parent->GetValueType();
  88 }
  89
  90 bool
  91 ValueObjectCast::UpdateValue ()
  92 {
  93     SetValueIsValid (false);
  94     m_error.Clear();
  95
  96     if (m_parent->UpdateValueIfNeeded(false))
  97     {
  98         Value old_value(m_value);
  99         m_update_point.SetUpdated();
 100         m_value = m_parent->GetValue();
 101         ClangASTType clang_type (GetClangType());
 102         //m_value.SetContext (Value::eContextTypeClangType, clang_type);
 103         m_value.SetClangType (clang_type);
 104         SetAddressTypeOfChildren(m_parent->GetAddressTypeOfChildren());
 105         if (clang_type.IsAggregateType ())
 106         {
 107             // this value object represents an aggregate type whose
 108             // children have values, but this object does not. So we
 109             // say we are changed if our location has changed.
 110             SetValueDidChange (m_value.GetValueType() != old_value.GetValueType() || m_value.GetScalar() != old_value.GetScalar());
 111         }
 112         ExecutionContext exe_ctx (GetExecutionContextRef());
 113         m_error = m_value.GetValueAsData(&exe_ctx, m_data, 0, GetModule().get());
 114         SetValueDidChange (m_parent->GetValueDidChange());
 115         return true;
 116     }
 117
 118     // The dynamic value failed to get an error, pass the error along
 119     if (m_error.Success() && m_parent->GetError().Fail())
 120         m_error = m_parent->GetError();
 121     SetValueIsValid (false);
 122     return false;
 123 }
 124
 125 bool
 126 ValueObjectCast::IsInScope ()
 127 {
 128     return m_parent->IsInScope();
 129 }