blob: 376a1f3288fd13bb233dce6a2b62a21dff3fce64 [file] [log] [blame]
Chris Lattner24943d22010-06-08 16:52:24 +00001//===-- ThreadPlan.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
Daniel Malead891f9b2012-12-05 00:20:57 +000010#include "lldb/lldb-python.h"
11
Chris Lattner24943d22010-06-08 16:52:24 +000012#include "lldb/Target/ThreadPlan.h"
13
14// C Includes
15// C++ Includes
16// Other libraries and framework includes
17// Project includes
Jim Ingham745ac7a2010-11-11 19:26:09 +000018#include "lldb/Core/Debugger.h"
Chris Lattner24943d22010-06-08 16:52:24 +000019#include "lldb/Core/Log.h"
20#include "lldb/Core/State.h"
Greg Clayton5205f0b2010-09-03 17:10:42 +000021#include "lldb/Target/RegisterContext.h"
22#include "lldb/Target/Thread.h"
Jim Ingham745ac7a2010-11-11 19:26:09 +000023#include "lldb/Target/Process.h"
24#include "lldb/Target/Target.h"
Chris Lattner24943d22010-06-08 16:52:24 +000025
26using namespace lldb;
27using namespace lldb_private;
28
29//----------------------------------------------------------------------
30// ThreadPlan constructor
31//----------------------------------------------------------------------
Jim Ingham5a47e8b2010-06-19 04:45:32 +000032ThreadPlan::ThreadPlan(ThreadPlanKind kind, const char *name, Thread &thread, Vote stop_vote, Vote run_vote) :
Chris Lattner24943d22010-06-08 16:52:24 +000033 m_thread (thread),
Chris Lattner24943d22010-06-08 16:52:24 +000034 m_stop_vote (stop_vote),
35 m_run_vote (run_vote),
Benjamin Kramer36a08102010-07-16 12:32:33 +000036 m_kind (kind),
37 m_name (name),
38 m_plan_complete_mutex (Mutex::eMutexTypeRecursive),
39 m_plan_complete (false),
40 m_plan_private (false),
Jim Ingham88e3de22012-05-03 21:19:36 +000041 m_okay_to_discard (true),
Jim Ingham707b7a82012-05-01 18:38:37 +000042 m_is_master_plan (false),
43 m_plan_succeeded(true)
Chris Lattner24943d22010-06-08 16:52:24 +000044{
45 SetID (GetNextID());
46}
47
48//----------------------------------------------------------------------
49// Destructor
50//----------------------------------------------------------------------
51ThreadPlan::~ThreadPlan()
52{
53}
54
Chris Lattner24943d22010-06-08 16:52:24 +000055bool
56ThreadPlan::IsPlanComplete ()
57{
Greg Claytonbef15832010-07-14 00:18:15 +000058 Mutex::Locker locker(m_plan_complete_mutex);
Chris Lattner24943d22010-06-08 16:52:24 +000059 return m_plan_complete;
60}
61
62void
Jim Ingham707b7a82012-05-01 18:38:37 +000063ThreadPlan::SetPlanComplete (bool success)
Chris Lattner24943d22010-06-08 16:52:24 +000064{
Greg Claytonbef15832010-07-14 00:18:15 +000065 Mutex::Locker locker(m_plan_complete_mutex);
Chris Lattner24943d22010-06-08 16:52:24 +000066 m_plan_complete = true;
Jim Ingham707b7a82012-05-01 18:38:37 +000067 m_plan_succeeded = success;
Chris Lattner24943d22010-06-08 16:52:24 +000068}
69
70bool
71ThreadPlan::MischiefManaged ()
72{
Greg Claytonbef15832010-07-14 00:18:15 +000073 Mutex::Locker locker(m_plan_complete_mutex);
Jim Ingham038fa8e2012-05-10 01:35:39 +000074 // Mark the plan is complete, but don't override the success flag.
Chris Lattner24943d22010-06-08 16:52:24 +000075 m_plan_complete = true;
76 return true;
77}
78
79Vote
80ThreadPlan::ShouldReportStop (Event *event_ptr)
81{
Greg Claytone005f2c2010-11-06 01:53:30 +000082 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
Greg Clayton5205f0b2010-09-03 17:10:42 +000083
Chris Lattner24943d22010-06-08 16:52:24 +000084 if (m_stop_vote == eVoteNoOpinion)
85 {
86 ThreadPlan *prev_plan = GetPreviousPlan ();
87 if (prev_plan)
Greg Clayton5205f0b2010-09-03 17:10:42 +000088 {
89 Vote prev_vote = prev_plan->ShouldReportStop (event_ptr);
90 if (log)
Jim Ingham441e3b92012-03-01 00:50:50 +000091 log->Printf ("ThreadPlan::ShouldReportStop() returning previous thread plan vote: %s",
92 GetVoteAsCString (prev_vote));
Greg Clayton5205f0b2010-09-03 17:10:42 +000093 return prev_vote;
94 }
Chris Lattner24943d22010-06-08 16:52:24 +000095 }
Greg Clayton5205f0b2010-09-03 17:10:42 +000096 if (log)
Greg Claytonf04d6612010-09-03 22:45:01 +000097 log->Printf ("ThreadPlan::ShouldReportStop() returning vote: %s", GetVoteAsCString (m_stop_vote));
Chris Lattner24943d22010-06-08 16:52:24 +000098 return m_stop_vote;
99}
100
101Vote
102ThreadPlan::ShouldReportRun (Event *event_ptr)
103{
104 if (m_run_vote == eVoteNoOpinion)
105 {
106 ThreadPlan *prev_plan = GetPreviousPlan ();
107 if (prev_plan)
108 return prev_plan->ShouldReportRun (event_ptr);
109 }
110 return m_run_vote;
111}
112
113bool
114ThreadPlan::StopOthers ()
115{
116 ThreadPlan *prev_plan;
117 prev_plan = GetPreviousPlan ();
118 if (prev_plan == NULL)
119 return false;
120 else
121 return prev_plan->StopOthers();
122}
123
Jim Ingham360f53f2010-11-30 02:22:11 +0000124void
125ThreadPlan::SetStopOthers (bool new_value)
126{
127 // SetStopOthers doesn't work up the hierarchy. You have to set the
128 // explicit ThreadPlan you want to affect.
129}
130
Chris Lattner24943d22010-06-08 16:52:24 +0000131bool
132ThreadPlan::WillResume (StateType resume_state, bool current_plan)
133{
134 if (current_plan)
135 {
Greg Claytone005f2c2010-11-06 01:53:30 +0000136 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
Chris Lattner24943d22010-06-08 16:52:24 +0000137
138 if (log)
Greg Clayton5205f0b2010-09-03 17:10:42 +0000139 {
Greg Clayton08d7d3a2011-01-06 22:15:06 +0000140 RegisterContext *reg_ctx = m_thread.GetRegisterContext().get();
Greg Clayton5205f0b2010-09-03 17:10:42 +0000141 addr_t pc = reg_ctx->GetPC();
142 addr_t sp = reg_ctx->GetSP();
143 addr_t fp = reg_ctx->GetFP();
Daniel Malea5f35a4b2012-11-29 21:49:15 +0000144 log->Printf("%s Thread #%u: tid = 0x%4.4" PRIx64 ", pc = 0x%8.8" PRIx64 ", sp = 0x%8.8" PRIx64 ", fp = 0x%8.8" PRIx64 ", "
Jim Ingham441e3b92012-03-01 00:50:50 +0000145 "plan = '%s', state = %s, stop others = %d",
Greg Claytonf04d6612010-09-03 22:45:01 +0000146 __FUNCTION__,
Greg Clayton5205f0b2010-09-03 17:10:42 +0000147 m_thread.GetIndexID(),
148 m_thread.GetID(),
149 (uint64_t)pc,
150 (uint64_t)sp,
151 (uint64_t)fp,
152 m_name.c_str(),
153 StateAsCString(resume_state),
154 StopOthers());
155 }
Chris Lattner24943d22010-06-08 16:52:24 +0000156 }
157 return true;
158}
159
160lldb::user_id_t
161ThreadPlan::GetNextID()
162{
163 static uint32_t g_nextPlanID = 0;
164 return ++g_nextPlanID;
165}
166
167void
168ThreadPlan::DidPush()
169{
170}
171
172void
173ThreadPlan::WillPop()
174{
175}
176
Chris Lattner24943d22010-06-08 16:52:24 +0000177bool
178ThreadPlan::OkayToDiscard()
179{
180 if (!IsMasterPlan())
181 return true;
182 else
183 return m_okay_to_discard;
184}
185
Jim Ingham745ac7a2010-11-11 19:26:09 +0000186lldb::StateType
187ThreadPlan::RunState ()
188{
189 if (m_tracer_sp && m_tracer_sp->TracingEnabled() && m_tracer_sp->SingleStepEnabled())
190 return eStateStepping;
191 else
192 return GetPlanRunState();
193}