xref: /openbsd-src/gnu/llvm/lldb/source/Expression/ExpressionVariable.cpp (revision f6aab3d83b51b91c24247ad2c2573574de475a82)
1dda28197Spatrick //===-- ExpressionVariable.cpp --------------------------------------------===//
2061da546Spatrick //
3061da546Spatrick // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4061da546Spatrick // See https://llvm.org/LICENSE.txt for license information.
5061da546Spatrick // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6061da546Spatrick //
7061da546Spatrick //===----------------------------------------------------------------------===//
8061da546Spatrick 
9061da546Spatrick #include "lldb/Expression/ExpressionVariable.h"
10061da546Spatrick #include "lldb/Expression/IRExecutionUnit.h"
11061da546Spatrick #include "lldb/Target/Target.h"
12*f6aab3d8Srobert #include "lldb/Utility/LLDBLog.h"
13061da546Spatrick #include "lldb/Utility/Log.h"
14*f6aab3d8Srobert #include <optional>
15061da546Spatrick 
16061da546Spatrick using namespace lldb_private;
17061da546Spatrick 
18be691f3bSpatrick ExpressionVariable::~ExpressionVariable() = default;
19061da546Spatrick 
GetValueBytes()20061da546Spatrick uint8_t *ExpressionVariable::GetValueBytes() {
21*f6aab3d8Srobert   std::optional<uint64_t> byte_size = m_frozen_sp->GetByteSize();
22be691f3bSpatrick   if (byte_size && *byte_size) {
23be691f3bSpatrick     if (m_frozen_sp->GetDataExtractor().GetByteSize() < *byte_size) {
24be691f3bSpatrick       m_frozen_sp->GetValue().ResizeData(*byte_size);
25061da546Spatrick       m_frozen_sp->GetValue().GetData(m_frozen_sp->GetDataExtractor());
26061da546Spatrick     }
27061da546Spatrick     return const_cast<uint8_t *>(
28061da546Spatrick         m_frozen_sp->GetDataExtractor().GetDataStart());
29061da546Spatrick   }
30061da546Spatrick   return nullptr;
31061da546Spatrick }
32061da546Spatrick 
33be691f3bSpatrick PersistentExpressionState::~PersistentExpressionState() = default;
34061da546Spatrick 
LookupSymbol(ConstString name)35061da546Spatrick lldb::addr_t PersistentExpressionState::LookupSymbol(ConstString name) {
36061da546Spatrick   SymbolMap::iterator si = m_symbol_map.find(name.GetCString());
37061da546Spatrick 
38061da546Spatrick   if (si != m_symbol_map.end())
39061da546Spatrick     return si->second;
40061da546Spatrick   else
41061da546Spatrick     return LLDB_INVALID_ADDRESS;
42061da546Spatrick }
43061da546Spatrick 
RegisterExecutionUnit(lldb::IRExecutionUnitSP & execution_unit_sp)44061da546Spatrick void PersistentExpressionState::RegisterExecutionUnit(
45061da546Spatrick     lldb::IRExecutionUnitSP &execution_unit_sp) {
46*f6aab3d8Srobert   Log *log = GetLog(LLDBLog::Expressions);
47061da546Spatrick 
48061da546Spatrick   m_execution_units.insert(execution_unit_sp);
49061da546Spatrick 
50061da546Spatrick   LLDB_LOGF(log, "Registering JITted Functions:\n");
51061da546Spatrick 
52061da546Spatrick   for (const IRExecutionUnit::JittedFunction &jitted_function :
53061da546Spatrick        execution_unit_sp->GetJittedFunctions()) {
54061da546Spatrick     if (jitted_function.m_external &&
55061da546Spatrick         jitted_function.m_name != execution_unit_sp->GetFunctionName() &&
56061da546Spatrick         jitted_function.m_remote_addr != LLDB_INVALID_ADDRESS) {
57061da546Spatrick       m_symbol_map[jitted_function.m_name.GetCString()] =
58061da546Spatrick           jitted_function.m_remote_addr;
59061da546Spatrick       LLDB_LOGF(log, "  Function: %s at 0x%" PRIx64 ".",
60061da546Spatrick                 jitted_function.m_name.GetCString(),
61061da546Spatrick                 jitted_function.m_remote_addr);
62061da546Spatrick     }
63061da546Spatrick   }
64061da546Spatrick 
65061da546Spatrick   LLDB_LOGF(log, "Registering JIIted Symbols:\n");
66061da546Spatrick 
67061da546Spatrick   for (const IRExecutionUnit::JittedGlobalVariable &global_var :
68061da546Spatrick        execution_unit_sp->GetJittedGlobalVariables()) {
69061da546Spatrick     if (global_var.m_remote_addr != LLDB_INVALID_ADDRESS) {
70061da546Spatrick       // Demangle the name before inserting it, so that lookups by the ConstStr
71061da546Spatrick       // of the demangled name will find the mangled one (needed for looking up
72061da546Spatrick       // metadata pointers.)
73061da546Spatrick       Mangled mangler(global_var.m_name);
74dda28197Spatrick       mangler.GetDemangledName();
75061da546Spatrick       m_symbol_map[global_var.m_name.GetCString()] = global_var.m_remote_addr;
76061da546Spatrick       LLDB_LOGF(log, "  Symbol: %s at 0x%" PRIx64 ".",
77061da546Spatrick                 global_var.m_name.GetCString(), global_var.m_remote_addr);
78061da546Spatrick     }
79061da546Spatrick   }
80061da546Spatrick }
81