1 //===-- ValueObjectCast.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 #include "lldb/Core/ValueObjectCast.h"
11 
12 #include "lldb/Core/Value.h"
13 #include "lldb/Core/ValueObject.h"
14 #include "lldb/Symbol/CompilerType.h"
15 #include "lldb/Target/ExecutionContext.h"
16 #include "lldb/Utility/Scalar.h"
17 #include "lldb/Utility/Status.h"
18 
19 namespace lldb_private {
20 class ConstString;
21 }
22 
23 using namespace lldb_private;
24 
25 lldb::ValueObjectSP ValueObjectCast::Create(ValueObject &parent,
26                                             const ConstString &name,
27                                             const CompilerType &cast_type) {
28   ValueObjectCast *cast_valobj_ptr =
29       new ValueObjectCast(parent, name, cast_type);
30   return cast_valobj_ptr->GetSP();
31 }
32 
33 ValueObjectCast::ValueObjectCast(ValueObject &parent, const ConstString &name,
34                                  const CompilerType &cast_type)
35     : ValueObject(parent), m_cast_type(cast_type) {
36   SetName(name);
37   // m_value.SetContext (Value::eContextTypeClangType,
38   // cast_type.GetOpaqueQualType());
39   m_value.SetCompilerType(cast_type);
40 }
41 
42 ValueObjectCast::~ValueObjectCast() {}
43 
44 CompilerType ValueObjectCast::GetCompilerTypeImpl() { return m_cast_type; }
45 
46 size_t ValueObjectCast::CalculateNumChildren(uint32_t max) {
47   ExecutionContext exe_ctx(GetExecutionContextRef());
48   auto children_count = GetCompilerType().GetNumChildren(
49       true, &exe_ctx);
50   return children_count <= max ? children_count : max;
51 }
52 
53 uint64_t ValueObjectCast::GetByteSize() {
54   ExecutionContext exe_ctx(GetExecutionContextRef());
55   return m_value.GetValueByteSize(nullptr, &exe_ctx);
56 }
57 
58 lldb::ValueType ValueObjectCast::GetValueType() const {
59   // Let our parent answer global, local, argument, etc...
60   return m_parent->GetValueType();
61 }
62 
63 bool ValueObjectCast::UpdateValue() {
64   SetValueIsValid(false);
65   m_error.Clear();
66 
67   if (m_parent->UpdateValueIfNeeded(false)) {
68     Value old_value(m_value);
69     m_update_point.SetUpdated();
70     m_value = m_parent->GetValue();
71     CompilerType compiler_type(GetCompilerType());
72     // m_value.SetContext (Value::eContextTypeClangType, compiler_type);
73     m_value.SetCompilerType(compiler_type);
74     SetAddressTypeOfChildren(m_parent->GetAddressTypeOfChildren());
75     if (!CanProvideValue()) {
76       // this value object represents an aggregate type whose children have
77       // values, but this object does not. So we say we are changed if our
78       // location has changed.
79       SetValueDidChange(m_value.GetValueType() != old_value.GetValueType() ||
80                         m_value.GetScalar() != old_value.GetScalar());
81     }
82     ExecutionContext exe_ctx(GetExecutionContextRef());
83     m_error = m_value.GetValueAsData(&exe_ctx, m_data, 0, GetModule().get());
84     SetValueDidChange(m_parent->GetValueDidChange());
85     return true;
86   }
87 
88   // The dynamic value failed to get an error, pass the error along
89   if (m_error.Success() && m_parent->GetError().Fail())
90     m_error = m_parent->GetError();
91   SetValueIsValid(false);
92   return false;
93 }
94 
95 bool ValueObjectCast::IsInScope() { return m_parent->IsInScope(); }
96