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
Create(ValueObject & parent,const ConstString & name,const ClangASTType & cast_type)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 
ValueObjectCast(ValueObject & parent,const ConstString & name,const ClangASTType & cast_type)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 
~ValueObjectCast()61 ValueObjectCast::~ValueObjectCast()
62 {
63 }
64 
65 ClangASTType
GetClangTypeImpl()66 ValueObjectCast::GetClangTypeImpl ()
67 {
68     return m_cast_type;
69 }
70 
71 size_t
CalculateNumChildren()72 ValueObjectCast::CalculateNumChildren()
73 {
74     return GetClangType().GetNumChildren (true);
75 }
76 
77 uint64_t
GetByteSize()78 ValueObjectCast::GetByteSize()
79 {
80     return m_value.GetValueByteSize(NULL);
81 }
82 
83 lldb::ValueType
GetValueType() const84 ValueObjectCast::GetValueType() const
85 {
86     // Let our parent answer global, local, argument, etc...
87     return m_parent->GetValueType();
88 }
89 
90 bool
UpdateValue()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
IsInScope()126 ValueObjectCast::IsInScope ()
127 {
128     return m_parent->IsInScope();
129 }
130