You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
79 lines
2.9 KiB
79 lines
2.9 KiB
4 months ago
|
//===-- ExpressionVariable.cpp --------------------------------------------===//
|
||
|
//
|
||
|
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
|
||
|
// See https://llvm.org/LICENSE.txt for license information.
|
||
|
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
|
||
|
//
|
||
|
//===----------------------------------------------------------------------===//
|
||
|
|
||
|
#include "lldb/Expression/ExpressionVariable.h"
|
||
|
#include "lldb/Expression/IRExecutionUnit.h"
|
||
|
#include "lldb/Target/Target.h"
|
||
|
#include "lldb/Utility/Log.h"
|
||
|
|
||
|
using namespace lldb_private;
|
||
|
|
||
|
ExpressionVariable::~ExpressionVariable() {}
|
||
|
|
||
|
uint8_t *ExpressionVariable::GetValueBytes() {
|
||
|
llvm::Optional<uint64_t> byte_size = m_frozen_sp->GetByteSize();
|
||
|
if (byte_size && *byte_size) {
|
||
|
if (m_frozen_sp->GetDataExtractor().GetByteSize() < *byte_size) {
|
||
|
m_frozen_sp->GetValue().ResizeData(*byte_size);
|
||
|
m_frozen_sp->GetValue().GetData(m_frozen_sp->GetDataExtractor());
|
||
|
}
|
||
|
return const_cast<uint8_t *>(
|
||
|
m_frozen_sp->GetDataExtractor().GetDataStart());
|
||
|
}
|
||
|
return nullptr;
|
||
|
}
|
||
|
|
||
|
PersistentExpressionState::~PersistentExpressionState() {}
|
||
|
|
||
|
lldb::addr_t PersistentExpressionState::LookupSymbol(ConstString name) {
|
||
|
SymbolMap::iterator si = m_symbol_map.find(name.GetCString());
|
||
|
|
||
|
if (si != m_symbol_map.end())
|
||
|
return si->second;
|
||
|
else
|
||
|
return LLDB_INVALID_ADDRESS;
|
||
|
}
|
||
|
|
||
|
void PersistentExpressionState::RegisterExecutionUnit(
|
||
|
lldb::IRExecutionUnitSP &execution_unit_sp) {
|
||
|
Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_EXPRESSIONS));
|
||
|
|
||
|
m_execution_units.insert(execution_unit_sp);
|
||
|
|
||
|
LLDB_LOGF(log, "Registering JITted Functions:\n");
|
||
|
|
||
|
for (const IRExecutionUnit::JittedFunction &jitted_function :
|
||
|
execution_unit_sp->GetJittedFunctions()) {
|
||
|
if (jitted_function.m_external &&
|
||
|
jitted_function.m_name != execution_unit_sp->GetFunctionName() &&
|
||
|
jitted_function.m_remote_addr != LLDB_INVALID_ADDRESS) {
|
||
|
m_symbol_map[jitted_function.m_name.GetCString()] =
|
||
|
jitted_function.m_remote_addr;
|
||
|
LLDB_LOGF(log, " Function: %s at 0x%" PRIx64 ".",
|
||
|
jitted_function.m_name.GetCString(),
|
||
|
jitted_function.m_remote_addr);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
LLDB_LOGF(log, "Registering JIIted Symbols:\n");
|
||
|
|
||
|
for (const IRExecutionUnit::JittedGlobalVariable &global_var :
|
||
|
execution_unit_sp->GetJittedGlobalVariables()) {
|
||
|
if (global_var.m_remote_addr != LLDB_INVALID_ADDRESS) {
|
||
|
// Demangle the name before inserting it, so that lookups by the ConstStr
|
||
|
// of the demangled name will find the mangled one (needed for looking up
|
||
|
// metadata pointers.)
|
||
|
Mangled mangler(global_var.m_name);
|
||
|
mangler.GetDemangledName();
|
||
|
m_symbol_map[global_var.m_name.GetCString()] = global_var.m_remote_addr;
|
||
|
LLDB_LOGF(log, " Symbol: %s at 0x%" PRIx64 ".",
|
||
|
global_var.m_name.GetCString(), global_var.m_remote_addr);
|
||
|
}
|
||
|
}
|
||
|
}
|