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 "lldb/lldb-python.h"
11af245d11STodd Fiala 
12af245d11STodd Fiala #include "NativeProcessLinux.h"
13af245d11STodd Fiala 
14af245d11STodd Fiala // C Includes
15af245d11STodd Fiala #include <errno.h>
16af245d11STodd Fiala #include <poll.h>
17af245d11STodd Fiala #include <string.h>
18af245d11STodd Fiala #include <stdint.h>
19af245d11STodd Fiala #include <unistd.h>
20af245d11STodd Fiala #include <linux/unistd.h>
218da0bf3bSShawn Best #if defined(__ANDROID_NDK__) && defined (__arm__)
228da0bf3bSShawn Best #include <linux/personality.h>
238da0bf3bSShawn Best #include <linux/user.h>
248da0bf3bSShawn Best #else
250bce1b67STodd Fiala #include <sys/personality.h>
268da0bf3bSShawn Best #include <sys/user.h>
278da0bf3bSShawn Best #endif
28cacde7dfSTodd Fiala #ifndef __ANDROID__
290fceef80STodd Fiala #include <sys/procfs.h>
30cacde7dfSTodd Fiala #endif
31af245d11STodd Fiala #include <sys/ptrace.h>
326ac1be4bSTodd Fiala #include <sys/uio.h>
33af245d11STodd Fiala #include <sys/socket.h>
34af245d11STodd Fiala #include <sys/syscall.h>
35af245d11STodd Fiala #include <sys/types.h>
36af245d11STodd Fiala #include <sys/wait.h>
37af245d11STodd Fiala 
386ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
396ac1be4bSTodd Fiala // NT_PRSTATUS and NT_FPREGSET definition
406ac1be4bSTodd Fiala #include <elf.h>
416ac1be4bSTodd Fiala #endif
426ac1be4bSTodd Fiala 
43af245d11STodd Fiala // C++ Includes
44af245d11STodd Fiala #include <fstream>
45af245d11STodd Fiala #include <string>
46af245d11STodd Fiala 
47af245d11STodd Fiala // Other libraries and framework includes
48af245d11STodd Fiala #include "lldb/Core/Debugger.h"
49af245d11STodd Fiala #include "lldb/Core/Error.h"
50af245d11STodd Fiala #include "lldb/Core/Module.h"
516edef204SOleksiy Vyalov #include "lldb/Core/ModuleSpec.h"
52af245d11STodd Fiala #include "lldb/Core/RegisterValue.h"
53af245d11STodd Fiala #include "lldb/Core/Scalar.h"
54af245d11STodd Fiala #include "lldb/Core/State.h"
55af245d11STodd Fiala #include "lldb/Host/Host.h"
5613b18261SZachary Turner #include "lldb/Host/HostInfo.h"
5739de3110SZachary Turner #include "lldb/Host/ThreadLauncher.h"
58af245d11STodd Fiala #include "lldb/Symbol/ObjectFile.h"
59af245d11STodd Fiala #include "lldb/Target/NativeRegisterContext.h"
60af245d11STodd Fiala #include "lldb/Target/ProcessLaunchInfo.h"
61af245d11STodd Fiala #include "lldb/Utility/PseudoTerminal.h"
62af245d11STodd Fiala 
63af245d11STodd Fiala #include "Host/common/NativeBreakpoint.h"
64af245d11STodd Fiala #include "Utility/StringExtractor.h"
65af245d11STodd Fiala 
66af245d11STodd Fiala #include "Plugins/Process/Utility/LinuxSignals.h"
67af245d11STodd Fiala #include "NativeThreadLinux.h"
68af245d11STodd Fiala #include "ProcFileReader.h"
69fa03ad2eSChaoren Lin #include "ThreadStateCoordinator.h"
70cacde7dfSTodd Fiala #include "Plugins/Process/POSIX/ProcessPOSIXLog.h"
71cacde7dfSTodd Fiala 
72cacde7dfSTodd Fiala #ifdef __ANDROID__
73cacde7dfSTodd Fiala #define __ptrace_request int
74cacde7dfSTodd Fiala #define PT_DETACH PTRACE_DETACH
75cacde7dfSTodd Fiala #endif
76af245d11STodd Fiala 
77af245d11STodd Fiala #define DEBUG_PTRACE_MAXBYTES 20
78af245d11STodd Fiala 
79af245d11STodd Fiala // Support ptrace extensions even when compiled without required kernel support
80dda61943STodd Fiala #ifndef PT_GETREGS
81af245d11STodd Fiala #ifndef PTRACE_GETREGS
82af245d11STodd Fiala   #define PTRACE_GETREGS 12
83af245d11STodd Fiala #endif
84dda61943STodd Fiala #endif
85dda61943STodd Fiala #ifndef PT_SETREGS
86af245d11STodd Fiala #ifndef PTRACE_SETREGS
87af245d11STodd Fiala   #define PTRACE_SETREGS 13
88af245d11STodd Fiala #endif
89dda61943STodd Fiala #endif
90dda61943STodd Fiala #ifndef PT_GETFPREGS
91dda61943STodd Fiala #ifndef PTRACE_GETFPREGS
92dda61943STodd Fiala   #define PTRACE_GETFPREGS 14
93dda61943STodd Fiala #endif
94dda61943STodd Fiala #endif
95dda61943STodd Fiala #ifndef PT_SETFPREGS
96dda61943STodd Fiala #ifndef PTRACE_SETFPREGS
97dda61943STodd Fiala   #define PTRACE_SETFPREGS 15
98dda61943STodd Fiala #endif
99dda61943STodd Fiala #endif
100af245d11STodd Fiala #ifndef PTRACE_GETREGSET
101af245d11STodd Fiala   #define PTRACE_GETREGSET 0x4204
102af245d11STodd Fiala #endif
103af245d11STodd Fiala #ifndef PTRACE_SETREGSET
104af245d11STodd Fiala   #define PTRACE_SETREGSET 0x4205
105af245d11STodd Fiala #endif
106af245d11STodd Fiala #ifndef PTRACE_GET_THREAD_AREA
107af245d11STodd Fiala   #define PTRACE_GET_THREAD_AREA 25
108af245d11STodd Fiala #endif
109af245d11STodd Fiala #ifndef PTRACE_ARCH_PRCTL
110af245d11STodd Fiala   #define PTRACE_ARCH_PRCTL      30
111af245d11STodd Fiala #endif
112af245d11STodd Fiala #ifndef ARCH_GET_FS
113af245d11STodd Fiala   #define ARCH_SET_GS 0x1001
114af245d11STodd Fiala   #define ARCH_SET_FS 0x1002
115af245d11STodd Fiala   #define ARCH_GET_FS 0x1003
116af245d11STodd Fiala   #define ARCH_GET_GS 0x1004
117af245d11STodd Fiala #endif
118af245d11STodd Fiala 
1190bce1b67STodd Fiala #define LLDB_PERSONALITY_GET_CURRENT_SETTINGS  0xffffffff
120af245d11STodd Fiala 
121af245d11STodd Fiala // Support hardware breakpoints in case it has not been defined
122af245d11STodd Fiala #ifndef TRAP_HWBKPT
123af245d11STodd Fiala   #define TRAP_HWBKPT 4
124af245d11STodd Fiala #endif
125af245d11STodd Fiala 
126af245d11STodd Fiala // Try to define a macro to encapsulate the tgkill syscall
127af245d11STodd Fiala // fall back on kill() if tgkill isn't available
128af245d11STodd Fiala #define tgkill(pid, tid, sig)  syscall(SYS_tgkill, pid, tid, sig)
129af245d11STodd Fiala 
130af245d11STodd Fiala // We disable the tracing of ptrace calls for integration builds to
131af245d11STodd Fiala // avoid the additional indirection and checks.
132af245d11STodd Fiala #ifndef LLDB_CONFIGURATION_BUILDANDINTEGRATION
133af245d11STodd Fiala #define PTRACE(req, pid, addr, data, data_size) \
134af245d11STodd Fiala     PtraceWrapper((req), (pid), (addr), (data), (data_size), #req, __FILE__, __LINE__)
135af245d11STodd Fiala #else
136af245d11STodd Fiala #define PTRACE(req, pid, addr, data, data_size) \
137af245d11STodd Fiala     PtraceWrapper((req), (pid), (addr), (data), (data_size))
138af245d11STodd Fiala #endif
139af245d11STodd Fiala 
140af245d11STodd Fiala // Private bits we only need internally.
141af245d11STodd Fiala namespace
142af245d11STodd Fiala {
143af245d11STodd Fiala     using namespace lldb;
144af245d11STodd Fiala     using namespace lldb_private;
145af245d11STodd Fiala 
146af245d11STodd Fiala     const UnixSignals&
147af245d11STodd Fiala     GetUnixSignals ()
148af245d11STodd Fiala     {
149af245d11STodd Fiala         static process_linux::LinuxSignals signals;
150af245d11STodd Fiala         return signals;
151af245d11STodd Fiala     }
152af245d11STodd Fiala 
153fa03ad2eSChaoren Lin     ThreadStateCoordinator::LogFunction
154fa03ad2eSChaoren Lin     GetThreadLoggerFunction ()
155fa03ad2eSChaoren Lin     {
156fa03ad2eSChaoren Lin         return [](const char *format, va_list args)
157fa03ad2eSChaoren Lin         {
158fa03ad2eSChaoren Lin             Log *const log = GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD);
159fa03ad2eSChaoren Lin             if (log)
160fa03ad2eSChaoren Lin                 log->VAPrintf (format, args);
161fa03ad2eSChaoren Lin         };
162fa03ad2eSChaoren Lin     }
163fa03ad2eSChaoren Lin 
164fa03ad2eSChaoren Lin     void
165fa03ad2eSChaoren Lin     CoordinatorErrorHandler (const std::string &error_message)
166fa03ad2eSChaoren Lin     {
167fa03ad2eSChaoren Lin         Log *const log = GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD);
168fa03ad2eSChaoren Lin         if (log)
169b8af31d4SChaoren Lin             log->Printf ("NativePlatformLinux::%s %s", __FUNCTION__, error_message.c_str ());
170fa03ad2eSChaoren Lin         assert (false && "ThreadStateCoordinator error reported");
171fa03ad2eSChaoren Lin     }
172fa03ad2eSChaoren Lin 
173af245d11STodd Fiala     Error
174af245d11STodd Fiala     ResolveProcessArchitecture (lldb::pid_t pid, Platform &platform, ArchSpec &arch)
175af245d11STodd Fiala     {
176af245d11STodd Fiala         // Grab process info for the running process.
177af245d11STodd Fiala         ProcessInstanceInfo process_info;
178af245d11STodd Fiala         if (!platform.GetProcessInfo (pid, process_info))
179af245d11STodd Fiala             return lldb_private::Error("failed to get process info");
180af245d11STodd Fiala 
181af245d11STodd Fiala         // Resolve the executable module.
182af245d11STodd Fiala         ModuleSP exe_module_sp;
1836edef204SOleksiy Vyalov         ModuleSpec exe_module_spec(process_info.GetExecutableFile(), platform.GetSystemArchitecture ());
184af245d11STodd Fiala         FileSpecList executable_search_paths (Target::GetDefaultExecutableSearchPaths ());
185af245d11STodd Fiala         Error error = platform.ResolveExecutable(
18654539338SOleksiy Vyalov             exe_module_spec,
187af245d11STodd Fiala             exe_module_sp,
188af245d11STodd Fiala             executable_search_paths.GetSize () ? &executable_search_paths : NULL);
189af245d11STodd Fiala 
190af245d11STodd Fiala         if (!error.Success ())
191af245d11STodd Fiala             return error;
192af245d11STodd Fiala 
193af245d11STodd Fiala         // Check if we've got our architecture from the exe_module.
194af245d11STodd Fiala         arch = exe_module_sp->GetArchitecture ();
195af245d11STodd Fiala         if (arch.IsValid ())
196af245d11STodd Fiala             return Error();
197af245d11STodd Fiala         else
198af245d11STodd Fiala             return Error("failed to retrieve a valid architecture from the exe module");
199af245d11STodd Fiala     }
200af245d11STodd Fiala 
201af245d11STodd Fiala     void
202af245d11STodd Fiala     DisplayBytes (lldb_private::StreamString &s, void *bytes, uint32_t count)
203af245d11STodd Fiala     {
204af245d11STodd Fiala         uint8_t *ptr = (uint8_t *)bytes;
205af245d11STodd Fiala         const uint32_t loop_count = std::min<uint32_t>(DEBUG_PTRACE_MAXBYTES, count);
206af245d11STodd Fiala         for(uint32_t i=0; i<loop_count; i++)
207af245d11STodd Fiala         {
208af245d11STodd Fiala             s.Printf ("[%x]", *ptr);
209af245d11STodd Fiala             ptr++;
210af245d11STodd Fiala         }
211af245d11STodd Fiala     }
212af245d11STodd Fiala 
213af245d11STodd Fiala     void
214af245d11STodd Fiala     PtraceDisplayBytes(int &req, void *data, size_t data_size)
215af245d11STodd Fiala     {
216af245d11STodd Fiala         StreamString buf;
217af245d11STodd Fiala         Log *verbose_log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (
218af245d11STodd Fiala                     POSIX_LOG_PTRACE | POSIX_LOG_VERBOSE));
219af245d11STodd Fiala 
220af245d11STodd Fiala         if (verbose_log)
221af245d11STodd Fiala         {
222af245d11STodd Fiala             switch(req)
223af245d11STodd Fiala             {
224af245d11STodd Fiala             case PTRACE_POKETEXT:
225af245d11STodd Fiala             {
226af245d11STodd Fiala                 DisplayBytes(buf, &data, 8);
227af245d11STodd Fiala                 verbose_log->Printf("PTRACE_POKETEXT %s", buf.GetData());
228af245d11STodd Fiala                 break;
229af245d11STodd Fiala             }
230af245d11STodd Fiala             case PTRACE_POKEDATA:
231af245d11STodd Fiala             {
232af245d11STodd Fiala                 DisplayBytes(buf, &data, 8);
233af245d11STodd Fiala                 verbose_log->Printf("PTRACE_POKEDATA %s", buf.GetData());
234af245d11STodd Fiala                 break;
235af245d11STodd Fiala             }
236af245d11STodd Fiala             case PTRACE_POKEUSER:
237af245d11STodd Fiala             {
238af245d11STodd Fiala                 DisplayBytes(buf, &data, 8);
239af245d11STodd Fiala                 verbose_log->Printf("PTRACE_POKEUSER %s", buf.GetData());
240af245d11STodd Fiala                 break;
241af245d11STodd Fiala             }
242af245d11STodd Fiala             case PTRACE_SETREGS:
243af245d11STodd Fiala             {
244af245d11STodd Fiala                 DisplayBytes(buf, data, data_size);
245af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETREGS %s", buf.GetData());
246af245d11STodd Fiala                 break;
247af245d11STodd Fiala             }
248af245d11STodd Fiala             case PTRACE_SETFPREGS:
249af245d11STodd Fiala             {
250af245d11STodd Fiala                 DisplayBytes(buf, data, data_size);
251af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETFPREGS %s", buf.GetData());
252af245d11STodd Fiala                 break;
253af245d11STodd Fiala             }
254af245d11STodd Fiala             case PTRACE_SETSIGINFO:
255af245d11STodd Fiala             {
256af245d11STodd Fiala                 DisplayBytes(buf, data, sizeof(siginfo_t));
257af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETSIGINFO %s", buf.GetData());
258af245d11STodd Fiala                 break;
259af245d11STodd Fiala             }
260af245d11STodd Fiala             case PTRACE_SETREGSET:
261af245d11STodd Fiala             {
262af245d11STodd Fiala                 // Extract iov_base from data, which is a pointer to the struct IOVEC
263af245d11STodd Fiala                 DisplayBytes(buf, *(void **)data, data_size);
264af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETREGSET %s", buf.GetData());
265af245d11STodd Fiala                 break;
266af245d11STodd Fiala             }
267af245d11STodd Fiala             default:
268af245d11STodd Fiala             {
269af245d11STodd Fiala             }
270af245d11STodd Fiala             }
271af245d11STodd Fiala         }
272af245d11STodd Fiala     }
273af245d11STodd Fiala 
274af245d11STodd Fiala     // Wrapper for ptrace to catch errors and log calls.
275af245d11STodd Fiala     // Note that ptrace sets errno on error because -1 can be a valid result (i.e. for PTRACE_PEEK*)
276af245d11STodd Fiala     long
277af245d11STodd Fiala     PtraceWrapper(int req, lldb::pid_t pid, void *addr, void *data, size_t data_size,
278af245d11STodd Fiala             const char* reqName, const char* file, int line)
279af245d11STodd Fiala     {
280af245d11STodd Fiala         long int result;
281af245d11STodd Fiala 
282af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_PTRACE));
283af245d11STodd Fiala 
284af245d11STodd Fiala         PtraceDisplayBytes(req, data, data_size);
285af245d11STodd Fiala 
286af245d11STodd Fiala         errno = 0;
287af245d11STodd Fiala         if (req == PTRACE_GETREGSET || req == PTRACE_SETREGSET)
288af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), *(unsigned int *)addr, data);
289af245d11STodd Fiala         else
290af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), addr, data);
291af245d11STodd Fiala 
292af245d11STodd Fiala         if (log)
293af245d11STodd Fiala             log->Printf("ptrace(%s, %" PRIu64 ", %p, %p, %zu)=%lX called from file %s line %d",
294af245d11STodd Fiala                     reqName, pid, addr, data, data_size, result, file, line);
295af245d11STodd Fiala 
296af245d11STodd Fiala         PtraceDisplayBytes(req, data, data_size);
297af245d11STodd Fiala 
298af245d11STodd Fiala         if (log && errno != 0)
299af245d11STodd Fiala         {
300af245d11STodd Fiala             const char* str;
301af245d11STodd Fiala             switch (errno)
302af245d11STodd Fiala             {
303af245d11STodd Fiala             case ESRCH:  str = "ESRCH"; break;
304af245d11STodd Fiala             case EINVAL: str = "EINVAL"; break;
305af245d11STodd Fiala             case EBUSY:  str = "EBUSY"; break;
306af245d11STodd Fiala             case EPERM:  str = "EPERM"; break;
307af245d11STodd Fiala             default:     str = "<unknown>";
308af245d11STodd Fiala             }
309af245d11STodd Fiala             log->Printf("ptrace() failed; errno=%d (%s)", errno, str);
310af245d11STodd Fiala         }
311af245d11STodd Fiala 
312af245d11STodd Fiala         return result;
313af245d11STodd Fiala     }
314af245d11STodd Fiala 
315af245d11STodd Fiala #ifdef LLDB_CONFIGURATION_BUILDANDINTEGRATION
316af245d11STodd Fiala     // Wrapper for ptrace when logging is not required.
317af245d11STodd Fiala     // Sets errno to 0 prior to calling ptrace.
318af245d11STodd Fiala     long
319af245d11STodd Fiala     PtraceWrapper(int req, lldb::pid_t pid, void *addr, void *data, size_t data_size)
320af245d11STodd Fiala     {
321af245d11STodd Fiala         long result = 0;
322af245d11STodd Fiala         errno = 0;
323af245d11STodd Fiala         if (req == PTRACE_GETREGSET || req == PTRACE_SETREGSET)
324af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), *(unsigned int *)addr, data);
325af245d11STodd Fiala         else
326af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), addr, data);
327af245d11STodd Fiala         return result;
328af245d11STodd Fiala     }
329af245d11STodd Fiala #endif
330af245d11STodd Fiala 
331af245d11STodd Fiala     //------------------------------------------------------------------------------
332af245d11STodd Fiala     // Static implementations of NativeProcessLinux::ReadMemory and
333af245d11STodd Fiala     // NativeProcessLinux::WriteMemory.  This enables mutual recursion between these
334af245d11STodd Fiala     // functions without needed to go thru the thread funnel.
335af245d11STodd Fiala 
336af245d11STodd Fiala     static lldb::addr_t
337af245d11STodd Fiala     DoReadMemory (
338af245d11STodd Fiala         lldb::pid_t pid,
339af245d11STodd Fiala         lldb::addr_t vm_addr,
340af245d11STodd Fiala         void *buf,
341af245d11STodd Fiala         lldb::addr_t size,
342af245d11STodd Fiala         Error &error)
343af245d11STodd Fiala     {
344af245d11STodd Fiala         // ptrace word size is determined by the host, not the child
345af245d11STodd Fiala         static const unsigned word_size = sizeof(void*);
346af245d11STodd Fiala         unsigned char *dst = static_cast<unsigned char*>(buf);
347af245d11STodd Fiala         lldb::addr_t bytes_read;
348af245d11STodd Fiala         lldb::addr_t remainder;
349af245d11STodd Fiala         long data;
350af245d11STodd Fiala 
351af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_ALL));
352af245d11STodd Fiala         if (log)
353af245d11STodd Fiala             ProcessPOSIXLog::IncNestLevel();
354af245d11STodd Fiala         if (log && ProcessPOSIXLog::AtTopNestLevel() && log->GetMask().Test(POSIX_LOG_MEMORY))
355af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s(%" PRIu64 ", %d, %p, %p, %zd, _)", __FUNCTION__,
356af245d11STodd Fiala                     pid, word_size, (void*)vm_addr, buf, size);
357af245d11STodd Fiala 
358af245d11STodd Fiala         assert(sizeof(data) >= word_size);
359af245d11STodd Fiala         for (bytes_read = 0; bytes_read < size; bytes_read += remainder)
360af245d11STodd Fiala         {
361af245d11STodd Fiala             errno = 0;
362af245d11STodd Fiala             data = PTRACE(PTRACE_PEEKDATA, pid, (void*)vm_addr, NULL, 0);
363af245d11STodd Fiala             if (errno)
364af245d11STodd Fiala             {
365af245d11STodd Fiala                 error.SetErrorToErrno();
366af245d11STodd Fiala                 if (log)
367af245d11STodd Fiala                     ProcessPOSIXLog::DecNestLevel();
368af245d11STodd Fiala                 return bytes_read;
369af245d11STodd Fiala             }
370af245d11STodd Fiala 
371af245d11STodd Fiala             remainder = size - bytes_read;
372af245d11STodd Fiala             remainder = remainder > word_size ? word_size : remainder;
373af245d11STodd Fiala 
374af245d11STodd Fiala             // Copy the data into our buffer
375af245d11STodd Fiala             for (unsigned i = 0; i < remainder; ++i)
376af245d11STodd Fiala                 dst[i] = ((data >> i*8) & 0xFF);
377af245d11STodd Fiala 
378af245d11STodd Fiala             if (log && ProcessPOSIXLog::AtTopNestLevel() &&
379af245d11STodd Fiala                     (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) ||
380af245d11STodd Fiala                             (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) &&
381af245d11STodd Fiala                                     size <= POSIX_LOG_MEMORY_SHORT_BYTES)))
382af245d11STodd Fiala             {
383af245d11STodd Fiala                 uintptr_t print_dst = 0;
384af245d11STodd Fiala                 // Format bytes from data by moving into print_dst for log output
385af245d11STodd Fiala                 for (unsigned i = 0; i < remainder; ++i)
386af245d11STodd Fiala                     print_dst |= (((data >> i*8) & 0xFF) << i*8);
387af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__,
388af245d11STodd Fiala                         (void*)vm_addr, print_dst, (unsigned long)data);
389af245d11STodd Fiala             }
390af245d11STodd Fiala 
391af245d11STodd Fiala             vm_addr += word_size;
392af245d11STodd Fiala             dst += word_size;
393af245d11STodd Fiala         }
394af245d11STodd Fiala 
395af245d11STodd Fiala         if (log)
396af245d11STodd Fiala             ProcessPOSIXLog::DecNestLevel();
397af245d11STodd Fiala         return bytes_read;
398af245d11STodd Fiala     }
399af245d11STodd Fiala 
400af245d11STodd Fiala     static lldb::addr_t
401af245d11STodd Fiala     DoWriteMemory(
402af245d11STodd Fiala         lldb::pid_t pid,
403af245d11STodd Fiala         lldb::addr_t vm_addr,
404af245d11STodd Fiala         const void *buf,
405af245d11STodd Fiala         lldb::addr_t size,
406af245d11STodd Fiala         Error &error)
407af245d11STodd Fiala     {
408af245d11STodd Fiala         // ptrace word size is determined by the host, not the child
409af245d11STodd Fiala         static const unsigned word_size = sizeof(void*);
410af245d11STodd Fiala         const unsigned char *src = static_cast<const unsigned char*>(buf);
411af245d11STodd Fiala         lldb::addr_t bytes_written = 0;
412af245d11STodd Fiala         lldb::addr_t remainder;
413af245d11STodd Fiala 
414af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_ALL));
415af245d11STodd Fiala         if (log)
416af245d11STodd Fiala             ProcessPOSIXLog::IncNestLevel();
417af245d11STodd Fiala         if (log && ProcessPOSIXLog::AtTopNestLevel() && log->GetMask().Test(POSIX_LOG_MEMORY))
418af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s(%" PRIu64 ", %u, %p, %p, %" PRIu64 ")", __FUNCTION__,
419af245d11STodd Fiala                     pid, word_size, (void*)vm_addr, buf, size);
420af245d11STodd Fiala 
421af245d11STodd Fiala         for (bytes_written = 0; bytes_written < size; bytes_written += remainder)
422af245d11STodd Fiala         {
423af245d11STodd Fiala             remainder = size - bytes_written;
424af245d11STodd Fiala             remainder = remainder > word_size ? word_size : remainder;
425af245d11STodd Fiala 
426af245d11STodd Fiala             if (remainder == word_size)
427af245d11STodd Fiala             {
428af245d11STodd Fiala                 unsigned long data = 0;
429af245d11STodd Fiala                 assert(sizeof(data) >= word_size);
430af245d11STodd Fiala                 for (unsigned i = 0; i < word_size; ++i)
431af245d11STodd Fiala                     data |= (unsigned long)src[i] << i*8;
432af245d11STodd Fiala 
433af245d11STodd Fiala                 if (log && ProcessPOSIXLog::AtTopNestLevel() &&
434af245d11STodd Fiala                         (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) ||
435af245d11STodd Fiala                                 (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) &&
436af245d11STodd Fiala                                         size <= POSIX_LOG_MEMORY_SHORT_BYTES)))
437af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__,
438af245d11STodd Fiala                             (void*)vm_addr, *(unsigned long*)src, data);
439af245d11STodd Fiala 
440af245d11STodd Fiala                 if (PTRACE(PTRACE_POKEDATA, pid, (void*)vm_addr, (void*)data, 0))
441af245d11STodd Fiala                 {
442af245d11STodd Fiala                     error.SetErrorToErrno();
443af245d11STodd Fiala                     if (log)
444af245d11STodd Fiala                         ProcessPOSIXLog::DecNestLevel();
445af245d11STodd Fiala                     return bytes_written;
446af245d11STodd Fiala                 }
447af245d11STodd Fiala             }
448af245d11STodd Fiala             else
449af245d11STodd Fiala             {
450af245d11STodd Fiala                 unsigned char buff[8];
451af245d11STodd Fiala                 if (DoReadMemory(pid, vm_addr,
452af245d11STodd Fiala                                 buff, word_size, error) != word_size)
453af245d11STodd Fiala                 {
454af245d11STodd Fiala                     if (log)
455af245d11STodd Fiala                         ProcessPOSIXLog::DecNestLevel();
456af245d11STodd Fiala                     return bytes_written;
457af245d11STodd Fiala                 }
458af245d11STodd Fiala 
459af245d11STodd Fiala                 memcpy(buff, src, remainder);
460af245d11STodd Fiala 
461af245d11STodd Fiala                 if (DoWriteMemory(pid, vm_addr,
462af245d11STodd Fiala                                 buff, word_size, error) != word_size)
463af245d11STodd Fiala                 {
464af245d11STodd Fiala                     if (log)
465af245d11STodd Fiala                         ProcessPOSIXLog::DecNestLevel();
466af245d11STodd Fiala                     return bytes_written;
467af245d11STodd Fiala                 }
468af245d11STodd Fiala 
469af245d11STodd Fiala                 if (log && ProcessPOSIXLog::AtTopNestLevel() &&
470af245d11STodd Fiala                         (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) ||
471af245d11STodd Fiala                                 (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) &&
472af245d11STodd Fiala                                         size <= POSIX_LOG_MEMORY_SHORT_BYTES)))
473af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__,
474af245d11STodd Fiala                             (void*)vm_addr, *(unsigned long*)src, *(unsigned long*)buff);
475af245d11STodd Fiala             }
476af245d11STodd Fiala 
477af245d11STodd Fiala             vm_addr += word_size;
478af245d11STodd Fiala             src += word_size;
479af245d11STodd Fiala         }
480af245d11STodd Fiala         if (log)
481af245d11STodd Fiala             ProcessPOSIXLog::DecNestLevel();
482af245d11STodd Fiala         return bytes_written;
483af245d11STodd Fiala     }
484af245d11STodd Fiala 
485af245d11STodd Fiala     //------------------------------------------------------------------------------
486af245d11STodd Fiala     /// @class Operation
487af245d11STodd Fiala     /// @brief Represents a NativeProcessLinux operation.
488af245d11STodd Fiala     ///
489af245d11STodd Fiala     /// Under Linux, it is not possible to ptrace() from any other thread but the
490af245d11STodd Fiala     /// one that spawned or attached to the process from the start.  Therefore, when
491af245d11STodd Fiala     /// a NativeProcessLinux is asked to deliver or change the state of an inferior
492af245d11STodd Fiala     /// process the operation must be "funneled" to a specific thread to perform the
493af245d11STodd Fiala     /// task.  The Operation class provides an abstract base for all services the
494af245d11STodd Fiala     /// NativeProcessLinux must perform via the single virtual function Execute, thus
495af245d11STodd Fiala     /// encapsulating the code that needs to run in the privileged context.
496af245d11STodd Fiala     class Operation
497af245d11STodd Fiala     {
498af245d11STodd Fiala     public:
499af245d11STodd Fiala         Operation () : m_error() { }
500af245d11STodd Fiala 
501af245d11STodd Fiala         virtual
502af245d11STodd Fiala         ~Operation() {}
503af245d11STodd Fiala 
504af245d11STodd Fiala         virtual void
505af245d11STodd Fiala         Execute (NativeProcessLinux *process) = 0;
506af245d11STodd Fiala 
507af245d11STodd Fiala         const Error &
508af245d11STodd Fiala         GetError () const { return m_error; }
509af245d11STodd Fiala 
510af245d11STodd Fiala     protected:
511af245d11STodd Fiala         Error m_error;
512af245d11STodd Fiala     };
513af245d11STodd Fiala 
514af245d11STodd Fiala     //------------------------------------------------------------------------------
515af245d11STodd Fiala     /// @class ReadOperation
516af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadMemory.
517af245d11STodd Fiala     class ReadOperation : public Operation
518af245d11STodd Fiala     {
519af245d11STodd Fiala     public:
520af245d11STodd Fiala         ReadOperation (
521af245d11STodd Fiala             lldb::addr_t addr,
522af245d11STodd Fiala             void *buff,
523af245d11STodd Fiala             lldb::addr_t size,
524b35103ebSTodd Fiala             lldb::addr_t &result) :
525af245d11STodd Fiala             Operation (),
526af245d11STodd Fiala             m_addr (addr),
527af245d11STodd Fiala             m_buff (buff),
528af245d11STodd Fiala             m_size (size),
529af245d11STodd Fiala             m_result (result)
530af245d11STodd Fiala             {
531af245d11STodd Fiala             }
532af245d11STodd Fiala 
533af245d11STodd Fiala         void Execute (NativeProcessLinux *process) override;
534af245d11STodd Fiala 
535af245d11STodd Fiala     private:
536af245d11STodd Fiala         lldb::addr_t m_addr;
537af245d11STodd Fiala         void *m_buff;
538af245d11STodd Fiala         lldb::addr_t m_size;
539af245d11STodd Fiala         lldb::addr_t &m_result;
540af245d11STodd Fiala     };
541af245d11STodd Fiala 
542af245d11STodd Fiala     void
543af245d11STodd Fiala     ReadOperation::Execute (NativeProcessLinux *process)
544af245d11STodd Fiala     {
545af245d11STodd Fiala         m_result = DoReadMemory (process->GetID (), m_addr, m_buff, m_size, m_error);
546af245d11STodd Fiala     }
547af245d11STodd Fiala 
548af245d11STodd Fiala     //------------------------------------------------------------------------------
549af245d11STodd Fiala     /// @class WriteOperation
550af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteMemory.
551af245d11STodd Fiala     class WriteOperation : public Operation
552af245d11STodd Fiala     {
553af245d11STodd Fiala     public:
554af245d11STodd Fiala         WriteOperation (
555af245d11STodd Fiala             lldb::addr_t addr,
556af245d11STodd Fiala             const void *buff,
557af245d11STodd Fiala             lldb::addr_t size,
558af245d11STodd Fiala             lldb::addr_t &result) :
559af245d11STodd Fiala             Operation (),
560af245d11STodd Fiala             m_addr (addr),
561af245d11STodd Fiala             m_buff (buff),
562af245d11STodd Fiala             m_size (size),
563af245d11STodd Fiala             m_result (result)
564af245d11STodd Fiala             {
565af245d11STodd Fiala             }
566af245d11STodd Fiala 
567af245d11STodd Fiala         void Execute (NativeProcessLinux *process) override;
568af245d11STodd Fiala 
569af245d11STodd Fiala     private:
570af245d11STodd Fiala         lldb::addr_t m_addr;
571af245d11STodd Fiala         const void *m_buff;
572af245d11STodd Fiala         lldb::addr_t m_size;
573af245d11STodd Fiala         lldb::addr_t &m_result;
574af245d11STodd Fiala     };
575af245d11STodd Fiala 
576af245d11STodd Fiala     void
577af245d11STodd Fiala     WriteOperation::Execute(NativeProcessLinux *process)
578af245d11STodd Fiala     {
579af245d11STodd Fiala         m_result = DoWriteMemory (process->GetID (), m_addr, m_buff, m_size, m_error);
580af245d11STodd Fiala     }
581af245d11STodd Fiala 
582af245d11STodd Fiala     //------------------------------------------------------------------------------
583af245d11STodd Fiala     /// @class ReadRegOperation
584af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadRegisterValue.
585af245d11STodd Fiala     class ReadRegOperation : public Operation
586af245d11STodd Fiala     {
587af245d11STodd Fiala     public:
588af245d11STodd Fiala         ReadRegOperation(lldb::tid_t tid, uint32_t offset, const char *reg_name,
589af245d11STodd Fiala                 RegisterValue &value, bool &result)
590af245d11STodd Fiala             : m_tid(tid), m_offset(static_cast<uintptr_t> (offset)), m_reg_name(reg_name),
591af245d11STodd Fiala               m_value(value), m_result(result)
592af245d11STodd Fiala             { }
593af245d11STodd Fiala 
594af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
595af245d11STodd Fiala 
596af245d11STodd Fiala     private:
597af245d11STodd Fiala         lldb::tid_t m_tid;
598af245d11STodd Fiala         uintptr_t m_offset;
599af245d11STodd Fiala         const char *m_reg_name;
600af245d11STodd Fiala         RegisterValue &m_value;
601af245d11STodd Fiala         bool &m_result;
602af245d11STodd Fiala     };
603af245d11STodd Fiala 
604af245d11STodd Fiala     void
605af245d11STodd Fiala     ReadRegOperation::Execute(NativeProcessLinux *monitor)
606af245d11STodd Fiala     {
6070fceef80STodd Fiala #if defined (__arm64__) || defined (__aarch64__)
6080fceef80STodd Fiala         if (m_offset > sizeof(struct user_pt_regs))
6090fceef80STodd Fiala         {
6100fceef80STodd Fiala             uintptr_t offset = m_offset - sizeof(struct user_pt_regs);
6110fceef80STodd Fiala             if (offset > sizeof(struct user_fpsimd_state))
6120fceef80STodd Fiala             {
6130fceef80STodd Fiala                 m_result = false;
6140fceef80STodd Fiala             }
6150fceef80STodd Fiala             else
6160fceef80STodd Fiala             {
6170fceef80STodd Fiala                 elf_fpregset_t regs;
6180fceef80STodd Fiala                 int regset = NT_FPREGSET;
6190fceef80STodd Fiala                 struct iovec ioVec;
6200fceef80STodd Fiala 
6210fceef80STodd Fiala                 ioVec.iov_base = &regs;
6220fceef80STodd Fiala                 ioVec.iov_len = sizeof regs;
6230fceef80STodd Fiala                 if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
6240fceef80STodd Fiala                     m_result = false;
6250fceef80STodd Fiala                 else
6260fceef80STodd Fiala                 {
6270fceef80STodd Fiala                     lldb_private::ArchSpec arch;
6280fceef80STodd Fiala                     if (monitor->GetArchitecture(arch))
6290fceef80STodd Fiala                     {
6300fceef80STodd Fiala                         m_result = true;
6310fceef80STodd Fiala                         m_value.SetBytes((void *)(((unsigned char *)(&regs)) + offset), 16, arch.GetByteOrder());
6320fceef80STodd Fiala                     }
6330fceef80STodd Fiala                     else
6340fceef80STodd Fiala                         m_result = false;
6350fceef80STodd Fiala                 }
6360fceef80STodd Fiala             }
6370fceef80STodd Fiala         }
6380fceef80STodd Fiala         else
6390fceef80STodd Fiala         {
6400fceef80STodd Fiala             elf_gregset_t regs;
6410fceef80STodd Fiala             int regset = NT_PRSTATUS;
6420fceef80STodd Fiala             struct iovec ioVec;
6430fceef80STodd Fiala 
6440fceef80STodd Fiala             ioVec.iov_base = &regs;
6450fceef80STodd Fiala             ioVec.iov_len = sizeof regs;
6460fceef80STodd Fiala             if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
6470fceef80STodd Fiala                 m_result = false;
6480fceef80STodd Fiala             else
6490fceef80STodd Fiala             {
6500fceef80STodd Fiala                 lldb_private::ArchSpec arch;
6510fceef80STodd Fiala                 if (monitor->GetArchitecture(arch))
6520fceef80STodd Fiala                 {
6530fceef80STodd Fiala                     m_result = true;
6540fceef80STodd Fiala                     m_value.SetBytes((void *)(((unsigned char *)(regs)) + m_offset), 8, arch.GetByteOrder());
6550fceef80STodd Fiala                 } else
6560fceef80STodd Fiala                     m_result = false;
6570fceef80STodd Fiala             }
6580fceef80STodd Fiala         }
6590fceef80STodd Fiala #else
660af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_REGISTERS));
661af245d11STodd Fiala 
662af245d11STodd Fiala         // Set errno to zero so that we can detect a failed peek.
663af245d11STodd Fiala         errno = 0;
664af245d11STodd Fiala         lldb::addr_t data = PTRACE(PTRACE_PEEKUSER, m_tid, (void*)m_offset, NULL, 0);
665af245d11STodd Fiala         if (errno)
666af245d11STodd Fiala             m_result = false;
667af245d11STodd Fiala         else
668af245d11STodd Fiala         {
669af245d11STodd Fiala             m_value = data;
670af245d11STodd Fiala             m_result = true;
671af245d11STodd Fiala         }
672af245d11STodd Fiala         if (log)
673af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() reg %s: 0x%" PRIx64, __FUNCTION__,
674af245d11STodd Fiala                     m_reg_name, data);
6750fceef80STodd Fiala #endif
676af245d11STodd Fiala     }
677af245d11STodd Fiala 
678af245d11STodd Fiala     //------------------------------------------------------------------------------
679af245d11STodd Fiala     /// @class WriteRegOperation
680af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteRegisterValue.
681af245d11STodd Fiala     class WriteRegOperation : public Operation
682af245d11STodd Fiala     {
683af245d11STodd Fiala     public:
684af245d11STodd Fiala         WriteRegOperation(lldb::tid_t tid, unsigned offset, const char *reg_name,
685af245d11STodd Fiala                 const RegisterValue &value, bool &result)
686af245d11STodd Fiala             : m_tid(tid), m_offset(offset), m_reg_name(reg_name),
687af245d11STodd Fiala               m_value(value), m_result(result)
688af245d11STodd Fiala             { }
689af245d11STodd Fiala 
690af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
691af245d11STodd Fiala 
692af245d11STodd Fiala     private:
693af245d11STodd Fiala         lldb::tid_t m_tid;
694af245d11STodd Fiala         uintptr_t m_offset;
695af245d11STodd Fiala         const char *m_reg_name;
696af245d11STodd Fiala         const RegisterValue &m_value;
697af245d11STodd Fiala         bool &m_result;
698af245d11STodd Fiala     };
699af245d11STodd Fiala 
700af245d11STodd Fiala     void
701af245d11STodd Fiala     WriteRegOperation::Execute(NativeProcessLinux *monitor)
702af245d11STodd Fiala     {
7030fceef80STodd Fiala #if defined (__arm64__) || defined (__aarch64__)
7040fceef80STodd Fiala         if (m_offset > sizeof(struct user_pt_regs))
7050fceef80STodd Fiala         {
7060fceef80STodd Fiala             uintptr_t offset = m_offset - sizeof(struct user_pt_regs);
7070fceef80STodd Fiala             if (offset > sizeof(struct user_fpsimd_state))
7080fceef80STodd Fiala             {
7090fceef80STodd Fiala                 m_result = false;
7100fceef80STodd Fiala             }
7110fceef80STodd Fiala             else
7120fceef80STodd Fiala             {
7130fceef80STodd Fiala                 elf_fpregset_t regs;
7140fceef80STodd Fiala                 int regset = NT_FPREGSET;
7150fceef80STodd Fiala                 struct iovec ioVec;
7160fceef80STodd Fiala 
7170fceef80STodd Fiala                 ioVec.iov_base = &regs;
7180fceef80STodd Fiala                 ioVec.iov_len = sizeof regs;
7190fceef80STodd Fiala                 if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7200fceef80STodd Fiala                     m_result = false;
7210fceef80STodd Fiala                 else
7220fceef80STodd Fiala                 {
7230fceef80STodd Fiala                     ::memcpy((void *)(((unsigned char *)(&regs)) + offset), m_value.GetBytes(), 16);
7240fceef80STodd Fiala                     if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7250fceef80STodd Fiala                         m_result = false;
7260fceef80STodd Fiala                     else
7270fceef80STodd Fiala                         m_result = true;
7280fceef80STodd Fiala                 }
7290fceef80STodd Fiala             }
7300fceef80STodd Fiala         }
7310fceef80STodd Fiala         else
7320fceef80STodd Fiala         {
7330fceef80STodd Fiala             elf_gregset_t regs;
7340fceef80STodd Fiala             int regset = NT_PRSTATUS;
7350fceef80STodd Fiala             struct iovec ioVec;
7360fceef80STodd Fiala 
7370fceef80STodd Fiala             ioVec.iov_base = &regs;
7380fceef80STodd Fiala             ioVec.iov_len = sizeof regs;
7390fceef80STodd Fiala             if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7400fceef80STodd Fiala                 m_result = false;
7410fceef80STodd Fiala             else
7420fceef80STodd Fiala             {
7430fceef80STodd Fiala                 ::memcpy((void *)(((unsigned char *)(&regs)) + m_offset), m_value.GetBytes(), 8);
7440fceef80STodd Fiala                 if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7450fceef80STodd Fiala                     m_result = false;
7460fceef80STodd Fiala                 else
7470fceef80STodd Fiala                     m_result = true;
7480fceef80STodd Fiala             }
7490fceef80STodd Fiala         }
7500fceef80STodd Fiala #else
751af245d11STodd Fiala         void* buf;
752af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_REGISTERS));
753af245d11STodd Fiala 
754af245d11STodd Fiala         buf = (void*) m_value.GetAsUInt64();
755af245d11STodd Fiala 
756af245d11STodd Fiala         if (log)
757af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() reg %s: %p", __FUNCTION__, m_reg_name, buf);
758af245d11STodd Fiala         if (PTRACE(PTRACE_POKEUSER, m_tid, (void*)m_offset, buf, 0))
759af245d11STodd Fiala             m_result = false;
760af245d11STodd Fiala         else
761af245d11STodd Fiala             m_result = true;
7620fceef80STodd Fiala #endif
763af245d11STodd Fiala     }
764af245d11STodd Fiala 
765af245d11STodd Fiala     //------------------------------------------------------------------------------
766af245d11STodd Fiala     /// @class ReadGPROperation
767af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadGPR.
768af245d11STodd Fiala     class ReadGPROperation : public Operation
769af245d11STodd Fiala     {
770af245d11STodd Fiala     public:
771af245d11STodd Fiala         ReadGPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
772af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
773af245d11STodd Fiala             { }
774af245d11STodd Fiala 
775af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
776af245d11STodd Fiala 
777af245d11STodd Fiala     private:
778af245d11STodd Fiala         lldb::tid_t m_tid;
779af245d11STodd Fiala         void *m_buf;
780af245d11STodd Fiala         size_t m_buf_size;
781af245d11STodd Fiala         bool &m_result;
782af245d11STodd Fiala     };
783af245d11STodd Fiala 
784af245d11STodd Fiala     void
785af245d11STodd Fiala     ReadGPROperation::Execute(NativeProcessLinux *monitor)
786af245d11STodd Fiala     {
7876ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
7886ac1be4bSTodd Fiala         int regset = NT_PRSTATUS;
7896ac1be4bSTodd Fiala         struct iovec ioVec;
7906ac1be4bSTodd Fiala 
7916ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
7926ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
7936ac1be4bSTodd Fiala         if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
7946ac1be4bSTodd Fiala             m_result = false;
7956ac1be4bSTodd Fiala         else
7966ac1be4bSTodd Fiala             m_result = true;
7976ac1be4bSTodd Fiala #else
798af245d11STodd Fiala         if (PTRACE(PTRACE_GETREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
799af245d11STodd Fiala             m_result = false;
800af245d11STodd Fiala         else
801af245d11STodd Fiala             m_result = true;
8026ac1be4bSTodd Fiala #endif
803af245d11STodd Fiala     }
804af245d11STodd Fiala 
805af245d11STodd Fiala     //------------------------------------------------------------------------------
806af245d11STodd Fiala     /// @class ReadFPROperation
807af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadFPR.
808af245d11STodd Fiala     class ReadFPROperation : public Operation
809af245d11STodd Fiala     {
810af245d11STodd Fiala     public:
811af245d11STodd Fiala         ReadFPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
812af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
813af245d11STodd Fiala             { }
814af245d11STodd Fiala 
815af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
816af245d11STodd Fiala 
817af245d11STodd Fiala     private:
818af245d11STodd Fiala         lldb::tid_t m_tid;
819af245d11STodd Fiala         void *m_buf;
820af245d11STodd Fiala         size_t m_buf_size;
821af245d11STodd Fiala         bool &m_result;
822af245d11STodd Fiala     };
823af245d11STodd Fiala 
824af245d11STodd Fiala     void
825af245d11STodd Fiala     ReadFPROperation::Execute(NativeProcessLinux *monitor)
826af245d11STodd Fiala     {
8276ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
8286ac1be4bSTodd Fiala         int regset = NT_FPREGSET;
8296ac1be4bSTodd Fiala         struct iovec ioVec;
8306ac1be4bSTodd Fiala 
8316ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
8326ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
8336ac1be4bSTodd Fiala         if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
8346ac1be4bSTodd Fiala             m_result = false;
8356ac1be4bSTodd Fiala         else
8366ac1be4bSTodd Fiala             m_result = true;
8376ac1be4bSTodd Fiala #else
838af245d11STodd Fiala         if (PTRACE(PTRACE_GETFPREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
839af245d11STodd Fiala             m_result = false;
840af245d11STodd Fiala         else
841af245d11STodd Fiala             m_result = true;
8426ac1be4bSTodd Fiala #endif
843af245d11STodd Fiala     }
844af245d11STodd Fiala 
845af245d11STodd Fiala     //------------------------------------------------------------------------------
846af245d11STodd Fiala     /// @class ReadRegisterSetOperation
847af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadRegisterSet.
848af245d11STodd Fiala     class ReadRegisterSetOperation : public Operation
849af245d11STodd Fiala     {
850af245d11STodd Fiala     public:
851af245d11STodd Fiala         ReadRegisterSetOperation(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset, bool &result)
852af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_regset(regset), m_result(result)
853af245d11STodd Fiala             { }
854af245d11STodd Fiala 
855af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
856af245d11STodd Fiala 
857af245d11STodd Fiala     private:
858af245d11STodd Fiala         lldb::tid_t m_tid;
859af245d11STodd Fiala         void *m_buf;
860af245d11STodd Fiala         size_t m_buf_size;
861af245d11STodd Fiala         const unsigned int m_regset;
862af245d11STodd Fiala         bool &m_result;
863af245d11STodd Fiala     };
864af245d11STodd Fiala 
865af245d11STodd Fiala     void
866af245d11STodd Fiala     ReadRegisterSetOperation::Execute(NativeProcessLinux *monitor)
867af245d11STodd Fiala     {
868af245d11STodd Fiala         if (PTRACE(PTRACE_GETREGSET, m_tid, (void *)&m_regset, m_buf, m_buf_size) < 0)
869af245d11STodd Fiala             m_result = false;
870af245d11STodd Fiala         else
871af245d11STodd Fiala             m_result = true;
872af245d11STodd Fiala     }
873af245d11STodd Fiala 
874af245d11STodd Fiala     //------------------------------------------------------------------------------
875af245d11STodd Fiala     /// @class WriteGPROperation
876af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteGPR.
877af245d11STodd Fiala     class WriteGPROperation : public Operation
878af245d11STodd Fiala     {
879af245d11STodd Fiala     public:
880af245d11STodd Fiala         WriteGPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
881af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
882af245d11STodd Fiala             { }
883af245d11STodd Fiala 
884af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
885af245d11STodd Fiala 
886af245d11STodd Fiala     private:
887af245d11STodd Fiala         lldb::tid_t m_tid;
888af245d11STodd Fiala         void *m_buf;
889af245d11STodd Fiala         size_t m_buf_size;
890af245d11STodd Fiala         bool &m_result;
891af245d11STodd Fiala     };
892af245d11STodd Fiala 
893af245d11STodd Fiala     void
894af245d11STodd Fiala     WriteGPROperation::Execute(NativeProcessLinux *monitor)
895af245d11STodd Fiala     {
8966ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
8976ac1be4bSTodd Fiala         int regset = NT_PRSTATUS;
8986ac1be4bSTodd Fiala         struct iovec ioVec;
8996ac1be4bSTodd Fiala 
9006ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
9016ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
9026ac1be4bSTodd Fiala         if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
9036ac1be4bSTodd Fiala             m_result = false;
9046ac1be4bSTodd Fiala         else
9056ac1be4bSTodd Fiala             m_result = true;
9066ac1be4bSTodd Fiala #else
907af245d11STodd Fiala         if (PTRACE(PTRACE_SETREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
908af245d11STodd Fiala             m_result = false;
909af245d11STodd Fiala         else
910af245d11STodd Fiala             m_result = true;
9116ac1be4bSTodd Fiala #endif
912af245d11STodd Fiala     }
913af245d11STodd Fiala 
914af245d11STodd Fiala     //------------------------------------------------------------------------------
915af245d11STodd Fiala     /// @class WriteFPROperation
916af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteFPR.
917af245d11STodd Fiala     class WriteFPROperation : public Operation
918af245d11STodd Fiala     {
919af245d11STodd Fiala     public:
920af245d11STodd Fiala         WriteFPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
921af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
922af245d11STodd Fiala             { }
923af245d11STodd Fiala 
924af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
925af245d11STodd Fiala 
926af245d11STodd Fiala     private:
927af245d11STodd Fiala         lldb::tid_t m_tid;
928af245d11STodd Fiala         void *m_buf;
929af245d11STodd Fiala         size_t m_buf_size;
930af245d11STodd Fiala         bool &m_result;
931af245d11STodd Fiala     };
932af245d11STodd Fiala 
933af245d11STodd Fiala     void
934af245d11STodd Fiala     WriteFPROperation::Execute(NativeProcessLinux *monitor)
935af245d11STodd Fiala     {
9366ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
9376ac1be4bSTodd Fiala         int regset = NT_FPREGSET;
9386ac1be4bSTodd Fiala         struct iovec ioVec;
9396ac1be4bSTodd Fiala 
9406ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
9416ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
9426ac1be4bSTodd Fiala         if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
9436ac1be4bSTodd Fiala             m_result = false;
9446ac1be4bSTodd Fiala         else
9456ac1be4bSTodd Fiala             m_result = true;
9466ac1be4bSTodd Fiala #else
947af245d11STodd Fiala         if (PTRACE(PTRACE_SETFPREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
948af245d11STodd Fiala             m_result = false;
949af245d11STodd Fiala         else
950af245d11STodd Fiala             m_result = true;
9516ac1be4bSTodd Fiala #endif
952af245d11STodd Fiala     }
953af245d11STodd Fiala 
954af245d11STodd Fiala     //------------------------------------------------------------------------------
955af245d11STodd Fiala     /// @class WriteRegisterSetOperation
956af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteRegisterSet.
957af245d11STodd Fiala     class WriteRegisterSetOperation : public Operation
958af245d11STodd Fiala     {
959af245d11STodd Fiala     public:
960af245d11STodd Fiala         WriteRegisterSetOperation(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset, bool &result)
961af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_regset(regset), m_result(result)
962af245d11STodd Fiala             { }
963af245d11STodd Fiala 
964af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
965af245d11STodd Fiala 
966af245d11STodd Fiala     private:
967af245d11STodd Fiala         lldb::tid_t m_tid;
968af245d11STodd Fiala         void *m_buf;
969af245d11STodd Fiala         size_t m_buf_size;
970af245d11STodd Fiala         const unsigned int m_regset;
971af245d11STodd Fiala         bool &m_result;
972af245d11STodd Fiala     };
973af245d11STodd Fiala 
974af245d11STodd Fiala     void
975af245d11STodd Fiala     WriteRegisterSetOperation::Execute(NativeProcessLinux *monitor)
976af245d11STodd Fiala     {
977af245d11STodd Fiala         if (PTRACE(PTRACE_SETREGSET, m_tid, (void *)&m_regset, m_buf, m_buf_size) < 0)
978af245d11STodd Fiala             m_result = false;
979af245d11STodd Fiala         else
980af245d11STodd Fiala             m_result = true;
981af245d11STodd Fiala     }
982af245d11STodd Fiala 
983af245d11STodd Fiala     //------------------------------------------------------------------------------
984af245d11STodd Fiala     /// @class ResumeOperation
985af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::Resume.
986af245d11STodd Fiala     class ResumeOperation : public Operation
987af245d11STodd Fiala     {
988af245d11STodd Fiala     public:
989af245d11STodd Fiala         ResumeOperation(lldb::tid_t tid, uint32_t signo, bool &result) :
990af245d11STodd Fiala             m_tid(tid), m_signo(signo), m_result(result) { }
991af245d11STodd Fiala 
992af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
993af245d11STodd Fiala 
994af245d11STodd Fiala     private:
995af245d11STodd Fiala         lldb::tid_t m_tid;
996af245d11STodd Fiala         uint32_t m_signo;
997af245d11STodd Fiala         bool &m_result;
998af245d11STodd Fiala     };
999af245d11STodd Fiala 
1000af245d11STodd Fiala     void
1001af245d11STodd Fiala     ResumeOperation::Execute(NativeProcessLinux *monitor)
1002af245d11STodd Fiala     {
1003af245d11STodd Fiala         intptr_t data = 0;
1004af245d11STodd Fiala 
1005af245d11STodd Fiala         if (m_signo != LLDB_INVALID_SIGNAL_NUMBER)
1006af245d11STodd Fiala             data = m_signo;
1007af245d11STodd Fiala 
1008af245d11STodd Fiala         if (PTRACE(PTRACE_CONT, m_tid, NULL, (void*)data, 0))
1009af245d11STodd Fiala         {
1010af245d11STodd Fiala             Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1011af245d11STodd Fiala 
1012af245d11STodd Fiala             if (log)
1013af245d11STodd Fiala                 log->Printf ("ResumeOperation (%"  PRIu64 ") failed: %s", m_tid, strerror(errno));
1014af245d11STodd Fiala             m_result = false;
1015af245d11STodd Fiala         }
1016af245d11STodd Fiala         else
1017af245d11STodd Fiala             m_result = true;
1018af245d11STodd Fiala     }
1019af245d11STodd Fiala 
1020af245d11STodd Fiala     //------------------------------------------------------------------------------
1021af245d11STodd Fiala     /// @class SingleStepOperation
1022af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::SingleStep.
1023af245d11STodd Fiala     class SingleStepOperation : public Operation
1024af245d11STodd Fiala     {
1025af245d11STodd Fiala     public:
1026af245d11STodd Fiala         SingleStepOperation(lldb::tid_t tid, uint32_t signo, bool &result)
1027af245d11STodd Fiala             : m_tid(tid), m_signo(signo), m_result(result) { }
1028af245d11STodd Fiala 
1029af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1030af245d11STodd Fiala 
1031af245d11STodd Fiala     private:
1032af245d11STodd Fiala         lldb::tid_t m_tid;
1033af245d11STodd Fiala         uint32_t m_signo;
1034af245d11STodd Fiala         bool &m_result;
1035af245d11STodd Fiala     };
1036af245d11STodd Fiala 
1037af245d11STodd Fiala     void
1038af245d11STodd Fiala     SingleStepOperation::Execute(NativeProcessLinux *monitor)
1039af245d11STodd Fiala     {
1040af245d11STodd Fiala         intptr_t data = 0;
1041af245d11STodd Fiala 
1042af245d11STodd Fiala         if (m_signo != LLDB_INVALID_SIGNAL_NUMBER)
1043af245d11STodd Fiala             data = m_signo;
1044af245d11STodd Fiala 
1045af245d11STodd Fiala         if (PTRACE(PTRACE_SINGLESTEP, m_tid, NULL, (void*)data, 0))
1046af245d11STodd Fiala             m_result = false;
1047af245d11STodd Fiala         else
1048af245d11STodd Fiala             m_result = true;
1049af245d11STodd Fiala     }
1050af245d11STodd Fiala 
1051af245d11STodd Fiala     //------------------------------------------------------------------------------
1052af245d11STodd Fiala     /// @class SiginfoOperation
1053af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::GetSignalInfo.
1054af245d11STodd Fiala     class SiginfoOperation : public Operation
1055af245d11STodd Fiala     {
1056af245d11STodd Fiala     public:
1057af245d11STodd Fiala         SiginfoOperation(lldb::tid_t tid, void *info, bool &result, int &ptrace_err)
1058af245d11STodd Fiala             : m_tid(tid), m_info(info), m_result(result), m_err(ptrace_err) { }
1059af245d11STodd Fiala 
1060af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1061af245d11STodd Fiala 
1062af245d11STodd Fiala     private:
1063af245d11STodd Fiala         lldb::tid_t m_tid;
1064af245d11STodd Fiala         void *m_info;
1065af245d11STodd Fiala         bool &m_result;
1066af245d11STodd Fiala         int &m_err;
1067af245d11STodd Fiala     };
1068af245d11STodd Fiala 
1069af245d11STodd Fiala     void
1070af245d11STodd Fiala     SiginfoOperation::Execute(NativeProcessLinux *monitor)
1071af245d11STodd Fiala     {
1072af245d11STodd Fiala         if (PTRACE(PTRACE_GETSIGINFO, m_tid, NULL, m_info, 0)) {
1073af245d11STodd Fiala             m_result = false;
1074af245d11STodd Fiala             m_err = errno;
1075af245d11STodd Fiala         }
1076af245d11STodd Fiala         else
1077af245d11STodd Fiala             m_result = true;
1078af245d11STodd Fiala     }
1079af245d11STodd Fiala 
1080af245d11STodd Fiala     //------------------------------------------------------------------------------
1081af245d11STodd Fiala     /// @class EventMessageOperation
1082af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::GetEventMessage.
1083af245d11STodd Fiala     class EventMessageOperation : public Operation
1084af245d11STodd Fiala     {
1085af245d11STodd Fiala     public:
1086af245d11STodd Fiala         EventMessageOperation(lldb::tid_t tid, unsigned long *message, bool &result)
1087af245d11STodd Fiala             : m_tid(tid), m_message(message), m_result(result) { }
1088af245d11STodd Fiala 
1089af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1090af245d11STodd Fiala 
1091af245d11STodd Fiala     private:
1092af245d11STodd Fiala         lldb::tid_t m_tid;
1093af245d11STodd Fiala         unsigned long *m_message;
1094af245d11STodd Fiala         bool &m_result;
1095af245d11STodd Fiala     };
1096af245d11STodd Fiala 
1097af245d11STodd Fiala     void
1098af245d11STodd Fiala     EventMessageOperation::Execute(NativeProcessLinux *monitor)
1099af245d11STodd Fiala     {
1100af245d11STodd Fiala         if (PTRACE(PTRACE_GETEVENTMSG, m_tid, NULL, m_message, 0))
1101af245d11STodd Fiala             m_result = false;
1102af245d11STodd Fiala         else
1103af245d11STodd Fiala             m_result = true;
1104af245d11STodd Fiala     }
1105af245d11STodd Fiala 
1106af245d11STodd Fiala     class DetachOperation : public Operation
1107af245d11STodd Fiala     {
1108af245d11STodd Fiala     public:
1109af245d11STodd Fiala         DetachOperation(lldb::tid_t tid, Error &result) : m_tid(tid), m_error(result) { }
1110af245d11STodd Fiala 
1111af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1112af245d11STodd Fiala 
1113af245d11STodd Fiala     private:
1114af245d11STodd Fiala         lldb::tid_t m_tid;
1115af245d11STodd Fiala         Error &m_error;
1116af245d11STodd Fiala     };
1117af245d11STodd Fiala 
1118af245d11STodd Fiala     void
1119af245d11STodd Fiala     DetachOperation::Execute(NativeProcessLinux *monitor)
1120af245d11STodd Fiala     {
1121af245d11STodd Fiala         if (ptrace(PT_DETACH, m_tid, NULL, 0) < 0)
1122af245d11STodd Fiala             m_error.SetErrorToErrno();
1123af245d11STodd Fiala     }
1124af245d11STodd Fiala 
1125af245d11STodd Fiala }
1126af245d11STodd Fiala 
1127af245d11STodd Fiala using namespace lldb_private;
1128af245d11STodd Fiala 
1129af245d11STodd Fiala // Simple helper function to ensure flags are enabled on the given file
1130af245d11STodd Fiala // descriptor.
1131af245d11STodd Fiala static bool
1132af245d11STodd Fiala EnsureFDFlags(int fd, int flags, Error &error)
1133af245d11STodd Fiala {
1134af245d11STodd Fiala     int status;
1135af245d11STodd Fiala 
1136af245d11STodd Fiala     if ((status = fcntl(fd, F_GETFL)) == -1)
1137af245d11STodd Fiala     {
1138af245d11STodd Fiala         error.SetErrorToErrno();
1139af245d11STodd Fiala         return false;
1140af245d11STodd Fiala     }
1141af245d11STodd Fiala 
1142af245d11STodd Fiala     if (fcntl(fd, F_SETFL, status | flags) == -1)
1143af245d11STodd Fiala     {
1144af245d11STodd Fiala         error.SetErrorToErrno();
1145af245d11STodd Fiala         return false;
1146af245d11STodd Fiala     }
1147af245d11STodd Fiala 
1148af245d11STodd Fiala     return true;
1149af245d11STodd Fiala }
1150af245d11STodd Fiala 
1151af245d11STodd Fiala NativeProcessLinux::OperationArgs::OperationArgs(NativeProcessLinux *monitor)
1152af245d11STodd Fiala     : m_monitor(monitor)
1153af245d11STodd Fiala {
1154af245d11STodd Fiala     sem_init(&m_semaphore, 0, 0);
1155af245d11STodd Fiala }
1156af245d11STodd Fiala 
1157af245d11STodd Fiala NativeProcessLinux::OperationArgs::~OperationArgs()
1158af245d11STodd Fiala {
1159af245d11STodd Fiala     sem_destroy(&m_semaphore);
1160af245d11STodd Fiala }
1161af245d11STodd Fiala 
1162af245d11STodd Fiala NativeProcessLinux::LaunchArgs::LaunchArgs(NativeProcessLinux *monitor,
1163af245d11STodd Fiala                                        lldb_private::Module *module,
1164af245d11STodd Fiala                                        char const **argv,
1165af245d11STodd Fiala                                        char const **envp,
116675f47c3aSTodd Fiala                                        const std::string &stdin_path,
116775f47c3aSTodd Fiala                                        const std::string &stdout_path,
116875f47c3aSTodd Fiala                                        const std::string &stderr_path,
11690bce1b67STodd Fiala                                        const char *working_dir,
11700bce1b67STodd Fiala                                        const lldb_private::ProcessLaunchInfo &launch_info)
1171af245d11STodd Fiala     : OperationArgs(monitor),
1172af245d11STodd Fiala       m_module(module),
1173af245d11STodd Fiala       m_argv(argv),
1174af245d11STodd Fiala       m_envp(envp),
1175af245d11STodd Fiala       m_stdin_path(stdin_path),
1176af245d11STodd Fiala       m_stdout_path(stdout_path),
1177af245d11STodd Fiala       m_stderr_path(stderr_path),
11780bce1b67STodd Fiala       m_working_dir(working_dir),
11790bce1b67STodd Fiala       m_launch_info(launch_info)
11800bce1b67STodd Fiala {
11810bce1b67STodd Fiala }
1182af245d11STodd Fiala 
1183af245d11STodd Fiala NativeProcessLinux::LaunchArgs::~LaunchArgs()
1184af245d11STodd Fiala { }
1185af245d11STodd Fiala 
1186af245d11STodd Fiala NativeProcessLinux::AttachArgs::AttachArgs(NativeProcessLinux *monitor,
1187af245d11STodd Fiala                                        lldb::pid_t pid)
1188af245d11STodd Fiala     : OperationArgs(monitor), m_pid(pid) { }
1189af245d11STodd Fiala 
1190af245d11STodd Fiala NativeProcessLinux::AttachArgs::~AttachArgs()
1191af245d11STodd Fiala { }
1192af245d11STodd Fiala 
1193af245d11STodd Fiala // -----------------------------------------------------------------------------
1194af245d11STodd Fiala // Public Static Methods
1195af245d11STodd Fiala // -----------------------------------------------------------------------------
1196af245d11STodd Fiala 
1197af245d11STodd Fiala lldb_private::Error
1198af245d11STodd Fiala NativeProcessLinux::LaunchProcess (
1199af245d11STodd Fiala     lldb_private::Module *exe_module,
1200af245d11STodd Fiala     lldb_private::ProcessLaunchInfo &launch_info,
1201af245d11STodd Fiala     lldb_private::NativeProcessProtocol::NativeDelegate &native_delegate,
1202af245d11STodd Fiala     NativeProcessProtocolSP &native_process_sp)
1203af245d11STodd Fiala {
1204af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1205af245d11STodd Fiala 
1206af245d11STodd Fiala     Error error;
1207af245d11STodd Fiala 
1208af245d11STodd Fiala     // Verify the working directory is valid if one was specified.
1209af245d11STodd Fiala     const char* working_dir = launch_info.GetWorkingDirectory ();
1210af245d11STodd Fiala     if (working_dir)
1211af245d11STodd Fiala     {
1212af245d11STodd Fiala       FileSpec working_dir_fs (working_dir, true);
1213af245d11STodd Fiala       if (!working_dir_fs || working_dir_fs.GetFileType () != FileSpec::eFileTypeDirectory)
1214af245d11STodd Fiala       {
1215af245d11STodd Fiala           error.SetErrorStringWithFormat ("No such file or directory: %s", working_dir);
1216af245d11STodd Fiala           return error;
1217af245d11STodd Fiala       }
1218af245d11STodd Fiala     }
1219af245d11STodd Fiala 
1220696b5287SZachary Turner     const lldb_private::FileAction *file_action;
1221af245d11STodd Fiala 
1222af245d11STodd Fiala     // Default of NULL will mean to use existing open file descriptors.
122375f47c3aSTodd Fiala     std::string stdin_path;
122475f47c3aSTodd Fiala     std::string stdout_path;
122575f47c3aSTodd Fiala     std::string stderr_path;
1226af245d11STodd Fiala 
1227af245d11STodd Fiala     file_action = launch_info.GetFileActionForFD (STDIN_FILENO);
122875f47c3aSTodd Fiala     if (file_action)
122975f47c3aSTodd Fiala         stdin_path = file_action->GetPath ();
1230af245d11STodd Fiala 
1231af245d11STodd Fiala     file_action = launch_info.GetFileActionForFD (STDOUT_FILENO);
123275f47c3aSTodd Fiala     if (file_action)
123375f47c3aSTodd Fiala         stdout_path = file_action->GetPath ();
1234af245d11STodd Fiala 
1235af245d11STodd Fiala     file_action = launch_info.GetFileActionForFD (STDERR_FILENO);
123675f47c3aSTodd Fiala     if (file_action)
123775f47c3aSTodd Fiala         stderr_path = file_action->GetPath ();
123875f47c3aSTodd Fiala 
123975f47c3aSTodd Fiala     if (log)
124075f47c3aSTodd Fiala     {
124175f47c3aSTodd Fiala         if (!stdin_path.empty ())
124275f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s setting STDIN to '%s'", __FUNCTION__, stdin_path.c_str ());
124375f47c3aSTodd Fiala         else
124475f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s leaving STDIN as is", __FUNCTION__);
124575f47c3aSTodd Fiala 
124675f47c3aSTodd Fiala         if (!stdout_path.empty ())
124775f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s setting STDOUT to '%s'", __FUNCTION__, stdout_path.c_str ());
124875f47c3aSTodd Fiala         else
124975f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s leaving STDOUT as is", __FUNCTION__);
125075f47c3aSTodd Fiala 
125175f47c3aSTodd Fiala         if (!stderr_path.empty ())
125275f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s setting STDERR to '%s'", __FUNCTION__, stderr_path.c_str ());
125375f47c3aSTodd Fiala         else
125475f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s leaving STDERR as is", __FUNCTION__);
125575f47c3aSTodd Fiala     }
1256af245d11STodd Fiala 
1257af245d11STodd Fiala     // Create the NativeProcessLinux in launch mode.
1258af245d11STodd Fiala     native_process_sp.reset (new NativeProcessLinux ());
1259af245d11STodd Fiala 
1260af245d11STodd Fiala     if (log)
1261af245d11STodd Fiala     {
1262af245d11STodd Fiala         int i = 0;
1263af245d11STodd Fiala         for (const char **args = launch_info.GetArguments ().GetConstArgumentVector (); *args; ++args, ++i)
1264af245d11STodd Fiala         {
1265af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s arg %d: \"%s\"", __FUNCTION__, i, *args ? *args : "nullptr");
1266af245d11STodd Fiala             ++i;
1267af245d11STodd Fiala         }
1268af245d11STodd Fiala     }
1269af245d11STodd Fiala 
1270af245d11STodd Fiala     if (!native_process_sp->RegisterNativeDelegate (native_delegate))
1271af245d11STodd Fiala     {
1272af245d11STodd Fiala         native_process_sp.reset ();
1273af245d11STodd Fiala         error.SetErrorStringWithFormat ("failed to register the native delegate");
1274af245d11STodd Fiala         return error;
1275af245d11STodd Fiala     }
1276af245d11STodd Fiala 
1277af245d11STodd Fiala     reinterpret_cast<NativeProcessLinux*> (native_process_sp.get ())->LaunchInferior (
1278af245d11STodd Fiala             exe_module,
1279af245d11STodd Fiala             launch_info.GetArguments ().GetConstArgumentVector (),
1280af245d11STodd Fiala             launch_info.GetEnvironmentEntries ().GetConstArgumentVector (),
1281af245d11STodd Fiala             stdin_path,
1282af245d11STodd Fiala             stdout_path,
1283af245d11STodd Fiala             stderr_path,
1284af245d11STodd Fiala             working_dir,
12850bce1b67STodd Fiala             launch_info,
1286af245d11STodd Fiala             error);
1287af245d11STodd Fiala 
1288af245d11STodd Fiala     if (error.Fail ())
1289af245d11STodd Fiala     {
1290af245d11STodd Fiala         native_process_sp.reset ();
1291af245d11STodd Fiala         if (log)
1292af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s failed to launch process: %s", __FUNCTION__, error.AsCString ());
1293af245d11STodd Fiala         return error;
1294af245d11STodd Fiala     }
1295af245d11STodd Fiala 
1296af245d11STodd Fiala     launch_info.SetProcessID (native_process_sp->GetID ());
1297af245d11STodd Fiala 
1298af245d11STodd Fiala     return error;
1299af245d11STodd Fiala }
1300af245d11STodd Fiala 
1301af245d11STodd Fiala lldb_private::Error
1302af245d11STodd Fiala NativeProcessLinux::AttachToProcess (
1303af245d11STodd Fiala     lldb::pid_t pid,
1304af245d11STodd Fiala     lldb_private::NativeProcessProtocol::NativeDelegate &native_delegate,
1305af245d11STodd Fiala     NativeProcessProtocolSP &native_process_sp)
1306af245d11STodd Fiala {
1307af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1308af245d11STodd Fiala     if (log && log->GetMask ().Test (POSIX_LOG_VERBOSE))
1309af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s(pid = %" PRIi64 ")", __FUNCTION__, pid);
1310af245d11STodd Fiala 
1311af245d11STodd Fiala     // Grab the current platform architecture.  This should be Linux,
1312af245d11STodd Fiala     // since this code is only intended to run on a Linux host.
1313615eb7e6SGreg Clayton     PlatformSP platform_sp (Platform::GetHostPlatform ());
1314af245d11STodd Fiala     if (!platform_sp)
1315af245d11STodd Fiala         return Error("failed to get a valid default platform");
1316af245d11STodd Fiala 
1317af245d11STodd Fiala     // Retrieve the architecture for the running process.
1318af245d11STodd Fiala     ArchSpec process_arch;
1319af245d11STodd Fiala     Error error = ResolveProcessArchitecture (pid, *platform_sp.get (), process_arch);
1320af245d11STodd Fiala     if (!error.Success ())
1321af245d11STodd Fiala         return error;
1322af245d11STodd Fiala 
13231339b5e8SOleksiy Vyalov     std::shared_ptr<NativeProcessLinux> native_process_linux_sp (new NativeProcessLinux ());
1324af245d11STodd Fiala 
13251339b5e8SOleksiy Vyalov     if (!native_process_linux_sp->RegisterNativeDelegate (native_delegate))
1326af245d11STodd Fiala     {
1327af245d11STodd Fiala         error.SetErrorStringWithFormat ("failed to register the native delegate");
1328af245d11STodd Fiala         return error;
1329af245d11STodd Fiala     }
1330af245d11STodd Fiala 
13311339b5e8SOleksiy Vyalov     native_process_linux_sp->AttachToInferior (pid, error);
1332af245d11STodd Fiala     if (!error.Success ())
1333af245d11STodd Fiala         return error;
1334af245d11STodd Fiala 
13351339b5e8SOleksiy Vyalov     native_process_sp = native_process_linux_sp;
1336af245d11STodd Fiala     return error;
1337af245d11STodd Fiala }
1338af245d11STodd Fiala 
1339af245d11STodd Fiala // -----------------------------------------------------------------------------
1340af245d11STodd Fiala // Public Instance Methods
1341af245d11STodd Fiala // -----------------------------------------------------------------------------
1342af245d11STodd Fiala 
1343af245d11STodd Fiala NativeProcessLinux::NativeProcessLinux () :
1344af245d11STodd Fiala     NativeProcessProtocol (LLDB_INVALID_PROCESS_ID),
1345af245d11STodd Fiala     m_arch (),
1346fa03ad2eSChaoren Lin     m_operation_thread (),
1347fa03ad2eSChaoren Lin     m_monitor_thread (),
1348af245d11STodd Fiala     m_operation (nullptr),
1349af245d11STodd Fiala     m_operation_mutex (),
1350af245d11STodd Fiala     m_operation_pending (),
1351af245d11STodd Fiala     m_operation_done (),
1352af245d11STodd Fiala     m_supports_mem_region (eLazyBoolCalculate),
1353af245d11STodd Fiala     m_mem_region_cache (),
1354fa03ad2eSChaoren Lin     m_mem_region_cache_mutex (),
1355fa03ad2eSChaoren Lin     m_coordinator_up (new ThreadStateCoordinator (GetThreadLoggerFunction ())),
1356fa03ad2eSChaoren Lin     m_coordinator_thread ()
1357af245d11STodd Fiala {
1358af245d11STodd Fiala }
1359af245d11STodd Fiala 
1360af245d11STodd Fiala //------------------------------------------------------------------------------
1361af245d11STodd Fiala /// The basic design of the NativeProcessLinux is built around two threads.
1362af245d11STodd Fiala ///
1363af245d11STodd Fiala /// One thread (@see SignalThread) simply blocks on a call to waitpid() looking
1364af245d11STodd Fiala /// for changes in the debugee state.  When a change is detected a
1365af245d11STodd Fiala /// ProcessMessage is sent to the associated ProcessLinux instance.  This thread
1366af245d11STodd Fiala /// "drives" state changes in the debugger.
1367af245d11STodd Fiala ///
1368af245d11STodd Fiala /// The second thread (@see OperationThread) is responsible for two things 1)
1369af245d11STodd Fiala /// launching or attaching to the inferior process, and then 2) servicing
1370af245d11STodd Fiala /// operations such as register reads/writes, stepping, etc.  See the comments
1371af245d11STodd Fiala /// on the Operation class for more info as to why this is needed.
1372af245d11STodd Fiala void
1373af245d11STodd Fiala NativeProcessLinux::LaunchInferior (
1374af245d11STodd Fiala     Module *module,
1375af245d11STodd Fiala     const char *argv[],
1376af245d11STodd Fiala     const char *envp[],
137775f47c3aSTodd Fiala     const std::string &stdin_path,
137875f47c3aSTodd Fiala     const std::string &stdout_path,
137975f47c3aSTodd Fiala     const std::string &stderr_path,
1380af245d11STodd Fiala     const char *working_dir,
13810bce1b67STodd Fiala     const lldb_private::ProcessLaunchInfo &launch_info,
1382af245d11STodd Fiala     lldb_private::Error &error)
1383af245d11STodd Fiala {
1384af245d11STodd Fiala     if (module)
1385af245d11STodd Fiala         m_arch = module->GetArchitecture ();
1386af245d11STodd Fiala 
1387af245d11STodd Fiala     SetState (eStateLaunching);
1388af245d11STodd Fiala 
1389af245d11STodd Fiala     std::unique_ptr<LaunchArgs> args(
1390af245d11STodd Fiala         new LaunchArgs(
1391af245d11STodd Fiala             this, module, argv, envp,
1392af245d11STodd Fiala             stdin_path, stdout_path, stderr_path,
13930bce1b67STodd Fiala             working_dir, launch_info));
1394af245d11STodd Fiala 
1395af245d11STodd Fiala     sem_init (&m_operation_pending, 0, 0);
1396af245d11STodd Fiala     sem_init (&m_operation_done, 0, 0);
1397af245d11STodd Fiala 
1398af245d11STodd Fiala     StartLaunchOpThread (args.get(), error);
1399af245d11STodd Fiala     if (!error.Success ())
1400af245d11STodd Fiala         return;
1401af245d11STodd Fiala 
1402fa03ad2eSChaoren Lin     error = StartCoordinatorThread ();
1403fa03ad2eSChaoren Lin     if (!error.Success ())
1404fa03ad2eSChaoren Lin         return;
1405fa03ad2eSChaoren Lin 
1406af245d11STodd Fiala WAIT_AGAIN:
1407af245d11STodd Fiala     // Wait for the operation thread to initialize.
1408af245d11STodd Fiala     if (sem_wait(&args->m_semaphore))
1409af245d11STodd Fiala     {
1410af245d11STodd Fiala         if (errno == EINTR)
1411af245d11STodd Fiala             goto WAIT_AGAIN;
1412af245d11STodd Fiala         else
1413af245d11STodd Fiala         {
1414af245d11STodd Fiala             error.SetErrorToErrno();
1415af245d11STodd Fiala             return;
1416af245d11STodd Fiala         }
1417af245d11STodd Fiala     }
1418af245d11STodd Fiala 
1419af245d11STodd Fiala     // Check that the launch was a success.
1420af245d11STodd Fiala     if (!args->m_error.Success())
1421af245d11STodd Fiala     {
1422af245d11STodd Fiala         StopOpThread();
1423fa03ad2eSChaoren Lin         StopCoordinatorThread ();
1424af245d11STodd Fiala         error = args->m_error;
1425af245d11STodd Fiala         return;
1426af245d11STodd Fiala     }
1427af245d11STodd Fiala 
1428af245d11STodd Fiala     // Finally, start monitoring the child process for change in state.
1429af245d11STodd Fiala     m_monitor_thread = Host::StartMonitoringChildProcess(
1430af245d11STodd Fiala         NativeProcessLinux::MonitorCallback, this, GetID(), true);
1431acee96aeSZachary Turner     if (!m_monitor_thread.IsJoinable())
1432af245d11STodd Fiala     {
1433af245d11STodd Fiala         error.SetErrorToGenericError();
1434af245d11STodd Fiala         error.SetErrorString ("Process attach failed to create monitor thread for NativeProcessLinux::MonitorCallback.");
1435af245d11STodd Fiala         return;
1436af245d11STodd Fiala     }
1437af245d11STodd Fiala }
1438af245d11STodd Fiala 
1439af245d11STodd Fiala void
1440af245d11STodd Fiala NativeProcessLinux::AttachToInferior (lldb::pid_t pid, lldb_private::Error &error)
1441af245d11STodd Fiala {
1442af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1443af245d11STodd Fiala     if (log)
1444af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 ")", __FUNCTION__, pid);
1445af245d11STodd Fiala 
1446af245d11STodd Fiala     // We can use the Host for everything except the ResolveExecutable portion.
1447615eb7e6SGreg Clayton     PlatformSP platform_sp = Platform::GetHostPlatform ();
1448af245d11STodd Fiala     if (!platform_sp)
1449af245d11STodd Fiala     {
1450af245d11STodd Fiala         if (log)
1451af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 "): no default platform set", __FUNCTION__, pid);
1452af245d11STodd Fiala         error.SetErrorString ("no default platform available");
145350d60be3SShawn Best         return;
1454af245d11STodd Fiala     }
1455af245d11STodd Fiala 
1456af245d11STodd Fiala     // Gather info about the process.
1457af245d11STodd Fiala     ProcessInstanceInfo process_info;
145850d60be3SShawn Best     if (!platform_sp->GetProcessInfo (pid, process_info))
145950d60be3SShawn Best     {
146050d60be3SShawn Best         if (log)
146150d60be3SShawn Best             log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 "): failed to get process info", __FUNCTION__, pid);
146250d60be3SShawn Best         error.SetErrorString ("failed to get process info");
146350d60be3SShawn Best         return;
146450d60be3SShawn Best     }
1465af245d11STodd Fiala 
1466af245d11STodd Fiala     // Resolve the executable module
1467af245d11STodd Fiala     ModuleSP exe_module_sp;
1468af245d11STodd Fiala     FileSpecList executable_search_paths (Target::GetDefaultExecutableSearchPaths());
14696edef204SOleksiy Vyalov     ModuleSpec exe_module_spec(process_info.GetExecutableFile(), HostInfo::GetArchitecture());
14706edef204SOleksiy Vyalov     error = platform_sp->ResolveExecutable(exe_module_spec, exe_module_sp,
1471af245d11STodd Fiala                                            executable_search_paths.GetSize() ? &executable_search_paths : NULL);
1472af245d11STodd Fiala     if (!error.Success())
1473af245d11STodd Fiala         return;
1474af245d11STodd Fiala 
1475af245d11STodd Fiala     // Set the architecture to the exe architecture.
1476af245d11STodd Fiala     m_arch = exe_module_sp->GetArchitecture();
1477af245d11STodd Fiala     if (log)
1478af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 ") detected architecture %s", __FUNCTION__, pid, m_arch.GetArchitectureName ());
1479af245d11STodd Fiala 
1480af245d11STodd Fiala     m_pid = pid;
1481af245d11STodd Fiala     SetState(eStateAttaching);
1482af245d11STodd Fiala 
1483af245d11STodd Fiala     sem_init (&m_operation_pending, 0, 0);
1484af245d11STodd Fiala     sem_init (&m_operation_done, 0, 0);
1485af245d11STodd Fiala 
1486af245d11STodd Fiala     std::unique_ptr<AttachArgs> args (new AttachArgs (this, pid));
1487af245d11STodd Fiala 
1488af245d11STodd Fiala     StartAttachOpThread(args.get (), error);
1489af245d11STodd Fiala     if (!error.Success ())
1490af245d11STodd Fiala         return;
1491af245d11STodd Fiala 
1492fa03ad2eSChaoren Lin     error = StartCoordinatorThread ();
1493fa03ad2eSChaoren Lin     if (!error.Success ())
1494fa03ad2eSChaoren Lin         return;
1495fa03ad2eSChaoren Lin 
1496af245d11STodd Fiala WAIT_AGAIN:
1497af245d11STodd Fiala     // Wait for the operation thread to initialize.
1498af245d11STodd Fiala     if (sem_wait (&args->m_semaphore))
1499af245d11STodd Fiala     {
1500af245d11STodd Fiala         if (errno == EINTR)
1501af245d11STodd Fiala             goto WAIT_AGAIN;
1502af245d11STodd Fiala         else
1503af245d11STodd Fiala         {
1504af245d11STodd Fiala             error.SetErrorToErrno ();
1505af245d11STodd Fiala             return;
1506af245d11STodd Fiala         }
1507af245d11STodd Fiala     }
1508af245d11STodd Fiala 
1509af245d11STodd Fiala     // Check that the attach was a success.
1510af245d11STodd Fiala     if (!args->m_error.Success ())
1511af245d11STodd Fiala     {
1512af245d11STodd Fiala         StopOpThread ();
1513fa03ad2eSChaoren Lin         StopCoordinatorThread ();
1514af245d11STodd Fiala         error = args->m_error;
1515af245d11STodd Fiala         return;
1516af245d11STodd Fiala     }
1517af245d11STodd Fiala 
1518af245d11STodd Fiala     // Finally, start monitoring the child process for change in state.
1519af245d11STodd Fiala     m_monitor_thread = Host::StartMonitoringChildProcess (
1520af245d11STodd Fiala         NativeProcessLinux::MonitorCallback, this, GetID (), true);
1521acee96aeSZachary Turner     if (!m_monitor_thread.IsJoinable())
1522af245d11STodd Fiala     {
1523af245d11STodd Fiala         error.SetErrorToGenericError ();
1524af245d11STodd Fiala         error.SetErrorString ("Process attach failed to create monitor thread for NativeProcessLinux::MonitorCallback.");
1525af245d11STodd Fiala         return;
1526af245d11STodd Fiala     }
1527af245d11STodd Fiala }
1528af245d11STodd Fiala 
1529af245d11STodd Fiala NativeProcessLinux::~NativeProcessLinux()
1530af245d11STodd Fiala {
1531af245d11STodd Fiala     StopMonitor();
1532af245d11STodd Fiala }
1533af245d11STodd Fiala 
1534af245d11STodd Fiala //------------------------------------------------------------------------------
1535af245d11STodd Fiala // Thread setup and tear down.
1536af245d11STodd Fiala 
1537af245d11STodd Fiala void
1538af245d11STodd Fiala NativeProcessLinux::StartLaunchOpThread(LaunchArgs *args, Error &error)
1539af245d11STodd Fiala {
1540af245d11STodd Fiala     static const char *g_thread_name = "lldb.process.nativelinux.operation";
1541af245d11STodd Fiala 
1542acee96aeSZachary Turner     if (m_operation_thread.IsJoinable())
1543af245d11STodd Fiala         return;
1544af245d11STodd Fiala 
154539de3110SZachary Turner     m_operation_thread = ThreadLauncher::LaunchThread(g_thread_name, LaunchOpThread, args, &error);
1546af245d11STodd Fiala }
1547af245d11STodd Fiala 
1548af245d11STodd Fiala void *
1549af245d11STodd Fiala NativeProcessLinux::LaunchOpThread(void *arg)
1550af245d11STodd Fiala {
1551af245d11STodd Fiala     LaunchArgs *args = static_cast<LaunchArgs*>(arg);
1552af245d11STodd Fiala 
1553af245d11STodd Fiala     if (!Launch(args)) {
1554af245d11STodd Fiala         sem_post(&args->m_semaphore);
1555af245d11STodd Fiala         return NULL;
1556af245d11STodd Fiala     }
1557af245d11STodd Fiala 
1558af245d11STodd Fiala     ServeOperation(args);
1559af245d11STodd Fiala     return NULL;
1560af245d11STodd Fiala }
1561af245d11STodd Fiala 
1562af245d11STodd Fiala bool
1563af245d11STodd Fiala NativeProcessLinux::Launch(LaunchArgs *args)
1564af245d11STodd Fiala {
15650bce1b67STodd Fiala     assert (args && "null args");
15660bce1b67STodd Fiala     if (!args)
15670bce1b67STodd Fiala         return false;
15680bce1b67STodd Fiala 
1569af245d11STodd Fiala     NativeProcessLinux *monitor = args->m_monitor;
1570af245d11STodd Fiala     assert (monitor && "monitor is NULL");
1571af245d11STodd Fiala     if (!monitor)
1572af245d11STodd Fiala         return false;
1573af245d11STodd Fiala 
1574af245d11STodd Fiala     const char **argv = args->m_argv;
1575af245d11STodd Fiala     const char **envp = args->m_envp;
1576af245d11STodd Fiala     const char *working_dir = args->m_working_dir;
1577af245d11STodd Fiala 
1578af245d11STodd Fiala     lldb_utility::PseudoTerminal terminal;
1579af245d11STodd Fiala     const size_t err_len = 1024;
1580af245d11STodd Fiala     char err_str[err_len];
1581af245d11STodd Fiala     lldb::pid_t pid;
1582af245d11STodd Fiala     NativeThreadProtocolSP thread_sp;
1583af245d11STodd Fiala 
1584af245d11STodd Fiala     lldb::ThreadSP inferior;
1585af245d11STodd Fiala 
1586af245d11STodd Fiala     // Propagate the environment if one is not supplied.
1587af245d11STodd Fiala     if (envp == NULL || envp[0] == NULL)
1588af245d11STodd Fiala         envp = const_cast<const char **>(environ);
1589af245d11STodd Fiala 
1590af245d11STodd Fiala     if ((pid = terminal.Fork(err_str, err_len)) == static_cast<lldb::pid_t> (-1))
1591af245d11STodd Fiala     {
1592af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1593af245d11STodd Fiala         args->m_error.SetErrorString("Process fork failed.");
159475f47c3aSTodd Fiala         return false;
1595af245d11STodd Fiala     }
1596af245d11STodd Fiala 
1597af245d11STodd Fiala     // Recognized child exit status codes.
1598af245d11STodd Fiala     enum {
1599af245d11STodd Fiala         ePtraceFailed = 1,
1600af245d11STodd Fiala         eDupStdinFailed,
1601af245d11STodd Fiala         eDupStdoutFailed,
1602af245d11STodd Fiala         eDupStderrFailed,
1603af245d11STodd Fiala         eChdirFailed,
1604af245d11STodd Fiala         eExecFailed,
1605af245d11STodd Fiala         eSetGidFailed
1606af245d11STodd Fiala     };
1607af245d11STodd Fiala 
1608af245d11STodd Fiala     // Child process.
1609af245d11STodd Fiala     if (pid == 0)
1610af245d11STodd Fiala     {
161175f47c3aSTodd Fiala         // FIXME consider opening a pipe between parent/child and have this forked child
161275f47c3aSTodd Fiala         // send log info to parent re: launch status, in place of the log lines removed here.
1613af245d11STodd Fiala 
161475f47c3aSTodd Fiala         // Start tracing this child that is about to exec.
1615af245d11STodd Fiala         if (PTRACE(PTRACE_TRACEME, 0, NULL, NULL, 0) < 0)
1616af245d11STodd Fiala             exit(ePtraceFailed);
1617af245d11STodd Fiala 
1618af245d11STodd Fiala         // Do not inherit setgid powers.
1619af245d11STodd Fiala         if (setgid(getgid()) != 0)
1620af245d11STodd Fiala             exit(eSetGidFailed);
1621af245d11STodd Fiala 
1622af245d11STodd Fiala         // Attempt to have our own process group.
1623af245d11STodd Fiala         if (setpgid(0, 0) != 0)
1624af245d11STodd Fiala         {
162575f47c3aSTodd Fiala             // FIXME log that this failed. This is common.
1626af245d11STodd Fiala             // Don't allow this to prevent an inferior exec.
1627af245d11STodd Fiala         }
1628af245d11STodd Fiala 
1629af245d11STodd Fiala         // Dup file descriptors if needed.
163075f47c3aSTodd Fiala         if (!args->m_stdin_path.empty ())
163175f47c3aSTodd Fiala             if (!DupDescriptor(args->m_stdin_path.c_str (), STDIN_FILENO, O_RDONLY))
1632af245d11STodd Fiala                 exit(eDupStdinFailed);
1633af245d11STodd Fiala 
163475f47c3aSTodd Fiala         if (!args->m_stdout_path.empty ())
163575f47c3aSTodd Fiala             if (!DupDescriptor(args->m_stdout_path.c_str (), STDOUT_FILENO, O_WRONLY | O_CREAT))
1636af245d11STodd Fiala                 exit(eDupStdoutFailed);
1637af245d11STodd Fiala 
163875f47c3aSTodd Fiala         if (!args->m_stderr_path.empty ())
163975f47c3aSTodd Fiala             if (!DupDescriptor(args->m_stderr_path.c_str (), STDERR_FILENO, O_WRONLY | O_CREAT))
1640af245d11STodd Fiala                 exit(eDupStderrFailed);
1641af245d11STodd Fiala 
1642af245d11STodd Fiala         // Change working directory
1643af245d11STodd Fiala         if (working_dir != NULL && working_dir[0])
1644af245d11STodd Fiala           if (0 != ::chdir(working_dir))
1645af245d11STodd Fiala               exit(eChdirFailed);
1646af245d11STodd Fiala 
16470bce1b67STodd Fiala         // Disable ASLR if requested.
16480bce1b67STodd Fiala         if (args->m_launch_info.GetFlags ().Test (lldb::eLaunchFlagDisableASLR))
16490bce1b67STodd Fiala         {
16500bce1b67STodd Fiala             const int old_personality = personality (LLDB_PERSONALITY_GET_CURRENT_SETTINGS);
16510bce1b67STodd Fiala             if (old_personality == -1)
16520bce1b67STodd Fiala             {
165375f47c3aSTodd Fiala                 // Can't retrieve Linux personality.  Cannot disable ASLR.
16540bce1b67STodd Fiala             }
16550bce1b67STodd Fiala             else
16560bce1b67STodd Fiala             {
16570bce1b67STodd Fiala                 const int new_personality = personality (ADDR_NO_RANDOMIZE | old_personality);
16580bce1b67STodd Fiala                 if (new_personality == -1)
16590bce1b67STodd Fiala                 {
166075f47c3aSTodd Fiala                     // Disabling ASLR failed.
16610bce1b67STodd Fiala                 }
16620bce1b67STodd Fiala                 else
16630bce1b67STodd Fiala                 {
166475f47c3aSTodd Fiala                     // Disabling ASLR succeeded.
16650bce1b67STodd Fiala                 }
16660bce1b67STodd Fiala             }
16670bce1b67STodd Fiala         }
16680bce1b67STodd Fiala 
166975f47c3aSTodd Fiala         // Execute.  We should never return...
1670af245d11STodd Fiala         execve(argv[0],
1671af245d11STodd Fiala                const_cast<char *const *>(argv),
1672af245d11STodd Fiala                const_cast<char *const *>(envp));
167375f47c3aSTodd Fiala 
167475f47c3aSTodd Fiala         // ...unless exec fails.  In which case we definitely need to end the child here.
1675af245d11STodd Fiala         exit(eExecFailed);
1676af245d11STodd Fiala     }
1677af245d11STodd Fiala 
167875f47c3aSTodd Fiala     //
167975f47c3aSTodd Fiala     // This is the parent code here.
168075f47c3aSTodd Fiala     //
168175f47c3aSTodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
168275f47c3aSTodd Fiala 
1683af245d11STodd Fiala     // Wait for the child process to trap on its call to execve.
1684af245d11STodd Fiala     ::pid_t wpid;
1685af245d11STodd Fiala     int status;
1686af245d11STodd Fiala     if ((wpid = waitpid(pid, &status, 0)) < 0)
1687af245d11STodd Fiala     {
1688af245d11STodd Fiala         args->m_error.SetErrorToErrno();
1689af245d11STodd Fiala 
1690af245d11STodd Fiala         if (log)
1691af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s waitpid for inferior failed with %s", __FUNCTION__, args->m_error.AsCString ());
1692af245d11STodd Fiala 
1693af245d11STodd Fiala         // Mark the inferior as invalid.
1694af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1695af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1696af245d11STodd Fiala 
169775f47c3aSTodd Fiala         return false;
1698af245d11STodd Fiala     }
1699af245d11STodd Fiala     else if (WIFEXITED(status))
1700af245d11STodd Fiala     {
1701af245d11STodd Fiala         // open, dup or execve likely failed for some reason.
1702af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1703af245d11STodd Fiala         switch (WEXITSTATUS(status))
1704af245d11STodd Fiala         {
1705af245d11STodd Fiala             case ePtraceFailed:
1706af245d11STodd Fiala                 args->m_error.SetErrorString("Child ptrace failed.");
1707af245d11STodd Fiala                 break;
1708af245d11STodd Fiala             case eDupStdinFailed:
1709af245d11STodd Fiala                 args->m_error.SetErrorString("Child open stdin failed.");
1710af245d11STodd Fiala                 break;
1711af245d11STodd Fiala             case eDupStdoutFailed:
1712af245d11STodd Fiala                 args->m_error.SetErrorString("Child open stdout failed.");
1713af245d11STodd Fiala                 break;
1714af245d11STodd Fiala             case eDupStderrFailed:
1715af245d11STodd Fiala                 args->m_error.SetErrorString("Child open stderr failed.");
1716af245d11STodd Fiala                 break;
1717af245d11STodd Fiala             case eChdirFailed:
1718af245d11STodd Fiala                 args->m_error.SetErrorString("Child failed to set working directory.");
1719af245d11STodd Fiala                 break;
1720af245d11STodd Fiala             case eExecFailed:
1721af245d11STodd Fiala                 args->m_error.SetErrorString("Child exec failed.");
1722af245d11STodd Fiala                 break;
1723af245d11STodd Fiala             case eSetGidFailed:
1724af245d11STodd Fiala                 args->m_error.SetErrorString("Child setgid failed.");
1725af245d11STodd Fiala                 break;
1726af245d11STodd Fiala             default:
1727af245d11STodd Fiala                 args->m_error.SetErrorString("Child returned unknown exit status.");
1728af245d11STodd Fiala                 break;
1729af245d11STodd Fiala         }
1730af245d11STodd Fiala 
1731af245d11STodd Fiala         if (log)
1732af245d11STodd Fiala         {
1733af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior exited with status %d before issuing a STOP",
1734af245d11STodd Fiala                     __FUNCTION__,
1735af245d11STodd Fiala                     WEXITSTATUS(status));
1736af245d11STodd Fiala         }
1737af245d11STodd Fiala 
1738af245d11STodd Fiala         // Mark the inferior as invalid.
1739af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1740af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1741af245d11STodd Fiala 
174275f47c3aSTodd Fiala         return false;
1743af245d11STodd Fiala     }
1744af245d11STodd Fiala     assert(WIFSTOPPED(status) && (wpid == static_cast< ::pid_t> (pid)) &&
1745af245d11STodd Fiala            "Could not sync with inferior process.");
1746af245d11STodd Fiala 
1747af245d11STodd Fiala     if (log)
1748af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s inferior started, now in stopped state", __FUNCTION__);
1749af245d11STodd Fiala 
1750af245d11STodd Fiala     if (!SetDefaultPtraceOpts(pid))
1751af245d11STodd Fiala     {
1752af245d11STodd Fiala         args->m_error.SetErrorToErrno();
1753af245d11STodd Fiala         if (log)
1754af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior failed to set default ptrace options: %s",
1755af245d11STodd Fiala                     __FUNCTION__,
1756af245d11STodd Fiala                     args->m_error.AsCString ());
1757af245d11STodd Fiala 
1758af245d11STodd Fiala         // Mark the inferior as invalid.
1759af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1760af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1761af245d11STodd Fiala 
176275f47c3aSTodd Fiala         return false;
1763af245d11STodd Fiala     }
1764af245d11STodd Fiala 
1765af245d11STodd Fiala     // Release the master terminal descriptor and pass it off to the
1766af245d11STodd Fiala     // NativeProcessLinux instance.  Similarly stash the inferior pid.
1767af245d11STodd Fiala     monitor->m_terminal_fd = terminal.ReleaseMasterFileDescriptor();
1768af245d11STodd Fiala     monitor->m_pid = pid;
1769af245d11STodd Fiala 
1770af245d11STodd Fiala     // Set the terminal fd to be in non blocking mode (it simplifies the
1771af245d11STodd Fiala     // implementation of ProcessLinux::GetSTDOUT to have a non-blocking
1772af245d11STodd Fiala     // descriptor to read from).
1773af245d11STodd Fiala     if (!EnsureFDFlags(monitor->m_terminal_fd, O_NONBLOCK, args->m_error))
1774af245d11STodd Fiala     {
1775af245d11STodd Fiala         if (log)
1776af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior EnsureFDFlags failed for ensuring terminal O_NONBLOCK setting: %s",
1777af245d11STodd Fiala                     __FUNCTION__,
1778af245d11STodd Fiala                     args->m_error.AsCString ());
1779af245d11STodd Fiala 
1780af245d11STodd Fiala         // Mark the inferior as invalid.
1781af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1782af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1783af245d11STodd Fiala 
178475f47c3aSTodd Fiala         return false;
1785af245d11STodd Fiala     }
1786af245d11STodd Fiala 
1787af245d11STodd Fiala     if (log)
1788af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() adding pid = %" PRIu64, __FUNCTION__, pid);
1789af245d11STodd Fiala 
1790fa03ad2eSChaoren Lin     thread_sp = monitor->AddThread (pid);
1791af245d11STodd Fiala     assert (thread_sp && "AddThread() returned a nullptr thread");
1792fa03ad2eSChaoren Lin     monitor->NotifyThreadCreateStopped (pid);
1793af245d11STodd Fiala     reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGSTOP);
1794af245d11STodd Fiala 
1795af245d11STodd Fiala     // Let our process instance know the thread has stopped.
1796fa03ad2eSChaoren Lin     monitor->SetCurrentThreadID (thread_sp->GetID ());
1797af245d11STodd Fiala     monitor->SetState (StateType::eStateStopped);
1798af245d11STodd Fiala 
1799af245d11STodd Fiala     if (log)
1800af245d11STodd Fiala     {
1801af245d11STodd Fiala         if (args->m_error.Success ())
1802af245d11STodd Fiala         {
1803af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior launching succeeded", __FUNCTION__);
1804af245d11STodd Fiala         }
1805af245d11STodd Fiala         else
1806af245d11STodd Fiala         {
1807af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior launching failed: %s",
1808af245d11STodd Fiala                 __FUNCTION__,
1809af245d11STodd Fiala                 args->m_error.AsCString ());
1810af245d11STodd Fiala         }
1811af245d11STodd Fiala     }
1812af245d11STodd Fiala     return args->m_error.Success();
1813af245d11STodd Fiala }
1814af245d11STodd Fiala 
1815af245d11STodd Fiala void
1816af245d11STodd Fiala NativeProcessLinux::StartAttachOpThread(AttachArgs *args, lldb_private::Error &error)
1817af245d11STodd Fiala {
1818af245d11STodd Fiala     static const char *g_thread_name = "lldb.process.linux.operation";
1819af245d11STodd Fiala 
1820acee96aeSZachary Turner     if (m_operation_thread.IsJoinable())
1821af245d11STodd Fiala         return;
1822af245d11STodd Fiala 
182339de3110SZachary Turner     m_operation_thread = ThreadLauncher::LaunchThread(g_thread_name, AttachOpThread, args, &error);
1824af245d11STodd Fiala }
1825af245d11STodd Fiala 
1826af245d11STodd Fiala void *
1827af245d11STodd Fiala NativeProcessLinux::AttachOpThread(void *arg)
1828af245d11STodd Fiala {
1829af245d11STodd Fiala     AttachArgs *args = static_cast<AttachArgs*>(arg);
1830af245d11STodd Fiala 
1831af245d11STodd Fiala     if (!Attach(args)) {
1832af245d11STodd Fiala         sem_post(&args->m_semaphore);
1833fa03ad2eSChaoren Lin         return nullptr;
1834af245d11STodd Fiala     }
1835af245d11STodd Fiala 
1836af245d11STodd Fiala     ServeOperation(args);
1837fa03ad2eSChaoren Lin     return nullptr;
1838af245d11STodd Fiala }
1839af245d11STodd Fiala 
1840af245d11STodd Fiala bool
1841af245d11STodd Fiala NativeProcessLinux::Attach(AttachArgs *args)
1842af245d11STodd Fiala {
1843af245d11STodd Fiala     lldb::pid_t pid = args->m_pid;
1844af245d11STodd Fiala 
1845af245d11STodd Fiala     NativeProcessLinux *monitor = args->m_monitor;
1846af245d11STodd Fiala     lldb::ThreadSP inferior;
1847af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1848af245d11STodd Fiala 
1849af245d11STodd Fiala     // Use a map to keep track of the threads which we have attached/need to attach.
1850af245d11STodd Fiala     Host::TidMap tids_to_attach;
1851af245d11STodd Fiala     if (pid <= 1)
1852af245d11STodd Fiala     {
1853af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1854af245d11STodd Fiala         args->m_error.SetErrorString("Attaching to process 1 is not allowed.");
1855af245d11STodd Fiala         goto FINISH;
1856af245d11STodd Fiala     }
1857af245d11STodd Fiala 
1858af245d11STodd Fiala     while (Host::FindProcessThreads(pid, tids_to_attach))
1859af245d11STodd Fiala     {
1860af245d11STodd Fiala         for (Host::TidMap::iterator it = tids_to_attach.begin();
1861af245d11STodd Fiala              it != tids_to_attach.end();)
1862af245d11STodd Fiala         {
1863af245d11STodd Fiala             if (it->second == false)
1864af245d11STodd Fiala             {
1865af245d11STodd Fiala                 lldb::tid_t tid = it->first;
1866af245d11STodd Fiala 
1867af245d11STodd Fiala                 // Attach to the requested process.
1868af245d11STodd Fiala                 // An attach will cause the thread to stop with a SIGSTOP.
1869af245d11STodd Fiala                 if (PTRACE(PTRACE_ATTACH, tid, NULL, NULL, 0) < 0)
1870af245d11STodd Fiala                 {
1871af245d11STodd Fiala                     // No such thread. The thread may have exited.
1872af245d11STodd Fiala                     // More error handling may be needed.
1873af245d11STodd Fiala                     if (errno == ESRCH)
1874af245d11STodd Fiala                     {
1875af245d11STodd Fiala                         it = tids_to_attach.erase(it);
1876af245d11STodd Fiala                         continue;
1877af245d11STodd Fiala                     }
1878af245d11STodd Fiala                     else
1879af245d11STodd Fiala                     {
1880af245d11STodd Fiala                         args->m_error.SetErrorToErrno();
1881af245d11STodd Fiala                         goto FINISH;
1882af245d11STodd Fiala                     }
1883af245d11STodd Fiala                 }
1884af245d11STodd Fiala 
1885af245d11STodd Fiala                 int status;
1886af245d11STodd Fiala                 // Need to use __WALL otherwise we receive an error with errno=ECHLD
1887af245d11STodd Fiala                 // At this point we should have a thread stopped if waitpid succeeds.
1888af245d11STodd Fiala                 if ((status = waitpid(tid, NULL, __WALL)) < 0)
1889af245d11STodd Fiala                 {
1890af245d11STodd Fiala                     // No such thread. The thread may have exited.
1891af245d11STodd Fiala                     // More error handling may be needed.
1892af245d11STodd Fiala                     if (errno == ESRCH)
1893af245d11STodd Fiala                     {
1894af245d11STodd Fiala                         it = tids_to_attach.erase(it);
1895af245d11STodd Fiala                         continue;
1896af245d11STodd Fiala                     }
1897af245d11STodd Fiala                     else
1898af245d11STodd Fiala                     {
1899af245d11STodd Fiala                         args->m_error.SetErrorToErrno();
1900af245d11STodd Fiala                         goto FINISH;
1901af245d11STodd Fiala                     }
1902af245d11STodd Fiala                 }
1903af245d11STodd Fiala 
1904af245d11STodd Fiala                 if (!SetDefaultPtraceOpts(tid))
1905af245d11STodd Fiala                 {
1906af245d11STodd Fiala                     args->m_error.SetErrorToErrno();
1907af245d11STodd Fiala                     goto FINISH;
1908af245d11STodd Fiala                 }
1909af245d11STodd Fiala 
1910af245d11STodd Fiala 
1911af245d11STodd Fiala                 if (log)
1912af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() adding tid = %" PRIu64, __FUNCTION__, tid);
1913af245d11STodd Fiala 
1914af245d11STodd Fiala                 it->second = true;
1915af245d11STodd Fiala 
1916af245d11STodd Fiala                 // Create the thread, mark it as stopped.
1917af245d11STodd Fiala                 NativeThreadProtocolSP thread_sp (monitor->AddThread (static_cast<lldb::tid_t> (tid)));
1918af245d11STodd Fiala                 assert (thread_sp && "AddThread() returned a nullptr");
1919fa03ad2eSChaoren Lin 
1920fa03ad2eSChaoren Lin                 // This will notify this is a new thread and tell the system it is stopped.
1921fa03ad2eSChaoren Lin                 monitor->NotifyThreadCreateStopped (tid);
1922af245d11STodd Fiala                 reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGSTOP);
1923af245d11STodd Fiala                 monitor->SetCurrentThreadID (thread_sp->GetID ());
1924af245d11STodd Fiala             }
1925af245d11STodd Fiala 
1926af245d11STodd Fiala             // move the loop forward
1927af245d11STodd Fiala             ++it;
1928af245d11STodd Fiala         }
1929af245d11STodd Fiala     }
1930af245d11STodd Fiala 
1931af245d11STodd Fiala     if (tids_to_attach.size() > 0)
1932af245d11STodd Fiala     {
1933af245d11STodd Fiala         monitor->m_pid = pid;
1934af245d11STodd Fiala         // Let our process instance know the thread has stopped.
1935af245d11STodd Fiala         monitor->SetState (StateType::eStateStopped);
1936af245d11STodd Fiala     }
1937af245d11STodd Fiala     else
1938af245d11STodd Fiala     {
1939af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1940af245d11STodd Fiala         args->m_error.SetErrorString("No such process.");
1941af245d11STodd Fiala     }
1942af245d11STodd Fiala 
1943af245d11STodd Fiala  FINISH:
1944af245d11STodd Fiala     return args->m_error.Success();
1945af245d11STodd Fiala }
1946af245d11STodd Fiala 
1947af245d11STodd Fiala bool
1948af245d11STodd Fiala NativeProcessLinux::SetDefaultPtraceOpts(lldb::pid_t pid)
1949af245d11STodd Fiala {
1950af245d11STodd Fiala     long ptrace_opts = 0;
1951af245d11STodd Fiala 
1952af245d11STodd Fiala     // Have the child raise an event on exit.  This is used to keep the child in
1953af245d11STodd Fiala     // limbo until it is destroyed.
1954af245d11STodd Fiala     ptrace_opts |= PTRACE_O_TRACEEXIT;
1955af245d11STodd Fiala 
1956af245d11STodd Fiala     // Have the tracer trace threads which spawn in the inferior process.
1957af245d11STodd Fiala     // TODO: if we want to support tracing the inferiors' child, add the
1958af245d11STodd Fiala     // appropriate ptrace flags here (PTRACE_O_TRACEFORK, PTRACE_O_TRACEVFORK)
1959af245d11STodd Fiala     ptrace_opts |= PTRACE_O_TRACECLONE;
1960af245d11STodd Fiala 
1961af245d11STodd Fiala     // Have the tracer notify us before execve returns
1962af245d11STodd Fiala     // (needed to disable legacy SIGTRAP generation)
1963af245d11STodd Fiala     ptrace_opts |= PTRACE_O_TRACEEXEC;
1964af245d11STodd Fiala 
1965af245d11STodd Fiala     return PTRACE(PTRACE_SETOPTIONS, pid, NULL, (void*)ptrace_opts, 0) >= 0;
1966af245d11STodd Fiala }
1967af245d11STodd Fiala 
1968af245d11STodd Fiala static ExitType convert_pid_status_to_exit_type (int status)
1969af245d11STodd Fiala {
1970af245d11STodd Fiala     if (WIFEXITED (status))
1971af245d11STodd Fiala         return ExitType::eExitTypeExit;
1972af245d11STodd Fiala     else if (WIFSIGNALED (status))
1973af245d11STodd Fiala         return ExitType::eExitTypeSignal;
1974af245d11STodd Fiala     else if (WIFSTOPPED (status))
1975af245d11STodd Fiala         return ExitType::eExitTypeStop;
1976af245d11STodd Fiala     else
1977af245d11STodd Fiala     {
1978af245d11STodd Fiala         // We don't know what this is.
1979af245d11STodd Fiala         return ExitType::eExitTypeInvalid;
1980af245d11STodd Fiala     }
1981af245d11STodd Fiala }
1982af245d11STodd Fiala 
1983af245d11STodd Fiala static int convert_pid_status_to_return_code (int status)
1984af245d11STodd Fiala {
1985af245d11STodd Fiala     if (WIFEXITED (status))
1986af245d11STodd Fiala         return WEXITSTATUS (status);
1987af245d11STodd Fiala     else if (WIFSIGNALED (status))
1988af245d11STodd Fiala         return WTERMSIG (status);
1989af245d11STodd Fiala     else if (WIFSTOPPED (status))
1990af245d11STodd Fiala         return WSTOPSIG (status);
1991af245d11STodd Fiala     else
1992af245d11STodd Fiala     {
1993af245d11STodd Fiala         // We don't know what this is.
1994af245d11STodd Fiala         return ExitType::eExitTypeInvalid;
1995af245d11STodd Fiala     }
1996af245d11STodd Fiala }
1997af245d11STodd Fiala 
1998af245d11STodd Fiala // Main process monitoring waitpid-loop handler.
1999af245d11STodd Fiala bool
2000af245d11STodd Fiala NativeProcessLinux::MonitorCallback(void *callback_baton,
2001af245d11STodd Fiala                                 lldb::pid_t pid,
2002af245d11STodd Fiala                                 bool exited,
2003af245d11STodd Fiala                                 int signal,
2004af245d11STodd Fiala                                 int status)
2005af245d11STodd Fiala {
2006af245d11STodd Fiala     Log *log (GetLogIfAnyCategoriesSet (LIBLLDB_LOG_PROCESS));
2007af245d11STodd Fiala 
2008af245d11STodd Fiala     NativeProcessLinux *const process = static_cast<NativeProcessLinux*>(callback_baton);
2009af245d11STodd Fiala     assert (process && "process is null");
2010af245d11STodd Fiala     if (!process)
2011af245d11STodd Fiala     {
2012af245d11STodd Fiala         if (log)
2013af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " callback_baton was null, can't determine process to use", __FUNCTION__, pid);
2014af245d11STodd Fiala         return true;
2015af245d11STodd Fiala     }
2016af245d11STodd Fiala 
2017af245d11STodd Fiala     // Certain activities differ based on whether the pid is the tid of the main thread.
2018af245d11STodd Fiala     const bool is_main_thread = (pid == process->GetID ());
2019af245d11STodd Fiala 
2020af245d11STodd Fiala     // Assume we keep monitoring by default.
2021af245d11STodd Fiala     bool stop_monitoring = false;
2022af245d11STodd Fiala 
2023af245d11STodd Fiala     // Handle when the thread exits.
2024af245d11STodd Fiala     if (exited)
2025af245d11STodd Fiala     {
2026af245d11STodd Fiala         if (log)
2027af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() got exit signal, tid = %"  PRIu64 " (%s main thread)", __FUNCTION__, pid, is_main_thread ? "is" : "is not");
2028af245d11STodd Fiala 
2029af245d11STodd Fiala         // This is a thread that exited.  Ensure we're not tracking it anymore.
2030af245d11STodd Fiala         const bool thread_found = process->StopTrackingThread (pid);
2031af245d11STodd Fiala 
2032fa03ad2eSChaoren Lin         // Make sure the thread state coordinator knows about this.
2033fa03ad2eSChaoren Lin         process->NotifyThreadDeath (pid);
2034fa03ad2eSChaoren Lin 
2035af245d11STodd Fiala         if (is_main_thread)
2036af245d11STodd Fiala         {
2037af245d11STodd Fiala             // We only set the exit status and notify the delegate if we haven't already set the process
2038af245d11STodd Fiala             // state to an exited state.  We normally should have received a SIGTRAP | (PTRACE_EVENT_EXIT << 8)
2039af245d11STodd Fiala             // for the main thread.
2040fa03ad2eSChaoren Lin             const bool already_notified = (process->GetState() == StateType::eStateExited) || (process->GetState () == StateType::eStateCrashed);
2041af245d11STodd Fiala             if (!already_notified)
2042af245d11STodd Fiala             {
2043af245d11STodd Fiala                 if (log)
2044af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() tid = %"  PRIu64 " handling main thread exit (%s), expected exit state already set but state was %s instead, setting exit state now", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found", StateAsCString (process->GetState ()));
2045af245d11STodd Fiala                 // The main thread exited.  We're done monitoring.  Report to delegate.
2046af245d11STodd Fiala                 process->SetExitStatus (convert_pid_status_to_exit_type (status), convert_pid_status_to_return_code (status), nullptr, true);
2047af245d11STodd Fiala 
2048af245d11STodd Fiala                 // Notify delegate that our process has exited.
2049af245d11STodd Fiala                 process->SetState (StateType::eStateExited, true);
2050af245d11STodd Fiala             }
2051af245d11STodd Fiala             else
2052af245d11STodd Fiala             {
2053af245d11STodd Fiala                 if (log)
2054af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() tid = %"  PRIu64 " main thread now exited (%s)", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found");
2055af245d11STodd Fiala             }
2056af245d11STodd Fiala             return true;
2057af245d11STodd Fiala         }
2058af245d11STodd Fiala         else
2059af245d11STodd Fiala         {
2060af245d11STodd Fiala             // Do we want to report to the delegate in this case?  I think not.  If this was an orderly
2061af245d11STodd Fiala             // thread exit, we would already have received the SIGTRAP | (PTRACE_EVENT_EXIT << 8) signal,
2062af245d11STodd Fiala             // and we would have done an all-stop then.
2063af245d11STodd Fiala             if (log)
2064af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() tid = %"  PRIu64 " handling non-main thread exit (%s)", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found");
2065af245d11STodd Fiala 
2066af245d11STodd Fiala             // Not the main thread, we keep going.
2067af245d11STodd Fiala             return false;
2068af245d11STodd Fiala         }
2069af245d11STodd Fiala     }
2070af245d11STodd Fiala 
2071af245d11STodd Fiala     // Get details on the signal raised.
2072af245d11STodd Fiala     siginfo_t info;
2073af245d11STodd Fiala     int ptrace_err = 0;
2074af245d11STodd Fiala 
2075fa03ad2eSChaoren Lin     if (process->GetSignalInfo (pid, &info, ptrace_err))
2076fa03ad2eSChaoren Lin     {
2077fa03ad2eSChaoren Lin         // We have retrieved the signal info.  Dispatch appropriately.
2078fa03ad2eSChaoren Lin         if (info.si_signo == SIGTRAP)
2079fa03ad2eSChaoren Lin             process->MonitorSIGTRAP(&info, pid);
2080fa03ad2eSChaoren Lin         else
2081fa03ad2eSChaoren Lin             process->MonitorSignal(&info, pid, exited);
2082fa03ad2eSChaoren Lin 
2083fa03ad2eSChaoren Lin         stop_monitoring = false;
2084fa03ad2eSChaoren Lin     }
2085fa03ad2eSChaoren Lin     else
2086af245d11STodd Fiala     {
2087af245d11STodd Fiala         if (ptrace_err == EINVAL)
2088af245d11STodd Fiala         {
2089fa03ad2eSChaoren Lin             // This is a group stop reception for this tid.
2090fa03ad2eSChaoren Lin             if (log)
2091fa03ad2eSChaoren Lin                 log->Printf ("NativeThreadLinux::%s received a group stop for pid %" PRIu64 " tid %" PRIu64, __FUNCTION__, process->GetID (), pid);
2092fa03ad2eSChaoren Lin             process->NotifyThreadStop (pid);
2093a9882ceeSTodd Fiala         }
2094a9882ceeSTodd Fiala         else
2095a9882ceeSTodd Fiala         {
2096af245d11STodd Fiala             // ptrace(GETSIGINFO) failed (but not due to group-stop).
2097af245d11STodd Fiala 
2098af245d11STodd Fiala             // A return value of ESRCH means the thread/process is no longer on the system,
2099af245d11STodd Fiala             // so it was killed somehow outside of our control.  Either way, we can't do anything
2100af245d11STodd Fiala             // with it anymore.
2101af245d11STodd Fiala 
2102af245d11STodd Fiala             // We stop monitoring if it was the main thread.
2103af245d11STodd Fiala             stop_monitoring = is_main_thread;
2104af245d11STodd Fiala 
2105af245d11STodd Fiala             // Stop tracking the metadata for the thread since it's entirely off the system now.
2106af245d11STodd Fiala             const bool thread_found = process->StopTrackingThread (pid);
2107af245d11STodd Fiala 
2108fa03ad2eSChaoren Lin             // Make sure the thread state coordinator knows about this.
2109fa03ad2eSChaoren Lin             process->NotifyThreadDeath (pid);
2110fa03ad2eSChaoren Lin 
2111af245d11STodd Fiala             if (log)
2112af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s GetSignalInfo failed: %s, tid = %" PRIu64 ", signal = %d, status = %d (%s, %s, %s)",
2113af245d11STodd Fiala                              __FUNCTION__, strerror(ptrace_err), pid, signal, status, ptrace_err == ESRCH ? "thread/process killed" : "unknown reason", is_main_thread ? "is main thread" : "is not main thread", thread_found ? "thread metadata removed" : "thread metadata not found");
2114af245d11STodd Fiala 
2115af245d11STodd Fiala             if (is_main_thread)
2116af245d11STodd Fiala             {
2117af245d11STodd Fiala                 // Notify the delegate - our process is not available but appears to have been killed outside
2118af245d11STodd Fiala                 // our control.  Is eStateExited the right exit state in this case?
2119af245d11STodd Fiala                 process->SetExitStatus (convert_pid_status_to_exit_type (status), convert_pid_status_to_return_code (status), nullptr, true);
2120af245d11STodd Fiala                 process->SetState (StateType::eStateExited, true);
2121af245d11STodd Fiala             }
2122af245d11STodd Fiala             else
2123af245d11STodd Fiala             {
2124af245d11STodd Fiala                 // This thread was pulled out from underneath us.  Anything to do here? Do we want to do an all stop?
2125af245d11STodd Fiala                 if (log)
2126af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 " non-main thread exit occurred, didn't tell delegate anything since thread disappeared out from underneath us", __FUNCTION__, process->GetID (), pid);
2127af245d11STodd Fiala             }
2128af245d11STodd Fiala         }
2129af245d11STodd Fiala     }
2130af245d11STodd Fiala 
2131af245d11STodd Fiala     return stop_monitoring;
2132af245d11STodd Fiala }
2133af245d11STodd Fiala 
2134af245d11STodd Fiala void
2135af245d11STodd Fiala NativeProcessLinux::MonitorSIGTRAP(const siginfo_t *info, lldb::pid_t pid)
2136af245d11STodd Fiala {
2137af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2138af245d11STodd Fiala     const bool is_main_thread = (pid == GetID ());
2139af245d11STodd Fiala 
2140af245d11STodd Fiala     assert(info && info->si_signo == SIGTRAP && "Unexpected child signal!");
2141af245d11STodd Fiala     if (!info)
2142af245d11STodd Fiala         return;
2143af245d11STodd Fiala 
2144af245d11STodd Fiala     // See if we can find a thread for this signal.
2145af245d11STodd Fiala     NativeThreadProtocolSP thread_sp = GetThreadByID (pid);
2146af245d11STodd Fiala     if (!thread_sp)
2147af245d11STodd Fiala     {
2148af245d11STodd Fiala         if (log)
2149af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " no thread found for tid %" PRIu64, __FUNCTION__, GetID (), pid);
2150af245d11STodd Fiala     }
2151af245d11STodd Fiala 
2152af245d11STodd Fiala     switch (info->si_code)
2153af245d11STodd Fiala     {
2154af245d11STodd Fiala     // TODO: these two cases are required if we want to support tracing of the inferiors' children.  We'd need this to debug a monitor.
2155af245d11STodd Fiala     // case (SIGTRAP | (PTRACE_EVENT_FORK << 8)):
2156af245d11STodd Fiala     // case (SIGTRAP | (PTRACE_EVENT_VFORK << 8)):
2157af245d11STodd Fiala 
2158af245d11STodd Fiala     case (SIGTRAP | (PTRACE_EVENT_CLONE << 8)):
2159af245d11STodd Fiala     {
2160af245d11STodd Fiala         lldb::tid_t tid = LLDB_INVALID_THREAD_ID;
2161af245d11STodd Fiala 
2162fa03ad2eSChaoren Lin         // The main thread is stopped here.
2163fa03ad2eSChaoren Lin         if (thread_sp)
2164fa03ad2eSChaoren Lin             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2165fa03ad2eSChaoren Lin         NotifyThreadStop (pid);
2166fa03ad2eSChaoren Lin 
2167af245d11STodd Fiala         unsigned long event_message = 0;
2168af245d11STodd Fiala         if (GetEventMessage (pid, &event_message))
2169fa03ad2eSChaoren Lin         {
2170af245d11STodd Fiala             tid = static_cast<lldb::tid_t> (event_message);
2171af245d11STodd Fiala             if (log)
2172af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " received thread creation event for tid %" PRIu64, __FUNCTION__, pid, tid);
2173af245d11STodd Fiala 
2174af245d11STodd Fiala             // If we don't track the thread yet: create it, mark as stopped.
2175af245d11STodd Fiala             // If we do track it, this is the wait we needed.  Now resume the new thread.
2176af245d11STodd Fiala             // In all cases, resume the current (i.e. main process) thread.
2177511e5cdcSTodd Fiala             bool created_now = false;
2178fa03ad2eSChaoren Lin             NativeThreadProtocolSP new_thread_sp = GetOrCreateThread (tid, created_now);
2179fa03ad2eSChaoren Lin             assert (new_thread_sp.get() && "failed to get or create the tracking data for newly created inferior thread");
2180af245d11STodd Fiala 
2181af245d11STodd Fiala             // If the thread was already tracked, it means the created thread already received its SI_USER notification of creation.
2182511e5cdcSTodd Fiala             if (!created_now)
2183af245d11STodd Fiala             {
2184af245d11STodd Fiala                 // We can now resume the newly created thread since it is fully created.
2185fa03ad2eSChaoren Lin                 NotifyThreadCreateStopped (tid);
2186fa03ad2eSChaoren Lin                 m_coordinator_up->RequestThreadResume (tid,
2187fa03ad2eSChaoren Lin                                                        [=](lldb::tid_t tid_to_resume)
2188fa03ad2eSChaoren Lin                                                        {
2189fa03ad2eSChaoren Lin                                                            reinterpret_cast<NativeThreadLinux*> (new_thread_sp.get ())->SetRunning ();
2190fa03ad2eSChaoren Lin                                                            Resume (tid_to_resume, LLDB_INVALID_SIGNAL_NUMBER);
2191fa03ad2eSChaoren Lin                                                        },
2192fa03ad2eSChaoren Lin                                                        CoordinatorErrorHandler);
2193af245d11STodd Fiala             }
2194af245d11STodd Fiala             else
2195af245d11STodd Fiala             {
2196af245d11STodd Fiala                 // Mark the thread as currently launching.  Need to wait for SIGTRAP clone on the main thread before
2197af245d11STodd Fiala                 // this thread is ready to go.
2198fa03ad2eSChaoren Lin                 reinterpret_cast<NativeThreadLinux*> (new_thread_sp.get ())->SetLaunching ();
2199fa03ad2eSChaoren Lin             }
2200fa03ad2eSChaoren Lin         }
2201fa03ad2eSChaoren Lin         else
2202fa03ad2eSChaoren Lin         {
2203fa03ad2eSChaoren Lin             if (log)
2204fa03ad2eSChaoren Lin                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " received thread creation event but GetEventMessage failed so we don't know the new tid", __FUNCTION__, pid);
2205af245d11STodd Fiala         }
2206af245d11STodd Fiala 
2207af245d11STodd Fiala         // In all cases, we can resume the main thread here.
2208fa03ad2eSChaoren Lin         m_coordinator_up->RequestThreadResume (pid,
2209fa03ad2eSChaoren Lin                                                [=](lldb::tid_t tid_to_resume)
2210fa03ad2eSChaoren Lin                                                {
2211fa03ad2eSChaoren Lin                                                    reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2212fa03ad2eSChaoren Lin                                                    Resume (tid_to_resume, LLDB_INVALID_SIGNAL_NUMBER);
2213fa03ad2eSChaoren Lin                                                },
2214fa03ad2eSChaoren Lin                                                CoordinatorErrorHandler);
2215fa03ad2eSChaoren Lin 
2216af245d11STodd Fiala         break;
2217af245d11STodd Fiala     }
2218af245d11STodd Fiala 
2219af245d11STodd Fiala     case (SIGTRAP | (PTRACE_EVENT_EXEC << 8)):
2220a9882ceeSTodd Fiala     {
2221a9882ceeSTodd Fiala         NativeThreadProtocolSP main_thread_sp;
2222af245d11STodd Fiala         if (log)
2223af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received exec event, code = %d", __FUNCTION__, info->si_code ^ SIGTRAP);
2224a9882ceeSTodd Fiala 
2225fa03ad2eSChaoren Lin         // The thread state coordinator needs to reset due to the exec.
2226fa03ad2eSChaoren Lin         m_coordinator_up->ResetForExec ();
2227fa03ad2eSChaoren Lin 
2228fa03ad2eSChaoren Lin         // Remove all but the main thread here.  Linux fork creates a new process which only copies the main thread.  Mutexes are in undefined state.
2229a9882ceeSTodd Fiala         {
2230a9882ceeSTodd Fiala             Mutex::Locker locker (m_threads_mutex);
2231a9882ceeSTodd Fiala 
2232a9882ceeSTodd Fiala             if (log)
2233a9882ceeSTodd Fiala                 log->Printf ("NativeProcessLinux::%s exec received, stop tracking all but main thread", __FUNCTION__);
2234a9882ceeSTodd Fiala 
2235a9882ceeSTodd Fiala             for (auto thread_sp : m_threads)
2236a9882ceeSTodd Fiala             {
2237a9882ceeSTodd Fiala                 const bool is_main_thread = thread_sp && thread_sp->GetID () == GetID ();
2238a9882ceeSTodd Fiala                 if (is_main_thread)
2239a9882ceeSTodd Fiala                 {
2240a9882ceeSTodd Fiala                     main_thread_sp = thread_sp;
2241a9882ceeSTodd Fiala                     if (log)
2242a9882ceeSTodd Fiala                         log->Printf ("NativeProcessLinux::%s found main thread with tid %" PRIu64 ", keeping", __FUNCTION__, main_thread_sp->GetID ());
2243a9882ceeSTodd Fiala                 }
2244a9882ceeSTodd Fiala                 else
2245a9882ceeSTodd Fiala                 {
2246fa03ad2eSChaoren Lin                     // Tell thread coordinator this thread is dead.
2247a9882ceeSTodd Fiala                     if (log)
2248a9882ceeSTodd Fiala                         log->Printf ("NativeProcessLinux::%s discarding non-main-thread tid %" PRIu64 " due to exec", __FUNCTION__, thread_sp->GetID ());
2249a9882ceeSTodd Fiala                 }
2250a9882ceeSTodd Fiala             }
2251a9882ceeSTodd Fiala 
2252a9882ceeSTodd Fiala             m_threads.clear ();
2253a9882ceeSTodd Fiala 
2254a9882ceeSTodd Fiala             if (main_thread_sp)
2255a9882ceeSTodd Fiala             {
2256a9882ceeSTodd Fiala                 m_threads.push_back (main_thread_sp);
2257a9882ceeSTodd Fiala                 SetCurrentThreadID (main_thread_sp->GetID ());
2258a9882ceeSTodd Fiala                 reinterpret_cast<NativeThreadLinux*>(main_thread_sp.get())->SetStoppedByExec ();
2259a9882ceeSTodd Fiala             }
2260a9882ceeSTodd Fiala             else
2261a9882ceeSTodd Fiala             {
2262a9882ceeSTodd Fiala                 SetCurrentThreadID (LLDB_INVALID_THREAD_ID);
2263a9882ceeSTodd Fiala                 if (log)
2264a9882ceeSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid %" PRIu64 "no main thread found, discarded all threads, we're in a no-thread state!", __FUNCTION__, GetID ());
2265a9882ceeSTodd Fiala             }
2266a9882ceeSTodd Fiala         }
2267a9882ceeSTodd Fiala 
2268fa03ad2eSChaoren Lin         // Tell coordinator about about the "new" (since exec) stopped main thread.
2269fa03ad2eSChaoren Lin         const lldb::tid_t main_thread_tid = GetID ();
2270fa03ad2eSChaoren Lin         NotifyThreadCreateStopped (main_thread_tid);
2271fa03ad2eSChaoren Lin 
2272fa03ad2eSChaoren Lin         // NOTE: ideally these next statements would execute at the same time as the coordinator thread create was executed.
2273fa03ad2eSChaoren Lin         // Consider a handler that can execute when that happens.
2274a9882ceeSTodd Fiala         // Let our delegate know we have just exec'd.
2275a9882ceeSTodd Fiala         NotifyDidExec ();
2276a9882ceeSTodd Fiala 
2277a9882ceeSTodd Fiala         // If we have a main thread, indicate we are stopped.
2278a9882ceeSTodd Fiala         assert (main_thread_sp && "exec called during ptraced process but no main thread metadata tracked");
2279fa03ad2eSChaoren Lin 
2280fa03ad2eSChaoren Lin         // Let the process know we're stopped.
2281a9882ceeSTodd Fiala         SetState (StateType::eStateStopped);
2282a9882ceeSTodd Fiala 
2283af245d11STodd Fiala         break;
2284a9882ceeSTodd Fiala     }
2285af245d11STodd Fiala 
2286af245d11STodd Fiala     case (SIGTRAP | (PTRACE_EVENT_EXIT << 8)):
2287af245d11STodd Fiala     {
2288af245d11STodd Fiala         // The inferior process or one of its threads is about to exit.
2289fa03ad2eSChaoren Lin 
2290fa03ad2eSChaoren Lin         // This thread is currently stopped.  It's not actually dead yet, just about to be.
2291fa03ad2eSChaoren Lin         NotifyThreadStop (pid);
2292fa03ad2eSChaoren Lin 
2293af245d11STodd Fiala         unsigned long data = 0;
2294af245d11STodd Fiala         if (!GetEventMessage(pid, &data))
2295af245d11STodd Fiala             data = -1;
2296af245d11STodd Fiala 
2297af245d11STodd Fiala         if (log)
2298af245d11STodd Fiala         {
2299af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received PTRACE_EVENT_EXIT, data = %lx (WIFEXITED=%s,WIFSIGNALED=%s), pid = %" PRIu64 " (%s)",
2300af245d11STodd Fiala                          __FUNCTION__,
2301af245d11STodd Fiala                          data, WIFEXITED (data) ? "true" : "false", WIFSIGNALED (data) ? "true" : "false",
2302af245d11STodd Fiala                          pid,
2303af245d11STodd Fiala                     is_main_thread ? "is main thread" : "not main thread");
2304af245d11STodd Fiala         }
2305af245d11STodd Fiala 
2306af245d11STodd Fiala         if (is_main_thread)
2307af245d11STodd Fiala         {
2308af245d11STodd Fiala             SetExitStatus (convert_pid_status_to_exit_type (data), convert_pid_status_to_return_code (data), nullptr, true);
230975f47c3aSTodd Fiala         }
231075f47c3aSTodd Fiala 
23119d617ba6SChaoren Lin         const int signo = static_cast<int> (data);
2312fa03ad2eSChaoren Lin         m_coordinator_up->RequestThreadResume (pid,
2313fa03ad2eSChaoren Lin                                                [=](lldb::tid_t tid_to_resume)
2314fa03ad2eSChaoren Lin                                                {
2315fa03ad2eSChaoren Lin                                                    reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
23169d617ba6SChaoren Lin                                                    Resume (tid_to_resume, signo);
2317fa03ad2eSChaoren Lin                                                },
2318fa03ad2eSChaoren Lin                                                CoordinatorErrorHandler);
2319af245d11STodd Fiala 
2320af245d11STodd Fiala         break;
2321af245d11STodd Fiala     }
2322af245d11STodd Fiala 
2323af245d11STodd Fiala     case 0:
2324af245d11STodd Fiala     case TRAP_TRACE:
2325af245d11STodd Fiala         // We receive this on single stepping.
2326af245d11STodd Fiala         if (log)
2327af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received trace event, pid = %" PRIu64 " (single stepping)", __FUNCTION__, pid);
2328af245d11STodd Fiala 
2329fa03ad2eSChaoren Lin         // This thread is currently stopped.
2330fa03ad2eSChaoren Lin         NotifyThreadStop (pid);
2331fa03ad2eSChaoren Lin 
2332ae29d395SChaoren Lin         // Here we don't have to request the rest of the threads to stop or request a deferred stop.
2333ae29d395SChaoren Lin         // This would have already happened at the time the Resume() with step operation was signaled.
2334ae29d395SChaoren Lin         // At this point, we just need to say we stopped, and the deferred notifcation will fire off
2335ae29d395SChaoren Lin         // once all running threads have checked in as stopped.
2336af245d11STodd Fiala         break;
2337af245d11STodd Fiala 
2338af245d11STodd Fiala     case SI_KERNEL:
2339af245d11STodd Fiala     case TRAP_BRKPT:
2340af245d11STodd Fiala         if (log)
2341af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received breakpoint event, pid = %" PRIu64, __FUNCTION__, pid);
2342af245d11STodd Fiala 
2343fa03ad2eSChaoren Lin         // This thread is currently stopped.
2344fa03ad2eSChaoren Lin         NotifyThreadStop (pid);
2345fa03ad2eSChaoren Lin 
2346af245d11STodd Fiala         // Mark the thread as stopped at breakpoint.
2347af245d11STodd Fiala         if (thread_sp)
2348af245d11STodd Fiala         {
2349af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2350af245d11STodd Fiala             Error error = FixupBreakpointPCAsNeeded (thread_sp);
2351af245d11STodd Fiala             if (error.Fail ())
2352af245d11STodd Fiala             {
2353af245d11STodd Fiala                 if (log)
2354af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 " fixup: %s", __FUNCTION__, pid, error.AsCString ());
2355af245d11STodd Fiala             }
2356af245d11STodd Fiala         }
2357af245d11STodd Fiala         else
2358af245d11STodd Fiala         {
2359af245d11STodd Fiala             if (log)
2360af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s()  pid = %" PRIu64 ": warning, cannot process software breakpoint since no thread metadata", __FUNCTION__, pid);
2361af245d11STodd Fiala         }
2362af245d11STodd Fiala 
2363af245d11STodd Fiala 
2364fa03ad2eSChaoren Lin         // We need to tell all other running threads before we notify the delegate about this stop.
2365fa03ad2eSChaoren Lin         CallAfterRunningThreadsStop (pid,
2366fa03ad2eSChaoren Lin                                      [=](lldb::tid_t deferred_notification_tid)
2367fa03ad2eSChaoren Lin                                      {
2368fa03ad2eSChaoren Lin                                          SetCurrentThreadID (deferred_notification_tid);
2369fa03ad2eSChaoren Lin                                          // Tell the process we have a stop (from software breakpoint).
2370af245d11STodd Fiala                                          SetState (StateType::eStateStopped, true);
2371fa03ad2eSChaoren Lin                                      });
2372af245d11STodd Fiala         break;
2373af245d11STodd Fiala 
2374af245d11STodd Fiala     case TRAP_HWBKPT:
2375af245d11STodd Fiala         if (log)
2376af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received watchpoint event, pid = %" PRIu64, __FUNCTION__, pid);
2377af245d11STodd Fiala 
2378fa03ad2eSChaoren Lin         // This thread is currently stopped.
2379fa03ad2eSChaoren Lin         NotifyThreadStop (pid);
2380fa03ad2eSChaoren Lin 
2381af245d11STodd Fiala         // Mark the thread as stopped at watchpoint.
2382af245d11STodd Fiala         // The address is at (lldb::addr_t)info->si_addr if we need it.
2383af245d11STodd Fiala         if (thread_sp)
2384af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2385af245d11STodd Fiala         else
2386af245d11STodd Fiala         {
2387af245d11STodd Fiala             if (log)
2388af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ": warning, cannot process hardware breakpoint since no thread metadata", __FUNCTION__, GetID (), pid);
2389af245d11STodd Fiala         }
2390af245d11STodd Fiala 
2391fa03ad2eSChaoren Lin         // We need to tell all other running threads before we notify the delegate about this stop.
2392fa03ad2eSChaoren Lin         CallAfterRunningThreadsStop (pid,
2393fa03ad2eSChaoren Lin                                      [=](lldb::tid_t deferred_notification_tid)
2394fa03ad2eSChaoren Lin                                      {
2395fa03ad2eSChaoren Lin                                          SetCurrentThreadID (deferred_notification_tid);
2396fa03ad2eSChaoren Lin                                          // Tell the process we have a stop (from hardware breakpoint).
2397af245d11STodd Fiala                                          SetState (StateType::eStateStopped, true);
2398fa03ad2eSChaoren Lin                                      });
2399af245d11STodd Fiala         break;
2400af245d11STodd Fiala 
2401af245d11STodd Fiala     case SIGTRAP:
2402af245d11STodd Fiala     case (SIGTRAP | 0x80):
2403af245d11STodd Fiala         if (log)
2404fa03ad2eSChaoren Lin             log->Printf ("NativeProcessLinux::%s() received unknown SIGTRAP system call stop event, pid %" PRIu64 "tid %" PRIu64 ", resuming", __FUNCTION__, GetID (), pid);
2405fa03ad2eSChaoren Lin 
2406fa03ad2eSChaoren Lin         // This thread is currently stopped.
2407fa03ad2eSChaoren Lin         NotifyThreadStop (pid);
2408fa03ad2eSChaoren Lin         if (thread_sp)
2409fa03ad2eSChaoren Lin             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2410fa03ad2eSChaoren Lin 
2411fa03ad2eSChaoren Lin 
2412af245d11STodd Fiala         // Ignore these signals until we know more about them.
2413fa03ad2eSChaoren Lin         m_coordinator_up->RequestThreadResume (pid,
2414fa03ad2eSChaoren Lin                                                [=](lldb::tid_t tid_to_resume)
2415fa03ad2eSChaoren Lin                                                {
2416fa03ad2eSChaoren Lin                                                    reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2417fa03ad2eSChaoren Lin                                                    Resume (tid_to_resume, LLDB_INVALID_SIGNAL_NUMBER);
2418fa03ad2eSChaoren Lin                                                },
2419fa03ad2eSChaoren Lin                                                CoordinatorErrorHandler);
2420af245d11STodd Fiala         break;
2421af245d11STodd Fiala 
2422af245d11STodd Fiala     default:
2423af245d11STodd Fiala         assert(false && "Unexpected SIGTRAP code!");
2424af245d11STodd Fiala         if (log)
2425af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 "tid %" PRIu64 " received unhandled SIGTRAP code: 0x%" PRIx64, __FUNCTION__, GetID (), pid, static_cast<uint64_t> (SIGTRAP | (PTRACE_EVENT_CLONE << 8)));
2426af245d11STodd Fiala         break;
2427af245d11STodd Fiala 
2428af245d11STodd Fiala     }
2429af245d11STodd Fiala }
2430af245d11STodd Fiala 
2431af245d11STodd Fiala void
2432af245d11STodd Fiala NativeProcessLinux::MonitorSignal(const siginfo_t *info, lldb::pid_t pid, bool exited)
2433af245d11STodd Fiala {
2434511e5cdcSTodd Fiala     assert (info && "null info");
2435511e5cdcSTodd Fiala     if (!info)
2436511e5cdcSTodd Fiala         return;
2437511e5cdcSTodd Fiala 
2438511e5cdcSTodd Fiala     const int signo = info->si_signo;
2439511e5cdcSTodd Fiala     const bool is_from_llgs = info->si_pid == getpid ();
2440af245d11STodd Fiala 
2441af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2442af245d11STodd Fiala 
2443af245d11STodd Fiala     // POSIX says that process behaviour is undefined after it ignores a SIGFPE,
2444af245d11STodd Fiala     // SIGILL, SIGSEGV, or SIGBUS *unless* that signal was generated by a
2445af245d11STodd Fiala     // kill(2) or raise(3).  Similarly for tgkill(2) on Linux.
2446af245d11STodd Fiala     //
2447af245d11STodd Fiala     // IOW, user generated signals never generate what we consider to be a
2448af245d11STodd Fiala     // "crash".
2449af245d11STodd Fiala     //
2450af245d11STodd Fiala     // Similarly, ACK signals generated by this monitor.
2451af245d11STodd Fiala 
2452af245d11STodd Fiala     // See if we can find a thread for this signal.
2453af245d11STodd Fiala     NativeThreadProtocolSP thread_sp = GetThreadByID (pid);
2454af245d11STodd Fiala     if (!thread_sp)
2455af245d11STodd Fiala     {
2456af245d11STodd Fiala         if (log)
2457af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " no thread found for tid %" PRIu64, __FUNCTION__, GetID (), pid);
2458af245d11STodd Fiala     }
2459af245d11STodd Fiala 
2460af245d11STodd Fiala     // Handle the signal.
2461af245d11STodd Fiala     if (info->si_code == SI_TKILL || info->si_code == SI_USER)
2462af245d11STodd Fiala     {
2463af245d11STodd Fiala         if (log)
2464af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received signal %s (%d) with code %s, (siginfo pid = %d (%s), waitpid pid = %" PRIu64 ")",
2465af245d11STodd Fiala                             __FUNCTION__,
2466af245d11STodd Fiala                             GetUnixSignals ().GetSignalAsCString (signo),
2467af245d11STodd Fiala                             signo,
2468af245d11STodd Fiala                             (info->si_code == SI_TKILL ? "SI_TKILL" : "SI_USER"),
2469af245d11STodd Fiala                             info->si_pid,
2470511e5cdcSTodd Fiala                             is_from_llgs ? "from llgs" : "not from llgs",
2471af245d11STodd Fiala                             pid);
247258a2f669STodd Fiala     }
2473af245d11STodd Fiala 
247458a2f669STodd Fiala     // Check for new thread notification.
247558a2f669STodd Fiala     if ((info->si_pid == 0) && (info->si_code == SI_USER))
2476af245d11STodd Fiala     {
2477af245d11STodd Fiala         // A new thread creation is being signaled.  This is one of two parts that come in
2478af245d11STodd Fiala         // a non-deterministic order.  pid is the thread id.
2479af245d11STodd Fiala         if (log)
2480af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 " tid %" PRIu64 ": new thread notification",
2481af245d11STodd Fiala                      __FUNCTION__, GetID (), pid);
2482af245d11STodd Fiala 
2483af245d11STodd Fiala         // Did we already create the thread?
2484511e5cdcSTodd Fiala         bool created_now = false;
2485511e5cdcSTodd Fiala         thread_sp = GetOrCreateThread (pid, created_now);
2486af245d11STodd Fiala         assert (thread_sp.get() && "failed to get or create the tracking data for newly created inferior thread");
2487af245d11STodd Fiala 
2488af245d11STodd Fiala         // If the thread was already tracked, it means the main thread already received its SIGTRAP for the create.
2489511e5cdcSTodd Fiala         if (!created_now)
2490af245d11STodd Fiala         {
2491fa03ad2eSChaoren Lin             // We can now resume the newly created thread since it is fully created.
2492fa03ad2eSChaoren Lin             NotifyThreadCreateStopped (pid);
2493fa03ad2eSChaoren Lin             m_coordinator_up->RequestThreadResume (pid,
2494fa03ad2eSChaoren Lin                                                    [=](lldb::tid_t tid_to_resume)
2495fa03ad2eSChaoren Lin                                                    {
2496af245d11STodd Fiala                                                        reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2497fa03ad2eSChaoren Lin                                                        Resume (tid_to_resume, LLDB_INVALID_SIGNAL_NUMBER);
2498fa03ad2eSChaoren Lin                                                    },
2499fa03ad2eSChaoren Lin                                                    CoordinatorErrorHandler);
2500af245d11STodd Fiala         }
2501af245d11STodd Fiala         else
2502af245d11STodd Fiala         {
2503af245d11STodd Fiala             // Mark the thread as currently launching.  Need to wait for SIGTRAP clone on the main thread before
2504af245d11STodd Fiala             // this thread is ready to go.
2505af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetLaunching ();
2506af245d11STodd Fiala         }
250758a2f669STodd Fiala 
250858a2f669STodd Fiala         // Done handling.
250958a2f669STodd Fiala         return;
2510af245d11STodd Fiala     }
251158a2f669STodd Fiala 
251258a2f669STodd Fiala     // Check for thread stop notification.
2513511e5cdcSTodd Fiala     if (is_from_llgs && (info->si_code == SI_TKILL) && (signo == SIGSTOP))
2514af245d11STodd Fiala     {
2515af245d11STodd Fiala         // This is a tgkill()-based stop.
2516af245d11STodd Fiala         if (thread_sp)
2517af245d11STodd Fiala         {
2518fa03ad2eSChaoren Lin             if (log)
2519fa03ad2eSChaoren Lin                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ", thread stopped",
2520fa03ad2eSChaoren Lin                              __FUNCTION__,
2521fa03ad2eSChaoren Lin                              GetID (),
2522fa03ad2eSChaoren Lin                              pid);
2523fa03ad2eSChaoren Lin 
2524aab58633SChaoren Lin             // Check that we're not already marked with a stop reason.
2525aab58633SChaoren Lin             // Note this thread really shouldn't already be marked as stopped - if we were, that would imply that
2526aab58633SChaoren Lin             // the kernel signaled us with the thread stopping which we handled and marked as stopped,
2527aab58633SChaoren Lin             // and that, without an intervening resume, we received another stop.  It is more likely
2528aab58633SChaoren Lin             // that we are missing the marking of a run state somewhere if we find that the thread was
2529aab58633SChaoren Lin             // marked as stopped.
2530aab58633SChaoren Lin             NativeThreadLinux *const linux_thread_p = reinterpret_cast<NativeThreadLinux*> (thread_sp.get ());
2531aab58633SChaoren Lin             assert (linux_thread_p && "linux_thread_p is null!");
2532aab58633SChaoren Lin 
2533aab58633SChaoren Lin             const StateType thread_state = linux_thread_p->GetState ();
2534aab58633SChaoren Lin             if (!StateIsStoppedState (thread_state, false))
2535aab58633SChaoren Lin             {
253603f12d6bSChaoren Lin                 // An inferior thread just stopped, but was not the primary cause of the process stop.
253703f12d6bSChaoren Lin                 // Instead, something else (like a breakpoint or step) caused the stop.  Mark the
253803f12d6bSChaoren Lin                 // stop signal as 0 to let lldb know this isn't the important stop.
253903f12d6bSChaoren Lin                 reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (0);
2540af245d11STodd Fiala                 SetCurrentThreadID (thread_sp->GetID ());
2541aab58633SChaoren Lin             }
2542aab58633SChaoren Lin             else
2543aab58633SChaoren Lin             {
2544aab58633SChaoren Lin                 if (log)
2545aab58633SChaoren Lin                 {
2546aab58633SChaoren Lin                     // Retrieve the signal name if the thread was stopped by a signal.
2547aab58633SChaoren Lin                     int stop_signo = 0;
2548aab58633SChaoren Lin                     const bool stopped_by_signal = linux_thread_p->IsStopped (&stop_signo);
2549aab58633SChaoren Lin                     const char *signal_name = stopped_by_signal ? GetUnixSignals ().GetSignalAsCString (stop_signo) : "<not stopped by signal>";
2550aab58633SChaoren Lin                     if (!signal_name)
2551aab58633SChaoren Lin                         signal_name = "<no-signal-name>";
2552aab58633SChaoren Lin 
2553aab58633SChaoren Lin                     log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ", thread was already marked as a stopped state (state=%s, signal=%d (%s)), leaving stop signal as is",
2554aab58633SChaoren Lin                                  __FUNCTION__,
2555aab58633SChaoren Lin                                  GetID (),
2556aab58633SChaoren Lin                                  linux_thread_p->GetID (),
2557aab58633SChaoren Lin                                  StateAsCString (thread_state),
2558aab58633SChaoren Lin                                  stop_signo,
2559aab58633SChaoren Lin                                  signal_name);
2560aab58633SChaoren Lin                 }
2561aab58633SChaoren Lin             }
2562af245d11STodd Fiala 
2563fa03ad2eSChaoren Lin             // Tell the thread state coordinator about the stop.
2564fa03ad2eSChaoren Lin             NotifyThreadStop (thread_sp->GetID ());
2565af245d11STodd Fiala         }
2566af245d11STodd Fiala 
256758a2f669STodd Fiala         // Done handling.
2568af245d11STodd Fiala         return;
2569af245d11STodd Fiala     }
2570af245d11STodd Fiala 
2571af245d11STodd Fiala     if (log)
2572af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() received signal %s", __FUNCTION__, GetUnixSignals ().GetSignalAsCString (signo));
2573af245d11STodd Fiala 
2574af245d11STodd Fiala     switch (signo)
2575af245d11STodd Fiala     {
2576af245d11STodd Fiala     case SIGSEGV:
257758a2f669STodd Fiala     case SIGABRT:
2578af245d11STodd Fiala     case SIGILL:
2579af245d11STodd Fiala     case SIGFPE:
2580af245d11STodd Fiala     case SIGBUS:
2581af245d11STodd Fiala         {
2582fa03ad2eSChaoren Lin             // This thread is stopped.
2583fa03ad2eSChaoren Lin             NotifyThreadStop (pid);
2584fa03ad2eSChaoren Lin 
2585fa03ad2eSChaoren Lin             // lldb::addr_t fault_addr = reinterpret_cast<lldb::addr_t>(info->si_addr);
2586fa03ad2eSChaoren Lin 
2587fa03ad2eSChaoren Lin             // This is just a pre-signal-delivery notification of the incoming signal.
2588fa03ad2eSChaoren Lin             if (thread_sp)
2589fa03ad2eSChaoren Lin                 reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (signo);
2590fa03ad2eSChaoren Lin 
2591fa03ad2eSChaoren Lin             // We can get more details on the exact nature of the crash here.
2592fa03ad2eSChaoren Lin             // ProcessMessage::CrashReason reason = GetCrashReasonForSIGSEGV(info);
259358a2f669STodd Fiala             if (!exited)
259458a2f669STodd Fiala             {
2595fa03ad2eSChaoren Lin                 // Send a stop to the debugger after we get all other threads to stop.
2596fa03ad2eSChaoren Lin                 CallAfterRunningThreadsStop (pid,
2597fa03ad2eSChaoren Lin                                              [=] (lldb::tid_t signaling_tid)
259858a2f669STodd Fiala                                              {
2599fa03ad2eSChaoren Lin                                                  SetCurrentThreadID (signaling_tid);
260058a2f669STodd Fiala                                                  SetState (StateType::eStateStopped, true);
2601fa03ad2eSChaoren Lin                                              });
260258a2f669STodd Fiala             }
260358a2f669STodd Fiala             else
260458a2f669STodd Fiala             {
2605fa03ad2eSChaoren Lin                 // FIXME the process might die right after this - might not ever get stops on any other threads.
2606fa03ad2eSChaoren Lin                 // Send a stop to the debugger after we get all other threads to stop.
2607fa03ad2eSChaoren Lin                 CallAfterRunningThreadsStop (pid,
2608fa03ad2eSChaoren Lin                                              [=] (lldb::tid_t signaling_tid)
260958a2f669STodd Fiala                                              {
2610fa03ad2eSChaoren Lin                                                  SetCurrentThreadID (signaling_tid);
261158a2f669STodd Fiala                                                  SetState (StateType::eStateCrashed, true);
2612fa03ad2eSChaoren Lin                                              });
261358a2f669STodd Fiala             }
2614af245d11STodd Fiala         }
2615af245d11STodd Fiala         break;
2616af245d11STodd Fiala 
2617511e5cdcSTodd Fiala     case SIGSTOP:
2618511e5cdcSTodd Fiala         {
2619fa03ad2eSChaoren Lin             // This thread is stopped.
2620fa03ad2eSChaoren Lin             NotifyThreadStop (pid);
2621fa03ad2eSChaoren Lin 
262258a2f669STodd Fiala             if (log)
2623511e5cdcSTodd Fiala             {
2624511e5cdcSTodd Fiala                 if (is_from_llgs)
2625511e5cdcSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " received SIGSTOP from llgs, most likely an interrupt", __FUNCTION__, GetID (), pid);
2626511e5cdcSTodd Fiala                 else
2627511e5cdcSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " received SIGSTOP from outside of debugger", __FUNCTION__, GetID (), pid);
2628511e5cdcSTodd Fiala             }
2629511e5cdcSTodd Fiala 
2630fa03ad2eSChaoren Lin             // Resume this thread to get the group-stop mechanism to fire off the true group stops.
2631fa03ad2eSChaoren Lin             // This thread will get stopped again as part of the group-stop completion.
2632fa03ad2eSChaoren Lin             m_coordinator_up->RequestThreadResume (pid,
2633fa03ad2eSChaoren Lin                                                    [=](lldb::tid_t tid_to_resume)
2634fa03ad2eSChaoren Lin                                                    {
2635fa03ad2eSChaoren Lin                                                        reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2636fa03ad2eSChaoren Lin                                                        // Pass this signal number on to the inferior to handle.
2637fa03ad2eSChaoren Lin                                                        Resume (tid_to_resume, signo);
2638fa03ad2eSChaoren Lin                                                    },
2639fa03ad2eSChaoren Lin                                                    CoordinatorErrorHandler);
2640fa03ad2eSChaoren Lin 
2641fa03ad2eSChaoren Lin             // And now we want to signal that we received a SIGSTOP on this thread
2642fa03ad2eSChaoren Lin             // as soon as all running threads stop (i.e. the group stop sequence completes).
2643fa03ad2eSChaoren Lin             CallAfterRunningThreadsStop (pid,
2644fa03ad2eSChaoren Lin                                          [=] (lldb::tid_t signaling_tid)
2645fa03ad2eSChaoren Lin                                          {
2646fa03ad2eSChaoren Lin                                              SetCurrentThreadID (signaling_tid);
2647fa03ad2eSChaoren Lin                                              SetState (StateType::eStateStopped, true);
2648fa03ad2eSChaoren Lin                                          });
2649fa03ad2eSChaoren Lin             break;
2650511e5cdcSTodd Fiala         }
2651511e5cdcSTodd Fiala 
2652511e5cdcSTodd Fiala     default:
2653511e5cdcSTodd Fiala         {
2654fa03ad2eSChaoren Lin             // This thread is stopped.
2655fa03ad2eSChaoren Lin             NotifyThreadStop (pid);
2656fa03ad2eSChaoren Lin 
2657511e5cdcSTodd Fiala             if (log)
2658511e5cdcSTodd Fiala                 log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " resuming thread with signal %s (%d)", __FUNCTION__, GetID (), pid, GetUnixSignals().GetSignalAsCString (signo), signo);
2659511e5cdcSTodd Fiala 
2660511e5cdcSTodd Fiala             // Pass the signal on to the inferior.
2661fa03ad2eSChaoren Lin             m_coordinator_up->RequestThreadResume (pid,
2662fa03ad2eSChaoren Lin                                                    [=](lldb::tid_t tid_to_resume)
2663fa03ad2eSChaoren Lin                                                    {
2664fa03ad2eSChaoren Lin                                                        reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2665fa03ad2eSChaoren Lin                                                        // Pass this signal number on to the inferior to handle.
2666fa03ad2eSChaoren Lin                                                        Resume (tid_to_resume, signo);
2667fa03ad2eSChaoren Lin                                                    },
2668fa03ad2eSChaoren Lin                                                    CoordinatorErrorHandler);
2669511e5cdcSTodd Fiala         }
2670af245d11STodd Fiala         break;
2671af245d11STodd Fiala     }
2672af245d11STodd Fiala }
2673af245d11STodd Fiala 
2674af245d11STodd Fiala Error
2675af245d11STodd Fiala NativeProcessLinux::Resume (const ResumeActionList &resume_actions)
2676af245d11STodd Fiala {
2677af245d11STodd Fiala     Error error;
2678af245d11STodd Fiala 
2679af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_THREAD));
2680af245d11STodd Fiala     if (log)
2681af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s called: pid %" PRIu64, __FUNCTION__, GetID ());
2682af245d11STodd Fiala 
268303f12d6bSChaoren Lin     lldb::tid_t deferred_signal_tid = LLDB_INVALID_THREAD_ID;
268403f12d6bSChaoren Lin     lldb::tid_t deferred_signal_skip_tid = LLDB_INVALID_THREAD_ID;
2685ae29d395SChaoren Lin     int deferred_signo = 0;
2686ae29d395SChaoren Lin     NativeThreadProtocolSP deferred_signal_thread_sp;
268703f12d6bSChaoren Lin     int resume_count = 0;
2688af245d11STodd Fiala 
268903f12d6bSChaoren Lin 
269003f12d6bSChaoren Lin     // std::vector<NativeThreadProtocolSP> new_stop_threads;
2691af245d11STodd Fiala 
2692fa03ad2eSChaoren Lin     // Scope for threads mutex.
2693fa03ad2eSChaoren Lin     {
2694af245d11STodd Fiala         Mutex::Locker locker (m_threads_mutex);
2695af245d11STodd Fiala         for (auto thread_sp : m_threads)
2696af245d11STodd Fiala         {
2697af245d11STodd Fiala             assert (thread_sp && "thread list should not contain NULL threads");
2698af245d11STodd Fiala 
2699af245d11STodd Fiala             const ResumeAction *const action = resume_actions.GetActionForThread (thread_sp->GetID (), true);
2700af245d11STodd Fiala             assert (action && "NULL ResumeAction returned for thread during Resume ()");
2701af245d11STodd Fiala 
2702af245d11STodd Fiala             if (log)
2703af245d11STodd Fiala             {
2704af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s processing resume action state %s for pid %" PRIu64 " tid %" PRIu64,
2705af245d11STodd Fiala                         __FUNCTION__, StateAsCString (action->state), GetID (), thread_sp->GetID ());
2706af245d11STodd Fiala             }
2707af245d11STodd Fiala 
2708af245d11STodd Fiala             switch (action->state)
2709af245d11STodd Fiala             {
2710af245d11STodd Fiala             case eStateRunning:
2711fa03ad2eSChaoren Lin             {
2712af245d11STodd Fiala                 // Run the thread, possibly feeding it the signal.
2713fa03ad2eSChaoren Lin                 const int signo = action->signal;
2714b8af31d4SChaoren Lin                 m_coordinator_up->RequestThreadResumeAsNeeded (thread_sp->GetID (),
2715fa03ad2eSChaoren Lin                                                                [=](lldb::tid_t tid_to_resume)
2716af245d11STodd Fiala                                                                {
2717fa03ad2eSChaoren Lin                                                                    reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2718fa03ad2eSChaoren Lin                                                                    // Pass this signal number on to the inferior to handle.
2719fa03ad2eSChaoren Lin                                                                    Resume (tid_to_resume, (signo > 0) ? signo : LLDB_INVALID_SIGNAL_NUMBER);
2720fa03ad2eSChaoren Lin                                                                },
2721fa03ad2eSChaoren Lin                                                                CoordinatorErrorHandler);
272203f12d6bSChaoren Lin                 ++resume_count;
2723af245d11STodd Fiala                 break;
2724fa03ad2eSChaoren Lin             }
2725af245d11STodd Fiala 
2726af245d11STodd Fiala             case eStateStepping:
2727af245d11STodd Fiala             {
2728ae29d395SChaoren Lin                 // Request the step.
2729ae29d395SChaoren Lin                 const int signo = action->signal;
2730ae29d395SChaoren Lin                 m_coordinator_up->RequestThreadResume (thread_sp->GetID (),
2731ae29d395SChaoren Lin                                                        [=](lldb::tid_t tid_to_step)
2732af245d11STodd Fiala                                                        {
2733ae29d395SChaoren Lin                                                            reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStepping ();
2734ae29d395SChaoren Lin                                                            auto step_result = SingleStep (tid_to_step,(signo > 0) ? signo : LLDB_INVALID_SIGNAL_NUMBER);
2735ae29d395SChaoren Lin                                                            assert (step_result && "SingleStep() failed");
2736ae29d395SChaoren Lin                                                        },
2737ae29d395SChaoren Lin                                                        CoordinatorErrorHandler);
2738ae29d395SChaoren Lin 
2739ae29d395SChaoren Lin                 // The deferred signal tid is the stepping tid.
2740ae29d395SChaoren Lin                 // This assumes there is only one stepping tid, or the last stepping tid is a fine choice.
2741ae29d395SChaoren Lin                 deferred_signal_tid = thread_sp->GetID ();
2742ae29d395SChaoren Lin                 deferred_signal_thread_sp = thread_sp;
2743ae29d395SChaoren Lin 
274403f12d6bSChaoren Lin                 // Don't send a stop request to this thread.  The thread resume request
274503f12d6bSChaoren Lin                 // above will actually run the step thread, and it will finish the step
274603f12d6bSChaoren Lin                 // by sending a SIGTRAP with the appropriate bits set.  So, the deferred
274703f12d6bSChaoren Lin                 // signal call that happens at the end of the loop below needs to let
274803f12d6bSChaoren Lin                 // the pending signal handling to *not* send a stop for this thread here
274903f12d6bSChaoren Lin                 // since the start/stop step functionality will end up with a stop state.
275003f12d6bSChaoren Lin                 // Otherwise, this stepping thread will get sent an erroneous tgkill for
275103f12d6bSChaoren Lin                 // with a SIGSTOP signal.
275203f12d6bSChaoren Lin                 deferred_signal_skip_tid = thread_sp->GetID ();
275303f12d6bSChaoren Lin 
2754ae29d395SChaoren Lin                 // And the stop signal we should apply for it is a SIGTRAP.
2755ae29d395SChaoren Lin                 deferred_signo = SIGTRAP;
2756af245d11STodd Fiala                 break;
2757ae29d395SChaoren Lin             }
2758af245d11STodd Fiala 
2759af245d11STodd Fiala             case eStateSuspended:
2760af245d11STodd Fiala             case eStateStopped:
2761ae29d395SChaoren Lin                 // if we haven't chosen a deferred signal tid yet, use this one.
2762ae29d395SChaoren Lin                 if (deferred_signal_tid == LLDB_INVALID_THREAD_ID)
2763ae29d395SChaoren Lin                 {
2764ae29d395SChaoren Lin                     deferred_signal_tid = thread_sp->GetID ();
2765ae29d395SChaoren Lin                     deferred_signal_thread_sp = thread_sp;
2766ae29d395SChaoren Lin                     deferred_signo = SIGSTOP;
2767ae29d395SChaoren Lin                 }
2768af245d11STodd Fiala                 break;
2769af245d11STodd Fiala 
2770af245d11STodd Fiala             default:
2771af245d11STodd Fiala                 return Error ("NativeProcessLinux::%s (): unexpected state %s specified for pid %" PRIu64 ", tid %" PRIu64,
2772af245d11STodd Fiala                         __FUNCTION__, StateAsCString (action->state), GetID (), thread_sp->GetID ());
2773af245d11STodd Fiala             }
2774af245d11STodd Fiala         }
2775af245d11STodd Fiala     }
2776af245d11STodd Fiala 
2777fa03ad2eSChaoren Lin     // If we had any thread stopping, then do a deferred notification of the chosen stop thread id and signal
2778fa03ad2eSChaoren Lin     // after all other running threads have stopped.
2779ae29d395SChaoren Lin     if (deferred_signal_tid != LLDB_INVALID_THREAD_ID)
2780fa03ad2eSChaoren Lin     {
278103f12d6bSChaoren Lin         CallAfterRunningThreadsStopWithSkipTID (deferred_signal_tid,
278203f12d6bSChaoren Lin                                                 deferred_signal_skip_tid,
2783fa03ad2eSChaoren Lin                                      [=](lldb::tid_t deferred_notification_tid)
2784fa03ad2eSChaoren Lin                                      {
2785ae29d395SChaoren Lin                                          // Set the signal thread to the current thread.
2786fa03ad2eSChaoren Lin                                          SetCurrentThreadID (deferred_notification_tid);
2787ae29d395SChaoren Lin 
2788ae29d395SChaoren Lin                                          // Set the thread state as stopped by the deferred signo.
2789ae29d395SChaoren Lin                                          reinterpret_cast<NativeThreadLinux*> (deferred_signal_thread_sp.get ())->SetStoppedBySignal (deferred_signo);
2790ae29d395SChaoren Lin 
2791ae29d395SChaoren Lin                                          // Tell the process delegate that the process is in a stopped state.
2792fa03ad2eSChaoren Lin                                          SetState (StateType::eStateStopped, true);
2793fa03ad2eSChaoren Lin                                      });
2794af245d11STodd Fiala     }
2795af245d11STodd Fiala 
2796af245d11STodd Fiala     return error;
2797af245d11STodd Fiala }
2798af245d11STodd Fiala 
2799af245d11STodd Fiala Error
2800af245d11STodd Fiala NativeProcessLinux::Halt ()
2801af245d11STodd Fiala {
2802af245d11STodd Fiala     Error error;
2803af245d11STodd Fiala 
2804af245d11STodd Fiala     if (kill (GetID (), SIGSTOP) != 0)
2805af245d11STodd Fiala         error.SetErrorToErrno ();
2806af245d11STodd Fiala 
2807af245d11STodd Fiala     return error;
2808af245d11STodd Fiala }
2809af245d11STodd Fiala 
2810af245d11STodd Fiala Error
2811af245d11STodd Fiala NativeProcessLinux::Detach ()
2812af245d11STodd Fiala {
2813af245d11STodd Fiala     Error error;
2814af245d11STodd Fiala 
2815af245d11STodd Fiala     // Tell ptrace to detach from the process.
2816af245d11STodd Fiala     if (GetID () != LLDB_INVALID_PROCESS_ID)
2817af245d11STodd Fiala         error = Detach (GetID ());
2818af245d11STodd Fiala 
2819af245d11STodd Fiala     // Stop monitoring the inferior.
2820af245d11STodd Fiala     StopMonitor ();
2821af245d11STodd Fiala 
2822af245d11STodd Fiala     // No error.
2823af245d11STodd Fiala     return error;
2824af245d11STodd Fiala }
2825af245d11STodd Fiala 
2826af245d11STodd Fiala Error
2827af245d11STodd Fiala NativeProcessLinux::Signal (int signo)
2828af245d11STodd Fiala {
2829af245d11STodd Fiala     Error error;
2830af245d11STodd Fiala 
2831af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2832af245d11STodd Fiala     if (log)
2833af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s: sending signal %d (%s) to pid %" PRIu64,
2834af245d11STodd Fiala                 __FUNCTION__, signo,  GetUnixSignals ().GetSignalAsCString (signo), GetID ());
2835af245d11STodd Fiala 
2836af245d11STodd Fiala     if (kill(GetID(), signo))
2837af245d11STodd Fiala         error.SetErrorToErrno();
2838af245d11STodd Fiala 
2839af245d11STodd Fiala     return error;
2840af245d11STodd Fiala }
2841af245d11STodd Fiala 
2842af245d11STodd Fiala Error
2843*e9547b80SChaoren Lin NativeProcessLinux::Interrupt ()
2844*e9547b80SChaoren Lin {
2845*e9547b80SChaoren Lin     // Pick a running thread (or if none, a not-dead stopped thread) as
2846*e9547b80SChaoren Lin     // the chosen thread that will be the stop-reason thread.
2847*e9547b80SChaoren Lin     Error error;
2848*e9547b80SChaoren Lin     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2849*e9547b80SChaoren Lin 
2850*e9547b80SChaoren Lin     NativeThreadProtocolSP running_thread_sp;
2851*e9547b80SChaoren Lin     NativeThreadProtocolSP stopped_thread_sp;
2852*e9547b80SChaoren Lin     {
2853*e9547b80SChaoren Lin         Mutex::Locker locker (m_threads_mutex);
2854*e9547b80SChaoren Lin 
2855*e9547b80SChaoren Lin         if (log)
2856*e9547b80SChaoren Lin             log->Printf ("NativeProcessLinux::%s selecting running thread for interrupt target", __FUNCTION__);
2857*e9547b80SChaoren Lin 
2858*e9547b80SChaoren Lin         for (auto thread_sp : m_threads)
2859*e9547b80SChaoren Lin         {
2860*e9547b80SChaoren Lin             // The thread shouldn't be null but lets just cover that here.
2861*e9547b80SChaoren Lin             if (!thread_sp)
2862*e9547b80SChaoren Lin                 continue;
2863*e9547b80SChaoren Lin 
2864*e9547b80SChaoren Lin             // If we have a running or stepping thread, we'll call that the
2865*e9547b80SChaoren Lin             // target of the interrupt.
2866*e9547b80SChaoren Lin             const auto thread_state = thread_sp->GetState ();
2867*e9547b80SChaoren Lin             if (thread_state == eStateRunning ||
2868*e9547b80SChaoren Lin                 thread_state == eStateStepping)
2869*e9547b80SChaoren Lin             {
2870*e9547b80SChaoren Lin                 running_thread_sp = thread_sp;
2871*e9547b80SChaoren Lin                 break;
2872*e9547b80SChaoren Lin             }
2873*e9547b80SChaoren Lin             else if (!stopped_thread_sp && StateIsStoppedState (thread_state, true))
2874*e9547b80SChaoren Lin             {
2875*e9547b80SChaoren Lin                 // Remember the first non-dead stopped thread.  We'll use that as a backup if there are no running threads.
2876*e9547b80SChaoren Lin                 stopped_thread_sp = thread_sp;
2877*e9547b80SChaoren Lin             }
2878*e9547b80SChaoren Lin         }
2879*e9547b80SChaoren Lin     }
2880*e9547b80SChaoren Lin 
2881*e9547b80SChaoren Lin     if (!running_thread_sp && !stopped_thread_sp)
2882*e9547b80SChaoren Lin     {
2883*e9547b80SChaoren Lin         error.SetErrorString ("found no running/stepping or live stopped threads as target for interrupt");
2884*e9547b80SChaoren Lin         if (log)
2885*e9547b80SChaoren Lin         {
2886*e9547b80SChaoren Lin             log->Printf ("NativeProcessLinux::%s skipping due to error: %s", __FUNCTION__, error.AsCString ());
2887*e9547b80SChaoren Lin         }
2888*e9547b80SChaoren Lin         return error;
2889*e9547b80SChaoren Lin     }
2890*e9547b80SChaoren Lin 
2891*e9547b80SChaoren Lin     NativeThreadProtocolSP deferred_signal_thread_sp = running_thread_sp ? running_thread_sp : stopped_thread_sp;
2892*e9547b80SChaoren Lin 
2893*e9547b80SChaoren Lin     if (log)
2894*e9547b80SChaoren Lin         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " %s tid %" PRIu64 " chosen for interrupt target",
2895*e9547b80SChaoren Lin                      __FUNCTION__,
2896*e9547b80SChaoren Lin                      GetID (),
2897*e9547b80SChaoren Lin                      running_thread_sp ? "running" : "stopped",
2898*e9547b80SChaoren Lin                      deferred_signal_thread_sp->GetID ());
2899*e9547b80SChaoren Lin 
2900*e9547b80SChaoren Lin     CallAfterRunningThreadsStop (deferred_signal_thread_sp->GetID (),
2901*e9547b80SChaoren Lin                                  [=](lldb::tid_t deferred_notification_tid)
2902*e9547b80SChaoren Lin                                  {
2903*e9547b80SChaoren Lin                                      // Set the signal thread to the current thread.
2904*e9547b80SChaoren Lin                                      SetCurrentThreadID (deferred_notification_tid);
2905*e9547b80SChaoren Lin 
2906*e9547b80SChaoren Lin                                      // Set the thread state as stopped by the deferred signo.
2907*e9547b80SChaoren Lin                                      reinterpret_cast<NativeThreadLinux*> (deferred_signal_thread_sp.get ())->SetStoppedBySignal (SIGSTOP);
2908*e9547b80SChaoren Lin 
2909*e9547b80SChaoren Lin                                                 // Tell the process delegate that the process is in a stopped state.
2910*e9547b80SChaoren Lin                                                 SetState (StateType::eStateStopped, true);
2911*e9547b80SChaoren Lin                                             });
2912*e9547b80SChaoren Lin     return error;
2913*e9547b80SChaoren Lin }
2914*e9547b80SChaoren Lin 
2915*e9547b80SChaoren Lin Error
2916af245d11STodd Fiala NativeProcessLinux::Kill ()
2917af245d11STodd Fiala {
2918af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2919af245d11STodd Fiala     if (log)
2920af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s called for PID %" PRIu64, __FUNCTION__, GetID ());
2921af245d11STodd Fiala 
2922af245d11STodd Fiala     Error error;
2923af245d11STodd Fiala 
2924af245d11STodd Fiala     switch (m_state)
2925af245d11STodd Fiala     {
2926af245d11STodd Fiala         case StateType::eStateInvalid:
2927af245d11STodd Fiala         case StateType::eStateExited:
2928af245d11STodd Fiala         case StateType::eStateCrashed:
2929af245d11STodd Fiala         case StateType::eStateDetached:
2930af245d11STodd Fiala         case StateType::eStateUnloaded:
2931af245d11STodd Fiala             // Nothing to do - the process is already dead.
2932af245d11STodd Fiala             if (log)
2933af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s ignored for PID %" PRIu64 " due to current state: %s", __FUNCTION__, GetID (), StateAsCString (m_state));
2934af245d11STodd Fiala             return error;
2935af245d11STodd Fiala 
2936af245d11STodd Fiala         case StateType::eStateConnected:
2937af245d11STodd Fiala         case StateType::eStateAttaching:
2938af245d11STodd Fiala         case StateType::eStateLaunching:
2939af245d11STodd Fiala         case StateType::eStateStopped:
2940af245d11STodd Fiala         case StateType::eStateRunning:
2941af245d11STodd Fiala         case StateType::eStateStepping:
2942af245d11STodd Fiala         case StateType::eStateSuspended:
2943af245d11STodd Fiala             // We can try to kill a process in these states.
2944af245d11STodd Fiala             break;
2945af245d11STodd Fiala     }
2946af245d11STodd Fiala 
2947af245d11STodd Fiala     if (kill (GetID (), SIGKILL) != 0)
2948af245d11STodd Fiala     {
2949af245d11STodd Fiala         error.SetErrorToErrno ();
2950af245d11STodd Fiala         return error;
2951af245d11STodd Fiala     }
2952af245d11STodd Fiala 
2953af245d11STodd Fiala     return error;
2954af245d11STodd Fiala }
2955af245d11STodd Fiala 
2956af245d11STodd Fiala static Error
2957af245d11STodd Fiala ParseMemoryRegionInfoFromProcMapsLine (const std::string &maps_line, MemoryRegionInfo &memory_region_info)
2958af245d11STodd Fiala {
2959af245d11STodd Fiala     memory_region_info.Clear();
2960af245d11STodd Fiala 
2961af245d11STodd Fiala     StringExtractor line_extractor (maps_line.c_str ());
2962af245d11STodd Fiala 
2963af245d11STodd Fiala     // Format: {address_start_hex}-{address_end_hex} perms offset  dev   inode   pathname
2964af245d11STodd Fiala     // perms: rwxp   (letter is present if set, '-' if not, final character is p=private, s=shared).
2965af245d11STodd Fiala 
2966af245d11STodd Fiala     // Parse out the starting address
2967af245d11STodd Fiala     lldb::addr_t start_address = line_extractor.GetHexMaxU64 (false, 0);
2968af245d11STodd Fiala 
2969af245d11STodd Fiala     // Parse out hyphen separating start and end address from range.
2970af245d11STodd Fiala     if (!line_extractor.GetBytesLeft () || (line_extractor.GetChar () != '-'))
2971af245d11STodd Fiala         return Error ("malformed /proc/{pid}/maps entry, missing dash between address range");
2972af245d11STodd Fiala 
2973af245d11STodd Fiala     // Parse out the ending address
2974af245d11STodd Fiala     lldb::addr_t end_address = line_extractor.GetHexMaxU64 (false, start_address);
2975af245d11STodd Fiala 
2976af245d11STodd Fiala     // Parse out the space after the address.
2977af245d11STodd Fiala     if (!line_extractor.GetBytesLeft () || (line_extractor.GetChar () != ' '))
2978af245d11STodd Fiala         return Error ("malformed /proc/{pid}/maps entry, missing space after range");
2979af245d11STodd Fiala 
2980af245d11STodd Fiala     // Save the range.
2981af245d11STodd Fiala     memory_region_info.GetRange ().SetRangeBase (start_address);
2982af245d11STodd Fiala     memory_region_info.GetRange ().SetRangeEnd (end_address);
2983af245d11STodd Fiala 
2984af245d11STodd Fiala     // Parse out each permission entry.
2985af245d11STodd Fiala     if (line_extractor.GetBytesLeft () < 4)
2986af245d11STodd Fiala         return Error ("malformed /proc/{pid}/maps entry, missing some portion of permissions");
2987af245d11STodd Fiala 
2988af245d11STodd Fiala     // Handle read permission.
2989af245d11STodd Fiala     const char read_perm_char = line_extractor.GetChar ();
2990af245d11STodd Fiala     if (read_perm_char == 'r')
2991af245d11STodd Fiala         memory_region_info.SetReadable (MemoryRegionInfo::OptionalBool::eYes);
2992af245d11STodd Fiala     else
2993af245d11STodd Fiala     {
2994af245d11STodd Fiala         assert ( (read_perm_char == '-') && "unexpected /proc/{pid}/maps read permission char" );
2995af245d11STodd Fiala         memory_region_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo);
2996af245d11STodd Fiala     }
2997af245d11STodd Fiala 
2998af245d11STodd Fiala     // Handle write permission.
2999af245d11STodd Fiala     const char write_perm_char = line_extractor.GetChar ();
3000af245d11STodd Fiala     if (write_perm_char == 'w')
3001af245d11STodd Fiala         memory_region_info.SetWritable (MemoryRegionInfo::OptionalBool::eYes);
3002af245d11STodd Fiala     else
3003af245d11STodd Fiala     {
3004af245d11STodd Fiala         assert ( (write_perm_char == '-') && "unexpected /proc/{pid}/maps write permission char" );
3005af245d11STodd Fiala         memory_region_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo);
3006af245d11STodd Fiala     }
3007af245d11STodd Fiala 
3008af245d11STodd Fiala     // Handle execute permission.
3009af245d11STodd Fiala     const char exec_perm_char = line_extractor.GetChar ();
3010af245d11STodd Fiala     if (exec_perm_char == 'x')
3011af245d11STodd Fiala         memory_region_info.SetExecutable (MemoryRegionInfo::OptionalBool::eYes);
3012af245d11STodd Fiala     else
3013af245d11STodd Fiala     {
3014af245d11STodd Fiala         assert ( (exec_perm_char == '-') && "unexpected /proc/{pid}/maps exec permission char" );
3015af245d11STodd Fiala         memory_region_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo);
3016af245d11STodd Fiala     }
3017af245d11STodd Fiala 
3018af245d11STodd Fiala     return Error ();
3019af245d11STodd Fiala }
3020af245d11STodd Fiala 
3021af245d11STodd Fiala Error
3022af245d11STodd Fiala NativeProcessLinux::GetMemoryRegionInfo (lldb::addr_t load_addr, MemoryRegionInfo &range_info)
3023af245d11STodd Fiala {
3024af245d11STodd Fiala     // FIXME review that the final memory region returned extends to the end of the virtual address space,
3025af245d11STodd Fiala     // with no perms if it is not mapped.
3026af245d11STodd Fiala 
3027af245d11STodd Fiala     // Use an approach that reads memory regions from /proc/{pid}/maps.
3028af245d11STodd Fiala     // Assume proc maps entries are in ascending order.
3029af245d11STodd Fiala     // FIXME assert if we find differently.
3030af245d11STodd Fiala     Mutex::Locker locker (m_mem_region_cache_mutex);
3031af245d11STodd Fiala 
3032af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3033af245d11STodd Fiala     Error error;
3034af245d11STodd Fiala 
3035af245d11STodd Fiala     if (m_supports_mem_region == LazyBool::eLazyBoolNo)
3036af245d11STodd Fiala     {
3037af245d11STodd Fiala         // We're done.
3038af245d11STodd Fiala         error.SetErrorString ("unsupported");
3039af245d11STodd Fiala         return error;
3040af245d11STodd Fiala     }
3041af245d11STodd Fiala 
3042af245d11STodd Fiala     // If our cache is empty, pull the latest.  There should always be at least one memory region
3043af245d11STodd Fiala     // if memory region handling is supported.
3044af245d11STodd Fiala     if (m_mem_region_cache.empty ())
3045af245d11STodd Fiala     {
3046af245d11STodd Fiala         error = ProcFileReader::ProcessLineByLine (GetID (), "maps",
3047af245d11STodd Fiala              [&] (const std::string &line) -> bool
3048af245d11STodd Fiala              {
3049af245d11STodd Fiala                  MemoryRegionInfo info;
3050af245d11STodd Fiala                  const Error parse_error = ParseMemoryRegionInfoFromProcMapsLine (line, info);
3051af245d11STodd Fiala                  if (parse_error.Success ())
3052af245d11STodd Fiala                  {
3053af245d11STodd Fiala                      m_mem_region_cache.push_back (info);
3054af245d11STodd Fiala                      return true;
3055af245d11STodd Fiala                  }
3056af245d11STodd Fiala                  else
3057af245d11STodd Fiala                  {
3058af245d11STodd Fiala                      if (log)
3059af245d11STodd Fiala                          log->Printf ("NativeProcessLinux::%s failed to parse proc maps line '%s': %s", __FUNCTION__, line.c_str (), error.AsCString ());
3060af245d11STodd Fiala                      return false;
3061af245d11STodd Fiala                  }
3062af245d11STodd Fiala              });
3063af245d11STodd Fiala 
3064af245d11STodd Fiala         // If we had an error, we'll mark unsupported.
3065af245d11STodd Fiala         if (error.Fail ())
3066af245d11STodd Fiala         {
3067af245d11STodd Fiala             m_supports_mem_region = LazyBool::eLazyBoolNo;
3068af245d11STodd Fiala             return error;
3069af245d11STodd Fiala         }
3070af245d11STodd Fiala         else if (m_mem_region_cache.empty ())
3071af245d11STodd Fiala         {
3072af245d11STodd Fiala             // No entries after attempting to read them.  This shouldn't happen if /proc/{pid}/maps
3073af245d11STodd Fiala             // is supported.  Assume we don't support map entries via procfs.
3074af245d11STodd Fiala             if (log)
3075af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s failed to find any procfs maps entries, assuming no support for memory region metadata retrieval", __FUNCTION__);
3076af245d11STodd Fiala             m_supports_mem_region = LazyBool::eLazyBoolNo;
3077af245d11STodd Fiala             error.SetErrorString ("not supported");
3078af245d11STodd Fiala             return error;
3079af245d11STodd Fiala         }
3080af245d11STodd Fiala 
3081af245d11STodd Fiala         if (log)
3082af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s read %" PRIu64 " memory region entries from /proc/%" PRIu64 "/maps", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ()), GetID ());
3083af245d11STodd Fiala 
3084af245d11STodd Fiala         // We support memory retrieval, remember that.
3085af245d11STodd Fiala         m_supports_mem_region = LazyBool::eLazyBoolYes;
3086af245d11STodd Fiala     }
3087af245d11STodd Fiala     else
3088af245d11STodd Fiala     {
3089af245d11STodd Fiala         if (log)
3090af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s reusing %" PRIu64 " cached memory region entries", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ()));
3091af245d11STodd Fiala     }
3092af245d11STodd Fiala 
3093af245d11STodd Fiala     lldb::addr_t prev_base_address = 0;
3094af245d11STodd Fiala 
3095af245d11STodd Fiala     // FIXME start by finding the last region that is <= target address using binary search.  Data is sorted.
3096af245d11STodd Fiala     // There can be a ton of regions on pthreads apps with lots of threads.
3097af245d11STodd Fiala     for (auto it = m_mem_region_cache.begin(); it != m_mem_region_cache.end (); ++it)
3098af245d11STodd Fiala     {
3099af245d11STodd Fiala         MemoryRegionInfo &proc_entry_info = *it;
3100af245d11STodd Fiala 
3101af245d11STodd Fiala         // Sanity check assumption that /proc/{pid}/maps entries are ascending.
3102af245d11STodd Fiala         assert ((proc_entry_info.GetRange ().GetRangeBase () >= prev_base_address) && "descending /proc/pid/maps entries detected, unexpected");
3103af245d11STodd Fiala         prev_base_address = proc_entry_info.GetRange ().GetRangeBase ();
3104af245d11STodd Fiala 
3105af245d11STodd Fiala         // If the target address comes before this entry, indicate distance to next region.
3106af245d11STodd Fiala         if (load_addr < proc_entry_info.GetRange ().GetRangeBase ())
3107af245d11STodd Fiala         {
3108af245d11STodd Fiala             range_info.GetRange ().SetRangeBase (load_addr);
3109af245d11STodd Fiala             range_info.GetRange ().SetByteSize (proc_entry_info.GetRange ().GetRangeBase () - load_addr);
3110af245d11STodd Fiala             range_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo);
3111af245d11STodd Fiala             range_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo);
3112af245d11STodd Fiala             range_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo);
3113af245d11STodd Fiala 
3114af245d11STodd Fiala             return error;
3115af245d11STodd Fiala         }
3116af245d11STodd Fiala         else if (proc_entry_info.GetRange ().Contains (load_addr))
3117af245d11STodd Fiala         {
3118af245d11STodd Fiala             // The target address is within the memory region we're processing here.
3119af245d11STodd Fiala             range_info = proc_entry_info;
3120af245d11STodd Fiala             return error;
3121af245d11STodd Fiala         }
3122af245d11STodd Fiala 
3123af245d11STodd Fiala         // The target memory address comes somewhere after the region we just parsed.
3124af245d11STodd Fiala     }
3125af245d11STodd Fiala 
3126af245d11STodd Fiala     // If we made it here, we didn't find an entry that contained the given address.
3127af245d11STodd Fiala     error.SetErrorString ("address comes after final region");
3128af245d11STodd Fiala 
3129af245d11STodd Fiala     if (log)
3130af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s failed to find map entry for address 0x%" PRIx64 ": %s", __FUNCTION__, load_addr, error.AsCString ());
3131af245d11STodd Fiala 
3132af245d11STodd Fiala     return error;
3133af245d11STodd Fiala }
3134af245d11STodd Fiala 
3135af245d11STodd Fiala void
3136af245d11STodd Fiala NativeProcessLinux::DoStopIDBumped (uint32_t newBumpId)
3137af245d11STodd Fiala {
3138af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3139af245d11STodd Fiala     if (log)
3140af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s(newBumpId=%" PRIu32 ") called", __FUNCTION__, newBumpId);
3141af245d11STodd Fiala 
3142af245d11STodd Fiala     {
3143af245d11STodd Fiala         Mutex::Locker locker (m_mem_region_cache_mutex);
3144af245d11STodd Fiala         if (log)
3145af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s clearing %" PRIu64 " entries from the cache", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ()));
3146af245d11STodd Fiala         m_mem_region_cache.clear ();
3147af245d11STodd Fiala     }
3148af245d11STodd Fiala }
3149af245d11STodd Fiala 
3150af245d11STodd Fiala Error
3151af245d11STodd Fiala NativeProcessLinux::AllocateMemory (
3152af245d11STodd Fiala     lldb::addr_t size,
3153af245d11STodd Fiala     uint32_t permissions,
3154af245d11STodd Fiala     lldb::addr_t &addr)
3155af245d11STodd Fiala {
3156af245d11STodd Fiala     // FIXME implementing this requires the equivalent of
3157af245d11STodd Fiala     // InferiorCallPOSIX::InferiorCallMmap, which depends on
3158af245d11STodd Fiala     // functional ThreadPlans working with Native*Protocol.
3159af245d11STodd Fiala #if 1
3160af245d11STodd Fiala     return Error ("not implemented yet");
3161af245d11STodd Fiala #else
3162af245d11STodd Fiala     addr = LLDB_INVALID_ADDRESS;
3163af245d11STodd Fiala 
3164af245d11STodd Fiala     unsigned prot = 0;
3165af245d11STodd Fiala     if (permissions & lldb::ePermissionsReadable)
3166af245d11STodd Fiala         prot |= eMmapProtRead;
3167af245d11STodd Fiala     if (permissions & lldb::ePermissionsWritable)
3168af245d11STodd Fiala         prot |= eMmapProtWrite;
3169af245d11STodd Fiala     if (permissions & lldb::ePermissionsExecutable)
3170af245d11STodd Fiala         prot |= eMmapProtExec;
3171af245d11STodd Fiala 
3172af245d11STodd Fiala     // TODO implement this directly in NativeProcessLinux
3173af245d11STodd Fiala     // (and lift to NativeProcessPOSIX if/when that class is
3174af245d11STodd Fiala     // refactored out).
3175af245d11STodd Fiala     if (InferiorCallMmap(this, addr, 0, size, prot,
3176af245d11STodd Fiala                          eMmapFlagsAnon | eMmapFlagsPrivate, -1, 0)) {
3177af245d11STodd Fiala         m_addr_to_mmap_size[addr] = size;
3178af245d11STodd Fiala         return Error ();
3179af245d11STodd Fiala     } else {
3180af245d11STodd Fiala         addr = LLDB_INVALID_ADDRESS;
3181af245d11STodd Fiala         return Error("unable to allocate %" PRIu64 " bytes of memory with permissions %s", size, GetPermissionsAsCString (permissions));
3182af245d11STodd Fiala     }
3183af245d11STodd Fiala #endif
3184af245d11STodd Fiala }
3185af245d11STodd Fiala 
3186af245d11STodd Fiala Error
3187af245d11STodd Fiala NativeProcessLinux::DeallocateMemory (lldb::addr_t addr)
3188af245d11STodd Fiala {
3189af245d11STodd Fiala     // FIXME see comments in AllocateMemory - required lower-level
3190af245d11STodd Fiala     // bits not in place yet (ThreadPlans)
3191af245d11STodd Fiala     return Error ("not implemented");
3192af245d11STodd Fiala }
3193af245d11STodd Fiala 
3194af245d11STodd Fiala lldb::addr_t
3195af245d11STodd Fiala NativeProcessLinux::GetSharedLibraryInfoAddress ()
3196af245d11STodd Fiala {
3197af245d11STodd Fiala #if 1
3198af245d11STodd Fiala     // punt on this for now
3199af245d11STodd Fiala     return LLDB_INVALID_ADDRESS;
3200af245d11STodd Fiala #else
3201af245d11STodd Fiala     // Return the image info address for the exe module
3202af245d11STodd Fiala #if 1
3203af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3204af245d11STodd Fiala 
3205af245d11STodd Fiala     ModuleSP module_sp;
3206af245d11STodd Fiala     Error error = GetExeModuleSP (module_sp);
3207af245d11STodd Fiala     if (error.Fail ())
3208af245d11STodd Fiala     {
3209af245d11STodd Fiala          if (log)
3210af245d11STodd Fiala             log->Warning ("NativeProcessLinux::%s failed to retrieve exe module: %s", __FUNCTION__, error.AsCString ());
3211af245d11STodd Fiala         return LLDB_INVALID_ADDRESS;
3212af245d11STodd Fiala     }
3213af245d11STodd Fiala 
3214af245d11STodd Fiala     if (module_sp == nullptr)
3215af245d11STodd Fiala     {
3216af245d11STodd Fiala          if (log)
3217af245d11STodd Fiala             log->Warning ("NativeProcessLinux::%s exe module returned was NULL", __FUNCTION__);
3218af245d11STodd Fiala          return LLDB_INVALID_ADDRESS;
3219af245d11STodd Fiala     }
3220af245d11STodd Fiala 
3221af245d11STodd Fiala     ObjectFileSP object_file_sp = module_sp->GetObjectFile ();
3222af245d11STodd Fiala     if (object_file_sp == nullptr)
3223af245d11STodd Fiala     {
3224af245d11STodd Fiala          if (log)
3225af245d11STodd Fiala             log->Warning ("NativeProcessLinux::%s exe module returned a NULL object file", __FUNCTION__);
3226af245d11STodd Fiala          return LLDB_INVALID_ADDRESS;
3227af245d11STodd Fiala     }
3228af245d11STodd Fiala 
3229af245d11STodd Fiala     return obj_file_sp->GetImageInfoAddress();
3230af245d11STodd Fiala #else
3231af245d11STodd Fiala     Target *target = &GetTarget();
3232af245d11STodd Fiala     ObjectFile *obj_file = target->GetExecutableModule()->GetObjectFile();
3233af245d11STodd Fiala     Address addr = obj_file->GetImageInfoAddress(target);
3234af245d11STodd Fiala 
3235af245d11STodd Fiala     if (addr.IsValid())
3236af245d11STodd Fiala         return addr.GetLoadAddress(target);
3237af245d11STodd Fiala     return LLDB_INVALID_ADDRESS;
3238af245d11STodd Fiala #endif
3239af245d11STodd Fiala #endif // punt on this for now
3240af245d11STodd Fiala }
3241af245d11STodd Fiala 
3242af245d11STodd Fiala size_t
3243af245d11STodd Fiala NativeProcessLinux::UpdateThreads ()
3244af245d11STodd Fiala {
3245af245d11STodd Fiala     // The NativeProcessLinux monitoring threads are always up to date
3246af245d11STodd Fiala     // with respect to thread state and they keep the thread list
3247af245d11STodd Fiala     // populated properly. All this method needs to do is return the
3248af245d11STodd Fiala     // thread count.
3249af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3250af245d11STodd Fiala     return m_threads.size ();
3251af245d11STodd Fiala }
3252af245d11STodd Fiala 
3253af245d11STodd Fiala bool
3254af245d11STodd Fiala NativeProcessLinux::GetArchitecture (ArchSpec &arch) const
3255af245d11STodd Fiala {
3256af245d11STodd Fiala     arch = m_arch;
3257af245d11STodd Fiala     return true;
3258af245d11STodd Fiala }
3259af245d11STodd Fiala 
3260af245d11STodd Fiala Error
3261af245d11STodd Fiala NativeProcessLinux::GetSoftwareBreakpointSize (NativeRegisterContextSP context_sp, uint32_t &actual_opcode_size)
3262af245d11STodd Fiala {
3263af245d11STodd Fiala     // FIXME put this behind a breakpoint protocol class that can be
3264af245d11STodd Fiala     // set per architecture.  Need ARM, MIPS support here.
32652afc5966STodd Fiala     static const uint8_t g_aarch64_opcode[] = { 0x00, 0x00, 0x20, 0xd4 };
3266af245d11STodd Fiala     static const uint8_t g_i386_opcode [] = { 0xCC };
3267af245d11STodd Fiala 
3268af245d11STodd Fiala     switch (m_arch.GetMachine ())
3269af245d11STodd Fiala     {
32702afc5966STodd Fiala         case llvm::Triple::aarch64:
32712afc5966STodd Fiala             actual_opcode_size = static_cast<uint32_t> (sizeof(g_aarch64_opcode));
32722afc5966STodd Fiala             return Error ();
32732afc5966STodd Fiala 
3274af245d11STodd Fiala         case llvm::Triple::x86:
3275af245d11STodd Fiala         case llvm::Triple::x86_64:
3276af245d11STodd Fiala             actual_opcode_size = static_cast<uint32_t> (sizeof(g_i386_opcode));
3277af245d11STodd Fiala             return Error ();
3278af245d11STodd Fiala 
3279af245d11STodd Fiala         default:
3280af245d11STodd Fiala             assert(false && "CPU type not supported!");
3281af245d11STodd Fiala             return Error ("CPU type not supported");
3282af245d11STodd Fiala     }
3283af245d11STodd Fiala }
3284af245d11STodd Fiala 
3285af245d11STodd Fiala Error
3286af245d11STodd Fiala NativeProcessLinux::SetBreakpoint (lldb::addr_t addr, uint32_t size, bool hardware)
3287af245d11STodd Fiala {
3288af245d11STodd Fiala     if (hardware)
3289af245d11STodd Fiala         return Error ("NativeProcessLinux does not support hardware breakpoints");
3290af245d11STodd Fiala     else
3291af245d11STodd Fiala         return SetSoftwareBreakpoint (addr, size);
3292af245d11STodd Fiala }
3293af245d11STodd Fiala 
3294af245d11STodd Fiala Error
3295af245d11STodd Fiala NativeProcessLinux::GetSoftwareBreakpointTrapOpcode (size_t trap_opcode_size_hint, size_t &actual_opcode_size, const uint8_t *&trap_opcode_bytes)
3296af245d11STodd Fiala {
3297af245d11STodd Fiala     // FIXME put this behind a breakpoint protocol class that can be
3298af245d11STodd Fiala     // set per architecture.  Need ARM, MIPS support here.
32992afc5966STodd Fiala     static const uint8_t g_aarch64_opcode[] = { 0x00, 0x00, 0x20, 0xd4 };
3300af245d11STodd Fiala     static const uint8_t g_i386_opcode [] = { 0xCC };
3301af245d11STodd Fiala 
3302af245d11STodd Fiala     switch (m_arch.GetMachine ())
3303af245d11STodd Fiala     {
33042afc5966STodd Fiala     case llvm::Triple::aarch64:
33052afc5966STodd Fiala         trap_opcode_bytes = g_aarch64_opcode;
33062afc5966STodd Fiala         actual_opcode_size = sizeof(g_aarch64_opcode);
33072afc5966STodd Fiala         return Error ();
33082afc5966STodd Fiala 
3309af245d11STodd Fiala     case llvm::Triple::x86:
3310af245d11STodd Fiala     case llvm::Triple::x86_64:
3311af245d11STodd Fiala         trap_opcode_bytes = g_i386_opcode;
3312af245d11STodd Fiala         actual_opcode_size = sizeof(g_i386_opcode);
3313af245d11STodd Fiala         return Error ();
3314af245d11STodd Fiala 
3315af245d11STodd Fiala     default:
3316af245d11STodd Fiala         assert(false && "CPU type not supported!");
3317af245d11STodd Fiala         return Error ("CPU type not supported");
3318af245d11STodd Fiala     }
3319af245d11STodd Fiala }
3320af245d11STodd Fiala 
3321af245d11STodd Fiala #if 0
3322af245d11STodd Fiala ProcessMessage::CrashReason
3323af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGSEGV(const siginfo_t *info)
3324af245d11STodd Fiala {
3325af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3326af245d11STodd Fiala     assert(info->si_signo == SIGSEGV);
3327af245d11STodd Fiala 
3328af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3329af245d11STodd Fiala 
3330af245d11STodd Fiala     switch (info->si_code)
3331af245d11STodd Fiala     {
3332af245d11STodd Fiala     default:
3333af245d11STodd Fiala         assert(false && "unexpected si_code for SIGSEGV");
3334af245d11STodd Fiala         break;
3335af245d11STodd Fiala     case SI_KERNEL:
3336af245d11STodd Fiala         // Linux will occasionally send spurious SI_KERNEL codes.
3337af245d11STodd Fiala         // (this is poorly documented in sigaction)
3338af245d11STodd Fiala         // One way to get this is via unaligned SIMD loads.
3339af245d11STodd Fiala         reason = ProcessMessage::eInvalidAddress; // for lack of anything better
3340af245d11STodd Fiala         break;
3341af245d11STodd Fiala     case SEGV_MAPERR:
3342af245d11STodd Fiala         reason = ProcessMessage::eInvalidAddress;
3343af245d11STodd Fiala         break;
3344af245d11STodd Fiala     case SEGV_ACCERR:
3345af245d11STodd Fiala         reason = ProcessMessage::ePrivilegedAddress;
3346af245d11STodd Fiala         break;
3347af245d11STodd Fiala     }
3348af245d11STodd Fiala 
3349af245d11STodd Fiala     return reason;
3350af245d11STodd Fiala }
3351af245d11STodd Fiala #endif
3352af245d11STodd Fiala 
3353af245d11STodd Fiala 
3354af245d11STodd Fiala #if 0
3355af245d11STodd Fiala ProcessMessage::CrashReason
3356af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGILL(const siginfo_t *info)
3357af245d11STodd Fiala {
3358af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3359af245d11STodd Fiala     assert(info->si_signo == SIGILL);
3360af245d11STodd Fiala 
3361af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3362af245d11STodd Fiala 
3363af245d11STodd Fiala     switch (info->si_code)
3364af245d11STodd Fiala     {
3365af245d11STodd Fiala     default:
3366af245d11STodd Fiala         assert(false && "unexpected si_code for SIGILL");
3367af245d11STodd Fiala         break;
3368af245d11STodd Fiala     case ILL_ILLOPC:
3369af245d11STodd Fiala         reason = ProcessMessage::eIllegalOpcode;
3370af245d11STodd Fiala         break;
3371af245d11STodd Fiala     case ILL_ILLOPN:
3372af245d11STodd Fiala         reason = ProcessMessage::eIllegalOperand;
3373af245d11STodd Fiala         break;
3374af245d11STodd Fiala     case ILL_ILLADR:
3375af245d11STodd Fiala         reason = ProcessMessage::eIllegalAddressingMode;
3376af245d11STodd Fiala         break;
3377af245d11STodd Fiala     case ILL_ILLTRP:
3378af245d11STodd Fiala         reason = ProcessMessage::eIllegalTrap;
3379af245d11STodd Fiala         break;
3380af245d11STodd Fiala     case ILL_PRVOPC:
3381af245d11STodd Fiala         reason = ProcessMessage::ePrivilegedOpcode;
3382af245d11STodd Fiala         break;
3383af245d11STodd Fiala     case ILL_PRVREG:
3384af245d11STodd Fiala         reason = ProcessMessage::ePrivilegedRegister;
3385af245d11STodd Fiala         break;
3386af245d11STodd Fiala     case ILL_COPROC:
3387af245d11STodd Fiala         reason = ProcessMessage::eCoprocessorError;
3388af245d11STodd Fiala         break;
3389af245d11STodd Fiala     case ILL_BADSTK:
3390af245d11STodd Fiala         reason = ProcessMessage::eInternalStackError;
3391af245d11STodd Fiala         break;
3392af245d11STodd Fiala     }
3393af245d11STodd Fiala 
3394af245d11STodd Fiala     return reason;
3395af245d11STodd Fiala }
3396af245d11STodd Fiala #endif
3397af245d11STodd Fiala 
3398af245d11STodd Fiala #if 0
3399af245d11STodd Fiala ProcessMessage::CrashReason
3400af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGFPE(const siginfo_t *info)
3401af245d11STodd Fiala {
3402af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3403af245d11STodd Fiala     assert(info->si_signo == SIGFPE);
3404af245d11STodd Fiala 
3405af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3406af245d11STodd Fiala 
3407af245d11STodd Fiala     switch (info->si_code)
3408af245d11STodd Fiala     {
3409af245d11STodd Fiala     default:
3410af245d11STodd Fiala         assert(false && "unexpected si_code for SIGFPE");
3411af245d11STodd Fiala         break;
3412af245d11STodd Fiala     case FPE_INTDIV:
3413af245d11STodd Fiala         reason = ProcessMessage::eIntegerDivideByZero;
3414af245d11STodd Fiala         break;
3415af245d11STodd Fiala     case FPE_INTOVF:
3416af245d11STodd Fiala         reason = ProcessMessage::eIntegerOverflow;
3417af245d11STodd Fiala         break;
3418af245d11STodd Fiala     case FPE_FLTDIV:
3419af245d11STodd Fiala         reason = ProcessMessage::eFloatDivideByZero;
3420af245d11STodd Fiala         break;
3421af245d11STodd Fiala     case FPE_FLTOVF:
3422af245d11STodd Fiala         reason = ProcessMessage::eFloatOverflow;
3423af245d11STodd Fiala         break;
3424af245d11STodd Fiala     case FPE_FLTUND:
3425af245d11STodd Fiala         reason = ProcessMessage::eFloatUnderflow;
3426af245d11STodd Fiala         break;
3427af245d11STodd Fiala     case FPE_FLTRES:
3428af245d11STodd Fiala         reason = ProcessMessage::eFloatInexactResult;
3429af245d11STodd Fiala         break;
3430af245d11STodd Fiala     case FPE_FLTINV:
3431af245d11STodd Fiala         reason = ProcessMessage::eFloatInvalidOperation;
3432af245d11STodd Fiala         break;
3433af245d11STodd Fiala     case FPE_FLTSUB:
3434af245d11STodd Fiala         reason = ProcessMessage::eFloatSubscriptRange;
3435af245d11STodd Fiala         break;
3436af245d11STodd Fiala     }
3437af245d11STodd Fiala 
3438af245d11STodd Fiala     return reason;
3439af245d11STodd Fiala }
3440af245d11STodd Fiala #endif
3441af245d11STodd Fiala 
3442af245d11STodd Fiala #if 0
3443af245d11STodd Fiala ProcessMessage::CrashReason
3444af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGBUS(const siginfo_t *info)
3445af245d11STodd Fiala {
3446af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3447af245d11STodd Fiala     assert(info->si_signo == SIGBUS);
3448af245d11STodd Fiala 
3449af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3450af245d11STodd Fiala 
3451af245d11STodd Fiala     switch (info->si_code)
3452af245d11STodd Fiala     {
3453af245d11STodd Fiala     default:
3454af245d11STodd Fiala         assert(false && "unexpected si_code for SIGBUS");
3455af245d11STodd Fiala         break;
3456af245d11STodd Fiala     case BUS_ADRALN:
3457af245d11STodd Fiala         reason = ProcessMessage::eIllegalAlignment;
3458af245d11STodd Fiala         break;
3459af245d11STodd Fiala     case BUS_ADRERR:
3460af245d11STodd Fiala         reason = ProcessMessage::eIllegalAddress;
3461af245d11STodd Fiala         break;
3462af245d11STodd Fiala     case BUS_OBJERR:
3463af245d11STodd Fiala         reason = ProcessMessage::eHardwareError;
3464af245d11STodd Fiala         break;
3465af245d11STodd Fiala     }
3466af245d11STodd Fiala 
3467af245d11STodd Fiala     return reason;
3468af245d11STodd Fiala }
3469af245d11STodd Fiala #endif
3470af245d11STodd Fiala 
3471af245d11STodd Fiala void
3472af245d11STodd Fiala NativeProcessLinux::ServeOperation(OperationArgs *args)
3473af245d11STodd Fiala {
3474af245d11STodd Fiala     NativeProcessLinux *monitor = args->m_monitor;
3475af245d11STodd Fiala 
3476af245d11STodd Fiala     // We are finised with the arguments and are ready to go.  Sync with the
3477af245d11STodd Fiala     // parent thread and start serving operations on the inferior.
3478af245d11STodd Fiala     sem_post(&args->m_semaphore);
3479af245d11STodd Fiala 
3480af245d11STodd Fiala     for(;;)
3481af245d11STodd Fiala     {
3482af245d11STodd Fiala         // wait for next pending operation
3483af245d11STodd Fiala         if (sem_wait(&monitor->m_operation_pending))
3484af245d11STodd Fiala         {
3485af245d11STodd Fiala             if (errno == EINTR)
3486af245d11STodd Fiala                 continue;
3487af245d11STodd Fiala             assert(false && "Unexpected errno from sem_wait");
3488af245d11STodd Fiala         }
3489af245d11STodd Fiala 
3490af245d11STodd Fiala         reinterpret_cast<Operation*>(monitor->m_operation)->Execute(monitor);
3491af245d11STodd Fiala 
3492af245d11STodd Fiala         // notify calling thread that operation is complete
3493af245d11STodd Fiala         sem_post(&monitor->m_operation_done);
3494af245d11STodd Fiala     }
3495af245d11STodd Fiala }
3496af245d11STodd Fiala 
3497af245d11STodd Fiala void
3498af245d11STodd Fiala NativeProcessLinux::DoOperation(void *op)
3499af245d11STodd Fiala {
3500af245d11STodd Fiala     Mutex::Locker lock(m_operation_mutex);
3501af245d11STodd Fiala 
3502af245d11STodd Fiala     m_operation = op;
3503af245d11STodd Fiala 
3504af245d11STodd Fiala     // notify operation thread that an operation is ready to be processed
3505af245d11STodd Fiala     sem_post(&m_operation_pending);
3506af245d11STodd Fiala 
3507af245d11STodd Fiala     // wait for operation to complete
3508af245d11STodd Fiala     while (sem_wait(&m_operation_done))
3509af245d11STodd Fiala     {
3510af245d11STodd Fiala         if (errno == EINTR)
3511af245d11STodd Fiala             continue;
3512af245d11STodd Fiala         assert(false && "Unexpected errno from sem_wait");
3513af245d11STodd Fiala     }
3514af245d11STodd Fiala }
3515af245d11STodd Fiala 
3516af245d11STodd Fiala Error
3517af245d11STodd Fiala NativeProcessLinux::ReadMemory (lldb::addr_t addr, void *buf, lldb::addr_t size, lldb::addr_t &bytes_read)
3518af245d11STodd Fiala {
3519af245d11STodd Fiala     ReadOperation op(addr, buf, size, bytes_read);
3520af245d11STodd Fiala     DoOperation(&op);
3521af245d11STodd Fiala     return op.GetError ();
3522af245d11STodd Fiala }
3523af245d11STodd Fiala 
3524af245d11STodd Fiala Error
3525af245d11STodd Fiala NativeProcessLinux::WriteMemory (lldb::addr_t addr, const void *buf, lldb::addr_t size, lldb::addr_t &bytes_written)
3526af245d11STodd Fiala {
3527af245d11STodd Fiala     WriteOperation op(addr, buf, size, bytes_written);
3528af245d11STodd Fiala     DoOperation(&op);
3529af245d11STodd Fiala     return op.GetError ();
3530af245d11STodd Fiala }
3531af245d11STodd Fiala 
3532af245d11STodd Fiala bool
3533af245d11STodd Fiala NativeProcessLinux::ReadRegisterValue(lldb::tid_t tid, uint32_t offset, const char* reg_name,
3534af245d11STodd Fiala                                   uint32_t size, RegisterValue &value)
3535af245d11STodd Fiala {
3536af245d11STodd Fiala     bool result;
3537af245d11STodd Fiala     ReadRegOperation op(tid, offset, reg_name, value, result);
3538af245d11STodd Fiala     DoOperation(&op);
3539af245d11STodd Fiala     return result;
3540af245d11STodd Fiala }
3541af245d11STodd Fiala 
3542af245d11STodd Fiala bool
3543af245d11STodd Fiala NativeProcessLinux::WriteRegisterValue(lldb::tid_t tid, unsigned offset,
3544af245d11STodd Fiala                                    const char* reg_name, const RegisterValue &value)
3545af245d11STodd Fiala {
3546af245d11STodd Fiala     bool result;
3547af245d11STodd Fiala     WriteRegOperation op(tid, offset, reg_name, value, result);
3548af245d11STodd Fiala     DoOperation(&op);
3549af245d11STodd Fiala     return result;
3550af245d11STodd Fiala }
3551af245d11STodd Fiala 
3552af245d11STodd Fiala bool
3553af245d11STodd Fiala NativeProcessLinux::ReadGPR(lldb::tid_t tid, void *buf, size_t buf_size)
3554af245d11STodd Fiala {
3555af245d11STodd Fiala     bool result;
3556af245d11STodd Fiala     ReadGPROperation op(tid, buf, buf_size, result);
3557af245d11STodd Fiala     DoOperation(&op);
3558af245d11STodd Fiala     return result;
3559af245d11STodd Fiala }
3560af245d11STodd Fiala 
3561af245d11STodd Fiala bool
3562af245d11STodd Fiala NativeProcessLinux::ReadFPR(lldb::tid_t tid, void *buf, size_t buf_size)
3563af245d11STodd Fiala {
3564af245d11STodd Fiala     bool result;
3565af245d11STodd Fiala     ReadFPROperation op(tid, buf, buf_size, result);
3566af245d11STodd Fiala     DoOperation(&op);
3567af245d11STodd Fiala     return result;
3568af245d11STodd Fiala }
3569af245d11STodd Fiala 
3570af245d11STodd Fiala bool
3571af245d11STodd Fiala NativeProcessLinux::ReadRegisterSet(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset)
3572af245d11STodd Fiala {
3573af245d11STodd Fiala     bool result;
3574af245d11STodd Fiala     ReadRegisterSetOperation op(tid, buf, buf_size, regset, result);
3575af245d11STodd Fiala     DoOperation(&op);
3576af245d11STodd Fiala     return result;
3577af245d11STodd Fiala }
3578af245d11STodd Fiala 
3579af245d11STodd Fiala bool
3580af245d11STodd Fiala NativeProcessLinux::WriteGPR(lldb::tid_t tid, void *buf, size_t buf_size)
3581af245d11STodd Fiala {
3582af245d11STodd Fiala     bool result;
3583af245d11STodd Fiala     WriteGPROperation op(tid, buf, buf_size, result);
3584af245d11STodd Fiala     DoOperation(&op);
3585af245d11STodd Fiala     return result;
3586af245d11STodd Fiala }
3587af245d11STodd Fiala 
3588af245d11STodd Fiala bool
3589af245d11STodd Fiala NativeProcessLinux::WriteFPR(lldb::tid_t tid, void *buf, size_t buf_size)
3590af245d11STodd Fiala {
3591af245d11STodd Fiala     bool result;
3592af245d11STodd Fiala     WriteFPROperation op(tid, buf, buf_size, result);
3593af245d11STodd Fiala     DoOperation(&op);
3594af245d11STodd Fiala     return result;
3595af245d11STodd Fiala }
3596af245d11STodd Fiala 
3597af245d11STodd Fiala bool
3598af245d11STodd Fiala NativeProcessLinux::WriteRegisterSet(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset)
3599af245d11STodd Fiala {
3600af245d11STodd Fiala     bool result;
3601af245d11STodd Fiala     WriteRegisterSetOperation op(tid, buf, buf_size, regset, result);
3602af245d11STodd Fiala     DoOperation(&op);
3603af245d11STodd Fiala     return result;
3604af245d11STodd Fiala }
3605af245d11STodd Fiala 
3606af245d11STodd Fiala bool
3607af245d11STodd Fiala NativeProcessLinux::Resume (lldb::tid_t tid, uint32_t signo)
3608af245d11STodd Fiala {
3609af245d11STodd Fiala     bool result;
3610af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3611af245d11STodd Fiala 
3612af245d11STodd Fiala     if (log)
3613af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() resuming thread = %"  PRIu64 " with signal %s", __FUNCTION__, tid,
3614af245d11STodd Fiala                                  GetUnixSignals().GetSignalAsCString (signo));
3615af245d11STodd Fiala     ResumeOperation op (tid, signo, result);
3616af245d11STodd Fiala     DoOperation (&op);
3617af245d11STodd Fiala     if (log)
3618af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() resuming result = %s", __FUNCTION__, result ? "true" : "false");
3619af245d11STodd Fiala     return result;
3620af245d11STodd Fiala }
3621af245d11STodd Fiala 
3622af245d11STodd Fiala bool
3623af245d11STodd Fiala NativeProcessLinux::SingleStep(lldb::tid_t tid, uint32_t signo)
3624af245d11STodd Fiala {
3625af245d11STodd Fiala     bool result;
3626af245d11STodd Fiala     SingleStepOperation op(tid, signo, result);
3627af245d11STodd Fiala     DoOperation(&op);
3628af245d11STodd Fiala     return result;
3629af245d11STodd Fiala }
3630af245d11STodd Fiala 
3631af245d11STodd Fiala bool
3632af245d11STodd Fiala NativeProcessLinux::GetSignalInfo(lldb::tid_t tid, void *siginfo, int &ptrace_err)
3633af245d11STodd Fiala {
3634af245d11STodd Fiala     bool result;
3635af245d11STodd Fiala     SiginfoOperation op(tid, siginfo, result, ptrace_err);
3636af245d11STodd Fiala     DoOperation(&op);
3637af245d11STodd Fiala     return result;
3638af245d11STodd Fiala }
3639af245d11STodd Fiala 
3640af245d11STodd Fiala bool
3641af245d11STodd Fiala NativeProcessLinux::GetEventMessage(lldb::tid_t tid, unsigned long *message)
3642af245d11STodd Fiala {
3643af245d11STodd Fiala     bool result;
3644af245d11STodd Fiala     EventMessageOperation op(tid, message, result);
3645af245d11STodd Fiala     DoOperation(&op);
3646af245d11STodd Fiala     return result;
3647af245d11STodd Fiala }
3648af245d11STodd Fiala 
3649af245d11STodd Fiala lldb_private::Error
3650af245d11STodd Fiala NativeProcessLinux::Detach(lldb::tid_t tid)
3651af245d11STodd Fiala {
3652af245d11STodd Fiala     lldb_private::Error error;
3653af245d11STodd Fiala     if (tid != LLDB_INVALID_THREAD_ID)
3654af245d11STodd Fiala     {
3655af245d11STodd Fiala         DetachOperation op(tid, error);
3656af245d11STodd Fiala         DoOperation(&op);
3657af245d11STodd Fiala     }
3658af245d11STodd Fiala     return error;
3659af245d11STodd Fiala }
3660af245d11STodd Fiala 
3661af245d11STodd Fiala bool
3662af245d11STodd Fiala NativeProcessLinux::DupDescriptor(const char *path, int fd, int flags)
3663af245d11STodd Fiala {
3664af245d11STodd Fiala     int target_fd = open(path, flags, 0666);
3665af245d11STodd Fiala 
3666af245d11STodd Fiala     if (target_fd == -1)
3667af245d11STodd Fiala         return false;
3668af245d11STodd Fiala 
3669af245d11STodd Fiala     return (dup2(target_fd, fd) == -1) ? false : true;
3670af245d11STodd Fiala }
3671af245d11STodd Fiala 
3672af245d11STodd Fiala void
3673af245d11STodd Fiala NativeProcessLinux::StopMonitoringChildProcess()
3674af245d11STodd Fiala {
3675acee96aeSZachary Turner     if (m_monitor_thread.IsJoinable())
3676af245d11STodd Fiala     {
367739de3110SZachary Turner         m_monitor_thread.Cancel();
367839de3110SZachary Turner         m_monitor_thread.Join(nullptr);
3679af245d11STodd Fiala     }
3680af245d11STodd Fiala }
3681af245d11STodd Fiala 
3682af245d11STodd Fiala void
3683af245d11STodd Fiala NativeProcessLinux::StopMonitor()
3684af245d11STodd Fiala {
3685af245d11STodd Fiala     StopMonitoringChildProcess();
3686af245d11STodd Fiala     StopOpThread();
3687fa03ad2eSChaoren Lin     StopCoordinatorThread ();
3688af245d11STodd Fiala     sem_destroy(&m_operation_pending);
3689af245d11STodd Fiala     sem_destroy(&m_operation_done);
3690af245d11STodd Fiala 
3691af245d11STodd Fiala     // TODO: validate whether this still holds, fix up comment.
3692af245d11STodd Fiala     // Note: ProcessPOSIX passes the m_terminal_fd file descriptor to
3693af245d11STodd Fiala     // Process::SetSTDIOFileDescriptor, which in turn transfers ownership of
3694af245d11STodd Fiala     // the descriptor to a ConnectionFileDescriptor object.  Consequently
3695af245d11STodd Fiala     // even though still has the file descriptor, we shouldn't close it here.
3696af245d11STodd Fiala }
3697af245d11STodd Fiala 
3698af245d11STodd Fiala void
3699af245d11STodd Fiala NativeProcessLinux::StopOpThread()
3700af245d11STodd Fiala {
3701acee96aeSZachary Turner     if (!m_operation_thread.IsJoinable())
3702af245d11STodd Fiala         return;
3703af245d11STodd Fiala 
370439de3110SZachary Turner     m_operation_thread.Cancel();
370539de3110SZachary Turner     m_operation_thread.Join(nullptr);
3706af245d11STodd Fiala }
3707af245d11STodd Fiala 
3708fa03ad2eSChaoren Lin Error
3709fa03ad2eSChaoren Lin NativeProcessLinux::StartCoordinatorThread ()
3710fa03ad2eSChaoren Lin {
3711fa03ad2eSChaoren Lin     Error error;
3712fa03ad2eSChaoren Lin     static const char *g_thread_name = "lldb.process.linux.ts_coordinator";
3713fa03ad2eSChaoren Lin     Log *const log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3714fa03ad2eSChaoren Lin 
3715fa03ad2eSChaoren Lin     // Skip if thread is already running
3716fa03ad2eSChaoren Lin     if (m_coordinator_thread.IsJoinable())
3717fa03ad2eSChaoren Lin     {
3718fa03ad2eSChaoren Lin         error.SetErrorString ("ThreadStateCoordinator's run loop is already running");
3719fa03ad2eSChaoren Lin         if (log)
3720fa03ad2eSChaoren Lin             log->Printf ("NativeProcessLinux::%s %s", __FUNCTION__, error.AsCString ());
3721fa03ad2eSChaoren Lin         return error;
3722fa03ad2eSChaoren Lin     }
3723fa03ad2eSChaoren Lin 
3724fa03ad2eSChaoren Lin     // Enable verbose logging if lldb thread logging is enabled.
3725fa03ad2eSChaoren Lin     m_coordinator_up->LogEnableEventProcessing (log != nullptr);
3726fa03ad2eSChaoren Lin 
3727fa03ad2eSChaoren Lin     if (log)
3728fa03ad2eSChaoren Lin         log->Printf ("NativeProcessLinux::%s launching ThreadStateCoordinator thread for pid %" PRIu64, __FUNCTION__, GetID ());
3729fa03ad2eSChaoren Lin     m_coordinator_thread = ThreadLauncher::LaunchThread(g_thread_name, CoordinatorThread, this, &error);
3730fa03ad2eSChaoren Lin     return error;
3731fa03ad2eSChaoren Lin }
3732fa03ad2eSChaoren Lin 
3733fa03ad2eSChaoren Lin void *
3734fa03ad2eSChaoren Lin NativeProcessLinux::CoordinatorThread (void *arg)
3735fa03ad2eSChaoren Lin {
3736fa03ad2eSChaoren Lin     Log *const log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3737fa03ad2eSChaoren Lin 
3738fa03ad2eSChaoren Lin     NativeProcessLinux *const process = static_cast<NativeProcessLinux*> (arg);
3739fa03ad2eSChaoren Lin     assert (process && "null process passed to CoordinatorThread");
3740fa03ad2eSChaoren Lin     if (!process)
3741fa03ad2eSChaoren Lin     {
3742fa03ad2eSChaoren Lin         if (log)
3743fa03ad2eSChaoren Lin             log->Printf ("NativeProcessLinux::%s null process, exiting ThreadStateCoordinator processing loop", __FUNCTION__);
3744fa03ad2eSChaoren Lin         return nullptr;
3745fa03ad2eSChaoren Lin     }
3746fa03ad2eSChaoren Lin 
3747fa03ad2eSChaoren Lin     // Run the thread state coordinator loop until it is done.  This call uses
3748fa03ad2eSChaoren Lin     // efficient waiting for an event to be ready.
3749fa03ad2eSChaoren Lin     while (process->m_coordinator_up->ProcessNextEvent () == ThreadStateCoordinator::eventLoopResultContinue)
3750fa03ad2eSChaoren Lin     {
3751fa03ad2eSChaoren Lin     }
3752fa03ad2eSChaoren Lin 
3753fa03ad2eSChaoren Lin     if (log)
3754fa03ad2eSChaoren Lin         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " exiting ThreadStateCoordinator processing loop due to coordinator indicating completion", __FUNCTION__, process->GetID ());
3755fa03ad2eSChaoren Lin 
3756fa03ad2eSChaoren Lin     return nullptr;
3757fa03ad2eSChaoren Lin }
3758fa03ad2eSChaoren Lin 
3759fa03ad2eSChaoren Lin void
3760fa03ad2eSChaoren Lin NativeProcessLinux::StopCoordinatorThread()
3761fa03ad2eSChaoren Lin {
3762fa03ad2eSChaoren Lin     Log *const log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3763fa03ad2eSChaoren Lin     if (log)
3764fa03ad2eSChaoren Lin         log->Printf ("NativeProcessLinux::%s requesting ThreadStateCoordinator stop for pid %" PRIu64, __FUNCTION__, GetID ());
3765fa03ad2eSChaoren Lin 
3766fa03ad2eSChaoren Lin     // Tell the coordinator we're done.  This will cause the coordinator
3767fa03ad2eSChaoren Lin     // run loop thread to exit when the processing queue hits this message.
3768fa03ad2eSChaoren Lin     m_coordinator_up->StopCoordinator ();
3769fa03ad2eSChaoren Lin }
3770fa03ad2eSChaoren Lin 
3771af245d11STodd Fiala bool
3772af245d11STodd Fiala NativeProcessLinux::HasThreadNoLock (lldb::tid_t thread_id)
3773af245d11STodd Fiala {
3774af245d11STodd Fiala     for (auto thread_sp : m_threads)
3775af245d11STodd Fiala     {
3776af245d11STodd Fiala         assert (thread_sp && "thread list should not contain NULL threads");
3777af245d11STodd Fiala         if (thread_sp->GetID () == thread_id)
3778af245d11STodd Fiala         {
3779af245d11STodd Fiala             // We have this thread.
3780af245d11STodd Fiala             return true;
3781af245d11STodd Fiala         }
3782af245d11STodd Fiala     }
3783af245d11STodd Fiala 
3784af245d11STodd Fiala     // We don't have this thread.
3785af245d11STodd Fiala     return false;
3786af245d11STodd Fiala }
3787af245d11STodd Fiala 
3788af245d11STodd Fiala NativeThreadProtocolSP
3789af245d11STodd Fiala NativeProcessLinux::MaybeGetThreadNoLock (lldb::tid_t thread_id)
3790af245d11STodd Fiala {
3791af245d11STodd Fiala     // CONSIDER organize threads by map - we can do better than linear.
3792af245d11STodd Fiala     for (auto thread_sp : m_threads)
3793af245d11STodd Fiala     {
3794af245d11STodd Fiala         if (thread_sp->GetID () == thread_id)
3795af245d11STodd Fiala             return thread_sp;
3796af245d11STodd Fiala     }
3797af245d11STodd Fiala 
3798af245d11STodd Fiala     // We don't have this thread.
3799af245d11STodd Fiala     return NativeThreadProtocolSP ();
3800af245d11STodd Fiala }
3801af245d11STodd Fiala 
3802af245d11STodd Fiala bool
3803af245d11STodd Fiala NativeProcessLinux::StopTrackingThread (lldb::tid_t thread_id)
3804af245d11STodd Fiala {
3805af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3806af245d11STodd Fiala     for (auto it = m_threads.begin (); it != m_threads.end (); ++it)
3807af245d11STodd Fiala     {
3808af245d11STodd Fiala         if (*it && ((*it)->GetID () == thread_id))
3809af245d11STodd Fiala         {
3810af245d11STodd Fiala             m_threads.erase (it);
3811af245d11STodd Fiala             return true;
3812af245d11STodd Fiala         }
3813af245d11STodd Fiala     }
3814af245d11STodd Fiala 
3815af245d11STodd Fiala     // Didn't find it.
3816af245d11STodd Fiala     return false;
3817af245d11STodd Fiala }
3818af245d11STodd Fiala 
3819af245d11STodd Fiala NativeThreadProtocolSP
3820af245d11STodd Fiala NativeProcessLinux::AddThread (lldb::tid_t thread_id)
3821af245d11STodd Fiala {
3822af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3823af245d11STodd Fiala 
3824af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3825af245d11STodd Fiala 
3826af245d11STodd Fiala     if (log)
3827af245d11STodd Fiala     {
3828af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " adding thread with tid %" PRIu64,
3829af245d11STodd Fiala                 __FUNCTION__,
3830af245d11STodd Fiala                 GetID (),
3831af245d11STodd Fiala                 thread_id);
3832af245d11STodd Fiala     }
3833af245d11STodd Fiala 
3834af245d11STodd Fiala     assert (!HasThreadNoLock (thread_id) && "attempted to add a thread by id that already exists");
3835af245d11STodd Fiala 
3836af245d11STodd Fiala     // If this is the first thread, save it as the current thread
3837af245d11STodd Fiala     if (m_threads.empty ())
3838af245d11STodd Fiala         SetCurrentThreadID (thread_id);
3839af245d11STodd Fiala 
3840af245d11STodd Fiala     NativeThreadProtocolSP thread_sp (new NativeThreadLinux (this, thread_id));
3841af245d11STodd Fiala     m_threads.push_back (thread_sp);
3842af245d11STodd Fiala 
3843af245d11STodd Fiala     return thread_sp;
3844af245d11STodd Fiala }
3845af245d11STodd Fiala 
3846af245d11STodd Fiala NativeThreadProtocolSP
3847af245d11STodd Fiala NativeProcessLinux::GetOrCreateThread (lldb::tid_t thread_id, bool &created)
3848af245d11STodd Fiala {
3849af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3850af245d11STodd Fiala 
3851af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3852af245d11STodd Fiala     if (log)
3853af245d11STodd Fiala     {
3854af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " get/create thread with tid %" PRIu64,
3855af245d11STodd Fiala                      __FUNCTION__,
3856af245d11STodd Fiala                      GetID (),
3857af245d11STodd Fiala                      thread_id);
3858af245d11STodd Fiala     }
3859af245d11STodd Fiala 
3860af245d11STodd Fiala     // Retrieve the thread if it is already getting tracked.
3861af245d11STodd Fiala     NativeThreadProtocolSP thread_sp = MaybeGetThreadNoLock (thread_id);
3862af245d11STodd Fiala     if (thread_sp)
3863af245d11STodd Fiala     {
3864af245d11STodd Fiala         if (log)
3865af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": thread already tracked, returning",
3866af245d11STodd Fiala                          __FUNCTION__,
3867af245d11STodd Fiala                          GetID (),
3868af245d11STodd Fiala                          thread_id);
3869af245d11STodd Fiala         created = false;
3870af245d11STodd Fiala         return thread_sp;
3871af245d11STodd Fiala 
3872af245d11STodd Fiala     }
3873af245d11STodd Fiala 
3874af245d11STodd Fiala     // Create the thread metadata since it isn't being tracked.
3875af245d11STodd Fiala     if (log)
3876af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": thread didn't exist, tracking now",
3877af245d11STodd Fiala                      __FUNCTION__,
3878af245d11STodd Fiala                      GetID (),
3879af245d11STodd Fiala                      thread_id);
3880af245d11STodd Fiala 
3881af245d11STodd Fiala     thread_sp.reset (new NativeThreadLinux (this, thread_id));
3882af245d11STodd Fiala     m_threads.push_back (thread_sp);
3883af245d11STodd Fiala     created = true;
3884af245d11STodd Fiala 
3885af245d11STodd Fiala     return thread_sp;
3886af245d11STodd Fiala }
3887af245d11STodd Fiala 
3888af245d11STodd Fiala Error
3889af245d11STodd Fiala NativeProcessLinux::FixupBreakpointPCAsNeeded (NativeThreadProtocolSP &thread_sp)
3890af245d11STodd Fiala {
389175f47c3aSTodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
3892af245d11STodd Fiala 
3893af245d11STodd Fiala     Error error;
3894af245d11STodd Fiala 
3895af245d11STodd Fiala     // Get a linux thread pointer.
3896af245d11STodd Fiala     if (!thread_sp)
3897af245d11STodd Fiala     {
3898af245d11STodd Fiala         error.SetErrorString ("null thread_sp");
3899af245d11STodd Fiala         if (log)
3900af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s failed: %s", __FUNCTION__, error.AsCString ());
3901af245d11STodd Fiala         return error;
3902af245d11STodd Fiala     }
3903af245d11STodd Fiala     NativeThreadLinux *const linux_thread_p = reinterpret_cast<NativeThreadLinux*> (thread_sp.get());
3904af245d11STodd Fiala 
3905af245d11STodd Fiala     // Find out the size of a breakpoint (might depend on where we are in the code).
3906af245d11STodd Fiala     NativeRegisterContextSP context_sp = linux_thread_p->GetRegisterContext ();
3907af245d11STodd Fiala     if (!context_sp)
3908af245d11STodd Fiala     {
3909af245d11STodd Fiala         error.SetErrorString ("cannot get a NativeRegisterContext for the thread");
3910af245d11STodd Fiala         if (log)
3911af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s failed: %s", __FUNCTION__, error.AsCString ());
3912af245d11STodd Fiala         return error;
3913af245d11STodd Fiala     }
3914af245d11STodd Fiala 
3915af245d11STodd Fiala     uint32_t breakpoint_size = 0;
3916af245d11STodd Fiala     error = GetSoftwareBreakpointSize (context_sp, breakpoint_size);
3917af245d11STodd Fiala     if (error.Fail ())
3918af245d11STodd Fiala     {
3919af245d11STodd Fiala         if (log)
3920af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s GetBreakpointSize() failed: %s", __FUNCTION__, error.AsCString ());
3921af245d11STodd Fiala         return error;
3922af245d11STodd Fiala     }
3923af245d11STodd Fiala     else
3924af245d11STodd Fiala     {
3925af245d11STodd Fiala         if (log)
3926af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s breakpoint size: %" PRIu32, __FUNCTION__, breakpoint_size);
3927af245d11STodd Fiala     }
3928af245d11STodd Fiala 
3929af245d11STodd Fiala     // First try probing for a breakpoint at a software breakpoint location: PC - breakpoint size.
3930af245d11STodd Fiala     const lldb::addr_t initial_pc_addr = context_sp->GetPC ();
3931af245d11STodd Fiala     lldb::addr_t breakpoint_addr = initial_pc_addr;
3932af245d11STodd Fiala     if (breakpoint_size > static_cast<lldb::addr_t> (0))
3933af245d11STodd Fiala     {
3934af245d11STodd Fiala         // Do not allow breakpoint probe to wrap around.
3935af245d11STodd Fiala         if (breakpoint_addr >= static_cast<lldb::addr_t> (breakpoint_size))
3936af245d11STodd Fiala             breakpoint_addr -= static_cast<lldb::addr_t> (breakpoint_size);
3937af245d11STodd Fiala     }
3938af245d11STodd Fiala 
3939af245d11STodd Fiala     // Check if we stopped because of a breakpoint.
3940af245d11STodd Fiala     NativeBreakpointSP breakpoint_sp;
3941af245d11STodd Fiala     error = m_breakpoint_list.GetBreakpoint (breakpoint_addr, breakpoint_sp);
3942af245d11STodd Fiala     if (!error.Success () || !breakpoint_sp)
3943af245d11STodd Fiala     {
3944af245d11STodd Fiala         // We didn't find one at a software probe location.  Nothing to do.
3945af245d11STodd Fiala         if (log)
3946af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " no lldb breakpoint found at current pc with adjustment: 0x%" PRIx64, __FUNCTION__, GetID (), breakpoint_addr);
3947af245d11STodd Fiala         return Error ();
3948af245d11STodd Fiala     }
3949af245d11STodd Fiala 
3950af245d11STodd Fiala     // If the breakpoint is not a software breakpoint, nothing to do.
3951af245d11STodd Fiala     if (!breakpoint_sp->IsSoftwareBreakpoint ())
3952af245d11STodd Fiala     {
3953af245d11STodd Fiala         if (log)
3954af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " breakpoint found at 0x%" PRIx64 ", not software, nothing to adjust", __FUNCTION__, GetID (), breakpoint_addr);
3955af245d11STodd Fiala         return Error ();
3956af245d11STodd Fiala     }
3957af245d11STodd Fiala 
3958af245d11STodd Fiala     //
3959af245d11STodd Fiala     // We have a software breakpoint and need to adjust the PC.
3960af245d11STodd Fiala     //
3961af245d11STodd Fiala 
3962af245d11STodd Fiala     // Sanity check.
3963af245d11STodd Fiala     if (breakpoint_size == 0)
3964af245d11STodd Fiala     {
3965af245d11STodd Fiala         // Nothing to do!  How did we get here?
3966af245d11STodd Fiala         if (log)
3967af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " breakpoint found at 0x%" PRIx64 ", it is software, but the size is zero, nothing to do (unexpected)", __FUNCTION__, GetID (), breakpoint_addr);
3968af245d11STodd Fiala         return Error ();
3969af245d11STodd Fiala     }
3970af245d11STodd Fiala 
3971af245d11STodd Fiala     // Change the program counter.
3972af245d11STodd Fiala     if (log)
3973af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": changing PC from 0x%" PRIx64 " to 0x%" PRIx64, __FUNCTION__, GetID (), linux_thread_p->GetID (), initial_pc_addr, breakpoint_addr);
3974af245d11STodd Fiala 
3975af245d11STodd Fiala     error = context_sp->SetPC (breakpoint_addr);
3976af245d11STodd Fiala     if (error.Fail ())
3977af245d11STodd Fiala     {
3978af245d11STodd Fiala         if (log)
3979af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": failed to set PC: %s", __FUNCTION__, GetID (), linux_thread_p->GetID (), error.AsCString ());
3980af245d11STodd Fiala         return error;
3981af245d11STodd Fiala     }
3982af245d11STodd Fiala 
3983af245d11STodd Fiala     return error;
3984af245d11STodd Fiala }
3985fa03ad2eSChaoren Lin 
3986fa03ad2eSChaoren Lin void
3987fa03ad2eSChaoren Lin NativeProcessLinux::NotifyThreadCreateStopped (lldb::tid_t tid)
3988fa03ad2eSChaoren Lin {
3989fa03ad2eSChaoren Lin     const bool is_stopped = true;
3990fa03ad2eSChaoren Lin     m_coordinator_up->NotifyThreadCreate (tid, is_stopped, CoordinatorErrorHandler);
3991fa03ad2eSChaoren Lin }
3992fa03ad2eSChaoren Lin 
3993fa03ad2eSChaoren Lin void
3994fa03ad2eSChaoren Lin NativeProcessLinux::NotifyThreadDeath (lldb::tid_t tid)
3995fa03ad2eSChaoren Lin {
3996fa03ad2eSChaoren Lin     m_coordinator_up->NotifyThreadDeath (tid, CoordinatorErrorHandler);
3997fa03ad2eSChaoren Lin }
3998fa03ad2eSChaoren Lin 
3999fa03ad2eSChaoren Lin void
4000fa03ad2eSChaoren Lin NativeProcessLinux::NotifyThreadStop (lldb::tid_t tid)
4001fa03ad2eSChaoren Lin {
4002fa03ad2eSChaoren Lin     m_coordinator_up->NotifyThreadStop (tid, CoordinatorErrorHandler);
4003fa03ad2eSChaoren Lin }
4004fa03ad2eSChaoren Lin 
4005fa03ad2eSChaoren Lin void
4006fa03ad2eSChaoren Lin NativeProcessLinux::CallAfterRunningThreadsStop (lldb::tid_t tid,
4007fa03ad2eSChaoren Lin                                                  const std::function<void (lldb::tid_t tid)> &call_after_function)
4008fa03ad2eSChaoren Lin {
4009fa03ad2eSChaoren Lin     const lldb::pid_t pid = GetID ();
4010938fcf63SChaoren Lin     m_coordinator_up->CallAfterRunningThreadsStop (tid,
4011fa03ad2eSChaoren Lin                                                    [=](lldb::tid_t request_stop_tid)
4012fa03ad2eSChaoren Lin                                                    {
4013fa03ad2eSChaoren Lin                                                        tgkill (pid, request_stop_tid, SIGSTOP);
4014fa03ad2eSChaoren Lin                                                    },
4015fa03ad2eSChaoren Lin                                                    call_after_function,
4016fa03ad2eSChaoren Lin                                                    CoordinatorErrorHandler);
401703f12d6bSChaoren Lin }
4018fa03ad2eSChaoren Lin 
401903f12d6bSChaoren Lin void
402003f12d6bSChaoren Lin NativeProcessLinux::CallAfterRunningThreadsStopWithSkipTID (lldb::tid_t deferred_signal_tid,
402103f12d6bSChaoren Lin                                                             lldb::tid_t skip_stop_request_tid,
402203f12d6bSChaoren Lin                                                             const std::function<void (lldb::tid_t tid)> &call_after_function)
402303f12d6bSChaoren Lin {
402403f12d6bSChaoren Lin     const lldb::pid_t pid = GetID ();
402503f12d6bSChaoren Lin     m_coordinator_up->CallAfterRunningThreadsStopWithSkipTIDs (deferred_signal_tid,
402603f12d6bSChaoren Lin                                                                skip_stop_request_tid != LLDB_INVALID_THREAD_ID ? ThreadStateCoordinator::ThreadIDSet {skip_stop_request_tid} : ThreadStateCoordinator::ThreadIDSet (),
402703f12d6bSChaoren Lin                                                                [=](lldb::tid_t request_stop_tid)
402803f12d6bSChaoren Lin                                                                {
402903f12d6bSChaoren Lin                                                                    tgkill (pid, request_stop_tid, SIGSTOP);
403003f12d6bSChaoren Lin                                                                },
403103f12d6bSChaoren Lin                                                                call_after_function,
403203f12d6bSChaoren Lin                                                                CoordinatorErrorHandler);
4033fa03ad2eSChaoren Lin }
4034