diff options
Diffstat (limited to 'source/Plugins/Process/gdb-remote/ProcessGDBRemote.cpp')
| -rw-r--r-- | source/Plugins/Process/gdb-remote/ProcessGDBRemote.cpp | 5409 |
1 files changed, 0 insertions, 5409 deletions
diff --git a/source/Plugins/Process/gdb-remote/ProcessGDBRemote.cpp b/source/Plugins/Process/gdb-remote/ProcessGDBRemote.cpp deleted file mode 100644 index f1762abc55f8..000000000000 --- a/source/Plugins/Process/gdb-remote/ProcessGDBRemote.cpp +++ /dev/null @@ -1,5409 +0,0 @@ -//===-- ProcessGDBRemote.cpp ------------------------------------*- C++ -*-===// -// -// 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/Host/Config.h" - -#include <errno.h> -#include <stdlib.h> -#ifndef LLDB_DISABLE_POSIX -#include <netinet/in.h> -#include <sys/mman.h> -#include <sys/socket.h> -#include <unistd.h> -#endif -#include <sys/stat.h> -#include <sys/types.h> -#include <time.h> - -#include <algorithm> -#include <csignal> -#include <map> -#include <memory> -#include <mutex> -#include <sstream> - -#include "lldb/Breakpoint/Watchpoint.h" -#include "lldb/Core/Debugger.h" -#include "lldb/Core/Module.h" -#include "lldb/Core/ModuleSpec.h" -#include "lldb/Core/PluginManager.h" -#include "lldb/Core/StreamFile.h" -#include "lldb/Core/Value.h" -#include "lldb/DataFormatters/FormatManager.h" -#include "lldb/Host/ConnectionFileDescriptor.h" -#include "lldb/Host/FileSystem.h" -#include "lldb/Host/HostThread.h" -#include "lldb/Host/PosixApi.h" -#include "lldb/Host/PseudoTerminal.h" -#include "lldb/Host/StringConvert.h" -#include "lldb/Host/ThreadLauncher.h" -#include "lldb/Host/XML.h" -#include "lldb/Interpreter/CommandInterpreter.h" -#include "lldb/Interpreter/CommandObject.h" -#include "lldb/Interpreter/CommandObjectMultiword.h" -#include "lldb/Interpreter/CommandReturnObject.h" -#include "lldb/Interpreter/OptionArgParser.h" -#include "lldb/Interpreter/OptionGroupBoolean.h" -#include "lldb/Interpreter/OptionGroupUInt64.h" -#include "lldb/Interpreter/OptionValueProperties.h" -#include "lldb/Interpreter/Options.h" -#include "lldb/Interpreter/Property.h" -#include "lldb/Symbol/LocateSymbolFile.h" -#include "lldb/Symbol/ObjectFile.h" -#include "lldb/Target/ABI.h" -#include "lldb/Target/DynamicLoader.h" -#include "lldb/Target/MemoryRegionInfo.h" -#include "lldb/Target/SystemRuntime.h" -#include "lldb/Target/Target.h" -#include "lldb/Target/TargetList.h" -#include "lldb/Target/ThreadPlanCallFunction.h" -#include "lldb/Utility/Args.h" -#include "lldb/Utility/FileSpec.h" -#include "lldb/Utility/Reproducer.h" -#include "lldb/Utility/State.h" -#include "lldb/Utility/StreamString.h" -#include "lldb/Utility/Timer.h" - -#include "GDBRemoteRegisterContext.h" -#include "Plugins/Platform/MacOSX/PlatformRemoteiOS.h" -#include "Plugins/Process/Utility/GDBRemoteSignals.h" -#include "Plugins/Process/Utility/InferiorCallPOSIX.h" -#include "Plugins/Process/Utility/StopInfoMachException.h" -#include "ProcessGDBRemote.h" -#include "ProcessGDBRemoteLog.h" -#include "ThreadGDBRemote.h" -#include "lldb/Host/Host.h" -#include "lldb/Utility/StringExtractorGDBRemote.h" - -#include "llvm/ADT/ScopeExit.h" -#include "llvm/ADT/StringSwitch.h" -#include "llvm/Support/Threading.h" -#include "llvm/Support/raw_ostream.h" - -#define DEBUGSERVER_BASENAME "debugserver" -using namespace lldb; -using namespace lldb_private; -using namespace lldb_private::process_gdb_remote; - -namespace lldb { -// Provide a function that can easily dump the packet history if we know a -// ProcessGDBRemote * value (which we can get from logs or from debugging). We -// need the function in the lldb namespace so it makes it into the final -// executable since the LLDB shared library only exports stuff in the lldb -// namespace. This allows you to attach with a debugger and call this function -// and get the packet history dumped to a file. -void DumpProcessGDBRemotePacketHistory(void *p, const char *path) { - auto file = FileSystem::Instance().Open( - FileSpec(path), File::eOpenOptionWrite | File::eOpenOptionCanCreate); - if (!file) { - llvm::consumeError(file.takeError()); - return; - } - StreamFile stream(std::move(file.get())); - ((ProcessGDBRemote *)p)->GetGDBRemote().DumpHistory(stream); -} -} // namespace lldb - -namespace { - -#define LLDB_PROPERTIES_processgdbremote -#include "ProcessGDBRemoteProperties.inc" - -enum { -#define LLDB_PROPERTIES_processgdbremote -#include "ProcessGDBRemotePropertiesEnum.inc" -}; - -class PluginProperties : public Properties { -public: - static ConstString GetSettingName() { - return ProcessGDBRemote::GetPluginNameStatic(); - } - - PluginProperties() : Properties() { - m_collection_sp = std::make_shared<OptionValueProperties>(GetSettingName()); - m_collection_sp->Initialize(g_processgdbremote_properties); - } - - ~PluginProperties() override {} - - uint64_t GetPacketTimeout() { - const uint32_t idx = ePropertyPacketTimeout; - return m_collection_sp->GetPropertyAtIndexAsUInt64( - nullptr, idx, g_processgdbremote_properties[idx].default_uint_value); - } - - bool SetPacketTimeout(uint64_t timeout) { - const uint32_t idx = ePropertyPacketTimeout; - return m_collection_sp->SetPropertyAtIndexAsUInt64(nullptr, idx, timeout); - } - - FileSpec GetTargetDefinitionFile() const { - const uint32_t idx = ePropertyTargetDefinitionFile; - return m_collection_sp->GetPropertyAtIndexAsFileSpec(nullptr, idx); - } - - bool GetUseSVR4() const { - const uint32_t idx = ePropertyUseSVR4; - return m_collection_sp->GetPropertyAtIndexAsBoolean( - nullptr, idx, - g_processgdbremote_properties[idx].default_uint_value != 0); - } -}; - -typedef std::shared_ptr<PluginProperties> ProcessKDPPropertiesSP; - -static const ProcessKDPPropertiesSP &GetGlobalPluginProperties() { - static ProcessKDPPropertiesSP g_settings_sp; - if (!g_settings_sp) - g_settings_sp = std::make_shared<PluginProperties>(); - return g_settings_sp; -} - -} // namespace - -// TODO Randomly assigning a port is unsafe. We should get an unused -// ephemeral port from the kernel and make sure we reserve it before passing it -// to debugserver. - -#if defined(__APPLE__) -#define LOW_PORT (IPPORT_RESERVED) -#define HIGH_PORT (IPPORT_HIFIRSTAUTO) -#else -#define LOW_PORT (1024u) -#define HIGH_PORT (49151u) -#endif - -#if defined(__APPLE__) && \ - (defined(__arm__) || defined(__arm64__) || defined(__aarch64__)) -static bool rand_initialized = false; - -static inline uint16_t get_random_port() { - if (!rand_initialized) { - time_t seed = time(NULL); - - rand_initialized = true; - srand(seed); - } - return (rand() % (HIGH_PORT - LOW_PORT)) + LOW_PORT; -} -#endif - -ConstString ProcessGDBRemote::GetPluginNameStatic() { - static ConstString g_name("gdb-remote"); - return g_name; -} - -const char *ProcessGDBRemote::GetPluginDescriptionStatic() { - return "GDB Remote protocol based debugging plug-in."; -} - -void ProcessGDBRemote::Terminate() { - PluginManager::UnregisterPlugin(ProcessGDBRemote::CreateInstance); -} - -lldb::ProcessSP -ProcessGDBRemote::CreateInstance(lldb::TargetSP target_sp, - ListenerSP listener_sp, - const FileSpec *crash_file_path) { - lldb::ProcessSP process_sp; - if (crash_file_path == nullptr) - process_sp = std::make_shared<ProcessGDBRemote>(target_sp, listener_sp); - return process_sp; -} - -bool ProcessGDBRemote::CanDebug(lldb::TargetSP target_sp, - bool plugin_specified_by_name) { - if (plugin_specified_by_name) - return true; - - // For now we are just making sure the file exists for a given module - Module *exe_module = target_sp->GetExecutableModulePointer(); - if (exe_module) { - ObjectFile *exe_objfile = exe_module->GetObjectFile(); - // We can't debug core files... - switch (exe_objfile->GetType()) { - case ObjectFile::eTypeInvalid: - case ObjectFile::eTypeCoreFile: - case ObjectFile::eTypeDebugInfo: - case ObjectFile::eTypeObjectFile: - case ObjectFile::eTypeSharedLibrary: - case ObjectFile::eTypeStubLibrary: - case ObjectFile::eTypeJIT: - return false; - case ObjectFile::eTypeExecutable: - case ObjectFile::eTypeDynamicLinker: - case ObjectFile::eTypeUnknown: - break; - } - return FileSystem::Instance().Exists(exe_module->GetFileSpec()); - } - // However, if there is no executable module, we return true since we might - // be preparing to attach. - return true; -} - -// ProcessGDBRemote constructor -ProcessGDBRemote::ProcessGDBRemote(lldb::TargetSP target_sp, - ListenerSP listener_sp) - : Process(target_sp, listener_sp), - m_debugserver_pid(LLDB_INVALID_PROCESS_ID), m_last_stop_packet_mutex(), - m_register_info(), - m_async_broadcaster(nullptr, "lldb.process.gdb-remote.async-broadcaster"), - m_async_listener_sp( - Listener::MakeListener("lldb.process.gdb-remote.async-listener")), - m_async_thread_state_mutex(), m_thread_ids(), m_thread_pcs(), - m_jstopinfo_sp(), m_jthreadsinfo_sp(), m_continue_c_tids(), - m_continue_C_tids(), m_continue_s_tids(), m_continue_S_tids(), - m_max_memory_size(0), m_remote_stub_max_memory_size(0), - m_addr_to_mmap_size(), m_thread_create_bp_sp(), - m_waiting_for_attach(false), m_destroy_tried_resuming(false), - m_command_sp(), m_breakpoint_pc_offset(0), - m_initial_tid(LLDB_INVALID_THREAD_ID), m_replay_mode(false), - m_allow_flash_writes(false), m_erased_flash_ranges() { - m_async_broadcaster.SetEventName(eBroadcastBitAsyncThreadShouldExit, - "async thread should exit"); - m_async_broadcaster.SetEventName(eBroadcastBitAsyncContinue, - "async thread continue"); - m_async_broadcaster.SetEventName(eBroadcastBitAsyncThreadDidExit, - "async thread did exit"); - - if (repro::Generator *g = repro::Reproducer::Instance().GetGenerator()) { - repro::ProcessGDBRemoteProvider &provider = - g->GetOrCreate<repro::ProcessGDBRemoteProvider>(); - // Set the history stream to the stream owned by the provider. - m_gdb_comm.SetHistoryStream(provider.GetHistoryStream()); - // Make sure to clear the stream again when we're finished. - provider.SetCallback([&]() { m_gdb_comm.SetHistoryStream(nullptr); }); - } - - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_ASYNC)); - - const uint32_t async_event_mask = - eBroadcastBitAsyncContinue | eBroadcastBitAsyncThreadShouldExit; - - if (m_async_listener_sp->StartListeningForEvents( - &m_async_broadcaster, async_event_mask) != async_event_mask) { - LLDB_LOGF(log, - "ProcessGDBRemote::%s failed to listen for " - "m_async_broadcaster events", - __FUNCTION__); - } - - const uint32_t gdb_event_mask = - Communication::eBroadcastBitReadThreadDidExit | - GDBRemoteCommunication::eBroadcastBitGdbReadThreadGotNotify; - if (m_async_listener_sp->StartListeningForEvents( - &m_gdb_comm, gdb_event_mask) != gdb_event_mask) { - LLDB_LOGF(log, - "ProcessGDBRemote::%s failed to listen for m_gdb_comm events", - __FUNCTION__); - } - - const uint64_t timeout_seconds = - GetGlobalPluginProperties()->GetPacketTimeout(); - if (timeout_seconds > 0) - m_gdb_comm.SetPacketTimeout(std::chrono::seconds(timeout_seconds)); -} - -// Destructor -ProcessGDBRemote::~ProcessGDBRemote() { - // m_mach_process.UnregisterNotificationCallbacks (this); - Clear(); - // We need to call finalize on the process before destroying ourselves to - // make sure all of the broadcaster cleanup goes as planned. If we destruct - // this class, then Process::~Process() might have problems trying to fully - // destroy the broadcaster. - Finalize(); - - // The general Finalize is going to try to destroy the process and that - // SHOULD shut down the async thread. However, if we don't kill it it will - // get stranded and its connection will go away so when it wakes up it will - // crash. So kill it for sure here. - StopAsyncThread(); - KillDebugserverProcess(); -} - -// PluginInterface -ConstString ProcessGDBRemote::GetPluginName() { return GetPluginNameStatic(); } - -uint32_t ProcessGDBRemote::GetPluginVersion() { return 1; } - -bool ProcessGDBRemote::ParsePythonTargetDefinition( - const FileSpec &target_definition_fspec) { - ScriptInterpreter *interpreter = - GetTarget().GetDebugger().GetScriptInterpreter(); - Status error; - StructuredData::ObjectSP module_object_sp( - interpreter->LoadPluginModule(target_definition_fspec, error)); - if (module_object_sp) { - StructuredData::DictionarySP target_definition_sp( - interpreter->GetDynamicSettings(module_object_sp, &GetTarget(), - "gdb-server-target-definition", error)); - - if (target_definition_sp) { - StructuredData::ObjectSP target_object( - target_definition_sp->GetValueForKey("host-info")); - if (target_object) { - if (auto host_info_dict = target_object->GetAsDictionary()) { - StructuredData::ObjectSP triple_value = - host_info_dict->GetValueForKey("triple"); - if (auto triple_string_value = triple_value->GetAsString()) { - std::string triple_string = triple_string_value->GetValue(); - ArchSpec host_arch(triple_string.c_str()); - if (!host_arch.IsCompatibleMatch(GetTarget().GetArchitecture())) { - GetTarget().SetArchitecture(host_arch); - } - } - } - } - m_breakpoint_pc_offset = 0; - StructuredData::ObjectSP breakpoint_pc_offset_value = - target_definition_sp->GetValueForKey("breakpoint-pc-offset"); - if (breakpoint_pc_offset_value) { - if (auto breakpoint_pc_int_value = - breakpoint_pc_offset_value->GetAsInteger()) - m_breakpoint_pc_offset = breakpoint_pc_int_value->GetValue(); - } - - if (m_register_info.SetRegisterInfo(*target_definition_sp, - GetTarget().GetArchitecture()) > 0) { - return true; - } - } - } - return false; -} - -// If the remote stub didn't give us eh_frame or DWARF register numbers for a -// register, see if the ABI can provide them. -// DWARF and eh_frame register numbers are defined as a part of the ABI. -static void AugmentRegisterInfoViaABI(RegisterInfo ®_info, - ConstString reg_name, ABISP abi_sp) { - if (reg_info.kinds[eRegisterKindEHFrame] == LLDB_INVALID_REGNUM || - reg_info.kinds[eRegisterKindDWARF] == LLDB_INVALID_REGNUM) { - if (abi_sp) { - RegisterInfo abi_reg_info; - if (abi_sp->GetRegisterInfoByName(reg_name, abi_reg_info)) { - if (reg_info.kinds[eRegisterKindEHFrame] == LLDB_INVALID_REGNUM && - abi_reg_info.kinds[eRegisterKindEHFrame] != LLDB_INVALID_REGNUM) { - reg_info.kinds[eRegisterKindEHFrame] = - abi_reg_info.kinds[eRegisterKindEHFrame]; - } - if (reg_info.kinds[eRegisterKindDWARF] == LLDB_INVALID_REGNUM && - abi_reg_info.kinds[eRegisterKindDWARF] != LLDB_INVALID_REGNUM) { - reg_info.kinds[eRegisterKindDWARF] = - abi_reg_info.kinds[eRegisterKindDWARF]; - } - if (reg_info.kinds[eRegisterKindGeneric] == LLDB_INVALID_REGNUM && - abi_reg_info.kinds[eRegisterKindGeneric] != LLDB_INVALID_REGNUM) { - reg_info.kinds[eRegisterKindGeneric] = - abi_reg_info.kinds[eRegisterKindGeneric]; - } - } - } - } -} - -static size_t SplitCommaSeparatedRegisterNumberString( - const llvm::StringRef &comma_separated_regiter_numbers, - std::vector<uint32_t> ®nums, int base) { - regnums.clear(); - std::pair<llvm::StringRef, llvm::StringRef> value_pair; - value_pair.second = comma_separated_regiter_numbers; - do { - value_pair = value_pair.second.split(','); - if (!value_pair.first.empty()) { - uint32_t reg = StringConvert::ToUInt32(value_pair.first.str().c_str(), - LLDB_INVALID_REGNUM, base); - if (reg != LLDB_INVALID_REGNUM) - regnums.push_back(reg); - } - } while (!value_pair.second.empty()); - return regnums.size(); -} - -void ProcessGDBRemote::BuildDynamicRegisterInfo(bool force) { - if (!force && m_register_info.GetNumRegisters() > 0) - return; - - m_register_info.Clear(); - - // Check if qHostInfo specified a specific packet timeout for this - // connection. If so then lets update our setting so the user knows what the - // timeout is and can see it. - const auto host_packet_timeout = m_gdb_comm.GetHostDefaultPacketTimeout(); - if (host_packet_timeout > std::chrono::seconds(0)) { - GetGlobalPluginProperties()->SetPacketTimeout(host_packet_timeout.count()); - } - - // Register info search order: - // 1 - Use the target definition python file if one is specified. - // 2 - If the target definition doesn't have any of the info from the - // target.xml (registers) then proceed to read the target.xml. - // 3 - Fall back on the qRegisterInfo packets. - - FileSpec target_definition_fspec = - GetGlobalPluginProperties()->GetTargetDefinitionFile(); - if (!FileSystem::Instance().Exists(target_definition_fspec)) { - // If the filename doesn't exist, it may be a ~ not having been expanded - - // try to resolve it. - FileSystem::Instance().Resolve(target_definition_fspec); - } - if (target_definition_fspec) { - // See if we can get register definitions from a python file - if (ParsePythonTargetDefinition(target_definition_fspec)) { - return; - } else { - StreamSP stream_sp = GetTarget().GetDebugger().GetAsyncOutputStream(); - stream_sp->Printf("ERROR: target description file %s failed to parse.\n", - target_definition_fspec.GetPath().c_str()); - } - } - - const ArchSpec &target_arch = GetTarget().GetArchitecture(); - const ArchSpec &remote_host_arch = m_gdb_comm.GetHostArchitecture(); - const ArchSpec &remote_process_arch = m_gdb_comm.GetProcessArchitecture(); - - // Use the process' architecture instead of the host arch, if available - ArchSpec arch_to_use; - if (remote_process_arch.IsValid()) - arch_to_use = remote_process_arch; - else - arch_to_use = remote_host_arch; - - if (!arch_to_use.IsValid()) - arch_to_use = target_arch; - - if (GetGDBServerRegisterInfo(arch_to_use)) - return; - - char packet[128]; - uint32_t reg_offset = 0; - uint32_t reg_num = 0; - for (StringExtractorGDBRemote::ResponseType response_type = - StringExtractorGDBRemote::eResponse; - response_type == StringExtractorGDBRemote::eResponse; ++reg_num) { - const int packet_len = - ::snprintf(packet, sizeof(packet), "qRegisterInfo%x", reg_num); - assert(packet_len < (int)sizeof(packet)); - UNUSED_IF_ASSERT_DISABLED(packet_len); - StringExtractorGDBRemote response; - if (m_gdb_comm.SendPacketAndWaitForResponse(packet, response, false) == - GDBRemoteCommunication::PacketResult::Success) { - response_type = response.GetResponseType(); - if (response_type == StringExtractorGDBRemote::eResponse) { - llvm::StringRef name; - llvm::StringRef value; - ConstString reg_name; - ConstString alt_name; - ConstString set_name; - std::vector<uint32_t> value_regs; - std::vector<uint32_t> invalidate_regs; - std::vector<uint8_t> dwarf_opcode_bytes; - RegisterInfo reg_info = { - nullptr, // Name - nullptr, // Alt name - 0, // byte size - reg_offset, // offset - eEncodingUint, // encoding - eFormatHex, // format - { - LLDB_INVALID_REGNUM, // eh_frame reg num - LLDB_INVALID_REGNUM, // DWARF reg num - LLDB_INVALID_REGNUM, // generic reg num - reg_num, // process plugin reg num - reg_num // native register number - }, - nullptr, - nullptr, - nullptr, // Dwarf expression opcode bytes pointer - 0 // Dwarf expression opcode bytes length - }; - - while (response.GetNameColonValue(name, value)) { - if (name.equals("name")) { - reg_name.SetString(value); - } else if (name.equals("alt-name")) { - alt_name.SetString(value); - } else if (name.equals("bitsize")) { - value.getAsInteger(0, reg_info.byte_size); - reg_info.byte_size /= CHAR_BIT; - } else if (name.equals("offset")) { - if (value.getAsInteger(0, reg_offset)) - reg_offset = UINT32_MAX; - } else if (name.equals("encoding")) { - const Encoding encoding = Args::StringToEncoding(value); - if (encoding != eEncodingInvalid) - reg_info.encoding = encoding; - } else if (name.equals("format")) { - Format format = eFormatInvalid; - if (OptionArgParser::ToFormat(value.str().c_str(), format, nullptr) - .Success()) - reg_info.format = format; - else { - reg_info.format = - llvm::StringSwitch<Format>(value) - .Case("binary", eFormatBinary) - .Case("decimal", eFormatDecimal) - .Case("hex", eFormatHex) - .Case("float", eFormatFloat) - .Case("vector-sint8", eFormatVectorOfSInt8) - .Case("vector-uint8", eFormatVectorOfUInt8) - .Case("vector-sint16", eFormatVectorOfSInt16) - .Case("vector-uint16", eFormatVectorOfUInt16) - .Case("vector-sint32", eFormatVectorOfSInt32) - .Case("vector-uint32", eFormatVectorOfUInt32) - .Case("vector-float32", eFormatVectorOfFloat32) - .Case("vector-uint64", eFormatVectorOfUInt64) - .Case("vector-uint128", eFormatVectorOfUInt128) - .Default(eFormatInvalid); - } - } else if (name.equals("set")) { - set_name.SetString(value); - } else if (name.equals("gcc") || name.equals("ehframe")) { - if (value.getAsInteger(0, reg_info.kinds[eRegisterKindEHFrame])) - reg_info.kinds[eRegisterKindEHFrame] = LLDB_INVALID_REGNUM; - } else if (name.equals("dwarf")) { - if (value.getAsInteger(0, reg_info.kinds[eRegisterKindDWARF])) - reg_info.kinds[eRegisterKindDWARF] = LLDB_INVALID_REGNUM; - } else if (name.equals("generic")) { - reg_info.kinds[eRegisterKindGeneric] = - Args::StringToGenericRegister(value); - } else if (name.equals("container-regs")) { - SplitCommaSeparatedRegisterNumberString(value, value_regs, 16); - } else if (name.equals("invalidate-regs")) { - SplitCommaSeparatedRegisterNumberString(value, invalidate_regs, 16); - } else if (name.equals("dynamic_size_dwarf_expr_bytes")) { - size_t dwarf_opcode_len = value.size() / 2; - assert(dwarf_opcode_len > 0); - - dwarf_opcode_bytes.resize(dwarf_opcode_len); - reg_info.dynamic_size_dwarf_len = dwarf_opcode_len; - - StringExtractor opcode_extractor(value); - uint32_t ret_val = - opcode_extractor.GetHexBytesAvail(dwarf_opcode_bytes); - assert(dwarf_opcode_len == ret_val); - UNUSED_IF_ASSERT_DISABLED(ret_val); - reg_info.dynamic_size_dwarf_expr_bytes = dwarf_opcode_bytes.data(); - } - } - - reg_info.byte_offset = reg_offset; - assert(reg_info.byte_size != 0); - reg_offset += reg_info.byte_size; - if (!value_regs.empty()) { - value_regs.push_back(LLDB_INVALID_REGNUM); - reg_info.value_regs = value_regs.data(); - } - if (!invalidate_regs.empty()) { - invalidate_regs.push_back(LLDB_INVALID_REGNUM); - reg_info.invalidate_regs = invalidate_regs.data(); - } - - // We have to make a temporary ABI here, and not use the GetABI because - // this code gets called in DidAttach, when the target architecture - // (and consequently the ABI we'll get from the process) may be wrong. - ABISP abi_to_use = ABI::FindPlugin(shared_from_this(), arch_to_use); - - AugmentRegisterInfoViaABI(reg_info, reg_name, abi_to_use); - - m_register_info.AddRegister(reg_info, reg_name, alt_name, set_name); - } else { - break; // ensure exit before reg_num is incremented - } - } else { - break; - } - } - - if (m_register_info.GetNumRegisters() > 0) { - m_register_info.Finalize(GetTarget().GetArchitecture()); - return; - } - - // We didn't get anything if the accumulated reg_num is zero. See if we are - // debugging ARM and fill with a hard coded register set until we can get an - // updated debugserver down on the devices. On the other hand, if the - // accumulated reg_num is positive, see if we can add composite registers to - // the existing primordial ones. - bool from_scratch = (m_register_info.GetNumRegisters() == 0); - - if (!target_arch.IsValid()) { - if (arch_to_use.IsValid() && - (arch_to_use.GetMachine() == llvm::Triple::arm || - arch_to_use.GetMachine() == llvm::Triple::thumb) && - arch_to_use.GetTriple().getVendor() == llvm::Triple::Apple) - m_register_info.HardcodeARMRegisters(from_scratch); - } else if (target_arch.GetMachine() == llvm::Triple::arm || - target_arch.GetMachine() == llvm::Triple::thumb) { - m_register_info.HardcodeARMRegisters(from_scratch); - } - - // At this point, we can finalize our register info. - m_register_info.Finalize(GetTarget().GetArchitecture()); -} - -Status ProcessGDBRemote::WillLaunch(lldb_private::Module *module) { - return WillLaunchOrAttach(); -} - -Status ProcessGDBRemote::WillAttachToProcessWithID(lldb::pid_t pid) { - return WillLaunchOrAttach(); -} - -Status ProcessGDBRemote::WillAttachToProcessWithName(const char *process_name, - bool wait_for_launch) { - return WillLaunchOrAttach(); -} - -Status ProcessGDBRemote::DoConnectRemote(Stream *strm, - llvm::StringRef remote_url) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - Status error(WillLaunchOrAttach()); - - if (error.Fail()) - return error; - - error = ConnectToDebugserver(remote_url); - - if (error.Fail()) - return error; - StartAsyncThread(); - - lldb::pid_t pid = m_gdb_comm.GetCurrentProcessID(); - if (pid == LLDB_INVALID_PROCESS_ID) { - // We don't have a valid process ID, so note that we are connected and - // could now request to launch or attach, or get remote process listings... - SetPrivateState(eStateConnected); - } else { - // We have a valid process - SetID(pid); - GetThreadList(); - StringExtractorGDBRemote response; - if (m_gdb_comm.GetStopReply(response)) { - SetLastStopPacket(response); - - // '?' Packets must be handled differently in non-stop mode - if (GetTarget().GetNonStopModeEnabled()) - HandleStopReplySequence(); - - Target &target = GetTarget(); - if (!target.GetArchitecture().IsValid()) { - if (m_gdb_comm.GetProcessArchitecture().IsValid()) { - target.SetArchitecture(m_gdb_comm.GetProcessArchitecture()); - } else { - if (m_gdb_comm.GetHostArchitecture().IsValid()) { - target.SetArchitecture(m_gdb_comm.GetHostArchitecture()); - } - } - } - - const StateType state = SetThreadStopInfo(response); - if (state != eStateInvalid) { - SetPrivateState(state); - } else - error.SetErrorStringWithFormat( - "Process %" PRIu64 " was reported after connecting to " - "'%s', but state was not stopped: %s", - pid, remote_url.str().c_str(), StateAsCString(state)); - } else - error.SetErrorStringWithFormat("Process %" PRIu64 - " was reported after connecting to '%s', " - "but no stop reply packet was received", - pid, remote_url.str().c_str()); - } - - LLDB_LOGF(log, - "ProcessGDBRemote::%s pid %" PRIu64 - ": normalizing target architecture initial triple: %s " - "(GetTarget().GetArchitecture().IsValid() %s, " - "m_gdb_comm.GetHostArchitecture().IsValid(): %s)", - __FUNCTION__, GetID(), - GetTarget().GetArchitecture().GetTriple().getTriple().c_str(), - GetTarget().GetArchitecture().IsValid() ? "true" : "false", - m_gdb_comm.GetHostArchitecture().IsValid() ? "true" : "false"); - - if (error.Success() && !GetTarget().GetArchitecture().IsValid() && - m_gdb_comm.GetHostArchitecture().IsValid()) { - // Prefer the *process'* architecture over that of the *host*, if - // available. - if (m_gdb_comm.GetProcessArchitecture().IsValid()) - GetTarget().SetArchitecture(m_gdb_comm.GetProcessArchitecture()); - else - GetTarget().SetArchitecture(m_gdb_comm.GetHostArchitecture()); - } - - LLDB_LOGF(log, - "ProcessGDBRemote::%s pid %" PRIu64 - ": normalized target architecture triple: %s", - __FUNCTION__, GetID(), - GetTarget().GetArchitecture().GetTriple().getTriple().c_str()); - - if (error.Success()) { - PlatformSP platform_sp = GetTarget().GetPlatform(); - if (platform_sp && platform_sp->IsConnected()) - SetUnixSignals(platform_sp->GetUnixSignals()); - else - SetUnixSignals(UnixSignals::Create(GetTarget().GetArchitecture())); - } - - return error; -} - -Status ProcessGDBRemote::WillLaunchOrAttach() { - Status error; - m_stdio_communication.Clear(); - return error; -} - -// Process Control -Status ProcessGDBRemote::DoLaunch(lldb_private::Module *exe_module, - ProcessLaunchInfo &launch_info) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - Status error; - - LLDB_LOGF(log, "ProcessGDBRemote::%s() entered", __FUNCTION__); - - uint32_t launch_flags = launch_info.GetFlags().Get(); - FileSpec stdin_file_spec{}; - FileSpec stdout_file_spec{}; - FileSpec stderr_file_spec{}; - FileSpec working_dir = launch_info.GetWorkingDirectory(); - - const FileAction *file_action; - file_action = launch_info.GetFileActionForFD(STDIN_FILENO); - if (file_action) { - if (file_action->GetAction() == FileAction::eFileActionOpen) - stdin_file_spec = file_action->GetFileSpec(); - } - file_action = launch_info.GetFileActionForFD(STDOUT_FILENO); - if (file_action) { - if (file_action->GetAction() == FileAction::eFileActionOpen) - stdout_file_spec = file_action->GetFileSpec(); - } - file_action = launch_info.GetFileActionForFD(STDERR_FILENO); - if (file_action) { - if (file_action->GetAction() == FileAction::eFileActionOpen) - stderr_file_spec = file_action->GetFileSpec(); - } - - if (log) { - if (stdin_file_spec || stdout_file_spec || stderr_file_spec) - LLDB_LOGF(log, - "ProcessGDBRemote::%s provided with STDIO paths via " - "launch_info: stdin=%s, stdout=%s, stderr=%s", - __FUNCTION__, - stdin_file_spec ? stdin_file_spec.GetCString() : "<null>", - stdout_file_spec ? stdout_file_spec.GetCString() : "<null>", - stderr_file_spec ? stderr_file_spec.GetCString() : "<null>"); - else - LLDB_LOGF(log, - "ProcessGDBRemote::%s no STDIO paths given via launch_info", - __FUNCTION__); - } - - const bool disable_stdio = (launch_flags & eLaunchFlagDisableSTDIO) != 0; - if (stdin_file_spec || disable_stdio) { - // the inferior will be reading stdin from the specified file or stdio is - // completely disabled - m_stdin_forward = false; - } else { - m_stdin_forward = true; - } - - // ::LogSetBitMask (GDBR_LOG_DEFAULT); - // ::LogSetOptions (LLDB_LOG_OPTION_THREADSAFE | - // LLDB_LOG_OPTION_PREPEND_TIMESTAMP | - // LLDB_LOG_OPTION_PREPEND_PROC_AND_THREAD); - // ::LogSetLogFile ("/dev/stdout"); - - ObjectFile *object_file = exe_module->GetObjectFile(); - if (object_file) { - error = EstablishConnectionIfNeeded(launch_info); - if (error.Success()) { - PseudoTerminal pty; - const bool disable_stdio = (launch_flags & eLaunchFlagDisableSTDIO) != 0; - - PlatformSP platform_sp(GetTarget().GetPlatform()); - if (disable_stdio) { - // set to /dev/null unless redirected to a file above - if (!stdin_file_spec) - stdin_file_spec.SetFile(FileSystem::DEV_NULL, - FileSpec::Style::native); - if (!stdout_file_spec) - stdout_file_spec.SetFile(FileSystem::DEV_NULL, - FileSpec::Style::native); - if (!stderr_file_spec) - stderr_file_spec.SetFile(FileSystem::DEV_NULL, - FileSpec::Style::native); - } else if (platform_sp && platform_sp->IsHost()) { - // If the debugserver is local and we aren't disabling STDIO, lets use - // a pseudo terminal to instead of relying on the 'O' packets for stdio - // since 'O' packets can really slow down debugging if the inferior - // does a lot of output. - if ((!stdin_file_spec || !stdout_file_spec || !stderr_file_spec) && - pty.OpenFirstAvailableMaster(O_RDWR | O_NOCTTY, nullptr, 0)) { - FileSpec slave_name{pty.GetSlaveName(nullptr, 0)}; - - if (!stdin_file_spec) - stdin_file_spec = slave_name; - - if (!stdout_file_spec) - stdout_file_spec = slave_name; - - if (!stderr_file_spec) - stderr_file_spec = slave_name; - } - LLDB_LOGF( - log, - "ProcessGDBRemote::%s adjusted STDIO paths for local platform " - "(IsHost() is true) using slave: stdin=%s, stdout=%s, stderr=%s", - __FUNCTION__, - stdin_file_spec ? stdin_file_spec.GetCString() : "<null>", - stdout_file_spec ? stdout_file_spec.GetCString() : "<null>", - stderr_file_spec ? stderr_file_spec.GetCString() : "<null>"); - } - - LLDB_LOGF(log, - "ProcessGDBRemote::%s final STDIO paths after all " - "adjustments: stdin=%s, stdout=%s, stderr=%s", - __FUNCTION__, - stdin_file_spec ? stdin_file_spec.GetCString() : "<null>", - stdout_file_spec ? stdout_file_spec.GetCString() : "<null>", - stderr_file_spec ? stderr_file_spec.GetCString() : "<null>"); - - if (stdin_file_spec) - m_gdb_comm.SetSTDIN(stdin_file_spec); - if (stdout_file_spec) - m_gdb_comm.SetSTDOUT(stdout_file_spec); - if (stderr_file_spec) - m_gdb_comm.SetSTDERR(stderr_file_spec); - - m_gdb_comm.SetDisableASLR(launch_flags & eLaunchFlagDisableASLR); - m_gdb_comm.SetDetachOnError(launch_flags & eLaunchFlagDetachOnError); - - m_gdb_comm.SendLaunchArchPacket( - GetTarget().GetArchitecture().GetArchitectureName()); - - const char *launch_event_data = launch_info.GetLaunchEventData(); - if (launch_event_data != nullptr && *launch_event_data != '\0') - m_gdb_comm.SendLaunchEventDataPacket(launch_event_data); - - if (working_dir) { - m_gdb_comm.SetWorkingDir(working_dir); - } - - // Send the environment and the program + arguments after we connect - m_gdb_comm.SendEnvironment(launch_info.GetEnvironment()); - - { - // Scope for the scoped timeout object - GDBRemoteCommunication::ScopedTimeout timeout(m_gdb_comm, - std::chrono::seconds(10)); - - int arg_packet_err = m_gdb_comm.SendArgumentsPacket(launch_info); - if (arg_packet_err == 0) { - std::string error_str; - if (m_gdb_comm.GetLaunchSuccess(error_str)) { - SetID(m_gdb_comm.GetCurrentProcessID()); - } else { - error.SetErrorString(error_str.c_str()); - } - } else { - error.SetErrorStringWithFormat("'A' packet returned an error: %i", - arg_packet_err); - } - } - - if (GetID() == LLDB_INVALID_PROCESS_ID) { - LLDB_LOGF(log, "failed to connect to debugserver: %s", - error.AsCString()); - KillDebugserverProcess(); - return error; - } - - StringExtractorGDBRemote response; - if (m_gdb_comm.GetStopReply(response)) { - SetLastStopPacket(response); - // '?' Packets must be handled differently in non-stop mode - if (GetTarget().GetNonStopModeEnabled()) - HandleStopReplySequence(); - - const ArchSpec &process_arch = m_gdb_comm.GetProcessArchitecture(); - - if (process_arch.IsValid()) { - GetTarget().MergeArchitecture(process_arch); - } else { - const ArchSpec &host_arch = m_gdb_comm.GetHostArchitecture(); - if (host_arch.IsValid()) - GetTarget().MergeArchitecture(host_arch); - } - - SetPrivateState(SetThreadStopInfo(response)); - - if (!disable_stdio) { - if (pty.GetMasterFileDescriptor() != PseudoTerminal::invalid_fd) - SetSTDIOFileDescriptor(pty.ReleaseMasterFileDescriptor()); - } - } - } else { - LLDB_LOGF(log, "failed to connect to debugserver: %s", error.AsCString()); - } - } else { - // Set our user ID to an invalid process ID. - SetID(LLDB_INVALID_PROCESS_ID); - error.SetErrorStringWithFormat( - "failed to get object file from '%s' for arch %s", - exe_module->GetFileSpec().GetFilename().AsCString(), - exe_module->GetArchitecture().GetArchitectureName()); - } - return error; -} - -Status ProcessGDBRemote::ConnectToDebugserver(llvm::StringRef connect_url) { - Status error; - // Only connect if we have a valid connect URL - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - - if (!connect_url.empty()) { - LLDB_LOGF(log, "ProcessGDBRemote::%s Connecting to %s", __FUNCTION__, - connect_url.str().c_str()); - std::unique_ptr<ConnectionFileDescriptor> conn_up( - new ConnectionFileDescriptor()); - if (conn_up) { - const uint32_t max_retry_count = 50; - uint32_t retry_count = 0; - while (!m_gdb_comm.IsConnected()) { - if (conn_up->Connect(connect_url, &error) == eConnectionStatusSuccess) { - m_gdb_comm.SetConnection(conn_up.release()); - break; - } else if (error.WasInterrupted()) { - // If we were interrupted, don't keep retrying. - break; - } - - retry_count++; - - if (retry_count >= max_retry_count) - break; - - std::this_thread::sleep_for(std::chrono::milliseconds(100)); - } - } - } - - if (!m_gdb_comm.IsConnected()) { - if (error.Success()) - error.SetErrorString("not connected to remote gdb server"); - return error; - } - - // Start the communications read thread so all incoming data can be parsed - // into packets and queued as they arrive. - if (GetTarget().GetNonStopModeEnabled()) - m_gdb_comm.StartReadThread(); - - // We always seem to be able to open a connection to a local port so we need - // to make sure we can then send data to it. If we can't then we aren't - // actually connected to anything, so try and do the handshake with the - // remote GDB server and make sure that goes alright. - if (!m_gdb_comm.HandshakeWithServer(&error)) { - m_gdb_comm.Disconnect(); - if (error.Success()) - error.SetErrorString("not connected to remote gdb server"); - return error; - } - - // Send $QNonStop:1 packet on startup if required - if (GetTarget().GetNonStopModeEnabled()) - GetTarget().SetNonStopModeEnabled(m_gdb_comm.SetNonStopMode(true)); - - m_gdb_comm.GetEchoSupported(); - m_gdb_comm.GetThreadSuffixSupported(); - m_gdb_comm.GetListThreadsInStopReplySupported(); - m_gdb_comm.GetHostInfo(); - m_gdb_comm.GetVContSupported('c'); - m_gdb_comm.GetVAttachOrWaitSupported(); - m_gdb_comm.EnableErrorStringInPacket(); - - // Ask the remote server for the default thread id - if (GetTarget().GetNonStopModeEnabled()) - m_gdb_comm.GetDefaultThreadId(m_initial_tid); - - size_t num_cmds = GetExtraStartupCommands().GetArgumentCount(); - for (size_t idx = 0; idx < num_cmds; idx++) { - StringExtractorGDBRemote response; - m_gdb_comm.SendPacketAndWaitForResponse( - GetExtraStartupCommands().GetArgumentAtIndex(idx), response, false); - } - return error; -} - -void ProcessGDBRemote::DidLaunchOrAttach(ArchSpec &process_arch) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, "ProcessGDBRemote::%s()", __FUNCTION__); - if (GetID() != LLDB_INVALID_PROCESS_ID) { - BuildDynamicRegisterInfo(false); - - // See if the GDB server supports the qHostInfo information - - // See if the GDB server supports the qProcessInfo packet, if so prefer - // that over the Host information as it will be more specific to our - // process. - - const ArchSpec &remote_process_arch = m_gdb_comm.GetProcessArchitecture(); - if (remote_process_arch.IsValid()) { - process_arch = remote_process_arch; - LLDB_LOGF(log, - "ProcessGDBRemote::%s gdb-remote had process architecture, " - "using %s %s", - __FUNCTION__, - process_arch.GetArchitectureName() - ? process_arch.GetArchitectureName() - : "<null>", - process_arch.GetTriple().getTriple().c_str() - ? process_arch.GetTriple().getTriple().c_str() - : "<null>"); - } else { - process_arch = m_gdb_comm.GetHostArchitecture(); - LLDB_LOGF(log, - "ProcessGDBRemote::%s gdb-remote did not have process " - "architecture, using gdb-remote host architecture %s %s", - __FUNCTION__, - process_arch.GetArchitectureName() - ? process_arch.GetArchitectureName() - : "<null>", - process_arch.GetTriple().getTriple().c_str() - ? process_arch.GetTriple().getTriple().c_str() - : "<null>"); - } - - if (process_arch.IsValid()) { - const ArchSpec &target_arch = GetTarget().GetArchitecture(); - if (target_arch.IsValid()) { - LLDB_LOGF(log, - "ProcessGDBRemote::%s analyzing target arch, currently %s %s", - __FUNCTION__, - target_arch.GetArchitectureName() - ? target_arch.GetArchitectureName() - : "<null>", - target_arch.GetTriple().getTriple().c_str() - ? target_arch.GetTriple().getTriple().c_str() - : "<null>"); - - // If the remote host is ARM and we have apple as the vendor, then - // ARM executables and shared libraries can have mixed ARM - // architectures. - // You can have an armv6 executable, and if the host is armv7, then the - // system will load the best possible architecture for all shared - // libraries it has, so we really need to take the remote host - // architecture as our defacto architecture in this case. - - if ((process_arch.GetMachine() == llvm::Triple::arm || - process_arch.GetMachine() == llvm::Triple::thumb) && - process_arch.GetTriple().getVendor() == llvm::Triple::Apple) { - GetTarget().SetArchitecture(process_arch); - LLDB_LOGF(log, - "ProcessGDBRemote::%s remote process is ARM/Apple, " - "setting target arch to %s %s", - __FUNCTION__, - process_arch.GetArchitectureName() - ? process_arch.GetArchitectureName() - : "<null>", - process_arch.GetTriple().getTriple().c_str() - ? process_arch.GetTriple().getTriple().c_str() - : "<null>"); - } else { - // Fill in what is missing in the triple - const llvm::Triple &remote_triple = process_arch.GetTriple(); - llvm::Triple new_target_triple = target_arch.GetTriple(); - if (new_target_triple.getVendorName().size() == 0) { - new_target_triple.setVendor(remote_triple.getVendor()); - - if (new_target_triple.getOSName().size() == 0) { - new_target_triple.setOS(remote_triple.getOS()); - - if (new_target_triple.getEnvironmentName().size() == 0) - new_target_triple.setEnvironment( - remote_triple.getEnvironment()); - } - - ArchSpec new_target_arch = target_arch; - new_target_arch.SetTriple(new_target_triple); - GetTarget().SetArchitecture(new_target_arch); - } - } - - LLDB_LOGF(log, - "ProcessGDBRemote::%s final target arch after " - "adjustments for remote architecture: %s %s", - __FUNCTION__, - target_arch.GetArchitectureName() - ? target_arch.GetArchitectureName() - : "<null>", - target_arch.GetTriple().getTriple().c_str() - ? target_arch.GetTriple().getTriple().c_str() - : "<null>"); - } else { - // The target doesn't have a valid architecture yet, set it from the - // architecture we got from the remote GDB server - GetTarget().SetArchitecture(process_arch); - } - } - - // Find out which StructuredDataPlugins are supported by the debug monitor. - // These plugins transmit data over async $J packets. - auto supported_packets_array = - m_gdb_comm.GetSupportedStructuredDataPlugins(); - if (supported_packets_array) - MapSupportedStructuredDataPlugins(*supported_packets_array); - } -} - -void ProcessGDBRemote::DidLaunch() { - ArchSpec process_arch; - DidLaunchOrAttach(process_arch); -} - -Status ProcessGDBRemote::DoAttachToProcessWithID( - lldb::pid_t attach_pid, const ProcessAttachInfo &attach_info) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - Status error; - - LLDB_LOGF(log, "ProcessGDBRemote::%s()", __FUNCTION__); - - // Clear out and clean up from any current state - Clear(); - if (attach_pid != LLDB_INVALID_PROCESS_ID) { - error = EstablishConnectionIfNeeded(attach_info); - if (error.Success()) { - m_gdb_comm.SetDetachOnError(attach_info.GetDetachOnError()); - - char packet[64]; - const int packet_len = - ::snprintf(packet, sizeof(packet), "vAttach;%" PRIx64, attach_pid); - SetID(attach_pid); - m_async_broadcaster.BroadcastEvent( - eBroadcastBitAsyncContinue, new EventDataBytes(packet, packet_len)); - } else - SetExitStatus(-1, error.AsCString()); - } - - return error; -} - -Status ProcessGDBRemote::DoAttachToProcessWithName( - const char *process_name, const ProcessAttachInfo &attach_info) { - Status error; - // Clear out and clean up from any current state - Clear(); - - if (process_name && process_name[0]) { - error = EstablishConnectionIfNeeded(attach_info); - if (error.Success()) { - StreamString packet; - - m_gdb_comm.SetDetachOnError(attach_info.GetDetachOnError()); - - if (attach_info.GetWaitForLaunch()) { - if (!m_gdb_comm.GetVAttachOrWaitSupported()) { - packet.PutCString("vAttachWait"); - } else { - if (attach_info.GetIgnoreExisting()) - packet.PutCString("vAttachWait"); - else - packet.PutCString("vAttachOrWait"); - } - } else - packet.PutCString("vAttachName"); - packet.PutChar(';'); - packet.PutBytesAsRawHex8(process_name, strlen(process_name), - endian::InlHostByteOrder(), - endian::InlHostByteOrder()); - - m_async_broadcaster.BroadcastEvent( - eBroadcastBitAsyncContinue, - new EventDataBytes(packet.GetString().data(), packet.GetSize())); - - } else - SetExitStatus(-1, error.AsCString()); - } - return error; -} - -lldb::user_id_t ProcessGDBRemote::StartTrace(const TraceOptions &options, - Status &error) { - return m_gdb_comm.SendStartTracePacket(options, error); -} - -Status ProcessGDBRemote::StopTrace(lldb::user_id_t uid, lldb::tid_t thread_id) { - return m_gdb_comm.SendStopTracePacket(uid, thread_id); -} - -Status ProcessGDBRemote::GetData(lldb::user_id_t uid, lldb::tid_t thread_id, - llvm::MutableArrayRef<uint8_t> &buffer, - size_t offset) { - return m_gdb_comm.SendGetDataPacket(uid, thread_id, buffer, offset); -} - -Status ProcessGDBRemote::GetMetaData(lldb::user_id_t uid, lldb::tid_t thread_id, - llvm::MutableArrayRef<uint8_t> &buffer, - size_t offset) { - return m_gdb_comm.SendGetMetaDataPacket(uid, thread_id, buffer, offset); -} - -Status ProcessGDBRemote::GetTraceConfig(lldb::user_id_t uid, - TraceOptions &options) { - return m_gdb_comm.SendGetTraceConfigPacket(uid, options); -} - -void ProcessGDBRemote::DidExit() { - // When we exit, disconnect from the GDB server communications - m_gdb_comm.Disconnect(); -} - -void ProcessGDBRemote::DidAttach(ArchSpec &process_arch) { - // If you can figure out what the architecture is, fill it in here. - process_arch.Clear(); - DidLaunchOrAttach(process_arch); -} - -Status ProcessGDBRemote::WillResume() { - m_continue_c_tids.clear(); - m_continue_C_tids.clear(); - m_continue_s_tids.clear(); - m_continue_S_tids.clear(); - m_jstopinfo_sp.reset(); - m_jthreadsinfo_sp.reset(); - return Status(); -} - -Status ProcessGDBRemote::DoResume() { - Status error; - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, "ProcessGDBRemote::Resume()"); - - ListenerSP listener_sp( - Listener::MakeListener("gdb-remote.resume-packet-sent")); - if (listener_sp->StartListeningForEvents( - &m_gdb_comm, GDBRemoteCommunication::eBroadcastBitRunPacketSent)) { - listener_sp->StartListeningForEvents( - &m_async_broadcaster, - ProcessGDBRemote::eBroadcastBitAsyncThreadDidExit); - - const size_t num_threads = GetThreadList().GetSize(); - - StreamString continue_packet; - bool continue_packet_error = false; - if (m_gdb_comm.HasAnyVContSupport()) { - if (!GetTarget().GetNonStopModeEnabled() && - (m_continue_c_tids.size() == num_threads || - (m_continue_c_tids.empty() && m_continue_C_tids.empty() && - m_continue_s_tids.empty() && m_continue_S_tids.empty()))) { - // All threads are continuing, just send a "c" packet - continue_packet.PutCString("c"); - } else { - continue_packet.PutCString("vCont"); - - if (!m_continue_c_tids.empty()) { - if (m_gdb_comm.GetVContSupported('c')) { - for (tid_collection::const_iterator - t_pos = m_continue_c_tids.begin(), - t_end = m_continue_c_tids.end(); - t_pos != t_end; ++t_pos) - continue_packet.Printf(";c:%4.4" PRIx64, *t_pos); - } else - continue_packet_error = true; - } - - if (!continue_packet_error && !m_continue_C_tids.empty()) { - if (m_gdb_comm.GetVContSupported('C')) { - for (tid_sig_collection::const_iterator - s_pos = m_continue_C_tids.begin(), - s_end = m_continue_C_tids.end(); - s_pos != s_end; ++s_pos) - continue_packet.Printf(";C%2.2x:%4.4" PRIx64, s_pos->second, - s_pos->first); - } else - continue_packet_error = true; - } - - if (!continue_packet_error && !m_continue_s_tids.empty()) { - if (m_gdb_comm.GetVContSupported('s')) { - for (tid_collection::const_iterator - t_pos = m_continue_s_tids.begin(), - t_end = m_continue_s_tids.end(); - t_pos != t_end; ++t_pos) - continue_packet.Printf(";s:%4.4" PRIx64, *t_pos); - } else - continue_packet_error = true; - } - - if (!continue_packet_error && !m_continue_S_tids.empty()) { - if (m_gdb_comm.GetVContSupported('S')) { - for (tid_sig_collection::const_iterator - s_pos = m_continue_S_tids.begin(), - s_end = m_continue_S_tids.end(); - s_pos != s_end; ++s_pos) - continue_packet.Printf(";S%2.2x:%4.4" PRIx64, s_pos->second, - s_pos->first); - } else - continue_packet_error = true; - } - - if (continue_packet_error) - continue_packet.Clear(); - } - } else - continue_packet_error = true; - - if (continue_packet_error) { - // Either no vCont support, or we tried to use part of the vCont packet - // that wasn't supported by the remote GDB server. We need to try and - // make a simple packet that can do our continue - const size_t num_continue_c_tids = m_continue_c_tids.size(); - const size_t num_continue_C_tids = m_continue_C_tids.size(); - const size_t num_continue_s_tids = m_continue_s_tids.size(); - const size_t num_continue_S_tids = m_continue_S_tids.size(); - if (num_continue_c_tids > 0) { - if (num_continue_c_tids == num_threads) { - // All threads are resuming... - m_gdb_comm.SetCurrentThreadForRun(-1); - continue_packet.PutChar('c'); - continue_packet_error = false; - } else if (num_continue_c_tids == 1 && num_continue_C_tids == 0 && - num_continue_s_tids == 0 && num_continue_S_tids == 0) { - // Only one thread is continuing - m_gdb_comm.SetCurrentThreadForRun(m_continue_c_tids.front()); - continue_packet.PutChar('c'); - continue_packet_error = false; - } - } - - if (continue_packet_error && num_continue_C_tids > 0) { - if ((num_continue_C_tids + num_continue_c_tids) == num_threads && - num_continue_C_tids > 0 && num_continue_s_tids == 0 && - num_continue_S_tids == 0) { - const int continue_signo = m_continue_C_tids.front().second; - // Only one thread is continuing - if (num_continue_C_tids > 1) { - // More that one thread with a signal, yet we don't have vCont - // support and we are being asked to resume each thread with a - // signal, we need to make sure they are all the same signal, or we - // can't issue the continue accurately with the current support... - if (num_continue_C_tids > 1) { - continue_packet_error = false; - for (size_t i = 1; i < m_continue_C_tids.size(); ++i) { - if (m_continue_C_tids[i].second != continue_signo) - continue_packet_error = true; - } - } - if (!continue_packet_error) - m_gdb_comm.SetCurrentThreadForRun(-1); - } else { - // Set the continue thread ID - continue_packet_error = false; - m_gdb_comm.SetCurrentThreadForRun(m_continue_C_tids.front().first); - } - if (!continue_packet_error) { - // Add threads continuing with the same signo... - continue_packet.Printf("C%2.2x", continue_signo); - } - } - } - - if (continue_packet_error && num_continue_s_tids > 0) { - if (num_continue_s_tids == num_threads) { - // All threads are resuming... - m_gdb_comm.SetCurrentThreadForRun(-1); - - // If in Non-Stop-Mode use vCont when stepping - if (GetTarget().GetNonStopModeEnabled()) { - if (m_gdb_comm.GetVContSupported('s')) - continue_packet.PutCString("vCont;s"); - else - continue_packet.PutChar('s'); - } else - continue_packet.PutChar('s'); - - continue_packet_error = false; - } else if (num_continue_c_tids == 0 && num_continue_C_tids == 0 && - num_continue_s_tids == 1 && num_continue_S_tids == 0) { - // Only one thread is stepping - m_gdb_comm.SetCurrentThreadForRun(m_continue_s_tids.front()); - continue_packet.PutChar('s'); - continue_packet_error = false; - } - } - - if (!continue_packet_error && num_continue_S_tids > 0) { - if (num_continue_S_tids == num_threads) { - const int step_signo = m_continue_S_tids.front().second; - // Are all threads trying to step with the same signal? - continue_packet_error = false; - if (num_continue_S_tids > 1) { - for (size_t i = 1; i < num_threads; ++i) { - if (m_continue_S_tids[i].second != step_signo) - continue_packet_error = true; - } - } - if (!continue_packet_error) { - // Add threads stepping with the same signo... - m_gdb_comm.SetCurrentThreadForRun(-1); - continue_packet.Printf("S%2.2x", step_signo); - } - } else if (num_continue_c_tids == 0 && num_continue_C_tids == 0 && - num_continue_s_tids == 0 && num_continue_S_tids == 1) { - // Only one thread is stepping with signal - m_gdb_comm.SetCurrentThreadForRun(m_continue_S_tids.front().first); - continue_packet.Printf("S%2.2x", m_continue_S_tids.front().second); - continue_packet_error = false; - } - } - } - - if (continue_packet_error) { - error.SetErrorString("can't make continue packet for this resume"); - } else { - EventSP event_sp; - if (!m_async_thread.IsJoinable()) { - error.SetErrorString("Trying to resume but the async thread is dead."); - LLDB_LOGF(log, "ProcessGDBRemote::DoResume: Trying to resume but the " - "async thread is dead."); - return error; - } - - m_async_broadcaster.BroadcastEvent( - eBroadcastBitAsyncContinue, - new EventDataBytes(continue_packet.GetString().data(), - continue_packet.GetSize())); - - if (!listener_sp->GetEvent(event_sp, std::chrono::seconds(5))) { - error.SetErrorString("Resume timed out."); - LLDB_LOGF(log, "ProcessGDBRemote::DoResume: Resume timed out."); - } else if (event_sp->BroadcasterIs(&m_async_broadcaster)) { - error.SetErrorString("Broadcast continue, but the async thread was " - "killed before we got an ack back."); - LLDB_LOGF(log, - "ProcessGDBRemote::DoResume: Broadcast continue, but the " - "async thread was killed before we got an ack back."); - return error; - } - } - } - - return error; -} - -void ProcessGDBRemote::HandleStopReplySequence() { - while (true) { - // Send vStopped - StringExtractorGDBRemote response; - m_gdb_comm.SendPacketAndWaitForResponse("vStopped", response, false); - - // OK represents end of signal list - if (response.IsOKResponse()) - break; - - // If not OK or a normal packet we have a problem - if (!response.IsNormalResponse()) - break; - - SetLastStopPacket(response); - } -} - -void ProcessGDBRemote::ClearThreadIDList() { - std::lock_guard<std::recursive_mutex> guard(m_thread_list_real.GetMutex()); - m_thread_ids.clear(); - m_thread_pcs.clear(); -} - -size_t -ProcessGDBRemote::UpdateThreadIDsFromStopReplyThreadsValue(std::string &value) { - m_thread_ids.clear(); - size_t comma_pos; - lldb::tid_t tid; - while ((comma_pos = value.find(',')) != std::string::npos) { - value[comma_pos] = '\0'; - // thread in big endian hex - tid = StringConvert::ToUInt64(value.c_str(), LLDB_INVALID_THREAD_ID, 16); - if (tid != LLDB_INVALID_THREAD_ID) - m_thread_ids.push_back(tid); - value.erase(0, comma_pos + 1); - } - tid = StringConvert::ToUInt64(value.c_str(), LLDB_INVALID_THREAD_ID, 16); - if (tid != LLDB_INVALID_THREAD_ID) - m_thread_ids.push_back(tid); - return m_thread_ids.size(); -} - -size_t -ProcessGDBRemote::UpdateThreadPCsFromStopReplyThreadsValue(std::string &value) { - m_thread_pcs.clear(); - size_t comma_pos; - lldb::addr_t pc; - while ((comma_pos = value.find(',')) != std::string::npos) { - value[comma_pos] = '\0'; - pc = StringConvert::ToUInt64(value.c_str(), LLDB_INVALID_ADDRESS, 16); - if (pc != LLDB_INVALID_ADDRESS) - m_thread_pcs.push_back(pc); - value.erase(0, comma_pos + 1); - } - pc = StringConvert::ToUInt64(value.c_str(), LLDB_INVALID_ADDRESS, 16); - if (pc != LLDB_INVALID_THREAD_ID) - m_thread_pcs.push_back(pc); - return m_thread_pcs.size(); -} - -bool ProcessGDBRemote::UpdateThreadIDList() { - std::lock_guard<std::recursive_mutex> guard(m_thread_list_real.GetMutex()); - - if (m_jthreadsinfo_sp) { - // If we have the JSON threads info, we can get the thread list from that - StructuredData::Array *thread_infos = m_jthreadsinfo_sp->GetAsArray(); - if (thread_infos && thread_infos->GetSize() > 0) { - m_thread_ids.clear(); - m_thread_pcs.clear(); - thread_infos->ForEach([this](StructuredData::Object *object) -> bool { - StructuredData::Dictionary *thread_dict = object->GetAsDictionary(); - if (thread_dict) { - // Set the thread stop info from the JSON dictionary - SetThreadStopInfo(thread_dict); - lldb::tid_t tid = LLDB_INVALID_THREAD_ID; - if (thread_dict->GetValueForKeyAsInteger<lldb::tid_t>("tid", tid)) - m_thread_ids.push_back(tid); - } - return true; // Keep iterating through all thread_info objects - }); - } - if (!m_thread_ids.empty()) - return true; - } else { - // See if we can get the thread IDs from the current stop reply packets - // that might contain a "threads" key/value pair - - // Lock the thread stack while we access it - // Mutex::Locker stop_stack_lock(m_last_stop_packet_mutex); - std::unique_lock<std::recursive_mutex> stop_stack_lock( - m_last_stop_packet_mutex, std::defer_lock); - if (stop_stack_lock.try_lock()) { - // Get the number of stop packets on the stack - int nItems = m_stop_packet_stack.size(); - // Iterate over them - for (int i = 0; i < nItems; i++) { - // Get the thread stop info - StringExtractorGDBRemote &stop_info = m_stop_packet_stack[i]; - const std::string &stop_info_str = stop_info.GetStringRef(); - - m_thread_pcs.clear(); - const size_t thread_pcs_pos = stop_info_str.find(";thread-pcs:"); - if (thread_pcs_pos != std::string::npos) { - const size_t start = thread_pcs_pos + strlen(";thread-pcs:"); - const size_t end = stop_info_str.find(';', start); - if (end != std::string::npos) { - std::string value = stop_info_str.substr(start, end - start); - UpdateThreadPCsFromStopReplyThreadsValue(value); - } - } - - const size_t threads_pos = stop_info_str.find(";threads:"); - if (threads_pos != std::string::npos) { - const size_t start = threads_pos + strlen(";threads:"); - const size_t end = stop_info_str.find(';', start); - if (end != std::string::npos) { - std::string value = stop_info_str.substr(start, end - start); - if (UpdateThreadIDsFromStopReplyThreadsValue(value)) - return true; - } - } - } - } - } - - bool sequence_mutex_unavailable = false; - m_gdb_comm.GetCurrentThreadIDs(m_thread_ids, sequence_mutex_unavailable); - if (sequence_mutex_unavailable) { - return false; // We just didn't get the list - } - return true; -} - -bool ProcessGDBRemote::UpdateThreadList(ThreadList &old_thread_list, - ThreadList &new_thread_list) { - // locker will keep a mutex locked until it goes out of scope - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_THREAD)); - LLDB_LOGV(log, "pid = {0}", GetID()); - - size_t num_thread_ids = m_thread_ids.size(); - // The "m_thread_ids" thread ID list should always be updated after each stop - // reply packet, but in case it isn't, update it here. - if (num_thread_ids == 0) { - if (!UpdateThreadIDList()) - return false; - num_thread_ids = m_thread_ids.size(); - } - - ThreadList old_thread_list_copy(old_thread_list); - if (num_thread_ids > 0) { - for (size_t i = 0; i < num_thread_ids; ++i) { - tid_t tid = m_thread_ids[i]; - ThreadSP thread_sp( - old_thread_list_copy.RemoveThreadByProtocolID(tid, false)); - if (!thread_sp) { - thread_sp = std::make_shared<ThreadGDBRemote>(*this, tid); - LLDB_LOGV(log, "Making new thread: {0} for thread ID: {1:x}.", - thread_sp.get(), thread_sp->GetID()); - } else { - LLDB_LOGV(log, "Found old thread: {0} for thread ID: {1:x}.", - thread_sp.get(), thread_sp->GetID()); - } - - SetThreadPc(thread_sp, i); - new_thread_list.AddThreadSortedByIndexID(thread_sp); - } - } - - // Whatever that is left in old_thread_list_copy are not present in - // new_thread_list. Remove non-existent threads from internal id table. - size_t old_num_thread_ids = old_thread_list_copy.GetSize(false); - for (size_t i = 0; i < old_num_thread_ids; i++) { - ThreadSP old_thread_sp(old_thread_list_copy.GetThreadAtIndex(i, false)); - if (old_thread_sp) { - lldb::tid_t old_thread_id = old_thread_sp->GetProtocolID(); - m_thread_id_to_index_id_map.erase(old_thread_id); - } - } - - return true; -} - -void ProcessGDBRemote::SetThreadPc(const ThreadSP &thread_sp, uint64_t index) { - if (m_thread_ids.size() == m_thread_pcs.size() && thread_sp.get() && - GetByteOrder() != eByteOrderInvalid) { - ThreadGDBRemote *gdb_thread = - static_cast<ThreadGDBRemote *>(thread_sp.get()); - RegisterContextSP reg_ctx_sp(thread_sp->GetRegisterContext()); - if (reg_ctx_sp) { - uint32_t pc_regnum = reg_ctx_sp->ConvertRegisterKindToRegisterNumber( - eRegisterKindGeneric, LLDB_REGNUM_GENERIC_PC); - if (pc_regnum != LLDB_INVALID_REGNUM) { - gdb_thread->PrivateSetRegisterValue(pc_regnum, m_thread_pcs[index]); - } - } - } -} - -bool ProcessGDBRemote::GetThreadStopInfoFromJSON( - ThreadGDBRemote *thread, const StructuredData::ObjectSP &thread_infos_sp) { - // See if we got thread stop infos for all threads via the "jThreadsInfo" - // packet - if (thread_infos_sp) { - StructuredData::Array *thread_infos = thread_infos_sp->GetAsArray(); - if (thread_infos) { - lldb::tid_t tid; - const size_t n = thread_infos->GetSize(); - for (size_t i = 0; i < n; ++i) { - StructuredData::Dictionary *thread_dict = - thread_infos->GetItemAtIndex(i)->GetAsDictionary(); - if (thread_dict) { - if (thread_dict->GetValueForKeyAsInteger<lldb::tid_t>( - "tid", tid, LLDB_INVALID_THREAD_ID)) { - if (tid == thread->GetID()) - return (bool)SetThreadStopInfo(thread_dict); - } - } - } - } - } - return false; -} - -bool ProcessGDBRemote::CalculateThreadStopInfo(ThreadGDBRemote *thread) { - // See if we got thread stop infos for all threads via the "jThreadsInfo" - // packet - if (GetThreadStopInfoFromJSON(thread, m_jthreadsinfo_sp)) - return true; - - // See if we got thread stop info for any threads valid stop info reasons - // threads via the "jstopinfo" packet stop reply packet key/value pair? - if (m_jstopinfo_sp) { - // If we have "jstopinfo" then we have stop descriptions for all threads - // that have stop reasons, and if there is no entry for a thread, then it - // has no stop reason. - thread->GetRegisterContext()->InvalidateIfNeeded(true); - if (!GetThreadStopInfoFromJSON(thread, m_jstopinfo_sp)) { - thread->SetStopInfo(StopInfoSP()); - } - return true; - } - - // Fall back to using the qThreadStopInfo packet - StringExtractorGDBRemote stop_packet; - if (GetGDBRemote().GetThreadStopInfo(thread->GetProtocolID(), stop_packet)) - return SetThreadStopInfo(stop_packet) == eStateStopped; - return false; -} - -ThreadSP ProcessGDBRemote::SetThreadStopInfo( - lldb::tid_t tid, ExpeditedRegisterMap &expedited_register_map, - uint8_t signo, const std::string &thread_name, const std::string &reason, - const std::string &description, uint32_t exc_type, - const std::vector<addr_t> &exc_data, addr_t thread_dispatch_qaddr, - bool queue_vars_valid, // Set to true if queue_name, queue_kind and - // queue_serial are valid - LazyBool associated_with_dispatch_queue, addr_t dispatch_queue_t, - std::string &queue_name, QueueKind queue_kind, uint64_t queue_serial) { - ThreadSP thread_sp; - if (tid != LLDB_INVALID_THREAD_ID) { - // Scope for "locker" below - { - // m_thread_list_real does have its own mutex, but we need to hold onto - // the mutex between the call to m_thread_list_real.FindThreadByID(...) - // and the m_thread_list_real.AddThread(...) so it doesn't change on us - std::lock_guard<std::recursive_mutex> guard( - m_thread_list_real.GetMutex()); - thread_sp = m_thread_list_real.FindThreadByProtocolID(tid, false); - - if (!thread_sp) { - // Create the thread if we need to - thread_sp = std::make_shared<ThreadGDBRemote>(*this, tid); - m_thread_list_real.AddThread(thread_sp); - } - } - - if (thread_sp) { - ThreadGDBRemote *gdb_thread = - static_cast<ThreadGDBRemote *>(thread_sp.get()); - gdb_thread->GetRegisterContext()->InvalidateIfNeeded(true); - - auto iter = std::find(m_thread_ids.begin(), m_thread_ids.end(), tid); - if (iter != m_thread_ids.end()) { - SetThreadPc(thread_sp, iter - m_thread_ids.begin()); - } - - for (const auto &pair : expedited_register_map) { - StringExtractor reg_value_extractor(pair.second); - DataBufferSP buffer_sp(new DataBufferHeap( - reg_value_extractor.GetStringRef().size() / 2, 0)); - reg_value_extractor.GetHexBytes(buffer_sp->GetData(), '\xcc'); - gdb_thread->PrivateSetRegisterValue(pair.first, buffer_sp->GetData()); - } - - thread_sp->SetName(thread_name.empty() ? nullptr : thread_name.c_str()); - - gdb_thread->SetThreadDispatchQAddr(thread_dispatch_qaddr); - // Check if the GDB server was able to provide the queue name, kind and - // serial number - if (queue_vars_valid) - gdb_thread->SetQueueInfo(std::move(queue_name), queue_kind, - queue_serial, dispatch_queue_t, - associated_with_dispatch_queue); - else - gdb_thread->ClearQueueInfo(); - - gdb_thread->SetAssociatedWithLibdispatchQueue( - associated_with_dispatch_queue); - - if (dispatch_queue_t != LLDB_INVALID_ADDRESS) - gdb_thread->SetQueueLibdispatchQueueAddress(dispatch_queue_t); - - // Make sure we update our thread stop reason just once - if (!thread_sp->StopInfoIsUpToDate()) { - thread_sp->SetStopInfo(StopInfoSP()); - // If there's a memory thread backed by this thread, we need to use it - // to calculate StopInfo. - if (ThreadSP memory_thread_sp = - m_thread_list.GetBackingThread(thread_sp)) - thread_sp = memory_thread_sp; - - if (exc_type != 0) { - const size_t exc_data_size = exc_data.size(); - - thread_sp->SetStopInfo( - StopInfoMachException::CreateStopReasonWithMachException( - *thread_sp, exc_type, exc_data_size, - exc_data_size >= 1 ? exc_data[0] : 0, - exc_data_size >= 2 ? exc_data[1] : 0, - exc_data_size >= 3 ? exc_data[2] : 0)); - } else { - bool handled = false; - bool did_exec = false; - if (!reason.empty()) { - if (reason == "trace") { - addr_t pc = thread_sp->GetRegisterContext()->GetPC(); - lldb::BreakpointSiteSP bp_site_sp = thread_sp->GetProcess() - ->GetBreakpointSiteList() - .FindByAddress(pc); - - // If the current pc is a breakpoint site then the StopInfo - // should be set to Breakpoint Otherwise, it will be set to - // Trace. - if (bp_site_sp && - bp_site_sp->ValidForThisThread(thread_sp.get())) { - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonWithBreakpointSiteID( - *thread_sp, bp_site_sp->GetID())); - } else - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonToTrace(*thread_sp)); - handled = true; - } else if (reason == "breakpoint") { - addr_t pc = thread_sp->GetRegisterContext()->GetPC(); - lldb::BreakpointSiteSP bp_site_sp = thread_sp->GetProcess() - ->GetBreakpointSiteList() - .FindByAddress(pc); - if (bp_site_sp) { - // If the breakpoint is for this thread, then we'll report the - // hit, but if it is for another thread, we can just report no - // reason. We don't need to worry about stepping over the - // breakpoint here, that will be taken care of when the thread - // resumes and notices that there's a breakpoint under the pc. - handled = true; - if (bp_site_sp->ValidForThisThread(thread_sp.get())) { - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonWithBreakpointSiteID( - *thread_sp, bp_site_sp->GetID())); - } else { - StopInfoSP invalid_stop_info_sp; - thread_sp->SetStopInfo(invalid_stop_info_sp); - } - } - } else if (reason == "trap") { - // Let the trap just use the standard signal stop reason below... - } else if (reason == "watchpoint") { - StringExtractor desc_extractor(description.c_str()); - addr_t wp_addr = desc_extractor.GetU64(LLDB_INVALID_ADDRESS); - uint32_t wp_index = desc_extractor.GetU32(LLDB_INVALID_INDEX32); - addr_t wp_hit_addr = desc_extractor.GetU64(LLDB_INVALID_ADDRESS); - watch_id_t watch_id = LLDB_INVALID_WATCH_ID; - if (wp_addr != LLDB_INVALID_ADDRESS) { - WatchpointSP wp_sp; - ArchSpec::Core core = GetTarget().GetArchitecture().GetCore(); - if ((core >= ArchSpec::kCore_mips_first && - core <= ArchSpec::kCore_mips_last) || - (core >= ArchSpec::eCore_arm_generic && - core <= ArchSpec::eCore_arm_aarch64)) - wp_sp = GetTarget().GetWatchpointList().FindByAddress( - wp_hit_addr); - if (!wp_sp) - wp_sp = - GetTarget().GetWatchpointList().FindByAddress(wp_addr); - if (wp_sp) { - wp_sp->SetHardwareIndex(wp_index); - watch_id = wp_sp->GetID(); - } - } - if (watch_id == LLDB_INVALID_WATCH_ID) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet( - GDBR_LOG_WATCHPOINTS)); - LLDB_LOGF(log, "failed to find watchpoint"); - } - thread_sp->SetStopInfo(StopInfo::CreateStopReasonWithWatchpointID( - *thread_sp, watch_id, wp_hit_addr)); - handled = true; - } else if (reason == "exception") { - thread_sp->SetStopInfo(StopInfo::CreateStopReasonWithException( - *thread_sp, description.c_str())); - handled = true; - } else if (reason == "exec") { - did_exec = true; - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonWithExec(*thread_sp)); - handled = true; - } - } else if (!signo) { - addr_t pc = thread_sp->GetRegisterContext()->GetPC(); - lldb::BreakpointSiteSP bp_site_sp = - thread_sp->GetProcess()->GetBreakpointSiteList().FindByAddress( - pc); - - // If the current pc is a breakpoint site then the StopInfo should - // be set to Breakpoint even though the remote stub did not set it - // as such. This can happen when the thread is involuntarily - // interrupted (e.g. due to stops on other threads) just as it is - // about to execute the breakpoint instruction. - if (bp_site_sp && bp_site_sp->ValidForThisThread(thread_sp.get())) { - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonWithBreakpointSiteID( - *thread_sp, bp_site_sp->GetID())); - handled = true; - } - } - - if (!handled && signo && !did_exec) { - if (signo == SIGTRAP) { - // Currently we are going to assume SIGTRAP means we are either - // hitting a breakpoint or hardware single stepping. - handled = true; - addr_t pc = thread_sp->GetRegisterContext()->GetPC() + - m_breakpoint_pc_offset; - lldb::BreakpointSiteSP bp_site_sp = thread_sp->GetProcess() - ->GetBreakpointSiteList() - .FindByAddress(pc); - - if (bp_site_sp) { - // If the breakpoint is for this thread, then we'll report the - // hit, but if it is for another thread, we can just report no - // reason. We don't need to worry about stepping over the - // breakpoint here, that will be taken care of when the thread - // resumes and notices that there's a breakpoint under the pc. - if (bp_site_sp->ValidForThisThread(thread_sp.get())) { - if (m_breakpoint_pc_offset != 0) - thread_sp->GetRegisterContext()->SetPC(pc); - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonWithBreakpointSiteID( - *thread_sp, bp_site_sp->GetID())); - } else { - StopInfoSP invalid_stop_info_sp; - thread_sp->SetStopInfo(invalid_stop_info_sp); - } - } else { - // If we were stepping then assume the stop was the result of - // the trace. If we were not stepping then report the SIGTRAP. - // FIXME: We are still missing the case where we single step - // over a trap instruction. - if (thread_sp->GetTemporaryResumeState() == eStateStepping) - thread_sp->SetStopInfo( - StopInfo::CreateStopReasonToTrace(*thread_sp)); - else - thread_sp->SetStopInfo(StopInfo::CreateStopReasonWithSignal( - *thread_sp, signo, description.c_str())); - } - } - if (!handled) - thread_sp->SetStopInfo(StopInfo::CreateStopReasonWithSignal( - *thread_sp, signo, description.c_str())); - } - - if (!description.empty()) { - lldb::StopInfoSP stop_info_sp(thread_sp->GetStopInfo()); - if (stop_info_sp) { - const char *stop_info_desc = stop_info_sp->GetDescription(); - if (!stop_info_desc || !stop_info_desc[0]) - stop_info_sp->SetDescription(description.c_str()); - } else { - thread_sp->SetStopInfo(StopInfo::CreateStopReasonWithException( - *thread_sp, description.c_str())); - } - } - } - } - } - } - return thread_sp; -} - -lldb::ThreadSP -ProcessGDBRemote::SetThreadStopInfo(StructuredData::Dictionary *thread_dict) { - static ConstString g_key_tid("tid"); - static ConstString g_key_name("name"); - static ConstString g_key_reason("reason"); - static ConstString g_key_metype("metype"); - static ConstString g_key_medata("medata"); - static ConstString g_key_qaddr("qaddr"); - static ConstString g_key_dispatch_queue_t("dispatch_queue_t"); - static ConstString g_key_associated_with_dispatch_queue( - "associated_with_dispatch_queue"); - static ConstString g_key_queue_name("qname"); - static ConstString g_key_queue_kind("qkind"); - static ConstString g_key_queue_serial_number("qserialnum"); - static ConstString g_key_registers("registers"); - static ConstString g_key_memory("memory"); - static ConstString g_key_address("address"); - static ConstString g_key_bytes("bytes"); - static ConstString g_key_description("description"); - static ConstString g_key_signal("signal"); - - // Stop with signal and thread info - lldb::tid_t tid = LLDB_INVALID_THREAD_ID; - uint8_t signo = 0; - std::string value; - std::string thread_name; - std::string reason; - std::string description; - uint32_t exc_type = 0; - std::vector<addr_t> exc_data; - addr_t thread_dispatch_qaddr = LLDB_INVALID_ADDRESS; - ExpeditedRegisterMap expedited_register_map; - bool queue_vars_valid = false; - addr_t dispatch_queue_t = LLDB_INVALID_ADDRESS; - LazyBool associated_with_dispatch_queue = eLazyBoolCalculate; - std::string queue_name; - QueueKind queue_kind = eQueueKindUnknown; - uint64_t queue_serial_number = 0; - // Iterate through all of the thread dictionary key/value pairs from the - // structured data dictionary - - thread_dict->ForEach([this, &tid, &expedited_register_map, &thread_name, - &signo, &reason, &description, &exc_type, &exc_data, - &thread_dispatch_qaddr, &queue_vars_valid, - &associated_with_dispatch_queue, &dispatch_queue_t, - &queue_name, &queue_kind, &queue_serial_number]( - ConstString key, - StructuredData::Object *object) -> bool { - if (key == g_key_tid) { - // thread in big endian hex - tid = object->GetIntegerValue(LLDB_INVALID_THREAD_ID); - } else if (key == g_key_metype) { - // exception type in big endian hex - exc_type = object->GetIntegerValue(0); - } else if (key == g_key_medata) { - // exception data in big endian hex - StructuredData::Array *array = object->GetAsArray(); - if (array) { - array->ForEach([&exc_data](StructuredData::Object *object) -> bool { - exc_data.push_back(object->GetIntegerValue()); - return true; // Keep iterating through all array items - }); - } - } else if (key == g_key_name) { - thread_name = object->GetStringValue(); - } else if (key == g_key_qaddr) { - thread_dispatch_qaddr = object->GetIntegerValue(LLDB_INVALID_ADDRESS); - } else if (key == g_key_queue_name) { - queue_vars_valid = true; - queue_name = object->GetStringValue(); - } else if (key == g_key_queue_kind) { - std::string queue_kind_str = object->GetStringValue(); - if (queue_kind_str == "serial") { - queue_vars_valid = true; - queue_kind = eQueueKindSerial; - } else if (queue_kind_str == "concurrent") { - queue_vars_valid = true; - queue_kind = eQueueKindConcurrent; - } - } else if (key == g_key_queue_serial_number) { - queue_serial_number = object->GetIntegerValue(0); - if (queue_serial_number != 0) - queue_vars_valid = true; - } else if (key == g_key_dispatch_queue_t) { - dispatch_queue_t = object->GetIntegerValue(0); - if (dispatch_queue_t != 0 && dispatch_queue_t != LLDB_INVALID_ADDRESS) - queue_vars_valid = true; - } else if (key == g_key_associated_with_dispatch_queue) { - queue_vars_valid = true; - bool associated = object->GetBooleanValue(); - if (associated) - associated_with_dispatch_queue = eLazyBoolYes; - else - associated_with_dispatch_queue = eLazyBoolNo; - } else if (key == g_key_reason) { - reason = object->GetStringValue(); - } else if (key == g_key_description) { - description = object->GetStringValue(); - } else if (key == g_key_registers) { - StructuredData::Dictionary *registers_dict = object->GetAsDictionary(); - - if (registers_dict) { - registers_dict->ForEach( - [&expedited_register_map](ConstString key, - StructuredData::Object *object) -> bool { - const uint32_t reg = - StringConvert::ToUInt32(key.GetCString(), UINT32_MAX, 10); - if (reg != UINT32_MAX) - expedited_register_map[reg] = object->GetStringValue(); - return true; // Keep iterating through all array items - }); - } - } else if (key == g_key_memory) { - StructuredData::Array *array = object->GetAsArray(); - if (array) { - array->ForEach([this](StructuredData::Object *object) -> bool { - StructuredData::Dictionary *mem_cache_dict = - object->GetAsDictionary(); - if (mem_cache_dict) { - lldb::addr_t mem_cache_addr = LLDB_INVALID_ADDRESS; - if (mem_cache_dict->GetValueForKeyAsInteger<lldb::addr_t>( - "address", mem_cache_addr)) { - if (mem_cache_addr != LLDB_INVALID_ADDRESS) { - llvm::StringRef str; - if (mem_cache_dict->GetValueForKeyAsString("bytes", str)) { - StringExtractor bytes(str); - bytes.SetFilePos(0); - - const size_t byte_size = bytes.GetStringRef().size() / 2; - DataBufferSP data_buffer_sp(new DataBufferHeap(byte_size, 0)); - const size_t bytes_copied = - bytes.GetHexBytes(data_buffer_sp->GetData(), 0); - if (bytes_copied == byte_size) - m_memory_cache.AddL1CacheData(mem_cache_addr, - data_buffer_sp); - } - } - } - } - return true; // Keep iterating through all array items - }); - } - - } else if (key == g_key_signal) - signo = object->GetIntegerValue(LLDB_INVALID_SIGNAL_NUMBER); - return true; // Keep iterating through all dictionary key/value pairs - }); - - return SetThreadStopInfo(tid, expedited_register_map, signo, thread_name, - reason, description, exc_type, exc_data, - thread_dispatch_qaddr, queue_vars_valid, - associated_with_dispatch_queue, dispatch_queue_t, - queue_name, queue_kind, queue_serial_number); -} - -StateType ProcessGDBRemote::SetThreadStopInfo(StringExtractor &stop_packet) { - stop_packet.SetFilePos(0); - const char stop_type = stop_packet.GetChar(); - switch (stop_type) { - case 'T': - case 'S': { - // This is a bit of a hack, but is is required. If we did exec, we need to - // clear our thread lists and also know to rebuild our dynamic register - // info before we lookup and threads and populate the expedited register - // values so we need to know this right away so we can cleanup and update - // our registers. - const uint32_t stop_id = GetStopID(); - if (stop_id == 0) { - // Our first stop, make sure we have a process ID, and also make sure we - // know about our registers - if (GetID() == LLDB_INVALID_PROCESS_ID) { - lldb::pid_t pid = m_gdb_comm.GetCurrentProcessID(); - if (pid != LLDB_INVALID_PROCESS_ID) - SetID(pid); - } - BuildDynamicRegisterInfo(true); - } - // Stop with signal and thread info - lldb::tid_t tid = LLDB_INVALID_THREAD_ID; - const uint8_t signo = stop_packet.GetHexU8(); - llvm::StringRef key; - llvm::StringRef value; - std::string thread_name; - std::string reason; - std::string description; - uint32_t exc_type = 0; - std::vector<addr_t> exc_data; - addr_t thread_dispatch_qaddr = LLDB_INVALID_ADDRESS; - bool queue_vars_valid = - false; // says if locals below that start with "queue_" are valid - addr_t dispatch_queue_t = LLDB_INVALID_ADDRESS; - LazyBool associated_with_dispatch_queue = eLazyBoolCalculate; - std::string queue_name; - QueueKind queue_kind = eQueueKindUnknown; - uint64_t queue_serial_number = 0; - ExpeditedRegisterMap expedited_register_map; - while (stop_packet.GetNameColonValue(key, value)) { - if (key.compare("metype") == 0) { - // exception type in big endian hex - value.getAsInteger(16, exc_type); - } else if (key.compare("medata") == 0) { - // exception data in big endian hex - uint64_t x; - value.getAsInteger(16, x); - exc_data.push_back(x); - } else if (key.compare("thread") == 0) { - // thread in big endian hex - if (value.getAsInteger(16, tid)) - tid = LLDB_INVALID_THREAD_ID; - } else if (key.compare("threads") == 0) { - std::lock_guard<std::recursive_mutex> guard( - m_thread_list_real.GetMutex()); - - m_thread_ids.clear(); - // A comma separated list of all threads in the current - // process that includes the thread for this stop reply packet - lldb::tid_t tid; - while (!value.empty()) { - llvm::StringRef tid_str; - std::tie(tid_str, value) = value.split(','); - if (tid_str.getAsInteger(16, tid)) - tid = LLDB_INVALID_THREAD_ID; - m_thread_ids.push_back(tid); - } - } else if (key.compare("thread-pcs") == 0) { - m_thread_pcs.clear(); - // A comma separated list of all threads in the current - // process that includes the thread for this stop reply packet - lldb::addr_t pc; - while (!value.empty()) { - llvm::StringRef pc_str; - std::tie(pc_str, value) = value.split(','); - if (pc_str.getAsInteger(16, pc)) - pc = LLDB_INVALID_ADDRESS; - m_thread_pcs.push_back(pc); - } - } else if (key.compare("jstopinfo") == 0) { - StringExtractor json_extractor(value); - std::string json; - // Now convert the HEX bytes into a string value - json_extractor.GetHexByteString(json); - - // This JSON contains thread IDs and thread stop info for all threads. - // It doesn't contain expedited registers, memory or queue info. - m_jstopinfo_sp = StructuredData::ParseJSON(json); - } else if (key.compare("hexname") == 0) { - StringExtractor name_extractor(value); - std::string name; - // Now convert the HEX bytes into a string value - name_extractor.GetHexByteString(thread_name); - } else if (key.compare("name") == 0) { - thread_name = value; - } else if (key.compare("qaddr") == 0) { - value.getAsInteger(16, thread_dispatch_qaddr); - } else if (key.compare("dispatch_queue_t") == 0) { - queue_vars_valid = true; - value.getAsInteger(16, dispatch_queue_t); - } else if (key.compare("qname") == 0) { - queue_vars_valid = true; - StringExtractor name_extractor(value); - // Now convert the HEX bytes into a string value - name_extractor.GetHexByteString(queue_name); - } else if (key.compare("qkind") == 0) { - queue_kind = llvm::StringSwitch<QueueKind>(value) - .Case("serial", eQueueKindSerial) - .Case("concurrent", eQueueKindConcurrent) - .Default(eQueueKindUnknown); - queue_vars_valid = queue_kind != eQueueKindUnknown; - } else if (key.compare("qserialnum") == 0) { - if (!value.getAsInteger(0, queue_serial_number)) - queue_vars_valid = true; - } else if (key.compare("reason") == 0) { - reason = value; - } else if (key.compare("description") == 0) { - StringExtractor desc_extractor(value); - // Now convert the HEX bytes into a string value - desc_extractor.GetHexByteString(description); - } else if (key.compare("memory") == 0) { - // Expedited memory. GDB servers can choose to send back expedited - // memory that can populate the L1 memory cache in the process so that - // things like the frame pointer backchain can be expedited. This will - // help stack backtracing be more efficient by not having to send as - // many memory read requests down the remote GDB server. - - // Key/value pair format: memory:<addr>=<bytes>; - // <addr> is a number whose base will be interpreted by the prefix: - // "0x[0-9a-fA-F]+" for hex - // "0[0-7]+" for octal - // "[1-9]+" for decimal - // <bytes> is native endian ASCII hex bytes just like the register - // values - llvm::StringRef addr_str, bytes_str; - std::tie(addr_str, bytes_str) = value.split('='); - if (!addr_str.empty() && !bytes_str.empty()) { - lldb::addr_t mem_cache_addr = LLDB_INVALID_ADDRESS; - if (!addr_str.getAsInteger(0, mem_cache_addr)) { - StringExtractor bytes(bytes_str); - const size_t byte_size = bytes.GetBytesLeft() / 2; - DataBufferSP data_buffer_sp(new DataBufferHeap(byte_size, 0)); - const size_t bytes_copied = - bytes.GetHexBytes(data_buffer_sp->GetData(), 0); - if (bytes_copied == byte_size) - m_memory_cache.AddL1CacheData(mem_cache_addr, data_buffer_sp); - } - } - } else if (key.compare("watch") == 0 || key.compare("rwatch") == 0 || - key.compare("awatch") == 0) { - // Support standard GDB remote stop reply packet 'TAAwatch:addr' - lldb::addr_t wp_addr = LLDB_INVALID_ADDRESS; - value.getAsInteger(16, wp_addr); - - WatchpointSP wp_sp = - GetTarget().GetWatchpointList().FindByAddress(wp_addr); - uint32_t wp_index = LLDB_INVALID_INDEX32; - - if (wp_sp) - wp_index = wp_sp->GetHardwareIndex(); - - reason = "watchpoint"; - StreamString ostr; - ostr.Printf("%" PRIu64 " %" PRIu32, wp_addr, wp_index); - description = ostr.GetString(); - } else if (key.compare("library") == 0) { - auto error = LoadModules(); - if (error) { - Log *log( - ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOG_ERROR(log, std::move(error), "Failed to load modules: {0}"); - } - } else if (key.size() == 2 && ::isxdigit(key[0]) && ::isxdigit(key[1])) { - uint32_t reg = UINT32_MAX; - if (!key.getAsInteger(16, reg)) - expedited_register_map[reg] = std::move(value); - } - } - - if (tid == LLDB_INVALID_THREAD_ID) { - // A thread id may be invalid if the response is old style 'S' packet - // which does not provide the - // thread information. So update the thread list and choose the first - // one. - UpdateThreadIDList(); - - if (!m_thread_ids.empty()) { - tid = m_thread_ids.front(); - } - } - - ThreadSP thread_sp = SetThreadStopInfo( - tid, expedited_register_map, signo, thread_name, reason, description, - exc_type, exc_data, thread_dispatch_qaddr, queue_vars_valid, - associated_with_dispatch_queue, dispatch_queue_t, queue_name, - queue_kind, queue_serial_number); - - return eStateStopped; - } break; - - case 'W': - case 'X': - // process exited - return eStateExited; - - default: - break; - } - return eStateInvalid; -} - -void ProcessGDBRemote::RefreshStateAfterStop() { - std::lock_guard<std::recursive_mutex> guard(m_thread_list_real.GetMutex()); - - m_thread_ids.clear(); - m_thread_pcs.clear(); - // Set the thread stop info. It might have a "threads" key whose value is a - // list of all thread IDs in the current process, so m_thread_ids might get - // set. - - // Scope for the lock - { - // Check to see if SetThreadStopInfo() filled in m_thread_ids? - if (m_thread_ids.empty()) { - // No, we need to fetch the thread list manually - UpdateThreadIDList(); - } - // We might set some stop info's so make sure the thread list is up to - // date before we do that or we might overwrite what was computed here. - UpdateThreadListIfNeeded(); - - // Lock the thread stack while we access it - std::lock_guard<std::recursive_mutex> guard(m_last_stop_packet_mutex); - // Get the number of stop packets on the stack - int nItems = m_stop_packet_stack.size(); - // Iterate over them - for (int i = 0; i < nItems; i++) { - // Get the thread stop info - StringExtractorGDBRemote stop_info = m_stop_packet_stack[i]; - // Process thread stop info - SetThreadStopInfo(stop_info); - } - // Clear the thread stop stack - m_stop_packet_stack.clear(); - } - - // If we have queried for a default thread id - if (m_initial_tid != LLDB_INVALID_THREAD_ID) { - m_thread_list.SetSelectedThreadByID(m_initial_tid); - m_initial_tid = LLDB_INVALID_THREAD_ID; - } - - // Let all threads recover from stopping and do any clean up based on the - // previous thread state (if any). - m_thread_list_real.RefreshStateAfterStop(); -} - -Status ProcessGDBRemote::DoHalt(bool &caused_stop) { - Status error; - - if (m_public_state.GetValue() == eStateAttaching) { - // We are being asked to halt during an attach. We need to just close our - // file handle and debugserver will go away, and we can be done... - m_gdb_comm.Disconnect(); - } else - caused_stop = m_gdb_comm.Interrupt(); - return error; -} - -Status ProcessGDBRemote::DoDetach(bool keep_stopped) { - Status error; - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, "ProcessGDBRemote::DoDetach(keep_stopped: %i)", keep_stopped); - - error = m_gdb_comm.Detach(keep_stopped); - if (log) { - if (error.Success()) - log->PutCString( - "ProcessGDBRemote::DoDetach() detach packet sent successfully"); - else - LLDB_LOGF(log, - "ProcessGDBRemote::DoDetach() detach packet send failed: %s", - error.AsCString() ? error.AsCString() : "<unknown error>"); - } - - if (!error.Success()) - return error; - - // Sleep for one second to let the process get all detached... - StopAsyncThread(); - - SetPrivateState(eStateDetached); - ResumePrivateStateThread(); - - // KillDebugserverProcess (); - return error; -} - -Status ProcessGDBRemote::DoDestroy() { - Status error; - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, "ProcessGDBRemote::DoDestroy()"); - - // There is a bug in older iOS debugservers where they don't shut down the - // process they are debugging properly. If the process is sitting at a - // breakpoint or an exception, this can cause problems with restarting. So - // we check to see if any of our threads are stopped at a breakpoint, and if - // so we remove all the breakpoints, resume the process, and THEN destroy it - // again. - // - // Note, we don't have a good way to test the version of debugserver, but I - // happen to know that the set of all the iOS debugservers which don't - // support GetThreadSuffixSupported() and that of the debugservers with this - // bug are equal. There really should be a better way to test this! - // - // We also use m_destroy_tried_resuming to make sure we only do this once, if - // we resume and then halt and get called here to destroy again and we're - // still at a breakpoint or exception, then we should just do the straight- - // forward kill. - // - // And of course, if we weren't able to stop the process by the time we get - // here, it isn't necessary (or helpful) to do any of this. - - if (!m_gdb_comm.GetThreadSuffixSupported() && - m_public_state.GetValue() != eStateRunning) { - PlatformSP platform_sp = GetTarget().GetPlatform(); - - // FIXME: These should be ConstStrings so we aren't doing strcmp'ing. - if (platform_sp && platform_sp->GetName() && - platform_sp->GetName() == PlatformRemoteiOS::GetPluginNameStatic()) { - if (m_destroy_tried_resuming) { - if (log) - log->PutCString("ProcessGDBRemote::DoDestroy() - Tried resuming to " - "destroy once already, not doing it again."); - } else { - // At present, the plans are discarded and the breakpoints disabled - // Process::Destroy, but we really need it to happen here and it - // doesn't matter if we do it twice. - m_thread_list.DiscardThreadPlans(); - DisableAllBreakpointSites(); - - bool stop_looks_like_crash = false; - ThreadList &threads = GetThreadList(); - - { - std::lock_guard<std::recursive_mutex> guard(threads.GetMutex()); - - size_t num_threads = threads.GetSize(); - for (size_t i = 0; i < num_threads; i++) { - ThreadSP thread_sp = threads.GetThreadAtIndex(i); - StopInfoSP stop_info_sp = thread_sp->GetPrivateStopInfo(); - StopReason reason = eStopReasonInvalid; - if (stop_info_sp) - reason = stop_info_sp->GetStopReason(); - if (reason == eStopReasonBreakpoint || - reason == eStopReasonException) { - LLDB_LOGF(log, - "ProcessGDBRemote::DoDestroy() - thread: 0x%4.4" PRIx64 - " stopped with reason: %s.", - thread_sp->GetProtocolID(), - stop_info_sp->GetDescription()); - stop_looks_like_crash = true; - break; - } - } - } - - if (stop_looks_like_crash) { - if (log) - log->PutCString("ProcessGDBRemote::DoDestroy() - Stopped at a " - "breakpoint, continue and then kill."); - m_destroy_tried_resuming = true; - - // If we are going to run again before killing, it would be good to - // suspend all the threads before resuming so they won't get into - // more trouble. Sadly, for the threads stopped with the breakpoint - // or exception, the exception doesn't get cleared if it is - // suspended, so we do have to run the risk of letting those threads - // proceed a bit. - - { - std::lock_guard<std::recursive_mutex> guard(threads.GetMutex()); - - size_t num_threads = threads.GetSize(); - for (size_t i = 0; i < num_threads; i++) { - ThreadSP thread_sp = threads.GetThreadAtIndex(i); - StopInfoSP stop_info_sp = thread_sp->GetPrivateStopInfo(); - StopReason reason = eStopReasonInvalid; - if (stop_info_sp) - reason = stop_info_sp->GetStopReason(); - if (reason != eStopReasonBreakpoint && - reason != eStopReasonException) { - LLDB_LOGF(log, - "ProcessGDBRemote::DoDestroy() - Suspending " - "thread: 0x%4.4" PRIx64 " before running.", - thread_sp->GetProtocolID()); - thread_sp->SetResumeState(eStateSuspended); - } - } - } - Resume(); - return Destroy(false); - } - } - } - } - - // Interrupt if our inferior is running... - int exit_status = SIGABRT; - std::string exit_string; - - if (m_gdb_comm.IsConnected()) { - if (m_public_state.GetValue() != eStateAttaching) { - StringExtractorGDBRemote response; - bool send_async = true; - GDBRemoteCommunication::ScopedTimeout(m_gdb_comm, - std::chrono::seconds(3)); - - if (m_gdb_comm.SendPacketAndWaitForResponse("k", response, send_async) == - GDBRemoteCommunication::PacketResult::Success) { - char packet_cmd = response.GetChar(0); - - if (packet_cmd == 'W' || packet_cmd == 'X') { -#if defined(__APPLE__) - // For Native processes on Mac OS X, we launch through the Host - // Platform, then hand the process off to debugserver, which becomes - // the parent process through "PT_ATTACH". Then when we go to kill - // the process on Mac OS X we call ptrace(PT_KILL) to kill it, then - // we call waitpid which returns with no error and the correct - // status. But amusingly enough that doesn't seem to actually reap - // the process, but instead it is left around as a Zombie. Probably - // the kernel is in the process of switching ownership back to lldb - // which was the original parent, and gets confused in the handoff. - // Anyway, so call waitpid here to finally reap it. - PlatformSP platform_sp(GetTarget().GetPlatform()); - if (platform_sp && platform_sp->IsHost()) { - int status; - ::pid_t reap_pid; - reap_pid = waitpid(GetID(), &status, WNOHANG); - LLDB_LOGF(log, "Reaped pid: %d, status: %d.\n", reap_pid, status); - } -#endif - SetLastStopPacket(response); - ClearThreadIDList(); - exit_status = response.GetHexU8(); - } else { - LLDB_LOGF(log, - "ProcessGDBRemote::DoDestroy - got unexpected response " - "to k packet: %s", - response.GetStringRef().data()); - exit_string.assign("got unexpected response to k packet: "); - exit_string.append(response.GetStringRef()); - } - } else { - LLDB_LOGF(log, "ProcessGDBRemote::DoDestroy - failed to send k packet"); - exit_string.assign("failed to send the k packet"); - } - } else { - LLDB_LOGF(log, - "ProcessGDBRemote::DoDestroy - killed or interrupted while " - "attaching"); - exit_string.assign("killed or interrupted while attaching."); - } - } else { - // If we missed setting the exit status on the way out, do it here. - // NB set exit status can be called multiple times, the first one sets the - // status. - exit_string.assign("destroying when not connected to debugserver"); - } - - SetExitStatus(exit_status, exit_string.c_str()); - - StopAsyncThread(); - KillDebugserverProcess(); - return error; -} - -void ProcessGDBRemote::SetLastStopPacket( - const StringExtractorGDBRemote &response) { - const bool did_exec = - response.GetStringRef().find(";reason:exec;") != std::string::npos; - if (did_exec) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, "ProcessGDBRemote::SetLastStopPacket () - detected exec"); - - m_thread_list_real.Clear(); - m_thread_list.Clear(); - BuildDynamicRegisterInfo(true); - m_gdb_comm.ResetDiscoverableSettings(did_exec); - } - - // Scope the lock - { - // Lock the thread stack while we access it - std::lock_guard<std::recursive_mutex> guard(m_last_stop_packet_mutex); - - // We are are not using non-stop mode, there can only be one last stop - // reply packet, so clear the list. - if (!GetTarget().GetNonStopModeEnabled()) - m_stop_packet_stack.clear(); - - // Add this stop packet to the stop packet stack This stack will get popped - // and examined when we switch to the Stopped state - m_stop_packet_stack.push_back(response); - } -} - -void ProcessGDBRemote::SetUnixSignals(const UnixSignalsSP &signals_sp) { - Process::SetUnixSignals(std::make_shared<GDBRemoteSignals>(signals_sp)); -} - -// Process Queries - -bool ProcessGDBRemote::IsAlive() { - return m_gdb_comm.IsConnected() && Process::IsAlive(); -} - -addr_t ProcessGDBRemote::GetImageInfoAddress() { - // request the link map address via the $qShlibInfoAddr packet - lldb::addr_t addr = m_gdb_comm.GetShlibInfoAddr(); - - // the loaded module list can also provides a link map address - if (addr == LLDB_INVALID_ADDRESS) { - llvm::Expected<LoadedModuleInfoList> list = GetLoadedModuleList(); - if (!list) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOG_ERROR(log, list.takeError(), "Failed to read module list: {0}"); - } else { - addr = list->m_link_map; - } - } - - return addr; -} - -void ProcessGDBRemote::WillPublicStop() { - // See if the GDB remote client supports the JSON threads info. If so, we - // gather stop info for all threads, expedited registers, expedited memory, - // runtime queue information (iOS and MacOSX only), and more. Expediting - // memory will help stack backtracing be much faster. Expediting registers - // will make sure we don't have to read the thread registers for GPRs. - m_jthreadsinfo_sp = m_gdb_comm.GetThreadsInfo(); - - if (m_jthreadsinfo_sp) { - // Now set the stop info for each thread and also expedite any registers - // and memory that was in the jThreadsInfo response. - StructuredData::Array *thread_infos = m_jthreadsinfo_sp->GetAsArray(); - if (thread_infos) { - const size_t n = thread_infos->GetSize(); - for (size_t i = 0; i < n; ++i) { - StructuredData::Dictionary *thread_dict = - thread_infos->GetItemAtIndex(i)->GetAsDictionary(); - if (thread_dict) - SetThreadStopInfo(thread_dict); - } - } - } -} - -// Process Memory -size_t ProcessGDBRemote::DoReadMemory(addr_t addr, void *buf, size_t size, - Status &error) { - GetMaxMemorySize(); - bool binary_memory_read = m_gdb_comm.GetxPacketSupported(); - // M and m packets take 2 bytes for 1 byte of memory - size_t max_memory_size = - binary_memory_read ? m_max_memory_size : m_max_memory_size / 2; - if (size > max_memory_size) { - // Keep memory read sizes down to a sane limit. This function will be - // called multiple times in order to complete the task by - // lldb_private::Process so it is ok to do this. - size = max_memory_size; - } - - char packet[64]; - int packet_len; - packet_len = ::snprintf(packet, sizeof(packet), "%c%" PRIx64 ",%" PRIx64, - binary_memory_read ? 'x' : 'm', (uint64_t)addr, - (uint64_t)size); - assert(packet_len + 1 < (int)sizeof(packet)); - UNUSED_IF_ASSERT_DISABLED(packet_len); - StringExtractorGDBRemote response; - if (m_gdb_comm.SendPacketAndWaitForResponse(packet, response, true) == - GDBRemoteCommunication::PacketResult::Success) { - if (response.IsNormalResponse()) { - error.Clear(); - if (binary_memory_read) { - // The lower level GDBRemoteCommunication packet receive layer has - // already de-quoted any 0x7d character escaping that was present in - // the packet - - size_t data_received_size = response.GetBytesLeft(); - if (data_received_size > size) { - // Don't write past the end of BUF if the remote debug server gave us - // too much data for some reason. - data_received_size = size; - } - memcpy(buf, response.GetStringRef().data(), data_received_size); - return data_received_size; - } else { - return response.GetHexBytes( - llvm::MutableArrayRef<uint8_t>((uint8_t *)buf, size), '\xdd'); - } - } else if (response.IsErrorResponse()) - error.SetErrorStringWithFormat("memory read failed for 0x%" PRIx64, addr); - else if (response.IsUnsupportedResponse()) - error.SetErrorStringWithFormat( - "GDB server does not support reading memory"); - else - error.SetErrorStringWithFormat( - "unexpected response to GDB server memory read packet '%s': '%s'", - packet, response.GetStringRef().data()); - } else { - error.SetErrorStringWithFormat("failed to send packet: '%s'", packet); - } - return 0; -} - -Status ProcessGDBRemote::WriteObjectFile( - std::vector<ObjectFile::LoadableData> entries) { - Status error; - // Sort the entries by address because some writes, like those to flash - // memory, must happen in order of increasing address. - std::stable_sort( - std::begin(entries), std::end(entries), - [](const ObjectFile::LoadableData a, const ObjectFile::LoadableData b) { - return a.Dest < b.Dest; - }); - m_allow_flash_writes = true; - error = Process::WriteObjectFile(entries); - if (error.Success()) - error = FlashDone(); - else - // Even though some of the writing failed, try to send a flash done if some - // of the writing succeeded so the flash state is reset to normal, but - // don't stomp on the error status that was set in the write failure since - // that's the one we want to report back. - FlashDone(); - m_allow_flash_writes = false; - return error; -} - -bool ProcessGDBRemote::HasErased(FlashRange range) { - auto size = m_erased_flash_ranges.GetSize(); - for (size_t i = 0; i < size; ++i) - if (m_erased_flash_ranges.GetEntryAtIndex(i)->Contains(range)) - return true; - return false; -} - -Status ProcessGDBRemote::FlashErase(lldb::addr_t addr, size_t size) { - Status status; - - MemoryRegionInfo region; - status = GetMemoryRegionInfo(addr, region); - if (!status.Success()) - return status; - - // The gdb spec doesn't say if erasures are allowed across multiple regions, - // but we'll disallow it to be safe and to keep the logic simple by worring - // about only one region's block size. DoMemoryWrite is this function's - // primary user, and it can easily keep writes within a single memory region - if (addr + size > region.GetRange().GetRangeEnd()) { - status.SetErrorString("Unable to erase flash in multiple regions"); - return status; - } - - uint64_t blocksize = region.GetBlocksize(); - if (blocksize == 0) { - status.SetErrorString("Unable to erase flash because blocksize is 0"); - return status; - } - - // Erasures can only be done on block boundary adresses, so round down addr - // and round up size - lldb::addr_t block_start_addr = addr - (addr % blocksize); - size += (addr - block_start_addr); - if ((size % blocksize) != 0) - size += (blocksize - size % blocksize); - - FlashRange range(block_start_addr, size); - - if (HasErased(range)) - return status; - - // We haven't erased the entire range, but we may have erased part of it. - // (e.g., block A is already erased and range starts in A and ends in B). So, - // adjust range if necessary to exclude already erased blocks. - if (!m_erased_flash_ranges.IsEmpty()) { - // Assuming that writes and erasures are done in increasing addr order, - // because that is a requirement of the vFlashWrite command. Therefore, we - // only need to look at the last range in the list for overlap. - const auto &last_range = *m_erased_flash_ranges.Back(); - if (range.GetRangeBase() < last_range.GetRangeEnd()) { - auto overlap = last_range.GetRangeEnd() - range.GetRangeBase(); - // overlap will be less than range.GetByteSize() or else HasErased() - // would have been true - range.SetByteSize(range.GetByteSize() - overlap); - range.SetRangeBase(range.GetRangeBase() + overlap); - } - } - - StreamString packet; - packet.Printf("vFlashErase:%" PRIx64 ",%" PRIx64, range.GetRangeBase(), - (uint64_t)range.GetByteSize()); - - StringExtractorGDBRemote response; - if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetString(), response, - true) == - GDBRemoteCommunication::PacketResult::Success) { - if (response.IsOKResponse()) { - m_erased_flash_ranges.Insert(range, true); - } else { - if (response.IsErrorResponse()) - status.SetErrorStringWithFormat("flash erase failed for 0x%" PRIx64, - addr); - else if (response.IsUnsupportedResponse()) - status.SetErrorStringWithFormat("GDB server does not support flashing"); - else - status.SetErrorStringWithFormat( - "unexpected response to GDB server flash erase packet '%s': '%s'", - packet.GetData(), response.GetStringRef().data()); - } - } else { - status.SetErrorStringWithFormat("failed to send packet: '%s'", - packet.GetData()); - } - return status; -} - -Status ProcessGDBRemote::FlashDone() { - Status status; - // If we haven't erased any blocks, then we must not have written anything - // either, so there is no need to actually send a vFlashDone command - if (m_erased_flash_ranges.IsEmpty()) - return status; - StringExtractorGDBRemote response; - if (m_gdb_comm.SendPacketAndWaitForResponse("vFlashDone", response, true) == - GDBRemoteCommunication::PacketResult::Success) { - if (response.IsOKResponse()) { - m_erased_flash_ranges.Clear(); - } else { - if (response.IsErrorResponse()) - status.SetErrorStringWithFormat("flash done failed"); - else if (response.IsUnsupportedResponse()) - status.SetErrorStringWithFormat("GDB server does not support flashing"); - else - status.SetErrorStringWithFormat( - "unexpected response to GDB server flash done packet: '%s'", - response.GetStringRef().data()); - } - } else { - status.SetErrorStringWithFormat("failed to send flash done packet"); - } - return status; -} - -size_t ProcessGDBRemote::DoWriteMemory(addr_t addr, const void *buf, - size_t size, Status &error) { - GetMaxMemorySize(); - // M and m packets take 2 bytes for 1 byte of memory - size_t max_memory_size = m_max_memory_size / 2; - if (size > max_memory_size) { - // Keep memory read sizes down to a sane limit. This function will be - // called multiple times in order to complete the task by - // lldb_private::Process so it is ok to do this. - size = max_memory_size; - } - - StreamGDBRemote packet; - - MemoryRegionInfo region; - Status region_status = GetMemoryRegionInfo(addr, region); - - bool is_flash = - region_status.Success() && region.GetFlash() == MemoryRegionInfo::eYes; - - if (is_flash) { - if (!m_allow_flash_writes) { - error.SetErrorString("Writing to flash memory is not allowed"); - return 0; - } - // Keep the write within a flash memory region - if (addr + size > region.GetRange().GetRangeEnd()) - size = region.GetRange().GetRangeEnd() - addr; - // Flash memory must be erased before it can be written - error = FlashErase(addr, size); - if (!error.Success()) - return 0; - packet.Printf("vFlashWrite:%" PRIx64 ":", addr); - packet.PutEscapedBytes(buf, size); - } else { - packet.Printf("M%" PRIx64 ",%" PRIx64 ":", addr, (uint64_t)size); - packet.PutBytesAsRawHex8(buf, size, endian::InlHostByteOrder(), - endian::InlHostByteOrder()); - } - StringExtractorGDBRemote response; - if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetString(), response, - true) == - GDBRemoteCommunication::PacketResult::Success) { - if (response.IsOKResponse()) { - error.Clear(); - return size; - } else if (response.IsErrorResponse()) - error.SetErrorStringWithFormat("memory write failed for 0x%" PRIx64, - addr); - else if (response.IsUnsupportedResponse()) - error.SetErrorStringWithFormat( - "GDB server does not support writing memory"); - else - error.SetErrorStringWithFormat( - "unexpected response to GDB server memory write packet '%s': '%s'", - packet.GetData(), response.GetStringRef().data()); - } else { - error.SetErrorStringWithFormat("failed to send packet: '%s'", - packet.GetData()); - } - return 0; -} - -lldb::addr_t ProcessGDBRemote::DoAllocateMemory(size_t size, - uint32_t permissions, - Status &error) { - Log *log( - GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_EXPRESSIONS)); - addr_t allocated_addr = LLDB_INVALID_ADDRESS; - - if (m_gdb_comm.SupportsAllocDeallocMemory() != eLazyBoolNo) { - allocated_addr = m_gdb_comm.AllocateMemory(size, permissions); - if (allocated_addr != LLDB_INVALID_ADDRESS || - m_gdb_comm.SupportsAllocDeallocMemory() == eLazyBoolYes) - return allocated_addr; - } - - if (m_gdb_comm.SupportsAllocDeallocMemory() == eLazyBoolNo) { - // Call mmap() to create memory in the inferior.. - unsigned prot = 0; - if (permissions & lldb::ePermissionsReadable) - prot |= eMmapProtRead; - if (permissions & lldb::ePermissionsWritable) - prot |= eMmapProtWrite; - if (permissions & lldb::ePermissionsExecutable) - prot |= eMmapProtExec; - - if (InferiorCallMmap(this, allocated_addr, 0, size, prot, - eMmapFlagsAnon | eMmapFlagsPrivate, -1, 0)) - m_addr_to_mmap_size[allocated_addr] = size; - else { - allocated_addr = LLDB_INVALID_ADDRESS; - LLDB_LOGF(log, - "ProcessGDBRemote::%s no direct stub support for memory " - "allocation, and InferiorCallMmap also failed - is stub " - "missing register context save/restore capability?", - __FUNCTION__); - } - } - - if (allocated_addr == LLDB_INVALID_ADDRESS) - error.SetErrorStringWithFormat( - "unable to allocate %" PRIu64 " bytes of memory with permissions %s", - (uint64_t)size, GetPermissionsAsCString(permissions)); - else - error.Clear(); - return allocated_addr; -} - -Status ProcessGDBRemote::GetMemoryRegionInfo(addr_t load_addr, - MemoryRegionInfo ®ion_info) { - - Status error(m_gdb_comm.GetMemoryRegionInfo(load_addr, region_info)); - return error; -} - -Status ProcessGDBRemote::GetWatchpointSupportInfo(uint32_t &num) { - - Status error(m_gdb_comm.GetWatchpointSupportInfo(num)); - return error; -} - -Status ProcessGDBRemote::GetWatchpointSupportInfo(uint32_t &num, bool &after) { - Status error(m_gdb_comm.GetWatchpointSupportInfo( - num, after, GetTarget().GetArchitecture())); - return error; -} - -Status ProcessGDBRemote::DoDeallocateMemory(lldb::addr_t addr) { - Status error; - LazyBool supported = m_gdb_comm.SupportsAllocDeallocMemory(); - - switch (supported) { - case eLazyBoolCalculate: - // We should never be deallocating memory without allocating memory first - // so we should never get eLazyBoolCalculate - error.SetErrorString( - "tried to deallocate memory without ever allocating memory"); - break; - - case eLazyBoolYes: - if (!m_gdb_comm.DeallocateMemory(addr)) - error.SetErrorStringWithFormat( - "unable to deallocate memory at 0x%" PRIx64, addr); - break; - - case eLazyBoolNo: - // Call munmap() to deallocate memory in the inferior.. - { - MMapMap::iterator pos = m_addr_to_mmap_size.find(addr); - if (pos != m_addr_to_mmap_size.end() && - InferiorCallMunmap(this, addr, pos->second)) - m_addr_to_mmap_size.erase(pos); - else - error.SetErrorStringWithFormat( - "unable to deallocate memory at 0x%" PRIx64, addr); - } - break; - } - - return error; -} - -// Process STDIO -size_t ProcessGDBRemote::PutSTDIN(const char *src, size_t src_len, - Status &error) { - if (m_stdio_communication.IsConnected()) { - ConnectionStatus status; - m_stdio_communication.Write(src, src_len, status, nullptr); - } else if (m_stdin_forward) { - m_gdb_comm.SendStdinNotification(src, src_len); - } - return 0; -} - -Status ProcessGDBRemote::EnableBreakpointSite(BreakpointSite *bp_site) { - Status error; - assert(bp_site != nullptr); - - // Get logging info - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_BREAKPOINTS)); - user_id_t site_id = bp_site->GetID(); - - // Get the breakpoint address - const addr_t addr = bp_site->GetLoadAddress(); - - // Log that a breakpoint was requested - LLDB_LOGF(log, - "ProcessGDBRemote::EnableBreakpointSite (size_id = %" PRIu64 - ") address = 0x%" PRIx64, - site_id, (uint64_t)addr); - - // Breakpoint already exists and is enabled - if (bp_site->IsEnabled()) { - LLDB_LOGF(log, - "ProcessGDBRemote::EnableBreakpointSite (size_id = %" PRIu64 - ") address = 0x%" PRIx64 " -- SUCCESS (already enabled)", - site_id, (uint64_t)addr); - return error; - } - - // Get the software breakpoint trap opcode size - const size_t bp_op_size = GetSoftwareBreakpointTrapOpcode(bp_site); - - // SupportsGDBStoppointPacket() simply checks a boolean, indicating if this - // breakpoint type is supported by the remote stub. These are set to true by - // default, and later set to false only after we receive an unimplemented - // response when sending a breakpoint packet. This means initially that - // unless we were specifically instructed to use a hardware breakpoint, LLDB - // will attempt to set a software breakpoint. HardwareRequired() also queries - // a boolean variable which indicates if the user specifically asked for - // hardware breakpoints. If true then we will skip over software - // breakpoints. - if (m_gdb_comm.SupportsGDBStoppointPacket(eBreakpointSoftware) && - (!bp_site->HardwareRequired())) { - // Try to send off a software breakpoint packet ($Z0) - uint8_t error_no = m_gdb_comm.SendGDBStoppointTypePacket( - eBreakpointSoftware, true, addr, bp_op_size); - if (error_no == 0) { - // The breakpoint was placed successfully - bp_site->SetEnabled(true); - bp_site->SetType(BreakpointSite::eExternal); - return error; - } - - // SendGDBStoppointTypePacket() will return an error if it was unable to - // set this breakpoint. We need to differentiate between a error specific - // to placing this breakpoint or if we have learned that this breakpoint - // type is unsupported. To do this, we must test the support boolean for - // this breakpoint type to see if it now indicates that this breakpoint - // type is unsupported. If they are still supported then we should return - // with the error code. If they are now unsupported, then we would like to - // fall through and try another form of breakpoint. - if (m_gdb_comm.SupportsGDBStoppointPacket(eBreakpointSoftware)) { - if (error_no != UINT8_MAX) - error.SetErrorStringWithFormat( - "error: %d sending the breakpoint request", errno); - else - error.SetErrorString("error sending the breakpoint request"); - return error; - } - - // We reach here when software breakpoints have been found to be - // unsupported. For future calls to set a breakpoint, we will not attempt - // to set a breakpoint with a type that is known not to be supported. - LLDB_LOGF(log, "Software breakpoints are unsupported"); - - // So we will fall through and try a hardware breakpoint - } - - // The process of setting a hardware breakpoint is much the same as above. - // We check the supported boolean for this breakpoint type, and if it is - // thought to be supported then we will try to set this breakpoint with a - // hardware breakpoint. - if (m_gdb_comm.SupportsGDBStoppointPacket(eBreakpointHardware)) { - // Try to send off a hardware breakpoint packet ($Z1) - uint8_t error_no = m_gdb_comm.SendGDBStoppointTypePacket( - eBreakpointHardware, true, addr, bp_op_size); - if (error_no == 0) { - // The breakpoint was placed successfully - bp_site->SetEnabled(true); - bp_site->SetType(BreakpointSite::eHardware); - return error; - } - - // Check if the error was something other then an unsupported breakpoint - // type - if (m_gdb_comm.SupportsGDBStoppointPacket(eBreakpointHardware)) { - // Unable to set this hardware breakpoint - if (error_no != UINT8_MAX) - error.SetErrorStringWithFormat( - "error: %d sending the hardware breakpoint request " - "(hardware breakpoint resources might be exhausted or unavailable)", - error_no); - else - error.SetErrorString("error sending the hardware breakpoint request " - "(hardware breakpoint resources " - "might be exhausted or unavailable)"); - return error; - } - - // We will reach here when the stub gives an unsupported response to a - // hardware breakpoint - LLDB_LOGF(log, "Hardware breakpoints are unsupported"); - - // Finally we will falling through to a #trap style breakpoint - } - - // Don't fall through when hardware breakpoints were specifically requested - if (bp_site->HardwareRequired()) { - error.SetErrorString("hardware breakpoints are not supported"); - return error; - } - - // As a last resort we want to place a manual breakpoint. An instruction is - // placed into the process memory using memory write packets. - return EnableSoftwareBreakpoint(bp_site); -} - -Status ProcessGDBRemote::DisableBreakpointSite(BreakpointSite *bp_site) { - Status error; - assert(bp_site != nullptr); - addr_t addr = bp_site->GetLoadAddress(); - user_id_t site_id = bp_site->GetID(); - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_BREAKPOINTS)); - LLDB_LOGF(log, - "ProcessGDBRemote::DisableBreakpointSite (site_id = %" PRIu64 - ") addr = 0x%8.8" PRIx64, - site_id, (uint64_t)addr); - - if (bp_site->IsEnabled()) { - const size_t bp_op_size = GetSoftwareBreakpointTrapOpcode(bp_site); - - BreakpointSite::Type bp_type = bp_site->GetType(); - switch (bp_type) { - case BreakpointSite::eSoftware: - error = DisableSoftwareBreakpoint(bp_site); - break; - - case BreakpointSite::eHardware: - if (m_gdb_comm.SendGDBStoppointTypePacket(eBreakpointHardware, false, - addr, bp_op_size)) - error.SetErrorToGenericError(); - break; - - case BreakpointSite::eExternal: { - GDBStoppointType stoppoint_type; - if (bp_site->IsHardware()) - stoppoint_type = eBreakpointHardware; - else - stoppoint_type = eBreakpointSoftware; - - if (m_gdb_comm.SendGDBStoppointTypePacket(stoppoint_type, false, addr, - bp_op_size)) - error.SetErrorToGenericError(); - } break; - } - if (error.Success()) - bp_site->SetEnabled(false); - } else { - LLDB_LOGF(log, - "ProcessGDBRemote::DisableBreakpointSite (site_id = %" PRIu64 - ") addr = 0x%8.8" PRIx64 " -- SUCCESS (already disabled)", - site_id, (uint64_t)addr); - return error; - } - - if (error.Success()) - error.SetErrorToGenericError(); - return error; -} - -// Pre-requisite: wp != NULL. -static GDBStoppointType GetGDBStoppointType(Watchpoint *wp) { - assert(wp); - bool watch_read = wp->WatchpointRead(); - bool watch_write = wp->WatchpointWrite(); - - // watch_read and watch_write cannot both be false. - assert(watch_read || watch_write); - if (watch_read && watch_write) - return eWatchpointReadWrite; - else if (watch_read) - return eWatchpointRead; - else // Must be watch_write, then. - return eWatchpointWrite; -} - -Status ProcessGDBRemote::EnableWatchpoint(Watchpoint *wp, bool notify) { - Status error; - if (wp) { - user_id_t watchID = wp->GetID(); - addr_t addr = wp->GetLoadAddress(); - Log *log( - ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_WATCHPOINTS)); - LLDB_LOGF(log, "ProcessGDBRemote::EnableWatchpoint(watchID = %" PRIu64 ")", - watchID); - if (wp->IsEnabled()) { - LLDB_LOGF(log, - "ProcessGDBRemote::EnableWatchpoint(watchID = %" PRIu64 - ") addr = 0x%8.8" PRIx64 ": watchpoint already enabled.", - watchID, (uint64_t)addr); - return error; - } - - GDBStoppointType type = GetGDBStoppointType(wp); - // Pass down an appropriate z/Z packet... - if (m_gdb_comm.SupportsGDBStoppointPacket(type)) { - if (m_gdb_comm.SendGDBStoppointTypePacket(type, true, addr, - wp->GetByteSize()) == 0) { - wp->SetEnabled(true, notify); - return error; - } else - error.SetErrorString("sending gdb watchpoint packet failed"); - } else - error.SetErrorString("watchpoints not supported"); - } else { - error.SetErrorString("Watchpoint argument was NULL."); - } - if (error.Success()) - error.SetErrorToGenericError(); - return error; -} - -Status ProcessGDBRemote::DisableWatchpoint(Watchpoint *wp, bool notify) { - Status error; - if (wp) { - user_id_t watchID = wp->GetID(); - - Log *log( - ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_WATCHPOINTS)); - - addr_t addr = wp->GetLoadAddress(); - - LLDB_LOGF(log, - "ProcessGDBRemote::DisableWatchpoint (watchID = %" PRIu64 - ") addr = 0x%8.8" PRIx64, - watchID, (uint64_t)addr); - - if (!wp->IsEnabled()) { - LLDB_LOGF(log, - "ProcessGDBRemote::DisableWatchpoint (watchID = %" PRIu64 - ") addr = 0x%8.8" PRIx64 " -- SUCCESS (already disabled)", - watchID, (uint64_t)addr); - // See also 'class WatchpointSentry' within StopInfo.cpp. This disabling - // attempt might come from the user-supplied actions, we'll route it in - // order for the watchpoint object to intelligently process this action. - wp->SetEnabled(false, notify); - return error; - } - - if (wp->IsHardware()) { - GDBStoppointType type = GetGDBStoppointType(wp); - // Pass down an appropriate z/Z packet... - if (m_gdb_comm.SendGDBStoppointTypePacket(type, false, addr, - wp->GetByteSize()) == 0) { - wp->SetEnabled(false, notify); - return error; - } else - error.SetErrorString("sending gdb watchpoint packet failed"); - } - // TODO: clear software watchpoints if we implement them - } else { - error.SetErrorString("Watchpoint argument was NULL."); - } - if (error.Success()) - error.SetErrorToGenericError(); - return error; -} - -void ProcessGDBRemote::Clear() { - m_thread_list_real.Clear(); - m_thread_list.Clear(); -} - -Status ProcessGDBRemote::DoSignal(int signo) { - Status error; - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, "ProcessGDBRemote::DoSignal (signal = %d)", signo); - - if (!m_gdb_comm.SendAsyncSignal(signo)) - error.SetErrorStringWithFormat("failed to send signal %i", signo); - return error; -} - -Status ProcessGDBRemote::ConnectToReplayServer(repro::Loader *loader) { - if (!loader) - return Status("No loader provided."); - - // Construct replay history path. - FileSpec history_file = - loader->GetFile<repro::ProcessGDBRemoteProvider::Info>(); - if (!history_file) - return Status("No provider for gdb-remote."); - - // Enable replay mode. - m_replay_mode = true; - - // Load replay history. - if (auto error = m_gdb_replay_server.LoadReplayHistory(history_file)) - return Status("Unable to load replay history"); - - // Make a local connection. - if (auto error = GDBRemoteCommunication::ConnectLocally(m_gdb_comm, - m_gdb_replay_server)) - return Status("Unable to connect to replay server"); - - // Start server thread. - m_gdb_replay_server.StartAsyncThread(); - - // Start client thread. - StartAsyncThread(); - - // Do the usual setup. - return ConnectToDebugserver(""); -} - -Status -ProcessGDBRemote::EstablishConnectionIfNeeded(const ProcessInfo &process_info) { - // Make sure we aren't already connected? - if (m_gdb_comm.IsConnected()) - return Status(); - - PlatformSP platform_sp(GetTarget().GetPlatform()); - if (platform_sp && !platform_sp->IsHost()) - return Status("Lost debug server connection"); - - if (repro::Loader *loader = repro::Reproducer::Instance().GetLoader()) - return ConnectToReplayServer(loader); - - auto error = LaunchAndConnectToDebugserver(process_info); - if (error.Fail()) { - const char *error_string = error.AsCString(); - if (error_string == nullptr) - error_string = "unable to launch " DEBUGSERVER_BASENAME; - } - return error; -} -#if !defined(_WIN32) -#define USE_SOCKETPAIR_FOR_LOCAL_CONNECTION 1 -#endif - -#ifdef USE_SOCKETPAIR_FOR_LOCAL_CONNECTION -static bool SetCloexecFlag(int fd) { -#if defined(FD_CLOEXEC) - int flags = ::fcntl(fd, F_GETFD); - if (flags == -1) - return false; - return (::fcntl(fd, F_SETFD, flags | FD_CLOEXEC) == 0); -#else - return false; -#endif -} -#endif - -Status ProcessGDBRemote::LaunchAndConnectToDebugserver( - const ProcessInfo &process_info) { - using namespace std::placeholders; // For _1, _2, etc. - - Status error; - if (m_debugserver_pid == LLDB_INVALID_PROCESS_ID) { - // If we locate debugserver, keep that located version around - static FileSpec g_debugserver_file_spec; - - ProcessLaunchInfo debugserver_launch_info; - // Make debugserver run in its own session so signals generated by special - // terminal key sequences (^C) don't affect debugserver. - debugserver_launch_info.SetLaunchInSeparateProcessGroup(true); - - const std::weak_ptr<ProcessGDBRemote> this_wp = - std::static_pointer_cast<ProcessGDBRemote>(shared_from_this()); - debugserver_launch_info.SetMonitorProcessCallback( - std::bind(MonitorDebugserverProcess, this_wp, _1, _2, _3, _4), false); - debugserver_launch_info.SetUserID(process_info.GetUserID()); - - int communication_fd = -1; -#ifdef USE_SOCKETPAIR_FOR_LOCAL_CONNECTION - // Use a socketpair on non-Windows systems for security and performance - // reasons. - int sockets[2]; /* the pair of socket descriptors */ - if (socketpair(AF_UNIX, SOCK_STREAM, 0, sockets) == -1) { - error.SetErrorToErrno(); - return error; - } - - int our_socket = sockets[0]; - int gdb_socket = sockets[1]; - auto cleanup_our = llvm::make_scope_exit([&]() { close(our_socket); }); - auto cleanup_gdb = llvm::make_scope_exit([&]() { close(gdb_socket); }); - - // Don't let any child processes inherit our communication socket - SetCloexecFlag(our_socket); - communication_fd = gdb_socket; -#endif - - error = m_gdb_comm.StartDebugserverProcess( - nullptr, GetTarget().GetPlatform().get(), debugserver_launch_info, - nullptr, nullptr, communication_fd); - - if (error.Success()) - m_debugserver_pid = debugserver_launch_info.GetProcessID(); - else - m_debugserver_pid = LLDB_INVALID_PROCESS_ID; - - if (m_debugserver_pid != LLDB_INVALID_PROCESS_ID) { -#ifdef USE_SOCKETPAIR_FOR_LOCAL_CONNECTION - // Our process spawned correctly, we can now set our connection to use - // our end of the socket pair - cleanup_our.release(); - m_gdb_comm.SetConnection(new ConnectionFileDescriptor(our_socket, true)); -#endif - StartAsyncThread(); - } - - if (error.Fail()) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - - LLDB_LOGF(log, "failed to start debugserver process: %s", - error.AsCString()); - return error; - } - - if (m_gdb_comm.IsConnected()) { - // Finish the connection process by doing the handshake without - // connecting (send NULL URL) - error = ConnectToDebugserver(""); - } else { - error.SetErrorString("connection failed"); - } - } - return error; -} - -bool ProcessGDBRemote::MonitorDebugserverProcess( - std::weak_ptr<ProcessGDBRemote> process_wp, lldb::pid_t debugserver_pid, - bool exited, // True if the process did exit - int signo, // Zero for no signal - int exit_status // Exit value of process if signal is zero -) { - // "debugserver_pid" argument passed in is the process ID for debugserver - // that we are tracking... - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - const bool handled = true; - - LLDB_LOGF(log, - "ProcessGDBRemote::%s(process_wp, pid=%" PRIu64 - ", signo=%i (0x%x), exit_status=%i)", - __FUNCTION__, debugserver_pid, signo, signo, exit_status); - - std::shared_ptr<ProcessGDBRemote> process_sp = process_wp.lock(); - LLDB_LOGF(log, "ProcessGDBRemote::%s(process = %p)", __FUNCTION__, - static_cast<void *>(process_sp.get())); - if (!process_sp || process_sp->m_debugserver_pid != debugserver_pid) - return handled; - - // Sleep for a half a second to make sure our inferior process has time to - // set its exit status before we set it incorrectly when both the debugserver - // and the inferior process shut down. - std::this_thread::sleep_for(std::chrono::milliseconds(500)); - - // If our process hasn't yet exited, debugserver might have died. If the - // process did exit, then we are reaping it. - const StateType state = process_sp->GetState(); - - if (state != eStateInvalid && state != eStateUnloaded && - state != eStateExited && state != eStateDetached) { - char error_str[1024]; - if (signo) { - const char *signal_cstr = - process_sp->GetUnixSignals()->GetSignalAsCString(signo); - if (signal_cstr) - ::snprintf(error_str, sizeof(error_str), - DEBUGSERVER_BASENAME " died with signal %s", signal_cstr); - else - ::snprintf(error_str, sizeof(error_str), - DEBUGSERVER_BASENAME " died with signal %i", signo); - } else { - ::snprintf(error_str, sizeof(error_str), - DEBUGSERVER_BASENAME " died with an exit status of 0x%8.8x", - exit_status); - } - - process_sp->SetExitStatus(-1, error_str); - } - // Debugserver has exited we need to let our ProcessGDBRemote know that it no - // longer has a debugserver instance - process_sp->m_debugserver_pid = LLDB_INVALID_PROCESS_ID; - return handled; -} - -void ProcessGDBRemote::KillDebugserverProcess() { - m_gdb_comm.Disconnect(); - if (m_debugserver_pid != LLDB_INVALID_PROCESS_ID) { - Host::Kill(m_debugserver_pid, SIGINT); - m_debugserver_pid = LLDB_INVALID_PROCESS_ID; - } -} - -void ProcessGDBRemote::Initialize() { - static llvm::once_flag g_once_flag; - - llvm::call_once(g_once_flag, []() { - PluginManager::RegisterPlugin(GetPluginNameStatic(), - GetPluginDescriptionStatic(), CreateInstance, - DebuggerInitialize); - }); -} - -void ProcessGDBRemote::DebuggerInitialize(Debugger &debugger) { - if (!PluginManager::GetSettingForProcessPlugin( - debugger, PluginProperties::GetSettingName())) { - const bool is_global_setting = true; - PluginManager::CreateSettingForProcessPlugin( - debugger, GetGlobalPluginProperties()->GetValueProperties(), - ConstString("Properties for the gdb-remote process plug-in."), - is_global_setting); - } -} - -bool ProcessGDBRemote::StartAsyncThread() { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - - LLDB_LOGF(log, "ProcessGDBRemote::%s ()", __FUNCTION__); - - std::lock_guard<std::recursive_mutex> guard(m_async_thread_state_mutex); - if (!m_async_thread.IsJoinable()) { - // Create a thread that watches our internal state and controls which - // events make it to clients (into the DCProcess event queue). - - llvm::Expected<HostThread> async_thread = ThreadLauncher::LaunchThread( - "<lldb.process.gdb-remote.async>", ProcessGDBRemote::AsyncThread, this); - if (!async_thread) { - LLDB_LOG(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_HOST), - "failed to launch host thread: {}", - llvm::toString(async_thread.takeError())); - return false; - } - m_async_thread = *async_thread; - } else - LLDB_LOGF(log, - "ProcessGDBRemote::%s () - Called when Async thread was " - "already running.", - __FUNCTION__); - - return m_async_thread.IsJoinable(); -} - -void ProcessGDBRemote::StopAsyncThread() { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - - LLDB_LOGF(log, "ProcessGDBRemote::%s ()", __FUNCTION__); - - std::lock_guard<std::recursive_mutex> guard(m_async_thread_state_mutex); - if (m_async_thread.IsJoinable()) { - m_async_broadcaster.BroadcastEvent(eBroadcastBitAsyncThreadShouldExit); - - // This will shut down the async thread. - m_gdb_comm.Disconnect(); // Disconnect from the debug server. - - // Stop the stdio thread - m_async_thread.Join(nullptr); - m_async_thread.Reset(); - } else - LLDB_LOGF( - log, - "ProcessGDBRemote::%s () - Called when Async thread was not running.", - __FUNCTION__); -} - -bool ProcessGDBRemote::HandleNotifyPacket(StringExtractorGDBRemote &packet) { - // get the packet at a string - const std::string &pkt = packet.GetStringRef(); - // skip %stop: - StringExtractorGDBRemote stop_info(pkt.c_str() + 5); - - // pass as a thread stop info packet - SetLastStopPacket(stop_info); - - // check for more stop reasons - HandleStopReplySequence(); - - // if the process is stopped then we need to fake a resume so that we can - // stop properly with the new break. This is possible due to - // SetPrivateState() broadcasting the state change as a side effect. - if (GetPrivateState() == lldb::StateType::eStateStopped) { - SetPrivateState(lldb::StateType::eStateRunning); - } - - // since we have some stopped packets we can halt the process - SetPrivateState(lldb::StateType::eStateStopped); - - return true; -} - -thread_result_t ProcessGDBRemote::AsyncThread(void *arg) { - ProcessGDBRemote *process = (ProcessGDBRemote *)arg; - - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") thread starting...", - __FUNCTION__, arg, process->GetID()); - - EventSP event_sp; - bool done = false; - while (!done) { - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") listener.WaitForEvent (NULL, event_sp)...", - __FUNCTION__, arg, process->GetID()); - if (process->m_async_listener_sp->GetEvent(event_sp, llvm::None)) { - const uint32_t event_type = event_sp->GetType(); - if (event_sp->BroadcasterIs(&process->m_async_broadcaster)) { - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") Got an event of type: %d...", - __FUNCTION__, arg, process->GetID(), event_type); - - switch (event_type) { - case eBroadcastBitAsyncContinue: { - const EventDataBytes *continue_packet = - EventDataBytes::GetEventDataFromEvent(event_sp.get()); - - if (continue_packet) { - const char *continue_cstr = - (const char *)continue_packet->GetBytes(); - const size_t continue_cstr_len = continue_packet->GetByteSize(); - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") got eBroadcastBitAsyncContinue: %s", - __FUNCTION__, arg, process->GetID(), continue_cstr); - - if (::strstr(continue_cstr, "vAttach") == nullptr) - process->SetPrivateState(eStateRunning); - StringExtractorGDBRemote response; - - // If in Non-Stop-Mode - if (process->GetTarget().GetNonStopModeEnabled()) { - // send the vCont packet - if (!process->GetGDBRemote().SendvContPacket( - llvm::StringRef(continue_cstr, continue_cstr_len), - response)) { - // Something went wrong - done = true; - break; - } - } - // If in All-Stop-Mode - else { - StateType stop_state = - process->GetGDBRemote().SendContinuePacketAndWaitForResponse( - *process, *process->GetUnixSignals(), - llvm::StringRef(continue_cstr, continue_cstr_len), - response); - - // We need to immediately clear the thread ID list so we are sure - // to get a valid list of threads. The thread ID list might be - // contained within the "response", or the stop reply packet that - // caused the stop. So clear it now before we give the stop reply - // packet to the process using the - // process->SetLastStopPacket()... - process->ClearThreadIDList(); - - switch (stop_state) { - case eStateStopped: - case eStateCrashed: - case eStateSuspended: - process->SetLastStopPacket(response); - process->SetPrivateState(stop_state); - break; - - case eStateExited: { - process->SetLastStopPacket(response); - process->ClearThreadIDList(); - response.SetFilePos(1); - - int exit_status = response.GetHexU8(); - std::string desc_string; - if (response.GetBytesLeft() > 0 && - response.GetChar('-') == ';') { - llvm::StringRef desc_str; - llvm::StringRef desc_token; - while (response.GetNameColonValue(desc_token, desc_str)) { - if (desc_token != "description") - continue; - StringExtractor extractor(desc_str); - extractor.GetHexByteString(desc_string); - } - } - process->SetExitStatus(exit_status, desc_string.c_str()); - done = true; - break; - } - case eStateInvalid: { - // Check to see if we were trying to attach and if we got back - // the "E87" error code from debugserver -- this indicates that - // the process is not debuggable. Return a slightly more - // helpful error message about why the attach failed. - if (::strstr(continue_cstr, "vAttach") != nullptr && - response.GetError() == 0x87) { - process->SetExitStatus(-1, "cannot attach to process due to " - "System Integrity Protection"); - } else if (::strstr(continue_cstr, "vAttach") != nullptr && - response.GetStatus().Fail()) { - process->SetExitStatus(-1, response.GetStatus().AsCString()); - } else { - process->SetExitStatus(-1, "lost connection"); - } - break; - } - - default: - process->SetPrivateState(stop_state); - break; - } // switch(stop_state) - } // else // if in All-stop-mode - } // if (continue_packet) - } // case eBroadcastBitAysncContinue - break; - - case eBroadcastBitAsyncThreadShouldExit: - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") got eBroadcastBitAsyncThreadShouldExit...", - __FUNCTION__, arg, process->GetID()); - done = true; - break; - - default: - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") got unknown event 0x%8.8x", - __FUNCTION__, arg, process->GetID(), event_type); - done = true; - break; - } - } else if (event_sp->BroadcasterIs(&process->m_gdb_comm)) { - switch (event_type) { - case Communication::eBroadcastBitReadThreadDidExit: - process->SetExitStatus(-1, "lost connection"); - done = true; - break; - - case GDBRemoteCommunication::eBroadcastBitGdbReadThreadGotNotify: { - lldb_private::Event *event = event_sp.get(); - const EventDataBytes *continue_packet = - EventDataBytes::GetEventDataFromEvent(event); - StringExtractorGDBRemote notify( - (const char *)continue_packet->GetBytes()); - // Hand this over to the process to handle - process->HandleNotifyPacket(notify); - break; - } - - default: - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") got unknown event 0x%8.8x", - __FUNCTION__, arg, process->GetID(), event_type); - done = true; - break; - } - } - } else { - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") listener.WaitForEvent (NULL, event_sp) => false", - __FUNCTION__, arg, process->GetID()); - done = true; - } - } - - LLDB_LOGF(log, - "ProcessGDBRemote::%s (arg = %p, pid = %" PRIu64 - ") thread exiting...", - __FUNCTION__, arg, process->GetID()); - - return {}; -} - -// uint32_t -// ProcessGDBRemote::ListProcessesMatchingName (const char *name, StringList -// &matches, std::vector<lldb::pid_t> &pids) -//{ -// // If we are planning to launch the debugserver remotely, then we need to -// fire up a debugserver -// // process and ask it for the list of processes. But if we are local, we -// can let the Host do it. -// if (m_local_debugserver) -// { -// return Host::ListProcessesMatchingName (name, matches, pids); -// } -// else -// { -// // FIXME: Implement talking to the remote debugserver. -// return 0; -// } -// -//} -// -bool ProcessGDBRemote::NewThreadNotifyBreakpointHit( - void *baton, StoppointCallbackContext *context, lldb::user_id_t break_id, - lldb::user_id_t break_loc_id) { - // I don't think I have to do anything here, just make sure I notice the new - // thread when it starts to - // run so I can stop it if that's what I want to do. - Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_STEP)); - LLDB_LOGF(log, "Hit New Thread Notification breakpoint."); - return false; -} - -Status ProcessGDBRemote::UpdateAutomaticSignalFiltering() { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - LLDB_LOG(log, "Check if need to update ignored signals"); - - // QPassSignals package is not supported by the server, there is no way we - // can ignore any signals on server side. - if (!m_gdb_comm.GetQPassSignalsSupported()) - return Status(); - - // No signals, nothing to send. - if (m_unix_signals_sp == nullptr) - return Status(); - - // Signals' version hasn't changed, no need to send anything. - uint64_t new_signals_version = m_unix_signals_sp->GetVersion(); - if (new_signals_version == m_last_signals_version) { - LLDB_LOG(log, "Signals' version hasn't changed. version={0}", - m_last_signals_version); - return Status(); - } - - auto signals_to_ignore = - m_unix_signals_sp->GetFilteredSignals(false, false, false); - Status error = m_gdb_comm.SendSignalsToIgnore(signals_to_ignore); - - LLDB_LOG(log, - "Signals' version changed. old version={0}, new version={1}, " - "signals ignored={2}, update result={3}", - m_last_signals_version, new_signals_version, - signals_to_ignore.size(), error); - - if (error.Success()) - m_last_signals_version = new_signals_version; - - return error; -} - -bool ProcessGDBRemote::StartNoticingNewThreads() { - Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_STEP)); - if (m_thread_create_bp_sp) { - if (log && log->GetVerbose()) - LLDB_LOGF(log, "Enabled noticing new thread breakpoint."); - m_thread_create_bp_sp->SetEnabled(true); - } else { - PlatformSP platform_sp(GetTarget().GetPlatform()); - if (platform_sp) { - m_thread_create_bp_sp = - platform_sp->SetThreadCreationBreakpoint(GetTarget()); - if (m_thread_create_bp_sp) { - if (log && log->GetVerbose()) - LLDB_LOGF( - log, "Successfully created new thread notification breakpoint %i", - m_thread_create_bp_sp->GetID()); - m_thread_create_bp_sp->SetCallback( - ProcessGDBRemote::NewThreadNotifyBreakpointHit, this, true); - } else { - LLDB_LOGF(log, "Failed to create new thread notification breakpoint."); - } - } - } - return m_thread_create_bp_sp.get() != nullptr; -} - -bool ProcessGDBRemote::StopNoticingNewThreads() { - Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_STEP)); - if (log && log->GetVerbose()) - LLDB_LOGF(log, "Disabling new thread notification breakpoint."); - - if (m_thread_create_bp_sp) - m_thread_create_bp_sp->SetEnabled(false); - - return true; -} - -DynamicLoader *ProcessGDBRemote::GetDynamicLoader() { - if (m_dyld_up.get() == nullptr) - m_dyld_up.reset(DynamicLoader::FindPlugin(this, nullptr)); - return m_dyld_up.get(); -} - -Status ProcessGDBRemote::SendEventData(const char *data) { - int return_value; - bool was_supported; - - Status error; - - return_value = m_gdb_comm.SendLaunchEventDataPacket(data, &was_supported); - if (return_value != 0) { - if (!was_supported) - error.SetErrorString("Sending events is not supported for this process."); - else - error.SetErrorStringWithFormat("Error sending event data: %d.", - return_value); - } - return error; -} - -DataExtractor ProcessGDBRemote::GetAuxvData() { - DataBufferSP buf; - if (m_gdb_comm.GetQXferAuxvReadSupported()) { - std::string response_string; - if (m_gdb_comm.SendPacketsAndConcatenateResponses("qXfer:auxv:read::", - response_string) == - GDBRemoteCommunication::PacketResult::Success) - buf = std::make_shared<DataBufferHeap>(response_string.c_str(), - response_string.length()); - } - return DataExtractor(buf, GetByteOrder(), GetAddressByteSize()); -} - -StructuredData::ObjectSP -ProcessGDBRemote::GetExtendedInfoForThread(lldb::tid_t tid) { - StructuredData::ObjectSP object_sp; - - if (m_gdb_comm.GetThreadExtendedInfoSupported()) { - StructuredData::ObjectSP args_dict(new StructuredData::Dictionary()); - SystemRuntime *runtime = GetSystemRuntime(); - if (runtime) { - runtime->AddThreadExtendedInfoPacketHints(args_dict); - } - args_dict->GetAsDictionary()->AddIntegerItem("thread", tid); - - StreamString packet; - packet << "jThreadExtendedInfo:"; - args_dict->Dump(packet, false); - - // FIXME the final character of a JSON dictionary, '}', is the escape - // character in gdb-remote binary mode. lldb currently doesn't escape - // these characters in its packet output -- so we add the quoted version of - // the } character here manually in case we talk to a debugserver which un- - // escapes the characters at packet read time. - packet << (char)(0x7d ^ 0x20); - - StringExtractorGDBRemote response; - response.SetResponseValidatorToJSON(); - if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetString(), response, - false) == - GDBRemoteCommunication::PacketResult::Success) { - StringExtractorGDBRemote::ResponseType response_type = - response.GetResponseType(); - if (response_type == StringExtractorGDBRemote::eResponse) { - if (!response.Empty()) { - object_sp = StructuredData::ParseJSON(response.GetStringRef()); - } - } - } - } - return object_sp; -} - -StructuredData::ObjectSP ProcessGDBRemote::GetLoadedDynamicLibrariesInfos( - lldb::addr_t image_list_address, lldb::addr_t image_count) { - - StructuredData::ObjectSP args_dict(new StructuredData::Dictionary()); - args_dict->GetAsDictionary()->AddIntegerItem("image_list_address", - image_list_address); - args_dict->GetAsDictionary()->AddIntegerItem("image_count", image_count); - - return GetLoadedDynamicLibrariesInfos_sender(args_dict); -} - -StructuredData::ObjectSP ProcessGDBRemote::GetLoadedDynamicLibrariesInfos() { - StructuredData::ObjectSP args_dict(new StructuredData::Dictionary()); - - args_dict->GetAsDictionary()->AddBooleanItem("fetch_all_solibs", true); - - return GetLoadedDynamicLibrariesInfos_sender(args_dict); -} - -StructuredData::ObjectSP ProcessGDBRemote::GetLoadedDynamicLibrariesInfos( - const std::vector<lldb::addr_t> &load_addresses) { - StructuredData::ObjectSP args_dict(new StructuredData::Dictionary()); - StructuredData::ArraySP addresses(new StructuredData::Array); - - for (auto addr : load_addresses) { - StructuredData::ObjectSP addr_sp(new StructuredData::Integer(addr)); - addresses->AddItem(addr_sp); - } - - args_dict->GetAsDictionary()->AddItem("solib_addresses", addresses); - - return GetLoadedDynamicLibrariesInfos_sender(args_dict); -} - -StructuredData::ObjectSP -ProcessGDBRemote::GetLoadedDynamicLibrariesInfos_sender( - StructuredData::ObjectSP args_dict) { - StructuredData::ObjectSP object_sp; - - if (m_gdb_comm.GetLoadedDynamicLibrariesInfosSupported()) { - // Scope for the scoped timeout object - GDBRemoteCommunication::ScopedTimeout timeout(m_gdb_comm, - std::chrono::seconds(10)); - - StreamString packet; - packet << "jGetLoadedDynamicLibrariesInfos:"; - args_dict->Dump(packet, false); - - // FIXME the final character of a JSON dictionary, '}', is the escape - // character in gdb-remote binary mode. lldb currently doesn't escape - // these characters in its packet output -- so we add the quoted version of - // the } character here manually in case we talk to a debugserver which un- - // escapes the characters at packet read time. - packet << (char)(0x7d ^ 0x20); - - StringExtractorGDBRemote response; - response.SetResponseValidatorToJSON(); - if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetString(), response, - false) == - GDBRemoteCommunication::PacketResult::Success) { - StringExtractorGDBRemote::ResponseType response_type = - response.GetResponseType(); - if (response_type == StringExtractorGDBRemote::eResponse) { - if (!response.Empty()) { - object_sp = StructuredData::ParseJSON(response.GetStringRef()); - } - } - } - } - return object_sp; -} - -StructuredData::ObjectSP ProcessGDBRemote::GetSharedCacheInfo() { - StructuredData::ObjectSP object_sp; - StructuredData::ObjectSP args_dict(new StructuredData::Dictionary()); - - if (m_gdb_comm.GetSharedCacheInfoSupported()) { - StreamString packet; - packet << "jGetSharedCacheInfo:"; - args_dict->Dump(packet, false); - - // FIXME the final character of a JSON dictionary, '}', is the escape - // character in gdb-remote binary mode. lldb currently doesn't escape - // these characters in its packet output -- so we add the quoted version of - // the } character here manually in case we talk to a debugserver which un- - // escapes the characters at packet read time. - packet << (char)(0x7d ^ 0x20); - - StringExtractorGDBRemote response; - response.SetResponseValidatorToJSON(); - if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetString(), response, - false) == - GDBRemoteCommunication::PacketResult::Success) { - StringExtractorGDBRemote::ResponseType response_type = - response.GetResponseType(); - if (response_type == StringExtractorGDBRemote::eResponse) { - if (!response.Empty()) { - object_sp = StructuredData::ParseJSON(response.GetStringRef()); - } - } - } - } - return object_sp; -} - -Status ProcessGDBRemote::ConfigureStructuredData( - ConstString type_name, const StructuredData::ObjectSP &config_sp) { - return m_gdb_comm.ConfigureRemoteStructuredData(type_name, config_sp); -} - -// Establish the largest memory read/write payloads we should use. If the -// remote stub has a max packet size, stay under that size. -// -// If the remote stub's max packet size is crazy large, use a reasonable -// largeish default. -// -// If the remote stub doesn't advertise a max packet size, use a conservative -// default. - -void ProcessGDBRemote::GetMaxMemorySize() { - const uint64_t reasonable_largeish_default = 128 * 1024; - const uint64_t conservative_default = 512; - - if (m_max_memory_size == 0) { - uint64_t stub_max_size = m_gdb_comm.GetRemoteMaxPacketSize(); - if (stub_max_size != UINT64_MAX && stub_max_size != 0) { - // Save the stub's claimed maximum packet size - m_remote_stub_max_memory_size = stub_max_size; - - // Even if the stub says it can support ginormous packets, don't exceed - // our reasonable largeish default packet size. - if (stub_max_size > reasonable_largeish_default) { - stub_max_size = reasonable_largeish_default; - } - - // Memory packet have other overheads too like Maddr,size:#NN Instead of - // calculating the bytes taken by size and addr every time, we take a - // maximum guess here. - if (stub_max_size > 70) - stub_max_size -= 32 + 32 + 6; - else { - // In unlikely scenario that max packet size is less then 70, we will - // hope that data being written is small enough to fit. - Log *log(ProcessGDBRemoteLog::GetLogIfAnyCategoryIsSet( - GDBR_LOG_COMM | GDBR_LOG_MEMORY)); - if (log) - log->Warning("Packet size is too small. " - "LLDB may face problems while writing memory"); - } - - m_max_memory_size = stub_max_size; - } else { - m_max_memory_size = conservative_default; - } - } -} - -void ProcessGDBRemote::SetUserSpecifiedMaxMemoryTransferSize( - uint64_t user_specified_max) { - if (user_specified_max != 0) { - GetMaxMemorySize(); - - if (m_remote_stub_max_memory_size != 0) { - if (m_remote_stub_max_memory_size < user_specified_max) { - m_max_memory_size = m_remote_stub_max_memory_size; // user specified a - // packet size too - // big, go as big - // as the remote stub says we can go. - } else { - m_max_memory_size = user_specified_max; // user's packet size is good - } - } else { - m_max_memory_size = - user_specified_max; // user's packet size is probably fine - } - } -} - -bool ProcessGDBRemote::GetModuleSpec(const FileSpec &module_file_spec, - const ArchSpec &arch, - ModuleSpec &module_spec) { - Log *log = GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PLATFORM); - - const ModuleCacheKey key(module_file_spec.GetPath(), - arch.GetTriple().getTriple()); - auto cached = m_cached_module_specs.find(key); - if (cached != m_cached_module_specs.end()) { - module_spec = cached->second; - return bool(module_spec); - } - - if (!m_gdb_comm.GetModuleInfo(module_file_spec, arch, module_spec)) { - LLDB_LOGF(log, "ProcessGDBRemote::%s - failed to get module info for %s:%s", - __FUNCTION__, module_file_spec.GetPath().c_str(), - arch.GetTriple().getTriple().c_str()); - return false; - } - - if (log) { - StreamString stream; - module_spec.Dump(stream); - LLDB_LOGF(log, "ProcessGDBRemote::%s - got module info for (%s:%s) : %s", - __FUNCTION__, module_file_spec.GetPath().c_str(), - arch.GetTriple().getTriple().c_str(), stream.GetData()); - } - - m_cached_module_specs[key] = module_spec; - return true; -} - -void ProcessGDBRemote::PrefetchModuleSpecs( - llvm::ArrayRef<FileSpec> module_file_specs, const llvm::Triple &triple) { - auto module_specs = m_gdb_comm.GetModulesInfo(module_file_specs, triple); - if (module_specs) { - for (const FileSpec &spec : module_file_specs) - m_cached_module_specs[ModuleCacheKey(spec.GetPath(), - triple.getTriple())] = ModuleSpec(); - for (const ModuleSpec &spec : *module_specs) - m_cached_module_specs[ModuleCacheKey(spec.GetFileSpec().GetPath(), - triple.getTriple())] = spec; - } -} - -llvm::VersionTuple ProcessGDBRemote::GetHostOSVersion() { - return m_gdb_comm.GetOSVersion(); -} - -llvm::VersionTuple ProcessGDBRemote::GetHostMacCatalystVersion() { - return m_gdb_comm.GetMacCatalystVersion(); -} - -namespace { - -typedef std::vector<std::string> stringVec; - -typedef std::vector<struct GdbServerRegisterInfo> GDBServerRegisterVec; -struct RegisterSetInfo { - ConstString name; -}; - -typedef std::map<uint32_t, RegisterSetInfo> RegisterSetMap; - -struct GdbServerTargetInfo { - std::string arch; - std::string osabi; - stringVec includes; - RegisterSetMap reg_set_map; -}; - -bool ParseRegisters(XMLNode feature_node, GdbServerTargetInfo &target_info, - GDBRemoteDynamicRegisterInfo &dyn_reg_info, ABISP abi_sp, - uint32_t &cur_reg_num, uint32_t ®_offset) { - if (!feature_node) - return false; - - feature_node.ForEachChildElementWithName( - "reg", - [&target_info, &dyn_reg_info, &cur_reg_num, ®_offset, - &abi_sp](const XMLNode ®_node) -> bool { - std::string gdb_group; - std::string gdb_type; - ConstString reg_name; - ConstString alt_name; - ConstString set_name; - std::vector<uint32_t> value_regs; - std::vector<uint32_t> invalidate_regs; - std::vector<uint8_t> dwarf_opcode_bytes; - bool encoding_set = false; - bool format_set = false; - RegisterInfo reg_info = { - nullptr, // Name - nullptr, // Alt name - 0, // byte size - reg_offset, // offset - eEncodingUint, // encoding - eFormatHex, // format - { - LLDB_INVALID_REGNUM, // eh_frame reg num - LLDB_INVALID_REGNUM, // DWARF reg num - LLDB_INVALID_REGNUM, // generic reg num - cur_reg_num, // process plugin reg num - cur_reg_num // native register number - }, - nullptr, - nullptr, - nullptr, // Dwarf Expression opcode bytes pointer - 0 // Dwarf Expression opcode bytes length - }; - - reg_node.ForEachAttribute([&target_info, &gdb_group, &gdb_type, - ®_name, &alt_name, &set_name, &value_regs, - &invalidate_regs, &encoding_set, &format_set, - ®_info, ®_offset, &dwarf_opcode_bytes]( - const llvm::StringRef &name, - const llvm::StringRef &value) -> bool { - if (name == "name") { - reg_name.SetString(value); - } else if (name == "bitsize") { - reg_info.byte_size = - StringConvert::ToUInt32(value.data(), 0, 0) / CHAR_BIT; - } else if (name == "type") { - gdb_type = value.str(); - } else if (name == "group") { - gdb_group = value.str(); - } else if (name == "regnum") { - const uint32_t regnum = - StringConvert::ToUInt32(value.data(), LLDB_INVALID_REGNUM, 0); - if (regnum != LLDB_INVALID_REGNUM) { - reg_info.kinds[eRegisterKindProcessPlugin] = regnum; - } - } else if (name == "offset") { - reg_offset = StringConvert::ToUInt32(value.data(), UINT32_MAX, 0); - } else if (name == "altname") { - alt_name.SetString(value); - } else if (name == "encoding") { - encoding_set = true; - reg_info.encoding = Args::StringToEncoding(value, eEncodingUint); - } else if (name == "format") { - format_set = true; - Format format = eFormatInvalid; - if (OptionArgParser::ToFormat(value.data(), format, nullptr) - .Success()) - reg_info.format = format; - else if (value == "vector-sint8") - reg_info.format = eFormatVectorOfSInt8; - else if (value == "vector-uint8") - reg_info.format = eFormatVectorOfUInt8; - else if (value == "vector-sint16") - reg_info.format = eFormatVectorOfSInt16; - else if (value == "vector-uint16") - reg_info.format = eFormatVectorOfUInt16; - else if (value == "vector-sint32") - reg_info.format = eFormatVectorOfSInt32; - else if (value == "vector-uint32") - reg_info.format = eFormatVectorOfUInt32; - else if (value == "vector-float32") - reg_info.format = eFormatVectorOfFloat32; - else if (value == "vector-uint64") - reg_info.format = eFormatVectorOfUInt64; - else if (value == "vector-uint128") - reg_info.format = eFormatVectorOfUInt128; - } else if (name == "group_id") { - const uint32_t set_id = - StringConvert::ToUInt32(value.data(), UINT32_MAX, 0); - RegisterSetMap::const_iterator pos = - target_info.reg_set_map.find(set_id); - if (pos != target_info.reg_set_map.end()) - set_name = pos->second.name; - } else if (name == "gcc_regnum" || name == "ehframe_regnum") { - reg_info.kinds[eRegisterKindEHFrame] = - StringConvert::ToUInt32(value.data(), LLDB_INVALID_REGNUM, 0); - } else if (name == "dwarf_regnum") { - reg_info.kinds[eRegisterKindDWARF] = - StringConvert::ToUInt32(value.data(), LLDB_INVALID_REGNUM, 0); - } else if (name == "generic") { - reg_info.kinds[eRegisterKindGeneric] = - Args::StringToGenericRegister(value); - } else if (name == "value_regnums") { - SplitCommaSeparatedRegisterNumberString(value, value_regs, 0); - } else if (name == "invalidate_regnums") { - SplitCommaSeparatedRegisterNumberString(value, invalidate_regs, 0); - } else if (name == "dynamic_size_dwarf_expr_bytes") { - std::string opcode_string = value.str(); - size_t dwarf_opcode_len = opcode_string.length() / 2; - assert(dwarf_opcode_len > 0); - - dwarf_opcode_bytes.resize(dwarf_opcode_len); - reg_info.dynamic_size_dwarf_len = dwarf_opcode_len; - StringExtractor opcode_extractor(opcode_string); - uint32_t ret_val = - opcode_extractor.GetHexBytesAvail(dwarf_opcode_bytes); - assert(dwarf_opcode_len == ret_val); - UNUSED_IF_ASSERT_DISABLED(ret_val); - reg_info.dynamic_size_dwarf_expr_bytes = dwarf_opcode_bytes.data(); - } else { - printf("unhandled attribute %s = %s\n", name.data(), value.data()); - } - return true; // Keep iterating through all attributes - }); - - if (!gdb_type.empty() && !(encoding_set || format_set)) { - if (gdb_type.find("int") == 0) { - reg_info.format = eFormatHex; - reg_info.encoding = eEncodingUint; - } else if (gdb_type == "data_ptr" || gdb_type == "code_ptr") { - reg_info.format = eFormatAddressInfo; - reg_info.encoding = eEncodingUint; - } else if (gdb_type == "i387_ext" || gdb_type == "float") { - reg_info.format = eFormatFloat; - reg_info.encoding = eEncodingIEEE754; - } - } - - // Only update the register set name if we didn't get a "reg_set" - // attribute. "set_name" will be empty if we didn't have a "reg_set" - // attribute. - if (!set_name) { - if (!gdb_group.empty()) { - set_name.SetCString(gdb_group.c_str()); - } else { - // If no register group name provided anywhere, - // we'll create a 'general' register set - set_name.SetCString("general"); - } - } - - reg_info.byte_offset = reg_offset; - assert(reg_info.byte_size != 0); - reg_offset += reg_info.byte_size; - if (!value_regs.empty()) { - value_regs.push_back(LLDB_INVALID_REGNUM); - reg_info.value_regs = value_regs.data(); - } - if (!invalidate_regs.empty()) { - invalidate_regs.push_back(LLDB_INVALID_REGNUM); - reg_info.invalidate_regs = invalidate_regs.data(); - } - - ++cur_reg_num; - AugmentRegisterInfoViaABI(reg_info, reg_name, abi_sp); - dyn_reg_info.AddRegister(reg_info, reg_name, alt_name, set_name); - - return true; // Keep iterating through all "reg" elements - }); - return true; -} - -} // namespace - -// This method fetches a register description feature xml file from -// the remote stub and adds registers/register groupsets/architecture -// information to the current process. It will call itself recursively -// for nested register definition files. It returns true if it was able -// to fetch and parse an xml file. -bool ProcessGDBRemote::GetGDBServerRegisterInfoXMLAndProcess( - ArchSpec &arch_to_use, std::string xml_filename, uint32_t &cur_reg_num, - uint32_t ®_offset) { - // request the target xml file - std::string raw; - lldb_private::Status lldberr; - if (!m_gdb_comm.ReadExtFeature(ConstString("features"), - ConstString(xml_filename.c_str()), raw, - lldberr)) { - return false; - } - - XMLDocument xml_document; - - if (xml_document.ParseMemory(raw.c_str(), raw.size(), xml_filename.c_str())) { - GdbServerTargetInfo target_info; - std::vector<XMLNode> feature_nodes; - - // The top level feature XML file will start with a <target> tag. - XMLNode target_node = xml_document.GetRootElement("target"); - if (target_node) { - target_node.ForEachChildElement([&target_info, &feature_nodes]( - const XMLNode &node) -> bool { - llvm::StringRef name = node.GetName(); - if (name == "architecture") { - node.GetElementText(target_info.arch); - } else if (name == "osabi") { - node.GetElementText(target_info.osabi); - } else if (name == "xi:include" || name == "include") { - llvm::StringRef href = node.GetAttributeValue("href"); - if (!href.empty()) - target_info.includes.push_back(href.str()); - } else if (name == "feature") { - feature_nodes.push_back(node); - } else if (name == "groups") { - node.ForEachChildElementWithName( - "group", [&target_info](const XMLNode &node) -> bool { - uint32_t set_id = UINT32_MAX; - RegisterSetInfo set_info; - - node.ForEachAttribute( - [&set_id, &set_info](const llvm::StringRef &name, - const llvm::StringRef &value) -> bool { - if (name == "id") - set_id = StringConvert::ToUInt32(value.data(), - UINT32_MAX, 0); - if (name == "name") - set_info.name = ConstString(value); - return true; // Keep iterating through all attributes - }); - - if (set_id != UINT32_MAX) - target_info.reg_set_map[set_id] = set_info; - return true; // Keep iterating through all "group" elements - }); - } - return true; // Keep iterating through all children of the target_node - }); - } else { - // In an included XML feature file, we're already "inside" the <target> - // tag of the initial XML file; this included file will likely only have - // a <feature> tag. Need to check for any more included files in this - // <feature> element. - XMLNode feature_node = xml_document.GetRootElement("feature"); - if (feature_node) { - feature_nodes.push_back(feature_node); - feature_node.ForEachChildElement([&target_info]( - const XMLNode &node) -> bool { - llvm::StringRef name = node.GetName(); - if (name == "xi:include" || name == "include") { - llvm::StringRef href = node.GetAttributeValue("href"); - if (!href.empty()) - target_info.includes.push_back(href.str()); - } - return true; - }); - } - } - - // If the target.xml includes an architecture entry like - // <architecture>i386:x86-64</architecture> (seen from VMWare ESXi) - // <architecture>arm</architecture> (seen from Segger JLink on unspecified arm board) - // use that if we don't have anything better. - if (!arch_to_use.IsValid() && !target_info.arch.empty()) { - if (target_info.arch == "i386:x86-64") { - // We don't have any information about vendor or OS. - arch_to_use.SetTriple("x86_64--"); - GetTarget().MergeArchitecture(arch_to_use); - } - - // SEGGER J-Link jtag boards send this very-generic arch name, - // we'll need to use this if we have absolutely nothing better - // to work with or the register definitions won't be accepted. - if (target_info.arch == "arm") { - arch_to_use.SetTriple("arm--"); - GetTarget().MergeArchitecture(arch_to_use); - } - } - - if (arch_to_use.IsValid()) { - // Don't use Process::GetABI, this code gets called from DidAttach, and - // in that context we haven't set the Target's architecture yet, so the - // ABI is also potentially incorrect. - ABISP abi_to_use_sp = ABI::FindPlugin(shared_from_this(), arch_to_use); - for (auto &feature_node : feature_nodes) { - ParseRegisters(feature_node, target_info, this->m_register_info, - abi_to_use_sp, cur_reg_num, reg_offset); - } - - for (const auto &include : target_info.includes) { - GetGDBServerRegisterInfoXMLAndProcess(arch_to_use, include, cur_reg_num, - reg_offset); - } - } - } else { - return false; - } - return true; -} - -// query the target of gdb-remote for extended target information returns -// true on success (got register definitions), false on failure (did not). -bool ProcessGDBRemote::GetGDBServerRegisterInfo(ArchSpec &arch_to_use) { - // Make sure LLDB has an XML parser it can use first - if (!XMLDocument::XMLEnabled()) - return false; - - // check that we have extended feature read support - if (!m_gdb_comm.GetQXferFeaturesReadSupported()) - return false; - - uint32_t cur_reg_num = 0; - uint32_t reg_offset = 0; - if (GetGDBServerRegisterInfoXMLAndProcess (arch_to_use, "target.xml", cur_reg_num, reg_offset)) - this->m_register_info.Finalize(arch_to_use); - - return m_register_info.GetNumRegisters() > 0; -} - -llvm::Expected<LoadedModuleInfoList> ProcessGDBRemote::GetLoadedModuleList() { - // Make sure LLDB has an XML parser it can use first - if (!XMLDocument::XMLEnabled()) - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "XML parsing not available"); - - Log *log = GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS); - LLDB_LOGF(log, "ProcessGDBRemote::%s", __FUNCTION__); - - LoadedModuleInfoList list; - GDBRemoteCommunicationClient &comm = m_gdb_comm; - bool can_use_svr4 = GetGlobalPluginProperties()->GetUseSVR4(); - - // check that we have extended feature read support - if (can_use_svr4 && comm.GetQXferLibrariesSVR4ReadSupported()) { - // request the loaded library list - std::string raw; - lldb_private::Status lldberr; - - if (!comm.ReadExtFeature(ConstString("libraries-svr4"), ConstString(""), - raw, lldberr)) - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "Error in libraries-svr4 packet"); - - // parse the xml file in memory - LLDB_LOGF(log, "parsing: %s", raw.c_str()); - XMLDocument doc; - - if (!doc.ParseMemory(raw.c_str(), raw.size(), "noname.xml")) - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "Error reading noname.xml"); - - XMLNode root_element = doc.GetRootElement("library-list-svr4"); - if (!root_element) - return llvm::createStringError( - llvm::inconvertibleErrorCode(), - "Error finding library-list-svr4 xml element"); - - // main link map structure - llvm::StringRef main_lm = root_element.GetAttributeValue("main-lm"); - if (!main_lm.empty()) { - list.m_link_map = - StringConvert::ToUInt64(main_lm.data(), LLDB_INVALID_ADDRESS, 0); - } - - root_element.ForEachChildElementWithName( - "library", [log, &list](const XMLNode &library) -> bool { - - LoadedModuleInfoList::LoadedModuleInfo module; - - library.ForEachAttribute( - [&module](const llvm::StringRef &name, - const llvm::StringRef &value) -> bool { - - if (name == "name") - module.set_name(value.str()); - else if (name == "lm") { - // the address of the link_map struct. - module.set_link_map(StringConvert::ToUInt64( - value.data(), LLDB_INVALID_ADDRESS, 0)); - } else if (name == "l_addr") { - // the displacement as read from the field 'l_addr' of the - // link_map struct. - module.set_base(StringConvert::ToUInt64( - value.data(), LLDB_INVALID_ADDRESS, 0)); - // base address is always a displacement, not an absolute - // value. - module.set_base_is_offset(true); - } else if (name == "l_ld") { - // the memory address of the libraries PT_DYAMIC section. - module.set_dynamic(StringConvert::ToUInt64( - value.data(), LLDB_INVALID_ADDRESS, 0)); - } - - return true; // Keep iterating over all properties of "library" - }); - - if (log) { - std::string name; - lldb::addr_t lm = 0, base = 0, ld = 0; - bool base_is_offset; - - module.get_name(name); - module.get_link_map(lm); - module.get_base(base); - module.get_base_is_offset(base_is_offset); - module.get_dynamic(ld); - - LLDB_LOGF(log, - "found (link_map:0x%08" PRIx64 ", base:0x%08" PRIx64 - "[%s], ld:0x%08" PRIx64 ", name:'%s')", - lm, base, (base_is_offset ? "offset" : "absolute"), ld, - name.c_str()); - } - - list.add(module); - return true; // Keep iterating over all "library" elements in the root - // node - }); - - if (log) - LLDB_LOGF(log, "found %" PRId32 " modules in total", - (int)list.m_list.size()); - return list; - } else if (comm.GetQXferLibrariesReadSupported()) { - // request the loaded library list - std::string raw; - lldb_private::Status lldberr; - - if (!comm.ReadExtFeature(ConstString("libraries"), ConstString(""), raw, - lldberr)) - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "Error in libraries packet"); - - LLDB_LOGF(log, "parsing: %s", raw.c_str()); - XMLDocument doc; - - if (!doc.ParseMemory(raw.c_str(), raw.size(), "noname.xml")) - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "Error reading noname.xml"); - - XMLNode root_element = doc.GetRootElement("library-list"); - if (!root_element) - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "Error finding library-list xml element"); - - root_element.ForEachChildElementWithName( - "library", [log, &list](const XMLNode &library) -> bool { - LoadedModuleInfoList::LoadedModuleInfo module; - - llvm::StringRef name = library.GetAttributeValue("name"); - module.set_name(name.str()); - - // The base address of a given library will be the address of its - // first section. Most remotes send only one section for Windows - // targets for example. - const XMLNode §ion = - library.FindFirstChildElementWithName("section"); - llvm::StringRef address = section.GetAttributeValue("address"); - module.set_base( - StringConvert::ToUInt64(address.data(), LLDB_INVALID_ADDRESS, 0)); - // These addresses are absolute values. - module.set_base_is_offset(false); - - if (log) { - std::string name; - lldb::addr_t base = 0; - bool base_is_offset; - module.get_name(name); - module.get_base(base); - module.get_base_is_offset(base_is_offset); - - LLDB_LOGF(log, "found (base:0x%08" PRIx64 "[%s], name:'%s')", base, - (base_is_offset ? "offset" : "absolute"), name.c_str()); - } - - list.add(module); - return true; // Keep iterating over all "library" elements in the root - // node - }); - - if (log) - LLDB_LOGF(log, "found %" PRId32 " modules in total", - (int)list.m_list.size()); - return list; - } else { - return llvm::createStringError(llvm::inconvertibleErrorCode(), - "Remote libraries not supported"); - } -} - -lldb::ModuleSP ProcessGDBRemote::LoadModuleAtAddress(const FileSpec &file, - lldb::addr_t link_map, - lldb::addr_t base_addr, - bool value_is_offset) { - DynamicLoader *loader = GetDynamicLoader(); - if (!loader) - return nullptr; - - return loader->LoadModuleAtAddress(file, link_map, base_addr, - value_is_offset); -} - -llvm::Error ProcessGDBRemote::LoadModules() { - using lldb_private::process_gdb_remote::ProcessGDBRemote; - - // request a list of loaded libraries from GDBServer - llvm::Expected<LoadedModuleInfoList> module_list = GetLoadedModuleList(); - if (!module_list) - return module_list.takeError(); - - // get a list of all the modules - ModuleList new_modules; - - for (LoadedModuleInfoList::LoadedModuleInfo &modInfo : module_list->m_list) { - std::string mod_name; - lldb::addr_t mod_base; - lldb::addr_t link_map; - bool mod_base_is_offset; - - bool valid = true; - valid &= modInfo.get_name(mod_name); - valid &= modInfo.get_base(mod_base); - valid &= modInfo.get_base_is_offset(mod_base_is_offset); - if (!valid) - continue; - - if (!modInfo.get_link_map(link_map)) - link_map = LLDB_INVALID_ADDRESS; - - FileSpec file(mod_name); - FileSystem::Instance().Resolve(file); - lldb::ModuleSP module_sp = - LoadModuleAtAddress(file, link_map, mod_base, mod_base_is_offset); - - if (module_sp.get()) - new_modules.Append(module_sp); - } - - if (new_modules.GetSize() > 0) { - ModuleList removed_modules; - Target &target = GetTarget(); - ModuleList &loaded_modules = m_process->GetTarget().GetImages(); - - for (size_t i = 0; i < loaded_modules.GetSize(); ++i) { - const lldb::ModuleSP loaded_module = loaded_modules.GetModuleAtIndex(i); - - bool found = false; - for (size_t j = 0; j < new_modules.GetSize(); ++j) { - if (new_modules.GetModuleAtIndex(j).get() == loaded_module.get()) - found = true; - } - - // The main executable will never be included in libraries-svr4, don't - // remove it - if (!found && - loaded_module.get() != target.GetExecutableModulePointer()) { - removed_modules.Append(loaded_module); - } - } - - loaded_modules.Remove(removed_modules); - m_process->GetTarget().ModulesDidUnload(removed_modules, false); - - new_modules.ForEach([&target](const lldb::ModuleSP module_sp) -> bool { - lldb_private::ObjectFile *obj = module_sp->GetObjectFile(); - if (!obj) - return true; - - if (obj->GetType() != ObjectFile::Type::eTypeExecutable) - return true; - - lldb::ModuleSP module_copy_sp = module_sp; - target.SetExecutableModule(module_copy_sp, eLoadDependentsNo); - return false; - }); - - loaded_modules.AppendIfNeeded(new_modules); - m_process->GetTarget().ModulesDidLoad(new_modules); - } - - return llvm::ErrorSuccess(); -} - -Status ProcessGDBRemote::GetFileLoadAddress(const FileSpec &file, - bool &is_loaded, - lldb::addr_t &load_addr) { - is_loaded = false; - load_addr = LLDB_INVALID_ADDRESS; - - std::string file_path = file.GetPath(false); - if (file_path.empty()) - return Status("Empty file name specified"); - - StreamString packet; - packet.PutCString("qFileLoadAddress:"); - packet.PutStringAsRawHex8(file_path); - - StringExtractorGDBRemote response; - if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetString(), response, - false) != - GDBRemoteCommunication::PacketResult::Success) - return Status("Sending qFileLoadAddress packet failed"); - - if (response.IsErrorResponse()) { - if (response.GetError() == 1) { - // The file is not loaded into the inferior - is_loaded = false; - load_addr = LLDB_INVALID_ADDRESS; - return Status(); - } - - return Status( - "Fetching file load address from remote server returned an error"); - } - - if (response.IsNormalResponse()) { - is_loaded = true; - load_addr = response.GetHexMaxU64(false, LLDB_INVALID_ADDRESS); - return Status(); - } - - return Status( - "Unknown error happened during sending the load address packet"); -} - -void ProcessGDBRemote::ModulesDidLoad(ModuleList &module_list) { - // We must call the lldb_private::Process::ModulesDidLoad () first before we - // do anything - Process::ModulesDidLoad(module_list); - - // After loading shared libraries, we can ask our remote GDB server if it - // needs any symbols. - m_gdb_comm.ServeSymbolLookups(this); -} - -void ProcessGDBRemote::HandleAsyncStdout(llvm::StringRef out) { - AppendSTDOUT(out.data(), out.size()); -} - -static const char *end_delimiter = "--end--;"; -static const int end_delimiter_len = 8; - -void ProcessGDBRemote::HandleAsyncMisc(llvm::StringRef data) { - std::string input = data.str(); // '1' to move beyond 'A' - if (m_partial_profile_data.length() > 0) { - m_partial_profile_data.append(input); - input = m_partial_profile_data; - m_partial_profile_data.clear(); - } - - size_t found, pos = 0, len = input.length(); - while ((found = input.find(end_delimiter, pos)) != std::string::npos) { - StringExtractorGDBRemote profileDataExtractor( - input.substr(pos, found).c_str()); - std::string profile_data = - HarmonizeThreadIdsForProfileData(profileDataExtractor); - BroadcastAsyncProfileData(profile_data); - - pos = found + end_delimiter_len; - } - - if (pos < len) { - // Last incomplete chunk. - m_partial_profile_data = input.substr(pos); - } -} - -std::string ProcessGDBRemote::HarmonizeThreadIdsForProfileData( - StringExtractorGDBRemote &profileDataExtractor) { - std::map<uint64_t, uint32_t> new_thread_id_to_used_usec_map; - std::string output; - llvm::raw_string_ostream output_stream(output); - llvm::StringRef name, value; - - // Going to assuming thread_used_usec comes first, else bail out. - while (profileDataExtractor.GetNameColonValue(name, value)) { - if (name.compare("thread_used_id") == 0) { - StringExtractor threadIDHexExtractor(value); - uint64_t thread_id = threadIDHexExtractor.GetHexMaxU64(false, 0); - - bool has_used_usec = false; - uint32_t curr_used_usec = 0; - llvm::StringRef usec_name, usec_value; - uint32_t input_file_pos = profileDataExtractor.GetFilePos(); - if (profileDataExtractor.GetNameColonValue(usec_name, usec_value)) { - if (usec_name.equals("thread_used_usec")) { - has_used_usec = true; - usec_value.getAsInteger(0, curr_used_usec); - } else { - // We didn't find what we want, it is probably an older version. Bail - // out. - profileDataExtractor.SetFilePos(input_file_pos); - } - } - - if (has_used_usec) { - uint32_t prev_used_usec = 0; - std::map<uint64_t, uint32_t>::iterator iterator = - m_thread_id_to_used_usec_map.find(thread_id); - if (iterator != m_thread_id_to_used_usec_map.end()) { - prev_used_usec = m_thread_id_to_used_usec_map[thread_id]; - } - - uint32_t real_used_usec = curr_used_usec - prev_used_usec; - // A good first time record is one that runs for at least 0.25 sec - bool good_first_time = - (prev_used_usec == 0) && (real_used_usec > 250000); - bool good_subsequent_time = - (prev_used_usec > 0) && - ((real_used_usec > 0) || (HasAssignedIndexIDToThread(thread_id))); - - if (good_first_time || good_subsequent_time) { - // We try to avoid doing too many index id reservation, resulting in - // fast increase of index ids. - - output_stream << name << ":"; - int32_t index_id = AssignIndexIDToThread(thread_id); - output_stream << index_id << ";"; - - output_stream << usec_name << ":" << usec_value << ";"; - } else { - // Skip past 'thread_used_name'. - llvm::StringRef local_name, local_value; - profileDataExtractor.GetNameColonValue(local_name, local_value); - } - - // Store current time as previous time so that they can be compared - // later. - new_thread_id_to_used_usec_map[thread_id] = curr_used_usec; - } else { - // Bail out and use old string. - output_stream << name << ":" << value << ";"; - } - } else { - output_stream << name << ":" << value << ";"; - } - } - output_stream << end_delimiter; - m_thread_id_to_used_usec_map = new_thread_id_to_used_usec_map; - - return output_stream.str(); -} - -void ProcessGDBRemote::HandleStopReply() { - if (GetStopID() != 0) - return; - - if (GetID() == LLDB_INVALID_PROCESS_ID) { - lldb::pid_t pid = m_gdb_comm.GetCurrentProcessID(); - if (pid != LLDB_INVALID_PROCESS_ID) - SetID(pid); - } - BuildDynamicRegisterInfo(true); -} - -static const char *const s_async_json_packet_prefix = "JSON-async:"; - -static StructuredData::ObjectSP -ParseStructuredDataPacket(llvm::StringRef packet) { - Log *log(ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS)); - - if (!packet.consume_front(s_async_json_packet_prefix)) { - if (log) { - LLDB_LOGF( - log, - "GDBRemoteCommunicationClientBase::%s() received $J packet " - "but was not a StructuredData packet: packet starts with " - "%s", - __FUNCTION__, - packet.slice(0, strlen(s_async_json_packet_prefix)).str().c_str()); - } - return StructuredData::ObjectSP(); - } - - // This is an asynchronous JSON packet, destined for a StructuredDataPlugin. - StructuredData::ObjectSP json_sp = StructuredData::ParseJSON(packet); - if (log) { - if (json_sp) { - StreamString json_str; - json_sp->Dump(json_str, true); - json_str.Flush(); - LLDB_LOGF(log, - "ProcessGDBRemote::%s() " - "received Async StructuredData packet: %s", - __FUNCTION__, json_str.GetData()); - } else { - LLDB_LOGF(log, - "ProcessGDBRemote::%s" - "() received StructuredData packet:" - " parse failure", - __FUNCTION__); - } - } - return json_sp; -} - -void ProcessGDBRemote::HandleAsyncStructuredDataPacket(llvm::StringRef data) { - auto structured_data_sp = ParseStructuredDataPacket(data); - if (structured_data_sp) - RouteAsyncStructuredData(structured_data_sp); -} - -class CommandObjectProcessGDBRemoteSpeedTest : public CommandObjectParsed { -public: - CommandObjectProcessGDBRemoteSpeedTest(CommandInterpreter &interpreter) - : CommandObjectParsed(interpreter, "process plugin packet speed-test", - "Tests packet speeds of various sizes to determine " - "the performance characteristics of the GDB remote " - "connection. ", - nullptr), - m_option_group(), - m_num_packets(LLDB_OPT_SET_1, false, "count", 'c', 0, eArgTypeCount, - "The number of packets to send of each varying size " - "(default is 1000).", - 1000), - m_max_send(LLDB_OPT_SET_1, false, "max-send", 's', 0, eArgTypeCount, - "The maximum number of bytes to send in a packet. Sizes " - "increase in powers of 2 while the size is less than or " - "equal to this option value. (default 1024).", - 1024), - m_max_recv(LLDB_OPT_SET_1, false, "max-receive", 'r', 0, eArgTypeCount, - "The maximum number of bytes to receive in a packet. Sizes " - "increase in powers of 2 while the size is less than or " - "equal to this option value. (default 1024).", - 1024), - m_json(LLDB_OPT_SET_1, false, "json", 'j', - "Print the output as JSON data for easy parsing.", false, true) { - m_option_group.Append(&m_num_packets, LLDB_OPT_SET_ALL, LLDB_OPT_SET_1); - m_option_group.Append(&m_max_send, LLDB_OPT_SET_ALL, LLDB_OPT_SET_1); - m_option_group.Append(&m_max_recv, LLDB_OPT_SET_ALL, LLDB_OPT_SET_1); - m_option_group.Append(&m_json, LLDB_OPT_SET_ALL, LLDB_OPT_SET_1); - m_option_group.Finalize(); - } - - ~CommandObjectProcessGDBRemoteSpeedTest() override {} - - Options *GetOptions() override { return &m_option_group; } - - bool DoExecute(Args &command, CommandReturnObject &result) override { - const size_t argc = command.GetArgumentCount(); - if (argc == 0) { - ProcessGDBRemote *process = - (ProcessGDBRemote *)m_interpreter.GetExecutionContext() - .GetProcessPtr(); - if (process) { - StreamSP output_stream_sp( - m_interpreter.GetDebugger().GetAsyncOutputStream()); - result.SetImmediateOutputStream(output_stream_sp); - - const uint32_t num_packets = - (uint32_t)m_num_packets.GetOptionValue().GetCurrentValue(); - const uint64_t max_send = m_max_send.GetOptionValue().GetCurrentValue(); - const uint64_t max_recv = m_max_recv.GetOptionValue().GetCurrentValue(); - const bool json = m_json.GetOptionValue().GetCurrentValue(); - const uint64_t k_recv_amount = - 4 * 1024 * 1024; // Receive amount in bytes - process->GetGDBRemote().TestPacketSpeed( - num_packets, max_send, max_recv, k_recv_amount, json, - output_stream_sp ? *output_stream_sp : result.GetOutputStream()); - result.SetStatus(eReturnStatusSuccessFinishResult); - return true; - } - } else { - result.AppendErrorWithFormat("'%s' takes no arguments", - m_cmd_name.c_str()); - } - result.SetStatus(eReturnStatusFailed); - return false; - } - -protected: - OptionGroupOptions m_option_group; - OptionGroupUInt64 m_num_packets; - OptionGroupUInt64 m_max_send; - OptionGroupUInt64 m_max_recv; - OptionGroupBoolean m_json; -}; - -class CommandObjectProcessGDBRemotePacketHistory : public CommandObjectParsed { -private: -public: - CommandObjectProcessGDBRemotePacketHistory(CommandInterpreter &interpreter) - : CommandObjectParsed(interpreter, "process plugin packet history", - "Dumps the packet history buffer. ", nullptr) {} - - ~CommandObjectProcessGDBRemotePacketHistory() override {} - - bool DoExecute(Args &command, CommandReturnObject &result) override { - const size_t argc = command.GetArgumentCount(); - if (argc == 0) { - ProcessGDBRemote *process = - (ProcessGDBRemote *)m_interpreter.GetExecutionContext() - .GetProcessPtr(); - if (process) { - process->GetGDBRemote().DumpHistory(result.GetOutputStream()); - result.SetStatus(eReturnStatusSuccessFinishResult); - return true; - } - } else { - result.AppendErrorWithFormat("'%s' takes no arguments", - m_cmd_name.c_str()); - } - result.SetStatus(eReturnStatusFailed); - return false; - } -}; - -class CommandObjectProcessGDBRemotePacketXferSize : public CommandObjectParsed { -private: -public: - CommandObjectProcessGDBRemotePacketXferSize(CommandInterpreter &interpreter) - : CommandObjectParsed( - interpreter, "process plugin packet xfer-size", - "Maximum size that lldb will try to read/write one one chunk.", - nullptr) {} - - ~CommandObjectProcessGDBRemotePacketXferSize() override {} - - bool DoExecute(Args &command, CommandReturnObject &result) override { - const size_t argc = command.GetArgumentCount(); - if (argc == 0) { - result.AppendErrorWithFormat("'%s' takes an argument to specify the max " - "amount to be transferred when " - "reading/writing", - m_cmd_name.c_str()); - result.SetStatus(eReturnStatusFailed); - return false; - } - - ProcessGDBRemote *process = - (ProcessGDBRemote *)m_interpreter.GetExecutionContext().GetProcessPtr(); - if (process) { - const char *packet_size = command.GetArgumentAtIndex(0); - errno = 0; - uint64_t user_specified_max = strtoul(packet_size, nullptr, 10); - if (errno == 0 && user_specified_max != 0) { - process->SetUserSpecifiedMaxMemoryTransferSize(user_specified_max); - result.SetStatus(eReturnStatusSuccessFinishResult); - return true; - } - } - result.SetStatus(eReturnStatusFailed); - return false; - } -}; - -class CommandObjectProcessGDBRemotePacketSend : public CommandObjectParsed { -private: -public: - CommandObjectProcessGDBRemotePacketSend(CommandInterpreter &interpreter) - : CommandObjectParsed(interpreter, "process plugin packet send", - "Send a custom packet through the GDB remote " - "protocol and print the answer. " - "The packet header and footer will automatically " - "be added to the packet prior to sending and " - "stripped from the result.", - nullptr) {} - - ~CommandObjectProcessGDBRemotePacketSend() override {} - - bool DoExecute(Args &command, CommandReturnObject &result) override { - const size_t argc = command.GetArgumentCount(); - if (argc == 0) { - result.AppendErrorWithFormat( - "'%s' takes a one or more packet content arguments", - m_cmd_name.c_str()); - result.SetStatus(eReturnStatusFailed); - return false; - } - - ProcessGDBRemote *process = - (ProcessGDBRemote *)m_interpreter.GetExecutionContext().GetProcessPtr(); - if (process) { - for (size_t i = 0; i < argc; ++i) { - const char *packet_cstr = command.GetArgumentAtIndex(0); - bool send_async = true; - StringExtractorGDBRemote response; - process->GetGDBRemote().SendPacketAndWaitForResponse( - packet_cstr, response, send_async); - result.SetStatus(eReturnStatusSuccessFinishResult); - Stream &output_strm = result.GetOutputStream(); - output_strm.Printf(" packet: %s\n", packet_cstr); - std::string response_str = response.GetStringRef(); - - if (strstr(packet_cstr, "qGetProfileData") != nullptr) { - response_str = process->HarmonizeThreadIdsForProfileData(response); - } - - if (response_str.empty()) - output_strm.PutCString("response: \nerror: UNIMPLEMENTED\n"); - else - output_strm.Printf("response: %s\n", response.GetStringRef().data()); - } - } - return true; - } -}; - -class CommandObjectProcessGDBRemotePacketMonitor : public CommandObjectRaw { -private: -public: - CommandObjectProcessGDBRemotePacketMonitor(CommandInterpreter &interpreter) - : CommandObjectRaw(interpreter, "process plugin packet monitor", - "Send a qRcmd packet through the GDB remote protocol " - "and print the response." - "The argument passed to this command will be hex " - "encoded into a valid 'qRcmd' packet, sent and the " - "response will be printed.") {} - - ~CommandObjectProcessGDBRemotePacketMonitor() override {} - - bool DoExecute(llvm::StringRef command, - CommandReturnObject &result) override { - if (command.empty()) { - result.AppendErrorWithFormat("'%s' takes a command string argument", - m_cmd_name.c_str()); - result.SetStatus(eReturnStatusFailed); - return false; - } - - ProcessGDBRemote *process = - (ProcessGDBRemote *)m_interpreter.GetExecutionContext().GetProcessPtr(); - if (process) { - StreamString packet; - packet.PutCString("qRcmd,"); - packet.PutBytesAsRawHex8(command.data(), command.size()); - - bool send_async = true; - StringExtractorGDBRemote response; - Stream &output_strm = result.GetOutputStream(); - process->GetGDBRemote().SendPacketAndReceiveResponseWithOutputSupport( - packet.GetString(), response, send_async, - [&output_strm](llvm::StringRef output) { output_strm << output; }); - result.SetStatus(eReturnStatusSuccessFinishResult); - output_strm.Printf(" packet: %s\n", packet.GetData()); - const std::string &response_str = response.GetStringRef(); - - if (response_str.empty()) - output_strm.PutCString("response: \nerror: UNIMPLEMENTED\n"); - else - output_strm.Printf("response: %s\n", response.GetStringRef().data()); - } - return true; - } -}; - -class CommandObjectProcessGDBRemotePacket : public CommandObjectMultiword { -private: -public: - CommandObjectProcessGDBRemotePacket(CommandInterpreter &interpreter) - : CommandObjectMultiword(interpreter, "process plugin packet", - "Commands that deal with GDB remote packets.", - nullptr) { - LoadSubCommand( - "history", - CommandObjectSP( - new CommandObjectProcessGDBRemotePacketHistory(interpreter))); - LoadSubCommand( - "send", CommandObjectSP( - new CommandObjectProcessGDBRemotePacketSend(interpreter))); - LoadSubCommand( - "monitor", - CommandObjectSP( - new CommandObjectProcessGDBRemotePacketMonitor(interpreter))); - LoadSubCommand( - "xfer-size", - CommandObjectSP( - new CommandObjectProcessGDBRemotePacketXferSize(interpreter))); - LoadSubCommand("speed-test", - CommandObjectSP(new CommandObjectProcessGDBRemoteSpeedTest( - interpreter))); - } - - ~CommandObjectProcessGDBRemotePacket() override {} -}; - -class CommandObjectMultiwordProcessGDBRemote : public CommandObjectMultiword { -public: - CommandObjectMultiwordProcessGDBRemote(CommandInterpreter &interpreter) - : CommandObjectMultiword( - interpreter, "process plugin", - "Commands for operating on a ProcessGDBRemote process.", - "process plugin <subcommand> [<subcommand-options>]") { - LoadSubCommand( - "packet", - CommandObjectSP(new CommandObjectProcessGDBRemotePacket(interpreter))); - } - - ~CommandObjectMultiwordProcessGDBRemote() override {} -}; - -CommandObject *ProcessGDBRemote::GetPluginCommandObject() { - if (!m_command_sp) - m_command_sp = std::make_shared<CommandObjectMultiwordProcessGDBRemote>( - GetTarget().GetDebugger().GetCommandInterpreter()); - return m_command_sp.get(); -} |
