1696bd635SAlexander 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/StreamFile.h"
192bdbfd50SJim Ingham #include "lldb/Interpreter/CommandInterpreter.h"
20b9c1b51eSKate Stone #include "lldb/Symbol/CompileUnit.h"
21b9c1b51eSKate Stone #include "lldb/Symbol/SymbolContext.h"
222bdbfd50SJim Ingham #include "lldb/Target/Process.h"
232bdbfd50SJim Ingham #include "lldb/Target/Queue.h"
242bdbfd50SJim Ingham #include "lldb/Target/StopInfo.h"
25b9c1b51eSKate Stone #include "lldb/Target/SystemRuntime.h"
262bdbfd50SJim Ingham #include "lldb/Target/Target.h"
27b9c1b51eSKate Stone #include "lldb/Target/Thread.h"
28b9c1b51eSKate Stone #include "lldb/Target/ThreadPlan.h"
292bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanPython.h"
30b9c1b51eSKate Stone #include "lldb/Target/ThreadPlanStepInRange.h"
312bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanStepInstruction.h"
322bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanStepOut.h"
332bdbfd50SJim Ingham #include "lldb/Target/ThreadPlanStepRange.h"
34bf9a7730SZachary Turner #include "lldb/Utility/Stream.h"
35*f2a8bccfSPavel Labath #include "lldb/Utility/StructuredData.h"
362bdbfd50SJim Ingham 
372bdbfd50SJim Ingham #include "lldb/API/SBAddress.h"
382bdbfd50SJim Ingham #include "lldb/API/SBDebugger.h"
392bdbfd50SJim Ingham #include "lldb/API/SBEvent.h"
402bdbfd50SJim Ingham #include "lldb/API/SBFrame.h"
412bdbfd50SJim Ingham #include "lldb/API/SBProcess.h"
422bdbfd50SJim Ingham #include "lldb/API/SBThreadPlan.h"
432bdbfd50SJim Ingham #include "lldb/API/SBValue.h"
442bdbfd50SJim Ingham 
452bdbfd50SJim Ingham using namespace lldb;
462bdbfd50SJim Ingham using namespace lldb_private;
472bdbfd50SJim Ingham 
482bdbfd50SJim Ingham //----------------------------------------------------------------------
492bdbfd50SJim Ingham // Constructors
502bdbfd50SJim Ingham //----------------------------------------------------------------------
51b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan() {}
522bdbfd50SJim Ingham 
53b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan(const ThreadPlanSP &lldb_object_sp)
54b9c1b51eSKate Stone     : m_opaque_sp(lldb_object_sp) {}
552bdbfd50SJim Ingham 
56b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan(const SBThreadPlan &rhs)
57b9c1b51eSKate Stone     : m_opaque_sp(rhs.m_opaque_sp) {}
582bdbfd50SJim Ingham 
59b9c1b51eSKate Stone SBThreadPlan::SBThreadPlan(lldb::SBThread &sb_thread, const char *class_name) {
602bdbfd50SJim Ingham   Thread *thread = sb_thread.get();
612bdbfd50SJim Ingham   if (thread)
622bdbfd50SJim Ingham     m_opaque_sp.reset(new ThreadPlanPython(*thread, class_name));
632bdbfd50SJim Ingham }
642bdbfd50SJim Ingham 
652bdbfd50SJim Ingham //----------------------------------------------------------------------
662bdbfd50SJim Ingham // Assignment operator
672bdbfd50SJim Ingham //----------------------------------------------------------------------
682bdbfd50SJim Ingham 
69b9c1b51eSKate Stone const lldb::SBThreadPlan &SBThreadPlan::operator=(const SBThreadPlan &rhs) {
702bdbfd50SJim Ingham   if (this != &rhs)
712bdbfd50SJim Ingham     m_opaque_sp = rhs.m_opaque_sp;
722bdbfd50SJim Ingham   return *this;
732bdbfd50SJim Ingham }
742bdbfd50SJim Ingham //----------------------------------------------------------------------
752bdbfd50SJim Ingham // Destructor
762bdbfd50SJim Ingham //----------------------------------------------------------------------
77b9c1b51eSKate Stone SBThreadPlan::~SBThreadPlan() {}
782bdbfd50SJim Ingham 
79b9c1b51eSKate Stone lldb_private::ThreadPlan *SBThreadPlan::get() { return m_opaque_sp.get(); }
802bdbfd50SJim Ingham 
81b9c1b51eSKate Stone bool SBThreadPlan::IsValid() const { return m_opaque_sp.get() != NULL; }
822bdbfd50SJim Ingham 
83b9c1b51eSKate Stone void SBThreadPlan::Clear() { m_opaque_sp.reset(); }
842bdbfd50SJim Ingham 
85b9c1b51eSKate Stone lldb::StopReason SBThreadPlan::GetStopReason() { return eStopReasonNone; }
862bdbfd50SJim Ingham 
87b9c1b51eSKate Stone size_t SBThreadPlan::GetStopReasonDataCount() { return 0; }
882bdbfd50SJim Ingham 
89b9c1b51eSKate Stone uint64_t SBThreadPlan::GetStopReasonDataAtIndex(uint32_t idx) { return 0; }
902bdbfd50SJim Ingham 
91b9c1b51eSKate Stone SBThread SBThreadPlan::GetThread() const {
92b9c1b51eSKate Stone   if (m_opaque_sp) {
932bdbfd50SJim Ingham     return SBThread(m_opaque_sp->GetThread().shared_from_this());
94b9c1b51eSKate Stone   } else
952bdbfd50SJim Ingham     return SBThread();
962bdbfd50SJim Ingham }
972bdbfd50SJim Ingham 
98b9c1b51eSKate Stone bool SBThreadPlan::GetDescription(lldb::SBStream &description) const {
99b9c1b51eSKate Stone   if (m_opaque_sp) {
1002bdbfd50SJim Ingham     m_opaque_sp->GetDescription(description.get(), eDescriptionLevelFull);
101b9c1b51eSKate Stone   } else {
1022bdbfd50SJim Ingham     description.Printf("Empty SBThreadPlan");
1032bdbfd50SJim Ingham   }
1042bdbfd50SJim Ingham   return true;
1052bdbfd50SJim Ingham }
1062bdbfd50SJim Ingham 
107b9c1b51eSKate Stone void SBThreadPlan::SetThreadPlan(const ThreadPlanSP &lldb_object_sp) {
1082bdbfd50SJim Ingham   m_opaque_sp = lldb_object_sp;
1092bdbfd50SJim Ingham }
1102bdbfd50SJim Ingham 
111b9c1b51eSKate Stone void SBThreadPlan::SetPlanComplete(bool success) {
1122bdbfd50SJim Ingham   if (m_opaque_sp)
1132bdbfd50SJim Ingham     m_opaque_sp->SetPlanComplete(success);
1142bdbfd50SJim Ingham }
1152bdbfd50SJim Ingham 
116b9c1b51eSKate Stone bool SBThreadPlan::IsPlanComplete() {
1172bdbfd50SJim Ingham   if (m_opaque_sp)
1182bdbfd50SJim Ingham     return m_opaque_sp->IsPlanComplete();
1192bdbfd50SJim Ingham   else
1202bdbfd50SJim Ingham     return true;
1212bdbfd50SJim Ingham }
1222bdbfd50SJim Ingham 
123b9c1b51eSKate Stone bool SBThreadPlan::IsPlanStale() {
124c915a7d2SJim Ingham   if (m_opaque_sp)
125c915a7d2SJim Ingham     return m_opaque_sp->IsPlanStale();
126c915a7d2SJim Ingham   else
127c915a7d2SJim Ingham     return true;
128c915a7d2SJim Ingham }
129c915a7d2SJim Ingham 
130b9c1b51eSKate Stone bool SBThreadPlan::IsValid() {
1312bdbfd50SJim Ingham   if (m_opaque_sp)
1322bdbfd50SJim Ingham     return m_opaque_sp->ValidatePlan(nullptr);
1332bdbfd50SJim Ingham   else
1342bdbfd50SJim Ingham     return false;
1352bdbfd50SJim Ingham }
1362bdbfd50SJim Ingham 
137b9c1b51eSKate Stone // This section allows an SBThreadPlan to push another of the common types of
138b9c1b51eSKate Stone // plans...
1392bdbfd50SJim Ingham //
140b9c1b51eSKate Stone // FIXME, you should only be able to queue thread plans from inside the methods
141b9c1b51eSKate Stone // of a
1422bdbfd50SJim Ingham // Scripted Thread Plan.  Need a way to enforce that.
1432bdbfd50SJim Ingham 
1442bdbfd50SJim Ingham SBThreadPlan
1452bdbfd50SJim Ingham SBThreadPlan::QueueThreadPlanForStepOverRange(SBAddress &sb_start_address,
146b9c1b51eSKate Stone                                               lldb::addr_t size) {
147b9c1b51eSKate Stone   if (m_opaque_sp) {
1482bdbfd50SJim Ingham     Address *start_address = sb_start_address.get();
149b9c1b51eSKate Stone     if (!start_address) {
1502bdbfd50SJim Ingham       return SBThreadPlan();
1512bdbfd50SJim Ingham     }
1522bdbfd50SJim Ingham 
1532bdbfd50SJim Ingham     AddressRange range(*start_address, size);
1542bdbfd50SJim Ingham     SymbolContext sc;
1552bdbfd50SJim Ingham     start_address->CalculateSymbolContext(&sc);
156b9c1b51eSKate Stone     return SBThreadPlan(
157b9c1b51eSKate Stone         m_opaque_sp->GetThread().QueueThreadPlanForStepOverRange(
158b9c1b51eSKate Stone             false, range, sc, eAllThreads));
159b9c1b51eSKate Stone   } else {
1602bdbfd50SJim Ingham     return SBThreadPlan();
1612bdbfd50SJim Ingham   }
1622bdbfd50SJim Ingham }
1632bdbfd50SJim Ingham 
1642bdbfd50SJim Ingham SBThreadPlan
1652bdbfd50SJim Ingham SBThreadPlan::QueueThreadPlanForStepInRange(SBAddress &sb_start_address,
166b9c1b51eSKate Stone                                             lldb::addr_t size) {
167b9c1b51eSKate Stone   if (m_opaque_sp) {
1682bdbfd50SJim Ingham     Address *start_address = sb_start_address.get();
169b9c1b51eSKate Stone     if (!start_address) {
1702bdbfd50SJim Ingham       return SBThreadPlan();
1712bdbfd50SJim Ingham     }
1722bdbfd50SJim Ingham 
1732bdbfd50SJim Ingham     AddressRange range(*start_address, size);
1742bdbfd50SJim Ingham     SymbolContext sc;
1752bdbfd50SJim Ingham     start_address->CalculateSymbolContext(&sc);
176b9c1b51eSKate Stone     return SBThreadPlan(m_opaque_sp->GetThread().QueueThreadPlanForStepInRange(
177b9c1b51eSKate Stone         false, range, sc, NULL, eAllThreads));
178b9c1b51eSKate Stone   } else {
1792bdbfd50SJim Ingham     return SBThreadPlan();
1802bdbfd50SJim Ingham   }
1812bdbfd50SJim Ingham }
1822bdbfd50SJim Ingham 
1832bdbfd50SJim Ingham SBThreadPlan
184b9c1b51eSKate Stone SBThreadPlan::QueueThreadPlanForStepOut(uint32_t frame_idx_to_step_to,
185b9c1b51eSKate Stone                                         bool first_insn) {
186b9c1b51eSKate Stone   if (m_opaque_sp) {
1872bdbfd50SJim Ingham     SymbolContext sc;
188b9c1b51eSKate Stone     sc = m_opaque_sp->GetThread().GetStackFrameAtIndex(0)->GetSymbolContext(
189b9c1b51eSKate Stone         lldb::eSymbolContextEverything);
190b9c1b51eSKate Stone     return SBThreadPlan(m_opaque_sp->GetThread().QueueThreadPlanForStepOut(
191b9c1b51eSKate Stone         false, &sc, first_insn, false, eVoteYes, eVoteNoOpinion,
1922bdbfd50SJim Ingham         frame_idx_to_step_to));
193b9c1b51eSKate Stone   } else {
1942bdbfd50SJim Ingham     return SBThreadPlan();
1952bdbfd50SJim Ingham   }
1962bdbfd50SJim Ingham }
1972bdbfd50SJim Ingham 
1982bdbfd50SJim Ingham SBThreadPlan
199b9c1b51eSKate Stone SBThreadPlan::QueueThreadPlanForRunToAddress(SBAddress sb_address) {
200b9c1b51eSKate Stone   if (m_opaque_sp) {
2012bdbfd50SJim Ingham     Address *address = sb_address.get();
2022bdbfd50SJim Ingham     if (!address)
2032bdbfd50SJim Ingham       return SBThreadPlan();
2042bdbfd50SJim Ingham 
205b9c1b51eSKate Stone     return SBThreadPlan(m_opaque_sp->GetThread().QueueThreadPlanForRunToAddress(
206b9c1b51eSKate Stone         false, *address, false));
207b9c1b51eSKate Stone   } else {
2082bdbfd50SJim Ingham     return SBThreadPlan();
2092bdbfd50SJim Ingham   }
2102bdbfd50SJim Ingham }
211