130fdc8d8SChris Lattner //===-- ThreadPlan.cpp ------------------------------------------*- C++ -*-===//
230fdc8d8SChris Lattner //
330fdc8d8SChris Lattner //                     The LLVM Compiler Infrastructure
430fdc8d8SChris Lattner //
530fdc8d8SChris Lattner // This file is distributed under the University of Illinois Open Source
630fdc8d8SChris Lattner // License. See LICENSE.TXT for details.
730fdc8d8SChris Lattner //
830fdc8d8SChris Lattner //===----------------------------------------------------------------------===//
930fdc8d8SChris Lattner 
1093a64300SDaniel Malea #include "lldb/lldb-python.h"
1193a64300SDaniel Malea 
1230fdc8d8SChris Lattner #include "lldb/Target/ThreadPlan.h"
1330fdc8d8SChris Lattner 
1430fdc8d8SChris Lattner // C Includes
1530fdc8d8SChris Lattner // C++ Includes
1630fdc8d8SChris Lattner // Other libraries and framework includes
1730fdc8d8SChris Lattner // Project includes
1806e827ccSJim Ingham #include "lldb/Core/Debugger.h"
1930fdc8d8SChris Lattner #include "lldb/Core/Log.h"
2030fdc8d8SChris Lattner #include "lldb/Core/State.h"
212cad65a5SGreg Clayton #include "lldb/Target/RegisterContext.h"
222cad65a5SGreg Clayton #include "lldb/Target/Thread.h"
2306e827ccSJim Ingham #include "lldb/Target/Process.h"
2406e827ccSJim Ingham #include "lldb/Target/Target.h"
2530fdc8d8SChris Lattner 
2630fdc8d8SChris Lattner using namespace lldb;
2730fdc8d8SChris Lattner using namespace lldb_private;
2830fdc8d8SChris Lattner 
2930fdc8d8SChris Lattner //----------------------------------------------------------------------
3030fdc8d8SChris Lattner // ThreadPlan constructor
3130fdc8d8SChris Lattner //----------------------------------------------------------------------
32b01e742aSJim Ingham ThreadPlan::ThreadPlan(ThreadPlanKind kind, const char *name, Thread &thread, Vote stop_vote, Vote run_vote) :
3330fdc8d8SChris Lattner     m_thread (thread),
3430fdc8d8SChris Lattner     m_stop_vote (stop_vote),
3530fdc8d8SChris Lattner     m_run_vote (run_vote),
361ee0d4f7SBenjamin Kramer     m_kind (kind),
371ee0d4f7SBenjamin Kramer     m_name (name),
381ee0d4f7SBenjamin Kramer     m_plan_complete_mutex (Mutex::eMutexTypeRecursive),
39221d51cfSJim Ingham     m_cached_plan_explains_stop (eLazyBoolCalculate),
401ee0d4f7SBenjamin Kramer     m_plan_complete (false),
411ee0d4f7SBenjamin Kramer     m_plan_private (false),
4264e7ead1SJim Ingham     m_okay_to_discard (true),
43fbbfe6ecSJim Ingham     m_is_master_plan (false),
44fbbfe6ecSJim Ingham     m_plan_succeeded(true)
4530fdc8d8SChris Lattner {
4630fdc8d8SChris Lattner     SetID (GetNextID());
4730fdc8d8SChris Lattner }
4830fdc8d8SChris Lattner 
4930fdc8d8SChris Lattner //----------------------------------------------------------------------
5030fdc8d8SChris Lattner // Destructor
5130fdc8d8SChris Lattner //----------------------------------------------------------------------
5230fdc8d8SChris Lattner ThreadPlan::~ThreadPlan()
5330fdc8d8SChris Lattner {
5430fdc8d8SChris Lattner }
5530fdc8d8SChris Lattner 
5630fdc8d8SChris Lattner bool
57221d51cfSJim Ingham ThreadPlan::PlanExplainsStop (Event *event_ptr)
58221d51cfSJim Ingham {
59221d51cfSJim Ingham     if (m_cached_plan_explains_stop == eLazyBoolCalculate)
60221d51cfSJim Ingham     {
61221d51cfSJim Ingham         bool actual_value = DoPlanExplainsStop(event_ptr);
62221d51cfSJim Ingham         m_cached_plan_explains_stop = actual_value ? eLazyBoolYes : eLazyBoolNo;
63221d51cfSJim Ingham         return actual_value;
64221d51cfSJim Ingham     }
65221d51cfSJim Ingham     else
66221d51cfSJim Ingham     {
67221d51cfSJim Ingham         return m_cached_plan_explains_stop == eLazyBoolYes;
68221d51cfSJim Ingham     }
69221d51cfSJim Ingham }
70221d51cfSJim Ingham 
71221d51cfSJim Ingham bool
7230fdc8d8SChris Lattner ThreadPlan::IsPlanComplete ()
7330fdc8d8SChris Lattner {
74b132097bSGreg Clayton     Mutex::Locker locker(m_plan_complete_mutex);
7530fdc8d8SChris Lattner     return m_plan_complete;
7630fdc8d8SChris Lattner }
7730fdc8d8SChris Lattner 
7830fdc8d8SChris Lattner void
79fbbfe6ecSJim Ingham ThreadPlan::SetPlanComplete (bool success)
8030fdc8d8SChris Lattner {
81b132097bSGreg Clayton     Mutex::Locker locker(m_plan_complete_mutex);
8230fdc8d8SChris Lattner     m_plan_complete = true;
83fbbfe6ecSJim Ingham     m_plan_succeeded = success;
8430fdc8d8SChris Lattner }
8530fdc8d8SChris Lattner 
8630fdc8d8SChris Lattner bool
8730fdc8d8SChris Lattner ThreadPlan::MischiefManaged ()
8830fdc8d8SChris Lattner {
89b132097bSGreg Clayton     Mutex::Locker locker(m_plan_complete_mutex);
9018de2fdcSJim Ingham     // Mark the plan is complete, but don't override the success flag.
9130fdc8d8SChris Lattner     m_plan_complete = true;
9230fdc8d8SChris Lattner     return true;
9330fdc8d8SChris Lattner }
9430fdc8d8SChris Lattner 
9530fdc8d8SChris Lattner Vote
9630fdc8d8SChris Lattner ThreadPlan::ShouldReportStop (Event *event_ptr)
9730fdc8d8SChris Lattner {
985160ce5cSGreg Clayton     Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
992cad65a5SGreg Clayton 
10030fdc8d8SChris Lattner     if (m_stop_vote == eVoteNoOpinion)
10130fdc8d8SChris Lattner     {
10230fdc8d8SChris Lattner         ThreadPlan *prev_plan = GetPreviousPlan ();
10330fdc8d8SChris Lattner         if (prev_plan)
1042cad65a5SGreg Clayton         {
1052cad65a5SGreg Clayton             Vote prev_vote = prev_plan->ShouldReportStop (event_ptr);
1062cad65a5SGreg Clayton             if (log)
107b5c0d1ccSJim Ingham                 log->Printf ("ThreadPlan::ShouldReportStop() returning previous thread plan vote: %s",
108b5c0d1ccSJim Ingham                              GetVoteAsCString (prev_vote));
1092cad65a5SGreg Clayton             return prev_vote;
11030fdc8d8SChris Lattner         }
1112cad65a5SGreg Clayton     }
1122cad65a5SGreg Clayton     if (log)
1131346f7e0SGreg Clayton         log->Printf ("ThreadPlan::ShouldReportStop() returning vote: %s", GetVoteAsCString (m_stop_vote));
11430fdc8d8SChris Lattner     return m_stop_vote;
11530fdc8d8SChris Lattner }
11630fdc8d8SChris Lattner 
11730fdc8d8SChris Lattner Vote
11830fdc8d8SChris Lattner ThreadPlan::ShouldReportRun (Event *event_ptr)
11930fdc8d8SChris Lattner {
12030fdc8d8SChris Lattner     if (m_run_vote == eVoteNoOpinion)
12130fdc8d8SChris Lattner     {
12230fdc8d8SChris Lattner         ThreadPlan *prev_plan = GetPreviousPlan ();
12330fdc8d8SChris Lattner         if (prev_plan)
12430fdc8d8SChris Lattner             return prev_plan->ShouldReportRun (event_ptr);
12530fdc8d8SChris Lattner     }
12630fdc8d8SChris Lattner     return m_run_vote;
12730fdc8d8SChris Lattner }
12830fdc8d8SChris Lattner 
12930fdc8d8SChris Lattner bool
13030fdc8d8SChris Lattner ThreadPlan::StopOthers ()
13130fdc8d8SChris Lattner {
13230fdc8d8SChris Lattner     ThreadPlan *prev_plan;
13330fdc8d8SChris Lattner     prev_plan = GetPreviousPlan ();
13430fdc8d8SChris Lattner     if (prev_plan == NULL)
13530fdc8d8SChris Lattner         return false;
13630fdc8d8SChris Lattner     else
13730fdc8d8SChris Lattner         return prev_plan->StopOthers();
13830fdc8d8SChris Lattner }
13930fdc8d8SChris Lattner 
140f48169bbSJim Ingham void
141f48169bbSJim Ingham ThreadPlan::SetStopOthers (bool new_value)
142f48169bbSJim Ingham {
143f48169bbSJim Ingham 	// SetStopOthers doesn't work up the hierarchy.  You have to set the
144f48169bbSJim Ingham     // explicit ThreadPlan you want to affect.
145f48169bbSJim Ingham }
146f48169bbSJim Ingham 
14730fdc8d8SChris Lattner bool
14830fdc8d8SChris Lattner ThreadPlan::WillResume (StateType resume_state, bool current_plan)
14930fdc8d8SChris Lattner {
150221d51cfSJim Ingham     m_cached_plan_explains_stop = eLazyBoolCalculate;
151221d51cfSJim Ingham 
15230fdc8d8SChris Lattner     if (current_plan)
15330fdc8d8SChris Lattner     {
1545160ce5cSGreg Clayton         Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
15530fdc8d8SChris Lattner 
15630fdc8d8SChris Lattner         if (log)
1572cad65a5SGreg Clayton         {
1585ccbd294SGreg Clayton             RegisterContext *reg_ctx = m_thread.GetRegisterContext().get();
1592cad65a5SGreg Clayton             addr_t pc = reg_ctx->GetPC();
1602cad65a5SGreg Clayton             addr_t sp = reg_ctx->GetSP();
1612cad65a5SGreg Clayton             addr_t fp = reg_ctx->GetFP();
162*dee1bc98SJim Ingham             log->Printf("%s Thread #%u (0x%p): tid = 0x%4.4" PRIx64 ", pc = 0x%8.8" PRIx64 ", sp = 0x%8.8" PRIx64 ", fp = 0x%8.8" PRIx64 ", "
163b5c0d1ccSJim Ingham                         "plan = '%s', state = %s, stop others = %d",
1641346f7e0SGreg Clayton                         __FUNCTION__,
1652cad65a5SGreg Clayton                         m_thread.GetIndexID(),
166*dee1bc98SJim Ingham                         &m_thread,
1672cad65a5SGreg Clayton                         m_thread.GetID(),
1682cad65a5SGreg Clayton                         (uint64_t)pc,
1692cad65a5SGreg Clayton                         (uint64_t)sp,
1702cad65a5SGreg Clayton                         (uint64_t)fp,
1712cad65a5SGreg Clayton                         m_name.c_str(),
1722cad65a5SGreg Clayton                         StateAsCString(resume_state),
1732cad65a5SGreg Clayton                         StopOthers());
1742cad65a5SGreg Clayton         }
17530fdc8d8SChris Lattner     }
176221d51cfSJim Ingham     return DoWillResume (resume_state, current_plan);
17730fdc8d8SChris Lattner }
17830fdc8d8SChris Lattner 
17930fdc8d8SChris Lattner lldb::user_id_t
18030fdc8d8SChris Lattner ThreadPlan::GetNextID()
18130fdc8d8SChris Lattner {
18230fdc8d8SChris Lattner     static uint32_t g_nextPlanID = 0;
18330fdc8d8SChris Lattner     return ++g_nextPlanID;
18430fdc8d8SChris Lattner }
18530fdc8d8SChris Lattner 
18630fdc8d8SChris Lattner void
18730fdc8d8SChris Lattner ThreadPlan::DidPush()
18830fdc8d8SChris Lattner {
18930fdc8d8SChris Lattner }
19030fdc8d8SChris Lattner 
19130fdc8d8SChris Lattner void
19230fdc8d8SChris Lattner ThreadPlan::WillPop()
19330fdc8d8SChris Lattner {
19430fdc8d8SChris Lattner }
19530fdc8d8SChris Lattner 
19630fdc8d8SChris Lattner bool
19730fdc8d8SChris Lattner ThreadPlan::OkayToDiscard()
19830fdc8d8SChris Lattner {
19930fdc8d8SChris Lattner     if (!IsMasterPlan())
20030fdc8d8SChris Lattner         return true;
20130fdc8d8SChris Lattner     else
20230fdc8d8SChris Lattner         return m_okay_to_discard;
20330fdc8d8SChris Lattner }
20430fdc8d8SChris Lattner 
20506e827ccSJim Ingham lldb::StateType
20606e827ccSJim Ingham ThreadPlan::RunState ()
20706e827ccSJim Ingham {
20806e827ccSJim Ingham     if (m_tracer_sp && m_tracer_sp->TracingEnabled() && m_tracer_sp->SingleStepEnabled())
20906e827ccSJim Ingham         return eStateStepping;
21006e827ccSJim Ingham     else
21106e827ccSJim Ingham         return GetPlanRunState();
21206e827ccSJim Ingham }
213