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"
69cacde7dfSTodd Fiala #include "Plugins/Process/POSIX/ProcessPOSIXLog.h"
70cacde7dfSTodd Fiala 
71cacde7dfSTodd Fiala #ifdef __ANDROID__
72cacde7dfSTodd Fiala #define __ptrace_request int
73cacde7dfSTodd Fiala #define PT_DETACH PTRACE_DETACH
74cacde7dfSTodd Fiala #endif
75af245d11STodd Fiala 
76af245d11STodd Fiala #define DEBUG_PTRACE_MAXBYTES 20
77af245d11STodd Fiala 
78af245d11STodd Fiala // Support ptrace extensions even when compiled without required kernel support
79dda61943STodd Fiala #ifndef PT_GETREGS
80af245d11STodd Fiala #ifndef PTRACE_GETREGS
81af245d11STodd Fiala   #define PTRACE_GETREGS 12
82af245d11STodd Fiala #endif
83dda61943STodd Fiala #endif
84dda61943STodd Fiala #ifndef PT_SETREGS
85af245d11STodd Fiala #ifndef PTRACE_SETREGS
86af245d11STodd Fiala   #define PTRACE_SETREGS 13
87af245d11STodd Fiala #endif
88dda61943STodd Fiala #endif
89dda61943STodd Fiala #ifndef PT_GETFPREGS
90dda61943STodd Fiala #ifndef PTRACE_GETFPREGS
91dda61943STodd Fiala   #define PTRACE_GETFPREGS 14
92dda61943STodd Fiala #endif
93dda61943STodd Fiala #endif
94dda61943STodd Fiala #ifndef PT_SETFPREGS
95dda61943STodd Fiala #ifndef PTRACE_SETFPREGS
96dda61943STodd Fiala   #define PTRACE_SETFPREGS 15
97dda61943STodd Fiala #endif
98dda61943STodd Fiala #endif
99af245d11STodd Fiala #ifndef PTRACE_GETREGSET
100af245d11STodd Fiala   #define PTRACE_GETREGSET 0x4204
101af245d11STodd Fiala #endif
102af245d11STodd Fiala #ifndef PTRACE_SETREGSET
103af245d11STodd Fiala   #define PTRACE_SETREGSET 0x4205
104af245d11STodd Fiala #endif
105af245d11STodd Fiala #ifndef PTRACE_GET_THREAD_AREA
106af245d11STodd Fiala   #define PTRACE_GET_THREAD_AREA 25
107af245d11STodd Fiala #endif
108af245d11STodd Fiala #ifndef PTRACE_ARCH_PRCTL
109af245d11STodd Fiala   #define PTRACE_ARCH_PRCTL      30
110af245d11STodd Fiala #endif
111af245d11STodd Fiala #ifndef ARCH_GET_FS
112af245d11STodd Fiala   #define ARCH_SET_GS 0x1001
113af245d11STodd Fiala   #define ARCH_SET_FS 0x1002
114af245d11STodd Fiala   #define ARCH_GET_FS 0x1003
115af245d11STodd Fiala   #define ARCH_GET_GS 0x1004
116af245d11STodd Fiala #endif
117af245d11STodd Fiala 
1180bce1b67STodd Fiala #define LLDB_PERSONALITY_GET_CURRENT_SETTINGS  0xffffffff
119af245d11STodd Fiala 
120af245d11STodd Fiala // Support hardware breakpoints in case it has not been defined
121af245d11STodd Fiala #ifndef TRAP_HWBKPT
122af245d11STodd Fiala   #define TRAP_HWBKPT 4
123af245d11STodd Fiala #endif
124af245d11STodd Fiala 
125af245d11STodd Fiala // Try to define a macro to encapsulate the tgkill syscall
126af245d11STodd Fiala // fall back on kill() if tgkill isn't available
127af245d11STodd Fiala #define tgkill(pid, tid, sig)  syscall(SYS_tgkill, pid, tid, sig)
128af245d11STodd Fiala 
129af245d11STodd Fiala // We disable the tracing of ptrace calls for integration builds to
130af245d11STodd Fiala // avoid the additional indirection and checks.
131af245d11STodd Fiala #ifndef LLDB_CONFIGURATION_BUILDANDINTEGRATION
132af245d11STodd Fiala #define PTRACE(req, pid, addr, data, data_size) \
133af245d11STodd Fiala     PtraceWrapper((req), (pid), (addr), (data), (data_size), #req, __FILE__, __LINE__)
134af245d11STodd Fiala #else
135af245d11STodd Fiala #define PTRACE(req, pid, addr, data, data_size) \
136af245d11STodd Fiala     PtraceWrapper((req), (pid), (addr), (data), (data_size))
137af245d11STodd Fiala #endif
138af245d11STodd Fiala 
139af245d11STodd Fiala // Private bits we only need internally.
140af245d11STodd Fiala namespace
141af245d11STodd Fiala {
142af245d11STodd Fiala     using namespace lldb;
143af245d11STodd Fiala     using namespace lldb_private;
144af245d11STodd Fiala 
145af245d11STodd Fiala     const UnixSignals&
146af245d11STodd Fiala     GetUnixSignals ()
147af245d11STodd Fiala     {
148af245d11STodd Fiala         static process_linux::LinuxSignals signals;
149af245d11STodd Fiala         return signals;
150af245d11STodd Fiala     }
151af245d11STodd Fiala 
152af245d11STodd Fiala     Error
153af245d11STodd Fiala     ResolveProcessArchitecture (lldb::pid_t pid, Platform &platform, ArchSpec &arch)
154af245d11STodd Fiala     {
155af245d11STodd Fiala         // Grab process info for the running process.
156af245d11STodd Fiala         ProcessInstanceInfo process_info;
157af245d11STodd Fiala         if (!platform.GetProcessInfo (pid, process_info))
158af245d11STodd Fiala             return lldb_private::Error("failed to get process info");
159af245d11STodd Fiala 
160af245d11STodd Fiala         // Resolve the executable module.
161af245d11STodd Fiala         ModuleSP exe_module_sp;
1626edef204SOleksiy Vyalov         ModuleSpec exe_module_spec(process_info.GetExecutableFile(), platform.GetSystemArchitecture ());
163af245d11STodd Fiala         FileSpecList executable_search_paths (Target::GetDefaultExecutableSearchPaths ());
164af245d11STodd Fiala         Error error = platform.ResolveExecutable(
165*54539338SOleksiy Vyalov             exe_module_spec,
166af245d11STodd Fiala             exe_module_sp,
167af245d11STodd Fiala             executable_search_paths.GetSize () ? &executable_search_paths : NULL);
168af245d11STodd Fiala 
169af245d11STodd Fiala         if (!error.Success ())
170af245d11STodd Fiala             return error;
171af245d11STodd Fiala 
172af245d11STodd Fiala         // Check if we've got our architecture from the exe_module.
173af245d11STodd Fiala         arch = exe_module_sp->GetArchitecture ();
174af245d11STodd Fiala         if (arch.IsValid ())
175af245d11STodd Fiala             return Error();
176af245d11STodd Fiala         else
177af245d11STodd Fiala             return Error("failed to retrieve a valid architecture from the exe module");
178af245d11STodd Fiala     }
179af245d11STodd Fiala 
180af245d11STodd Fiala     void
181af245d11STodd Fiala     DisplayBytes (lldb_private::StreamString &s, void *bytes, uint32_t count)
182af245d11STodd Fiala     {
183af245d11STodd Fiala         uint8_t *ptr = (uint8_t *)bytes;
184af245d11STodd Fiala         const uint32_t loop_count = std::min<uint32_t>(DEBUG_PTRACE_MAXBYTES, count);
185af245d11STodd Fiala         for(uint32_t i=0; i<loop_count; i++)
186af245d11STodd Fiala         {
187af245d11STodd Fiala             s.Printf ("[%x]", *ptr);
188af245d11STodd Fiala             ptr++;
189af245d11STodd Fiala         }
190af245d11STodd Fiala     }
191af245d11STodd Fiala 
192af245d11STodd Fiala     void
193af245d11STodd Fiala     PtraceDisplayBytes(int &req, void *data, size_t data_size)
194af245d11STodd Fiala     {
195af245d11STodd Fiala         StreamString buf;
196af245d11STodd Fiala         Log *verbose_log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (
197af245d11STodd Fiala                     POSIX_LOG_PTRACE | POSIX_LOG_VERBOSE));
198af245d11STodd Fiala 
199af245d11STodd Fiala         if (verbose_log)
200af245d11STodd Fiala         {
201af245d11STodd Fiala             switch(req)
202af245d11STodd Fiala             {
203af245d11STodd Fiala             case PTRACE_POKETEXT:
204af245d11STodd Fiala             {
205af245d11STodd Fiala                 DisplayBytes(buf, &data, 8);
206af245d11STodd Fiala                 verbose_log->Printf("PTRACE_POKETEXT %s", buf.GetData());
207af245d11STodd Fiala                 break;
208af245d11STodd Fiala             }
209af245d11STodd Fiala             case PTRACE_POKEDATA:
210af245d11STodd Fiala             {
211af245d11STodd Fiala                 DisplayBytes(buf, &data, 8);
212af245d11STodd Fiala                 verbose_log->Printf("PTRACE_POKEDATA %s", buf.GetData());
213af245d11STodd Fiala                 break;
214af245d11STodd Fiala             }
215af245d11STodd Fiala             case PTRACE_POKEUSER:
216af245d11STodd Fiala             {
217af245d11STodd Fiala                 DisplayBytes(buf, &data, 8);
218af245d11STodd Fiala                 verbose_log->Printf("PTRACE_POKEUSER %s", buf.GetData());
219af245d11STodd Fiala                 break;
220af245d11STodd Fiala             }
221af245d11STodd Fiala             case PTRACE_SETREGS:
222af245d11STodd Fiala             {
223af245d11STodd Fiala                 DisplayBytes(buf, data, data_size);
224af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETREGS %s", buf.GetData());
225af245d11STodd Fiala                 break;
226af245d11STodd Fiala             }
227af245d11STodd Fiala             case PTRACE_SETFPREGS:
228af245d11STodd Fiala             {
229af245d11STodd Fiala                 DisplayBytes(buf, data, data_size);
230af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETFPREGS %s", buf.GetData());
231af245d11STodd Fiala                 break;
232af245d11STodd Fiala             }
233af245d11STodd Fiala             case PTRACE_SETSIGINFO:
234af245d11STodd Fiala             {
235af245d11STodd Fiala                 DisplayBytes(buf, data, sizeof(siginfo_t));
236af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETSIGINFO %s", buf.GetData());
237af245d11STodd Fiala                 break;
238af245d11STodd Fiala             }
239af245d11STodd Fiala             case PTRACE_SETREGSET:
240af245d11STodd Fiala             {
241af245d11STodd Fiala                 // Extract iov_base from data, which is a pointer to the struct IOVEC
242af245d11STodd Fiala                 DisplayBytes(buf, *(void **)data, data_size);
243af245d11STodd Fiala                 verbose_log->Printf("PTRACE_SETREGSET %s", buf.GetData());
244af245d11STodd Fiala                 break;
245af245d11STodd Fiala             }
246af245d11STodd Fiala             default:
247af245d11STodd Fiala             {
248af245d11STodd Fiala             }
249af245d11STodd Fiala             }
250af245d11STodd Fiala         }
251af245d11STodd Fiala     }
252af245d11STodd Fiala 
253af245d11STodd Fiala     // Wrapper for ptrace to catch errors and log calls.
254af245d11STodd Fiala     // Note that ptrace sets errno on error because -1 can be a valid result (i.e. for PTRACE_PEEK*)
255af245d11STodd Fiala     long
256af245d11STodd Fiala     PtraceWrapper(int req, lldb::pid_t pid, void *addr, void *data, size_t data_size,
257af245d11STodd Fiala             const char* reqName, const char* file, int line)
258af245d11STodd Fiala     {
259af245d11STodd Fiala         long int result;
260af245d11STodd Fiala 
261af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_PTRACE));
262af245d11STodd Fiala 
263af245d11STodd Fiala         PtraceDisplayBytes(req, data, data_size);
264af245d11STodd Fiala 
265af245d11STodd Fiala         errno = 0;
266af245d11STodd Fiala         if (req == PTRACE_GETREGSET || req == PTRACE_SETREGSET)
267af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), *(unsigned int *)addr, data);
268af245d11STodd Fiala         else
269af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), addr, data);
270af245d11STodd Fiala 
271af245d11STodd Fiala         if (log)
272af245d11STodd Fiala             log->Printf("ptrace(%s, %" PRIu64 ", %p, %p, %zu)=%lX called from file %s line %d",
273af245d11STodd Fiala                     reqName, pid, addr, data, data_size, result, file, line);
274af245d11STodd Fiala 
275af245d11STodd Fiala         PtraceDisplayBytes(req, data, data_size);
276af245d11STodd Fiala 
277af245d11STodd Fiala         if (log && errno != 0)
278af245d11STodd Fiala         {
279af245d11STodd Fiala             const char* str;
280af245d11STodd Fiala             switch (errno)
281af245d11STodd Fiala             {
282af245d11STodd Fiala             case ESRCH:  str = "ESRCH"; break;
283af245d11STodd Fiala             case EINVAL: str = "EINVAL"; break;
284af245d11STodd Fiala             case EBUSY:  str = "EBUSY"; break;
285af245d11STodd Fiala             case EPERM:  str = "EPERM"; break;
286af245d11STodd Fiala             default:     str = "<unknown>";
287af245d11STodd Fiala             }
288af245d11STodd Fiala             log->Printf("ptrace() failed; errno=%d (%s)", errno, str);
289af245d11STodd Fiala         }
290af245d11STodd Fiala 
291af245d11STodd Fiala         return result;
292af245d11STodd Fiala     }
293af245d11STodd Fiala 
294af245d11STodd Fiala #ifdef LLDB_CONFIGURATION_BUILDANDINTEGRATION
295af245d11STodd Fiala     // Wrapper for ptrace when logging is not required.
296af245d11STodd Fiala     // Sets errno to 0 prior to calling ptrace.
297af245d11STodd Fiala     long
298af245d11STodd Fiala     PtraceWrapper(int req, lldb::pid_t pid, void *addr, void *data, size_t data_size)
299af245d11STodd Fiala     {
300af245d11STodd Fiala         long result = 0;
301af245d11STodd Fiala         errno = 0;
302af245d11STodd Fiala         if (req == PTRACE_GETREGSET || req == PTRACE_SETREGSET)
303af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), *(unsigned int *)addr, data);
304af245d11STodd Fiala         else
305af245d11STodd Fiala             result = ptrace(static_cast<__ptrace_request>(req), static_cast< ::pid_t>(pid), addr, data);
306af245d11STodd Fiala         return result;
307af245d11STodd Fiala     }
308af245d11STodd Fiala #endif
309af245d11STodd Fiala 
310af245d11STodd Fiala     //------------------------------------------------------------------------------
311af245d11STodd Fiala     // Static implementations of NativeProcessLinux::ReadMemory and
312af245d11STodd Fiala     // NativeProcessLinux::WriteMemory.  This enables mutual recursion between these
313af245d11STodd Fiala     // functions without needed to go thru the thread funnel.
314af245d11STodd Fiala 
315af245d11STodd Fiala     static lldb::addr_t
316af245d11STodd Fiala     DoReadMemory (
317af245d11STodd Fiala         lldb::pid_t pid,
318af245d11STodd Fiala         lldb::addr_t vm_addr,
319af245d11STodd Fiala         void *buf,
320af245d11STodd Fiala         lldb::addr_t size,
321af245d11STodd Fiala         Error &error)
322af245d11STodd Fiala     {
323af245d11STodd Fiala         // ptrace word size is determined by the host, not the child
324af245d11STodd Fiala         static const unsigned word_size = sizeof(void*);
325af245d11STodd Fiala         unsigned char *dst = static_cast<unsigned char*>(buf);
326af245d11STodd Fiala         lldb::addr_t bytes_read;
327af245d11STodd Fiala         lldb::addr_t remainder;
328af245d11STodd Fiala         long data;
329af245d11STodd Fiala 
330af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_ALL));
331af245d11STodd Fiala         if (log)
332af245d11STodd Fiala             ProcessPOSIXLog::IncNestLevel();
333af245d11STodd Fiala         if (log && ProcessPOSIXLog::AtTopNestLevel() && log->GetMask().Test(POSIX_LOG_MEMORY))
334af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s(%" PRIu64 ", %d, %p, %p, %zd, _)", __FUNCTION__,
335af245d11STodd Fiala                     pid, word_size, (void*)vm_addr, buf, size);
336af245d11STodd Fiala 
337af245d11STodd Fiala         assert(sizeof(data) >= word_size);
338af245d11STodd Fiala         for (bytes_read = 0; bytes_read < size; bytes_read += remainder)
339af245d11STodd Fiala         {
340af245d11STodd Fiala             errno = 0;
341af245d11STodd Fiala             data = PTRACE(PTRACE_PEEKDATA, pid, (void*)vm_addr, NULL, 0);
342af245d11STodd Fiala             if (errno)
343af245d11STodd Fiala             {
344af245d11STodd Fiala                 error.SetErrorToErrno();
345af245d11STodd Fiala                 if (log)
346af245d11STodd Fiala                     ProcessPOSIXLog::DecNestLevel();
347af245d11STodd Fiala                 return bytes_read;
348af245d11STodd Fiala             }
349af245d11STodd Fiala 
350af245d11STodd Fiala             remainder = size - bytes_read;
351af245d11STodd Fiala             remainder = remainder > word_size ? word_size : remainder;
352af245d11STodd Fiala 
353af245d11STodd Fiala             // Copy the data into our buffer
354af245d11STodd Fiala             for (unsigned i = 0; i < remainder; ++i)
355af245d11STodd Fiala                 dst[i] = ((data >> i*8) & 0xFF);
356af245d11STodd Fiala 
357af245d11STodd Fiala             if (log && ProcessPOSIXLog::AtTopNestLevel() &&
358af245d11STodd Fiala                     (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) ||
359af245d11STodd Fiala                             (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) &&
360af245d11STodd Fiala                                     size <= POSIX_LOG_MEMORY_SHORT_BYTES)))
361af245d11STodd Fiala             {
362af245d11STodd Fiala                 uintptr_t print_dst = 0;
363af245d11STodd Fiala                 // Format bytes from data by moving into print_dst for log output
364af245d11STodd Fiala                 for (unsigned i = 0; i < remainder; ++i)
365af245d11STodd Fiala                     print_dst |= (((data >> i*8) & 0xFF) << i*8);
366af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__,
367af245d11STodd Fiala                         (void*)vm_addr, print_dst, (unsigned long)data);
368af245d11STodd Fiala             }
369af245d11STodd Fiala 
370af245d11STodd Fiala             vm_addr += word_size;
371af245d11STodd Fiala             dst += word_size;
372af245d11STodd Fiala         }
373af245d11STodd Fiala 
374af245d11STodd Fiala         if (log)
375af245d11STodd Fiala             ProcessPOSIXLog::DecNestLevel();
376af245d11STodd Fiala         return bytes_read;
377af245d11STodd Fiala     }
378af245d11STodd Fiala 
379af245d11STodd Fiala     static lldb::addr_t
380af245d11STodd Fiala     DoWriteMemory(
381af245d11STodd Fiala         lldb::pid_t pid,
382af245d11STodd Fiala         lldb::addr_t vm_addr,
383af245d11STodd Fiala         const void *buf,
384af245d11STodd Fiala         lldb::addr_t size,
385af245d11STodd Fiala         Error &error)
386af245d11STodd Fiala     {
387af245d11STodd Fiala         // ptrace word size is determined by the host, not the child
388af245d11STodd Fiala         static const unsigned word_size = sizeof(void*);
389af245d11STodd Fiala         const unsigned char *src = static_cast<const unsigned char*>(buf);
390af245d11STodd Fiala         lldb::addr_t bytes_written = 0;
391af245d11STodd Fiala         lldb::addr_t remainder;
392af245d11STodd Fiala 
393af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_ALL));
394af245d11STodd Fiala         if (log)
395af245d11STodd Fiala             ProcessPOSIXLog::IncNestLevel();
396af245d11STodd Fiala         if (log && ProcessPOSIXLog::AtTopNestLevel() && log->GetMask().Test(POSIX_LOG_MEMORY))
397af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s(%" PRIu64 ", %u, %p, %p, %" PRIu64 ")", __FUNCTION__,
398af245d11STodd Fiala                     pid, word_size, (void*)vm_addr, buf, size);
399af245d11STodd Fiala 
400af245d11STodd Fiala         for (bytes_written = 0; bytes_written < size; bytes_written += remainder)
401af245d11STodd Fiala         {
402af245d11STodd Fiala             remainder = size - bytes_written;
403af245d11STodd Fiala             remainder = remainder > word_size ? word_size : remainder;
404af245d11STodd Fiala 
405af245d11STodd Fiala             if (remainder == word_size)
406af245d11STodd Fiala             {
407af245d11STodd Fiala                 unsigned long data = 0;
408af245d11STodd Fiala                 assert(sizeof(data) >= word_size);
409af245d11STodd Fiala                 for (unsigned i = 0; i < word_size; ++i)
410af245d11STodd Fiala                     data |= (unsigned long)src[i] << i*8;
411af245d11STodd Fiala 
412af245d11STodd Fiala                 if (log && ProcessPOSIXLog::AtTopNestLevel() &&
413af245d11STodd Fiala                         (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) ||
414af245d11STodd Fiala                                 (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) &&
415af245d11STodd Fiala                                         size <= POSIX_LOG_MEMORY_SHORT_BYTES)))
416af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__,
417af245d11STodd Fiala                             (void*)vm_addr, *(unsigned long*)src, data);
418af245d11STodd Fiala 
419af245d11STodd Fiala                 if (PTRACE(PTRACE_POKEDATA, pid, (void*)vm_addr, (void*)data, 0))
420af245d11STodd Fiala                 {
421af245d11STodd Fiala                     error.SetErrorToErrno();
422af245d11STodd Fiala                     if (log)
423af245d11STodd Fiala                         ProcessPOSIXLog::DecNestLevel();
424af245d11STodd Fiala                     return bytes_written;
425af245d11STodd Fiala                 }
426af245d11STodd Fiala             }
427af245d11STodd Fiala             else
428af245d11STodd Fiala             {
429af245d11STodd Fiala                 unsigned char buff[8];
430af245d11STodd Fiala                 if (DoReadMemory(pid, vm_addr,
431af245d11STodd Fiala                                 buff, word_size, error) != word_size)
432af245d11STodd Fiala                 {
433af245d11STodd Fiala                     if (log)
434af245d11STodd Fiala                         ProcessPOSIXLog::DecNestLevel();
435af245d11STodd Fiala                     return bytes_written;
436af245d11STodd Fiala                 }
437af245d11STodd Fiala 
438af245d11STodd Fiala                 memcpy(buff, src, remainder);
439af245d11STodd Fiala 
440af245d11STodd Fiala                 if (DoWriteMemory(pid, vm_addr,
441af245d11STodd Fiala                                 buff, word_size, error) != word_size)
442af245d11STodd Fiala                 {
443af245d11STodd Fiala                     if (log)
444af245d11STodd Fiala                         ProcessPOSIXLog::DecNestLevel();
445af245d11STodd Fiala                     return bytes_written;
446af245d11STodd Fiala                 }
447af245d11STodd Fiala 
448af245d11STodd Fiala                 if (log && ProcessPOSIXLog::AtTopNestLevel() &&
449af245d11STodd Fiala                         (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_LONG) ||
450af245d11STodd Fiala                                 (log->GetMask().Test(POSIX_LOG_MEMORY_DATA_SHORT) &&
451af245d11STodd Fiala                                         size <= POSIX_LOG_MEMORY_SHORT_BYTES)))
452af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() [%p]:0x%lx (0x%lx)", __FUNCTION__,
453af245d11STodd Fiala                             (void*)vm_addr, *(unsigned long*)src, *(unsigned long*)buff);
454af245d11STodd Fiala             }
455af245d11STodd Fiala 
456af245d11STodd Fiala             vm_addr += word_size;
457af245d11STodd Fiala             src += word_size;
458af245d11STodd Fiala         }
459af245d11STodd Fiala         if (log)
460af245d11STodd Fiala             ProcessPOSIXLog::DecNestLevel();
461af245d11STodd Fiala         return bytes_written;
462af245d11STodd Fiala     }
463af245d11STodd Fiala 
464af245d11STodd Fiala     //------------------------------------------------------------------------------
465af245d11STodd Fiala     /// @class Operation
466af245d11STodd Fiala     /// @brief Represents a NativeProcessLinux operation.
467af245d11STodd Fiala     ///
468af245d11STodd Fiala     /// Under Linux, it is not possible to ptrace() from any other thread but the
469af245d11STodd Fiala     /// one that spawned or attached to the process from the start.  Therefore, when
470af245d11STodd Fiala     /// a NativeProcessLinux is asked to deliver or change the state of an inferior
471af245d11STodd Fiala     /// process the operation must be "funneled" to a specific thread to perform the
472af245d11STodd Fiala     /// task.  The Operation class provides an abstract base for all services the
473af245d11STodd Fiala     /// NativeProcessLinux must perform via the single virtual function Execute, thus
474af245d11STodd Fiala     /// encapsulating the code that needs to run in the privileged context.
475af245d11STodd Fiala     class Operation
476af245d11STodd Fiala     {
477af245d11STodd Fiala     public:
478af245d11STodd Fiala         Operation () : m_error() { }
479af245d11STodd Fiala 
480af245d11STodd Fiala         virtual
481af245d11STodd Fiala         ~Operation() {}
482af245d11STodd Fiala 
483af245d11STodd Fiala         virtual void
484af245d11STodd Fiala         Execute (NativeProcessLinux *process) = 0;
485af245d11STodd Fiala 
486af245d11STodd Fiala         const Error &
487af245d11STodd Fiala         GetError () const { return m_error; }
488af245d11STodd Fiala 
489af245d11STodd Fiala     protected:
490af245d11STodd Fiala         Error m_error;
491af245d11STodd Fiala     };
492af245d11STodd Fiala 
493af245d11STodd Fiala     //------------------------------------------------------------------------------
494af245d11STodd Fiala     /// @class ReadOperation
495af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadMemory.
496af245d11STodd Fiala     class ReadOperation : public Operation
497af245d11STodd Fiala     {
498af245d11STodd Fiala     public:
499af245d11STodd Fiala         ReadOperation (
500af245d11STodd Fiala             lldb::addr_t addr,
501af245d11STodd Fiala             void *buff,
502af245d11STodd Fiala             lldb::addr_t size,
503b35103ebSTodd Fiala             lldb::addr_t &result) :
504af245d11STodd Fiala             Operation (),
505af245d11STodd Fiala             m_addr (addr),
506af245d11STodd Fiala             m_buff (buff),
507af245d11STodd Fiala             m_size (size),
508af245d11STodd Fiala             m_result (result)
509af245d11STodd Fiala             {
510af245d11STodd Fiala             }
511af245d11STodd Fiala 
512af245d11STodd Fiala         void Execute (NativeProcessLinux *process) override;
513af245d11STodd Fiala 
514af245d11STodd Fiala     private:
515af245d11STodd Fiala         lldb::addr_t m_addr;
516af245d11STodd Fiala         void *m_buff;
517af245d11STodd Fiala         lldb::addr_t m_size;
518af245d11STodd Fiala         lldb::addr_t &m_result;
519af245d11STodd Fiala     };
520af245d11STodd Fiala 
521af245d11STodd Fiala     void
522af245d11STodd Fiala     ReadOperation::Execute (NativeProcessLinux *process)
523af245d11STodd Fiala     {
524af245d11STodd Fiala         m_result = DoReadMemory (process->GetID (), m_addr, m_buff, m_size, m_error);
525af245d11STodd Fiala     }
526af245d11STodd Fiala 
527af245d11STodd Fiala     //------------------------------------------------------------------------------
528af245d11STodd Fiala     /// @class WriteOperation
529af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteMemory.
530af245d11STodd Fiala     class WriteOperation : public Operation
531af245d11STodd Fiala     {
532af245d11STodd Fiala     public:
533af245d11STodd Fiala         WriteOperation (
534af245d11STodd Fiala             lldb::addr_t addr,
535af245d11STodd Fiala             const void *buff,
536af245d11STodd Fiala             lldb::addr_t size,
537af245d11STodd Fiala             lldb::addr_t &result) :
538af245d11STodd Fiala             Operation (),
539af245d11STodd Fiala             m_addr (addr),
540af245d11STodd Fiala             m_buff (buff),
541af245d11STodd Fiala             m_size (size),
542af245d11STodd Fiala             m_result (result)
543af245d11STodd Fiala             {
544af245d11STodd Fiala             }
545af245d11STodd Fiala 
546af245d11STodd Fiala         void Execute (NativeProcessLinux *process) override;
547af245d11STodd Fiala 
548af245d11STodd Fiala     private:
549af245d11STodd Fiala         lldb::addr_t m_addr;
550af245d11STodd Fiala         const void *m_buff;
551af245d11STodd Fiala         lldb::addr_t m_size;
552af245d11STodd Fiala         lldb::addr_t &m_result;
553af245d11STodd Fiala     };
554af245d11STodd Fiala 
555af245d11STodd Fiala     void
556af245d11STodd Fiala     WriteOperation::Execute(NativeProcessLinux *process)
557af245d11STodd Fiala     {
558af245d11STodd Fiala         m_result = DoWriteMemory (process->GetID (), m_addr, m_buff, m_size, m_error);
559af245d11STodd Fiala     }
560af245d11STodd Fiala 
561af245d11STodd Fiala     //------------------------------------------------------------------------------
562af245d11STodd Fiala     /// @class ReadRegOperation
563af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadRegisterValue.
564af245d11STodd Fiala     class ReadRegOperation : public Operation
565af245d11STodd Fiala     {
566af245d11STodd Fiala     public:
567af245d11STodd Fiala         ReadRegOperation(lldb::tid_t tid, uint32_t offset, const char *reg_name,
568af245d11STodd Fiala                 RegisterValue &value, bool &result)
569af245d11STodd Fiala             : m_tid(tid), m_offset(static_cast<uintptr_t> (offset)), m_reg_name(reg_name),
570af245d11STodd Fiala               m_value(value), m_result(result)
571af245d11STodd Fiala             { }
572af245d11STodd Fiala 
573af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
574af245d11STodd Fiala 
575af245d11STodd Fiala     private:
576af245d11STodd Fiala         lldb::tid_t m_tid;
577af245d11STodd Fiala         uintptr_t m_offset;
578af245d11STodd Fiala         const char *m_reg_name;
579af245d11STodd Fiala         RegisterValue &m_value;
580af245d11STodd Fiala         bool &m_result;
581af245d11STodd Fiala     };
582af245d11STodd Fiala 
583af245d11STodd Fiala     void
584af245d11STodd Fiala     ReadRegOperation::Execute(NativeProcessLinux *monitor)
585af245d11STodd Fiala     {
5860fceef80STodd Fiala #if defined (__arm64__) || defined (__aarch64__)
5870fceef80STodd Fiala         if (m_offset > sizeof(struct user_pt_regs))
5880fceef80STodd Fiala         {
5890fceef80STodd Fiala             uintptr_t offset = m_offset - sizeof(struct user_pt_regs);
5900fceef80STodd Fiala             if (offset > sizeof(struct user_fpsimd_state))
5910fceef80STodd Fiala             {
5920fceef80STodd Fiala                 m_result = false;
5930fceef80STodd Fiala             }
5940fceef80STodd Fiala             else
5950fceef80STodd Fiala             {
5960fceef80STodd Fiala                 elf_fpregset_t regs;
5970fceef80STodd Fiala                 int regset = NT_FPREGSET;
5980fceef80STodd Fiala                 struct iovec ioVec;
5990fceef80STodd Fiala 
6000fceef80STodd Fiala                 ioVec.iov_base = &regs;
6010fceef80STodd Fiala                 ioVec.iov_len = sizeof regs;
6020fceef80STodd Fiala                 if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
6030fceef80STodd Fiala                     m_result = false;
6040fceef80STodd Fiala                 else
6050fceef80STodd Fiala                 {
6060fceef80STodd Fiala                     lldb_private::ArchSpec arch;
6070fceef80STodd Fiala                     if (monitor->GetArchitecture(arch))
6080fceef80STodd Fiala                     {
6090fceef80STodd Fiala                         m_result = true;
6100fceef80STodd Fiala                         m_value.SetBytes((void *)(((unsigned char *)(&regs)) + offset), 16, arch.GetByteOrder());
6110fceef80STodd Fiala                     }
6120fceef80STodd Fiala                     else
6130fceef80STodd Fiala                         m_result = false;
6140fceef80STodd Fiala                 }
6150fceef80STodd Fiala             }
6160fceef80STodd Fiala         }
6170fceef80STodd Fiala         else
6180fceef80STodd Fiala         {
6190fceef80STodd Fiala             elf_gregset_t regs;
6200fceef80STodd Fiala             int regset = NT_PRSTATUS;
6210fceef80STodd Fiala             struct iovec ioVec;
6220fceef80STodd Fiala 
6230fceef80STodd Fiala             ioVec.iov_base = &regs;
6240fceef80STodd Fiala             ioVec.iov_len = sizeof regs;
6250fceef80STodd Fiala             if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
6260fceef80STodd Fiala                 m_result = false;
6270fceef80STodd Fiala             else
6280fceef80STodd Fiala             {
6290fceef80STodd Fiala                 lldb_private::ArchSpec arch;
6300fceef80STodd Fiala                 if (monitor->GetArchitecture(arch))
6310fceef80STodd Fiala                 {
6320fceef80STodd Fiala                     m_result = true;
6330fceef80STodd Fiala                     m_value.SetBytes((void *)(((unsigned char *)(regs)) + m_offset), 8, arch.GetByteOrder());
6340fceef80STodd Fiala                 } else
6350fceef80STodd Fiala                     m_result = false;
6360fceef80STodd Fiala             }
6370fceef80STodd Fiala         }
6380fceef80STodd Fiala #else
639af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_REGISTERS));
640af245d11STodd Fiala 
641af245d11STodd Fiala         // Set errno to zero so that we can detect a failed peek.
642af245d11STodd Fiala         errno = 0;
643af245d11STodd Fiala         lldb::addr_t data = PTRACE(PTRACE_PEEKUSER, m_tid, (void*)m_offset, NULL, 0);
644af245d11STodd Fiala         if (errno)
645af245d11STodd Fiala             m_result = false;
646af245d11STodd Fiala         else
647af245d11STodd Fiala         {
648af245d11STodd Fiala             m_value = data;
649af245d11STodd Fiala             m_result = true;
650af245d11STodd Fiala         }
651af245d11STodd Fiala         if (log)
652af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() reg %s: 0x%" PRIx64, __FUNCTION__,
653af245d11STodd Fiala                     m_reg_name, data);
6540fceef80STodd Fiala #endif
655af245d11STodd Fiala     }
656af245d11STodd Fiala 
657af245d11STodd Fiala     //------------------------------------------------------------------------------
658af245d11STodd Fiala     /// @class WriteRegOperation
659af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteRegisterValue.
660af245d11STodd Fiala     class WriteRegOperation : public Operation
661af245d11STodd Fiala     {
662af245d11STodd Fiala     public:
663af245d11STodd Fiala         WriteRegOperation(lldb::tid_t tid, unsigned offset, const char *reg_name,
664af245d11STodd Fiala                 const RegisterValue &value, bool &result)
665af245d11STodd Fiala             : m_tid(tid), m_offset(offset), m_reg_name(reg_name),
666af245d11STodd Fiala               m_value(value), m_result(result)
667af245d11STodd Fiala             { }
668af245d11STodd Fiala 
669af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
670af245d11STodd Fiala 
671af245d11STodd Fiala     private:
672af245d11STodd Fiala         lldb::tid_t m_tid;
673af245d11STodd Fiala         uintptr_t m_offset;
674af245d11STodd Fiala         const char *m_reg_name;
675af245d11STodd Fiala         const RegisterValue &m_value;
676af245d11STodd Fiala         bool &m_result;
677af245d11STodd Fiala     };
678af245d11STodd Fiala 
679af245d11STodd Fiala     void
680af245d11STodd Fiala     WriteRegOperation::Execute(NativeProcessLinux *monitor)
681af245d11STodd Fiala     {
6820fceef80STodd Fiala #if defined (__arm64__) || defined (__aarch64__)
6830fceef80STodd Fiala         if (m_offset > sizeof(struct user_pt_regs))
6840fceef80STodd Fiala         {
6850fceef80STodd Fiala             uintptr_t offset = m_offset - sizeof(struct user_pt_regs);
6860fceef80STodd Fiala             if (offset > sizeof(struct user_fpsimd_state))
6870fceef80STodd Fiala             {
6880fceef80STodd Fiala                 m_result = false;
6890fceef80STodd Fiala             }
6900fceef80STodd Fiala             else
6910fceef80STodd Fiala             {
6920fceef80STodd Fiala                 elf_fpregset_t regs;
6930fceef80STodd Fiala                 int regset = NT_FPREGSET;
6940fceef80STodd Fiala                 struct iovec ioVec;
6950fceef80STodd Fiala 
6960fceef80STodd Fiala                 ioVec.iov_base = &regs;
6970fceef80STodd Fiala                 ioVec.iov_len = sizeof regs;
6980fceef80STodd Fiala                 if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
6990fceef80STodd Fiala                     m_result = false;
7000fceef80STodd Fiala                 else
7010fceef80STodd Fiala                 {
7020fceef80STodd Fiala                     ::memcpy((void *)(((unsigned char *)(&regs)) + offset), m_value.GetBytes(), 16);
7030fceef80STodd Fiala                     if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7040fceef80STodd Fiala                         m_result = false;
7050fceef80STodd Fiala                     else
7060fceef80STodd Fiala                         m_result = true;
7070fceef80STodd Fiala                 }
7080fceef80STodd Fiala             }
7090fceef80STodd Fiala         }
7100fceef80STodd Fiala         else
7110fceef80STodd Fiala         {
7120fceef80STodd Fiala             elf_gregset_t regs;
7130fceef80STodd Fiala             int regset = NT_PRSTATUS;
7140fceef80STodd Fiala             struct iovec ioVec;
7150fceef80STodd Fiala 
7160fceef80STodd Fiala             ioVec.iov_base = &regs;
7170fceef80STodd Fiala             ioVec.iov_len = sizeof regs;
7180fceef80STodd Fiala             if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7190fceef80STodd Fiala                 m_result = false;
7200fceef80STodd Fiala             else
7210fceef80STodd Fiala             {
7220fceef80STodd Fiala                 ::memcpy((void *)(((unsigned char *)(&regs)) + m_offset), m_value.GetBytes(), 8);
7230fceef80STodd Fiala                 if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, sizeof regs) < 0)
7240fceef80STodd Fiala                     m_result = false;
7250fceef80STodd Fiala                 else
7260fceef80STodd Fiala                     m_result = true;
7270fceef80STodd Fiala             }
7280fceef80STodd Fiala         }
7290fceef80STodd Fiala #else
730af245d11STodd Fiala         void* buf;
731af245d11STodd Fiala         Log *log (ProcessPOSIXLog::GetLogIfAllCategoriesSet (POSIX_LOG_REGISTERS));
732af245d11STodd Fiala 
733af245d11STodd Fiala         buf = (void*) m_value.GetAsUInt64();
734af245d11STodd Fiala 
735af245d11STodd Fiala         if (log)
736af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() reg %s: %p", __FUNCTION__, m_reg_name, buf);
737af245d11STodd Fiala         if (PTRACE(PTRACE_POKEUSER, m_tid, (void*)m_offset, buf, 0))
738af245d11STodd Fiala             m_result = false;
739af245d11STodd Fiala         else
740af245d11STodd Fiala             m_result = true;
7410fceef80STodd Fiala #endif
742af245d11STodd Fiala     }
743af245d11STodd Fiala 
744af245d11STodd Fiala     //------------------------------------------------------------------------------
745af245d11STodd Fiala     /// @class ReadGPROperation
746af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadGPR.
747af245d11STodd Fiala     class ReadGPROperation : public Operation
748af245d11STodd Fiala     {
749af245d11STodd Fiala     public:
750af245d11STodd Fiala         ReadGPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
751af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
752af245d11STodd Fiala             { }
753af245d11STodd Fiala 
754af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
755af245d11STodd Fiala 
756af245d11STodd Fiala     private:
757af245d11STodd Fiala         lldb::tid_t m_tid;
758af245d11STodd Fiala         void *m_buf;
759af245d11STodd Fiala         size_t m_buf_size;
760af245d11STodd Fiala         bool &m_result;
761af245d11STodd Fiala     };
762af245d11STodd Fiala 
763af245d11STodd Fiala     void
764af245d11STodd Fiala     ReadGPROperation::Execute(NativeProcessLinux *monitor)
765af245d11STodd Fiala     {
7666ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
7676ac1be4bSTodd Fiala         int regset = NT_PRSTATUS;
7686ac1be4bSTodd Fiala         struct iovec ioVec;
7696ac1be4bSTodd Fiala 
7706ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
7716ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
7726ac1be4bSTodd Fiala         if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
7736ac1be4bSTodd Fiala             m_result = false;
7746ac1be4bSTodd Fiala         else
7756ac1be4bSTodd Fiala             m_result = true;
7766ac1be4bSTodd Fiala #else
777af245d11STodd Fiala         if (PTRACE(PTRACE_GETREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
778af245d11STodd Fiala             m_result = false;
779af245d11STodd Fiala         else
780af245d11STodd Fiala             m_result = true;
7816ac1be4bSTodd Fiala #endif
782af245d11STodd Fiala     }
783af245d11STodd Fiala 
784af245d11STodd Fiala     //------------------------------------------------------------------------------
785af245d11STodd Fiala     /// @class ReadFPROperation
786af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadFPR.
787af245d11STodd Fiala     class ReadFPROperation : public Operation
788af245d11STodd Fiala     {
789af245d11STodd Fiala     public:
790af245d11STodd Fiala         ReadFPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
791af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
792af245d11STodd Fiala             { }
793af245d11STodd Fiala 
794af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
795af245d11STodd Fiala 
796af245d11STodd Fiala     private:
797af245d11STodd Fiala         lldb::tid_t m_tid;
798af245d11STodd Fiala         void *m_buf;
799af245d11STodd Fiala         size_t m_buf_size;
800af245d11STodd Fiala         bool &m_result;
801af245d11STodd Fiala     };
802af245d11STodd Fiala 
803af245d11STodd Fiala     void
804af245d11STodd Fiala     ReadFPROperation::Execute(NativeProcessLinux *monitor)
805af245d11STodd Fiala     {
8066ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
8076ac1be4bSTodd Fiala         int regset = NT_FPREGSET;
8086ac1be4bSTodd Fiala         struct iovec ioVec;
8096ac1be4bSTodd Fiala 
8106ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
8116ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
8126ac1be4bSTodd Fiala         if (PTRACE(PTRACE_GETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
8136ac1be4bSTodd Fiala             m_result = false;
8146ac1be4bSTodd Fiala         else
8156ac1be4bSTodd Fiala             m_result = true;
8166ac1be4bSTodd Fiala #else
817af245d11STodd Fiala         if (PTRACE(PTRACE_GETFPREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
818af245d11STodd Fiala             m_result = false;
819af245d11STodd Fiala         else
820af245d11STodd Fiala             m_result = true;
8216ac1be4bSTodd Fiala #endif
822af245d11STodd Fiala     }
823af245d11STodd Fiala 
824af245d11STodd Fiala     //------------------------------------------------------------------------------
825af245d11STodd Fiala     /// @class ReadRegisterSetOperation
826af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::ReadRegisterSet.
827af245d11STodd Fiala     class ReadRegisterSetOperation : public Operation
828af245d11STodd Fiala     {
829af245d11STodd Fiala     public:
830af245d11STodd Fiala         ReadRegisterSetOperation(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset, bool &result)
831af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_regset(regset), m_result(result)
832af245d11STodd Fiala             { }
833af245d11STodd Fiala 
834af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
835af245d11STodd Fiala 
836af245d11STodd Fiala     private:
837af245d11STodd Fiala         lldb::tid_t m_tid;
838af245d11STodd Fiala         void *m_buf;
839af245d11STodd Fiala         size_t m_buf_size;
840af245d11STodd Fiala         const unsigned int m_regset;
841af245d11STodd Fiala         bool &m_result;
842af245d11STodd Fiala     };
843af245d11STodd Fiala 
844af245d11STodd Fiala     void
845af245d11STodd Fiala     ReadRegisterSetOperation::Execute(NativeProcessLinux *monitor)
846af245d11STodd Fiala     {
847af245d11STodd Fiala         if (PTRACE(PTRACE_GETREGSET, m_tid, (void *)&m_regset, m_buf, m_buf_size) < 0)
848af245d11STodd Fiala             m_result = false;
849af245d11STodd Fiala         else
850af245d11STodd Fiala             m_result = true;
851af245d11STodd Fiala     }
852af245d11STodd Fiala 
853af245d11STodd Fiala     //------------------------------------------------------------------------------
854af245d11STodd Fiala     /// @class WriteGPROperation
855af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteGPR.
856af245d11STodd Fiala     class WriteGPROperation : public Operation
857af245d11STodd Fiala     {
858af245d11STodd Fiala     public:
859af245d11STodd Fiala         WriteGPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
860af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
861af245d11STodd Fiala             { }
862af245d11STodd Fiala 
863af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
864af245d11STodd Fiala 
865af245d11STodd Fiala     private:
866af245d11STodd Fiala         lldb::tid_t m_tid;
867af245d11STodd Fiala         void *m_buf;
868af245d11STodd Fiala         size_t m_buf_size;
869af245d11STodd Fiala         bool &m_result;
870af245d11STodd Fiala     };
871af245d11STodd Fiala 
872af245d11STodd Fiala     void
873af245d11STodd Fiala     WriteGPROperation::Execute(NativeProcessLinux *monitor)
874af245d11STodd Fiala     {
8756ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
8766ac1be4bSTodd Fiala         int regset = NT_PRSTATUS;
8776ac1be4bSTodd Fiala         struct iovec ioVec;
8786ac1be4bSTodd Fiala 
8796ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
8806ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
8816ac1be4bSTodd Fiala         if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
8826ac1be4bSTodd Fiala             m_result = false;
8836ac1be4bSTodd Fiala         else
8846ac1be4bSTodd Fiala             m_result = true;
8856ac1be4bSTodd Fiala #else
886af245d11STodd Fiala         if (PTRACE(PTRACE_SETREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
887af245d11STodd Fiala             m_result = false;
888af245d11STodd Fiala         else
889af245d11STodd Fiala             m_result = true;
8906ac1be4bSTodd Fiala #endif
891af245d11STodd Fiala     }
892af245d11STodd Fiala 
893af245d11STodd Fiala     //------------------------------------------------------------------------------
894af245d11STodd Fiala     /// @class WriteFPROperation
895af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteFPR.
896af245d11STodd Fiala     class WriteFPROperation : public Operation
897af245d11STodd Fiala     {
898af245d11STodd Fiala     public:
899af245d11STodd Fiala         WriteFPROperation(lldb::tid_t tid, void *buf, size_t buf_size, bool &result)
900af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_result(result)
901af245d11STodd Fiala             { }
902af245d11STodd Fiala 
903af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
904af245d11STodd Fiala 
905af245d11STodd Fiala     private:
906af245d11STodd Fiala         lldb::tid_t m_tid;
907af245d11STodd Fiala         void *m_buf;
908af245d11STodd Fiala         size_t m_buf_size;
909af245d11STodd Fiala         bool &m_result;
910af245d11STodd Fiala     };
911af245d11STodd Fiala 
912af245d11STodd Fiala     void
913af245d11STodd Fiala     WriteFPROperation::Execute(NativeProcessLinux *monitor)
914af245d11STodd Fiala     {
9156ac1be4bSTodd Fiala #if defined (__arm64__) || defined (__aarch64__)
9166ac1be4bSTodd Fiala         int regset = NT_FPREGSET;
9176ac1be4bSTodd Fiala         struct iovec ioVec;
9186ac1be4bSTodd Fiala 
9196ac1be4bSTodd Fiala         ioVec.iov_base = m_buf;
9206ac1be4bSTodd Fiala         ioVec.iov_len = m_buf_size;
9216ac1be4bSTodd Fiala         if (PTRACE(PTRACE_SETREGSET, m_tid, &regset, &ioVec, m_buf_size) < 0)
9226ac1be4bSTodd Fiala             m_result = false;
9236ac1be4bSTodd Fiala         else
9246ac1be4bSTodd Fiala             m_result = true;
9256ac1be4bSTodd Fiala #else
926af245d11STodd Fiala         if (PTRACE(PTRACE_SETFPREGS, m_tid, NULL, m_buf, m_buf_size) < 0)
927af245d11STodd Fiala             m_result = false;
928af245d11STodd Fiala         else
929af245d11STodd Fiala             m_result = true;
9306ac1be4bSTodd Fiala #endif
931af245d11STodd Fiala     }
932af245d11STodd Fiala 
933af245d11STodd Fiala     //------------------------------------------------------------------------------
934af245d11STodd Fiala     /// @class WriteRegisterSetOperation
935af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::WriteRegisterSet.
936af245d11STodd Fiala     class WriteRegisterSetOperation : public Operation
937af245d11STodd Fiala     {
938af245d11STodd Fiala     public:
939af245d11STodd Fiala         WriteRegisterSetOperation(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset, bool &result)
940af245d11STodd Fiala             : m_tid(tid), m_buf(buf), m_buf_size(buf_size), m_regset(regset), m_result(result)
941af245d11STodd Fiala             { }
942af245d11STodd Fiala 
943af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
944af245d11STodd Fiala 
945af245d11STodd Fiala     private:
946af245d11STodd Fiala         lldb::tid_t m_tid;
947af245d11STodd Fiala         void *m_buf;
948af245d11STodd Fiala         size_t m_buf_size;
949af245d11STodd Fiala         const unsigned int m_regset;
950af245d11STodd Fiala         bool &m_result;
951af245d11STodd Fiala     };
952af245d11STodd Fiala 
953af245d11STodd Fiala     void
954af245d11STodd Fiala     WriteRegisterSetOperation::Execute(NativeProcessLinux *monitor)
955af245d11STodd Fiala     {
956af245d11STodd Fiala         if (PTRACE(PTRACE_SETREGSET, m_tid, (void *)&m_regset, m_buf, m_buf_size) < 0)
957af245d11STodd Fiala             m_result = false;
958af245d11STodd Fiala         else
959af245d11STodd Fiala             m_result = true;
960af245d11STodd Fiala     }
961af245d11STodd Fiala 
962af245d11STodd Fiala     //------------------------------------------------------------------------------
963af245d11STodd Fiala     /// @class ResumeOperation
964af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::Resume.
965af245d11STodd Fiala     class ResumeOperation : public Operation
966af245d11STodd Fiala     {
967af245d11STodd Fiala     public:
968af245d11STodd Fiala         ResumeOperation(lldb::tid_t tid, uint32_t signo, bool &result) :
969af245d11STodd Fiala             m_tid(tid), m_signo(signo), m_result(result) { }
970af245d11STodd Fiala 
971af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
972af245d11STodd Fiala 
973af245d11STodd Fiala     private:
974af245d11STodd Fiala         lldb::tid_t m_tid;
975af245d11STodd Fiala         uint32_t m_signo;
976af245d11STodd Fiala         bool &m_result;
977af245d11STodd Fiala     };
978af245d11STodd Fiala 
979af245d11STodd Fiala     void
980af245d11STodd Fiala     ResumeOperation::Execute(NativeProcessLinux *monitor)
981af245d11STodd Fiala     {
982af245d11STodd Fiala         intptr_t data = 0;
983af245d11STodd Fiala 
984af245d11STodd Fiala         if (m_signo != LLDB_INVALID_SIGNAL_NUMBER)
985af245d11STodd Fiala             data = m_signo;
986af245d11STodd Fiala 
987af245d11STodd Fiala         if (PTRACE(PTRACE_CONT, m_tid, NULL, (void*)data, 0))
988af245d11STodd Fiala         {
989af245d11STodd Fiala             Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
990af245d11STodd Fiala 
991af245d11STodd Fiala             if (log)
992af245d11STodd Fiala                 log->Printf ("ResumeOperation (%"  PRIu64 ") failed: %s", m_tid, strerror(errno));
993af245d11STodd Fiala             m_result = false;
994af245d11STodd Fiala         }
995af245d11STodd Fiala         else
996af245d11STodd Fiala             m_result = true;
997af245d11STodd Fiala     }
998af245d11STodd Fiala 
999af245d11STodd Fiala     //------------------------------------------------------------------------------
1000af245d11STodd Fiala     /// @class SingleStepOperation
1001af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::SingleStep.
1002af245d11STodd Fiala     class SingleStepOperation : public Operation
1003af245d11STodd Fiala     {
1004af245d11STodd Fiala     public:
1005af245d11STodd Fiala         SingleStepOperation(lldb::tid_t tid, uint32_t signo, bool &result)
1006af245d11STodd Fiala             : m_tid(tid), m_signo(signo), m_result(result) { }
1007af245d11STodd Fiala 
1008af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1009af245d11STodd Fiala 
1010af245d11STodd Fiala     private:
1011af245d11STodd Fiala         lldb::tid_t m_tid;
1012af245d11STodd Fiala         uint32_t m_signo;
1013af245d11STodd Fiala         bool &m_result;
1014af245d11STodd Fiala     };
1015af245d11STodd Fiala 
1016af245d11STodd Fiala     void
1017af245d11STodd Fiala     SingleStepOperation::Execute(NativeProcessLinux *monitor)
1018af245d11STodd Fiala     {
1019af245d11STodd Fiala         intptr_t data = 0;
1020af245d11STodd Fiala 
1021af245d11STodd Fiala         if (m_signo != LLDB_INVALID_SIGNAL_NUMBER)
1022af245d11STodd Fiala             data = m_signo;
1023af245d11STodd Fiala 
1024af245d11STodd Fiala         if (PTRACE(PTRACE_SINGLESTEP, m_tid, NULL, (void*)data, 0))
1025af245d11STodd Fiala             m_result = false;
1026af245d11STodd Fiala         else
1027af245d11STodd Fiala             m_result = true;
1028af245d11STodd Fiala     }
1029af245d11STodd Fiala 
1030af245d11STodd Fiala     //------------------------------------------------------------------------------
1031af245d11STodd Fiala     /// @class SiginfoOperation
1032af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::GetSignalInfo.
1033af245d11STodd Fiala     class SiginfoOperation : public Operation
1034af245d11STodd Fiala     {
1035af245d11STodd Fiala     public:
1036af245d11STodd Fiala         SiginfoOperation(lldb::tid_t tid, void *info, bool &result, int &ptrace_err)
1037af245d11STodd Fiala             : m_tid(tid), m_info(info), m_result(result), m_err(ptrace_err) { }
1038af245d11STodd Fiala 
1039af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1040af245d11STodd Fiala 
1041af245d11STodd Fiala     private:
1042af245d11STodd Fiala         lldb::tid_t m_tid;
1043af245d11STodd Fiala         void *m_info;
1044af245d11STodd Fiala         bool &m_result;
1045af245d11STodd Fiala         int &m_err;
1046af245d11STodd Fiala     };
1047af245d11STodd Fiala 
1048af245d11STodd Fiala     void
1049af245d11STodd Fiala     SiginfoOperation::Execute(NativeProcessLinux *monitor)
1050af245d11STodd Fiala     {
1051af245d11STodd Fiala         if (PTRACE(PTRACE_GETSIGINFO, m_tid, NULL, m_info, 0)) {
1052af245d11STodd Fiala             m_result = false;
1053af245d11STodd Fiala             m_err = errno;
1054af245d11STodd Fiala         }
1055af245d11STodd Fiala         else
1056af245d11STodd Fiala             m_result = true;
1057af245d11STodd Fiala     }
1058af245d11STodd Fiala 
1059af245d11STodd Fiala     //------------------------------------------------------------------------------
1060af245d11STodd Fiala     /// @class EventMessageOperation
1061af245d11STodd Fiala     /// @brief Implements NativeProcessLinux::GetEventMessage.
1062af245d11STodd Fiala     class EventMessageOperation : public Operation
1063af245d11STodd Fiala     {
1064af245d11STodd Fiala     public:
1065af245d11STodd Fiala         EventMessageOperation(lldb::tid_t tid, unsigned long *message, bool &result)
1066af245d11STodd Fiala             : m_tid(tid), m_message(message), m_result(result) { }
1067af245d11STodd Fiala 
1068af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1069af245d11STodd Fiala 
1070af245d11STodd Fiala     private:
1071af245d11STodd Fiala         lldb::tid_t m_tid;
1072af245d11STodd Fiala         unsigned long *m_message;
1073af245d11STodd Fiala         bool &m_result;
1074af245d11STodd Fiala     };
1075af245d11STodd Fiala 
1076af245d11STodd Fiala     void
1077af245d11STodd Fiala     EventMessageOperation::Execute(NativeProcessLinux *monitor)
1078af245d11STodd Fiala     {
1079af245d11STodd Fiala         if (PTRACE(PTRACE_GETEVENTMSG, m_tid, NULL, m_message, 0))
1080af245d11STodd Fiala             m_result = false;
1081af245d11STodd Fiala         else
1082af245d11STodd Fiala             m_result = true;
1083af245d11STodd Fiala     }
1084af245d11STodd Fiala 
1085af245d11STodd Fiala     class DetachOperation : public Operation
1086af245d11STodd Fiala     {
1087af245d11STodd Fiala     public:
1088af245d11STodd Fiala         DetachOperation(lldb::tid_t tid, Error &result) : m_tid(tid), m_error(result) { }
1089af245d11STodd Fiala 
1090af245d11STodd Fiala         void Execute(NativeProcessLinux *monitor);
1091af245d11STodd Fiala 
1092af245d11STodd Fiala     private:
1093af245d11STodd Fiala         lldb::tid_t m_tid;
1094af245d11STodd Fiala         Error &m_error;
1095af245d11STodd Fiala     };
1096af245d11STodd Fiala 
1097af245d11STodd Fiala     void
1098af245d11STodd Fiala     DetachOperation::Execute(NativeProcessLinux *monitor)
1099af245d11STodd Fiala     {
1100af245d11STodd Fiala         if (ptrace(PT_DETACH, m_tid, NULL, 0) < 0)
1101af245d11STodd Fiala             m_error.SetErrorToErrno();
1102af245d11STodd Fiala     }
1103af245d11STodd Fiala 
1104af245d11STodd Fiala }
1105af245d11STodd Fiala 
1106af245d11STodd Fiala using namespace lldb_private;
1107af245d11STodd Fiala 
1108af245d11STodd Fiala // Simple helper function to ensure flags are enabled on the given file
1109af245d11STodd Fiala // descriptor.
1110af245d11STodd Fiala static bool
1111af245d11STodd Fiala EnsureFDFlags(int fd, int flags, Error &error)
1112af245d11STodd Fiala {
1113af245d11STodd Fiala     int status;
1114af245d11STodd Fiala 
1115af245d11STodd Fiala     if ((status = fcntl(fd, F_GETFL)) == -1)
1116af245d11STodd Fiala     {
1117af245d11STodd Fiala         error.SetErrorToErrno();
1118af245d11STodd Fiala         return false;
1119af245d11STodd Fiala     }
1120af245d11STodd Fiala 
1121af245d11STodd Fiala     if (fcntl(fd, F_SETFL, status | flags) == -1)
1122af245d11STodd Fiala     {
1123af245d11STodd Fiala         error.SetErrorToErrno();
1124af245d11STodd Fiala         return false;
1125af245d11STodd Fiala     }
1126af245d11STodd Fiala 
1127af245d11STodd Fiala     return true;
1128af245d11STodd Fiala }
1129af245d11STodd Fiala 
1130af245d11STodd Fiala NativeProcessLinux::OperationArgs::OperationArgs(NativeProcessLinux *monitor)
1131af245d11STodd Fiala     : m_monitor(monitor)
1132af245d11STodd Fiala {
1133af245d11STodd Fiala     sem_init(&m_semaphore, 0, 0);
1134af245d11STodd Fiala }
1135af245d11STodd Fiala 
1136af245d11STodd Fiala NativeProcessLinux::OperationArgs::~OperationArgs()
1137af245d11STodd Fiala {
1138af245d11STodd Fiala     sem_destroy(&m_semaphore);
1139af245d11STodd Fiala }
1140af245d11STodd Fiala 
1141af245d11STodd Fiala NativeProcessLinux::LaunchArgs::LaunchArgs(NativeProcessLinux *monitor,
1142af245d11STodd Fiala                                        lldb_private::Module *module,
1143af245d11STodd Fiala                                        char const **argv,
1144af245d11STodd Fiala                                        char const **envp,
114575f47c3aSTodd Fiala                                        const std::string &stdin_path,
114675f47c3aSTodd Fiala                                        const std::string &stdout_path,
114775f47c3aSTodd Fiala                                        const std::string &stderr_path,
11480bce1b67STodd Fiala                                        const char *working_dir,
11490bce1b67STodd Fiala                                        const lldb_private::ProcessLaunchInfo &launch_info)
1150af245d11STodd Fiala     : OperationArgs(monitor),
1151af245d11STodd Fiala       m_module(module),
1152af245d11STodd Fiala       m_argv(argv),
1153af245d11STodd Fiala       m_envp(envp),
1154af245d11STodd Fiala       m_stdin_path(stdin_path),
1155af245d11STodd Fiala       m_stdout_path(stdout_path),
1156af245d11STodd Fiala       m_stderr_path(stderr_path),
11570bce1b67STodd Fiala       m_working_dir(working_dir),
11580bce1b67STodd Fiala       m_launch_info(launch_info)
11590bce1b67STodd Fiala {
11600bce1b67STodd Fiala }
1161af245d11STodd Fiala 
1162af245d11STodd Fiala NativeProcessLinux::LaunchArgs::~LaunchArgs()
1163af245d11STodd Fiala { }
1164af245d11STodd Fiala 
1165af245d11STodd Fiala NativeProcessLinux::AttachArgs::AttachArgs(NativeProcessLinux *monitor,
1166af245d11STodd Fiala                                        lldb::pid_t pid)
1167af245d11STodd Fiala     : OperationArgs(monitor), m_pid(pid) { }
1168af245d11STodd Fiala 
1169af245d11STodd Fiala NativeProcessLinux::AttachArgs::~AttachArgs()
1170af245d11STodd Fiala { }
1171af245d11STodd Fiala 
1172af245d11STodd Fiala // -----------------------------------------------------------------------------
1173af245d11STodd Fiala // Public Static Methods
1174af245d11STodd Fiala // -----------------------------------------------------------------------------
1175af245d11STodd Fiala 
1176af245d11STodd Fiala lldb_private::Error
1177af245d11STodd Fiala NativeProcessLinux::LaunchProcess (
1178af245d11STodd Fiala     lldb_private::Module *exe_module,
1179af245d11STodd Fiala     lldb_private::ProcessLaunchInfo &launch_info,
1180af245d11STodd Fiala     lldb_private::NativeProcessProtocol::NativeDelegate &native_delegate,
1181af245d11STodd Fiala     NativeProcessProtocolSP &native_process_sp)
1182af245d11STodd Fiala {
1183af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1184af245d11STodd Fiala 
1185af245d11STodd Fiala     Error error;
1186af245d11STodd Fiala 
1187af245d11STodd Fiala     // Verify the working directory is valid if one was specified.
1188af245d11STodd Fiala     const char* working_dir = launch_info.GetWorkingDirectory ();
1189af245d11STodd Fiala     if (working_dir)
1190af245d11STodd Fiala     {
1191af245d11STodd Fiala       FileSpec working_dir_fs (working_dir, true);
1192af245d11STodd Fiala       if (!working_dir_fs || working_dir_fs.GetFileType () != FileSpec::eFileTypeDirectory)
1193af245d11STodd Fiala       {
1194af245d11STodd Fiala           error.SetErrorStringWithFormat ("No such file or directory: %s", working_dir);
1195af245d11STodd Fiala           return error;
1196af245d11STodd Fiala       }
1197af245d11STodd Fiala     }
1198af245d11STodd Fiala 
1199696b5287SZachary Turner     const lldb_private::FileAction *file_action;
1200af245d11STodd Fiala 
1201af245d11STodd Fiala     // Default of NULL will mean to use existing open file descriptors.
120275f47c3aSTodd Fiala     std::string stdin_path;
120375f47c3aSTodd Fiala     std::string stdout_path;
120475f47c3aSTodd Fiala     std::string stderr_path;
1205af245d11STodd Fiala 
1206af245d11STodd Fiala     file_action = launch_info.GetFileActionForFD (STDIN_FILENO);
120775f47c3aSTodd Fiala     if (file_action)
120875f47c3aSTodd Fiala         stdin_path = file_action->GetPath ();
1209af245d11STodd Fiala 
1210af245d11STodd Fiala     file_action = launch_info.GetFileActionForFD (STDOUT_FILENO);
121175f47c3aSTodd Fiala     if (file_action)
121275f47c3aSTodd Fiala         stdout_path = file_action->GetPath ();
1213af245d11STodd Fiala 
1214af245d11STodd Fiala     file_action = launch_info.GetFileActionForFD (STDERR_FILENO);
121575f47c3aSTodd Fiala     if (file_action)
121675f47c3aSTodd Fiala         stderr_path = file_action->GetPath ();
121775f47c3aSTodd Fiala 
121875f47c3aSTodd Fiala     if (log)
121975f47c3aSTodd Fiala     {
122075f47c3aSTodd Fiala         if (!stdin_path.empty ())
122175f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s setting STDIN to '%s'", __FUNCTION__, stdin_path.c_str ());
122275f47c3aSTodd Fiala         else
122375f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s leaving STDIN as is", __FUNCTION__);
122475f47c3aSTodd Fiala 
122575f47c3aSTodd Fiala         if (!stdout_path.empty ())
122675f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s setting STDOUT to '%s'", __FUNCTION__, stdout_path.c_str ());
122775f47c3aSTodd Fiala         else
122875f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s leaving STDOUT as is", __FUNCTION__);
122975f47c3aSTodd Fiala 
123075f47c3aSTodd Fiala         if (!stderr_path.empty ())
123175f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s setting STDERR to '%s'", __FUNCTION__, stderr_path.c_str ());
123275f47c3aSTodd Fiala         else
123375f47c3aSTodd Fiala             log->Printf ("NativeProcessLinux::%s leaving STDERR as is", __FUNCTION__);
123475f47c3aSTodd Fiala     }
1235af245d11STodd Fiala 
1236af245d11STodd Fiala     // Create the NativeProcessLinux in launch mode.
1237af245d11STodd Fiala     native_process_sp.reset (new NativeProcessLinux ());
1238af245d11STodd Fiala 
1239af245d11STodd Fiala     if (log)
1240af245d11STodd Fiala     {
1241af245d11STodd Fiala         int i = 0;
1242af245d11STodd Fiala         for (const char **args = launch_info.GetArguments ().GetConstArgumentVector (); *args; ++args, ++i)
1243af245d11STodd Fiala         {
1244af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s arg %d: \"%s\"", __FUNCTION__, i, *args ? *args : "nullptr");
1245af245d11STodd Fiala             ++i;
1246af245d11STodd Fiala         }
1247af245d11STodd Fiala     }
1248af245d11STodd Fiala 
1249af245d11STodd Fiala     if (!native_process_sp->RegisterNativeDelegate (native_delegate))
1250af245d11STodd Fiala     {
1251af245d11STodd Fiala         native_process_sp.reset ();
1252af245d11STodd Fiala         error.SetErrorStringWithFormat ("failed to register the native delegate");
1253af245d11STodd Fiala         return error;
1254af245d11STodd Fiala     }
1255af245d11STodd Fiala 
1256af245d11STodd Fiala     reinterpret_cast<NativeProcessLinux*> (native_process_sp.get ())->LaunchInferior (
1257af245d11STodd Fiala             exe_module,
1258af245d11STodd Fiala             launch_info.GetArguments ().GetConstArgumentVector (),
1259af245d11STodd Fiala             launch_info.GetEnvironmentEntries ().GetConstArgumentVector (),
1260af245d11STodd Fiala             stdin_path,
1261af245d11STodd Fiala             stdout_path,
1262af245d11STodd Fiala             stderr_path,
1263af245d11STodd Fiala             working_dir,
12640bce1b67STodd Fiala             launch_info,
1265af245d11STodd Fiala             error);
1266af245d11STodd Fiala 
1267af245d11STodd Fiala     if (error.Fail ())
1268af245d11STodd Fiala     {
1269af245d11STodd Fiala         native_process_sp.reset ();
1270af245d11STodd Fiala         if (log)
1271af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s failed to launch process: %s", __FUNCTION__, error.AsCString ());
1272af245d11STodd Fiala         return error;
1273af245d11STodd Fiala     }
1274af245d11STodd Fiala 
1275af245d11STodd Fiala     launch_info.SetProcessID (native_process_sp->GetID ());
1276af245d11STodd Fiala 
1277af245d11STodd Fiala     return error;
1278af245d11STodd Fiala }
1279af245d11STodd Fiala 
1280af245d11STodd Fiala lldb_private::Error
1281af245d11STodd Fiala NativeProcessLinux::AttachToProcess (
1282af245d11STodd Fiala     lldb::pid_t pid,
1283af245d11STodd Fiala     lldb_private::NativeProcessProtocol::NativeDelegate &native_delegate,
1284af245d11STodd Fiala     NativeProcessProtocolSP &native_process_sp)
1285af245d11STodd Fiala {
1286af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1287af245d11STodd Fiala     if (log && log->GetMask ().Test (POSIX_LOG_VERBOSE))
1288af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s(pid = %" PRIi64 ")", __FUNCTION__, pid);
1289af245d11STodd Fiala 
1290af245d11STodd Fiala     // Grab the current platform architecture.  This should be Linux,
1291af245d11STodd Fiala     // since this code is only intended to run on a Linux host.
1292615eb7e6SGreg Clayton     PlatformSP platform_sp (Platform::GetHostPlatform ());
1293af245d11STodd Fiala     if (!platform_sp)
1294af245d11STodd Fiala         return Error("failed to get a valid default platform");
1295af245d11STodd Fiala 
1296af245d11STodd Fiala     // Retrieve the architecture for the running process.
1297af245d11STodd Fiala     ArchSpec process_arch;
1298af245d11STodd Fiala     Error error = ResolveProcessArchitecture (pid, *platform_sp.get (), process_arch);
1299af245d11STodd Fiala     if (!error.Success ())
1300af245d11STodd Fiala         return error;
1301af245d11STodd Fiala 
13021339b5e8SOleksiy Vyalov     std::shared_ptr<NativeProcessLinux> native_process_linux_sp (new NativeProcessLinux ());
1303af245d11STodd Fiala 
13041339b5e8SOleksiy Vyalov     if (!native_process_linux_sp->RegisterNativeDelegate (native_delegate))
1305af245d11STodd Fiala     {
1306af245d11STodd Fiala         error.SetErrorStringWithFormat ("failed to register the native delegate");
1307af245d11STodd Fiala         return error;
1308af245d11STodd Fiala     }
1309af245d11STodd Fiala 
13101339b5e8SOleksiy Vyalov     native_process_linux_sp->AttachToInferior (pid, error);
1311af245d11STodd Fiala     if (!error.Success ())
1312af245d11STodd Fiala         return error;
1313af245d11STodd Fiala 
13141339b5e8SOleksiy Vyalov     native_process_sp = native_process_linux_sp;
1315af245d11STodd Fiala     return error;
1316af245d11STodd Fiala }
1317af245d11STodd Fiala 
1318af245d11STodd Fiala // -----------------------------------------------------------------------------
1319af245d11STodd Fiala // Public Instance Methods
1320af245d11STodd Fiala // -----------------------------------------------------------------------------
1321af245d11STodd Fiala 
1322af245d11STodd Fiala NativeProcessLinux::NativeProcessLinux () :
1323af245d11STodd Fiala     NativeProcessProtocol (LLDB_INVALID_PROCESS_ID),
1324af245d11STodd Fiala     m_arch (),
1325af245d11STodd Fiala     m_operation (nullptr),
1326af245d11STodd Fiala     m_operation_mutex (),
1327af245d11STodd Fiala     m_operation_pending (),
1328af245d11STodd Fiala     m_operation_done (),
1329af245d11STodd Fiala     m_wait_for_stop_tids (),
1330af245d11STodd Fiala     m_wait_for_stop_tids_mutex (),
1331511e5cdcSTodd Fiala     m_wait_for_group_stop_tids (),
1332511e5cdcSTodd Fiala     m_group_stop_signal_tid (LLDB_INVALID_THREAD_ID),
1333511e5cdcSTodd Fiala     m_group_stop_signal (LLDB_INVALID_SIGNAL_NUMBER),
1334511e5cdcSTodd Fiala     m_wait_for_group_stop_tids_mutex (),
1335af245d11STodd Fiala     m_supports_mem_region (eLazyBoolCalculate),
1336af245d11STodd Fiala     m_mem_region_cache (),
1337af245d11STodd Fiala     m_mem_region_cache_mutex ()
1338af245d11STodd Fiala {
1339af245d11STodd Fiala }
1340af245d11STodd Fiala 
1341af245d11STodd Fiala //------------------------------------------------------------------------------
1342af245d11STodd Fiala /// The basic design of the NativeProcessLinux is built around two threads.
1343af245d11STodd Fiala ///
1344af245d11STodd Fiala /// One thread (@see SignalThread) simply blocks on a call to waitpid() looking
1345af245d11STodd Fiala /// for changes in the debugee state.  When a change is detected a
1346af245d11STodd Fiala /// ProcessMessage is sent to the associated ProcessLinux instance.  This thread
1347af245d11STodd Fiala /// "drives" state changes in the debugger.
1348af245d11STodd Fiala ///
1349af245d11STodd Fiala /// The second thread (@see OperationThread) is responsible for two things 1)
1350af245d11STodd Fiala /// launching or attaching to the inferior process, and then 2) servicing
1351af245d11STodd Fiala /// operations such as register reads/writes, stepping, etc.  See the comments
1352af245d11STodd Fiala /// on the Operation class for more info as to why this is needed.
1353af245d11STodd Fiala void
1354af245d11STodd Fiala NativeProcessLinux::LaunchInferior (
1355af245d11STodd Fiala     Module *module,
1356af245d11STodd Fiala     const char *argv[],
1357af245d11STodd Fiala     const char *envp[],
135875f47c3aSTodd Fiala     const std::string &stdin_path,
135975f47c3aSTodd Fiala     const std::string &stdout_path,
136075f47c3aSTodd Fiala     const std::string &stderr_path,
1361af245d11STodd Fiala     const char *working_dir,
13620bce1b67STodd Fiala     const lldb_private::ProcessLaunchInfo &launch_info,
1363af245d11STodd Fiala     lldb_private::Error &error)
1364af245d11STodd Fiala {
1365af245d11STodd Fiala     if (module)
1366af245d11STodd Fiala         m_arch = module->GetArchitecture ();
1367af245d11STodd Fiala 
1368af245d11STodd Fiala     SetState(eStateLaunching);
1369af245d11STodd Fiala 
1370af245d11STodd Fiala     std::unique_ptr<LaunchArgs> args(
1371af245d11STodd Fiala         new LaunchArgs(
1372af245d11STodd Fiala             this, module, argv, envp,
1373af245d11STodd Fiala             stdin_path, stdout_path, stderr_path,
13740bce1b67STodd Fiala             working_dir, launch_info));
1375af245d11STodd Fiala 
1376af245d11STodd Fiala     sem_init(&m_operation_pending, 0, 0);
1377af245d11STodd Fiala     sem_init(&m_operation_done, 0, 0);
1378af245d11STodd Fiala 
1379af245d11STodd Fiala     StartLaunchOpThread(args.get(), error);
1380af245d11STodd Fiala     if (!error.Success())
1381af245d11STodd Fiala         return;
1382af245d11STodd Fiala 
1383af245d11STodd Fiala WAIT_AGAIN:
1384af245d11STodd Fiala     // Wait for the operation thread to initialize.
1385af245d11STodd Fiala     if (sem_wait(&args->m_semaphore))
1386af245d11STodd Fiala     {
1387af245d11STodd Fiala         if (errno == EINTR)
1388af245d11STodd Fiala             goto WAIT_AGAIN;
1389af245d11STodd Fiala         else
1390af245d11STodd Fiala         {
1391af245d11STodd Fiala             error.SetErrorToErrno();
1392af245d11STodd Fiala             return;
1393af245d11STodd Fiala         }
1394af245d11STodd Fiala     }
1395af245d11STodd Fiala 
1396af245d11STodd Fiala     // Check that the launch was a success.
1397af245d11STodd Fiala     if (!args->m_error.Success())
1398af245d11STodd Fiala     {
1399af245d11STodd Fiala         StopOpThread();
1400af245d11STodd Fiala         error = args->m_error;
1401af245d11STodd Fiala         return;
1402af245d11STodd Fiala     }
1403af245d11STodd Fiala 
1404af245d11STodd Fiala     // Finally, start monitoring the child process for change in state.
1405af245d11STodd Fiala     m_monitor_thread = Host::StartMonitoringChildProcess(
1406af245d11STodd Fiala         NativeProcessLinux::MonitorCallback, this, GetID(), true);
1407acee96aeSZachary Turner     if (!m_monitor_thread.IsJoinable())
1408af245d11STodd Fiala     {
1409af245d11STodd Fiala         error.SetErrorToGenericError();
1410af245d11STodd Fiala         error.SetErrorString ("Process attach failed to create monitor thread for NativeProcessLinux::MonitorCallback.");
1411af245d11STodd Fiala         return;
1412af245d11STodd Fiala     }
1413af245d11STodd Fiala }
1414af245d11STodd Fiala 
1415af245d11STodd Fiala void
1416af245d11STodd Fiala NativeProcessLinux::AttachToInferior (lldb::pid_t pid, lldb_private::Error &error)
1417af245d11STodd Fiala {
1418af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1419af245d11STodd Fiala     if (log)
1420af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 ")", __FUNCTION__, pid);
1421af245d11STodd Fiala 
1422af245d11STodd Fiala     // We can use the Host for everything except the ResolveExecutable portion.
1423615eb7e6SGreg Clayton     PlatformSP platform_sp = Platform::GetHostPlatform ();
1424af245d11STodd Fiala     if (!platform_sp)
1425af245d11STodd Fiala     {
1426af245d11STodd Fiala         if (log)
1427af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 "): no default platform set", __FUNCTION__, pid);
1428af245d11STodd Fiala         error.SetErrorString ("no default platform available");
142950d60be3SShawn Best         return;
1430af245d11STodd Fiala     }
1431af245d11STodd Fiala 
1432af245d11STodd Fiala     // Gather info about the process.
1433af245d11STodd Fiala     ProcessInstanceInfo process_info;
143450d60be3SShawn Best     if (!platform_sp->GetProcessInfo (pid, process_info))
143550d60be3SShawn Best     {
143650d60be3SShawn Best         if (log)
143750d60be3SShawn Best             log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 "): failed to get process info", __FUNCTION__, pid);
143850d60be3SShawn Best         error.SetErrorString ("failed to get process info");
143950d60be3SShawn Best         return;
144050d60be3SShawn Best     }
1441af245d11STodd Fiala 
1442af245d11STodd Fiala     // Resolve the executable module
1443af245d11STodd Fiala     ModuleSP exe_module_sp;
1444af245d11STodd Fiala     FileSpecList executable_search_paths (Target::GetDefaultExecutableSearchPaths());
14456edef204SOleksiy Vyalov     ModuleSpec exe_module_spec(process_info.GetExecutableFile(), HostInfo::GetArchitecture());
14466edef204SOleksiy Vyalov     error = platform_sp->ResolveExecutable(exe_module_spec, exe_module_sp,
1447af245d11STodd Fiala                                            executable_search_paths.GetSize() ? &executable_search_paths : NULL);
1448af245d11STodd Fiala     if (!error.Success())
1449af245d11STodd Fiala         return;
1450af245d11STodd Fiala 
1451af245d11STodd Fiala     // Set the architecture to the exe architecture.
1452af245d11STodd Fiala     m_arch = exe_module_sp->GetArchitecture();
1453af245d11STodd Fiala     if (log)
1454af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s (pid = %" PRIi64 ") detected architecture %s", __FUNCTION__, pid, m_arch.GetArchitectureName ());
1455af245d11STodd Fiala 
1456af245d11STodd Fiala     m_pid = pid;
1457af245d11STodd Fiala     SetState(eStateAttaching);
1458af245d11STodd Fiala 
1459af245d11STodd Fiala     sem_init (&m_operation_pending, 0, 0);
1460af245d11STodd Fiala     sem_init (&m_operation_done, 0, 0);
1461af245d11STodd Fiala 
1462af245d11STodd Fiala     std::unique_ptr<AttachArgs> args (new AttachArgs (this, pid));
1463af245d11STodd Fiala 
1464af245d11STodd Fiala     StartAttachOpThread(args.get (), error);
1465af245d11STodd Fiala     if (!error.Success ())
1466af245d11STodd Fiala         return;
1467af245d11STodd Fiala 
1468af245d11STodd Fiala WAIT_AGAIN:
1469af245d11STodd Fiala     // Wait for the operation thread to initialize.
1470af245d11STodd Fiala     if (sem_wait (&args->m_semaphore))
1471af245d11STodd Fiala     {
1472af245d11STodd Fiala         if (errno == EINTR)
1473af245d11STodd Fiala             goto WAIT_AGAIN;
1474af245d11STodd Fiala         else
1475af245d11STodd Fiala         {
1476af245d11STodd Fiala             error.SetErrorToErrno ();
1477af245d11STodd Fiala             return;
1478af245d11STodd Fiala         }
1479af245d11STodd Fiala     }
1480af245d11STodd Fiala 
1481af245d11STodd Fiala     // Check that the attach was a success.
1482af245d11STodd Fiala     if (!args->m_error.Success ())
1483af245d11STodd Fiala     {
1484af245d11STodd Fiala         StopOpThread ();
1485af245d11STodd Fiala         error = args->m_error;
1486af245d11STodd Fiala         return;
1487af245d11STodd Fiala     }
1488af245d11STodd Fiala 
1489af245d11STodd Fiala     // Finally, start monitoring the child process for change in state.
1490af245d11STodd Fiala     m_monitor_thread = Host::StartMonitoringChildProcess (
1491af245d11STodd Fiala         NativeProcessLinux::MonitorCallback, this, GetID (), true);
1492acee96aeSZachary Turner     if (!m_monitor_thread.IsJoinable())
1493af245d11STodd Fiala     {
1494af245d11STodd Fiala         error.SetErrorToGenericError ();
1495af245d11STodd Fiala         error.SetErrorString ("Process attach failed to create monitor thread for NativeProcessLinux::MonitorCallback.");
1496af245d11STodd Fiala         return;
1497af245d11STodd Fiala     }
1498af245d11STodd Fiala }
1499af245d11STodd Fiala 
1500af245d11STodd Fiala NativeProcessLinux::~NativeProcessLinux()
1501af245d11STodd Fiala {
1502af245d11STodd Fiala     StopMonitor();
1503af245d11STodd Fiala }
1504af245d11STodd Fiala 
1505af245d11STodd Fiala //------------------------------------------------------------------------------
1506af245d11STodd Fiala // Thread setup and tear down.
1507af245d11STodd Fiala 
1508af245d11STodd Fiala void
1509af245d11STodd Fiala NativeProcessLinux::StartLaunchOpThread(LaunchArgs *args, Error &error)
1510af245d11STodd Fiala {
1511af245d11STodd Fiala     static const char *g_thread_name = "lldb.process.nativelinux.operation";
1512af245d11STodd Fiala 
1513acee96aeSZachary Turner     if (m_operation_thread.IsJoinable())
1514af245d11STodd Fiala         return;
1515af245d11STodd Fiala 
151639de3110SZachary Turner     m_operation_thread = ThreadLauncher::LaunchThread(g_thread_name, LaunchOpThread, args, &error);
1517af245d11STodd Fiala }
1518af245d11STodd Fiala 
1519af245d11STodd Fiala void *
1520af245d11STodd Fiala NativeProcessLinux::LaunchOpThread(void *arg)
1521af245d11STodd Fiala {
1522af245d11STodd Fiala     LaunchArgs *args = static_cast<LaunchArgs*>(arg);
1523af245d11STodd Fiala 
1524af245d11STodd Fiala     if (!Launch(args)) {
1525af245d11STodd Fiala         sem_post(&args->m_semaphore);
1526af245d11STodd Fiala         return NULL;
1527af245d11STodd Fiala     }
1528af245d11STodd Fiala 
1529af245d11STodd Fiala     ServeOperation(args);
1530af245d11STodd Fiala     return NULL;
1531af245d11STodd Fiala }
1532af245d11STodd Fiala 
1533af245d11STodd Fiala bool
1534af245d11STodd Fiala NativeProcessLinux::Launch(LaunchArgs *args)
1535af245d11STodd Fiala {
15360bce1b67STodd Fiala     assert (args && "null args");
15370bce1b67STodd Fiala     if (!args)
15380bce1b67STodd Fiala         return false;
15390bce1b67STodd Fiala 
1540af245d11STodd Fiala     NativeProcessLinux *monitor = args->m_monitor;
1541af245d11STodd Fiala     assert (monitor && "monitor is NULL");
1542af245d11STodd Fiala     if (!monitor)
1543af245d11STodd Fiala         return false;
1544af245d11STodd Fiala 
1545af245d11STodd Fiala     const char **argv = args->m_argv;
1546af245d11STodd Fiala     const char **envp = args->m_envp;
1547af245d11STodd Fiala     const char *working_dir = args->m_working_dir;
1548af245d11STodd Fiala 
1549af245d11STodd Fiala     lldb_utility::PseudoTerminal terminal;
1550af245d11STodd Fiala     const size_t err_len = 1024;
1551af245d11STodd Fiala     char err_str[err_len];
1552af245d11STodd Fiala     lldb::pid_t pid;
1553af245d11STodd Fiala     NativeThreadProtocolSP thread_sp;
1554af245d11STodd Fiala 
1555af245d11STodd Fiala     lldb::ThreadSP inferior;
1556af245d11STodd Fiala 
1557af245d11STodd Fiala     // Propagate the environment if one is not supplied.
1558af245d11STodd Fiala     if (envp == NULL || envp[0] == NULL)
1559af245d11STodd Fiala         envp = const_cast<const char **>(environ);
1560af245d11STodd Fiala 
1561af245d11STodd Fiala     if ((pid = terminal.Fork(err_str, err_len)) == static_cast<lldb::pid_t> (-1))
1562af245d11STodd Fiala     {
1563af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1564af245d11STodd Fiala         args->m_error.SetErrorString("Process fork failed.");
156575f47c3aSTodd Fiala         return false;
1566af245d11STodd Fiala     }
1567af245d11STodd Fiala 
1568af245d11STodd Fiala     // Recognized child exit status codes.
1569af245d11STodd Fiala     enum {
1570af245d11STodd Fiala         ePtraceFailed = 1,
1571af245d11STodd Fiala         eDupStdinFailed,
1572af245d11STodd Fiala         eDupStdoutFailed,
1573af245d11STodd Fiala         eDupStderrFailed,
1574af245d11STodd Fiala         eChdirFailed,
1575af245d11STodd Fiala         eExecFailed,
1576af245d11STodd Fiala         eSetGidFailed
1577af245d11STodd Fiala     };
1578af245d11STodd Fiala 
1579af245d11STodd Fiala     // Child process.
1580af245d11STodd Fiala     if (pid == 0)
1581af245d11STodd Fiala     {
158275f47c3aSTodd Fiala         // FIXME consider opening a pipe between parent/child and have this forked child
158375f47c3aSTodd Fiala         // send log info to parent re: launch status, in place of the log lines removed here.
1584af245d11STodd Fiala 
158575f47c3aSTodd Fiala         // Start tracing this child that is about to exec.
1586af245d11STodd Fiala         if (PTRACE(PTRACE_TRACEME, 0, NULL, NULL, 0) < 0)
1587af245d11STodd Fiala             exit(ePtraceFailed);
1588af245d11STodd Fiala 
1589af245d11STodd Fiala         // Do not inherit setgid powers.
1590af245d11STodd Fiala         if (setgid(getgid()) != 0)
1591af245d11STodd Fiala             exit(eSetGidFailed);
1592af245d11STodd Fiala 
1593af245d11STodd Fiala         // Attempt to have our own process group.
1594af245d11STodd Fiala         if (setpgid(0, 0) != 0)
1595af245d11STodd Fiala         {
159675f47c3aSTodd Fiala             // FIXME log that this failed. This is common.
1597af245d11STodd Fiala             // Don't allow this to prevent an inferior exec.
1598af245d11STodd Fiala         }
1599af245d11STodd Fiala 
1600af245d11STodd Fiala         // Dup file descriptors if needed.
160175f47c3aSTodd Fiala         if (!args->m_stdin_path.empty ())
160275f47c3aSTodd Fiala             if (!DupDescriptor(args->m_stdin_path.c_str (), STDIN_FILENO, O_RDONLY))
1603af245d11STodd Fiala                 exit(eDupStdinFailed);
1604af245d11STodd Fiala 
160575f47c3aSTodd Fiala         if (!args->m_stdout_path.empty ())
160675f47c3aSTodd Fiala             if (!DupDescriptor(args->m_stdout_path.c_str (), STDOUT_FILENO, O_WRONLY | O_CREAT))
1607af245d11STodd Fiala                 exit(eDupStdoutFailed);
1608af245d11STodd Fiala 
160975f47c3aSTodd Fiala         if (!args->m_stderr_path.empty ())
161075f47c3aSTodd Fiala             if (!DupDescriptor(args->m_stderr_path.c_str (), STDERR_FILENO, O_WRONLY | O_CREAT))
1611af245d11STodd Fiala                 exit(eDupStderrFailed);
1612af245d11STodd Fiala 
1613af245d11STodd Fiala         // Change working directory
1614af245d11STodd Fiala         if (working_dir != NULL && working_dir[0])
1615af245d11STodd Fiala           if (0 != ::chdir(working_dir))
1616af245d11STodd Fiala               exit(eChdirFailed);
1617af245d11STodd Fiala 
16180bce1b67STodd Fiala         // Disable ASLR if requested.
16190bce1b67STodd Fiala         if (args->m_launch_info.GetFlags ().Test (lldb::eLaunchFlagDisableASLR))
16200bce1b67STodd Fiala         {
16210bce1b67STodd Fiala             const int old_personality = personality (LLDB_PERSONALITY_GET_CURRENT_SETTINGS);
16220bce1b67STodd Fiala             if (old_personality == -1)
16230bce1b67STodd Fiala             {
162475f47c3aSTodd Fiala                 // Can't retrieve Linux personality.  Cannot disable ASLR.
16250bce1b67STodd Fiala             }
16260bce1b67STodd Fiala             else
16270bce1b67STodd Fiala             {
16280bce1b67STodd Fiala                 const int new_personality = personality (ADDR_NO_RANDOMIZE | old_personality);
16290bce1b67STodd Fiala                 if (new_personality == -1)
16300bce1b67STodd Fiala                 {
163175f47c3aSTodd Fiala                     // Disabling ASLR failed.
16320bce1b67STodd Fiala                 }
16330bce1b67STodd Fiala                 else
16340bce1b67STodd Fiala                 {
163575f47c3aSTodd Fiala                     // Disabling ASLR succeeded.
16360bce1b67STodd Fiala                 }
16370bce1b67STodd Fiala             }
16380bce1b67STodd Fiala         }
16390bce1b67STodd Fiala 
164075f47c3aSTodd Fiala         // Execute.  We should never return...
1641af245d11STodd Fiala         execve(argv[0],
1642af245d11STodd Fiala                const_cast<char *const *>(argv),
1643af245d11STodd Fiala                const_cast<char *const *>(envp));
164475f47c3aSTodd Fiala 
164575f47c3aSTodd Fiala         // ...unless exec fails.  In which case we definitely need to end the child here.
1646af245d11STodd Fiala         exit(eExecFailed);
1647af245d11STodd Fiala     }
1648af245d11STodd Fiala 
164975f47c3aSTodd Fiala     //
165075f47c3aSTodd Fiala     // This is the parent code here.
165175f47c3aSTodd Fiala     //
165275f47c3aSTodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
165375f47c3aSTodd Fiala 
1654af245d11STodd Fiala     // Wait for the child process to trap on its call to execve.
1655af245d11STodd Fiala     ::pid_t wpid;
1656af245d11STodd Fiala     int status;
1657af245d11STodd Fiala     if ((wpid = waitpid(pid, &status, 0)) < 0)
1658af245d11STodd Fiala     {
1659af245d11STodd Fiala         args->m_error.SetErrorToErrno();
1660af245d11STodd Fiala 
1661af245d11STodd Fiala         if (log)
1662af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s waitpid for inferior failed with %s", __FUNCTION__, args->m_error.AsCString ());
1663af245d11STodd Fiala 
1664af245d11STodd Fiala         // Mark the inferior as invalid.
1665af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1666af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1667af245d11STodd Fiala 
166875f47c3aSTodd Fiala         return false;
1669af245d11STodd Fiala     }
1670af245d11STodd Fiala     else if (WIFEXITED(status))
1671af245d11STodd Fiala     {
1672af245d11STodd Fiala         // open, dup or execve likely failed for some reason.
1673af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1674af245d11STodd Fiala         switch (WEXITSTATUS(status))
1675af245d11STodd Fiala         {
1676af245d11STodd Fiala             case ePtraceFailed:
1677af245d11STodd Fiala                 args->m_error.SetErrorString("Child ptrace failed.");
1678af245d11STodd Fiala                 break;
1679af245d11STodd Fiala             case eDupStdinFailed:
1680af245d11STodd Fiala                 args->m_error.SetErrorString("Child open stdin failed.");
1681af245d11STodd Fiala                 break;
1682af245d11STodd Fiala             case eDupStdoutFailed:
1683af245d11STodd Fiala                 args->m_error.SetErrorString("Child open stdout failed.");
1684af245d11STodd Fiala                 break;
1685af245d11STodd Fiala             case eDupStderrFailed:
1686af245d11STodd Fiala                 args->m_error.SetErrorString("Child open stderr failed.");
1687af245d11STodd Fiala                 break;
1688af245d11STodd Fiala             case eChdirFailed:
1689af245d11STodd Fiala                 args->m_error.SetErrorString("Child failed to set working directory.");
1690af245d11STodd Fiala                 break;
1691af245d11STodd Fiala             case eExecFailed:
1692af245d11STodd Fiala                 args->m_error.SetErrorString("Child exec failed.");
1693af245d11STodd Fiala                 break;
1694af245d11STodd Fiala             case eSetGidFailed:
1695af245d11STodd Fiala                 args->m_error.SetErrorString("Child setgid failed.");
1696af245d11STodd Fiala                 break;
1697af245d11STodd Fiala             default:
1698af245d11STodd Fiala                 args->m_error.SetErrorString("Child returned unknown exit status.");
1699af245d11STodd Fiala                 break;
1700af245d11STodd Fiala         }
1701af245d11STodd Fiala 
1702af245d11STodd Fiala         if (log)
1703af245d11STodd Fiala         {
1704af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior exited with status %d before issuing a STOP",
1705af245d11STodd Fiala                     __FUNCTION__,
1706af245d11STodd Fiala                     WEXITSTATUS(status));
1707af245d11STodd Fiala         }
1708af245d11STodd Fiala 
1709af245d11STodd Fiala         // Mark the inferior as invalid.
1710af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1711af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1712af245d11STodd Fiala 
171375f47c3aSTodd Fiala         return false;
1714af245d11STodd Fiala     }
1715af245d11STodd Fiala     assert(WIFSTOPPED(status) && (wpid == static_cast< ::pid_t> (pid)) &&
1716af245d11STodd Fiala            "Could not sync with inferior process.");
1717af245d11STodd Fiala 
1718af245d11STodd Fiala     if (log)
1719af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s inferior started, now in stopped state", __FUNCTION__);
1720af245d11STodd Fiala 
1721af245d11STodd Fiala     if (!SetDefaultPtraceOpts(pid))
1722af245d11STodd Fiala     {
1723af245d11STodd Fiala         args->m_error.SetErrorToErrno();
1724af245d11STodd Fiala         if (log)
1725af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior failed to set default ptrace options: %s",
1726af245d11STodd Fiala                     __FUNCTION__,
1727af245d11STodd Fiala                     args->m_error.AsCString ());
1728af245d11STodd Fiala 
1729af245d11STodd Fiala         // Mark the inferior as invalid.
1730af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1731af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1732af245d11STodd Fiala 
173375f47c3aSTodd Fiala         return false;
1734af245d11STodd Fiala     }
1735af245d11STodd Fiala 
1736af245d11STodd Fiala     // Release the master terminal descriptor and pass it off to the
1737af245d11STodd Fiala     // NativeProcessLinux instance.  Similarly stash the inferior pid.
1738af245d11STodd Fiala     monitor->m_terminal_fd = terminal.ReleaseMasterFileDescriptor();
1739af245d11STodd Fiala     monitor->m_pid = pid;
1740af245d11STodd Fiala 
1741af245d11STodd Fiala     // Set the terminal fd to be in non blocking mode (it simplifies the
1742af245d11STodd Fiala     // implementation of ProcessLinux::GetSTDOUT to have a non-blocking
1743af245d11STodd Fiala     // descriptor to read from).
1744af245d11STodd Fiala     if (!EnsureFDFlags(monitor->m_terminal_fd, O_NONBLOCK, args->m_error))
1745af245d11STodd Fiala     {
1746af245d11STodd Fiala         if (log)
1747af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior EnsureFDFlags failed for ensuring terminal O_NONBLOCK setting: %s",
1748af245d11STodd Fiala                     __FUNCTION__,
1749af245d11STodd Fiala                     args->m_error.AsCString ());
1750af245d11STodd Fiala 
1751af245d11STodd Fiala         // Mark the inferior as invalid.
1752af245d11STodd Fiala         // FIXME this could really use a new state - eStateLaunchFailure.  For now, using eStateInvalid.
1753af245d11STodd Fiala         monitor->SetState (StateType::eStateInvalid);
1754af245d11STodd Fiala 
175575f47c3aSTodd Fiala         return false;
1756af245d11STodd Fiala     }
1757af245d11STodd Fiala 
1758af245d11STodd Fiala     if (log)
1759af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() adding pid = %" PRIu64, __FUNCTION__, pid);
1760af245d11STodd Fiala 
1761af245d11STodd Fiala     thread_sp = monitor->AddThread (static_cast<lldb::tid_t> (pid));
1762af245d11STodd Fiala     assert (thread_sp && "AddThread() returned a nullptr thread");
1763af245d11STodd Fiala     reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGSTOP);
1764af245d11STodd Fiala     monitor->SetCurrentThreadID (thread_sp->GetID ());
1765af245d11STodd Fiala 
1766af245d11STodd Fiala     // Let our process instance know the thread has stopped.
1767af245d11STodd Fiala     monitor->SetState (StateType::eStateStopped);
1768af245d11STodd Fiala 
1769af245d11STodd Fiala     if (log)
1770af245d11STodd Fiala     {
1771af245d11STodd Fiala         if (args->m_error.Success ())
1772af245d11STodd Fiala         {
1773af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior launching succeeded", __FUNCTION__);
1774af245d11STodd Fiala         }
1775af245d11STodd Fiala         else
1776af245d11STodd Fiala         {
1777af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s inferior launching failed: %s",
1778af245d11STodd Fiala                 __FUNCTION__,
1779af245d11STodd Fiala                 args->m_error.AsCString ());
1780af245d11STodd Fiala         }
1781af245d11STodd Fiala     }
1782af245d11STodd Fiala     return args->m_error.Success();
1783af245d11STodd Fiala }
1784af245d11STodd Fiala 
1785af245d11STodd Fiala void
1786af245d11STodd Fiala NativeProcessLinux::StartAttachOpThread(AttachArgs *args, lldb_private::Error &error)
1787af245d11STodd Fiala {
1788af245d11STodd Fiala     static const char *g_thread_name = "lldb.process.linux.operation";
1789af245d11STodd Fiala 
1790acee96aeSZachary Turner     if (m_operation_thread.IsJoinable())
1791af245d11STodd Fiala         return;
1792af245d11STodd Fiala 
179339de3110SZachary Turner     m_operation_thread = ThreadLauncher::LaunchThread(g_thread_name, AttachOpThread, args, &error);
1794af245d11STodd Fiala }
1795af245d11STodd Fiala 
1796af245d11STodd Fiala void *
1797af245d11STodd Fiala NativeProcessLinux::AttachOpThread(void *arg)
1798af245d11STodd Fiala {
1799af245d11STodd Fiala     AttachArgs *args = static_cast<AttachArgs*>(arg);
1800af245d11STodd Fiala 
1801af245d11STodd Fiala     if (!Attach(args)) {
1802af245d11STodd Fiala         sem_post(&args->m_semaphore);
1803af245d11STodd Fiala         return NULL;
1804af245d11STodd Fiala     }
1805af245d11STodd Fiala 
1806af245d11STodd Fiala     ServeOperation(args);
1807af245d11STodd Fiala     return NULL;
1808af245d11STodd Fiala }
1809af245d11STodd Fiala 
1810af245d11STodd Fiala bool
1811af245d11STodd Fiala NativeProcessLinux::Attach(AttachArgs *args)
1812af245d11STodd Fiala {
1813af245d11STodd Fiala     lldb::pid_t pid = args->m_pid;
1814af245d11STodd Fiala 
1815af245d11STodd Fiala     NativeProcessLinux *monitor = args->m_monitor;
1816af245d11STodd Fiala     lldb::ThreadSP inferior;
1817af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
1818af245d11STodd Fiala 
1819af245d11STodd Fiala     // Use a map to keep track of the threads which we have attached/need to attach.
1820af245d11STodd Fiala     Host::TidMap tids_to_attach;
1821af245d11STodd Fiala     if (pid <= 1)
1822af245d11STodd Fiala     {
1823af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1824af245d11STodd Fiala         args->m_error.SetErrorString("Attaching to process 1 is not allowed.");
1825af245d11STodd Fiala         goto FINISH;
1826af245d11STodd Fiala     }
1827af245d11STodd Fiala 
1828af245d11STodd Fiala     while (Host::FindProcessThreads(pid, tids_to_attach))
1829af245d11STodd Fiala     {
1830af245d11STodd Fiala         for (Host::TidMap::iterator it = tids_to_attach.begin();
1831af245d11STodd Fiala              it != tids_to_attach.end();)
1832af245d11STodd Fiala         {
1833af245d11STodd Fiala             if (it->second == false)
1834af245d11STodd Fiala             {
1835af245d11STodd Fiala                 lldb::tid_t tid = it->first;
1836af245d11STodd Fiala 
1837af245d11STodd Fiala                 // Attach to the requested process.
1838af245d11STodd Fiala                 // An attach will cause the thread to stop with a SIGSTOP.
1839af245d11STodd Fiala                 if (PTRACE(PTRACE_ATTACH, tid, NULL, NULL, 0) < 0)
1840af245d11STodd Fiala                 {
1841af245d11STodd Fiala                     // No such thread. The thread may have exited.
1842af245d11STodd Fiala                     // More error handling may be needed.
1843af245d11STodd Fiala                     if (errno == ESRCH)
1844af245d11STodd Fiala                     {
1845af245d11STodd Fiala                         it = tids_to_attach.erase(it);
1846af245d11STodd Fiala                         continue;
1847af245d11STodd Fiala                     }
1848af245d11STodd Fiala                     else
1849af245d11STodd Fiala                     {
1850af245d11STodd Fiala                         args->m_error.SetErrorToErrno();
1851af245d11STodd Fiala                         goto FINISH;
1852af245d11STodd Fiala                     }
1853af245d11STodd Fiala                 }
1854af245d11STodd Fiala 
1855af245d11STodd Fiala                 int status;
1856af245d11STodd Fiala                 // Need to use __WALL otherwise we receive an error with errno=ECHLD
1857af245d11STodd Fiala                 // At this point we should have a thread stopped if waitpid succeeds.
1858af245d11STodd Fiala                 if ((status = waitpid(tid, NULL, __WALL)) < 0)
1859af245d11STodd Fiala                 {
1860af245d11STodd Fiala                     // No such thread. The thread may have exited.
1861af245d11STodd Fiala                     // More error handling may be needed.
1862af245d11STodd Fiala                     if (errno == ESRCH)
1863af245d11STodd Fiala                     {
1864af245d11STodd Fiala                         it = tids_to_attach.erase(it);
1865af245d11STodd Fiala                         continue;
1866af245d11STodd Fiala                     }
1867af245d11STodd Fiala                     else
1868af245d11STodd Fiala                     {
1869af245d11STodd Fiala                         args->m_error.SetErrorToErrno();
1870af245d11STodd Fiala                         goto FINISH;
1871af245d11STodd Fiala                     }
1872af245d11STodd Fiala                 }
1873af245d11STodd Fiala 
1874af245d11STodd Fiala                 if (!SetDefaultPtraceOpts(tid))
1875af245d11STodd Fiala                 {
1876af245d11STodd Fiala                     args->m_error.SetErrorToErrno();
1877af245d11STodd Fiala                     goto FINISH;
1878af245d11STodd Fiala                 }
1879af245d11STodd Fiala 
1880af245d11STodd Fiala 
1881af245d11STodd Fiala                 if (log)
1882af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() adding tid = %" PRIu64, __FUNCTION__, tid);
1883af245d11STodd Fiala 
1884af245d11STodd Fiala                 it->second = true;
1885af245d11STodd Fiala 
1886af245d11STodd Fiala                 // Create the thread, mark it as stopped.
1887af245d11STodd Fiala                 NativeThreadProtocolSP thread_sp (monitor->AddThread (static_cast<lldb::tid_t> (tid)));
1888af245d11STodd Fiala                 assert (thread_sp && "AddThread() returned a nullptr");
1889af245d11STodd Fiala                 reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGSTOP);
1890af245d11STodd Fiala                 monitor->SetCurrentThreadID (thread_sp->GetID ());
1891af245d11STodd Fiala             }
1892af245d11STodd Fiala 
1893af245d11STodd Fiala             // move the loop forward
1894af245d11STodd Fiala             ++it;
1895af245d11STodd Fiala         }
1896af245d11STodd Fiala     }
1897af245d11STodd Fiala 
1898af245d11STodd Fiala     if (tids_to_attach.size() > 0)
1899af245d11STodd Fiala     {
1900af245d11STodd Fiala         monitor->m_pid = pid;
1901af245d11STodd Fiala         // Let our process instance know the thread has stopped.
1902af245d11STodd Fiala         monitor->SetState (StateType::eStateStopped);
1903af245d11STodd Fiala     }
1904af245d11STodd Fiala     else
1905af245d11STodd Fiala     {
1906af245d11STodd Fiala         args->m_error.SetErrorToGenericError();
1907af245d11STodd Fiala         args->m_error.SetErrorString("No such process.");
1908af245d11STodd Fiala     }
1909af245d11STodd Fiala 
1910af245d11STodd Fiala  FINISH:
1911af245d11STodd Fiala     return args->m_error.Success();
1912af245d11STodd Fiala }
1913af245d11STodd Fiala 
1914af245d11STodd Fiala bool
1915af245d11STodd Fiala NativeProcessLinux::SetDefaultPtraceOpts(lldb::pid_t pid)
1916af245d11STodd Fiala {
1917af245d11STodd Fiala     long ptrace_opts = 0;
1918af245d11STodd Fiala 
1919af245d11STodd Fiala     // Have the child raise an event on exit.  This is used to keep the child in
1920af245d11STodd Fiala     // limbo until it is destroyed.
1921af245d11STodd Fiala     ptrace_opts |= PTRACE_O_TRACEEXIT;
1922af245d11STodd Fiala 
1923af245d11STodd Fiala     // Have the tracer trace threads which spawn in the inferior process.
1924af245d11STodd Fiala     // TODO: if we want to support tracing the inferiors' child, add the
1925af245d11STodd Fiala     // appropriate ptrace flags here (PTRACE_O_TRACEFORK, PTRACE_O_TRACEVFORK)
1926af245d11STodd Fiala     ptrace_opts |= PTRACE_O_TRACECLONE;
1927af245d11STodd Fiala 
1928af245d11STodd Fiala     // Have the tracer notify us before execve returns
1929af245d11STodd Fiala     // (needed to disable legacy SIGTRAP generation)
1930af245d11STodd Fiala     ptrace_opts |= PTRACE_O_TRACEEXEC;
1931af245d11STodd Fiala 
1932af245d11STodd Fiala     return PTRACE(PTRACE_SETOPTIONS, pid, NULL, (void*)ptrace_opts, 0) >= 0;
1933af245d11STodd Fiala }
1934af245d11STodd Fiala 
1935af245d11STodd Fiala static ExitType convert_pid_status_to_exit_type (int status)
1936af245d11STodd Fiala {
1937af245d11STodd Fiala     if (WIFEXITED (status))
1938af245d11STodd Fiala         return ExitType::eExitTypeExit;
1939af245d11STodd Fiala     else if (WIFSIGNALED (status))
1940af245d11STodd Fiala         return ExitType::eExitTypeSignal;
1941af245d11STodd Fiala     else if (WIFSTOPPED (status))
1942af245d11STodd Fiala         return ExitType::eExitTypeStop;
1943af245d11STodd Fiala     else
1944af245d11STodd Fiala     {
1945af245d11STodd Fiala         // We don't know what this is.
1946af245d11STodd Fiala         return ExitType::eExitTypeInvalid;
1947af245d11STodd Fiala     }
1948af245d11STodd Fiala }
1949af245d11STodd Fiala 
1950af245d11STodd Fiala static int convert_pid_status_to_return_code (int status)
1951af245d11STodd Fiala {
1952af245d11STodd Fiala     if (WIFEXITED (status))
1953af245d11STodd Fiala         return WEXITSTATUS (status);
1954af245d11STodd Fiala     else if (WIFSIGNALED (status))
1955af245d11STodd Fiala         return WTERMSIG (status);
1956af245d11STodd Fiala     else if (WIFSTOPPED (status))
1957af245d11STodd Fiala         return WSTOPSIG (status);
1958af245d11STodd Fiala     else
1959af245d11STodd Fiala     {
1960af245d11STodd Fiala         // We don't know what this is.
1961af245d11STodd Fiala         return ExitType::eExitTypeInvalid;
1962af245d11STodd Fiala     }
1963af245d11STodd Fiala }
1964af245d11STodd Fiala 
1965af245d11STodd Fiala // Main process monitoring waitpid-loop handler.
1966af245d11STodd Fiala bool
1967af245d11STodd Fiala NativeProcessLinux::MonitorCallback(void *callback_baton,
1968af245d11STodd Fiala                                 lldb::pid_t pid,
1969af245d11STodd Fiala                                 bool exited,
1970af245d11STodd Fiala                                 int signal,
1971af245d11STodd Fiala                                 int status)
1972af245d11STodd Fiala {
1973af245d11STodd Fiala     Log *log (GetLogIfAnyCategoriesSet (LIBLLDB_LOG_PROCESS));
1974af245d11STodd Fiala 
1975af245d11STodd Fiala     NativeProcessLinux *const process = static_cast<NativeProcessLinux*>(callback_baton);
1976af245d11STodd Fiala     assert (process && "process is null");
1977af245d11STodd Fiala     if (!process)
1978af245d11STodd Fiala     {
1979af245d11STodd Fiala         if (log)
1980af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " callback_baton was null, can't determine process to use", __FUNCTION__, pid);
1981af245d11STodd Fiala         return true;
1982af245d11STodd Fiala     }
1983af245d11STodd Fiala 
1984af245d11STodd Fiala     // Certain activities differ based on whether the pid is the tid of the main thread.
1985af245d11STodd Fiala     const bool is_main_thread = (pid == process->GetID ());
1986af245d11STodd Fiala 
1987af245d11STodd Fiala     // Assume we keep monitoring by default.
1988af245d11STodd Fiala     bool stop_monitoring = false;
1989af245d11STodd Fiala 
1990af245d11STodd Fiala     // Handle when the thread exits.
1991af245d11STodd Fiala     if (exited)
1992af245d11STodd Fiala     {
1993af245d11STodd Fiala         if (log)
1994af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() got exit signal, tid = %"  PRIu64 " (%s main thread)", __FUNCTION__, pid, is_main_thread ? "is" : "is not");
1995af245d11STodd Fiala 
1996af245d11STodd Fiala         // This is a thread that exited.  Ensure we're not tracking it anymore.
1997af245d11STodd Fiala         const bool thread_found = process->StopTrackingThread (pid);
1998af245d11STodd Fiala 
1999af245d11STodd Fiala         if (is_main_thread)
2000af245d11STodd Fiala         {
2001af245d11STodd Fiala             // We only set the exit status and notify the delegate if we haven't already set the process
2002af245d11STodd Fiala             // state to an exited state.  We normally should have received a SIGTRAP | (PTRACE_EVENT_EXIT << 8)
2003af245d11STodd Fiala             // for the main thread.
2004af245d11STodd Fiala             const bool already_notified = (process->GetState() == StateType::eStateExited) | (process->GetState () == StateType::eStateCrashed);
2005af245d11STodd Fiala             if (!already_notified)
2006af245d11STodd Fiala             {
2007af245d11STodd Fiala                 if (log)
2008af245d11STodd 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 ()));
2009af245d11STodd Fiala                 // The main thread exited.  We're done monitoring.  Report to delegate.
2010af245d11STodd Fiala                 process->SetExitStatus (convert_pid_status_to_exit_type (status), convert_pid_status_to_return_code (status), nullptr, true);
2011af245d11STodd Fiala 
2012af245d11STodd Fiala                 // Notify delegate that our process has exited.
2013af245d11STodd Fiala                 process->SetState (StateType::eStateExited, true);
2014af245d11STodd Fiala             }
2015af245d11STodd Fiala             else
2016af245d11STodd Fiala             {
2017af245d11STodd Fiala                 if (log)
2018af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() tid = %"  PRIu64 " main thread now exited (%s)", __FUNCTION__, pid, thread_found ? "stopped tracking thread metadata" : "thread metadata not found");
2019af245d11STodd Fiala             }
2020af245d11STodd Fiala             return true;
2021af245d11STodd Fiala         }
2022af245d11STodd Fiala         else
2023af245d11STodd Fiala         {
2024af245d11STodd Fiala             // Do we want to report to the delegate in this case?  I think not.  If this was an orderly
2025af245d11STodd Fiala             // thread exit, we would already have received the SIGTRAP | (PTRACE_EVENT_EXIT << 8) signal,
2026af245d11STodd Fiala             // and we would have done an all-stop then.
2027af245d11STodd Fiala             if (log)
2028af245d11STodd 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");
2029af245d11STodd Fiala 
2030af245d11STodd Fiala             // Not the main thread, we keep going.
2031af245d11STodd Fiala             return false;
2032af245d11STodd Fiala         }
2033af245d11STodd Fiala     }
2034af245d11STodd Fiala 
2035af245d11STodd Fiala     // Get details on the signal raised.
2036af245d11STodd Fiala     siginfo_t info;
2037af245d11STodd Fiala     int ptrace_err = 0;
2038af245d11STodd Fiala 
2039af245d11STodd Fiala     if (!process->GetSignalInfo (pid, &info, ptrace_err))
2040af245d11STodd Fiala     {
2041af245d11STodd Fiala         if (ptrace_err == EINVAL)
2042af245d11STodd Fiala         {
2043511e5cdcSTodd Fiala             process->OnGroupStop (pid);
2044a9882ceeSTodd Fiala         }
2045a9882ceeSTodd Fiala         else
2046a9882ceeSTodd Fiala         {
2047af245d11STodd Fiala             // ptrace(GETSIGINFO) failed (but not due to group-stop).
2048af245d11STodd Fiala 
2049af245d11STodd Fiala             // A return value of ESRCH means the thread/process is no longer on the system,
2050af245d11STodd Fiala             // so it was killed somehow outside of our control.  Either way, we can't do anything
2051af245d11STodd Fiala             // with it anymore.
2052af245d11STodd Fiala 
2053af245d11STodd Fiala             // We stop monitoring if it was the main thread.
2054af245d11STodd Fiala             stop_monitoring = is_main_thread;
2055af245d11STodd Fiala 
2056af245d11STodd Fiala             // Stop tracking the metadata for the thread since it's entirely off the system now.
2057af245d11STodd Fiala             const bool thread_found = process->StopTrackingThread (pid);
2058af245d11STodd Fiala 
2059af245d11STodd Fiala             if (log)
2060af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s GetSignalInfo failed: %s, tid = %" PRIu64 ", signal = %d, status = %d (%s, %s, %s)",
2061af245d11STodd 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");
2062af245d11STodd Fiala 
2063af245d11STodd Fiala             if (is_main_thread)
2064af245d11STodd Fiala             {
2065af245d11STodd Fiala                 // Notify the delegate - our process is not available but appears to have been killed outside
2066af245d11STodd Fiala                 // our control.  Is eStateExited the right exit state in this case?
2067af245d11STodd Fiala                 process->SetExitStatus (convert_pid_status_to_exit_type (status), convert_pid_status_to_return_code (status), nullptr, true);
2068af245d11STodd Fiala                 process->SetState (StateType::eStateExited, true);
2069af245d11STodd Fiala             }
2070af245d11STodd Fiala             else
2071af245d11STodd Fiala             {
2072af245d11STodd Fiala                 // This thread was pulled out from underneath us.  Anything to do here? Do we want to do an all stop?
2073af245d11STodd Fiala                 if (log)
2074af245d11STodd 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);
2075af245d11STodd Fiala             }
2076af245d11STodd Fiala         }
2077af245d11STodd Fiala     }
2078af245d11STodd Fiala     else
2079af245d11STodd Fiala     {
2080af245d11STodd Fiala         // We have retrieved the signal info.  Dispatch appropriately.
2081af245d11STodd Fiala         if (info.si_signo == SIGTRAP)
2082af245d11STodd Fiala             process->MonitorSIGTRAP(&info, pid);
2083af245d11STodd Fiala         else
2084af245d11STodd Fiala             process->MonitorSignal(&info, pid, exited);
2085af245d11STodd Fiala 
2086af245d11STodd Fiala         stop_monitoring = false;
2087af245d11STodd Fiala     }
2088af245d11STodd Fiala 
2089af245d11STodd Fiala     return stop_monitoring;
2090af245d11STodd Fiala }
2091af245d11STodd Fiala 
2092af245d11STodd Fiala void
2093af245d11STodd Fiala NativeProcessLinux::MonitorSIGTRAP(const siginfo_t *info, lldb::pid_t pid)
2094af245d11STodd Fiala {
2095af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2096af245d11STodd Fiala     const bool is_main_thread = (pid == GetID ());
2097af245d11STodd Fiala 
2098af245d11STodd Fiala     assert(info && info->si_signo == SIGTRAP && "Unexpected child signal!");
2099af245d11STodd Fiala     if (!info)
2100af245d11STodd Fiala         return;
2101af245d11STodd Fiala 
2102af245d11STodd Fiala     // See if we can find a thread for this signal.
2103af245d11STodd Fiala     NativeThreadProtocolSP thread_sp = GetThreadByID (pid);
2104af245d11STodd Fiala     if (!thread_sp)
2105af245d11STodd Fiala     {
2106af245d11STodd Fiala         if (log)
2107af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " no thread found for tid %" PRIu64, __FUNCTION__, GetID (), pid);
2108af245d11STodd Fiala     }
2109af245d11STodd Fiala 
2110af245d11STodd Fiala     switch (info->si_code)
2111af245d11STodd Fiala     {
2112af245d11STodd 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.
2113af245d11STodd Fiala     // case (SIGTRAP | (PTRACE_EVENT_FORK << 8)):
2114af245d11STodd Fiala     // case (SIGTRAP | (PTRACE_EVENT_VFORK << 8)):
2115af245d11STodd Fiala 
2116af245d11STodd Fiala     case (SIGTRAP | (PTRACE_EVENT_CLONE << 8)):
2117af245d11STodd Fiala     {
2118af245d11STodd Fiala         lldb::tid_t tid = LLDB_INVALID_THREAD_ID;
2119af245d11STodd Fiala 
2120af245d11STodd Fiala         unsigned long event_message = 0;
2121af245d11STodd Fiala         if (GetEventMessage(pid, &event_message))
2122af245d11STodd Fiala             tid = static_cast<lldb::tid_t> (event_message);
2123af245d11STodd Fiala 
2124af245d11STodd Fiala         if (log)
2125af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " received thread creation event for tid %" PRIu64, __FUNCTION__, pid, tid);
2126af245d11STodd Fiala 
2127af245d11STodd Fiala         // If we don't track the thread yet: create it, mark as stopped.
2128af245d11STodd Fiala         // If we do track it, this is the wait we needed.  Now resume the new thread.
2129af245d11STodd Fiala         // In all cases, resume the current (i.e. main process) thread.
2130511e5cdcSTodd Fiala         bool created_now = false;
2131511e5cdcSTodd Fiala         thread_sp = GetOrCreateThread (tid, created_now);
2132af245d11STodd Fiala         assert (thread_sp.get() && "failed to get or create the tracking data for newly created inferior thread");
2133af245d11STodd Fiala 
2134af245d11STodd Fiala         // If the thread was already tracked, it means the created thread already received its SI_USER notification of creation.
2135511e5cdcSTodd Fiala         if (!created_now)
2136af245d11STodd Fiala         {
2137af245d11STodd Fiala             // FIXME loops like we want to stop all theads here.
2138af245d11STodd Fiala             // StopAllThreads
2139af245d11STodd Fiala 
2140af245d11STodd Fiala             // We can now resume the newly created thread since it is fully created.
2141af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2142af245d11STodd Fiala             Resume (tid, LLDB_INVALID_SIGNAL_NUMBER);
2143af245d11STodd Fiala         }
2144af245d11STodd Fiala         else
2145af245d11STodd Fiala         {
2146af245d11STodd Fiala             // Mark the thread as currently launching.  Need to wait for SIGTRAP clone on the main thread before
2147af245d11STodd Fiala             // this thread is ready to go.
2148af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetLaunching ();
2149af245d11STodd Fiala         }
2150af245d11STodd Fiala 
2151af245d11STodd Fiala         // In all cases, we can resume the main thread here.
2152af245d11STodd Fiala         Resume (pid, LLDB_INVALID_SIGNAL_NUMBER);
2153af245d11STodd Fiala         break;
2154af245d11STodd Fiala     }
2155af245d11STodd Fiala 
2156af245d11STodd Fiala     case (SIGTRAP | (PTRACE_EVENT_EXEC << 8)):
2157a9882ceeSTodd Fiala     {
2158a9882ceeSTodd Fiala         NativeThreadProtocolSP main_thread_sp;
2159a9882ceeSTodd Fiala 
2160af245d11STodd Fiala         if (log)
2161af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received exec event, code = %d", __FUNCTION__, info->si_code ^ SIGTRAP);
2162a9882ceeSTodd Fiala 
2163a9882ceeSTodd Fiala         // Remove all but the main thread here.
2164a9882ceeSTodd Fiala         // FIXME check if we really need to do this - how does ptrace behave under exec when multiple threads were present
2165a9882ceeSTodd Fiala         // before the exec?  If we get all the detach signals right, we don't need to do this.  However, it makes it clearer
2166a9882ceeSTodd Fiala         // what we should really be tracking.
2167a9882ceeSTodd Fiala         {
2168a9882ceeSTodd Fiala             Mutex::Locker locker (m_threads_mutex);
2169a9882ceeSTodd Fiala 
2170a9882ceeSTodd Fiala             if (log)
2171a9882ceeSTodd Fiala                 log->Printf ("NativeProcessLinux::%s exec received, stop tracking all but main thread", __FUNCTION__);
2172a9882ceeSTodd Fiala 
2173a9882ceeSTodd Fiala             for (auto thread_sp : m_threads)
2174a9882ceeSTodd Fiala             {
2175a9882ceeSTodd Fiala                 const bool is_main_thread = thread_sp && thread_sp->GetID () == GetID ();
2176a9882ceeSTodd Fiala                 if (is_main_thread)
2177a9882ceeSTodd Fiala                 {
2178a9882ceeSTodd Fiala                     main_thread_sp = thread_sp;
2179a9882ceeSTodd Fiala                     if (log)
2180a9882ceeSTodd Fiala                         log->Printf ("NativeProcessLinux::%s found main thread with tid %" PRIu64 ", keeping", __FUNCTION__, main_thread_sp->GetID ());
2181a9882ceeSTodd Fiala                 }
2182a9882ceeSTodd Fiala                 else
2183a9882ceeSTodd Fiala                 {
2184a9882ceeSTodd Fiala                     if (log)
2185a9882ceeSTodd Fiala                         log->Printf ("NativeProcessLinux::%s discarding non-main-thread tid %" PRIu64 " due to exec", __FUNCTION__, thread_sp->GetID ());
2186a9882ceeSTodd Fiala                 }
2187a9882ceeSTodd Fiala             }
2188a9882ceeSTodd Fiala 
2189a9882ceeSTodd Fiala             m_threads.clear ();
2190a9882ceeSTodd Fiala 
2191a9882ceeSTodd Fiala             if (main_thread_sp)
2192a9882ceeSTodd Fiala             {
2193a9882ceeSTodd Fiala                 m_threads.push_back (main_thread_sp);
2194a9882ceeSTodd Fiala                 SetCurrentThreadID (main_thread_sp->GetID ());
2195a9882ceeSTodd Fiala                 reinterpret_cast<NativeThreadLinux*>(main_thread_sp.get())->SetStoppedByExec ();
2196a9882ceeSTodd Fiala             }
2197a9882ceeSTodd Fiala             else
2198a9882ceeSTodd Fiala             {
2199a9882ceeSTodd Fiala                 SetCurrentThreadID (LLDB_INVALID_THREAD_ID);
2200a9882ceeSTodd Fiala                 if (log)
2201a9882ceeSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid %" PRIu64 "no main thread found, discarded all threads, we're in a no-thread state!", __FUNCTION__, GetID ());
2202a9882ceeSTodd Fiala             }
2203a9882ceeSTodd Fiala         }
2204a9882ceeSTodd Fiala 
2205a9882ceeSTodd Fiala         // Let our delegate know we have just exec'd.
2206a9882ceeSTodd Fiala         NotifyDidExec ();
2207a9882ceeSTodd Fiala 
2208a9882ceeSTodd Fiala         // If we have a main thread, indicate we are stopped.
2209a9882ceeSTodd Fiala         assert (main_thread_sp && "exec called during ptraced process but no main thread metadata tracked");
2210a9882ceeSTodd Fiala         SetState (StateType::eStateStopped);
2211a9882ceeSTodd Fiala 
2212af245d11STodd Fiala         break;
2213a9882ceeSTodd Fiala     }
2214af245d11STodd Fiala 
2215af245d11STodd Fiala     case (SIGTRAP | (PTRACE_EVENT_EXIT << 8)):
2216af245d11STodd Fiala     {
2217af245d11STodd Fiala         // The inferior process or one of its threads is about to exit.
2218af245d11STodd Fiala         unsigned long data = 0;
2219af245d11STodd Fiala         if (!GetEventMessage(pid, &data))
2220af245d11STodd Fiala             data = -1;
2221af245d11STodd Fiala 
2222af245d11STodd Fiala         if (log)
2223af245d11STodd Fiala         {
2224af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received PTRACE_EVENT_EXIT, data = %lx (WIFEXITED=%s,WIFSIGNALED=%s), pid = %" PRIu64 " (%s)",
2225af245d11STodd Fiala                          __FUNCTION__,
2226af245d11STodd Fiala                          data, WIFEXITED (data) ? "true" : "false", WIFSIGNALED (data) ? "true" : "false",
2227af245d11STodd Fiala                          pid,
2228af245d11STodd Fiala                     is_main_thread ? "is main thread" : "not main thread");
2229af245d11STodd Fiala         }
2230af245d11STodd Fiala 
2231af245d11STodd Fiala         // Set the thread to exited.
2232af245d11STodd Fiala         if (thread_sp)
2233af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetExited ();
2234af245d11STodd Fiala         else
2235af245d11STodd Fiala         {
2236af245d11STodd Fiala             if (log)
2237af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " failed to retrieve thread for tid %" PRIu64", cannot set thread state", __FUNCTION__, GetID (), pid);
2238af245d11STodd Fiala         }
2239af245d11STodd Fiala 
2240af245d11STodd Fiala         if (is_main_thread)
2241af245d11STodd Fiala         {
2242af245d11STodd Fiala             SetExitStatus (convert_pid_status_to_exit_type (data), convert_pid_status_to_return_code (data), nullptr, true);
224375f47c3aSTodd Fiala         }
224475f47c3aSTodd Fiala 
2245af245d11STodd Fiala         // Resume the thread so it completely exits.
2246af245d11STodd Fiala         Resume (pid, LLDB_INVALID_SIGNAL_NUMBER);
2247af245d11STodd Fiala 
2248af245d11STodd Fiala         break;
2249af245d11STodd Fiala     }
2250af245d11STodd Fiala 
2251af245d11STodd Fiala     case 0:
2252af245d11STodd Fiala     case TRAP_TRACE:
2253af245d11STodd Fiala         // We receive this on single stepping.
2254af245d11STodd Fiala         if (log)
2255af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received trace event, pid = %" PRIu64 " (single stepping)", __FUNCTION__, pid);
2256af245d11STodd Fiala 
2257af245d11STodd Fiala         if (thread_sp)
2258af245d11STodd Fiala         {
2259af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2260af245d11STodd Fiala             SetCurrentThreadID (thread_sp->GetID ());
2261af245d11STodd Fiala         }
2262af245d11STodd Fiala         else
2263af245d11STodd Fiala         {
2264af245d11STodd Fiala             if (log)
2265af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 " single stepping received trace but thread not found", __FUNCTION__, GetID (), pid);
2266af245d11STodd Fiala         }
2267af245d11STodd Fiala 
2268af245d11STodd Fiala         // Tell the process we have a stop (from single stepping).
2269af245d11STodd Fiala         SetState (StateType::eStateStopped, true);
2270af245d11STodd Fiala         break;
2271af245d11STodd Fiala 
2272af245d11STodd Fiala     case SI_KERNEL:
2273af245d11STodd Fiala     case TRAP_BRKPT:
2274af245d11STodd Fiala         if (log)
2275af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received breakpoint event, pid = %" PRIu64, __FUNCTION__, pid);
2276af245d11STodd Fiala 
2277af245d11STodd Fiala         // Mark the thread as stopped at breakpoint.
2278af245d11STodd Fiala         if (thread_sp)
2279af245d11STodd Fiala         {
2280af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2281af245d11STodd Fiala             Error error = FixupBreakpointPCAsNeeded (thread_sp);
2282af245d11STodd Fiala             if (error.Fail ())
2283af245d11STodd Fiala             {
2284af245d11STodd Fiala                 if (log)
2285af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 " fixup: %s", __FUNCTION__, pid, error.AsCString ());
2286af245d11STodd Fiala             }
2287af245d11STodd Fiala         }
2288af245d11STodd Fiala         else
2289af245d11STodd Fiala         {
2290af245d11STodd Fiala             if (log)
2291af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s()  pid = %" PRIu64 ": warning, cannot process software breakpoint since no thread metadata", __FUNCTION__, pid);
2292af245d11STodd Fiala         }
2293af245d11STodd Fiala 
2294af245d11STodd Fiala 
2295af245d11STodd Fiala         // Tell the process we have a stop from this thread.
2296af245d11STodd Fiala         SetCurrentThreadID (pid);
2297af245d11STodd Fiala         SetState (StateType::eStateStopped, true);
2298af245d11STodd Fiala         break;
2299af245d11STodd Fiala 
2300af245d11STodd Fiala     case TRAP_HWBKPT:
2301af245d11STodd Fiala         if (log)
2302af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received watchpoint event, pid = %" PRIu64, __FUNCTION__, pid);
2303af245d11STodd Fiala 
2304af245d11STodd Fiala         // Mark the thread as stopped at watchpoint.
2305af245d11STodd Fiala         // The address is at (lldb::addr_t)info->si_addr if we need it.
2306af245d11STodd Fiala         if (thread_sp)
2307af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (SIGTRAP);
2308af245d11STodd Fiala         else
2309af245d11STodd Fiala         {
2310af245d11STodd Fiala             if (log)
2311af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ": warning, cannot process hardware breakpoint since no thread metadata", __FUNCTION__, GetID (), pid);
2312af245d11STodd Fiala         }
2313af245d11STodd Fiala 
2314af245d11STodd Fiala         // Tell the process we have a stop from this thread.
2315af245d11STodd Fiala         SetCurrentThreadID (pid);
2316af245d11STodd Fiala         SetState (StateType::eStateStopped, true);
2317af245d11STodd Fiala         break;
2318af245d11STodd Fiala 
2319af245d11STodd Fiala     case SIGTRAP:
2320af245d11STodd Fiala     case (SIGTRAP | 0x80):
2321af245d11STodd Fiala         if (log)
2322af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received system call stop event, pid %" PRIu64 "tid %" PRIu64, __FUNCTION__, GetID (), pid);
2323af245d11STodd Fiala         // Ignore these signals until we know more about them.
2324af245d11STodd Fiala         Resume(pid, 0);
2325af245d11STodd Fiala         break;
2326af245d11STodd Fiala 
2327af245d11STodd Fiala     default:
2328af245d11STodd Fiala         assert(false && "Unexpected SIGTRAP code!");
2329af245d11STodd Fiala         if (log)
2330af245d11STodd 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)));
2331af245d11STodd Fiala         break;
2332af245d11STodd Fiala 
2333af245d11STodd Fiala     }
2334af245d11STodd Fiala }
2335af245d11STodd Fiala 
2336af245d11STodd Fiala void
2337af245d11STodd Fiala NativeProcessLinux::MonitorSignal(const siginfo_t *info, lldb::pid_t pid, bool exited)
2338af245d11STodd Fiala {
2339511e5cdcSTodd Fiala     assert (info && "null info");
2340511e5cdcSTodd Fiala     if (!info)
2341511e5cdcSTodd Fiala         return;
2342511e5cdcSTodd Fiala 
2343511e5cdcSTodd Fiala     const int signo = info->si_signo;
2344511e5cdcSTodd Fiala     const bool is_from_llgs = info->si_pid == getpid ();
2345af245d11STodd Fiala 
2346af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2347af245d11STodd Fiala 
2348af245d11STodd Fiala     // POSIX says that process behaviour is undefined after it ignores a SIGFPE,
2349af245d11STodd Fiala     // SIGILL, SIGSEGV, or SIGBUS *unless* that signal was generated by a
2350af245d11STodd Fiala     // kill(2) or raise(3).  Similarly for tgkill(2) on Linux.
2351af245d11STodd Fiala     //
2352af245d11STodd Fiala     // IOW, user generated signals never generate what we consider to be a
2353af245d11STodd Fiala     // "crash".
2354af245d11STodd Fiala     //
2355af245d11STodd Fiala     // Similarly, ACK signals generated by this monitor.
2356af245d11STodd Fiala 
2357af245d11STodd Fiala     // See if we can find a thread for this signal.
2358af245d11STodd Fiala     NativeThreadProtocolSP thread_sp = GetThreadByID (pid);
2359af245d11STodd Fiala     if (!thread_sp)
2360af245d11STodd Fiala     {
2361af245d11STodd Fiala         if (log)
2362af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " no thread found for tid %" PRIu64, __FUNCTION__, GetID (), pid);
2363af245d11STodd Fiala     }
2364af245d11STodd Fiala 
2365af245d11STodd Fiala     // Handle the signal.
2366af245d11STodd Fiala     if (info->si_code == SI_TKILL || info->si_code == SI_USER)
2367af245d11STodd Fiala     {
2368af245d11STodd Fiala         if (log)
2369af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() received signal %s (%d) with code %s, (siginfo pid = %d (%s), waitpid pid = %" PRIu64 ")",
2370af245d11STodd Fiala                             __FUNCTION__,
2371af245d11STodd Fiala                             GetUnixSignals ().GetSignalAsCString (signo),
2372af245d11STodd Fiala                             signo,
2373af245d11STodd Fiala                             (info->si_code == SI_TKILL ? "SI_TKILL" : "SI_USER"),
2374af245d11STodd Fiala                             info->si_pid,
2375511e5cdcSTodd Fiala                             is_from_llgs ? "from llgs" : "not from llgs",
2376af245d11STodd Fiala                             pid);
237758a2f669STodd Fiala     }
2378af245d11STodd Fiala 
237958a2f669STodd Fiala     // Check for new thread notification.
238058a2f669STodd Fiala     if ((info->si_pid == 0) && (info->si_code == SI_USER))
2381af245d11STodd Fiala     {
2382af245d11STodd Fiala         // A new thread creation is being signaled.  This is one of two parts that come in
2383af245d11STodd Fiala         // a non-deterministic order.  pid is the thread id.
2384af245d11STodd Fiala         if (log)
2385af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 " tid %" PRIu64 ": new thread notification",
2386af245d11STodd Fiala                      __FUNCTION__, GetID (), pid);
2387af245d11STodd Fiala 
2388af245d11STodd Fiala         // Did we already create the thread?
2389511e5cdcSTodd Fiala         bool created_now = false;
2390511e5cdcSTodd Fiala         thread_sp = GetOrCreateThread (pid, created_now);
2391af245d11STodd Fiala         assert (thread_sp.get() && "failed to get or create the tracking data for newly created inferior thread");
2392af245d11STodd Fiala 
2393af245d11STodd Fiala         // If the thread was already tracked, it means the main thread already received its SIGTRAP for the create.
2394511e5cdcSTodd Fiala         if (!created_now)
2395af245d11STodd Fiala         {
2396af245d11STodd Fiala             // We can now resume this thread up since it is fully created.
2397af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetRunning ();
2398af245d11STodd Fiala             Resume (thread_sp->GetID (), LLDB_INVALID_SIGNAL_NUMBER);
2399af245d11STodd Fiala         }
2400af245d11STodd Fiala         else
2401af245d11STodd Fiala         {
2402af245d11STodd Fiala             // Mark the thread as currently launching.  Need to wait for SIGTRAP clone on the main thread before
2403af245d11STodd Fiala             // this thread is ready to go.
2404af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetLaunching ();
2405af245d11STodd Fiala         }
240658a2f669STodd Fiala 
240758a2f669STodd Fiala         // Done handling.
240858a2f669STodd Fiala         return;
2409af245d11STodd Fiala     }
241058a2f669STodd Fiala 
241158a2f669STodd Fiala     // Check for thread stop notification.
2412511e5cdcSTodd Fiala     if (is_from_llgs && (info->si_code == SI_TKILL) && (signo == SIGSTOP))
2413af245d11STodd Fiala     {
2414af245d11STodd Fiala         // This is a tgkill()-based stop.
2415af245d11STodd Fiala         if (thread_sp)
2416af245d11STodd Fiala         {
2417af245d11STodd Fiala             // An inferior thread just stopped.  Mark it as such.
2418af245d11STodd Fiala             reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (signo);
2419af245d11STodd Fiala             SetCurrentThreadID (thread_sp->GetID ());
2420af245d11STodd Fiala 
2421af245d11STodd Fiala             // Remove this tid from the wait-for-stop set.
2422af245d11STodd Fiala             Mutex::Locker locker (m_wait_for_stop_tids_mutex);
2423af245d11STodd Fiala 
2424af245d11STodd Fiala             auto removed_count = m_wait_for_stop_tids.erase (thread_sp->GetID ());
2425af245d11STodd Fiala             if (removed_count < 1)
2426af245d11STodd Fiala             {
2427af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s() pid = %" PRIu64 " tid %" PRIu64 ": tgkill()-stopped thread not in m_wait_for_stop_tids",
2428af245d11STodd Fiala                              __FUNCTION__, GetID (), thread_sp->GetID ());
2429af245d11STodd Fiala 
2430af245d11STodd Fiala             }
2431af245d11STodd Fiala 
2432af245d11STodd Fiala             // If this is the last thread in the m_wait_for_stop_tids, we need to notify
2433af245d11STodd Fiala             // the delegate that a stop has occurred now that every thread that was supposed
2434af245d11STodd Fiala             // to stop has stopped.
2435af245d11STodd Fiala             if (m_wait_for_stop_tids.empty ())
2436af245d11STodd Fiala             {
2437af245d11STodd Fiala                 if (log)
2438af245d11STodd Fiala                 {
2439af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s() pid %" PRIu64 " tid %" PRIu64 ", setting process state to stopped now that all tids marked for stop have completed",
2440af245d11STodd Fiala                                  __FUNCTION__,
2441af245d11STodd Fiala                                  GetID (),
2442af245d11STodd Fiala                                  pid);
2443af245d11STodd Fiala                 }
2444af245d11STodd Fiala                 SetState (StateType::eStateStopped, true);
2445af245d11STodd Fiala             }
2446af245d11STodd Fiala         }
2447af245d11STodd Fiala 
244858a2f669STodd Fiala         // Done handling.
2449af245d11STodd Fiala         return;
2450af245d11STodd Fiala     }
2451af245d11STodd Fiala 
2452af245d11STodd Fiala     if (log)
2453af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() received signal %s", __FUNCTION__, GetUnixSignals ().GetSignalAsCString (signo));
2454af245d11STodd Fiala 
2455af245d11STodd Fiala     switch (signo)
2456af245d11STodd Fiala     {
2457af245d11STodd Fiala     case SIGSEGV:
2458af245d11STodd Fiala         {
2459af245d11STodd Fiala             lldb::addr_t fault_addr = reinterpret_cast<lldb::addr_t>(info->si_addr);
2460af245d11STodd Fiala 
2461af245d11STodd Fiala             // FIXME figure out how to propagate this properly.  Seems like it
2462af245d11STodd Fiala             // should go in ThreadStopInfo.
2463af245d11STodd Fiala             // We can get more details on the exact nature of the crash here.
2464af245d11STodd Fiala             // ProcessMessage::CrashReason reason = GetCrashReasonForSIGSEGV(info);
2465af245d11STodd Fiala             if (!exited)
2466af245d11STodd Fiala             {
2467af245d11STodd Fiala                 // This is just a pre-signal-delivery notification of the incoming signal.
2468af245d11STodd Fiala                 // Send a stop to the debugger.
2469af245d11STodd Fiala                 if (thread_sp)
2470af245d11STodd Fiala                 {
2471af245d11STodd Fiala                     reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (signo);
2472af245d11STodd Fiala                     SetCurrentThreadID (thread_sp->GetID ());
2473af245d11STodd Fiala                 }
2474af245d11STodd Fiala                 SetState (StateType::eStateStopped, true);
2475af245d11STodd Fiala             }
2476af245d11STodd Fiala             else
2477af245d11STodd Fiala             {
2478af245d11STodd Fiala                 if (thread_sp)
2479af245d11STodd Fiala                 {
2480af245d11STodd Fiala                     // FIXME figure out what type this is.
2481af245d11STodd Fiala                     const uint64_t exception_type = static_cast<uint64_t> (SIGSEGV);
2482af245d11STodd Fiala                     reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetCrashedWithException (exception_type, fault_addr);
2483af245d11STodd Fiala                 }
2484af245d11STodd Fiala                 SetState (StateType::eStateCrashed, true);
2485af245d11STodd Fiala             }
2486af245d11STodd Fiala         }
2487af245d11STodd Fiala         break;
2488af245d11STodd Fiala 
248958a2f669STodd Fiala     case SIGABRT:
2490af245d11STodd Fiala     case SIGILL:
2491af245d11STodd Fiala     case SIGFPE:
2492af245d11STodd Fiala     case SIGBUS:
2493af245d11STodd Fiala         {
249458a2f669STodd Fiala             // Break these out into separate cases once I have more data for each type of signal.
249558a2f669STodd Fiala             lldb::addr_t fault_addr = reinterpret_cast<lldb::addr_t>(info->si_addr);
249658a2f669STodd Fiala             if (!exited)
249758a2f669STodd Fiala             {
249858a2f669STodd Fiala                 // This is just a pre-signal-delivery notification of the incoming signal.
249958a2f669STodd Fiala                 // Send a stop to the debugger.
250058a2f669STodd Fiala                 if (thread_sp)
250158a2f669STodd Fiala                 {
250258a2f669STodd Fiala                     reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetStoppedBySignal (signo);
250358a2f669STodd Fiala                     SetCurrentThreadID (thread_sp->GetID ());
250458a2f669STodd Fiala                 }
250558a2f669STodd Fiala                 SetState (StateType::eStateStopped, true);
250658a2f669STodd Fiala             }
250758a2f669STodd Fiala             else
250858a2f669STodd Fiala             {
250958a2f669STodd Fiala                 if (thread_sp)
251058a2f669STodd Fiala                 {
251158a2f669STodd Fiala                     // FIXME figure out how to report exit by signal correctly.
251258a2f669STodd Fiala                     const uint64_t exception_type = static_cast<uint64_t> (SIGABRT);
251358a2f669STodd Fiala                     reinterpret_cast<NativeThreadLinux*> (thread_sp.get ())->SetCrashedWithException (exception_type, fault_addr);
251458a2f669STodd Fiala                 }
251558a2f669STodd Fiala                 SetState (StateType::eStateCrashed, true);
251658a2f669STodd Fiala             }
2517af245d11STodd Fiala         }
2518af245d11STodd Fiala         break;
2519af245d11STodd Fiala 
2520511e5cdcSTodd Fiala     case SIGSTOP:
2521511e5cdcSTodd Fiala         {
252258a2f669STodd Fiala             if (log)
2523511e5cdcSTodd Fiala             {
2524511e5cdcSTodd Fiala                 if (is_from_llgs)
2525511e5cdcSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " received SIGSTOP from llgs, most likely an interrupt", __FUNCTION__, GetID (), pid);
2526511e5cdcSTodd Fiala                 else
2527511e5cdcSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " received SIGSTOP from outside of debugger", __FUNCTION__, GetID (), pid);
2528511e5cdcSTodd Fiala             }
2529511e5cdcSTodd Fiala 
2530511e5cdcSTodd Fiala             // Save group stop tids to wait for.
2531511e5cdcSTodd Fiala             SetGroupStopTids (pid, SIGSTOP);
2532511e5cdcSTodd Fiala             // Fall through to deliver signal to thread.
2533511e5cdcSTodd Fiala             // This will trigger a group stop sequence, after which we'll notify the process that everything stopped.
2534511e5cdcSTodd Fiala         }
2535511e5cdcSTodd Fiala 
2536511e5cdcSTodd Fiala     default:
2537511e5cdcSTodd Fiala         {
2538511e5cdcSTodd Fiala             if (log)
2539511e5cdcSTodd Fiala                 log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " resuming thread with signal %s (%d)", __FUNCTION__, GetID (), pid, GetUnixSignals().GetSignalAsCString (signo), signo);
2540511e5cdcSTodd Fiala 
2541511e5cdcSTodd Fiala             // Pass the signal on to the inferior.
2542511e5cdcSTodd Fiala             const bool resume_success = Resume (pid, signo);
2543511e5cdcSTodd Fiala 
2544511e5cdcSTodd Fiala             if (log)
2545511e5cdcSTodd Fiala                 log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " resume %s", __FUNCTION__, GetID (), pid, resume_success ? "SUCCESS" : "FAILURE");
2546511e5cdcSTodd Fiala 
2547511e5cdcSTodd Fiala         }
2548af245d11STodd Fiala         break;
2549af245d11STodd Fiala     }
2550af245d11STodd Fiala }
2551af245d11STodd Fiala 
2552511e5cdcSTodd Fiala void
2553511e5cdcSTodd Fiala NativeProcessLinux::SetGroupStopTids (lldb::tid_t signaled_thread_tid, int signo)
2554511e5cdcSTodd Fiala {
2555511e5cdcSTodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
2556511e5cdcSTodd Fiala 
2557511e5cdcSTodd Fiala     // Lock 1 - thread lock.
2558511e5cdcSTodd Fiala     {
2559511e5cdcSTodd Fiala         Mutex::Locker locker (m_threads_mutex);
2560511e5cdcSTodd Fiala         // Lock 2 - group stop tids
2561511e5cdcSTodd Fiala         {
2562511e5cdcSTodd Fiala             Mutex::Locker locker (m_wait_for_group_stop_tids_mutex);
2563511e5cdcSTodd Fiala             if (log)
2564511e5cdcSTodd Fiala                 log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " loading up known threads in set%s",
2565511e5cdcSTodd Fiala                              __FUNCTION__,
2566511e5cdcSTodd Fiala                              GetID (),
2567511e5cdcSTodd Fiala                              signaled_thread_tid,
2568511e5cdcSTodd Fiala                              m_wait_for_group_stop_tids.empty () ? " (currently empty)"
2569511e5cdcSTodd Fiala                                 : "(group_stop_tids not empty?!?)");
2570511e5cdcSTodd Fiala 
2571511e5cdcSTodd Fiala             // Add all known threads not already stopped into the wait for group-stop tids.
2572511e5cdcSTodd Fiala             for (auto thread_sp : m_threads)
2573511e5cdcSTodd Fiala             {
2574511e5cdcSTodd Fiala                 int unused_signo = LLDB_INVALID_SIGNAL_NUMBER;
2575511e5cdcSTodd Fiala                 if (thread_sp && !((NativeThreadLinux*)thread_sp.get())->IsStopped (&unused_signo))
2576511e5cdcSTodd Fiala                 {
2577511e5cdcSTodd Fiala                     // Wait on this thread for a group stop before we notify the delegate about the process state change.
2578511e5cdcSTodd Fiala                     m_wait_for_group_stop_tids.insert (thread_sp->GetID ());
2579511e5cdcSTodd Fiala                 }
2580511e5cdcSTodd Fiala             }
2581511e5cdcSTodd Fiala 
2582511e5cdcSTodd Fiala             m_group_stop_signal_tid = signaled_thread_tid;
2583511e5cdcSTodd Fiala             m_group_stop_signal = signo;
2584511e5cdcSTodd Fiala         }
2585511e5cdcSTodd Fiala     }
2586511e5cdcSTodd Fiala }
2587511e5cdcSTodd Fiala 
2588511e5cdcSTodd Fiala void
2589511e5cdcSTodd Fiala NativeProcessLinux::OnGroupStop (lldb::tid_t tid)
2590511e5cdcSTodd Fiala {
2591511e5cdcSTodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
2592511e5cdcSTodd Fiala     bool should_tell_delegate = false;
2593511e5cdcSTodd Fiala 
2594511e5cdcSTodd Fiala     // Lock 1 - thread lock.
2595511e5cdcSTodd Fiala     {
2596511e5cdcSTodd Fiala         Mutex::Locker locker (m_threads_mutex);
2597511e5cdcSTodd Fiala         // Lock 2 - group stop tids
2598511e5cdcSTodd Fiala         {
2599511e5cdcSTodd Fiala             Mutex::Locker locker (m_wait_for_group_stop_tids_mutex);
2600511e5cdcSTodd Fiala 
2601511e5cdcSTodd Fiala             // Remove this thread from the set.
2602511e5cdcSTodd Fiala             auto remove_result = m_wait_for_group_stop_tids.erase (tid);
2603511e5cdcSTodd Fiala             if (log)
2604511e5cdcSTodd Fiala                 log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " tried to remove tid from group-stop set: %s",
2605511e5cdcSTodd Fiala                              __FUNCTION__,
2606511e5cdcSTodd Fiala                              GetID (),
2607511e5cdcSTodd Fiala                              tid,
2608511e5cdcSTodd Fiala                              remove_result > 0 ? "SUCCESS" : "FAILURE");
2609511e5cdcSTodd Fiala 
2610511e5cdcSTodd Fiala             // Grab the thread metadata for this thread.
2611511e5cdcSTodd Fiala             NativeThreadProtocolSP thread_sp = GetThreadByIDUnlocked (tid);
2612511e5cdcSTodd Fiala             if (thread_sp)
2613511e5cdcSTodd Fiala             {
2614511e5cdcSTodd Fiala                 NativeThreadLinux *const linux_thread = static_cast<NativeThreadLinux*> (thread_sp.get ());
2615511e5cdcSTodd Fiala                 if (thread_sp->GetID () == m_group_stop_signal_tid)
2616511e5cdcSTodd Fiala                 {
2617511e5cdcSTodd Fiala                     linux_thread->SetStoppedBySignal (m_group_stop_signal);
2618511e5cdcSTodd Fiala                     if (log)
2619511e5cdcSTodd Fiala                         log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " set group stop tid to state 'stopped by signal %d'",
2620511e5cdcSTodd Fiala                                      __FUNCTION__,
2621511e5cdcSTodd Fiala                                      GetID (),
2622511e5cdcSTodd Fiala                                      tid,
2623511e5cdcSTodd Fiala                                      m_group_stop_signal);
2624511e5cdcSTodd Fiala                 }
2625511e5cdcSTodd Fiala                 else
2626511e5cdcSTodd Fiala                 {
2627511e5cdcSTodd Fiala                     int stopping_signal = LLDB_INVALID_SIGNAL_NUMBER;
2628511e5cdcSTodd Fiala                     if (linux_thread->IsStopped (&stopping_signal))
2629511e5cdcSTodd Fiala                     {
2630511e5cdcSTodd Fiala                         if (log)
2631511e5cdcSTodd Fiala                             log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " thread is already stopped with signal %d, not clearing",
2632511e5cdcSTodd Fiala                                          __FUNCTION__,
2633511e5cdcSTodd Fiala                                          GetID (),
2634511e5cdcSTodd Fiala                                          tid,
2635511e5cdcSTodd Fiala                                          stopping_signal);
2636511e5cdcSTodd Fiala 
2637511e5cdcSTodd Fiala                     }
2638511e5cdcSTodd Fiala                     else
2639511e5cdcSTodd Fiala                     {
2640511e5cdcSTodd Fiala                         linux_thread->SetStoppedBySignal (0);
2641511e5cdcSTodd Fiala                         if (log)
2642511e5cdcSTodd Fiala                             log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " set stopped by signal with signal 0 (i.e. debugger-initiated stop)",
2643511e5cdcSTodd Fiala                                          __FUNCTION__,
2644511e5cdcSTodd Fiala                                          GetID (),
2645511e5cdcSTodd Fiala                                          tid);
2646511e5cdcSTodd Fiala 
2647511e5cdcSTodd Fiala                     }
2648511e5cdcSTodd Fiala                 }
2649511e5cdcSTodd Fiala             }
2650511e5cdcSTodd Fiala             else
2651511e5cdcSTodd Fiala             {
2652511e5cdcSTodd Fiala                 if (log)
2653511e5cdcSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " WARNING failed to find thread metadata for tid",
2654511e5cdcSTodd Fiala                                  __FUNCTION__,
2655511e5cdcSTodd Fiala                                  GetID (),
2656511e5cdcSTodd Fiala                                  tid);
2657511e5cdcSTodd Fiala 
2658511e5cdcSTodd Fiala             }
2659511e5cdcSTodd Fiala 
2660511e5cdcSTodd Fiala             // If there are no more threads we're waiting on for group stop, signal the process.
2661511e5cdcSTodd Fiala             if (m_wait_for_group_stop_tids.empty ())
2662511e5cdcSTodd Fiala             {
2663511e5cdcSTodd Fiala                 if (log)
2664511e5cdcSTodd Fiala                     log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " done waiting for group stop, will notify delegate of process state change",
2665511e5cdcSTodd Fiala                                  __FUNCTION__,
2666511e5cdcSTodd Fiala                                  GetID (),
2667511e5cdcSTodd Fiala                                  tid);
2668511e5cdcSTodd Fiala 
2669511e5cdcSTodd Fiala                 SetCurrentThreadID (m_group_stop_signal_tid);
2670511e5cdcSTodd Fiala 
2671511e5cdcSTodd Fiala                 // Tell the delegate about the stop event, after we release our mutexes.
2672511e5cdcSTodd Fiala                 should_tell_delegate = true;
2673511e5cdcSTodd Fiala             }
2674511e5cdcSTodd Fiala         }
2675511e5cdcSTodd Fiala     }
2676511e5cdcSTodd Fiala 
2677511e5cdcSTodd Fiala     // If we're ready to broadcast the process event change, do it now that we're no longer
2678511e5cdcSTodd Fiala     // holding any locks.  Note this does introduce a potential race, we should think about
2679511e5cdcSTodd Fiala     // adding a notification queue.
2680511e5cdcSTodd Fiala     if (should_tell_delegate)
2681511e5cdcSTodd Fiala     {
2682511e5cdcSTodd Fiala         if (log)
2683511e5cdcSTodd Fiala             log->Printf ("NativeProcessLinux::%s pid = %" PRIu64 " tid %" PRIu64 " done waiting for group stop, notifying delegate of process state change",
2684511e5cdcSTodd Fiala                          __FUNCTION__,
2685511e5cdcSTodd Fiala                          GetID (),
2686511e5cdcSTodd Fiala                          tid);
2687511e5cdcSTodd Fiala         SetState (StateType::eStateStopped, true);
2688511e5cdcSTodd Fiala     }
2689511e5cdcSTodd Fiala }
2690511e5cdcSTodd Fiala 
2691af245d11STodd Fiala Error
2692af245d11STodd Fiala NativeProcessLinux::Resume (const ResumeActionList &resume_actions)
2693af245d11STodd Fiala {
2694af245d11STodd Fiala     Error error;
2695af245d11STodd Fiala 
2696af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS | LIBLLDB_LOG_THREAD));
2697af245d11STodd Fiala     if (log)
2698af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s called: pid %" PRIu64, __FUNCTION__, GetID ());
2699af245d11STodd Fiala 
2700af245d11STodd Fiala     int run_thread_count = 0;
2701af245d11STodd Fiala     int stop_thread_count = 0;
2702af245d11STodd Fiala     int step_thread_count = 0;
2703af245d11STodd Fiala 
2704af245d11STodd Fiala     std::vector<NativeThreadProtocolSP> new_stop_threads;
2705af245d11STodd Fiala 
2706af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
2707af245d11STodd Fiala     for (auto thread_sp : m_threads)
2708af245d11STodd Fiala     {
2709af245d11STodd Fiala         assert (thread_sp && "thread list should not contain NULL threads");
2710af245d11STodd Fiala         NativeThreadLinux *const linux_thread_p = reinterpret_cast<NativeThreadLinux*> (thread_sp.get ());
2711af245d11STodd Fiala 
2712af245d11STodd Fiala         const ResumeAction *const action = resume_actions.GetActionForThread (thread_sp->GetID (), true);
2713af245d11STodd Fiala         assert (action && "NULL ResumeAction returned for thread during Resume ()");
2714af245d11STodd Fiala 
2715af245d11STodd Fiala         if (log)
2716af245d11STodd Fiala         {
2717af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s processing resume action state %s for pid %" PRIu64 " tid %" PRIu64,
2718af245d11STodd Fiala                     __FUNCTION__, StateAsCString (action->state), GetID (), thread_sp->GetID ());
2719af245d11STodd Fiala         }
2720af245d11STodd Fiala 
2721af245d11STodd Fiala         switch (action->state)
2722af245d11STodd Fiala         {
2723af245d11STodd Fiala         case eStateRunning:
2724af245d11STodd Fiala             // Run the thread, possibly feeding it the signal.
2725af245d11STodd Fiala             linux_thread_p->SetRunning ();
2726af245d11STodd Fiala             if (action->signal > 0)
2727af245d11STodd Fiala             {
2728af245d11STodd Fiala                 // Resume the thread and deliver the given signal,
2729af245d11STodd Fiala                 // then mark as delivered.
2730af245d11STodd Fiala                 Resume (thread_sp->GetID (), action->signal);
2731af245d11STodd Fiala                 resume_actions.SetSignalHandledForThread (thread_sp->GetID ());
2732af245d11STodd Fiala             }
2733af245d11STodd Fiala             else
2734af245d11STodd Fiala             {
2735af245d11STodd Fiala                 // Just resume the thread with no signal.
2736af245d11STodd Fiala                 Resume (thread_sp->GetID (), LLDB_INVALID_SIGNAL_NUMBER);
2737af245d11STodd Fiala             }
2738af245d11STodd Fiala             ++run_thread_count;
2739af245d11STodd Fiala             break;
2740af245d11STodd Fiala 
2741af245d11STodd Fiala         case eStateStepping:
2742af245d11STodd Fiala             // Note: if we have multiple threads, we may need to stop
2743af245d11STodd Fiala             // the other threads first, then step this one.
2744af245d11STodd Fiala             linux_thread_p->SetStepping ();
2745af245d11STodd Fiala             if (SingleStep (thread_sp->GetID (), 0))
2746af245d11STodd Fiala             {
2747af245d11STodd Fiala                 if (log)
2748af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 " single step succeeded",
2749af245d11STodd Fiala                                  __FUNCTION__, GetID (), thread_sp->GetID ());
2750af245d11STodd Fiala             }
2751af245d11STodd Fiala             else
2752af245d11STodd Fiala             {
2753af245d11STodd Fiala                 if (log)
2754af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 " single step failed",
2755af245d11STodd Fiala                                  __FUNCTION__, GetID (), thread_sp->GetID ());
2756af245d11STodd Fiala             }
2757af245d11STodd Fiala             ++step_thread_count;
2758af245d11STodd Fiala             break;
2759af245d11STodd Fiala 
2760af245d11STodd Fiala         case eStateSuspended:
2761af245d11STodd Fiala         case eStateStopped:
2762af245d11STodd Fiala             if (!StateIsStoppedState (linux_thread_p->GetState (), false))
2763af245d11STodd Fiala                 new_stop_threads.push_back (thread_sp);
2764af245d11STodd Fiala             else
2765af245d11STodd Fiala             {
2766af245d11STodd Fiala                 if (log)
2767af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s no need to stop pid %" PRIu64 " tid %" PRIu64 ", thread state already %s",
2768af245d11STodd Fiala                                  __FUNCTION__, GetID (), thread_sp->GetID (), StateAsCString (linux_thread_p->GetState ()));
2769af245d11STodd Fiala             }
2770af245d11STodd Fiala 
2771af245d11STodd Fiala             ++stop_thread_count;
2772af245d11STodd Fiala             break;
2773af245d11STodd Fiala 
2774af245d11STodd Fiala         default:
2775af245d11STodd Fiala             return Error ("NativeProcessLinux::%s (): unexpected state %s specified for pid %" PRIu64 ", tid %" PRIu64,
2776af245d11STodd Fiala                     __FUNCTION__, StateAsCString (action->state), GetID (), thread_sp->GetID ());
2777af245d11STodd Fiala         }
2778af245d11STodd Fiala     }
2779af245d11STodd Fiala 
2780af245d11STodd Fiala     // If any thread was set to run, notify the process state as running.
2781af245d11STodd Fiala     if (run_thread_count > 0)
2782af245d11STodd Fiala         SetState (StateType::eStateRunning, true);
2783af245d11STodd Fiala 
2784af245d11STodd Fiala     // Now do a tgkill SIGSTOP on each thread we want to stop.
2785af245d11STodd Fiala     if (!new_stop_threads.empty ())
2786af245d11STodd Fiala     {
2787af245d11STodd Fiala         // Lock the m_wait_for_stop_tids set so we can fill it with every thread we expect to have stopped.
2788af245d11STodd Fiala         Mutex::Locker stop_thread_id_locker (m_wait_for_stop_tids_mutex);
2789af245d11STodd Fiala         for (auto thread_sp : new_stop_threads)
2790af245d11STodd Fiala         {
2791af245d11STodd Fiala             // Send a stop signal to the thread.
2792af245d11STodd Fiala             const int result = tgkill (GetID (), thread_sp->GetID (), SIGSTOP);
2793af245d11STodd Fiala             if (result != 0)
2794af245d11STodd Fiala             {
2795af245d11STodd Fiala                 // tgkill failed.
2796af245d11STodd Fiala                 if (log)
2797af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s error: tgkill SIGSTOP for pid %" PRIu64 " tid %" PRIu64 "failed, retval %d",
2798af245d11STodd Fiala                                  __FUNCTION__, GetID (), thread_sp->GetID (), result);
2799af245d11STodd Fiala             }
2800af245d11STodd Fiala             else
2801af245d11STodd Fiala             {
2802af245d11STodd Fiala                 // tgkill succeeded.  Don't mark the thread state, though.  Let the signal
2803af245d11STodd Fiala                 // handling mark it.
2804af245d11STodd Fiala                 if (log)
2805af245d11STodd Fiala                     log->Printf ("NativeProcessLinux::%s tgkill SIGSTOP for pid %" PRIu64 " tid %" PRIu64 " succeeded",
2806af245d11STodd Fiala                                  __FUNCTION__, GetID (), thread_sp->GetID ());
2807af245d11STodd Fiala 
2808af245d11STodd Fiala                 // Add it to the set of threads we expect to signal a stop.
2809af245d11STodd Fiala                 // We won't tell the delegate about it until this list drains to empty.
2810af245d11STodd Fiala                 m_wait_for_stop_tids.insert (thread_sp->GetID ());
2811af245d11STodd Fiala             }
2812af245d11STodd Fiala         }
2813af245d11STodd Fiala     }
2814af245d11STodd Fiala 
2815af245d11STodd Fiala     return error;
2816af245d11STodd Fiala }
2817af245d11STodd Fiala 
2818af245d11STodd Fiala Error
2819af245d11STodd Fiala NativeProcessLinux::Halt ()
2820af245d11STodd Fiala {
2821af245d11STodd Fiala     Error error;
2822af245d11STodd Fiala 
2823af245d11STodd Fiala     // FIXME check if we're already stopped
2824af245d11STodd Fiala     const bool is_stopped = false;
2825af245d11STodd Fiala     if (is_stopped)
2826af245d11STodd Fiala         return error;
2827af245d11STodd Fiala 
2828af245d11STodd Fiala     if (kill (GetID (), SIGSTOP) != 0)
2829af245d11STodd Fiala         error.SetErrorToErrno ();
2830af245d11STodd Fiala 
2831af245d11STodd Fiala     return error;
2832af245d11STodd Fiala }
2833af245d11STodd Fiala 
2834af245d11STodd Fiala Error
2835af245d11STodd Fiala NativeProcessLinux::Detach ()
2836af245d11STodd Fiala {
2837af245d11STodd Fiala     Error error;
2838af245d11STodd Fiala 
2839af245d11STodd Fiala     // Tell ptrace to detach from the process.
2840af245d11STodd Fiala     if (GetID () != LLDB_INVALID_PROCESS_ID)
2841af245d11STodd Fiala         error = Detach (GetID ());
2842af245d11STodd Fiala 
2843af245d11STodd Fiala     // Stop monitoring the inferior.
2844af245d11STodd Fiala     StopMonitor ();
2845af245d11STodd Fiala 
2846af245d11STodd Fiala     // No error.
2847af245d11STodd Fiala     return error;
2848af245d11STodd Fiala }
2849af245d11STodd Fiala 
2850af245d11STodd Fiala Error
2851af245d11STodd Fiala NativeProcessLinux::Signal (int signo)
2852af245d11STodd Fiala {
2853af245d11STodd Fiala     Error error;
2854af245d11STodd Fiala 
2855af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2856af245d11STodd Fiala     if (log)
2857af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s: sending signal %d (%s) to pid %" PRIu64,
2858af245d11STodd Fiala                 __FUNCTION__, signo,  GetUnixSignals ().GetSignalAsCString (signo), GetID ());
2859af245d11STodd Fiala 
2860af245d11STodd Fiala     if (kill(GetID(), signo))
2861af245d11STodd Fiala         error.SetErrorToErrno();
2862af245d11STodd Fiala 
2863af245d11STodd Fiala     return error;
2864af245d11STodd Fiala }
2865af245d11STodd Fiala 
2866af245d11STodd Fiala Error
2867af245d11STodd Fiala NativeProcessLinux::Kill ()
2868af245d11STodd Fiala {
2869af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2870af245d11STodd Fiala     if (log)
2871af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s called for PID %" PRIu64, __FUNCTION__, GetID ());
2872af245d11STodd Fiala 
2873af245d11STodd Fiala     Error error;
2874af245d11STodd Fiala 
2875af245d11STodd Fiala     switch (m_state)
2876af245d11STodd Fiala     {
2877af245d11STodd Fiala         case StateType::eStateInvalid:
2878af245d11STodd Fiala         case StateType::eStateExited:
2879af245d11STodd Fiala         case StateType::eStateCrashed:
2880af245d11STodd Fiala         case StateType::eStateDetached:
2881af245d11STodd Fiala         case StateType::eStateUnloaded:
2882af245d11STodd Fiala             // Nothing to do - the process is already dead.
2883af245d11STodd Fiala             if (log)
2884af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s ignored for PID %" PRIu64 " due to current state: %s", __FUNCTION__, GetID (), StateAsCString (m_state));
2885af245d11STodd Fiala             return error;
2886af245d11STodd Fiala 
2887af245d11STodd Fiala         case StateType::eStateConnected:
2888af245d11STodd Fiala         case StateType::eStateAttaching:
2889af245d11STodd Fiala         case StateType::eStateLaunching:
2890af245d11STodd Fiala         case StateType::eStateStopped:
2891af245d11STodd Fiala         case StateType::eStateRunning:
2892af245d11STodd Fiala         case StateType::eStateStepping:
2893af245d11STodd Fiala         case StateType::eStateSuspended:
2894af245d11STodd Fiala             // We can try to kill a process in these states.
2895af245d11STodd Fiala             break;
2896af245d11STodd Fiala     }
2897af245d11STodd Fiala 
2898af245d11STodd Fiala     if (kill (GetID (), SIGKILL) != 0)
2899af245d11STodd Fiala     {
2900af245d11STodd Fiala         error.SetErrorToErrno ();
2901af245d11STodd Fiala         return error;
2902af245d11STodd Fiala     }
2903af245d11STodd Fiala 
2904af245d11STodd Fiala     return error;
2905af245d11STodd Fiala }
2906af245d11STodd Fiala 
2907af245d11STodd Fiala static Error
2908af245d11STodd Fiala ParseMemoryRegionInfoFromProcMapsLine (const std::string &maps_line, MemoryRegionInfo &memory_region_info)
2909af245d11STodd Fiala {
2910af245d11STodd Fiala     memory_region_info.Clear();
2911af245d11STodd Fiala 
2912af245d11STodd Fiala     StringExtractor line_extractor (maps_line.c_str ());
2913af245d11STodd Fiala 
2914af245d11STodd Fiala     // Format: {address_start_hex}-{address_end_hex} perms offset  dev   inode   pathname
2915af245d11STodd Fiala     // perms: rwxp   (letter is present if set, '-' if not, final character is p=private, s=shared).
2916af245d11STodd Fiala 
2917af245d11STodd Fiala     // Parse out the starting address
2918af245d11STodd Fiala     lldb::addr_t start_address = line_extractor.GetHexMaxU64 (false, 0);
2919af245d11STodd Fiala 
2920af245d11STodd Fiala     // Parse out hyphen separating start and end address from range.
2921af245d11STodd Fiala     if (!line_extractor.GetBytesLeft () || (line_extractor.GetChar () != '-'))
2922af245d11STodd Fiala         return Error ("malformed /proc/{pid}/maps entry, missing dash between address range");
2923af245d11STodd Fiala 
2924af245d11STodd Fiala     // Parse out the ending address
2925af245d11STodd Fiala     lldb::addr_t end_address = line_extractor.GetHexMaxU64 (false, start_address);
2926af245d11STodd Fiala 
2927af245d11STodd Fiala     // Parse out the space after the address.
2928af245d11STodd Fiala     if (!line_extractor.GetBytesLeft () || (line_extractor.GetChar () != ' '))
2929af245d11STodd Fiala         return Error ("malformed /proc/{pid}/maps entry, missing space after range");
2930af245d11STodd Fiala 
2931af245d11STodd Fiala     // Save the range.
2932af245d11STodd Fiala     memory_region_info.GetRange ().SetRangeBase (start_address);
2933af245d11STodd Fiala     memory_region_info.GetRange ().SetRangeEnd (end_address);
2934af245d11STodd Fiala 
2935af245d11STodd Fiala     // Parse out each permission entry.
2936af245d11STodd Fiala     if (line_extractor.GetBytesLeft () < 4)
2937af245d11STodd Fiala         return Error ("malformed /proc/{pid}/maps entry, missing some portion of permissions");
2938af245d11STodd Fiala 
2939af245d11STodd Fiala     // Handle read permission.
2940af245d11STodd Fiala     const char read_perm_char = line_extractor.GetChar ();
2941af245d11STodd Fiala     if (read_perm_char == 'r')
2942af245d11STodd Fiala         memory_region_info.SetReadable (MemoryRegionInfo::OptionalBool::eYes);
2943af245d11STodd Fiala     else
2944af245d11STodd Fiala     {
2945af245d11STodd Fiala         assert ( (read_perm_char == '-') && "unexpected /proc/{pid}/maps read permission char" );
2946af245d11STodd Fiala         memory_region_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo);
2947af245d11STodd Fiala     }
2948af245d11STodd Fiala 
2949af245d11STodd Fiala     // Handle write permission.
2950af245d11STodd Fiala     const char write_perm_char = line_extractor.GetChar ();
2951af245d11STodd Fiala     if (write_perm_char == 'w')
2952af245d11STodd Fiala         memory_region_info.SetWritable (MemoryRegionInfo::OptionalBool::eYes);
2953af245d11STodd Fiala     else
2954af245d11STodd Fiala     {
2955af245d11STodd Fiala         assert ( (write_perm_char == '-') && "unexpected /proc/{pid}/maps write permission char" );
2956af245d11STodd Fiala         memory_region_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo);
2957af245d11STodd Fiala     }
2958af245d11STodd Fiala 
2959af245d11STodd Fiala     // Handle execute permission.
2960af245d11STodd Fiala     const char exec_perm_char = line_extractor.GetChar ();
2961af245d11STodd Fiala     if (exec_perm_char == 'x')
2962af245d11STodd Fiala         memory_region_info.SetExecutable (MemoryRegionInfo::OptionalBool::eYes);
2963af245d11STodd Fiala     else
2964af245d11STodd Fiala     {
2965af245d11STodd Fiala         assert ( (exec_perm_char == '-') && "unexpected /proc/{pid}/maps exec permission char" );
2966af245d11STodd Fiala         memory_region_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo);
2967af245d11STodd Fiala     }
2968af245d11STodd Fiala 
2969af245d11STodd Fiala     return Error ();
2970af245d11STodd Fiala }
2971af245d11STodd Fiala 
2972af245d11STodd Fiala Error
2973af245d11STodd Fiala NativeProcessLinux::GetMemoryRegionInfo (lldb::addr_t load_addr, MemoryRegionInfo &range_info)
2974af245d11STodd Fiala {
2975af245d11STodd Fiala     // FIXME review that the final memory region returned extends to the end of the virtual address space,
2976af245d11STodd Fiala     // with no perms if it is not mapped.
2977af245d11STodd Fiala 
2978af245d11STodd Fiala     // Use an approach that reads memory regions from /proc/{pid}/maps.
2979af245d11STodd Fiala     // Assume proc maps entries are in ascending order.
2980af245d11STodd Fiala     // FIXME assert if we find differently.
2981af245d11STodd Fiala     Mutex::Locker locker (m_mem_region_cache_mutex);
2982af245d11STodd Fiala 
2983af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
2984af245d11STodd Fiala     Error error;
2985af245d11STodd Fiala 
2986af245d11STodd Fiala     if (m_supports_mem_region == LazyBool::eLazyBoolNo)
2987af245d11STodd Fiala     {
2988af245d11STodd Fiala         // We're done.
2989af245d11STodd Fiala         error.SetErrorString ("unsupported");
2990af245d11STodd Fiala         return error;
2991af245d11STodd Fiala     }
2992af245d11STodd Fiala 
2993af245d11STodd Fiala     // If our cache is empty, pull the latest.  There should always be at least one memory region
2994af245d11STodd Fiala     // if memory region handling is supported.
2995af245d11STodd Fiala     if (m_mem_region_cache.empty ())
2996af245d11STodd Fiala     {
2997af245d11STodd Fiala         error = ProcFileReader::ProcessLineByLine (GetID (), "maps",
2998af245d11STodd Fiala              [&] (const std::string &line) -> bool
2999af245d11STodd Fiala              {
3000af245d11STodd Fiala                  MemoryRegionInfo info;
3001af245d11STodd Fiala                  const Error parse_error = ParseMemoryRegionInfoFromProcMapsLine (line, info);
3002af245d11STodd Fiala                  if (parse_error.Success ())
3003af245d11STodd Fiala                  {
3004af245d11STodd Fiala                      m_mem_region_cache.push_back (info);
3005af245d11STodd Fiala                      return true;
3006af245d11STodd Fiala                  }
3007af245d11STodd Fiala                  else
3008af245d11STodd Fiala                  {
3009af245d11STodd Fiala                      if (log)
3010af245d11STodd Fiala                          log->Printf ("NativeProcessLinux::%s failed to parse proc maps line '%s': %s", __FUNCTION__, line.c_str (), error.AsCString ());
3011af245d11STodd Fiala                      return false;
3012af245d11STodd Fiala                  }
3013af245d11STodd Fiala              });
3014af245d11STodd Fiala 
3015af245d11STodd Fiala         // If we had an error, we'll mark unsupported.
3016af245d11STodd Fiala         if (error.Fail ())
3017af245d11STodd Fiala         {
3018af245d11STodd Fiala             m_supports_mem_region = LazyBool::eLazyBoolNo;
3019af245d11STodd Fiala             return error;
3020af245d11STodd Fiala         }
3021af245d11STodd Fiala         else if (m_mem_region_cache.empty ())
3022af245d11STodd Fiala         {
3023af245d11STodd Fiala             // No entries after attempting to read them.  This shouldn't happen if /proc/{pid}/maps
3024af245d11STodd Fiala             // is supported.  Assume we don't support map entries via procfs.
3025af245d11STodd Fiala             if (log)
3026af245d11STodd Fiala                 log->Printf ("NativeProcessLinux::%s failed to find any procfs maps entries, assuming no support for memory region metadata retrieval", __FUNCTION__);
3027af245d11STodd Fiala             m_supports_mem_region = LazyBool::eLazyBoolNo;
3028af245d11STodd Fiala             error.SetErrorString ("not supported");
3029af245d11STodd Fiala             return error;
3030af245d11STodd Fiala         }
3031af245d11STodd Fiala 
3032af245d11STodd Fiala         if (log)
3033af245d11STodd 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 ());
3034af245d11STodd Fiala 
3035af245d11STodd Fiala         // We support memory retrieval, remember that.
3036af245d11STodd Fiala         m_supports_mem_region = LazyBool::eLazyBoolYes;
3037af245d11STodd Fiala     }
3038af245d11STodd Fiala     else
3039af245d11STodd Fiala     {
3040af245d11STodd Fiala         if (log)
3041af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s reusing %" PRIu64 " cached memory region entries", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ()));
3042af245d11STodd Fiala     }
3043af245d11STodd Fiala 
3044af245d11STodd Fiala     lldb::addr_t prev_base_address = 0;
3045af245d11STodd Fiala 
3046af245d11STodd Fiala     // FIXME start by finding the last region that is <= target address using binary search.  Data is sorted.
3047af245d11STodd Fiala     // There can be a ton of regions on pthreads apps with lots of threads.
3048af245d11STodd Fiala     for (auto it = m_mem_region_cache.begin(); it != m_mem_region_cache.end (); ++it)
3049af245d11STodd Fiala     {
3050af245d11STodd Fiala         MemoryRegionInfo &proc_entry_info = *it;
3051af245d11STodd Fiala 
3052af245d11STodd Fiala         // Sanity check assumption that /proc/{pid}/maps entries are ascending.
3053af245d11STodd Fiala         assert ((proc_entry_info.GetRange ().GetRangeBase () >= prev_base_address) && "descending /proc/pid/maps entries detected, unexpected");
3054af245d11STodd Fiala         prev_base_address = proc_entry_info.GetRange ().GetRangeBase ();
3055af245d11STodd Fiala 
3056af245d11STodd Fiala         // If the target address comes before this entry, indicate distance to next region.
3057af245d11STodd Fiala         if (load_addr < proc_entry_info.GetRange ().GetRangeBase ())
3058af245d11STodd Fiala         {
3059af245d11STodd Fiala             range_info.GetRange ().SetRangeBase (load_addr);
3060af245d11STodd Fiala             range_info.GetRange ().SetByteSize (proc_entry_info.GetRange ().GetRangeBase () - load_addr);
3061af245d11STodd Fiala             range_info.SetReadable (MemoryRegionInfo::OptionalBool::eNo);
3062af245d11STodd Fiala             range_info.SetWritable (MemoryRegionInfo::OptionalBool::eNo);
3063af245d11STodd Fiala             range_info.SetExecutable (MemoryRegionInfo::OptionalBool::eNo);
3064af245d11STodd Fiala 
3065af245d11STodd Fiala             return error;
3066af245d11STodd Fiala         }
3067af245d11STodd Fiala         else if (proc_entry_info.GetRange ().Contains (load_addr))
3068af245d11STodd Fiala         {
3069af245d11STodd Fiala             // The target address is within the memory region we're processing here.
3070af245d11STodd Fiala             range_info = proc_entry_info;
3071af245d11STodd Fiala             return error;
3072af245d11STodd Fiala         }
3073af245d11STodd Fiala 
3074af245d11STodd Fiala         // The target memory address comes somewhere after the region we just parsed.
3075af245d11STodd Fiala     }
3076af245d11STodd Fiala 
3077af245d11STodd Fiala     // If we made it here, we didn't find an entry that contained the given address.
3078af245d11STodd Fiala     error.SetErrorString ("address comes after final region");
3079af245d11STodd Fiala 
3080af245d11STodd Fiala     if (log)
3081af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s failed to find map entry for address 0x%" PRIx64 ": %s", __FUNCTION__, load_addr, error.AsCString ());
3082af245d11STodd Fiala 
3083af245d11STodd Fiala     return error;
3084af245d11STodd Fiala }
3085af245d11STodd Fiala 
3086af245d11STodd Fiala void
3087af245d11STodd Fiala NativeProcessLinux::DoStopIDBumped (uint32_t newBumpId)
3088af245d11STodd Fiala {
3089af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3090af245d11STodd Fiala     if (log)
3091af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s(newBumpId=%" PRIu32 ") called", __FUNCTION__, newBumpId);
3092af245d11STodd Fiala 
3093af245d11STodd Fiala     {
3094af245d11STodd Fiala         Mutex::Locker locker (m_mem_region_cache_mutex);
3095af245d11STodd Fiala         if (log)
3096af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s clearing %" PRIu64 " entries from the cache", __FUNCTION__, static_cast<uint64_t> (m_mem_region_cache.size ()));
3097af245d11STodd Fiala         m_mem_region_cache.clear ();
3098af245d11STodd Fiala     }
3099af245d11STodd Fiala }
3100af245d11STodd Fiala 
3101af245d11STodd Fiala Error
3102af245d11STodd Fiala NativeProcessLinux::AllocateMemory (
3103af245d11STodd Fiala     lldb::addr_t size,
3104af245d11STodd Fiala     uint32_t permissions,
3105af245d11STodd Fiala     lldb::addr_t &addr)
3106af245d11STodd Fiala {
3107af245d11STodd Fiala     // FIXME implementing this requires the equivalent of
3108af245d11STodd Fiala     // InferiorCallPOSIX::InferiorCallMmap, which depends on
3109af245d11STodd Fiala     // functional ThreadPlans working with Native*Protocol.
3110af245d11STodd Fiala #if 1
3111af245d11STodd Fiala     return Error ("not implemented yet");
3112af245d11STodd Fiala #else
3113af245d11STodd Fiala     addr = LLDB_INVALID_ADDRESS;
3114af245d11STodd Fiala 
3115af245d11STodd Fiala     unsigned prot = 0;
3116af245d11STodd Fiala     if (permissions & lldb::ePermissionsReadable)
3117af245d11STodd Fiala         prot |= eMmapProtRead;
3118af245d11STodd Fiala     if (permissions & lldb::ePermissionsWritable)
3119af245d11STodd Fiala         prot |= eMmapProtWrite;
3120af245d11STodd Fiala     if (permissions & lldb::ePermissionsExecutable)
3121af245d11STodd Fiala         prot |= eMmapProtExec;
3122af245d11STodd Fiala 
3123af245d11STodd Fiala     // TODO implement this directly in NativeProcessLinux
3124af245d11STodd Fiala     // (and lift to NativeProcessPOSIX if/when that class is
3125af245d11STodd Fiala     // refactored out).
3126af245d11STodd Fiala     if (InferiorCallMmap(this, addr, 0, size, prot,
3127af245d11STodd Fiala                          eMmapFlagsAnon | eMmapFlagsPrivate, -1, 0)) {
3128af245d11STodd Fiala         m_addr_to_mmap_size[addr] = size;
3129af245d11STodd Fiala         return Error ();
3130af245d11STodd Fiala     } else {
3131af245d11STodd Fiala         addr = LLDB_INVALID_ADDRESS;
3132af245d11STodd Fiala         return Error("unable to allocate %" PRIu64 " bytes of memory with permissions %s", size, GetPermissionsAsCString (permissions));
3133af245d11STodd Fiala     }
3134af245d11STodd Fiala #endif
3135af245d11STodd Fiala }
3136af245d11STodd Fiala 
3137af245d11STodd Fiala Error
3138af245d11STodd Fiala NativeProcessLinux::DeallocateMemory (lldb::addr_t addr)
3139af245d11STodd Fiala {
3140af245d11STodd Fiala     // FIXME see comments in AllocateMemory - required lower-level
3141af245d11STodd Fiala     // bits not in place yet (ThreadPlans)
3142af245d11STodd Fiala     return Error ("not implemented");
3143af245d11STodd Fiala }
3144af245d11STodd Fiala 
3145af245d11STodd Fiala lldb::addr_t
3146af245d11STodd Fiala NativeProcessLinux::GetSharedLibraryInfoAddress ()
3147af245d11STodd Fiala {
3148af245d11STodd Fiala #if 1
3149af245d11STodd Fiala     // punt on this for now
3150af245d11STodd Fiala     return LLDB_INVALID_ADDRESS;
3151af245d11STodd Fiala #else
3152af245d11STodd Fiala     // Return the image info address for the exe module
3153af245d11STodd Fiala #if 1
3154af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3155af245d11STodd Fiala 
3156af245d11STodd Fiala     ModuleSP module_sp;
3157af245d11STodd Fiala     Error error = GetExeModuleSP (module_sp);
3158af245d11STodd Fiala     if (error.Fail ())
3159af245d11STodd Fiala     {
3160af245d11STodd Fiala          if (log)
3161af245d11STodd Fiala             log->Warning ("NativeProcessLinux::%s failed to retrieve exe module: %s", __FUNCTION__, error.AsCString ());
3162af245d11STodd Fiala         return LLDB_INVALID_ADDRESS;
3163af245d11STodd Fiala     }
3164af245d11STodd Fiala 
3165af245d11STodd Fiala     if (module_sp == nullptr)
3166af245d11STodd Fiala     {
3167af245d11STodd Fiala          if (log)
3168af245d11STodd Fiala             log->Warning ("NativeProcessLinux::%s exe module returned was NULL", __FUNCTION__);
3169af245d11STodd Fiala          return LLDB_INVALID_ADDRESS;
3170af245d11STodd Fiala     }
3171af245d11STodd Fiala 
3172af245d11STodd Fiala     ObjectFileSP object_file_sp = module_sp->GetObjectFile ();
3173af245d11STodd Fiala     if (object_file_sp == nullptr)
3174af245d11STodd Fiala     {
3175af245d11STodd Fiala          if (log)
3176af245d11STodd Fiala             log->Warning ("NativeProcessLinux::%s exe module returned a NULL object file", __FUNCTION__);
3177af245d11STodd Fiala          return LLDB_INVALID_ADDRESS;
3178af245d11STodd Fiala     }
3179af245d11STodd Fiala 
3180af245d11STodd Fiala     return obj_file_sp->GetImageInfoAddress();
3181af245d11STodd Fiala #else
3182af245d11STodd Fiala     Target *target = &GetTarget();
3183af245d11STodd Fiala     ObjectFile *obj_file = target->GetExecutableModule()->GetObjectFile();
3184af245d11STodd Fiala     Address addr = obj_file->GetImageInfoAddress(target);
3185af245d11STodd Fiala 
3186af245d11STodd Fiala     if (addr.IsValid())
3187af245d11STodd Fiala         return addr.GetLoadAddress(target);
3188af245d11STodd Fiala     return LLDB_INVALID_ADDRESS;
3189af245d11STodd Fiala #endif
3190af245d11STodd Fiala #endif // punt on this for now
3191af245d11STodd Fiala }
3192af245d11STodd Fiala 
3193af245d11STodd Fiala size_t
3194af245d11STodd Fiala NativeProcessLinux::UpdateThreads ()
3195af245d11STodd Fiala {
3196af245d11STodd Fiala     // The NativeProcessLinux monitoring threads are always up to date
3197af245d11STodd Fiala     // with respect to thread state and they keep the thread list
3198af245d11STodd Fiala     // populated properly. All this method needs to do is return the
3199af245d11STodd Fiala     // thread count.
3200af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3201af245d11STodd Fiala     return m_threads.size ();
3202af245d11STodd Fiala }
3203af245d11STodd Fiala 
3204af245d11STodd Fiala bool
3205af245d11STodd Fiala NativeProcessLinux::GetArchitecture (ArchSpec &arch) const
3206af245d11STodd Fiala {
3207af245d11STodd Fiala     arch = m_arch;
3208af245d11STodd Fiala     return true;
3209af245d11STodd Fiala }
3210af245d11STodd Fiala 
3211af245d11STodd Fiala Error
3212af245d11STodd Fiala NativeProcessLinux::GetSoftwareBreakpointSize (NativeRegisterContextSP context_sp, uint32_t &actual_opcode_size)
3213af245d11STodd Fiala {
3214af245d11STodd Fiala     // FIXME put this behind a breakpoint protocol class that can be
3215af245d11STodd Fiala     // set per architecture.  Need ARM, MIPS support here.
32162afc5966STodd Fiala     static const uint8_t g_aarch64_opcode[] = { 0x00, 0x00, 0x20, 0xd4 };
3217af245d11STodd Fiala     static const uint8_t g_i386_opcode [] = { 0xCC };
3218af245d11STodd Fiala 
3219af245d11STodd Fiala     switch (m_arch.GetMachine ())
3220af245d11STodd Fiala     {
32212afc5966STodd Fiala         case llvm::Triple::aarch64:
32222afc5966STodd Fiala             actual_opcode_size = static_cast<uint32_t> (sizeof(g_aarch64_opcode));
32232afc5966STodd Fiala             return Error ();
32242afc5966STodd Fiala 
3225af245d11STodd Fiala         case llvm::Triple::x86:
3226af245d11STodd Fiala         case llvm::Triple::x86_64:
3227af245d11STodd Fiala             actual_opcode_size = static_cast<uint32_t> (sizeof(g_i386_opcode));
3228af245d11STodd Fiala             return Error ();
3229af245d11STodd Fiala 
3230af245d11STodd Fiala         default:
3231af245d11STodd Fiala             assert(false && "CPU type not supported!");
3232af245d11STodd Fiala             return Error ("CPU type not supported");
3233af245d11STodd Fiala     }
3234af245d11STodd Fiala }
3235af245d11STodd Fiala 
3236af245d11STodd Fiala Error
3237af245d11STodd Fiala NativeProcessLinux::SetBreakpoint (lldb::addr_t addr, uint32_t size, bool hardware)
3238af245d11STodd Fiala {
3239af245d11STodd Fiala     if (hardware)
3240af245d11STodd Fiala         return Error ("NativeProcessLinux does not support hardware breakpoints");
3241af245d11STodd Fiala     else
3242af245d11STodd Fiala         return SetSoftwareBreakpoint (addr, size);
3243af245d11STodd Fiala }
3244af245d11STodd Fiala 
3245af245d11STodd Fiala Error
3246af245d11STodd Fiala NativeProcessLinux::GetSoftwareBreakpointTrapOpcode (size_t trap_opcode_size_hint, size_t &actual_opcode_size, const uint8_t *&trap_opcode_bytes)
3247af245d11STodd Fiala {
3248af245d11STodd Fiala     // FIXME put this behind a breakpoint protocol class that can be
3249af245d11STodd Fiala     // set per architecture.  Need ARM, MIPS support here.
32502afc5966STodd Fiala     static const uint8_t g_aarch64_opcode[] = { 0x00, 0x00, 0x20, 0xd4 };
3251af245d11STodd Fiala     static const uint8_t g_i386_opcode [] = { 0xCC };
3252af245d11STodd Fiala 
3253af245d11STodd Fiala     switch (m_arch.GetMachine ())
3254af245d11STodd Fiala     {
32552afc5966STodd Fiala     case llvm::Triple::aarch64:
32562afc5966STodd Fiala         trap_opcode_bytes = g_aarch64_opcode;
32572afc5966STodd Fiala         actual_opcode_size = sizeof(g_aarch64_opcode);
32582afc5966STodd Fiala         return Error ();
32592afc5966STodd Fiala 
3260af245d11STodd Fiala     case llvm::Triple::x86:
3261af245d11STodd Fiala     case llvm::Triple::x86_64:
3262af245d11STodd Fiala         trap_opcode_bytes = g_i386_opcode;
3263af245d11STodd Fiala         actual_opcode_size = sizeof(g_i386_opcode);
3264af245d11STodd Fiala         return Error ();
3265af245d11STodd Fiala 
3266af245d11STodd Fiala     default:
3267af245d11STodd Fiala         assert(false && "CPU type not supported!");
3268af245d11STodd Fiala         return Error ("CPU type not supported");
3269af245d11STodd Fiala     }
3270af245d11STodd Fiala }
3271af245d11STodd Fiala 
3272af245d11STodd Fiala #if 0
3273af245d11STodd Fiala ProcessMessage::CrashReason
3274af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGSEGV(const siginfo_t *info)
3275af245d11STodd Fiala {
3276af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3277af245d11STodd Fiala     assert(info->si_signo == SIGSEGV);
3278af245d11STodd Fiala 
3279af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3280af245d11STodd Fiala 
3281af245d11STodd Fiala     switch (info->si_code)
3282af245d11STodd Fiala     {
3283af245d11STodd Fiala     default:
3284af245d11STodd Fiala         assert(false && "unexpected si_code for SIGSEGV");
3285af245d11STodd Fiala         break;
3286af245d11STodd Fiala     case SI_KERNEL:
3287af245d11STodd Fiala         // Linux will occasionally send spurious SI_KERNEL codes.
3288af245d11STodd Fiala         // (this is poorly documented in sigaction)
3289af245d11STodd Fiala         // One way to get this is via unaligned SIMD loads.
3290af245d11STodd Fiala         reason = ProcessMessage::eInvalidAddress; // for lack of anything better
3291af245d11STodd Fiala         break;
3292af245d11STodd Fiala     case SEGV_MAPERR:
3293af245d11STodd Fiala         reason = ProcessMessage::eInvalidAddress;
3294af245d11STodd Fiala         break;
3295af245d11STodd Fiala     case SEGV_ACCERR:
3296af245d11STodd Fiala         reason = ProcessMessage::ePrivilegedAddress;
3297af245d11STodd Fiala         break;
3298af245d11STodd Fiala     }
3299af245d11STodd Fiala 
3300af245d11STodd Fiala     return reason;
3301af245d11STodd Fiala }
3302af245d11STodd Fiala #endif
3303af245d11STodd Fiala 
3304af245d11STodd Fiala 
3305af245d11STodd Fiala #if 0
3306af245d11STodd Fiala ProcessMessage::CrashReason
3307af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGILL(const siginfo_t *info)
3308af245d11STodd Fiala {
3309af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3310af245d11STodd Fiala     assert(info->si_signo == SIGILL);
3311af245d11STodd Fiala 
3312af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3313af245d11STodd Fiala 
3314af245d11STodd Fiala     switch (info->si_code)
3315af245d11STodd Fiala     {
3316af245d11STodd Fiala     default:
3317af245d11STodd Fiala         assert(false && "unexpected si_code for SIGILL");
3318af245d11STodd Fiala         break;
3319af245d11STodd Fiala     case ILL_ILLOPC:
3320af245d11STodd Fiala         reason = ProcessMessage::eIllegalOpcode;
3321af245d11STodd Fiala         break;
3322af245d11STodd Fiala     case ILL_ILLOPN:
3323af245d11STodd Fiala         reason = ProcessMessage::eIllegalOperand;
3324af245d11STodd Fiala         break;
3325af245d11STodd Fiala     case ILL_ILLADR:
3326af245d11STodd Fiala         reason = ProcessMessage::eIllegalAddressingMode;
3327af245d11STodd Fiala         break;
3328af245d11STodd Fiala     case ILL_ILLTRP:
3329af245d11STodd Fiala         reason = ProcessMessage::eIllegalTrap;
3330af245d11STodd Fiala         break;
3331af245d11STodd Fiala     case ILL_PRVOPC:
3332af245d11STodd Fiala         reason = ProcessMessage::ePrivilegedOpcode;
3333af245d11STodd Fiala         break;
3334af245d11STodd Fiala     case ILL_PRVREG:
3335af245d11STodd Fiala         reason = ProcessMessage::ePrivilegedRegister;
3336af245d11STodd Fiala         break;
3337af245d11STodd Fiala     case ILL_COPROC:
3338af245d11STodd Fiala         reason = ProcessMessage::eCoprocessorError;
3339af245d11STodd Fiala         break;
3340af245d11STodd Fiala     case ILL_BADSTK:
3341af245d11STodd Fiala         reason = ProcessMessage::eInternalStackError;
3342af245d11STodd Fiala         break;
3343af245d11STodd Fiala     }
3344af245d11STodd Fiala 
3345af245d11STodd Fiala     return reason;
3346af245d11STodd Fiala }
3347af245d11STodd Fiala #endif
3348af245d11STodd Fiala 
3349af245d11STodd Fiala #if 0
3350af245d11STodd Fiala ProcessMessage::CrashReason
3351af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGFPE(const siginfo_t *info)
3352af245d11STodd Fiala {
3353af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3354af245d11STodd Fiala     assert(info->si_signo == SIGFPE);
3355af245d11STodd Fiala 
3356af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3357af245d11STodd Fiala 
3358af245d11STodd Fiala     switch (info->si_code)
3359af245d11STodd Fiala     {
3360af245d11STodd Fiala     default:
3361af245d11STodd Fiala         assert(false && "unexpected si_code for SIGFPE");
3362af245d11STodd Fiala         break;
3363af245d11STodd Fiala     case FPE_INTDIV:
3364af245d11STodd Fiala         reason = ProcessMessage::eIntegerDivideByZero;
3365af245d11STodd Fiala         break;
3366af245d11STodd Fiala     case FPE_INTOVF:
3367af245d11STodd Fiala         reason = ProcessMessage::eIntegerOverflow;
3368af245d11STodd Fiala         break;
3369af245d11STodd Fiala     case FPE_FLTDIV:
3370af245d11STodd Fiala         reason = ProcessMessage::eFloatDivideByZero;
3371af245d11STodd Fiala         break;
3372af245d11STodd Fiala     case FPE_FLTOVF:
3373af245d11STodd Fiala         reason = ProcessMessage::eFloatOverflow;
3374af245d11STodd Fiala         break;
3375af245d11STodd Fiala     case FPE_FLTUND:
3376af245d11STodd Fiala         reason = ProcessMessage::eFloatUnderflow;
3377af245d11STodd Fiala         break;
3378af245d11STodd Fiala     case FPE_FLTRES:
3379af245d11STodd Fiala         reason = ProcessMessage::eFloatInexactResult;
3380af245d11STodd Fiala         break;
3381af245d11STodd Fiala     case FPE_FLTINV:
3382af245d11STodd Fiala         reason = ProcessMessage::eFloatInvalidOperation;
3383af245d11STodd Fiala         break;
3384af245d11STodd Fiala     case FPE_FLTSUB:
3385af245d11STodd Fiala         reason = ProcessMessage::eFloatSubscriptRange;
3386af245d11STodd Fiala         break;
3387af245d11STodd Fiala     }
3388af245d11STodd Fiala 
3389af245d11STodd Fiala     return reason;
3390af245d11STodd Fiala }
3391af245d11STodd Fiala #endif
3392af245d11STodd Fiala 
3393af245d11STodd Fiala #if 0
3394af245d11STodd Fiala ProcessMessage::CrashReason
3395af245d11STodd Fiala NativeProcessLinux::GetCrashReasonForSIGBUS(const siginfo_t *info)
3396af245d11STodd Fiala {
3397af245d11STodd Fiala     ProcessMessage::CrashReason reason;
3398af245d11STodd Fiala     assert(info->si_signo == SIGBUS);
3399af245d11STodd Fiala 
3400af245d11STodd Fiala     reason = ProcessMessage::eInvalidCrashReason;
3401af245d11STodd Fiala 
3402af245d11STodd Fiala     switch (info->si_code)
3403af245d11STodd Fiala     {
3404af245d11STodd Fiala     default:
3405af245d11STodd Fiala         assert(false && "unexpected si_code for SIGBUS");
3406af245d11STodd Fiala         break;
3407af245d11STodd Fiala     case BUS_ADRALN:
3408af245d11STodd Fiala         reason = ProcessMessage::eIllegalAlignment;
3409af245d11STodd Fiala         break;
3410af245d11STodd Fiala     case BUS_ADRERR:
3411af245d11STodd Fiala         reason = ProcessMessage::eIllegalAddress;
3412af245d11STodd Fiala         break;
3413af245d11STodd Fiala     case BUS_OBJERR:
3414af245d11STodd Fiala         reason = ProcessMessage::eHardwareError;
3415af245d11STodd Fiala         break;
3416af245d11STodd Fiala     }
3417af245d11STodd Fiala 
3418af245d11STodd Fiala     return reason;
3419af245d11STodd Fiala }
3420af245d11STodd Fiala #endif
3421af245d11STodd Fiala 
3422af245d11STodd Fiala void
3423af245d11STodd Fiala NativeProcessLinux::ServeOperation(OperationArgs *args)
3424af245d11STodd Fiala {
3425af245d11STodd Fiala     NativeProcessLinux *monitor = args->m_monitor;
3426af245d11STodd Fiala 
3427af245d11STodd Fiala     // We are finised with the arguments and are ready to go.  Sync with the
3428af245d11STodd Fiala     // parent thread and start serving operations on the inferior.
3429af245d11STodd Fiala     sem_post(&args->m_semaphore);
3430af245d11STodd Fiala 
3431af245d11STodd Fiala     for(;;)
3432af245d11STodd Fiala     {
3433af245d11STodd Fiala         // wait for next pending operation
3434af245d11STodd Fiala         if (sem_wait(&monitor->m_operation_pending))
3435af245d11STodd Fiala         {
3436af245d11STodd Fiala             if (errno == EINTR)
3437af245d11STodd Fiala                 continue;
3438af245d11STodd Fiala             assert(false && "Unexpected errno from sem_wait");
3439af245d11STodd Fiala         }
3440af245d11STodd Fiala 
3441af245d11STodd Fiala         reinterpret_cast<Operation*>(monitor->m_operation)->Execute(monitor);
3442af245d11STodd Fiala 
3443af245d11STodd Fiala         // notify calling thread that operation is complete
3444af245d11STodd Fiala         sem_post(&monitor->m_operation_done);
3445af245d11STodd Fiala     }
3446af245d11STodd Fiala }
3447af245d11STodd Fiala 
3448af245d11STodd Fiala void
3449af245d11STodd Fiala NativeProcessLinux::DoOperation(void *op)
3450af245d11STodd Fiala {
3451af245d11STodd Fiala     Mutex::Locker lock(m_operation_mutex);
3452af245d11STodd Fiala 
3453af245d11STodd Fiala     m_operation = op;
3454af245d11STodd Fiala 
3455af245d11STodd Fiala     // notify operation thread that an operation is ready to be processed
3456af245d11STodd Fiala     sem_post(&m_operation_pending);
3457af245d11STodd Fiala 
3458af245d11STodd Fiala     // wait for operation to complete
3459af245d11STodd Fiala     while (sem_wait(&m_operation_done))
3460af245d11STodd Fiala     {
3461af245d11STodd Fiala         if (errno == EINTR)
3462af245d11STodd Fiala             continue;
3463af245d11STodd Fiala         assert(false && "Unexpected errno from sem_wait");
3464af245d11STodd Fiala     }
3465af245d11STodd Fiala }
3466af245d11STodd Fiala 
3467af245d11STodd Fiala Error
3468af245d11STodd Fiala NativeProcessLinux::ReadMemory (lldb::addr_t addr, void *buf, lldb::addr_t size, lldb::addr_t &bytes_read)
3469af245d11STodd Fiala {
3470af245d11STodd Fiala     ReadOperation op(addr, buf, size, bytes_read);
3471af245d11STodd Fiala     DoOperation(&op);
3472af245d11STodd Fiala     return op.GetError ();
3473af245d11STodd Fiala }
3474af245d11STodd Fiala 
3475af245d11STodd Fiala Error
3476af245d11STodd Fiala NativeProcessLinux::WriteMemory (lldb::addr_t addr, const void *buf, lldb::addr_t size, lldb::addr_t &bytes_written)
3477af245d11STodd Fiala {
3478af245d11STodd Fiala     WriteOperation op(addr, buf, size, bytes_written);
3479af245d11STodd Fiala     DoOperation(&op);
3480af245d11STodd Fiala     return op.GetError ();
3481af245d11STodd Fiala }
3482af245d11STodd Fiala 
3483af245d11STodd Fiala bool
3484af245d11STodd Fiala NativeProcessLinux::ReadRegisterValue(lldb::tid_t tid, uint32_t offset, const char* reg_name,
3485af245d11STodd Fiala                                   uint32_t size, RegisterValue &value)
3486af245d11STodd Fiala {
3487af245d11STodd Fiala     bool result;
3488af245d11STodd Fiala     ReadRegOperation op(tid, offset, reg_name, value, result);
3489af245d11STodd Fiala     DoOperation(&op);
3490af245d11STodd Fiala     return result;
3491af245d11STodd Fiala }
3492af245d11STodd Fiala 
3493af245d11STodd Fiala bool
3494af245d11STodd Fiala NativeProcessLinux::WriteRegisterValue(lldb::tid_t tid, unsigned offset,
3495af245d11STodd Fiala                                    const char* reg_name, const RegisterValue &value)
3496af245d11STodd Fiala {
3497af245d11STodd Fiala     bool result;
3498af245d11STodd Fiala     WriteRegOperation op(tid, offset, reg_name, value, result);
3499af245d11STodd Fiala     DoOperation(&op);
3500af245d11STodd Fiala     return result;
3501af245d11STodd Fiala }
3502af245d11STodd Fiala 
3503af245d11STodd Fiala bool
3504af245d11STodd Fiala NativeProcessLinux::ReadGPR(lldb::tid_t tid, void *buf, size_t buf_size)
3505af245d11STodd Fiala {
3506af245d11STodd Fiala     bool result;
3507af245d11STodd Fiala     ReadGPROperation op(tid, buf, buf_size, result);
3508af245d11STodd Fiala     DoOperation(&op);
3509af245d11STodd Fiala     return result;
3510af245d11STodd Fiala }
3511af245d11STodd Fiala 
3512af245d11STodd Fiala bool
3513af245d11STodd Fiala NativeProcessLinux::ReadFPR(lldb::tid_t tid, void *buf, size_t buf_size)
3514af245d11STodd Fiala {
3515af245d11STodd Fiala     bool result;
3516af245d11STodd Fiala     ReadFPROperation op(tid, buf, buf_size, result);
3517af245d11STodd Fiala     DoOperation(&op);
3518af245d11STodd Fiala     return result;
3519af245d11STodd Fiala }
3520af245d11STodd Fiala 
3521af245d11STodd Fiala bool
3522af245d11STodd Fiala NativeProcessLinux::ReadRegisterSet(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset)
3523af245d11STodd Fiala {
3524af245d11STodd Fiala     bool result;
3525af245d11STodd Fiala     ReadRegisterSetOperation op(tid, buf, buf_size, regset, result);
3526af245d11STodd Fiala     DoOperation(&op);
3527af245d11STodd Fiala     return result;
3528af245d11STodd Fiala }
3529af245d11STodd Fiala 
3530af245d11STodd Fiala bool
3531af245d11STodd Fiala NativeProcessLinux::WriteGPR(lldb::tid_t tid, void *buf, size_t buf_size)
3532af245d11STodd Fiala {
3533af245d11STodd Fiala     bool result;
3534af245d11STodd Fiala     WriteGPROperation op(tid, buf, buf_size, result);
3535af245d11STodd Fiala     DoOperation(&op);
3536af245d11STodd Fiala     return result;
3537af245d11STodd Fiala }
3538af245d11STodd Fiala 
3539af245d11STodd Fiala bool
3540af245d11STodd Fiala NativeProcessLinux::WriteFPR(lldb::tid_t tid, void *buf, size_t buf_size)
3541af245d11STodd Fiala {
3542af245d11STodd Fiala     bool result;
3543af245d11STodd Fiala     WriteFPROperation op(tid, buf, buf_size, result);
3544af245d11STodd Fiala     DoOperation(&op);
3545af245d11STodd Fiala     return result;
3546af245d11STodd Fiala }
3547af245d11STodd Fiala 
3548af245d11STodd Fiala bool
3549af245d11STodd Fiala NativeProcessLinux::WriteRegisterSet(lldb::tid_t tid, void *buf, size_t buf_size, unsigned int regset)
3550af245d11STodd Fiala {
3551af245d11STodd Fiala     bool result;
3552af245d11STodd Fiala     WriteRegisterSetOperation op(tid, buf, buf_size, regset, result);
3553af245d11STodd Fiala     DoOperation(&op);
3554af245d11STodd Fiala     return result;
3555af245d11STodd Fiala }
3556af245d11STodd Fiala 
3557af245d11STodd Fiala bool
3558af245d11STodd Fiala NativeProcessLinux::Resume (lldb::tid_t tid, uint32_t signo)
3559af245d11STodd Fiala {
3560af245d11STodd Fiala     bool result;
3561af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_PROCESS));
3562af245d11STodd Fiala 
3563af245d11STodd Fiala     if (log)
3564af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() resuming thread = %"  PRIu64 " with signal %s", __FUNCTION__, tid,
3565af245d11STodd Fiala                                  GetUnixSignals().GetSignalAsCString (signo));
3566af245d11STodd Fiala     ResumeOperation op (tid, signo, result);
3567af245d11STodd Fiala     DoOperation (&op);
3568af245d11STodd Fiala     if (log)
3569af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s() resuming result = %s", __FUNCTION__, result ? "true" : "false");
3570af245d11STodd Fiala     return result;
3571af245d11STodd Fiala }
3572af245d11STodd Fiala 
3573af245d11STodd Fiala bool
3574af245d11STodd Fiala NativeProcessLinux::SingleStep(lldb::tid_t tid, uint32_t signo)
3575af245d11STodd Fiala {
3576af245d11STodd Fiala     bool result;
3577af245d11STodd Fiala     SingleStepOperation op(tid, signo, result);
3578af245d11STodd Fiala     DoOperation(&op);
3579af245d11STodd Fiala     return result;
3580af245d11STodd Fiala }
3581af245d11STodd Fiala 
3582af245d11STodd Fiala bool
3583af245d11STodd Fiala NativeProcessLinux::GetSignalInfo(lldb::tid_t tid, void *siginfo, int &ptrace_err)
3584af245d11STodd Fiala {
3585af245d11STodd Fiala     bool result;
3586af245d11STodd Fiala     SiginfoOperation op(tid, siginfo, result, ptrace_err);
3587af245d11STodd Fiala     DoOperation(&op);
3588af245d11STodd Fiala     return result;
3589af245d11STodd Fiala }
3590af245d11STodd Fiala 
3591af245d11STodd Fiala bool
3592af245d11STodd Fiala NativeProcessLinux::GetEventMessage(lldb::tid_t tid, unsigned long *message)
3593af245d11STodd Fiala {
3594af245d11STodd Fiala     bool result;
3595af245d11STodd Fiala     EventMessageOperation op(tid, message, result);
3596af245d11STodd Fiala     DoOperation(&op);
3597af245d11STodd Fiala     return result;
3598af245d11STodd Fiala }
3599af245d11STodd Fiala 
3600af245d11STodd Fiala lldb_private::Error
3601af245d11STodd Fiala NativeProcessLinux::Detach(lldb::tid_t tid)
3602af245d11STodd Fiala {
3603af245d11STodd Fiala     lldb_private::Error error;
3604af245d11STodd Fiala     if (tid != LLDB_INVALID_THREAD_ID)
3605af245d11STodd Fiala     {
3606af245d11STodd Fiala         DetachOperation op(tid, error);
3607af245d11STodd Fiala         DoOperation(&op);
3608af245d11STodd Fiala     }
3609af245d11STodd Fiala     return error;
3610af245d11STodd Fiala }
3611af245d11STodd Fiala 
3612af245d11STodd Fiala bool
3613af245d11STodd Fiala NativeProcessLinux::DupDescriptor(const char *path, int fd, int flags)
3614af245d11STodd Fiala {
3615af245d11STodd Fiala     int target_fd = open(path, flags, 0666);
3616af245d11STodd Fiala 
3617af245d11STodd Fiala     if (target_fd == -1)
3618af245d11STodd Fiala         return false;
3619af245d11STodd Fiala 
3620af245d11STodd Fiala     return (dup2(target_fd, fd) == -1) ? false : true;
3621af245d11STodd Fiala }
3622af245d11STodd Fiala 
3623af245d11STodd Fiala void
3624af245d11STodd Fiala NativeProcessLinux::StopMonitoringChildProcess()
3625af245d11STodd Fiala {
3626acee96aeSZachary Turner     if (m_monitor_thread.IsJoinable())
3627af245d11STodd Fiala     {
362839de3110SZachary Turner         m_monitor_thread.Cancel();
362939de3110SZachary Turner         m_monitor_thread.Join(nullptr);
3630af245d11STodd Fiala     }
3631af245d11STodd Fiala }
3632af245d11STodd Fiala 
3633af245d11STodd Fiala void
3634af245d11STodd Fiala NativeProcessLinux::StopMonitor()
3635af245d11STodd Fiala {
3636af245d11STodd Fiala     StopMonitoringChildProcess();
3637af245d11STodd Fiala     StopOpThread();
3638af245d11STodd Fiala     sem_destroy(&m_operation_pending);
3639af245d11STodd Fiala     sem_destroy(&m_operation_done);
3640af245d11STodd Fiala 
3641af245d11STodd Fiala     // TODO: validate whether this still holds, fix up comment.
3642af245d11STodd Fiala     // Note: ProcessPOSIX passes the m_terminal_fd file descriptor to
3643af245d11STodd Fiala     // Process::SetSTDIOFileDescriptor, which in turn transfers ownership of
3644af245d11STodd Fiala     // the descriptor to a ConnectionFileDescriptor object.  Consequently
3645af245d11STodd Fiala     // even though still has the file descriptor, we shouldn't close it here.
3646af245d11STodd Fiala }
3647af245d11STodd Fiala 
3648af245d11STodd Fiala void
3649af245d11STodd Fiala NativeProcessLinux::StopOpThread()
3650af245d11STodd Fiala {
3651acee96aeSZachary Turner     if (!m_operation_thread.IsJoinable())
3652af245d11STodd Fiala         return;
3653af245d11STodd Fiala 
365439de3110SZachary Turner     m_operation_thread.Cancel();
365539de3110SZachary Turner     m_operation_thread.Join(nullptr);
3656af245d11STodd Fiala }
3657af245d11STodd Fiala 
3658af245d11STodd Fiala bool
3659af245d11STodd Fiala NativeProcessLinux::HasThreadNoLock (lldb::tid_t thread_id)
3660af245d11STodd Fiala {
3661af245d11STodd Fiala     for (auto thread_sp : m_threads)
3662af245d11STodd Fiala     {
3663af245d11STodd Fiala         assert (thread_sp && "thread list should not contain NULL threads");
3664af245d11STodd Fiala         if (thread_sp->GetID () == thread_id)
3665af245d11STodd Fiala         {
3666af245d11STodd Fiala             // We have this thread.
3667af245d11STodd Fiala             return true;
3668af245d11STodd Fiala         }
3669af245d11STodd Fiala     }
3670af245d11STodd Fiala 
3671af245d11STodd Fiala     // We don't have this thread.
3672af245d11STodd Fiala     return false;
3673af245d11STodd Fiala }
3674af245d11STodd Fiala 
3675af245d11STodd Fiala NativeThreadProtocolSP
3676af245d11STodd Fiala NativeProcessLinux::MaybeGetThreadNoLock (lldb::tid_t thread_id)
3677af245d11STodd Fiala {
3678af245d11STodd Fiala     // CONSIDER organize threads by map - we can do better than linear.
3679af245d11STodd Fiala     for (auto thread_sp : m_threads)
3680af245d11STodd Fiala     {
3681af245d11STodd Fiala         if (thread_sp->GetID () == thread_id)
3682af245d11STodd Fiala             return thread_sp;
3683af245d11STodd Fiala     }
3684af245d11STodd Fiala 
3685af245d11STodd Fiala     // We don't have this thread.
3686af245d11STodd Fiala     return NativeThreadProtocolSP ();
3687af245d11STodd Fiala }
3688af245d11STodd Fiala 
3689af245d11STodd Fiala bool
3690af245d11STodd Fiala NativeProcessLinux::StopTrackingThread (lldb::tid_t thread_id)
3691af245d11STodd Fiala {
3692af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3693af245d11STodd Fiala     for (auto it = m_threads.begin (); it != m_threads.end (); ++it)
3694af245d11STodd Fiala     {
3695af245d11STodd Fiala         if (*it && ((*it)->GetID () == thread_id))
3696af245d11STodd Fiala         {
3697af245d11STodd Fiala             m_threads.erase (it);
3698af245d11STodd Fiala             return true;
3699af245d11STodd Fiala         }
3700af245d11STodd Fiala     }
3701af245d11STodd Fiala 
3702af245d11STodd Fiala     // Didn't find it.
3703af245d11STodd Fiala     return false;
3704af245d11STodd Fiala }
3705af245d11STodd Fiala 
3706af245d11STodd Fiala NativeThreadProtocolSP
3707af245d11STodd Fiala NativeProcessLinux::AddThread (lldb::tid_t thread_id)
3708af245d11STodd Fiala {
3709af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3710af245d11STodd Fiala 
3711af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3712af245d11STodd Fiala 
3713af245d11STodd Fiala     if (log)
3714af245d11STodd Fiala     {
3715af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " adding thread with tid %" PRIu64,
3716af245d11STodd Fiala                 __FUNCTION__,
3717af245d11STodd Fiala                 GetID (),
3718af245d11STodd Fiala                 thread_id);
3719af245d11STodd Fiala     }
3720af245d11STodd Fiala 
3721af245d11STodd Fiala     assert (!HasThreadNoLock (thread_id) && "attempted to add a thread by id that already exists");
3722af245d11STodd Fiala 
3723af245d11STodd Fiala     // If this is the first thread, save it as the current thread
3724af245d11STodd Fiala     if (m_threads.empty ())
3725af245d11STodd Fiala         SetCurrentThreadID (thread_id);
3726af245d11STodd Fiala 
3727af245d11STodd Fiala     NativeThreadProtocolSP thread_sp (new NativeThreadLinux (this, thread_id));
3728af245d11STodd Fiala     m_threads.push_back (thread_sp);
3729af245d11STodd Fiala 
3730af245d11STodd Fiala     return thread_sp;
3731af245d11STodd Fiala }
3732af245d11STodd Fiala 
3733af245d11STodd Fiala NativeThreadProtocolSP
3734af245d11STodd Fiala NativeProcessLinux::GetOrCreateThread (lldb::tid_t thread_id, bool &created)
3735af245d11STodd Fiala {
3736af245d11STodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_THREAD));
3737af245d11STodd Fiala 
3738af245d11STodd Fiala     Mutex::Locker locker (m_threads_mutex);
3739af245d11STodd Fiala     if (log)
3740af245d11STodd Fiala     {
3741af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " get/create thread with tid %" PRIu64,
3742af245d11STodd Fiala                      __FUNCTION__,
3743af245d11STodd Fiala                      GetID (),
3744af245d11STodd Fiala                      thread_id);
3745af245d11STodd Fiala     }
3746af245d11STodd Fiala 
3747af245d11STodd Fiala     // Retrieve the thread if it is already getting tracked.
3748af245d11STodd Fiala     NativeThreadProtocolSP thread_sp = MaybeGetThreadNoLock (thread_id);
3749af245d11STodd Fiala     if (thread_sp)
3750af245d11STodd Fiala     {
3751af245d11STodd Fiala         if (log)
3752af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": thread already tracked, returning",
3753af245d11STodd Fiala                          __FUNCTION__,
3754af245d11STodd Fiala                          GetID (),
3755af245d11STodd Fiala                          thread_id);
3756af245d11STodd Fiala         created = false;
3757af245d11STodd Fiala         return thread_sp;
3758af245d11STodd Fiala 
3759af245d11STodd Fiala     }
3760af245d11STodd Fiala 
3761af245d11STodd Fiala     // Create the thread metadata since it isn't being tracked.
3762af245d11STodd Fiala     if (log)
3763af245d11STodd Fiala         log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": thread didn't exist, tracking now",
3764af245d11STodd Fiala                      __FUNCTION__,
3765af245d11STodd Fiala                      GetID (),
3766af245d11STodd Fiala                      thread_id);
3767af245d11STodd Fiala 
3768af245d11STodd Fiala     thread_sp.reset (new NativeThreadLinux (this, thread_id));
3769af245d11STodd Fiala     m_threads.push_back (thread_sp);
3770af245d11STodd Fiala     created = true;
3771af245d11STodd Fiala 
3772af245d11STodd Fiala     return thread_sp;
3773af245d11STodd Fiala }
3774af245d11STodd Fiala 
3775af245d11STodd Fiala Error
3776af245d11STodd Fiala NativeProcessLinux::FixupBreakpointPCAsNeeded (NativeThreadProtocolSP &thread_sp)
3777af245d11STodd Fiala {
377875f47c3aSTodd Fiala     Log *log (GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
3779af245d11STodd Fiala 
3780af245d11STodd Fiala     Error error;
3781af245d11STodd Fiala 
3782af245d11STodd Fiala     // Get a linux thread pointer.
3783af245d11STodd Fiala     if (!thread_sp)
3784af245d11STodd Fiala     {
3785af245d11STodd Fiala         error.SetErrorString ("null thread_sp");
3786af245d11STodd Fiala         if (log)
3787af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s failed: %s", __FUNCTION__, error.AsCString ());
3788af245d11STodd Fiala         return error;
3789af245d11STodd Fiala     }
3790af245d11STodd Fiala     NativeThreadLinux *const linux_thread_p = reinterpret_cast<NativeThreadLinux*> (thread_sp.get());
3791af245d11STodd Fiala 
3792af245d11STodd Fiala     // Find out the size of a breakpoint (might depend on where we are in the code).
3793af245d11STodd Fiala     NativeRegisterContextSP context_sp = linux_thread_p->GetRegisterContext ();
3794af245d11STodd Fiala     if (!context_sp)
3795af245d11STodd Fiala     {
3796af245d11STodd Fiala         error.SetErrorString ("cannot get a NativeRegisterContext for the thread");
3797af245d11STodd Fiala         if (log)
3798af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s failed: %s", __FUNCTION__, error.AsCString ());
3799af245d11STodd Fiala         return error;
3800af245d11STodd Fiala     }
3801af245d11STodd Fiala 
3802af245d11STodd Fiala     uint32_t breakpoint_size = 0;
3803af245d11STodd Fiala     error = GetSoftwareBreakpointSize (context_sp, breakpoint_size);
3804af245d11STodd Fiala     if (error.Fail ())
3805af245d11STodd Fiala     {
3806af245d11STodd Fiala         if (log)
3807af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s GetBreakpointSize() failed: %s", __FUNCTION__, error.AsCString ());
3808af245d11STodd Fiala         return error;
3809af245d11STodd Fiala     }
3810af245d11STodd Fiala     else
3811af245d11STodd Fiala     {
3812af245d11STodd Fiala         if (log)
3813af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s breakpoint size: %" PRIu32, __FUNCTION__, breakpoint_size);
3814af245d11STodd Fiala     }
3815af245d11STodd Fiala 
3816af245d11STodd Fiala     // First try probing for a breakpoint at a software breakpoint location: PC - breakpoint size.
3817af245d11STodd Fiala     const lldb::addr_t initial_pc_addr = context_sp->GetPC ();
3818af245d11STodd Fiala     lldb::addr_t breakpoint_addr = initial_pc_addr;
3819af245d11STodd Fiala     if (breakpoint_size > static_cast<lldb::addr_t> (0))
3820af245d11STodd Fiala     {
3821af245d11STodd Fiala         // Do not allow breakpoint probe to wrap around.
3822af245d11STodd Fiala         if (breakpoint_addr >= static_cast<lldb::addr_t> (breakpoint_size))
3823af245d11STodd Fiala             breakpoint_addr -= static_cast<lldb::addr_t> (breakpoint_size);
3824af245d11STodd Fiala     }
3825af245d11STodd Fiala 
3826af245d11STodd Fiala     // Check if we stopped because of a breakpoint.
3827af245d11STodd Fiala     NativeBreakpointSP breakpoint_sp;
3828af245d11STodd Fiala     error = m_breakpoint_list.GetBreakpoint (breakpoint_addr, breakpoint_sp);
3829af245d11STodd Fiala     if (!error.Success () || !breakpoint_sp)
3830af245d11STodd Fiala     {
3831af245d11STodd Fiala         // We didn't find one at a software probe location.  Nothing to do.
3832af245d11STodd Fiala         if (log)
3833af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " no lldb breakpoint found at current pc with adjustment: 0x%" PRIx64, __FUNCTION__, GetID (), breakpoint_addr);
3834af245d11STodd Fiala         return Error ();
3835af245d11STodd Fiala     }
3836af245d11STodd Fiala 
3837af245d11STodd Fiala     // If the breakpoint is not a software breakpoint, nothing to do.
3838af245d11STodd Fiala     if (!breakpoint_sp->IsSoftwareBreakpoint ())
3839af245d11STodd Fiala     {
3840af245d11STodd Fiala         if (log)
3841af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " breakpoint found at 0x%" PRIx64 ", not software, nothing to adjust", __FUNCTION__, GetID (), breakpoint_addr);
3842af245d11STodd Fiala         return Error ();
3843af245d11STodd Fiala     }
3844af245d11STodd Fiala 
3845af245d11STodd Fiala     //
3846af245d11STodd Fiala     // We have a software breakpoint and need to adjust the PC.
3847af245d11STodd Fiala     //
3848af245d11STodd Fiala 
3849af245d11STodd Fiala     // Sanity check.
3850af245d11STodd Fiala     if (breakpoint_size == 0)
3851af245d11STodd Fiala     {
3852af245d11STodd Fiala         // Nothing to do!  How did we get here?
3853af245d11STodd Fiala         if (log)
3854af245d11STodd 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);
3855af245d11STodd Fiala         return Error ();
3856af245d11STodd Fiala     }
3857af245d11STodd Fiala 
3858af245d11STodd Fiala     // Change the program counter.
3859af245d11STodd Fiala     if (log)
3860af245d11STodd 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);
3861af245d11STodd Fiala 
3862af245d11STodd Fiala     error = context_sp->SetPC (breakpoint_addr);
3863af245d11STodd Fiala     if (error.Fail ())
3864af245d11STodd Fiala     {
3865af245d11STodd Fiala         if (log)
3866af245d11STodd Fiala             log->Printf ("NativeProcessLinux::%s pid %" PRIu64 " tid %" PRIu64 ": failed to set PC: %s", __FUNCTION__, GetID (), linux_thread_p->GetID (), error.AsCString ());
3867af245d11STodd Fiala         return error;
3868af245d11STodd Fiala     }
3869af245d11STodd Fiala 
3870af245d11STodd Fiala     return error;
3871af245d11STodd Fiala }
3872