blob: dd8de004ee305a3ae439e668d52f5a163635dc3e [file] [log] [blame]
Chris Lattner24943d22010-06-08 16:52:24 +00001//===-- ProcessGDBRemote.cpp ------------------------------------*- C++ -*-===//
2//
3// The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9
10// C Includes
11#include <errno.h>
Chris Lattner24943d22010-06-08 16:52:24 +000012#include <spawn.h>
Chris Lattner24943d22010-06-08 16:52:24 +000013#include <sys/types.h>
Chris Lattner24943d22010-06-08 16:52:24 +000014#include <sys/stat.h>
Chris Lattner24943d22010-06-08 16:52:24 +000015
16// C++ Includes
17#include <algorithm>
18#include <map>
19
20// Other libraries and framework includes
21
22#include "lldb/Breakpoint/WatchpointLocation.h"
Jim Ingham84cdc152010-06-15 19:49:27 +000023#include "lldb/Interpreter/Args.h"
Chris Lattner24943d22010-06-08 16:52:24 +000024#include "lldb/Core/ArchSpec.h"
25#include "lldb/Core/Debugger.h"
26#include "lldb/Core/ConnectionFileDescriptor.h"
Greg Clayton5f54ac32011-02-08 05:05:52 +000027#include "lldb/Host/FileSpec.h"
Chris Lattner24943d22010-06-08 16:52:24 +000028#include "lldb/Core/InputReader.h"
29#include "lldb/Core/Module.h"
30#include "lldb/Core/PluginManager.h"
31#include "lldb/Core/State.h"
32#include "lldb/Core/StreamString.h"
33#include "lldb/Core/Timer.h"
34#include "lldb/Host/TimeValue.h"
35#include "lldb/Symbol/ObjectFile.h"
36#include "lldb/Target/DynamicLoader.h"
37#include "lldb/Target/Target.h"
38#include "lldb/Target/TargetList.h"
Jason Molendadea5ea72010-06-09 21:28:42 +000039#include "lldb/Utility/PseudoTerminal.h"
Chris Lattner24943d22010-06-08 16:52:24 +000040
41// Project includes
42#include "lldb/Host/Host.h"
Greg Clayton54e7afa2010-07-09 20:39:50 +000043#include "Utility/StringExtractorGDBRemote.h"
Chris Lattner24943d22010-06-08 16:52:24 +000044#include "GDBRemoteRegisterContext.h"
45#include "ProcessGDBRemote.h"
46#include "ProcessGDBRemoteLog.h"
47#include "ThreadGDBRemote.h"
Greg Clayton643ee732010-08-04 01:40:35 +000048#include "StopInfoMachException.h"
49
Chris Lattner24943d22010-06-08 16:52:24 +000050
Chris Lattner24943d22010-06-08 16:52:24 +000051
52#define DEBUGSERVER_BASENAME "debugserver"
53using namespace lldb;
54using namespace lldb_private;
55
56static inline uint16_t
57get_random_port ()
58{
59 return (arc4random() % (UINT16_MAX - 1000u)) + 1000u;
60}
61
62
63const char *
64ProcessGDBRemote::GetPluginNameStatic()
65{
66 return "process.gdb-remote";
67}
68
69const char *
70ProcessGDBRemote::GetPluginDescriptionStatic()
71{
72 return "GDB Remote protocol based debugging plug-in.";
73}
74
75void
76ProcessGDBRemote::Terminate()
77{
78 PluginManager::UnregisterPlugin (ProcessGDBRemote::CreateInstance);
79}
80
81
82Process*
83ProcessGDBRemote::CreateInstance (Target &target, Listener &listener)
84{
85 return new ProcessGDBRemote (target, listener);
86}
87
88bool
89ProcessGDBRemote::CanDebug(Target &target)
90{
91 // For now we are just making sure the file exists for a given module
92 ModuleSP exe_module_sp(target.GetExecutableModule());
93 if (exe_module_sp.get())
94 return exe_module_sp->GetFileSpec().Exists();
Jim Ingham7508e732010-08-09 23:31:02 +000095 // However, if there is no executable module, we return true since we might be preparing to attach.
96 return true;
Chris Lattner24943d22010-06-08 16:52:24 +000097}
98
99//----------------------------------------------------------------------
100// ProcessGDBRemote constructor
101//----------------------------------------------------------------------
102ProcessGDBRemote::ProcessGDBRemote(Target& target, Listener &listener) :
103 Process (target, listener),
104 m_dynamic_loader_ap (),
Chris Lattner24943d22010-06-08 16:52:24 +0000105 m_flags (0),
Chris Lattner24943d22010-06-08 16:52:24 +0000106 m_stdio_mutex (Mutex::eMutexTypeRecursive),
Chris Lattner24943d22010-06-08 16:52:24 +0000107 m_gdb_comm(),
108 m_debugserver_pid (LLDB_INVALID_PROCESS_ID),
Greg Clayton75ccf502010-08-21 02:22:51 +0000109 m_debugserver_thread (LLDB_INVALID_HOST_THREAD),
Greg Clayton54e7afa2010-07-09 20:39:50 +0000110 m_last_stop_packet (),
Chris Lattner24943d22010-06-08 16:52:24 +0000111 m_register_info (),
Chris Lattner24943d22010-06-08 16:52:24 +0000112 m_async_broadcaster ("lldb.process.gdb-remote.async-broadcaster"),
113 m_async_thread (LLDB_INVALID_HOST_THREAD),
Greg Clayton54e7afa2010-07-09 20:39:50 +0000114 m_curr_tid (LLDB_INVALID_THREAD_ID),
115 m_curr_tid_run (LLDB_INVALID_THREAD_ID),
Chris Lattner24943d22010-06-08 16:52:24 +0000116 m_z0_supported (1),
117 m_continue_packet(),
118 m_dispatch_queue_offsets_addr (LLDB_INVALID_ADDRESS),
Greg Clayton54e7afa2010-07-09 20:39:50 +0000119 m_packet_timeout (1),
120 m_max_memory_size (512),
Jim Ingham7508e732010-08-09 23:31:02 +0000121 m_waiting_for_attach (false),
Jim Ingham55e01d82011-01-22 01:33:44 +0000122 m_local_debugserver (true),
123 m_thread_observation_bps()
Chris Lattner24943d22010-06-08 16:52:24 +0000124{
125}
126
127//----------------------------------------------------------------------
128// Destructor
129//----------------------------------------------------------------------
130ProcessGDBRemote::~ProcessGDBRemote()
131{
Greg Claytonff5cac22010-12-13 18:11:18 +0000132 m_dynamic_loader_ap.reset();
133
Greg Clayton09c81ef2011-02-08 01:34:25 +0000134 if (IS_VALID_LLDB_HOST_THREAD(m_debugserver_thread))
Greg Clayton75ccf502010-08-21 02:22:51 +0000135 {
136 Host::ThreadCancel (m_debugserver_thread, NULL);
137 thread_result_t thread_result;
138 Host::ThreadJoin (m_debugserver_thread, &thread_result, NULL);
139 m_debugserver_thread = LLDB_INVALID_HOST_THREAD;
140 }
Chris Lattner24943d22010-06-08 16:52:24 +0000141 // m_mach_process.UnregisterNotificationCallbacks (this);
142 Clear();
143}
144
145//----------------------------------------------------------------------
146// PluginInterface
147//----------------------------------------------------------------------
148const char *
149ProcessGDBRemote::GetPluginName()
150{
151 return "Process debugging plug-in that uses the GDB remote protocol";
152}
153
154const char *
155ProcessGDBRemote::GetShortPluginName()
156{
157 return GetPluginNameStatic();
158}
159
160uint32_t
161ProcessGDBRemote::GetPluginVersion()
162{
163 return 1;
164}
165
166void
167ProcessGDBRemote::GetPluginCommandHelp (const char *command, Stream *strm)
168{
169 strm->Printf("TODO: fill this in\n");
170}
171
172Error
173ProcessGDBRemote::ExecutePluginCommand (Args &command, Stream *strm)
174{
175 Error error;
176 error.SetErrorString("No plug-in commands are currently supported.");
177 return error;
178}
179
180Log *
181ProcessGDBRemote::EnablePluginLogging (Stream *strm, Args &command)
182{
183 return NULL;
184}
185
186void
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000187ProcessGDBRemote::BuildDynamicRegisterInfo (bool force)
Chris Lattner24943d22010-06-08 16:52:24 +0000188{
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000189 if (!force && m_register_info.GetNumRegisters() > 0)
190 return;
191
192 char packet[128];
Chris Lattner24943d22010-06-08 16:52:24 +0000193 m_register_info.Clear();
194 StringExtractorGDBRemote::Type packet_type = StringExtractorGDBRemote::eResponse;
195 uint32_t reg_offset = 0;
196 uint32_t reg_num = 0;
197 for (; packet_type == StringExtractorGDBRemote::eResponse; ++reg_num)
198 {
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000199 const int packet_len = ::snprintf (packet, sizeof(packet), "qRegisterInfo%x", reg_num);
200 assert (packet_len < sizeof(packet));
Chris Lattner24943d22010-06-08 16:52:24 +0000201 StringExtractorGDBRemote response;
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000202 if (m_gdb_comm.SendPacketAndWaitForResponse(packet, packet_len, response, 2, false))
Chris Lattner24943d22010-06-08 16:52:24 +0000203 {
204 packet_type = response.GetType();
205 if (packet_type == StringExtractorGDBRemote::eResponse)
206 {
207 std::string name;
208 std::string value;
209 ConstString reg_name;
210 ConstString alt_name;
211 ConstString set_name;
212 RegisterInfo reg_info = { NULL, // Name
213 NULL, // Alt name
214 0, // byte size
215 reg_offset, // offset
216 eEncodingUint, // encoding
217 eFormatHex, // formate
Chris Lattner24943d22010-06-08 16:52:24 +0000218 {
219 LLDB_INVALID_REGNUM, // GCC reg num
220 LLDB_INVALID_REGNUM, // DWARF reg num
221 LLDB_INVALID_REGNUM, // generic reg num
Jason Molenda3a4ea242010-09-10 07:49:16 +0000222 reg_num, // GDB reg num
223 reg_num // native register number
Chris Lattner24943d22010-06-08 16:52:24 +0000224 }
225 };
226
227 while (response.GetNameColonValue(name, value))
228 {
229 if (name.compare("name") == 0)
230 {
231 reg_name.SetCString(value.c_str());
232 }
233 else if (name.compare("alt-name") == 0)
234 {
235 alt_name.SetCString(value.c_str());
236 }
237 else if (name.compare("bitsize") == 0)
238 {
239 reg_info.byte_size = Args::StringToUInt32(value.c_str(), 0, 0) / CHAR_BIT;
240 }
241 else if (name.compare("offset") == 0)
242 {
243 uint32_t offset = Args::StringToUInt32(value.c_str(), UINT32_MAX, 0);
Jason Molenda53d96862010-06-11 23:44:18 +0000244 if (reg_offset != offset)
Chris Lattner24943d22010-06-08 16:52:24 +0000245 {
246 reg_offset = offset;
Chris Lattner24943d22010-06-08 16:52:24 +0000247 }
248 }
249 else if (name.compare("encoding") == 0)
250 {
251 if (value.compare("uint") == 0)
252 reg_info.encoding = eEncodingUint;
253 else if (value.compare("sint") == 0)
254 reg_info.encoding = eEncodingSint;
255 else if (value.compare("ieee754") == 0)
256 reg_info.encoding = eEncodingIEEE754;
257 else if (value.compare("vector") == 0)
258 reg_info.encoding = eEncodingVector;
259 }
260 else if (name.compare("format") == 0)
261 {
262 if (value.compare("binary") == 0)
263 reg_info.format = eFormatBinary;
264 else if (value.compare("decimal") == 0)
265 reg_info.format = eFormatDecimal;
266 else if (value.compare("hex") == 0)
267 reg_info.format = eFormatHex;
268 else if (value.compare("float") == 0)
269 reg_info.format = eFormatFloat;
270 else if (value.compare("vector-sint8") == 0)
271 reg_info.format = eFormatVectorOfSInt8;
272 else if (value.compare("vector-uint8") == 0)
273 reg_info.format = eFormatVectorOfUInt8;
274 else if (value.compare("vector-sint16") == 0)
275 reg_info.format = eFormatVectorOfSInt16;
276 else if (value.compare("vector-uint16") == 0)
277 reg_info.format = eFormatVectorOfUInt16;
278 else if (value.compare("vector-sint32") == 0)
279 reg_info.format = eFormatVectorOfSInt32;
280 else if (value.compare("vector-uint32") == 0)
281 reg_info.format = eFormatVectorOfUInt32;
282 else if (value.compare("vector-float32") == 0)
283 reg_info.format = eFormatVectorOfFloat32;
284 else if (value.compare("vector-uint128") == 0)
285 reg_info.format = eFormatVectorOfUInt128;
286 }
287 else if (name.compare("set") == 0)
288 {
289 set_name.SetCString(value.c_str());
290 }
291 else if (name.compare("gcc") == 0)
292 {
293 reg_info.kinds[eRegisterKindGCC] = Args::StringToUInt32(value.c_str(), LLDB_INVALID_REGNUM, 0);
294 }
295 else if (name.compare("dwarf") == 0)
296 {
297 reg_info.kinds[eRegisterKindDWARF] = Args::StringToUInt32(value.c_str(), LLDB_INVALID_REGNUM, 0);
298 }
299 else if (name.compare("generic") == 0)
300 {
301 if (value.compare("pc") == 0)
302 reg_info.kinds[eRegisterKindGeneric] = LLDB_REGNUM_GENERIC_PC;
303 else if (value.compare("sp") == 0)
304 reg_info.kinds[eRegisterKindGeneric] = LLDB_REGNUM_GENERIC_SP;
305 else if (value.compare("fp") == 0)
306 reg_info.kinds[eRegisterKindGeneric] = LLDB_REGNUM_GENERIC_FP;
307 else if (value.compare("ra") == 0)
308 reg_info.kinds[eRegisterKindGeneric] = LLDB_REGNUM_GENERIC_RA;
309 else if (value.compare("flags") == 0)
310 reg_info.kinds[eRegisterKindGeneric] = LLDB_REGNUM_GENERIC_FLAGS;
311 }
312 }
313
Jason Molenda53d96862010-06-11 23:44:18 +0000314 reg_info.byte_offset = reg_offset;
Chris Lattner24943d22010-06-08 16:52:24 +0000315 assert (reg_info.byte_size != 0);
316 reg_offset += reg_info.byte_size;
317 m_register_info.AddRegister(reg_info, reg_name, alt_name, set_name);
318 }
319 }
320 else
321 {
322 packet_type = StringExtractorGDBRemote::eError;
323 }
324 }
325
326 if (reg_num == 0)
327 {
328 // We didn't get anything. See if we are debugging ARM and fill with
329 // a hard coded register set until we can get an updated debugserver
330 // down on the devices.
331 ArchSpec arm_arch ("arm");
332 if (GetTarget().GetArchitecture() == arm_arch)
333 m_register_info.HardcodeARMRegisters();
334 }
335 m_register_info.Finalize ();
336}
337
338Error
339ProcessGDBRemote::WillLaunch (Module* module)
340{
341 return WillLaunchOrAttach ();
342}
343
344Error
Greg Clayton20d338f2010-11-18 05:57:03 +0000345ProcessGDBRemote::WillAttachToProcessWithID (lldb::pid_t pid)
Chris Lattner24943d22010-06-08 16:52:24 +0000346{
347 return WillLaunchOrAttach ();
348}
349
350Error
Greg Clayton20d338f2010-11-18 05:57:03 +0000351ProcessGDBRemote::WillAttachToProcessWithName (const char *process_name, bool wait_for_launch)
Chris Lattner24943d22010-06-08 16:52:24 +0000352{
353 return WillLaunchOrAttach ();
354}
355
356Error
Greg Claytone71e2582011-02-04 01:58:07 +0000357ProcessGDBRemote::DoConnectRemote (const char *remote_url)
358{
359 Error error (WillLaunchOrAttach ());
360
361 if (error.Fail())
362 return error;
363
364 if (strncmp (remote_url, "connect://", strlen ("connect://")) == 0)
365 {
366 error = ConnectToDebugserver (remote_url);
367 }
368 else
369 {
370 error.SetErrorStringWithFormat ("unsupported remote url: %s", remote_url);
371 }
372
373 if (error.Fail())
374 return error;
375 StartAsyncThread ();
376
377 lldb::pid_t pid = m_gdb_comm.GetCurrentProcessID (m_packet_timeout);
378 if (pid == LLDB_INVALID_PROCESS_ID)
379 {
380 // We don't have a valid process ID, so note that we are connected
381 // and could now request to launch or attach, or get remote process
382 // listings...
383 SetPrivateState (eStateConnected);
384 }
385 else
386 {
387 // We have a valid process
388 SetID (pid);
389 StringExtractorGDBRemote response;
390 if (m_gdb_comm.SendPacketAndWaitForResponse("?", 1, response, m_packet_timeout, false))
391 {
392 const StateType state = SetThreadStopInfo (response);
393 if (state == eStateStopped)
394 {
395 SetPrivateState (state);
396 }
397 else
398 error.SetErrorStringWithFormat ("Process %i was reported after connecting to '%s', but state was not stopped: %s", pid, remote_url, StateAsCString (state));
399 }
400 else
401 error.SetErrorStringWithFormat ("Process %i was reported after connecting to '%s', but no stop reply packet was received", pid, remote_url);
402 }
403 return error;
404}
405
406Error
Chris Lattner24943d22010-06-08 16:52:24 +0000407ProcessGDBRemote::WillLaunchOrAttach ()
408{
409 Error error;
410 // TODO: this is hardcoded for macosx right now. We need this to be more dynamic
411 m_dynamic_loader_ap.reset(DynamicLoader::FindPlugin(this, "dynamic-loader.macosx-dyld"));
412
413 if (m_dynamic_loader_ap.get() == NULL)
414 error.SetErrorString("unable to find the dynamic loader named 'dynamic-loader.macosx-dyld'");
415 m_stdio_communication.Clear ();
416
417 return error;
418}
419
420//----------------------------------------------------------------------
421// Process Control
422//----------------------------------------------------------------------
423Error
424ProcessGDBRemote::DoLaunch
425(
426 Module* module,
427 char const *argv[],
428 char const *envp[],
Greg Clayton452bf612010-08-31 18:35:14 +0000429 uint32_t launch_flags,
Chris Lattner24943d22010-06-08 16:52:24 +0000430 const char *stdin_path,
431 const char *stdout_path,
Greg Claytonde915be2011-01-23 05:56:20 +0000432 const char *stderr_path,
433 const char *working_dir
Chris Lattner24943d22010-06-08 16:52:24 +0000434)
435{
Greg Clayton4b407112010-09-30 21:49:03 +0000436 Error error;
Chris Lattner24943d22010-06-08 16:52:24 +0000437 // ::LogSetBitMask (GDBR_LOG_DEFAULT);
438 // ::LogSetOptions (LLDB_LOG_OPTION_THREADSAFE | LLDB_LOG_OPTION_PREPEND_TIMESTAMP | LLDB_LOG_OPTION_PREPEND_PROC_AND_THREAD);
439 // ::LogSetLogFile ("/dev/stdout");
Chris Lattner24943d22010-06-08 16:52:24 +0000440
441 ObjectFile * object_file = module->GetObjectFile();
442 if (object_file)
443 {
444 ArchSpec inferior_arch(module->GetArchitecture());
445 char host_port[128];
446 snprintf (host_port, sizeof(host_port), "localhost:%u", get_random_port ());
Greg Claytone71e2582011-02-04 01:58:07 +0000447 char connect_url[128];
448 snprintf (connect_url, sizeof(connect_url), "connect://%s", host_port);
Chris Lattner24943d22010-06-08 16:52:24 +0000449
Greg Clayton23cf0c72010-11-08 04:29:11 +0000450 const bool launch_process = true;
Chris Lattner24943d22010-06-08 16:52:24 +0000451 bool start_debugserver_with_inferior_args = false;
452 if (start_debugserver_with_inferior_args)
453 {
454 // We want to launch debugserver with the inferior program and its
455 // arguments on the command line. We should only do this if we
456 // the GDB server we are talking to doesn't support the 'A' packet.
457 error = StartDebugserverProcess (host_port,
458 argv,
459 envp,
Greg Claytonde915be2011-01-23 05:56:20 +0000460 stdin_path,
461 stdout_path,
462 stderr_path,
463 working_dir,
Greg Clayton23cf0c72010-11-08 04:29:11 +0000464 launch_process,
Chris Lattner24943d22010-06-08 16:52:24 +0000465 LLDB_INVALID_PROCESS_ID,
466 NULL, false,
Caroline Ticebd666012010-12-03 18:46:09 +0000467 launch_flags,
Chris Lattner24943d22010-06-08 16:52:24 +0000468 inferior_arch);
469 if (error.Fail())
470 return error;
471
Greg Claytone71e2582011-02-04 01:58:07 +0000472 error = ConnectToDebugserver (connect_url);
Chris Lattner24943d22010-06-08 16:52:24 +0000473 if (error.Success())
474 {
475 SetID (m_gdb_comm.GetCurrentProcessID (m_packet_timeout));
476 }
477 }
478 else
479 {
480 error = StartDebugserverProcess (host_port,
481 NULL,
482 NULL,
Greg Claytonde915be2011-01-23 05:56:20 +0000483 stdin_path,
484 stdout_path,
485 stderr_path,
486 working_dir,
Greg Clayton23cf0c72010-11-08 04:29:11 +0000487 launch_process,
Chris Lattner24943d22010-06-08 16:52:24 +0000488 LLDB_INVALID_PROCESS_ID,
Greg Claytonde915be2011-01-23 05:56:20 +0000489 NULL,
490 false,
Caroline Ticebd666012010-12-03 18:46:09 +0000491 launch_flags,
Chris Lattner24943d22010-06-08 16:52:24 +0000492 inferior_arch);
493 if (error.Fail())
494 return error;
495
Greg Claytone71e2582011-02-04 01:58:07 +0000496 error = ConnectToDebugserver (connect_url);
Chris Lattner24943d22010-06-08 16:52:24 +0000497 if (error.Success())
498 {
499 // Send the environment and the program + arguments after we connect
500 if (envp)
501 {
502 const char *env_entry;
503 for (int i=0; (env_entry = envp[i]); ++i)
504 {
505 if (m_gdb_comm.SendEnvironmentPacket(env_entry, m_packet_timeout) != 0)
506 break;
507 }
508 }
509
Greg Clayton960d6a42010-08-03 00:35:52 +0000510 // FIXME: convert this to use the new set/show variables when they are available
511#if 0
512 if (::getenv ("LLDB_DEBUG_DEBUGSERVER"))
513 {
514 const uint32_t attach_debugserver_secs = 10;
515 ::printf ("attach to debugserver (pid = %i)\n", m_debugserver_pid);
516 for (uint32_t i=0; i<attach_debugserver_secs; ++i)
517 {
518 printf ("%i\n", attach_debugserver_secs - i);
519 sleep (1);
520 }
521 }
522#endif
523
Chris Lattner24943d22010-06-08 16:52:24 +0000524 const uint32_t arg_timeout_seconds = 10;
525 int arg_packet_err = m_gdb_comm.SendArgumentsPacket (argv, arg_timeout_seconds);
526 if (arg_packet_err == 0)
527 {
528 std::string error_str;
529 if (m_gdb_comm.GetLaunchSuccess (m_packet_timeout, error_str))
530 {
531 SetID (m_gdb_comm.GetCurrentProcessID (m_packet_timeout));
532 }
533 else
534 {
535 error.SetErrorString (error_str.c_str());
536 }
537 }
538 else
539 {
540 error.SetErrorStringWithFormat("'A' packet returned an error: %i.\n", arg_packet_err);
541 }
542
543 SetID (m_gdb_comm.GetCurrentProcessID (m_packet_timeout));
544 }
545 }
546
547 if (GetID() == LLDB_INVALID_PROCESS_ID)
548 {
549 KillDebugserverProcess ();
550 return error;
551 }
552
553 StringExtractorGDBRemote response;
554 if (m_gdb_comm.SendPacketAndWaitForResponse("?", 1, response, m_packet_timeout, false))
555 SetPrivateState (SetThreadStopInfo (response));
556
557 }
558 else
559 {
560 // Set our user ID to an invalid process ID.
561 SetID(LLDB_INVALID_PROCESS_ID);
562 error.SetErrorStringWithFormat("Failed to get object file from '%s' for arch %s.\n", module->GetFileSpec().GetFilename().AsCString(), module->GetArchitecture().AsCString());
563 }
Chris Lattner24943d22010-06-08 16:52:24 +0000564 return error;
Greg Clayton4b407112010-09-30 21:49:03 +0000565
Chris Lattner24943d22010-06-08 16:52:24 +0000566}
567
568
569Error
Greg Claytone71e2582011-02-04 01:58:07 +0000570ProcessGDBRemote::ConnectToDebugserver (const char *connect_url)
Chris Lattner24943d22010-06-08 16:52:24 +0000571{
572 Error error;
573 // Sleep and wait a bit for debugserver to start to listen...
574 std::auto_ptr<ConnectionFileDescriptor> conn_ap(new ConnectionFileDescriptor());
575 if (conn_ap.get())
576 {
Chris Lattner24943d22010-06-08 16:52:24 +0000577 const uint32_t max_retry_count = 50;
578 uint32_t retry_count = 0;
579 while (!m_gdb_comm.IsConnected())
580 {
Greg Claytone71e2582011-02-04 01:58:07 +0000581 if (conn_ap->Connect(connect_url, &error) == eConnectionStatusSuccess)
Chris Lattner24943d22010-06-08 16:52:24 +0000582 {
583 m_gdb_comm.SetConnection (conn_ap.release());
584 break;
585 }
586 retry_count++;
587
588 if (retry_count >= max_retry_count)
589 break;
590
591 usleep (100000);
592 }
593 }
594
595 if (!m_gdb_comm.IsConnected())
596 {
597 if (error.Success())
598 error.SetErrorString("not connected to remote gdb server");
599 return error;
600 }
601
602 m_gdb_comm.SetAckMode (true);
603 if (m_gdb_comm.StartReadThread(&error))
604 {
605 // Send an initial ack
Greg Claytona4881d02011-01-22 07:12:45 +0000606 m_gdb_comm.SendAck();
Chris Lattner24943d22010-06-08 16:52:24 +0000607
608 if (m_debugserver_pid != LLDB_INVALID_PROCESS_ID)
Greg Clayton75ccf502010-08-21 02:22:51 +0000609 m_debugserver_thread = Host::StartMonitoringChildProcess (MonitorDebugserverProcess,
610 this,
611 m_debugserver_pid,
612 false);
613
Chris Lattner24943d22010-06-08 16:52:24 +0000614 StringExtractorGDBRemote response;
615 if (m_gdb_comm.SendPacketAndWaitForResponse("QStartNoAckMode", response, 1, false))
616 {
617 if (response.IsOKPacket())
618 m_gdb_comm.SetAckMode (false);
619 }
Greg Claytonc71899e2011-01-18 19:36:39 +0000620
621 if (m_gdb_comm.SendPacketAndWaitForResponse("QThreadSuffixSupported", response, 1, false))
622 {
623 if (response.IsOKPacket())
624 m_gdb_comm.SetThreadSuffixSupported (true);
625 }
626
Chris Lattner24943d22010-06-08 16:52:24 +0000627 }
628 return error;
629}
630
631void
632ProcessGDBRemote::DidLaunchOrAttach ()
633{
Greg Clayton0bfda0b2011-02-05 02:25:06 +0000634 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (GDBR_LOG_PROCESS));
635 if (log)
636 log->Printf ("ProcessGDBRemote::DidLaunch()");
Chris Lattner24943d22010-06-08 16:52:24 +0000637 if (GetID() == LLDB_INVALID_PROCESS_ID)
638 {
639 m_dynamic_loader_ap.reset();
640 }
641 else
642 {
643 m_dispatch_queue_offsets_addr = LLDB_INVALID_ADDRESS;
644
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000645 BuildDynamicRegisterInfo (false);
Greg Clayton20d338f2010-11-18 05:57:03 +0000646
647 m_byte_order = m_gdb_comm.GetByteOrder();
648
Chris Lattner24943d22010-06-08 16:52:24 +0000649 StreamString strm;
650
Greg Claytonfc7920f2011-02-09 03:09:55 +0000651 ;
Chris Lattner24943d22010-06-08 16:52:24 +0000652 // See if the GDB server supports the qHostInfo information
653 const char *vendor = m_gdb_comm.GetVendorString().AsCString();
654 const char *os_type = m_gdb_comm.GetOSString().AsCString();
Greg Claytonfc7920f2011-02-09 03:09:55 +0000655 ArchSpec target_arch (GetTarget().GetArchitecture());
656 ArchSpec gdb_remote_arch (m_gdb_comm.GetHostArchitecture());
657
658 // If the remote host is ARM and we are on have apple as the vendor, then
659 // ARM executables and shared libraries can have mixed ARM architectures.
660 // You can have an armv6 executable, and if the host is armv7, then the
661 // system will load the best possible architecture for all shared libraries
662 // it has, so we really need to take the remote host architecture as our
663 // defacto architecture in this case.
664
665 if (gdb_remote_arch == ArchSpec ("arm") &&
666 vendor != NULL &&
667 strcmp(vendor, "apple") == 0)
668 {
669 GetTarget().SetArchitecture (gdb_remote_arch);
670 target_arch = gdb_remote_arch;
671 }
672
673 if (!target_arch.IsValid())
674 target_arch = gdb_remote_arch;
675
Greg Claytone71e2582011-02-04 01:58:07 +0000676 if (target_arch.IsValid())
Chris Lattner24943d22010-06-08 16:52:24 +0000677 {
Greg Claytonfc7920f2011-02-09 03:09:55 +0000678 if (vendor == NULL)
679 vendor = Host::GetVendorString().AsCString("apple");
680
681 if (os_type == NULL)
682 os_type = Host::GetOSString().AsCString("darwin");
683
684 strm.Printf ("%s-%s-%s", target_arch.AsCString(), vendor, os_type);
685
686 std::transform (strm.GetString().begin(),
687 strm.GetString().end(),
688 strm.GetString().begin(),
689 ::tolower);
690
691 m_target_triple.SetCString(strm.GetString().c_str());
Chris Lattner24943d22010-06-08 16:52:24 +0000692 }
Chris Lattner24943d22010-06-08 16:52:24 +0000693 }
694}
695
696void
697ProcessGDBRemote::DidLaunch ()
698{
699 DidLaunchOrAttach ();
700 if (m_dynamic_loader_ap.get())
701 m_dynamic_loader_ap->DidLaunch();
702}
703
704Error
Greg Clayton54e7afa2010-07-09 20:39:50 +0000705ProcessGDBRemote::DoAttachToProcessWithID (lldb::pid_t attach_pid)
Chris Lattner24943d22010-06-08 16:52:24 +0000706{
707 Error error;
708 // Clear out and clean up from any current state
709 Clear();
Jim Ingham7508e732010-08-09 23:31:02 +0000710 ArchSpec arch_spec = GetTarget().GetArchitecture();
Greg Clayton0bfda0b2011-02-05 02:25:06 +0000711
Chris Lattner24943d22010-06-08 16:52:24 +0000712 if (attach_pid != LLDB_INVALID_PROCESS_ID)
713 {
Chris Lattner24943d22010-06-08 16:52:24 +0000714 char host_port[128];
715 snprintf (host_port, sizeof(host_port), "localhost:%u", get_random_port ());
Greg Claytone71e2582011-02-04 01:58:07 +0000716 char connect_url[128];
717 snprintf (connect_url, sizeof(connect_url), "connect://%s", host_port);
718
Greg Clayton452bf612010-08-31 18:35:14 +0000719 error = StartDebugserverProcess (host_port, // debugserver_url
720 NULL, // inferior_argv
721 NULL, // inferior_envp
722 NULL, // stdin_path
Greg Claytonde915be2011-01-23 05:56:20 +0000723 NULL, // stdout_path
724 NULL, // stderr_path
725 NULL, // working_dir
Greg Clayton23cf0c72010-11-08 04:29:11 +0000726 false, // launch_process == false (we are attaching)
727 LLDB_INVALID_PROCESS_ID, // Don't send any attach to pid options to debugserver
728 NULL, // Don't send any attach by process name option to debugserver
729 false, // Don't send any attach wait_for_launch flag as an option to debugserver
Caroline Ticebd666012010-12-03 18:46:09 +0000730 0, // launch_flags
Jim Ingham7508e732010-08-09 23:31:02 +0000731 arch_spec);
Chris Lattner24943d22010-06-08 16:52:24 +0000732
733 if (error.Fail())
734 {
735 const char *error_string = error.AsCString();
736 if (error_string == NULL)
737 error_string = "unable to launch " DEBUGSERVER_BASENAME;
738
739 SetExitStatus (-1, error_string);
740 }
741 else
742 {
Greg Claytone71e2582011-02-04 01:58:07 +0000743 error = ConnectToDebugserver (connect_url);
Chris Lattner24943d22010-06-08 16:52:24 +0000744 if (error.Success())
745 {
746 char packet[64];
747 const int packet_len = ::snprintf (packet, sizeof(packet), "vAttach;%x", attach_pid);
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000748
749 m_async_broadcaster.BroadcastEvent (eBroadcastBitAsyncContinue, new EventDataBytes (packet, packet_len));
Chris Lattner24943d22010-06-08 16:52:24 +0000750 }
751 }
752 }
Chris Lattner24943d22010-06-08 16:52:24 +0000753 return error;
754}
755
756size_t
757ProcessGDBRemote::AttachInputReaderCallback
758(
759 void *baton,
760 InputReader *reader,
761 lldb::InputReaderAction notification,
762 const char *bytes,
763 size_t bytes_len
764)
765{
766 if (notification == eInputReaderGotToken)
767 {
768 ProcessGDBRemote *gdb_process = (ProcessGDBRemote *)baton;
769 if (gdb_process->m_waiting_for_attach)
770 gdb_process->m_waiting_for_attach = false;
771 reader->SetIsDone(true);
772 return 1;
773 }
774 return 0;
775}
776
777Error
Greg Clayton54e7afa2010-07-09 20:39:50 +0000778ProcessGDBRemote::DoAttachToProcessWithName (const char *process_name, bool wait_for_launch)
Chris Lattner24943d22010-06-08 16:52:24 +0000779{
780 Error error;
781 // Clear out and clean up from any current state
782 Clear();
783 // HACK: require arch be set correctly at the target level until we can
784 // figure out a good way to determine the arch of what we are attaching to
Chris Lattner24943d22010-06-08 16:52:24 +0000785
Chris Lattner24943d22010-06-08 16:52:24 +0000786 if (process_name && process_name[0])
787 {
Jim Ingham7508e732010-08-09 23:31:02 +0000788 ArchSpec arch_spec = GetTarget().GetArchitecture();
Greg Claytone71e2582011-02-04 01:58:07 +0000789
790 char host_port[128];
Chris Lattner24943d22010-06-08 16:52:24 +0000791 snprintf (host_port, sizeof(host_port), "localhost:%u", get_random_port ());
Greg Claytone71e2582011-02-04 01:58:07 +0000792 char connect_url[128];
793 snprintf (connect_url, sizeof(connect_url), "connect://%s", host_port);
794
Greg Clayton452bf612010-08-31 18:35:14 +0000795 error = StartDebugserverProcess (host_port, // debugserver_url
796 NULL, // inferior_argv
797 NULL, // inferior_envp
798 NULL, // stdin_path
Greg Claytonde915be2011-01-23 05:56:20 +0000799 NULL, // stdout_path
800 NULL, // stderr_path
801 NULL, // working_dir
Greg Clayton23cf0c72010-11-08 04:29:11 +0000802 false, // launch_process == false (we are attaching)
803 LLDB_INVALID_PROCESS_ID, // Don't send any attach to pid options to debugserver
804 NULL, // Don't send any attach by process name option to debugserver
805 false, // Don't send any attach wait_for_launch flag as an option to debugserver
Caroline Ticebd666012010-12-03 18:46:09 +0000806 0, // launch_flags
Jim Ingham7508e732010-08-09 23:31:02 +0000807 arch_spec);
Chris Lattner24943d22010-06-08 16:52:24 +0000808 if (error.Fail())
809 {
810 const char *error_string = error.AsCString();
811 if (error_string == NULL)
812 error_string = "unable to launch " DEBUGSERVER_BASENAME;
813
814 SetExitStatus (-1, error_string);
815 }
816 else
817 {
Greg Claytone71e2582011-02-04 01:58:07 +0000818 error = ConnectToDebugserver (connect_url);
Chris Lattner24943d22010-06-08 16:52:24 +0000819 if (error.Success())
820 {
821 StreamString packet;
822
Chris Lattner24943d22010-06-08 16:52:24 +0000823 if (wait_for_launch)
Greg Claytonc1d37752010-10-18 01:45:30 +0000824 packet.PutCString("vAttachWait");
825 else
826 packet.PutCString("vAttachName");
Chris Lattner24943d22010-06-08 16:52:24 +0000827 packet.PutChar(';');
Greg Claytoncd548032011-02-01 01:31:41 +0000828 packet.PutBytesAsRawHex8(process_name, strlen(process_name), lldb::endian::InlHostByteOrder(), lldb::endian::InlHostByteOrder());
Greg Clayton7e2f91c2011-01-29 07:10:55 +0000829
830 m_async_broadcaster.BroadcastEvent (eBroadcastBitAsyncContinue, new EventDataBytes (packet.GetData(), packet.GetSize()));
Chris Lattner24943d22010-06-08 16:52:24 +0000831
Chris Lattner24943d22010-06-08 16:52:24 +0000832 }
833 }
834 }
Chris Lattner24943d22010-06-08 16:52:24 +0000835 return error;
836}
837
Chris Lattner24943d22010-06-08 16:52:24 +0000838
839void
840ProcessGDBRemote::DidAttach ()
841{
Greg Claytone71e2582011-02-04 01:58:07 +0000842 DidLaunchOrAttach ();
Chris Lattner24943d22010-06-08 16:52:24 +0000843 if (m_dynamic_loader_ap.get())
844 m_dynamic_loader_ap->DidAttach();
845}
846
847Error
848ProcessGDBRemote::WillResume ()
849{
850 m_continue_packet.Clear();
851 // Start the continue packet we will use to run the target. Each thread
852 // will append what it is supposed to be doing to this packet when the
853 // ThreadList::WillResume() is called. If a thread it supposed
854 // to stay stopped, then don't append anything to this string.
855 m_continue_packet.Printf("vCont");
856 return Error();
857}
858
859Error
860ProcessGDBRemote::DoResume ()
861{
Jim Ingham3ae449a2010-11-17 02:32:00 +0000862 Error error;
Greg Clayton0bfda0b2011-02-05 02:25:06 +0000863 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (GDBR_LOG_PROCESS));
864 if (log)
865 log->Printf ("ProcessGDBRemote::Resume()");
Greg Claytonb749a262010-12-03 06:02:24 +0000866
867 Listener listener ("gdb-remote.resume-packet-sent");
868 if (listener.StartListeningForEvents (&m_gdb_comm, GDBRemoteCommunication::eBroadcastBitRunPacketSent))
869 {
870 EventSP event_sp;
871 TimeValue timeout;
872 timeout = TimeValue::Now();
873 timeout.OffsetWithSeconds (5);
874 m_async_broadcaster.BroadcastEvent (eBroadcastBitAsyncContinue, new EventDataBytes (m_continue_packet.GetData(), m_continue_packet.GetSize()));
875
876 if (listener.WaitForEvent (&timeout, event_sp) == false)
877 error.SetErrorString("Resume timed out.");
878 }
879
Jim Ingham3ae449a2010-11-17 02:32:00 +0000880 return error;
Chris Lattner24943d22010-06-08 16:52:24 +0000881}
882
883size_t
884ProcessGDBRemote::GetSoftwareBreakpointTrapOpcode (BreakpointSite* bp_site)
885{
886 const uint8_t *trap_opcode = NULL;
887 uint32_t trap_opcode_size = 0;
888
889 static const uint8_t g_arm_breakpoint_opcode[] = { 0xFE, 0xDE, 0xFF, 0xE7 };
890 //static const uint8_t g_thumb_breakpooint_opcode[] = { 0xFE, 0xDE };
891 static const uint8_t g_ppc_breakpoint_opcode[] = { 0x7F, 0xC0, 0x00, 0x08 };
892 static const uint8_t g_i386_breakpoint_opcode[] = { 0xCC };
893
Jim Ingham7508e732010-08-09 23:31:02 +0000894 ArchSpec::CPU arch_cpu = GetTarget().GetArchitecture().GetGenericCPUType();
Greg Claytoncf015052010-06-11 03:25:34 +0000895 switch (arch_cpu)
Chris Lattner24943d22010-06-08 16:52:24 +0000896 {
Greg Claytoncf015052010-06-11 03:25:34 +0000897 case ArchSpec::eCPU_i386:
898 case ArchSpec::eCPU_x86_64:
899 trap_opcode = g_i386_breakpoint_opcode;
900 trap_opcode_size = sizeof(g_i386_breakpoint_opcode);
901 break;
902
903 case ArchSpec::eCPU_arm:
904 // TODO: fill this in for ARM. We need to dig up the symbol for
905 // the address in the breakpoint locaiton and figure out if it is
906 // an ARM or Thumb breakpoint.
907 trap_opcode = g_arm_breakpoint_opcode;
908 trap_opcode_size = sizeof(g_arm_breakpoint_opcode);
909 break;
910
911 case ArchSpec::eCPU_ppc:
912 case ArchSpec::eCPU_ppc64:
913 trap_opcode = g_ppc_breakpoint_opcode;
914 trap_opcode_size = sizeof(g_ppc_breakpoint_opcode);
915 break;
Chris Lattner24943d22010-06-08 16:52:24 +0000916
Greg Claytoncf015052010-06-11 03:25:34 +0000917 default:
918 assert(!"Unhandled architecture in ProcessMacOSX::GetSoftwareBreakpointTrapOpcode()");
919 break;
Chris Lattner24943d22010-06-08 16:52:24 +0000920 }
921
922 if (trap_opcode && trap_opcode_size)
923 {
924 if (bp_site->SetTrapOpcode(trap_opcode, trap_opcode_size))
925 return trap_opcode_size;
926 }
927 return 0;
928}
929
930uint32_t
931ProcessGDBRemote::UpdateThreadListIfNeeded ()
932{
933 // locker will keep a mutex locked until it goes out of scope
Greg Claytone005f2c2010-11-06 01:53:30 +0000934 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (GDBR_LOG_THREAD));
Greg Claytonf3d0b0c2010-10-27 03:32:59 +0000935 if (log && log->GetMask().Test(GDBR_LOG_VERBOSE))
Chris Lattner24943d22010-06-08 16:52:24 +0000936 log->Printf ("ProcessGDBRemote::%s (pid = %i)", __FUNCTION__, GetID());
937
Greg Clayton5205f0b2010-09-03 17:10:42 +0000938 Mutex::Locker locker (m_thread_list.GetMutex ());
Chris Lattner24943d22010-06-08 16:52:24 +0000939 const uint32_t stop_id = GetStopID();
940 if (m_thread_list.GetSize(false) == 0 || stop_id != m_thread_list.GetStopID())
941 {
942 // Update the thread list's stop id immediately so we don't recurse into this function.
943 ThreadList curr_thread_list (this);
944 curr_thread_list.SetStopID(stop_id);
945
946 Error err;
947 StringExtractorGDBRemote response;
948 for (m_gdb_comm.SendPacketAndWaitForResponse("qfThreadInfo", response, 1, false);
949 response.IsNormalPacket();
950 m_gdb_comm.SendPacketAndWaitForResponse("qsThreadInfo", response, 1, false))
951 {
952 char ch = response.GetChar();
953 if (ch == 'l')
954 break;
955 if (ch == 'm')
956 {
957 do
958 {
959 tid_t tid = response.GetHexMaxU32(false, LLDB_INVALID_THREAD_ID);
960
961 if (tid != LLDB_INVALID_THREAD_ID)
962 {
963 ThreadSP thread_sp (GetThreadList().FindThreadByID (tid, false));
Greg Claytona875b642011-01-09 21:07:35 +0000964 if (!thread_sp)
Chris Lattner24943d22010-06-08 16:52:24 +0000965 thread_sp.reset (new ThreadGDBRemote (*this, tid));
966 curr_thread_list.AddThread(thread_sp);
967 }
968
969 ch = response.GetChar();
970 } while (ch == ',');
971 }
972 }
973
974 m_thread_list = curr_thread_list;
975
976 SetThreadStopInfo (m_last_stop_packet);
977 }
978 return GetThreadList().GetSize(false);
979}
980
981
982StateType
983ProcessGDBRemote::SetThreadStopInfo (StringExtractor& stop_packet)
984{
985 const char stop_type = stop_packet.GetChar();
986 switch (stop_type)
987 {
988 case 'T':
989 case 'S':
990 {
991 // Stop with signal and thread info
992 const uint8_t signo = stop_packet.GetHexU8();
993 std::string name;
994 std::string value;
995 std::string thread_name;
996 uint32_t exc_type = 0;
Greg Clayton7661a982010-07-23 16:45:51 +0000997 std::vector<addr_t> exc_data;
Chris Lattner24943d22010-06-08 16:52:24 +0000998 uint32_t tid = LLDB_INVALID_THREAD_ID;
999 addr_t thread_dispatch_qaddr = LLDB_INVALID_ADDRESS;
1000 uint32_t exc_data_count = 0;
Greg Claytona875b642011-01-09 21:07:35 +00001001 ThreadSP thread_sp;
1002
Chris Lattner24943d22010-06-08 16:52:24 +00001003 while (stop_packet.GetNameColonValue(name, value))
1004 {
1005 if (name.compare("metype") == 0)
1006 {
1007 // exception type in big endian hex
1008 exc_type = Args::StringToUInt32 (value.c_str(), 0, 16);
1009 }
1010 else if (name.compare("mecount") == 0)
1011 {
1012 // exception count in big endian hex
1013 exc_data_count = Args::StringToUInt32 (value.c_str(), 0, 16);
1014 }
1015 else if (name.compare("medata") == 0)
1016 {
1017 // exception data in big endian hex
1018 exc_data.push_back(Args::StringToUInt64 (value.c_str(), 0, 16));
1019 }
1020 else if (name.compare("thread") == 0)
1021 {
1022 // thread in big endian hex
1023 tid = Args::StringToUInt32 (value.c_str(), 0, 16);
Greg Claytona875b642011-01-09 21:07:35 +00001024 thread_sp = m_thread_list.FindThreadByID(tid, false);
Chris Lattner24943d22010-06-08 16:52:24 +00001025 }
Greg Clayton4862fa22011-01-08 03:17:57 +00001026 else if (name.compare("hexname") == 0)
1027 {
1028 StringExtractor name_extractor;
1029 // Swap "value" over into "name_extractor"
1030 name_extractor.GetStringRef().swap(value);
1031 // Now convert the HEX bytes into a string value
1032 name_extractor.GetHexByteString (value);
1033 thread_name.swap (value);
1034 }
Chris Lattner24943d22010-06-08 16:52:24 +00001035 else if (name.compare("name") == 0)
1036 {
1037 thread_name.swap (value);
1038 }
Greg Clayton0a7f75f2010-09-09 06:32:46 +00001039 else if (name.compare("qaddr") == 0)
Chris Lattner24943d22010-06-08 16:52:24 +00001040 {
1041 thread_dispatch_qaddr = Args::StringToUInt64 (value.c_str(), 0, 16);
1042 }
Greg Claytona875b642011-01-09 21:07:35 +00001043 else if (name.size() == 2 && ::isxdigit(name[0]) && ::isxdigit(name[1]))
1044 {
1045 // We have a register number that contains an expedited
1046 // register value. Lets supply this register to our thread
1047 // so it won't have to go and read it.
1048 if (thread_sp)
1049 {
1050 uint32_t reg = Args::StringToUInt32 (name.c_str(), UINT32_MAX, 16);
1051
1052 if (reg != UINT32_MAX)
1053 {
1054 StringExtractor reg_value_extractor;
1055 // Swap "value" over into "reg_value_extractor"
1056 reg_value_extractor.GetStringRef().swap(value);
1057 static_cast<ThreadGDBRemote *> (thread_sp.get())->PrivateSetRegisterValue (reg, reg_value_extractor);
1058 }
1059 }
1060 }
Chris Lattner24943d22010-06-08 16:52:24 +00001061 }
Chris Lattner24943d22010-06-08 16:52:24 +00001062
1063 if (thread_sp)
1064 {
1065 ThreadGDBRemote *gdb_thread = static_cast<ThreadGDBRemote *> (thread_sp.get());
1066
1067 gdb_thread->SetThreadDispatchQAddr (thread_dispatch_qaddr);
Jim Ingham9082c8a2011-01-28 02:23:12 +00001068 gdb_thread->SetName (thread_name.empty() ? NULL : thread_name.c_str());
Chris Lattner24943d22010-06-08 16:52:24 +00001069 if (exc_type != 0)
1070 {
Greg Claytonbdcb6ab2011-01-25 23:55:37 +00001071 const size_t exc_data_size = exc_data.size();
Greg Clayton643ee732010-08-04 01:40:35 +00001072
1073 gdb_thread->SetStopInfo (StopInfoMachException::CreateStopReasonWithMachException (*thread_sp,
1074 exc_type,
Greg Claytonbdcb6ab2011-01-25 23:55:37 +00001075 exc_data_size,
1076 exc_data_size >= 1 ? exc_data[0] : 0,
1077 exc_data_size >= 2 ? exc_data[1] : 0));
Chris Lattner24943d22010-06-08 16:52:24 +00001078 }
1079 else if (signo)
1080 {
Greg Clayton643ee732010-08-04 01:40:35 +00001081 gdb_thread->SetStopInfo (StopInfo::CreateStopReasonWithSignal (*thread_sp, signo));
Chris Lattner24943d22010-06-08 16:52:24 +00001082 }
1083 else
1084 {
Greg Clayton643ee732010-08-04 01:40:35 +00001085 StopInfoSP invalid_stop_info_sp;
1086 gdb_thread->SetStopInfo (invalid_stop_info_sp);
Chris Lattner24943d22010-06-08 16:52:24 +00001087 }
1088 }
1089 return eStateStopped;
1090 }
1091 break;
1092
1093 case 'W':
1094 // process exited
1095 return eStateExited;
1096
1097 default:
1098 break;
1099 }
1100 return eStateInvalid;
1101}
1102
1103void
1104ProcessGDBRemote::RefreshStateAfterStop ()
1105{
Jim Ingham7508e732010-08-09 23:31:02 +00001106 // FIXME - add a variable to tell that we're in the middle of attaching if we
1107 // need to know that.
Chris Lattner24943d22010-06-08 16:52:24 +00001108 // We must be attaching if we don't already have a valid architecture
Jim Ingham7508e732010-08-09 23:31:02 +00001109// if (!GetTarget().GetArchitecture().IsValid())
1110// {
1111// Module *exe_module = GetTarget().GetExecutableModule().get();
1112// if (exe_module)
1113// m_arch_spec = exe_module->GetArchitecture();
1114// }
1115
Chris Lattner24943d22010-06-08 16:52:24 +00001116 // Let all threads recover from stopping and do any clean up based
1117 // on the previous thread state (if any).
1118 m_thread_list.RefreshStateAfterStop();
1119
1120 // Discover new threads:
1121 UpdateThreadListIfNeeded ();
1122}
1123
1124Error
Jim Ingham3ae449a2010-11-17 02:32:00 +00001125ProcessGDBRemote::DoHalt (bool &caused_stop)
Chris Lattner24943d22010-06-08 16:52:24 +00001126{
1127 Error error;
Jim Ingham3ae449a2010-11-17 02:32:00 +00001128
Greg Claytona4881d02011-01-22 07:12:45 +00001129 bool timed_out = false;
1130 Mutex::Locker locker;
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001131
1132 if (m_public_state.GetValue() == eStateAttaching)
Greg Clayton20d338f2010-11-18 05:57:03 +00001133 {
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001134 // We are being asked to halt during an attach. We need to just close
1135 // our file handle and debugserver will go away, and we can be done...
1136 m_gdb_comm.Disconnect();
Greg Clayton20d338f2010-11-18 05:57:03 +00001137 }
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001138 else
1139 {
1140 if (!m_gdb_comm.SendInterrupt (locker, 2, caused_stop, timed_out))
1141 {
1142 if (timed_out)
1143 error.SetErrorString("timed out sending interrupt packet");
1144 else
1145 error.SetErrorString("unknown error sending interrupt packet");
1146 }
1147 }
Chris Lattner24943d22010-06-08 16:52:24 +00001148 return error;
1149}
1150
1151Error
Greg Clayton72e1c782011-01-22 23:43:18 +00001152ProcessGDBRemote::InterruptIfRunning
1153(
1154 bool discard_thread_plans,
1155 bool catch_stop_event,
Greg Clayton72e1c782011-01-22 23:43:18 +00001156 EventSP &stop_event_sp
1157)
Chris Lattner24943d22010-06-08 16:52:24 +00001158{
1159 Error error;
Chris Lattner24943d22010-06-08 16:52:24 +00001160
Greg Clayton2860ba92011-01-23 19:58:49 +00001161 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
1162
Greg Clayton68ca8232011-01-25 02:58:48 +00001163 bool paused_private_state_thread = false;
Greg Clayton2860ba92011-01-23 19:58:49 +00001164 const bool is_running = m_gdb_comm.IsRunning();
1165 if (log)
Greg Clayton68ca8232011-01-25 02:58:48 +00001166 log->Printf ("ProcessGDBRemote::InterruptIfRunning(discard_thread_plans=%i, catch_stop_event=%i) is_running=%i",
Greg Clayton2860ba92011-01-23 19:58:49 +00001167 discard_thread_plans,
Greg Clayton68ca8232011-01-25 02:58:48 +00001168 catch_stop_event,
Greg Clayton2860ba92011-01-23 19:58:49 +00001169 is_running);
1170
Greg Clayton2860ba92011-01-23 19:58:49 +00001171 if (discard_thread_plans)
1172 {
1173 if (log)
1174 log->Printf ("ProcessGDBRemote::InterruptIfRunning() discarding all thread plans");
1175 m_thread_list.DiscardThreadPlans();
1176 }
1177 if (is_running)
Greg Clayton4fb400f2010-09-27 21:07:38 +00001178 {
Greg Clayton68ca8232011-01-25 02:58:48 +00001179 if (catch_stop_event)
1180 {
1181 if (log)
1182 log->Printf ("ProcessGDBRemote::InterruptIfRunning() pausing private state thread");
1183 PausePrivateStateThread();
1184 paused_private_state_thread = true;
1185 }
1186
Greg Clayton4fb400f2010-09-27 21:07:38 +00001187 bool timed_out = false;
Greg Claytona4881d02011-01-22 07:12:45 +00001188 bool sent_interrupt = false;
Greg Clayton4fb400f2010-09-27 21:07:38 +00001189 Mutex::Locker locker;
Greg Clayton72e1c782011-01-22 23:43:18 +00001190
Greg Clayton72e1c782011-01-22 23:43:18 +00001191 //m_debugserver_pid = LLDB_INVALID_PROCESS_ID;
1192 if (!m_gdb_comm.SendInterrupt (locker, 1, sent_interrupt, timed_out))
Greg Clayton4fb400f2010-09-27 21:07:38 +00001193 {
1194 if (timed_out)
1195 error.SetErrorString("timed out sending interrupt packet");
1196 else
1197 error.SetErrorString("unknown error sending interrupt packet");
Greg Clayton68ca8232011-01-25 02:58:48 +00001198 if (paused_private_state_thread)
Greg Clayton72e1c782011-01-22 23:43:18 +00001199 ResumePrivateStateThread();
1200 return error;
Greg Clayton4fb400f2010-09-27 21:07:38 +00001201 }
Greg Clayton72e1c782011-01-22 23:43:18 +00001202
Greg Clayton72e1c782011-01-22 23:43:18 +00001203 if (catch_stop_event)
1204 {
Greg Clayton68ca8232011-01-25 02:58:48 +00001205 // LISTEN HERE
Greg Clayton72e1c782011-01-22 23:43:18 +00001206 TimeValue timeout_time;
1207 timeout_time = TimeValue::Now();
Greg Clayton68ca8232011-01-25 02:58:48 +00001208 timeout_time.OffsetWithSeconds(5);
1209 StateType state = WaitForStateChangedEventsPrivate (&timeout_time, stop_event_sp);
Greg Clayton2860ba92011-01-23 19:58:49 +00001210
Greg Claytonbdcb6ab2011-01-25 23:55:37 +00001211 timed_out = state == eStateInvalid;
Greg Clayton2860ba92011-01-23 19:58:49 +00001212 if (log)
1213 log->Printf ("ProcessGDBRemote::InterruptIfRunning() catch stop event: state = %s, timed-out=%i", StateAsCString(state), timed_out);
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001214
Greg Clayton2860ba92011-01-23 19:58:49 +00001215 if (timed_out)
Greg Clayton72e1c782011-01-22 23:43:18 +00001216 error.SetErrorString("unable to verify target stopped");
1217 }
1218
Greg Clayton68ca8232011-01-25 02:58:48 +00001219 if (paused_private_state_thread)
Greg Clayton2860ba92011-01-23 19:58:49 +00001220 {
1221 if (log)
1222 log->Printf ("ProcessGDBRemote::InterruptIfRunning() resuming private state thread");
Greg Clayton72e1c782011-01-22 23:43:18 +00001223 ResumePrivateStateThread();
Greg Clayton2860ba92011-01-23 19:58:49 +00001224 }
Greg Clayton4fb400f2010-09-27 21:07:38 +00001225 }
Chris Lattner24943d22010-06-08 16:52:24 +00001226 return error;
1227}
1228
Greg Clayton4fb400f2010-09-27 21:07:38 +00001229Error
Greg Clayton72e1c782011-01-22 23:43:18 +00001230ProcessGDBRemote::WillDetach ()
1231{
Greg Clayton2860ba92011-01-23 19:58:49 +00001232 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
1233 if (log)
1234 log->Printf ("ProcessGDBRemote::WillDetach()");
1235
Greg Clayton72e1c782011-01-22 23:43:18 +00001236 bool discard_thread_plans = true;
1237 bool catch_stop_event = true;
Greg Clayton72e1c782011-01-22 23:43:18 +00001238 EventSP event_sp;
Greg Clayton68ca8232011-01-25 02:58:48 +00001239 return InterruptIfRunning (discard_thread_plans, catch_stop_event, event_sp);
Greg Clayton72e1c782011-01-22 23:43:18 +00001240}
1241
1242Error
Greg Clayton4fb400f2010-09-27 21:07:38 +00001243ProcessGDBRemote::DoDetach()
1244{
1245 Error error;
Greg Claytone005f2c2010-11-06 01:53:30 +00001246 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
Greg Clayton4fb400f2010-09-27 21:07:38 +00001247 if (log)
1248 log->Printf ("ProcessGDBRemote::DoDetach()");
1249
1250 DisableAllBreakpointSites ();
1251
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001252 m_thread_list.DiscardThreadPlans();
Greg Clayton4fb400f2010-09-27 21:07:38 +00001253
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001254 size_t response_size = m_gdb_comm.SendPacket ("D", 1);
1255 if (log)
Greg Clayton4fb400f2010-09-27 21:07:38 +00001256 {
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001257 if (response_size)
1258 log->PutCString ("ProcessGDBRemote::DoDetach() detach packet sent successfully");
1259 else
1260 log->PutCString ("ProcessGDBRemote::DoDetach() detach packet send failed");
Greg Clayton4fb400f2010-09-27 21:07:38 +00001261 }
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001262 // Sleep for one second to let the process get all detached...
Greg Clayton4fb400f2010-09-27 21:07:38 +00001263 StopAsyncThread ();
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001264
Greg Clayton4fb400f2010-09-27 21:07:38 +00001265 m_gdb_comm.StopReadThread();
Greg Clayton4fb400f2010-09-27 21:07:38 +00001266 m_gdb_comm.Disconnect(); // Disconnect from the debug server.
Greg Clayton3b2c41c2010-10-18 04:14:23 +00001267
1268 SetPrivateState (eStateDetached);
1269 ResumePrivateStateThread();
1270
1271 //KillDebugserverProcess ();
Greg Clayton4fb400f2010-09-27 21:07:38 +00001272 return error;
1273}
Chris Lattner24943d22010-06-08 16:52:24 +00001274
1275Error
1276ProcessGDBRemote::DoDestroy ()
1277{
1278 Error error;
Greg Claytone005f2c2010-11-06 01:53:30 +00001279 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
Chris Lattner24943d22010-06-08 16:52:24 +00001280 if (log)
1281 log->Printf ("ProcessGDBRemote::DoDestroy()");
1282
1283 // Interrupt if our inferior is running...
Greg Claytona4881d02011-01-22 07:12:45 +00001284 if (m_gdb_comm.IsConnected())
Chris Lattner24943d22010-06-08 16:52:24 +00001285 {
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001286 if (m_public_state.GetValue() == eStateAttaching)
Greg Clayton27a8dd72011-01-25 04:57:42 +00001287 {
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001288 // We are being asked to halt during an attach. We need to just close
1289 // our file handle and debugserver will go away, and we can be done...
1290 m_gdb_comm.Disconnect();
Greg Clayton27a8dd72011-01-25 04:57:42 +00001291 }
1292 else
Greg Clayton72e1c782011-01-22 23:43:18 +00001293 {
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001294
1295 StringExtractorGDBRemote response;
1296 bool send_async = true;
1297 if (m_gdb_comm.SendPacketAndWaitForResponse("k", 1, response, 2, send_async))
1298 {
1299 char packet_cmd = response.GetChar(0);
1300
1301 if (packet_cmd == 'W' || packet_cmd == 'X')
1302 {
1303 m_last_stop_packet = response;
1304 SetExitStatus(response.GetHexU8(), NULL);
1305 }
1306 }
1307 else
1308 {
1309 SetExitStatus(SIGABRT, NULL);
1310 //error.SetErrorString("kill packet failed");
1311 }
Greg Clayton72e1c782011-01-22 23:43:18 +00001312 }
1313 }
Chris Lattner24943d22010-06-08 16:52:24 +00001314 StopAsyncThread ();
1315 m_gdb_comm.StopReadThread();
1316 KillDebugserverProcess ();
Johnny Chenc5b15db2010-09-03 22:35:47 +00001317 m_gdb_comm.Disconnect(); // Disconnect from the debug server.
Chris Lattner24943d22010-06-08 16:52:24 +00001318 return error;
1319}
1320
Chris Lattner24943d22010-06-08 16:52:24 +00001321//------------------------------------------------------------------
1322// Process Queries
1323//------------------------------------------------------------------
1324
1325bool
1326ProcessGDBRemote::IsAlive ()
1327{
Greg Clayton58e844b2010-12-08 05:08:21 +00001328 return m_gdb_comm.IsConnected() && m_private_state.GetValue() != eStateExited;
Chris Lattner24943d22010-06-08 16:52:24 +00001329}
1330
1331addr_t
1332ProcessGDBRemote::GetImageInfoAddress()
1333{
1334 if (!m_gdb_comm.IsRunning())
1335 {
1336 StringExtractorGDBRemote response;
1337 if (m_gdb_comm.SendPacketAndWaitForResponse("qShlibInfoAddr", ::strlen ("qShlibInfoAddr"), response, 2, false))
1338 {
1339 if (response.IsNormalPacket())
1340 return response.GetHexMaxU64(false, LLDB_INVALID_ADDRESS);
1341 }
1342 }
1343 return LLDB_INVALID_ADDRESS;
1344}
1345
1346DynamicLoader *
1347ProcessGDBRemote::GetDynamicLoader()
1348{
1349 return m_dynamic_loader_ap.get();
1350}
1351
1352//------------------------------------------------------------------
1353// Process Memory
1354//------------------------------------------------------------------
1355size_t
1356ProcessGDBRemote::DoReadMemory (addr_t addr, void *buf, size_t size, Error &error)
1357{
1358 if (size > m_max_memory_size)
1359 {
1360 // Keep memory read sizes down to a sane limit. This function will be
1361 // called multiple times in order to complete the task by
1362 // lldb_private::Process so it is ok to do this.
1363 size = m_max_memory_size;
1364 }
1365
1366 char packet[64];
1367 const int packet_len = ::snprintf (packet, sizeof(packet), "m%llx,%zx", (uint64_t)addr, size);
1368 assert (packet_len + 1 < sizeof(packet));
1369 StringExtractorGDBRemote response;
1370 if (m_gdb_comm.SendPacketAndWaitForResponse(packet, packet_len, response, 2, true))
1371 {
1372 if (response.IsNormalPacket())
1373 {
1374 error.Clear();
1375 return response.GetHexBytes(buf, size, '\xdd');
1376 }
1377 else if (response.IsErrorPacket())
1378 error.SetErrorStringWithFormat("gdb remote returned an error: %s", response.GetStringRef().c_str());
1379 else if (response.IsUnsupportedPacket())
1380 error.SetErrorStringWithFormat("'%s' packet unsupported", packet);
1381 else
1382 error.SetErrorStringWithFormat("unexpected response to '%s': '%s'", packet, response.GetStringRef().c_str());
1383 }
1384 else
1385 {
1386 error.SetErrorStringWithFormat("failed to sent packet: '%s'", packet);
1387 }
1388 return 0;
1389}
1390
1391size_t
1392ProcessGDBRemote::DoWriteMemory (addr_t addr, const void *buf, size_t size, Error &error)
1393{
1394 StreamString packet;
1395 packet.Printf("M%llx,%zx:", addr, size);
Greg Claytoncd548032011-02-01 01:31:41 +00001396 packet.PutBytesAsRawHex8(buf, size, lldb::endian::InlHostByteOrder(), lldb::endian::InlHostByteOrder());
Chris Lattner24943d22010-06-08 16:52:24 +00001397 StringExtractorGDBRemote response;
1398 if (m_gdb_comm.SendPacketAndWaitForResponse(packet.GetData(), packet.GetSize(), response, 2, true))
1399 {
1400 if (response.IsOKPacket())
1401 {
1402 error.Clear();
1403 return size;
1404 }
1405 else if (response.IsErrorPacket())
1406 error.SetErrorStringWithFormat("gdb remote returned an error: %s", response.GetStringRef().c_str());
1407 else if (response.IsUnsupportedPacket())
1408 error.SetErrorStringWithFormat("'%s' packet unsupported", packet.GetString().c_str());
1409 else
1410 error.SetErrorStringWithFormat("unexpected response to '%s': '%s'", packet.GetString().c_str(), response.GetStringRef().c_str());
1411 }
1412 else
1413 {
1414 error.SetErrorStringWithFormat("failed to sent packet: '%s'", packet.GetString().c_str());
1415 }
1416 return 0;
1417}
1418
1419lldb::addr_t
1420ProcessGDBRemote::DoAllocateMemory (size_t size, uint32_t permissions, Error &error)
1421{
1422 addr_t allocated_addr = m_gdb_comm.AllocateMemory (size, permissions, m_packet_timeout);
1423 if (allocated_addr == LLDB_INVALID_ADDRESS)
1424 error.SetErrorStringWithFormat("unable to allocate %zu bytes of memory with permissions %u", size, permissions);
1425 else
1426 error.Clear();
1427 return allocated_addr;
1428}
1429
1430Error
1431ProcessGDBRemote::DoDeallocateMemory (lldb::addr_t addr)
1432{
1433 Error error;
1434 if (!m_gdb_comm.DeallocateMemory (addr, m_packet_timeout))
1435 error.SetErrorStringWithFormat("unable to deallocate memory at 0x%llx", addr);
1436 return error;
1437}
1438
1439
1440//------------------------------------------------------------------
1441// Process STDIO
1442//------------------------------------------------------------------
1443
1444size_t
1445ProcessGDBRemote::GetSTDOUT (char *buf, size_t buf_size, Error &error)
1446{
1447 Mutex::Locker locker(m_stdio_mutex);
1448 size_t bytes_available = m_stdout_data.size();
1449 if (bytes_available > 0)
1450 {
Greg Clayton0bfda0b2011-02-05 02:25:06 +00001451 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (GDBR_LOG_PROCESS));
1452 if (log)
1453 log->Printf ("ProcessGDBRemote::%s (&%p[%u]) ...", __FUNCTION__, buf, buf_size);
Chris Lattner24943d22010-06-08 16:52:24 +00001454 if (bytes_available > buf_size)
1455 {
Greg Clayton53d68e72010-07-20 22:52:08 +00001456 memcpy(buf, m_stdout_data.c_str(), buf_size);
Chris Lattner24943d22010-06-08 16:52:24 +00001457 m_stdout_data.erase(0, buf_size);
1458 bytes_available = buf_size;
1459 }
1460 else
1461 {
Greg Clayton53d68e72010-07-20 22:52:08 +00001462 memcpy(buf, m_stdout_data.c_str(), bytes_available);
Chris Lattner24943d22010-06-08 16:52:24 +00001463 m_stdout_data.clear();
1464
1465 //ResetEventBits(eBroadcastBitSTDOUT);
1466 }
1467 }
1468 return bytes_available;
1469}
1470
1471size_t
1472ProcessGDBRemote::GetSTDERR (char *buf, size_t buf_size, Error &error)
1473{
1474 // Can we get STDERR through the remote protocol?
1475 return 0;
1476}
1477
1478size_t
1479ProcessGDBRemote::PutSTDIN (const char *src, size_t src_len, Error &error)
1480{
1481 if (m_stdio_communication.IsConnected())
1482 {
1483 ConnectionStatus status;
1484 m_stdio_communication.Write(src, src_len, status, NULL);
1485 }
1486 return 0;
1487}
1488
1489Error
1490ProcessGDBRemote::EnableBreakpoint (BreakpointSite *bp_site)
1491{
1492 Error error;
1493 assert (bp_site != NULL);
1494
Greg Claytone005f2c2010-11-06 01:53:30 +00001495 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_BREAKPOINTS));
Chris Lattner24943d22010-06-08 16:52:24 +00001496 user_id_t site_id = bp_site->GetID();
1497 const addr_t addr = bp_site->GetLoadAddress();
1498 if (log)
1499 log->Printf ("ProcessGDBRemote::EnableBreakpoint (size_id = %d) address = 0x%llx", site_id, (uint64_t)addr);
1500
1501 if (bp_site->IsEnabled())
1502 {
1503 if (log)
1504 log->Printf ("ProcessGDBRemote::EnableBreakpoint (size_id = %d) address = 0x%llx -- SUCCESS (already enabled)", site_id, (uint64_t)addr);
1505 return error;
1506 }
1507 else
1508 {
1509 const size_t bp_op_size = GetSoftwareBreakpointTrapOpcode (bp_site);
1510
1511 if (bp_site->HardwarePreferred())
1512 {
1513 // Try and set hardware breakpoint, and if that fails, fall through
1514 // and set a software breakpoint?
1515 }
1516
1517 if (m_z0_supported)
1518 {
1519 char packet[64];
1520 const int packet_len = ::snprintf (packet, sizeof(packet), "Z0,%llx,%zx", addr, bp_op_size);
1521 assert (packet_len + 1 < sizeof(packet));
1522 StringExtractorGDBRemote response;
1523 if (m_gdb_comm.SendPacketAndWaitForResponse(packet, packet_len, response, 2, true))
1524 {
1525 if (response.IsUnsupportedPacket())
1526 {
1527 // Disable z packet support and try again
1528 m_z0_supported = 0;
1529 return EnableBreakpoint (bp_site);
1530 }
1531 else if (response.IsOKPacket())
1532 {
1533 bp_site->SetEnabled(true);
1534 bp_site->SetType (BreakpointSite::eExternal);
1535 return error;
1536 }
1537 else
1538 {
1539 uint8_t error_byte = response.GetError();
1540 if (error_byte)
1541 error.SetErrorStringWithFormat("%x packet failed with error: %i (0x%2.2x).\n", packet, error_byte, error_byte);
1542 }
1543 }
1544 }
1545 else
1546 {
1547 return EnableSoftwareBreakpoint (bp_site);
1548 }
1549 }
1550
1551 if (log)
1552 {
1553 const char *err_string = error.AsCString();
1554 log->Printf ("ProcessGDBRemote::EnableBreakpoint() error for breakpoint at 0x%8.8llx: %s",
1555 bp_site->GetLoadAddress(),
1556 err_string ? err_string : "NULL");
1557 }
1558 // We shouldn't reach here on a successful breakpoint enable...
1559 if (error.Success())
1560 error.SetErrorToGenericError();
1561 return error;
1562}
1563
1564Error
1565ProcessGDBRemote::DisableBreakpoint (BreakpointSite *bp_site)
1566{
1567 Error error;
1568 assert (bp_site != NULL);
1569 addr_t addr = bp_site->GetLoadAddress();
1570 user_id_t site_id = bp_site->GetID();
Greg Claytone005f2c2010-11-06 01:53:30 +00001571 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_BREAKPOINTS));
Chris Lattner24943d22010-06-08 16:52:24 +00001572 if (log)
1573 log->Printf ("ProcessGDBRemote::DisableBreakpoint (site_id = %d) addr = 0x%8.8llx", site_id, (uint64_t)addr);
1574
1575 if (bp_site->IsEnabled())
1576 {
1577 const size_t bp_op_size = GetSoftwareBreakpointTrapOpcode (bp_site);
1578
1579 if (bp_site->IsHardware())
1580 {
1581 // TODO: disable hardware breakpoint...
1582 }
1583 else
1584 {
1585 if (m_z0_supported)
1586 {
1587 char packet[64];
1588 const int packet_len = ::snprintf (packet, sizeof(packet), "z0,%llx,%zx", addr, bp_op_size);
1589 assert (packet_len + 1 < sizeof(packet));
1590 StringExtractorGDBRemote response;
1591 if (m_gdb_comm.SendPacketAndWaitForResponse(packet, packet_len, response, 2, true))
1592 {
1593 if (response.IsUnsupportedPacket())
1594 {
1595 error.SetErrorString("Breakpoint site was set with Z packet, yet remote debugserver states z packets are not supported.");
1596 }
1597 else if (response.IsOKPacket())
1598 {
1599 if (log)
1600 log->Printf ("ProcessGDBRemote::DisableBreakpoint (site_id = %d) addr = 0x%8.8llx -- SUCCESS", site_id, (uint64_t)addr);
1601 bp_site->SetEnabled(false);
1602 return error;
1603 }
1604 else
1605 {
1606 uint8_t error_byte = response.GetError();
1607 if (error_byte)
1608 error.SetErrorStringWithFormat("%x packet failed with error: %i (0x%2.2x).\n", packet, error_byte, error_byte);
1609 }
1610 }
1611 }
1612 else
1613 {
1614 return DisableSoftwareBreakpoint (bp_site);
1615 }
1616 }
1617 }
1618 else
1619 {
1620 if (log)
1621 log->Printf ("ProcessGDBRemote::DisableBreakpoint (site_id = %d) addr = 0x%8.8llx -- SUCCESS (already disabled)", site_id, (uint64_t)addr);
1622 return error;
1623 }
1624
1625 if (error.Success())
1626 error.SetErrorToGenericError();
1627 return error;
1628}
1629
1630Error
1631ProcessGDBRemote::EnableWatchpoint (WatchpointLocation *wp)
1632{
1633 Error error;
1634 if (wp)
1635 {
1636 user_id_t watchID = wp->GetID();
1637 addr_t addr = wp->GetLoadAddress();
Greg Claytone005f2c2010-11-06 01:53:30 +00001638 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_WATCHPOINTS));
Chris Lattner24943d22010-06-08 16:52:24 +00001639 if (log)
1640 log->Printf ("ProcessGDBRemote::EnableWatchpoint(watchID = %d)", watchID);
1641 if (wp->IsEnabled())
1642 {
1643 if (log)
1644 log->Printf("ProcessGDBRemote::EnableWatchpoint(watchID = %d) addr = 0x%8.8llx: watchpoint already enabled.", watchID, (uint64_t)addr);
1645 return error;
1646 }
1647 else
1648 {
1649 // Pass down an appropriate z/Z packet...
1650 error.SetErrorString("watchpoints not supported");
1651 }
1652 }
1653 else
1654 {
1655 error.SetErrorString("Watchpoint location argument was NULL.");
1656 }
1657 if (error.Success())
1658 error.SetErrorToGenericError();
1659 return error;
1660}
1661
1662Error
1663ProcessGDBRemote::DisableWatchpoint (WatchpointLocation *wp)
1664{
1665 Error error;
1666 if (wp)
1667 {
1668 user_id_t watchID = wp->GetID();
1669
Greg Claytone005f2c2010-11-06 01:53:30 +00001670 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_WATCHPOINTS));
Chris Lattner24943d22010-06-08 16:52:24 +00001671
1672 addr_t addr = wp->GetLoadAddress();
1673 if (log)
1674 log->Printf ("ProcessGDBRemote::DisableWatchpoint (watchID = %d) addr = 0x%8.8llx", watchID, (uint64_t)addr);
1675
1676 if (wp->IsHardware())
1677 {
1678 // Pass down an appropriate z/Z packet...
1679 error.SetErrorString("watchpoints not supported");
1680 }
1681 // TODO: clear software watchpoints if we implement them
1682 }
1683 else
1684 {
1685 error.SetErrorString("Watchpoint location argument was NULL.");
1686 }
1687 if (error.Success())
1688 error.SetErrorToGenericError();
1689 return error;
1690}
1691
1692void
1693ProcessGDBRemote::Clear()
1694{
1695 m_flags = 0;
1696 m_thread_list.Clear();
1697 {
1698 Mutex::Locker locker(m_stdio_mutex);
1699 m_stdout_data.clear();
1700 }
Chris Lattner24943d22010-06-08 16:52:24 +00001701}
1702
1703Error
1704ProcessGDBRemote::DoSignal (int signo)
1705{
1706 Error error;
Greg Claytone005f2c2010-11-06 01:53:30 +00001707 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
Chris Lattner24943d22010-06-08 16:52:24 +00001708 if (log)
1709 log->Printf ("ProcessGDBRemote::DoSignal (signal = %d)", signo);
1710
1711 if (!m_gdb_comm.SendAsyncSignal (signo))
1712 error.SetErrorStringWithFormat("failed to send signal %i", signo);
1713 return error;
1714}
1715
Chris Lattner24943d22010-06-08 16:52:24 +00001716Error
1717ProcessGDBRemote::StartDebugserverProcess
1718(
1719 const char *debugserver_url, // The connection string to use in the spawned debugserver ("localhost:1234" or "/dev/tty...")
1720 char const *inferior_argv[], // Arguments for the inferior program including the path to the inferior itself as the first argument
1721 char const *inferior_envp[], // Environment to pass along to the inferior program
Greg Claytonde915be2011-01-23 05:56:20 +00001722 const char *stdin_path,
1723 const char *stdout_path,
1724 const char *stderr_path,
1725 const char *working_dir,
Greg Clayton23cf0c72010-11-08 04:29:11 +00001726 bool launch_process, // Set to true if we are going to be launching a the process
1727 lldb::pid_t attach_pid, // If inferior inferior_argv == NULL, and attach_pid != LLDB_INVALID_PROCESS_ID send this pid as an argument to debugserver
Chris Lattner24943d22010-06-08 16:52:24 +00001728 const char *attach_name, // Wait for the next process to launch whose basename matches "attach_name"
1729 bool wait_for_launch, // Wait for the process named "attach_name" to launch
Caroline Ticebd666012010-12-03 18:46:09 +00001730 uint32_t launch_flags, // Launch flags
Chris Lattner24943d22010-06-08 16:52:24 +00001731 ArchSpec& inferior_arch // The arch of the inferior that we will launch
1732)
1733{
1734 Error error;
Caroline Ticebd666012010-12-03 18:46:09 +00001735 bool disable_aslr = (launch_flags & eLaunchFlagDisableASLR) != 0;
1736 bool no_stdio = (launch_flags & eLaunchFlagDisableSTDIO) != 0;
Chris Lattner24943d22010-06-08 16:52:24 +00001737 if (m_debugserver_pid == LLDB_INVALID_PROCESS_ID)
1738 {
1739 // If we locate debugserver, keep that located version around
1740 static FileSpec g_debugserver_file_spec;
1741
1742 FileSpec debugserver_file_spec;
1743 char debugserver_path[PATH_MAX];
1744
1745 // Always check to see if we have an environment override for the path
1746 // to the debugserver to use and use it if we do.
1747 const char *env_debugserver_path = getenv("LLDB_DEBUGSERVER_PATH");
1748 if (env_debugserver_path)
Greg Clayton537a7a82010-10-20 20:54:39 +00001749 debugserver_file_spec.SetFile (env_debugserver_path, false);
Chris Lattner24943d22010-06-08 16:52:24 +00001750 else
1751 debugserver_file_spec = g_debugserver_file_spec;
1752 bool debugserver_exists = debugserver_file_spec.Exists();
1753 if (!debugserver_exists)
1754 {
1755 // The debugserver binary is in the LLDB.framework/Resources
1756 // directory.
Greg Clayton24b48ff2010-10-17 22:03:32 +00001757 if (Host::GetLLDBPath (ePathTypeSupportExecutableDir, debugserver_file_spec))
Chris Lattner24943d22010-06-08 16:52:24 +00001758 {
Greg Clayton24b48ff2010-10-17 22:03:32 +00001759 debugserver_file_spec.GetFilename().SetCString(DEBUGSERVER_BASENAME);
Chris Lattner24943d22010-06-08 16:52:24 +00001760 debugserver_exists = debugserver_file_spec.Exists();
Greg Clayton24b48ff2010-10-17 22:03:32 +00001761 if (debugserver_exists)
1762 {
1763 g_debugserver_file_spec = debugserver_file_spec;
1764 }
1765 else
1766 {
1767 g_debugserver_file_spec.Clear();
1768 debugserver_file_spec.Clear();
1769 }
Chris Lattner24943d22010-06-08 16:52:24 +00001770 }
1771 }
1772
1773 if (debugserver_exists)
1774 {
1775 debugserver_file_spec.GetPath (debugserver_path, sizeof(debugserver_path));
1776
1777 m_stdio_communication.Clear();
1778 posix_spawnattr_t attr;
1779
Greg Claytone005f2c2010-11-06 01:53:30 +00001780 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (GDBR_LOG_PROCESS));
Chris Lattner24943d22010-06-08 16:52:24 +00001781
1782 Error local_err; // Errors that don't affect the spawning.
1783 if (log)
1784 log->Printf ("%s ( path='%s', argv=%p, envp=%p, arch=%s )", __FUNCTION__, debugserver_path, inferior_argv, inferior_envp, inferior_arch.AsCString());
1785 error.SetError( ::posix_spawnattr_init (&attr), eErrorTypePOSIX);
1786 if (error.Fail() || log)
Greg Claytone005f2c2010-11-06 01:53:30 +00001787 error.PutToLog(log.get(), "::posix_spawnattr_init ( &attr )");
Chris Lattner24943d22010-06-08 16:52:24 +00001788 if (error.Fail())
1789 return error;;
1790
1791#if !defined (__arm__)
1792
Greg Clayton24b48ff2010-10-17 22:03:32 +00001793 // We don't need to do this for ARM, and we really shouldn't now
1794 // that we have multiple CPU subtypes and no posix_spawnattr call
1795 // that allows us to set which CPU subtype to launch...
Greg Claytoncf015052010-06-11 03:25:34 +00001796 if (inferior_arch.GetType() == eArchTypeMachO)
Chris Lattner24943d22010-06-08 16:52:24 +00001797 {
Greg Claytoncf015052010-06-11 03:25:34 +00001798 cpu_type_t cpu = inferior_arch.GetCPUType();
1799 if (cpu != 0 && cpu != UINT32_MAX && cpu != LLDB_INVALID_CPUTYPE)
1800 {
1801 size_t ocount = 0;
1802 error.SetError( ::posix_spawnattr_setbinpref_np (&attr, 1, &cpu, &ocount), eErrorTypePOSIX);
1803 if (error.Fail() || log)
Greg Claytone005f2c2010-11-06 01:53:30 +00001804 error.PutToLog(log.get(), "::posix_spawnattr_setbinpref_np ( &attr, 1, cpu_type = 0x%8.8x, count => %zu )", cpu, ocount);
Chris Lattner24943d22010-06-08 16:52:24 +00001805
Greg Claytoncf015052010-06-11 03:25:34 +00001806 if (error.Fail() != 0 || ocount != 1)
1807 return error;
1808 }
Chris Lattner24943d22010-06-08 16:52:24 +00001809 }
1810
1811#endif
1812
1813 Args debugserver_args;
1814 char arg_cstr[PATH_MAX];
Chris Lattner24943d22010-06-08 16:52:24 +00001815
Chris Lattner24943d22010-06-08 16:52:24 +00001816 lldb_utility::PseudoTerminal pty;
Greg Claytonde915be2011-01-23 05:56:20 +00001817 const char *stdio_path = NULL;
1818 if (launch_process &&
Caroline Ticee4450f02011-01-28 00:19:58 +00001819 (stdin_path == NULL || stdout_path == NULL || stderr_path == NULL) &&
Greg Claytonde915be2011-01-23 05:56:20 +00001820 m_local_debugserver &&
1821 no_stdio == false)
Chris Lattner24943d22010-06-08 16:52:24 +00001822 {
Chris Lattner24943d22010-06-08 16:52:24 +00001823 if (pty.OpenFirstAvailableMaster(O_RDWR|O_NOCTTY, NULL, 0))
Caroline Ticee4450f02011-01-28 00:19:58 +00001824 {
1825 const char *slave_name = pty.GetSlaveName (NULL, 0);
1826 if (stdin_path == NULL
1827 && stdout_path == NULL
1828 && stderr_path == NULL)
1829 stdio_path = slave_name;
1830 else
1831 {
1832 if (stdin_path == NULL)
1833 stdin_path = slave_name;
1834 if (stdout_path == NULL)
1835 stdout_path = slave_name;
1836 if (stderr_path == NULL)
1837 stderr_path = slave_name;
1838 }
1839 }
Chris Lattner24943d22010-06-08 16:52:24 +00001840 }
1841
1842 // Start args with "debugserver /file/path -r --"
1843 debugserver_args.AppendArgument(debugserver_path);
1844 debugserver_args.AppendArgument(debugserver_url);
Greg Clayton24b48ff2010-10-17 22:03:32 +00001845 // use native registers, not the GDB registers
1846 debugserver_args.AppendArgument("--native-regs");
1847 // make debugserver run in its own session so signals generated by
1848 // special terminal key sequences (^C) don't affect debugserver
1849 debugserver_args.AppendArgument("--setsid");
Chris Lattner24943d22010-06-08 16:52:24 +00001850
Greg Clayton452bf612010-08-31 18:35:14 +00001851 if (disable_aslr)
1852 debugserver_args.AppendArguments("--disable-aslr");
1853
Chris Lattner24943d22010-06-08 16:52:24 +00001854 // Only set the inferior
Greg Claytonde915be2011-01-23 05:56:20 +00001855 if (launch_process)
Chris Lattner24943d22010-06-08 16:52:24 +00001856 {
Greg Claytonde915be2011-01-23 05:56:20 +00001857 if (no_stdio)
1858 debugserver_args.AppendArgument("--no-stdio");
1859 else
1860 {
1861 if (stdin_path && stdout_path && stderr_path &&
1862 strcmp(stdin_path, stdout_path) == 0 &&
1863 strcmp(stdin_path, stderr_path) == 0)
1864 {
1865 stdio_path = stdin_path;
1866 stdin_path = stdout_path = stderr_path = NULL;
1867 }
1868
1869 if (stdio_path)
1870 {
1871 // All file handles to stdin, stdout, stderr are the same...
1872 debugserver_args.AppendArgument("--stdio-path");
1873 debugserver_args.AppendArgument(stdio_path);
1874 }
1875 else
1876 {
1877 if (stdin_path == NULL && (stdout_path || stderr_path))
1878 stdin_path = "/dev/null";
1879
1880 if (stdout_path == NULL && (stdin_path || stderr_path))
1881 stdout_path = "/dev/null";
1882
1883 if (stderr_path == NULL && (stdin_path || stdout_path))
1884 stderr_path = "/dev/null";
1885
1886 if (stdin_path)
1887 {
1888 debugserver_args.AppendArgument("--stdin-path");
1889 debugserver_args.AppendArgument(stdin_path);
1890 }
1891 if (stdout_path)
1892 {
1893 debugserver_args.AppendArgument("--stdout-path");
1894 debugserver_args.AppendArgument(stdout_path);
1895 }
1896 if (stderr_path)
1897 {
1898 debugserver_args.AppendArgument("--stderr-path");
1899 debugserver_args.AppendArgument(stderr_path);
1900 }
1901 }
1902 }
Chris Lattner24943d22010-06-08 16:52:24 +00001903 }
Greg Claytonde915be2011-01-23 05:56:20 +00001904
1905 if (working_dir)
Caroline Ticebd666012010-12-03 18:46:09 +00001906 {
Greg Claytonde915be2011-01-23 05:56:20 +00001907 debugserver_args.AppendArgument("--working-dir");
1908 debugserver_args.AppendArgument(working_dir);
Caroline Ticebd666012010-12-03 18:46:09 +00001909 }
Chris Lattner24943d22010-06-08 16:52:24 +00001910
1911 const char *env_debugserver_log_file = getenv("LLDB_DEBUGSERVER_LOG_FILE");
1912 if (env_debugserver_log_file)
1913 {
1914 ::snprintf (arg_cstr, sizeof(arg_cstr), "--log-file=%s", env_debugserver_log_file);
1915 debugserver_args.AppendArgument(arg_cstr);
1916 }
1917
1918 const char *env_debugserver_log_flags = getenv("LLDB_DEBUGSERVER_LOG_FLAGS");
1919 if (env_debugserver_log_flags)
1920 {
1921 ::snprintf (arg_cstr, sizeof(arg_cstr), "--log-flags=%s", env_debugserver_log_flags);
1922 debugserver_args.AppendArgument(arg_cstr);
1923 }
Greg Claytoncc3e6402011-01-25 06:55:13 +00001924// debugserver_args.AppendArgument("--log-file=/tmp/debugserver.txt");
Greg Clayton7e2f91c2011-01-29 07:10:55 +00001925// debugserver_args.AppendArgument("--log-flags=0x802e0e");
Chris Lattner24943d22010-06-08 16:52:24 +00001926
1927 // Now append the program arguments
1928 if (launch_process)
1929 {
1930 if (inferior_argv)
1931 {
1932 // Terminate the debugserver args so we can now append the inferior args
1933 debugserver_args.AppendArgument("--");
1934
1935 for (int i = 0; inferior_argv[i] != NULL; ++i)
1936 debugserver_args.AppendArgument (inferior_argv[i]);
1937 }
1938 else
1939 {
1940 // Will send environment entries with the 'QEnvironment:' packet
1941 // Will send arguments with the 'A' packet
1942 }
1943 }
1944 else if (attach_pid != LLDB_INVALID_PROCESS_ID)
1945 {
1946 ::snprintf (arg_cstr, sizeof(arg_cstr), "--attach=%u", attach_pid);
1947 debugserver_args.AppendArgument (arg_cstr);
1948 }
1949 else if (attach_name && attach_name[0])
1950 {
1951 if (wait_for_launch)
1952 debugserver_args.AppendArgument ("--waitfor");
1953 else
1954 debugserver_args.AppendArgument ("--attach");
1955 debugserver_args.AppendArgument (attach_name);
1956 }
1957
1958 Error file_actions_err;
1959 posix_spawn_file_actions_t file_actions;
1960#if DONT_CLOSE_DEBUGSERVER_STDIO
1961 file_actions_err.SetErrorString ("Remove this after uncommenting the code block below.");
1962#else
1963 file_actions_err.SetError( ::posix_spawn_file_actions_init (&file_actions), eErrorTypePOSIX);
1964 if (file_actions_err.Success())
1965 {
1966 ::posix_spawn_file_actions_addclose (&file_actions, STDIN_FILENO);
1967 ::posix_spawn_file_actions_addclose (&file_actions, STDOUT_FILENO);
1968 ::posix_spawn_file_actions_addclose (&file_actions, STDERR_FILENO);
1969 }
1970#endif
1971
1972 if (log)
1973 {
1974 StreamString strm;
1975 debugserver_args.Dump (&strm);
1976 log->Printf("%s arguments:\n%s", debugserver_args.GetArgumentAtIndex(0), strm.GetData());
1977 }
1978
Greg Clayton72e1c782011-01-22 23:43:18 +00001979 error.SetError (::posix_spawnp (&m_debugserver_pid,
1980 debugserver_path,
1981 file_actions_err.Success() ? &file_actions : NULL,
1982 &attr,
1983 debugserver_args.GetArgumentVector(),
1984 (char * const*)inferior_envp),
1985 eErrorTypePOSIX);
1986
Greg Claytone9d0df42010-07-02 01:29:13 +00001987
1988 ::posix_spawnattr_destroy (&attr);
1989
Chris Lattner24943d22010-06-08 16:52:24 +00001990 if (file_actions_err.Success())
1991 ::posix_spawn_file_actions_destroy (&file_actions);
1992
1993 // We have seen some cases where posix_spawnp was returning a valid
1994 // looking pid even when an error was returned, so clear it out
1995 if (error.Fail())
1996 m_debugserver_pid = LLDB_INVALID_PROCESS_ID;
1997
1998 if (error.Fail() || log)
Greg Claytone005f2c2010-11-06 01:53:30 +00001999 error.PutToLog(log.get(), "::posix_spawnp ( pid => %i, path = '%s', file_actions = %p, attr = %p, argv = %p, envp = %p )", m_debugserver_pid, debugserver_path, NULL, &attr, inferior_argv, inferior_envp);
Chris Lattner24943d22010-06-08 16:52:24 +00002000
Caroline Ticebd666012010-12-03 18:46:09 +00002001 if (m_debugserver_pid != LLDB_INVALID_PROCESS_ID && !no_stdio)
Caroline Tice91a1dab2010-11-05 22:37:44 +00002002 {
Greg Clayton23cf0c72010-11-08 04:29:11 +00002003 if (pty.GetMasterFileDescriptor() != lldb_utility::PseudoTerminal::invalid_fd)
Caroline Tice861efb32010-11-16 05:07:41 +00002004 SetUpProcessInputReader (pty.ReleaseMasterFileDescriptor());
Caroline Tice91a1dab2010-11-05 22:37:44 +00002005 }
Chris Lattner24943d22010-06-08 16:52:24 +00002006 }
2007 else
2008 {
2009 error.SetErrorStringWithFormat ("Unable to locate " DEBUGSERVER_BASENAME ".\n");
2010 }
2011
2012 if (m_debugserver_pid != LLDB_INVALID_PROCESS_ID)
2013 StartAsyncThread ();
2014 }
2015 return error;
2016}
2017
2018bool
2019ProcessGDBRemote::MonitorDebugserverProcess
2020(
2021 void *callback_baton,
2022 lldb::pid_t debugserver_pid,
2023 int signo, // Zero for no signal
2024 int exit_status // Exit value of process if signal is zero
2025)
2026{
2027 // We pass in the ProcessGDBRemote inferior process it and name it
2028 // "gdb_remote_pid". The process ID is passed in the "callback_baton"
2029 // pointer value itself, thus we need the double cast...
2030
2031 // "debugserver_pid" argument passed in is the process ID for
2032 // debugserver that we are tracking...
2033
Greg Clayton75ccf502010-08-21 02:22:51 +00002034 ProcessGDBRemote *process = (ProcessGDBRemote *)callback_baton;
Greg Clayton72e1c782011-01-22 23:43:18 +00002035
2036 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
2037 if (log)
2038 log->Printf ("ProcessGDBRemote::MonitorDebugserverProcess (baton=%p, pid=%i, signo=%i (0x%x), exit_status=%i)", callback_baton, debugserver_pid, signo, signo, exit_status);
2039
Greg Clayton75ccf502010-08-21 02:22:51 +00002040 if (process)
Chris Lattner24943d22010-06-08 16:52:24 +00002041 {
Greg Clayton75ccf502010-08-21 02:22:51 +00002042 // Sleep for a half a second to make sure our inferior process has
2043 // time to set its exit status before we set it incorrectly when
2044 // both the debugserver and the inferior process shut down.
2045 usleep (500000);
2046 // If our process hasn't yet exited, debugserver might have died.
2047 // If the process did exit, the we are reaping it.
Greg Clayton3b2c41c2010-10-18 04:14:23 +00002048 const StateType state = process->GetState();
2049
2050 if (process->m_debugserver_pid != LLDB_INVALID_PROCESS_ID &&
2051 state != eStateInvalid &&
2052 state != eStateUnloaded &&
2053 state != eStateExited &&
2054 state != eStateDetached)
Chris Lattner24943d22010-06-08 16:52:24 +00002055 {
Greg Clayton75ccf502010-08-21 02:22:51 +00002056 char error_str[1024];
2057 if (signo)
Chris Lattner24943d22010-06-08 16:52:24 +00002058 {
Greg Clayton75ccf502010-08-21 02:22:51 +00002059 const char *signal_cstr = process->GetUnixSignals().GetSignalAsCString (signo);
2060 if (signal_cstr)
2061 ::snprintf (error_str, sizeof (error_str), DEBUGSERVER_BASENAME " died with signal %s", signal_cstr);
Chris Lattner24943d22010-06-08 16:52:24 +00002062 else
Greg Clayton75ccf502010-08-21 02:22:51 +00002063 ::snprintf (error_str, sizeof (error_str), DEBUGSERVER_BASENAME " died with signal %i", signo);
Chris Lattner24943d22010-06-08 16:52:24 +00002064 }
2065 else
2066 {
Greg Clayton75ccf502010-08-21 02:22:51 +00002067 ::snprintf (error_str, sizeof (error_str), DEBUGSERVER_BASENAME " died with an exit status of 0x%8.8x", exit_status);
Chris Lattner24943d22010-06-08 16:52:24 +00002068 }
Greg Clayton75ccf502010-08-21 02:22:51 +00002069
2070 process->SetExitStatus (-1, error_str);
2071 }
Greg Clayton3b2c41c2010-10-18 04:14:23 +00002072 // Debugserver has exited we need to let our ProcessGDBRemote
2073 // know that it no longer has a debugserver instance
2074 process->m_debugserver_pid = LLDB_INVALID_PROCESS_ID;
2075 // We are returning true to this function below, so we can
2076 // forget about the monitor handle.
2077 process->m_debugserver_thread = LLDB_INVALID_HOST_THREAD;
Chris Lattner24943d22010-06-08 16:52:24 +00002078 }
2079 return true;
2080}
2081
2082void
2083ProcessGDBRemote::KillDebugserverProcess ()
2084{
2085 if (m_debugserver_pid != LLDB_INVALID_PROCESS_ID)
2086 {
2087 ::kill (m_debugserver_pid, SIGINT);
2088 m_debugserver_pid = LLDB_INVALID_PROCESS_ID;
2089 }
2090}
2091
2092void
2093ProcessGDBRemote::Initialize()
2094{
2095 static bool g_initialized = false;
2096
2097 if (g_initialized == false)
2098 {
2099 g_initialized = true;
2100 PluginManager::RegisterPlugin (GetPluginNameStatic(),
2101 GetPluginDescriptionStatic(),
2102 CreateInstance);
2103
2104 Log::Callbacks log_callbacks = {
2105 ProcessGDBRemoteLog::DisableLog,
2106 ProcessGDBRemoteLog::EnableLog,
2107 ProcessGDBRemoteLog::ListLogCategories
2108 };
2109
2110 Log::RegisterLogChannel (ProcessGDBRemote::GetPluginNameStatic(), log_callbacks);
2111 }
2112}
2113
2114bool
2115ProcessGDBRemote::SetCurrentGDBRemoteThread (int tid)
2116{
2117 if (m_curr_tid == tid)
2118 return true;
2119
2120 char packet[32];
2121 const int packet_len = ::snprintf (packet, sizeof(packet), "Hg%x", tid);
2122 assert (packet_len + 1 < sizeof(packet));
2123 StringExtractorGDBRemote response;
2124 if (m_gdb_comm.SendPacketAndWaitForResponse(packet, packet_len, response, 2, false))
2125 {
2126 if (response.IsOKPacket())
2127 {
2128 m_curr_tid = tid;
2129 return true;
2130 }
2131 }
2132 return false;
2133}
2134
2135bool
2136ProcessGDBRemote::SetCurrentGDBRemoteThreadForRun (int tid)
2137{
2138 if (m_curr_tid_run == tid)
2139 return true;
2140
2141 char packet[32];
Greg Claytonc71899e2011-01-18 19:36:39 +00002142 const int packet_len = ::snprintf (packet, sizeof(packet), "Hc%x", tid);
Chris Lattner24943d22010-06-08 16:52:24 +00002143 assert (packet_len + 1 < sizeof(packet));
2144 StringExtractorGDBRemote response;
2145 if (m_gdb_comm.SendPacketAndWaitForResponse(packet, packet_len, response, 2, false))
2146 {
2147 if (response.IsOKPacket())
2148 {
2149 m_curr_tid_run = tid;
2150 return true;
2151 }
2152 }
2153 return false;
2154}
2155
2156void
2157ProcessGDBRemote::ResetGDBRemoteState ()
2158{
2159 // Reset and GDB remote state
2160 m_curr_tid = LLDB_INVALID_THREAD_ID;
2161 m_curr_tid_run = LLDB_INVALID_THREAD_ID;
2162 m_z0_supported = 1;
2163}
2164
2165
2166bool
2167ProcessGDBRemote::StartAsyncThread ()
2168{
2169 ResetGDBRemoteState ();
2170
Greg Claytone005f2c2010-11-06 01:53:30 +00002171 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
Chris Lattner24943d22010-06-08 16:52:24 +00002172
2173 if (log)
2174 log->Printf ("ProcessGDBRemote::%s ()", __FUNCTION__);
2175
2176 // Create a thread that watches our internal state and controls which
2177 // events make it to clients (into the DCProcess event queue).
2178 m_async_thread = Host::ThreadCreate ("<lldb.process.gdb-remote.async>", ProcessGDBRemote::AsyncThread, this, NULL);
Greg Clayton09c81ef2011-02-08 01:34:25 +00002179 return IS_VALID_LLDB_HOST_THREAD(m_async_thread);
Chris Lattner24943d22010-06-08 16:52:24 +00002180}
2181
2182void
2183ProcessGDBRemote::StopAsyncThread ()
2184{
Greg Claytone005f2c2010-11-06 01:53:30 +00002185 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet(GDBR_LOG_PROCESS));
Chris Lattner24943d22010-06-08 16:52:24 +00002186
2187 if (log)
2188 log->Printf ("ProcessGDBRemote::%s ()", __FUNCTION__);
2189
2190 m_async_broadcaster.BroadcastEvent (eBroadcastBitAsyncThreadShouldExit);
2191
2192 // Stop the stdio thread
Greg Clayton09c81ef2011-02-08 01:34:25 +00002193 if (IS_VALID_LLDB_HOST_THREAD(m_async_thread))
Chris Lattner24943d22010-06-08 16:52:24 +00002194 {
2195 Host::ThreadJoin (m_async_thread, NULL, NULL);
2196 }
2197}
2198
2199
2200void *
2201ProcessGDBRemote::AsyncThread (void *arg)
2202{
2203 ProcessGDBRemote *process = (ProcessGDBRemote*) arg;
2204
Greg Claytone005f2c2010-11-06 01:53:30 +00002205 LogSP log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (GDBR_LOG_PROCESS));
Chris Lattner24943d22010-06-08 16:52:24 +00002206 if (log)
2207 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) thread starting...", __FUNCTION__, arg, process->GetID());
2208
2209 Listener listener ("ProcessGDBRemote::AsyncThread");
2210 EventSP event_sp;
2211 const uint32_t desired_event_mask = eBroadcastBitAsyncContinue |
2212 eBroadcastBitAsyncThreadShouldExit;
2213
2214 if (listener.StartListeningForEvents (&process->m_async_broadcaster, desired_event_mask) == desired_event_mask)
2215 {
2216 bool done = false;
2217 while (!done)
2218 {
2219 if (log)
2220 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) listener.WaitForEvent (NULL, event_sp)...", __FUNCTION__, arg, process->GetID());
2221 if (listener.WaitForEvent (NULL, event_sp))
2222 {
2223 const uint32_t event_type = event_sp->GetType();
Jim Ingham3ae449a2010-11-17 02:32:00 +00002224 if (log)
2225 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) Got an event of type: %d...", __FUNCTION__, arg, process->GetID(), event_type);
2226
Chris Lattner24943d22010-06-08 16:52:24 +00002227 switch (event_type)
2228 {
2229 case eBroadcastBitAsyncContinue:
2230 {
2231 const EventDataBytes *continue_packet = EventDataBytes::GetEventDataFromEvent(event_sp.get());
2232
2233 if (continue_packet)
2234 {
2235 const char *continue_cstr = (const char *)continue_packet->GetBytes ();
2236 const size_t continue_cstr_len = continue_packet->GetByteSize ();
2237 if (log)
2238 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) got eBroadcastBitAsyncContinue: %s", __FUNCTION__, arg, process->GetID(), continue_cstr);
2239
Greg Clayton7e2f91c2011-01-29 07:10:55 +00002240 if (::strstr (continue_cstr, "vAttach") == NULL)
2241 process->SetPrivateState(eStateRunning);
Chris Lattner24943d22010-06-08 16:52:24 +00002242 StringExtractorGDBRemote response;
2243 StateType stop_state = process->GetGDBRemote().SendContinuePacketAndWaitForResponse (process, continue_cstr, continue_cstr_len, response);
2244
2245 switch (stop_state)
2246 {
2247 case eStateStopped:
2248 case eStateCrashed:
2249 case eStateSuspended:
2250 process->m_last_stop_packet = response;
2251 process->m_last_stop_packet.SetFilePos (0);
2252 process->SetPrivateState (stop_state);
2253 break;
2254
2255 case eStateExited:
2256 process->m_last_stop_packet = response;
2257 process->m_last_stop_packet.SetFilePos (0);
2258 response.SetFilePos(1);
2259 process->SetExitStatus(response.GetHexU8(), NULL);
2260 done = true;
2261 break;
2262
2263 case eStateInvalid:
2264 break;
2265
2266 default:
2267 process->SetPrivateState (stop_state);
2268 break;
2269 }
2270 }
2271 }
2272 break;
2273
2274 case eBroadcastBitAsyncThreadShouldExit:
2275 if (log)
2276 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) got eBroadcastBitAsyncThreadShouldExit...", __FUNCTION__, arg, process->GetID());
2277 done = true;
2278 break;
2279
2280 default:
2281 if (log)
2282 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) got unknown event 0x%8.8x", __FUNCTION__, arg, process->GetID(), event_type);
2283 done = true;
2284 break;
2285 }
2286 }
2287 else
2288 {
2289 if (log)
2290 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) listener.WaitForEvent (NULL, event_sp) => false", __FUNCTION__, arg, process->GetID());
2291 done = true;
2292 }
2293 }
2294 }
2295
2296 if (log)
2297 log->Printf ("ProcessGDBRemote::%s (arg = %p, pid = %i) thread exiting...", __FUNCTION__, arg, process->GetID());
2298
2299 process->m_async_thread = LLDB_INVALID_HOST_THREAD;
2300 return NULL;
2301}
2302
Chris Lattner24943d22010-06-08 16:52:24 +00002303const char *
2304ProcessGDBRemote::GetDispatchQueueNameForThread
2305(
2306 addr_t thread_dispatch_qaddr,
2307 std::string &dispatch_queue_name
2308)
2309{
2310 dispatch_queue_name.clear();
2311 if (thread_dispatch_qaddr != 0 && thread_dispatch_qaddr != LLDB_INVALID_ADDRESS)
2312 {
2313 // Cache the dispatch_queue_offsets_addr value so we don't always have
2314 // to look it up
2315 if (m_dispatch_queue_offsets_addr == LLDB_INVALID_ADDRESS)
2316 {
Greg Claytonaf6e9e42010-10-12 17:33:06 +00002317 static ConstString g_dispatch_queue_offsets_symbol_name ("dispatch_queue_offsets");
2318 const Symbol *dispatch_queue_offsets_symbol = NULL;
Greg Clayton537a7a82010-10-20 20:54:39 +00002319 ModuleSP module_sp(GetTarget().GetImages().FindFirstModuleForFileSpec (FileSpec("libSystem.B.dylib", false)));
Greg Claytonaf6e9e42010-10-12 17:33:06 +00002320 if (module_sp)
2321 dispatch_queue_offsets_symbol = module_sp->FindFirstSymbolWithNameAndType (g_dispatch_queue_offsets_symbol_name, eSymbolTypeData);
2322
2323 if (dispatch_queue_offsets_symbol == NULL)
2324 {
Greg Clayton537a7a82010-10-20 20:54:39 +00002325 module_sp = GetTarget().GetImages().FindFirstModuleForFileSpec (FileSpec("libdispatch.dylib", false));
Greg Claytonaf6e9e42010-10-12 17:33:06 +00002326 if (module_sp)
2327 dispatch_queue_offsets_symbol = module_sp->FindFirstSymbolWithNameAndType (g_dispatch_queue_offsets_symbol_name, eSymbolTypeData);
2328 }
Chris Lattner24943d22010-06-08 16:52:24 +00002329 if (dispatch_queue_offsets_symbol)
Greg Claytoneea26402010-09-14 23:36:40 +00002330 m_dispatch_queue_offsets_addr = dispatch_queue_offsets_symbol->GetValue().GetLoadAddress(&m_target);
Chris Lattner24943d22010-06-08 16:52:24 +00002331
2332 if (m_dispatch_queue_offsets_addr == LLDB_INVALID_ADDRESS)
2333 return NULL;
2334 }
2335
2336 uint8_t memory_buffer[8];
2337 DataExtractor data(memory_buffer, sizeof(memory_buffer), GetByteOrder(), GetAddressByteSize());
2338
2339 // Excerpt from src/queue_private.h
2340 struct dispatch_queue_offsets_s
2341 {
2342 uint16_t dqo_version;
2343 uint16_t dqo_label;
2344 uint16_t dqo_label_size;
2345 } dispatch_queue_offsets;
2346
2347
2348 Error error;
2349 if (ReadMemory (m_dispatch_queue_offsets_addr, memory_buffer, sizeof(dispatch_queue_offsets), error) == sizeof(dispatch_queue_offsets))
2350 {
2351 uint32_t data_offset = 0;
2352 if (data.GetU16(&data_offset, &dispatch_queue_offsets.dqo_version, sizeof(dispatch_queue_offsets)/sizeof(uint16_t)))
2353 {
2354 if (ReadMemory (thread_dispatch_qaddr, &memory_buffer, data.GetAddressByteSize(), error) == data.GetAddressByteSize())
2355 {
2356 data_offset = 0;
2357 lldb::addr_t queue_addr = data.GetAddress(&data_offset);
2358 lldb::addr_t label_addr = queue_addr + dispatch_queue_offsets.dqo_label;
2359 dispatch_queue_name.resize(dispatch_queue_offsets.dqo_label_size, '\0');
2360 size_t bytes_read = ReadMemory (label_addr, &dispatch_queue_name[0], dispatch_queue_offsets.dqo_label_size, error);
2361 if (bytes_read < dispatch_queue_offsets.dqo_label_size)
2362 dispatch_queue_name.erase (bytes_read);
2363 }
2364 }
2365 }
2366 }
2367 if (dispatch_queue_name.empty())
2368 return NULL;
2369 return dispatch_queue_name.c_str();
2370}
2371
Jim Ingham7508e732010-08-09 23:31:02 +00002372uint32_t
2373ProcessGDBRemote::ListProcessesMatchingName (const char *name, StringList &matches, std::vector<lldb::pid_t> &pids)
2374{
2375 // If we are planning to launch the debugserver remotely, then we need to fire up a debugserver
2376 // process and ask it for the list of processes. But if we are local, we can let the Host do it.
2377 if (m_local_debugserver)
2378 {
2379 return Host::ListProcessesMatchingName (name, matches, pids);
2380 }
2381 else
2382 {
2383 // FIXME: Implement talking to the remote debugserver.
2384 return 0;
2385 }
2386
2387}
Jim Ingham55e01d82011-01-22 01:33:44 +00002388
2389bool
2390ProcessGDBRemote::NewThreadNotifyBreakpointHit (void *baton,
2391 lldb_private::StoppointCallbackContext *context,
2392 lldb::user_id_t break_id,
2393 lldb::user_id_t break_loc_id)
2394{
2395 // I don't think I have to do anything here, just make sure I notice the new thread when it starts to
2396 // run so I can stop it if that's what I want to do.
2397 LogSP log (lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
2398 if (log)
2399 log->Printf("Hit New Thread Notification breakpoint.");
2400 return false;
2401}
2402
2403
2404bool
2405ProcessGDBRemote::StartNoticingNewThreads()
2406{
2407 static const char *bp_names[] =
2408 {
2409 "start_wqthread",
Jim Inghamff276fe2011-02-08 05:19:01 +00002410 "_pthread_wqthread",
Jim Ingham55e01d82011-01-22 01:33:44 +00002411 "_pthread_start",
2412 NULL
2413 };
2414
2415 LogSP log (lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
2416 size_t num_bps = m_thread_observation_bps.size();
2417 if (num_bps != 0)
2418 {
2419 for (int i = 0; i < num_bps; i++)
2420 {
2421 lldb::BreakpointSP break_sp = m_target.GetBreakpointByID(m_thread_observation_bps[i]);
2422 if (break_sp)
2423 {
2424 if (log)
2425 log->Printf("Enabled noticing new thread breakpoint.");
2426 break_sp->SetEnabled(true);
2427 }
2428 }
2429 }
2430 else
2431 {
2432 for (int i = 0; bp_names[i] != NULL; i++)
2433 {
2434 Breakpoint *breakpoint = m_target.CreateBreakpoint (NULL, bp_names[i], eFunctionNameTypeFull, true).get();
2435 if (breakpoint)
2436 {
2437 if (log)
2438 log->Printf("Successfully created new thread notification breakpoint at \"%s\".", bp_names[i]);
2439 m_thread_observation_bps.push_back(breakpoint->GetID());
2440 breakpoint->SetCallback (ProcessGDBRemote::NewThreadNotifyBreakpointHit, this, true);
2441 }
2442 else
2443 {
2444 if (log)
2445 log->Printf("Failed to create new thread notification breakpoint.");
2446 return false;
2447 }
2448 }
2449 }
2450
2451 return true;
2452}
2453
2454bool
2455ProcessGDBRemote::StopNoticingNewThreads()
2456{
Jim Inghamff276fe2011-02-08 05:19:01 +00002457 LogSP log (lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
2458 if (log)
2459 log->Printf ("Disabling new thread notification breakpoint.");
Jim Ingham55e01d82011-01-22 01:33:44 +00002460 size_t num_bps = m_thread_observation_bps.size();
2461 if (num_bps != 0)
2462 {
2463 for (int i = 0; i < num_bps; i++)
2464 {
Jim Ingham55e01d82011-01-22 01:33:44 +00002465
2466 lldb::BreakpointSP break_sp = m_target.GetBreakpointByID(m_thread_observation_bps[i]);
2467 if (break_sp)
2468 {
Jim Ingham55e01d82011-01-22 01:33:44 +00002469 break_sp->SetEnabled(false);
2470 }
2471 }
2472 }
2473 return true;
2474}
2475
2476