130fdc8d8SChris Lattner //===-- CommandObjectBreakpointCommand.cpp ----------------------*- C++ -*-===// 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 "CommandObjectBreakpointCommand.h" 1030fdc8d8SChris Lattner #include "CommandObjectBreakpoint.h" 11b9c1b51eSKate Stone #include "lldb/Breakpoint/Breakpoint.h" 12b9c1b51eSKate Stone #include "lldb/Breakpoint/BreakpointIDList.h" 13b9c1b51eSKate Stone #include "lldb/Breakpoint/BreakpointLocation.h" 1444d93782SGreg Clayton #include "lldb/Core/IOHandler.h" 153eb2b44dSZachary Turner #include "lldb/Host/OptionParser.h" 1630fdc8d8SChris Lattner #include "lldb/Interpreter/CommandInterpreter.h" 1730fdc8d8SChris Lattner #include "lldb/Interpreter/CommandReturnObject.h" 1847cbf4a0SPavel Labath #include "lldb/Interpreter/OptionArgParser.h" 19738af7a6SJim Ingham #include "lldb/Interpreter/OptionGroupPythonClassWithDict.h" 2030fdc8d8SChris Lattner #include "lldb/Target/Target.h" 2130fdc8d8SChris Lattner 2230fdc8d8SChris Lattner using namespace lldb; 2330fdc8d8SChris Lattner using namespace lldb_private; 2430fdc8d8SChris Lattner 251f0f5b5bSZachary Turner // FIXME: "script-type" needs to have its contents determined dynamically, so 26e063ecccSJonas Devlieghere // somebody can add a new scripting language to lldb and have it pickable here 27e063ecccSJonas Devlieghere // without having to change this enumeration by hand and rebuild lldb proper. 288fe53c49STatyana Krasnukha static constexpr OptionEnumValueElement g_script_option_enumeration[] = { 29e063ecccSJonas Devlieghere { 30e063ecccSJonas Devlieghere eScriptLanguageNone, 31e063ecccSJonas Devlieghere "command", 32e063ecccSJonas Devlieghere "Commands are in the lldb command interpreter language", 33e063ecccSJonas Devlieghere }, 34e063ecccSJonas Devlieghere { 35e063ecccSJonas Devlieghere eScriptLanguagePython, 36e063ecccSJonas Devlieghere "python", 37e063ecccSJonas Devlieghere "Commands are in the Python language.", 38e063ecccSJonas Devlieghere }, 39e063ecccSJonas Devlieghere { 408983d691SJonas Devlieghere eScriptLanguageLua, 418983d691SJonas Devlieghere "lua", 428983d691SJonas Devlieghere "Commands are in the Lua language.", 438983d691SJonas Devlieghere }, 448983d691SJonas Devlieghere { 458983d691SJonas Devlieghere eScriptLanguageDefault, 46e063ecccSJonas Devlieghere "default-script", 47e063ecccSJonas Devlieghere "Commands are in the default scripting language.", 48e063ecccSJonas Devlieghere }, 49e063ecccSJonas Devlieghere }; 501f0f5b5bSZachary Turner 518fe53c49STatyana Krasnukha static constexpr OptionEnumValues ScriptOptionEnum() { 528fe53c49STatyana Krasnukha return OptionEnumValues(g_script_option_enumeration); 538fe53c49STatyana Krasnukha } 548fe53c49STatyana Krasnukha 55f94668e3SRaphael Isemann #define LLDB_OPTIONS_breakpoint_command_add 56f94668e3SRaphael Isemann #include "CommandOptions.inc" 571f0f5b5bSZachary Turner 58b9c1b51eSKate Stone class CommandObjectBreakpointCommandAdd : public CommandObjectParsed, 59b9c1b51eSKate Stone public IOHandlerDelegateMultiline { 605a988416SJim Ingham public: 617428a18cSKate Stone CommandObjectBreakpointCommandAdd(CommandInterpreter &interpreter) 627428a18cSKate Stone : CommandObjectParsed(interpreter, "add", 63b9c1b51eSKate Stone "Add LLDB commands to a breakpoint, to be executed " 64b9c1b51eSKate Stone "whenever the breakpoint is hit." 65b9c1b51eSKate Stone " If no breakpoint is specified, adds the " 66b9c1b51eSKate Stone "commands to the last created breakpoint.", 67c8ecc2a9SEugene Zelenko nullptr), 68b9c1b51eSKate Stone IOHandlerDelegateMultiline("DONE", 69b9c1b51eSKate Stone IOHandlerDelegate::Completion::LLDBCommand), 70738af7a6SJim Ingham m_options(), m_func_options("breakpoint command", false, 'F') { 7130fdc8d8SChris Lattner SetHelpLong( 72ea671fbdSKate Stone R"( 73ea671fbdSKate Stone General information about entering breakpoint commands 74ea671fbdSKate Stone ------------------------------------------------------ 75ea671fbdSKate Stone 76b9c1b51eSKate Stone )" 77b9c1b51eSKate Stone "This command will prompt for commands to be executed when the specified \ 78ea671fbdSKate Stone breakpoint is hit. Each command is typed on its own line following the '> ' \ 79b9c1b51eSKate Stone prompt until 'DONE' is entered." 80b9c1b51eSKate Stone R"( 81ea671fbdSKate Stone 82b9c1b51eSKate Stone )" 83b9c1b51eSKate Stone "Syntactic errors may not be detected when initially entered, and many \ 84ea671fbdSKate Stone malformed commands can silently fail when executed. If your breakpoint commands \ 85b9c1b51eSKate Stone do not appear to be executing, double-check the command syntax." 86b9c1b51eSKate Stone R"( 87ea671fbdSKate Stone 88b9c1b51eSKate Stone )" 89b9c1b51eSKate Stone "Note: You may enter any debugger command exactly as you would at the debugger \ 90ea671fbdSKate Stone prompt. There is no limit to the number of commands supplied, but do NOT enter \ 91b9c1b51eSKate Stone more than one command per line." 92b9c1b51eSKate Stone R"( 93ea671fbdSKate Stone 94ea671fbdSKate Stone Special information about PYTHON breakpoint commands 95ea671fbdSKate Stone ---------------------------------------------------- 96ea671fbdSKate Stone 97b9c1b51eSKate Stone )" 98b9c1b51eSKate Stone "You may enter either one or more lines of Python, including function \ 99ea671fbdSKate Stone definitions or calls to functions that will have been imported by the time \ 100ea671fbdSKate Stone the code executes. Single line breakpoint commands will be interpreted 'as is' \ 101ea671fbdSKate Stone when the breakpoint is hit. Multiple lines of Python will be wrapped in a \ 102b9c1b51eSKate Stone generated function, and a call to the function will be attached to the breakpoint." 103b9c1b51eSKate Stone R"( 104ea671fbdSKate Stone 105ea671fbdSKate Stone This auto-generated function is passed in three arguments: 106ea671fbdSKate Stone 107ea671fbdSKate Stone frame: an lldb.SBFrame object for the frame which hit breakpoint. 108ea671fbdSKate Stone 109ea671fbdSKate Stone bp_loc: an lldb.SBBreakpointLocation object that represents the breakpoint location that was hit. 110ea671fbdSKate Stone 111ea671fbdSKate Stone dict: the python session dictionary hit. 112ea671fbdSKate Stone 113b9c1b51eSKate Stone )" 114b9c1b51eSKate Stone "When specifying a python function with the --python-function option, you need \ 115b9c1b51eSKate Stone to supply the function name prepended by the module name:" 116b9c1b51eSKate Stone R"( 117ea671fbdSKate Stone 118ea671fbdSKate Stone --python-function myutils.breakpoint_callback 119ea671fbdSKate Stone 120ea671fbdSKate Stone The function itself must have the following prototype: 121ea671fbdSKate Stone 122ea671fbdSKate Stone def breakpoint_callback(frame, bp_loc, dict): 123ea671fbdSKate Stone # Your code goes here 124ea671fbdSKate Stone 125b9c1b51eSKate Stone )" 126b9c1b51eSKate Stone "The arguments are the same as the arguments passed to generated functions as \ 127ea671fbdSKate Stone described above. Note that the global variable 'lldb.frame' will NOT be updated when \ 128ea671fbdSKate Stone this function is called, so be sure to use the 'frame' argument. The 'frame' argument \ 129ea671fbdSKate Stone can get you to the thread via frame.GetThread(), the thread can get you to the \ 130ea671fbdSKate Stone process via thread.GetProcess(), and the process can get you back to the target \ 131b9c1b51eSKate Stone via process.GetTarget()." 132b9c1b51eSKate Stone R"( 133ea671fbdSKate Stone 134b9c1b51eSKate Stone )" 135b9c1b51eSKate Stone "Important Note: As Python code gets collected into functions, access to global \ 136ea671fbdSKate Stone variables requires explicit scoping using the 'global' keyword. Be sure to use correct \ 137b9c1b51eSKate Stone Python syntax, including indentation, when entering Python breakpoint commands." 138b9c1b51eSKate Stone R"( 139ea671fbdSKate Stone 140ea671fbdSKate Stone Example Python one-line breakpoint command: 141ea671fbdSKate Stone 142ea671fbdSKate Stone (lldb) breakpoint command add -s python 1 143ea671fbdSKate Stone Enter your Python command(s). Type 'DONE' to end. 144ea671fbdSKate Stone > print "Hit this breakpoint!" 145ea671fbdSKate Stone > DONE 146ea671fbdSKate Stone 147ea671fbdSKate Stone As a convenience, this also works for a short Python one-liner: 148ea671fbdSKate Stone 149ea671fbdSKate Stone (lldb) breakpoint command add -s python 1 -o 'import time; print time.asctime()' 150ea671fbdSKate Stone (lldb) run 151ea671fbdSKate Stone Launching '.../a.out' (x86_64) 152ea671fbdSKate Stone (lldb) Fri Sep 10 12:17:45 2010 153ea671fbdSKate Stone Process 21778 Stopped 154ea671fbdSKate Stone * thread #1: tid = 0x2e03, 0x0000000100000de8 a.out`c + 7 at main.c:39, stop reason = breakpoint 1.1, queue = com.apple.main-thread 155ea671fbdSKate Stone 36 156ea671fbdSKate Stone 37 int c(int val) 157ea671fbdSKate Stone 38 { 158ea671fbdSKate Stone 39 -> return val + 3; 159ea671fbdSKate Stone 40 } 160ea671fbdSKate Stone 41 161ea671fbdSKate Stone 42 int main (int argc, char const *argv[]) 162ea671fbdSKate Stone 163ea671fbdSKate Stone Example multiple line Python breakpoint command: 164ea671fbdSKate Stone 165ea671fbdSKate Stone (lldb) breakpoint command add -s p 1 166ea671fbdSKate Stone Enter your Python command(s). Type 'DONE' to end. 167ea671fbdSKate Stone > global bp_count 168ea671fbdSKate Stone > bp_count = bp_count + 1 169ea671fbdSKate Stone > print "Hit this breakpoint " + repr(bp_count) + " times!" 170ea671fbdSKate Stone > DONE 171ea671fbdSKate Stone 172ea671fbdSKate Stone Example multiple line Python breakpoint command, using function definition: 173ea671fbdSKate Stone 174ea671fbdSKate Stone (lldb) breakpoint command add -s python 1 175ea671fbdSKate Stone Enter your Python command(s). Type 'DONE' to end. 176ea671fbdSKate Stone > def breakpoint_output (bp_no): 177ea671fbdSKate Stone > out_string = "Hit breakpoint number " + repr (bp_no) 178ea671fbdSKate Stone > print out_string 179ea671fbdSKate Stone > return True 180ea671fbdSKate Stone > breakpoint_output (1) 181ea671fbdSKate Stone > DONE 182ea671fbdSKate Stone 183b9c1b51eSKate Stone )" 184b9c1b51eSKate Stone "In this case, since there is a reference to a global variable, \ 185ea671fbdSKate Stone 'bp_count', you will also need to make sure 'bp_count' exists and is \ 186b9c1b51eSKate Stone initialized:" 187b9c1b51eSKate Stone R"( 188ea671fbdSKate Stone 189ea671fbdSKate Stone (lldb) script 190ea671fbdSKate Stone >>> bp_count = 0 191ea671fbdSKate Stone >>> quit() 192ea671fbdSKate Stone 193b9c1b51eSKate Stone )" 194b9c1b51eSKate Stone "Your Python code, however organized, can optionally return a value. \ 195ea671fbdSKate Stone If the returned value is False, that tells LLDB not to stop at the breakpoint \ 196ea671fbdSKate Stone to which the code is associated. Returning anything other than False, or even \ 197ea671fbdSKate Stone returning None, or even omitting a return statement entirely, will cause \ 198b9c1b51eSKate Stone LLDB to stop." 199b9c1b51eSKate Stone R"( 200ea671fbdSKate Stone 201b9c1b51eSKate Stone )" 202b9c1b51eSKate Stone "Final Note: A warning that no breakpoint command was generated when there \ 203b9c1b51eSKate Stone are no syntax errors may indicate that a function was declared but never called."); 204405fe67fSCaroline Tice 205738af7a6SJim Ingham m_all_options.Append(&m_options); 206738af7a6SJim Ingham m_all_options.Append(&m_func_options, LLDB_OPT_SET_2 | LLDB_OPT_SET_3, 207738af7a6SJim Ingham LLDB_OPT_SET_2); 208738af7a6SJim Ingham m_all_options.Finalize(); 209738af7a6SJim Ingham 210405fe67fSCaroline Tice CommandArgumentEntry arg; 211405fe67fSCaroline Tice CommandArgumentData bp_id_arg; 212405fe67fSCaroline Tice 213405fe67fSCaroline Tice // Define the first (and only) variant of this arg. 214405fe67fSCaroline Tice bp_id_arg.arg_type = eArgTypeBreakpointID; 2151bb0750bSJim Ingham bp_id_arg.arg_repetition = eArgRepeatOptional; 216405fe67fSCaroline Tice 217b9c1b51eSKate Stone // There is only one variant this argument could be; put it into the 218b9c1b51eSKate Stone // argument entry. 219405fe67fSCaroline Tice arg.push_back(bp_id_arg); 220405fe67fSCaroline Tice 221405fe67fSCaroline Tice // Push the data for the first argument into the m_arguments vector. 222405fe67fSCaroline Tice m_arguments.push_back(arg); 22330fdc8d8SChris Lattner } 22430fdc8d8SChris Lattner 225c8ecc2a9SEugene Zelenko ~CommandObjectBreakpointCommandAdd() override = default; 2265a988416SJim Ingham 227738af7a6SJim Ingham Options *GetOptions() override { return &m_all_options; } 2285a988416SJim Ingham 2290affb582SDave Lee void IOHandlerActivated(IOHandler &io_handler, bool interactive) override { 2307ca15ba7SLawrence D'Anna StreamFileSP output_sp(io_handler.GetOutputStreamFileSP()); 2310affb582SDave Lee if (output_sp && interactive) { 23244d93782SGreg Clayton output_sp->PutCString(g_reader_instructions); 23344d93782SGreg Clayton output_sp->Flush(); 23444d93782SGreg Clayton } 23544d93782SGreg Clayton } 23644d93782SGreg Clayton 237b9c1b51eSKate Stone void IOHandlerInputComplete(IOHandler &io_handler, 238b9c1b51eSKate Stone std::string &line) override { 23944d93782SGreg Clayton io_handler.SetIsDone(true); 24044d93782SGreg Clayton 241b9c1b51eSKate Stone std::vector<BreakpointOptions *> *bp_options_vec = 242b9c1b51eSKate Stone (std::vector<BreakpointOptions *> *)io_handler.GetUserData(); 243b9c1b51eSKate Stone for (BreakpointOptions *bp_options : *bp_options_vec) { 244b5796cb4SJim Ingham if (!bp_options) 245b5796cb4SJim Ingham continue; 246b5796cb4SJim Ingham 247a8f3ae7cSJonas Devlieghere auto cmd_data = std::make_unique<BreakpointOptions::CommandData>(); 248e14dc268SJim Ingham cmd_data->user_source.SplitIntoLines(line.c_str(), line.size()); 24992d1960eSJim Ingham bp_options->SetCommandDataCallback(cmd_data); 25044d93782SGreg Clayton } 25144d93782SGreg Clayton } 25244d93782SGreg Clayton 253b9c1b51eSKate Stone void CollectDataForBreakpointCommandCallback( 254b9c1b51eSKate Stone std::vector<BreakpointOptions *> &bp_options_vec, 255b9c1b51eSKate Stone CommandReturnObject &result) { 256b9c1b51eSKate Stone m_interpreter.GetLLDBCommandsFromIOHandler( 257b9c1b51eSKate Stone "> ", // Prompt 25844d93782SGreg Clayton *this, // IOHandlerDelegate 25944d93782SGreg Clayton true, // Run IOHandler in async mode 260b9c1b51eSKate Stone &bp_options_vec); // Baton for the "io_handler" that will be passed back 261b9c1b51eSKate Stone // into our IOHandlerDelegate functions 2625a988416SJim Ingham } 2635a988416SJim Ingham 2645a988416SJim Ingham /// Set a one-liner as the callback for the breakpoint. 2655a988416SJim Ingham void 266b5796cb4SJim Ingham SetBreakpointCommandCallback(std::vector<BreakpointOptions *> &bp_options_vec, 267b9c1b51eSKate Stone const char *oneliner) { 268b9c1b51eSKate Stone for (auto bp_options : bp_options_vec) { 269a8f3ae7cSJonas Devlieghere auto cmd_data = std::make_unique<BreakpointOptions::CommandData>(); 2705a988416SJim Ingham 271e14dc268SJim Ingham cmd_data->user_source.AppendString(oneliner); 272e14dc268SJim Ingham cmd_data->stop_on_error = m_options.m_stop_on_error; 2735a988416SJim Ingham 27492d1960eSJim Ingham bp_options->SetCommandDataCallback(cmd_data); 275b5796cb4SJim Ingham } 2765a988416SJim Ingham } 2775a988416SJim Ingham 278738af7a6SJim Ingham class CommandOptions : public OptionGroup { 2795a988416SJim Ingham public: 280b9c1b51eSKate Stone CommandOptions() 281738af7a6SJim Ingham : OptionGroup(), m_use_commands(false), m_use_script_language(false), 282b9c1b51eSKate Stone m_script_language(eScriptLanguageNone), m_use_one_liner(false), 283738af7a6SJim Ingham m_one_liner() {} 28430fdc8d8SChris Lattner 285c8ecc2a9SEugene Zelenko ~CommandOptions() override = default; 2865a988416SJim Ingham 28797206d57SZachary Turner Status SetOptionValue(uint32_t option_idx, llvm::StringRef option_arg, 288b9c1b51eSKate Stone ExecutionContext *execution_context) override { 28997206d57SZachary Turner Status error; 290a925974bSAdrian Prantl const int short_option = 291a925974bSAdrian Prantl g_breakpoint_command_add_options[option_idx].short_option; 2925a988416SJim Ingham 293b9c1b51eSKate Stone switch (short_option) { 2945a988416SJim Ingham case 'o': 2955a988416SJim Ingham m_use_one_liner = true; 2965a988416SJim Ingham m_one_liner = option_arg; 2975a988416SJim Ingham break; 2985a988416SJim Ingham 2995a988416SJim Ingham case 's': 30047cbf4a0SPavel Labath m_script_language = (lldb::ScriptLanguage)OptionArgParser::ToOptionEnum( 301bd68a052SRaphael Isemann option_arg, 302bd68a052SRaphael Isemann g_breakpoint_command_add_options[option_idx].enum_values, 303b9c1b51eSKate Stone eScriptLanguageNone, error); 3048983d691SJonas Devlieghere switch (m_script_language) { 3058983d691SJonas Devlieghere case eScriptLanguagePython: 3068983d691SJonas Devlieghere case eScriptLanguageLua: 3075a988416SJim Ingham m_use_script_language = true; 3088983d691SJonas Devlieghere break; 3098983d691SJonas Devlieghere case eScriptLanguageNone: 3105a988416SJim Ingham m_use_script_language = false; 3118983d691SJonas Devlieghere break; 3125a988416SJim Ingham } 3135a988416SJim Ingham break; 3145a988416SJim Ingham 315b9c1b51eSKate Stone case 'e': { 3165a988416SJim Ingham bool success = false; 31747cbf4a0SPavel Labath m_stop_on_error = 31847cbf4a0SPavel Labath OptionArgParser::ToBoolean(option_arg, false, &success); 3195a988416SJim Ingham if (!success) 320b9c1b51eSKate Stone error.SetErrorStringWithFormat( 321fe11483bSZachary Turner "invalid value for stop-on-error: \"%s\"", 322fe11483bSZachary Turner option_arg.str().c_str()); 323b9c1b51eSKate Stone } break; 3245a988416SJim Ingham 32533df7cd3SJim Ingham case 'D': 32633df7cd3SJim Ingham m_use_dummy = true; 32733df7cd3SJim Ingham break; 32833df7cd3SJim Ingham 3295a988416SJim Ingham default: 33036162014SRaphael Isemann llvm_unreachable("Unimplemented option"); 3315a988416SJim Ingham } 3325a988416SJim Ingham return error; 3335a988416SJim Ingham } 334c8ecc2a9SEugene Zelenko 335b9c1b51eSKate Stone void OptionParsingStarting(ExecutionContext *execution_context) override { 3365a988416SJim Ingham m_use_commands = true; 3375a988416SJim Ingham m_use_script_language = false; 3385a988416SJim Ingham m_script_language = eScriptLanguageNone; 3395a988416SJim Ingham 3405a988416SJim Ingham m_use_one_liner = false; 3415a988416SJim Ingham m_stop_on_error = true; 3425a988416SJim Ingham m_one_liner.clear(); 34333df7cd3SJim Ingham m_use_dummy = false; 3445a988416SJim Ingham } 3455a988416SJim Ingham 3461f0f5b5bSZachary Turner llvm::ArrayRef<OptionDefinition> GetDefinitions() override { 347bd68a052SRaphael Isemann return llvm::makeArrayRef(g_breakpoint_command_add_options); 3481f0f5b5bSZachary Turner } 3495a988416SJim Ingham 3505a988416SJim Ingham // Instance variables to hold the values for command options. 3515a988416SJim Ingham 3525a988416SJim Ingham bool m_use_commands; 3535a988416SJim Ingham bool m_use_script_language; 3545a988416SJim Ingham lldb::ScriptLanguage m_script_language; 3555a988416SJim Ingham 3565a988416SJim Ingham // Instance variables to hold the values for one_liner options. 3575a988416SJim Ingham bool m_use_one_liner; 3585a988416SJim Ingham std::string m_one_liner; 3595a988416SJim Ingham bool m_stop_on_error; 36033df7cd3SJim Ingham bool m_use_dummy; 3615a988416SJim Ingham }; 3625a988416SJim Ingham 3635a988416SJim Ingham protected: 364b9c1b51eSKate Stone bool DoExecute(Args &command, CommandReturnObject &result) override { 365cb2380c9SRaphael Isemann Target &target = GetSelectedOrDummyTarget(m_options.m_use_dummy); 36630fdc8d8SChris Lattner 367cb2380c9SRaphael Isemann const BreakpointList &breakpoints = target.GetBreakpointList(); 36830fdc8d8SChris Lattner size_t num_breakpoints = breakpoints.GetSize(); 36930fdc8d8SChris Lattner 370b9c1b51eSKate Stone if (num_breakpoints == 0) { 37130fdc8d8SChris Lattner result.AppendError("No breakpoints exist to have commands added"); 37230fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 37330fdc8d8SChris Lattner return false; 37430fdc8d8SChris Lattner } 37530fdc8d8SChris Lattner 376738af7a6SJim Ingham if (!m_func_options.GetName().empty()) { 377738af7a6SJim Ingham m_options.m_use_one_liner = false; 378*1ff01cfeSJonas Devlieghere if (!m_options.m_use_script_language) { 379*1ff01cfeSJonas Devlieghere m_options.m_script_language = GetDebugger().GetScriptLanguage(); 380738af7a6SJim Ingham m_options.m_use_script_language = true; 3818d4a8010SEnrico Granata } 382*1ff01cfeSJonas Devlieghere } 3838d4a8010SEnrico Granata 38430fdc8d8SChris Lattner BreakpointIDList valid_bp_ids; 385b9c1b51eSKate Stone CommandObjectMultiwordBreakpoint::VerifyBreakpointOrLocationIDs( 386cb2380c9SRaphael Isemann command, &target, result, &valid_bp_ids, 387b842f2ecSJim Ingham BreakpointName::Permissions::PermissionKinds::listPerm); 38830fdc8d8SChris Lattner 389b5796cb4SJim Ingham m_bp_options_vec.clear(); 390b5796cb4SJim Ingham 391b9c1b51eSKate Stone if (result.Succeeded()) { 392c982c768SGreg Clayton const size_t count = valid_bp_ids.GetSize(); 393d9916eaeSJim Ingham 394b9c1b51eSKate Stone for (size_t i = 0; i < count; ++i) { 39530fdc8d8SChris Lattner BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex(i); 396b9c1b51eSKate Stone if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID) { 397b9c1b51eSKate Stone Breakpoint *bp = 398cb2380c9SRaphael Isemann target.GetBreakpointByID(cur_bp_id.GetBreakpointID()).get(); 399c8ecc2a9SEugene Zelenko BreakpointOptions *bp_options = nullptr; 400b9c1b51eSKate Stone if (cur_bp_id.GetLocationID() == LLDB_INVALID_BREAK_ID) { 40139d7d4f0SJohnny Chen // This breakpoint does not have an associated location. 40239d7d4f0SJohnny Chen bp_options = bp->GetOptions(); 403b9c1b51eSKate Stone } else { 404b9c1b51eSKate Stone BreakpointLocationSP bp_loc_sp( 405b9c1b51eSKate Stone bp->FindLocationByID(cur_bp_id.GetLocationID())); 40605097246SAdrian Prantl // This breakpoint does have an associated location. Get its 40705097246SAdrian Prantl // breakpoint options. 40830fdc8d8SChris Lattner if (bp_loc_sp) 40939d7d4f0SJohnny Chen bp_options = bp_loc_sp->GetLocationOptions(); 41039d7d4f0SJohnny Chen } 411b5796cb4SJim Ingham if (bp_options) 412b5796cb4SJim Ingham m_bp_options_vec.push_back(bp_options); 413b5796cb4SJim Ingham } 414b5796cb4SJim Ingham } 41539d7d4f0SJohnny Chen 41605097246SAdrian Prantl // If we are using script language, get the script interpreter in order 41705097246SAdrian Prantl // to set or collect command callback. Otherwise, call the methods 41805097246SAdrian Prantl // associated with this object. 419b9c1b51eSKate Stone if (m_options.m_use_script_language) { 4205e32eb1cSJonas Devlieghere ScriptInterpreter *script_interp = GetDebugger().GetScriptInterpreter( 4215e32eb1cSJonas Devlieghere /*can_create=*/true, m_options.m_script_language); 42239d7d4f0SJohnny Chen // Special handling for one-liner specified inline. 423b9c1b51eSKate Stone if (m_options.m_use_one_liner) { 424b9c1b51eSKate Stone script_interp->SetBreakpointCommandCallback( 425b9c1b51eSKate Stone m_bp_options_vec, m_options.m_one_liner.c_str()); 426738af7a6SJim Ingham } else if (!m_func_options.GetName().empty()) { 427738af7a6SJim Ingham Status error = script_interp->SetBreakpointCommandCallbackFunction( 428738af7a6SJim Ingham m_bp_options_vec, m_func_options.GetName().c_str(), 429738af7a6SJim Ingham m_func_options.GetStructuredData()); 430738af7a6SJim Ingham if (!error.Success()) 431738af7a6SJim Ingham result.SetError(error); 432b9c1b51eSKate Stone } else { 433b9c1b51eSKate Stone script_interp->CollectDataForBreakpointCommandCallback( 434b9c1b51eSKate Stone m_bp_options_vec, result); 4358d4a8010SEnrico Granata } 436b9c1b51eSKate Stone } else { 43739d7d4f0SJohnny Chen // Special handling for one-liner specified inline. 43839d7d4f0SJohnny Chen if (m_options.m_use_one_liner) 439b5796cb4SJim Ingham SetBreakpointCommandCallback(m_bp_options_vec, 44039d7d4f0SJohnny Chen m_options.m_one_liner.c_str()); 44139d7d4f0SJohnny Chen else 442b9c1b51eSKate Stone CollectDataForBreakpointCommandCallback(m_bp_options_vec, result); 44330fdc8d8SChris Lattner } 44430fdc8d8SChris Lattner } 44530fdc8d8SChris Lattner 44630fdc8d8SChris Lattner return result.Succeeded(); 44730fdc8d8SChris Lattner } 44830fdc8d8SChris Lattner 4495a988416SJim Ingham private: 4505a988416SJim Ingham CommandOptions m_options; 451738af7a6SJim Ingham OptionGroupPythonClassWithDict m_func_options; 452738af7a6SJim Ingham OptionGroupOptions m_all_options; 453738af7a6SJim Ingham 454b9c1b51eSKate Stone std::vector<BreakpointOptions *> m_bp_options_vec; // This stores the 455b9c1b51eSKate Stone // breakpoint options that 456b9c1b51eSKate Stone // we are currently 45705097246SAdrian Prantl // collecting commands for. In the CollectData... calls we need to hand this 45805097246SAdrian Prantl // off to the IOHandler, which may run asynchronously. So we have to have 45905097246SAdrian Prantl // some way to keep it alive, and not leak it. Making it an ivar of the 46005097246SAdrian Prantl // command object, which never goes away achieves this. Note that if we were 46105097246SAdrian Prantl // able to run the same command concurrently in one interpreter we'd have to 46205097246SAdrian Prantl // make this "per invocation". But there are many more reasons why it is not 46305097246SAdrian Prantl // in general safe to do that in lldb at present, so it isn't worthwhile to 46405097246SAdrian Prantl // come up with a more complex mechanism to address this particular weakness 46505097246SAdrian Prantl // right now. 4665a988416SJim Ingham static const char *g_reader_instructions; 4675a988416SJim Ingham }; 4685a988416SJim Ingham 469b9c1b51eSKate Stone const char *CommandObjectBreakpointCommandAdd::g_reader_instructions = 470b9c1b51eSKate Stone "Enter your debugger command(s). Type 'DONE' to end.\n"; 4715a988416SJim Ingham 47293e0f19fSCaroline Tice // CommandObjectBreakpointCommandDelete 47330fdc8d8SChris Lattner 474f94668e3SRaphael Isemann #define LLDB_OPTIONS_breakpoint_command_delete 475f94668e3SRaphael Isemann #include "CommandOptions.inc" 4761f0f5b5bSZachary Turner 477b9c1b51eSKate Stone class CommandObjectBreakpointCommandDelete : public CommandObjectParsed { 4785a988416SJim Ingham public: 479b9c1b51eSKate Stone CommandObjectBreakpointCommandDelete(CommandInterpreter &interpreter) 480b9c1b51eSKate Stone : CommandObjectParsed(interpreter, "delete", 48193e0f19fSCaroline Tice "Delete the set of commands from a breakpoint.", 482c8ecc2a9SEugene Zelenko nullptr), 483b9c1b51eSKate Stone m_options() { 484405fe67fSCaroline Tice CommandArgumentEntry arg; 485405fe67fSCaroline Tice CommandArgumentData bp_id_arg; 486405fe67fSCaroline Tice 487405fe67fSCaroline Tice // Define the first (and only) variant of this arg. 488405fe67fSCaroline Tice bp_id_arg.arg_type = eArgTypeBreakpointID; 489405fe67fSCaroline Tice bp_id_arg.arg_repetition = eArgRepeatPlain; 490405fe67fSCaroline Tice 491b9c1b51eSKate Stone // There is only one variant this argument could be; put it into the 492b9c1b51eSKate Stone // argument entry. 493405fe67fSCaroline Tice arg.push_back(bp_id_arg); 494405fe67fSCaroline Tice 495405fe67fSCaroline Tice // Push the data for the first argument into the m_arguments vector. 496405fe67fSCaroline Tice m_arguments.push_back(arg); 49730fdc8d8SChris Lattner } 49830fdc8d8SChris Lattner 499c8ecc2a9SEugene Zelenko ~CommandObjectBreakpointCommandDelete() override = default; 5005a988416SJim Ingham 501b9c1b51eSKate Stone Options *GetOptions() override { return &m_options; } 50233df7cd3SJim Ingham 503b9c1b51eSKate Stone class CommandOptions : public Options { 50433df7cd3SJim Ingham public: 505b9c1b51eSKate Stone CommandOptions() : Options(), m_use_dummy(false) {} 50633df7cd3SJim Ingham 507c8ecc2a9SEugene Zelenko ~CommandOptions() override = default; 50833df7cd3SJim Ingham 50997206d57SZachary Turner Status SetOptionValue(uint32_t option_idx, llvm::StringRef option_arg, 510b9c1b51eSKate Stone ExecutionContext *execution_context) override { 51197206d57SZachary Turner Status error; 51233df7cd3SJim Ingham const int short_option = m_getopt_table[option_idx].val; 51333df7cd3SJim Ingham 514b9c1b51eSKate Stone switch (short_option) { 51533df7cd3SJim Ingham case 'D': 51633df7cd3SJim Ingham m_use_dummy = true; 51733df7cd3SJim Ingham break; 51833df7cd3SJim Ingham 51933df7cd3SJim Ingham default: 52036162014SRaphael Isemann llvm_unreachable("Unimplemented option"); 52133df7cd3SJim Ingham } 52233df7cd3SJim Ingham 52333df7cd3SJim Ingham return error; 52433df7cd3SJim Ingham } 52533df7cd3SJim Ingham 526b9c1b51eSKate Stone void OptionParsingStarting(ExecutionContext *execution_context) override { 52733df7cd3SJim Ingham m_use_dummy = false; 52833df7cd3SJim Ingham } 52933df7cd3SJim Ingham 5301f0f5b5bSZachary Turner llvm::ArrayRef<OptionDefinition> GetDefinitions() override { 531bd68a052SRaphael Isemann return llvm::makeArrayRef(g_breakpoint_command_delete_options); 5321f0f5b5bSZachary Turner } 53333df7cd3SJim Ingham 53433df7cd3SJim Ingham // Instance variables to hold the values for command options. 53533df7cd3SJim Ingham bool m_use_dummy; 53633df7cd3SJim Ingham }; 53733df7cd3SJim Ingham 5385a988416SJim Ingham protected: 539b9c1b51eSKate Stone bool DoExecute(Args &command, CommandReturnObject &result) override { 540cb2380c9SRaphael Isemann Target &target = GetSelectedOrDummyTarget(m_options.m_use_dummy); 54130fdc8d8SChris Lattner 542cb2380c9SRaphael Isemann const BreakpointList &breakpoints = target.GetBreakpointList(); 54330fdc8d8SChris Lattner size_t num_breakpoints = breakpoints.GetSize(); 54430fdc8d8SChris Lattner 545b9c1b51eSKate Stone if (num_breakpoints == 0) { 54693e0f19fSCaroline Tice result.AppendError("No breakpoints exist to have commands deleted"); 54730fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 54830fdc8d8SChris Lattner return false; 54930fdc8d8SChris Lattner } 55030fdc8d8SChris Lattner 55111eb9c64SZachary Turner if (command.empty()) { 552b9c1b51eSKate Stone result.AppendError( 553b9c1b51eSKate Stone "No breakpoint specified from which to delete the commands"); 55430fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 55530fdc8d8SChris Lattner return false; 55630fdc8d8SChris Lattner } 55730fdc8d8SChris Lattner 55830fdc8d8SChris Lattner BreakpointIDList valid_bp_ids; 559b9c1b51eSKate Stone CommandObjectMultiwordBreakpoint::VerifyBreakpointOrLocationIDs( 560cb2380c9SRaphael Isemann command, &target, result, &valid_bp_ids, 561b842f2ecSJim Ingham BreakpointName::Permissions::PermissionKinds::listPerm); 56230fdc8d8SChris Lattner 563b9c1b51eSKate Stone if (result.Succeeded()) { 564c982c768SGreg Clayton const size_t count = valid_bp_ids.GetSize(); 565b9c1b51eSKate Stone for (size_t i = 0; i < count; ++i) { 56630fdc8d8SChris Lattner BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex(i); 567b9c1b51eSKate Stone if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID) { 568b9c1b51eSKate Stone Breakpoint *bp = 569cb2380c9SRaphael Isemann target.GetBreakpointByID(cur_bp_id.GetBreakpointID()).get(); 570b9c1b51eSKate Stone if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID) { 571b9c1b51eSKate Stone BreakpointLocationSP bp_loc_sp( 572b9c1b51eSKate Stone bp->FindLocationByID(cur_bp_id.GetLocationID())); 57330fdc8d8SChris Lattner if (bp_loc_sp) 57430fdc8d8SChris Lattner bp_loc_sp->ClearCallback(); 575b9c1b51eSKate Stone else { 57630fdc8d8SChris Lattner result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n", 57730fdc8d8SChris Lattner cur_bp_id.GetBreakpointID(), 57830fdc8d8SChris Lattner cur_bp_id.GetLocationID()); 57930fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 58030fdc8d8SChris Lattner return false; 58130fdc8d8SChris Lattner } 582b9c1b51eSKate Stone } else { 58330fdc8d8SChris Lattner bp->ClearCallback(); 58430fdc8d8SChris Lattner } 58530fdc8d8SChris Lattner } 58630fdc8d8SChris Lattner } 58730fdc8d8SChris Lattner } 58830fdc8d8SChris Lattner return result.Succeeded(); 58930fdc8d8SChris Lattner } 590c8ecc2a9SEugene Zelenko 59133df7cd3SJim Ingham private: 59233df7cd3SJim Ingham CommandOptions m_options; 5935a988416SJim Ingham }; 59430fdc8d8SChris Lattner 59530fdc8d8SChris Lattner // CommandObjectBreakpointCommandList 59630fdc8d8SChris Lattner 597b9c1b51eSKate Stone class CommandObjectBreakpointCommandList : public CommandObjectParsed { 5985a988416SJim Ingham public: 599b9c1b51eSKate Stone CommandObjectBreakpointCommandList(CommandInterpreter &interpreter) 60004a4c091SRaphael Isemann : CommandObjectParsed(interpreter, "list", 60104a4c091SRaphael Isemann "List the script or set of commands to be " 60204a4c091SRaphael Isemann "executed when the breakpoint is hit.", 60304a4c091SRaphael Isemann nullptr, eCommandRequiresTarget) { 604405fe67fSCaroline Tice CommandArgumentEntry arg; 605405fe67fSCaroline Tice CommandArgumentData bp_id_arg; 606405fe67fSCaroline Tice 607405fe67fSCaroline Tice // Define the first (and only) variant of this arg. 608405fe67fSCaroline Tice bp_id_arg.arg_type = eArgTypeBreakpointID; 609405fe67fSCaroline Tice bp_id_arg.arg_repetition = eArgRepeatPlain; 610405fe67fSCaroline Tice 611b9c1b51eSKate Stone // There is only one variant this argument could be; put it into the 612b9c1b51eSKate Stone // argument entry. 613405fe67fSCaroline Tice arg.push_back(bp_id_arg); 614405fe67fSCaroline Tice 615405fe67fSCaroline Tice // Push the data for the first argument into the m_arguments vector. 616405fe67fSCaroline Tice m_arguments.push_back(arg); 61730fdc8d8SChris Lattner } 61830fdc8d8SChris Lattner 619c8ecc2a9SEugene Zelenko ~CommandObjectBreakpointCommandList() override = default; 62030fdc8d8SChris Lattner 6215a988416SJim Ingham protected: 622b9c1b51eSKate Stone bool DoExecute(Args &command, CommandReturnObject &result) override { 62304a4c091SRaphael Isemann Target *target = &GetSelectedTarget(); 62430fdc8d8SChris Lattner 62530fdc8d8SChris Lattner const BreakpointList &breakpoints = target->GetBreakpointList(); 62630fdc8d8SChris Lattner size_t num_breakpoints = breakpoints.GetSize(); 62730fdc8d8SChris Lattner 628b9c1b51eSKate Stone if (num_breakpoints == 0) { 62930fdc8d8SChris Lattner result.AppendError("No breakpoints exist for which to list commands"); 63030fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 63130fdc8d8SChris Lattner return false; 63230fdc8d8SChris Lattner } 63330fdc8d8SChris Lattner 63411eb9c64SZachary Turner if (command.empty()) { 635b9c1b51eSKate Stone result.AppendError( 636b9c1b51eSKate Stone "No breakpoint specified for which to list the commands"); 63730fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 63830fdc8d8SChris Lattner return false; 63930fdc8d8SChris Lattner } 64030fdc8d8SChris Lattner 64130fdc8d8SChris Lattner BreakpointIDList valid_bp_ids; 642b9c1b51eSKate Stone CommandObjectMultiwordBreakpoint::VerifyBreakpointOrLocationIDs( 643b842f2ecSJim Ingham command, target, result, &valid_bp_ids, 644b842f2ecSJim Ingham BreakpointName::Permissions::PermissionKinds::listPerm); 64530fdc8d8SChris Lattner 646b9c1b51eSKate Stone if (result.Succeeded()) { 647c982c768SGreg Clayton const size_t count = valid_bp_ids.GetSize(); 648b9c1b51eSKate Stone for (size_t i = 0; i < count; ++i) { 64930fdc8d8SChris Lattner BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex(i); 650b9c1b51eSKate Stone if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID) { 651b9c1b51eSKate Stone Breakpoint *bp = 652b9c1b51eSKate Stone target->GetBreakpointByID(cur_bp_id.GetBreakpointID()).get(); 65330fdc8d8SChris Lattner 654b9c1b51eSKate Stone if (bp) { 655af26b22cSJim Ingham BreakpointLocationSP bp_loc_sp; 656b9c1b51eSKate Stone if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID) { 657af26b22cSJim Ingham bp_loc_sp = bp->FindLocationByID(cur_bp_id.GetLocationID()); 658a925974bSAdrian Prantl if (!bp_loc_sp) { 65930fdc8d8SChris Lattner result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n", 66030fdc8d8SChris Lattner cur_bp_id.GetBreakpointID(), 66130fdc8d8SChris Lattner cur_bp_id.GetLocationID()); 66230fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 66330fdc8d8SChris Lattner return false; 66430fdc8d8SChris Lattner } 66530fdc8d8SChris Lattner } 66630fdc8d8SChris Lattner 66730fdc8d8SChris Lattner StreamString id_str; 668e16c50a1SJim Ingham BreakpointID::GetCanonicalReference(&id_str, 669e16c50a1SJim Ingham cur_bp_id.GetBreakpointID(), 670e16c50a1SJim Ingham cur_bp_id.GetLocationID()); 671af26b22cSJim Ingham const Baton *baton = nullptr; 672af26b22cSJim Ingham if (bp_loc_sp) 673a925974bSAdrian Prantl baton = 674a925974bSAdrian Prantl bp_loc_sp 675af26b22cSJim Ingham ->GetOptionsSpecifyingKind(BreakpointOptions::eCallback) 676af26b22cSJim Ingham ->GetBaton(); 677af26b22cSJim Ingham else 678af26b22cSJim Ingham baton = bp->GetOptions()->GetBaton(); 679af26b22cSJim Ingham 680b9c1b51eSKate Stone if (baton) { 681b9c1b51eSKate Stone result.GetOutputStream().Printf("Breakpoint %s:\n", 682b9c1b51eSKate Stone id_str.GetData()); 6834f728bfcSRaphael Isemann baton->GetDescription(result.GetOutputStream().AsRawOstream(), 6844f728bfcSRaphael Isemann eDescriptionLevelFull, 6854f728bfcSRaphael Isemann result.GetOutputStream().GetIndentLevel() + 6864f728bfcSRaphael Isemann 2); 687b9c1b51eSKate Stone } else { 688b9c1b51eSKate Stone result.AppendMessageWithFormat( 689b9c1b51eSKate Stone "Breakpoint %s does not have an associated command.\n", 690e16c50a1SJim Ingham id_str.GetData()); 69130fdc8d8SChris Lattner } 69230fdc8d8SChris Lattner } 69330fdc8d8SChris Lattner result.SetStatus(eReturnStatusSuccessFinishResult); 694b9c1b51eSKate Stone } else { 695b9c1b51eSKate Stone result.AppendErrorWithFormat("Invalid breakpoint ID: %u.\n", 696b9c1b51eSKate Stone cur_bp_id.GetBreakpointID()); 69730fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 69830fdc8d8SChris Lattner } 69930fdc8d8SChris Lattner } 70030fdc8d8SChris Lattner } 70130fdc8d8SChris Lattner 70230fdc8d8SChris Lattner return result.Succeeded(); 70330fdc8d8SChris Lattner } 7045a988416SJim Ingham }; 70530fdc8d8SChris Lattner 70630fdc8d8SChris Lattner // CommandObjectBreakpointCommand 70730fdc8d8SChris Lattner 708b9c1b51eSKate Stone CommandObjectBreakpointCommand::CommandObjectBreakpointCommand( 709b9c1b51eSKate Stone CommandInterpreter &interpreter) 7107428a18cSKate Stone : CommandObjectMultiword( 711a925974bSAdrian Prantl interpreter, "command", 712a925974bSAdrian Prantl "Commands for adding, removing and listing " 713b9c1b51eSKate Stone "LLDB commands executed when a breakpoint is " 714b9c1b51eSKate Stone "hit.", 715b9c1b51eSKate Stone "command <sub-command> [<sub-command-options>] <breakpoint-id>") { 716b9c1b51eSKate Stone CommandObjectSP add_command_object( 717b9c1b51eSKate Stone new CommandObjectBreakpointCommandAdd(interpreter)); 718b9c1b51eSKate Stone CommandObjectSP delete_command_object( 719b9c1b51eSKate Stone new CommandObjectBreakpointCommandDelete(interpreter)); 720b9c1b51eSKate Stone CommandObjectSP list_command_object( 721b9c1b51eSKate Stone new CommandObjectBreakpointCommandList(interpreter)); 72230fdc8d8SChris Lattner 72330fdc8d8SChris Lattner add_command_object->SetCommandName("breakpoint command add"); 72493e0f19fSCaroline Tice delete_command_object->SetCommandName("breakpoint command delete"); 72530fdc8d8SChris Lattner list_command_object->SetCommandName("breakpoint command list"); 72630fdc8d8SChris Lattner 72723f59509SGreg Clayton LoadSubCommand("add", add_command_object); 72823f59509SGreg Clayton LoadSubCommand("delete", delete_command_object); 72923f59509SGreg Clayton LoadSubCommand("list", list_command_object); 73030fdc8d8SChris Lattner } 73130fdc8d8SChris Lattner 732c8ecc2a9SEugene Zelenko CommandObjectBreakpointCommand::~CommandObjectBreakpointCommand() = default; 733