180814287SRaphael Isemann //===-- ThreadPlanStepOverBreakpoint.cpp ----------------------------------===//
230fdc8d8SChris Lattner //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
630fdc8d8SChris Lattner //
730fdc8d8SChris Lattner //===----------------------------------------------------------------------===//
830fdc8d8SChris Lattner 
930fdc8d8SChris Lattner #include "lldb/Target/ThreadPlanStepOverBreakpoint.h"
1030fdc8d8SChris Lattner 
1130fdc8d8SChris Lattner #include "lldb/Target/Process.h"
1230fdc8d8SChris Lattner #include "lldb/Target/RegisterContext.h"
136f9e6901SZachary Turner #include "lldb/Utility/Log.h"
14bf9a7730SZachary Turner #include "lldb/Utility/Stream.h"
1530fdc8d8SChris Lattner 
1630fdc8d8SChris Lattner using namespace lldb;
1730fdc8d8SChris Lattner using namespace lldb_private;
1830fdc8d8SChris Lattner 
19b9c1b51eSKate Stone // ThreadPlanStepOverBreakpoint: Single steps over a breakpoint bp_site_sp at
20b9c1b51eSKate Stone // the pc.
2130fdc8d8SChris Lattner 
22b9c1b51eSKate Stone ThreadPlanStepOverBreakpoint::ThreadPlanStepOverBreakpoint(Thread &thread)
23b9c1b51eSKate Stone     : ThreadPlan(
24b9c1b51eSKate Stone           ThreadPlan::eKindStepOverBreakpoint, "Step over breakpoint trap",
25b9c1b51eSKate Stone           thread, eVoteNo,
2630fdc8d8SChris Lattner           eVoteNoOpinion), // We need to report the run since this happens
2705097246SAdrian Prantl                            // first in the thread plan stack when stepping over
2805097246SAdrian Prantl                            // a breakpoint
29b01e742aSJim Ingham       m_breakpoint_addr(LLDB_INVALID_ADDRESS),
30b9c1b51eSKate Stone       m_auto_continue(false), m_reenabled_breakpoint_site(false)
31b01e742aSJim Ingham 
3230fdc8d8SChris Lattner {
33e4598dc0SJim Ingham   m_breakpoint_addr = thread.GetRegisterContext()->GetPC();
34b9c1b51eSKate Stone   m_breakpoint_site_id =
35e4598dc0SJim Ingham       thread.GetProcess()->GetBreakpointSiteList().FindIDByAddress(
36b9c1b51eSKate Stone           m_breakpoint_addr);
3730fdc8d8SChris Lattner }
3830fdc8d8SChris Lattner 
39*fd2433e1SJonas Devlieghere ThreadPlanStepOverBreakpoint::~ThreadPlanStepOverBreakpoint() = default;
40b9c1b51eSKate Stone 
41b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::GetDescription(
42b9c1b51eSKate Stone     Stream *s, lldb::DescriptionLevel level) {
43b9c1b51eSKate Stone   s->Printf("Single stepping past breakpoint site %" PRIu64 " at 0x%" PRIx64,
44b9c1b51eSKate Stone             m_breakpoint_site_id, (uint64_t)m_breakpoint_addr);
4530fdc8d8SChris Lattner }
4630fdc8d8SChris Lattner 
47b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::ValidatePlan(Stream *error) { return true; }
4830fdc8d8SChris Lattner 
49b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::DoPlanExplainsStop(Event *event_ptr) {
5060c4118cSJim Ingham   StopInfoSP stop_info_sp = GetPrivateStopInfo();
51b9c1b51eSKate Stone   if (stop_info_sp) {
52bc1d7f7aSJim Ingham     StopReason reason = stop_info_sp->GetStopReason();
538b91d0cdSJim Ingham 
54a435d733SJim Ingham     Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_STEP));
55a4a08442SRaphael Isemann     LLDB_LOG(log, "Step over breakpoint stopped for reason: {0}.",
56a4a08442SRaphael Isemann              Thread::StopReasonAsString(reason));
57a435d733SJim Ingham 
58b9c1b51eSKate Stone     switch (reason) {
598b91d0cdSJim Ingham       case eStopReasonTrace:
608b91d0cdSJim Ingham       case eStopReasonNone:
6130fdc8d8SChris Lattner         return true;
628b91d0cdSJim Ingham       case eStopReasonBreakpoint:
63a435d733SJim Ingham       {
64b9c1b51eSKate Stone         // It's a little surprising that we stop here for a breakpoint hit.
6505097246SAdrian Prantl         // However, when you single step ONTO a breakpoint we still want to call
6605097246SAdrian Prantl         // that a breakpoint hit, and trigger the actions, etc.  Otherwise you
67b9c1b51eSKate Stone         // would see the PC at the breakpoint without having triggered the
6805097246SAdrian Prantl         // actions, then you'd continue, the PC wouldn't change, and you'd see
69a435d733SJim Ingham         // the breakpoint hit, which would be odd. So the lower levels fake
70a435d733SJim Ingham         // "step onto breakpoint address" and return that as a breakpoint hit.
71a435d733SJim Ingham         // So our trace step COULD appear as a breakpoint hit if the next
72a435d733SJim Ingham         // instruction also contained a breakpoint.  We don't want to handle
73a435d733SJim Ingham         // that, since we really don't know what to do with breakpoint hits.
74a435d733SJim Ingham         // But make sure we don't set ourselves to auto-continue or we'll wrench
75a435d733SJim Ingham         // control away from the plans that can deal with this.
76a435d733SJim Ingham         // Be careful, however, as we may have "seen a breakpoint under the PC
77a435d733SJim Ingham         // because we stopped without changing the PC, in which case we do want
78a435d733SJim Ingham         // to re-claim this stop so we'll try again.
79e4598dc0SJim Ingham         lldb::addr_t pc_addr = GetThread().GetRegisterContext()->GetPC();
80a435d733SJim Ingham 
81a435d733SJim Ingham         if (pc_addr == m_breakpoint_addr) {
8263e5fb76SJonas Devlieghere           LLDB_LOGF(log,
8363e5fb76SJonas Devlieghere                     "Got breakpoint stop reason but pc: 0x%" PRIx64
8463e5fb76SJonas Devlieghere                     "hasn't changed.",
8563e5fb76SJonas Devlieghere                     pc_addr);
86a435d733SJim Ingham           return true;
87a435d733SJim Ingham         }
88a435d733SJim Ingham 
898b91d0cdSJim Ingham         SetAutoContinue(false);
90bc1d7f7aSJim Ingham         return false;
91a435d733SJim Ingham       }
928b91d0cdSJim Ingham       default:
938b91d0cdSJim Ingham         return false;
948b91d0cdSJim Ingham     }
95bc1d7f7aSJim Ingham   }
96bc1d7f7aSJim Ingham   return false;
9730fdc8d8SChris Lattner }
9830fdc8d8SChris Lattner 
99b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::ShouldStop(Event *event_ptr) {
1008b91d0cdSJim Ingham   return !ShouldAutoContinue(event_ptr);
10130fdc8d8SChris Lattner }
10230fdc8d8SChris Lattner 
103b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::StopOthers() { return true; }
10430fdc8d8SChris Lattner 
105b9c1b51eSKate Stone StateType ThreadPlanStepOverBreakpoint::GetPlanRunState() {
10630fdc8d8SChris Lattner   return eStateStepping;
10730fdc8d8SChris Lattner }
10830fdc8d8SChris Lattner 
109b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::DoWillResume(StateType resume_state,
110b9c1b51eSKate Stone                                                 bool current_plan) {
111b9c1b51eSKate Stone   if (current_plan) {
112b9c1b51eSKate Stone     BreakpointSiteSP bp_site_sp(
113e4598dc0SJim Ingham         m_process.GetBreakpointSiteList().FindByAddress(m_breakpoint_addr));
114a435d733SJim Ingham     if (bp_site_sp && bp_site_sp->IsEnabled()) {
115e4598dc0SJim Ingham       m_process.DisableBreakpointSite(bp_site_sp.get());
116a435d733SJim Ingham       m_reenabled_breakpoint_site = false;
117a435d733SJim Ingham     }
11830fdc8d8SChris Lattner   }
11930fdc8d8SChris Lattner   return true;
12030fdc8d8SChris Lattner }
12130fdc8d8SChris Lattner 
122b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::WillStop() {
1236e0ff1a3SGreg Clayton   ReenableBreakpointSite();
12430fdc8d8SChris Lattner   return true;
12530fdc8d8SChris Lattner }
12630fdc8d8SChris Lattner 
127a435d733SJim Ingham void ThreadPlanStepOverBreakpoint::WillPop() {
128a435d733SJim Ingham   ReenableBreakpointSite();
129a435d733SJim Ingham }
130a435d733SJim Ingham 
131b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::MischiefManaged() {
132e4598dc0SJim Ingham   lldb::addr_t pc_addr = GetThread().GetRegisterContext()->GetPC();
13330fdc8d8SChris Lattner 
134b9c1b51eSKate Stone   if (pc_addr == m_breakpoint_addr) {
135b9c1b51eSKate Stone     // If we are still at the PC of our breakpoint, then for some reason we
13605097246SAdrian Prantl     // didn't get a chance to run.
13730fdc8d8SChris Lattner     return false;
138b9c1b51eSKate Stone   } else {
1395160ce5cSGreg Clayton     Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_STEP));
14063e5fb76SJonas Devlieghere     LLDB_LOGF(log, "Completed step over breakpoint plan.");
141b9c1b51eSKate Stone     // Otherwise, re-enable the breakpoint we were stepping over, and we're
142b9c1b51eSKate Stone     // done.
1436e0ff1a3SGreg Clayton     ReenableBreakpointSite();
14430fdc8d8SChris Lattner     ThreadPlan::MischiefManaged();
14530fdc8d8SChris Lattner     return true;
14630fdc8d8SChris Lattner   }
14730fdc8d8SChris Lattner }
14830fdc8d8SChris Lattner 
149b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::ReenableBreakpointSite() {
150b9c1b51eSKate Stone   if (!m_reenabled_breakpoint_site) {
1516e0ff1a3SGreg Clayton     m_reenabled_breakpoint_site = true;
152b9c1b51eSKate Stone     BreakpointSiteSP bp_site_sp(
153e4598dc0SJim Ingham         m_process.GetBreakpointSiteList().FindByAddress(m_breakpoint_addr));
154b9c1b51eSKate Stone     if (bp_site_sp) {
155e4598dc0SJim Ingham       m_process.EnableBreakpointSite(bp_site_sp.get());
1566e0ff1a3SGreg Clayton     }
1576e0ff1a3SGreg Clayton   }
1586e0ff1a3SGreg Clayton }
159b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::ThreadDestroyed() {
1606e0ff1a3SGreg Clayton   ReenableBreakpointSite();
1616e0ff1a3SGreg Clayton }
1626e0ff1a3SGreg Clayton 
163b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::SetAutoContinue(bool do_it) {
164b01e742aSJim Ingham   m_auto_continue = do_it;
165b01e742aSJim Ingham }
166b01e742aSJim Ingham 
167b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::ShouldAutoContinue(Event *event_ptr) {
168b01e742aSJim Ingham   return m_auto_continue;
169b01e742aSJim Ingham }
1708b91d0cdSJim Ingham 
171b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::IsPlanStale() {
172e4598dc0SJim Ingham   return GetThread().GetRegisterContext()->GetPC() != m_breakpoint_addr;
1738b91d0cdSJim Ingham }
174