]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/llvm/tools/lldb/source/Core/ValueObjectCast.cpp
Merge clang 7.0.1 and several follow-up changes
[FreeBSD/FreeBSD.git] / contrib / llvm / tools / lldb / source / Core / ValueObjectCast.cpp
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/Scalar.h" // for operator!=, Scalar
13 #include "lldb/Core/Value.h"
14 #include "lldb/Core/ValueObject.h"
15 #include "lldb/Symbol/CompilerType.h"
16 #include "lldb/Target/ExecutionContext.h"
17 #include "lldb/Utility/Status.h" // for Status
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   auto children_count = GetCompilerType().GetNumChildren(true);
48   return children_count <= max ? children_count : max;
49 }
50
51 uint64_t ValueObjectCast::GetByteSize() {
52   ExecutionContext exe_ctx(GetExecutionContextRef());
53   return m_value.GetValueByteSize(nullptr, &exe_ctx);
54 }
55
56 lldb::ValueType ValueObjectCast::GetValueType() const {
57   // Let our parent answer global, local, argument, etc...
58   return m_parent->GetValueType();
59 }
60
61 bool ValueObjectCast::UpdateValue() {
62   SetValueIsValid(false);
63   m_error.Clear();
64
65   if (m_parent->UpdateValueIfNeeded(false)) {
66     Value old_value(m_value);
67     m_update_point.SetUpdated();
68     m_value = m_parent->GetValue();
69     CompilerType compiler_type(GetCompilerType());
70     // m_value.SetContext (Value::eContextTypeClangType, compiler_type);
71     m_value.SetCompilerType(compiler_type);
72     SetAddressTypeOfChildren(m_parent->GetAddressTypeOfChildren());
73     if (!CanProvideValue()) {
74       // this value object represents an aggregate type whose children have
75       // values, but this object does not. So we say we are changed if our
76       // location has changed.
77       SetValueDidChange(m_value.GetValueType() != old_value.GetValueType() ||
78                         m_value.GetScalar() != old_value.GetScalar());
79     }
80     ExecutionContext exe_ctx(GetExecutionContextRef());
81     m_error = m_value.GetValueAsData(&exe_ctx, m_data, 0, GetModule().get());
82     SetValueDidChange(m_parent->GetValueDidChange());
83     return true;
84   }
85
86   // The dynamic value failed to get an error, pass the error along
87   if (m_error.Success() && m_parent->GetError().Fail())
88     m_error = m_parent->GetError();
89   SetValueIsValid(false);
90   return false;
91 }
92
93 bool ValueObjectCast::IsInScope() { return m_parent->IsInScope(); }