| 1 | //===-- ThreadPlanCallUserExpression.cpp ----------------------------------===// |
| 2 | // |
| 3 | // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
| 4 | // See https://llvm.org/LICENSE.txt for license information. |
| 5 | // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
| 6 | // |
| 7 | //===----------------------------------------------------------------------===// |
| 8 | |
| 9 | #include "lldb/Target/ThreadPlanCallUserExpression.h" |
| 10 | |
| 11 | #include "lldb/Breakpoint/Breakpoint.h" |
| 12 | #include "lldb/Breakpoint/BreakpointLocation.h" |
| 13 | #include "lldb/Core/Address.h" |
| 14 | #include "lldb/Expression/DiagnosticManager.h" |
| 15 | #include "lldb/Expression/DynamicCheckerFunctions.h" |
| 16 | #include "lldb/Expression/UserExpression.h" |
| 17 | #include "lldb/Host/HostInfo.h" |
| 18 | #include "lldb/Target/LanguageRuntime.h" |
| 19 | #include "lldb/Target/Process.h" |
| 20 | #include "lldb/Target/RegisterContext.h" |
| 21 | #include "lldb/Target/StopInfo.h" |
| 22 | #include "lldb/Target/Target.h" |
| 23 | #include "lldb/Target/Thread.h" |
| 24 | #include "lldb/Target/ThreadPlanRunToAddress.h" |
| 25 | #include "lldb/Utility/LLDBLog.h" |
| 26 | #include "lldb/Utility/Log.h" |
| 27 | #include "lldb/Utility/Stream.h" |
| 28 | |
| 29 | using namespace lldb; |
| 30 | using namespace lldb_private; |
| 31 | |
| 32 | // ThreadPlanCallUserExpression: Plan to call a single function |
| 33 | |
| 34 | ThreadPlanCallUserExpression::ThreadPlanCallUserExpression( |
| 35 | Thread &thread, Address &function, llvm::ArrayRef<lldb::addr_t> args, |
| 36 | const EvaluateExpressionOptions &options, |
| 37 | lldb::UserExpressionSP &user_expression_sp) |
| 38 | : ThreadPlanCallFunction(thread, function, CompilerType(), args, options), |
| 39 | m_user_expression_sp(user_expression_sp) { |
| 40 | // User expressions are generally "User generated" so we should set them up |
| 41 | // to stop when done. |
| 42 | SetIsControllingPlan(true); |
| 43 | SetOkayToDiscard(false); |
| 44 | } |
| 45 | |
| 46 | ThreadPlanCallUserExpression::~ThreadPlanCallUserExpression() = default; |
| 47 | |
| 48 | void ThreadPlanCallUserExpression::GetDescription( |
| 49 | Stream *s, lldb::DescriptionLevel level) { |
| 50 | if (level == eDescriptionLevelBrief) |
| 51 | s->Printf(format: "User Expression thread plan" ); |
| 52 | else |
| 53 | ThreadPlanCallFunction::GetDescription(s, level); |
| 54 | } |
| 55 | |
| 56 | void ThreadPlanCallUserExpression::DidPush() { |
| 57 | ThreadPlanCallFunction::DidPush(); |
| 58 | if (m_user_expression_sp) |
| 59 | m_user_expression_sp->WillStartExecuting(); |
| 60 | } |
| 61 | |
| 62 | void ThreadPlanCallUserExpression::DidPop() { |
| 63 | ThreadPlanCallFunction::DidPop(); |
| 64 | if (m_user_expression_sp) |
| 65 | m_user_expression_sp.reset(); |
| 66 | } |
| 67 | |
| 68 | bool ThreadPlanCallUserExpression::MischiefManaged() { |
| 69 | Log *log = GetLog(mask: LLDBLog::Step); |
| 70 | |
| 71 | if (IsPlanComplete()) { |
| 72 | LLDB_LOGF(log, "ThreadPlanCallFunction(%p): Completed call function plan." , |
| 73 | static_cast<void *>(this)); |
| 74 | |
| 75 | if (m_manage_materialization && PlanSucceeded() && m_user_expression_sp) { |
| 76 | lldb::addr_t function_stack_top; |
| 77 | lldb::addr_t function_stack_bottom; |
| 78 | lldb::addr_t function_stack_pointer = GetFunctionStackPointer(); |
| 79 | |
| 80 | function_stack_bottom = function_stack_pointer - HostInfo::GetPageSize(); |
| 81 | function_stack_top = function_stack_pointer; |
| 82 | |
| 83 | DiagnosticManager diagnostics; |
| 84 | |
| 85 | ExecutionContext exe_ctx(GetThread()); |
| 86 | |
| 87 | m_user_expression_sp->FinalizeJITExecution( |
| 88 | diagnostic_manager&: diagnostics, exe_ctx, result&: m_result_var_sp, function_stack_bottom, |
| 89 | function_stack_top); |
| 90 | } |
| 91 | |
| 92 | ThreadPlan::MischiefManaged(); |
| 93 | return true; |
| 94 | } else { |
| 95 | return false; |
| 96 | } |
| 97 | } |
| 98 | |
| 99 | StopInfoSP ThreadPlanCallUserExpression::GetRealStopInfo() { |
| 100 | StopInfoSP stop_info_sp = ThreadPlanCallFunction::GetRealStopInfo(); |
| 101 | |
| 102 | if (stop_info_sp) { |
| 103 | lldb::addr_t addr = GetStopAddress(); |
| 104 | DynamicCheckerFunctions *checkers = m_process.GetDynamicCheckers(); |
| 105 | StreamString s; |
| 106 | |
| 107 | if (checkers && checkers->DoCheckersExplainStop(addr, message&: s)) |
| 108 | stop_info_sp->SetDescription(s.GetData()); |
| 109 | } |
| 110 | |
| 111 | return stop_info_sp; |
| 112 | } |
| 113 | |
| 114 | void ThreadPlanCallUserExpression::DoTakedown(bool success) { |
| 115 | ThreadPlanCallFunction::DoTakedown(success); |
| 116 | m_user_expression_sp->DidFinishExecuting(); |
| 117 | } |
| 118 | |