1*696bd635SAlexander Shaposhnikov //===-- SBThreadPlan.cpp ----------------------------------------*- C++ -*-===//
22bdbfd50SJim Ingham //
32bdbfd50SJim Ingham //                     The LLVM Compiler Infrastructure
42bdbfd50SJim Ingham //
52bdbfd50SJim Ingham // This file is distributed under the University of Illinois Open Source
62bdbfd50SJim Ingham // License. See LICENSE.TXT for details.
72bdbfd50SJim Ingham //
82bdbfd50SJim Ingham //===----------------------------------------------------------------------===//
92bdbfd50SJim Ingham 
102bdbfd50SJim Ingham #include "lldb/API/SBThread.h"
112bdbfd50SJim Ingham 
122bdbfd50SJim Ingham #include "lldb/API/SBFileSpec.h"
132bdbfd50SJim Ingham #include "lldb/API/SBStream.h"
14b9c1b51eSKate Stone #include "lldb/API/SBSymbolContext.h"
152bdbfd50SJim Ingham #include "lldb/Breakpoint/BreakpointLocation.h"
162bdbfd50SJim Ingham #include "lldb/Core/Debugger.h"
172bdbfd50SJim Ingham #include "lldb/Core/State.h"
182bdbfd50SJim Ingham #include "lldb/Core/Stream.h"
192bdbfd50SJim Ingham #include "lldb/Core/StreamFile.h"
202bdbfd50SJim Ingham #include "lldb/Core/StructuredData.h"
212bdbfd50SJim Ingham #include "lldb/Interpreter/CommandInterpreter.h"
22b9c1b51eSKate Stone #include "lldb/Symbol/CompileUnit.h"
23b9c1b51eSKate Stone #include "lldb/Symbol/SymbolContext.h"
242bdbfd50SJim Ingham #include "lldb/Target/Process.h"
252bdbfd50SJim Ingham #include "lldb/Target/Queue.h"
262bdbfd50SJim Ingham #include "lldb/Target/StopInfo.h"
27b9c1b51eSKate Stone #include "lldb/Target/SystemRuntime.h"
282bdbfd50SJim Ingham #include "lldb/Target/Target.h"
29b9c1b51eSKate Stone #include "lldb/Target/Thread.h"
30b9c1b51eSKate Stone #include "lldb/Target/ThreadPlan.h"
312bdbfd50SJim Ingham #include "lldb/Target/ThreadPlan.h"
322bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanPython.h"
33b9c1b51eSKate Stone #include "lldb/Target/ThreadPlanStepInRange.h"
342bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanStepInstruction.h"
352bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanStepOut.h"
362bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanStepRange.h"
372bdbfd50SJim Ingham 
382bdbfd50SJim Ingham #include "lldb/API/SBAddress.h"
392bdbfd50SJim Ingham #include "lldb/API/SBDebugger.h"
402bdbfd50SJim Ingham #include "lldb/API/SBEvent.h"
412bdbfd50SJim Ingham #include "lldb/API/SBFrame.h"
422bdbfd50SJim Ingham #include "lldb/API/SBProcess.h"
432bdbfd50SJim Ingham #include "lldb/API/SBThreadPlan.h"
442bdbfd50SJim Ingham #include "lldb/API/SBValue.h"
452bdbfd50SJim Ingham 
462bdbfd50SJim Ingham using namespace lldb;
472bdbfd50SJim Ingham using namespace lldb_private;
482bdbfd50SJim Ingham 
492bdbfd50SJim Ingham //----------------------------------------------------------------------
502bdbfd50SJim Ingham // Constructors
512bdbfd50SJim Ingham //----------------------------------------------------------------------
52b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan() {}
532bdbfd50SJim Ingham 
54b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan(const ThreadPlanSP &lldb_object_sp)
55b9c1b51eSKate Stone     : m_opaque_sp(lldb_object_sp) {}
562bdbfd50SJim Ingham 
57b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan(const SBThreadPlan &rhs)
58b9c1b51eSKate Stone     : m_opaque_sp(rhs.m_opaque_sp) {}
592bdbfd50SJim Ingham 
60b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan(lldb::SBThread &sb_thread, const char *class_name) {
612bdbfd50SJim Ingham   Thread *thread = sb_thread.get();
622bdbfd50SJim Ingham   if (thread)
632bdbfd50SJim Ingham     m_opaque_sp.reset(new ThreadPlanPython(*thread, class_name));
642bdbfd50SJim Ingham }
652bdbfd50SJim Ingham 
662bdbfd50SJim Ingham //----------------------------------------------------------------------
672bdbfd50SJim Ingham // Assignment operator
682bdbfd50SJim Ingham //----------------------------------------------------------------------
692bdbfd50SJim Ingham 
70b9c1b51eSKate Stone const lldb::SBThreadPlan &SBThreadPlan::operator=(const SBThreadPlan &rhs) {
712bdbfd50SJim Ingham   if (this != &rhs)
722bdbfd50SJim Ingham     m_opaque_sp = rhs.m_opaque_sp;
732bdbfd50SJim Ingham   return *this;
742bdbfd50SJim Ingham }
752bdbfd50SJim Ingham //----------------------------------------------------------------------
762bdbfd50SJim Ingham // Destructor
772bdbfd50SJim Ingham //----------------------------------------------------------------------
78b9c1b51eSKate Stone SBThreadPlan::~SBThreadPlan() {}
792bdbfd50SJim Ingham 
80b9c1b51eSKate Stone lldb_private::ThreadPlan *SBThreadPlan::get() { return m_opaque_sp.get(); }
812bdbfd50SJim Ingham 
82b9c1b51eSKate Stone bool SBThreadPlan::IsValid() const { return m_opaque_sp.get() != NULL; }
832bdbfd50SJim Ingham 
84b9c1b51eSKate Stone void SBThreadPlan::Clear() { m_opaque_sp.reset(); }
852bdbfd50SJim Ingham 
86b9c1b51eSKate Stone lldb::StopReason SBThreadPlan::GetStopReason() { return eStopReasonNone; }
872bdbfd50SJim Ingham 
88b9c1b51eSKate Stone size_t SBThreadPlan::GetStopReasonDataCount() { return 0; }
892bdbfd50SJim Ingham 
90b9c1b51eSKate Stone uint64_t SBThreadPlan::GetStopReasonDataAtIndex(uint32_t idx) { return 0; }
912bdbfd50SJim Ingham 
92b9c1b51eSKate Stone SBThread SBThreadPlan::GetThread() const {
93b9c1b51eSKate Stone   if (m_opaque_sp) {
942bdbfd50SJim Ingham     return SBThread(m_opaque_sp->GetThread().shared_from_this());
95b9c1b51eSKate Stone   } else
962bdbfd50SJim Ingham     return SBThread();
972bdbfd50SJim Ingham }
982bdbfd50SJim Ingham 
99b9c1b51eSKate Stone bool SBThreadPlan::GetDescription(lldb::SBStream &description) const {
100b9c1b51eSKate Stone   if (m_opaque_sp) {
1012bdbfd50SJim Ingham     m_opaque_sp->GetDescription(description.get(), eDescriptionLevelFull);
102b9c1b51eSKate Stone   } else {
1032bdbfd50SJim Ingham     description.Printf("Empty SBThreadPlan");
1042bdbfd50SJim Ingham   }
1052bdbfd50SJim Ingham   return true;
1062bdbfd50SJim Ingham }
1072bdbfd50SJim Ingham 
108b9c1b51eSKate Stone void SBThreadPlan::SetThreadPlan(const ThreadPlanSP &lldb_object_sp) {
1092bdbfd50SJim Ingham   m_opaque_sp = lldb_object_sp;
1102bdbfd50SJim Ingham }
1112bdbfd50SJim Ingham 
112b9c1b51eSKate Stone void SBThreadPlan::SetPlanComplete(bool success) {
1132bdbfd50SJim Ingham   if (m_opaque_sp)
1142bdbfd50SJim Ingham     m_opaque_sp->SetPlanComplete(success);
1152bdbfd50SJim Ingham }
1162bdbfd50SJim Ingham 
117b9c1b51eSKate Stone bool SBThreadPlan::IsPlanComplete() {
1182bdbfd50SJim Ingham   if (m_opaque_sp)
1192bdbfd50SJim Ingham     return m_opaque_sp->IsPlanComplete();
1202bdbfd50SJim Ingham   else
1212bdbfd50SJim Ingham     return true;
1222bdbfd50SJim Ingham }
1232bdbfd50SJim Ingham 
124b9c1b51eSKate Stone bool SBThreadPlan::IsPlanStale() {
125c915a7d2SJim Ingham   if (m_opaque_sp)
126c915a7d2SJim Ingham     return m_opaque_sp->IsPlanStale();
127c915a7d2SJim Ingham   else
128c915a7d2SJim Ingham     return true;
129c915a7d2SJim Ingham }
130c915a7d2SJim Ingham 
131b9c1b51eSKate Stone bool SBThreadPlan::IsValid() {
1322bdbfd50SJim Ingham   if (m_opaque_sp)
1332bdbfd50SJim Ingham     return m_opaque_sp->ValidatePlan(nullptr);
1342bdbfd50SJim Ingham   else
1352bdbfd50SJim Ingham     return false;
1362bdbfd50SJim Ingham }
1372bdbfd50SJim Ingham 
138b9c1b51eSKate Stone // This section allows an SBThreadPlan to push another of the common types of
139b9c1b51eSKate Stone // plans...
1402bdbfd50SJim Ingham //
141b9c1b51eSKate Stone // FIXME, you should only be able to queue thread plans from inside the methods
142b9c1b51eSKate Stone // of a
1432bdbfd50SJim Ingham // Scripted Thread Plan.  Need a way to enforce that.
1442bdbfd50SJim Ingham 
1452bdbfd50SJim Ingham SBThreadPlan
1462bdbfd50SJim Ingham SBThreadPlan::QueueThreadPlanForStepOverRange(SBAddress &sb_start_address,
147b9c1b51eSKate Stone                                               lldb::addr_t size) {
148b9c1b51eSKate Stone   if (m_opaque_sp) {
1492bdbfd50SJim Ingham     Address *start_address = sb_start_address.get();
150b9c1b51eSKate Stone     if (!start_address) {
1512bdbfd50SJim Ingham       return SBThreadPlan();
1522bdbfd50SJim Ingham     }
1532bdbfd50SJim Ingham 
1542bdbfd50SJim Ingham     AddressRange range(*start_address, size);
1552bdbfd50SJim Ingham     SymbolContext sc;
1562bdbfd50SJim Ingham     start_address->CalculateSymbolContext(&sc);
157b9c1b51eSKate Stone     return SBThreadPlan(
158b9c1b51eSKate Stone         m_opaque_sp->GetThread().QueueThreadPlanForStepOverRange(
159b9c1b51eSKate Stone             false, range, sc, eAllThreads));
160b9c1b51eSKate Stone   } else {
1612bdbfd50SJim Ingham     return SBThreadPlan();
1622bdbfd50SJim Ingham   }
1632bdbfd50SJim Ingham }
1642bdbfd50SJim Ingham 
1652bdbfd50SJim Ingham SBThreadPlan
1662bdbfd50SJim Ingham SBThreadPlan::QueueThreadPlanForStepInRange(SBAddress &sb_start_address,
167b9c1b51eSKate Stone                                             lldb::addr_t size) {
168b9c1b51eSKate Stone   if (m_opaque_sp) {
1692bdbfd50SJim Ingham     Address *start_address = sb_start_address.get();
170b9c1b51eSKate Stone     if (!start_address) {
1712bdbfd50SJim Ingham       return SBThreadPlan();
1722bdbfd50SJim Ingham     }
1732bdbfd50SJim Ingham 
1742bdbfd50SJim Ingham     AddressRange range(*start_address, size);
1752bdbfd50SJim Ingham     SymbolContext sc;
1762bdbfd50SJim Ingham     start_address->CalculateSymbolContext(&sc);
177b9c1b51eSKate Stone     return SBThreadPlan(m_opaque_sp->GetThread().QueueThreadPlanForStepInRange(
178b9c1b51eSKate Stone         false, range, sc, NULL, eAllThreads));
179b9c1b51eSKate Stone   } else {
1802bdbfd50SJim Ingham     return SBThreadPlan();
1812bdbfd50SJim Ingham   }
1822bdbfd50SJim Ingham }
1832bdbfd50SJim Ingham 
1842bdbfd50SJim Ingham SBThreadPlan
185b9c1b51eSKate Stone SBThreadPlan::QueueThreadPlanForStepOut(uint32_t frame_idx_to_step_to,
186b9c1b51eSKate Stone                                         bool first_insn) {
187b9c1b51eSKate Stone   if (m_opaque_sp) {
1882bdbfd50SJim Ingham     SymbolContext sc;
189b9c1b51eSKate Stone     sc = m_opaque_sp->GetThread().GetStackFrameAtIndex(0)->GetSymbolContext(
190b9c1b51eSKate Stone         lldb::eSymbolContextEverything);
191b9c1b51eSKate Stone     return SBThreadPlan(m_opaque_sp->GetThread().QueueThreadPlanForStepOut(
192b9c1b51eSKate Stone         false, &sc, first_insn, false, eVoteYes, eVoteNoOpinion,
1932bdbfd50SJim Ingham         frame_idx_to_step_to));
194b9c1b51eSKate Stone   } else {
1952bdbfd50SJim Ingham     return SBThreadPlan();
1962bdbfd50SJim Ingham   }
1972bdbfd50SJim Ingham }
1982bdbfd50SJim Ingham 
1992bdbfd50SJim Ingham SBThreadPlan
200b9c1b51eSKate Stone SBThreadPlan::QueueThreadPlanForRunToAddress(SBAddress sb_address) {
201b9c1b51eSKate Stone   if (m_opaque_sp) {
2022bdbfd50SJim Ingham     Address *address = sb_address.get();
2032bdbfd50SJim Ingham     if (!address)
2042bdbfd50SJim Ingham       return SBThreadPlan();
2052bdbfd50SJim Ingham 
206b9c1b51eSKate Stone     return SBThreadPlan(m_opaque_sp->GetThread().QueueThreadPlanForRunToAddress(
207b9c1b51eSKate Stone         false, *address, false));
208b9c1b51eSKate Stone   } else {
2092bdbfd50SJim Ingham     return SBThreadPlan();
2102bdbfd50SJim Ingham   }
2112bdbfd50SJim Ingham }
212