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 <stdint.h> 15b9c1b51eSKate Stone #include <string.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" 276edef204SOleksiy Vyalov #include "lldb/Core/ModuleSpec.h" 28af245d11STodd Fiala #include "lldb/Core/RegisterValue.h" 29af245d11STodd Fiala #include "lldb/Core/State.h" 30af245d11STodd Fiala #include "lldb/Host/Host.h" 315ad891f7SPavel Labath #include "lldb/Host/HostProcess.h" 3239de3110SZachary Turner #include "lldb/Host/ThreadLauncher.h" 332a86b555SPavel Labath #include "lldb/Host/common/NativeBreakpoint.h" 342a86b555SPavel Labath #include "lldb/Host/common/NativeRegisterContext.h" 354ee1c952SPavel Labath #include "lldb/Host/linux/Ptrace.h" 364ee1c952SPavel Labath #include "lldb/Host/linux/Uio.h" 37816ae4b0SKamil Rytarowski #include "lldb/Host/posix/ProcessLauncherPosixFork.h" 382a86b555SPavel Labath #include "lldb/Symbol/ObjectFile.h" 3990aff47cSZachary Turner #include "lldb/Target/Process.h" 40af245d11STodd Fiala #include "lldb/Target/ProcessLaunchInfo.h" 415b981ab9SPavel Labath #include "lldb/Target/Target.h" 42bf9a7730SZachary Turner #include "lldb/Utility/Error.h" 43c16f5dcaSChaoren Lin #include "lldb/Utility/LLDBAssert.h" 44af245d11STodd Fiala #include "lldb/Utility/PseudoTerminal.h" 45f805e190SPavel Labath #include "lldb/Utility/StringExtractor.h" 46af245d11STodd Fiala 47af245d11STodd Fiala #include "NativeThreadLinux.h" 48b9c1b51eSKate Stone #include "Plugins/Process/POSIX/ProcessPOSIXLog.h" 49af245d11STodd Fiala #include "ProcFileReader.h" 501e209fccSTamas Berghammer #include "Procfs.h" 51cacde7dfSTodd Fiala 524ee1c952SPavel Labath #include "llvm/Support/Threading.h" 534ee1c952SPavel Labath 54d858487eSTamas Berghammer #include <linux/unistd.h> 55d858487eSTamas Berghammer #include <sys/socket.h> 56df7c6995SPavel Labath #include <sys/syscall.h> 57d858487eSTamas Berghammer #include <sys/types.h> 58d858487eSTamas Berghammer #include <sys/user.h> 59d858487eSTamas Berghammer #include <sys/wait.h> 60d858487eSTamas Berghammer 61af245d11STodd Fiala // Support hardware breakpoints in case it has not been defined 62af245d11STodd Fiala #ifndef TRAP_HWBKPT 63af245d11STodd Fiala #define TRAP_HWBKPT 4 64af245d11STodd Fiala #endif 65af245d11STodd Fiala 667cb18bf5STamas Berghammer using namespace lldb; 677cb18bf5STamas Berghammer using namespace lldb_private; 68db264a6dSTamas Berghammer using namespace lldb_private::process_linux; 697cb18bf5STamas Berghammer using namespace llvm; 707cb18bf5STamas Berghammer 71af245d11STodd Fiala // Private bits we only need internally. 72df7c6995SPavel Labath 73b9c1b51eSKate Stone static bool ProcessVmReadvSupported() { 74df7c6995SPavel Labath static bool is_supported; 75c5f28e2aSKamil Rytarowski static llvm::once_flag flag; 76df7c6995SPavel Labath 77c5f28e2aSKamil Rytarowski llvm::call_once(flag, [] { 78a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 79df7c6995SPavel Labath 80df7c6995SPavel Labath uint32_t source = 0x47424742; 81df7c6995SPavel Labath uint32_t dest = 0; 82df7c6995SPavel Labath 83df7c6995SPavel Labath struct iovec local, remote; 84df7c6995SPavel Labath remote.iov_base = &source; 85df7c6995SPavel Labath local.iov_base = &dest; 86df7c6995SPavel Labath remote.iov_len = local.iov_len = sizeof source; 87df7c6995SPavel Labath 88b9c1b51eSKate Stone // We shall try if cross-process-memory reads work by attempting to read a 89b9c1b51eSKate Stone // value from our own process. 90df7c6995SPavel Labath ssize_t res = process_vm_readv(getpid(), &local, 1, &remote, 1, 0); 91df7c6995SPavel Labath is_supported = (res == sizeof(source) && source == dest); 92df7c6995SPavel Labath if (is_supported) 93a6321a8eSPavel Labath LLDB_LOG(log, 94a6321a8eSPavel Labath "Detected kernel support for process_vm_readv syscall. " 95a6321a8eSPavel Labath "Fast memory reads enabled."); 96df7c6995SPavel Labath else 97a6321a8eSPavel Labath LLDB_LOG(log, 98a6321a8eSPavel Labath "syscall process_vm_readv failed (error: {0}). Fast memory " 99a6321a8eSPavel Labath "reads disabled.", 100a6321a8eSPavel Labath strerror(errno)); 101df7c6995SPavel Labath }); 102df7c6995SPavel Labath 103df7c6995SPavel Labath return is_supported; 104df7c6995SPavel Labath } 105df7c6995SPavel Labath 106b9c1b51eSKate Stone namespace { 107b9c1b51eSKate Stone void MaybeLogLaunchInfo(const ProcessLaunchInfo &info) { 108a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1094abe5d69SPavel Labath if (!log) 1104abe5d69SPavel Labath return; 1114abe5d69SPavel Labath 1124abe5d69SPavel Labath if (const FileAction *action = info.GetFileActionForFD(STDIN_FILENO)) 113a6321a8eSPavel Labath LLDB_LOG(log, "setting STDIN to '{0}'", action->GetFileSpec()); 1144abe5d69SPavel Labath else 115a6321a8eSPavel Labath LLDB_LOG(log, "leaving STDIN as is"); 1164abe5d69SPavel Labath 1174abe5d69SPavel Labath if (const FileAction *action = info.GetFileActionForFD(STDOUT_FILENO)) 118a6321a8eSPavel Labath LLDB_LOG(log, "setting STDOUT to '{0}'", action->GetFileSpec()); 1194abe5d69SPavel Labath else 120a6321a8eSPavel Labath LLDB_LOG(log, "leaving STDOUT as is"); 1214abe5d69SPavel Labath 1224abe5d69SPavel Labath if (const FileAction *action = info.GetFileActionForFD(STDERR_FILENO)) 123a6321a8eSPavel Labath LLDB_LOG(log, "setting STDERR to '{0}'", action->GetFileSpec()); 1244abe5d69SPavel Labath else 125a6321a8eSPavel Labath LLDB_LOG(log, "leaving STDERR as is"); 1264abe5d69SPavel Labath 1274abe5d69SPavel Labath int i = 0; 128b9c1b51eSKate Stone for (const char **args = info.GetArguments().GetConstArgumentVector(); *args; 129b9c1b51eSKate Stone ++args, ++i) 130a6321a8eSPavel Labath LLDB_LOG(log, "arg {0}: '{1}'", i, *args); 1314abe5d69SPavel Labath } 1324abe5d69SPavel Labath 133b9c1b51eSKate Stone void DisplayBytes(StreamString &s, void *bytes, uint32_t count) { 134af245d11STodd Fiala uint8_t *ptr = (uint8_t *)bytes; 135af245d11STodd Fiala const uint32_t loop_count = std::min<uint32_t>(DEBUG_PTRACE_MAXBYTES, count); 136b9c1b51eSKate Stone for (uint32_t i = 0; i < loop_count; i++) { 137af245d11STodd Fiala s.Printf("[%x]", *ptr); 138af245d11STodd Fiala ptr++; 139af245d11STodd Fiala } 140af245d11STodd Fiala } 141af245d11STodd Fiala 142b9c1b51eSKate Stone void PtraceDisplayBytes(int &req, void *data, size_t data_size) { 143*aafe053cSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PTRACE)); 144a6321a8eSPavel Labath if (!log) 145a6321a8eSPavel Labath return; 146af245d11STodd Fiala StreamString buf; 147af245d11STodd Fiala 148b9c1b51eSKate Stone switch (req) { 149b9c1b51eSKate Stone case PTRACE_POKETEXT: { 150af245d11STodd Fiala DisplayBytes(buf, &data, 8); 151*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_POKETEXT {0}", buf.GetData()); 152af245d11STodd Fiala break; 153af245d11STodd Fiala } 154b9c1b51eSKate Stone case PTRACE_POKEDATA: { 155af245d11STodd Fiala DisplayBytes(buf, &data, 8); 156*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_POKEDATA {0}", buf.GetData()); 157af245d11STodd Fiala break; 158af245d11STodd Fiala } 159b9c1b51eSKate Stone case PTRACE_POKEUSER: { 160af245d11STodd Fiala DisplayBytes(buf, &data, 8); 161*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_POKEUSER {0}", buf.GetData()); 162af245d11STodd Fiala break; 163af245d11STodd Fiala } 164b9c1b51eSKate Stone case PTRACE_SETREGS: { 165af245d11STodd Fiala DisplayBytes(buf, data, data_size); 166*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_SETREGS {0}", buf.GetData()); 167af245d11STodd Fiala break; 168af245d11STodd Fiala } 169b9c1b51eSKate Stone case PTRACE_SETFPREGS: { 170af245d11STodd Fiala DisplayBytes(buf, data, data_size); 171*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_SETFPREGS {0}", buf.GetData()); 172af245d11STodd Fiala break; 173af245d11STodd Fiala } 174b9c1b51eSKate Stone case PTRACE_SETSIGINFO: { 175af245d11STodd Fiala DisplayBytes(buf, data, sizeof(siginfo_t)); 176*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_SETSIGINFO {0}", buf.GetData()); 177af245d11STodd Fiala break; 178af245d11STodd Fiala } 179b9c1b51eSKate Stone case PTRACE_SETREGSET: { 180af245d11STodd Fiala // Extract iov_base from data, which is a pointer to the struct IOVEC 181af245d11STodd Fiala DisplayBytes(buf, *(void **)data, data_size); 182*aafe053cSPavel Labath LLDB_LOGV(log, "PTRACE_SETREGSET {0}", buf.GetData()); 183af245d11STodd Fiala break; 184af245d11STodd Fiala } 185b9c1b51eSKate Stone default: {} 186af245d11STodd Fiala } 187af245d11STodd Fiala } 188af245d11STodd Fiala 18919cbe96aSPavel Labath static constexpr unsigned k_ptrace_word_size = sizeof(void *); 190b9c1b51eSKate Stone static_assert(sizeof(long) >= k_ptrace_word_size, 191b9c1b51eSKate Stone "Size of long must be larger than ptrace word size"); 1921107b5a5SPavel Labath } // end of anonymous namespace 1931107b5a5SPavel Labath 194bd7cbc5aSPavel Labath // Simple helper function to ensure flags are enabled on the given file 195bd7cbc5aSPavel Labath // descriptor. 196b9c1b51eSKate Stone static Error EnsureFDFlags(int fd, int flags) { 197bd7cbc5aSPavel Labath Error error; 198bd7cbc5aSPavel Labath 199bd7cbc5aSPavel Labath int status = fcntl(fd, F_GETFL); 200b9c1b51eSKate Stone if (status == -1) { 201bd7cbc5aSPavel Labath error.SetErrorToErrno(); 202bd7cbc5aSPavel Labath return error; 203bd7cbc5aSPavel Labath } 204bd7cbc5aSPavel Labath 205b9c1b51eSKate Stone if (fcntl(fd, F_SETFL, status | flags) == -1) { 206bd7cbc5aSPavel Labath error.SetErrorToErrno(); 207bd7cbc5aSPavel Labath return error; 208bd7cbc5aSPavel Labath } 209bd7cbc5aSPavel Labath 210bd7cbc5aSPavel Labath return error; 211bd7cbc5aSPavel Labath } 212bd7cbc5aSPavel Labath 213af245d11STodd Fiala // ----------------------------------------------------------------------------- 214af245d11STodd Fiala // Public Static Methods 215af245d11STodd Fiala // ----------------------------------------------------------------------------- 216af245d11STodd Fiala 217b9c1b51eSKate Stone Error NativeProcessProtocol::Launch( 218db264a6dSTamas Berghammer ProcessLaunchInfo &launch_info, 219b9c1b51eSKate Stone NativeProcessProtocol::NativeDelegate &native_delegate, MainLoop &mainloop, 220b9c1b51eSKate Stone NativeProcessProtocolSP &native_process_sp) { 221a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 222af245d11STodd Fiala 2232a86b555SPavel Labath Error error; 224af245d11STodd Fiala 225af245d11STodd Fiala // Verify the working directory is valid if one was specified. 226d3173f34SChaoren Lin FileSpec working_dir{launch_info.GetWorkingDirectory()}; 227d3173f34SChaoren Lin if (working_dir && 228d3173f34SChaoren Lin (!working_dir.ResolvePath() || 229b9c1b51eSKate Stone working_dir.GetFileType() != FileSpec::eFileTypeDirectory)) { 230d3173f34SChaoren Lin error.SetErrorStringWithFormat("No such file or directory: %s", 231d3173f34SChaoren Lin working_dir.GetCString()); 232af245d11STodd Fiala return error; 233af245d11STodd Fiala } 234af245d11STodd Fiala 235af245d11STodd Fiala // Create the NativeProcessLinux in launch mode. 236af245d11STodd Fiala native_process_sp.reset(new NativeProcessLinux()); 237af245d11STodd Fiala 238b9c1b51eSKate Stone if (!native_process_sp->RegisterNativeDelegate(native_delegate)) { 239af245d11STodd Fiala native_process_sp.reset(); 240af245d11STodd Fiala error.SetErrorStringWithFormat("failed to register the native delegate"); 241af245d11STodd Fiala return error; 242af245d11STodd Fiala } 243af245d11STodd Fiala 244b9c1b51eSKate Stone error = std::static_pointer_cast<NativeProcessLinux>(native_process_sp) 245b9c1b51eSKate Stone ->LaunchInferior(mainloop, launch_info); 246af245d11STodd Fiala 247b9c1b51eSKate Stone if (error.Fail()) { 248af245d11STodd Fiala native_process_sp.reset(); 249a6321a8eSPavel Labath LLDB_LOG(log, "failed to launch process: {0}", error); 250af245d11STodd Fiala return error; 251af245d11STodd Fiala } 252af245d11STodd Fiala 253af245d11STodd Fiala launch_info.SetProcessID(native_process_sp->GetID()); 254af245d11STodd Fiala 255af245d11STodd Fiala return error; 256af245d11STodd Fiala } 257af245d11STodd Fiala 258b9c1b51eSKate Stone Error NativeProcessProtocol::Attach( 259b9c1b51eSKate Stone lldb::pid_t pid, NativeProcessProtocol::NativeDelegate &native_delegate, 260b9c1b51eSKate Stone MainLoop &mainloop, NativeProcessProtocolSP &native_process_sp) { 261a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 262a6321a8eSPavel Labath LLDB_LOG(log, "pid = {0:x}", pid); 263af245d11STodd Fiala 264af245d11STodd Fiala // Retrieve the architecture for the running process. 265af245d11STodd Fiala ArchSpec process_arch; 2662a86b555SPavel Labath Error error = ResolveProcessArchitecture(pid, process_arch); 267af245d11STodd Fiala if (!error.Success()) 268af245d11STodd Fiala return error; 269af245d11STodd Fiala 270b9c1b51eSKate Stone std::shared_ptr<NativeProcessLinux> native_process_linux_sp( 271b9c1b51eSKate Stone new NativeProcessLinux()); 272af245d11STodd Fiala 273b9c1b51eSKate Stone if (!native_process_linux_sp->RegisterNativeDelegate(native_delegate)) { 274af245d11STodd Fiala error.SetErrorStringWithFormat("failed to register the native delegate"); 275af245d11STodd Fiala return error; 276af245d11STodd Fiala } 277af245d11STodd Fiala 27819cbe96aSPavel Labath native_process_linux_sp->AttachToInferior(mainloop, pid, error); 279af245d11STodd Fiala if (!error.Success()) 280af245d11STodd Fiala return error; 281af245d11STodd Fiala 2821339b5e8SOleksiy Vyalov native_process_sp = native_process_linux_sp; 283af245d11STodd Fiala return error; 284af245d11STodd Fiala } 285af245d11STodd Fiala 286af245d11STodd Fiala // ----------------------------------------------------------------------------- 287af245d11STodd Fiala // Public Instance Methods 288af245d11STodd Fiala // ----------------------------------------------------------------------------- 289af245d11STodd Fiala 290b9c1b51eSKate Stone NativeProcessLinux::NativeProcessLinux() 291b9c1b51eSKate Stone : NativeProcessProtocol(LLDB_INVALID_PROCESS_ID), m_arch(), 292b9c1b51eSKate Stone m_supports_mem_region(eLazyBoolCalculate), m_mem_region_cache(), 293b9c1b51eSKate Stone m_pending_notification_tid(LLDB_INVALID_THREAD_ID) {} 294af245d11STodd Fiala 295b9c1b51eSKate Stone void NativeProcessLinux::AttachToInferior(MainLoop &mainloop, lldb::pid_t pid, 296b9c1b51eSKate Stone Error &error) { 297a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 298a6321a8eSPavel Labath LLDB_LOG(log, "pid = {0:x}", pid); 299af245d11STodd Fiala 300b9c1b51eSKate Stone m_sigchld_handle = mainloop.RegisterSignal( 301b9c1b51eSKate Stone SIGCHLD, [this](MainLoopBase &) { SigchldHandler(); }, error); 30219cbe96aSPavel Labath if (!m_sigchld_handle) 30319cbe96aSPavel Labath return; 30419cbe96aSPavel Labath 3052a86b555SPavel Labath error = ResolveProcessArchitecture(pid, m_arch); 306af245d11STodd Fiala if (!error.Success()) 307af245d11STodd Fiala return; 308af245d11STodd Fiala 309af245d11STodd Fiala // Set the architecture to the exe architecture. 310a6321a8eSPavel Labath LLDB_LOG(log, "pid = {0:x}, detected architecture {1}", pid, 311a6321a8eSPavel Labath m_arch.GetArchitectureName()); 312af245d11STodd Fiala m_pid = pid; 313af245d11STodd Fiala SetState(eStateAttaching); 314af245d11STodd Fiala 31519cbe96aSPavel Labath Attach(pid, error); 316af245d11STodd Fiala } 317af245d11STodd Fiala 318b9c1b51eSKate Stone Error NativeProcessLinux::LaunchInferior(MainLoop &mainloop, 319b9c1b51eSKate Stone ProcessLaunchInfo &launch_info) { 3204abe5d69SPavel Labath Error error; 321b9c1b51eSKate Stone m_sigchld_handle = mainloop.RegisterSignal( 322b9c1b51eSKate Stone SIGCHLD, [this](MainLoopBase &) { SigchldHandler(); }, error); 3234abe5d69SPavel Labath if (!m_sigchld_handle) 3244abe5d69SPavel Labath return error; 3254abe5d69SPavel Labath 3264abe5d69SPavel Labath SetState(eStateLaunching); 3270c4f01d4SPavel Labath 3284abe5d69SPavel Labath MaybeLogLaunchInfo(launch_info); 3294abe5d69SPavel Labath 330b9c1b51eSKate Stone ::pid_t pid = 331816ae4b0SKamil Rytarowski ProcessLauncherPosixFork().LaunchProcess(launch_info, error).GetProcessId(); 3325ad891f7SPavel Labath if (error.Fail()) 3334abe5d69SPavel Labath return error; 3340c4f01d4SPavel Labath 335a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 33675f47c3aSTodd Fiala 337af245d11STodd Fiala // Wait for the child process to trap on its call to execve. 338af245d11STodd Fiala ::pid_t wpid; 339af245d11STodd Fiala int status; 340b9c1b51eSKate Stone if ((wpid = waitpid(pid, &status, 0)) < 0) { 341bd7cbc5aSPavel Labath error.SetErrorToErrno(); 342a6321a8eSPavel Labath LLDB_LOG(log, "waitpid for inferior failed with %s", error); 343af245d11STodd Fiala 344af245d11STodd Fiala // Mark the inferior as invalid. 345b9c1b51eSKate Stone // FIXME this could really use a new state - eStateLaunchFailure. For now, 346b9c1b51eSKate Stone // using eStateInvalid. 347bd7cbc5aSPavel Labath SetState(StateType::eStateInvalid); 348af245d11STodd Fiala 3494abe5d69SPavel Labath return error; 350af245d11STodd Fiala } 351af245d11STodd Fiala assert(WIFSTOPPED(status) && (wpid == static_cast<::pid_t>(pid)) && 352af245d11STodd Fiala "Could not sync with inferior process."); 353af245d11STodd Fiala 354a6321a8eSPavel Labath LLDB_LOG(log, "inferior started, now in stopped state"); 355bd7cbc5aSPavel Labath error = SetDefaultPtraceOpts(pid); 356b9c1b51eSKate Stone if (error.Fail()) { 357a6321a8eSPavel Labath LLDB_LOG(log, "failed to set default ptrace options: {0}", error); 358af245d11STodd Fiala 359af245d11STodd Fiala // Mark the inferior as invalid. 360b9c1b51eSKate Stone // FIXME this could really use a new state - eStateLaunchFailure. For now, 361b9c1b51eSKate Stone // using eStateInvalid. 362bd7cbc5aSPavel Labath SetState(StateType::eStateInvalid); 363af245d11STodd Fiala 3644abe5d69SPavel Labath return error; 365af245d11STodd Fiala } 366af245d11STodd Fiala 367af245d11STodd Fiala // Release the master terminal descriptor and pass it off to the 368af245d11STodd Fiala // NativeProcessLinux instance. Similarly stash the inferior pid. 3695ad891f7SPavel Labath m_terminal_fd = launch_info.GetPTY().ReleaseMasterFileDescriptor(); 370bd7cbc5aSPavel Labath m_pid = pid; 3714abe5d69SPavel Labath launch_info.SetProcessID(pid); 372af245d11STodd Fiala 373b9c1b51eSKate Stone if (m_terminal_fd != -1) { 374bd7cbc5aSPavel Labath error = EnsureFDFlags(m_terminal_fd, O_NONBLOCK); 375b9c1b51eSKate Stone if (error.Fail()) { 376a6321a8eSPavel Labath LLDB_LOG(log, 377a6321a8eSPavel Labath "inferior EnsureFDFlags failed for ensuring terminal " 378a6321a8eSPavel Labath "O_NONBLOCK setting: {0}", 379a6321a8eSPavel Labath error); 380af245d11STodd Fiala 381af245d11STodd Fiala // Mark the inferior as invalid. 382b9c1b51eSKate Stone // FIXME this could really use a new state - eStateLaunchFailure. For 383b9c1b51eSKate Stone // now, using eStateInvalid. 384bd7cbc5aSPavel Labath SetState(StateType::eStateInvalid); 385af245d11STodd Fiala 3864abe5d69SPavel Labath return error; 387af245d11STodd Fiala } 3885ad891f7SPavel Labath } 389af245d11STodd Fiala 390a6321a8eSPavel Labath LLDB_LOG(log, "adding pid = {0}", pid); 3912a86b555SPavel Labath ResolveProcessArchitecture(m_pid, m_arch); 392f9077782SPavel Labath NativeThreadLinuxSP thread_sp = AddThread(pid); 393af245d11STodd Fiala assert(thread_sp && "AddThread() returned a nullptr thread"); 394f9077782SPavel Labath thread_sp->SetStoppedBySignal(SIGSTOP); 395f9077782SPavel Labath ThreadWasCreated(*thread_sp); 396af245d11STodd Fiala 397af245d11STodd Fiala // Let our process instance know the thread has stopped. 398bd7cbc5aSPavel Labath SetCurrentThreadID(thread_sp->GetID()); 399bd7cbc5aSPavel Labath SetState(StateType::eStateStopped); 400af245d11STodd Fiala 401a6321a8eSPavel Labath if (error.Fail()) 402a6321a8eSPavel Labath LLDB_LOG(log, "inferior launching failed {0}", error); 4034abe5d69SPavel Labath return error; 404af245d11STodd Fiala } 405af245d11STodd Fiala 406b9c1b51eSKate Stone ::pid_t NativeProcessLinux::Attach(lldb::pid_t pid, Error &error) { 407a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 408af245d11STodd Fiala 409b9c1b51eSKate Stone // Use a map to keep track of the threads which we have attached/need to 410b9c1b51eSKate Stone // attach. 411af245d11STodd Fiala Host::TidMap tids_to_attach; 412b9c1b51eSKate Stone if (pid <= 1) { 413bd7cbc5aSPavel Labath error.SetErrorToGenericError(); 414bd7cbc5aSPavel Labath error.SetErrorString("Attaching to process 1 is not allowed."); 415bd7cbc5aSPavel Labath return -1; 416af245d11STodd Fiala } 417af245d11STodd Fiala 418b9c1b51eSKate Stone while (Host::FindProcessThreads(pid, tids_to_attach)) { 419af245d11STodd Fiala for (Host::TidMap::iterator it = tids_to_attach.begin(); 420b9c1b51eSKate Stone it != tids_to_attach.end();) { 421b9c1b51eSKate Stone if (it->second == false) { 422af245d11STodd Fiala lldb::tid_t tid = it->first; 423af245d11STodd Fiala 424af245d11STodd Fiala // Attach to the requested process. 425af245d11STodd Fiala // An attach will cause the thread to stop with a SIGSTOP. 4264a9babb2SPavel Labath error = PtraceWrapper(PTRACE_ATTACH, tid); 427b9c1b51eSKate Stone if (error.Fail()) { 428af245d11STodd Fiala // No such thread. The thread may have exited. 429af245d11STodd Fiala // More error handling may be needed. 430b9c1b51eSKate Stone if (error.GetError() == ESRCH) { 431af245d11STodd Fiala it = tids_to_attach.erase(it); 432af245d11STodd Fiala continue; 433b9c1b51eSKate Stone } else 434bd7cbc5aSPavel Labath return -1; 435af245d11STodd Fiala } 436af245d11STodd Fiala 437af245d11STodd Fiala int status; 438af245d11STodd Fiala // Need to use __WALL otherwise we receive an error with errno=ECHLD 439af245d11STodd Fiala // At this point we should have a thread stopped if waitpid succeeds. 440b9c1b51eSKate Stone if ((status = waitpid(tid, NULL, __WALL)) < 0) { 441af245d11STodd Fiala // No such thread. The thread may have exited. 442af245d11STodd Fiala // More error handling may be needed. 443b9c1b51eSKate Stone if (errno == ESRCH) { 444af245d11STodd Fiala it = tids_to_attach.erase(it); 445af245d11STodd Fiala continue; 446b9c1b51eSKate Stone } else { 447bd7cbc5aSPavel Labath error.SetErrorToErrno(); 448bd7cbc5aSPavel Labath return -1; 449af245d11STodd Fiala } 450af245d11STodd Fiala } 451af245d11STodd Fiala 452bd7cbc5aSPavel Labath error = SetDefaultPtraceOpts(tid); 453bd7cbc5aSPavel Labath if (error.Fail()) 454bd7cbc5aSPavel Labath return -1; 455af245d11STodd Fiala 456a6321a8eSPavel Labath LLDB_LOG(log, "adding tid = {0}", tid); 457af245d11STodd Fiala it->second = true; 458af245d11STodd Fiala 459af245d11STodd Fiala // Create the thread, mark it as stopped. 460f9077782SPavel Labath NativeThreadLinuxSP thread_sp(AddThread(static_cast<lldb::tid_t>(tid))); 461af245d11STodd Fiala assert(thread_sp && "AddThread() returned a nullptr"); 462fa03ad2eSChaoren Lin 463b9c1b51eSKate Stone // This will notify this is a new thread and tell the system it is 464b9c1b51eSKate Stone // stopped. 465f9077782SPavel Labath thread_sp->SetStoppedBySignal(SIGSTOP); 466f9077782SPavel Labath ThreadWasCreated(*thread_sp); 467bd7cbc5aSPavel Labath SetCurrentThreadID(thread_sp->GetID()); 468af245d11STodd Fiala } 469af245d11STodd Fiala 470af245d11STodd Fiala // move the loop forward 471af245d11STodd Fiala ++it; 472af245d11STodd Fiala } 473af245d11STodd Fiala } 474af245d11STodd Fiala 475b9c1b51eSKate Stone if (tids_to_attach.size() > 0) { 476bd7cbc5aSPavel Labath m_pid = pid; 477af245d11STodd Fiala // Let our process instance know the thread has stopped. 478bd7cbc5aSPavel Labath SetState(StateType::eStateStopped); 479b9c1b51eSKate Stone } else { 480bd7cbc5aSPavel Labath error.SetErrorToGenericError(); 481bd7cbc5aSPavel Labath error.SetErrorString("No such process."); 482bd7cbc5aSPavel Labath return -1; 483af245d11STodd Fiala } 484af245d11STodd Fiala 485bd7cbc5aSPavel Labath return pid; 486af245d11STodd Fiala } 487af245d11STodd Fiala 488b9c1b51eSKate Stone Error NativeProcessLinux::SetDefaultPtraceOpts(lldb::pid_t pid) { 489af245d11STodd Fiala long ptrace_opts = 0; 490af245d11STodd Fiala 491af245d11STodd Fiala // Have the child raise an event on exit. This is used to keep the child in 492af245d11STodd Fiala // limbo until it is destroyed. 493af245d11STodd Fiala ptrace_opts |= PTRACE_O_TRACEEXIT; 494af245d11STodd Fiala 495af245d11STodd Fiala // Have the tracer trace threads which spawn in the inferior process. 496af245d11STodd Fiala // TODO: if we want to support tracing the inferiors' child, add the 497af245d11STodd Fiala // appropriate ptrace flags here (PTRACE_O_TRACEFORK, PTRACE_O_TRACEVFORK) 498af245d11STodd Fiala ptrace_opts |= PTRACE_O_TRACECLONE; 499af245d11STodd Fiala 500af245d11STodd Fiala // Have the tracer notify us before execve returns 501af245d11STodd Fiala // (needed to disable legacy SIGTRAP generation) 502af245d11STodd Fiala ptrace_opts |= PTRACE_O_TRACEEXEC; 503af245d11STodd Fiala 5044a9babb2SPavel Labath return PtraceWrapper(PTRACE_SETOPTIONS, pid, nullptr, (void *)ptrace_opts); 505af245d11STodd Fiala } 506af245d11STodd Fiala 507b9c1b51eSKate Stone static ExitType convert_pid_status_to_exit_type(int status) { 508af245d11STodd Fiala if (WIFEXITED(status)) 509af245d11STodd Fiala return ExitType::eExitTypeExit; 510af245d11STodd Fiala else if (WIFSIGNALED(status)) 511af245d11STodd Fiala return ExitType::eExitTypeSignal; 512af245d11STodd Fiala else if (WIFSTOPPED(status)) 513af245d11STodd Fiala return ExitType::eExitTypeStop; 514b9c1b51eSKate Stone else { 515af245d11STodd Fiala // We don't know what this is. 516af245d11STodd Fiala return ExitType::eExitTypeInvalid; 517af245d11STodd Fiala } 518af245d11STodd Fiala } 519af245d11STodd Fiala 520b9c1b51eSKate Stone static int convert_pid_status_to_return_code(int status) { 521af245d11STodd Fiala if (WIFEXITED(status)) 522af245d11STodd Fiala return WEXITSTATUS(status); 523af245d11STodd Fiala else if (WIFSIGNALED(status)) 524af245d11STodd Fiala return WTERMSIG(status); 525af245d11STodd Fiala else if (WIFSTOPPED(status)) 526af245d11STodd Fiala return WSTOPSIG(status); 527b9c1b51eSKate Stone else { 528af245d11STodd Fiala // We don't know what this is. 529af245d11STodd Fiala return ExitType::eExitTypeInvalid; 530af245d11STodd Fiala } 531af245d11STodd Fiala } 532af245d11STodd Fiala 5331107b5a5SPavel Labath // Handles all waitpid events from the inferior process. 534b9c1b51eSKate Stone void NativeProcessLinux::MonitorCallback(lldb::pid_t pid, bool exited, 535b9c1b51eSKate Stone int signal, int status) { 536af245d11STodd Fiala Log *log(GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS)); 537af245d11STodd Fiala 538b9c1b51eSKate Stone // Certain activities differ based on whether the pid is the tid of the main 539b9c1b51eSKate Stone // thread. 5401107b5a5SPavel Labath const bool is_main_thread = (pid == GetID()); 541af245d11STodd Fiala 542af245d11STodd Fiala // Handle when the thread exits. 543b9c1b51eSKate Stone if (exited) { 544a6321a8eSPavel Labath LLDB_LOG(log, "got exit signal({0}) , tid = {1} ({2} main thread)", signal, 545a6321a8eSPavel Labath pid, is_main_thread ? "is" : "is not"); 546af245d11STodd Fiala 547af245d11STodd Fiala // This is a thread that exited. Ensure we're not tracking it anymore. 5481107b5a5SPavel Labath const bool thread_found = StopTrackingThread(pid); 549af245d11STodd Fiala 550b9c1b51eSKate Stone if (is_main_thread) { 551b9c1b51eSKate Stone // We only set the exit status and notify the delegate if we haven't 552b9c1b51eSKate Stone // already set the process 553b9c1b51eSKate Stone // state to an exited state. We normally should have received a SIGTRAP | 554b9c1b51eSKate Stone // (PTRACE_EVENT_EXIT << 8) 555af245d11STodd Fiala // for the main thread. 556b9c1b51eSKate Stone const bool already_notified = (GetState() == StateType::eStateExited) || 557b9c1b51eSKate Stone (GetState() == StateType::eStateCrashed); 558b9c1b51eSKate Stone if (!already_notified) { 559a6321a8eSPavel Labath LLDB_LOG( 560a6321a8eSPavel Labath log, 561a6321a8eSPavel Labath "tid = {0} handling main thread exit ({1}), expected exit state " 562a6321a8eSPavel Labath "already set but state was {2} instead, setting exit state now", 563a6321a8eSPavel Labath pid, 564b9c1b51eSKate Stone thread_found ? "stopped tracking thread metadata" 565b9c1b51eSKate Stone : "thread metadata not found", 5668198db30SPavel Labath GetState()); 567af245d11STodd Fiala // The main thread exited. We're done monitoring. Report to delegate. 568b9c1b51eSKate Stone SetExitStatus(convert_pid_status_to_exit_type(status), 569b9c1b51eSKate Stone convert_pid_status_to_return_code(status), nullptr, true); 570af245d11STodd Fiala 571af245d11STodd Fiala // Notify delegate that our process has exited. 5721107b5a5SPavel Labath SetState(StateType::eStateExited, true); 573a6321a8eSPavel Labath } else 574a6321a8eSPavel Labath LLDB_LOG(log, "tid = {0} main thread now exited (%s)", pid, 575b9c1b51eSKate Stone thread_found ? "stopped tracking thread metadata" 576b9c1b51eSKate Stone : "thread metadata not found"); 577b9c1b51eSKate Stone } else { 578b9c1b51eSKate Stone // Do we want to report to the delegate in this case? I think not. If 579a6321a8eSPavel Labath // this was an orderly thread exit, we would already have received the 580a6321a8eSPavel Labath // SIGTRAP | (PTRACE_EVENT_EXIT << 8) signal, and we would have done an 581a6321a8eSPavel Labath // all-stop then. 582a6321a8eSPavel Labath LLDB_LOG(log, "tid = {0} handling non-main thread exit (%s)", pid, 583b9c1b51eSKate Stone thread_found ? "stopped tracking thread metadata" 584b9c1b51eSKate Stone : "thread metadata not found"); 585af245d11STodd Fiala } 5861107b5a5SPavel Labath return; 587af245d11STodd Fiala } 588af245d11STodd Fiala 589af245d11STodd Fiala siginfo_t info; 590b9cc0c75SPavel Labath const auto info_err = GetSignalInfo(pid, &info); 591b9cc0c75SPavel Labath auto thread_sp = GetThreadByID(pid); 592b9cc0c75SPavel Labath 593b9c1b51eSKate Stone if (!thread_sp) { 594b9c1b51eSKate Stone // Normally, the only situation when we cannot find the thread is if we have 595a6321a8eSPavel Labath // just received a new thread notification. This is indicated by 596a6321a8eSPavel Labath // GetSignalInfo() returning si_code == SI_USER and si_pid == 0 597a6321a8eSPavel Labath LLDB_LOG(log, "received notification about an unknown tid {0}.", pid); 598b9cc0c75SPavel Labath 599b9c1b51eSKate Stone if (info_err.Fail()) { 600a6321a8eSPavel Labath LLDB_LOG(log, 601a6321a8eSPavel Labath "(tid {0}) GetSignalInfo failed ({1}). " 602a6321a8eSPavel Labath "Ingoring this notification.", 603a6321a8eSPavel Labath pid, info_err); 604b9cc0c75SPavel Labath return; 605b9cc0c75SPavel Labath } 606b9cc0c75SPavel Labath 607a6321a8eSPavel Labath LLDB_LOG(log, "tid {0}, si_code: {1}, si_pid: {2}", pid, info.si_code, 608a6321a8eSPavel Labath info.si_pid); 609b9cc0c75SPavel Labath 610b9cc0c75SPavel Labath auto thread_sp = AddThread(pid); 611b9cc0c75SPavel Labath // Resume the newly created thread. 612b9cc0c75SPavel Labath ResumeThread(*thread_sp, eStateRunning, LLDB_INVALID_SIGNAL_NUMBER); 613b9cc0c75SPavel Labath ThreadWasCreated(*thread_sp); 614b9cc0c75SPavel Labath return; 615b9cc0c75SPavel Labath } 616b9cc0c75SPavel Labath 617b9cc0c75SPavel Labath // Get details on the signal raised. 618b9c1b51eSKate Stone if (info_err.Success()) { 619fa03ad2eSChaoren Lin // We have retrieved the signal info. Dispatch appropriately. 620fa03ad2eSChaoren Lin if (info.si_signo == SIGTRAP) 621b9cc0c75SPavel Labath MonitorSIGTRAP(info, *thread_sp); 622fa03ad2eSChaoren Lin else 623b9cc0c75SPavel Labath MonitorSignal(info, *thread_sp, exited); 624b9c1b51eSKate Stone } else { 625b9c1b51eSKate Stone if (info_err.GetError() == EINVAL) { 626fa03ad2eSChaoren Lin // This is a group stop reception for this tid. 627b9c1b51eSKate Stone // We can reach here if we reinject SIGSTOP, SIGSTP, SIGTTIN or SIGTTOU 628a6321a8eSPavel Labath // into the tracee, triggering the group-stop mechanism. Normally 629a6321a8eSPavel Labath // receiving these would stop the process, pending a SIGCONT. Simulating 630a6321a8eSPavel Labath // this state in a debugger is hard and is generally not needed (one use 631a6321a8eSPavel Labath // case is debugging background task being managed by a shell). For 632a6321a8eSPavel Labath // general use, it is sufficient to stop the process in a signal-delivery 633b9c1b51eSKate Stone // stop which happens before the group stop. This done by MonitorSignal 634a6321a8eSPavel Labath // and works correctly for all signals. 635a6321a8eSPavel Labath LLDB_LOG(log, 636a6321a8eSPavel Labath "received a group stop for pid {0} tid {1}. Transparent " 637a6321a8eSPavel Labath "handling of group stops not supported, resuming the " 638a6321a8eSPavel Labath "thread.", 639a6321a8eSPavel Labath GetID(), pid); 640b9c1b51eSKate Stone ResumeThread(*thread_sp, thread_sp->GetState(), 641b9c1b51eSKate Stone LLDB_INVALID_SIGNAL_NUMBER); 642b9c1b51eSKate Stone } else { 643af245d11STodd Fiala // ptrace(GETSIGINFO) failed (but not due to group-stop). 644af245d11STodd Fiala 645b9c1b51eSKate Stone // A return value of ESRCH means the thread/process is no longer on the 646a6321a8eSPavel Labath // system, so it was killed somehow outside of our control. Either way, 647a6321a8eSPavel Labath // we can't do anything with it anymore. 648af245d11STodd Fiala 649b9c1b51eSKate Stone // Stop tracking the metadata for the thread since it's entirely off the 650b9c1b51eSKate Stone // system now. 6511107b5a5SPavel Labath const bool thread_found = StopTrackingThread(pid); 652af245d11STodd Fiala 653a6321a8eSPavel Labath LLDB_LOG(log, 654a6321a8eSPavel Labath "GetSignalInfo failed: {0}, tid = {1}, signal = {2}, " 655a6321a8eSPavel Labath "status = {3}, main_thread = {4}, thread_found: {5}", 656a6321a8eSPavel Labath info_err, pid, signal, status, is_main_thread, thread_found); 657af245d11STodd Fiala 658b9c1b51eSKate Stone if (is_main_thread) { 659b9c1b51eSKate Stone // Notify the delegate - our process is not available but appears to 660b9c1b51eSKate Stone // have been killed outside 661af245d11STodd Fiala // our control. Is eStateExited the right exit state in this case? 662b9c1b51eSKate Stone SetExitStatus(convert_pid_status_to_exit_type(status), 663b9c1b51eSKate Stone convert_pid_status_to_return_code(status), nullptr, true); 6641107b5a5SPavel Labath SetState(StateType::eStateExited, true); 665b9c1b51eSKate Stone } else { 666b9c1b51eSKate Stone // This thread was pulled out from underneath us. Anything to do here? 667b9c1b51eSKate Stone // Do we want to do an all stop? 668a6321a8eSPavel Labath LLDB_LOG(log, 669a6321a8eSPavel Labath "pid {0} tid {1} non-main thread exit occurred, didn't " 670a6321a8eSPavel Labath "tell delegate anything since thread disappeared out " 671a6321a8eSPavel Labath "from underneath us", 672a6321a8eSPavel Labath GetID(), pid); 673af245d11STodd Fiala } 674af245d11STodd Fiala } 675af245d11STodd Fiala } 676af245d11STodd Fiala } 677af245d11STodd Fiala 678b9c1b51eSKate Stone void NativeProcessLinux::WaitForNewThread(::pid_t tid) { 679a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 680426bdf88SPavel Labath 681f9077782SPavel Labath NativeThreadLinuxSP new_thread_sp = GetThreadByID(tid); 682426bdf88SPavel Labath 683b9c1b51eSKate Stone if (new_thread_sp) { 684b9c1b51eSKate Stone // We are already tracking the thread - we got the event on the new thread 685b9c1b51eSKate Stone // (see 686426bdf88SPavel Labath // MonitorSignal) before this one. We are done. 687426bdf88SPavel Labath return; 688426bdf88SPavel Labath } 689426bdf88SPavel Labath 690426bdf88SPavel Labath // The thread is not tracked yet, let's wait for it to appear. 691426bdf88SPavel Labath int status = -1; 692426bdf88SPavel Labath ::pid_t wait_pid; 693b9c1b51eSKate Stone do { 694a6321a8eSPavel Labath LLDB_LOG(log, 695a6321a8eSPavel Labath "received thread creation event for tid {0}. tid not tracked " 696a6321a8eSPavel Labath "yet, waiting for thread to appear...", 697a6321a8eSPavel Labath tid); 698426bdf88SPavel Labath wait_pid = waitpid(tid, &status, __WALL); 699b9c1b51eSKate Stone } while (wait_pid == -1 && errno == EINTR); 700b9c1b51eSKate Stone // Since we are waiting on a specific tid, this must be the creation event. 701a6321a8eSPavel Labath // But let's do some checks just in case. 702426bdf88SPavel Labath if (wait_pid != tid) { 703a6321a8eSPavel Labath LLDB_LOG(log, 704a6321a8eSPavel Labath "waiting for tid {0} failed. Assuming the thread has " 705a6321a8eSPavel Labath "disappeared in the meantime", 706a6321a8eSPavel Labath tid); 707426bdf88SPavel Labath // The only way I know of this could happen is if the whole process was 708b9c1b51eSKate Stone // SIGKILLed in the mean time. In any case, we can't do anything about that 709b9c1b51eSKate Stone // now. 710426bdf88SPavel Labath return; 711426bdf88SPavel Labath } 712b9c1b51eSKate Stone if (WIFEXITED(status)) { 713a6321a8eSPavel Labath LLDB_LOG(log, 714a6321a8eSPavel Labath "waiting for tid {0} returned an 'exited' event. Not " 715a6321a8eSPavel Labath "tracking the thread.", 716a6321a8eSPavel Labath tid); 717426bdf88SPavel Labath // Also a very improbable event. 718426bdf88SPavel Labath return; 719426bdf88SPavel Labath } 720426bdf88SPavel Labath 721a6321a8eSPavel Labath LLDB_LOG(log, "pid = {0}: tracking new thread tid {1}", GetID(), tid); 722f9077782SPavel Labath new_thread_sp = AddThread(tid); 723b9cc0c75SPavel Labath ResumeThread(*new_thread_sp, eStateRunning, LLDB_INVALID_SIGNAL_NUMBER); 724f9077782SPavel Labath ThreadWasCreated(*new_thread_sp); 725426bdf88SPavel Labath } 726426bdf88SPavel Labath 727b9c1b51eSKate Stone void NativeProcessLinux::MonitorSIGTRAP(const siginfo_t &info, 728b9c1b51eSKate Stone NativeThreadLinux &thread) { 729a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 730b9cc0c75SPavel Labath const bool is_main_thread = (thread.GetID() == GetID()); 731af245d11STodd Fiala 732b9cc0c75SPavel Labath assert(info.si_signo == SIGTRAP && "Unexpected child signal!"); 733af245d11STodd Fiala 734b9c1b51eSKate Stone switch (info.si_code) { 735b9c1b51eSKate Stone // TODO: these two cases are required if we want to support tracing of the 736b9c1b51eSKate Stone // inferiors' children. We'd need this to debug a monitor. 737af245d11STodd Fiala // case (SIGTRAP | (PTRACE_EVENT_FORK << 8)): 738af245d11STodd Fiala // case (SIGTRAP | (PTRACE_EVENT_VFORK << 8)): 739af245d11STodd Fiala 740b9c1b51eSKate Stone case (SIGTRAP | (PTRACE_EVENT_CLONE << 8)): { 741b9c1b51eSKate Stone // This is the notification on the parent thread which informs us of new 742b9c1b51eSKate Stone // thread 743426bdf88SPavel Labath // creation. 744b9c1b51eSKate Stone // We don't want to do anything with the parent thread so we just resume it. 745b9c1b51eSKate Stone // In case we 746b9c1b51eSKate Stone // want to implement "break on thread creation" functionality, we would need 747b9c1b51eSKate Stone // to stop 748426bdf88SPavel Labath // here. 749af245d11STodd Fiala 750af245d11STodd Fiala unsigned long event_message = 0; 751b9c1b51eSKate Stone if (GetEventMessage(thread.GetID(), &event_message).Fail()) { 752a6321a8eSPavel Labath LLDB_LOG(log, 753a6321a8eSPavel Labath "pid {0} received thread creation event but " 754a6321a8eSPavel Labath "GetEventMessage failed so we don't know the new tid", 755a6321a8eSPavel Labath thread.GetID()); 756426bdf88SPavel Labath } else 757426bdf88SPavel Labath WaitForNewThread(event_message); 758af245d11STodd Fiala 759b9cc0c75SPavel Labath ResumeThread(thread, thread.GetState(), LLDB_INVALID_SIGNAL_NUMBER); 760af245d11STodd Fiala break; 761af245d11STodd Fiala } 762af245d11STodd Fiala 763b9c1b51eSKate Stone case (SIGTRAP | (PTRACE_EVENT_EXEC << 8)): { 764f9077782SPavel Labath NativeThreadLinuxSP main_thread_sp; 765a6321a8eSPavel Labath LLDB_LOG(log, "received exec event, code = {0}", info.si_code ^ SIGTRAP); 766a9882ceeSTodd Fiala 7671dbc6c9cSPavel Labath // Exec clears any pending notifications. 7680e1d729bSPavel Labath m_pending_notification_tid = LLDB_INVALID_THREAD_ID; 769fa03ad2eSChaoren Lin 770b9c1b51eSKate Stone // Remove all but the main thread here. Linux fork creates a new process 771b9c1b51eSKate Stone // which only copies the main thread. 772a6321a8eSPavel Labath LLDB_LOG(log, "exec received, stop tracking all but main thread"); 773a9882ceeSTodd Fiala 774b9c1b51eSKate Stone for (auto thread_sp : m_threads) { 775a9882ceeSTodd Fiala const bool is_main_thread = thread_sp && thread_sp->GetID() == GetID(); 776b9c1b51eSKate Stone if (is_main_thread) { 777f9077782SPavel Labath main_thread_sp = std::static_pointer_cast<NativeThreadLinux>(thread_sp); 778a6321a8eSPavel Labath LLDB_LOG(log, "found main thread with tid {0}, keeping", 779a6321a8eSPavel Labath main_thread_sp->GetID()); 780b9c1b51eSKate Stone } else { 781a6321a8eSPavel Labath LLDB_LOG(log, "discarding non-main-thread tid {0} due to exec", 782a6321a8eSPavel Labath thread_sp->GetID()); 783a9882ceeSTodd Fiala } 784a9882ceeSTodd Fiala } 785a9882ceeSTodd Fiala 786a9882ceeSTodd Fiala m_threads.clear(); 787a9882ceeSTodd Fiala 788b9c1b51eSKate Stone if (main_thread_sp) { 789a9882ceeSTodd Fiala m_threads.push_back(main_thread_sp); 790a9882ceeSTodd Fiala SetCurrentThreadID(main_thread_sp->GetID()); 791f9077782SPavel Labath main_thread_sp->SetStoppedByExec(); 792b9c1b51eSKate Stone } else { 793a9882ceeSTodd Fiala SetCurrentThreadID(LLDB_INVALID_THREAD_ID); 794a6321a8eSPavel Labath LLDB_LOG(log, 795a6321a8eSPavel Labath "pid {0} no main thread found, discarded all threads, " 796a6321a8eSPavel Labath "we're in a no-thread state!", 797a6321a8eSPavel Labath GetID()); 798a9882ceeSTodd Fiala } 799a9882ceeSTodd Fiala 800fa03ad2eSChaoren Lin // Tell coordinator about about the "new" (since exec) stopped main thread. 801f9077782SPavel Labath ThreadWasCreated(*main_thread_sp); 802fa03ad2eSChaoren Lin 803a9882ceeSTodd Fiala // Let our delegate know we have just exec'd. 804a9882ceeSTodd Fiala NotifyDidExec(); 805a9882ceeSTodd Fiala 806a9882ceeSTodd Fiala // If we have a main thread, indicate we are stopped. 807b9c1b51eSKate Stone assert(main_thread_sp && "exec called during ptraced process but no main " 808b9c1b51eSKate Stone "thread metadata tracked"); 809fa03ad2eSChaoren Lin 810fa03ad2eSChaoren Lin // Let the process know we're stopped. 811b9cc0c75SPavel Labath StopRunningThreads(main_thread_sp->GetID()); 812a9882ceeSTodd Fiala 813af245d11STodd Fiala break; 814a9882ceeSTodd Fiala } 815af245d11STodd Fiala 816b9c1b51eSKate Stone case (SIGTRAP | (PTRACE_EVENT_EXIT << 8)): { 817af245d11STodd Fiala // The inferior process or one of its threads is about to exit. 818b9c1b51eSKate Stone // We don't want to do anything with the thread so we just resume it. In 819b9c1b51eSKate Stone // case we 820b9c1b51eSKate Stone // want to implement "break on thread exit" functionality, we would need to 821b9c1b51eSKate Stone // stop 8226e35163cSPavel Labath // here. 823fa03ad2eSChaoren Lin 824af245d11STodd Fiala unsigned long data = 0; 825b9cc0c75SPavel Labath if (GetEventMessage(thread.GetID(), &data).Fail()) 826af245d11STodd Fiala data = -1; 827af245d11STodd Fiala 828a6321a8eSPavel Labath LLDB_LOG(log, 829a6321a8eSPavel Labath "received PTRACE_EVENT_EXIT, data = {0:x}, WIFEXITED={1}, " 830a6321a8eSPavel Labath "WIFSIGNALED={2}, pid = {3}, main_thread = {4}", 831a6321a8eSPavel Labath data, WIFEXITED(data), WIFSIGNALED(data), thread.GetID(), 832a6321a8eSPavel Labath is_main_thread); 833af245d11STodd Fiala 834b9c1b51eSKate Stone if (is_main_thread) { 835b9c1b51eSKate Stone SetExitStatus(convert_pid_status_to_exit_type(data), 836b9c1b51eSKate Stone convert_pid_status_to_return_code(data), nullptr, true); 83775f47c3aSTodd Fiala } 83875f47c3aSTodd Fiala 83986852d36SPavel Labath StateType state = thread.GetState(); 840b9c1b51eSKate Stone if (!StateIsRunningState(state)) { 841b9c1b51eSKate Stone // Due to a kernel bug, we may sometimes get this stop after the inferior 842b9c1b51eSKate Stone // gets a 843b9c1b51eSKate Stone // SIGKILL. This confuses our state tracking logic in ResumeThread(), 844b9c1b51eSKate Stone // since normally, 845b9c1b51eSKate Stone // we should not be receiving any ptrace events while the inferior is 846b9c1b51eSKate Stone // stopped. This 84786852d36SPavel Labath // makes sure that the inferior is resumed and exits normally. 84886852d36SPavel Labath state = eStateRunning; 84986852d36SPavel Labath } 85086852d36SPavel Labath ResumeThread(thread, state, LLDB_INVALID_SIGNAL_NUMBER); 851af245d11STodd Fiala 852af245d11STodd Fiala break; 853af245d11STodd Fiala } 854af245d11STodd Fiala 855af245d11STodd Fiala case 0: 856c16f5dcaSChaoren Lin case TRAP_TRACE: // We receive this on single stepping. 857c16f5dcaSChaoren Lin case TRAP_HWBKPT: // We receive this on watchpoint hit 85886fd8e45SChaoren Lin { 859c16f5dcaSChaoren Lin // If a watchpoint was hit, report it 860c16f5dcaSChaoren Lin uint32_t wp_index; 861b9c1b51eSKate Stone Error error = thread.GetRegisterContext()->GetWatchpointHitIndex( 862b9c1b51eSKate Stone wp_index, (uintptr_t)info.si_addr); 863a6321a8eSPavel Labath if (error.Fail()) 864a6321a8eSPavel Labath LLDB_LOG(log, 865a6321a8eSPavel Labath "received error while checking for watchpoint hits, pid = " 866a6321a8eSPavel Labath "{0}, error = {1}", 867a6321a8eSPavel Labath thread.GetID(), error); 868b9c1b51eSKate Stone if (wp_index != LLDB_INVALID_INDEX32) { 869b9cc0c75SPavel Labath MonitorWatchpoint(thread, wp_index); 870c16f5dcaSChaoren Lin break; 871c16f5dcaSChaoren Lin } 872b9cc0c75SPavel Labath 873be379e15STamas Berghammer // Otherwise, report step over 874be379e15STamas Berghammer MonitorTrace(thread); 875af245d11STodd Fiala break; 876b9cc0c75SPavel Labath } 877af245d11STodd Fiala 878af245d11STodd Fiala case SI_KERNEL: 87935799963SMohit K. Bhakkad #if defined __mips__ 88035799963SMohit K. Bhakkad // For mips there is no special signal for watchpoint 88135799963SMohit K. Bhakkad // So we check for watchpoint in kernel trap 88235799963SMohit K. Bhakkad { 88335799963SMohit K. Bhakkad // If a watchpoint was hit, report it 88435799963SMohit K. Bhakkad uint32_t wp_index; 885b9c1b51eSKate Stone Error error = thread.GetRegisterContext()->GetWatchpointHitIndex( 886b9c1b51eSKate Stone wp_index, LLDB_INVALID_ADDRESS); 887a6321a8eSPavel Labath if (error.Fail()) 888a6321a8eSPavel Labath LLDB_LOG(log, 889a6321a8eSPavel Labath "received error while checking for watchpoint hits, pid = " 890a6321a8eSPavel Labath "{0}, error = {1}", 891a6321a8eSPavel Labath thread.GetID(), error); 892b9c1b51eSKate Stone if (wp_index != LLDB_INVALID_INDEX32) { 893b9cc0c75SPavel Labath MonitorWatchpoint(thread, wp_index); 89435799963SMohit K. Bhakkad break; 89535799963SMohit K. Bhakkad } 89635799963SMohit K. Bhakkad } 89735799963SMohit K. Bhakkad // NO BREAK 89835799963SMohit K. Bhakkad #endif 899af245d11STodd Fiala case TRAP_BRKPT: 900b9cc0c75SPavel Labath MonitorBreakpoint(thread); 901af245d11STodd Fiala break; 902af245d11STodd Fiala 903af245d11STodd Fiala case SIGTRAP: 904af245d11STodd Fiala case (SIGTRAP | 0x80): 905a6321a8eSPavel Labath LLDB_LOG( 906a6321a8eSPavel Labath log, 907a6321a8eSPavel Labath "received unknown SIGTRAP stop event ({0}, pid {1} tid {2}, resuming", 908a6321a8eSPavel Labath info.si_code, GetID(), thread.GetID()); 909fa03ad2eSChaoren Lin 910af245d11STodd Fiala // Ignore these signals until we know more about them. 911b9cc0c75SPavel Labath ResumeThread(thread, thread.GetState(), LLDB_INVALID_SIGNAL_NUMBER); 912af245d11STodd Fiala break; 913af245d11STodd Fiala 914af245d11STodd Fiala default: 915a6321a8eSPavel Labath LLDB_LOG( 916a6321a8eSPavel Labath log, 917a6321a8eSPavel Labath "received unknown SIGTRAP stop event ({0}, pid {1} tid {2}, resuming", 918a6321a8eSPavel Labath info.si_code, GetID(), thread.GetID()); 919a6321a8eSPavel Labath llvm_unreachable("Unexpected SIGTRAP code!"); 920af245d11STodd Fiala break; 921af245d11STodd Fiala } 922af245d11STodd Fiala } 923af245d11STodd Fiala 924b9c1b51eSKate Stone void NativeProcessLinux::MonitorTrace(NativeThreadLinux &thread) { 925a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 926a6321a8eSPavel Labath LLDB_LOG(log, "received trace event, pid = {0}", thread.GetID()); 927c16f5dcaSChaoren Lin 9280e1d729bSPavel Labath // This thread is currently stopped. 929b9cc0c75SPavel Labath thread.SetStoppedByTrace(); 930c16f5dcaSChaoren Lin 931b9cc0c75SPavel Labath StopRunningThreads(thread.GetID()); 932c16f5dcaSChaoren Lin } 933c16f5dcaSChaoren Lin 934b9c1b51eSKate Stone void NativeProcessLinux::MonitorBreakpoint(NativeThreadLinux &thread) { 935b9c1b51eSKate Stone Log *log( 936b9c1b51eSKate Stone GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_BREAKPOINTS)); 937a6321a8eSPavel Labath LLDB_LOG(log, "received breakpoint event, pid = {0}", thread.GetID()); 938c16f5dcaSChaoren Lin 939c16f5dcaSChaoren Lin // Mark the thread as stopped at breakpoint. 940b9cc0c75SPavel Labath thread.SetStoppedByBreakpoint(); 941b9cc0c75SPavel Labath Error error = FixupBreakpointPCAsNeeded(thread); 942c16f5dcaSChaoren Lin if (error.Fail()) 943a6321a8eSPavel Labath LLDB_LOG(log, "pid = {0} fixup: {1}", thread.GetID(), error); 944d8c338d4STamas Berghammer 945b9c1b51eSKate Stone if (m_threads_stepping_with_breakpoint.find(thread.GetID()) != 946b9c1b51eSKate Stone m_threads_stepping_with_breakpoint.end()) 947b9cc0c75SPavel Labath thread.SetStoppedByTrace(); 948c16f5dcaSChaoren Lin 949b9cc0c75SPavel Labath StopRunningThreads(thread.GetID()); 950c16f5dcaSChaoren Lin } 951c16f5dcaSChaoren Lin 952b9c1b51eSKate Stone void NativeProcessLinux::MonitorWatchpoint(NativeThreadLinux &thread, 953b9c1b51eSKate Stone uint32_t wp_index) { 954b9c1b51eSKate Stone Log *log( 955b9c1b51eSKate Stone GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_WATCHPOINTS)); 956a6321a8eSPavel Labath LLDB_LOG(log, "received watchpoint event, pid = {0}, wp_index = {1}", 957a6321a8eSPavel Labath thread.GetID(), wp_index); 958c16f5dcaSChaoren Lin 959c16f5dcaSChaoren Lin // Mark the thread as stopped at watchpoint. 960c16f5dcaSChaoren Lin // The address is at (lldb::addr_t)info->si_addr if we need it. 961f9077782SPavel Labath thread.SetStoppedByWatchpoint(wp_index); 962c16f5dcaSChaoren Lin 963b9c1b51eSKate Stone // We need to tell all other running threads before we notify the delegate 964b9c1b51eSKate Stone // about this stop. 965f9077782SPavel Labath StopRunningThreads(thread.GetID()); 966c16f5dcaSChaoren Lin } 967c16f5dcaSChaoren Lin 968b9c1b51eSKate Stone void NativeProcessLinux::MonitorSignal(const siginfo_t &info, 969b9c1b51eSKate Stone NativeThreadLinux &thread, bool exited) { 970b9cc0c75SPavel Labath const int signo = info.si_signo; 971b9cc0c75SPavel Labath const bool is_from_llgs = info.si_pid == getpid(); 972af245d11STodd Fiala 973a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 974af245d11STodd Fiala 975af245d11STodd Fiala // POSIX says that process behaviour is undefined after it ignores a SIGFPE, 976af245d11STodd Fiala // SIGILL, SIGSEGV, or SIGBUS *unless* that signal was generated by a 977af245d11STodd Fiala // kill(2) or raise(3). Similarly for tgkill(2) on Linux. 978af245d11STodd Fiala // 979af245d11STodd Fiala // IOW, user generated signals never generate what we consider to be a 980af245d11STodd Fiala // "crash". 981af245d11STodd Fiala // 982af245d11STodd Fiala // Similarly, ACK signals generated by this monitor. 983af245d11STodd Fiala 984af245d11STodd Fiala // Handle the signal. 985a6321a8eSPavel Labath LLDB_LOG(log, 986a6321a8eSPavel Labath "received signal {0} ({1}) with code {2}, (siginfo pid = {3}, " 987a6321a8eSPavel Labath "waitpid pid = {4})", 988a6321a8eSPavel Labath Host::GetSignalAsCString(signo), signo, info.si_code, 989b9cc0c75SPavel Labath thread.GetID()); 99058a2f669STodd Fiala 99158a2f669STodd Fiala // Check for thread stop notification. 992b9c1b51eSKate Stone if (is_from_llgs && (info.si_code == SI_TKILL) && (signo == SIGSTOP)) { 993af245d11STodd Fiala // This is a tgkill()-based stop. 994a6321a8eSPavel Labath LLDB_LOG(log, "pid {0} tid {1}, thread stopped", GetID(), thread.GetID()); 995fa03ad2eSChaoren Lin 996aab58633SChaoren Lin // Check that we're not already marked with a stop reason. 997b9c1b51eSKate Stone // Note this thread really shouldn't already be marked as stopped - if we 998a6321a8eSPavel Labath // were, that would imply that the kernel signaled us with the thread 999a6321a8eSPavel Labath // stopping which we handled and marked as stopped, and that, without an 1000a6321a8eSPavel Labath // intervening resume, we received another stop. It is more likely that we 1001a6321a8eSPavel Labath // are missing the marking of a run state somewhere if we find that the 1002a6321a8eSPavel Labath // thread was marked as stopped. 1003b9cc0c75SPavel Labath const StateType thread_state = thread.GetState(); 1004b9c1b51eSKate Stone if (!StateIsStoppedState(thread_state, false)) { 1005ed89c7feSPavel Labath // An inferior thread has stopped because of a SIGSTOP we have sent it. 1006b9c1b51eSKate Stone // Generally, these are not important stops and we don't want to report 1007a6321a8eSPavel Labath // them as they are just used to stop other threads when one thread (the 1008a6321a8eSPavel Labath // one with the *real* stop reason) hits a breakpoint (watchpoint, 1009a6321a8eSPavel Labath // etc...). However, in the case of an asynchronous Interrupt(), this *is* 1010a6321a8eSPavel Labath // the real stop reason, so we leave the signal intact if this is the 1011a6321a8eSPavel Labath // thread that was chosen as the triggering thread. 1012b9c1b51eSKate Stone if (m_pending_notification_tid != LLDB_INVALID_THREAD_ID) { 1013b9cc0c75SPavel Labath if (m_pending_notification_tid == thread.GetID()) 1014b9cc0c75SPavel Labath thread.SetStoppedBySignal(SIGSTOP, &info); 1015ed89c7feSPavel Labath else 1016b9cc0c75SPavel Labath thread.SetStoppedWithNoReason(); 1017ed89c7feSPavel Labath 1018b9cc0c75SPavel Labath SetCurrentThreadID(thread.GetID()); 10190e1d729bSPavel Labath SignalIfAllThreadsStopped(); 1020b9c1b51eSKate Stone } else { 10210e1d729bSPavel Labath // We can end up here if stop was initiated by LLGS but by this time a 10220e1d729bSPavel Labath // thread stop has occurred - maybe initiated by another event. 1023b9cc0c75SPavel Labath Error error = ResumeThread(thread, thread.GetState(), 0); 1024a6321a8eSPavel Labath if (error.Fail()) 1025a6321a8eSPavel Labath LLDB_LOG(log, "failed to resume thread {0}: {1}", thread.GetID(), 1026a6321a8eSPavel Labath error); 10270e1d729bSPavel Labath } 1028b9c1b51eSKate Stone } else { 1029a6321a8eSPavel Labath LLDB_LOG(log, 1030a6321a8eSPavel Labath "pid {0} tid {1}, thread was already marked as a stopped " 1031a6321a8eSPavel Labath "state (state={2}), leaving stop signal as is", 10328198db30SPavel Labath GetID(), thread.GetID(), thread_state); 10330e1d729bSPavel Labath SignalIfAllThreadsStopped(); 1034af245d11STodd Fiala } 1035af245d11STodd Fiala 103658a2f669STodd Fiala // Done handling. 1037af245d11STodd Fiala return; 1038af245d11STodd Fiala } 1039af245d11STodd Fiala 104086fd8e45SChaoren Lin // This thread is stopped. 1041a6321a8eSPavel Labath LLDB_LOG(log, "received signal {0}", Host::GetSignalAsCString(signo)); 1042b9cc0c75SPavel Labath thread.SetStoppedBySignal(signo, &info); 104386fd8e45SChaoren Lin 104486fd8e45SChaoren Lin // Send a stop to the debugger after we get all other threads to stop. 1045b9cc0c75SPavel Labath StopRunningThreads(thread.GetID()); 1046511e5cdcSTodd Fiala } 1047af245d11STodd Fiala 1048e7708688STamas Berghammer namespace { 1049e7708688STamas Berghammer 1050b9c1b51eSKate Stone struct EmulatorBaton { 1051e7708688STamas Berghammer NativeProcessLinux *m_process; 1052e7708688STamas Berghammer NativeRegisterContext *m_reg_context; 10536648fcc3SPavel Labath 10546648fcc3SPavel Labath // eRegisterKindDWARF -> RegsiterValue 10556648fcc3SPavel Labath std::unordered_map<uint32_t, RegisterValue> m_register_values; 1056e7708688STamas Berghammer 1057b9c1b51eSKate Stone EmulatorBaton(NativeProcessLinux *process, NativeRegisterContext *reg_context) 1058b9c1b51eSKate Stone : m_process(process), m_reg_context(reg_context) {} 1059e7708688STamas Berghammer }; 1060e7708688STamas Berghammer 1061e7708688STamas Berghammer } // anonymous namespace 1062e7708688STamas Berghammer 1063b9c1b51eSKate Stone static size_t ReadMemoryCallback(EmulateInstruction *instruction, void *baton, 1064e7708688STamas Berghammer const EmulateInstruction::Context &context, 1065b9c1b51eSKate Stone lldb::addr_t addr, void *dst, size_t length) { 1066e7708688STamas Berghammer EmulatorBaton *emulator_baton = static_cast<EmulatorBaton *>(baton); 1067e7708688STamas Berghammer 10683eb4b458SChaoren Lin size_t bytes_read; 1069e7708688STamas Berghammer emulator_baton->m_process->ReadMemory(addr, dst, length, bytes_read); 1070e7708688STamas Berghammer return bytes_read; 1071e7708688STamas Berghammer } 1072e7708688STamas Berghammer 1073b9c1b51eSKate Stone static bool ReadRegisterCallback(EmulateInstruction *instruction, void *baton, 1074e7708688STamas Berghammer const RegisterInfo *reg_info, 1075b9c1b51eSKate Stone RegisterValue ®_value) { 1076e7708688STamas Berghammer EmulatorBaton *emulator_baton = static_cast<EmulatorBaton *>(baton); 1077e7708688STamas Berghammer 1078b9c1b51eSKate Stone auto it = emulator_baton->m_register_values.find( 1079b9c1b51eSKate Stone reg_info->kinds[eRegisterKindDWARF]); 1080b9c1b51eSKate Stone if (it != emulator_baton->m_register_values.end()) { 10816648fcc3SPavel Labath reg_value = it->second; 10826648fcc3SPavel Labath return true; 10836648fcc3SPavel Labath } 10846648fcc3SPavel Labath 1085e7708688STamas Berghammer // The emulator only fill in the dwarf regsiter numbers (and in some case 1086e7708688STamas Berghammer // the generic register numbers). Get the full register info from the 1087e7708688STamas Berghammer // register context based on the dwarf register numbers. 1088b9c1b51eSKate Stone const RegisterInfo *full_reg_info = 1089b9c1b51eSKate Stone emulator_baton->m_reg_context->GetRegisterInfo( 1090e7708688STamas Berghammer eRegisterKindDWARF, reg_info->kinds[eRegisterKindDWARF]); 1091e7708688STamas Berghammer 1092b9c1b51eSKate Stone Error error = 1093b9c1b51eSKate Stone emulator_baton->m_reg_context->ReadRegister(full_reg_info, reg_value); 10946648fcc3SPavel Labath if (error.Success()) 10956648fcc3SPavel Labath return true; 1096cdc22a88SMohit K. Bhakkad 10976648fcc3SPavel Labath return false; 1098e7708688STamas Berghammer } 1099e7708688STamas Berghammer 1100b9c1b51eSKate Stone static bool WriteRegisterCallback(EmulateInstruction *instruction, void *baton, 1101e7708688STamas Berghammer const EmulateInstruction::Context &context, 1102e7708688STamas Berghammer const RegisterInfo *reg_info, 1103b9c1b51eSKate Stone const RegisterValue ®_value) { 1104e7708688STamas Berghammer EmulatorBaton *emulator_baton = static_cast<EmulatorBaton *>(baton); 1105b9c1b51eSKate Stone emulator_baton->m_register_values[reg_info->kinds[eRegisterKindDWARF]] = 1106b9c1b51eSKate Stone reg_value; 1107e7708688STamas Berghammer return true; 1108e7708688STamas Berghammer } 1109e7708688STamas Berghammer 1110b9c1b51eSKate Stone static size_t WriteMemoryCallback(EmulateInstruction *instruction, void *baton, 1111e7708688STamas Berghammer const EmulateInstruction::Context &context, 1112b9c1b51eSKate Stone lldb::addr_t addr, const void *dst, 1113b9c1b51eSKate Stone size_t length) { 1114e7708688STamas Berghammer return length; 1115e7708688STamas Berghammer } 1116e7708688STamas Berghammer 1117b9c1b51eSKate Stone static lldb::addr_t ReadFlags(NativeRegisterContext *regsiter_context) { 1118e7708688STamas Berghammer const RegisterInfo *flags_info = regsiter_context->GetRegisterInfo( 1119e7708688STamas Berghammer eRegisterKindGeneric, LLDB_REGNUM_GENERIC_FLAGS); 1120b9c1b51eSKate Stone return regsiter_context->ReadRegisterAsUnsigned(flags_info, 1121b9c1b51eSKate Stone LLDB_INVALID_ADDRESS); 1122e7708688STamas Berghammer } 1123e7708688STamas Berghammer 1124b9c1b51eSKate Stone Error NativeProcessLinux::SetupSoftwareSingleStepping( 1125b9c1b51eSKate Stone NativeThreadLinux &thread) { 1126e7708688STamas Berghammer Error error; 1127b9cc0c75SPavel Labath NativeRegisterContextSP register_context_sp = thread.GetRegisterContext(); 1128e7708688STamas Berghammer 1129e7708688STamas Berghammer std::unique_ptr<EmulateInstruction> emulator_ap( 1130b9c1b51eSKate Stone EmulateInstruction::FindPlugin(m_arch, eInstructionTypePCModifying, 1131b9c1b51eSKate Stone nullptr)); 1132e7708688STamas Berghammer 1133e7708688STamas Berghammer if (emulator_ap == nullptr) 1134e7708688STamas Berghammer return Error("Instruction emulator not found!"); 1135e7708688STamas Berghammer 1136e7708688STamas Berghammer EmulatorBaton baton(this, register_context_sp.get()); 1137e7708688STamas Berghammer emulator_ap->SetBaton(&baton); 1138e7708688STamas Berghammer emulator_ap->SetReadMemCallback(&ReadMemoryCallback); 1139e7708688STamas Berghammer emulator_ap->SetReadRegCallback(&ReadRegisterCallback); 1140e7708688STamas Berghammer emulator_ap->SetWriteMemCallback(&WriteMemoryCallback); 1141e7708688STamas Berghammer emulator_ap->SetWriteRegCallback(&WriteRegisterCallback); 1142e7708688STamas Berghammer 1143e7708688STamas Berghammer if (!emulator_ap->ReadInstruction()) 1144e7708688STamas Berghammer return Error("Read instruction failed!"); 1145e7708688STamas Berghammer 1146b9c1b51eSKate Stone bool emulation_result = 1147b9c1b51eSKate Stone emulator_ap->EvaluateInstruction(eEmulateInstructionOptionAutoAdvancePC); 11486648fcc3SPavel Labath 1149b9c1b51eSKate Stone const RegisterInfo *reg_info_pc = register_context_sp->GetRegisterInfo( 1150b9c1b51eSKate Stone eRegisterKindGeneric, LLDB_REGNUM_GENERIC_PC); 1151b9c1b51eSKate Stone const RegisterInfo *reg_info_flags = register_context_sp->GetRegisterInfo( 1152b9c1b51eSKate Stone eRegisterKindGeneric, LLDB_REGNUM_GENERIC_FLAGS); 11536648fcc3SPavel Labath 1154b9c1b51eSKate Stone auto pc_it = 1155b9c1b51eSKate Stone baton.m_register_values.find(reg_info_pc->kinds[eRegisterKindDWARF]); 1156b9c1b51eSKate Stone auto flags_it = 1157b9c1b51eSKate Stone baton.m_register_values.find(reg_info_flags->kinds[eRegisterKindDWARF]); 11586648fcc3SPavel Labath 1159e7708688STamas Berghammer lldb::addr_t next_pc; 1160e7708688STamas Berghammer lldb::addr_t next_flags; 1161b9c1b51eSKate Stone if (emulation_result) { 1162b9c1b51eSKate Stone assert(pc_it != baton.m_register_values.end() && 1163b9c1b51eSKate Stone "Emulation was successfull but PC wasn't updated"); 11646648fcc3SPavel Labath next_pc = pc_it->second.GetAsUInt64(); 11656648fcc3SPavel Labath 11666648fcc3SPavel Labath if (flags_it != baton.m_register_values.end()) 11676648fcc3SPavel Labath next_flags = flags_it->second.GetAsUInt64(); 1168e7708688STamas Berghammer else 1169e7708688STamas Berghammer next_flags = ReadFlags(register_context_sp.get()); 1170b9c1b51eSKate Stone } else if (pc_it == baton.m_register_values.end()) { 1171e7708688STamas Berghammer // Emulate instruction failed and it haven't changed PC. Advance PC 1172e7708688STamas Berghammer // with the size of the current opcode because the emulation of all 1173e7708688STamas Berghammer // PC modifying instruction should be successful. The failure most 1174e7708688STamas Berghammer // likely caused by a not supported instruction which don't modify PC. 1175b9c1b51eSKate Stone next_pc = 1176b9c1b51eSKate Stone register_context_sp->GetPC() + emulator_ap->GetOpcode().GetByteSize(); 1177e7708688STamas Berghammer next_flags = ReadFlags(register_context_sp.get()); 1178b9c1b51eSKate Stone } else { 1179e7708688STamas Berghammer // The instruction emulation failed after it modified the PC. It is an 1180e7708688STamas Berghammer // unknown error where we can't continue because the next instruction is 1181e7708688STamas Berghammer // modifying the PC but we don't know how. 1182e7708688STamas Berghammer return Error("Instruction emulation failed unexpectedly."); 1183e7708688STamas Berghammer } 1184e7708688STamas Berghammer 1185b9c1b51eSKate Stone if (m_arch.GetMachine() == llvm::Triple::arm) { 1186b9c1b51eSKate Stone if (next_flags & 0x20) { 1187e7708688STamas Berghammer // Thumb mode 1188e7708688STamas Berghammer error = SetSoftwareBreakpoint(next_pc, 2); 1189b9c1b51eSKate Stone } else { 1190e7708688STamas Berghammer // Arm mode 1191e7708688STamas Berghammer error = SetSoftwareBreakpoint(next_pc, 4); 1192e7708688STamas Berghammer } 1193b9c1b51eSKate Stone } else if (m_arch.GetMachine() == llvm::Triple::mips64 || 1194b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mips64el || 1195b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mips || 1196b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mipsel) 1197cdc22a88SMohit K. Bhakkad error = SetSoftwareBreakpoint(next_pc, 4); 1198b9c1b51eSKate Stone else { 1199e7708688STamas Berghammer // No size hint is given for the next breakpoint 1200e7708688STamas Berghammer error = SetSoftwareBreakpoint(next_pc, 0); 1201e7708688STamas Berghammer } 1202e7708688STamas Berghammer 120342eb6908SPavel Labath // If setting the breakpoint fails because next_pc is out of 120442eb6908SPavel Labath // the address space, ignore it and let the debugee segfault. 120542eb6908SPavel Labath if (error.GetError() == EIO || error.GetError() == EFAULT) { 1206665be50eSMehdi Amini return Error(); 120742eb6908SPavel Labath } else if (error.Fail()) 1208e7708688STamas Berghammer return error; 1209e7708688STamas Berghammer 1210b9cc0c75SPavel Labath m_threads_stepping_with_breakpoint.insert({thread.GetID(), next_pc}); 1211e7708688STamas Berghammer 1212665be50eSMehdi Amini return Error(); 1213e7708688STamas Berghammer } 1214e7708688STamas Berghammer 1215b9c1b51eSKate Stone bool NativeProcessLinux::SupportHardwareSingleStepping() const { 1216b9c1b51eSKate Stone if (m_arch.GetMachine() == llvm::Triple::arm || 1217b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mips64 || 1218b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mips64el || 1219b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mips || 1220b9c1b51eSKate Stone m_arch.GetMachine() == llvm::Triple::mipsel) 1221cdc22a88SMohit K. Bhakkad return false; 1222cdc22a88SMohit K. Bhakkad return true; 1223e7708688STamas Berghammer } 1224e7708688STamas Berghammer 1225b9c1b51eSKate Stone Error NativeProcessLinux::Resume(const ResumeActionList &resume_actions) { 1226a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1227a6321a8eSPavel Labath LLDB_LOG(log, "pid {0}", GetID()); 1228af245d11STodd Fiala 1229e7708688STamas Berghammer bool software_single_step = !SupportHardwareSingleStepping(); 1230af245d11STodd Fiala 1231b9c1b51eSKate Stone if (software_single_step) { 1232b9c1b51eSKate Stone for (auto thread_sp : m_threads) { 1233e7708688STamas Berghammer assert(thread_sp && "thread list should not contain NULL threads"); 1234e7708688STamas Berghammer 1235b9c1b51eSKate Stone const ResumeAction *const action = 1236b9c1b51eSKate Stone resume_actions.GetActionForThread(thread_sp->GetID(), true); 1237e7708688STamas Berghammer if (action == nullptr) 1238e7708688STamas Berghammer continue; 1239e7708688STamas Berghammer 1240b9c1b51eSKate Stone if (action->state == eStateStepping) { 1241b9c1b51eSKate Stone Error error = SetupSoftwareSingleStepping( 1242b9c1b51eSKate Stone static_cast<NativeThreadLinux &>(*thread_sp)); 1243e7708688STamas Berghammer if (error.Fail()) 1244e7708688STamas Berghammer return error; 1245e7708688STamas Berghammer } 1246e7708688STamas Berghammer } 1247e7708688STamas Berghammer } 1248e7708688STamas Berghammer 1249b9c1b51eSKate Stone for (auto thread_sp : m_threads) { 1250af245d11STodd Fiala assert(thread_sp && "thread list should not contain NULL threads"); 1251af245d11STodd Fiala 1252b9c1b51eSKate Stone const ResumeAction *const action = 1253b9c1b51eSKate Stone resume_actions.GetActionForThread(thread_sp->GetID(), true); 12546a196ce6SChaoren Lin 1255b9c1b51eSKate Stone if (action == nullptr) { 1256a6321a8eSPavel Labath LLDB_LOG(log, "no action specified for pid {0} tid {1}", GetID(), 1257a6321a8eSPavel Labath thread_sp->GetID()); 12586a196ce6SChaoren Lin continue; 12596a196ce6SChaoren Lin } 1260af245d11STodd Fiala 1261a6321a8eSPavel Labath LLDB_LOG(log, "processing resume action state {0} for pid {1} tid {2}", 12628198db30SPavel Labath action->state, GetID(), thread_sp->GetID()); 1263af245d11STodd Fiala 1264b9c1b51eSKate Stone switch (action->state) { 1265af245d11STodd Fiala case eStateRunning: 1266b9c1b51eSKate Stone case eStateStepping: { 1267af245d11STodd Fiala // Run the thread, possibly feeding it the signal. 1268fa03ad2eSChaoren Lin const int signo = action->signal; 1269b9c1b51eSKate Stone ResumeThread(static_cast<NativeThreadLinux &>(*thread_sp), action->state, 1270b9c1b51eSKate Stone signo); 1271af245d11STodd Fiala break; 1272ae29d395SChaoren Lin } 1273af245d11STodd Fiala 1274af245d11STodd Fiala case eStateSuspended: 1275af245d11STodd Fiala case eStateStopped: 1276a6321a8eSPavel Labath llvm_unreachable("Unexpected state"); 1277af245d11STodd Fiala 1278af245d11STodd Fiala default: 1279b9c1b51eSKate Stone return Error("NativeProcessLinux::%s (): unexpected state %s specified " 1280b9c1b51eSKate Stone "for pid %" PRIu64 ", tid %" PRIu64, 1281b9c1b51eSKate Stone __FUNCTION__, StateAsCString(action->state), GetID(), 1282b9c1b51eSKate Stone thread_sp->GetID()); 1283af245d11STodd Fiala } 1284af245d11STodd Fiala } 1285af245d11STodd Fiala 1286665be50eSMehdi Amini return Error(); 1287af245d11STodd Fiala } 1288af245d11STodd Fiala 1289b9c1b51eSKate Stone Error NativeProcessLinux::Halt() { 1290af245d11STodd Fiala Error error; 1291af245d11STodd Fiala 1292af245d11STodd Fiala if (kill(GetID(), SIGSTOP) != 0) 1293af245d11STodd Fiala error.SetErrorToErrno(); 1294af245d11STodd Fiala 1295af245d11STodd Fiala return error; 1296af245d11STodd Fiala } 1297af245d11STodd Fiala 1298b9c1b51eSKate Stone Error NativeProcessLinux::Detach() { 1299af245d11STodd Fiala Error error; 1300af245d11STodd Fiala 1301af245d11STodd Fiala // Stop monitoring the inferior. 130219cbe96aSPavel Labath m_sigchld_handle.reset(); 1303af245d11STodd Fiala 13047a9495bcSPavel Labath // Tell ptrace to detach from the process. 13057a9495bcSPavel Labath if (GetID() == LLDB_INVALID_PROCESS_ID) 13067a9495bcSPavel Labath return error; 13077a9495bcSPavel Labath 1308b9c1b51eSKate Stone for (auto thread_sp : m_threads) { 13097a9495bcSPavel Labath Error e = Detach(thread_sp->GetID()); 13107a9495bcSPavel Labath if (e.Fail()) 1311b9c1b51eSKate Stone error = 1312b9c1b51eSKate Stone e; // Save the error, but still attempt to detach from other threads. 13137a9495bcSPavel Labath } 13147a9495bcSPavel Labath 1315af245d11STodd Fiala return error; 1316af245d11STodd Fiala } 1317af245d11STodd Fiala 1318b9c1b51eSKate Stone Error NativeProcessLinux::Signal(int signo) { 1319af245d11STodd Fiala Error error; 1320af245d11STodd Fiala 1321a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1322a6321a8eSPavel Labath LLDB_LOG(log, "sending signal {0} ({1}) to pid {1}", signo, 1323a6321a8eSPavel Labath Host::GetSignalAsCString(signo), GetID()); 1324af245d11STodd Fiala 1325af245d11STodd Fiala if (kill(GetID(), signo)) 1326af245d11STodd Fiala error.SetErrorToErrno(); 1327af245d11STodd Fiala 1328af245d11STodd Fiala return error; 1329af245d11STodd Fiala } 1330af245d11STodd Fiala 1331b9c1b51eSKate Stone Error NativeProcessLinux::Interrupt() { 1332e9547b80SChaoren Lin // Pick a running thread (or if none, a not-dead stopped thread) as 1333e9547b80SChaoren Lin // the chosen thread that will be the stop-reason thread. 1334a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1335e9547b80SChaoren Lin 1336e9547b80SChaoren Lin NativeThreadProtocolSP running_thread_sp; 1337e9547b80SChaoren Lin NativeThreadProtocolSP stopped_thread_sp; 1338e9547b80SChaoren Lin 1339a6321a8eSPavel Labath LLDB_LOG(log, "selecting running thread for interrupt target"); 1340b9c1b51eSKate Stone for (auto thread_sp : m_threads) { 1341e9547b80SChaoren Lin // The thread shouldn't be null but lets just cover that here. 1342e9547b80SChaoren Lin if (!thread_sp) 1343e9547b80SChaoren Lin continue; 1344e9547b80SChaoren Lin 1345e9547b80SChaoren Lin // If we have a running or stepping thread, we'll call that the 1346e9547b80SChaoren Lin // target of the interrupt. 1347e9547b80SChaoren Lin const auto thread_state = thread_sp->GetState(); 1348b9c1b51eSKate Stone if (thread_state == eStateRunning || thread_state == eStateStepping) { 1349e9547b80SChaoren Lin running_thread_sp = thread_sp; 1350e9547b80SChaoren Lin break; 1351b9c1b51eSKate Stone } else if (!stopped_thread_sp && StateIsStoppedState(thread_state, true)) { 1352b9c1b51eSKate Stone // Remember the first non-dead stopped thread. We'll use that as a backup 1353b9c1b51eSKate Stone // if there are no running threads. 1354e9547b80SChaoren Lin stopped_thread_sp = thread_sp; 1355e9547b80SChaoren Lin } 1356e9547b80SChaoren Lin } 1357e9547b80SChaoren Lin 1358b9c1b51eSKate Stone if (!running_thread_sp && !stopped_thread_sp) { 1359b9c1b51eSKate Stone Error error("found no running/stepping or live stopped threads as target " 1360b9c1b51eSKate Stone "for interrupt"); 1361a6321a8eSPavel Labath LLDB_LOG(log, "skipping due to error: {0}", error); 13625830aa75STamas Berghammer 1363e9547b80SChaoren Lin return error; 1364e9547b80SChaoren Lin } 1365e9547b80SChaoren Lin 1366b9c1b51eSKate Stone NativeThreadProtocolSP deferred_signal_thread_sp = 1367b9c1b51eSKate Stone running_thread_sp ? running_thread_sp : stopped_thread_sp; 1368e9547b80SChaoren Lin 1369a6321a8eSPavel Labath LLDB_LOG(log, "pid {0} {1} tid {2} chosen for interrupt target", GetID(), 1370e9547b80SChaoren Lin running_thread_sp ? "running" : "stopped", 1371e9547b80SChaoren Lin deferred_signal_thread_sp->GetID()); 1372e9547b80SChaoren Lin 1373ed89c7feSPavel Labath StopRunningThreads(deferred_signal_thread_sp->GetID()); 137445f5cb31SPavel Labath 1375665be50eSMehdi Amini return Error(); 1376e9547b80SChaoren Lin } 1377e9547b80SChaoren Lin 1378b9c1b51eSKate Stone Error NativeProcessLinux::Kill() { 1379a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1380a6321a8eSPavel Labath LLDB_LOG(log, "pid {0}", GetID()); 1381af245d11STodd Fiala 1382af245d11STodd Fiala Error error; 1383af245d11STodd Fiala 1384b9c1b51eSKate Stone switch (m_state) { 1385af245d11STodd Fiala case StateType::eStateInvalid: 1386af245d11STodd Fiala case StateType::eStateExited: 1387af245d11STodd Fiala case StateType::eStateCrashed: 1388af245d11STodd Fiala case StateType::eStateDetached: 1389af245d11STodd Fiala case StateType::eStateUnloaded: 1390af245d11STodd Fiala // Nothing to do - the process is already dead. 1391a6321a8eSPavel Labath LLDB_LOG(log, "ignored for PID {0} due to current state: {1}", GetID(), 13928198db30SPavel Labath m_state); 1393af245d11STodd Fiala return error; 1394af245d11STodd Fiala 1395af245d11STodd Fiala case StateType::eStateConnected: 1396af245d11STodd Fiala case StateType::eStateAttaching: 1397af245d11STodd Fiala case StateType::eStateLaunching: 1398af245d11STodd Fiala case StateType::eStateStopped: 1399af245d11STodd Fiala case StateType::eStateRunning: 1400af245d11STodd Fiala case StateType::eStateStepping: 1401af245d11STodd Fiala case StateType::eStateSuspended: 1402af245d11STodd Fiala // We can try to kill a process in these states. 1403af245d11STodd Fiala break; 1404af245d11STodd Fiala } 1405af245d11STodd Fiala 1406b9c1b51eSKate Stone if (kill(GetID(), SIGKILL) != 0) { 1407af245d11STodd Fiala error.SetErrorToErrno(); 1408af245d11STodd Fiala return error; 1409af245d11STodd Fiala } 1410af245d11STodd Fiala 1411af245d11STodd Fiala return error; 1412af245d11STodd Fiala } 1413af245d11STodd Fiala 1414af245d11STodd Fiala static Error 1415b9c1b51eSKate Stone ParseMemoryRegionInfoFromProcMapsLine(const std::string &maps_line, 1416b9c1b51eSKate Stone MemoryRegionInfo &memory_region_info) { 1417af245d11STodd Fiala memory_region_info.Clear(); 1418af245d11STodd Fiala 1419b9739d40SPavel Labath StringExtractor line_extractor(maps_line.c_str()); 1420af245d11STodd Fiala 1421b9c1b51eSKate Stone // Format: {address_start_hex}-{address_end_hex} perms offset dev inode 1422b9c1b51eSKate Stone // pathname 1423b9c1b51eSKate Stone // perms: rwxp (letter is present if set, '-' if not, final character is 1424b9c1b51eSKate Stone // p=private, s=shared). 1425af245d11STodd Fiala 1426af245d11STodd Fiala // Parse out the starting address 1427af245d11STodd Fiala lldb::addr_t start_address = line_extractor.GetHexMaxU64(false, 0); 1428af245d11STodd Fiala 1429af245d11STodd Fiala // Parse out hyphen separating start and end address from range. 1430af245d11STodd Fiala if (!line_extractor.GetBytesLeft() || (line_extractor.GetChar() != '-')) 1431b9c1b51eSKate Stone return Error( 1432b9c1b51eSKate Stone "malformed /proc/{pid}/maps entry, missing dash between address range"); 1433af245d11STodd Fiala 1434af245d11STodd Fiala // Parse out the ending address 1435af245d11STodd Fiala lldb::addr_t end_address = line_extractor.GetHexMaxU64(false, start_address); 1436af245d11STodd Fiala 1437af245d11STodd Fiala // Parse out the space after the address. 1438af245d11STodd Fiala if (!line_extractor.GetBytesLeft() || (line_extractor.GetChar() != ' ')) 1439af245d11STodd Fiala return Error("malformed /proc/{pid}/maps entry, missing space after range"); 1440af245d11STodd Fiala 1441af245d11STodd Fiala // Save the range. 1442af245d11STodd Fiala memory_region_info.GetRange().SetRangeBase(start_address); 1443af245d11STodd Fiala memory_region_info.GetRange().SetRangeEnd(end_address); 1444af245d11STodd Fiala 1445b9c1b51eSKate Stone // Any memory region in /proc/{pid}/maps is by definition mapped into the 1446b9c1b51eSKate Stone // process. 1447ad007563SHoward Hellyer memory_region_info.SetMapped(MemoryRegionInfo::OptionalBool::eYes); 1448ad007563SHoward Hellyer 1449af245d11STodd Fiala // Parse out each permission entry. 1450af245d11STodd Fiala if (line_extractor.GetBytesLeft() < 4) 1451b9c1b51eSKate Stone return Error("malformed /proc/{pid}/maps entry, missing some portion of " 1452b9c1b51eSKate Stone "permissions"); 1453af245d11STodd Fiala 1454af245d11STodd Fiala // Handle read permission. 1455af245d11STodd Fiala const char read_perm_char = line_extractor.GetChar(); 1456af245d11STodd Fiala if (read_perm_char == 'r') 1457af245d11STodd Fiala memory_region_info.SetReadable(MemoryRegionInfo::OptionalBool::eYes); 1458c73301bbSTamas Berghammer else if (read_perm_char == '-') 1459af245d11STodd Fiala memory_region_info.SetReadable(MemoryRegionInfo::OptionalBool::eNo); 1460c73301bbSTamas Berghammer else 1461c73301bbSTamas Berghammer return Error("unexpected /proc/{pid}/maps read permission char"); 1462af245d11STodd Fiala 1463af245d11STodd Fiala // Handle write permission. 1464af245d11STodd Fiala const char write_perm_char = line_extractor.GetChar(); 1465af245d11STodd Fiala if (write_perm_char == 'w') 1466af245d11STodd Fiala memory_region_info.SetWritable(MemoryRegionInfo::OptionalBool::eYes); 1467c73301bbSTamas Berghammer else if (write_perm_char == '-') 1468af245d11STodd Fiala memory_region_info.SetWritable(MemoryRegionInfo::OptionalBool::eNo); 1469c73301bbSTamas Berghammer else 1470c73301bbSTamas Berghammer return Error("unexpected /proc/{pid}/maps write permission char"); 1471af245d11STodd Fiala 1472af245d11STodd Fiala // Handle execute permission. 1473af245d11STodd Fiala const char exec_perm_char = line_extractor.GetChar(); 1474af245d11STodd Fiala if (exec_perm_char == 'x') 1475af245d11STodd Fiala memory_region_info.SetExecutable(MemoryRegionInfo::OptionalBool::eYes); 1476c73301bbSTamas Berghammer else if (exec_perm_char == '-') 1477af245d11STodd Fiala memory_region_info.SetExecutable(MemoryRegionInfo::OptionalBool::eNo); 1478c73301bbSTamas Berghammer else 1479c73301bbSTamas Berghammer return Error("unexpected /proc/{pid}/maps exec permission char"); 1480af245d11STodd Fiala 1481d7d69f80STamas Berghammer line_extractor.GetChar(); // Read the private bit 1482d7d69f80STamas Berghammer line_extractor.SkipSpaces(); // Skip the separator 1483d7d69f80STamas Berghammer line_extractor.GetHexMaxU64(false, 0); // Read the offset 1484d7d69f80STamas Berghammer line_extractor.GetHexMaxU64(false, 0); // Read the major device number 1485d7d69f80STamas Berghammer line_extractor.GetChar(); // Read the device id separator 1486d7d69f80STamas Berghammer line_extractor.GetHexMaxU64(false, 0); // Read the major device number 1487d7d69f80STamas Berghammer line_extractor.SkipSpaces(); // Skip the separator 1488d7d69f80STamas Berghammer line_extractor.GetU64(0, 10); // Read the inode number 1489d7d69f80STamas Berghammer 1490d7d69f80STamas Berghammer line_extractor.SkipSpaces(); 1491b9739d40SPavel Labath const char *name = line_extractor.Peek(); 1492b9739d40SPavel Labath if (name) 1493b9739d40SPavel Labath memory_region_info.SetName(name); 1494d7d69f80STamas Berghammer 1495665be50eSMehdi Amini return Error(); 1496af245d11STodd Fiala } 1497af245d11STodd Fiala 1498b9c1b51eSKate Stone Error NativeProcessLinux::GetMemoryRegionInfo(lldb::addr_t load_addr, 1499b9c1b51eSKate Stone MemoryRegionInfo &range_info) { 1500b9c1b51eSKate Stone // FIXME review that the final memory region returned extends to the end of 1501b9c1b51eSKate Stone // the virtual address space, 1502af245d11STodd Fiala // with no perms if it is not mapped. 1503af245d11STodd Fiala 1504af245d11STodd Fiala // Use an approach that reads memory regions from /proc/{pid}/maps. 1505af245d11STodd Fiala // Assume proc maps entries are in ascending order. 1506af245d11STodd Fiala // FIXME assert if we find differently. 1507af245d11STodd Fiala 1508b9c1b51eSKate Stone if (m_supports_mem_region == LazyBool::eLazyBoolNo) { 1509af245d11STodd Fiala // We're done. 1510a6f5795aSTamas Berghammer return Error("unsupported"); 1511af245d11STodd Fiala } 1512af245d11STodd Fiala 1513a6f5795aSTamas Berghammer Error error = PopulateMemoryRegionCache(); 1514b9c1b51eSKate Stone if (error.Fail()) { 1515af245d11STodd Fiala return error; 1516af245d11STodd Fiala } 1517af245d11STodd Fiala 1518af245d11STodd Fiala lldb::addr_t prev_base_address = 0; 1519af245d11STodd Fiala 1520b9c1b51eSKate Stone // FIXME start by finding the last region that is <= target address using 1521b9c1b51eSKate Stone // binary search. Data is sorted. 1522af245d11STodd Fiala // There can be a ton of regions on pthreads apps with lots of threads. 1523b9c1b51eSKate Stone for (auto it = m_mem_region_cache.begin(); it != m_mem_region_cache.end(); 1524b9c1b51eSKate Stone ++it) { 1525a6f5795aSTamas Berghammer MemoryRegionInfo &proc_entry_info = it->first; 1526af245d11STodd Fiala 1527af245d11STodd Fiala // Sanity check assumption that /proc/{pid}/maps entries are ascending. 1528b9c1b51eSKate Stone assert((proc_entry_info.GetRange().GetRangeBase() >= prev_base_address) && 1529b9c1b51eSKate Stone "descending /proc/pid/maps entries detected, unexpected"); 1530af245d11STodd Fiala prev_base_address = proc_entry_info.GetRange().GetRangeBase(); 1531b1554311SHafiz Abid Qadeer UNUSED_IF_ASSERT_DISABLED(prev_base_address); 1532af245d11STodd Fiala 1533b9c1b51eSKate Stone // If the target address comes before this entry, indicate distance to next 1534b9c1b51eSKate Stone // region. 1535b9c1b51eSKate Stone if (load_addr < proc_entry_info.GetRange().GetRangeBase()) { 1536af245d11STodd Fiala range_info.GetRange().SetRangeBase(load_addr); 1537b9c1b51eSKate Stone range_info.GetRange().SetByteSize( 1538b9c1b51eSKate Stone proc_entry_info.GetRange().GetRangeBase() - load_addr); 1539af245d11STodd Fiala range_info.SetReadable(MemoryRegionInfo::OptionalBool::eNo); 1540af245d11STodd Fiala range_info.SetWritable(MemoryRegionInfo::OptionalBool::eNo); 1541af245d11STodd Fiala range_info.SetExecutable(MemoryRegionInfo::OptionalBool::eNo); 1542ad007563SHoward Hellyer range_info.SetMapped(MemoryRegionInfo::OptionalBool::eNo); 1543af245d11STodd Fiala 1544af245d11STodd Fiala return error; 1545b9c1b51eSKate Stone } else if (proc_entry_info.GetRange().Contains(load_addr)) { 1546af245d11STodd Fiala // The target address is within the memory region we're processing here. 1547af245d11STodd Fiala range_info = proc_entry_info; 1548af245d11STodd Fiala return error; 1549af245d11STodd Fiala } 1550af245d11STodd Fiala 1551b9c1b51eSKate Stone // The target memory address comes somewhere after the region we just 1552b9c1b51eSKate Stone // parsed. 1553af245d11STodd Fiala } 1554af245d11STodd Fiala 1555b9c1b51eSKate Stone // If we made it here, we didn't find an entry that contained the given 1556b9c1b51eSKate Stone // address. Return the 1557b9c1b51eSKate Stone // load_addr as start and the amount of bytes betwwen load address and the end 1558b9c1b51eSKate Stone // of the memory as 155909839c33STamas Berghammer // size. 156009839c33STamas Berghammer range_info.GetRange().SetRangeBase(load_addr); 1561ad007563SHoward Hellyer range_info.GetRange().SetRangeEnd(LLDB_INVALID_ADDRESS); 156209839c33STamas Berghammer range_info.SetReadable(MemoryRegionInfo::OptionalBool::eNo); 156309839c33STamas Berghammer range_info.SetWritable(MemoryRegionInfo::OptionalBool::eNo); 156409839c33STamas Berghammer range_info.SetExecutable(MemoryRegionInfo::OptionalBool::eNo); 1565ad007563SHoward Hellyer range_info.SetMapped(MemoryRegionInfo::OptionalBool::eNo); 1566af245d11STodd Fiala return error; 1567af245d11STodd Fiala } 1568af245d11STodd Fiala 1569a6f5795aSTamas Berghammer Error NativeProcessLinux::PopulateMemoryRegionCache() { 1570a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1571a6f5795aSTamas Berghammer 1572a6f5795aSTamas Berghammer // If our cache is empty, pull the latest. There should always be at least 1573a6f5795aSTamas Berghammer // one memory region if memory region handling is supported. 1574a6f5795aSTamas Berghammer if (!m_mem_region_cache.empty()) { 1575a6321a8eSPavel Labath LLDB_LOG(log, "reusing {0} cached memory region entries", 1576a6321a8eSPavel Labath m_mem_region_cache.size()); 1577a6f5795aSTamas Berghammer return Error(); 1578a6f5795aSTamas Berghammer } 1579a6f5795aSTamas Berghammer 1580a6f5795aSTamas Berghammer Error error = ProcFileReader::ProcessLineByLine( 1581a6f5795aSTamas Berghammer GetID(), "maps", [&](const std::string &line) -> bool { 1582a6f5795aSTamas Berghammer MemoryRegionInfo info; 1583a6f5795aSTamas Berghammer const Error parse_error = 1584a6f5795aSTamas Berghammer ParseMemoryRegionInfoFromProcMapsLine(line, info); 1585a6f5795aSTamas Berghammer if (parse_error.Success()) { 1586a6f5795aSTamas Berghammer m_mem_region_cache.emplace_back( 1587a6f5795aSTamas Berghammer info, FileSpec(info.GetName().GetCString(), true)); 1588a6f5795aSTamas Berghammer return true; 1589a6f5795aSTamas Berghammer } else { 1590a6321a8eSPavel Labath LLDB_LOG(log, "failed to parse proc maps line '{0}': {1}", line, 1591a6321a8eSPavel Labath parse_error); 1592a6f5795aSTamas Berghammer return false; 1593a6f5795aSTamas Berghammer } 1594a6f5795aSTamas Berghammer }); 1595a6f5795aSTamas Berghammer 1596a6f5795aSTamas Berghammer // If we had an error, we'll mark unsupported. 1597a6f5795aSTamas Berghammer if (error.Fail()) { 1598a6f5795aSTamas Berghammer m_supports_mem_region = LazyBool::eLazyBoolNo; 1599a6f5795aSTamas Berghammer return error; 1600a6f5795aSTamas Berghammer } else if (m_mem_region_cache.empty()) { 1601a6f5795aSTamas Berghammer // No entries after attempting to read them. This shouldn't happen if 1602a6f5795aSTamas Berghammer // /proc/{pid}/maps is supported. Assume we don't support map entries 1603a6f5795aSTamas Berghammer // via procfs. 1604a6321a8eSPavel Labath LLDB_LOG(log, 1605a6321a8eSPavel Labath "failed to find any procfs maps entries, assuming no support " 1606a6321a8eSPavel Labath "for memory region metadata retrieval"); 1607a6f5795aSTamas Berghammer m_supports_mem_region = LazyBool::eLazyBoolNo; 1608a6f5795aSTamas Berghammer error.SetErrorString("not supported"); 1609a6f5795aSTamas Berghammer return error; 1610a6f5795aSTamas Berghammer } 1611a6f5795aSTamas Berghammer 1612a6321a8eSPavel Labath LLDB_LOG(log, "read {0} memory region entries from /proc/{1}/maps", 1613a6321a8eSPavel Labath m_mem_region_cache.size(), GetID()); 1614a6f5795aSTamas Berghammer 1615a6f5795aSTamas Berghammer // We support memory retrieval, remember that. 1616a6f5795aSTamas Berghammer m_supports_mem_region = LazyBool::eLazyBoolYes; 1617a6f5795aSTamas Berghammer return Error(); 1618a6f5795aSTamas Berghammer } 1619a6f5795aSTamas Berghammer 1620b9c1b51eSKate Stone void NativeProcessLinux::DoStopIDBumped(uint32_t newBumpId) { 1621a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1622a6321a8eSPavel Labath LLDB_LOG(log, "newBumpId={0}", newBumpId); 1623a6321a8eSPavel Labath LLDB_LOG(log, "clearing {0} entries from memory region cache", 1624a6321a8eSPavel Labath m_mem_region_cache.size()); 1625af245d11STodd Fiala m_mem_region_cache.clear(); 1626af245d11STodd Fiala } 1627af245d11STodd Fiala 1628b9c1b51eSKate Stone Error NativeProcessLinux::AllocateMemory(size_t size, uint32_t permissions, 1629b9c1b51eSKate Stone lldb::addr_t &addr) { 1630af245d11STodd Fiala // FIXME implementing this requires the equivalent of 1631af245d11STodd Fiala // InferiorCallPOSIX::InferiorCallMmap, which depends on 1632af245d11STodd Fiala // functional ThreadPlans working with Native*Protocol. 1633af245d11STodd Fiala #if 1 1634af245d11STodd Fiala return Error("not implemented yet"); 1635af245d11STodd Fiala #else 1636af245d11STodd Fiala addr = LLDB_INVALID_ADDRESS; 1637af245d11STodd Fiala 1638af245d11STodd Fiala unsigned prot = 0; 1639af245d11STodd Fiala if (permissions & lldb::ePermissionsReadable) 1640af245d11STodd Fiala prot |= eMmapProtRead; 1641af245d11STodd Fiala if (permissions & lldb::ePermissionsWritable) 1642af245d11STodd Fiala prot |= eMmapProtWrite; 1643af245d11STodd Fiala if (permissions & lldb::ePermissionsExecutable) 1644af245d11STodd Fiala prot |= eMmapProtExec; 1645af245d11STodd Fiala 1646af245d11STodd Fiala // TODO implement this directly in NativeProcessLinux 1647af245d11STodd Fiala // (and lift to NativeProcessPOSIX if/when that class is 1648af245d11STodd Fiala // refactored out). 1649af245d11STodd Fiala if (InferiorCallMmap(this, addr, 0, size, prot, 1650af245d11STodd Fiala eMmapFlagsAnon | eMmapFlagsPrivate, -1, 0)) { 1651af245d11STodd Fiala m_addr_to_mmap_size[addr] = size; 1652665be50eSMehdi Amini return Error(); 1653af245d11STodd Fiala } else { 1654af245d11STodd Fiala addr = LLDB_INVALID_ADDRESS; 1655b9c1b51eSKate Stone return Error("unable to allocate %" PRIu64 1656b9c1b51eSKate Stone " bytes of memory with permissions %s", 1657b9c1b51eSKate Stone size, GetPermissionsAsCString(permissions)); 1658af245d11STodd Fiala } 1659af245d11STodd Fiala #endif 1660af245d11STodd Fiala } 1661af245d11STodd Fiala 1662b9c1b51eSKate Stone Error NativeProcessLinux::DeallocateMemory(lldb::addr_t addr) { 1663af245d11STodd Fiala // FIXME see comments in AllocateMemory - required lower-level 1664af245d11STodd Fiala // bits not in place yet (ThreadPlans) 1665af245d11STodd Fiala return Error("not implemented"); 1666af245d11STodd Fiala } 1667af245d11STodd Fiala 1668b9c1b51eSKate Stone lldb::addr_t NativeProcessLinux::GetSharedLibraryInfoAddress() { 1669af245d11STodd Fiala // punt on this for now 1670af245d11STodd Fiala return LLDB_INVALID_ADDRESS; 1671af245d11STodd Fiala } 1672af245d11STodd Fiala 1673b9c1b51eSKate Stone size_t NativeProcessLinux::UpdateThreads() { 1674af245d11STodd Fiala // The NativeProcessLinux monitoring threads are always up to date 1675af245d11STodd Fiala // with respect to thread state and they keep the thread list 1676af245d11STodd Fiala // populated properly. All this method needs to do is return the 1677af245d11STodd Fiala // thread count. 1678af245d11STodd Fiala return m_threads.size(); 1679af245d11STodd Fiala } 1680af245d11STodd Fiala 1681b9c1b51eSKate Stone bool NativeProcessLinux::GetArchitecture(ArchSpec &arch) const { 1682af245d11STodd Fiala arch = m_arch; 1683af245d11STodd Fiala return true; 1684af245d11STodd Fiala } 1685af245d11STodd Fiala 1686b9c1b51eSKate Stone Error NativeProcessLinux::GetSoftwareBreakpointPCOffset( 1687b9c1b51eSKate Stone uint32_t &actual_opcode_size) { 1688af245d11STodd Fiala // FIXME put this behind a breakpoint protocol class that can be 1689af245d11STodd Fiala // set per architecture. Need ARM, MIPS support here. 1690af245d11STodd Fiala static const uint8_t g_i386_opcode[] = {0xCC}; 1691bb00d0b6SUlrich Weigand static const uint8_t g_s390x_opcode[] = {0x00, 0x01}; 1692af245d11STodd Fiala 1693b9c1b51eSKate Stone switch (m_arch.GetMachine()) { 1694af245d11STodd Fiala case llvm::Triple::x86: 1695af245d11STodd Fiala case llvm::Triple::x86_64: 1696af245d11STodd Fiala actual_opcode_size = static_cast<uint32_t>(sizeof(g_i386_opcode)); 1697665be50eSMehdi Amini return Error(); 1698af245d11STodd Fiala 1699bb00d0b6SUlrich Weigand case llvm::Triple::systemz: 1700bb00d0b6SUlrich Weigand actual_opcode_size = static_cast<uint32_t>(sizeof(g_s390x_opcode)); 1701665be50eSMehdi Amini return Error(); 1702bb00d0b6SUlrich Weigand 1703ff7fd900STamas Berghammer case llvm::Triple::arm: 1704ff7fd900STamas Berghammer case llvm::Triple::aarch64: 1705e8659b5dSMohit K. Bhakkad case llvm::Triple::mips64: 1706e8659b5dSMohit K. Bhakkad case llvm::Triple::mips64el: 1707ce815e45SSagar Thakur case llvm::Triple::mips: 1708ce815e45SSagar Thakur case llvm::Triple::mipsel: 1709ff7fd900STamas Berghammer // On these architectures the PC don't get updated for breakpoint hits 1710c60c9452SJaydeep Patil actual_opcode_size = 0; 1711665be50eSMehdi Amini return Error(); 1712e8659b5dSMohit K. Bhakkad 1713af245d11STodd Fiala default: 1714af245d11STodd Fiala assert(false && "CPU type not supported!"); 1715af245d11STodd Fiala return Error("CPU type not supported"); 1716af245d11STodd Fiala } 1717af245d11STodd Fiala } 1718af245d11STodd Fiala 1719b9c1b51eSKate Stone Error NativeProcessLinux::SetBreakpoint(lldb::addr_t addr, uint32_t size, 1720b9c1b51eSKate Stone bool hardware) { 1721af245d11STodd Fiala if (hardware) 1722af245d11STodd Fiala return Error("NativeProcessLinux does not support hardware breakpoints"); 1723af245d11STodd Fiala else 1724af245d11STodd Fiala return SetSoftwareBreakpoint(addr, size); 1725af245d11STodd Fiala } 1726af245d11STodd Fiala 1727b9c1b51eSKate Stone Error NativeProcessLinux::GetSoftwareBreakpointTrapOpcode( 1728b9c1b51eSKate Stone size_t trap_opcode_size_hint, size_t &actual_opcode_size, 1729b9c1b51eSKate Stone const uint8_t *&trap_opcode_bytes) { 173063c8be95STamas Berghammer // FIXME put this behind a breakpoint protocol class that can be set per 173163c8be95STamas Berghammer // architecture. Need MIPS support here. 17322afc5966STodd Fiala static const uint8_t g_aarch64_opcode[] = {0x00, 0x00, 0x20, 0xd4}; 1733be379e15STamas Berghammer // The ARM reference recommends the use of 0xe7fddefe and 0xdefe but the 1734be379e15STamas Berghammer // linux kernel does otherwise. 1735be379e15STamas Berghammer static const uint8_t g_arm_breakpoint_opcode[] = {0xf0, 0x01, 0xf0, 0xe7}; 1736af245d11STodd Fiala static const uint8_t g_i386_opcode[] = {0xCC}; 17373df471c3SMohit K. Bhakkad static const uint8_t g_mips64_opcode[] = {0x00, 0x00, 0x00, 0x0d}; 17382c2acf96SMohit K. Bhakkad static const uint8_t g_mips64el_opcode[] = {0x0d, 0x00, 0x00, 0x00}; 1739bb00d0b6SUlrich Weigand static const uint8_t g_s390x_opcode[] = {0x00, 0x01}; 1740be379e15STamas Berghammer static const uint8_t g_thumb_breakpoint_opcode[] = {0x01, 0xde}; 1741af245d11STodd Fiala 1742b9c1b51eSKate Stone switch (m_arch.GetMachine()) { 17432afc5966STodd Fiala case llvm::Triple::aarch64: 17442afc5966STodd Fiala trap_opcode_bytes = g_aarch64_opcode; 17452afc5966STodd Fiala actual_opcode_size = sizeof(g_aarch64_opcode); 1746665be50eSMehdi Amini return Error(); 17472afc5966STodd Fiala 174863c8be95STamas Berghammer case llvm::Triple::arm: 1749b9c1b51eSKate Stone switch (trap_opcode_size_hint) { 175063c8be95STamas Berghammer case 2: 175163c8be95STamas Berghammer trap_opcode_bytes = g_thumb_breakpoint_opcode; 175263c8be95STamas Berghammer actual_opcode_size = sizeof(g_thumb_breakpoint_opcode); 1753665be50eSMehdi Amini return Error(); 175463c8be95STamas Berghammer case 4: 175563c8be95STamas Berghammer trap_opcode_bytes = g_arm_breakpoint_opcode; 175663c8be95STamas Berghammer actual_opcode_size = sizeof(g_arm_breakpoint_opcode); 1757665be50eSMehdi Amini return Error(); 175863c8be95STamas Berghammer default: 175963c8be95STamas Berghammer assert(false && "Unrecognised trap opcode size hint!"); 176063c8be95STamas Berghammer return Error("Unrecognised trap opcode size hint!"); 176163c8be95STamas Berghammer } 176263c8be95STamas Berghammer 1763af245d11STodd Fiala case llvm::Triple::x86: 1764af245d11STodd Fiala case llvm::Triple::x86_64: 1765af245d11STodd Fiala trap_opcode_bytes = g_i386_opcode; 1766af245d11STodd Fiala actual_opcode_size = sizeof(g_i386_opcode); 1767665be50eSMehdi Amini return Error(); 1768af245d11STodd Fiala 1769ce815e45SSagar Thakur case llvm::Triple::mips: 17703df471c3SMohit K. Bhakkad case llvm::Triple::mips64: 17713df471c3SMohit K. Bhakkad trap_opcode_bytes = g_mips64_opcode; 17723df471c3SMohit K. Bhakkad actual_opcode_size = sizeof(g_mips64_opcode); 1773665be50eSMehdi Amini return Error(); 17743df471c3SMohit K. Bhakkad 1775ce815e45SSagar Thakur case llvm::Triple::mipsel: 17762c2acf96SMohit K. Bhakkad case llvm::Triple::mips64el: 17772c2acf96SMohit K. Bhakkad trap_opcode_bytes = g_mips64el_opcode; 17782c2acf96SMohit K. Bhakkad actual_opcode_size = sizeof(g_mips64el_opcode); 1779665be50eSMehdi Amini return Error(); 17802c2acf96SMohit K. Bhakkad 1781bb00d0b6SUlrich Weigand case llvm::Triple::systemz: 1782bb00d0b6SUlrich Weigand trap_opcode_bytes = g_s390x_opcode; 1783bb00d0b6SUlrich Weigand actual_opcode_size = sizeof(g_s390x_opcode); 1784665be50eSMehdi Amini return Error(); 1785bb00d0b6SUlrich Weigand 1786af245d11STodd Fiala default: 1787af245d11STodd Fiala assert(false && "CPU type not supported!"); 1788af245d11STodd Fiala return Error("CPU type not supported"); 1789af245d11STodd Fiala } 1790af245d11STodd Fiala } 1791af245d11STodd Fiala 1792af245d11STodd Fiala #if 0 1793af245d11STodd Fiala ProcessMessage::CrashReason 1794af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGSEGV(const siginfo_t *info) 1795af245d11STodd Fiala { 1796af245d11STodd Fiala ProcessMessage::CrashReason reason; 1797af245d11STodd Fiala assert(info->si_signo == SIGSEGV); 1798af245d11STodd Fiala 1799af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 1800af245d11STodd Fiala 1801af245d11STodd Fiala switch (info->si_code) 1802af245d11STodd Fiala { 1803af245d11STodd Fiala default: 1804af245d11STodd Fiala assert(false && "unexpected si_code for SIGSEGV"); 1805af245d11STodd Fiala break; 1806af245d11STodd Fiala case SI_KERNEL: 1807af245d11STodd Fiala // Linux will occasionally send spurious SI_KERNEL codes. 1808af245d11STodd Fiala // (this is poorly documented in sigaction) 1809af245d11STodd Fiala // One way to get this is via unaligned SIMD loads. 1810af245d11STodd Fiala reason = ProcessMessage::eInvalidAddress; // for lack of anything better 1811af245d11STodd Fiala break; 1812af245d11STodd Fiala case SEGV_MAPERR: 1813af245d11STodd Fiala reason = ProcessMessage::eInvalidAddress; 1814af245d11STodd Fiala break; 1815af245d11STodd Fiala case SEGV_ACCERR: 1816af245d11STodd Fiala reason = ProcessMessage::ePrivilegedAddress; 1817af245d11STodd Fiala break; 1818af245d11STodd Fiala } 1819af245d11STodd Fiala 1820af245d11STodd Fiala return reason; 1821af245d11STodd Fiala } 1822af245d11STodd Fiala #endif 1823af245d11STodd Fiala 1824af245d11STodd Fiala #if 0 1825af245d11STodd Fiala ProcessMessage::CrashReason 1826af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGILL(const siginfo_t *info) 1827af245d11STodd Fiala { 1828af245d11STodd Fiala ProcessMessage::CrashReason reason; 1829af245d11STodd Fiala assert(info->si_signo == SIGILL); 1830af245d11STodd Fiala 1831af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 1832af245d11STodd Fiala 1833af245d11STodd Fiala switch (info->si_code) 1834af245d11STodd Fiala { 1835af245d11STodd Fiala default: 1836af245d11STodd Fiala assert(false && "unexpected si_code for SIGILL"); 1837af245d11STodd Fiala break; 1838af245d11STodd Fiala case ILL_ILLOPC: 1839af245d11STodd Fiala reason = ProcessMessage::eIllegalOpcode; 1840af245d11STodd Fiala break; 1841af245d11STodd Fiala case ILL_ILLOPN: 1842af245d11STodd Fiala reason = ProcessMessage::eIllegalOperand; 1843af245d11STodd Fiala break; 1844af245d11STodd Fiala case ILL_ILLADR: 1845af245d11STodd Fiala reason = ProcessMessage::eIllegalAddressingMode; 1846af245d11STodd Fiala break; 1847af245d11STodd Fiala case ILL_ILLTRP: 1848af245d11STodd Fiala reason = ProcessMessage::eIllegalTrap; 1849af245d11STodd Fiala break; 1850af245d11STodd Fiala case ILL_PRVOPC: 1851af245d11STodd Fiala reason = ProcessMessage::ePrivilegedOpcode; 1852af245d11STodd Fiala break; 1853af245d11STodd Fiala case ILL_PRVREG: 1854af245d11STodd Fiala reason = ProcessMessage::ePrivilegedRegister; 1855af245d11STodd Fiala break; 1856af245d11STodd Fiala case ILL_COPROC: 1857af245d11STodd Fiala reason = ProcessMessage::eCoprocessorError; 1858af245d11STodd Fiala break; 1859af245d11STodd Fiala case ILL_BADSTK: 1860af245d11STodd Fiala reason = ProcessMessage::eInternalStackError; 1861af245d11STodd Fiala break; 1862af245d11STodd Fiala } 1863af245d11STodd Fiala 1864af245d11STodd Fiala return reason; 1865af245d11STodd Fiala } 1866af245d11STodd Fiala #endif 1867af245d11STodd Fiala 1868af245d11STodd Fiala #if 0 1869af245d11STodd Fiala ProcessMessage::CrashReason 1870af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGFPE(const siginfo_t *info) 1871af245d11STodd Fiala { 1872af245d11STodd Fiala ProcessMessage::CrashReason reason; 1873af245d11STodd Fiala assert(info->si_signo == SIGFPE); 1874af245d11STodd Fiala 1875af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 1876af245d11STodd Fiala 1877af245d11STodd Fiala switch (info->si_code) 1878af245d11STodd Fiala { 1879af245d11STodd Fiala default: 1880af245d11STodd Fiala assert(false && "unexpected si_code for SIGFPE"); 1881af245d11STodd Fiala break; 1882af245d11STodd Fiala case FPE_INTDIV: 1883af245d11STodd Fiala reason = ProcessMessage::eIntegerDivideByZero; 1884af245d11STodd Fiala break; 1885af245d11STodd Fiala case FPE_INTOVF: 1886af245d11STodd Fiala reason = ProcessMessage::eIntegerOverflow; 1887af245d11STodd Fiala break; 1888af245d11STodd Fiala case FPE_FLTDIV: 1889af245d11STodd Fiala reason = ProcessMessage::eFloatDivideByZero; 1890af245d11STodd Fiala break; 1891af245d11STodd Fiala case FPE_FLTOVF: 1892af245d11STodd Fiala reason = ProcessMessage::eFloatOverflow; 1893af245d11STodd Fiala break; 1894af245d11STodd Fiala case FPE_FLTUND: 1895af245d11STodd Fiala reason = ProcessMessage::eFloatUnderflow; 1896af245d11STodd Fiala break; 1897af245d11STodd Fiala case FPE_FLTRES: 1898af245d11STodd Fiala reason = ProcessMessage::eFloatInexactResult; 1899af245d11STodd Fiala break; 1900af245d11STodd Fiala case FPE_FLTINV: 1901af245d11STodd Fiala reason = ProcessMessage::eFloatInvalidOperation; 1902af245d11STodd Fiala break; 1903af245d11STodd Fiala case FPE_FLTSUB: 1904af245d11STodd Fiala reason = ProcessMessage::eFloatSubscriptRange; 1905af245d11STodd Fiala break; 1906af245d11STodd Fiala } 1907af245d11STodd Fiala 1908af245d11STodd Fiala return reason; 1909af245d11STodd Fiala } 1910af245d11STodd Fiala #endif 1911af245d11STodd Fiala 1912af245d11STodd Fiala #if 0 1913af245d11STodd Fiala ProcessMessage::CrashReason 1914af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGBUS(const siginfo_t *info) 1915af245d11STodd Fiala { 1916af245d11STodd Fiala ProcessMessage::CrashReason reason; 1917af245d11STodd Fiala assert(info->si_signo == SIGBUS); 1918af245d11STodd Fiala 1919af245d11STodd Fiala reason = ProcessMessage::eInvalidCrashReason; 1920af245d11STodd Fiala 1921af245d11STodd Fiala switch (info->si_code) 1922af245d11STodd Fiala { 1923af245d11STodd Fiala default: 1924af245d11STodd Fiala assert(false && "unexpected si_code for SIGBUS"); 1925af245d11STodd Fiala break; 1926af245d11STodd Fiala case BUS_ADRALN: 1927af245d11STodd Fiala reason = ProcessMessage::eIllegalAlignment; 1928af245d11STodd Fiala break; 1929af245d11STodd Fiala case BUS_ADRERR: 1930af245d11STodd Fiala reason = ProcessMessage::eIllegalAddress; 1931af245d11STodd Fiala break; 1932af245d11STodd Fiala case BUS_OBJERR: 1933af245d11STodd Fiala reason = ProcessMessage::eHardwareError; 1934af245d11STodd Fiala break; 1935af245d11STodd Fiala } 1936af245d11STodd Fiala 1937af245d11STodd Fiala return reason; 1938af245d11STodd Fiala } 1939af245d11STodd Fiala #endif 1940af245d11STodd Fiala 1941b9c1b51eSKate Stone Error NativeProcessLinux::ReadMemory(lldb::addr_t addr, void *buf, size_t size, 1942b9c1b51eSKate Stone size_t &bytes_read) { 1943df7c6995SPavel Labath if (ProcessVmReadvSupported()) { 1944b9c1b51eSKate Stone // The process_vm_readv path is about 50 times faster than ptrace api. We 1945b9c1b51eSKate Stone // want to use 1946df7c6995SPavel Labath // this syscall if it is supported. 1947df7c6995SPavel Labath 1948df7c6995SPavel Labath const ::pid_t pid = GetID(); 1949df7c6995SPavel Labath 1950df7c6995SPavel Labath struct iovec local_iov, remote_iov; 1951df7c6995SPavel Labath local_iov.iov_base = buf; 1952df7c6995SPavel Labath local_iov.iov_len = size; 1953df7c6995SPavel Labath remote_iov.iov_base = reinterpret_cast<void *>(addr); 1954df7c6995SPavel Labath remote_iov.iov_len = size; 1955df7c6995SPavel Labath 1956df7c6995SPavel Labath bytes_read = process_vm_readv(pid, &local_iov, 1, &remote_iov, 1, 0); 1957df7c6995SPavel Labath const bool success = bytes_read == size; 1958df7c6995SPavel Labath 1959a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 1960a6321a8eSPavel Labath LLDB_LOG(log, 1961a6321a8eSPavel Labath "using process_vm_readv to read {0} bytes from inferior " 1962a6321a8eSPavel Labath "address {1:x}: {2}", 1963a6321a8eSPavel Labath size, addr, success ? "Success" : strerror(errno)); 1964df7c6995SPavel Labath 1965df7c6995SPavel Labath if (success) 1966665be50eSMehdi Amini return Error(); 1967a6321a8eSPavel Labath // else the call failed for some reason, let's retry the read using ptrace 1968b9c1b51eSKate Stone // api. 1969df7c6995SPavel Labath } 1970df7c6995SPavel Labath 197119cbe96aSPavel Labath unsigned char *dst = static_cast<unsigned char *>(buf); 197219cbe96aSPavel Labath size_t remainder; 197319cbe96aSPavel Labath long data; 197419cbe96aSPavel Labath 1975a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_MEMORY)); 1976a6321a8eSPavel Labath LLDB_LOG(log, "addr = {0}, buf = {1}, size = {2}", addr, buf, size); 197719cbe96aSPavel Labath 1978b9c1b51eSKate Stone for (bytes_read = 0; bytes_read < size; bytes_read += remainder) { 1979b9c1b51eSKate Stone Error error = NativeProcessLinux::PtraceWrapper( 1980b9c1b51eSKate Stone PTRACE_PEEKDATA, GetID(), (void *)addr, nullptr, 0, &data); 1981a6321a8eSPavel Labath if (error.Fail()) 198219cbe96aSPavel Labath return error; 198319cbe96aSPavel Labath 198419cbe96aSPavel Labath remainder = size - bytes_read; 198519cbe96aSPavel Labath remainder = remainder > k_ptrace_word_size ? k_ptrace_word_size : remainder; 198619cbe96aSPavel Labath 198719cbe96aSPavel Labath // Copy the data into our buffer 1988f6ef187bSMohit K. Bhakkad memcpy(dst, &data, remainder); 198919cbe96aSPavel Labath 1990a6321a8eSPavel Labath LLDB_LOG(log, "[{0:x}]:{1:x}", addr, data); 199119cbe96aSPavel Labath addr += k_ptrace_word_size; 199219cbe96aSPavel Labath dst += k_ptrace_word_size; 199319cbe96aSPavel Labath } 1994665be50eSMehdi Amini return Error(); 1995af245d11STodd Fiala } 1996af245d11STodd Fiala 1997b9c1b51eSKate Stone Error NativeProcessLinux::ReadMemoryWithoutTrap(lldb::addr_t addr, void *buf, 1998b9c1b51eSKate Stone size_t size, 1999b9c1b51eSKate Stone size_t &bytes_read) { 20003eb4b458SChaoren Lin Error error = ReadMemory(addr, buf, size, bytes_read); 2001b9c1b51eSKate Stone if (error.Fail()) 2002b9c1b51eSKate Stone return error; 20033eb4b458SChaoren Lin return m_breakpoint_list.RemoveTrapsFromBuffer(addr, buf, size); 20043eb4b458SChaoren Lin } 20053eb4b458SChaoren Lin 2006b9c1b51eSKate Stone Error NativeProcessLinux::WriteMemory(lldb::addr_t addr, const void *buf, 2007b9c1b51eSKate Stone size_t size, size_t &bytes_written) { 200819cbe96aSPavel Labath const unsigned char *src = static_cast<const unsigned char *>(buf); 200919cbe96aSPavel Labath size_t remainder; 201019cbe96aSPavel Labath Error error; 201119cbe96aSPavel Labath 2012a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_MEMORY)); 2013a6321a8eSPavel Labath LLDB_LOG(log, "addr = {0}, buf = {1}, size = {2}", addr, buf, size); 201419cbe96aSPavel Labath 2015b9c1b51eSKate Stone for (bytes_written = 0; bytes_written < size; bytes_written += remainder) { 201619cbe96aSPavel Labath remainder = size - bytes_written; 201719cbe96aSPavel Labath remainder = remainder > k_ptrace_word_size ? k_ptrace_word_size : remainder; 201819cbe96aSPavel Labath 2019b9c1b51eSKate Stone if (remainder == k_ptrace_word_size) { 202019cbe96aSPavel Labath unsigned long data = 0; 2021f6ef187bSMohit K. Bhakkad memcpy(&data, src, k_ptrace_word_size); 202219cbe96aSPavel Labath 2023a6321a8eSPavel Labath LLDB_LOG(log, "[{0:x}]:{1:x}", addr, data); 2024b9c1b51eSKate Stone error = NativeProcessLinux::PtraceWrapper(PTRACE_POKEDATA, GetID(), 2025b9c1b51eSKate Stone (void *)addr, (void *)data); 2026a6321a8eSPavel Labath if (error.Fail()) 202719cbe96aSPavel Labath return error; 2028b9c1b51eSKate Stone } else { 202919cbe96aSPavel Labath unsigned char buff[8]; 203019cbe96aSPavel Labath size_t bytes_read; 203119cbe96aSPavel Labath error = ReadMemory(addr, buff, k_ptrace_word_size, bytes_read); 2032a6321a8eSPavel Labath if (error.Fail()) 203319cbe96aSPavel Labath return error; 203419cbe96aSPavel Labath 203519cbe96aSPavel Labath memcpy(buff, src, remainder); 203619cbe96aSPavel Labath 203719cbe96aSPavel Labath size_t bytes_written_rec; 203819cbe96aSPavel Labath error = WriteMemory(addr, buff, k_ptrace_word_size, bytes_written_rec); 2039a6321a8eSPavel Labath if (error.Fail()) 204019cbe96aSPavel Labath return error; 204119cbe96aSPavel Labath 2042a6321a8eSPavel Labath LLDB_LOG(log, "[{0:x}]:{1:x} ({2:x})", addr, *(const unsigned long *)src, 2043b9c1b51eSKate Stone *(unsigned long *)buff); 204419cbe96aSPavel Labath } 204519cbe96aSPavel Labath 204619cbe96aSPavel Labath addr += k_ptrace_word_size; 204719cbe96aSPavel Labath src += k_ptrace_word_size; 204819cbe96aSPavel Labath } 204919cbe96aSPavel Labath return error; 2050af245d11STodd Fiala } 2051af245d11STodd Fiala 2052b9c1b51eSKate Stone Error NativeProcessLinux::GetSignalInfo(lldb::tid_t tid, void *siginfo) { 205319cbe96aSPavel Labath return PtraceWrapper(PTRACE_GETSIGINFO, tid, nullptr, siginfo); 2054af245d11STodd Fiala } 2055af245d11STodd Fiala 2056b9c1b51eSKate Stone Error NativeProcessLinux::GetEventMessage(lldb::tid_t tid, 2057b9c1b51eSKate Stone unsigned long *message) { 205819cbe96aSPavel Labath return PtraceWrapper(PTRACE_GETEVENTMSG, tid, nullptr, message); 2059af245d11STodd Fiala } 2060af245d11STodd Fiala 2061b9c1b51eSKate Stone Error NativeProcessLinux::Detach(lldb::tid_t tid) { 206297ccc294SChaoren Lin if (tid == LLDB_INVALID_THREAD_ID) 2063665be50eSMehdi Amini return Error(); 206497ccc294SChaoren Lin 206519cbe96aSPavel Labath return PtraceWrapper(PTRACE_DETACH, tid); 2066af245d11STodd Fiala } 2067af245d11STodd Fiala 2068b9c1b51eSKate Stone bool NativeProcessLinux::HasThreadNoLock(lldb::tid_t thread_id) { 2069b9c1b51eSKate Stone for (auto thread_sp : m_threads) { 2070af245d11STodd Fiala assert(thread_sp && "thread list should not contain NULL threads"); 2071b9c1b51eSKate Stone if (thread_sp->GetID() == thread_id) { 2072af245d11STodd Fiala // We have this thread. 2073af245d11STodd Fiala return true; 2074af245d11STodd Fiala } 2075af245d11STodd Fiala } 2076af245d11STodd Fiala 2077af245d11STodd Fiala // We don't have this thread. 2078af245d11STodd Fiala return false; 2079af245d11STodd Fiala } 2080af245d11STodd Fiala 2081b9c1b51eSKate Stone bool NativeProcessLinux::StopTrackingThread(lldb::tid_t thread_id) { 2082a6321a8eSPavel Labath Log *const log = ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_THREAD); 2083a6321a8eSPavel Labath LLDB_LOG(log, "tid: {0})", thread_id); 20841dbc6c9cSPavel Labath 20851dbc6c9cSPavel Labath bool found = false; 2086b9c1b51eSKate Stone for (auto it = m_threads.begin(); it != m_threads.end(); ++it) { 2087b9c1b51eSKate Stone if (*it && ((*it)->GetID() == thread_id)) { 2088af245d11STodd Fiala m_threads.erase(it); 20891dbc6c9cSPavel Labath found = true; 20901dbc6c9cSPavel Labath break; 2091af245d11STodd Fiala } 2092af245d11STodd Fiala } 2093af245d11STodd Fiala 20949eb1ecb9SPavel Labath SignalIfAllThreadsStopped(); 20951dbc6c9cSPavel Labath return found; 2096af245d11STodd Fiala } 2097af245d11STodd Fiala 2098b9c1b51eSKate Stone NativeThreadLinuxSP NativeProcessLinux::AddThread(lldb::tid_t thread_id) { 2099a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_THREAD)); 2100a6321a8eSPavel Labath LLDB_LOG(log, "pid {0} adding thread with tid {1}", GetID(), thread_id); 2101af245d11STodd Fiala 2102b9c1b51eSKate Stone assert(!HasThreadNoLock(thread_id) && 2103b9c1b51eSKate Stone "attempted to add a thread by id that already exists"); 2104af245d11STodd Fiala 2105af245d11STodd Fiala // If this is the first thread, save it as the current thread 2106af245d11STodd Fiala if (m_threads.empty()) 2107af245d11STodd Fiala SetCurrentThreadID(thread_id); 2108af245d11STodd Fiala 2109f9077782SPavel Labath auto thread_sp = std::make_shared<NativeThreadLinux>(this, thread_id); 2110af245d11STodd Fiala m_threads.push_back(thread_sp); 2111af245d11STodd Fiala return thread_sp; 2112af245d11STodd Fiala } 2113af245d11STodd Fiala 2114b9c1b51eSKate Stone Error NativeProcessLinux::FixupBreakpointPCAsNeeded(NativeThreadLinux &thread) { 2115a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_BREAKPOINTS)); 2116af245d11STodd Fiala 2117af245d11STodd Fiala Error error; 2118af245d11STodd Fiala 2119b9c1b51eSKate Stone // Find out the size of a breakpoint (might depend on where we are in the 2120b9c1b51eSKate Stone // code). 2121b9cc0c75SPavel Labath NativeRegisterContextSP context_sp = thread.GetRegisterContext(); 2122b9c1b51eSKate Stone if (!context_sp) { 2123af245d11STodd Fiala error.SetErrorString("cannot get a NativeRegisterContext for the thread"); 2124a6321a8eSPavel Labath LLDB_LOG(log, "failed: {0}", error); 2125af245d11STodd Fiala return error; 2126af245d11STodd Fiala } 2127af245d11STodd Fiala 2128af245d11STodd Fiala uint32_t breakpoint_size = 0; 2129b9cc0c75SPavel Labath error = GetSoftwareBreakpointPCOffset(breakpoint_size); 2130b9c1b51eSKate Stone if (error.Fail()) { 2131a6321a8eSPavel Labath LLDB_LOG(log, "GetBreakpointSize() failed: {0}", error); 2132af245d11STodd Fiala return error; 2133a6321a8eSPavel Labath } else 2134a6321a8eSPavel Labath LLDB_LOG(log, "breakpoint size: {0}", breakpoint_size); 2135af245d11STodd Fiala 2136b9c1b51eSKate Stone // First try probing for a breakpoint at a software breakpoint location: PC - 2137b9c1b51eSKate Stone // breakpoint size. 2138b9c1b51eSKate Stone const lldb::addr_t initial_pc_addr = 2139b9c1b51eSKate Stone context_sp->GetPCfromBreakpointLocation(); 2140af245d11STodd Fiala lldb::addr_t breakpoint_addr = initial_pc_addr; 2141b9c1b51eSKate Stone if (breakpoint_size > 0) { 2142af245d11STodd Fiala // Do not allow breakpoint probe to wrap around. 21433eb4b458SChaoren Lin if (breakpoint_addr >= breakpoint_size) 21443eb4b458SChaoren Lin breakpoint_addr -= breakpoint_size; 2145af245d11STodd Fiala } 2146af245d11STodd Fiala 2147af245d11STodd Fiala // Check if we stopped because of a breakpoint. 2148af245d11STodd Fiala NativeBreakpointSP breakpoint_sp; 2149af245d11STodd Fiala error = m_breakpoint_list.GetBreakpoint(breakpoint_addr, breakpoint_sp); 2150b9c1b51eSKate Stone if (!error.Success() || !breakpoint_sp) { 2151af245d11STodd Fiala // We didn't find one at a software probe location. Nothing to do. 2152a6321a8eSPavel Labath LLDB_LOG(log, 2153a6321a8eSPavel Labath "pid {0} no lldb breakpoint found at current pc with " 2154a6321a8eSPavel Labath "adjustment: {1}", 2155a6321a8eSPavel Labath GetID(), breakpoint_addr); 2156665be50eSMehdi Amini return Error(); 2157af245d11STodd Fiala } 2158af245d11STodd Fiala 2159af245d11STodd Fiala // If the breakpoint is not a software breakpoint, nothing to do. 2160b9c1b51eSKate Stone if (!breakpoint_sp->IsSoftwareBreakpoint()) { 2161a6321a8eSPavel Labath LLDB_LOG( 2162a6321a8eSPavel Labath log, 2163a6321a8eSPavel Labath "pid {0} breakpoint found at {1:x}, not software, nothing to adjust", 2164a6321a8eSPavel Labath GetID(), breakpoint_addr); 2165665be50eSMehdi Amini return Error(); 2166af245d11STodd Fiala } 2167af245d11STodd Fiala 2168af245d11STodd Fiala // 2169af245d11STodd Fiala // We have a software breakpoint and need to adjust the PC. 2170af245d11STodd Fiala // 2171af245d11STodd Fiala 2172af245d11STodd Fiala // Sanity check. 2173b9c1b51eSKate Stone if (breakpoint_size == 0) { 2174af245d11STodd Fiala // Nothing to do! How did we get here? 2175a6321a8eSPavel Labath LLDB_LOG(log, 2176a6321a8eSPavel Labath "pid {0} breakpoint found at {1:x}, it is software, but the " 2177a6321a8eSPavel Labath "size is zero, nothing to do (unexpected)", 2178a6321a8eSPavel Labath GetID(), breakpoint_addr); 2179665be50eSMehdi Amini return Error(); 2180af245d11STodd Fiala } 2181af245d11STodd Fiala 2182af245d11STodd Fiala // Change the program counter. 2183a6321a8eSPavel Labath LLDB_LOG(log, "pid {0} tid {1}: changing PC from {2:x} to {3:x}", GetID(), 2184a6321a8eSPavel Labath thread.GetID(), initial_pc_addr, breakpoint_addr); 2185af245d11STodd Fiala 2186af245d11STodd Fiala error = context_sp->SetPC(breakpoint_addr); 2187b9c1b51eSKate Stone if (error.Fail()) { 2188a6321a8eSPavel Labath LLDB_LOG(log, "pid {0} tid {1}: failed to set PC: {2}", GetID(), 2189a6321a8eSPavel Labath thread.GetID(), error); 2190af245d11STodd Fiala return error; 2191af245d11STodd Fiala } 2192af245d11STodd Fiala 2193af245d11STodd Fiala return error; 2194af245d11STodd Fiala } 2195fa03ad2eSChaoren Lin 2196b9c1b51eSKate Stone Error NativeProcessLinux::GetLoadedModuleFileSpec(const char *module_path, 2197b9c1b51eSKate Stone FileSpec &file_spec) { 2198a6f5795aSTamas Berghammer Error error = PopulateMemoryRegionCache(); 2199a6f5795aSTamas Berghammer if (error.Fail()) 2200a6f5795aSTamas Berghammer return error; 2201a6f5795aSTamas Berghammer 22027cb18bf5STamas Berghammer FileSpec module_file_spec(module_path, true); 22037cb18bf5STamas Berghammer 22047cb18bf5STamas Berghammer file_spec.Clear(); 2205a6f5795aSTamas Berghammer for (const auto &it : m_mem_region_cache) { 2206a6f5795aSTamas Berghammer if (it.second.GetFilename() == module_file_spec.GetFilename()) { 2207a6f5795aSTamas Berghammer file_spec = it.second; 2208a6f5795aSTamas Berghammer return Error(); 2209a6f5795aSTamas Berghammer } 2210a6f5795aSTamas Berghammer } 22117cb18bf5STamas Berghammer return Error("Module file (%s) not found in /proc/%" PRIu64 "/maps file!", 22127cb18bf5STamas Berghammer module_file_spec.GetFilename().AsCString(), GetID()); 22137cb18bf5STamas Berghammer } 2214c076559aSPavel Labath 2215b9c1b51eSKate Stone Error NativeProcessLinux::GetFileLoadAddress(const llvm::StringRef &file_name, 2216b9c1b51eSKate Stone lldb::addr_t &load_addr) { 2217783bfc8cSTamas Berghammer load_addr = LLDB_INVALID_ADDRESS; 2218a6f5795aSTamas Berghammer Error error = PopulateMemoryRegionCache(); 2219a6f5795aSTamas Berghammer if (error.Fail()) 2220783bfc8cSTamas Berghammer return error; 2221a6f5795aSTamas Berghammer 2222a6f5795aSTamas Berghammer FileSpec file(file_name, false); 2223a6f5795aSTamas Berghammer for (const auto &it : m_mem_region_cache) { 2224a6f5795aSTamas Berghammer if (it.second == file) { 2225a6f5795aSTamas Berghammer load_addr = it.first.GetRange().GetRangeBase(); 2226a6f5795aSTamas Berghammer return Error(); 2227a6f5795aSTamas Berghammer } 2228a6f5795aSTamas Berghammer } 2229a6f5795aSTamas Berghammer return Error("No load address found for specified file."); 2230783bfc8cSTamas Berghammer } 2231783bfc8cSTamas Berghammer 2232b9c1b51eSKate Stone NativeThreadLinuxSP NativeProcessLinux::GetThreadByID(lldb::tid_t tid) { 2233b9c1b51eSKate Stone return std::static_pointer_cast<NativeThreadLinux>( 2234b9c1b51eSKate Stone NativeProcessProtocol::GetThreadByID(tid)); 2235f9077782SPavel Labath } 2236f9077782SPavel Labath 2237b9c1b51eSKate Stone Error NativeProcessLinux::ResumeThread(NativeThreadLinux &thread, 2238b9c1b51eSKate Stone lldb::StateType state, int signo) { 2239a6321a8eSPavel Labath Log *const log = ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_THREAD); 2240a6321a8eSPavel Labath LLDB_LOG(log, "tid: {0}", thread.GetID()); 2241c076559aSPavel Labath 2242c076559aSPavel Labath // Before we do the resume below, first check if we have a pending 2243108c325dSPavel Labath // stop notification that is currently waiting for 22440e1d729bSPavel Labath // all threads to stop. This is potentially a buggy situation since 2245c076559aSPavel Labath // we're ostensibly waiting for threads to stop before we send out the 2246c076559aSPavel Labath // pending notification, and here we are resuming one before we send 2247c076559aSPavel Labath // out the pending stop notification. 2248a6321a8eSPavel Labath if (m_pending_notification_tid != LLDB_INVALID_THREAD_ID) { 2249a6321a8eSPavel Labath LLDB_LOG(log, 2250a6321a8eSPavel Labath "about to resume tid {0} per explicit request but we have a " 2251a6321a8eSPavel Labath "pending stop notification (tid {1}) that is actively " 2252a6321a8eSPavel Labath "waiting for this thread to stop. Valid sequence of events?", 2253a6321a8eSPavel Labath thread.GetID(), m_pending_notification_tid); 2254c076559aSPavel Labath } 2255c076559aSPavel Labath 2256c076559aSPavel Labath // Request a resume. We expect this to be synchronous and the system 2257c076559aSPavel Labath // to reflect it is running after this completes. 2258b9c1b51eSKate Stone switch (state) { 2259b9c1b51eSKate Stone case eStateRunning: { 2260605b51b8SPavel Labath const auto resume_result = thread.Resume(signo); 22610e1d729bSPavel Labath if (resume_result.Success()) 22620e1d729bSPavel Labath SetState(eStateRunning, true); 22630e1d729bSPavel Labath return resume_result; 2264c076559aSPavel Labath } 2265b9c1b51eSKate Stone case eStateStepping: { 2266605b51b8SPavel Labath const auto step_result = thread.SingleStep(signo); 22670e1d729bSPavel Labath if (step_result.Success()) 22680e1d729bSPavel Labath SetState(eStateRunning, true); 22690e1d729bSPavel Labath return step_result; 22700e1d729bSPavel Labath } 22710e1d729bSPavel Labath default: 22728198db30SPavel Labath LLDB_LOG(log, "Unhandled state {0}.", state); 22730e1d729bSPavel Labath llvm_unreachable("Unhandled state for resume"); 22740e1d729bSPavel Labath } 2275c076559aSPavel Labath } 2276c076559aSPavel Labath 2277c076559aSPavel Labath //===----------------------------------------------------------------------===// 2278c076559aSPavel Labath 2279b9c1b51eSKate Stone void NativeProcessLinux::StopRunningThreads(const lldb::tid_t triggering_tid) { 2280a6321a8eSPavel Labath Log *const log = ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_THREAD); 2281a6321a8eSPavel Labath LLDB_LOG(log, "about to process event: (triggering_tid: {0})", 2282a6321a8eSPavel Labath triggering_tid); 2283c076559aSPavel Labath 22840e1d729bSPavel Labath m_pending_notification_tid = triggering_tid; 22850e1d729bSPavel Labath 22860e1d729bSPavel Labath // Request a stop for all the thread stops that need to be stopped 22870e1d729bSPavel Labath // and are not already known to be stopped. 2288b9c1b51eSKate Stone for (const auto &thread_sp : m_threads) { 22890e1d729bSPavel Labath if (StateIsRunningState(thread_sp->GetState())) 22900e1d729bSPavel Labath static_pointer_cast<NativeThreadLinux>(thread_sp)->RequestStop(); 22910e1d729bSPavel Labath } 22920e1d729bSPavel Labath 22930e1d729bSPavel Labath SignalIfAllThreadsStopped(); 2294a6321a8eSPavel Labath LLDB_LOG(log, "event processing done"); 2295c076559aSPavel Labath } 2296c076559aSPavel Labath 2297b9c1b51eSKate Stone void NativeProcessLinux::SignalIfAllThreadsStopped() { 22980e1d729bSPavel Labath if (m_pending_notification_tid == LLDB_INVALID_THREAD_ID) 22990e1d729bSPavel Labath return; // No pending notification. Nothing to do. 23000e1d729bSPavel Labath 2301b9c1b51eSKate Stone for (const auto &thread_sp : m_threads) { 23020e1d729bSPavel Labath if (StateIsRunningState(thread_sp->GetState())) 23030e1d729bSPavel Labath return; // Some threads are still running. Don't signal yet. 23040e1d729bSPavel Labath } 23050e1d729bSPavel Labath 23060e1d729bSPavel Labath // We have a pending notification and all threads have stopped. 2307b9c1b51eSKate Stone Log *log( 2308b9c1b51eSKate Stone GetLogIfAnyCategoriesSet(LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_BREAKPOINTS)); 23099eb1ecb9SPavel Labath 2310b9c1b51eSKate Stone // Clear any temporary breakpoints we used to implement software single 2311b9c1b51eSKate Stone // stepping. 2312b9c1b51eSKate Stone for (const auto &thread_info : m_threads_stepping_with_breakpoint) { 23139eb1ecb9SPavel Labath Error error = RemoveBreakpoint(thread_info.second); 23149eb1ecb9SPavel Labath if (error.Fail()) 2315a6321a8eSPavel Labath LLDB_LOG(log, "pid = {0} remove stepping breakpoint: {1}", 2316a6321a8eSPavel Labath thread_info.first, error); 23179eb1ecb9SPavel Labath } 23189eb1ecb9SPavel Labath m_threads_stepping_with_breakpoint.clear(); 23199eb1ecb9SPavel Labath 23209eb1ecb9SPavel Labath // Notify the delegate about the stop 23210e1d729bSPavel Labath SetCurrentThreadID(m_pending_notification_tid); 2322ed89c7feSPavel Labath SetState(StateType::eStateStopped, true); 23230e1d729bSPavel Labath m_pending_notification_tid = LLDB_INVALID_THREAD_ID; 2324c076559aSPavel Labath } 2325c076559aSPavel Labath 2326b9c1b51eSKate Stone void NativeProcessLinux::ThreadWasCreated(NativeThreadLinux &thread) { 2327a6321a8eSPavel Labath Log *const log = ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_THREAD); 2328a6321a8eSPavel Labath LLDB_LOG(log, "tid: {0}", thread.GetID()); 23291dbc6c9cSPavel Labath 2330b9c1b51eSKate Stone if (m_pending_notification_tid != LLDB_INVALID_THREAD_ID && 2331b9c1b51eSKate Stone StateIsRunningState(thread.GetState())) { 2332b9c1b51eSKate Stone // We will need to wait for this new thread to stop as well before firing 2333b9c1b51eSKate Stone // the 2334c076559aSPavel Labath // notification. 2335f9077782SPavel Labath thread.RequestStop(); 2336c076559aSPavel Labath } 2337c076559aSPavel Labath } 2338068f8a7eSTamas Berghammer 2339b9c1b51eSKate Stone void NativeProcessLinux::SigchldHandler() { 2340a6321a8eSPavel Labath Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PROCESS)); 234119cbe96aSPavel Labath // Process all pending waitpid notifications. 2342b9c1b51eSKate Stone while (true) { 234319cbe96aSPavel Labath int status = -1; 234419cbe96aSPavel Labath ::pid_t wait_pid = waitpid(-1, &status, __WALL | __WNOTHREAD | WNOHANG); 234519cbe96aSPavel Labath 234619cbe96aSPavel Labath if (wait_pid == 0) 234719cbe96aSPavel Labath break; // We are done. 234819cbe96aSPavel Labath 2349b9c1b51eSKate Stone if (wait_pid == -1) { 235019cbe96aSPavel Labath if (errno == EINTR) 235119cbe96aSPavel Labath continue; 235219cbe96aSPavel Labath 235319cbe96aSPavel Labath Error error(errno, eErrorTypePOSIX); 2354a6321a8eSPavel Labath LLDB_LOG(log, "waitpid (-1, &status, _) failed: {0}", error); 235519cbe96aSPavel Labath break; 235619cbe96aSPavel Labath } 235719cbe96aSPavel Labath 235819cbe96aSPavel Labath bool exited = false; 235919cbe96aSPavel Labath int signal = 0; 236019cbe96aSPavel Labath int exit_status = 0; 236119cbe96aSPavel Labath const char *status_cstr = nullptr; 2362b9c1b51eSKate Stone if (WIFSTOPPED(status)) { 236319cbe96aSPavel Labath signal = WSTOPSIG(status); 236419cbe96aSPavel Labath status_cstr = "STOPPED"; 2365b9c1b51eSKate Stone } else if (WIFEXITED(status)) { 236619cbe96aSPavel Labath exit_status = WEXITSTATUS(status); 236719cbe96aSPavel Labath status_cstr = "EXITED"; 236819cbe96aSPavel Labath exited = true; 2369b9c1b51eSKate Stone } else if (WIFSIGNALED(status)) { 237019cbe96aSPavel Labath signal = WTERMSIG(status); 237119cbe96aSPavel Labath status_cstr = "SIGNALED"; 237219cbe96aSPavel Labath if (wait_pid == static_cast<::pid_t>(GetID())) { 237319cbe96aSPavel Labath exited = true; 237419cbe96aSPavel Labath exit_status = -1; 237519cbe96aSPavel Labath } 2376b9c1b51eSKate Stone } else 237719cbe96aSPavel Labath status_cstr = "(\?\?\?)"; 237819cbe96aSPavel Labath 2379a6321a8eSPavel Labath LLDB_LOG(log, 2380a6321a8eSPavel Labath "waitpid (-1, &status, _) => pid = {0}, status = {1:x} " 2381a6321a8eSPavel Labath "({2}), signal = {3}, exit_state = {4}", 2382a6321a8eSPavel Labath wait_pid, status, status_cstr, signal, exit_status); 238319cbe96aSPavel Labath 238419cbe96aSPavel Labath MonitorCallback(wait_pid, exited, signal, exit_status); 238519cbe96aSPavel Labath } 2386068f8a7eSTamas Berghammer } 2387068f8a7eSTamas Berghammer 2388068f8a7eSTamas Berghammer // Wrapper for ptrace to catch errors and log calls. 2389b9c1b51eSKate Stone // Note that ptrace sets errno on error because -1 can be a valid result (i.e. 2390b9c1b51eSKate Stone // for PTRACE_PEEK*) 2391b9c1b51eSKate Stone Error NativeProcessLinux::PtraceWrapper(int req, lldb::pid_t pid, void *addr, 2392b9c1b51eSKate Stone void *data, size_t data_size, 2393b9c1b51eSKate Stone long *result) { 23944a9babb2SPavel Labath Error error; 23954a9babb2SPavel Labath long int ret; 2396068f8a7eSTamas Berghammer 2397068f8a7eSTamas Berghammer Log *log(ProcessPOSIXLog::GetLogIfAllCategoriesSet(POSIX_LOG_PTRACE)); 2398068f8a7eSTamas Berghammer 2399068f8a7eSTamas Berghammer PtraceDisplayBytes(req, data, data_size); 2400068f8a7eSTamas Berghammer 2401068f8a7eSTamas Berghammer errno = 0; 2402068f8a7eSTamas Berghammer if (req == PTRACE_GETREGSET || req == PTRACE_SETREGSET) 2403b9c1b51eSKate Stone ret = ptrace(static_cast<__ptrace_request>(req), static_cast<::pid_t>(pid), 2404b9c1b51eSKate Stone *(unsigned int *)addr, data); 2405068f8a7eSTamas Berghammer else 2406b9c1b51eSKate Stone ret = ptrace(static_cast<__ptrace_request>(req), static_cast<::pid_t>(pid), 2407b9c1b51eSKate Stone addr, data); 2408068f8a7eSTamas Berghammer 24094a9babb2SPavel Labath if (ret == -1) 2410068f8a7eSTamas Berghammer error.SetErrorToErrno(); 2411068f8a7eSTamas Berghammer 24124a9babb2SPavel Labath if (result) 24134a9babb2SPavel Labath *result = ret; 24144a9babb2SPavel Labath 2415a6321a8eSPavel Labath LLDB_LOG(log, "ptrace({0}, {1}, {2}, {3}, {4}, {5})={6:x}", req, pid, addr, 2416b9c1b51eSKate Stone data, data_size, ret); 2417068f8a7eSTamas Berghammer 2418068f8a7eSTamas Berghammer PtraceDisplayBytes(req, data, data_size); 2419068f8a7eSTamas Berghammer 2420a6321a8eSPavel Labath if (error.Fail()) 2421a6321a8eSPavel Labath LLDB_LOG(log, "ptrace() failed: {0}", error); 2422068f8a7eSTamas Berghammer 24234a9babb2SPavel Labath return error; 2424068f8a7eSTamas Berghammer } 2425