blob: 5c4f0caa868a9097b83d982cad491406b89c45e2 [file] [log] [blame]
Chris Lattner30fdc8d2010-06-08 16:52:241//===-- Target.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#include "lldb/Target/Target.h"
11
12// C Includes
13// C++ Includes
14// Other libraries and framework includes
15// Project includes
16#include "lldb/Breakpoint/BreakpointResolver.h"
17#include "lldb/Breakpoint/BreakpointResolverAddress.h"
18#include "lldb/Breakpoint/BreakpointResolverFileLine.h"
Jim Ingham969795f2011-09-21 01:17:1319#include "lldb/Breakpoint/BreakpointResolverFileRegex.h"
Chris Lattner30fdc8d2010-06-08 16:52:2420#include "lldb/Breakpoint/BreakpointResolverName.h"
Johnny Chen01a67862011-10-14 00:42:2521#include "lldb/Breakpoint/Watchpoint.h"
Greg Clayton8b2fe6d2010-12-14 02:59:5922#include "lldb/Core/Debugger.h"
Chris Lattner30fdc8d2010-06-08 16:52:2423#include "lldb/Core/Event.h"
24#include "lldb/Core/Log.h"
Caroline Tice969ed3d12011-05-02 20:41:4625#include "lldb/Core/StreamAsynchronousIO.h"
Chris Lattner30fdc8d2010-06-08 16:52:2426#include "lldb/Core/StreamString.h"
Greg Clayton8b2fe6d2010-12-14 02:59:5927#include "lldb/Core/Timer.h"
28#include "lldb/Core/ValueObject.h"
Greg Claytoneb0103f2011-04-07 22:46:3529#include "lldb/Expression/ClangUserExpression.h"
Chris Lattner30fdc8d2010-06-08 16:52:2430#include "lldb/Host/Host.h"
Jim Ingham9575d842011-03-11 03:53:5931#include "lldb/Interpreter/CommandInterpreter.h"
32#include "lldb/Interpreter/CommandReturnObject.h"
Chris Lattner30fdc8d2010-06-08 16:52:2433#include "lldb/lldb-private-log.h"
34#include "lldb/Symbol/ObjectFile.h"
35#include "lldb/Target/Process.h"
Greg Clayton8b2fe6d2010-12-14 02:59:5936#include "lldb/Target/StackFrame.h"
Jim Ingham9575d842011-03-11 03:53:5937#include "lldb/Target/Thread.h"
38#include "lldb/Target/ThreadSpec.h"
Chris Lattner30fdc8d2010-06-08 16:52:2439
40using namespace lldb;
41using namespace lldb_private;
42
43//----------------------------------------------------------------------
44// Target constructor
45//----------------------------------------------------------------------
Greg Clayton32e0a752011-03-30 18:16:5146Target::Target(Debugger &debugger, const ArchSpec &target_arch, const lldb::PlatformSP &platform_sp) :
47 Broadcaster ("lldb.target"),
48 ExecutionContextScope (),
Greg Claytondbe54502010-11-19 03:46:0149 TargetInstanceSettings (*GetSettingsController()),
Greg Clayton66111032010-06-23 01:19:2950 m_debugger (debugger),
Greg Clayton32e0a752011-03-30 18:16:5151 m_platform_sp (platform_sp),
Greg Claytonaf67cec2010-12-20 20:49:2352 m_mutex (Mutex::eMutexTypeRecursive),
Greg Clayton32e0a752011-03-30 18:16:5153 m_arch (target_arch),
54 m_images (),
Greg Claytonf5e56de2010-09-14 23:36:4055 m_section_load_list (),
Chris Lattner30fdc8d2010-06-08 16:52:2456 m_breakpoint_list (false),
57 m_internal_breakpoint_list (true),
Johnny Chen01a67862011-10-14 00:42:2558 m_watchpoint_list (),
Greg Clayton32e0a752011-03-30 18:16:5159 m_process_sp (),
60 m_search_filter_sp (),
Chris Lattner30fdc8d2010-06-08 16:52:2461 m_image_search_paths (ImageSearchPathsChanged, this),
Greg Clayton8b2fe6d2010-12-14 02:59:5962 m_scratch_ast_context_ap (NULL),
Jim Ingham9575d842011-03-11 03:53:5963 m_persistent_variables (),
Jim Inghame37d6052011-09-13 00:29:5664 m_source_manager(*this),
Greg Clayton32e0a752011-03-30 18:16:5165 m_stop_hooks (),
Jim Ingham6026ca32011-05-12 02:06:1466 m_stop_hook_next_id (0),
67 m_suppress_stop_hooks (false)
Chris Lattner30fdc8d2010-06-08 16:52:2468{
Greg Claytoncfd1ace2010-10-31 03:01:0669 SetEventName (eBroadcastBitBreakpointChanged, "breakpoint-changed");
70 SetEventName (eBroadcastBitModulesLoaded, "modules-loaded");
71 SetEventName (eBroadcastBitModulesUnloaded, "modules-unloaded");
72
Greg Clayton2d4edfb2010-11-06 01:53:3073 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_OBJECT));
Chris Lattner30fdc8d2010-06-08 16:52:2474 if (log)
75 log->Printf ("%p Target::Target()", this);
76}
77
78//----------------------------------------------------------------------
79// Destructor
80//----------------------------------------------------------------------
81Target::~Target()
82{
Greg Clayton2d4edfb2010-11-06 01:53:3083 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_OBJECT));
Chris Lattner30fdc8d2010-06-08 16:52:2484 if (log)
85 log->Printf ("%p Target::~Target()", this);
86 DeleteCurrentProcess ();
87}
88
89void
Caroline Ticeceb6b132010-10-26 03:11:1390Target::Dump (Stream *s, lldb::DescriptionLevel description_level)
Chris Lattner30fdc8d2010-06-08 16:52:2491{
Greg Clayton89411422010-10-08 00:21:0592// s->Printf("%.*p: ", (int)sizeof(void*) * 2, this);
Caroline Ticeceb6b132010-10-26 03:11:1393 if (description_level != lldb::eDescriptionLevelBrief)
94 {
95 s->Indent();
96 s->PutCString("Target\n");
97 s->IndentMore();
Greg Clayton93aa84e2010-10-29 04:59:3598 m_images.Dump(s);
99 m_breakpoint_list.Dump(s);
100 m_internal_breakpoint_list.Dump(s);
101 s->IndentLess();
Caroline Ticeceb6b132010-10-26 03:11:13102 }
103 else
104 {
Greg Claytonaa149cb2011-08-11 02:48:45105 Module *exe_module = GetExecutableModulePointer();
106 if (exe_module)
107 s->PutCString (exe_module->GetFileSpec().GetFilename().GetCString());
Jim Ingham48028b62011-05-12 01:12:28108 else
109 s->PutCString ("No executable module.");
Caroline Ticeceb6b132010-10-26 03:11:13110 }
Chris Lattner30fdc8d2010-06-08 16:52:24111}
112
113void
114Target::DeleteCurrentProcess ()
115{
116 if (m_process_sp.get())
117 {
Greg Clayton17f69202010-09-14 23:52:43118 m_section_load_list.Clear();
Chris Lattner30fdc8d2010-06-08 16:52:24119 if (m_process_sp->IsAlive())
120 m_process_sp->Destroy();
Jim Inghamd0a3e12b2011-02-16 17:54:55121
122 m_process_sp->Finalize();
Chris Lattner30fdc8d2010-06-08 16:52:24123
124 // Do any cleanup of the target we need to do between process instances.
125 // NB It is better to do this before destroying the process in case the
126 // clean up needs some help from the process.
127 m_breakpoint_list.ClearAllBreakpointSites();
128 m_internal_breakpoint_list.ClearAllBreakpointSites();
Johnny Chen01a67862011-10-14 00:42:25129 // Disable watchpoints just on the debugger side.
130 DisableAllWatchpoints(false);
Chris Lattner30fdc8d2010-06-08 16:52:24131 m_process_sp.reset();
132 }
133}
134
135const lldb::ProcessSP &
136Target::CreateProcess (Listener &listener, const char *plugin_name)
137{
138 DeleteCurrentProcess ();
139 m_process_sp.reset(Process::FindPlugin(*this, plugin_name, listener));
140 return m_process_sp;
141}
142
143const lldb::ProcessSP &
144Target::GetProcessSP () const
145{
146 return m_process_sp;
147}
148
149lldb::TargetSP
150Target::GetSP()
151{
Greg Clayton4d122c42011-09-17 08:33:22152 // This object contains an instrusive ref count base class so we can
153 // easily make a shared pointer to this object
154 return TargetSP(this);
Chris Lattner30fdc8d2010-06-08 16:52:24155}
156
Greg Clayton3418c852011-08-10 02:10:13157void
158Target::Destroy()
159{
160 Mutex::Locker locker (m_mutex);
161 DeleteCurrentProcess ();
162 m_platform_sp.reset();
163 m_arch.Clear();
164 m_images.Clear();
165 m_section_load_list.Clear();
166 const bool notify = false;
167 m_breakpoint_list.RemoveAll(notify);
168 m_internal_breakpoint_list.RemoveAll(notify);
169 m_last_created_breakpoint.reset();
Johnny Chen01a67862011-10-14 00:42:25170 m_last_created_watchpoint.reset();
Greg Clayton3418c852011-08-10 02:10:13171 m_search_filter_sp.reset();
172 m_image_search_paths.Clear(notify);
173 m_scratch_ast_context_ap.reset();
174 m_persistent_variables.Clear();
175 m_stop_hooks.clear();
176 m_stop_hook_next_id = 0;
177 m_suppress_stop_hooks = false;
178}
179
180
Chris Lattner30fdc8d2010-06-08 16:52:24181BreakpointList &
182Target::GetBreakpointList(bool internal)
183{
184 if (internal)
185 return m_internal_breakpoint_list;
186 else
187 return m_breakpoint_list;
188}
189
190const BreakpointList &
191Target::GetBreakpointList(bool internal) const
192{
193 if (internal)
194 return m_internal_breakpoint_list;
195 else
196 return m_breakpoint_list;
197}
198
199BreakpointSP
200Target::GetBreakpointByID (break_id_t break_id)
201{
202 BreakpointSP bp_sp;
203
204 if (LLDB_BREAK_ID_IS_INTERNAL (break_id))
205 bp_sp = m_internal_breakpoint_list.FindBreakpointByID (break_id);
206 else
207 bp_sp = m_breakpoint_list.FindBreakpointByID (break_id);
208
209 return bp_sp;
210}
211
212BreakpointSP
Jim Ingham87df91b2011-09-23 00:54:11213Target::CreateSourceRegexBreakpoint (const FileSpecList *containingModules,
214 const FileSpecList *source_file_spec_list,
Jim Ingham969795f2011-09-21 01:17:13215 RegularExpression &source_regex,
216 bool internal)
Chris Lattner30fdc8d2010-06-08 16:52:24217{
Jim Ingham87df91b2011-09-23 00:54:11218 SearchFilterSP filter_sp(GetSearchFilterForModuleAndCUList (containingModules, source_file_spec_list));
219 BreakpointResolverSP resolver_sp(new BreakpointResolverFileRegex (NULL, source_regex));
Jim Ingham969795f2011-09-21 01:17:13220 return CreateBreakpoint (filter_sp, resolver_sp, internal);
221}
222
223
224BreakpointSP
225Target::CreateBreakpoint (const FileSpecList *containingModules, const FileSpec &file, uint32_t line_no, bool check_inlines, bool internal)
226{
227 SearchFilterSP filter_sp(GetSearchFilterForModuleList (containingModules));
Chris Lattner30fdc8d2010-06-08 16:52:24228 BreakpointResolverSP resolver_sp(new BreakpointResolverFileLine (NULL, file, line_no, check_inlines));
229 return CreateBreakpoint (filter_sp, resolver_sp, internal);
230}
231
232
233BreakpointSP
Greg Clayton1b72fcb2010-08-24 00:45:41234Target::CreateBreakpoint (lldb::addr_t addr, bool internal)
Chris Lattner30fdc8d2010-06-08 16:52:24235{
Chris Lattner30fdc8d2010-06-08 16:52:24236 Address so_addr;
237 // Attempt to resolve our load address if possible, though it is ok if
238 // it doesn't resolve to section/offset.
239
Greg Clayton1b72fcb2010-08-24 00:45:41240 // Try and resolve as a load address if possible
Greg Claytonf5e56de2010-09-14 23:36:40241 m_section_load_list.ResolveLoadAddress(addr, so_addr);
Greg Clayton1b72fcb2010-08-24 00:45:41242 if (!so_addr.IsValid())
243 {
244 // The address didn't resolve, so just set this as an absolute address
245 so_addr.SetOffset (addr);
246 }
247 BreakpointSP bp_sp (CreateBreakpoint(so_addr, internal));
Chris Lattner30fdc8d2010-06-08 16:52:24248 return bp_sp;
249}
250
251BreakpointSP
252Target::CreateBreakpoint (Address &addr, bool internal)
253{
254 TargetSP target_sp = this->GetSP();
Jim Inghamc6674fd2011-10-28 23:14:11255 SearchFilterSP filter_sp(new SearchFilterForNonModuleSpecificSearches (target_sp));
Chris Lattner30fdc8d2010-06-08 16:52:24256 BreakpointResolverSP resolver_sp (new BreakpointResolverAddress (NULL, addr));
257 return CreateBreakpoint (filter_sp, resolver_sp, internal);
258}
259
260BreakpointSP
Jim Ingham87df91b2011-09-23 00:54:11261Target::CreateBreakpoint (const FileSpecList *containingModules,
262 const FileSpecList *containingSourceFiles,
Greg Claytond16e1e52011-07-12 17:06:17263 const char *func_name,
264 uint32_t func_name_type_mask,
265 bool internal,
266 LazyBool skip_prologue)
Chris Lattner30fdc8d2010-06-08 16:52:24267{
Greg Clayton0c5cd902010-06-28 21:30:43268 BreakpointSP bp_sp;
269 if (func_name)
270 {
Jim Ingham87df91b2011-09-23 00:54:11271 SearchFilterSP filter_sp(GetSearchFilterForModuleAndCUList (containingModules, containingSourceFiles));
Greg Claytond16e1e52011-07-12 17:06:17272
273 BreakpointResolverSP resolver_sp (new BreakpointResolverName (NULL,
274 func_name,
275 func_name_type_mask,
276 Breakpoint::Exact,
277 skip_prologue == eLazyBoolCalculate ? GetSkipPrologue() : skip_prologue));
Greg Clayton0c5cd902010-06-28 21:30:43278 bp_sp = CreateBreakpoint (filter_sp, resolver_sp, internal);
279 }
280 return bp_sp;
Chris Lattner30fdc8d2010-06-08 16:52:24281}
282
283
284SearchFilterSP
285Target::GetSearchFilterForModule (const FileSpec *containingModule)
286{
287 SearchFilterSP filter_sp;
288 lldb::TargetSP target_sp = this->GetSP();
289 if (containingModule != NULL)
290 {
291 // TODO: We should look into sharing module based search filters
292 // across many breakpoints like we do for the simple target based one
293 filter_sp.reset (new SearchFilterByModule (target_sp, *containingModule));
294 }
295 else
296 {
297 if (m_search_filter_sp.get() == NULL)
Jim Inghamc6674fd2011-10-28 23:14:11298 m_search_filter_sp.reset (new SearchFilterForNonModuleSpecificSearches (target_sp));
Chris Lattner30fdc8d2010-06-08 16:52:24299 filter_sp = m_search_filter_sp;
300 }
301 return filter_sp;
302}
303
Jim Ingham969795f2011-09-21 01:17:13304SearchFilterSP
305Target::GetSearchFilterForModuleList (const FileSpecList *containingModules)
306{
307 SearchFilterSP filter_sp;
308 lldb::TargetSP target_sp = this->GetSP();
309 if (containingModules && containingModules->GetSize() != 0)
310 {
311 // TODO: We should look into sharing module based search filters
312 // across many breakpoints like we do for the simple target based one
313 filter_sp.reset (new SearchFilterByModuleList (target_sp, *containingModules));
314 }
315 else
316 {
317 if (m_search_filter_sp.get() == NULL)
Jim Inghamc6674fd2011-10-28 23:14:11318 m_search_filter_sp.reset (new SearchFilterForNonModuleSpecificSearches (target_sp));
Jim Ingham969795f2011-09-21 01:17:13319 filter_sp = m_search_filter_sp;
320 }
321 return filter_sp;
322}
323
Jim Ingham87df91b2011-09-23 00:54:11324SearchFilterSP
325Target::GetSearchFilterForModuleAndCUList (const FileSpecList *containingModules, const FileSpecList *containingSourceFiles)
326{
327 if (containingSourceFiles == NULL || containingSourceFiles->GetSize() == 0)
328 return GetSearchFilterForModuleList(containingModules);
329
330 SearchFilterSP filter_sp;
331 lldb::TargetSP target_sp = this->GetSP();
332 if (containingModules == NULL)
333 {
334 // We could make a special "CU List only SearchFilter". Better yet was if these could be composable,
335 // but that will take a little reworking.
336
337 filter_sp.reset (new SearchFilterByModuleListAndCU (target_sp, FileSpecList(), *containingSourceFiles));
338 }
339 else
340 {
341 filter_sp.reset (new SearchFilterByModuleListAndCU (target_sp, *containingModules, *containingSourceFiles));
342 }
343 return filter_sp;
344}
345
Chris Lattner30fdc8d2010-06-08 16:52:24346BreakpointSP
Jim Ingham87df91b2011-09-23 00:54:11347Target::CreateFuncRegexBreakpoint (const FileSpecList *containingModules,
348 const FileSpecList *containingSourceFiles,
Greg Claytond16e1e52011-07-12 17:06:17349 RegularExpression &func_regex,
350 bool internal,
351 LazyBool skip_prologue)
Chris Lattner30fdc8d2010-06-08 16:52:24352{
Jim Ingham87df91b2011-09-23 00:54:11353 SearchFilterSP filter_sp(GetSearchFilterForModuleAndCUList (containingModules, containingSourceFiles));
Greg Claytond16e1e52011-07-12 17:06:17354 BreakpointResolverSP resolver_sp(new BreakpointResolverName (NULL,
355 func_regex,
356 skip_prologue == eLazyBoolCalculate ? GetSkipPrologue() : skip_prologue));
Chris Lattner30fdc8d2010-06-08 16:52:24357
358 return CreateBreakpoint (filter_sp, resolver_sp, internal);
359}
360
361BreakpointSP
362Target::CreateBreakpoint (SearchFilterSP &filter_sp, BreakpointResolverSP &resolver_sp, bool internal)
363{
364 BreakpointSP bp_sp;
365 if (filter_sp && resolver_sp)
366 {
367 bp_sp.reset(new Breakpoint (*this, filter_sp, resolver_sp));
368 resolver_sp->SetBreakpoint (bp_sp.get());
369
370 if (internal)
Greg Clayton9fed0d82010-07-23 23:33:17371 m_internal_breakpoint_list.Add (bp_sp, false);
Chris Lattner30fdc8d2010-06-08 16:52:24372 else
Greg Clayton9fed0d82010-07-23 23:33:17373 m_breakpoint_list.Add (bp_sp, true);
Chris Lattner30fdc8d2010-06-08 16:52:24374
Greg Clayton2d4edfb2010-11-06 01:53:30375 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24376 if (log)
377 {
378 StreamString s;
379 bp_sp->GetDescription(&s, lldb::eDescriptionLevelVerbose);
380 log->Printf ("Target::%s (internal = %s) => break_id = %s\n", __FUNCTION__, internal ? "yes" : "no", s.GetData());
381 }
382
Chris Lattner30fdc8d2010-06-08 16:52:24383 bp_sp->ResolveBreakpoint();
384 }
Jim Ingham36f3b362010-10-14 23:45:03385
386 if (!internal && bp_sp)
387 {
388 m_last_created_breakpoint = bp_sp;
389 }
390
Chris Lattner30fdc8d2010-06-08 16:52:24391 return bp_sp;
392}
393
Johnny Chen86364b42011-09-20 23:28:55394bool
395Target::ProcessIsValid()
396{
397 return (m_process_sp && m_process_sp->IsAlive());
398}
399
Johnny Chen01a67862011-10-14 00:42:25400// See also Watchpoint::SetWatchpointType(uint32_t type) and
Johnny Chenab9ee762011-09-14 00:26:03401// the OptionGroupWatchpoint::WatchType enum type.
Johnny Chen01a67862011-10-14 00:42:25402WatchpointSP
403Target::CreateWatchpoint(lldb::addr_t addr, size_t size, uint32_t type)
Johnny Chen887062a2011-09-12 23:38:44404{
Johnny Chen0c406372011-09-14 20:23:45405 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
406 if (log)
407 log->Printf("Target::%s (addr = 0x%8.8llx size = %zu type = %u)\n",
408 __FUNCTION__, addr, size, type);
409
Johnny Chen01a67862011-10-14 00:42:25410 WatchpointSP wp_sp;
Johnny Chen86364b42011-09-20 23:28:55411 if (!ProcessIsValid())
Johnny Chen01a67862011-10-14 00:42:25412 return wp_sp;
Johnny Chen45e541f2011-09-14 22:20:15413 if (addr == LLDB_INVALID_ADDRESS || size == 0)
Johnny Chen01a67862011-10-14 00:42:25414 return wp_sp;
Johnny Chen7313a642011-09-13 01:15:36415
Johnny Chen01a67862011-10-14 00:42:25416 // Currently we only support one watchpoint per address, with total number
417 // of watchpoints limited by the hardware which the inferior is running on.
418 WatchpointSP matched_sp = m_watchpoint_list.FindByAddress(addr);
Johnny Chen3c532582011-09-13 23:29:31419 if (matched_sp)
420 {
Johnny Chen0c406372011-09-14 20:23:45421 size_t old_size = matched_sp->GetByteSize();
Johnny Chen3c532582011-09-13 23:29:31422 uint32_t old_type =
Johnny Chen0c406372011-09-14 20:23:45423 (matched_sp->WatchpointRead() ? LLDB_WATCH_TYPE_READ : 0) |
424 (matched_sp->WatchpointWrite() ? LLDB_WATCH_TYPE_WRITE : 0);
Johnny Chen01a67862011-10-14 00:42:25425 // Return the existing watchpoint if both size and type match.
Johnny Chen45e541f2011-09-14 22:20:15426 if (size == old_size && type == old_type) {
Johnny Chen01a67862011-10-14 00:42:25427 wp_sp = matched_sp;
428 wp_sp->SetEnabled(false);
Johnny Chen45e541f2011-09-14 22:20:15429 } else {
Johnny Chen01a67862011-10-14 00:42:25430 // Nil the matched watchpoint; we will be creating a new one.
Johnny Chen45e541f2011-09-14 22:20:15431 m_process_sp->DisableWatchpoint(matched_sp.get());
Johnny Chen01a67862011-10-14 00:42:25432 m_watchpoint_list.Remove(matched_sp->GetID());
Johnny Chen45e541f2011-09-14 22:20:15433 }
Johnny Chen3c532582011-09-13 23:29:31434 }
435
Johnny Chen01a67862011-10-14 00:42:25436 if (!wp_sp) {
437 Watchpoint *new_wp = new Watchpoint(addr, size);
438 if (!new_wp) {
439 printf("Watchpoint ctor failed, out of memory?\n");
440 return wp_sp;
Johnny Chen45e541f2011-09-14 22:20:15441 }
Johnny Chen01a67862011-10-14 00:42:25442 new_wp->SetWatchpointType(type);
443 new_wp->SetTarget(this);
444 wp_sp.reset(new_wp);
445 m_watchpoint_list.Add(wp_sp);
Johnny Chen45e541f2011-09-14 22:20:15446 }
Johnny Chen0c406372011-09-14 20:23:45447
Johnny Chen01a67862011-10-14 00:42:25448 Error rc = m_process_sp->EnableWatchpoint(wp_sp.get());
Johnny Chen0c406372011-09-14 20:23:45449 if (log)
450 log->Printf("Target::%s (creation of watchpoint %s with id = %u)\n",
451 __FUNCTION__,
452 rc.Success() ? "succeeded" : "failed",
Johnny Chen01a67862011-10-14 00:42:25453 wp_sp->GetID());
Johnny Chen0c406372011-09-14 20:23:45454
Johnny Chen9d954d82011-09-27 20:29:45455 if (rc.Fail())
Johnny Chen01a67862011-10-14 00:42:25456 wp_sp.reset();
Johnny Chen9d954d82011-09-27 20:29:45457 else
Johnny Chen01a67862011-10-14 00:42:25458 m_last_created_watchpoint = wp_sp;
459 return wp_sp;
Johnny Chen887062a2011-09-12 23:38:44460}
461
Chris Lattner30fdc8d2010-06-08 16:52:24462void
463Target::RemoveAllBreakpoints (bool internal_also)
464{
Greg Clayton2d4edfb2010-11-06 01:53:30465 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24466 if (log)
467 log->Printf ("Target::%s (internal_also = %s)\n", __FUNCTION__, internal_also ? "yes" : "no");
468
Greg Clayton9fed0d82010-07-23 23:33:17469 m_breakpoint_list.RemoveAll (true);
Chris Lattner30fdc8d2010-06-08 16:52:24470 if (internal_also)
Greg Clayton9fed0d82010-07-23 23:33:17471 m_internal_breakpoint_list.RemoveAll (false);
Jim Ingham36f3b362010-10-14 23:45:03472
473 m_last_created_breakpoint.reset();
Chris Lattner30fdc8d2010-06-08 16:52:24474}
475
476void
477Target::DisableAllBreakpoints (bool internal_also)
478{
Greg Clayton2d4edfb2010-11-06 01:53:30479 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24480 if (log)
481 log->Printf ("Target::%s (internal_also = %s)\n", __FUNCTION__, internal_also ? "yes" : "no");
482
483 m_breakpoint_list.SetEnabledAll (false);
484 if (internal_also)
485 m_internal_breakpoint_list.SetEnabledAll (false);
486}
487
488void
489Target::EnableAllBreakpoints (bool internal_also)
490{
Greg Clayton2d4edfb2010-11-06 01:53:30491 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24492 if (log)
493 log->Printf ("Target::%s (internal_also = %s)\n", __FUNCTION__, internal_also ? "yes" : "no");
494
495 m_breakpoint_list.SetEnabledAll (true);
496 if (internal_also)
497 m_internal_breakpoint_list.SetEnabledAll (true);
498}
499
500bool
501Target::RemoveBreakpointByID (break_id_t break_id)
502{
Greg Clayton2d4edfb2010-11-06 01:53:30503 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24504 if (log)
505 log->Printf ("Target::%s (break_id = %i, internal = %s)\n", __FUNCTION__, break_id, LLDB_BREAK_ID_IS_INTERNAL (break_id) ? "yes" : "no");
506
507 if (DisableBreakpointByID (break_id))
508 {
509 if (LLDB_BREAK_ID_IS_INTERNAL (break_id))
Greg Clayton9fed0d82010-07-23 23:33:17510 m_internal_breakpoint_list.Remove(break_id, false);
Chris Lattner30fdc8d2010-06-08 16:52:24511 else
Jim Ingham36f3b362010-10-14 23:45:03512 {
Greg Claytonaa1c5872011-01-24 23:35:47513 if (m_last_created_breakpoint)
514 {
515 if (m_last_created_breakpoint->GetID() == break_id)
516 m_last_created_breakpoint.reset();
517 }
Greg Clayton9fed0d82010-07-23 23:33:17518 m_breakpoint_list.Remove(break_id, true);
Jim Ingham36f3b362010-10-14 23:45:03519 }
Chris Lattner30fdc8d2010-06-08 16:52:24520 return true;
521 }
522 return false;
523}
524
525bool
526Target::DisableBreakpointByID (break_id_t break_id)
527{
Greg Clayton2d4edfb2010-11-06 01:53:30528 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24529 if (log)
530 log->Printf ("Target::%s (break_id = %i, internal = %s)\n", __FUNCTION__, break_id, LLDB_BREAK_ID_IS_INTERNAL (break_id) ? "yes" : "no");
531
532 BreakpointSP bp_sp;
533
534 if (LLDB_BREAK_ID_IS_INTERNAL (break_id))
535 bp_sp = m_internal_breakpoint_list.FindBreakpointByID (break_id);
536 else
537 bp_sp = m_breakpoint_list.FindBreakpointByID (break_id);
538 if (bp_sp)
539 {
540 bp_sp->SetEnabled (false);
541 return true;
542 }
543 return false;
544}
545
546bool
547Target::EnableBreakpointByID (break_id_t break_id)
548{
Greg Clayton2d4edfb2010-11-06 01:53:30549 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_BREAKPOINTS));
Chris Lattner30fdc8d2010-06-08 16:52:24550 if (log)
551 log->Printf ("Target::%s (break_id = %i, internal = %s)\n",
552 __FUNCTION__,
553 break_id,
554 LLDB_BREAK_ID_IS_INTERNAL (break_id) ? "yes" : "no");
555
556 BreakpointSP bp_sp;
557
558 if (LLDB_BREAK_ID_IS_INTERNAL (break_id))
559 bp_sp = m_internal_breakpoint_list.FindBreakpointByID (break_id);
560 else
561 bp_sp = m_breakpoint_list.FindBreakpointByID (break_id);
562
563 if (bp_sp)
564 {
565 bp_sp->SetEnabled (true);
566 return true;
567 }
568 return false;
569}
570
Johnny Chenedf50372011-09-23 21:21:43571// The flag 'end_to_end', default to true, signifies that the operation is
572// performed end to end, for both the debugger and the debuggee.
573
Johnny Chen01a67862011-10-14 00:42:25574// Assumption: Caller holds the list mutex lock for m_watchpoint_list for end
575// to end operations.
Johnny Chen86364b42011-09-20 23:28:55576bool
Johnny Chen01a67862011-10-14 00:42:25577Target::RemoveAllWatchpoints (bool end_to_end)
Johnny Chen86364b42011-09-20 23:28:55578{
579 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
580 if (log)
581 log->Printf ("Target::%s\n", __FUNCTION__);
582
Johnny Chenedf50372011-09-23 21:21:43583 if (!end_to_end) {
Johnny Chen01a67862011-10-14 00:42:25584 m_watchpoint_list.RemoveAll();
Johnny Chenedf50372011-09-23 21:21:43585 return true;
586 }
587
588 // Otherwise, it's an end to end operation.
589
Johnny Chen86364b42011-09-20 23:28:55590 if (!ProcessIsValid())
591 return false;
592
Johnny Chen01a67862011-10-14 00:42:25593 size_t num_watchpoints = m_watchpoint_list.GetSize();
Johnny Chen86364b42011-09-20 23:28:55594 for (size_t i = 0; i < num_watchpoints; ++i)
595 {
Johnny Chen01a67862011-10-14 00:42:25596 WatchpointSP wp_sp = m_watchpoint_list.GetByIndex(i);
597 if (!wp_sp)
Johnny Chen86364b42011-09-20 23:28:55598 return false;
599
Johnny Chen01a67862011-10-14 00:42:25600 Error rc = m_process_sp->DisableWatchpoint(wp_sp.get());
Johnny Chen86364b42011-09-20 23:28:55601 if (rc.Fail())
602 return false;
603 }
Johnny Chen01a67862011-10-14 00:42:25604 m_watchpoint_list.RemoveAll ();
Johnny Chen86364b42011-09-20 23:28:55605 return true; // Success!
606}
607
Johnny Chen01a67862011-10-14 00:42:25608// Assumption: Caller holds the list mutex lock for m_watchpoint_list for end to
609// end operations.
Johnny Chen86364b42011-09-20 23:28:55610bool
Johnny Chen01a67862011-10-14 00:42:25611Target::DisableAllWatchpoints (bool end_to_end)
Johnny Chen86364b42011-09-20 23:28:55612{
613 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
614 if (log)
615 log->Printf ("Target::%s\n", __FUNCTION__);
616
Johnny Chenedf50372011-09-23 21:21:43617 if (!end_to_end) {
Johnny Chen01a67862011-10-14 00:42:25618 m_watchpoint_list.SetEnabledAll(false);
Johnny Chenedf50372011-09-23 21:21:43619 return true;
620 }
621
622 // Otherwise, it's an end to end operation.
623
Johnny Chen86364b42011-09-20 23:28:55624 if (!ProcessIsValid())
625 return false;
626
Johnny Chen01a67862011-10-14 00:42:25627 size_t num_watchpoints = m_watchpoint_list.GetSize();
Johnny Chen86364b42011-09-20 23:28:55628 for (size_t i = 0; i < num_watchpoints; ++i)
629 {
Johnny Chen01a67862011-10-14 00:42:25630 WatchpointSP wp_sp = m_watchpoint_list.GetByIndex(i);
631 if (!wp_sp)
Johnny Chen86364b42011-09-20 23:28:55632 return false;
633
Johnny Chen01a67862011-10-14 00:42:25634 Error rc = m_process_sp->DisableWatchpoint(wp_sp.get());
Johnny Chen86364b42011-09-20 23:28:55635 if (rc.Fail())
636 return false;
637 }
Johnny Chen86364b42011-09-20 23:28:55638 return true; // Success!
639}
640
Johnny Chen01a67862011-10-14 00:42:25641// Assumption: Caller holds the list mutex lock for m_watchpoint_list for end to
642// end operations.
Johnny Chen86364b42011-09-20 23:28:55643bool
Johnny Chen01a67862011-10-14 00:42:25644Target::EnableAllWatchpoints (bool end_to_end)
Johnny Chen86364b42011-09-20 23:28:55645{
646 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
647 if (log)
648 log->Printf ("Target::%s\n", __FUNCTION__);
649
Johnny Chenedf50372011-09-23 21:21:43650 if (!end_to_end) {
Johnny Chen01a67862011-10-14 00:42:25651 m_watchpoint_list.SetEnabledAll(true);
Johnny Chenedf50372011-09-23 21:21:43652 return true;
653 }
654
655 // Otherwise, it's an end to end operation.
656
Johnny Chen86364b42011-09-20 23:28:55657 if (!ProcessIsValid())
658 return false;
659
Johnny Chen01a67862011-10-14 00:42:25660 size_t num_watchpoints = m_watchpoint_list.GetSize();
Johnny Chen86364b42011-09-20 23:28:55661 for (size_t i = 0; i < num_watchpoints; ++i)
662 {
Johnny Chen01a67862011-10-14 00:42:25663 WatchpointSP wp_sp = m_watchpoint_list.GetByIndex(i);
664 if (!wp_sp)
Johnny Chen86364b42011-09-20 23:28:55665 return false;
666
Johnny Chen01a67862011-10-14 00:42:25667 Error rc = m_process_sp->EnableWatchpoint(wp_sp.get());
Johnny Chen86364b42011-09-20 23:28:55668 if (rc.Fail())
669 return false;
670 }
Johnny Chen86364b42011-09-20 23:28:55671 return true; // Success!
672}
673
Johnny Chen01a67862011-10-14 00:42:25674// Assumption: Caller holds the list mutex lock for m_watchpoint_list
Johnny Chen6cc60e82011-10-05 21:35:46675// during these operations.
676bool
Johnny Chen01a67862011-10-14 00:42:25677Target::IgnoreAllWatchpoints (uint32_t ignore_count)
Johnny Chen6cc60e82011-10-05 21:35:46678{
679 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
680 if (log)
681 log->Printf ("Target::%s\n", __FUNCTION__);
682
683 if (!ProcessIsValid())
684 return false;
685
Johnny Chen01a67862011-10-14 00:42:25686 size_t num_watchpoints = m_watchpoint_list.GetSize();
Johnny Chen6cc60e82011-10-05 21:35:46687 for (size_t i = 0; i < num_watchpoints; ++i)
688 {
Johnny Chen01a67862011-10-14 00:42:25689 WatchpointSP wp_sp = m_watchpoint_list.GetByIndex(i);
690 if (!wp_sp)
Johnny Chen6cc60e82011-10-05 21:35:46691 return false;
692
Johnny Chen01a67862011-10-14 00:42:25693 wp_sp->SetIgnoreCount(ignore_count);
Johnny Chen6cc60e82011-10-05 21:35:46694 }
695 return true; // Success!
696}
697
Johnny Chen01a67862011-10-14 00:42:25698// Assumption: Caller holds the list mutex lock for m_watchpoint_list.
Johnny Chen86364b42011-09-20 23:28:55699bool
Johnny Chen01a67862011-10-14 00:42:25700Target::DisableWatchpointByID (lldb::watch_id_t watch_id)
Johnny Chen86364b42011-09-20 23:28:55701{
702 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
703 if (log)
704 log->Printf ("Target::%s (watch_id = %i)\n", __FUNCTION__, watch_id);
705
706 if (!ProcessIsValid())
707 return false;
708
Johnny Chen01a67862011-10-14 00:42:25709 WatchpointSP wp_sp = m_watchpoint_list.FindByID (watch_id);
710 if (wp_sp)
Johnny Chen86364b42011-09-20 23:28:55711 {
Johnny Chen01a67862011-10-14 00:42:25712 Error rc = m_process_sp->DisableWatchpoint(wp_sp.get());
Johnny Chenf04ee932011-09-22 18:04:58713 if (rc.Success())
714 return true;
Johnny Chen86364b42011-09-20 23:28:55715
Johnny Chenf04ee932011-09-22 18:04:58716 // Else, fallthrough.
Johnny Chen86364b42011-09-20 23:28:55717 }
718 return false;
719}
720
Johnny Chen01a67862011-10-14 00:42:25721// Assumption: Caller holds the list mutex lock for m_watchpoint_list.
Johnny Chen86364b42011-09-20 23:28:55722bool
Johnny Chen01a67862011-10-14 00:42:25723Target::EnableWatchpointByID (lldb::watch_id_t watch_id)
Johnny Chen86364b42011-09-20 23:28:55724{
725 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
726 if (log)
727 log->Printf ("Target::%s (watch_id = %i)\n", __FUNCTION__, watch_id);
728
729 if (!ProcessIsValid())
730 return false;
731
Johnny Chen01a67862011-10-14 00:42:25732 WatchpointSP wp_sp = m_watchpoint_list.FindByID (watch_id);
733 if (wp_sp)
Johnny Chen86364b42011-09-20 23:28:55734 {
Johnny Chen01a67862011-10-14 00:42:25735 Error rc = m_process_sp->EnableWatchpoint(wp_sp.get());
Johnny Chenf04ee932011-09-22 18:04:58736 if (rc.Success())
737 return true;
Johnny Chen86364b42011-09-20 23:28:55738
Johnny Chenf04ee932011-09-22 18:04:58739 // Else, fallthrough.
Johnny Chen86364b42011-09-20 23:28:55740 }
741 return false;
742}
743
Johnny Chen01a67862011-10-14 00:42:25744// Assumption: Caller holds the list mutex lock for m_watchpoint_list.
Johnny Chen86364b42011-09-20 23:28:55745bool
Johnny Chen01a67862011-10-14 00:42:25746Target::RemoveWatchpointByID (lldb::watch_id_t watch_id)
Johnny Chen86364b42011-09-20 23:28:55747{
748 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
749 if (log)
750 log->Printf ("Target::%s (watch_id = %i)\n", __FUNCTION__, watch_id);
751
Johnny Chen01a67862011-10-14 00:42:25752 if (DisableWatchpointByID (watch_id))
Johnny Chen86364b42011-09-20 23:28:55753 {
Johnny Chen01a67862011-10-14 00:42:25754 m_watchpoint_list.Remove(watch_id);
Johnny Chen86364b42011-09-20 23:28:55755 return true;
756 }
757 return false;
758}
759
Johnny Chen01a67862011-10-14 00:42:25760// Assumption: Caller holds the list mutex lock for m_watchpoint_list.
Johnny Chen6cc60e82011-10-05 21:35:46761bool
Johnny Chen01a67862011-10-14 00:42:25762Target::IgnoreWatchpointByID (lldb::watch_id_t watch_id, uint32_t ignore_count)
Johnny Chen6cc60e82011-10-05 21:35:46763{
764 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_WATCHPOINTS));
765 if (log)
766 log->Printf ("Target::%s (watch_id = %i)\n", __FUNCTION__, watch_id);
767
768 if (!ProcessIsValid())
769 return false;
770
Johnny Chen01a67862011-10-14 00:42:25771 WatchpointSP wp_sp = m_watchpoint_list.FindByID (watch_id);
772 if (wp_sp)
Johnny Chen6cc60e82011-10-05 21:35:46773 {
Johnny Chen01a67862011-10-14 00:42:25774 wp_sp->SetIgnoreCount(ignore_count);
Johnny Chen6cc60e82011-10-05 21:35:46775 return true;
776 }
777 return false;
778}
779
Chris Lattner30fdc8d2010-06-08 16:52:24780ModuleSP
781Target::GetExecutableModule ()
782{
Greg Claytonaa149cb2011-08-11 02:48:45783 return m_images.GetModuleAtIndex(0);
784}
785
786Module*
787Target::GetExecutableModulePointer ()
788{
789 return m_images.GetModulePointerAtIndex(0);
Chris Lattner30fdc8d2010-06-08 16:52:24790}
791
792void
793Target::SetExecutableModule (ModuleSP& executable_sp, bool get_dependent_files)
794{
795 m_images.Clear();
796 m_scratch_ast_context_ap.reset();
797
798 if (executable_sp.get())
799 {
800 Timer scoped_timer (__PRETTY_FUNCTION__,
801 "Target::SetExecutableModule (executable = '%s/%s')",
802 executable_sp->GetFileSpec().GetDirectory().AsCString(),
803 executable_sp->GetFileSpec().GetFilename().AsCString());
804
805 m_images.Append(executable_sp); // The first image is our exectuable file
806
Jim Ingham5aee1622010-08-09 23:31:02807 // If we haven't set an architecture yet, reset our architecture based on what we found in the executable module.
Greg Clayton32e0a752011-03-30 18:16:51808 if (!m_arch.IsValid())
809 m_arch = executable_sp->GetArchitecture();
Jim Ingham5aee1622010-08-09 23:31:02810
Chris Lattner30fdc8d2010-06-08 16:52:24811 FileSpecList dependent_files;
Greg Claytone996fd32011-03-08 22:40:15812 ObjectFile *executable_objfile = executable_sp->GetObjectFile();
Chris Lattner30fdc8d2010-06-08 16:52:24813
Greg Claytoncac9c5f2011-09-24 00:52:29814 if (executable_objfile && get_dependent_files)
Chris Lattner30fdc8d2010-06-08 16:52:24815 {
816 executable_objfile->GetDependentModules(dependent_files);
817 for (uint32_t i=0; i<dependent_files.GetSize(); i++)
818 {
Greg Claytonded470d2011-03-19 01:12:21819 FileSpec dependent_file_spec (dependent_files.GetFileSpecPointerAtIndex(i));
820 FileSpec platform_dependent_file_spec;
821 if (m_platform_sp)
Greg Claytond314e812011-03-23 00:09:55822 m_platform_sp->GetFile (dependent_file_spec, NULL, platform_dependent_file_spec);
Greg Claytonded470d2011-03-19 01:12:21823 else
824 platform_dependent_file_spec = dependent_file_spec;
825
826 ModuleSP image_module_sp(GetSharedModule (platform_dependent_file_spec,
Greg Clayton32e0a752011-03-30 18:16:51827 m_arch));
Chris Lattner30fdc8d2010-06-08 16:52:24828 if (image_module_sp.get())
829 {
Chris Lattner30fdc8d2010-06-08 16:52:24830 ObjectFile *objfile = image_module_sp->GetObjectFile();
831 if (objfile)
832 objfile->GetDependentModules(dependent_files);
833 }
834 }
835 }
836
Chris Lattner30fdc8d2010-06-08 16:52:24837 }
Caroline Tice1559a462010-09-27 00:30:10838
839 UpdateInstanceName();
Chris Lattner30fdc8d2010-06-08 16:52:24840}
841
842
Jim Ingham5aee1622010-08-09 23:31:02843bool
844Target::SetArchitecture (const ArchSpec &arch_spec)
845{
Greg Clayton32e0a752011-03-30 18:16:51846 if (m_arch == arch_spec)
Jim Ingham5aee1622010-08-09 23:31:02847 {
848 // If we're setting the architecture to our current architecture, we
849 // don't need to do anything.
850 return true;
851 }
Greg Clayton32e0a752011-03-30 18:16:51852 else if (!m_arch.IsValid())
Jim Ingham5aee1622010-08-09 23:31:02853 {
854 // If we haven't got a valid arch spec, then we just need to set it.
Greg Clayton32e0a752011-03-30 18:16:51855 m_arch = arch_spec;
Jim Ingham5aee1622010-08-09 23:31:02856 return true;
857 }
858 else
859 {
860 // If we have an executable file, try to reset the executable to the desired architecture
Greg Clayton32e0a752011-03-30 18:16:51861 m_arch = arch_spec;
Jim Ingham5aee1622010-08-09 23:31:02862 ModuleSP executable_sp = GetExecutableModule ();
863 m_images.Clear();
864 m_scratch_ast_context_ap.reset();
Jim Ingham5aee1622010-08-09 23:31:02865 // Need to do something about unsetting breakpoints.
866
867 if (executable_sp)
868 {
869 FileSpec exec_file_spec = executable_sp->GetFileSpec();
870 Error error = ModuleList::GetSharedModule(exec_file_spec,
871 arch_spec,
872 NULL,
873 NULL,
874 0,
875 executable_sp,
876 NULL,
877 NULL);
878
879 if (!error.Fail() && executable_sp)
880 {
881 SetExecutableModule (executable_sp, true);
882 return true;
883 }
884 else
885 {
886 return false;
887 }
888 }
889 else
890 {
891 return false;
892 }
893 }
894}
Chris Lattner30fdc8d2010-06-08 16:52:24895
Chris Lattner30fdc8d2010-06-08 16:52:24896void
897Target::ModuleAdded (ModuleSP &module_sp)
898{
899 // A module is being added to this target for the first time
900 ModuleList module_list;
901 module_list.Append(module_sp);
902 ModulesDidLoad (module_list);
903}
904
905void
906Target::ModuleUpdated (ModuleSP &old_module_sp, ModuleSP &new_module_sp)
907{
Jim Inghame716ae02011-08-03 01:00:06908 // A module is replacing an already added module
Chris Lattner30fdc8d2010-06-08 16:52:24909 ModuleList module_list;
910 module_list.Append (old_module_sp);
911 ModulesDidUnload (module_list);
912 module_list.Clear ();
913 module_list.Append (new_module_sp);
914 ModulesDidLoad (module_list);
915}
916
917void
918Target::ModulesDidLoad (ModuleList &module_list)
919{
920 m_breakpoint_list.UpdateBreakpoints (module_list, true);
921 // TODO: make event data that packages up the module_list
922 BroadcastEvent (eBroadcastBitModulesLoaded, NULL);
923}
924
925void
926Target::ModulesDidUnload (ModuleList &module_list)
927{
928 m_breakpoint_list.UpdateBreakpoints (module_list, false);
Greg Claytona4d78302010-12-06 23:51:26929
930 // Remove the images from the target image list
931 m_images.Remove(module_list);
932
Chris Lattner30fdc8d2010-06-08 16:52:24933 // TODO: make event data that packages up the module_list
934 BroadcastEvent (eBroadcastBitModulesUnloaded, NULL);
935}
936
Jim Inghamc6674fd2011-10-28 23:14:11937
Daniel Dunbarf9f70322011-10-31 22:50:37938bool
Jim Inghamc6674fd2011-10-28 23:14:11939Target::ModuleIsExcludedForNonModuleSpecificSearches (const FileSpec &module_spec)
940{
941
942 if (!m_breakpoints_use_platform_avoid)
943 return false;
944 else
945 {
946 ModuleList matchingModules;
947 const ArchSpec *arch_ptr = NULL;
948 const lldb_private::UUID *uuid_ptr= NULL;
949 const ConstString *object_name = NULL;
950 size_t num_modules = GetImages().FindModules(&module_spec, arch_ptr, uuid_ptr, object_name, matchingModules);
951
952 // If there is more than one module for this file spec, only return true if ALL the modules are on the
953 // black list.
954 if (num_modules > 0)
955 {
956 for (int i = 0; i < num_modules; i++)
957 {
958 if (!ModuleIsExcludedForNonModuleSpecificSearches (matchingModules.GetModuleAtIndex(i)))
959 return false;
960 }
961 return true;
962 }
963 else
964 return false;
965 }
966}
967
Daniel Dunbarf9f70322011-10-31 22:50:37968bool
Jim Inghamc6674fd2011-10-28 23:14:11969Target::ModuleIsExcludedForNonModuleSpecificSearches (const lldb::ModuleSP &module_sp)
970{
971 if (!m_breakpoints_use_platform_avoid)
972 return false;
973 else if (GetPlatform())
974 {
975 return GetPlatform()->ModuleIsExcludedForNonModuleSpecificSearches (*this, module_sp);
976 }
977 else
978 return false;
979}
980
Chris Lattner30fdc8d2010-06-08 16:52:24981size_t
Greg Claytondb598232011-01-07 01:57:07982Target::ReadMemoryFromFileCache (const Address& addr, void *dst, size_t dst_len, Error &error)
983{
984 const Section *section = addr.GetSection();
985 if (section && section->GetModule())
986 {
987 ObjectFile *objfile = section->GetModule()->GetObjectFile();
988 if (objfile)
989 {
990 size_t bytes_read = section->ReadSectionDataFromObjectFile (objfile,
991 addr.GetOffset(),
992 dst,
993 dst_len);
994 if (bytes_read > 0)
995 return bytes_read;
996 else
997 error.SetErrorStringWithFormat("error reading data from section %s", section->GetName().GetCString());
998 }
999 else
1000 {
1001 error.SetErrorString("address isn't from a object file");
1002 }
1003 }
1004 else
1005 {
1006 error.SetErrorString("address doesn't contain a section that points to a section in a object file");
1007 }
1008 return 0;
1009}
1010
1011size_t
Enrico Granata9128ee2f2011-09-06 19:20:511012Target::ReadMemory (const Address& addr,
1013 bool prefer_file_cache,
1014 void *dst,
1015 size_t dst_len,
1016 Error &error,
1017 lldb::addr_t *load_addr_ptr)
Chris Lattner30fdc8d2010-06-08 16:52:241018{
Chris Lattner30fdc8d2010-06-08 16:52:241019 error.Clear();
Greg Claytondb598232011-01-07 01:57:071020
Enrico Granata9128ee2f2011-09-06 19:20:511021 // if we end up reading this from process memory, we will fill this
1022 // with the actual load address
1023 if (load_addr_ptr)
1024 *load_addr_ptr = LLDB_INVALID_ADDRESS;
1025
Greg Claytondb598232011-01-07 01:57:071026 size_t bytes_read = 0;
Greg Claytonc749eb82011-07-11 05:12:021027
1028 addr_t load_addr = LLDB_INVALID_ADDRESS;
1029 addr_t file_addr = LLDB_INVALID_ADDRESS;
Greg Clayton357132e2011-03-26 19:14:581030 Address resolved_addr;
1031 if (!addr.IsSectionOffset())
Greg Claytondda4f7b2010-06-30 23:03:031032 {
Greg Claytond16e1e52011-07-12 17:06:171033 if (m_section_load_list.IsEmpty())
Greg Claytonc749eb82011-07-11 05:12:021034 {
Greg Claytond16e1e52011-07-12 17:06:171035 // No sections are loaded, so we must assume we are not running
1036 // yet and anything we are given is a file address.
1037 file_addr = addr.GetOffset(); // "addr" doesn't have a section, so its offset is the file address
1038 m_images.ResolveFileAddress (file_addr, resolved_addr);
Greg Claytonc749eb82011-07-11 05:12:021039 }
Greg Claytondda4f7b2010-06-30 23:03:031040 else
Greg Claytonc749eb82011-07-11 05:12:021041 {
Greg Claytond16e1e52011-07-12 17:06:171042 // We have at least one section loaded. This can be becuase
1043 // we have manually loaded some sections with "target modules load ..."
1044 // or because we have have a live process that has sections loaded
1045 // through the dynamic loader
1046 load_addr = addr.GetOffset(); // "addr" doesn't have a section, so its offset is the load address
1047 m_section_load_list.ResolveLoadAddress (load_addr, resolved_addr);
Greg Claytonc749eb82011-07-11 05:12:021048 }
Greg Claytondda4f7b2010-06-30 23:03:031049 }
Greg Clayton357132e2011-03-26 19:14:581050 if (!resolved_addr.IsValid())
1051 resolved_addr = addr;
Greg Claytondda4f7b2010-06-30 23:03:031052
Greg Claytonc749eb82011-07-11 05:12:021053
Greg Claytondb598232011-01-07 01:57:071054 if (prefer_file_cache)
1055 {
1056 bytes_read = ReadMemoryFromFileCache (resolved_addr, dst, dst_len, error);
1057 if (bytes_read > 0)
1058 return bytes_read;
1059 }
Greg Claytondda4f7b2010-06-30 23:03:031060
Johnny Chen86364b42011-09-20 23:28:551061 if (ProcessIsValid())
Greg Claytondda4f7b2010-06-30 23:03:031062 {
Greg Claytonc749eb82011-07-11 05:12:021063 if (load_addr == LLDB_INVALID_ADDRESS)
1064 load_addr = resolved_addr.GetLoadAddress (this);
1065
Greg Claytondda4f7b2010-06-30 23:03:031066 if (load_addr == LLDB_INVALID_ADDRESS)
1067 {
1068 if (resolved_addr.GetModule() && resolved_addr.GetModule()->GetFileSpec())
Greg Clayton86edbf42011-10-26 00:56:271069 error.SetErrorStringWithFormat("%s[0x%llx] can't be resolved, %s in not currently loaded",
Greg Claytondda4f7b2010-06-30 23:03:031070 resolved_addr.GetModule()->GetFileSpec().GetFilename().AsCString(),
Jason Molenda7e589a62011-09-20 00:26:081071 resolved_addr.GetFileAddress(),
1072 resolved_addr.GetModule()->GetFileSpec().GetFilename().AsCString());
Greg Claytondda4f7b2010-06-30 23:03:031073 else
Greg Clayton86edbf42011-10-26 00:56:271074 error.SetErrorStringWithFormat("0x%llx can't be resolved", resolved_addr.GetFileAddress());
Greg Claytondda4f7b2010-06-30 23:03:031075 }
1076 else
1077 {
Greg Claytondb598232011-01-07 01:57:071078 bytes_read = m_process_sp->ReadMemory(load_addr, dst, dst_len, error);
Chris Lattner30fdc8d2010-06-08 16:52:241079 if (bytes_read != dst_len)
1080 {
1081 if (error.Success())
1082 {
1083 if (bytes_read == 0)
Greg Clayton86edbf42011-10-26 00:56:271084 error.SetErrorStringWithFormat("read memory from 0x%llx failed", load_addr);
Chris Lattner30fdc8d2010-06-08 16:52:241085 else
Greg Clayton86edbf42011-10-26 00:56:271086 error.SetErrorStringWithFormat("only %zu of %zu bytes were read from memory at 0x%llx", bytes_read, dst_len, load_addr);
Chris Lattner30fdc8d2010-06-08 16:52:241087 }
1088 }
Greg Claytondda4f7b2010-06-30 23:03:031089 if (bytes_read)
Enrico Granata9128ee2f2011-09-06 19:20:511090 {
1091 if (load_addr_ptr)
1092 *load_addr_ptr = load_addr;
Greg Claytondda4f7b2010-06-30 23:03:031093 return bytes_read;
Enrico Granata9128ee2f2011-09-06 19:20:511094 }
Greg Claytondda4f7b2010-06-30 23:03:031095 // If the address is not section offset we have an address that
1096 // doesn't resolve to any address in any currently loaded shared
1097 // libaries and we failed to read memory so there isn't anything
1098 // more we can do. If it is section offset, we might be able to
1099 // read cached memory from the object file.
1100 if (!resolved_addr.IsSectionOffset())
1101 return 0;
Chris Lattner30fdc8d2010-06-08 16:52:241102 }
Chris Lattner30fdc8d2010-06-08 16:52:241103 }
Greg Claytondda4f7b2010-06-30 23:03:031104
Greg Claytonc749eb82011-07-11 05:12:021105 if (!prefer_file_cache && resolved_addr.IsSectionOffset())
Greg Claytondda4f7b2010-06-30 23:03:031106 {
Greg Claytondb598232011-01-07 01:57:071107 // If we didn't already try and read from the object file cache, then
1108 // try it after failing to read from the process.
1109 return ReadMemoryFromFileCache (resolved_addr, dst, dst_len, error);
Greg Claytondda4f7b2010-06-30 23:03:031110 }
1111 return 0;
Chris Lattner30fdc8d2010-06-08 16:52:241112}
1113
Greg Claytond16e1e52011-07-12 17:06:171114size_t
1115Target::ReadScalarIntegerFromMemory (const Address& addr,
1116 bool prefer_file_cache,
1117 uint32_t byte_size,
1118 bool is_signed,
1119 Scalar &scalar,
1120 Error &error)
1121{
1122 uint64_t uval;
1123
1124 if (byte_size <= sizeof(uval))
1125 {
1126 size_t bytes_read = ReadMemory (addr, prefer_file_cache, &uval, byte_size, error);
1127 if (bytes_read == byte_size)
1128 {
1129 DataExtractor data (&uval, sizeof(uval), m_arch.GetByteOrder(), m_arch.GetAddressByteSize());
1130 uint32_t offset = 0;
1131 if (byte_size <= 4)
1132 scalar = data.GetMaxU32 (&offset, byte_size);
1133 else
1134 scalar = data.GetMaxU64 (&offset, byte_size);
1135
1136 if (is_signed)
1137 scalar.SignExtend(byte_size * 8);
1138 return bytes_read;
1139 }
1140 }
1141 else
1142 {
1143 error.SetErrorStringWithFormat ("byte size of %u is too large for integer scalar type", byte_size);
1144 }
1145 return 0;
1146}
1147
1148uint64_t
1149Target::ReadUnsignedIntegerFromMemory (const Address& addr,
1150 bool prefer_file_cache,
1151 size_t integer_byte_size,
1152 uint64_t fail_value,
1153 Error &error)
1154{
1155 Scalar scalar;
1156 if (ReadScalarIntegerFromMemory (addr,
1157 prefer_file_cache,
1158 integer_byte_size,
1159 false,
1160 scalar,
1161 error))
1162 return scalar.ULongLong(fail_value);
1163 return fail_value;
1164}
1165
1166bool
1167Target::ReadPointerFromMemory (const Address& addr,
1168 bool prefer_file_cache,
1169 Error &error,
1170 Address &pointer_addr)
1171{
1172 Scalar scalar;
1173 if (ReadScalarIntegerFromMemory (addr,
1174 prefer_file_cache,
1175 m_arch.GetAddressByteSize(),
1176 false,
1177 scalar,
1178 error))
1179 {
1180 addr_t pointer_vm_addr = scalar.ULongLong(LLDB_INVALID_ADDRESS);
1181 if (pointer_vm_addr != LLDB_INVALID_ADDRESS)
1182 {
1183 if (m_section_load_list.IsEmpty())
1184 {
1185 // No sections are loaded, so we must assume we are not running
1186 // yet and anything we are given is a file address.
1187 m_images.ResolveFileAddress (pointer_vm_addr, pointer_addr);
1188 }
1189 else
1190 {
1191 // We have at least one section loaded. This can be becuase
1192 // we have manually loaded some sections with "target modules load ..."
1193 // or because we have have a live process that has sections loaded
1194 // through the dynamic loader
1195 m_section_load_list.ResolveLoadAddress (pointer_vm_addr, pointer_addr);
1196 }
1197 // We weren't able to resolve the pointer value, so just return
1198 // an address with no section
1199 if (!pointer_addr.IsValid())
1200 pointer_addr.SetOffset (pointer_vm_addr);
1201 return true;
1202
1203 }
1204 }
1205 return false;
1206}
Chris Lattner30fdc8d2010-06-08 16:52:241207
1208ModuleSP
1209Target::GetSharedModule
1210(
1211 const FileSpec& file_spec,
1212 const ArchSpec& arch,
Greg Clayton60830262011-02-04 18:53:101213 const lldb_private::UUID *uuid_ptr,
Chris Lattner30fdc8d2010-06-08 16:52:241214 const ConstString *object_name,
1215 off_t object_offset,
1216 Error *error_ptr
1217)
1218{
1219 // Don't pass in the UUID so we can tell if we have a stale value in our list
1220 ModuleSP old_module_sp; // This will get filled in if we have a new version of the library
1221 bool did_create_module = false;
1222 ModuleSP module_sp;
1223
Chris Lattner30fdc8d2010-06-08 16:52:241224 Error error;
1225
Greg Clayton32e0a752011-03-30 18:16:511226 // If there are image search path entries, try to use them first to acquire a suitable image.
Chris Lattner30fdc8d2010-06-08 16:52:241227 if (m_image_search_paths.GetSize())
1228 {
1229 FileSpec transformed_spec;
1230 if (m_image_search_paths.RemapPath (file_spec.GetDirectory(), transformed_spec.GetDirectory()))
1231 {
1232 transformed_spec.GetFilename() = file_spec.GetFilename();
1233 error = ModuleList::GetSharedModule (transformed_spec, arch, uuid_ptr, object_name, object_offset, module_sp, &old_module_sp, &did_create_module);
1234 }
1235 }
1236
Greg Clayton32e0a752011-03-30 18:16:511237 // The platform is responsible for finding and caching an appropriate
1238 // module in the shared module cache.
1239 if (m_platform_sp)
Chris Lattner30fdc8d2010-06-08 16:52:241240 {
Greg Clayton32e0a752011-03-30 18:16:511241 FileSpec platform_file_spec;
1242 error = m_platform_sp->GetSharedModule (file_spec,
1243 arch,
1244 uuid_ptr,
1245 object_name,
1246 object_offset,
1247 module_sp,
1248 &old_module_sp,
1249 &did_create_module);
1250 }
1251 else
1252 {
1253 error.SetErrorString("no platform is currently set");
Chris Lattner30fdc8d2010-06-08 16:52:241254 }
1255
Greg Clayton32e0a752011-03-30 18:16:511256 // If a module hasn't been found yet, use the unmodified path.
Chris Lattner30fdc8d2010-06-08 16:52:241257 if (module_sp)
1258 {
1259 m_images.Append (module_sp);
1260 if (did_create_module)
1261 {
1262 if (old_module_sp && m_images.GetIndexForModule (old_module_sp.get()) != LLDB_INVALID_INDEX32)
1263 ModuleUpdated(old_module_sp, module_sp);
1264 else
1265 ModuleAdded(module_sp);
1266 }
1267 }
1268 if (error_ptr)
1269 *error_ptr = error;
1270 return module_sp;
1271}
1272
1273
1274Target *
1275Target::CalculateTarget ()
1276{
1277 return this;
1278}
1279
1280Process *
1281Target::CalculateProcess ()
1282{
1283 return NULL;
1284}
1285
1286Thread *
1287Target::CalculateThread ()
1288{
1289 return NULL;
1290}
1291
1292StackFrame *
1293Target::CalculateStackFrame ()
1294{
1295 return NULL;
1296}
1297
1298void
Greg Clayton0603aa92010-10-04 01:05:561299Target::CalculateExecutionContext (ExecutionContext &exe_ctx)
Chris Lattner30fdc8d2010-06-08 16:52:241300{
Greg Claytonc14ee322011-09-22 04:58:261301 exe_ctx.Clear();
1302 exe_ctx.SetTargetPtr(this);
Chris Lattner30fdc8d2010-06-08 16:52:241303}
1304
1305PathMappingList &
1306Target::GetImageSearchPathList ()
1307{
1308 return m_image_search_paths;
1309}
1310
1311void
1312Target::ImageSearchPathsChanged
1313(
1314 const PathMappingList &path_list,
1315 void *baton
1316)
1317{
1318 Target *target = (Target *)baton;
Greg Claytonaa149cb2011-08-11 02:48:451319 ModuleSP exe_module_sp (target->GetExecutableModule());
1320 if (exe_module_sp)
Chris Lattner30fdc8d2010-06-08 16:52:241321 {
Greg Claytonaa149cb2011-08-11 02:48:451322 target->m_images.Clear();
1323 target->SetExecutableModule (exe_module_sp, true);
Chris Lattner30fdc8d2010-06-08 16:52:241324 }
1325}
1326
1327ClangASTContext *
1328Target::GetScratchClangASTContext()
1329{
Greg Clayton73da2442011-08-03 01:23:551330 // Now see if we know the target triple, and if so, create our scratch AST context:
1331 if (m_scratch_ast_context_ap.get() == NULL && m_arch.IsValid())
1332 m_scratch_ast_context_ap.reset (new ClangASTContext(m_arch.GetTriple().str().c_str()));
Chris Lattner30fdc8d2010-06-08 16:52:241333 return m_scratch_ast_context_ap.get();
1334}
Caroline Ticedaccaa92010-09-20 20:44:431335
Greg Clayton99d0faf2010-11-18 23:32:351336void
Caroline Tice20bd37f2011-03-10 22:14:101337Target::SettingsInitialize ()
Caroline Ticedaccaa92010-09-20 20:44:431338{
Greg Clayton99d0faf2010-11-18 23:32:351339 UserSettingsControllerSP &usc = GetSettingsController();
1340 usc.reset (new SettingsController);
1341 UserSettingsController::InitializeSettingsController (usc,
1342 SettingsController::global_settings_table,
1343 SettingsController::instance_settings_table);
Caroline Tice20bd37f2011-03-10 22:14:101344
1345 // Now call SettingsInitialize() on each 'child' setting of Target
1346 Process::SettingsInitialize ();
Greg Clayton99d0faf2010-11-18 23:32:351347}
Caroline Ticedaccaa92010-09-20 20:44:431348
Greg Clayton99d0faf2010-11-18 23:32:351349void
Caroline Tice20bd37f2011-03-10 22:14:101350Target::SettingsTerminate ()
Greg Clayton99d0faf2010-11-18 23:32:351351{
Caroline Tice20bd37f2011-03-10 22:14:101352
1353 // Must call SettingsTerminate() on each settings 'child' of Target, before terminating Target's Settings.
1354
1355 Process::SettingsTerminate ();
1356
1357 // Now terminate Target Settings.
1358
Greg Clayton99d0faf2010-11-18 23:32:351359 UserSettingsControllerSP &usc = GetSettingsController();
1360 UserSettingsController::FinalizeSettingsController (usc);
1361 usc.reset();
1362}
Caroline Ticedaccaa92010-09-20 20:44:431363
Greg Clayton99d0faf2010-11-18 23:32:351364UserSettingsControllerSP &
1365Target::GetSettingsController ()
1366{
1367 static UserSettingsControllerSP g_settings_controller;
Caroline Ticedaccaa92010-09-20 20:44:431368 return g_settings_controller;
1369}
1370
1371ArchSpec
1372Target::GetDefaultArchitecture ()
1373{
Greg Clayton64195a22011-02-23 00:35:021374 lldb::UserSettingsControllerSP settings_controller_sp (GetSettingsController());
1375
1376 if (settings_controller_sp)
1377 return static_cast<Target::SettingsController *>(settings_controller_sp.get())->GetArchitecture ();
1378 return ArchSpec();
Caroline Ticedaccaa92010-09-20 20:44:431379}
1380
1381void
Greg Clayton64195a22011-02-23 00:35:021382Target::SetDefaultArchitecture (const ArchSpec& arch)
Caroline Ticedaccaa92010-09-20 20:44:431383{
Greg Clayton64195a22011-02-23 00:35:021384 lldb::UserSettingsControllerSP settings_controller_sp (GetSettingsController());
1385
1386 if (settings_controller_sp)
1387 static_cast<Target::SettingsController *>(settings_controller_sp.get())->GetArchitecture () = arch;
Caroline Ticedaccaa92010-09-20 20:44:431388}
1389
Greg Clayton0603aa92010-10-04 01:05:561390Target *
1391Target::GetTargetFromContexts (const ExecutionContext *exe_ctx_ptr, const SymbolContext *sc_ptr)
1392{
1393 // The target can either exist in the "process" of ExecutionContext, or in
1394 // the "target_sp" member of SymbolContext. This accessor helper function
1395 // will get the target from one of these locations.
1396
1397 Target *target = NULL;
1398 if (sc_ptr != NULL)
1399 target = sc_ptr->target_sp.get();
Greg Claytonc14ee322011-09-22 04:58:261400 if (target == NULL && exe_ctx_ptr)
1401 target = exe_ctx_ptr->GetTargetPtr();
Greg Clayton0603aa92010-10-04 01:05:561402 return target;
1403}
1404
1405
Caroline Tice1559a462010-09-27 00:30:101406void
1407Target::UpdateInstanceName ()
1408{
1409 StreamString sstr;
1410
Greg Claytonaa149cb2011-08-11 02:48:451411 Module *exe_module = GetExecutableModulePointer();
1412 if (exe_module)
Caroline Tice1559a462010-09-27 00:30:101413 {
Greg Clayton307de252010-10-27 02:06:371414 sstr.Printf ("%s_%s",
Greg Claytonaa149cb2011-08-11 02:48:451415 exe_module->GetFileSpec().GetFilename().AsCString(),
1416 exe_module->GetArchitecture().GetArchitectureName());
1417 GetSettingsController()->RenameInstanceSettings (GetInstanceName().AsCString(), sstr.GetData());
Caroline Tice1559a462010-09-27 00:30:101418 }
1419}
1420
Sean Callanan322f5292010-10-29 00:29:031421const char *
1422Target::GetExpressionPrefixContentsAsCString ()
1423{
Greg Clayton7e14f912011-04-23 02:04:551424 if (m_expr_prefix_contents_sp)
1425 return (const char *)m_expr_prefix_contents_sp->GetBytes();
1426 return NULL;
Sean Callanan322f5292010-10-29 00:29:031427}
1428
Greg Clayton8b2fe6d2010-12-14 02:59:591429ExecutionResults
1430Target::EvaluateExpression
1431(
1432 const char *expr_cstr,
1433 StackFrame *frame,
Sean Callanan3bfdaa22011-09-15 02:13:071434 lldb_private::ExecutionPolicy execution_policy,
Greg Clayton8b2fe6d2010-12-14 02:59:591435 bool unwind_on_error,
Sean Callanan92adcac2011-01-13 08:53:351436 bool keep_in_memory,
Jim Ingham2837b762011-05-04 03:43:181437 lldb::DynamicValueType use_dynamic,
Greg Clayton8b2fe6d2010-12-14 02:59:591438 lldb::ValueObjectSP &result_valobj_sp
1439)
1440{
1441 ExecutionResults execution_results = eExecutionSetupError;
1442
1443 result_valobj_sp.reset();
Jim Ingham6026ca32011-05-12 02:06:141444
1445 // We shouldn't run stop hooks in expressions.
1446 // Be sure to reset this if you return anywhere within this function.
1447 bool old_suppress_value = m_suppress_stop_hooks;
1448 m_suppress_stop_hooks = true;
Greg Clayton8b2fe6d2010-12-14 02:59:591449
1450 ExecutionContext exe_ctx;
1451 if (frame)
1452 {
1453 frame->CalculateExecutionContext(exe_ctx);
Greg Clayton54979cd2010-12-15 05:08:081454 Error error;
Greg Clayton6d5e68e2011-01-20 19:27:181455 const uint32_t expr_path_options = StackFrame::eExpressionPathOptionCheckPtrVsMember |
Enrico Granata27b625e2011-08-09 01:04:561456 StackFrame::eExpressionPathOptionsNoFragileObjcIvar |
1457 StackFrame::eExpressionPathOptionsNoSyntheticChildren;
Jim Ingham2837b762011-05-04 03:43:181458 lldb::VariableSP var_sp;
1459 result_valobj_sp = frame->GetValueForVariableExpressionPath (expr_cstr,
1460 use_dynamic,
1461 expr_path_options,
1462 var_sp,
1463 error);
Greg Clayton8b2fe6d2010-12-14 02:59:591464 }
1465 else if (m_process_sp)
1466 {
1467 m_process_sp->CalculateExecutionContext(exe_ctx);
1468 }
1469 else
1470 {
1471 CalculateExecutionContext(exe_ctx);
1472 }
1473
1474 if (result_valobj_sp)
1475 {
1476 execution_results = eExecutionCompleted;
1477 // We got a result from the frame variable expression path above...
1478 ConstString persistent_variable_name (m_persistent_variables.GetNextPersistentVariableName());
1479
1480 lldb::ValueObjectSP const_valobj_sp;
1481
1482 // Check in case our value is already a constant value
1483 if (result_valobj_sp->GetIsConstant())
1484 {
1485 const_valobj_sp = result_valobj_sp;
1486 const_valobj_sp->SetName (persistent_variable_name);
1487 }
1488 else
Jim Ingham78a685a2011-04-16 00:01:131489 {
Jim Ingham2837b762011-05-04 03:43:181490 if (use_dynamic != lldb::eNoDynamicValues)
Jim Ingham78a685a2011-04-16 00:01:131491 {
Jim Ingham2837b762011-05-04 03:43:181492 ValueObjectSP dynamic_sp = result_valobj_sp->GetDynamicValue(use_dynamic);
Jim Ingham78a685a2011-04-16 00:01:131493 if (dynamic_sp)
1494 result_valobj_sp = dynamic_sp;
1495 }
1496
Jim Ingham6035b672011-03-31 00:19:251497 const_valobj_sp = result_valobj_sp->CreateConstantValue (persistent_variable_name);
Jim Ingham78a685a2011-04-16 00:01:131498 }
Greg Clayton8b2fe6d2010-12-14 02:59:591499
Sean Callanan92adcac2011-01-13 08:53:351500 lldb::ValueObjectSP live_valobj_sp = result_valobj_sp;
1501
Greg Clayton8b2fe6d2010-12-14 02:59:591502 result_valobj_sp = const_valobj_sp;
1503
Sean Callanan92adcac2011-01-13 08:53:351504 ClangExpressionVariableSP clang_expr_variable_sp(m_persistent_variables.CreatePersistentVariable(result_valobj_sp));
1505 assert (clang_expr_variable_sp.get());
1506
1507 // Set flags and live data as appropriate
1508
1509 const Value &result_value = live_valobj_sp->GetValue();
1510
1511 switch (result_value.GetValueType())
1512 {
1513 case Value::eValueTypeHostAddress:
1514 case Value::eValueTypeFileAddress:
1515 // we don't do anything with these for now
1516 break;
1517 case Value::eValueTypeScalar:
1518 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVIsLLDBAllocated;
1519 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVNeedsAllocation;
1520 break;
1521 case Value::eValueTypeLoadAddress:
1522 clang_expr_variable_sp->m_live_sp = live_valobj_sp;
1523 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVIsProgramReference;
1524 break;
1525 }
Greg Clayton8b2fe6d2010-12-14 02:59:591526 }
1527 else
1528 {
1529 // Make sure we aren't just trying to see the value of a persistent
1530 // variable (something like "$0")
Greg Clayton3e06bd92011-01-09 21:07:351531 lldb::ClangExpressionVariableSP persistent_var_sp;
1532 // Only check for persistent variables the expression starts with a '$'
1533 if (expr_cstr[0] == '$')
1534 persistent_var_sp = m_persistent_variables.GetVariable (expr_cstr);
1535
Greg Clayton8b2fe6d2010-12-14 02:59:591536 if (persistent_var_sp)
1537 {
1538 result_valobj_sp = persistent_var_sp->GetValueObject ();
1539 execution_results = eExecutionCompleted;
1540 }
1541 else
1542 {
1543 const char *prefix = GetExpressionPrefixContentsAsCString();
Sean Callanan3bfdaa22011-09-15 02:13:071544
Greg Clayton8b2fe6d2010-12-14 02:59:591545 execution_results = ClangUserExpression::Evaluate (exe_ctx,
Sean Callanan3bfdaa22011-09-15 02:13:071546 execution_policy,
Sean Callanan92adcac2011-01-13 08:53:351547 unwind_on_error,
Greg Clayton8b2fe6d2010-12-14 02:59:591548 expr_cstr,
1549 prefix,
1550 result_valobj_sp);
1551 }
1552 }
Jim Ingham6026ca32011-05-12 02:06:141553
1554 m_suppress_stop_hooks = old_suppress_value;
1555
Greg Clayton8b2fe6d2010-12-14 02:59:591556 return execution_results;
1557}
1558
Greg Claytonf3ef3d22011-05-22 22:46:531559lldb::addr_t
1560Target::GetCallableLoadAddress (lldb::addr_t load_addr, AddressClass addr_class) const
1561{
1562 addr_t code_addr = load_addr;
1563 switch (m_arch.GetMachine())
1564 {
1565 case llvm::Triple::arm:
1566 case llvm::Triple::thumb:
1567 switch (addr_class)
1568 {
1569 case eAddressClassData:
1570 case eAddressClassDebug:
1571 return LLDB_INVALID_ADDRESS;
1572
1573 case eAddressClassUnknown:
1574 case eAddressClassInvalid:
1575 case eAddressClassCode:
1576 case eAddressClassCodeAlternateISA:
1577 case eAddressClassRuntime:
1578 // Check if bit zero it no set?
1579 if ((code_addr & 1ull) == 0)
1580 {
1581 // Bit zero isn't set, check if the address is a multiple of 2?
1582 if (code_addr & 2ull)
1583 {
1584 // The address is a multiple of 2 so it must be thumb, set bit zero
1585 code_addr |= 1ull;
1586 }
1587 else if (addr_class == eAddressClassCodeAlternateISA)
1588 {
1589 // We checked the address and the address claims to be the alternate ISA
1590 // which means thumb, so set bit zero.
1591 code_addr |= 1ull;
1592 }
1593 }
1594 break;
1595 }
1596 break;
1597
1598 default:
1599 break;
1600 }
1601 return code_addr;
1602}
1603
1604lldb::addr_t
1605Target::GetOpcodeLoadAddress (lldb::addr_t load_addr, AddressClass addr_class) const
1606{
1607 addr_t opcode_addr = load_addr;
1608 switch (m_arch.GetMachine())
1609 {
1610 case llvm::Triple::arm:
1611 case llvm::Triple::thumb:
1612 switch (addr_class)
1613 {
1614 case eAddressClassData:
1615 case eAddressClassDebug:
1616 return LLDB_INVALID_ADDRESS;
1617
1618 case eAddressClassInvalid:
1619 case eAddressClassUnknown:
1620 case eAddressClassCode:
1621 case eAddressClassCodeAlternateISA:
1622 case eAddressClassRuntime:
1623 opcode_addr &= ~(1ull);
1624 break;
1625 }
1626 break;
1627
1628 default:
1629 break;
1630 }
1631 return opcode_addr;
1632}
1633
Jim Ingham9575d842011-03-11 03:53:591634lldb::user_id_t
1635Target::AddStopHook (Target::StopHookSP &new_hook_sp)
1636{
1637 lldb::user_id_t new_uid = ++m_stop_hook_next_id;
1638 new_hook_sp.reset (new StopHook(GetSP(), new_uid));
1639 m_stop_hooks[new_uid] = new_hook_sp;
1640 return new_uid;
1641}
1642
1643bool
1644Target::RemoveStopHookByID (lldb::user_id_t user_id)
1645{
1646 size_t num_removed;
1647 num_removed = m_stop_hooks.erase (user_id);
1648 if (num_removed == 0)
1649 return false;
1650 else
1651 return true;
1652}
1653
1654void
1655Target::RemoveAllStopHooks ()
1656{
1657 m_stop_hooks.clear();
1658}
1659
1660Target::StopHookSP
1661Target::GetStopHookByID (lldb::user_id_t user_id)
1662{
1663 StopHookSP found_hook;
1664
1665 StopHookCollection::iterator specified_hook_iter;
1666 specified_hook_iter = m_stop_hooks.find (user_id);
1667 if (specified_hook_iter != m_stop_hooks.end())
1668 found_hook = (*specified_hook_iter).second;
1669 return found_hook;
1670}
1671
1672bool
1673Target::SetStopHookActiveStateByID (lldb::user_id_t user_id, bool active_state)
1674{
1675 StopHookCollection::iterator specified_hook_iter;
1676 specified_hook_iter = m_stop_hooks.find (user_id);
1677 if (specified_hook_iter == m_stop_hooks.end())
1678 return false;
1679
1680 (*specified_hook_iter).second->SetIsActive (active_state);
1681 return true;
1682}
1683
1684void
1685Target::SetAllStopHooksActiveState (bool active_state)
1686{
1687 StopHookCollection::iterator pos, end = m_stop_hooks.end();
1688 for (pos = m_stop_hooks.begin(); pos != end; pos++)
1689 {
1690 (*pos).second->SetIsActive (active_state);
1691 }
1692}
1693
1694void
1695Target::RunStopHooks ()
1696{
Jim Ingham6026ca32011-05-12 02:06:141697 if (m_suppress_stop_hooks)
1698 return;
1699
Jim Ingham9575d842011-03-11 03:53:591700 if (!m_process_sp)
1701 return;
1702
1703 if (m_stop_hooks.empty())
1704 return;
1705
1706 StopHookCollection::iterator pos, end = m_stop_hooks.end();
1707
1708 // If there aren't any active stop hooks, don't bother either:
1709 bool any_active_hooks = false;
1710 for (pos = m_stop_hooks.begin(); pos != end; pos++)
1711 {
1712 if ((*pos).second->IsActive())
1713 {
1714 any_active_hooks = true;
1715 break;
1716 }
1717 }
1718 if (!any_active_hooks)
1719 return;
1720
1721 CommandReturnObject result;
1722
1723 std::vector<ExecutionContext> exc_ctx_with_reasons;
1724 std::vector<SymbolContext> sym_ctx_with_reasons;
1725
1726 ThreadList &cur_threadlist = m_process_sp->GetThreadList();
1727 size_t num_threads = cur_threadlist.GetSize();
1728 for (size_t i = 0; i < num_threads; i++)
1729 {
1730 lldb::ThreadSP cur_thread_sp = cur_threadlist.GetThreadAtIndex (i);
1731 if (cur_thread_sp->ThreadStoppedForAReason())
1732 {
1733 lldb::StackFrameSP cur_frame_sp = cur_thread_sp->GetStackFrameAtIndex(0);
1734 exc_ctx_with_reasons.push_back(ExecutionContext(m_process_sp.get(), cur_thread_sp.get(), cur_frame_sp.get()));
1735 sym_ctx_with_reasons.push_back(cur_frame_sp->GetSymbolContext(eSymbolContextEverything));
1736 }
1737 }
1738
1739 // If no threads stopped for a reason, don't run the stop-hooks.
1740 size_t num_exe_ctx = exc_ctx_with_reasons.size();
1741 if (num_exe_ctx == 0)
1742 return;
1743
Jim Ingham5b52f0c2011-06-02 23:58:261744 result.SetImmediateOutputStream (m_debugger.GetAsyncOutputStream());
1745 result.SetImmediateErrorStream (m_debugger.GetAsyncErrorStream());
Jim Ingham9575d842011-03-11 03:53:591746
1747 bool keep_going = true;
1748 bool hooks_ran = false;
Jim Ingham381e25b2011-03-22 01:47:271749 bool print_hook_header;
1750 bool print_thread_header;
1751
1752 if (num_exe_ctx == 1)
1753 print_thread_header = false;
1754 else
1755 print_thread_header = true;
1756
1757 if (m_stop_hooks.size() == 1)
1758 print_hook_header = false;
1759 else
1760 print_hook_header = true;
1761
Jim Ingham9575d842011-03-11 03:53:591762 for (pos = m_stop_hooks.begin(); keep_going && pos != end; pos++)
1763 {
1764 // result.Clear();
1765 StopHookSP cur_hook_sp = (*pos).second;
1766 if (!cur_hook_sp->IsActive())
1767 continue;
1768
1769 bool any_thread_matched = false;
1770 for (size_t i = 0; keep_going && i < num_exe_ctx; i++)
1771 {
1772 if ((cur_hook_sp->GetSpecifier () == NULL
1773 || cur_hook_sp->GetSpecifier()->SymbolContextMatches(sym_ctx_with_reasons[i]))
1774 && (cur_hook_sp->GetThreadSpecifier() == NULL
Greg Claytonc14ee322011-09-22 04:58:261775 || cur_hook_sp->GetThreadSpecifier()->ThreadPassesBasicTests(exc_ctx_with_reasons[i].GetThreadPtr())))
Jim Ingham9575d842011-03-11 03:53:591776 {
1777 if (!hooks_ran)
1778 {
Jim Ingham9575d842011-03-11 03:53:591779 hooks_ran = true;
1780 }
Jim Ingham381e25b2011-03-22 01:47:271781 if (print_hook_header && !any_thread_matched)
Jim Ingham9575d842011-03-11 03:53:591782 {
Johnny Chenaeab25c2011-10-24 23:01:061783 const char *cmd = (cur_hook_sp->GetCommands().GetSize() == 1 ?
1784 cur_hook_sp->GetCommands().GetStringAtIndex(0) :
1785 NULL);
1786 if (cmd)
1787 result.AppendMessageWithFormat("\n- Hook %llu (%s)\n", cur_hook_sp->GetID(), cmd);
1788 else
1789 result.AppendMessageWithFormat("\n- Hook %llu\n", cur_hook_sp->GetID());
Jim Ingham9575d842011-03-11 03:53:591790 any_thread_matched = true;
1791 }
1792
Jim Ingham381e25b2011-03-22 01:47:271793 if (print_thread_header)
Greg Claytonc14ee322011-09-22 04:58:261794 result.AppendMessageWithFormat("-- Thread %d\n", exc_ctx_with_reasons[i].GetThreadPtr()->GetIndexID());
Jim Ingham9575d842011-03-11 03:53:591795
1796 bool stop_on_continue = true;
1797 bool stop_on_error = true;
1798 bool echo_commands = false;
1799 bool print_results = true;
1800 GetDebugger().GetCommandInterpreter().HandleCommands (cur_hook_sp->GetCommands(),
Greg Clayton32e0a752011-03-30 18:16:511801 &exc_ctx_with_reasons[i],
1802 stop_on_continue,
1803 stop_on_error,
1804 echo_commands,
1805 print_results,
1806 result);
Jim Ingham9575d842011-03-11 03:53:591807
1808 // If the command started the target going again, we should bag out of
1809 // running the stop hooks.
Greg Clayton32e0a752011-03-30 18:16:511810 if ((result.GetStatus() == eReturnStatusSuccessContinuingNoResult) ||
1811 (result.GetStatus() == eReturnStatusSuccessContinuingResult))
Jim Ingham9575d842011-03-11 03:53:591812 {
Greg Clayton81c22f62011-10-19 18:09:391813 result.AppendMessageWithFormat ("Aborting stop hooks, hook %llu set the program running.", cur_hook_sp->GetID());
Jim Ingham9575d842011-03-11 03:53:591814 keep_going = false;
1815 }
1816 }
1817 }
1818 }
Jason Molenda879cf772011-09-23 00:42:551819
Caroline Tice969ed3d12011-05-02 20:41:461820 result.GetImmediateOutputStream()->Flush();
1821 result.GetImmediateErrorStream()->Flush();
Jim Ingham9575d842011-03-11 03:53:591822}
1823
Greg Clayton7b242382011-07-08 00:48:091824bool
1825Target::LoadModuleWithSlide (Module *module, lldb::addr_t slide)
1826{
1827 bool changed = false;
1828 if (module)
1829 {
1830 ObjectFile *object_file = module->GetObjectFile();
1831 if (object_file)
1832 {
1833 SectionList *section_list = object_file->GetSectionList ();
1834 if (section_list)
1835 {
1836 // All sections listed in the dyld image info structure will all
1837 // either be fixed up already, or they will all be off by a single
1838 // slide amount that is determined by finding the first segment
1839 // that is at file offset zero which also has bytes (a file size
1840 // that is greater than zero) in the object file.
1841
1842 // Determine the slide amount (if any)
1843 const size_t num_sections = section_list->GetSize();
1844 size_t sect_idx = 0;
1845 for (sect_idx = 0; sect_idx < num_sections; ++sect_idx)
1846 {
1847 // Iterate through the object file sections to find the
1848 // first section that starts of file offset zero and that
1849 // has bytes in the file...
1850 Section *section = section_list->GetSectionAtIndex (sect_idx).get();
1851 if (section)
1852 {
1853 if (m_section_load_list.SetSectionLoadAddress (section, section->GetFileAddress() + slide))
1854 changed = true;
1855 }
1856 }
1857 }
1858 }
1859 }
1860 return changed;
1861}
1862
1863
Jim Ingham9575d842011-03-11 03:53:591864//--------------------------------------------------------------
1865// class Target::StopHook
1866//--------------------------------------------------------------
1867
1868
1869Target::StopHook::StopHook (lldb::TargetSP target_sp, lldb::user_id_t uid) :
1870 UserID (uid),
1871 m_target_sp (target_sp),
Jim Ingham9575d842011-03-11 03:53:591872 m_commands (),
1873 m_specifier_sp (),
Stephen Wilson71c21d12011-04-11 19:41:401874 m_thread_spec_ap(NULL),
1875 m_active (true)
Jim Ingham9575d842011-03-11 03:53:591876{
1877}
1878
1879Target::StopHook::StopHook (const StopHook &rhs) :
1880 UserID (rhs.GetID()),
1881 m_target_sp (rhs.m_target_sp),
1882 m_commands (rhs.m_commands),
1883 m_specifier_sp (rhs.m_specifier_sp),
Stephen Wilson71c21d12011-04-11 19:41:401884 m_thread_spec_ap (NULL),
1885 m_active (rhs.m_active)
Jim Ingham9575d842011-03-11 03:53:591886{
1887 if (rhs.m_thread_spec_ap.get() != NULL)
1888 m_thread_spec_ap.reset (new ThreadSpec(*rhs.m_thread_spec_ap.get()));
1889}
1890
1891
1892Target::StopHook::~StopHook ()
1893{
1894}
1895
1896void
1897Target::StopHook::SetThreadSpecifier (ThreadSpec *specifier)
1898{
1899 m_thread_spec_ap.reset (specifier);
1900}
1901
1902
1903void
1904Target::StopHook::GetDescription (Stream *s, lldb::DescriptionLevel level) const
1905{
1906 int indent_level = s->GetIndentLevel();
1907
1908 s->SetIndentLevel(indent_level + 2);
1909
Greg Clayton81c22f62011-10-19 18:09:391910 s->Printf ("Hook: %llu\n", GetID());
Jim Ingham9575d842011-03-11 03:53:591911 if (m_active)
1912 s->Indent ("State: enabled\n");
1913 else
1914 s->Indent ("State: disabled\n");
1915
1916 if (m_specifier_sp)
1917 {
1918 s->Indent();
1919 s->PutCString ("Specifier:\n");
1920 s->SetIndentLevel (indent_level + 4);
1921 m_specifier_sp->GetDescription (s, level);
1922 s->SetIndentLevel (indent_level + 2);
1923 }
1924
1925 if (m_thread_spec_ap.get() != NULL)
1926 {
1927 StreamString tmp;
1928 s->Indent("Thread:\n");
1929 m_thread_spec_ap->GetDescription (&tmp, level);
1930 s->SetIndentLevel (indent_level + 4);
1931 s->Indent (tmp.GetData());
1932 s->PutCString ("\n");
1933 s->SetIndentLevel (indent_level + 2);
1934 }
1935
1936 s->Indent ("Commands: \n");
1937 s->SetIndentLevel (indent_level + 4);
1938 uint32_t num_commands = m_commands.GetSize();
1939 for (uint32_t i = 0; i < num_commands; i++)
1940 {
1941 s->Indent(m_commands.GetStringAtIndex(i));
1942 s->PutCString ("\n");
1943 }
1944 s->SetIndentLevel (indent_level);
1945}
1946
1947
Caroline Ticedaccaa92010-09-20 20:44:431948//--------------------------------------------------------------
1949// class Target::SettingsController
1950//--------------------------------------------------------------
1951
1952Target::SettingsController::SettingsController () :
1953 UserSettingsController ("target", Debugger::GetSettingsController()),
1954 m_default_architecture ()
1955{
1956 m_default_settings.reset (new TargetInstanceSettings (*this, false,
1957 InstanceSettings::GetDefaultName().AsCString()));
1958}
1959
1960Target::SettingsController::~SettingsController ()
1961{
1962}
1963
1964lldb::InstanceSettingsSP
1965Target::SettingsController::CreateInstanceSettings (const char *instance_name)
1966{
Greg Claytondbe54502010-11-19 03:46:011967 TargetInstanceSettings *new_settings = new TargetInstanceSettings (*GetSettingsController(),
1968 false,
1969 instance_name);
Caroline Ticedaccaa92010-09-20 20:44:431970 lldb::InstanceSettingsSP new_settings_sp (new_settings);
1971 return new_settings_sp;
1972}
1973
Caroline Ticedaccaa92010-09-20 20:44:431974
Jim Ingham78a685a2011-04-16 00:01:131975#define TSC_DEFAULT_ARCH "default-arch"
1976#define TSC_EXPR_PREFIX "expr-prefix"
Jim Ingham78a685a2011-04-16 00:01:131977#define TSC_PREFER_DYNAMIC "prefer-dynamic-value"
Greg Clayton385aa282011-04-22 03:55:061978#define TSC_SKIP_PROLOGUE "skip-prologue"
Greg Clayton7e14f912011-04-23 02:04:551979#define TSC_SOURCE_MAP "source-map"
Enrico Granata22c55d12011-08-12 02:00:061980#define TSC_MAX_CHILDREN "max-children-count"
Enrico Granata9128ee2f2011-09-06 19:20:511981#define TSC_MAX_STRLENSUMMARY "max-string-summary-length"
Jim Inghamc6674fd2011-10-28 23:14:111982#define TSC_PLATFORM_AVOID "breakpoints-use-platform-avoid-list"
Greg Claytonbfe5f3b2011-02-18 01:44:251983
1984
1985static const ConstString &
1986GetSettingNameForDefaultArch ()
1987{
1988 static ConstString g_const_string (TSC_DEFAULT_ARCH);
Greg Claytonbfe5f3b2011-02-18 01:44:251989 return g_const_string;
Caroline Ticedaccaa92010-09-20 20:44:431990}
1991
Greg Claytonbfe5f3b2011-02-18 01:44:251992static const ConstString &
1993GetSettingNameForExpressionPrefix ()
1994{
1995 static ConstString g_const_string (TSC_EXPR_PREFIX);
1996 return g_const_string;
1997}
1998
1999static const ConstString &
Jim Ingham78a685a2011-04-16 00:01:132000GetSettingNameForPreferDynamicValue ()
2001{
2002 static ConstString g_const_string (TSC_PREFER_DYNAMIC);
2003 return g_const_string;
2004}
2005
Greg Clayton7e14f912011-04-23 02:04:552006static const ConstString &
2007GetSettingNameForSourcePathMap ()
2008{
2009 static ConstString g_const_string (TSC_SOURCE_MAP);
2010 return g_const_string;
2011}
Greg Claytonbfe5f3b2011-02-18 01:44:252012
Greg Clayton385aa282011-04-22 03:55:062013static const ConstString &
2014GetSettingNameForSkipPrologue ()
2015{
2016 static ConstString g_const_string (TSC_SKIP_PROLOGUE);
2017 return g_const_string;
2018}
2019
Enrico Granata22c55d12011-08-12 02:00:062020static const ConstString &
2021GetSettingNameForMaxChildren ()
2022{
2023 static ConstString g_const_string (TSC_MAX_CHILDREN);
2024 return g_const_string;
2025}
Greg Clayton385aa282011-04-22 03:55:062026
Enrico Granata9128ee2f2011-09-06 19:20:512027static const ConstString &
2028GetSettingNameForMaxStringSummaryLength ()
2029{
2030 static ConstString g_const_string (TSC_MAX_STRLENSUMMARY);
2031 return g_const_string;
2032}
Greg Clayton385aa282011-04-22 03:55:062033
Jim Inghamc6674fd2011-10-28 23:14:112034static const ConstString &
2035GetSettingNameForPlatformAvoid ()
2036{
2037 static ConstString g_const_string (TSC_PLATFORM_AVOID);
2038 return g_const_string;
2039}
2040
2041
Caroline Ticedaccaa92010-09-20 20:44:432042bool
2043Target::SettingsController::SetGlobalVariable (const ConstString &var_name,
2044 const char *index_value,
2045 const char *value,
2046 const SettingEntry &entry,
Greg Claytone0d378b2011-03-24 21:19:542047 const VarSetOperationType op,
Caroline Ticedaccaa92010-09-20 20:44:432048 Error&err)
2049{
Greg Claytonbfe5f3b2011-02-18 01:44:252050 if (var_name == GetSettingNameForDefaultArch())
Caroline Ticedaccaa92010-09-20 20:44:432051 {
Greg Claytoneb0103f2011-04-07 22:46:352052 m_default_architecture.SetTriple (value, NULL);
Greg Clayton64195a22011-02-23 00:35:022053 if (!m_default_architecture.IsValid())
2054 err.SetErrorStringWithFormat ("'%s' is not a valid architecture or triple.", value);
Caroline Ticedaccaa92010-09-20 20:44:432055 }
2056 return true;
2057}
2058
2059
2060bool
2061Target::SettingsController::GetGlobalVariable (const ConstString &var_name,
2062 StringList &value,
2063 Error &err)
2064{
Greg Claytonbfe5f3b2011-02-18 01:44:252065 if (var_name == GetSettingNameForDefaultArch())
Caroline Ticedaccaa92010-09-20 20:44:432066 {
Greg Clayton307de252010-10-27 02:06:372067 // If the arch is invalid (the default), don't show a string for it
2068 if (m_default_architecture.IsValid())
Greg Clayton64195a22011-02-23 00:35:022069 value.AppendString (m_default_architecture.GetArchitectureName());
Caroline Ticedaccaa92010-09-20 20:44:432070 return true;
2071 }
2072 else
2073 err.SetErrorStringWithFormat ("unrecognized variable name '%s'", var_name.AsCString());
2074
2075 return false;
2076}
2077
2078//--------------------------------------------------------------
2079// class TargetInstanceSettings
2080//--------------------------------------------------------------
2081
Greg Clayton85851dd2010-12-04 00:10:172082TargetInstanceSettings::TargetInstanceSettings
2083(
2084 UserSettingsController &owner,
2085 bool live_instance,
2086 const char *name
2087) :
Greg Claytonbfe5f3b2011-02-18 01:44:252088 InstanceSettings (owner, name ? name : InstanceSettings::InvalidName().AsCString(), live_instance),
Greg Clayton7e14f912011-04-23 02:04:552089 m_expr_prefix_file (),
2090 m_expr_prefix_contents_sp (),
Jim Ingham2837b762011-05-04 03:43:182091 m_prefer_dynamic_value (2),
Greg Clayton7e14f912011-04-23 02:04:552092 m_skip_prologue (true, true),
Enrico Granata22c55d12011-08-12 02:00:062093 m_source_map (NULL, NULL),
Enrico Granata9128ee2f2011-09-06 19:20:512094 m_max_children_display(256),
Jim Inghamc6674fd2011-10-28 23:14:112095 m_max_strlen_length(1024),
2096 m_breakpoints_use_platform_avoid (true, true)
Caroline Ticedaccaa92010-09-20 20:44:432097{
2098 // CopyInstanceSettings is a pure virtual function in InstanceSettings; it therefore cannot be called
2099 // until the vtables for TargetInstanceSettings are properly set up, i.e. AFTER all the initializers.
2100 // For this reason it has to be called here, rather than in the initializer or in the parent constructor.
2101 // This is true for CreateInstanceName() too.
2102
2103 if (GetInstanceName () == InstanceSettings::InvalidName())
2104 {
2105 ChangeInstanceName (std::string (CreateInstanceName().AsCString()));
2106 m_owner.RegisterInstanceSettings (this);
2107 }
2108
2109 if (live_instance)
2110 {
2111 const lldb::InstanceSettingsSP &pending_settings = m_owner.FindPendingSettings (m_instance_name);
2112 CopyInstanceSettings (pending_settings,false);
Caroline Ticedaccaa92010-09-20 20:44:432113 }
2114}
2115
2116TargetInstanceSettings::TargetInstanceSettings (const TargetInstanceSettings &rhs) :
Greg Clayton7e14f912011-04-23 02:04:552117 InstanceSettings (*Target::GetSettingsController(), CreateInstanceName().AsCString()),
2118 m_expr_prefix_file (rhs.m_expr_prefix_file),
2119 m_expr_prefix_contents_sp (rhs.m_expr_prefix_contents_sp),
2120 m_prefer_dynamic_value (rhs.m_prefer_dynamic_value),
2121 m_skip_prologue (rhs.m_skip_prologue),
Enrico Granata22c55d12011-08-12 02:00:062122 m_source_map (rhs.m_source_map),
Enrico Granata9128ee2f2011-09-06 19:20:512123 m_max_children_display(rhs.m_max_children_display),
Jim Inghamc6674fd2011-10-28 23:14:112124 m_max_strlen_length(rhs.m_max_strlen_length),
2125 m_breakpoints_use_platform_avoid (rhs.m_breakpoints_use_platform_avoid)
Caroline Ticedaccaa92010-09-20 20:44:432126{
2127 if (m_instance_name != InstanceSettings::GetDefaultName())
2128 {
2129 const lldb::InstanceSettingsSP &pending_settings = m_owner.FindPendingSettings (m_instance_name);
2130 CopyInstanceSettings (pending_settings,false);
Caroline Ticedaccaa92010-09-20 20:44:432131 }
2132}
2133
2134TargetInstanceSettings::~TargetInstanceSettings ()
2135{
2136}
2137
2138TargetInstanceSettings&
2139TargetInstanceSettings::operator= (const TargetInstanceSettings &rhs)
2140{
2141 if (this != &rhs)
2142 {
2143 }
2144
2145 return *this;
2146}
2147
Caroline Ticedaccaa92010-09-20 20:44:432148void
2149TargetInstanceSettings::UpdateInstanceSettingsVariable (const ConstString &var_name,
2150 const char *index_value,
2151 const char *value,
2152 const ConstString &instance_name,
2153 const SettingEntry &entry,
Greg Claytone0d378b2011-03-24 21:19:542154 VarSetOperationType op,
Caroline Ticedaccaa92010-09-20 20:44:432155 Error &err,
2156 bool pending)
2157{
Greg Claytonbfe5f3b2011-02-18 01:44:252158 if (var_name == GetSettingNameForExpressionPrefix ())
Sean Callanan322f5292010-10-29 00:29:032159 {
Greg Clayton7e14f912011-04-23 02:04:552160 err = UserSettingsController::UpdateFileSpecOptionValue (value, op, m_expr_prefix_file);
2161 if (err.Success())
Sean Callanan322f5292010-10-29 00:29:032162 {
Greg Clayton7e14f912011-04-23 02:04:552163 switch (op)
Sean Callanan322f5292010-10-29 00:29:032164 {
Greg Clayton7e14f912011-04-23 02:04:552165 default:
2166 break;
2167 case eVarSetOperationAssign:
2168 case eVarSetOperationAppend:
Sean Callanan322f5292010-10-29 00:29:032169 {
Greg Clayton7e14f912011-04-23 02:04:552170 if (!m_expr_prefix_file.GetCurrentValue().Exists())
2171 {
2172 err.SetErrorToGenericError ();
Greg Clayton86edbf42011-10-26 00:56:272173 err.SetErrorStringWithFormat ("%s does not exist", value);
Greg Clayton7e14f912011-04-23 02:04:552174 return;
2175 }
2176
2177 m_expr_prefix_contents_sp = m_expr_prefix_file.GetCurrentValue().ReadFileContents();
2178
2179 if (!m_expr_prefix_contents_sp && m_expr_prefix_contents_sp->GetByteSize() == 0)
2180 {
Greg Clayton86edbf42011-10-26 00:56:272181 err.SetErrorStringWithFormat ("couldn't read data from '%s'", value);
Greg Clayton7e14f912011-04-23 02:04:552182 m_expr_prefix_contents_sp.reset();
2183 }
Sean Callanan322f5292010-10-29 00:29:032184 }
Greg Clayton7e14f912011-04-23 02:04:552185 break;
2186 case eVarSetOperationClear:
2187 m_expr_prefix_contents_sp.reset();
Sean Callanan322f5292010-10-29 00:29:032188 }
Sean Callanan322f5292010-10-29 00:29:032189 }
2190 }
Jim Ingham78a685a2011-04-16 00:01:132191 else if (var_name == GetSettingNameForPreferDynamicValue())
2192 {
Jim Ingham2837b762011-05-04 03:43:182193 int new_value;
2194 UserSettingsController::UpdateEnumVariable (g_dynamic_value_types, &new_value, value, err);
2195 if (err.Success())
2196 m_prefer_dynamic_value = new_value;
Greg Clayton385aa282011-04-22 03:55:062197 }
2198 else if (var_name == GetSettingNameForSkipPrologue())
2199 {
Greg Clayton7e14f912011-04-23 02:04:552200 err = UserSettingsController::UpdateBooleanOptionValue (value, op, m_skip_prologue);
2201 }
Enrico Granata22c55d12011-08-12 02:00:062202 else if (var_name == GetSettingNameForMaxChildren())
2203 {
2204 bool ok;
2205 uint32_t new_value = Args::StringToUInt32(value, 0, 10, &ok);
2206 if (ok)
2207 m_max_children_display = new_value;
2208 }
Enrico Granata9128ee2f2011-09-06 19:20:512209 else if (var_name == GetSettingNameForMaxStringSummaryLength())
2210 {
2211 bool ok;
2212 uint32_t new_value = Args::StringToUInt32(value, 0, 10, &ok);
2213 if (ok)
2214 m_max_strlen_length = new_value;
2215 }
Greg Clayton7e14f912011-04-23 02:04:552216 else if (var_name == GetSettingNameForSourcePathMap ())
2217 {
2218 switch (op)
2219 {
2220 case eVarSetOperationReplace:
2221 case eVarSetOperationInsertBefore:
2222 case eVarSetOperationInsertAfter:
2223 case eVarSetOperationRemove:
2224 default:
2225 break;
2226 case eVarSetOperationAssign:
2227 m_source_map.Clear(true);
2228 // Fall through to append....
2229 case eVarSetOperationAppend:
2230 {
2231 Args args(value);
2232 const uint32_t argc = args.GetArgumentCount();
2233 if (argc & 1 || argc == 0)
2234 {
2235 err.SetErrorStringWithFormat ("an even number of paths must be supplied to to the source-map setting: %u arguments given", argc);
2236 }
2237 else
2238 {
2239 char resolved_new_path[PATH_MAX];
2240 FileSpec file_spec;
2241 const char *old_path;
2242 for (uint32_t idx = 0; (old_path = args.GetArgumentAtIndex(idx)) != NULL; idx += 2)
2243 {
2244 const char *new_path = args.GetArgumentAtIndex(idx+1);
2245 assert (new_path); // We have an even number of paths, this shouldn't happen!
2246
2247 file_spec.SetFile(new_path, true);
2248 if (file_spec.Exists())
2249 {
2250 if (file_spec.GetPath (resolved_new_path, sizeof(resolved_new_path)) >= sizeof(resolved_new_path))
2251 {
2252 err.SetErrorStringWithFormat("new path '%s' is too long", new_path);
2253 return;
2254 }
2255 }
2256 else
2257 {
2258 err.SetErrorStringWithFormat("new path '%s' doesn't exist", new_path);
2259 return;
2260 }
2261 m_source_map.Append(ConstString (old_path), ConstString (resolved_new_path), true);
2262 }
2263 }
2264 }
2265 break;
2266
2267 case eVarSetOperationClear:
2268 m_source_map.Clear(true);
2269 break;
2270 }
Jim Ingham78a685a2011-04-16 00:01:132271 }
Jim Inghamc6674fd2011-10-28 23:14:112272 else if (var_name == GetSettingNameForPlatformAvoid ())
2273 {
2274 err = UserSettingsController::UpdateBooleanOptionValue (value, op, m_breakpoints_use_platform_avoid);
2275 }
Caroline Ticedaccaa92010-09-20 20:44:432276}
2277
2278void
Greg Claytonbfe5f3b2011-02-18 01:44:252279TargetInstanceSettings::CopyInstanceSettings (const lldb::InstanceSettingsSP &new_settings, bool pending)
Caroline Ticedaccaa92010-09-20 20:44:432280{
Sean Callanan322f5292010-10-29 00:29:032281 TargetInstanceSettings *new_settings_ptr = static_cast <TargetInstanceSettings *> (new_settings.get());
2282
2283 if (!new_settings_ptr)
2284 return;
2285
Jim Inghamc6674fd2011-10-28 23:14:112286 m_expr_prefix_file = new_settings_ptr->m_expr_prefix_file;
2287 m_expr_prefix_contents_sp = new_settings_ptr->m_expr_prefix_contents_sp;
2288 m_prefer_dynamic_value = new_settings_ptr->m_prefer_dynamic_value;
2289 m_skip_prologue = new_settings_ptr->m_skip_prologue;
2290 m_max_children_display = new_settings_ptr->m_max_children_display;
2291 m_max_strlen_length = new_settings_ptr->m_max_strlen_length;
2292 m_breakpoints_use_platform_avoid = new_settings_ptr->m_breakpoints_use_platform_avoid;
Caroline Ticedaccaa92010-09-20 20:44:432293}
2294
Caroline Tice12cecd72010-09-20 21:37:422295bool
Caroline Ticedaccaa92010-09-20 20:44:432296TargetInstanceSettings::GetInstanceSettingsValue (const SettingEntry &entry,
2297 const ConstString &var_name,
2298 StringList &value,
Caroline Tice12cecd72010-09-20 21:37:422299 Error *err)
Caroline Ticedaccaa92010-09-20 20:44:432300{
Greg Claytonbfe5f3b2011-02-18 01:44:252301 if (var_name == GetSettingNameForExpressionPrefix ())
Sean Callanan322f5292010-10-29 00:29:032302 {
Greg Clayton7e14f912011-04-23 02:04:552303 char path[PATH_MAX];
2304 const size_t path_len = m_expr_prefix_file.GetCurrentValue().GetPath (path, sizeof(path));
2305 if (path_len > 0)
2306 value.AppendString (path, path_len);
Sean Callanan322f5292010-10-29 00:29:032307 }
Jim Ingham78a685a2011-04-16 00:01:132308 else if (var_name == GetSettingNameForPreferDynamicValue())
2309 {
Jim Ingham2837b762011-05-04 03:43:182310 value.AppendString (g_dynamic_value_types[m_prefer_dynamic_value].string_value);
Jim Ingham78a685a2011-04-16 00:01:132311 }
Greg Clayton385aa282011-04-22 03:55:062312 else if (var_name == GetSettingNameForSkipPrologue())
2313 {
2314 if (m_skip_prologue)
2315 value.AppendString ("true");
2316 else
2317 value.AppendString ("false");
2318 }
Greg Clayton7e14f912011-04-23 02:04:552319 else if (var_name == GetSettingNameForSourcePathMap ())
2320 {
2321 }
Enrico Granata22c55d12011-08-12 02:00:062322 else if (var_name == GetSettingNameForMaxChildren())
2323 {
2324 StreamString count_str;
2325 count_str.Printf ("%d", m_max_children_display);
2326 value.AppendString (count_str.GetData());
2327 }
Enrico Granata9128ee2f2011-09-06 19:20:512328 else if (var_name == GetSettingNameForMaxStringSummaryLength())
2329 {
2330 StreamString count_str;
2331 count_str.Printf ("%d", m_max_strlen_length);
2332 value.AppendString (count_str.GetData());
2333 }
Jim Inghamc6674fd2011-10-28 23:14:112334 else if (var_name == GetSettingNameForPlatformAvoid())
2335 {
2336 if (m_breakpoints_use_platform_avoid)
2337 value.AppendString ("true");
2338 else
2339 value.AppendString ("false");
2340 }
Sean Callanan322f5292010-10-29 00:29:032341 else
2342 {
2343 if (err)
2344 err->SetErrorStringWithFormat ("unrecognized variable name '%s'", var_name.AsCString());
2345 return false;
2346 }
2347
2348 return true;
Caroline Ticedaccaa92010-09-20 20:44:432349}
2350
2351const ConstString
2352TargetInstanceSettings::CreateInstanceName ()
2353{
Caroline Ticedaccaa92010-09-20 20:44:432354 StreamString sstr;
Caroline Tice1559a462010-09-27 00:30:102355 static int instance_count = 1;
2356
Caroline Ticedaccaa92010-09-20 20:44:432357 sstr.Printf ("target_%d", instance_count);
2358 ++instance_count;
2359
2360 const ConstString ret_val (sstr.GetData());
2361 return ret_val;
2362}
2363
2364//--------------------------------------------------
2365// Target::SettingsController Variable Tables
2366//--------------------------------------------------
Jim Ingham2837b762011-05-04 03:43:182367OptionEnumValueElement
2368TargetInstanceSettings::g_dynamic_value_types[] =
2369{
Greg Clayton5d2fbfe2011-05-30 00:39:482370{ eNoDynamicValues, "no-dynamic-values", "Don't calculate the dynamic type of values"},
2371{ eDynamicCanRunTarget, "run-target", "Calculate the dynamic type of values even if you have to run the target."},
2372{ eDynamicDontRunTarget, "no-run-target", "Calculate the dynamic type of values, but don't run the target."},
Jim Ingham2837b762011-05-04 03:43:182373{ 0, NULL, NULL }
2374};
Caroline Ticedaccaa92010-09-20 20:44:432375
2376SettingEntry
2377Target::SettingsController::global_settings_table[] =
2378{
Greg Claytonbfe5f3b2011-02-18 01:44:252379 // var-name var-type default enum init'd hidden help-text
2380 // ================= ================== =========== ==== ====== ====== =========================================================================
2381 { TSC_DEFAULT_ARCH , eSetVarTypeString , NULL , NULL, false, false, "Default architecture to choose, when there's a choice." },
2382 { NULL , eSetVarTypeNone , NULL , NULL, false, false, NULL }
2383};
2384
Caroline Ticedaccaa92010-09-20 20:44:432385SettingEntry
2386Target::SettingsController::instance_settings_table[] =
2387{
Enrico Granata9128ee2f2011-09-06 19:20:512388 // var-name var-type default enum init'd hidden help-text
2389 // ================= ================== =============== ======================= ====== ====== =========================================================================
2390 { TSC_EXPR_PREFIX , eSetVarTypeString , NULL , NULL, false, false, "Path to a file containing expressions to be prepended to all expressions." },
2391 { TSC_PREFER_DYNAMIC , eSetVarTypeEnum , NULL , g_dynamic_value_types, false, false, "Should printed values be shown as their dynamic value." },
2392 { TSC_SKIP_PROLOGUE , eSetVarTypeBoolean, "true" , NULL, false, false, "Skip function prologues when setting breakpoints by name." },
2393 { TSC_SOURCE_MAP , eSetVarTypeArray , NULL , NULL, false, false, "Source path remappings to use when locating source files from debug information." },
2394 { TSC_MAX_CHILDREN , eSetVarTypeInt , "256" , NULL, true, false, "Maximum number of children to expand in any level of depth." },
2395 { TSC_MAX_STRLENSUMMARY , eSetVarTypeInt , "1024" , NULL, true, false, "Maximum number of characters to show when using %s in summary strings." },
Jim Inghamc6674fd2011-10-28 23:14:112396 { TSC_PLATFORM_AVOID , eSetVarTypeBoolean, "true" , NULL, false, false, "Consult the platform module avoid list when setting non-module specific breakpoints." },
Enrico Granata9128ee2f2011-09-06 19:20:512397 { NULL , eSetVarTypeNone , NULL , NULL, false, false, NULL }
Caroline Ticedaccaa92010-09-20 20:44:432398};