130fdc8d8SChris Lattner //===-- ThreadPlanStepInstruction.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 
1130fdc8d8SChris Lattner #include "lldb/Target/ThreadPlanStepInstruction.h"
1230fdc8d8SChris Lattner 
1330fdc8d8SChris Lattner // C Includes
1430fdc8d8SChris Lattner // C++ Includes
1530fdc8d8SChris Lattner // Other libraries and framework includes
1630fdc8d8SChris Lattner // Project includes
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/Target/Process.h"
21f4b47e15SGreg Clayton #include "lldb/Target/RegisterContext.h"
22f4b47e15SGreg Clayton #include "lldb/Target/RegisterContext.h"
23f4b47e15SGreg Clayton #include "lldb/Target/StopInfo.h"
24f4b47e15SGreg Clayton #include "lldb/Target/Target.h"
2530fdc8d8SChris Lattner 
2630fdc8d8SChris Lattner using namespace lldb;
2730fdc8d8SChris Lattner using namespace lldb_private;
2830fdc8d8SChris Lattner 
2930fdc8d8SChris Lattner //----------------------------------------------------------------------
3030fdc8d8SChris Lattner // ThreadPlanStepInstruction: Step over the current instruction
3130fdc8d8SChris Lattner //----------------------------------------------------------------------
3230fdc8d8SChris Lattner 
3330fdc8d8SChris Lattner ThreadPlanStepInstruction::ThreadPlanStepInstruction
3430fdc8d8SChris Lattner (
3530fdc8d8SChris Lattner     Thread &thread,
3630fdc8d8SChris Lattner     bool step_over,
3730fdc8d8SChris Lattner     bool stop_other_threads,
3830fdc8d8SChris Lattner     Vote stop_vote,
3930fdc8d8SChris Lattner     Vote run_vote
4030fdc8d8SChris Lattner ) :
41b01e742aSJim Ingham     ThreadPlan (ThreadPlan::eKindStepInstruction, "Step over single instruction", thread, stop_vote, run_vote),
4230fdc8d8SChris Lattner     m_instruction_addr (0),
431ee0d4f7SBenjamin Kramer     m_stop_other_threads (stop_other_threads),
446b35c86fSJim Ingham     m_step_over (step_over)
451ee0d4f7SBenjamin Kramer {
4630fdc8d8SChris Lattner     m_instruction_addr = m_thread.GetRegisterContext()->GetPC(0);
476b35c86fSJim Ingham     m_stack_id = m_thread.GetStackFrameAtIndex(0)->GetStackID();
4830fdc8d8SChris Lattner }
4930fdc8d8SChris Lattner 
5030fdc8d8SChris Lattner ThreadPlanStepInstruction::~ThreadPlanStepInstruction ()
5130fdc8d8SChris Lattner {
5230fdc8d8SChris Lattner }
5330fdc8d8SChris Lattner 
5430fdc8d8SChris Lattner void
5530fdc8d8SChris Lattner ThreadPlanStepInstruction::GetDescription (Stream *s, lldb::DescriptionLevel level)
5630fdc8d8SChris Lattner {
5730fdc8d8SChris Lattner     if (level == lldb::eDescriptionLevelBrief)
5830fdc8d8SChris Lattner     {
5930fdc8d8SChris Lattner         if (m_step_over)
6030fdc8d8SChris Lattner             s->Printf ("instruction step over");
6130fdc8d8SChris Lattner         else
6230fdc8d8SChris Lattner             s->Printf ("instruction step into");
6330fdc8d8SChris Lattner     }
6430fdc8d8SChris Lattner     else
6530fdc8d8SChris Lattner     {
6630fdc8d8SChris Lattner         s->Printf ("Stepping one instruction past ");
6730fdc8d8SChris Lattner         s->Address(m_instruction_addr, sizeof (addr_t));
6830fdc8d8SChris Lattner         if (m_step_over)
6930fdc8d8SChris Lattner             s->Printf(" stepping over calls");
7030fdc8d8SChris Lattner         else
7130fdc8d8SChris Lattner             s->Printf(" stepping into calls");
7230fdc8d8SChris Lattner     }
7330fdc8d8SChris Lattner }
7430fdc8d8SChris Lattner 
7530fdc8d8SChris Lattner bool
7630fdc8d8SChris Lattner ThreadPlanStepInstruction::ValidatePlan (Stream *error)
7730fdc8d8SChris Lattner {
7830fdc8d8SChris Lattner     // Since we read the instruction we're stepping over from the thread,
7930fdc8d8SChris Lattner     // this plan will always work.
8030fdc8d8SChris Lattner     return true;
8130fdc8d8SChris Lattner }
8230fdc8d8SChris Lattner 
8330fdc8d8SChris Lattner bool
84*221d51cfSJim Ingham ThreadPlanStepInstruction::DoPlanExplainsStop (Event *event_ptr)
8530fdc8d8SChris Lattner {
86b15bfc75SJim Ingham     StopInfoSP stop_info_sp = GetPrivateStopReason();
87b15bfc75SJim Ingham     if (stop_info_sp)
8830fdc8d8SChris Lattner     {
89b15bfc75SJim Ingham         StopReason reason = stop_info_sp->GetStopReason();
9030fdc8d8SChris Lattner         if (reason == eStopReasonTrace || reason == eStopReasonNone)
9130fdc8d8SChris Lattner             return true;
9230fdc8d8SChris Lattner         else
9330fdc8d8SChris Lattner             return false;
9430fdc8d8SChris Lattner     }
9530fdc8d8SChris Lattner     return false;
9630fdc8d8SChris Lattner }
9730fdc8d8SChris Lattner 
9830fdc8d8SChris Lattner bool
9930fdc8d8SChris Lattner ThreadPlanStepInstruction::ShouldStop (Event *event_ptr)
10030fdc8d8SChris Lattner {
10130fdc8d8SChris Lattner     if (m_step_over)
10230fdc8d8SChris Lattner     {
1035160ce5cSGreg Clayton         Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
1046b35c86fSJim Ingham 
1056b35c86fSJim Ingham         StackID cur_frame_zero_id = m_thread.GetStackFrameAtIndex(0)->GetStackID();
1066b35c86fSJim Ingham 
1076b35c86fSJim Ingham         if (cur_frame_zero_id == m_stack_id || m_stack_id < cur_frame_zero_id)
10830fdc8d8SChris Lattner         {
10930fdc8d8SChris Lattner             if (m_thread.GetRegisterContext()->GetPC(0) != m_instruction_addr)
11030fdc8d8SChris Lattner             {
11130fdc8d8SChris Lattner                 SetPlanComplete();
11230fdc8d8SChris Lattner                 return true;
11330fdc8d8SChris Lattner             }
11430fdc8d8SChris Lattner             else
11530fdc8d8SChris Lattner                 return false;
11630fdc8d8SChris Lattner         }
11730fdc8d8SChris Lattner         else
11830fdc8d8SChris Lattner         {
11930fdc8d8SChris Lattner             // We've stepped in, step back out again:
12030fdc8d8SChris Lattner             StackFrame *return_frame = m_thread.GetStackFrameAtIndex(1).get();
12130fdc8d8SChris Lattner             if (return_frame)
12230fdc8d8SChris Lattner             {
12330fdc8d8SChris Lattner                 if (log)
12430fdc8d8SChris Lattner                 {
12530fdc8d8SChris Lattner                     StreamString s;
12630fdc8d8SChris Lattner                     s.PutCString ("Stepped in to: ");
1279da7bd07SGreg Clayton                     addr_t stop_addr = m_thread.GetStackFrameAtIndex(0)->GetRegisterContext()->GetPC();
1281ac04c30SGreg Clayton                     s.Address (stop_addr, m_thread.CalculateTarget()->GetArchitecture().GetAddressByteSize());
12930fdc8d8SChris Lattner                     s.PutCString (" stepping out to: ");
1309da7bd07SGreg Clayton                     addr_t return_addr = return_frame->GetRegisterContext()->GetPC();
1311ac04c30SGreg Clayton                     s.Address (return_addr, m_thread.CalculateTarget()->GetArchitecture().GetAddressByteSize());
13230fdc8d8SChris Lattner                     log->Printf("%s.", s.GetData());
13330fdc8d8SChris Lattner                 }
1344a58e968SJim Ingham 
1354a58e968SJim Ingham                 // StepInstruction should probably have the tri-state RunMode, but for now it is safer to
1364a58e968SJim Ingham                 // run others.
1374a58e968SJim Ingham                 const bool stop_others = false;
13864e7ead1SJim Ingham                 m_thread.QueueThreadPlanForStepOut(false,
13964e7ead1SJim Ingham                                                    NULL,
14064e7ead1SJim Ingham                                                    true,
1414a58e968SJim Ingham                                                    stop_others,
14264e7ead1SJim Ingham                                                    eVoteNo,
14364e7ead1SJim Ingham                                                    eVoteNoOpinion,
14464e7ead1SJim Ingham                                                    0);
14530fdc8d8SChris Lattner                 return false;
14630fdc8d8SChris Lattner             }
14730fdc8d8SChris Lattner             else
14830fdc8d8SChris Lattner             {
14930fdc8d8SChris Lattner                 if (log)
15030fdc8d8SChris Lattner                     log->Printf("Could not find previous frame, stopping.");
15130fdc8d8SChris Lattner                 SetPlanComplete();
15230fdc8d8SChris Lattner                 return true;
15330fdc8d8SChris Lattner             }
15430fdc8d8SChris Lattner 
15530fdc8d8SChris Lattner         }
15630fdc8d8SChris Lattner 
15730fdc8d8SChris Lattner     }
15830fdc8d8SChris Lattner     else
15930fdc8d8SChris Lattner     {
16030fdc8d8SChris Lattner         if (m_thread.GetRegisterContext()->GetPC(0) != m_instruction_addr)
16130fdc8d8SChris Lattner         {
16230fdc8d8SChris Lattner             SetPlanComplete();
16330fdc8d8SChris Lattner             return true;
16430fdc8d8SChris Lattner         }
16530fdc8d8SChris Lattner         else
16630fdc8d8SChris Lattner             return false;
16730fdc8d8SChris Lattner     }
16830fdc8d8SChris Lattner }
16930fdc8d8SChris Lattner 
17030fdc8d8SChris Lattner bool
17130fdc8d8SChris Lattner ThreadPlanStepInstruction::StopOthers ()
17230fdc8d8SChris Lattner {
17330fdc8d8SChris Lattner     return m_stop_other_threads;
17430fdc8d8SChris Lattner }
17530fdc8d8SChris Lattner 
17630fdc8d8SChris Lattner StateType
17706e827ccSJim Ingham ThreadPlanStepInstruction::GetPlanRunState ()
17830fdc8d8SChris Lattner {
17930fdc8d8SChris Lattner     return eStateStepping;
18030fdc8d8SChris Lattner }
18130fdc8d8SChris Lattner 
18230fdc8d8SChris Lattner bool
18330fdc8d8SChris Lattner ThreadPlanStepInstruction::WillStop ()
18430fdc8d8SChris Lattner {
18530fdc8d8SChris Lattner     return true;
18630fdc8d8SChris Lattner }
18730fdc8d8SChris Lattner 
18830fdc8d8SChris Lattner bool
18930fdc8d8SChris Lattner ThreadPlanStepInstruction::MischiefManaged ()
19030fdc8d8SChris Lattner {
19130fdc8d8SChris Lattner     if (IsPlanComplete())
19230fdc8d8SChris Lattner     {
1935160ce5cSGreg Clayton         Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_STEP));
19430fdc8d8SChris Lattner         if (log)
19530fdc8d8SChris Lattner             log->Printf("Completed single instruction step plan.");
19630fdc8d8SChris Lattner         ThreadPlan::MischiefManaged ();
19730fdc8d8SChris Lattner         return true;
19830fdc8d8SChris Lattner     }
19930fdc8d8SChris Lattner     else
20030fdc8d8SChris Lattner     {
20130fdc8d8SChris Lattner         return false;
20230fdc8d8SChris Lattner     }
20330fdc8d8SChris Lattner }
20430fdc8d8SChris Lattner 
205