1af245d11STodd Fiala //===-- NativeProcessLinux.cpp -------------------------------- -*- C++ -*-===// 2af245d11STodd Fiala // 3af245d11STodd Fiala // The LLVM Compiler Infrastructure 4af245d11STodd Fiala // 5af245d11STodd Fiala // This file is distributed under the University of Illinois Open Source 6af245d11STodd Fiala // License. See LICENSE.TXT for details. 7af245d11STodd Fiala // 8af245d11STodd Fiala //===----------------------------------------------------------------------===// 9af245d11STodd Fiala 10af245d11STodd Fiala #include "NativeProcessLinux.h" 11af245d11STodd Fiala 12af245d11STodd Fiala // C Includes 13af245d11STodd Fiala #include <errno.h> 14af245d11STodd Fiala #include <string.h> 15af245d11STodd Fiala #include <stdint.h> 16af245d11STodd Fiala #include <unistd.h> 17af245d11STodd Fiala 18af245d11STodd Fiala // C++ Includes 19af245d11STodd Fiala #include <fstream> 20df7c6995SPavel Labath #include <mutex> 21c076559aSPavel Labath #include <sstream> 22af245d11STodd Fiala #include <string> 235b981ab9SPavel Labath #include <unordered_map> 24af245d11STodd Fiala 25af245d11STodd Fiala // Other libraries and framework includes 26d8c338d4STamas Berghammer #include "lldb/Core/EmulateInstruction.h" 27af245d11STodd Fiala #include "lldb/Core/Error.h" 28af245d11STodd Fiala #include "lldb/Core/Module.h" 296edef204SOleksiy Vyalov #include "lldb/Core/ModuleSpec.h" 30af245d11STodd Fiala #include "lldb/Core/RegisterValue.h" 31af245d11STodd Fiala #include "lldb/Core/State.h" 321e209fccSTamas Berghammer #include "lldb/Host/common/NativeBreakpoint.h" 330cbf0b13STamas Berghammer #include "lldb/Host/common/NativeRegisterContext.h" 34af245d11STodd Fiala #include "lldb/Host/Host.h" 3539de3110SZachary Turner #include "lldb/Host/ThreadLauncher.h" 365b981ab9SPavel Labath #include "lldb/Target/Platform.h" 3790aff47cSZachary Turner #include "lldb/Target/Process.h" 38af245d11STodd Fiala #include "lldb/Target/ProcessLaunchInfo.h" 395b981ab9SPavel Labath #include "lldb/Target/Target.h" 40c16f5dcaSChaoren Lin #include "lldb/Utility/LLDBAssert.h" 41af245d11STodd Fiala #include "lldb/Utility/PseudoTerminal.h" 42f805e190SPavel Labath #include "lldb/Utility/StringExtractor.h" 43af245d11STodd Fiala 441e209fccSTamas Berghammer #include "Plugins/Process/POSIX/ProcessPOSIXLog.h" 45af245d11STodd Fiala #include "NativeThreadLinux.h" 46af245d11STodd Fiala #include "ProcFileReader.h" 471e209fccSTamas Berghammer #include "Procfs.h" 48cacde7dfSTodd Fiala 49d858487eSTamas Berghammer // System includes - They have to be included after framework includes because they define some 50d858487eSTamas Berghammer // macros which collide with variable names in other modules 51d858487eSTamas Berghammer #include <linux/unistd.h> 52d858487eSTamas Berghammer #include <sys/socket.h> 538b335671SVince Harron 54df7c6995SPavel Labath #include <sys/syscall.h> 55d858487eSTamas Berghammer #include <sys/types.h> 56d858487eSTamas Berghammer #include <sys/user.h> 57d858487eSTamas Berghammer #include <sys/wait.h> 58d858487eSTamas Berghammer 598b335671SVince Harron #include "lldb/Host/linux/Personality.h" 608b335671SVince Harron #include "lldb/Host/linux/Ptrace.h" 618b335671SVince Harron #include "lldb/Host/linux/Signalfd.h" 62df7c6995SPavel Labath #include "lldb/Host/linux/Uio.h" 638b335671SVince Harron #include "lldb/Host/android/Android.h" 64af245d11STodd Fiala 650bce1b67STodd Fiala #define LLDB_PERSONALITY_GET_CURRENT_SETTINGS 0xffffffff 66af245d11STodd Fiala 67af245d11STodd Fiala // Support hardware breakpoints in case it has not been defined 68af245d11STodd Fiala #ifndef TRAP_HWBKPT 69af245d11STodd Fiala #define TRAP_HWBKPT 4 70af245d11STodd Fiala #endif 71af245d11STodd Fiala 727cb18bf5STamas Berghammer using namespace lldb; 737cb18bf5STamas Berghammer using namespace lldb_private; 74db264a6dSTamas Berghammer using namespace lldb_private::process_linux; 757cb18bf5STamas Berghammer using namespace llvm; 767cb18bf5STamas Berghammer 77af245d11STodd Fiala // Private bits we only need internally. 78df7c6995SPavel Labath 79df7c6995SPavel Labath static bool ProcessVmReadvSupported() 80df7c6995SPavel Labath { 81df7c6995SPavel Labath static bool is_supported; 82df7c6995SPavel Labath static std::once_flag flag; 83df7c6995SPavel Labath 84df7c6995SPavel Labath std::call_once(flag, [] { 85df7c6995SPavel Labath Log *log(GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 86df7c6995SPavel Labath 87df7c6995SPavel Labath uint32_t source = 0x47424742; 88df7c6995SPavel Labath uint32_t dest = 0; 89df7c6995SPavel Labath 90df7c6995SPavel Labath struct iovec local, remote; 91df7c6995SPavel Labath remote.iov_base = &source; 92df7c6995SPavel Labath local.iov_base = &dest; 93df7c6995SPavel Labath remote.iov_len = local.iov_len = sizeof source; 94df7c6995SPavel Labath 95df7c6995SPavel Labath // We shall try if cross-process-memory reads work by attempting to read a value from our own process. 96df7c6995SPavel Labath ssize_t res = process_vm_readv(getpid(), &local, 1, &remote, 1, 0); 97df7c6995SPavel Labath is_supported = (res == sizeof(source) && source == dest); 98df7c6995SPavel Labath if (log) 99df7c6995SPavel Labath { 100df7c6995SPavel Labath if (is_supported) 101df7c6995SPavel Labath log->Printf("%s: Detected kernel support for process_vm_readv syscall. Fast memory reads enabled.", 102df7c6995SPavel Labath __FUNCTION__); 103df7c6995SPavel Labath else 104df7c6995SPavel Labath log->Printf("%s: syscall process_vm_readv failed (error: %s). Fast memory reads disabled.", 105df7c6995SPavel Labath __FUNCTION__, strerror(errno)); 106df7c6995SPavel Labath } 107df7c6995SPavel Labath }); 108df7c6995SPavel Labath 109df7c6995SPavel Labath return is_supported; 110df7c6995SPavel Labath } 111df7c6995SPavel Labath 112af245d11STodd Fiala namespace 113af245d11STodd Fiala { 114af245d11STodd Fiala Error 115af245d11STodd Fiala ResolveProcessArchitecture (lldb::pid_t pid, Platform &platform, ArchSpec &arch) 116af245d11STodd Fiala { 117af245d11STodd Fiala // Grab process info for the running process. 118af245d11STodd Fiala ProcessInstanceInfo process_info; 119af245d11STodd Fiala if (!platform.GetProcessInfo (pid, process_info)) 120db264a6dSTamas Berghammer return Error("failed to get process info"); 121af245d11STodd Fiala 122af245d11STodd Fiala // Resolve the executable module. 123af245d11STodd Fiala ModuleSP exe_module_sp; 124e56f6dceSChaoren Lin ModuleSpec exe_module_spec(process_info.GetExecutableFile(), process_info.GetArchitecture()); 125af245d11STodd Fiala FileSpecList executable_search_paths (Target::GetDefaultExecutableSearchPaths ()); 126af245d11STodd Fiala Error error = platform.ResolveExecutable( 12754539338SOleksiy Vyalov exe_module_spec, 128af245d11STodd Fiala exe_module_sp, 129af245d11STodd Fiala executable_search_paths.GetSize () ? &executable_search_paths : NULL); 130af245d11STodd Fiala 131af245d11STodd Fiala if (!error.Success ()) 132af245d11STodd Fiala return error; 133af245d11STodd Fiala 134af245d11STodd Fiala // Check if we've got our architecture from the exe_module. 135af245d11STodd Fiala arch = exe_module_sp->GetArchitecture (); 136af245d11STodd Fiala if (arch.IsValid ()) 137af245d11STodd Fiala return Error(); 138af245d11STodd Fiala else 139af245d11STodd Fiala return Error("failed to retrieve a valid architecture from the exe module"); 140af245d11STodd Fiala } 141af245d11STodd Fiala 142af245d11STodd Fiala void 143db264a6dSTamas Berghammer DisplayBytes (StreamString &s, void *bytes, uint32_t count) 144af245d11STodd Fiala { 145af245d11STodd Fiala uint8_t *ptr = (uint8_t *)bytes; 146af245d11STodd Fiala const uint32_t loop_count = std::min<uint32_t>(DEBUG_PTRACE_MAXBYTES, count); 147af245d11STodd Fiala for(uint32_t i=0; i<loop_count; i++) 148af245d11STodd Fiala { 149af245d11STodd Fiala s.Printf ("[%x]", *ptr); 150af245d11STodd Fiala ptr++; 151af245d11STodd Fiala } 152af245d11STodd Fiala } 153af245d11STodd Fiala 154af245d11STodd Fiala void 155af245d11STodd Fiala PtraceDisplayBytes(int &req, void *data, size_t data_size) 156af245d11STodd Fiala { 157af245d11STodd Fiala StreamString buf; 158af245d11STodd Fiala Log *verbose_log (ProcessPOSIXLog::GetLogIfAllCategoriesSet ( 159af245d11STodd Fiala POSIX_LOG_PTRACE | POSIX_LOG_VERBOSE)); 160af245d11STodd Fiala 161af245d11STodd Fiala if (verbose_log) 162af245d11STodd Fiala { 163af245d11STodd Fiala switch(req) 164af245d11STodd Fiala { 165af245d11STodd Fiala case PTRACE_POKETEXT: 166af245d11STodd Fiala { 167af245d11STodd Fiala DisplayBytes(buf, &data, 8); 168af245d11STodd Fiala verbose_log->Printf("PTRACE_POKETEXT %s", buf.GetData()); 169af245d11STodd Fiala break; 170af245d11STodd Fiala } 171af245d11STodd Fiala case PTRACE_POKEDATA: 172af245d11STodd Fiala { 173af245d11STodd Fiala DisplayBytes(buf, &data, 8); 174af245d11STodd Fiala verbose_log->Printf("PTRACE_POKEDATA %s", buf.GetData()); 175af245d11STodd Fiala break; 176af245d11STodd Fiala } 177af245d11STodd Fiala case PTRACE_POKEUSER: 178af245d11STodd Fiala { 179af245d11STodd Fiala DisplayBytes(buf, &data, 8); 180af245d11STodd Fiala verbose_log->Printf("PTRACE_POKEUSER %s", buf.GetData()); 181af245d11STodd Fiala break; 182af245d11STodd Fiala } 183af245d11STodd Fiala case PTRACE_SETREGS: 184af245d11STodd Fiala { 185af245d11STodd Fiala DisplayBytes(buf, data, data_size); 186af245d11STodd Fiala verbose_log->Printf("PTRACE_SETREGS %s", buf.GetData()); 187af245d11STodd Fiala break; 188af245d11STodd Fiala } 189af245d11STodd Fiala case PTRACE_SETFPREGS: 190af245d11STodd Fiala { 191af245d11STodd Fiala DisplayBytes(buf, data, data_size); 192af245d11STodd Fiala verbose_log->Printf("PTRACE_SETFPREGS %s", buf.GetData()); 193af245d11STodd Fiala break; 194af245d11STodd Fiala } 195af245d11STodd Fiala case PTRACE_SETSIGINFO: 196af245d11STodd Fiala { 197af245d11STodd Fiala DisplayBytes(buf, data, sizeof(siginfo_t)); 198af245d11STodd Fiala verbose_log->Printf("PTRACE_SETSIGINFO %s", buf.GetData()); 199af245d11STodd Fiala break; 200af245d11STodd Fiala } 201af245d11STodd Fiala case PTRACE_SETREGSET: 202af245d11STodd Fiala { 203af245d11STodd Fiala // Extract iov_base from data, which is a pointer to the struct IOVEC 204af245d11STodd Fiala DisplayBytes(buf, *(void **)data, data_size); 205af245d11STodd Fiala verbose_log->Printf("PTRACE_SETREGSET %s", buf.GetData()); 206af245d11STodd Fiala break; 207af245d11STodd Fiala } 208af245d11STodd Fiala default: 209af245d11STodd Fiala { 210af245d11STodd Fiala } 211af245d11STodd Fiala } 212af245d11STodd Fiala } 213af245d11STodd Fiala } 214af245d11STodd Fiala 21519cbe96aSPavel Labath static constexpr unsigned k_ptrace_word_size = sizeof(void*); 21619cbe96aSPavel Labath static_assert(sizeof(long) >= k_ptrace_word_size, "Size of long must be larger than ptrace word size"); 2171107b5a5SPavel Labath } // end of anonymous namespace 2181107b5a5SPavel Labath 219bd7cbc5aSPavel Labath // Simple helper function to ensure flags are enabled on the given file 220bd7cbc5aSPavel Labath // descriptor. 221bd7cbc5aSPavel Labath static Error 222bd7cbc5aSPavel Labath EnsureFDFlags(int fd, int flags) 223bd7cbc5aSPavel Labath { 224bd7cbc5aSPavel Labath Error error; 225bd7cbc5aSPavel Labath 226bd7cbc5aSPavel Labath int status = fcntl(fd, F_GETFL); 227bd7cbc5aSPavel Labath if (status == -1) 228bd7cbc5aSPavel Labath { 229bd7cbc5aSPavel Labath error.SetErrorToErrno(); 230bd7cbc5aSPavel Labath return error; 231bd7cbc5aSPavel Labath } 232bd7cbc5aSPavel Labath 233bd7cbc5aSPavel Labath if (fcntl(fd, F_SETFL, status | flags) == -1) 234bd7cbc5aSPavel Labath { 235bd7cbc5aSPavel Labath error.SetErrorToErrno(); 236bd7cbc5aSPavel Labath return error; 237bd7cbc5aSPavel Labath } 238bd7cbc5aSPavel Labath 239bd7cbc5aSPavel Labath return error; 240bd7cbc5aSPavel Labath } 241bd7cbc5aSPavel Labath 242bd7cbc5aSPavel Labath NativeProcessLinux::LaunchArgs::LaunchArgs(Module *module, 243af245d11STodd Fiala char const **argv, 244af245d11STodd Fiala char const **envp, 245d3173f34SChaoren Lin const FileSpec &stdin_file_spec, 246d3173f34SChaoren Lin const FileSpec &stdout_file_spec, 247d3173f34SChaoren Lin const FileSpec &stderr_file_spec, 248d3173f34SChaoren Lin const FileSpec &working_dir, 249db264a6dSTamas Berghammer const ProcessLaunchInfo &launch_info) 250bd7cbc5aSPavel Labath : m_module(module), 251af245d11STodd Fiala m_argv(argv), 252af245d11STodd Fiala m_envp(envp), 253d3173f34SChaoren Lin m_stdin_file_spec(stdin_file_spec), 254d3173f34SChaoren Lin m_stdout_file_spec(stdout_file_spec), 255d3173f34SChaoren Lin m_stderr_file_spec(stderr_file_spec), 2560bce1b67STodd Fiala m_working_dir(working_dir), 2570bce1b67STodd Fiala m_launch_info(launch_info) 2580bce1b67STodd Fiala { 2590bce1b67STodd Fiala } 260af245d11STodd Fiala 261af245d11STodd Fiala NativeProcessLinux::LaunchArgs::~LaunchArgs() 262af245d11STodd Fiala { } 263af245d11STodd Fiala 264af245d11STodd Fiala // ----------------------------------------------------------------------------- 265af245d11STodd Fiala // Public Static Methods 266af245d11STodd Fiala // ----------------------------------------------------------------------------- 267af245d11STodd Fiala 268db264a6dSTamas Berghammer Error 269d5b310f2SPavel Labath NativeProcessProtocol::Launch ( 270db264a6dSTamas Berghammer ProcessLaunchInfo &launch_info, 271db264a6dSTamas Berghammer NativeProcessProtocol::NativeDelegate &native_delegate, 27219cbe96aSPavel Labath MainLoop &mainloop, 273af245d11STodd Fiala NativeProcessProtocolSP &native_process_sp) 274af245d11STodd Fiala { 275af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 276af245d11STodd Fiala 277d5b310f2SPavel Labath lldb::ModuleSP exe_module_sp; 278d5b310f2SPavel Labath PlatformSP platform_sp (Platform::GetHostPlatform ()); 279d5b310f2SPavel Labath Error error = platform_sp->ResolveExecutable( 280d5b310f2SPavel Labath ModuleSpec(launch_info.GetExecutableFile(), launch_info.GetArchitecture()), 281d5b310f2SPavel Labath exe_module_sp, 282d5b310f2SPavel Labath nullptr); 283d5b310f2SPavel Labath 284d5b310f2SPavel Labath if (! error.Success()) 285d5b310f2SPavel Labath return error; 286af245d11STodd Fiala 287af245d11STodd Fiala // Verify the working directory is valid if one was specified. 288d3173f34SChaoren Lin FileSpec working_dir{launch_info.GetWorkingDirectory()}; 289d3173f34SChaoren Lin if (working_dir && 290d3173f34SChaoren Lin (!working_dir.ResolvePath() || 291d3173f34SChaoren Lin working_dir.GetFileType() != FileSpec::eFileTypeDirectory)) 292af245d11STodd Fiala { 293d3173f34SChaoren Lin error.SetErrorStringWithFormat ("No such file or directory: %s", 294d3173f34SChaoren Lin working_dir.GetCString()); 295af245d11STodd Fiala return error; 296af245d11STodd Fiala } 297af245d11STodd Fiala 298db264a6dSTamas Berghammer const FileAction *file_action; 299af245d11STodd Fiala 300d3173f34SChaoren Lin // Default of empty will mean to use existing open file descriptors. 301d3173f34SChaoren Lin FileSpec stdin_file_spec{}; 302d3173f34SChaoren Lin FileSpec stdout_file_spec{}; 303d3173f34SChaoren Lin FileSpec stderr_file_spec{}; 304af245d11STodd Fiala 305af245d11STodd Fiala file_action = launch_info.GetFileActionForFD (STDIN_FILENO); 30675f47c3aSTodd Fiala if (file_action) 307d3173f34SChaoren Lin stdin_file_spec = file_action->GetFileSpec(); 308af245d11STodd Fiala 309af245d11STodd Fiala file_action = launch_info.GetFileActionForFD (STDOUT_FILENO); 31075f47c3aSTodd Fiala if (file_action) 311d3173f34SChaoren Lin stdout_file_spec = file_action->GetFileSpec(); 312af245d11STodd Fiala 313af245d11STodd Fiala file_action = launch_info.GetFileActionForFD (STDERR_FILENO); 31475f47c3aSTodd Fiala if (file_action) 315d3173f34SChaoren Lin stderr_file_spec = file_action->GetFileSpec(); 31675f47c3aSTodd Fiala 31775f47c3aSTodd Fiala if (log) 31875f47c3aSTodd Fiala { 319d3173f34SChaoren Lin if (stdin_file_spec) 320d3173f34SChaoren Lin log->Printf ("NativeProcessLinux::%s setting STDIN to '%s'", 321d3173f34SChaoren Lin __FUNCTION__, stdin_file_spec.GetCString()); 32275f47c3aSTodd Fiala else 32375f47c3aSTodd Fiala log->Printf ("NativeProcessLinux::%s leaving STDIN as is", __FUNCTION__); 32475f47c3aSTodd Fiala 325d3173f34SChaoren Lin if (stdout_file_spec) 326d3173f34SChaoren Lin log->Printf ("NativeProcessLinux::%s setting STDOUT to '%s'", 327d3173f34SChaoren Lin __FUNCTION__, stdout_file_spec.GetCString()); 32875f47c3aSTodd Fiala else 32975f47c3aSTodd Fiala log->Printf ("NativeProcessLinux::%s leaving STDOUT as is", __FUNCTION__); 33075f47c3aSTodd Fiala 331d3173f34SChaoren Lin if (stderr_file_spec) 332d3173f34SChaoren Lin log->Printf ("NativeProcessLinux::%s setting STDERR to '%s'", 333d3173f34SChaoren Lin __FUNCTION__, stderr_file_spec.GetCString()); 33475f47c3aSTodd Fiala else 33575f47c3aSTodd Fiala log->Printf ("NativeProcessLinux::%s leaving STDERR as is", __FUNCTION__); 33675f47c3aSTodd Fiala } 337af245d11STodd Fiala 338af245d11STodd Fiala // Create the NativeProcessLinux in launch mode. 339af245d11STodd Fiala native_process_sp.reset (new NativeProcessLinux ()); 340af245d11STodd Fiala 341af245d11STodd Fiala if (log) 342af245d11STodd Fiala { 343af245d11STodd Fiala int i = 0; 344af245d11STodd Fiala for (const char **args = launch_info.GetArguments ().GetConstArgumentVector (); *args; ++args, ++i) 345af245d11STodd Fiala { 346af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s arg %d: \"%s\"", __FUNCTION__, i, *args ? *args : "nullptr"); 347af245d11STodd Fiala ++i; 348af245d11STodd Fiala } 349af245d11STodd Fiala } 350af245d11STodd Fiala 351af245d11STodd Fiala if (!native_process_sp->RegisterNativeDelegate (native_delegate)) 352af245d11STodd Fiala { 353af245d11STodd Fiala native_process_sp.reset (); 354af245d11STodd Fiala error.SetErrorStringWithFormat ("failed to register the native delegate"); 355af245d11STodd Fiala return error; 356af245d11STodd Fiala } 357af245d11STodd Fiala 358cb84eebbSTamas Berghammer std::static_pointer_cast<NativeProcessLinux> (native_process_sp)->LaunchInferior ( 35919cbe96aSPavel Labath mainloop, 360d5b310f2SPavel Labath exe_module_sp.get(), 361af245d11STodd Fiala launch_info.GetArguments ().GetConstArgumentVector (), 362af245d11STodd Fiala launch_info.GetEnvironmentEntries ().GetConstArgumentVector (), 363d3173f34SChaoren Lin stdin_file_spec, 364d3173f34SChaoren Lin stdout_file_spec, 365d3173f34SChaoren Lin stderr_file_spec, 366af245d11STodd Fiala working_dir, 3670bce1b67STodd Fiala launch_info, 368af245d11STodd Fiala error); 369af245d11STodd Fiala 370af245d11STodd Fiala if (error.Fail ()) 371af245d11STodd Fiala { 372af245d11STodd Fiala native_process_sp.reset (); 373af245d11STodd Fiala if (log) 374af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s failed to launch process: %s", __FUNCTION__, error.AsCString ()); 375af245d11STodd Fiala return error; 376af245d11STodd Fiala } 377af245d11STodd Fiala 378af245d11STodd Fiala launch_info.SetProcessID (native_process_sp->GetID ()); 379af245d11STodd Fiala 380af245d11STodd Fiala return error; 381af245d11STodd Fiala } 382af245d11STodd Fiala 383db264a6dSTamas Berghammer Error 384d5b310f2SPavel Labath NativeProcessProtocol::Attach ( 385af245d11STodd Fiala lldb::pid_t pid, 386db264a6dSTamas Berghammer NativeProcessProtocol::NativeDelegate &native_delegate, 38719cbe96aSPavel Labath MainLoop &mainloop, 388af245d11STodd Fiala NativeProcessProtocolSP &native_process_sp) 389af245d11STodd Fiala { 390af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 391af245d11STodd Fiala if (log && log->GetMask ().Test (POSIX_LOG_VERBOSE)) 392af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s(pid = %" PRIi64 ")", __FUNCTION__, pid); 393af245d11STodd Fiala 394af245d11STodd Fiala // Grab the current platform architecture. This should be Linux, 395af245d11STodd Fiala // since this code is only intended to run on a Linux host. 396615eb7e6SGreg Clayton PlatformSP platform_sp (Platform::GetHostPlatform ()); 397af245d11STodd Fiala if (!platform_sp) 398af245d11STodd Fiala return Error("failed to get a valid default platform"); 399af245d11STodd Fiala 400af245d11STodd Fiala // Retrieve the architecture for the running process. 401af245d11STodd Fiala ArchSpec process_arch; 402af245d11STodd Fiala Error error = ResolveProcessArchitecture (pid, *platform_sp.get (), process_arch); 403af245d11STodd Fiala if (!error.Success ()) 404af245d11STodd Fiala return error; 405af245d11STodd Fiala 4061339b5e8SOleksiy Vyalov std::shared_ptr<NativeProcessLinux> native_process_linux_sp (new NativeProcessLinux ()); 407af245d11STodd Fiala 4081339b5e8SOleksiy Vyalov if (!native_process_linux_sp->RegisterNativeDelegate (native_delegate)) 409af245d11STodd Fiala { 410af245d11STodd Fiala error.SetErrorStringWithFormat ("failed to register the native delegate"); 411af245d11STodd Fiala return error; 412af245d11STodd Fiala } 413af245d11STodd Fiala 41419cbe96aSPavel Labath native_process_linux_sp->AttachToInferior (mainloop, pid, error); 415af245d11STodd Fiala if (!error.Success ()) 416af245d11STodd Fiala return error; 417af245d11STodd Fiala 4181339b5e8SOleksiy Vyalov native_process_sp = native_process_linux_sp; 419af245d11STodd Fiala return error; 420af245d11STodd Fiala } 421af245d11STodd Fiala 422af245d11STodd Fiala // ----------------------------------------------------------------------------- 423af245d11STodd Fiala // Public Instance Methods 424af245d11STodd Fiala // ----------------------------------------------------------------------------- 425af245d11STodd Fiala 426af245d11STodd Fiala NativeProcessLinux::NativeProcessLinux () : 427af245d11STodd Fiala NativeProcessProtocol (LLDB_INVALID_PROCESS_ID), 428af245d11STodd Fiala m_arch (), 429af245d11STodd Fiala m_supports_mem_region (eLazyBoolCalculate), 430af245d11STodd Fiala m_mem_region_cache (), 4310e1d729bSPavel Labath m_mem_region_cache_mutex(), 4320e1d729bSPavel Labath m_pending_notification_tid(LLDB_INVALID_THREAD_ID) 433af245d11STodd Fiala { 434af245d11STodd Fiala } 435af245d11STodd Fiala 436af245d11STodd Fiala void 437af245d11STodd Fiala NativeProcessLinux::LaunchInferior ( 43819cbe96aSPavel Labath MainLoop &mainloop, 439af245d11STodd Fiala Module *module, 440af245d11STodd Fiala const char *argv[], 441af245d11STodd Fiala const char *envp[], 442d3173f34SChaoren Lin const FileSpec &stdin_file_spec, 443d3173f34SChaoren Lin const FileSpec &stdout_file_spec, 444d3173f34SChaoren Lin const FileSpec &stderr_file_spec, 445d3173f34SChaoren Lin const FileSpec &working_dir, 446db264a6dSTamas Berghammer const ProcessLaunchInfo &launch_info, 447db264a6dSTamas Berghammer Error &error) 448af245d11STodd Fiala { 44919cbe96aSPavel Labath m_sigchld_handle = mainloop.RegisterSignal(SIGCHLD, 45019cbe96aSPavel Labath [this] (MainLoopBase &) { SigchldHandler(); }, error); 45119cbe96aSPavel Labath if (! m_sigchld_handle) 45219cbe96aSPavel Labath return; 45319cbe96aSPavel Labath 454af245d11STodd Fiala if (module) 455af245d11STodd Fiala m_arch = module->GetArchitecture (); 456af245d11STodd Fiala 457af245d11STodd Fiala SetState (eStateLaunching); 458af245d11STodd Fiala 459af245d11STodd Fiala std::unique_ptr<LaunchArgs> args( 460d3173f34SChaoren Lin new LaunchArgs(module, argv, envp, 461d3173f34SChaoren Lin stdin_file_spec, 462d3173f34SChaoren Lin stdout_file_spec, 463d3173f34SChaoren Lin stderr_file_spec, 464d3173f34SChaoren Lin working_dir, 465d3173f34SChaoren Lin launch_info)); 466af245d11STodd Fiala 46719cbe96aSPavel Labath Launch(args.get(), error); 468af245d11STodd Fiala } 469af245d11STodd Fiala 470af245d11STodd Fiala void 47119cbe96aSPavel Labath NativeProcessLinux::AttachToInferior (MainLoop &mainloop, lldb::pid_t pid, Error &error) 472af245d11STodd Fiala { 473af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 474af245d11STodd Fiala if (log) 475af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 ")", __FUNCTION__, pid); 476af245d11STodd Fiala 47719cbe96aSPavel Labath m_sigchld_handle = mainloop.RegisterSignal(SIGCHLD, 47819cbe96aSPavel Labath [this] (MainLoopBase &) { SigchldHandler(); }, error); 47919cbe96aSPavel Labath if (! m_sigchld_handle) 48019cbe96aSPavel Labath return; 48119cbe96aSPavel Labath 482af245d11STodd Fiala // We can use the Host for everything except the ResolveExecutable portion. 483615eb7e6SGreg Clayton PlatformSP platform_sp = Platform::GetHostPlatform (); 484af245d11STodd Fiala if (!platform_sp) 485af245d11STodd Fiala { 486af245d11STodd Fiala if (log) 487af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 "): no default platform set", __FUNCTION__, pid); 488af245d11STodd Fiala error.SetErrorString ("no default platform available"); 48950d60be3SShawn Best return; 490af245d11STodd Fiala } 491af245d11STodd Fiala 492af245d11STodd Fiala // Gather info about the process. 493af245d11STodd Fiala ProcessInstanceInfo process_info; 49450d60be3SShawn Best if (!platform_sp->GetProcessInfo (pid, process_info)) 49550d60be3SShawn Best { 49650d60be3SShawn Best if (log) 49750d60be3SShawn Best log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 "): failed to get process info", __FUNCTION__, pid); 49850d60be3SShawn Best error.SetErrorString ("failed to get process info"); 49950d60be3SShawn Best return; 50050d60be3SShawn Best } 501af245d11STodd Fiala 502af245d11STodd Fiala // Resolve the executable module 503af245d11STodd Fiala ModuleSP exe_module_sp; 504af245d11STodd Fiala FileSpecList executable_search_paths (Target::GetDefaultExecutableSearchPaths()); 505e56f6dceSChaoren Lin ModuleSpec exe_module_spec(process_info.GetExecutableFile(), process_info.GetArchitecture()); 5066edef204SOleksiy Vyalov error = platform_sp->ResolveExecutable(exe_module_spec, exe_module_sp, 507af245d11STodd Fiala executable_search_paths.GetSize() ? &executable_search_paths : NULL); 508af245d11STodd Fiala if (!error.Success()) 509af245d11STodd Fiala return; 510af245d11STodd Fiala 511af245d11STodd Fiala // Set the architecture to the exe architecture. 512af245d11STodd Fiala m_arch = exe_module_sp->GetArchitecture(); 513af245d11STodd Fiala if (log) 514af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 ") detected architecture %s", __FUNCTION__, pid, m_arch.GetArchitectureName ()); 515af245d11STodd Fiala 516af245d11STodd Fiala m_pid = pid; 517af245d11STodd Fiala SetState(eStateAttaching); 518af245d11STodd Fiala 51919cbe96aSPavel Labath Attach(pid, error); 520af245d11STodd Fiala } 521af245d11STodd Fiala 522bd7cbc5aSPavel Labath ::pid_t 523bd7cbc5aSPavel Labath NativeProcessLinux::Launch(LaunchArgs *args, Error &error) 524af245d11STodd Fiala { 5250bce1b67STodd Fiala assert (args && "null args"); 526af245d11STodd Fiala 527af245d11STodd Fiala const char **argv = args->m_argv; 528af245d11STodd Fiala const char **envp = args->m_envp; 529d3173f34SChaoren Lin const FileSpec working_dir = args->m_working_dir; 530af245d11STodd Fiala 531af245d11STodd Fiala lldb_utility::PseudoTerminal terminal; 532af245d11STodd Fiala const size_t err_len = 1024; 533af245d11STodd Fiala char err_str[err_len]; 534af245d11STodd Fiala lldb::pid_t pid; 535af245d11STodd Fiala 536af245d11STodd Fiala // Propagate the environment if one is not supplied. 537af245d11STodd Fiala if (envp == NULL || envp[0] == NULL) 538af245d11STodd Fiala envp = const_cast<const char **>(environ); 539af245d11STodd Fiala 540af245d11STodd Fiala if ((pid = terminal.Fork(err_str, err_len)) == static_cast<lldb::pid_t> (-1)) 541af245d11STodd Fiala { 542bd7cbc5aSPavel Labath error.SetErrorToGenericError(); 543bd7cbc5aSPavel Labath error.SetErrorStringWithFormat("Process fork failed: %s", err_str); 544bd7cbc5aSPavel Labath return -1; 545af245d11STodd Fiala } 546af245d11STodd Fiala 547af245d11STodd Fiala // Recognized child exit status codes. 548af245d11STodd Fiala enum { 549af245d11STodd Fiala ePtraceFailed = 1, 550af245d11STodd Fiala eDupStdinFailed, 551af245d11STodd Fiala eDupStdoutFailed, 552af245d11STodd Fiala eDupStderrFailed, 553af245d11STodd Fiala eChdirFailed, 554af245d11STodd Fiala eExecFailed, 55578856474SPavel Labath eSetGidFailed, 55678856474SPavel Labath eSetSigMaskFailed 557af245d11STodd Fiala }; 558af245d11STodd Fiala 559af245d11STodd Fiala // Child process. 560af245d11STodd Fiala if (pid == 0) 561af245d11STodd Fiala { 562d2c4c9b1SPavel Labath // First, make sure we disable all logging. If we are logging to stdout, our logs can be 563d2c4c9b1SPavel Labath // mistaken for inferior output. 564d2c4c9b1SPavel Labath Log::DisableAllLogChannels(nullptr); 56575f47c3aSTodd Fiala // FIXME consider opening a pipe between parent/child and have this forked child 566d2c4c9b1SPavel Labath // send log info to parent re: launch status. 567af245d11STodd Fiala 56875f47c3aSTodd Fiala // Start tracing this child that is about to exec. 5694a9babb2SPavel Labath error = PtraceWrapper(PTRACE_TRACEME, 0); 570bd7cbc5aSPavel Labath if (error.Fail()) 571af245d11STodd Fiala exit(ePtraceFailed); 572af245d11STodd Fiala 573493c3a12SPavel Labath // terminal has already dupped the tty descriptors to stdin/out/err. 574493c3a12SPavel Labath // This closes original fd from which they were copied (and avoids 575493c3a12SPavel Labath // leaking descriptors to the debugged process. 576493c3a12SPavel Labath terminal.CloseSlaveFileDescriptor(); 577493c3a12SPavel Labath 578af245d11STodd Fiala // Do not inherit setgid powers. 579af245d11STodd Fiala if (setgid(getgid()) != 0) 580af245d11STodd Fiala exit(eSetGidFailed); 581af245d11STodd Fiala 582af245d11STodd Fiala // Attempt to have our own process group. 583af245d11STodd Fiala if (setpgid(0, 0) != 0) 584af245d11STodd Fiala { 58575f47c3aSTodd Fiala // FIXME log that this failed. This is common. 586af245d11STodd Fiala // Don't allow this to prevent an inferior exec. 587af245d11STodd Fiala } 588af245d11STodd Fiala 589af245d11STodd Fiala // Dup file descriptors if needed. 590d3173f34SChaoren Lin if (args->m_stdin_file_spec) 591d3173f34SChaoren Lin if (!DupDescriptor(args->m_stdin_file_spec, STDIN_FILENO, O_RDONLY)) 592af245d11STodd Fiala exit(eDupStdinFailed); 593af245d11STodd Fiala 594d3173f34SChaoren Lin if (args->m_stdout_file_spec) 595d3173f34SChaoren Lin if (!DupDescriptor(args->m_stdout_file_spec, STDOUT_FILENO, O_WRONLY | O_CREAT | O_TRUNC)) 596af245d11STodd Fiala exit(eDupStdoutFailed); 597af245d11STodd Fiala 598d3173f34SChaoren Lin if (args->m_stderr_file_spec) 599d3173f34SChaoren Lin if (!DupDescriptor(args->m_stderr_file_spec, STDERR_FILENO, O_WRONLY | O_CREAT | O_TRUNC)) 600af245d11STodd Fiala exit(eDupStderrFailed); 601af245d11STodd Fiala 6029cf4f2c2SChaoren Lin // Close everything besides stdin, stdout, and stderr that has no file 6039cf4f2c2SChaoren Lin // action to avoid leaking 6049cf4f2c2SChaoren Lin for (int fd = 3; fd < sysconf(_SC_OPEN_MAX); ++fd) 6059cf4f2c2SChaoren Lin if (!args->m_launch_info.GetFileActionForFD(fd)) 6069cf4f2c2SChaoren Lin close(fd); 6079cf4f2c2SChaoren Lin 608af245d11STodd Fiala // Change working directory 609d3173f34SChaoren Lin if (working_dir && 0 != ::chdir(working_dir.GetCString())) 610af245d11STodd Fiala exit(eChdirFailed); 611af245d11STodd Fiala 6120bce1b67STodd Fiala // Disable ASLR if requested. 6130bce1b67STodd Fiala if (args->m_launch_info.GetFlags ().Test (lldb::eLaunchFlagDisableASLR)) 6140bce1b67STodd Fiala { 6150bce1b67STodd Fiala const int old_personality = personality (LLDB_PERSONALITY_GET_CURRENT_SETTINGS); 6160bce1b67STodd Fiala if (old_personality == -1) 6170bce1b67STodd Fiala { 61875f47c3aSTodd Fiala // Can't retrieve Linux personality. Cannot disable ASLR. 6190bce1b67STodd Fiala } 6200bce1b67STodd Fiala else 6210bce1b67STodd Fiala { 6220bce1b67STodd Fiala const int new_personality = personality (ADDR_NO_RANDOMIZE | old_personality); 6230bce1b67STodd Fiala if (new_personality == -1) 6240bce1b67STodd Fiala { 62575f47c3aSTodd Fiala // Disabling ASLR failed. 6260bce1b67STodd Fiala } 6270bce1b67STodd Fiala else 6280bce1b67STodd Fiala { 62975f47c3aSTodd Fiala // Disabling ASLR succeeded. 6300bce1b67STodd Fiala } 6310bce1b67STodd Fiala } 6320bce1b67STodd Fiala } 6330bce1b67STodd Fiala 63478856474SPavel Labath // Clear the signal mask to prevent the child from being affected by 63578856474SPavel Labath // any masking done by the parent. 63678856474SPavel Labath sigset_t set; 63778856474SPavel Labath if (sigemptyset(&set) != 0 || pthread_sigmask(SIG_SETMASK, &set, nullptr) != 0) 63878856474SPavel Labath exit(eSetSigMaskFailed); 63978856474SPavel Labath 64075f47c3aSTodd Fiala // Execute. We should never return... 641af245d11STodd Fiala execve(argv[0], 642af245d11STodd Fiala const_cast<char *const *>(argv), 643af245d11STodd Fiala const_cast<char *const *>(envp)); 64475f47c3aSTodd Fiala 64575f47c3aSTodd Fiala // ...unless exec fails. In which case we definitely need to end the child here. 646af245d11STodd Fiala exit(eExecFailed); 647af245d11STodd Fiala } 648af245d11STodd Fiala 64975f47c3aSTodd Fiala // 65075f47c3aSTodd Fiala // This is the parent code here. 65175f47c3aSTodd Fiala // 65275f47c3aSTodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 65375f47c3aSTodd Fiala 654af245d11STodd Fiala // Wait for the child process to trap on its call to execve. 655af245d11STodd Fiala ::pid_t wpid; 656af245d11STodd Fiala int status; 657af245d11STodd Fiala if ((wpid = waitpid(pid, &status, 0)) < 0) 658af245d11STodd Fiala { 659bd7cbc5aSPavel Labath error.SetErrorToErrno(); 660af245d11STodd Fiala if (log) 661bd7cbc5aSPavel Labath log->Printf ("NativeProcessLinux::%s waitpid for inferior failed with %s", 662bd7cbc5aSPavel Labath __FUNCTION__, error.AsCString ()); 663af245d11STodd Fiala 664af245d11STodd Fiala // Mark the inferior as invalid. 665af245d11STodd Fiala // FIXME this could really use a new state - eStateLaunchFailure. For now, using eStateInvalid. 666bd7cbc5aSPavel Labath SetState (StateType::eStateInvalid); 667af245d11STodd Fiala 668bd7cbc5aSPavel Labath return -1; 669af245d11STodd Fiala } 670af245d11STodd Fiala else if (WIFEXITED(status)) 671af245d11STodd Fiala { 672af245d11STodd Fiala // open, dup or execve likely failed for some reason. 673bd7cbc5aSPavel Labath error.SetErrorToGenericError(); 674af245d11STodd Fiala switch (WEXITSTATUS(status)) 675af245d11STodd Fiala { 676af245d11STodd Fiala case ePtraceFailed: 677bd7cbc5aSPavel Labath error.SetErrorString("Child ptrace failed."); 678af245d11STodd Fiala break; 679af245d11STodd Fiala case eDupStdinFailed: 680bd7cbc5aSPavel Labath error.SetErrorString("Child open stdin failed."); 681af245d11STodd Fiala break; 682af245d11STodd Fiala case eDupStdoutFailed: 683bd7cbc5aSPavel Labath error.SetErrorString("Child open stdout failed."); 684af245d11STodd Fiala break; 685af245d11STodd Fiala case eDupStderrFailed: 686bd7cbc5aSPavel Labath error.SetErrorString("Child open stderr failed."); 687af245d11STodd Fiala break; 688af245d11STodd Fiala case eChdirFailed: 689bd7cbc5aSPavel Labath error.SetErrorString("Child failed to set working directory."); 690af245d11STodd Fiala break; 691af245d11STodd Fiala case eExecFailed: 692bd7cbc5aSPavel Labath error.SetErrorString("Child exec failed."); 693af245d11STodd Fiala break; 694af245d11STodd Fiala case eSetGidFailed: 695bd7cbc5aSPavel Labath error.SetErrorString("Child setgid failed."); 696af245d11STodd Fiala break; 69778856474SPavel Labath case eSetSigMaskFailed: 69878856474SPavel Labath error.SetErrorString("Child failed to set signal mask."); 69978856474SPavel Labath break; 700af245d11STodd Fiala default: 701bd7cbc5aSPavel Labath error.SetErrorString("Child returned unknown exit status."); 702af245d11STodd Fiala break; 703af245d11STodd Fiala } 704af245d11STodd Fiala 705af245d11STodd Fiala if (log) 706af245d11STodd Fiala { 707af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s inferior exited with status %d before issuing a STOP", 708af245d11STodd Fiala __FUNCTION__, 709af245d11STodd Fiala WEXITSTATUS(status)); 710af245d11STodd Fiala } 711af245d11STodd Fiala 712af245d11STodd Fiala // Mark the inferior as invalid. 713af245d11STodd Fiala // FIXME this could really use a new state - eStateLaunchFailure. For now, using eStateInvalid. 714bd7cbc5aSPavel Labath SetState (StateType::eStateInvalid); 715af245d11STodd Fiala 716bd7cbc5aSPavel Labath return -1; 717af245d11STodd Fiala } 718af245d11STodd Fiala assert(WIFSTOPPED(status) && (wpid == static_cast< ::pid_t> (pid)) && 719af245d11STodd Fiala "Could not sync with inferior process."); 720af245d11STodd Fiala 721af245d11STodd Fiala if (log) 722af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s inferior started, now in stopped state", __FUNCTION__); 723af245d11STodd Fiala 724bd7cbc5aSPavel Labath error = SetDefaultPtraceOpts(pid); 725bd7cbc5aSPavel Labath if (error.Fail()) 726af245d11STodd Fiala { 727af245d11STodd Fiala if (log) 728af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s inferior failed to set default ptrace options: %s", 729bd7cbc5aSPavel Labath __FUNCTION__, error.AsCString ()); 730af245d11STodd Fiala 731af245d11STodd Fiala // Mark the inferior as invalid. 732af245d11STodd Fiala // FIXME this could really use a new state - eStateLaunchFailure. For now, using eStateInvalid. 733bd7cbc5aSPavel Labath SetState (StateType::eStateInvalid); 734af245d11STodd Fiala 735bd7cbc5aSPavel Labath return -1; 736af245d11STodd Fiala } 737af245d11STodd Fiala 738af245d11STodd Fiala // Release the master terminal descriptor and pass it off to the 739af245d11STodd Fiala // NativeProcessLinux instance. Similarly stash the inferior pid. 740bd7cbc5aSPavel Labath m_terminal_fd = terminal.ReleaseMasterFileDescriptor(); 741bd7cbc5aSPavel Labath m_pid = pid; 742af245d11STodd Fiala 743af245d11STodd Fiala // Set the terminal fd to be in non blocking mode (it simplifies the 744af245d11STodd Fiala // implementation of ProcessLinux::GetSTDOUT to have a non-blocking 745af245d11STodd Fiala // descriptor to read from). 746bd7cbc5aSPavel Labath error = EnsureFDFlags(m_terminal_fd, O_NONBLOCK); 747bd7cbc5aSPavel Labath if (error.Fail()) 748af245d11STodd Fiala { 749af245d11STodd Fiala if (log) 750af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s inferior EnsureFDFlags failed for ensuring terminal O_NONBLOCK setting: %s", 751bd7cbc5aSPavel Labath __FUNCTION__, error.AsCString ()); 752af245d11STodd Fiala 753af245d11STodd Fiala // Mark the inferior as invalid. 754af245d11STodd Fiala // FIXME this could really use a new state - eStateLaunchFailure. For now, using eStateInvalid. 755bd7cbc5aSPavel Labath SetState (StateType::eStateInvalid); 756af245d11STodd Fiala 757bd7cbc5aSPavel Labath return -1; 758af245d11STodd Fiala } 759af245d11STodd Fiala 760af245d11STodd Fiala if (log) 761af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() adding pid = %" PRIu64, __FUNCTION__, pid); 762af245d11STodd Fiala 763*f9077782SPavel Labath NativeThreadLinuxSP thread_sp = AddThread(pid); 764af245d11STodd Fiala assert (thread_sp && "AddThread() returned a nullptr thread"); 765*f9077782SPavel Labath thread_sp->SetStoppedBySignal(SIGSTOP); 766*f9077782SPavel Labath ThreadWasCreated(*thread_sp); 767af245d11STodd Fiala 768af245d11STodd Fiala // Let our process instance know the thread has stopped. 769bd7cbc5aSPavel Labath SetCurrentThreadID (thread_sp->GetID ()); 770bd7cbc5aSPavel Labath SetState (StateType::eStateStopped); 771af245d11STodd Fiala 772af245d11STodd Fiala if (log) 773af245d11STodd Fiala { 774bd7cbc5aSPavel Labath if (error.Success ()) 775af245d11STodd Fiala { 776af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s inferior launching succeeded", __FUNCTION__); 777af245d11STodd Fiala } 778af245d11STodd Fiala else 779af245d11STodd Fiala { 780af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s inferior launching failed: %s", 781bd7cbc5aSPavel Labath __FUNCTION__, error.AsCString ()); 782bd7cbc5aSPavel Labath return -1; 783af245d11STodd Fiala } 784af245d11STodd Fiala } 785bd7cbc5aSPavel Labath return pid; 786af245d11STodd Fiala } 787af245d11STodd Fiala 788bd7cbc5aSPavel Labath ::pid_t 789bd7cbc5aSPavel Labath NativeProcessLinux::Attach(lldb::pid_t pid, Error &error) 790af245d11STodd Fiala { 791af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 792af245d11STodd Fiala 793af245d11STodd Fiala // Use a map to keep track of the threads which we have attached/need to attach. 794af245d11STodd Fiala Host::TidMap tids_to_attach; 795af245d11STodd Fiala if (pid <= 1) 796af245d11STodd Fiala { 797bd7cbc5aSPavel Labath error.SetErrorToGenericError(); 798bd7cbc5aSPavel Labath error.SetErrorString("Attaching to process 1 is not allowed."); 799bd7cbc5aSPavel Labath return -1; 800af245d11STodd Fiala } 801af245d11STodd Fiala 802af245d11STodd Fiala while (Host::FindProcessThreads(pid, tids_to_attach)) 803af245d11STodd Fiala { 804af245d11STodd Fiala for (Host::TidMap::iterator it = tids_to_attach.begin(); 805af245d11STodd Fiala it != tids_to_attach.end();) 806af245d11STodd Fiala { 807af245d11STodd Fiala if (it->second == false) 808af245d11STodd Fiala { 809af245d11STodd Fiala lldb::tid_t tid = it->first; 810af245d11STodd Fiala 811af245d11STodd Fiala // Attach to the requested process. 812af245d11STodd Fiala // An attach will cause the thread to stop with a SIGSTOP. 8134a9babb2SPavel Labath error = PtraceWrapper(PTRACE_ATTACH, tid); 814bd7cbc5aSPavel Labath if (error.Fail()) 815af245d11STodd Fiala { 816af245d11STodd Fiala // No such thread. The thread may have exited. 817af245d11STodd Fiala // More error handling may be needed. 818bd7cbc5aSPavel Labath if (error.GetError() == ESRCH) 819af245d11STodd Fiala { 820af245d11STodd Fiala it = tids_to_attach.erase(it); 821af245d11STodd Fiala continue; 822af245d11STodd Fiala } 823af245d11STodd Fiala else 824bd7cbc5aSPavel Labath return -1; 825af245d11STodd Fiala } 826af245d11STodd Fiala 827af245d11STodd Fiala int status; 828af245d11STodd Fiala // Need to use __WALL otherwise we receive an error with errno=ECHLD 829af245d11STodd Fiala // At this point we should have a thread stopped if waitpid succeeds. 830af245d11STodd Fiala if ((status = waitpid(tid, NULL, __WALL)) < 0) 831af245d11STodd Fiala { 832af245d11STodd Fiala // No such thread. The thread may have exited. 833af245d11STodd Fiala // More error handling may be needed. 834af245d11STodd Fiala if (errno == ESRCH) 835af245d11STodd Fiala { 836af245d11STodd Fiala it = tids_to_attach.erase(it); 837af245d11STodd Fiala continue; 838af245d11STodd Fiala } 839af245d11STodd Fiala else 840af245d11STodd Fiala { 841bd7cbc5aSPavel Labath error.SetErrorToErrno(); 842bd7cbc5aSPavel Labath return -1; 843af245d11STodd Fiala } 844af245d11STodd Fiala } 845af245d11STodd Fiala 846bd7cbc5aSPavel Labath error = SetDefaultPtraceOpts(tid); 847bd7cbc5aSPavel Labath if (error.Fail()) 848bd7cbc5aSPavel Labath return -1; 849af245d11STodd Fiala 850af245d11STodd Fiala if (log) 851af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() adding tid = %" PRIu64, __FUNCTION__, tid); 852af245d11STodd Fiala 853af245d11STodd Fiala it->second = true; 854af245d11STodd Fiala 855af245d11STodd Fiala // Create the thread, mark it as stopped. 856*f9077782SPavel Labath NativeThreadLinuxSP thread_sp (AddThread(static_cast<lldb::tid_t>(tid))); 857af245d11STodd Fiala assert (thread_sp && "AddThread() returned a nullptr"); 858fa03ad2eSChaoren Lin 859fa03ad2eSChaoren Lin // This will notify this is a new thread and tell the system it is stopped. 860*f9077782SPavel Labath thread_sp->SetStoppedBySignal(SIGSTOP); 861*f9077782SPavel Labath ThreadWasCreated(*thread_sp); 862bd7cbc5aSPavel Labath SetCurrentThreadID (thread_sp->GetID ()); 863af245d11STodd Fiala } 864af245d11STodd Fiala 865af245d11STodd Fiala // move the loop forward 866af245d11STodd Fiala ++it; 867af245d11STodd Fiala } 868af245d11STodd Fiala } 869af245d11STodd Fiala 870af245d11STodd Fiala if (tids_to_attach.size() > 0) 871af245d11STodd Fiala { 872bd7cbc5aSPavel Labath m_pid = pid; 873af245d11STodd Fiala // Let our process instance know the thread has stopped. 874bd7cbc5aSPavel Labath SetState (StateType::eStateStopped); 875af245d11STodd Fiala } 876af245d11STodd Fiala else 877af245d11STodd Fiala { 878bd7cbc5aSPavel Labath error.SetErrorToGenericError(); 879bd7cbc5aSPavel Labath error.SetErrorString("No such process."); 880bd7cbc5aSPavel Labath return -1; 881af245d11STodd Fiala } 882af245d11STodd Fiala 883bd7cbc5aSPavel Labath return pid; 884af245d11STodd Fiala } 885af245d11STodd Fiala 88697ccc294SChaoren Lin Error 887af245d11STodd Fiala NativeProcessLinux::SetDefaultPtraceOpts(lldb::pid_t pid) 888af245d11STodd Fiala { 889af245d11STodd Fiala long ptrace_opts = 0; 890af245d11STodd Fiala 891af245d11STodd Fiala // Have the child raise an event on exit. This is used to keep the child in 892af245d11STodd Fiala // limbo until it is destroyed. 893af245d11STodd Fiala ptrace_opts |= PTRACE_O_TRACEEXIT; 894af245d11STodd Fiala 895af245d11STodd Fiala // Have the tracer trace threads which spawn in the inferior process. 896af245d11STodd Fiala // TODO: if we want to support tracing the inferiors' child, add the 897af245d11STodd Fiala // appropriate ptrace flags here (PTRACE_O_TRACEFORK, PTRACE_O_TRACEVFORK) 898af245d11STodd Fiala ptrace_opts |= PTRACE_O_TRACECLONE; 899af245d11STodd Fiala 900af245d11STodd Fiala // Have the tracer notify us before execve returns 901af245d11STodd Fiala // (needed to disable legacy SIGTRAP generation) 902af245d11STodd Fiala ptrace_opts |= PTRACE_O_TRACEEXEC; 903af245d11STodd Fiala 9044a9babb2SPavel Labath return PtraceWrapper(PTRACE_SETOPTIONS, pid, nullptr, (void*)ptrace_opts); 905af245d11STodd Fiala } 906af245d11STodd Fiala 907af245d11STodd Fiala static ExitType convert_pid_status_to_exit_type (int status) 908af245d11STodd Fiala { 909af245d11STodd Fiala if (WIFEXITED (status)) 910af245d11STodd Fiala return ExitType::eExitTypeExit; 911af245d11STodd Fiala else if (WIFSIGNALED (status)) 912af245d11STodd Fiala return ExitType::eExitTypeSignal; 913af245d11STodd Fiala else if (WIFSTOPPED (status)) 914af245d11STodd Fiala return ExitType::eExitTypeStop; 915af245d11STodd Fiala else 916af245d11STodd Fiala { 917af245d11STodd Fiala // We don't know what this is. 918af245d11STodd Fiala return ExitType::eExitTypeInvalid; 919af245d11STodd Fiala } 920af245d11STodd Fiala } 921af245d11STodd Fiala 922af245d11STodd Fiala static int convert_pid_status_to_return_code (int status) 923af245d11STodd Fiala { 924af245d11STodd Fiala if (WIFEXITED (status)) 925af245d11STodd Fiala return WEXITSTATUS (status); 926af245d11STodd Fiala else if (WIFSIGNALED (status)) 927af245d11STodd Fiala return WTERMSIG (status); 928af245d11STodd Fiala else if (WIFSTOPPED (status)) 929af245d11STodd Fiala return WSTOPSIG (status); 930af245d11STodd Fiala else 931af245d11STodd Fiala { 932af245d11STodd Fiala // We don't know what this is. 933af245d11STodd Fiala return ExitType::eExitTypeInvalid; 934af245d11STodd Fiala } 935af245d11STodd Fiala } 936af245d11STodd Fiala 9371107b5a5SPavel Labath // Handles all waitpid events from the inferior process. 9381107b5a5SPavel Labath void 9391107b5a5SPavel Labath NativeProcessLinux::MonitorCallback(lldb::pid_t pid, 940af245d11STodd Fiala bool exited, 941af245d11STodd Fiala int signal, 942af245d11STodd Fiala int status) 943af245d11STodd Fiala { 944af245d11STodd Fiala Log *log (GetLogIfAnyCategoriesSet (LIBLLDB_LOG_PROCESS)); 945af245d11STodd Fiala 946af245d11STodd Fiala // Certain activities differ based on whether the pid is the tid of the main thread. 9471107b5a5SPavel Labath const bool is_main_thread = (pid == GetID ()); 948af245d11STodd Fiala 949af245d11STodd Fiala // Handle when the thread exits. 950af245d11STodd Fiala if (exited) 951af245d11STodd Fiala { 952af245d11STodd Fiala if (log) 95386fd8e45SChaoren Lin log->Printf ("NativeProcessLinux::%s() got exit signal(%d) , tid = %" PRIu64 " (%s main thread)", __FUNCTION__, signal, pid, is_main_thread ? "is" : "is not"); 954af245d11STodd Fiala 955af245d11STodd Fiala // This is a thread that exited. Ensure we're not tracking it anymore. 9561107b5a5SPavel Labath const bool thread_found = StopTrackingThread (pid); 957af245d11STodd Fiala 958af245d11STodd Fiala if (is_main_thread) 959af245d11STodd Fiala { 960af245d11STodd Fiala // We only set the exit status and notify the delegate if we haven't already set the process 961af245d11STodd Fiala // state to an exited state. We normally should have received a SIGTRAP | (PTRACE_EVENT_EXIT << 8) 962af245d11STodd Fiala // for the main thread. 9631107b5a5SPavel Labath const bool already_notified = (GetState() == StateType::eStateExited) || (GetState () == StateType::eStateCrashed); 964af245d11STodd Fiala if (!already_notified) 965af245d11STodd Fiala { 966af245d11STodd Fiala if (log) 9671107b5a5SPavel Labath log->Printf ("NativeProcessLinux::%s() tid = %" PRIu64 " handling main thread exit (%s), expected exit state already set but state was %s instead, setting exit state now", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found", StateAsCString (GetState ())); 968af245d11STodd Fiala // The main thread exited. We're done monitoring. Report to delegate. 9691107b5a5SPavel Labath SetExitStatus (convert_pid_status_to_exit_type (status), convert_pid_status_to_return_code (status), nullptr, true); 970af245d11STodd Fiala 971af245d11STodd Fiala // Notify delegate that our process has exited. 9721107b5a5SPavel Labath SetState (StateType::eStateExited, true); 973af245d11STodd Fiala } 974af245d11STodd Fiala else 975af245d11STodd Fiala { 976af245d11STodd Fiala if (log) 977af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() tid = %" PRIu64 " main thread now exited (%s)", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found"); 978af245d11STodd Fiala } 979af245d11STodd Fiala } 980af245d11STodd Fiala else 981af245d11STodd Fiala { 982af245d11STodd Fiala // Do we want to report to the delegate in this case? I think not. If this was an orderly 983af245d11STodd Fiala // thread exit, we would already have received the SIGTRAP | (PTRACE_EVENT_EXIT << 8) signal, 984af245d11STodd Fiala // and we would have done an all-stop then. 985af245d11STodd Fiala if (log) 986af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() tid = %" PRIu64 " handling non-main thread exit (%s)", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found"); 987af245d11STodd Fiala } 9881107b5a5SPavel Labath return; 989af245d11STodd Fiala } 990af245d11STodd Fiala 991af245d11STodd Fiala // Get details on the signal raised. 992af245d11STodd Fiala siginfo_t info; 9931107b5a5SPavel Labath const auto err = GetSignalInfo(pid, &info); 99497ccc294SChaoren Lin if (err.Success()) 995fa03ad2eSChaoren Lin { 996fa03ad2eSChaoren Lin // We have retrieved the signal info. Dispatch appropriately. 997fa03ad2eSChaoren Lin if (info.si_signo == SIGTRAP) 9981107b5a5SPavel Labath MonitorSIGTRAP(&info, pid); 999fa03ad2eSChaoren Lin else 10001107b5a5SPavel Labath MonitorSignal(&info, pid, exited); 1001fa03ad2eSChaoren Lin } 1002fa03ad2eSChaoren Lin else 1003af245d11STodd Fiala { 100497ccc294SChaoren Lin if (err.GetError() == EINVAL) 1005af245d11STodd Fiala { 1006fa03ad2eSChaoren Lin // This is a group stop reception for this tid. 100739036ac3SPavel Labath // We can reach here if we reinject SIGSTOP, SIGSTP, SIGTTIN or SIGTTOU into the 100839036ac3SPavel Labath // tracee, triggering the group-stop mechanism. Normally receiving these would stop 100939036ac3SPavel Labath // the process, pending a SIGCONT. Simulating this state in a debugger is hard and is 101039036ac3SPavel Labath // generally not needed (one use case is debugging background task being managed by a 101139036ac3SPavel Labath // shell). For general use, it is sufficient to stop the process in a signal-delivery 101239036ac3SPavel Labath // stop which happens before the group stop. This done by MonitorSignal and works 101339036ac3SPavel Labath // correctly for all signals. 1014fa03ad2eSChaoren Lin if (log) 101539036ac3SPavel Labath log->Printf("NativeProcessLinux::%s received a group stop for pid %" PRIu64 " tid %" PRIu64 ". Transparent handling of group stops not supported, resuming the thread.", __FUNCTION__, GetID (), pid); 101639036ac3SPavel Labath Resume(pid, signal); 1017a9882ceeSTodd Fiala } 1018a9882ceeSTodd Fiala else 1019a9882ceeSTodd Fiala { 1020af245d11STodd Fiala // ptrace(GETSIGINFO) failed (but not due to group-stop). 1021af245d11STodd Fiala 1022af245d11STodd Fiala // A return value of ESRCH means the thread/process is no longer on the system, 1023af245d11STodd Fiala // so it was killed somehow outside of our control. Either way, we can't do anything 1024af245d11STodd Fiala // with it anymore. 1025af245d11STodd Fiala 1026af245d11STodd Fiala // Stop tracking the metadata for the thread since it's entirely off the system now. 10271107b5a5SPavel Labath const bool thread_found = StopTrackingThread (pid); 1028af245d11STodd Fiala 1029af245d11STodd Fiala if (log) 1030af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s GetSignalInfo failed: %s, tid = %" PRIu64 ", signal = %d, status = %d (%s, %s, %s)", 103197ccc294SChaoren Lin __FUNCTION__, err.AsCString(), pid, signal, status, err.GetError() == ESRCH ? "thread/process killed" : "unknown reason", is_main_thread ? "is main thread" : "is not main thread", thread_found ? "thread metadata removed" : "thread metadata not found"); 1032af245d11STodd Fiala 1033af245d11STodd Fiala if (is_main_thread) 1034af245d11STodd Fiala { 1035af245d11STodd Fiala // Notify the delegate - our process is not available but appears to have been killed outside 1036af245d11STodd Fiala // our control. Is eStateExited the right exit state in this case? 10371107b5a5SPavel Labath SetExitStatus (convert_pid_status_to_exit_type (status), convert_pid_status_to_return_code (status), nullptr, true); 10381107b5a5SPavel Labath SetState (StateType::eStateExited, true); 1039af245d11STodd Fiala } 1040af245d11STodd Fiala else 1041af245d11STodd Fiala { 1042af245d11STodd Fiala // This thread was pulled out from underneath us. Anything to do here? Do we want to do an all stop? 1043af245d11STodd Fiala if (log) 10441107b5a5SPavel Labath log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 " non-main thread exit occurred, didn't tell delegate anything since thread disappeared out from underneath us", __FUNCTION__, GetID (), pid); 1045af245d11STodd Fiala } 1046af245d11STodd Fiala } 1047af245d11STodd Fiala } 1048af245d11STodd Fiala } 1049af245d11STodd Fiala 1050af245d11STodd Fiala void 1051426bdf88SPavel Labath NativeProcessLinux::WaitForNewThread(::pid_t tid) 1052426bdf88SPavel Labath { 1053426bdf88SPavel Labath Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 1054426bdf88SPavel Labath 1055*f9077782SPavel Labath NativeThreadLinuxSP new_thread_sp = GetThreadByID(tid); 1056426bdf88SPavel Labath 1057426bdf88SPavel Labath if (new_thread_sp) 1058426bdf88SPavel Labath { 1059426bdf88SPavel Labath // We are already tracking the thread - we got the event on the new thread (see 1060426bdf88SPavel Labath // MonitorSignal) before this one. We are done. 1061426bdf88SPavel Labath return; 1062426bdf88SPavel Labath } 1063426bdf88SPavel Labath 1064426bdf88SPavel Labath // The thread is not tracked yet, let's wait for it to appear. 1065426bdf88SPavel Labath int status = -1; 1066426bdf88SPavel Labath ::pid_t wait_pid; 1067426bdf88SPavel Labath do 1068426bdf88SPavel Labath { 1069426bdf88SPavel Labath if (log) 1070426bdf88SPavel Labath log->Printf ("NativeProcessLinux::%s() received thread creation event for tid %" PRIu32 ". tid not tracked yet, waiting for thread to appear...", __FUNCTION__, tid); 1071426bdf88SPavel Labath wait_pid = waitpid(tid, &status, __WALL); 1072426bdf88SPavel Labath } 1073426bdf88SPavel Labath while (wait_pid == -1 && errno == EINTR); 1074426bdf88SPavel Labath // Since we are waiting on a specific tid, this must be the creation event. But let's do 1075426bdf88SPavel Labath // some checks just in case. 1076426bdf88SPavel Labath if (wait_pid != tid) { 1077426bdf88SPavel Labath if (log) 1078426bdf88SPavel Labath log->Printf ("NativeProcessLinux::%s() waiting for tid %" PRIu32 " failed. Assuming the thread has disappeared in the meantime", __FUNCTION__, tid); 1079426bdf88SPavel Labath // The only way I know of this could happen is if the whole process was 1080426bdf88SPavel Labath // SIGKILLed in the mean time. In any case, we can't do anything about that now. 1081426bdf88SPavel Labath return; 1082426bdf88SPavel Labath } 1083426bdf88SPavel Labath if (WIFEXITED(status)) 1084426bdf88SPavel Labath { 1085426bdf88SPavel Labath if (log) 1086426bdf88SPavel Labath log->Printf ("NativeProcessLinux::%s() waiting for tid %" PRIu32 " returned an 'exited' event. Not tracking the thread.", __FUNCTION__, tid); 1087426bdf88SPavel Labath // Also a very improbable event. 1088426bdf88SPavel Labath return; 1089426bdf88SPavel Labath } 1090426bdf88SPavel Labath 1091426bdf88SPavel Labath siginfo_t info; 1092426bdf88SPavel Labath Error error = GetSignalInfo(tid, &info); 1093426bdf88SPavel Labath if (error.Fail()) 1094426bdf88SPavel Labath { 1095426bdf88SPavel Labath if (log) 1096426bdf88SPavel Labath log->Printf ("NativeProcessLinux::%s() GetSignalInfo for tid %" PRIu32 " failed. Assuming the thread has disappeared in the meantime.", __FUNCTION__, tid); 1097426bdf88SPavel Labath return; 1098426bdf88SPavel Labath } 1099426bdf88SPavel Labath 1100426bdf88SPavel Labath if (((info.si_pid != 0) || (info.si_code != SI_USER)) && log) 1101426bdf88SPavel Labath { 1102426bdf88SPavel Labath // We should be getting a thread creation signal here, but we received something 1103426bdf88SPavel Labath // else. There isn't much we can do about it now, so we will just log that. Since the 1104426bdf88SPavel Labath // thread is alive and we are receiving events from it, we shall pretend that it was 1105426bdf88SPavel Labath // created properly. 1106426bdf88SPavel Labath log->Printf ("NativeProcessLinux::%s() GetSignalInfo for tid %" PRIu32 " received unexpected signal with code %d from pid %d.", __FUNCTION__, tid, info.si_code, info.si_pid); 1107426bdf88SPavel Labath } 1108426bdf88SPavel Labath 1109426bdf88SPavel Labath if (log) 1110426bdf88SPavel Labath log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 ": tracking new thread tid %" PRIu32, 1111426bdf88SPavel Labath __FUNCTION__, GetID (), tid); 1112426bdf88SPavel Labath 1113*f9077782SPavel Labath new_thread_sp = AddThread(tid); 11140e1d729bSPavel Labath ResumeThread(new_thread_sp, eStateRunning, LLDB_INVALID_SIGNAL_NUMBER); 1115*f9077782SPavel Labath ThreadWasCreated(*new_thread_sp); 1116426bdf88SPavel Labath } 1117426bdf88SPavel Labath 1118426bdf88SPavel Labath void 1119af245d11STodd Fiala NativeProcessLinux::MonitorSIGTRAP(const siginfo_t *info, lldb::pid_t pid) 1120af245d11STodd Fiala { 1121af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 1122af245d11STodd Fiala const bool is_main_thread = (pid == GetID ()); 1123af245d11STodd Fiala 1124af245d11STodd Fiala assert(info && info->si_signo == SIGTRAP && "Unexpected child signal!"); 1125af245d11STodd Fiala if (!info) 1126af245d11STodd Fiala return; 1127af245d11STodd Fiala 11285830aa75STamas Berghammer Mutex::Locker locker (m_threads_mutex); 11295830aa75STamas Berghammer 1130af245d11STodd Fiala // See if we can find a thread for this signal. 1131*f9077782SPavel Labath NativeThreadLinuxSP thread_sp = GetThreadByID(pid); 1132af245d11STodd Fiala if (!thread_sp) 1133af245d11STodd Fiala { 1134af245d11STodd Fiala if (log) 1135af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " no thread found for tid %" PRIu64, __FUNCTION__, GetID (), pid); 1136af245d11STodd Fiala } 1137af245d11STodd Fiala 1138af245d11STodd Fiala switch (info->si_code) 1139af245d11STodd Fiala { 1140af245d11STodd Fiala // TODO: these two cases are required if we want to support tracing of the inferiors' children. We'd need this to debug a monitor. 1141af245d11STodd Fiala // case (SIGTRAP | (PTRACE_EVENT_FORK << 8)): 1142af245d11STodd Fiala // case (SIGTRAP | (PTRACE_EVENT_VFORK << 8)): 1143af245d11STodd Fiala 1144af245d11STodd Fiala case (SIGTRAP | (PTRACE_EVENT_CLONE << 8)): 1145af245d11STodd Fiala { 11465fd24c67SPavel Labath // This is the notification on the parent thread which informs us of new thread 1147426bdf88SPavel Labath // creation. 1148426bdf88SPavel Labath // We don't want to do anything with the parent thread so we just resume it. In case we 1149426bdf88SPavel Labath // want to implement "break on thread creation" functionality, we would need to stop 1150426bdf88SPavel Labath // here. 1151af245d11STodd Fiala 1152af245d11STodd Fiala unsigned long event_message = 0; 1153426bdf88SPavel Labath if (GetEventMessage (pid, &event_message).Fail()) 1154fa03ad2eSChaoren Lin { 1155426bdf88SPavel Labath if (log) 1156fa03ad2eSChaoren Lin log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " received thread creation event but GetEventMessage failed so we don't know the new tid", __FUNCTION__, pid); 1157426bdf88SPavel Labath } else 1158426bdf88SPavel Labath WaitForNewThread(event_message); 1159af245d11STodd Fiala 11600e1d729bSPavel Labath ResumeThread(thread_sp, thread_sp->GetState(), LLDB_INVALID_SIGNAL_NUMBER); 1161af245d11STodd Fiala break; 1162af245d11STodd Fiala } 1163af245d11STodd Fiala 1164af245d11STodd Fiala case (SIGTRAP | (PTRACE_EVENT_EXEC << 8)): 1165a9882ceeSTodd Fiala { 1166*f9077782SPavel Labath NativeThreadLinuxSP main_thread_sp; 1167af245d11STodd Fiala if (log) 1168af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() received exec event, code = %d", __FUNCTION__, info->si_code ^ SIGTRAP); 1169a9882ceeSTodd Fiala 11701dbc6c9cSPavel Labath // Exec clears any pending notifications. 11710e1d729bSPavel Labath m_pending_notification_tid = LLDB_INVALID_THREAD_ID; 1172fa03ad2eSChaoren Lin 1173fa03ad2eSChaoren Lin // Remove all but the main thread here. Linux fork creates a new process which only copies the main thread. Mutexes are in undefined state. 1174a9882ceeSTodd Fiala if (log) 1175a9882ceeSTodd Fiala log->Printf ("NativeProcessLinux::%s exec received, stop tracking all but main thread", __FUNCTION__); 1176a9882ceeSTodd Fiala 1177a9882ceeSTodd Fiala for (auto thread_sp : m_threads) 1178a9882ceeSTodd Fiala { 1179a9882ceeSTodd Fiala const bool is_main_thread = thread_sp && thread_sp->GetID () == GetID (); 1180a9882ceeSTodd Fiala if (is_main_thread) 1181a9882ceeSTodd Fiala { 1182*f9077782SPavel Labath main_thread_sp = std::static_pointer_cast<NativeThreadLinux>(thread_sp); 1183a9882ceeSTodd Fiala if (log) 1184a9882ceeSTodd Fiala log->Printf ("NativeProcessLinux::%s found main thread with tid %" PRIu64 ", keeping", __FUNCTION__, main_thread_sp->GetID ()); 1185a9882ceeSTodd Fiala } 1186a9882ceeSTodd Fiala else 1187a9882ceeSTodd Fiala { 1188a9882ceeSTodd Fiala if (log) 1189a9882ceeSTodd Fiala log->Printf ("NativeProcessLinux::%s discarding non-main-thread tid %" PRIu64 " due to exec", __FUNCTION__, thread_sp->GetID ()); 1190a9882ceeSTodd Fiala } 1191a9882ceeSTodd Fiala } 1192a9882ceeSTodd Fiala 1193a9882ceeSTodd Fiala m_threads.clear (); 1194a9882ceeSTodd Fiala 1195a9882ceeSTodd Fiala if (main_thread_sp) 1196a9882ceeSTodd Fiala { 1197a9882ceeSTodd Fiala m_threads.push_back (main_thread_sp); 1198a9882ceeSTodd Fiala SetCurrentThreadID (main_thread_sp->GetID ()); 1199*f9077782SPavel Labath main_thread_sp->SetStoppedByExec(); 1200a9882ceeSTodd Fiala } 1201a9882ceeSTodd Fiala else 1202a9882ceeSTodd Fiala { 1203a9882ceeSTodd Fiala SetCurrentThreadID (LLDB_INVALID_THREAD_ID); 1204a9882ceeSTodd Fiala if (log) 1205a9882ceeSTodd Fiala log->Printf ("NativeProcessLinux::%s pid %" PRIu64 "no main thread found, discarded all threads, we're in a no-thread state!", __FUNCTION__, GetID ()); 1206a9882ceeSTodd Fiala } 1207a9882ceeSTodd Fiala 1208fa03ad2eSChaoren Lin // Tell coordinator about about the "new" (since exec) stopped main thread. 1209*f9077782SPavel Labath ThreadWasCreated(*main_thread_sp); 1210fa03ad2eSChaoren Lin 1211fa03ad2eSChaoren Lin // NOTE: ideally these next statements would execute at the same time as the coordinator thread create was executed. 1212fa03ad2eSChaoren Lin // Consider a handler that can execute when that happens. 1213a9882ceeSTodd Fiala // Let our delegate know we have just exec'd. 1214a9882ceeSTodd Fiala NotifyDidExec (); 1215a9882ceeSTodd Fiala 1216a9882ceeSTodd Fiala // If we have a main thread, indicate we are stopped. 1217a9882ceeSTodd Fiala assert (main_thread_sp && "exec called during ptraced process but no main thread metadata tracked"); 1218fa03ad2eSChaoren Lin 1219fa03ad2eSChaoren Lin // Let the process know we're stopped. 1220ed89c7feSPavel Labath StopRunningThreads (pid); 1221a9882ceeSTodd Fiala 1222af245d11STodd Fiala break; 1223a9882ceeSTodd Fiala } 1224af245d11STodd Fiala 1225af245d11STodd Fiala case (SIGTRAP | (PTRACE_EVENT_EXIT << 8)): 1226af245d11STodd Fiala { 1227af245d11STodd Fiala // The inferior process or one of its threads is about to exit. 12286e35163cSPavel Labath // We don't want to do anything with the thread so we just resume it. In case we 12296e35163cSPavel Labath // want to implement "break on thread exit" functionality, we would need to stop 12306e35163cSPavel Labath // here. 1231fa03ad2eSChaoren Lin 1232af245d11STodd Fiala unsigned long data = 0; 123397ccc294SChaoren Lin if (GetEventMessage(pid, &data).Fail()) 1234af245d11STodd Fiala data = -1; 1235af245d11STodd Fiala 1236af245d11STodd Fiala if (log) 1237af245d11STodd Fiala { 1238af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() received PTRACE_EVENT_EXIT, data = %lx (WIFEXITED=%s,WIFSIGNALED=%s), pid = %" PRIu64 " (%s)", 1239af245d11STodd Fiala __FUNCTION__, 1240af245d11STodd Fiala data, WIFEXITED (data) ? "true" : "false", WIFSIGNALED (data) ? "true" : "false", 1241af245d11STodd Fiala pid, 1242af245d11STodd Fiala is_main_thread ? "is main thread" : "not main thread"); 1243af245d11STodd Fiala } 1244af245d11STodd Fiala 1245af245d11STodd Fiala if (is_main_thread) 1246af245d11STodd Fiala { 1247af245d11STodd Fiala SetExitStatus (convert_pid_status_to_exit_type (data), convert_pid_status_to_return_code (data), nullptr, true); 124875f47c3aSTodd Fiala } 124975f47c3aSTodd Fiala 12500e1d729bSPavel Labath ResumeThread(thread_sp, thread_sp->GetState(), LLDB_INVALID_SIGNAL_NUMBER); 1251af245d11STodd Fiala 1252af245d11STodd Fiala break; 1253af245d11STodd Fiala } 1254af245d11STodd Fiala 1255af245d11STodd Fiala case 0: 1256c16f5dcaSChaoren Lin case TRAP_TRACE: // We receive this on single stepping. 1257c16f5dcaSChaoren Lin case TRAP_HWBKPT: // We receive this on watchpoint hit 125886fd8e45SChaoren Lin if (thread_sp) 125986fd8e45SChaoren Lin { 1260c16f5dcaSChaoren Lin // If a watchpoint was hit, report it 1261c16f5dcaSChaoren Lin uint32_t wp_index; 1262ea8c25a8SOmair Javaid Error error = thread_sp->GetRegisterContext()->GetWatchpointHitIndex(wp_index, (lldb::addr_t)info->si_addr); 1263c16f5dcaSChaoren Lin if (error.Fail() && log) 1264c16f5dcaSChaoren Lin log->Printf("NativeProcessLinux::%s() " 1265c16f5dcaSChaoren Lin "received error while checking for watchpoint hits, " 1266c16f5dcaSChaoren Lin "pid = %" PRIu64 " error = %s", 1267c16f5dcaSChaoren Lin __FUNCTION__, pid, error.AsCString()); 1268c16f5dcaSChaoren Lin if (wp_index != LLDB_INVALID_INDEX32) 12695830aa75STamas Berghammer { 1270*f9077782SPavel Labath MonitorWatchpoint(*thread_sp, wp_index); 1271c16f5dcaSChaoren Lin break; 1272c16f5dcaSChaoren Lin } 1273c16f5dcaSChaoren Lin } 1274c16f5dcaSChaoren Lin // Otherwise, report step over 1275c16f5dcaSChaoren Lin MonitorTrace(pid, thread_sp); 1276af245d11STodd Fiala break; 1277af245d11STodd Fiala 1278af245d11STodd Fiala case SI_KERNEL: 127935799963SMohit K. Bhakkad #if defined __mips__ 128035799963SMohit K. Bhakkad // For mips there is no special signal for watchpoint 128135799963SMohit K. Bhakkad // So we check for watchpoint in kernel trap 128235799963SMohit K. Bhakkad if (thread_sp) 128335799963SMohit K. Bhakkad { 128435799963SMohit K. Bhakkad // If a watchpoint was hit, report it 128535799963SMohit K. Bhakkad uint32_t wp_index; 1286c60c9452SJaydeep Patil Error error = thread_sp->GetRegisterContext()->GetWatchpointHitIndex(wp_index, LLDB_INVALID_ADDRESS); 128735799963SMohit K. Bhakkad if (error.Fail() && log) 128835799963SMohit K. Bhakkad log->Printf("NativeProcessLinux::%s() " 128935799963SMohit K. Bhakkad "received error while checking for watchpoint hits, " 129035799963SMohit K. Bhakkad "pid = %" PRIu64 " error = %s", 129135799963SMohit K. Bhakkad __FUNCTION__, pid, error.AsCString()); 129235799963SMohit K. Bhakkad if (wp_index != LLDB_INVALID_INDEX32) 129335799963SMohit K. Bhakkad { 1294*f9077782SPavel Labath MonitorWatchpoint(*thread_sp, wp_index); 129535799963SMohit K. Bhakkad break; 129635799963SMohit K. Bhakkad } 129735799963SMohit K. Bhakkad } 129835799963SMohit K. Bhakkad // NO BREAK 129935799963SMohit K. Bhakkad #endif 1300af245d11STodd Fiala case TRAP_BRKPT: 1301c16f5dcaSChaoren Lin MonitorBreakpoint(pid, thread_sp); 1302af245d11STodd Fiala break; 1303af245d11STodd Fiala 1304af245d11STodd Fiala case SIGTRAP: 1305af245d11STodd Fiala case (SIGTRAP | 0x80): 1306af245d11STodd Fiala if (log) 1307fa03ad2eSChaoren Lin log->Printf ("NativeProcessLinux::%s() received unknown SIGTRAP system call stop event, pid %" PRIu64 "tid %" PRIu64 ", resuming", __FUNCTION__, GetID (), pid); 1308fa03ad2eSChaoren Lin 1309af245d11STodd Fiala // Ignore these signals until we know more about them. 13100e1d729bSPavel Labath ResumeThread(thread_sp, thread_sp->GetState(), LLDB_INVALID_SIGNAL_NUMBER); 1311af245d11STodd Fiala break; 1312af245d11STodd Fiala 1313af245d11STodd Fiala default: 1314af245d11STodd Fiala assert(false && "Unexpected SIGTRAP code!"); 1315af245d11STodd Fiala if (log) 13166e35163cSPavel Labath log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 "tid %" PRIu64 " received unhandled SIGTRAP code: 0x%d", 13176e35163cSPavel Labath __FUNCTION__, GetID (), pid, info->si_code); 1318af245d11STodd Fiala break; 1319af245d11STodd Fiala 1320af245d11STodd Fiala } 1321af245d11STodd Fiala } 1322af245d11STodd Fiala 1323af245d11STodd Fiala void 1324*f9077782SPavel Labath NativeProcessLinux::MonitorTrace(lldb::pid_t pid, const NativeThreadLinuxSP &thread_sp) 1325c16f5dcaSChaoren Lin { 1326c16f5dcaSChaoren Lin Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_PROCESS)); 1327c16f5dcaSChaoren Lin if (log) 1328c16f5dcaSChaoren Lin log->Printf("NativeProcessLinux::%s() received trace event, pid = %" PRIu64 " (single stepping)", 1329c16f5dcaSChaoren Lin __FUNCTION__, pid); 1330c16f5dcaSChaoren Lin 13310e1d729bSPavel Labath // This thread is currently stopped. 1332c16f5dcaSChaoren Lin if (thread_sp) 1333*f9077782SPavel Labath thread_sp->SetStoppedByTrace(); 1334c16f5dcaSChaoren Lin 1335c16f5dcaSChaoren Lin // Here we don't have to request the rest of the threads to stop or request a deferred stop. 1336c16f5dcaSChaoren Lin // This would have already happened at the time the Resume() with step operation was signaled. 1337c16f5dcaSChaoren Lin // At this point, we just need to say we stopped, and the deferred notifcation will fire off 1338c16f5dcaSChaoren Lin // once all running threads have checked in as stopped. 1339c16f5dcaSChaoren Lin SetCurrentThreadID(pid); 1340c16f5dcaSChaoren Lin // Tell the process we have a stop (from software breakpoint). 1341ed89c7feSPavel Labath StopRunningThreads(pid); 1342c16f5dcaSChaoren Lin } 1343c16f5dcaSChaoren Lin 1344c16f5dcaSChaoren Lin void 1345*f9077782SPavel Labath NativeProcessLinux::MonitorBreakpoint(lldb::pid_t pid, const NativeThreadLinuxSP &thread_sp) 1346c16f5dcaSChaoren Lin { 1347c16f5dcaSChaoren Lin Log *log(GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_BREAKPOINTS)); 1348c16f5dcaSChaoren Lin if (log) 1349c16f5dcaSChaoren Lin log->Printf("NativeProcessLinux::%s() received breakpoint event, pid = %" PRIu64, 1350c16f5dcaSChaoren Lin __FUNCTION__, pid); 1351c16f5dcaSChaoren Lin 1352c16f5dcaSChaoren Lin // Mark the thread as stopped at breakpoint. 1353c16f5dcaSChaoren Lin if (thread_sp) 1354c16f5dcaSChaoren Lin { 1355*f9077782SPavel Labath thread_sp->SetStoppedByBreakpoint(); 1356c16f5dcaSChaoren Lin Error error = FixupBreakpointPCAsNeeded(thread_sp); 1357c16f5dcaSChaoren Lin if (error.Fail()) 1358c16f5dcaSChaoren Lin if (log) 1359c16f5dcaSChaoren Lin log->Printf("NativeProcessLinux::%s() pid = %" PRIu64 " fixup: %s", 1360c16f5dcaSChaoren Lin __FUNCTION__, pid, error.AsCString()); 1361d8c338d4STamas Berghammer 13629eb1ecb9SPavel Labath if (m_threads_stepping_with_breakpoint.find(pid) != m_threads_stepping_with_breakpoint.end()) 1363*f9077782SPavel Labath thread_sp->SetStoppedByTrace(); 1364d8c338d4STamas Berghammer } 1365c16f5dcaSChaoren Lin else 1366c16f5dcaSChaoren Lin if (log) 1367c16f5dcaSChaoren Lin log->Printf("NativeProcessLinux::%s() pid = %" PRIu64 ": " 1368c16f5dcaSChaoren Lin "warning, cannot process software breakpoint since no thread metadata", 1369c16f5dcaSChaoren Lin __FUNCTION__, pid); 1370c16f5dcaSChaoren Lin 1371c16f5dcaSChaoren Lin 1372c16f5dcaSChaoren Lin // We need to tell all other running threads before we notify the delegate about this stop. 1373ed89c7feSPavel Labath StopRunningThreads(pid); 1374c16f5dcaSChaoren Lin } 1375c16f5dcaSChaoren Lin 1376c16f5dcaSChaoren Lin void 1377*f9077782SPavel Labath NativeProcessLinux::MonitorWatchpoint(NativeThreadLinux &thread, uint32_t wp_index) 1378c16f5dcaSChaoren Lin { 1379c16f5dcaSChaoren Lin Log *log(GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_WATCHPOINTS)); 1380c16f5dcaSChaoren Lin if (log) 1381c16f5dcaSChaoren Lin log->Printf("NativeProcessLinux::%s() received watchpoint event, " 1382c16f5dcaSChaoren Lin "pid = %" PRIu64 ", wp_index = %" PRIu32, 1383*f9077782SPavel Labath __FUNCTION__, thread.GetID(), wp_index); 1384c16f5dcaSChaoren Lin 1385c16f5dcaSChaoren Lin // Mark the thread as stopped at watchpoint. 1386c16f5dcaSChaoren Lin // The address is at (lldb::addr_t)info->si_addr if we need it. 1387*f9077782SPavel Labath thread.SetStoppedByWatchpoint(wp_index); 1388c16f5dcaSChaoren Lin 1389c16f5dcaSChaoren Lin // We need to tell all other running threads before we notify the delegate about this stop. 1390*f9077782SPavel Labath StopRunningThreads(thread.GetID()); 1391c16f5dcaSChaoren Lin } 1392c16f5dcaSChaoren Lin 1393c16f5dcaSChaoren Lin void 1394af245d11STodd Fiala NativeProcessLinux::MonitorSignal(const siginfo_t *info, lldb::pid_t pid, bool exited) 1395af245d11STodd Fiala { 1396511e5cdcSTodd Fiala assert (info && "null info"); 1397511e5cdcSTodd Fiala if (!info) 1398511e5cdcSTodd Fiala return; 1399511e5cdcSTodd Fiala 1400511e5cdcSTodd Fiala const int signo = info->si_signo; 1401511e5cdcSTodd Fiala const bool is_from_llgs = info->si_pid == getpid (); 1402af245d11STodd Fiala 1403af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 1404af245d11STodd Fiala 1405af245d11STodd Fiala // POSIX says that process behaviour is undefined after it ignores a SIGFPE, 1406af245d11STodd Fiala // SIGILL, SIGSEGV, or SIGBUS *unless* that signal was generated by a 1407af245d11STodd Fiala // kill(2) or raise(3). Similarly for tgkill(2) on Linux. 1408af245d11STodd Fiala // 1409af245d11STodd Fiala // IOW, user generated signals never generate what we consider to be a 1410af245d11STodd Fiala // "crash". 1411af245d11STodd Fiala // 1412af245d11STodd Fiala // Similarly, ACK signals generated by this monitor. 1413af245d11STodd Fiala 14145830aa75STamas Berghammer Mutex::Locker locker (m_threads_mutex); 14155830aa75STamas Berghammer 1416af245d11STodd Fiala // See if we can find a thread for this signal. 1417*f9077782SPavel Labath NativeThreadLinuxSP thread_sp = GetThreadByID(pid); 1418af245d11STodd Fiala if (!thread_sp) 1419af245d11STodd Fiala { 1420af245d11STodd Fiala if (log) 1421af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " no thread found for tid %" PRIu64, __FUNCTION__, GetID (), pid); 1422af245d11STodd Fiala } 1423af245d11STodd Fiala 1424af245d11STodd Fiala // Handle the signal. 1425af245d11STodd Fiala if (info->si_code == SI_TKILL || info->si_code == SI_USER) 1426af245d11STodd Fiala { 1427af245d11STodd Fiala if (log) 1428af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() received signal %s (%d) with code %s, (siginfo pid = %d (%s), waitpid pid = %" PRIu64 ")", 1429af245d11STodd Fiala __FUNCTION__, 143098d0a4b3SChaoren Lin Host::GetSignalAsCString(signo), 1431af245d11STodd Fiala signo, 1432af245d11STodd Fiala (info->si_code == SI_TKILL ? "SI_TKILL" : "SI_USER"), 1433af245d11STodd Fiala info->si_pid, 1434511e5cdcSTodd Fiala is_from_llgs ? "from llgs" : "not from llgs", 1435af245d11STodd Fiala pid); 143658a2f669STodd Fiala } 1437af245d11STodd Fiala 143858a2f669STodd Fiala // Check for new thread notification. 143958a2f669STodd Fiala if ((info->si_pid == 0) && (info->si_code == SI_USER)) 1440af245d11STodd Fiala { 1441af245d11STodd Fiala // A new thread creation is being signaled. This is one of two parts that come in 1442426bdf88SPavel Labath // a non-deterministic order. This code handles the case where the new thread event comes 1443426bdf88SPavel Labath // before the event on the parent thread. For the opposite case see code in 1444426bdf88SPavel Labath // MonitorSIGTRAP. 1445af245d11STodd Fiala if (log) 1446af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 " tid %" PRIu64 ": new thread notification", 1447af245d11STodd Fiala __FUNCTION__, GetID (), pid); 1448af245d11STodd Fiala 1449*f9077782SPavel Labath thread_sp = AddThread(pid); 14505fd24c67SPavel Labath assert (thread_sp.get() && "failed to create the tracking data for newly created inferior thread"); 14515fd24c67SPavel Labath // We can now resume the newly created thread. 14520e1d729bSPavel Labath ResumeThread(thread_sp, eStateRunning, LLDB_INVALID_SIGNAL_NUMBER); 1453*f9077782SPavel Labath ThreadWasCreated(*thread_sp); 145458a2f669STodd Fiala // Done handling. 145558a2f669STodd Fiala return; 1456af245d11STodd Fiala } 145758a2f669STodd Fiala 145858a2f669STodd Fiala // Check for thread stop notification. 1459511e5cdcSTodd Fiala if (is_from_llgs && (info->si_code == SI_TKILL) && (signo == SIGSTOP)) 1460af245d11STodd Fiala { 1461af245d11STodd Fiala // This is a tgkill()-based stop. 1462af245d11STodd Fiala if (thread_sp) 1463af245d11STodd Fiala { 1464fa03ad2eSChaoren Lin if (log) 1465fa03ad2eSChaoren Lin log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ", thread stopped", 1466fa03ad2eSChaoren Lin __FUNCTION__, 1467fa03ad2eSChaoren Lin GetID (), 1468fa03ad2eSChaoren Lin pid); 1469fa03ad2eSChaoren Lin 1470aab58633SChaoren Lin // Check that we're not already marked with a stop reason. 1471aab58633SChaoren Lin // Note this thread really shouldn't already be marked as stopped - if we were, that would imply that 1472aab58633SChaoren Lin // the kernel signaled us with the thread stopping which we handled and marked as stopped, 1473aab58633SChaoren Lin // and that, without an intervening resume, we received another stop. It is more likely 1474aab58633SChaoren Lin // that we are missing the marking of a run state somewhere if we find that the thread was 1475aab58633SChaoren Lin // marked as stopped. 1476*f9077782SPavel Labath const StateType thread_state = thread_sp->GetState(); 1477aab58633SChaoren Lin if (!StateIsStoppedState (thread_state, false)) 1478aab58633SChaoren Lin { 1479ed89c7feSPavel Labath // An inferior thread has stopped because of a SIGSTOP we have sent it. 1480ed89c7feSPavel Labath // Generally, these are not important stops and we don't want to report them as 1481ed89c7feSPavel Labath // they are just used to stop other threads when one thread (the one with the 1482ed89c7feSPavel Labath // *real* stop reason) hits a breakpoint (watchpoint, etc...). However, in the 1483ed89c7feSPavel Labath // case of an asynchronous Interrupt(), this *is* the real stop reason, so we 1484ed89c7feSPavel Labath // leave the signal intact if this is the thread that was chosen as the 1485ed89c7feSPavel Labath // triggering thread. 14860e1d729bSPavel Labath if (m_pending_notification_tid != LLDB_INVALID_THREAD_ID) 14870e1d729bSPavel Labath { 14880e1d729bSPavel Labath if (m_pending_notification_tid == pid) 1489*f9077782SPavel Labath thread_sp->SetStoppedBySignal(SIGSTOP, info); 1490ed89c7feSPavel Labath else 1491*f9077782SPavel Labath thread_sp->SetStoppedWithNoReason(); 1492ed89c7feSPavel Labath 1493af245d11STodd Fiala SetCurrentThreadID (thread_sp->GetID ()); 14940e1d729bSPavel Labath SignalIfAllThreadsStopped(); 14950e1d729bSPavel Labath } 14960e1d729bSPavel Labath else 14970e1d729bSPavel Labath { 14980e1d729bSPavel Labath // We can end up here if stop was initiated by LLGS but by this time a 14990e1d729bSPavel Labath // thread stop has occurred - maybe initiated by another event. 1500*f9077782SPavel Labath Error error = ResumeThread(thread_sp, thread_sp->GetState(), 0); 15010e1d729bSPavel Labath if (error.Fail() && log) 15020e1d729bSPavel Labath { 15030e1d729bSPavel Labath log->Printf("NativeProcessLinux::%s failed to resume thread tid %" PRIu64 ": %s", 1504*f9077782SPavel Labath __FUNCTION__, thread_sp->GetID(), error.AsCString()); 15050e1d729bSPavel Labath } 15060e1d729bSPavel Labath } 1507aab58633SChaoren Lin } 1508aab58633SChaoren Lin else 1509aab58633SChaoren Lin { 1510aab58633SChaoren Lin if (log) 1511aab58633SChaoren Lin { 1512aab58633SChaoren Lin // Retrieve the signal name if the thread was stopped by a signal. 1513aab58633SChaoren Lin int stop_signo = 0; 1514*f9077782SPavel Labath const bool stopped_by_signal = thread_sp->IsStopped(&stop_signo); 151598d0a4b3SChaoren Lin const char *signal_name = stopped_by_signal ? Host::GetSignalAsCString(stop_signo) : "<not stopped by signal>"; 1516aab58633SChaoren Lin if (!signal_name) 1517aab58633SChaoren Lin signal_name = "<no-signal-name>"; 1518aab58633SChaoren Lin 1519aab58633SChaoren Lin log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ", thread was already marked as a stopped state (state=%s, signal=%d (%s)), leaving stop signal as is", 1520aab58633SChaoren Lin __FUNCTION__, 1521aab58633SChaoren Lin GetID (), 1522*f9077782SPavel Labath thread_sp->GetID(), 1523aab58633SChaoren Lin StateAsCString (thread_state), 1524aab58633SChaoren Lin stop_signo, 1525aab58633SChaoren Lin signal_name); 1526aab58633SChaoren Lin } 15270e1d729bSPavel Labath SignalIfAllThreadsStopped(); 1528af245d11STodd Fiala } 152986fd8e45SChaoren Lin } 1530af245d11STodd Fiala 153158a2f669STodd Fiala // Done handling. 1532af245d11STodd Fiala return; 1533af245d11STodd Fiala } 1534af245d11STodd Fiala 1535af245d11STodd Fiala if (log) 153698d0a4b3SChaoren Lin log->Printf ("NativeProcessLinux::%s() received signal %s", __FUNCTION__, Host::GetSignalAsCString(signo)); 1537af245d11STodd Fiala 153886fd8e45SChaoren Lin // This thread is stopped. 153986fd8e45SChaoren Lin if (thread_sp) 1540*f9077782SPavel Labath thread_sp->SetStoppedBySignal(signo, info); 154186fd8e45SChaoren Lin 154286fd8e45SChaoren Lin // Send a stop to the debugger after we get all other threads to stop. 1543ed89c7feSPavel Labath StopRunningThreads (pid); 1544511e5cdcSTodd Fiala } 1545af245d11STodd Fiala 1546e7708688STamas Berghammer namespace { 1547e7708688STamas Berghammer 1548e7708688STamas Berghammer struct EmulatorBaton 1549e7708688STamas Berghammer { 1550e7708688STamas Berghammer NativeProcessLinux* m_process; 1551e7708688STamas Berghammer NativeRegisterContext* m_reg_context; 15526648fcc3SPavel Labath 15536648fcc3SPavel Labath // eRegisterKindDWARF -> RegsiterValue 15546648fcc3SPavel Labath std::unordered_map<uint32_t, RegisterValue> m_register_values; 1555e7708688STamas Berghammer 1556e7708688STamas Berghammer EmulatorBaton(NativeProcessLinux* process, NativeRegisterContext* reg_context) : 1557e7708688STamas Berghammer m_process(process), m_reg_context(reg_context) {} 1558e7708688STamas Berghammer }; 1559e7708688STamas Berghammer 1560e7708688STamas Berghammer } // anonymous namespace 1561e7708688STamas Berghammer 1562e7708688STamas Berghammer static size_t 1563e7708688STamas Berghammer ReadMemoryCallback (EmulateInstruction *instruction, 1564e7708688STamas Berghammer void *baton, 1565e7708688STamas Berghammer const EmulateInstruction::Context &context, 1566e7708688STamas Berghammer lldb::addr_t addr, 1567e7708688STamas Berghammer void *dst, 1568e7708688STamas Berghammer size_t length) 1569e7708688STamas Berghammer { 1570e7708688STamas Berghammer EmulatorBaton* emulator_baton = static_cast<EmulatorBaton*>(baton); 1571e7708688STamas Berghammer 15723eb4b458SChaoren Lin size_t bytes_read; 1573e7708688STamas Berghammer emulator_baton->m_process->ReadMemory(addr, dst, length, bytes_read); 1574e7708688STamas Berghammer return bytes_read; 1575e7708688STamas Berghammer } 1576e7708688STamas Berghammer 1577e7708688STamas Berghammer static bool 1578e7708688STamas Berghammer ReadRegisterCallback (EmulateInstruction *instruction, 1579e7708688STamas Berghammer void *baton, 1580e7708688STamas Berghammer const RegisterInfo *reg_info, 1581e7708688STamas Berghammer RegisterValue ®_value) 1582e7708688STamas Berghammer { 1583e7708688STamas Berghammer EmulatorBaton* emulator_baton = static_cast<EmulatorBaton*>(baton); 1584e7708688STamas Berghammer 15856648fcc3SPavel Labath auto it = emulator_baton->m_register_values.find(reg_info->kinds[eRegisterKindDWARF]); 15866648fcc3SPavel Labath if (it != emulator_baton->m_register_values.end()) 15876648fcc3SPavel Labath { 15886648fcc3SPavel Labath reg_value = it->second; 15896648fcc3SPavel Labath return true; 15906648fcc3SPavel Labath } 15916648fcc3SPavel Labath 1592e7708688STamas Berghammer // The emulator only fill in the dwarf regsiter numbers (and in some case 1593e7708688STamas Berghammer // the generic register numbers). Get the full register info from the 1594e7708688STamas Berghammer // register context based on the dwarf register numbers. 1595e7708688STamas Berghammer const RegisterInfo* full_reg_info = emulator_baton->m_reg_context->GetRegisterInfo( 1596e7708688STamas Berghammer eRegisterKindDWARF, reg_info->kinds[eRegisterKindDWARF]); 1597e7708688STamas Berghammer 1598e7708688STamas Berghammer Error error = emulator_baton->m_reg_context->ReadRegister(full_reg_info, reg_value); 15996648fcc3SPavel Labath if (error.Success()) 16006648fcc3SPavel Labath return true; 1601cdc22a88SMohit K. Bhakkad 16026648fcc3SPavel Labath return false; 1603e7708688STamas Berghammer } 1604e7708688STamas Berghammer 1605e7708688STamas Berghammer static bool 1606e7708688STamas Berghammer WriteRegisterCallback (EmulateInstruction *instruction, 1607e7708688STamas Berghammer void *baton, 1608e7708688STamas Berghammer const EmulateInstruction::Context &context, 1609e7708688STamas Berghammer const RegisterInfo *reg_info, 1610e7708688STamas Berghammer const RegisterValue ®_value) 1611e7708688STamas Berghammer { 1612e7708688STamas Berghammer EmulatorBaton* emulator_baton = static_cast<EmulatorBaton*>(baton); 16136648fcc3SPavel Labath emulator_baton->m_register_values[reg_info->kinds[eRegisterKindDWARF]] = reg_value; 1614e7708688STamas Berghammer return true; 1615e7708688STamas Berghammer } 1616e7708688STamas Berghammer 1617e7708688STamas Berghammer static size_t 1618e7708688STamas Berghammer WriteMemoryCallback (EmulateInstruction *instruction, 1619e7708688STamas Berghammer void *baton, 1620e7708688STamas Berghammer const EmulateInstruction::Context &context, 1621e7708688STamas Berghammer lldb::addr_t addr, 1622e7708688STamas Berghammer const void *dst, 1623e7708688STamas Berghammer size_t length) 1624e7708688STamas Berghammer { 1625e7708688STamas Berghammer return length; 1626e7708688STamas Berghammer } 1627e7708688STamas Berghammer 1628e7708688STamas Berghammer static lldb::addr_t 1629e7708688STamas Berghammer ReadFlags (NativeRegisterContext* regsiter_context) 1630e7708688STamas Berghammer { 1631e7708688STamas Berghammer const RegisterInfo* flags_info = regsiter_context->GetRegisterInfo( 1632e7708688STamas Berghammer eRegisterKindGeneric, LLDB_REGNUM_GENERIC_FLAGS); 1633e7708688STamas Berghammer return regsiter_context->ReadRegisterAsUnsigned(flags_info, LLDB_INVALID_ADDRESS); 1634e7708688STamas Berghammer } 1635e7708688STamas Berghammer 1636e7708688STamas Berghammer Error 1637e7708688STamas Berghammer NativeProcessLinux::SetupSoftwareSingleStepping(NativeThreadProtocolSP thread_sp) 1638e7708688STamas Berghammer { 1639e7708688STamas Berghammer Error error; 1640e7708688STamas Berghammer NativeRegisterContextSP register_context_sp = thread_sp->GetRegisterContext(); 1641e7708688STamas Berghammer 1642e7708688STamas Berghammer std::unique_ptr<EmulateInstruction> emulator_ap( 1643e7708688STamas Berghammer EmulateInstruction::FindPlugin(m_arch, eInstructionTypePCModifying, nullptr)); 1644e7708688STamas Berghammer 1645e7708688STamas Berghammer if (emulator_ap == nullptr) 1646e7708688STamas Berghammer return Error("Instruction emulator not found!"); 1647e7708688STamas Berghammer 1648e7708688STamas Berghammer EmulatorBaton baton(this, register_context_sp.get()); 1649e7708688STamas Berghammer emulator_ap->SetBaton(&baton); 1650e7708688STamas Berghammer emulator_ap->SetReadMemCallback(&ReadMemoryCallback); 1651e7708688STamas Berghammer emulator_ap->SetReadRegCallback(&ReadRegisterCallback); 1652e7708688STamas Berghammer emulator_ap->SetWriteMemCallback(&WriteMemoryCallback); 1653e7708688STamas Berghammer emulator_ap->SetWriteRegCallback(&WriteRegisterCallback); 1654e7708688STamas Berghammer 1655e7708688STamas Berghammer if (!emulator_ap->ReadInstruction()) 1656e7708688STamas Berghammer return Error("Read instruction failed!"); 1657e7708688STamas Berghammer 16586648fcc3SPavel Labath bool emulation_result = emulator_ap->EvaluateInstruction(eEmulateInstructionOptionAutoAdvancePC); 16596648fcc3SPavel Labath 16606648fcc3SPavel Labath const RegisterInfo* reg_info_pc = register_context_sp->GetRegisterInfo(eRegisterKindGeneric, LLDB_REGNUM_GENERIC_PC); 16616648fcc3SPavel Labath const RegisterInfo* reg_info_flags = register_context_sp->GetRegisterInfo(eRegisterKindGeneric, LLDB_REGNUM_GENERIC_FLAGS); 16626648fcc3SPavel Labath 16636648fcc3SPavel Labath auto pc_it = baton.m_register_values.find(reg_info_pc->kinds[eRegisterKindDWARF]); 16646648fcc3SPavel Labath auto flags_it = baton.m_register_values.find(reg_info_flags->kinds[eRegisterKindDWARF]); 16656648fcc3SPavel Labath 1666e7708688STamas Berghammer lldb::addr_t next_pc; 1667e7708688STamas Berghammer lldb::addr_t next_flags; 16686648fcc3SPavel Labath if (emulation_result) 1669e7708688STamas Berghammer { 16706648fcc3SPavel Labath assert(pc_it != baton.m_register_values.end() && "Emulation was successfull but PC wasn't updated"); 16716648fcc3SPavel Labath next_pc = pc_it->second.GetAsUInt64(); 16726648fcc3SPavel Labath 16736648fcc3SPavel Labath if (flags_it != baton.m_register_values.end()) 16746648fcc3SPavel Labath next_flags = flags_it->second.GetAsUInt64(); 1675e7708688STamas Berghammer else 1676e7708688STamas Berghammer next_flags = ReadFlags (register_context_sp.get()); 1677e7708688STamas Berghammer } 16786648fcc3SPavel Labath else if (pc_it == baton.m_register_values.end()) 1679e7708688STamas Berghammer { 1680e7708688STamas Berghammer // Emulate instruction failed and it haven't changed PC. Advance PC 1681e7708688STamas Berghammer // with the size of the current opcode because the emulation of all 1682e7708688STamas Berghammer // PC modifying instruction should be successful. The failure most 1683e7708688STamas Berghammer // likely caused by a not supported instruction which don't modify PC. 1684e7708688STamas Berghammer next_pc = register_context_sp->GetPC() + emulator_ap->GetOpcode().GetByteSize(); 1685e7708688STamas Berghammer next_flags = ReadFlags (register_context_sp.get()); 1686e7708688STamas Berghammer } 1687e7708688STamas Berghammer else 1688e7708688STamas Berghammer { 1689e7708688STamas Berghammer // The instruction emulation failed after it modified the PC. It is an 1690e7708688STamas Berghammer // unknown error where we can't continue because the next instruction is 1691e7708688STamas Berghammer // modifying the PC but we don't know how. 1692e7708688STamas Berghammer return Error ("Instruction emulation failed unexpectedly."); 1693e7708688STamas Berghammer } 1694e7708688STamas Berghammer 1695e7708688STamas Berghammer if (m_arch.GetMachine() == llvm::Triple::arm) 1696e7708688STamas Berghammer { 1697e7708688STamas Berghammer if (next_flags & 0x20) 1698e7708688STamas Berghammer { 1699e7708688STamas Berghammer // Thumb mode 1700e7708688STamas Berghammer error = SetSoftwareBreakpoint(next_pc, 2); 1701e7708688STamas Berghammer } 1702e7708688STamas Berghammer else 1703e7708688STamas Berghammer { 1704e7708688STamas Berghammer // Arm mode 1705e7708688STamas Berghammer error = SetSoftwareBreakpoint(next_pc, 4); 1706e7708688STamas Berghammer } 1707e7708688STamas Berghammer } 1708cdc22a88SMohit K. Bhakkad else if (m_arch.GetMachine() == llvm::Triple::mips64 1709c60c9452SJaydeep Patil || m_arch.GetMachine() == llvm::Triple::mips64el 1710c60c9452SJaydeep Patil || m_arch.GetMachine() == llvm::Triple::mips 1711c60c9452SJaydeep Patil || m_arch.GetMachine() == llvm::Triple::mipsel) 1712cdc22a88SMohit K. Bhakkad error = SetSoftwareBreakpoint(next_pc, 4); 1713e7708688STamas Berghammer else 1714e7708688STamas Berghammer { 1715e7708688STamas Berghammer // No size hint is given for the next breakpoint 1716e7708688STamas Berghammer error = SetSoftwareBreakpoint(next_pc, 0); 1717e7708688STamas Berghammer } 1718e7708688STamas Berghammer 1719e7708688STamas Berghammer if (error.Fail()) 1720e7708688STamas Berghammer return error; 1721e7708688STamas Berghammer 1722e7708688STamas Berghammer m_threads_stepping_with_breakpoint.insert({thread_sp->GetID(), next_pc}); 1723e7708688STamas Berghammer 1724e7708688STamas Berghammer return Error(); 1725e7708688STamas Berghammer } 1726e7708688STamas Berghammer 1727e7708688STamas Berghammer bool 1728e7708688STamas Berghammer NativeProcessLinux::SupportHardwareSingleStepping() const 1729e7708688STamas Berghammer { 1730cdc22a88SMohit K. Bhakkad if (m_arch.GetMachine() == llvm::Triple::arm 1731c60c9452SJaydeep Patil || m_arch.GetMachine() == llvm::Triple::mips64 || m_arch.GetMachine() == llvm::Triple::mips64el 1732c60c9452SJaydeep Patil || m_arch.GetMachine() == llvm::Triple::mips || m_arch.GetMachine() == llvm::Triple::mipsel) 1733cdc22a88SMohit K. Bhakkad return false; 1734cdc22a88SMohit K. Bhakkad return true; 1735e7708688STamas Berghammer } 1736e7708688STamas Berghammer 1737af245d11STodd Fiala Error 1738af245d11STodd Fiala NativeProcessLinux::Resume (const ResumeActionList &resume_actions) 1739af245d11STodd Fiala { 1740af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_THREAD)); 1741af245d11STodd Fiala if (log) 1742af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s called: pid %" PRIu64, __FUNCTION__, GetID ()); 1743af245d11STodd Fiala 1744e7708688STamas Berghammer bool software_single_step = !SupportHardwareSingleStepping(); 1745af245d11STodd Fiala 1746af245d11STodd Fiala Mutex::Locker locker (m_threads_mutex); 17475830aa75STamas Berghammer 1748e7708688STamas Berghammer if (software_single_step) 1749e7708688STamas Berghammer { 1750e7708688STamas Berghammer for (auto thread_sp : m_threads) 1751e7708688STamas Berghammer { 1752e7708688STamas Berghammer assert (thread_sp && "thread list should not contain NULL threads"); 1753e7708688STamas Berghammer 1754e7708688STamas Berghammer const ResumeAction *const action = resume_actions.GetActionForThread (thread_sp->GetID (), true); 1755e7708688STamas Berghammer if (action == nullptr) 1756e7708688STamas Berghammer continue; 1757e7708688STamas Berghammer 1758e7708688STamas Berghammer if (action->state == eStateStepping) 1759e7708688STamas Berghammer { 1760e7708688STamas Berghammer Error error = SetupSoftwareSingleStepping(thread_sp); 1761e7708688STamas Berghammer if (error.Fail()) 1762e7708688STamas Berghammer return error; 1763e7708688STamas Berghammer } 1764e7708688STamas Berghammer } 1765e7708688STamas Berghammer } 1766e7708688STamas Berghammer 1767af245d11STodd Fiala for (auto thread_sp : m_threads) 1768af245d11STodd Fiala { 1769af245d11STodd Fiala assert (thread_sp && "thread list should not contain NULL threads"); 1770af245d11STodd Fiala 1771af245d11STodd Fiala const ResumeAction *const action = resume_actions.GetActionForThread (thread_sp->GetID (), true); 17726a196ce6SChaoren Lin 17736a196ce6SChaoren Lin if (action == nullptr) 17746a196ce6SChaoren Lin { 17756a196ce6SChaoren Lin if (log) 17766a196ce6SChaoren Lin log->Printf ("NativeProcessLinux::%s no action specified for pid %" PRIu64 " tid %" PRIu64, 17776a196ce6SChaoren Lin __FUNCTION__, GetID (), thread_sp->GetID ()); 17786a196ce6SChaoren Lin continue; 17796a196ce6SChaoren Lin } 1780af245d11STodd Fiala 1781af245d11STodd Fiala if (log) 1782af245d11STodd Fiala { 1783af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s processing resume action state %s for pid %" PRIu64 " tid %" PRIu64, 1784af245d11STodd Fiala __FUNCTION__, StateAsCString (action->state), GetID (), thread_sp->GetID ()); 1785af245d11STodd Fiala } 1786af245d11STodd Fiala 1787af245d11STodd Fiala switch (action->state) 1788af245d11STodd Fiala { 1789af245d11STodd Fiala case eStateRunning: 17900e1d729bSPavel Labath case eStateStepping: 1791fa03ad2eSChaoren Lin { 1792af245d11STodd Fiala // Run the thread, possibly feeding it the signal. 1793fa03ad2eSChaoren Lin const int signo = action->signal; 17940e1d729bSPavel Labath ResumeThread(std::static_pointer_cast<NativeThreadLinux>(thread_sp), action->state, signo); 1795af245d11STodd Fiala break; 1796ae29d395SChaoren Lin } 1797af245d11STodd Fiala 1798af245d11STodd Fiala case eStateSuspended: 1799af245d11STodd Fiala case eStateStopped: 1800108c325dSPavel Labath lldbassert(0 && "Unexpected state"); 1801af245d11STodd Fiala 1802af245d11STodd Fiala default: 1803af245d11STodd Fiala return Error ("NativeProcessLinux::%s (): unexpected state %s specified for pid %" PRIu64 ", tid %" PRIu64, 1804af245d11STodd Fiala __FUNCTION__, StateAsCString (action->state), GetID (), thread_sp->GetID ()); 1805af245d11STodd Fiala } 1806af245d11STodd Fiala } 1807af245d11STodd Fiala 18085830aa75STamas Berghammer return Error(); 1809af245d11STodd Fiala } 1810af245d11STodd Fiala 1811af245d11STodd Fiala Error 1812af245d11STodd Fiala NativeProcessLinux::Halt () 1813af245d11STodd Fiala { 1814af245d11STodd Fiala Error error; 1815af245d11STodd Fiala 1816af245d11STodd Fiala if (kill (GetID (), SIGSTOP) != 0) 1817af245d11STodd Fiala error.SetErrorToErrno (); 1818af245d11STodd Fiala 1819af245d11STodd Fiala return error; 1820af245d11STodd Fiala } 1821af245d11STodd Fiala 1822af245d11STodd Fiala Error 1823af245d11STodd Fiala NativeProcessLinux::Detach () 1824af245d11STodd Fiala { 1825af245d11STodd Fiala Error error; 1826af245d11STodd Fiala 1827af245d11STodd Fiala // Tell ptrace to detach from the process. 1828af245d11STodd Fiala if (GetID () != LLDB_INVALID_PROCESS_ID) 1829af245d11STodd Fiala error = Detach (GetID ()); 1830af245d11STodd Fiala 1831af245d11STodd Fiala // Stop monitoring the inferior. 183219cbe96aSPavel Labath m_sigchld_handle.reset(); 1833af245d11STodd Fiala 1834af245d11STodd Fiala // No error. 1835af245d11STodd Fiala return error; 1836af245d11STodd Fiala } 1837af245d11STodd Fiala 1838af245d11STodd Fiala Error 1839af245d11STodd Fiala NativeProcessLinux::Signal (int signo) 1840af245d11STodd Fiala { 1841af245d11STodd Fiala Error error; 1842af245d11STodd Fiala 1843af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 1844af245d11STodd Fiala if (log) 1845af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s: sending signal %d (%s) to pid %" PRIu64, 184698d0a4b3SChaoren Lin __FUNCTION__, signo, Host::GetSignalAsCString(signo), GetID()); 1847af245d11STodd Fiala 1848af245d11STodd Fiala if (kill(GetID(), signo)) 1849af245d11STodd Fiala error.SetErrorToErrno(); 1850af245d11STodd Fiala 1851af245d11STodd Fiala return error; 1852af245d11STodd Fiala } 1853af245d11STodd Fiala 1854af245d11STodd Fiala Error 1855e9547b80SChaoren Lin NativeProcessLinux::Interrupt () 1856e9547b80SChaoren Lin { 1857e9547b80SChaoren Lin // Pick a running thread (or if none, a not-dead stopped thread) as 1858e9547b80SChaoren Lin // the chosen thread that will be the stop-reason thread. 1859e9547b80SChaoren Lin Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 1860e9547b80SChaoren Lin 1861e9547b80SChaoren Lin NativeThreadProtocolSP running_thread_sp; 1862e9547b80SChaoren Lin NativeThreadProtocolSP stopped_thread_sp; 1863e9547b80SChaoren Lin 1864e9547b80SChaoren Lin if (log) 1865e9547b80SChaoren Lin log->Printf ("NativeProcessLinux::%s selecting running thread for interrupt target", __FUNCTION__); 1866e9547b80SChaoren Lin 18675830aa75STamas Berghammer Mutex::Locker locker (m_threads_mutex); 18685830aa75STamas Berghammer 1869e9547b80SChaoren Lin for (auto thread_sp : m_threads) 1870e9547b80SChaoren Lin { 1871e9547b80SChaoren Lin // The thread shouldn't be null but lets just cover that here. 1872e9547b80SChaoren Lin if (!thread_sp) 1873e9547b80SChaoren Lin continue; 1874e9547b80SChaoren Lin 1875e9547b80SChaoren Lin // If we have a running or stepping thread, we'll call that the 1876e9547b80SChaoren Lin // target of the interrupt. 1877e9547b80SChaoren Lin const auto thread_state = thread_sp->GetState (); 1878e9547b80SChaoren Lin if (thread_state == eStateRunning || 1879e9547b80SChaoren Lin thread_state == eStateStepping) 1880e9547b80SChaoren Lin { 1881e9547b80SChaoren Lin running_thread_sp = thread_sp; 1882e9547b80SChaoren Lin break; 1883e9547b80SChaoren Lin } 1884e9547b80SChaoren Lin else if (!stopped_thread_sp && StateIsStoppedState (thread_state, true)) 1885e9547b80SChaoren Lin { 1886e9547b80SChaoren Lin // Remember the first non-dead stopped thread. We'll use that as a backup if there are no running threads. 1887e9547b80SChaoren Lin stopped_thread_sp = thread_sp; 1888e9547b80SChaoren Lin } 1889e9547b80SChaoren Lin } 1890e9547b80SChaoren Lin 1891e9547b80SChaoren Lin if (!running_thread_sp && !stopped_thread_sp) 1892e9547b80SChaoren Lin { 18935830aa75STamas Berghammer Error error("found no running/stepping or live stopped threads as target for interrupt"); 1894e9547b80SChaoren Lin if (log) 1895e9547b80SChaoren Lin log->Printf ("NativeProcessLinux::%s skipping due to error: %s", __FUNCTION__, error.AsCString ()); 18965830aa75STamas Berghammer 1897e9547b80SChaoren Lin return error; 1898e9547b80SChaoren Lin } 1899e9547b80SChaoren Lin 1900e9547b80SChaoren Lin NativeThreadProtocolSP deferred_signal_thread_sp = running_thread_sp ? running_thread_sp : stopped_thread_sp; 1901e9547b80SChaoren Lin 1902e9547b80SChaoren Lin if (log) 1903e9547b80SChaoren Lin log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " %s tid %" PRIu64 " chosen for interrupt target", 1904e9547b80SChaoren Lin __FUNCTION__, 1905e9547b80SChaoren Lin GetID (), 1906e9547b80SChaoren Lin running_thread_sp ? "running" : "stopped", 1907e9547b80SChaoren Lin deferred_signal_thread_sp->GetID ()); 1908e9547b80SChaoren Lin 1909ed89c7feSPavel Labath StopRunningThreads(deferred_signal_thread_sp->GetID()); 191045f5cb31SPavel Labath 19115830aa75STamas Berghammer return Error(); 1912e9547b80SChaoren Lin } 1913e9547b80SChaoren Lin 1914e9547b80SChaoren Lin Error 1915af245d11STodd Fiala NativeProcessLinux::Kill () 1916af245d11STodd Fiala { 1917af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 1918af245d11STodd Fiala if (log) 1919af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s called for PID %" PRIu64, __FUNCTION__, GetID ()); 1920af245d11STodd Fiala 1921af245d11STodd Fiala Error error; 1922af245d11STodd Fiala 1923af245d11STodd Fiala switch (m_state) 1924af245d11STodd Fiala { 1925af245d11STodd Fiala case StateType::eStateInvalid: 1926af245d11STodd Fiala case StateType::eStateExited: 1927af245d11STodd Fiala case StateType::eStateCrashed: 1928af245d11STodd Fiala case StateType::eStateDetached: 1929af245d11STodd Fiala case StateType::eStateUnloaded: 1930af245d11STodd Fiala // Nothing to do - the process is already dead. 1931af245d11STodd Fiala if (log) 1932af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s ignored for PID %" PRIu64 " due to current state: %s", __FUNCTION__, GetID (), StateAsCString (m_state)); 1933af245d11STodd Fiala return error; 1934af245d11STodd Fiala 1935af245d11STodd Fiala case StateType::eStateConnected: 1936af245d11STodd Fiala case StateType::eStateAttaching: 1937af245d11STodd Fiala case StateType::eStateLaunching: 1938af245d11STodd Fiala case StateType::eStateStopped: 1939af245d11STodd Fiala case StateType::eStateRunning: 1940af245d11STodd Fiala case StateType::eStateStepping: 1941af245d11STodd Fiala case StateType::eStateSuspended: 1942af245d11STodd Fiala // We can try to kill a process in these states. 1943af245d11STodd Fiala break; 1944af245d11STodd Fiala } 1945af245d11STodd Fiala 1946af245d11STodd Fiala if (kill (GetID (), SIGKILL) != 0) 1947af245d11STodd Fiala { 1948af245d11STodd Fiala error.SetErrorToErrno (); 1949af245d11STodd Fiala return error; 1950af245d11STodd Fiala } 1951af245d11STodd Fiala 1952af245d11STodd Fiala return error; 1953af245d11STodd Fiala } 1954af245d11STodd Fiala 1955af245d11STodd Fiala static Error 1956af245d11STodd Fiala ParseMemoryRegionInfoFromProcMapsLine (const std::string &maps_line, MemoryRegionInfo &memory_region_info) 1957af245d11STodd Fiala { 1958af245d11STodd Fiala memory_region_info.Clear(); 1959af245d11STodd Fiala 1960af245d11STodd Fiala StringExtractor line_extractor (maps_line.c_str ()); 1961af245d11STodd Fiala 1962af245d11STodd Fiala // Format: {address_start_hex}-{address_end_hex} perms offset dev inode pathname 1963af245d11STodd Fiala // perms: rwxp (letter is present if set, '-' if not, final character is p=private, s=shared). 1964af245d11STodd Fiala 1965af245d11STodd Fiala // Parse out the starting address 1966af245d11STodd Fiala lldb::addr_t start_address = line_extractor.GetHexMaxU64 (false, 0); 1967af245d11STodd Fiala 1968af245d11STodd Fiala // Parse out hyphen separating start and end address from range. 1969af245d11STodd Fiala if (!line_extractor.GetBytesLeft () || (line_extractor.GetChar () != '-')) 1970af245d11STodd Fiala return Error ("malformed /proc/{pid}/maps entry, missing dash between address range"); 1971af245d11STodd Fiala 1972af245d11STodd Fiala // Parse out the ending address 1973af245d11STodd Fiala lldb::addr_t end_address = line_extractor.GetHexMaxU64 (false, start_address); 1974af245d11STodd Fiala 1975af245d11STodd Fiala // Parse out the space after the address. 1976af245d11STodd Fiala if (!line_extractor.GetBytesLeft () || (line_extractor.GetChar () != ' ')) 1977af245d11STodd Fiala return Error ("malformed /proc/{pid}/maps entry, missing space after range"); 1978af245d11STodd Fiala 1979af245d11STodd Fiala // Save the range. 1980af245d11STodd Fiala memory_region_info.GetRange ().SetRangeBase (start_address); 1981af245d11STodd Fiala memory_region_info.GetRange ().SetRangeEnd (end_address); 1982af245d11STodd Fiala 1983af245d11STodd Fiala // Parse out each permission entry. 1984af245d11STodd Fiala if (line_extractor.GetBytesLeft () < 4) 1985af245d11STodd Fiala return Error ("malformed /proc/{pid}/maps entry, missing some portion of permissions"); 1986af245d11STodd Fiala 1987af245d11STodd Fiala // Handle read permission. 1988af245d11STodd Fiala const char read_perm_char = line_extractor.GetChar (); 1989af245d11STodd Fiala if (read_perm_char == 'r') 1990af245d11STodd Fiala memory_region_info.SetReadable (MemoryRegionInfo::OptionalBool::eYes); 1991af245d11STodd Fiala else 1992af245d11STodd Fiala { 1993af245d11STodd Fiala assert ( (read_perm_char == '-') && "unexpected /proc/{pid}/maps read permission char" ); 1994af245d11STodd Fiala memory_region_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo); 1995af245d11STodd Fiala } 1996af245d11STodd Fiala 1997af245d11STodd Fiala // Handle write permission. 1998af245d11STodd Fiala const char write_perm_char = line_extractor.GetChar (); 1999af245d11STodd Fiala if (write_perm_char == 'w') 2000af245d11STodd Fiala memory_region_info.SetWritable (MemoryRegionInfo::OptionalBool::eYes); 2001af245d11STodd Fiala else 2002af245d11STodd Fiala { 2003af245d11STodd Fiala assert ( (write_perm_char == '-') && "unexpected /proc/{pid}/maps write permission char" ); 2004af245d11STodd Fiala memory_region_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo); 2005af245d11STodd Fiala } 2006af245d11STodd Fiala 2007af245d11STodd Fiala // Handle execute permission. 2008af245d11STodd Fiala const char exec_perm_char = line_extractor.GetChar (); 2009af245d11STodd Fiala if (exec_perm_char == 'x') 2010af245d11STodd Fiala memory_region_info.SetExecutable (MemoryRegionInfo::OptionalBool::eYes); 2011af245d11STodd Fiala else 2012af245d11STodd Fiala { 2013af245d11STodd Fiala assert ( (exec_perm_char == '-') && "unexpected /proc/{pid}/maps exec permission char" ); 2014af245d11STodd Fiala memory_region_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo); 2015af245d11STodd Fiala } 2016af245d11STodd Fiala 2017af245d11STodd Fiala return Error (); 2018af245d11STodd Fiala } 2019af245d11STodd Fiala 2020af245d11STodd Fiala Error 2021af245d11STodd Fiala NativeProcessLinux::GetMemoryRegionInfo (lldb::addr_t load_addr, MemoryRegionInfo &range_info) 2022af245d11STodd Fiala { 2023af245d11STodd Fiala // FIXME review that the final memory region returned extends to the end of the virtual address space, 2024af245d11STodd Fiala // with no perms if it is not mapped. 2025af245d11STodd Fiala 2026af245d11STodd Fiala // Use an approach that reads memory regions from /proc/{pid}/maps. 2027af245d11STodd Fiala // Assume proc maps entries are in ascending order. 2028af245d11STodd Fiala // FIXME assert if we find differently. 2029af245d11STodd Fiala Mutex::Locker locker (m_mem_region_cache_mutex); 2030af245d11STodd Fiala 2031af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 2032af245d11STodd Fiala Error error; 2033af245d11STodd Fiala 2034af245d11STodd Fiala if (m_supports_mem_region == LazyBool::eLazyBoolNo) 2035af245d11STodd Fiala { 2036af245d11STodd Fiala // We're done. 2037af245d11STodd Fiala error.SetErrorString ("unsupported"); 2038af245d11STodd Fiala return error; 2039af245d11STodd Fiala } 2040af245d11STodd Fiala 2041af245d11STodd Fiala // If our cache is empty, pull the latest. There should always be at least one memory region 2042af245d11STodd Fiala // if memory region handling is supported. 2043af245d11STodd Fiala if (m_mem_region_cache.empty ()) 2044af245d11STodd Fiala { 2045af245d11STodd Fiala error = ProcFileReader::ProcessLineByLine (GetID (), "maps", 2046af245d11STodd Fiala [&] (const std::string &line) -> bool 2047af245d11STodd Fiala { 2048af245d11STodd Fiala MemoryRegionInfo info; 2049af245d11STodd Fiala const Error parse_error = ParseMemoryRegionInfoFromProcMapsLine (line, info); 2050af245d11STodd Fiala if (parse_error.Success ()) 2051af245d11STodd Fiala { 2052af245d11STodd Fiala m_mem_region_cache.push_back (info); 2053af245d11STodd Fiala return true; 2054af245d11STodd Fiala } 2055af245d11STodd Fiala else 2056af245d11STodd Fiala { 2057af245d11STodd Fiala if (log) 2058af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s failed to parse proc maps line '%s': %s", __FUNCTION__, line.c_str (), error.AsCString ()); 2059af245d11STodd Fiala return false; 2060af245d11STodd Fiala } 2061af245d11STodd Fiala }); 2062af245d11STodd Fiala 2063af245d11STodd Fiala // If we had an error, we'll mark unsupported. 2064af245d11STodd Fiala if (error.Fail ()) 2065af245d11STodd Fiala { 2066af245d11STodd Fiala m_supports_mem_region = LazyBool::eLazyBoolNo; 2067af245d11STodd Fiala return error; 2068af245d11STodd Fiala } 2069af245d11STodd Fiala else if (m_mem_region_cache.empty ()) 2070af245d11STodd Fiala { 2071af245d11STodd Fiala // No entries after attempting to read them. This shouldn't happen if /proc/{pid}/maps 2072af245d11STodd Fiala // is supported. Assume we don't support map entries via procfs. 2073af245d11STodd Fiala if (log) 2074af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s failed to find any procfs maps entries, assuming no support for memory region metadata retrieval", __FUNCTION__); 2075af245d11STodd Fiala m_supports_mem_region = LazyBool::eLazyBoolNo; 2076af245d11STodd Fiala error.SetErrorString ("not supported"); 2077af245d11STodd Fiala return error; 2078af245d11STodd Fiala } 2079af245d11STodd Fiala 2080af245d11STodd Fiala if (log) 2081af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s read %" PRIu64 " memory region entries from /proc/%" PRIu64 "/maps", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ()), GetID ()); 2082af245d11STodd Fiala 2083af245d11STodd Fiala // We support memory retrieval, remember that. 2084af245d11STodd Fiala m_supports_mem_region = LazyBool::eLazyBoolYes; 2085af245d11STodd Fiala } 2086af245d11STodd Fiala else 2087af245d11STodd Fiala { 2088af245d11STodd Fiala if (log) 2089af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s reusing %" PRIu64 " cached memory region entries", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ())); 2090af245d11STodd Fiala } 2091af245d11STodd Fiala 2092af245d11STodd Fiala lldb::addr_t prev_base_address = 0; 2093af245d11STodd Fiala 2094af245d11STodd Fiala // FIXME start by finding the last region that is <= target address using binary search. Data is sorted. 2095af245d11STodd Fiala // There can be a ton of regions on pthreads apps with lots of threads. 2096af245d11STodd Fiala for (auto it = m_mem_region_cache.begin(); it != m_mem_region_cache.end (); ++it) 2097af245d11STodd Fiala { 2098af245d11STodd Fiala MemoryRegionInfo &proc_entry_info = *it; 2099af245d11STodd Fiala 2100af245d11STodd Fiala // Sanity check assumption that /proc/{pid}/maps entries are ascending. 2101af245d11STodd Fiala assert ((proc_entry_info.GetRange ().GetRangeBase () >= prev_base_address) && "descending /proc/pid/maps entries detected, unexpected"); 2102af245d11STodd Fiala prev_base_address = proc_entry_info.GetRange ().GetRangeBase (); 2103af245d11STodd Fiala 2104af245d11STodd Fiala // If the target address comes before this entry, indicate distance to next region. 2105af245d11STodd Fiala if (load_addr < proc_entry_info.GetRange ().GetRangeBase ()) 2106af245d11STodd Fiala { 2107af245d11STodd Fiala range_info.GetRange ().SetRangeBase (load_addr); 2108af245d11STodd Fiala range_info.GetRange ().SetByteSize (proc_entry_info.GetRange ().GetRangeBase () - load_addr); 2109af245d11STodd Fiala range_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo); 2110af245d11STodd Fiala range_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo); 2111af245d11STodd Fiala range_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo); 2112af245d11STodd Fiala 2113af245d11STodd Fiala return error; 2114af245d11STodd Fiala } 2115af245d11STodd Fiala else if (proc_entry_info.GetRange ().Contains (load_addr)) 2116af245d11STodd Fiala { 2117af245d11STodd Fiala // The target address is within the memory region we're processing here. 2118af245d11STodd Fiala range_info = proc_entry_info; 2119af245d11STodd Fiala return error; 2120af245d11STodd Fiala } 2121af245d11STodd Fiala 2122af245d11STodd Fiala // The target memory address comes somewhere after the region we just parsed. 2123af245d11STodd Fiala } 2124af245d11STodd Fiala 212509839c33STamas Berghammer // If we made it here, we didn't find an entry that contained the given address. Return the 212609839c33STamas Berghammer // load_addr as start and the amount of bytes betwwen load address and the end of the memory as 212709839c33STamas Berghammer // size. 212809839c33STamas Berghammer range_info.GetRange ().SetRangeBase (load_addr); 212909839c33STamas Berghammer switch (m_arch.GetAddressByteSize()) 213009839c33STamas Berghammer { 213109839c33STamas Berghammer case 4: 213209839c33STamas Berghammer range_info.GetRange ().SetByteSize (0x100000000ull - load_addr); 213309839c33STamas Berghammer break; 213409839c33STamas Berghammer case 8: 213509839c33STamas Berghammer range_info.GetRange ().SetByteSize (0ull - load_addr); 213609839c33STamas Berghammer break; 213709839c33STamas Berghammer default: 213809839c33STamas Berghammer assert(false && "Unrecognized data byte size"); 213909839c33STamas Berghammer break; 214009839c33STamas Berghammer } 214109839c33STamas Berghammer range_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo); 214209839c33STamas Berghammer range_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo); 214309839c33STamas Berghammer range_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo); 2144af245d11STodd Fiala return error; 2145af245d11STodd Fiala } 2146af245d11STodd Fiala 2147af245d11STodd Fiala void 2148af245d11STodd Fiala NativeProcessLinux::DoStopIDBumped (uint32_t newBumpId) 2149af245d11STodd Fiala { 2150af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 2151af245d11STodd Fiala if (log) 2152af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s(newBumpId=%" PRIu32 ") called", __FUNCTION__, newBumpId); 2153af245d11STodd Fiala 2154af245d11STodd Fiala { 2155af245d11STodd Fiala Mutex::Locker locker (m_mem_region_cache_mutex); 2156af245d11STodd Fiala if (log) 2157af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s clearing %" PRIu64 " entries from the cache", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ())); 2158af245d11STodd Fiala m_mem_region_cache.clear (); 2159af245d11STodd Fiala } 2160af245d11STodd Fiala } 2161af245d11STodd Fiala 2162af245d11STodd Fiala Error 21633eb4b458SChaoren Lin NativeProcessLinux::AllocateMemory(size_t size, uint32_t permissions, lldb::addr_t &addr) 2164af245d11STodd Fiala { 2165af245d11STodd Fiala // FIXME implementing this requires the equivalent of 2166af245d11STodd Fiala // InferiorCallPOSIX::InferiorCallMmap, which depends on 2167af245d11STodd Fiala // functional ThreadPlans working with Native*Protocol. 2168af245d11STodd Fiala #if 1 2169af245d11STodd Fiala return Error ("not implemented yet"); 2170af245d11STodd Fiala #else 2171af245d11STodd Fiala addr = LLDB_INVALID_ADDRESS; 2172af245d11STodd Fiala 2173af245d11STodd Fiala unsigned prot = 0; 2174af245d11STodd Fiala if (permissions & lldb::ePermissionsReadable) 2175af245d11STodd Fiala prot |= eMmapProtRead; 2176af245d11STodd Fiala if (permissions & lldb::ePermissionsWritable) 2177af245d11STodd Fiala prot |= eMmapProtWrite; 2178af245d11STodd Fiala if (permissions & lldb::ePermissionsExecutable) 2179af245d11STodd Fiala prot |= eMmapProtExec; 2180af245d11STodd Fiala 2181af245d11STodd Fiala // TODO implement this directly in NativeProcessLinux 2182af245d11STodd Fiala // (and lift to NativeProcessPOSIX if/when that class is 2183af245d11STodd Fiala // refactored out). 2184af245d11STodd Fiala if (InferiorCallMmap(this, addr, 0, size, prot, 2185af245d11STodd Fiala eMmapFlagsAnon | eMmapFlagsPrivate, -1, 0)) { 2186af245d11STodd Fiala m_addr_to_mmap_size[addr] = size; 2187af245d11STodd Fiala return Error (); 2188af245d11STodd Fiala } else { 2189af245d11STodd Fiala addr = LLDB_INVALID_ADDRESS; 2190af245d11STodd Fiala return Error("unable to allocate %" PRIu64 " bytes of memory with permissions %s", size, GetPermissionsAsCString (permissions)); 2191af245d11STodd Fiala } 2192af245d11STodd Fiala #endif 2193af245d11STodd Fiala } 2194af245d11STodd Fiala 2195af245d11STodd Fiala Error 2196af245d11STodd Fiala NativeProcessLinux::DeallocateMemory (lldb::addr_t addr) 2197af245d11STodd Fiala { 2198af245d11STodd Fiala // FIXME see comments in AllocateMemory - required lower-level 2199af245d11STodd Fiala // bits not in place yet (ThreadPlans) 2200af245d11STodd Fiala return Error ("not implemented"); 2201af245d11STodd Fiala } 2202af245d11STodd Fiala 2203af245d11STodd Fiala lldb::addr_t 2204af245d11STodd Fiala NativeProcessLinux::GetSharedLibraryInfoAddress () 2205af245d11STodd Fiala { 2206af245d11STodd Fiala #if 1 2207af245d11STodd Fiala // punt on this for now 2208af245d11STodd Fiala return LLDB_INVALID_ADDRESS; 2209af245d11STodd Fiala #else 2210af245d11STodd Fiala // Return the image info address for the exe module 2211af245d11STodd Fiala #if 1 2212af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 2213af245d11STodd Fiala 2214af245d11STodd Fiala ModuleSP module_sp; 2215af245d11STodd Fiala Error error = GetExeModuleSP (module_sp); 2216af245d11STodd Fiala if (error.Fail ()) 2217af245d11STodd Fiala { 2218af245d11STodd Fiala if (log) 2219af245d11STodd Fiala log->Warning ("NativeProcessLinux::%s failed to retrieve exe module: %s", __FUNCTION__, error.AsCString ()); 2220af245d11STodd Fiala return LLDB_INVALID_ADDRESS; 2221af245d11STodd Fiala } 2222af245d11STodd Fiala 2223af245d11STodd Fiala if (module_sp == nullptr) 2224af245d11STodd Fiala { 2225af245d11STodd Fiala if (log) 2226af245d11STodd Fiala log->Warning ("NativeProcessLinux::%s exe module returned was NULL", __FUNCTION__); 2227af245d11STodd Fiala return LLDB_INVALID_ADDRESS; 2228af245d11STodd Fiala } 2229af245d11STodd Fiala 2230af245d11STodd Fiala ObjectFileSP object_file_sp = module_sp->GetObjectFile (); 2231af245d11STodd Fiala if (object_file_sp == nullptr) 2232af245d11STodd Fiala { 2233af245d11STodd Fiala if (log) 2234af245d11STodd Fiala log->Warning ("NativeProcessLinux::%s exe module returned a NULL object file", __FUNCTION__); 2235af245d11STodd Fiala return LLDB_INVALID_ADDRESS; 2236af245d11STodd Fiala } 2237af245d11STodd Fiala 2238af245d11STodd Fiala return obj_file_sp->GetImageInfoAddress(); 2239af245d11STodd Fiala #else 2240af245d11STodd Fiala Target *target = &GetTarget(); 2241af245d11STodd Fiala ObjectFile *obj_file = target->GetExecutableModule()->GetObjectFile(); 2242af245d11STodd Fiala Address addr = obj_file->GetImageInfoAddress(target); 2243af245d11STodd Fiala 2244af245d11STodd Fiala if (addr.IsValid()) 2245af245d11STodd Fiala return addr.GetLoadAddress(target); 2246af245d11STodd Fiala return LLDB_INVALID_ADDRESS; 2247af245d11STodd Fiala #endif 2248af245d11STodd Fiala #endif // punt on this for now 2249af245d11STodd Fiala } 2250af245d11STodd Fiala 2251af245d11STodd Fiala size_t 2252af245d11STodd Fiala NativeProcessLinux::UpdateThreads () 2253af245d11STodd Fiala { 2254af245d11STodd Fiala // The NativeProcessLinux monitoring threads are always up to date 2255af245d11STodd Fiala // with respect to thread state and they keep the thread list 2256af245d11STodd Fiala // populated properly. All this method needs to do is return the 2257af245d11STodd Fiala // thread count. 2258af245d11STodd Fiala Mutex::Locker locker (m_threads_mutex); 2259af245d11STodd Fiala return m_threads.size (); 2260af245d11STodd Fiala } 2261af245d11STodd Fiala 2262af245d11STodd Fiala bool 2263af245d11STodd Fiala NativeProcessLinux::GetArchitecture (ArchSpec &arch) const 2264af245d11STodd Fiala { 2265af245d11STodd Fiala arch = m_arch; 2266af245d11STodd Fiala return true; 2267af245d11STodd Fiala } 2268af245d11STodd Fiala 2269af245d11STodd Fiala Error 227063c8be95STamas Berghammer NativeProcessLinux::GetSoftwareBreakpointPCOffset (NativeRegisterContextSP context_sp, uint32_t &actual_opcode_size) 2271af245d11STodd Fiala { 2272af245d11STodd Fiala // FIXME put this behind a breakpoint protocol class that can be 2273af245d11STodd Fiala // set per architecture. Need ARM, MIPS support here. 2274af245d11STodd Fiala static const uint8_t g_i386_opcode [] = { 0xCC }; 2275af245d11STodd Fiala 2276af245d11STodd Fiala switch (m_arch.GetMachine ()) 2277af245d11STodd Fiala { 2278af245d11STodd Fiala case llvm::Triple::x86: 2279af245d11STodd Fiala case llvm::Triple::x86_64: 2280af245d11STodd Fiala actual_opcode_size = static_cast<uint32_t> (sizeof(g_i386_opcode)); 2281af245d11STodd Fiala return Error (); 2282af245d11STodd Fiala 2283ff7fd900STamas Berghammer case llvm::Triple::arm: 2284ff7fd900STamas Berghammer case llvm::Triple::aarch64: 2285e8659b5dSMohit K. Bhakkad case llvm::Triple::mips64: 2286e8659b5dSMohit K. Bhakkad case llvm::Triple::mips64el: 2287ce815e45SSagar Thakur case llvm::Triple::mips: 2288ce815e45SSagar Thakur case llvm::Triple::mipsel: 2289ff7fd900STamas Berghammer // On these architectures the PC don't get updated for breakpoint hits 2290c60c9452SJaydeep Patil actual_opcode_size = 0; 2291e8659b5dSMohit K. Bhakkad return Error (); 2292e8659b5dSMohit K. Bhakkad 2293af245d11STodd Fiala default: 2294af245d11STodd Fiala assert(false && "CPU type not supported!"); 2295af245d11STodd Fiala return Error ("CPU type not supported"); 2296af245d11STodd Fiala } 2297af245d11STodd Fiala } 2298af245d11STodd Fiala 2299af245d11STodd Fiala Error 2300af245d11STodd Fiala NativeProcessLinux::SetBreakpoint (lldb::addr_t addr, uint32_t size, bool hardware) 2301af245d11STodd Fiala { 2302af245d11STodd Fiala if (hardware) 2303af245d11STodd Fiala return Error ("NativeProcessLinux does not support hardware breakpoints"); 2304af245d11STodd Fiala else 2305af245d11STodd Fiala return SetSoftwareBreakpoint (addr, size); 2306af245d11STodd Fiala } 2307af245d11STodd Fiala 2308af245d11STodd Fiala Error 230963c8be95STamas Berghammer NativeProcessLinux::GetSoftwareBreakpointTrapOpcode (size_t trap_opcode_size_hint, 231063c8be95STamas Berghammer size_t &actual_opcode_size, 231163c8be95STamas Berghammer const uint8_t *&trap_opcode_bytes) 2312af245d11STodd Fiala { 231363c8be95STamas Berghammer // FIXME put this behind a breakpoint protocol class that can be set per 231463c8be95STamas Berghammer // architecture. Need MIPS support here. 23152afc5966STodd Fiala static const uint8_t g_aarch64_opcode[] = { 0x00, 0x00, 0x20, 0xd4 }; 231663c8be95STamas Berghammer // The ARM reference recommends the use of 0xe7fddefe and 0xdefe but the 231763c8be95STamas Berghammer // linux kernel does otherwise. 231863c8be95STamas Berghammer static const uint8_t g_arm_breakpoint_opcode[] = { 0xf0, 0x01, 0xf0, 0xe7 }; 2319af245d11STodd Fiala static const uint8_t g_i386_opcode [] = { 0xCC }; 23203df471c3SMohit K. Bhakkad static const uint8_t g_mips64_opcode[] = { 0x00, 0x00, 0x00, 0x0d }; 23212c2acf96SMohit K. Bhakkad static const uint8_t g_mips64el_opcode[] = { 0x0d, 0x00, 0x00, 0x00 }; 232263c8be95STamas Berghammer static const uint8_t g_thumb_breakpoint_opcode[] = { 0x01, 0xde }; 2323af245d11STodd Fiala 2324af245d11STodd Fiala switch (m_arch.GetMachine ()) 2325af245d11STodd Fiala { 23262afc5966STodd Fiala case llvm::Triple::aarch64: 23272afc5966STodd Fiala trap_opcode_bytes = g_aarch64_opcode; 23282afc5966STodd Fiala actual_opcode_size = sizeof(g_aarch64_opcode); 23292afc5966STodd Fiala return Error (); 23302afc5966STodd Fiala 233163c8be95STamas Berghammer case llvm::Triple::arm: 233263c8be95STamas Berghammer switch (trap_opcode_size_hint) 233363c8be95STamas Berghammer { 233463c8be95STamas Berghammer case 2: 233563c8be95STamas Berghammer trap_opcode_bytes = g_thumb_breakpoint_opcode; 233663c8be95STamas Berghammer actual_opcode_size = sizeof(g_thumb_breakpoint_opcode); 233763c8be95STamas Berghammer return Error (); 233863c8be95STamas Berghammer case 4: 233963c8be95STamas Berghammer trap_opcode_bytes = g_arm_breakpoint_opcode; 234063c8be95STamas Berghammer actual_opcode_size = sizeof(g_arm_breakpoint_opcode); 234163c8be95STamas Berghammer return Error (); 234263c8be95STamas Berghammer default: 234363c8be95STamas Berghammer assert(false && "Unrecognised trap opcode size hint!"); 234463c8be95STamas Berghammer return Error ("Unrecognised trap opcode size hint!"); 234563c8be95STamas Berghammer } 234663c8be95STamas Berghammer 2347af245d11STodd Fiala case llvm::Triple::x86: 2348af245d11STodd Fiala case llvm::Triple::x86_64: 2349af245d11STodd Fiala trap_opcode_bytes = g_i386_opcode; 2350af245d11STodd Fiala actual_opcode_size = sizeof(g_i386_opcode); 2351af245d11STodd Fiala return Error (); 2352af245d11STodd Fiala 2353ce815e45SSagar Thakur case llvm::Triple::mips: 23543df471c3SMohit K. Bhakkad case llvm::Triple::mips64: 23553df471c3SMohit K. Bhakkad trap_opcode_bytes = g_mips64_opcode; 23563df471c3SMohit K. Bhakkad actual_opcode_size = sizeof(g_mips64_opcode); 23573df471c3SMohit K. Bhakkad return Error (); 23583df471c3SMohit K. Bhakkad 2359ce815e45SSagar Thakur case llvm::Triple::mipsel: 23602c2acf96SMohit K. Bhakkad case llvm::Triple::mips64el: 23612c2acf96SMohit K. Bhakkad trap_opcode_bytes = g_mips64el_opcode; 23622c2acf96SMohit K. Bhakkad actual_opcode_size = sizeof(g_mips64el_opcode); 23632c2acf96SMohit K. Bhakkad return Error (); 23642c2acf96SMohit K. Bhakkad 2365af245d11STodd Fiala default: 2366af245d11STodd Fiala assert(false && "CPU type not supported!"); 2367af245d11STodd Fiala return Error ("CPU type not supported"); 2368af245d11STodd Fiala } 2369af245d11STodd Fiala } 2370af245d11STodd Fiala 2371af245d11STodd Fiala #if 0 2372af245d11STodd Fiala ProcessMessage::CrashReason 2373af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGSEGV(const siginfo_t *info) 2374af245d11STodd Fiala { 2375af245d11STodd Fiala ProcessMessage::CrashReason reason; 2376af245d11STodd Fiala assert(info->si_signo == SIGSEGV); 2377af245d11STodd Fiala 2378af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 2379af245d11STodd Fiala 2380af245d11STodd Fiala switch (info->si_code) 2381af245d11STodd Fiala { 2382af245d11STodd Fiala default: 2383af245d11STodd Fiala assert(false && "unexpected si_code for SIGSEGV"); 2384af245d11STodd Fiala break; 2385af245d11STodd Fiala case SI_KERNEL: 2386af245d11STodd Fiala // Linux will occasionally send spurious SI_KERNEL codes. 2387af245d11STodd Fiala // (this is poorly documented in sigaction) 2388af245d11STodd Fiala // One way to get this is via unaligned SIMD loads. 2389af245d11STodd Fiala reason = ProcessMessage::eInvalidAddress; // for lack of anything better 2390af245d11STodd Fiala break; 2391af245d11STodd Fiala case SEGV_MAPERR: 2392af245d11STodd Fiala reason = ProcessMessage::eInvalidAddress; 2393af245d11STodd Fiala break; 2394af245d11STodd Fiala case SEGV_ACCERR: 2395af245d11STodd Fiala reason = ProcessMessage::ePrivilegedAddress; 2396af245d11STodd Fiala break; 2397af245d11STodd Fiala } 2398af245d11STodd Fiala 2399af245d11STodd Fiala return reason; 2400af245d11STodd Fiala } 2401af245d11STodd Fiala #endif 2402af245d11STodd Fiala 2403af245d11STodd Fiala 2404af245d11STodd Fiala #if 0 2405af245d11STodd Fiala ProcessMessage::CrashReason 2406af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGILL(const siginfo_t *info) 2407af245d11STodd Fiala { 2408af245d11STodd Fiala ProcessMessage::CrashReason reason; 2409af245d11STodd Fiala assert(info->si_signo == SIGILL); 2410af245d11STodd Fiala 2411af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 2412af245d11STodd Fiala 2413af245d11STodd Fiala switch (info->si_code) 2414af245d11STodd Fiala { 2415af245d11STodd Fiala default: 2416af245d11STodd Fiala assert(false && "unexpected si_code for SIGILL"); 2417af245d11STodd Fiala break; 2418af245d11STodd Fiala case ILL_ILLOPC: 2419af245d11STodd Fiala reason = ProcessMessage::eIllegalOpcode; 2420af245d11STodd Fiala break; 2421af245d11STodd Fiala case ILL_ILLOPN: 2422af245d11STodd Fiala reason = ProcessMessage::eIllegalOperand; 2423af245d11STodd Fiala break; 2424af245d11STodd Fiala case ILL_ILLADR: 2425af245d11STodd Fiala reason = ProcessMessage::eIllegalAddressingMode; 2426af245d11STodd Fiala break; 2427af245d11STodd Fiala case ILL_ILLTRP: 2428af245d11STodd Fiala reason = ProcessMessage::eIllegalTrap; 2429af245d11STodd Fiala break; 2430af245d11STodd Fiala case ILL_PRVOPC: 2431af245d11STodd Fiala reason = ProcessMessage::ePrivilegedOpcode; 2432af245d11STodd Fiala break; 2433af245d11STodd Fiala case ILL_PRVREG: 2434af245d11STodd Fiala reason = ProcessMessage::ePrivilegedRegister; 2435af245d11STodd Fiala break; 2436af245d11STodd Fiala case ILL_COPROC: 2437af245d11STodd Fiala reason = ProcessMessage::eCoprocessorError; 2438af245d11STodd Fiala break; 2439af245d11STodd Fiala case ILL_BADSTK: 2440af245d11STodd Fiala reason = ProcessMessage::eInternalStackError; 2441af245d11STodd Fiala break; 2442af245d11STodd Fiala } 2443af245d11STodd Fiala 2444af245d11STodd Fiala return reason; 2445af245d11STodd Fiala } 2446af245d11STodd Fiala #endif 2447af245d11STodd Fiala 2448af245d11STodd Fiala #if 0 2449af245d11STodd Fiala ProcessMessage::CrashReason 2450af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGFPE(const siginfo_t *info) 2451af245d11STodd Fiala { 2452af245d11STodd Fiala ProcessMessage::CrashReason reason; 2453af245d11STodd Fiala assert(info->si_signo == SIGFPE); 2454af245d11STodd Fiala 2455af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 2456af245d11STodd Fiala 2457af245d11STodd Fiala switch (info->si_code) 2458af245d11STodd Fiala { 2459af245d11STodd Fiala default: 2460af245d11STodd Fiala assert(false && "unexpected si_code for SIGFPE"); 2461af245d11STodd Fiala break; 2462af245d11STodd Fiala case FPE_INTDIV: 2463af245d11STodd Fiala reason = ProcessMessage::eIntegerDivideByZero; 2464af245d11STodd Fiala break; 2465af245d11STodd Fiala case FPE_INTOVF: 2466af245d11STodd Fiala reason = ProcessMessage::eIntegerOverflow; 2467af245d11STodd Fiala break; 2468af245d11STodd Fiala case FPE_FLTDIV: 2469af245d11STodd Fiala reason = ProcessMessage::eFloatDivideByZero; 2470af245d11STodd Fiala break; 2471af245d11STodd Fiala case FPE_FLTOVF: 2472af245d11STodd Fiala reason = ProcessMessage::eFloatOverflow; 2473af245d11STodd Fiala break; 2474af245d11STodd Fiala case FPE_FLTUND: 2475af245d11STodd Fiala reason = ProcessMessage::eFloatUnderflow; 2476af245d11STodd Fiala break; 2477af245d11STodd Fiala case FPE_FLTRES: 2478af245d11STodd Fiala reason = ProcessMessage::eFloatInexactResult; 2479af245d11STodd Fiala break; 2480af245d11STodd Fiala case FPE_FLTINV: 2481af245d11STodd Fiala reason = ProcessMessage::eFloatInvalidOperation; 2482af245d11STodd Fiala break; 2483af245d11STodd Fiala case FPE_FLTSUB: 2484af245d11STodd Fiala reason = ProcessMessage::eFloatSubscriptRange; 2485af245d11STodd Fiala break; 2486af245d11STodd Fiala } 2487af245d11STodd Fiala 2488af245d11STodd Fiala return reason; 2489af245d11STodd Fiala } 2490af245d11STodd Fiala #endif 2491af245d11STodd Fiala 2492af245d11STodd Fiala #if 0 2493af245d11STodd Fiala ProcessMessage::CrashReason 2494af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGBUS(const siginfo_t *info) 2495af245d11STodd Fiala { 2496af245d11STodd Fiala ProcessMessage::CrashReason reason; 2497af245d11STodd Fiala assert(info->si_signo == SIGBUS); 2498af245d11STodd Fiala 2499af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 2500af245d11STodd Fiala 2501af245d11STodd Fiala switch (info->si_code) 2502af245d11STodd Fiala { 2503af245d11STodd Fiala default: 2504af245d11STodd Fiala assert(false && "unexpected si_code for SIGBUS"); 2505af245d11STodd Fiala break; 2506af245d11STodd Fiala case BUS_ADRALN: 2507af245d11STodd Fiala reason = ProcessMessage::eIllegalAlignment; 2508af245d11STodd Fiala break; 2509af245d11STodd Fiala case BUS_ADRERR: 2510af245d11STodd Fiala reason = ProcessMessage::eIllegalAddress; 2511af245d11STodd Fiala break; 2512af245d11STodd Fiala case BUS_OBJERR: 2513af245d11STodd Fiala reason = ProcessMessage::eHardwareError; 2514af245d11STodd Fiala break; 2515af245d11STodd Fiala } 2516af245d11STodd Fiala 2517af245d11STodd Fiala return reason; 2518af245d11STodd Fiala } 2519af245d11STodd Fiala #endif 2520af245d11STodd Fiala 2521af245d11STodd Fiala Error 252226438d26SChaoren Lin NativeProcessLinux::ReadMemory (lldb::addr_t addr, void *buf, size_t size, size_t &bytes_read) 2523af245d11STodd Fiala { 2524df7c6995SPavel Labath if (ProcessVmReadvSupported()) { 2525df7c6995SPavel Labath // The process_vm_readv path is about 50 times faster than ptrace api. We want to use 2526df7c6995SPavel Labath // this syscall if it is supported. 2527df7c6995SPavel Labath 2528df7c6995SPavel Labath const ::pid_t pid = GetID(); 2529df7c6995SPavel Labath 2530df7c6995SPavel Labath struct iovec local_iov, remote_iov; 2531df7c6995SPavel Labath local_iov.iov_base = buf; 2532df7c6995SPavel Labath local_iov.iov_len = size; 2533df7c6995SPavel Labath remote_iov.iov_base = reinterpret_cast<void *>(addr); 2534df7c6995SPavel Labath remote_iov.iov_len = size; 2535df7c6995SPavel Labath 2536df7c6995SPavel Labath bytes_read = process_vm_readv(pid, &local_iov, 1, &remote_iov, 1, 0); 2537df7c6995SPavel Labath const bool success = bytes_read == size; 2538df7c6995SPavel Labath 2539df7c6995SPavel Labath Log *log(GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 2540df7c6995SPavel Labath if (log) 2541df7c6995SPavel Labath log->Printf ("NativeProcessLinux::%s using process_vm_readv to read %zd bytes from inferior address 0x%" PRIx64": %s", 2542df7c6995SPavel Labath __FUNCTION__, size, addr, success ? "Success" : strerror(errno)); 2543df7c6995SPavel Labath 2544df7c6995SPavel Labath if (success) 2545df7c6995SPavel Labath return Error(); 2546df7c6995SPavel Labath // else 2547df7c6995SPavel Labath // the call failed for some reason, let's retry the read using ptrace api. 2548df7c6995SPavel Labath } 2549df7c6995SPavel Labath 255019cbe96aSPavel Labath unsigned char *dst = static_cast<unsigned char*>(buf); 255119cbe96aSPavel Labath size_t remainder; 255219cbe96aSPavel Labath long data; 255319cbe96aSPavel Labath 255419cbe96aSPavel Labath Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_ALL)); 255519cbe96aSPavel Labath if (log) 255619cbe96aSPavel Labath ProcessPOSIXLog::IncNestLevel(); 255719cbe96aSPavel Labath if (log && ProcessPOSIXLog::AtTopNestLevel() && log->GetMask().Test(POSIX_LOG_MEMORY)) 255819cbe96aSPavel Labath log->Printf ("NativeProcessLinux::%s(%p, %p, %zd, _)", __FUNCTION__, (void*)addr, buf, size); 255919cbe96aSPavel Labath 256019cbe96aSPavel Labath for (bytes_read = 0; bytes_read < size; bytes_read += remainder) 256119cbe96aSPavel Labath { 256219cbe96aSPavel Labath Error error = NativeProcessLinux::PtraceWrapper(PTRACE_PEEKDATA, GetID(), (void*)addr, nullptr, 0, &data); 256319cbe96aSPavel Labath if (error.Fail()) 256419cbe96aSPavel Labath { 256519cbe96aSPavel Labath if (log) 256619cbe96aSPavel Labath ProcessPOSIXLog::DecNestLevel(); 256719cbe96aSPavel Labath return error; 256819cbe96aSPavel Labath } 256919cbe96aSPavel Labath 257019cbe96aSPavel Labath remainder = size - bytes_read; 257119cbe96aSPavel Labath remainder = remainder > k_ptrace_word_size ? k_ptrace_word_size : remainder; 257219cbe96aSPavel Labath 257319cbe96aSPavel Labath // Copy the data into our buffer 257419cbe96aSPavel Labath for (unsigned i = 0; i < remainder; ++i) 257519cbe96aSPavel Labath dst[i] = ((data >> i*8) & 0xFF); 257619cbe96aSPavel Labath 257719cbe96aSPavel Labath if (log && ProcessPOSIXLog::AtTopNestLevel() && 257819cbe96aSPavel Labath (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) || 257919cbe96aSPavel Labath (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) && 258019cbe96aSPavel Labath size <= POSIX_LOG_MEMORY_SHORT_BYTES))) 258119cbe96aSPavel Labath { 258219cbe96aSPavel Labath uintptr_t print_dst = 0; 258319cbe96aSPavel Labath // Format bytes from data by moving into print_dst for log output 258419cbe96aSPavel Labath for (unsigned i = 0; i < remainder; ++i) 258519cbe96aSPavel Labath print_dst |= (((data >> i*8) & 0xFF) << i*8); 258679203995SPavel Labath log->Printf ("NativeProcessLinux::%s() [0x%" PRIx64 "]:0x%" PRIx64 " (0x%" PRIx64 ")", 258779203995SPavel Labath __FUNCTION__, addr, uint64_t(print_dst), uint64_t(data)); 258819cbe96aSPavel Labath } 258919cbe96aSPavel Labath addr += k_ptrace_word_size; 259019cbe96aSPavel Labath dst += k_ptrace_word_size; 259119cbe96aSPavel Labath } 259219cbe96aSPavel Labath 259319cbe96aSPavel Labath if (log) 259419cbe96aSPavel Labath ProcessPOSIXLog::DecNestLevel(); 259519cbe96aSPavel Labath return Error(); 2596af245d11STodd Fiala } 2597af245d11STodd Fiala 2598af245d11STodd Fiala Error 25993eb4b458SChaoren Lin NativeProcessLinux::ReadMemoryWithoutTrap(lldb::addr_t addr, void *buf, size_t size, size_t &bytes_read) 26003eb4b458SChaoren Lin { 26013eb4b458SChaoren Lin Error error = ReadMemory(addr, buf, size, bytes_read); 26023eb4b458SChaoren Lin if (error.Fail()) return error; 26033eb4b458SChaoren Lin return m_breakpoint_list.RemoveTrapsFromBuffer(addr, buf, size); 26043eb4b458SChaoren Lin } 26053eb4b458SChaoren Lin 26063eb4b458SChaoren Lin Error 26073eb4b458SChaoren Lin NativeProcessLinux::WriteMemory(lldb::addr_t addr, const void *buf, size_t size, size_t &bytes_written) 2608af245d11STodd Fiala { 260919cbe96aSPavel Labath const unsigned char *src = static_cast<const unsigned char*>(buf); 261019cbe96aSPavel Labath size_t remainder; 261119cbe96aSPavel Labath Error error; 261219cbe96aSPavel Labath 261319cbe96aSPavel Labath Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_ALL)); 261419cbe96aSPavel Labath if (log) 261519cbe96aSPavel Labath ProcessPOSIXLog::IncNestLevel(); 261619cbe96aSPavel Labath if (log && ProcessPOSIXLog::AtTopNestLevel() && log->GetMask().Test(POSIX_LOG_MEMORY)) 261779203995SPavel Labath log->Printf ("NativeProcessLinux::%s(0x%" PRIx64 ", %p, %zu)", __FUNCTION__, addr, buf, size); 261819cbe96aSPavel Labath 261919cbe96aSPavel Labath for (bytes_written = 0; bytes_written < size; bytes_written += remainder) 262019cbe96aSPavel Labath { 262119cbe96aSPavel Labath remainder = size - bytes_written; 262219cbe96aSPavel Labath remainder = remainder > k_ptrace_word_size ? k_ptrace_word_size : remainder; 262319cbe96aSPavel Labath 262419cbe96aSPavel Labath if (remainder == k_ptrace_word_size) 262519cbe96aSPavel Labath { 262619cbe96aSPavel Labath unsigned long data = 0; 262719cbe96aSPavel Labath for (unsigned i = 0; i < k_ptrace_word_size; ++i) 262819cbe96aSPavel Labath data |= (unsigned long)src[i] << i*8; 262919cbe96aSPavel Labath 263019cbe96aSPavel Labath if (log && ProcessPOSIXLog::AtTopNestLevel() && 263119cbe96aSPavel Labath (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) || 263219cbe96aSPavel Labath (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) && 263319cbe96aSPavel Labath size <= POSIX_LOG_MEMORY_SHORT_BYTES))) 263419cbe96aSPavel Labath log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__, 263519cbe96aSPavel Labath (void*)addr, *(const unsigned long*)src, data); 263619cbe96aSPavel Labath 263719cbe96aSPavel Labath error = NativeProcessLinux::PtraceWrapper(PTRACE_POKEDATA, GetID(), (void*)addr, (void*)data); 263819cbe96aSPavel Labath if (error.Fail()) 263919cbe96aSPavel Labath { 264019cbe96aSPavel Labath if (log) 264119cbe96aSPavel Labath ProcessPOSIXLog::DecNestLevel(); 264219cbe96aSPavel Labath return error; 264319cbe96aSPavel Labath } 264419cbe96aSPavel Labath } 264519cbe96aSPavel Labath else 264619cbe96aSPavel Labath { 264719cbe96aSPavel Labath unsigned char buff[8]; 264819cbe96aSPavel Labath size_t bytes_read; 264919cbe96aSPavel Labath error = ReadMemory(addr, buff, k_ptrace_word_size, bytes_read); 265019cbe96aSPavel Labath if (error.Fail()) 265119cbe96aSPavel Labath { 265219cbe96aSPavel Labath if (log) 265319cbe96aSPavel Labath ProcessPOSIXLog::DecNestLevel(); 265419cbe96aSPavel Labath return error; 265519cbe96aSPavel Labath } 265619cbe96aSPavel Labath 265719cbe96aSPavel Labath memcpy(buff, src, remainder); 265819cbe96aSPavel Labath 265919cbe96aSPavel Labath size_t bytes_written_rec; 266019cbe96aSPavel Labath error = WriteMemory(addr, buff, k_ptrace_word_size, bytes_written_rec); 266119cbe96aSPavel Labath if (error.Fail()) 266219cbe96aSPavel Labath { 266319cbe96aSPavel Labath if (log) 266419cbe96aSPavel Labath ProcessPOSIXLog::DecNestLevel(); 266519cbe96aSPavel Labath return error; 266619cbe96aSPavel Labath } 266719cbe96aSPavel Labath 266819cbe96aSPavel Labath if (log && ProcessPOSIXLog::AtTopNestLevel() && 266919cbe96aSPavel Labath (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) || 267019cbe96aSPavel Labath (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) && 267119cbe96aSPavel Labath size <= POSIX_LOG_MEMORY_SHORT_BYTES))) 267219cbe96aSPavel Labath log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__, 267319cbe96aSPavel Labath (void*)addr, *(const unsigned long*)src, *(unsigned long*)buff); 267419cbe96aSPavel Labath } 267519cbe96aSPavel Labath 267619cbe96aSPavel Labath addr += k_ptrace_word_size; 267719cbe96aSPavel Labath src += k_ptrace_word_size; 267819cbe96aSPavel Labath } 267919cbe96aSPavel Labath if (log) 268019cbe96aSPavel Labath ProcessPOSIXLog::DecNestLevel(); 268119cbe96aSPavel Labath return error; 2682af245d11STodd Fiala } 2683af245d11STodd Fiala 268497ccc294SChaoren Lin Error 2685af245d11STodd Fiala NativeProcessLinux::Resume (lldb::tid_t tid, uint32_t signo) 2686af245d11STodd Fiala { 2687af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS)); 2688af245d11STodd Fiala 2689af245d11STodd Fiala if (log) 2690af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s() resuming thread = %" PRIu64 " with signal %s", __FUNCTION__, tid, 269198d0a4b3SChaoren Lin Host::GetSignalAsCString(signo)); 2692c7512fdcSPavel Labath 2693c7512fdcSPavel Labath 2694c7512fdcSPavel Labath 2695c7512fdcSPavel Labath intptr_t data = 0; 2696c7512fdcSPavel Labath 2697c7512fdcSPavel Labath if (signo != LLDB_INVALID_SIGNAL_NUMBER) 2698c7512fdcSPavel Labath data = signo; 2699c7512fdcSPavel Labath 270019cbe96aSPavel Labath Error error = PtraceWrapper(PTRACE_CONT, tid, nullptr, (void*)data); 2701c7512fdcSPavel Labath 2702af245d11STodd Fiala if (log) 2703c7512fdcSPavel Labath log->Printf ("NativeProcessLinux::%s() resuming thread = %" PRIu64 " result = %s", __FUNCTION__, tid, error.Success() ? "true" : "false"); 2704c7512fdcSPavel Labath return error; 2705af245d11STodd Fiala } 2706af245d11STodd Fiala 270797ccc294SChaoren Lin Error 2708af245d11STodd Fiala NativeProcessLinux::SingleStep(lldb::tid_t tid, uint32_t signo) 2709af245d11STodd Fiala { 2710c7512fdcSPavel Labath intptr_t data = 0; 2711c7512fdcSPavel Labath 2712c7512fdcSPavel Labath if (signo != LLDB_INVALID_SIGNAL_NUMBER) 2713c7512fdcSPavel Labath data = signo; 2714c7512fdcSPavel Labath 27150e1d729bSPavel Labath // If hardware single-stepping is not supported, we just do a continue. The breakpoint on the 27160e1d729bSPavel Labath // next instruction has been setup in NativeProcessLinux::Resume. 27170e1d729bSPavel Labath return PtraceWrapper(SupportHardwareSingleStepping() ? PTRACE_SINGLESTEP : PTRACE_CONT, 27180e1d729bSPavel Labath tid, nullptr, (void*)data); 2719af245d11STodd Fiala } 2720af245d11STodd Fiala 272197ccc294SChaoren Lin Error 272297ccc294SChaoren Lin NativeProcessLinux::GetSignalInfo(lldb::tid_t tid, void *siginfo) 2723af245d11STodd Fiala { 272419cbe96aSPavel Labath return PtraceWrapper(PTRACE_GETSIGINFO, tid, nullptr, siginfo); 2725af245d11STodd Fiala } 2726af245d11STodd Fiala 272797ccc294SChaoren Lin Error 2728af245d11STodd Fiala NativeProcessLinux::GetEventMessage(lldb::tid_t tid, unsigned long *message) 2729af245d11STodd Fiala { 273019cbe96aSPavel Labath return PtraceWrapper(PTRACE_GETEVENTMSG, tid, nullptr, message); 2731af245d11STodd Fiala } 2732af245d11STodd Fiala 2733db264a6dSTamas Berghammer Error 2734af245d11STodd Fiala NativeProcessLinux::Detach(lldb::tid_t tid) 2735af245d11STodd Fiala { 273697ccc294SChaoren Lin if (tid == LLDB_INVALID_THREAD_ID) 273797ccc294SChaoren Lin return Error(); 273897ccc294SChaoren Lin 273919cbe96aSPavel Labath return PtraceWrapper(PTRACE_DETACH, tid); 2740af245d11STodd Fiala } 2741af245d11STodd Fiala 2742af245d11STodd Fiala bool 2743d3173f34SChaoren Lin NativeProcessLinux::DupDescriptor(const FileSpec &file_spec, int fd, int flags) 2744af245d11STodd Fiala { 2745d3173f34SChaoren Lin int target_fd = open(file_spec.GetCString(), flags, 0666); 2746af245d11STodd Fiala 2747af245d11STodd Fiala if (target_fd == -1) 2748af245d11STodd Fiala return false; 2749af245d11STodd Fiala 2750493c3a12SPavel Labath if (dup2(target_fd, fd) == -1) 2751493c3a12SPavel Labath return false; 2752493c3a12SPavel Labath 2753493c3a12SPavel Labath return (close(target_fd) == -1) ? false : true; 2754af245d11STodd Fiala } 2755af245d11STodd Fiala 2756af245d11STodd Fiala bool 2757af245d11STodd Fiala NativeProcessLinux::HasThreadNoLock (lldb::tid_t thread_id) 2758af245d11STodd Fiala { 2759af245d11STodd Fiala for (auto thread_sp : m_threads) 2760af245d11STodd Fiala { 2761af245d11STodd Fiala assert (thread_sp && "thread list should not contain NULL threads"); 2762af245d11STodd Fiala if (thread_sp->GetID () == thread_id) 2763af245d11STodd Fiala { 2764af245d11STodd Fiala // We have this thread. 2765af245d11STodd Fiala return true; 2766af245d11STodd Fiala } 2767af245d11STodd Fiala } 2768af245d11STodd Fiala 2769af245d11STodd Fiala // We don't have this thread. 2770af245d11STodd Fiala return false; 2771af245d11STodd Fiala } 2772af245d11STodd Fiala 2773af245d11STodd Fiala NativeThreadProtocolSP 2774af245d11STodd Fiala NativeProcessLinux::MaybeGetThreadNoLock (lldb::tid_t thread_id) 2775af245d11STodd Fiala { 2776af245d11STodd Fiala // CONSIDER organize threads by map - we can do better than linear. 2777af245d11STodd Fiala for (auto thread_sp : m_threads) 2778af245d11STodd Fiala { 2779af245d11STodd Fiala if (thread_sp->GetID () == thread_id) 2780af245d11STodd Fiala return thread_sp; 2781af245d11STodd Fiala } 2782af245d11STodd Fiala 2783af245d11STodd Fiala // We don't have this thread. 2784af245d11STodd Fiala return NativeThreadProtocolSP (); 2785af245d11STodd Fiala } 2786af245d11STodd Fiala 2787af245d11STodd Fiala bool 2788af245d11STodd Fiala NativeProcessLinux::StopTrackingThread (lldb::tid_t thread_id) 2789af245d11STodd Fiala { 27901dbc6c9cSPavel Labath Log *const log = GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD); 27911dbc6c9cSPavel Labath 27921dbc6c9cSPavel Labath if (log) 27931dbc6c9cSPavel Labath log->Printf("NativeProcessLinux::%s (tid: %" PRIu64 ")", __FUNCTION__, thread_id); 27941dbc6c9cSPavel Labath 27951dbc6c9cSPavel Labath bool found = false; 27961dbc6c9cSPavel Labath 2797af245d11STodd Fiala Mutex::Locker locker (m_threads_mutex); 2798af245d11STodd Fiala for (auto it = m_threads.begin (); it != m_threads.end (); ++it) 2799af245d11STodd Fiala { 2800af245d11STodd Fiala if (*it && ((*it)->GetID () == thread_id)) 2801af245d11STodd Fiala { 2802af245d11STodd Fiala m_threads.erase (it); 28031dbc6c9cSPavel Labath found = true; 28041dbc6c9cSPavel Labath break; 2805af245d11STodd Fiala } 2806af245d11STodd Fiala } 2807af245d11STodd Fiala 28089eb1ecb9SPavel Labath SignalIfAllThreadsStopped(); 28091dbc6c9cSPavel Labath 28101dbc6c9cSPavel Labath return found; 2811af245d11STodd Fiala } 2812af245d11STodd Fiala 2813*f9077782SPavel Labath NativeThreadLinuxSP 2814af245d11STodd Fiala NativeProcessLinux::AddThread (lldb::tid_t thread_id) 2815af245d11STodd Fiala { 2816af245d11STodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD)); 2817af245d11STodd Fiala 2818af245d11STodd Fiala Mutex::Locker locker (m_threads_mutex); 2819af245d11STodd Fiala 2820af245d11STodd Fiala if (log) 2821af245d11STodd Fiala { 2822af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " adding thread with tid %" PRIu64, 2823af245d11STodd Fiala __FUNCTION__, 2824af245d11STodd Fiala GetID (), 2825af245d11STodd Fiala thread_id); 2826af245d11STodd Fiala } 2827af245d11STodd Fiala 2828af245d11STodd Fiala assert (!HasThreadNoLock (thread_id) && "attempted to add a thread by id that already exists"); 2829af245d11STodd Fiala 2830af245d11STodd Fiala // If this is the first thread, save it as the current thread 2831af245d11STodd Fiala if (m_threads.empty ()) 2832af245d11STodd Fiala SetCurrentThreadID (thread_id); 2833af245d11STodd Fiala 2834*f9077782SPavel Labath auto thread_sp = std::make_shared<NativeThreadLinux>(this, thread_id); 2835af245d11STodd Fiala m_threads.push_back (thread_sp); 2836af245d11STodd Fiala return thread_sp; 2837af245d11STodd Fiala } 2838af245d11STodd Fiala 2839af245d11STodd Fiala Error 2840*f9077782SPavel Labath NativeProcessLinux::FixupBreakpointPCAsNeeded(const NativeThreadLinuxSP &thread_sp) 2841af245d11STodd Fiala { 284275f47c3aSTodd Fiala Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS)); 2843af245d11STodd Fiala 2844af245d11STodd Fiala Error error; 2845af245d11STodd Fiala 2846af245d11STodd Fiala if (!thread_sp) 2847af245d11STodd Fiala { 2848af245d11STodd Fiala error.SetErrorString ("null thread_sp"); 2849af245d11STodd Fiala if (log) 2850af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s failed: %s", __FUNCTION__, error.AsCString ()); 2851af245d11STodd Fiala return error; 2852af245d11STodd Fiala } 2853af245d11STodd Fiala 2854af245d11STodd Fiala // Find out the size of a breakpoint (might depend on where we are in the code). 2855*f9077782SPavel Labath NativeRegisterContextSP context_sp = thread_sp->GetRegisterContext(); 2856af245d11STodd Fiala if (!context_sp) 2857af245d11STodd Fiala { 2858af245d11STodd Fiala error.SetErrorString ("cannot get a NativeRegisterContext for the thread"); 2859af245d11STodd Fiala if (log) 2860af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s failed: %s", __FUNCTION__, error.AsCString ()); 2861af245d11STodd Fiala return error; 2862af245d11STodd Fiala } 2863af245d11STodd Fiala 2864af245d11STodd Fiala uint32_t breakpoint_size = 0; 286563c8be95STamas Berghammer error = GetSoftwareBreakpointPCOffset (context_sp, breakpoint_size); 2866af245d11STodd Fiala if (error.Fail ()) 2867af245d11STodd Fiala { 2868af245d11STodd Fiala if (log) 2869af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s GetBreakpointSize() failed: %s", __FUNCTION__, error.AsCString ()); 2870af245d11STodd Fiala return error; 2871af245d11STodd Fiala } 2872af245d11STodd Fiala else 2873af245d11STodd Fiala { 2874af245d11STodd Fiala if (log) 2875af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s breakpoint size: %" PRIu32, __FUNCTION__, breakpoint_size); 2876af245d11STodd Fiala } 2877af245d11STodd Fiala 2878af245d11STodd Fiala // First try probing for a breakpoint at a software breakpoint location: PC - breakpoint size. 2879c60c9452SJaydeep Patil const lldb::addr_t initial_pc_addr = context_sp->GetPCfromBreakpointLocation (); 2880af245d11STodd Fiala lldb::addr_t breakpoint_addr = initial_pc_addr; 28813eb4b458SChaoren Lin if (breakpoint_size > 0) 2882af245d11STodd Fiala { 2883af245d11STodd Fiala // Do not allow breakpoint probe to wrap around. 28843eb4b458SChaoren Lin if (breakpoint_addr >= breakpoint_size) 28853eb4b458SChaoren Lin breakpoint_addr -= breakpoint_size; 2886af245d11STodd Fiala } 2887af245d11STodd Fiala 2888af245d11STodd Fiala // Check if we stopped because of a breakpoint. 2889af245d11STodd Fiala NativeBreakpointSP breakpoint_sp; 2890af245d11STodd Fiala error = m_breakpoint_list.GetBreakpoint (breakpoint_addr, breakpoint_sp); 2891af245d11STodd Fiala if (!error.Success () || !breakpoint_sp) 2892af245d11STodd Fiala { 2893af245d11STodd Fiala // We didn't find one at a software probe location. Nothing to do. 2894af245d11STodd Fiala if (log) 2895af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " no lldb breakpoint found at current pc with adjustment: 0x%" PRIx64, __FUNCTION__, GetID (), breakpoint_addr); 2896af245d11STodd Fiala return Error (); 2897af245d11STodd Fiala } 2898af245d11STodd Fiala 2899af245d11STodd Fiala // If the breakpoint is not a software breakpoint, nothing to do. 2900af245d11STodd Fiala if (!breakpoint_sp->IsSoftwareBreakpoint ()) 2901af245d11STodd Fiala { 2902af245d11STodd Fiala if (log) 2903af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " breakpoint found at 0x%" PRIx64 ", not software, nothing to adjust", __FUNCTION__, GetID (), breakpoint_addr); 2904af245d11STodd Fiala return Error (); 2905af245d11STodd Fiala } 2906af245d11STodd Fiala 2907af245d11STodd Fiala // 2908af245d11STodd Fiala // We have a software breakpoint and need to adjust the PC. 2909af245d11STodd Fiala // 2910af245d11STodd Fiala 2911af245d11STodd Fiala // Sanity check. 2912af245d11STodd Fiala if (breakpoint_size == 0) 2913af245d11STodd Fiala { 2914af245d11STodd Fiala // Nothing to do! How did we get here? 2915af245d11STodd Fiala if (log) 2916af245d11STodd Fiala log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " breakpoint found at 0x%" PRIx64 ", it is software, but the size is zero, nothing to do (unexpected)", __FUNCTION__, GetID (), breakpoint_addr); 2917af245d11STodd Fiala return Error (); 2918af245d11STodd Fiala } 2919af245d11STodd Fiala 2920af245d11STodd Fiala // Change the program counter. 2921af245d11STodd Fiala if (log) 2922*f9077782SPavel Labath log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": changing PC from 0x%" PRIx64 " to 0x%" PRIx64, __FUNCTION__, GetID(), thread_sp->GetID(), initial_pc_addr, breakpoint_addr); 2923af245d11STodd Fiala 2924af245d11STodd Fiala error = context_sp->SetPC (breakpoint_addr); 2925af245d11STodd Fiala if (error.Fail ()) 2926af245d11STodd Fiala { 2927af245d11STodd Fiala if (log) 2928*f9077782SPavel Labath log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": failed to set PC: %s", __FUNCTION__, GetID(), thread_sp->GetID(), error.AsCString ()); 2929af245d11STodd Fiala return error; 2930af245d11STodd Fiala } 2931af245d11STodd Fiala 2932af245d11STodd Fiala return error; 2933af245d11STodd Fiala } 2934fa03ad2eSChaoren Lin 29357cb18bf5STamas Berghammer Error 29367cb18bf5STamas Berghammer NativeProcessLinux::GetLoadedModuleFileSpec(const char* module_path, FileSpec& file_spec) 29377cb18bf5STamas Berghammer { 29387cb18bf5STamas Berghammer FileSpec module_file_spec(module_path, true); 29397cb18bf5STamas Berghammer 2940162fb8e8SPavel Labath bool found = false; 29417cb18bf5STamas Berghammer file_spec.Clear(); 2942162fb8e8SPavel Labath ProcFileReader::ProcessLineByLine(GetID(), "maps", 2943162fb8e8SPavel Labath [&] (const std::string &line) 2944162fb8e8SPavel Labath { 2945162fb8e8SPavel Labath SmallVector<StringRef, 16> columns; 2946162fb8e8SPavel Labath StringRef(line).split(columns, " ", -1, false); 2947162fb8e8SPavel Labath if (columns.size() < 6) 2948162fb8e8SPavel Labath return true; // continue searching 2949162fb8e8SPavel Labath 2950162fb8e8SPavel Labath FileSpec this_file_spec(columns[5].str().c_str(), false); 2951162fb8e8SPavel Labath if (this_file_spec.GetFilename() != module_file_spec.GetFilename()) 2952162fb8e8SPavel Labath return true; // continue searching 2953162fb8e8SPavel Labath 2954162fb8e8SPavel Labath file_spec = this_file_spec; 2955162fb8e8SPavel Labath found = true; 2956162fb8e8SPavel Labath return false; // we are done 2957162fb8e8SPavel Labath }); 2958162fb8e8SPavel Labath 2959162fb8e8SPavel Labath if (! found) 29607cb18bf5STamas Berghammer return Error("Module file (%s) not found in /proc/%" PRIu64 "/maps file!", 29617cb18bf5STamas Berghammer module_file_spec.GetFilename().AsCString(), GetID()); 2962162fb8e8SPavel Labath 2963162fb8e8SPavel Labath return Error(); 29647cb18bf5STamas Berghammer } 2965c076559aSPavel Labath 29665eb721edSPavel Labath Error 2967783bfc8cSTamas Berghammer NativeProcessLinux::GetFileLoadAddress(const llvm::StringRef& file_name, lldb::addr_t& load_addr) 2968783bfc8cSTamas Berghammer { 2969783bfc8cSTamas Berghammer load_addr = LLDB_INVALID_ADDRESS; 2970783bfc8cSTamas Berghammer Error error = ProcFileReader::ProcessLineByLine (GetID (), "maps", 2971783bfc8cSTamas Berghammer [&] (const std::string &line) -> bool 2972783bfc8cSTamas Berghammer { 2973783bfc8cSTamas Berghammer StringRef maps_row(line); 2974783bfc8cSTamas Berghammer 2975783bfc8cSTamas Berghammer SmallVector<StringRef, 16> maps_columns; 2976783bfc8cSTamas Berghammer maps_row.split(maps_columns, StringRef(" "), -1, false); 2977783bfc8cSTamas Berghammer 2978783bfc8cSTamas Berghammer if (maps_columns.size() < 6) 2979783bfc8cSTamas Berghammer { 2980783bfc8cSTamas Berghammer // Return true to continue reading the proc file 2981783bfc8cSTamas Berghammer return true; 2982783bfc8cSTamas Berghammer } 2983783bfc8cSTamas Berghammer 2984783bfc8cSTamas Berghammer if (maps_columns[5] == file_name) 2985783bfc8cSTamas Berghammer { 2986783bfc8cSTamas Berghammer StringExtractor addr_extractor(maps_columns[0].str().c_str()); 2987783bfc8cSTamas Berghammer load_addr = addr_extractor.GetHexMaxU64(false, LLDB_INVALID_ADDRESS); 2988783bfc8cSTamas Berghammer 2989783bfc8cSTamas Berghammer // Return false to stop reading the proc file further 2990783bfc8cSTamas Berghammer return false; 2991783bfc8cSTamas Berghammer } 2992783bfc8cSTamas Berghammer 2993783bfc8cSTamas Berghammer // Return true to continue reading the proc file 2994783bfc8cSTamas Berghammer return true; 2995783bfc8cSTamas Berghammer }); 2996783bfc8cSTamas Berghammer return error; 2997783bfc8cSTamas Berghammer } 2998783bfc8cSTamas Berghammer 2999*f9077782SPavel Labath NativeThreadLinuxSP 3000*f9077782SPavel Labath NativeProcessLinux::GetThreadByID(lldb::tid_t tid) 3001*f9077782SPavel Labath { 3002*f9077782SPavel Labath return std::static_pointer_cast<NativeThreadLinux>(NativeProcessProtocol::GetThreadByID(tid)); 3003*f9077782SPavel Labath } 3004*f9077782SPavel Labath 3005783bfc8cSTamas Berghammer Error 30060e1d729bSPavel Labath NativeProcessLinux::ResumeThread(const NativeThreadLinuxSP &thread_sp, lldb::StateType state, int signo) 3007c076559aSPavel Labath { 30085eb721edSPavel Labath Log *const log = GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD); 30095eb721edSPavel Labath 30101dbc6c9cSPavel Labath if (log) 30110e1d729bSPavel Labath log->Printf("NativeProcessLinux::%s (tid: %" PRIu64 ")", 30120e1d729bSPavel Labath __FUNCTION__, thread_sp->GetID()); 3013c076559aSPavel Labath 3014c076559aSPavel Labath // Before we do the resume below, first check if we have a pending 3015108c325dSPavel Labath // stop notification that is currently waiting for 30160e1d729bSPavel Labath // all threads to stop. This is potentially a buggy situation since 3017c076559aSPavel Labath // we're ostensibly waiting for threads to stop before we send out the 3018c076559aSPavel Labath // pending notification, and here we are resuming one before we send 3019c076559aSPavel Labath // out the pending stop notification. 30200e1d729bSPavel Labath if (m_pending_notification_tid != LLDB_INVALID_THREAD_ID && log) 3021c076559aSPavel Labath { 30220e1d729bSPavel Labath log->Printf("NativeProcessLinux::%s about to resume tid %" PRIu64 " per explicit request but we have a pending stop notification (tid %" PRIu64 ") that is actively waiting for this thread to stop. Valid sequence of events?", __FUNCTION__, thread_sp->GetID(), m_pending_notification_tid); 3023c076559aSPavel Labath } 3024c076559aSPavel Labath 3025c076559aSPavel Labath // Request a resume. We expect this to be synchronous and the system 3026c076559aSPavel Labath // to reflect it is running after this completes. 30270e1d729bSPavel Labath switch (state) 3028c076559aSPavel Labath { 30290e1d729bSPavel Labath case eStateRunning: 30300e1d729bSPavel Labath { 30310e1d729bSPavel Labath thread_sp->SetRunning(); 30320e1d729bSPavel Labath const auto resume_result = Resume(thread_sp->GetID(), signo); 30330e1d729bSPavel Labath if (resume_result.Success()) 30340e1d729bSPavel Labath SetState(eStateRunning, true); 30350e1d729bSPavel Labath return resume_result; 3036c076559aSPavel Labath } 30370e1d729bSPavel Labath case eStateStepping: 30380e1d729bSPavel Labath { 30390e1d729bSPavel Labath thread_sp->SetStepping(); 30400e1d729bSPavel Labath const auto step_result = SingleStep(thread_sp->GetID(), signo); 30410e1d729bSPavel Labath if (step_result.Success()) 30420e1d729bSPavel Labath SetState(eStateRunning, true); 30430e1d729bSPavel Labath return step_result; 30440e1d729bSPavel Labath } 30450e1d729bSPavel Labath default: 30460e1d729bSPavel Labath if (log) 30470e1d729bSPavel Labath log->Printf("NativeProcessLinux::%s Unhandled state %s.", 30480e1d729bSPavel Labath __FUNCTION__, StateAsCString(state)); 30490e1d729bSPavel Labath llvm_unreachable("Unhandled state for resume"); 30500e1d729bSPavel Labath } 3051c076559aSPavel Labath } 3052c076559aSPavel Labath 3053c076559aSPavel Labath //===----------------------------------------------------------------------===// 3054c076559aSPavel Labath 3055c076559aSPavel Labath void 3056337f3eb9SPavel Labath NativeProcessLinux::StopRunningThreads(const lldb::tid_t triggering_tid) 3057c076559aSPavel Labath { 30585eb721edSPavel Labath Log *const log = GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD); 3059c076559aSPavel Labath 30605eb721edSPavel Labath if (log) 3061c076559aSPavel Labath { 30625eb721edSPavel Labath log->Printf("NativeProcessLinux::%s about to process event: (triggering_tid: %" PRIu64 ")", 3063c076559aSPavel Labath __FUNCTION__, triggering_tid); 3064c076559aSPavel Labath } 3065c076559aSPavel Labath 30660e1d729bSPavel Labath m_pending_notification_tid = triggering_tid; 30670e1d729bSPavel Labath 30680e1d729bSPavel Labath // Request a stop for all the thread stops that need to be stopped 30690e1d729bSPavel Labath // and are not already known to be stopped. 30700e1d729bSPavel Labath for (const auto &thread_sp: m_threads) 30710e1d729bSPavel Labath { 30720e1d729bSPavel Labath if (StateIsRunningState(thread_sp->GetState())) 30730e1d729bSPavel Labath static_pointer_cast<NativeThreadLinux>(thread_sp)->RequestStop(); 30740e1d729bSPavel Labath } 30750e1d729bSPavel Labath 30760e1d729bSPavel Labath SignalIfAllThreadsStopped(); 3077c076559aSPavel Labath 30785eb721edSPavel Labath if (log) 3079c076559aSPavel Labath { 30805eb721edSPavel Labath log->Printf("NativeProcessLinux::%s event processing done", __FUNCTION__); 3081c076559aSPavel Labath } 3082c076559aSPavel Labath } 3083c076559aSPavel Labath 3084c076559aSPavel Labath void 30859eb1ecb9SPavel Labath NativeProcessLinux::SignalIfAllThreadsStopped() 3086c076559aSPavel Labath { 30870e1d729bSPavel Labath if (m_pending_notification_tid == LLDB_INVALID_THREAD_ID) 30880e1d729bSPavel Labath return; // No pending notification. Nothing to do. 30890e1d729bSPavel Labath 30900e1d729bSPavel Labath for (const auto &thread_sp: m_threads) 3091c076559aSPavel Labath { 30920e1d729bSPavel Labath if (StateIsRunningState(thread_sp->GetState())) 30930e1d729bSPavel Labath return; // Some threads are still running. Don't signal yet. 30940e1d729bSPavel Labath } 30950e1d729bSPavel Labath 30960e1d729bSPavel Labath // We have a pending notification and all threads have stopped. 30979eb1ecb9SPavel Labath Log *log(GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_BREAKPOINTS)); 30989eb1ecb9SPavel Labath 30999eb1ecb9SPavel Labath // Clear any temporary breakpoints we used to implement software single stepping. 31009eb1ecb9SPavel Labath for (const auto &thread_info: m_threads_stepping_with_breakpoint) 31019eb1ecb9SPavel Labath { 31029eb1ecb9SPavel Labath Error error = RemoveBreakpoint (thread_info.second); 31039eb1ecb9SPavel Labath if (error.Fail()) 31049eb1ecb9SPavel Labath if (log) 31059eb1ecb9SPavel Labath log->Printf("NativeProcessLinux::%s() pid = %" PRIu64 " remove stepping breakpoint: %s", 31069eb1ecb9SPavel Labath __FUNCTION__, thread_info.first, error.AsCString()); 31079eb1ecb9SPavel Labath } 31089eb1ecb9SPavel Labath m_threads_stepping_with_breakpoint.clear(); 31099eb1ecb9SPavel Labath 31109eb1ecb9SPavel Labath // Notify the delegate about the stop 31110e1d729bSPavel Labath SetCurrentThreadID(m_pending_notification_tid); 3112ed89c7feSPavel Labath SetState(StateType::eStateStopped, true); 31130e1d729bSPavel Labath m_pending_notification_tid = LLDB_INVALID_THREAD_ID; 3114c076559aSPavel Labath } 3115c076559aSPavel Labath 3116c076559aSPavel Labath void 3117*f9077782SPavel Labath NativeProcessLinux::ThreadWasCreated(NativeThreadLinux &thread) 3118c076559aSPavel Labath { 31191dbc6c9cSPavel Labath Log *const log = GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD); 31201dbc6c9cSPavel Labath 31211dbc6c9cSPavel Labath if (log) 3122*f9077782SPavel Labath log->Printf("NativeProcessLinux::%s (tid: %" PRIu64 ")", __FUNCTION__, thread.GetID()); 31231dbc6c9cSPavel Labath 3124*f9077782SPavel Labath if (m_pending_notification_tid != LLDB_INVALID_THREAD_ID && StateIsRunningState(thread.GetState())) 3125c076559aSPavel Labath { 3126c076559aSPavel Labath // We will need to wait for this new thread to stop as well before firing the 3127c076559aSPavel Labath // notification. 3128*f9077782SPavel Labath thread.RequestStop(); 3129c076559aSPavel Labath } 3130c076559aSPavel Labath } 3131068f8a7eSTamas Berghammer 313219cbe96aSPavel Labath void 313319cbe96aSPavel Labath NativeProcessLinux::SigchldHandler() 3134068f8a7eSTamas Berghammer { 313519cbe96aSPavel Labath Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_PROCESS)); 313619cbe96aSPavel Labath // Process all pending waitpid notifications. 313719cbe96aSPavel Labath while (true) 313819cbe96aSPavel Labath { 313919cbe96aSPavel Labath int status = -1; 314019cbe96aSPavel Labath ::pid_t wait_pid = waitpid(-1, &status, __WALL | __WNOTHREAD | WNOHANG); 314119cbe96aSPavel Labath 314219cbe96aSPavel Labath if (wait_pid == 0) 314319cbe96aSPavel Labath break; // We are done. 314419cbe96aSPavel Labath 314519cbe96aSPavel Labath if (wait_pid == -1) 314619cbe96aSPavel Labath { 314719cbe96aSPavel Labath if (errno == EINTR) 314819cbe96aSPavel Labath continue; 314919cbe96aSPavel Labath 315019cbe96aSPavel Labath Error error(errno, eErrorTypePOSIX); 315119cbe96aSPavel Labath if (log) 315219cbe96aSPavel Labath log->Printf("NativeProcessLinux::%s waitpid (-1, &status, __WALL | __WNOTHREAD | WNOHANG) failed: %s", 315319cbe96aSPavel Labath __FUNCTION__, error.AsCString()); 315419cbe96aSPavel Labath break; 315519cbe96aSPavel Labath } 315619cbe96aSPavel Labath 315719cbe96aSPavel Labath bool exited = false; 315819cbe96aSPavel Labath int signal = 0; 315919cbe96aSPavel Labath int exit_status = 0; 316019cbe96aSPavel Labath const char *status_cstr = nullptr; 316119cbe96aSPavel Labath if (WIFSTOPPED(status)) 316219cbe96aSPavel Labath { 316319cbe96aSPavel Labath signal = WSTOPSIG(status); 316419cbe96aSPavel Labath status_cstr = "STOPPED"; 316519cbe96aSPavel Labath } 316619cbe96aSPavel Labath else if (WIFEXITED(status)) 316719cbe96aSPavel Labath { 316819cbe96aSPavel Labath exit_status = WEXITSTATUS(status); 316919cbe96aSPavel Labath status_cstr = "EXITED"; 317019cbe96aSPavel Labath exited = true; 317119cbe96aSPavel Labath } 317219cbe96aSPavel Labath else if (WIFSIGNALED(status)) 317319cbe96aSPavel Labath { 317419cbe96aSPavel Labath signal = WTERMSIG(status); 317519cbe96aSPavel Labath status_cstr = "SIGNALED"; 317619cbe96aSPavel Labath if (wait_pid == static_cast< ::pid_t>(GetID())) { 317719cbe96aSPavel Labath exited = true; 317819cbe96aSPavel Labath exit_status = -1; 317919cbe96aSPavel Labath } 318019cbe96aSPavel Labath } 318119cbe96aSPavel Labath else 318219cbe96aSPavel Labath status_cstr = "(\?\?\?)"; 318319cbe96aSPavel Labath 318419cbe96aSPavel Labath if (log) 318519cbe96aSPavel Labath log->Printf("NativeProcessLinux::%s: waitpid (-1, &status, __WALL | __WNOTHREAD | WNOHANG)" 318619cbe96aSPavel Labath "=> pid = %" PRIi32 ", status = 0x%8.8x (%s), signal = %i, exit_state = %i", 318719cbe96aSPavel Labath __FUNCTION__, wait_pid, status, status_cstr, signal, exit_status); 318819cbe96aSPavel Labath 318919cbe96aSPavel Labath MonitorCallback (wait_pid, exited, signal, exit_status); 319019cbe96aSPavel Labath } 3191068f8a7eSTamas Berghammer } 3192068f8a7eSTamas Berghammer 3193068f8a7eSTamas Berghammer // Wrapper for ptrace to catch errors and log calls. 3194068f8a7eSTamas Berghammer // Note that ptrace sets errno on error because -1 can be a valid result (i.e. for PTRACE_PEEK*) 31954a9babb2SPavel Labath Error 31964a9babb2SPavel Labath NativeProcessLinux::PtraceWrapper(int req, lldb::pid_t pid, void *addr, void *data, size_t data_size, long *result) 3197068f8a7eSTamas Berghammer { 31984a9babb2SPavel Labath Error error; 31994a9babb2SPavel Labath long int ret; 3200068f8a7eSTamas Berghammer 3201068f8a7eSTamas Berghammer Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_PTRACE)); 3202068f8a7eSTamas Berghammer 3203068f8a7eSTamas Berghammer PtraceDisplayBytes(req, data, data_size); 3204068f8a7eSTamas Berghammer 3205068f8a7eSTamas Berghammer errno = 0; 3206068f8a7eSTamas Berghammer if (req == PTRACE_GETREGSET || req == PTRACE_SETREGSET) 32074a9babb2SPavel Labath ret = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), *(unsigned int *)addr, data); 3208068f8a7eSTamas Berghammer else 32094a9babb2SPavel Labath ret = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), addr, data); 3210068f8a7eSTamas Berghammer 32114a9babb2SPavel Labath if (ret == -1) 3212068f8a7eSTamas Berghammer error.SetErrorToErrno(); 3213068f8a7eSTamas Berghammer 32144a9babb2SPavel Labath if (result) 32154a9babb2SPavel Labath *result = ret; 32164a9babb2SPavel Labath 3217068f8a7eSTamas Berghammer if (log) 32184a9babb2SPavel Labath log->Printf("ptrace(%d, %" PRIu64 ", %p, %p, %zu)=%lX", req, pid, addr, data, data_size, ret); 3219068f8a7eSTamas Berghammer 3220068f8a7eSTamas Berghammer PtraceDisplayBytes(req, data, data_size); 3221068f8a7eSTamas Berghammer 3222068f8a7eSTamas Berghammer if (log && error.GetError() != 0) 3223068f8a7eSTamas Berghammer { 3224068f8a7eSTamas Berghammer const char* str; 3225068f8a7eSTamas Berghammer switch (error.GetError()) 3226068f8a7eSTamas Berghammer { 3227068f8a7eSTamas Berghammer case ESRCH: str = "ESRCH"; break; 3228068f8a7eSTamas Berghammer case EINVAL: str = "EINVAL"; break; 3229068f8a7eSTamas Berghammer case EBUSY: str = "EBUSY"; break; 3230068f8a7eSTamas Berghammer case EPERM: str = "EPERM"; break; 3231068f8a7eSTamas Berghammer default: str = error.AsCString(); 3232068f8a7eSTamas Berghammer } 3233068f8a7eSTamas Berghammer log->Printf("ptrace() failed; errno=%d (%s)", error.GetError(), str); 3234068f8a7eSTamas Berghammer } 3235068f8a7eSTamas Berghammer 32364a9babb2SPavel Labath return error; 3237068f8a7eSTamas Berghammer } 3238