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: 310*acdda134SJonas Devlieghere case eScriptLanguageUnknown: 3115a988416SJim Ingham m_use_script_language = false; 3128983d691SJonas Devlieghere break; 3135a988416SJim Ingham } 3145a988416SJim Ingham break; 3155a988416SJim Ingham 316b9c1b51eSKate Stone case 'e': { 3175a988416SJim Ingham bool success = false; 31847cbf4a0SPavel Labath m_stop_on_error = 31947cbf4a0SPavel Labath OptionArgParser::ToBoolean(option_arg, false, &success); 3205a988416SJim Ingham if (!success) 321b9c1b51eSKate Stone error.SetErrorStringWithFormat( 322fe11483bSZachary Turner "invalid value for stop-on-error: \"%s\"", 323fe11483bSZachary Turner option_arg.str().c_str()); 324b9c1b51eSKate Stone } break; 3255a988416SJim Ingham 32633df7cd3SJim Ingham case 'D': 32733df7cd3SJim Ingham m_use_dummy = true; 32833df7cd3SJim Ingham break; 32933df7cd3SJim Ingham 3305a988416SJim Ingham default: 33136162014SRaphael Isemann llvm_unreachable("Unimplemented option"); 3325a988416SJim Ingham } 3335a988416SJim Ingham return error; 3345a988416SJim Ingham } 335c8ecc2a9SEugene Zelenko 336b9c1b51eSKate Stone void OptionParsingStarting(ExecutionContext *execution_context) override { 3375a988416SJim Ingham m_use_commands = true; 3385a988416SJim Ingham m_use_script_language = false; 3395a988416SJim Ingham m_script_language = eScriptLanguageNone; 3405a988416SJim Ingham 3415a988416SJim Ingham m_use_one_liner = false; 3425a988416SJim Ingham m_stop_on_error = true; 3435a988416SJim Ingham m_one_liner.clear(); 34433df7cd3SJim Ingham m_use_dummy = false; 3455a988416SJim Ingham } 3465a988416SJim Ingham 3471f0f5b5bSZachary Turner llvm::ArrayRef<OptionDefinition> GetDefinitions() override { 348bd68a052SRaphael Isemann return llvm::makeArrayRef(g_breakpoint_command_add_options); 3491f0f5b5bSZachary Turner } 3505a988416SJim Ingham 3515a988416SJim Ingham // Instance variables to hold the values for command options. 3525a988416SJim Ingham 3535a988416SJim Ingham bool m_use_commands; 3545a988416SJim Ingham bool m_use_script_language; 3555a988416SJim Ingham lldb::ScriptLanguage m_script_language; 3565a988416SJim Ingham 3575a988416SJim Ingham // Instance variables to hold the values for one_liner options. 3585a988416SJim Ingham bool m_use_one_liner; 3595a988416SJim Ingham std::string m_one_liner; 3605a988416SJim Ingham bool m_stop_on_error; 36133df7cd3SJim Ingham bool m_use_dummy; 3625a988416SJim Ingham }; 3635a988416SJim Ingham 3645a988416SJim Ingham protected: 365b9c1b51eSKate Stone bool DoExecute(Args &command, CommandReturnObject &result) override { 366cb2380c9SRaphael Isemann Target &target = GetSelectedOrDummyTarget(m_options.m_use_dummy); 36730fdc8d8SChris Lattner 368cb2380c9SRaphael Isemann const BreakpointList &breakpoints = target.GetBreakpointList(); 36930fdc8d8SChris Lattner size_t num_breakpoints = breakpoints.GetSize(); 37030fdc8d8SChris Lattner 371b9c1b51eSKate Stone if (num_breakpoints == 0) { 37230fdc8d8SChris Lattner result.AppendError("No breakpoints exist to have commands added"); 37330fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 37430fdc8d8SChris Lattner return false; 37530fdc8d8SChris Lattner } 37630fdc8d8SChris Lattner 377738af7a6SJim Ingham if (!m_func_options.GetName().empty()) { 378738af7a6SJim Ingham m_options.m_use_one_liner = false; 3791ff01cfeSJonas Devlieghere if (!m_options.m_use_script_language) { 3801ff01cfeSJonas Devlieghere m_options.m_script_language = GetDebugger().GetScriptLanguage(); 381738af7a6SJim Ingham m_options.m_use_script_language = true; 3828d4a8010SEnrico Granata } 3831ff01cfeSJonas Devlieghere } 3848d4a8010SEnrico Granata 38530fdc8d8SChris Lattner BreakpointIDList valid_bp_ids; 386b9c1b51eSKate Stone CommandObjectMultiwordBreakpoint::VerifyBreakpointOrLocationIDs( 387cb2380c9SRaphael Isemann command, &target, result, &valid_bp_ids, 388b842f2ecSJim Ingham BreakpointName::Permissions::PermissionKinds::listPerm); 38930fdc8d8SChris Lattner 390b5796cb4SJim Ingham m_bp_options_vec.clear(); 391b5796cb4SJim Ingham 392b9c1b51eSKate Stone if (result.Succeeded()) { 393c982c768SGreg Clayton const size_t count = valid_bp_ids.GetSize(); 394d9916eaeSJim Ingham 395b9c1b51eSKate Stone for (size_t i = 0; i < count; ++i) { 39630fdc8d8SChris Lattner BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex(i); 397b9c1b51eSKate Stone if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID) { 398b9c1b51eSKate Stone Breakpoint *bp = 399cb2380c9SRaphael Isemann target.GetBreakpointByID(cur_bp_id.GetBreakpointID()).get(); 400c8ecc2a9SEugene Zelenko BreakpointOptions *bp_options = nullptr; 401b9c1b51eSKate Stone if (cur_bp_id.GetLocationID() == LLDB_INVALID_BREAK_ID) { 40239d7d4f0SJohnny Chen // This breakpoint does not have an associated location. 40339d7d4f0SJohnny Chen bp_options = bp->GetOptions(); 404b9c1b51eSKate Stone } else { 405b9c1b51eSKate Stone BreakpointLocationSP bp_loc_sp( 406b9c1b51eSKate Stone bp->FindLocationByID(cur_bp_id.GetLocationID())); 40705097246SAdrian Prantl // This breakpoint does have an associated location. Get its 40805097246SAdrian Prantl // breakpoint options. 40930fdc8d8SChris Lattner if (bp_loc_sp) 41039d7d4f0SJohnny Chen bp_options = bp_loc_sp->GetLocationOptions(); 41139d7d4f0SJohnny Chen } 412b5796cb4SJim Ingham if (bp_options) 413b5796cb4SJim Ingham m_bp_options_vec.push_back(bp_options); 414b5796cb4SJim Ingham } 415b5796cb4SJim Ingham } 41639d7d4f0SJohnny Chen 41705097246SAdrian Prantl // If we are using script language, get the script interpreter in order 41805097246SAdrian Prantl // to set or collect command callback. Otherwise, call the methods 41905097246SAdrian Prantl // associated with this object. 420b9c1b51eSKate Stone if (m_options.m_use_script_language) { 4215e32eb1cSJonas Devlieghere ScriptInterpreter *script_interp = GetDebugger().GetScriptInterpreter( 4225e32eb1cSJonas Devlieghere /*can_create=*/true, m_options.m_script_language); 42339d7d4f0SJohnny Chen // Special handling for one-liner specified inline. 424b9c1b51eSKate Stone if (m_options.m_use_one_liner) { 425b9c1b51eSKate Stone script_interp->SetBreakpointCommandCallback( 426b9c1b51eSKate Stone m_bp_options_vec, m_options.m_one_liner.c_str()); 427738af7a6SJim Ingham } else if (!m_func_options.GetName().empty()) { 428738af7a6SJim Ingham Status error = script_interp->SetBreakpointCommandCallbackFunction( 429738af7a6SJim Ingham m_bp_options_vec, m_func_options.GetName().c_str(), 430738af7a6SJim Ingham m_func_options.GetStructuredData()); 431738af7a6SJim Ingham if (!error.Success()) 432738af7a6SJim Ingham result.SetError(error); 433b9c1b51eSKate Stone } else { 434b9c1b51eSKate Stone script_interp->CollectDataForBreakpointCommandCallback( 435b9c1b51eSKate Stone m_bp_options_vec, result); 4368d4a8010SEnrico Granata } 437b9c1b51eSKate Stone } else { 43839d7d4f0SJohnny Chen // Special handling for one-liner specified inline. 43939d7d4f0SJohnny Chen if (m_options.m_use_one_liner) 440b5796cb4SJim Ingham SetBreakpointCommandCallback(m_bp_options_vec, 44139d7d4f0SJohnny Chen m_options.m_one_liner.c_str()); 44239d7d4f0SJohnny Chen else 443b9c1b51eSKate Stone CollectDataForBreakpointCommandCallback(m_bp_options_vec, result); 44430fdc8d8SChris Lattner } 44530fdc8d8SChris Lattner } 44630fdc8d8SChris Lattner 44730fdc8d8SChris Lattner return result.Succeeded(); 44830fdc8d8SChris Lattner } 44930fdc8d8SChris Lattner 4505a988416SJim Ingham private: 4515a988416SJim Ingham CommandOptions m_options; 452738af7a6SJim Ingham OptionGroupPythonClassWithDict m_func_options; 453738af7a6SJim Ingham OptionGroupOptions m_all_options; 454738af7a6SJim Ingham 455b9c1b51eSKate Stone std::vector<BreakpointOptions *> m_bp_options_vec; // This stores the 456b9c1b51eSKate Stone // breakpoint options that 457b9c1b51eSKate Stone // we are currently 45805097246SAdrian Prantl // collecting commands for. In the CollectData... calls we need to hand this 45905097246SAdrian Prantl // off to the IOHandler, which may run asynchronously. So we have to have 46005097246SAdrian Prantl // some way to keep it alive, and not leak it. Making it an ivar of the 46105097246SAdrian Prantl // command object, which never goes away achieves this. Note that if we were 46205097246SAdrian Prantl // able to run the same command concurrently in one interpreter we'd have to 46305097246SAdrian Prantl // make this "per invocation". But there are many more reasons why it is not 46405097246SAdrian Prantl // in general safe to do that in lldb at present, so it isn't worthwhile to 46505097246SAdrian Prantl // come up with a more complex mechanism to address this particular weakness 46605097246SAdrian Prantl // right now. 4675a988416SJim Ingham static const char *g_reader_instructions; 4685a988416SJim Ingham }; 4695a988416SJim Ingham 470b9c1b51eSKate Stone const char *CommandObjectBreakpointCommandAdd::g_reader_instructions = 471b9c1b51eSKate Stone "Enter your debugger command(s). Type 'DONE' to end.\n"; 4725a988416SJim Ingham 47393e0f19fSCaroline Tice // CommandObjectBreakpointCommandDelete 47430fdc8d8SChris Lattner 475f94668e3SRaphael Isemann #define LLDB_OPTIONS_breakpoint_command_delete 476f94668e3SRaphael Isemann #include "CommandOptions.inc" 4771f0f5b5bSZachary Turner 478b9c1b51eSKate Stone class CommandObjectBreakpointCommandDelete : public CommandObjectParsed { 4795a988416SJim Ingham public: 480b9c1b51eSKate Stone CommandObjectBreakpointCommandDelete(CommandInterpreter &interpreter) 481b9c1b51eSKate Stone : CommandObjectParsed(interpreter, "delete", 48293e0f19fSCaroline Tice "Delete the set of commands from a breakpoint.", 483c8ecc2a9SEugene Zelenko nullptr), 484b9c1b51eSKate Stone m_options() { 485405fe67fSCaroline Tice CommandArgumentEntry arg; 486405fe67fSCaroline Tice CommandArgumentData bp_id_arg; 487405fe67fSCaroline Tice 488405fe67fSCaroline Tice // Define the first (and only) variant of this arg. 489405fe67fSCaroline Tice bp_id_arg.arg_type = eArgTypeBreakpointID; 490405fe67fSCaroline Tice bp_id_arg.arg_repetition = eArgRepeatPlain; 491405fe67fSCaroline Tice 492b9c1b51eSKate Stone // There is only one variant this argument could be; put it into the 493b9c1b51eSKate Stone // argument entry. 494405fe67fSCaroline Tice arg.push_back(bp_id_arg); 495405fe67fSCaroline Tice 496405fe67fSCaroline Tice // Push the data for the first argument into the m_arguments vector. 497405fe67fSCaroline Tice m_arguments.push_back(arg); 49830fdc8d8SChris Lattner } 49930fdc8d8SChris Lattner 500c8ecc2a9SEugene Zelenko ~CommandObjectBreakpointCommandDelete() override = default; 5015a988416SJim Ingham 502b9c1b51eSKate Stone Options *GetOptions() override { return &m_options; } 50333df7cd3SJim Ingham 504b9c1b51eSKate Stone class CommandOptions : public Options { 50533df7cd3SJim Ingham public: 506b9c1b51eSKate Stone CommandOptions() : Options(), m_use_dummy(false) {} 50733df7cd3SJim Ingham 508c8ecc2a9SEugene Zelenko ~CommandOptions() override = default; 50933df7cd3SJim Ingham 51097206d57SZachary Turner Status SetOptionValue(uint32_t option_idx, llvm::StringRef option_arg, 511b9c1b51eSKate Stone ExecutionContext *execution_context) override { 51297206d57SZachary Turner Status error; 51333df7cd3SJim Ingham const int short_option = m_getopt_table[option_idx].val; 51433df7cd3SJim Ingham 515b9c1b51eSKate Stone switch (short_option) { 51633df7cd3SJim Ingham case 'D': 51733df7cd3SJim Ingham m_use_dummy = true; 51833df7cd3SJim Ingham break; 51933df7cd3SJim Ingham 52033df7cd3SJim Ingham default: 52136162014SRaphael Isemann llvm_unreachable("Unimplemented option"); 52233df7cd3SJim Ingham } 52333df7cd3SJim Ingham 52433df7cd3SJim Ingham return error; 52533df7cd3SJim Ingham } 52633df7cd3SJim Ingham 527b9c1b51eSKate Stone void OptionParsingStarting(ExecutionContext *execution_context) override { 52833df7cd3SJim Ingham m_use_dummy = false; 52933df7cd3SJim Ingham } 53033df7cd3SJim Ingham 5311f0f5b5bSZachary Turner llvm::ArrayRef<OptionDefinition> GetDefinitions() override { 532bd68a052SRaphael Isemann return llvm::makeArrayRef(g_breakpoint_command_delete_options); 5331f0f5b5bSZachary Turner } 53433df7cd3SJim Ingham 53533df7cd3SJim Ingham // Instance variables to hold the values for command options. 53633df7cd3SJim Ingham bool m_use_dummy; 53733df7cd3SJim Ingham }; 53833df7cd3SJim Ingham 5395a988416SJim Ingham protected: 540b9c1b51eSKate Stone bool DoExecute(Args &command, CommandReturnObject &result) override { 541cb2380c9SRaphael Isemann Target &target = GetSelectedOrDummyTarget(m_options.m_use_dummy); 54230fdc8d8SChris Lattner 543cb2380c9SRaphael Isemann const BreakpointList &breakpoints = target.GetBreakpointList(); 54430fdc8d8SChris Lattner size_t num_breakpoints = breakpoints.GetSize(); 54530fdc8d8SChris Lattner 546b9c1b51eSKate Stone if (num_breakpoints == 0) { 54793e0f19fSCaroline Tice result.AppendError("No breakpoints exist to have commands deleted"); 54830fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 54930fdc8d8SChris Lattner return false; 55030fdc8d8SChris Lattner } 55130fdc8d8SChris Lattner 55211eb9c64SZachary Turner if (command.empty()) { 553b9c1b51eSKate Stone result.AppendError( 554b9c1b51eSKate Stone "No breakpoint specified from which to delete the commands"); 55530fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 55630fdc8d8SChris Lattner return false; 55730fdc8d8SChris Lattner } 55830fdc8d8SChris Lattner 55930fdc8d8SChris Lattner BreakpointIDList valid_bp_ids; 560b9c1b51eSKate Stone CommandObjectMultiwordBreakpoint::VerifyBreakpointOrLocationIDs( 561cb2380c9SRaphael Isemann command, &target, result, &valid_bp_ids, 562b842f2ecSJim Ingham BreakpointName::Permissions::PermissionKinds::listPerm); 56330fdc8d8SChris Lattner 564b9c1b51eSKate Stone if (result.Succeeded()) { 565c982c768SGreg Clayton const size_t count = valid_bp_ids.GetSize(); 566b9c1b51eSKate Stone for (size_t i = 0; i < count; ++i) { 56730fdc8d8SChris Lattner BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex(i); 568b9c1b51eSKate Stone if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID) { 569b9c1b51eSKate Stone Breakpoint *bp = 570cb2380c9SRaphael Isemann target.GetBreakpointByID(cur_bp_id.GetBreakpointID()).get(); 571b9c1b51eSKate Stone if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID) { 572b9c1b51eSKate Stone BreakpointLocationSP bp_loc_sp( 573b9c1b51eSKate Stone bp->FindLocationByID(cur_bp_id.GetLocationID())); 57430fdc8d8SChris Lattner if (bp_loc_sp) 57530fdc8d8SChris Lattner bp_loc_sp->ClearCallback(); 576b9c1b51eSKate Stone else { 57730fdc8d8SChris Lattner result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n", 57830fdc8d8SChris Lattner cur_bp_id.GetBreakpointID(), 57930fdc8d8SChris Lattner cur_bp_id.GetLocationID()); 58030fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 58130fdc8d8SChris Lattner return false; 58230fdc8d8SChris Lattner } 583b9c1b51eSKate Stone } else { 58430fdc8d8SChris Lattner bp->ClearCallback(); 58530fdc8d8SChris Lattner } 58630fdc8d8SChris Lattner } 58730fdc8d8SChris Lattner } 58830fdc8d8SChris Lattner } 58930fdc8d8SChris Lattner return result.Succeeded(); 59030fdc8d8SChris Lattner } 591c8ecc2a9SEugene Zelenko 59233df7cd3SJim Ingham private: 59333df7cd3SJim Ingham CommandOptions m_options; 5945a988416SJim Ingham }; 59530fdc8d8SChris Lattner 59630fdc8d8SChris Lattner // CommandObjectBreakpointCommandList 59730fdc8d8SChris Lattner 598b9c1b51eSKate Stone class CommandObjectBreakpointCommandList : public CommandObjectParsed { 5995a988416SJim Ingham public: 600b9c1b51eSKate Stone CommandObjectBreakpointCommandList(CommandInterpreter &interpreter) 60104a4c091SRaphael Isemann : CommandObjectParsed(interpreter, "list", 60204a4c091SRaphael Isemann "List the script or set of commands to be " 60304a4c091SRaphael Isemann "executed when the breakpoint is hit.", 60404a4c091SRaphael Isemann nullptr, eCommandRequiresTarget) { 605405fe67fSCaroline Tice CommandArgumentEntry arg; 606405fe67fSCaroline Tice CommandArgumentData bp_id_arg; 607405fe67fSCaroline Tice 608405fe67fSCaroline Tice // Define the first (and only) variant of this arg. 609405fe67fSCaroline Tice bp_id_arg.arg_type = eArgTypeBreakpointID; 610405fe67fSCaroline Tice bp_id_arg.arg_repetition = eArgRepeatPlain; 611405fe67fSCaroline Tice 612b9c1b51eSKate Stone // There is only one variant this argument could be; put it into the 613b9c1b51eSKate Stone // argument entry. 614405fe67fSCaroline Tice arg.push_back(bp_id_arg); 615405fe67fSCaroline Tice 616405fe67fSCaroline Tice // Push the data for the first argument into the m_arguments vector. 617405fe67fSCaroline Tice m_arguments.push_back(arg); 61830fdc8d8SChris Lattner } 61930fdc8d8SChris Lattner 620c8ecc2a9SEugene Zelenko ~CommandObjectBreakpointCommandList() override = default; 62130fdc8d8SChris Lattner 6225a988416SJim Ingham protected: 623b9c1b51eSKate Stone bool DoExecute(Args &command, CommandReturnObject &result) override { 62404a4c091SRaphael Isemann Target *target = &GetSelectedTarget(); 62530fdc8d8SChris Lattner 62630fdc8d8SChris Lattner const BreakpointList &breakpoints = target->GetBreakpointList(); 62730fdc8d8SChris Lattner size_t num_breakpoints = breakpoints.GetSize(); 62830fdc8d8SChris Lattner 629b9c1b51eSKate Stone if (num_breakpoints == 0) { 63030fdc8d8SChris Lattner result.AppendError("No breakpoints exist for which to list commands"); 63130fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 63230fdc8d8SChris Lattner return false; 63330fdc8d8SChris Lattner } 63430fdc8d8SChris Lattner 63511eb9c64SZachary Turner if (command.empty()) { 636b9c1b51eSKate Stone result.AppendError( 637b9c1b51eSKate Stone "No breakpoint specified for which to list the commands"); 63830fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 63930fdc8d8SChris Lattner return false; 64030fdc8d8SChris Lattner } 64130fdc8d8SChris Lattner 64230fdc8d8SChris Lattner BreakpointIDList valid_bp_ids; 643b9c1b51eSKate Stone CommandObjectMultiwordBreakpoint::VerifyBreakpointOrLocationIDs( 644b842f2ecSJim Ingham command, target, result, &valid_bp_ids, 645b842f2ecSJim Ingham BreakpointName::Permissions::PermissionKinds::listPerm); 64630fdc8d8SChris Lattner 647b9c1b51eSKate Stone if (result.Succeeded()) { 648c982c768SGreg Clayton const size_t count = valid_bp_ids.GetSize(); 649b9c1b51eSKate Stone for (size_t i = 0; i < count; ++i) { 65030fdc8d8SChris Lattner BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex(i); 651b9c1b51eSKate Stone if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID) { 652b9c1b51eSKate Stone Breakpoint *bp = 653b9c1b51eSKate Stone target->GetBreakpointByID(cur_bp_id.GetBreakpointID()).get(); 65430fdc8d8SChris Lattner 655b9c1b51eSKate Stone if (bp) { 656af26b22cSJim Ingham BreakpointLocationSP bp_loc_sp; 657b9c1b51eSKate Stone if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID) { 658af26b22cSJim Ingham bp_loc_sp = bp->FindLocationByID(cur_bp_id.GetLocationID()); 659a925974bSAdrian Prantl if (!bp_loc_sp) { 66030fdc8d8SChris Lattner result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n", 66130fdc8d8SChris Lattner cur_bp_id.GetBreakpointID(), 66230fdc8d8SChris Lattner cur_bp_id.GetLocationID()); 66330fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 66430fdc8d8SChris Lattner return false; 66530fdc8d8SChris Lattner } 66630fdc8d8SChris Lattner } 66730fdc8d8SChris Lattner 66830fdc8d8SChris Lattner StreamString id_str; 669e16c50a1SJim Ingham BreakpointID::GetCanonicalReference(&id_str, 670e16c50a1SJim Ingham cur_bp_id.GetBreakpointID(), 671e16c50a1SJim Ingham cur_bp_id.GetLocationID()); 672af26b22cSJim Ingham const Baton *baton = nullptr; 673af26b22cSJim Ingham if (bp_loc_sp) 674a925974bSAdrian Prantl baton = 675a925974bSAdrian Prantl bp_loc_sp 676af26b22cSJim Ingham ->GetOptionsSpecifyingKind(BreakpointOptions::eCallback) 677af26b22cSJim Ingham ->GetBaton(); 678af26b22cSJim Ingham else 679af26b22cSJim Ingham baton = bp->GetOptions()->GetBaton(); 680af26b22cSJim Ingham 681b9c1b51eSKate Stone if (baton) { 682b9c1b51eSKate Stone result.GetOutputStream().Printf("Breakpoint %s:\n", 683b9c1b51eSKate Stone id_str.GetData()); 6844f728bfcSRaphael Isemann baton->GetDescription(result.GetOutputStream().AsRawOstream(), 6854f728bfcSRaphael Isemann eDescriptionLevelFull, 6864f728bfcSRaphael Isemann result.GetOutputStream().GetIndentLevel() + 6874f728bfcSRaphael Isemann 2); 688b9c1b51eSKate Stone } else { 689b9c1b51eSKate Stone result.AppendMessageWithFormat( 690b9c1b51eSKate Stone "Breakpoint %s does not have an associated command.\n", 691e16c50a1SJim Ingham id_str.GetData()); 69230fdc8d8SChris Lattner } 69330fdc8d8SChris Lattner } 69430fdc8d8SChris Lattner result.SetStatus(eReturnStatusSuccessFinishResult); 695b9c1b51eSKate Stone } else { 696b9c1b51eSKate Stone result.AppendErrorWithFormat("Invalid breakpoint ID: %u.\n", 697b9c1b51eSKate Stone cur_bp_id.GetBreakpointID()); 69830fdc8d8SChris Lattner result.SetStatus(eReturnStatusFailed); 69930fdc8d8SChris Lattner } 70030fdc8d8SChris Lattner } 70130fdc8d8SChris Lattner } 70230fdc8d8SChris Lattner 70330fdc8d8SChris Lattner return result.Succeeded(); 70430fdc8d8SChris Lattner } 7055a988416SJim Ingham }; 70630fdc8d8SChris Lattner 70730fdc8d8SChris Lattner // CommandObjectBreakpointCommand 70830fdc8d8SChris Lattner 709b9c1b51eSKate Stone CommandObjectBreakpointCommand::CommandObjectBreakpointCommand( 710b9c1b51eSKate Stone CommandInterpreter &interpreter) 7117428a18cSKate Stone : CommandObjectMultiword( 712a925974bSAdrian Prantl interpreter, "command", 713a925974bSAdrian Prantl "Commands for adding, removing and listing " 714b9c1b51eSKate Stone "LLDB commands executed when a breakpoint is " 715b9c1b51eSKate Stone "hit.", 716b9c1b51eSKate Stone "command <sub-command> [<sub-command-options>] <breakpoint-id>") { 717b9c1b51eSKate Stone CommandObjectSP add_command_object( 718b9c1b51eSKate Stone new CommandObjectBreakpointCommandAdd(interpreter)); 719b9c1b51eSKate Stone CommandObjectSP delete_command_object( 720b9c1b51eSKate Stone new CommandObjectBreakpointCommandDelete(interpreter)); 721b9c1b51eSKate Stone CommandObjectSP list_command_object( 722b9c1b51eSKate Stone new CommandObjectBreakpointCommandList(interpreter)); 72330fdc8d8SChris Lattner 72430fdc8d8SChris Lattner add_command_object->SetCommandName("breakpoint command add"); 72593e0f19fSCaroline Tice delete_command_object->SetCommandName("breakpoint command delete"); 72630fdc8d8SChris Lattner list_command_object->SetCommandName("breakpoint command list"); 72730fdc8d8SChris Lattner 72823f59509SGreg Clayton LoadSubCommand("add", add_command_object); 72923f59509SGreg Clayton LoadSubCommand("delete", delete_command_object); 73023f59509SGreg Clayton LoadSubCommand("list", list_command_object); 73130fdc8d8SChris Lattner } 73230fdc8d8SChris Lattner 733c8ecc2a9SEugene Zelenko CommandObjectBreakpointCommand::~CommandObjectBreakpointCommand() = default; 734