130fdc8d8SChris Lattner //===-- ThreadPlanStepRange.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 
1030fdc8d8SChris Lattner #include "lldb/Target/ThreadPlanStepRange.h"
1130fdc8d8SChris Lattner 
1230fdc8d8SChris Lattner // C Includes
1330fdc8d8SChris Lattner // C++ Includes
1430fdc8d8SChris Lattner // Other libraries and framework includes
1530fdc8d8SChris Lattner // Project includes
1630fdc8d8SChris Lattner 
1730fdc8d8SChris Lattner #include "lldb/lldb-private-log.h"
1830fdc8d8SChris Lattner #include "lldb/Core/Log.h"
1930fdc8d8SChris Lattner #include "lldb/Core/Stream.h"
2030fdc8d8SChris Lattner #include "lldb/Symbol/Function.h"
2130fdc8d8SChris Lattner #include "lldb/Symbol/Symbol.h"
22f4b47e15SGreg Clayton #include "lldb/Target/Process.h"
23f4b47e15SGreg Clayton #include "lldb/Target/RegisterContext.h"
24f4b47e15SGreg Clayton #include "lldb/Target/StopInfo.h"
25f4b47e15SGreg Clayton #include "lldb/Target/Thread.h"
2630fdc8d8SChris Lattner 
2730fdc8d8SChris Lattner using namespace lldb;
2830fdc8d8SChris Lattner using namespace lldb_private;
2930fdc8d8SChris Lattner 
3030fdc8d8SChris Lattner 
3130fdc8d8SChris Lattner //----------------------------------------------------------------------
3230fdc8d8SChris Lattner // ThreadPlanStepRange: Step through a stack range, either stepping over or into
3330fdc8d8SChris Lattner // based on the value of \a type.
3430fdc8d8SChris Lattner //----------------------------------------------------------------------
3530fdc8d8SChris Lattner 
36b01e742aSJim Ingham ThreadPlanStepRange::ThreadPlanStepRange (ThreadPlanKind kind, const char *name, Thread &thread, const AddressRange &range, const SymbolContext &addr_context, lldb::RunMode stop_others) :
3735b21fefSJim Ingham     ThreadPlan (kind, name, thread, eVoteNoOpinion, eVoteNoOpinion),
3830fdc8d8SChris Lattner     m_addr_context (addr_context),
39c982c768SGreg Clayton     m_address_range (range),
4030fdc8d8SChris Lattner     m_stop_others (stop_others),
4130fdc8d8SChris Lattner     m_stack_depth (0),
4230fdc8d8SChris Lattner     m_stack_id (),
43c982c768SGreg Clayton     m_no_more_plans (false),
4430fdc8d8SChris Lattner     m_first_run_event (true)
4530fdc8d8SChris Lattner {
4630fdc8d8SChris Lattner     m_stack_depth = m_thread.GetStackFrameCount();
4730fdc8d8SChris Lattner     m_stack_id = m_thread.GetStackFrameAtIndex(0)->GetStackID();
4830fdc8d8SChris Lattner }
4930fdc8d8SChris Lattner 
5030fdc8d8SChris Lattner ThreadPlanStepRange::~ThreadPlanStepRange ()
5130fdc8d8SChris Lattner {
5230fdc8d8SChris Lattner }
5330fdc8d8SChris Lattner 
5430fdc8d8SChris Lattner bool
5530fdc8d8SChris Lattner ThreadPlanStepRange::ValidatePlan (Stream *error)
5630fdc8d8SChris Lattner {
5730fdc8d8SChris Lattner     return true;
5830fdc8d8SChris Lattner }
5930fdc8d8SChris Lattner 
6030fdc8d8SChris Lattner bool
6130fdc8d8SChris Lattner ThreadPlanStepRange::PlanExplainsStop ()
6230fdc8d8SChris Lattner {
6330fdc8d8SChris Lattner     // We don't explain signals or breakpoints (breakpoints that handle stepping in or
6430fdc8d8SChris Lattner     // out will be handled by a child plan.
65f4b47e15SGreg Clayton     StopInfo *stop_info = m_thread.GetStopInfo();
66f4b47e15SGreg Clayton     if (stop_info)
6730fdc8d8SChris Lattner     {
68f4b47e15SGreg Clayton         StopReason reason = stop_info->GetStopReason();
6930fdc8d8SChris Lattner 
7030fdc8d8SChris Lattner         switch (reason)
7130fdc8d8SChris Lattner         {
7230fdc8d8SChris Lattner         case eStopReasonBreakpoint:
7330fdc8d8SChris Lattner         case eStopReasonWatchpoint:
7430fdc8d8SChris Lattner         case eStopReasonSignal:
7530fdc8d8SChris Lattner         case eStopReasonException:
7630fdc8d8SChris Lattner             return false;
7730fdc8d8SChris Lattner         default:
7830fdc8d8SChris Lattner             return true;
7930fdc8d8SChris Lattner         }
8030fdc8d8SChris Lattner     }
8130fdc8d8SChris Lattner     return true;
8230fdc8d8SChris Lattner }
8330fdc8d8SChris Lattner 
8430fdc8d8SChris Lattner Vote
8530fdc8d8SChris Lattner ThreadPlanStepRange::ShouldReportStop (Event *event_ptr)
8630fdc8d8SChris Lattner {
872cad65a5SGreg Clayton     Log *log = lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP);
882cad65a5SGreg Clayton 
892cad65a5SGreg Clayton     const Vote vote = IsPlanComplete() ? eVoteYes : eVoteNo;
902cad65a5SGreg Clayton     if (log)
912cad65a5SGreg Clayton         log->Printf ("ThreadPlanStepRange::ShouldReportStop() returning vote %i\n", eVoteYes);
922cad65a5SGreg Clayton     return vote;
9330fdc8d8SChris Lattner }
9430fdc8d8SChris Lattner 
9530fdc8d8SChris Lattner bool
9630fdc8d8SChris Lattner ThreadPlanStepRange::InRange ()
9730fdc8d8SChris Lattner {
9830fdc8d8SChris Lattner     Log *log = lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP);
9930fdc8d8SChris Lattner     bool ret_value = false;
10030fdc8d8SChris Lattner 
10130fdc8d8SChris Lattner     lldb::addr_t pc_load_addr = m_thread.GetRegisterContext()->GetPC();
10230fdc8d8SChris Lattner 
103*f5e56de0SGreg Clayton     ret_value = m_address_range.ContainsLoadAddress(pc_load_addr, &m_thread.GetProcess().GetTarget());
10430fdc8d8SChris Lattner 
10530fdc8d8SChris Lattner     if (!ret_value)
10630fdc8d8SChris Lattner     {
10730fdc8d8SChris Lattner         // See if we've just stepped to another part of the same line number...
10830fdc8d8SChris Lattner         StackFrame *frame = m_thread.GetStackFrameAtIndex(0).get();
10930fdc8d8SChris Lattner 
11030fdc8d8SChris Lattner         SymbolContext new_context(frame->GetSymbolContext(eSymbolContextEverything));
11130fdc8d8SChris Lattner         if (m_addr_context.line_entry.IsValid() && new_context.line_entry.IsValid())
11230fdc8d8SChris Lattner         {
11330fdc8d8SChris Lattner            if ((m_addr_context.line_entry.file == new_context.line_entry.file)
11430fdc8d8SChris Lattner                && (m_addr_context.line_entry.line == new_context.line_entry.line))
11530fdc8d8SChris Lattner             {
11630fdc8d8SChris Lattner                 m_addr_context = new_context;
11730fdc8d8SChris Lattner                 m_address_range = m_addr_context.line_entry.range;
11830fdc8d8SChris Lattner                 ret_value = true;
11930fdc8d8SChris Lattner                 if (log)
12030fdc8d8SChris Lattner                 {
12130fdc8d8SChris Lattner                     StreamString s;
122*f5e56de0SGreg Clayton                     m_address_range.Dump (&s, &m_thread.GetProcess().GetTarget(), Address::DumpStyleLoadAddress);
12330fdc8d8SChris Lattner 
12430fdc8d8SChris Lattner                     log->Printf ("Step range plan stepped to another range of same line: %s", s.GetData());
12530fdc8d8SChris Lattner                 }
12630fdc8d8SChris Lattner             }
12730fdc8d8SChris Lattner         }
12830fdc8d8SChris Lattner 
12930fdc8d8SChris Lattner     }
13030fdc8d8SChris Lattner 
13130fdc8d8SChris Lattner     if (!ret_value && log)
13230fdc8d8SChris Lattner         log->Printf ("Step range plan out of range to 0x%llx", pc_load_addr);
13330fdc8d8SChris Lattner 
13430fdc8d8SChris Lattner     return ret_value;
13530fdc8d8SChris Lattner }
13630fdc8d8SChris Lattner 
13730fdc8d8SChris Lattner bool
13830fdc8d8SChris Lattner ThreadPlanStepRange::InSymbol()
13930fdc8d8SChris Lattner {
14030fdc8d8SChris Lattner     lldb::addr_t cur_pc = m_thread.GetRegisterContext()->GetPC();
14130fdc8d8SChris Lattner     if (m_addr_context.function != NULL)
14230fdc8d8SChris Lattner     {
143*f5e56de0SGreg Clayton         return m_addr_context.function->GetAddressRange().ContainsLoadAddress (cur_pc, &m_thread.GetProcess().GetTarget());
14430fdc8d8SChris Lattner     }
14530fdc8d8SChris Lattner     else if (m_addr_context.symbol != NULL)
14630fdc8d8SChris Lattner     {
147*f5e56de0SGreg Clayton         return m_addr_context.symbol->GetAddressRangeRef().ContainsLoadAddress (cur_pc, &m_thread.GetProcess().GetTarget());
14830fdc8d8SChris Lattner     }
14930fdc8d8SChris Lattner     return false;
15030fdc8d8SChris Lattner }
15130fdc8d8SChris Lattner 
15230fdc8d8SChris Lattner // FIXME: This should also handle inlining if we aren't going to do inlining in the
15330fdc8d8SChris Lattner // main stack.
15430fdc8d8SChris Lattner //
15530fdc8d8SChris Lattner // Ideally we should remember the whole stack frame list, and then compare that
15630fdc8d8SChris Lattner // to the current list.
15730fdc8d8SChris Lattner 
15830fdc8d8SChris Lattner bool
15930fdc8d8SChris Lattner ThreadPlanStepRange::FrameIsYounger ()
16030fdc8d8SChris Lattner {
16130fdc8d8SChris Lattner     Log *log = lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP);
16230fdc8d8SChris Lattner     uint32_t current_depth = m_thread.GetStackFrameCount();
16330fdc8d8SChris Lattner     if (current_depth == m_stack_depth)
16430fdc8d8SChris Lattner     {
16530fdc8d8SChris Lattner         if (log)
16630fdc8d8SChris Lattner             log->Printf ("Step range FrameIsYounger still in start function.");
16730fdc8d8SChris Lattner         return false;
16830fdc8d8SChris Lattner     }
16930fdc8d8SChris Lattner     else if (current_depth < m_stack_depth)
17030fdc8d8SChris Lattner     {
17130fdc8d8SChris Lattner         if (log)
17230fdc8d8SChris Lattner             log->Printf ("Step range FrameIsYounger stepped out: start depth: %d current depth %d.", m_stack_depth, current_depth);
17330fdc8d8SChris Lattner         return false;
17430fdc8d8SChris Lattner     }
17530fdc8d8SChris Lattner     else
17630fdc8d8SChris Lattner     {
17730fdc8d8SChris Lattner         if (log)
17830fdc8d8SChris Lattner             log->Printf ("Step range FrameIsYounger stepped in: start depth: %d current depth %d.", m_stack_depth, current_depth);
17930fdc8d8SChris Lattner         return true;
18030fdc8d8SChris Lattner     }
18130fdc8d8SChris Lattner }
18230fdc8d8SChris Lattner 
18330fdc8d8SChris Lattner bool
18430fdc8d8SChris Lattner ThreadPlanStepRange::FrameIsOlder ()
18530fdc8d8SChris Lattner {
18630fdc8d8SChris Lattner     Log *log = lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP);
18730fdc8d8SChris Lattner     uint32_t current_depth = m_thread.GetStackFrameCount();
18830fdc8d8SChris Lattner     if (current_depth == m_stack_depth)
18930fdc8d8SChris Lattner     {
19030fdc8d8SChris Lattner         if (log)
19130fdc8d8SChris Lattner             log->Printf ("Step range FrameIsOlder still in start function.");
19230fdc8d8SChris Lattner         return false;
19330fdc8d8SChris Lattner     }
19430fdc8d8SChris Lattner     else if (current_depth < m_stack_depth)
19530fdc8d8SChris Lattner     {
19630fdc8d8SChris Lattner         if (log)
19730fdc8d8SChris Lattner             log->Printf ("Step range FrameIsOlder stepped out: start depth: %d current depth %d.", m_stack_depth, current_depth);
19830fdc8d8SChris Lattner         return true;
19930fdc8d8SChris Lattner     }
20030fdc8d8SChris Lattner     else
20130fdc8d8SChris Lattner     {
20230fdc8d8SChris Lattner         if (log)
20330fdc8d8SChris Lattner             log->Printf ("Step range FrameIsOlder stepped in: start depth: %d current depth %d.", m_stack_depth, current_depth);
20430fdc8d8SChris Lattner         return false;
20530fdc8d8SChris Lattner     }
20630fdc8d8SChris Lattner }
20730fdc8d8SChris Lattner 
20830fdc8d8SChris Lattner bool
20930fdc8d8SChris Lattner ThreadPlanStepRange::StopOthers ()
21030fdc8d8SChris Lattner {
21130fdc8d8SChris Lattner     if (m_stop_others == lldb::eOnlyThisThread
21230fdc8d8SChris Lattner         || m_stop_others == lldb::eOnlyDuringStepping)
21330fdc8d8SChris Lattner         return true;
21430fdc8d8SChris Lattner     else
21530fdc8d8SChris Lattner         return false;
21630fdc8d8SChris Lattner }
21730fdc8d8SChris Lattner 
21830fdc8d8SChris Lattner bool
21930fdc8d8SChris Lattner ThreadPlanStepRange::WillStop ()
22030fdc8d8SChris Lattner {
22130fdc8d8SChris Lattner     return true;
22230fdc8d8SChris Lattner }
22330fdc8d8SChris Lattner 
22430fdc8d8SChris Lattner StateType
22530fdc8d8SChris Lattner ThreadPlanStepRange::RunState ()
22630fdc8d8SChris Lattner {
22730fdc8d8SChris Lattner     return eStateStepping;
22830fdc8d8SChris Lattner }
22930fdc8d8SChris Lattner 
23030fdc8d8SChris Lattner bool
23130fdc8d8SChris Lattner ThreadPlanStepRange::MischiefManaged ()
23230fdc8d8SChris Lattner {
23330fdc8d8SChris Lattner     bool done = true;
23430fdc8d8SChris Lattner     if (!IsPlanComplete())
23530fdc8d8SChris Lattner     {
23630fdc8d8SChris Lattner         if (InRange())
23730fdc8d8SChris Lattner         {
23830fdc8d8SChris Lattner             done = false;
23930fdc8d8SChris Lattner         }
24030fdc8d8SChris Lattner         else if (!FrameIsOlder())
24130fdc8d8SChris Lattner         {
24230fdc8d8SChris Lattner             if (m_no_more_plans)
24330fdc8d8SChris Lattner                 done = true;
24430fdc8d8SChris Lattner             else
24530fdc8d8SChris Lattner                 done = false;
24630fdc8d8SChris Lattner         }
24730fdc8d8SChris Lattner         else
24830fdc8d8SChris Lattner             done = true;
24930fdc8d8SChris Lattner     }
25030fdc8d8SChris Lattner 
25130fdc8d8SChris Lattner     if (done)
25230fdc8d8SChris Lattner     {
25330fdc8d8SChris Lattner         Log *log = lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP);
25430fdc8d8SChris Lattner         if (log)
25530fdc8d8SChris Lattner             log->Printf("Completed step through range plan.");
25630fdc8d8SChris Lattner         ThreadPlan::MischiefManaged ();
25730fdc8d8SChris Lattner         return true;
25830fdc8d8SChris Lattner     }
25930fdc8d8SChris Lattner     else
26030fdc8d8SChris Lattner     {
26130fdc8d8SChris Lattner         return false;
26230fdc8d8SChris Lattner     }
26330fdc8d8SChris Lattner 
26430fdc8d8SChris Lattner }
265