532e4203c5
Adds support for running a Lua function when a breakpoint is hit. Example: breakpoint command add -s lua -F abc The above runs the Lua function 'abc' passing 2 arguments. 'frame', 'bp_loc' and 'extra_args'. A third parameter 'extra_args' is only present when there is structured data declared in the command line. Example: breakpoint command add -s lua -F abc -k foo -v bar Differential Revision: https://reviews.llvm.org/D93649
58 lines
1.3 KiB
Plaintext
58 lines
1.3 KiB
Plaintext
%header %{
|
|
|
|
template <typename T>
|
|
void
|
|
PushSBClass(lua_State* L, T* obj);
|
|
|
|
%}
|
|
|
|
%wrapper %{
|
|
|
|
// This function is called from Lua::CallBreakpointCallback
|
|
SWIGEXPORT llvm::Expected<bool>
|
|
LLDBSwigLuaBreakpointCallbackFunction
|
|
(
|
|
lua_State *L,
|
|
lldb::StackFrameSP stop_frame_sp,
|
|
lldb::BreakpointLocationSP bp_loc_sp,
|
|
StructuredDataImpl *extra_args_impl
|
|
)
|
|
{
|
|
lldb::SBFrame sb_frame(stop_frame_sp);
|
|
lldb::SBBreakpointLocation sb_bp_loc(bp_loc_sp);
|
|
int nargs = 2;
|
|
|
|
llvm::Optional<lldb::SBStructuredData> extra_args;
|
|
if (extra_args_impl)
|
|
extra_args = lldb::SBStructuredData(extra_args_impl);
|
|
|
|
// Push the Lua wrappers
|
|
PushSBClass(L, &sb_frame);
|
|
PushSBClass(L, &sb_bp_loc);
|
|
|
|
if (extra_args.hasValue()) {
|
|
PushSBClass(L, extra_args.getPointer());
|
|
nargs++;
|
|
}
|
|
|
|
// Call into the Lua callback passing 'sb_frame' and 'sb_bp_loc'.
|
|
// Expects a boolean return.
|
|
if (lua_pcall(L, nargs, 1, 0) != LUA_OK) {
|
|
llvm::Error E = llvm::make_error<llvm::StringError>(
|
|
llvm::formatv("{0}\n", lua_tostring(L, -1)),
|
|
llvm::inconvertibleErrorCode());
|
|
// Pop error message from the stack.
|
|
lua_pop(L, 1);
|
|
return std::move(E);
|
|
}
|
|
|
|
// Boolean return from the callback
|
|
bool stop = lua_toboolean(L, -1);
|
|
lua_pop(L, 1);
|
|
|
|
return stop;
|
|
}
|
|
|
|
|
|
%}
|