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"
13*c34698a8SPavel Labath #include "lldb/Utility/LLDBLog.h"
146f9e6901SZachary Turner #include "lldb/Utility/Log.h"
15bf9a7730SZachary Turner #include "lldb/Utility/Stream.h"
1630fdc8d8SChris Lattner
1730fdc8d8SChris Lattner using namespace lldb;
1830fdc8d8SChris Lattner using namespace lldb_private;
1930fdc8d8SChris Lattner
20b9c1b51eSKate Stone // ThreadPlanStepOverBreakpoint: Single steps over a breakpoint bp_site_sp at
21b9c1b51eSKate Stone // the pc.
2230fdc8d8SChris Lattner
ThreadPlanStepOverBreakpoint(Thread & thread)23b9c1b51eSKate Stone ThreadPlanStepOverBreakpoint::ThreadPlanStepOverBreakpoint(Thread &thread)
24b9c1b51eSKate Stone : ThreadPlan(
25b9c1b51eSKate Stone ThreadPlan::eKindStepOverBreakpoint, "Step over breakpoint trap",
26b9c1b51eSKate Stone thread, eVoteNo,
2730fdc8d8SChris Lattner eVoteNoOpinion), // We need to report the run since this happens
2805097246SAdrian Prantl // first in the thread plan stack when stepping over
2905097246SAdrian Prantl // a breakpoint
30b01e742aSJim Ingham m_breakpoint_addr(LLDB_INVALID_ADDRESS),
31b9c1b51eSKate Stone m_auto_continue(false), m_reenabled_breakpoint_site(false)
32b01e742aSJim Ingham
3330fdc8d8SChris Lattner {
34e4598dc0SJim Ingham m_breakpoint_addr = thread.GetRegisterContext()->GetPC();
35b9c1b51eSKate Stone m_breakpoint_site_id =
36e4598dc0SJim Ingham thread.GetProcess()->GetBreakpointSiteList().FindIDByAddress(
37b9c1b51eSKate Stone m_breakpoint_addr);
3830fdc8d8SChris Lattner }
3930fdc8d8SChris Lattner
40fd2433e1SJonas Devlieghere ThreadPlanStepOverBreakpoint::~ThreadPlanStepOverBreakpoint() = default;
41b9c1b51eSKate Stone
GetDescription(Stream * s,lldb::DescriptionLevel level)42b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::GetDescription(
43b9c1b51eSKate Stone Stream *s, lldb::DescriptionLevel level) {
44b9c1b51eSKate Stone s->Printf("Single stepping past breakpoint site %" PRIu64 " at 0x%" PRIx64,
45b9c1b51eSKate Stone m_breakpoint_site_id, (uint64_t)m_breakpoint_addr);
4630fdc8d8SChris Lattner }
4730fdc8d8SChris Lattner
ValidatePlan(Stream * error)48b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::ValidatePlan(Stream *error) { return true; }
4930fdc8d8SChris Lattner
DoPlanExplainsStop(Event * event_ptr)50b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::DoPlanExplainsStop(Event *event_ptr) {
5160c4118cSJim Ingham StopInfoSP stop_info_sp = GetPrivateStopInfo();
52b9c1b51eSKate Stone if (stop_info_sp) {
53bc1d7f7aSJim Ingham StopReason reason = stop_info_sp->GetStopReason();
548b91d0cdSJim Ingham
55a007a6d8SPavel Labath Log *log = GetLog(LLDBLog::Step);
56a4a08442SRaphael Isemann LLDB_LOG(log, "Step over breakpoint stopped for reason: {0}.",
57a4a08442SRaphael Isemann Thread::StopReasonAsString(reason));
58a435d733SJim Ingham
59b9c1b51eSKate Stone switch (reason) {
608b91d0cdSJim Ingham case eStopReasonTrace:
618b91d0cdSJim Ingham case eStopReasonNone:
6230fdc8d8SChris Lattner return true;
638b91d0cdSJim Ingham case eStopReasonBreakpoint:
64a435d733SJim Ingham {
65b9c1b51eSKate Stone // It's a little surprising that we stop here for a breakpoint hit.
6605097246SAdrian Prantl // However, when you single step ONTO a breakpoint we still want to call
6705097246SAdrian Prantl // that a breakpoint hit, and trigger the actions, etc. Otherwise you
68b9c1b51eSKate Stone // would see the PC at the breakpoint without having triggered the
6905097246SAdrian Prantl // actions, then you'd continue, the PC wouldn't change, and you'd see
70a435d733SJim Ingham // the breakpoint hit, which would be odd. So the lower levels fake
71a435d733SJim Ingham // "step onto breakpoint address" and return that as a breakpoint hit.
72a435d733SJim Ingham // So our trace step COULD appear as a breakpoint hit if the next
73a435d733SJim Ingham // instruction also contained a breakpoint. We don't want to handle
74a435d733SJim Ingham // that, since we really don't know what to do with breakpoint hits.
75a435d733SJim Ingham // But make sure we don't set ourselves to auto-continue or we'll wrench
76a435d733SJim Ingham // control away from the plans that can deal with this.
77a435d733SJim Ingham // Be careful, however, as we may have "seen a breakpoint under the PC
78a435d733SJim Ingham // because we stopped without changing the PC, in which case we do want
79a435d733SJim Ingham // to re-claim this stop so we'll try again.
80e4598dc0SJim Ingham lldb::addr_t pc_addr = GetThread().GetRegisterContext()->GetPC();
81a435d733SJim Ingham
82a435d733SJim Ingham if (pc_addr == m_breakpoint_addr) {
8363e5fb76SJonas Devlieghere LLDB_LOGF(log,
8463e5fb76SJonas Devlieghere "Got breakpoint stop reason but pc: 0x%" PRIx64
8563e5fb76SJonas Devlieghere "hasn't changed.",
8663e5fb76SJonas Devlieghere pc_addr);
87a435d733SJim Ingham return true;
88a435d733SJim Ingham }
89a435d733SJim Ingham
908b91d0cdSJim Ingham SetAutoContinue(false);
91bc1d7f7aSJim Ingham return false;
92a435d733SJim Ingham }
938b91d0cdSJim Ingham default:
948b91d0cdSJim Ingham return false;
958b91d0cdSJim Ingham }
96bc1d7f7aSJim Ingham }
97bc1d7f7aSJim Ingham return false;
9830fdc8d8SChris Lattner }
9930fdc8d8SChris Lattner
ShouldStop(Event * event_ptr)100b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::ShouldStop(Event *event_ptr) {
1018b91d0cdSJim Ingham return !ShouldAutoContinue(event_ptr);
10230fdc8d8SChris Lattner }
10330fdc8d8SChris Lattner
StopOthers()104b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::StopOthers() { return true; }
10530fdc8d8SChris Lattner
GetPlanRunState()106b9c1b51eSKate Stone StateType ThreadPlanStepOverBreakpoint::GetPlanRunState() {
10730fdc8d8SChris Lattner return eStateStepping;
10830fdc8d8SChris Lattner }
10930fdc8d8SChris Lattner
DoWillResume(StateType resume_state,bool current_plan)110b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::DoWillResume(StateType resume_state,
111b9c1b51eSKate Stone bool current_plan) {
112b9c1b51eSKate Stone if (current_plan) {
113b9c1b51eSKate Stone BreakpointSiteSP bp_site_sp(
114e4598dc0SJim Ingham m_process.GetBreakpointSiteList().FindByAddress(m_breakpoint_addr));
115a435d733SJim Ingham if (bp_site_sp && bp_site_sp->IsEnabled()) {
116e4598dc0SJim Ingham m_process.DisableBreakpointSite(bp_site_sp.get());
117a435d733SJim Ingham m_reenabled_breakpoint_site = false;
118a435d733SJim Ingham }
11930fdc8d8SChris Lattner }
12030fdc8d8SChris Lattner return true;
12130fdc8d8SChris Lattner }
12230fdc8d8SChris Lattner
WillStop()123b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::WillStop() {
1246e0ff1a3SGreg Clayton ReenableBreakpointSite();
12530fdc8d8SChris Lattner return true;
12630fdc8d8SChris Lattner }
12730fdc8d8SChris Lattner
DidPop()12841d0b20cSDave Lee void ThreadPlanStepOverBreakpoint::DidPop() { ReenableBreakpointSite(); }
129a435d733SJim Ingham
MischiefManaged()130b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::MischiefManaged() {
131e4598dc0SJim Ingham lldb::addr_t pc_addr = GetThread().GetRegisterContext()->GetPC();
13230fdc8d8SChris Lattner
133b9c1b51eSKate Stone if (pc_addr == m_breakpoint_addr) {
134b9c1b51eSKate Stone // If we are still at the PC of our breakpoint, then for some reason we
13505097246SAdrian Prantl // didn't get a chance to run.
13630fdc8d8SChris Lattner return false;
137b9c1b51eSKate Stone } else {
138a007a6d8SPavel Labath Log *log = GetLog(LLDBLog::Step);
13963e5fb76SJonas Devlieghere LLDB_LOGF(log, "Completed step over breakpoint plan.");
140b9c1b51eSKate Stone // Otherwise, re-enable the breakpoint we were stepping over, and we're
141b9c1b51eSKate Stone // done.
1426e0ff1a3SGreg Clayton ReenableBreakpointSite();
14330fdc8d8SChris Lattner ThreadPlan::MischiefManaged();
14430fdc8d8SChris Lattner return true;
14530fdc8d8SChris Lattner }
14630fdc8d8SChris Lattner }
14730fdc8d8SChris Lattner
ReenableBreakpointSite()148b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::ReenableBreakpointSite() {
149b9c1b51eSKate Stone if (!m_reenabled_breakpoint_site) {
1506e0ff1a3SGreg Clayton m_reenabled_breakpoint_site = true;
151b9c1b51eSKate Stone BreakpointSiteSP bp_site_sp(
152e4598dc0SJim Ingham m_process.GetBreakpointSiteList().FindByAddress(m_breakpoint_addr));
153b9c1b51eSKate Stone if (bp_site_sp) {
154e4598dc0SJim Ingham m_process.EnableBreakpointSite(bp_site_sp.get());
1556e0ff1a3SGreg Clayton }
1566e0ff1a3SGreg Clayton }
1576e0ff1a3SGreg Clayton }
ThreadDestroyed()158b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::ThreadDestroyed() {
1596e0ff1a3SGreg Clayton ReenableBreakpointSite();
1606e0ff1a3SGreg Clayton }
1616e0ff1a3SGreg Clayton
SetAutoContinue(bool do_it)162b9c1b51eSKate Stone void ThreadPlanStepOverBreakpoint::SetAutoContinue(bool do_it) {
163b01e742aSJim Ingham m_auto_continue = do_it;
164b01e742aSJim Ingham }
165b01e742aSJim Ingham
ShouldAutoContinue(Event * event_ptr)166b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::ShouldAutoContinue(Event *event_ptr) {
167b01e742aSJim Ingham return m_auto_continue;
168b01e742aSJim Ingham }
1698b91d0cdSJim Ingham
IsPlanStale()170b9c1b51eSKate Stone bool ThreadPlanStepOverBreakpoint::IsPlanStale() {
171e4598dc0SJim Ingham return GetThread().GetRegisterContext()->GetPC() != m_breakpoint_addr;
1728b91d0cdSJim Ingham }
173