130fdc8d8SChris Lattner //===-- CommandObjectBreakpointCommand.cpp ----------------------*- C++ -*-===//
230fdc8d8SChris Lattner //
330fdc8d8SChris Lattner //                     The LLVM Compiler Infrastructure
430fdc8d8SChris Lattner //
530fdc8d8SChris Lattner // This file is distributed under the University of Illinois Open Source
630fdc8d8SChris Lattner // License. See LICENSE.TXT for details.
730fdc8d8SChris Lattner //
830fdc8d8SChris Lattner //===----------------------------------------------------------------------===//
930fdc8d8SChris Lattner 
1030fdc8d8SChris Lattner // C Includes
1130fdc8d8SChris Lattner // C++ Includes
1230fdc8d8SChris Lattner 
1330fdc8d8SChris Lattner 
1430fdc8d8SChris Lattner #include "CommandObjectBreakpointCommand.h"
1530fdc8d8SChris Lattner #include "CommandObjectBreakpoint.h"
1630fdc8d8SChris Lattner 
1730fdc8d8SChris Lattner #include "lldb/Interpreter/CommandInterpreter.h"
1830fdc8d8SChris Lattner #include "lldb/Interpreter/CommandReturnObject.h"
1930fdc8d8SChris Lattner #include "lldb/Target/Target.h"
2030fdc8d8SChris Lattner #include "lldb/Target/Thread.h"
2130fdc8d8SChris Lattner #include "lldb/Breakpoint/BreakpointIDList.h"
2230fdc8d8SChris Lattner #include "lldb/Breakpoint/Breakpoint.h"
2330fdc8d8SChris Lattner #include "lldb/Breakpoint/BreakpointLocation.h"
2430fdc8d8SChris Lattner #include "lldb/Breakpoint/StoppointCallbackContext.h"
2530fdc8d8SChris Lattner #include "lldb/Core/State.h"
2630fdc8d8SChris Lattner 
2730fdc8d8SChris Lattner using namespace lldb;
2830fdc8d8SChris Lattner using namespace lldb_private;
2930fdc8d8SChris Lattner 
3030fdc8d8SChris Lattner //-------------------------------------------------------------------------
3130fdc8d8SChris Lattner // CommandObjectBreakpointCommandAdd::CommandOptions
3230fdc8d8SChris Lattner //-------------------------------------------------------------------------
3330fdc8d8SChris Lattner 
3430fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CommandOptions::CommandOptions () :
3539d7d4f0SJohnny Chen     Options (),
3639d7d4f0SJohnny Chen     m_use_commands (false),
3739d7d4f0SJohnny Chen     m_use_script_language (false),
3839d7d4f0SJohnny Chen     m_script_language (eScriptLanguageNone),
3939d7d4f0SJohnny Chen     m_use_one_liner (false),
4039d7d4f0SJohnny Chen     m_one_liner()
4130fdc8d8SChris Lattner {
4230fdc8d8SChris Lattner }
4330fdc8d8SChris Lattner 
4430fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CommandOptions::~CommandOptions ()
4530fdc8d8SChris Lattner {
4630fdc8d8SChris Lattner }
4730fdc8d8SChris Lattner 
4830fdc8d8SChris Lattner lldb::OptionDefinition
4930fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CommandOptions::g_option_table[] =
5030fdc8d8SChris Lattner {
51deaab222SCaroline Tice     { LLDB_OPT_SET_ALL, false, "one-liner", 'o', required_argument, NULL, NULL, eArgTypeOneLiner,
52867b185dSCaroline Tice         "Specify a one-line breakpoint command inline. Be sure to surround it with quotes." },
5339d7d4f0SJohnny Chen 
54deaab222SCaroline Tice     { LLDB_OPT_SET_1,   true, "script",     's', no_argument,       NULL, NULL, eArgTypeNone,
5530fdc8d8SChris Lattner         "Write the breakpoint command script in the default scripting language."},
5630fdc8d8SChris Lattner 
57deaab222SCaroline Tice     { LLDB_OPT_SET_2,   true, "python",     'p', no_argument,       NULL, NULL, eArgTypeNone,
5830fdc8d8SChris Lattner         "Write the breakpoint command script in the Python scripting language."},
5930fdc8d8SChris Lattner 
60deaab222SCaroline Tice     { LLDB_OPT_SET_3,   true, "commands",   'c', no_argument,       NULL, NULL, eArgTypeNone,
61e3d26315SCaroline Tice         "Write the breakpoint command script using standard debugger commands."},
6230fdc8d8SChris Lattner 
63deaab222SCaroline Tice     { 0, false, NULL, 0, 0, NULL, 0, eArgTypeNone, NULL }
6430fdc8d8SChris Lattner };
6530fdc8d8SChris Lattner 
6630fdc8d8SChris Lattner const lldb::OptionDefinition*
6730fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CommandOptions::GetDefinitions ()
6830fdc8d8SChris Lattner {
6930fdc8d8SChris Lattner     return g_option_table;
7030fdc8d8SChris Lattner }
7130fdc8d8SChris Lattner 
7230fdc8d8SChris Lattner 
7330fdc8d8SChris Lattner Error
7430fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CommandOptions::SetOptionValue
7530fdc8d8SChris Lattner (
7630fdc8d8SChris Lattner     int option_idx,
7730fdc8d8SChris Lattner     const char *option_arg
7830fdc8d8SChris Lattner )
7930fdc8d8SChris Lattner {
8030fdc8d8SChris Lattner     Error error;
8130fdc8d8SChris Lattner     char short_option = (char) m_getopt_table[option_idx].val;
8230fdc8d8SChris Lattner 
8330fdc8d8SChris Lattner     switch (short_option)
8430fdc8d8SChris Lattner       {
8539d7d4f0SJohnny Chen       case 'o':
8639d7d4f0SJohnny Chen         m_use_one_liner = true;
8739d7d4f0SJohnny Chen         m_one_liner = option_arg;
8839d7d4f0SJohnny Chen         break;
8930fdc8d8SChris Lattner       case 's':
9030fdc8d8SChris Lattner         m_use_commands = false;
9130fdc8d8SChris Lattner         m_use_script_language = true;
9230fdc8d8SChris Lattner         m_script_language = eScriptLanguageDefault;
9330fdc8d8SChris Lattner         break;
9430fdc8d8SChris Lattner       case 'p':
9530fdc8d8SChris Lattner         m_use_commands = false;
9630fdc8d8SChris Lattner         m_use_script_language = true;
9730fdc8d8SChris Lattner         m_script_language = eScriptLanguagePython;
9830fdc8d8SChris Lattner         break;
9930fdc8d8SChris Lattner       case 'c':
10030fdc8d8SChris Lattner         m_use_commands = true;
10130fdc8d8SChris Lattner         m_use_script_language = false;
10230fdc8d8SChris Lattner         m_script_language = eScriptLanguageNone;
10330fdc8d8SChris Lattner         break;
10430fdc8d8SChris Lattner       default:
10530fdc8d8SChris Lattner         break;
10630fdc8d8SChris Lattner       }
10730fdc8d8SChris Lattner     return error;
10830fdc8d8SChris Lattner }
10930fdc8d8SChris Lattner 
11030fdc8d8SChris Lattner void
11130fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CommandOptions::ResetOptionValues ()
11230fdc8d8SChris Lattner {
11330fdc8d8SChris Lattner     Options::ResetOptionValues();
11430fdc8d8SChris Lattner 
11530fdc8d8SChris Lattner     m_use_commands = false;
11630fdc8d8SChris Lattner     m_use_script_language = false;
11730fdc8d8SChris Lattner     m_script_language = eScriptLanguageNone;
11839d7d4f0SJohnny Chen 
11939d7d4f0SJohnny Chen     m_use_one_liner = false;
12039d7d4f0SJohnny Chen     m_one_liner.clear();
12130fdc8d8SChris Lattner }
12230fdc8d8SChris Lattner 
12330fdc8d8SChris Lattner //-------------------------------------------------------------------------
12430fdc8d8SChris Lattner // CommandObjectBreakpointCommandAdd
12530fdc8d8SChris Lattner //-------------------------------------------------------------------------
12630fdc8d8SChris Lattner 
12730fdc8d8SChris Lattner 
128a7015092SGreg Clayton CommandObjectBreakpointCommandAdd::CommandObjectBreakpointCommandAdd (CommandInterpreter &interpreter) :
129a7015092SGreg Clayton     CommandObject (interpreter,
130a7015092SGreg Clayton                    "add",
131e3d26315SCaroline Tice                    "Add a set of commands to a breakpoint, to be executed whenever the breakpoint is hit.",
132*405fe67fSCaroline Tice                    NULL)
13330fdc8d8SChris Lattner {
13430fdc8d8SChris Lattner     SetHelpLong (
13530fdc8d8SChris Lattner "\nGeneral information about entering breakpoint commands \n\
13630fdc8d8SChris Lattner ------------------------------------------------------ \n\
13730fdc8d8SChris Lattner  \n\
13830fdc8d8SChris Lattner This command will cause you to be prompted to enter the command or set \n\
13930fdc8d8SChris Lattner of commands you wish to be executed when the specified breakpoint is \n\
14030fdc8d8SChris Lattner hit.  You will be told to enter your command(s), and will see a '> ' \n\
14130fdc8d8SChris Lattner prompt. Because you can enter one or many commands to be executed when \n\
14230fdc8d8SChris Lattner a breakpoint is hit, you will continue to be prompted after each \n\
14330fdc8d8SChris Lattner new-line that you enter, until you enter the word 'DONE', which will \n\
14430fdc8d8SChris Lattner cause the commands you have entered to be stored with the breakpoint \n\
14530fdc8d8SChris Lattner and executed when the breakpoint is hit. \n\
14630fdc8d8SChris Lattner  \n\
14730fdc8d8SChris Lattner Syntax checking is not necessarily done when breakpoint commands are \n\
14830fdc8d8SChris Lattner entered.  An improperly written breakpoint command will attempt to get \n\
14930fdc8d8SChris Lattner executed when the breakpoint gets hit, and usually silently fail.  If \n\
15030fdc8d8SChris Lattner your breakpoint command does not appear to be getting executed, go \n\
15130fdc8d8SChris Lattner back and check your syntax. \n\
15230fdc8d8SChris Lattner  \n\
15330fdc8d8SChris Lattner  \n\
15430fdc8d8SChris Lattner Special information about PYTHON breakpoint commands \n\
15530fdc8d8SChris Lattner ---------------------------------------------------- \n\
15630fdc8d8SChris Lattner  \n\
15730fdc8d8SChris Lattner You may enter either one line of Python or multiple lines of Python \n\
15830fdc8d8SChris Lattner (including defining whole functions, if desired).  If you enter a \n\
15930fdc8d8SChris Lattner single line of Python, that will be passed to the Python interpreter \n\
16030fdc8d8SChris Lattner 'as is' when the breakpoint gets hit.  If you enter function \n\
16130fdc8d8SChris Lattner definitions, they will be passed to the Python interpreter as soon as \n\
16230fdc8d8SChris Lattner you finish entering the breakpoint command, and they can be called \n\
16330fdc8d8SChris Lattner later (don't forget to add calls to them, if you want them called when \n\
16430fdc8d8SChris Lattner the breakpoint is hit).  If you enter multiple lines of Python that \n\
16530fdc8d8SChris Lattner are not function definitions, they will be collected into a new, \n\
16630fdc8d8SChris Lattner automatically generated Python function, and a call to the newly \n\
16730fdc8d8SChris Lattner generated function will be attached to the breakpoint.  Important \n\
16830fdc8d8SChris Lattner Note: Because loose Python code gets collected into functions, if you \n\
16930fdc8d8SChris Lattner want to access global variables in the 'loose' code, you need to \n\
17030fdc8d8SChris Lattner specify that they are global, using the 'global' keyword.  Be sure to \n\
17130fdc8d8SChris Lattner use correct Python syntax, including indentation, when entering Python \n\
17230fdc8d8SChris Lattner breakpoint commands. \n\
17330fdc8d8SChris Lattner  \n\
17430fdc8d8SChris Lattner Example Python one-line breakpoint command: \n\
17530fdc8d8SChris Lattner  \n\
17630fdc8d8SChris Lattner (lldb) breakpoint command add -p 1 \n\
17730fdc8d8SChris Lattner Enter your Python command(s). Type 'DONE' to end. \n\
17830fdc8d8SChris Lattner > print \"Hit this breakpoint!\" \n\
17930fdc8d8SChris Lattner > DONE \n\
18030fdc8d8SChris Lattner  \n\
1813495f25aSJohnny Chen As a convenience, this also works for a short Python one-liner: \n\
18239d7d4f0SJohnny Chen (lldb) breakpoint command add -p 1 -o \"import time; print time.asctime()\" \n\
1833495f25aSJohnny Chen (lldb) run \n\
1843495f25aSJohnny Chen Launching '.../a.out'  (x86_64) \n\
1853495f25aSJohnny Chen (lldb) Fri Sep 10 12:17:45 2010 \n\
1863495f25aSJohnny Chen Process 21778 Stopped \n\
1873495f25aSJohnny Chen * thread #1: tid = 0x2e03, 0x0000000100000de8 a.out`c + 7 at main.c:39, stop reason = breakpoint 1.1, queue = com.apple.main-thread \n\
1883495f25aSJohnny Chen   36   	\n\
1893495f25aSJohnny Chen   37   	int c(int val)\n\
1903495f25aSJohnny Chen   38   	{\n\
1913495f25aSJohnny Chen   39 ->	    return val + 3;\n\
1923495f25aSJohnny Chen   40   	}\n\
1933495f25aSJohnny Chen   41   	\n\
1943495f25aSJohnny Chen   42   	int main (int argc, char const *argv[])\n\
1953495f25aSJohnny Chen (lldb) \n\
1963495f25aSJohnny Chen  \n\
19730fdc8d8SChris Lattner Example multiple line Python breakpoint command, using function definition: \n\
19830fdc8d8SChris Lattner  \n\
19930fdc8d8SChris Lattner (lldb) breakpoint command add -p 1 \n\
20030fdc8d8SChris Lattner Enter your Python command(s). Type 'DONE' to end. \n\
20130fdc8d8SChris Lattner > def breakpoint_output (bp_no): \n\
20230fdc8d8SChris Lattner >     out_string = \"Hit breakpoint number \" + repr (bp_no) \n\
20330fdc8d8SChris Lattner >     print out_string \n\
20430fdc8d8SChris Lattner >     return True \n\
20530fdc8d8SChris Lattner > breakpoint_output (1) \n\
20630fdc8d8SChris Lattner > DONE \n\
20730fdc8d8SChris Lattner  \n\
20830fdc8d8SChris Lattner  \n\
20930fdc8d8SChris Lattner Example multiple line Python breakpoint command, using 'loose' Python: \n\
21030fdc8d8SChris Lattner  \n\
21130fdc8d8SChris Lattner (lldb) breakpoint command add -p 1 \n\
21230fdc8d8SChris Lattner Enter your Python command(s). Type 'DONE' to end. \n\
21330fdc8d8SChris Lattner > global bp_count \n\
21430fdc8d8SChris Lattner > bp_count = bp_count + 1 \n\
21530fdc8d8SChris Lattner > print \"Hit this breakpoint \" + repr(bp_count) + \" times!\" \n\
21630fdc8d8SChris Lattner > DONE \n\
21730fdc8d8SChris Lattner  \n\
21830fdc8d8SChris Lattner In this case, since there is a reference to a global variable, \n\
21930fdc8d8SChris Lattner 'bp_count', you will also need to make sure 'bp_count' exists and is \n\
22030fdc8d8SChris Lattner initialized: \n\
22130fdc8d8SChris Lattner  \n\
22230fdc8d8SChris Lattner (lldb) script \n\
22330fdc8d8SChris Lattner >>> bp_count = 0 \n\
22430fdc8d8SChris Lattner >>> quit() \n\
22530fdc8d8SChris Lattner  \n\
22630fdc8d8SChris Lattner (lldb)  \n\
22730fdc8d8SChris Lattner  \n\
228650b9268SCaroline Tice  \n\
229650b9268SCaroline Tice Final Note:  If you get a warning that no breakpoint command was generated, \n\
230650b9268SCaroline Tice but you did not get any syntax errors, you probably forgot to add a call \n\
231650b9268SCaroline Tice to your functions. \n\
232650b9268SCaroline Tice  \n\
233e3d26315SCaroline Tice Special information about debugger command breakpoint commands \n\
234e3d26315SCaroline Tice -------------------------------------------------------------- \n\
23530fdc8d8SChris Lattner  \n\
23630fdc8d8SChris Lattner You may enter any debugger command, exactly as you would at the \n\
23730fdc8d8SChris Lattner debugger prompt.  You may enter as many debugger commands as you like, \n\
23830fdc8d8SChris Lattner but do NOT enter more than one command per line. \n" );
239*405fe67fSCaroline Tice 
240*405fe67fSCaroline Tice 
241*405fe67fSCaroline Tice     CommandArgumentEntry arg;
242*405fe67fSCaroline Tice     CommandArgumentData bp_id_arg;
243*405fe67fSCaroline Tice 
244*405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
245*405fe67fSCaroline Tice     bp_id_arg.arg_type = eArgTypeBreakpointID;
246*405fe67fSCaroline Tice     bp_id_arg.arg_repetition = eArgRepeatPlain;
247*405fe67fSCaroline Tice 
248*405fe67fSCaroline Tice     // There is only one variant this argument could be; put it into the argument entry.
249*405fe67fSCaroline Tice     arg.push_back (bp_id_arg);
250*405fe67fSCaroline Tice 
251*405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
252*405fe67fSCaroline Tice     m_arguments.push_back (arg);
25330fdc8d8SChris Lattner }
25430fdc8d8SChris Lattner 
25530fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::~CommandObjectBreakpointCommandAdd ()
25630fdc8d8SChris Lattner {
25730fdc8d8SChris Lattner }
25830fdc8d8SChris Lattner 
25930fdc8d8SChris Lattner bool
26030fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::Execute
26130fdc8d8SChris Lattner (
26230fdc8d8SChris Lattner     Args& command,
26330fdc8d8SChris Lattner     CommandReturnObject &result
26430fdc8d8SChris Lattner )
26530fdc8d8SChris Lattner {
266a7015092SGreg Clayton     Target *target = m_interpreter.GetDebugger().GetSelectedTarget().get();
26730fdc8d8SChris Lattner 
26830fdc8d8SChris Lattner     if (target == NULL)
26930fdc8d8SChris Lattner     {
27030fdc8d8SChris Lattner         result.AppendError ("There is not a current executable; there are no breakpoints to which to add commands");
27130fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
27230fdc8d8SChris Lattner         return false;
27330fdc8d8SChris Lattner     }
27430fdc8d8SChris Lattner 
27530fdc8d8SChris Lattner     const BreakpointList &breakpoints = target->GetBreakpointList();
27630fdc8d8SChris Lattner     size_t num_breakpoints = breakpoints.GetSize();
27730fdc8d8SChris Lattner 
27830fdc8d8SChris Lattner     if (num_breakpoints == 0)
27930fdc8d8SChris Lattner     {
28030fdc8d8SChris Lattner         result.AppendError ("No breakpoints exist to have commands added");
28130fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
28230fdc8d8SChris Lattner         return false;
28330fdc8d8SChris Lattner     }
28430fdc8d8SChris Lattner 
28530fdc8d8SChris Lattner     if (command.GetArgumentCount() == 0)
28630fdc8d8SChris Lattner     {
28730fdc8d8SChris Lattner         result.AppendError ("No breakpoint specified to which to add the commands");
28830fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
28930fdc8d8SChris Lattner         return false;
29030fdc8d8SChris Lattner     }
29130fdc8d8SChris Lattner 
29230fdc8d8SChris Lattner     BreakpointIDList valid_bp_ids;
29330fdc8d8SChris Lattner     CommandObjectMultiwordBreakpoint::VerifyBreakpointIDs (command, target, result, &valid_bp_ids);
29430fdc8d8SChris Lattner 
29530fdc8d8SChris Lattner     if (result.Succeeded())
29630fdc8d8SChris Lattner     {
297c982c768SGreg Clayton         const size_t count = valid_bp_ids.GetSize();
298c982c768SGreg Clayton         for (size_t i = 0; i < count; ++i)
29930fdc8d8SChris Lattner         {
30030fdc8d8SChris Lattner             BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex (i);
30130fdc8d8SChris Lattner             if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID)
30230fdc8d8SChris Lattner             {
30330fdc8d8SChris Lattner                 Breakpoint *bp = target->GetBreakpointByID (cur_bp_id.GetBreakpointID()).get();
30439d7d4f0SJohnny Chen                 BreakpointOptions *bp_options = NULL;
30539d7d4f0SJohnny Chen                 if (cur_bp_id.GetLocationID() == LLDB_INVALID_BREAK_ID)
30639d7d4f0SJohnny Chen                 {
30739d7d4f0SJohnny Chen                     // This breakpoint does not have an associated location.
30839d7d4f0SJohnny Chen                     bp_options = bp->GetOptions();
30939d7d4f0SJohnny Chen                 }
31039d7d4f0SJohnny Chen                 else
31130fdc8d8SChris Lattner                 {
31230fdc8d8SChris Lattner                     BreakpointLocationSP bp_loc_sp(bp->FindLocationByID (cur_bp_id.GetLocationID()));
31339d7d4f0SJohnny Chen                     // This breakpoint does have an associated location.
31439d7d4f0SJohnny Chen                     // Get its breakpoint options.
31530fdc8d8SChris Lattner                     if (bp_loc_sp)
31639d7d4f0SJohnny Chen                         bp_options = bp_loc_sp->GetLocationOptions();
31739d7d4f0SJohnny Chen                 }
31839d7d4f0SJohnny Chen 
31939d7d4f0SJohnny Chen                 // Skip this breakpoiont if bp_options is not good.
32039d7d4f0SJohnny Chen                 if (bp_options == NULL) continue;
32139d7d4f0SJohnny Chen 
32239d7d4f0SJohnny Chen                 // If we are using script language, get the script interpreter
32339d7d4f0SJohnny Chen                 // in order to set or collect command callback.  Otherwise, call
32439d7d4f0SJohnny Chen                 // the methods associated with this object.
32530fdc8d8SChris Lattner                 if (m_options.m_use_script_language)
32630fdc8d8SChris Lattner                 {
32739d7d4f0SJohnny Chen                     // Special handling for one-liner specified inline.
32839d7d4f0SJohnny Chen                     if (m_options.m_use_one_liner)
329a7015092SGreg Clayton                         m_interpreter.GetScriptInterpreter()->SetBreakpointCommandCallback (bp_options,
33039d7d4f0SJohnny Chen                                                                                             m_options.m_one_liner.c_str());
33194de55d5SJohnny Chen                     else
332a7015092SGreg Clayton                         m_interpreter.GetScriptInterpreter()->CollectDataForBreakpointCommandCallback (bp_options,
33330fdc8d8SChris Lattner                                                                                                        result);
33430fdc8d8SChris Lattner                 }
33530fdc8d8SChris Lattner                 else
33630fdc8d8SChris Lattner                 {
33739d7d4f0SJohnny Chen                     // Special handling for one-liner specified inline.
33839d7d4f0SJohnny Chen                     if (m_options.m_use_one_liner)
339a7015092SGreg Clayton                         SetBreakpointCommandCallback (bp_options,
34039d7d4f0SJohnny Chen                                                       m_options.m_one_liner.c_str());
34139d7d4f0SJohnny Chen                     else
342a7015092SGreg Clayton                         CollectDataForBreakpointCommandCallback (bp_options,
343b132097bSGreg Clayton                                                                  result);
34430fdc8d8SChris Lattner                 }
34530fdc8d8SChris Lattner             }
34630fdc8d8SChris Lattner         }
34730fdc8d8SChris Lattner     }
34830fdc8d8SChris Lattner 
34930fdc8d8SChris Lattner     return result.Succeeded();
35030fdc8d8SChris Lattner }
35130fdc8d8SChris Lattner 
35230fdc8d8SChris Lattner Options *
35330fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::GetOptions ()
35430fdc8d8SChris Lattner {
35530fdc8d8SChris Lattner     return &m_options;
35630fdc8d8SChris Lattner }
35730fdc8d8SChris Lattner 
35830fdc8d8SChris Lattner const char *g_reader_instructions = "Enter your debugger command(s).  Type 'DONE' to end.";
35930fdc8d8SChris Lattner 
36030fdc8d8SChris Lattner void
36130fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CollectDataForBreakpointCommandCallback
36230fdc8d8SChris Lattner (
36330fdc8d8SChris Lattner     BreakpointOptions *bp_options,
36430fdc8d8SChris Lattner     CommandReturnObject &result
36530fdc8d8SChris Lattner )
36630fdc8d8SChris Lattner {
367a7015092SGreg Clayton     InputReaderSP reader_sp (new InputReader(m_interpreter.GetDebugger()));
36830fdc8d8SChris Lattner     std::auto_ptr<BreakpointOptions::CommandData> data_ap(new BreakpointOptions::CommandData());
36930fdc8d8SChris Lattner     if (reader_sp && data_ap.get())
37030fdc8d8SChris Lattner     {
37130fdc8d8SChris Lattner         BatonSP baton_sp (new BreakpointOptions::CommandBaton (data_ap.release()));
37230fdc8d8SChris Lattner         bp_options->SetCallback (CommandObjectBreakpointCommand::BreakpointOptionsCallbackFunction, baton_sp);
37330fdc8d8SChris Lattner 
37430fdc8d8SChris Lattner         Error err (reader_sp->Initialize (CommandObjectBreakpointCommandAdd::GenerateBreakpointCommandCallback,
37530fdc8d8SChris Lattner                                           bp_options,                   // baton
37630fdc8d8SChris Lattner                                           eInputReaderGranularityLine,  // token size, to pass to callback function
37730fdc8d8SChris Lattner                                           "DONE",                       // end token
37830fdc8d8SChris Lattner                                           "> ",                         // prompt
37930fdc8d8SChris Lattner                                           true));                       // echo input
38030fdc8d8SChris Lattner         if (err.Success())
38130fdc8d8SChris Lattner         {
382a7015092SGreg Clayton             m_interpreter.GetDebugger().PushInputReader (reader_sp);
38330fdc8d8SChris Lattner             result.SetStatus (eReturnStatusSuccessFinishNoResult);
38430fdc8d8SChris Lattner         }
38530fdc8d8SChris Lattner         else
38630fdc8d8SChris Lattner         {
38730fdc8d8SChris Lattner             result.AppendError (err.AsCString());
38830fdc8d8SChris Lattner             result.SetStatus (eReturnStatusFailed);
38930fdc8d8SChris Lattner         }
39030fdc8d8SChris Lattner     }
39130fdc8d8SChris Lattner     else
39230fdc8d8SChris Lattner     {
39330fdc8d8SChris Lattner         result.AppendError("out of memory");
39430fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
39530fdc8d8SChris Lattner     }
39630fdc8d8SChris Lattner 
39730fdc8d8SChris Lattner }
39830fdc8d8SChris Lattner 
3994550154dSJohnny Chen // Set a one-liner as the callback for the breakpoint.
40039d7d4f0SJohnny Chen void
401a7015092SGreg Clayton CommandObjectBreakpointCommandAdd::SetBreakpointCommandCallback (BreakpointOptions *bp_options,
40239d7d4f0SJohnny Chen                                                                  const char *oneliner)
40339d7d4f0SJohnny Chen {
40439d7d4f0SJohnny Chen     std::auto_ptr<BreakpointOptions::CommandData> data_ap(new BreakpointOptions::CommandData());
40539d7d4f0SJohnny Chen 
40639d7d4f0SJohnny Chen     // It's necessary to set both user_source and script_source to the oneliner.
40739d7d4f0SJohnny Chen     // The former is used to generate callback description (as in breakpoint command list)
40839d7d4f0SJohnny Chen     // while the latter is used for Python to interpret during the actual callback.
40939d7d4f0SJohnny Chen     data_ap->user_source.AppendString (oneliner);
41039d7d4f0SJohnny Chen     data_ap->script_source.AppendString (oneliner);
41139d7d4f0SJohnny Chen 
41239d7d4f0SJohnny Chen     BatonSP baton_sp (new BreakpointOptions::CommandBaton (data_ap.release()));
41339d7d4f0SJohnny Chen     bp_options->SetCallback (CommandObjectBreakpointCommand::BreakpointOptionsCallbackFunction, baton_sp);
41439d7d4f0SJohnny Chen 
41539d7d4f0SJohnny Chen     return;
41639d7d4f0SJohnny Chen }
41739d7d4f0SJohnny Chen 
41830fdc8d8SChris Lattner size_t
41930fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::GenerateBreakpointCommandCallback
42030fdc8d8SChris Lattner (
42130fdc8d8SChris Lattner     void *baton,
4226611103cSGreg Clayton     InputReader &reader,
42330fdc8d8SChris Lattner     lldb::InputReaderAction notification,
42430fdc8d8SChris Lattner     const char *bytes,
42530fdc8d8SChris Lattner     size_t bytes_len
42630fdc8d8SChris Lattner )
42730fdc8d8SChris Lattner {
4286611103cSGreg Clayton     FILE *out_fh = reader.GetDebugger().GetOutputFileHandle();
42930fdc8d8SChris Lattner 
43030fdc8d8SChris Lattner     switch (notification)
43130fdc8d8SChris Lattner     {
43230fdc8d8SChris Lattner     case eInputReaderActivate:
43330fdc8d8SChris Lattner         if (out_fh)
43430fdc8d8SChris Lattner         {
43530fdc8d8SChris Lattner             ::fprintf (out_fh, "%s\n", g_reader_instructions);
4366611103cSGreg Clayton             if (reader.GetPrompt())
4376611103cSGreg Clayton                 ::fprintf (out_fh, "%s", reader.GetPrompt());
43830fdc8d8SChris Lattner         }
43930fdc8d8SChris Lattner         break;
44030fdc8d8SChris Lattner 
44130fdc8d8SChris Lattner     case eInputReaderDeactivate:
44230fdc8d8SChris Lattner         break;
44330fdc8d8SChris Lattner 
44430fdc8d8SChris Lattner     case eInputReaderReactivate:
4456611103cSGreg Clayton         if (out_fh && reader.GetPrompt())
4466611103cSGreg Clayton             ::fprintf (out_fh, "%s", reader.GetPrompt());
44730fdc8d8SChris Lattner         break;
44830fdc8d8SChris Lattner 
44930fdc8d8SChris Lattner     case eInputReaderGotToken:
45030fdc8d8SChris Lattner         if (bytes && bytes_len && baton)
45130fdc8d8SChris Lattner         {
45230fdc8d8SChris Lattner             BreakpointOptions *bp_options = (BreakpointOptions *) baton;
45330fdc8d8SChris Lattner             if (bp_options)
45430fdc8d8SChris Lattner             {
45530fdc8d8SChris Lattner                 Baton *bp_options_baton = bp_options->GetBaton();
45630fdc8d8SChris Lattner                 if (bp_options_baton)
45730fdc8d8SChris Lattner                     ((BreakpointOptions::CommandData *)bp_options_baton->m_data)->user_source.AppendString (bytes, bytes_len);
45830fdc8d8SChris Lattner             }
45930fdc8d8SChris Lattner         }
4606611103cSGreg Clayton         if (out_fh && !reader.IsDone() && reader.GetPrompt())
4616611103cSGreg Clayton             ::fprintf (out_fh, "%s", reader.GetPrompt());
46230fdc8d8SChris Lattner         break;
46330fdc8d8SChris Lattner 
46430fdc8d8SChris Lattner     case eInputReaderDone:
46530fdc8d8SChris Lattner         break;
46630fdc8d8SChris Lattner     }
46730fdc8d8SChris Lattner 
46830fdc8d8SChris Lattner     return bytes_len;
46930fdc8d8SChris Lattner }
47030fdc8d8SChris Lattner 
47130fdc8d8SChris Lattner 
47230fdc8d8SChris Lattner //-------------------------------------------------------------------------
47330fdc8d8SChris Lattner // CommandObjectBreakpointCommandRemove
47430fdc8d8SChris Lattner //-------------------------------------------------------------------------
47530fdc8d8SChris Lattner 
476a7015092SGreg Clayton CommandObjectBreakpointCommandRemove::CommandObjectBreakpointCommandRemove (CommandInterpreter &interpreter) :
477a7015092SGreg Clayton     CommandObject (interpreter,
478a7015092SGreg Clayton                    "remove",
47930fdc8d8SChris Lattner                    "Remove the set of commands from a breakpoint.",
480*405fe67fSCaroline Tice                    NULL)
48130fdc8d8SChris Lattner {
482*405fe67fSCaroline Tice     CommandArgumentEntry arg;
483*405fe67fSCaroline Tice     CommandArgumentData bp_id_arg;
484*405fe67fSCaroline Tice 
485*405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
486*405fe67fSCaroline Tice     bp_id_arg.arg_type = eArgTypeBreakpointID;
487*405fe67fSCaroline Tice     bp_id_arg.arg_repetition = eArgRepeatPlain;
488*405fe67fSCaroline Tice 
489*405fe67fSCaroline Tice     // There is only one variant this argument could be; put it into the argument entry.
490*405fe67fSCaroline Tice     arg.push_back (bp_id_arg);
491*405fe67fSCaroline Tice 
492*405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
493*405fe67fSCaroline Tice     m_arguments.push_back (arg);
49430fdc8d8SChris Lattner }
49530fdc8d8SChris Lattner 
49630fdc8d8SChris Lattner CommandObjectBreakpointCommandRemove::~CommandObjectBreakpointCommandRemove ()
49730fdc8d8SChris Lattner {
49830fdc8d8SChris Lattner }
49930fdc8d8SChris Lattner 
50030fdc8d8SChris Lattner bool
5016611103cSGreg Clayton CommandObjectBreakpointCommandRemove::Execute
5026611103cSGreg Clayton (
5036611103cSGreg Clayton     Args& command,
5046611103cSGreg Clayton     CommandReturnObject &result
5056611103cSGreg Clayton )
50630fdc8d8SChris Lattner {
507a7015092SGreg Clayton     Target *target = m_interpreter.GetDebugger().GetSelectedTarget().get();
50830fdc8d8SChris Lattner 
50930fdc8d8SChris Lattner     if (target == NULL)
51030fdc8d8SChris Lattner     {
51130fdc8d8SChris Lattner         result.AppendError ("There is not a current executable; there are no breakpoints from which to remove commands");
51230fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
51330fdc8d8SChris Lattner         return false;
51430fdc8d8SChris Lattner     }
51530fdc8d8SChris Lattner 
51630fdc8d8SChris Lattner     const BreakpointList &breakpoints = target->GetBreakpointList();
51730fdc8d8SChris Lattner     size_t num_breakpoints = breakpoints.GetSize();
51830fdc8d8SChris Lattner 
51930fdc8d8SChris Lattner     if (num_breakpoints == 0)
52030fdc8d8SChris Lattner     {
52130fdc8d8SChris Lattner         result.AppendError ("No breakpoints exist to have commands removed");
52230fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
52330fdc8d8SChris Lattner         return false;
52430fdc8d8SChris Lattner     }
52530fdc8d8SChris Lattner 
52630fdc8d8SChris Lattner     if (command.GetArgumentCount() == 0)
52730fdc8d8SChris Lattner     {
52830fdc8d8SChris Lattner         result.AppendError ("No breakpoint specified from which to remove the commands");
52930fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
53030fdc8d8SChris Lattner         return false;
53130fdc8d8SChris Lattner     }
53230fdc8d8SChris Lattner 
53330fdc8d8SChris Lattner     BreakpointIDList valid_bp_ids;
53430fdc8d8SChris Lattner     CommandObjectMultiwordBreakpoint::VerifyBreakpointIDs (command, target, result, &valid_bp_ids);
53530fdc8d8SChris Lattner 
53630fdc8d8SChris Lattner     if (result.Succeeded())
53730fdc8d8SChris Lattner     {
538c982c768SGreg Clayton         const size_t count = valid_bp_ids.GetSize();
539c982c768SGreg Clayton         for (size_t i = 0; i < count; ++i)
54030fdc8d8SChris Lattner         {
54130fdc8d8SChris Lattner             BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex (i);
54230fdc8d8SChris Lattner             if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID)
54330fdc8d8SChris Lattner             {
54430fdc8d8SChris Lattner                 Breakpoint *bp = target->GetBreakpointByID (cur_bp_id.GetBreakpointID()).get();
54530fdc8d8SChris Lattner                 if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID)
54630fdc8d8SChris Lattner                 {
54730fdc8d8SChris Lattner                     BreakpointLocationSP bp_loc_sp (bp->FindLocationByID (cur_bp_id.GetLocationID()));
54830fdc8d8SChris Lattner                     if (bp_loc_sp)
54930fdc8d8SChris Lattner                         bp_loc_sp->ClearCallback();
55030fdc8d8SChris Lattner                     else
55130fdc8d8SChris Lattner                     {
55230fdc8d8SChris Lattner                         result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n",
55330fdc8d8SChris Lattner                                                      cur_bp_id.GetBreakpointID(),
55430fdc8d8SChris Lattner                                                      cur_bp_id.GetLocationID());
55530fdc8d8SChris Lattner                         result.SetStatus (eReturnStatusFailed);
55630fdc8d8SChris Lattner                         return false;
55730fdc8d8SChris Lattner                     }
55830fdc8d8SChris Lattner                 }
55930fdc8d8SChris Lattner                 else
56030fdc8d8SChris Lattner                 {
56130fdc8d8SChris Lattner                     bp->ClearCallback();
56230fdc8d8SChris Lattner                 }
56330fdc8d8SChris Lattner             }
56430fdc8d8SChris Lattner         }
56530fdc8d8SChris Lattner     }
56630fdc8d8SChris Lattner     return result.Succeeded();
56730fdc8d8SChris Lattner }
56830fdc8d8SChris Lattner 
56930fdc8d8SChris Lattner 
57030fdc8d8SChris Lattner //-------------------------------------------------------------------------
57130fdc8d8SChris Lattner // CommandObjectBreakpointCommandList
57230fdc8d8SChris Lattner //-------------------------------------------------------------------------
57330fdc8d8SChris Lattner 
574a7015092SGreg Clayton CommandObjectBreakpointCommandList::CommandObjectBreakpointCommandList (CommandInterpreter &interpreter) :
575a7015092SGreg Clayton     CommandObject (interpreter,
576a7015092SGreg Clayton                    "list",
57730fdc8d8SChris Lattner                    "List the script or set of commands to be executed when the breakpoint is hit.",
578*405fe67fSCaroline Tice                     NULL)
57930fdc8d8SChris Lattner {
580*405fe67fSCaroline Tice     CommandArgumentEntry arg;
581*405fe67fSCaroline Tice     CommandArgumentData bp_id_arg;
582*405fe67fSCaroline Tice 
583*405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
584*405fe67fSCaroline Tice     bp_id_arg.arg_type = eArgTypeBreakpointID;
585*405fe67fSCaroline Tice     bp_id_arg.arg_repetition = eArgRepeatPlain;
586*405fe67fSCaroline Tice 
587*405fe67fSCaroline Tice     // There is only one variant this argument could be; put it into the argument entry.
588*405fe67fSCaroline Tice     arg.push_back (bp_id_arg);
589*405fe67fSCaroline Tice 
590*405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
591*405fe67fSCaroline Tice     m_arguments.push_back (arg);
59230fdc8d8SChris Lattner }
59330fdc8d8SChris Lattner 
59430fdc8d8SChris Lattner CommandObjectBreakpointCommandList::~CommandObjectBreakpointCommandList ()
59530fdc8d8SChris Lattner {
59630fdc8d8SChris Lattner }
59730fdc8d8SChris Lattner 
59830fdc8d8SChris Lattner bool
5996611103cSGreg Clayton CommandObjectBreakpointCommandList::Execute
6006611103cSGreg Clayton (
6016611103cSGreg Clayton     Args& command,
6026611103cSGreg Clayton     CommandReturnObject &result
6036611103cSGreg Clayton )
60430fdc8d8SChris Lattner {
605a7015092SGreg Clayton     Target *target = m_interpreter.GetDebugger().GetSelectedTarget().get();
60630fdc8d8SChris Lattner 
60730fdc8d8SChris Lattner     if (target == NULL)
60830fdc8d8SChris Lattner     {
60930fdc8d8SChris Lattner         result.AppendError ("There is not a current executable; there are no breakpoints for which to list commands");
61030fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
61130fdc8d8SChris Lattner         return false;
61230fdc8d8SChris Lattner     }
61330fdc8d8SChris Lattner 
61430fdc8d8SChris Lattner     const BreakpointList &breakpoints = target->GetBreakpointList();
61530fdc8d8SChris Lattner     size_t num_breakpoints = breakpoints.GetSize();
61630fdc8d8SChris Lattner 
61730fdc8d8SChris Lattner     if (num_breakpoints == 0)
61830fdc8d8SChris Lattner     {
61930fdc8d8SChris Lattner         result.AppendError ("No breakpoints exist for which to list commands");
62030fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
62130fdc8d8SChris Lattner         return false;
62230fdc8d8SChris Lattner     }
62330fdc8d8SChris Lattner 
62430fdc8d8SChris Lattner     if (command.GetArgumentCount() == 0)
62530fdc8d8SChris Lattner     {
62630fdc8d8SChris Lattner         result.AppendError ("No breakpoint specified for which to list the commands");
62730fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
62830fdc8d8SChris Lattner         return false;
62930fdc8d8SChris Lattner     }
63030fdc8d8SChris Lattner 
63130fdc8d8SChris Lattner     BreakpointIDList valid_bp_ids;
63230fdc8d8SChris Lattner     CommandObjectMultiwordBreakpoint::VerifyBreakpointIDs (command, target, result, &valid_bp_ids);
63330fdc8d8SChris Lattner 
63430fdc8d8SChris Lattner     if (result.Succeeded())
63530fdc8d8SChris Lattner     {
636c982c768SGreg Clayton         const size_t count = valid_bp_ids.GetSize();
637c982c768SGreg Clayton         for (size_t i = 0; i < count; ++i)
63830fdc8d8SChris Lattner         {
63930fdc8d8SChris Lattner             BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex (i);
64030fdc8d8SChris Lattner             if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID)
64130fdc8d8SChris Lattner             {
64230fdc8d8SChris Lattner                 Breakpoint *bp = target->GetBreakpointByID (cur_bp_id.GetBreakpointID()).get();
64330fdc8d8SChris Lattner 
64430fdc8d8SChris Lattner                 if (bp)
64530fdc8d8SChris Lattner                 {
6461b54c88cSJim Ingham                     const BreakpointOptions *bp_options = NULL;
64730fdc8d8SChris Lattner                     if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID)
64830fdc8d8SChris Lattner                     {
64930fdc8d8SChris Lattner                         BreakpointLocationSP bp_loc_sp(bp->FindLocationByID (cur_bp_id.GetLocationID()));
65030fdc8d8SChris Lattner                         if (bp_loc_sp)
65105407f6bSJim Ingham                             bp_options = bp_loc_sp->GetOptionsNoCreate();
65230fdc8d8SChris Lattner                         else
65330fdc8d8SChris Lattner                         {
65430fdc8d8SChris Lattner                             result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n",
65530fdc8d8SChris Lattner                                                          cur_bp_id.GetBreakpointID(),
65630fdc8d8SChris Lattner                                                          cur_bp_id.GetLocationID());
65730fdc8d8SChris Lattner                             result.SetStatus (eReturnStatusFailed);
65830fdc8d8SChris Lattner                             return false;
65930fdc8d8SChris Lattner                         }
66030fdc8d8SChris Lattner                     }
66130fdc8d8SChris Lattner                     else
66230fdc8d8SChris Lattner                     {
66330fdc8d8SChris Lattner                         bp_options = bp->GetOptions();
66430fdc8d8SChris Lattner                     }
66530fdc8d8SChris Lattner 
66630fdc8d8SChris Lattner                     if (bp_options)
66730fdc8d8SChris Lattner                     {
66830fdc8d8SChris Lattner                         StreamString id_str;
66930fdc8d8SChris Lattner                         BreakpointID::GetCanonicalReference (&id_str, cur_bp_id.GetBreakpointID(), cur_bp_id.GetLocationID());
6701b54c88cSJim Ingham                         const Baton *baton = bp_options->GetBaton();
67130fdc8d8SChris Lattner                         if (baton)
67230fdc8d8SChris Lattner                         {
67330fdc8d8SChris Lattner                             result.GetOutputStream().Printf ("Breakpoint %s:\n", id_str.GetData());
67430fdc8d8SChris Lattner                             result.GetOutputStream().IndentMore ();
67530fdc8d8SChris Lattner                             baton->GetDescription(&result.GetOutputStream(), eDescriptionLevelFull);
67630fdc8d8SChris Lattner                             result.GetOutputStream().IndentLess ();
67730fdc8d8SChris Lattner                         }
67830fdc8d8SChris Lattner                         else
67930fdc8d8SChris Lattner                         {
68030fdc8d8SChris Lattner                             result.AppendMessageWithFormat ("Breakpoint %s does not have an associated command.\n", id_str.GetData());
68130fdc8d8SChris Lattner                         }
68230fdc8d8SChris Lattner                     }
68330fdc8d8SChris Lattner                     result.SetStatus (eReturnStatusSuccessFinishResult);
68430fdc8d8SChris Lattner                 }
68530fdc8d8SChris Lattner                 else
68630fdc8d8SChris Lattner                 {
68730fdc8d8SChris Lattner                     result.AppendErrorWithFormat("Invalid breakpoint ID: %u.\n", cur_bp_id.GetBreakpointID());
68830fdc8d8SChris Lattner                     result.SetStatus (eReturnStatusFailed);
68930fdc8d8SChris Lattner                 }
69030fdc8d8SChris Lattner 
69130fdc8d8SChris Lattner             }
69230fdc8d8SChris Lattner         }
69330fdc8d8SChris Lattner     }
69430fdc8d8SChris Lattner 
69530fdc8d8SChris Lattner     return result.Succeeded();
69630fdc8d8SChris Lattner }
69730fdc8d8SChris Lattner 
69830fdc8d8SChris Lattner //-------------------------------------------------------------------------
69930fdc8d8SChris Lattner // CommandObjectBreakpointCommand
70030fdc8d8SChris Lattner //-------------------------------------------------------------------------
70130fdc8d8SChris Lattner 
7026611103cSGreg Clayton CommandObjectBreakpointCommand::CommandObjectBreakpointCommand (CommandInterpreter &interpreter) :
703a7015092SGreg Clayton     CommandObjectMultiword (interpreter,
704a7015092SGreg Clayton                             "command",
70530fdc8d8SChris Lattner                             "A set of commands for adding, removing and examining bits of code to be executed when the breakpoint is hit (breakpoint 'commmands').",
70630fdc8d8SChris Lattner                             "command <sub-command> [<sub-command-options>] <breakpoint-id>")
70730fdc8d8SChris Lattner {
70830fdc8d8SChris Lattner     bool status;
709a7015092SGreg Clayton     CommandObjectSP add_command_object (new CommandObjectBreakpointCommandAdd (interpreter));
710a7015092SGreg Clayton     CommandObjectSP remove_command_object (new CommandObjectBreakpointCommandRemove (interpreter));
711a7015092SGreg Clayton     CommandObjectSP list_command_object (new CommandObjectBreakpointCommandList (interpreter));
71230fdc8d8SChris Lattner 
71330fdc8d8SChris Lattner     add_command_object->SetCommandName ("breakpoint command add");
71430fdc8d8SChris Lattner     remove_command_object->SetCommandName ("breakpoint command remove");
71530fdc8d8SChris Lattner     list_command_object->SetCommandName ("breakpoint command list");
71630fdc8d8SChris Lattner 
717a7015092SGreg Clayton     status = LoadSubCommand ("add",    add_command_object);
718a7015092SGreg Clayton     status = LoadSubCommand ("remove", remove_command_object);
719a7015092SGreg Clayton     status = LoadSubCommand ("list",   list_command_object);
72030fdc8d8SChris Lattner }
72130fdc8d8SChris Lattner 
72230fdc8d8SChris Lattner 
72330fdc8d8SChris Lattner CommandObjectBreakpointCommand::~CommandObjectBreakpointCommand ()
72430fdc8d8SChris Lattner {
72530fdc8d8SChris Lattner }
72630fdc8d8SChris Lattner 
72730fdc8d8SChris Lattner bool
72830fdc8d8SChris Lattner CommandObjectBreakpointCommand::BreakpointOptionsCallbackFunction
72930fdc8d8SChris Lattner (
73030fdc8d8SChris Lattner     void *baton,
73130fdc8d8SChris Lattner     StoppointCallbackContext *context,
73230fdc8d8SChris Lattner     lldb::user_id_t break_id,
73330fdc8d8SChris Lattner     lldb::user_id_t break_loc_id
73430fdc8d8SChris Lattner )
73530fdc8d8SChris Lattner {
73630fdc8d8SChris Lattner     bool ret_value = true;
73730fdc8d8SChris Lattner     if (baton == NULL)
73830fdc8d8SChris Lattner         return true;
73930fdc8d8SChris Lattner 
74030fdc8d8SChris Lattner 
74130fdc8d8SChris Lattner     BreakpointOptions::CommandData *data = (BreakpointOptions::CommandData *) baton;
74230fdc8d8SChris Lattner     StringList &commands = data->user_source;
74330fdc8d8SChris Lattner 
74430fdc8d8SChris Lattner     if (commands.GetSize() > 0)
74530fdc8d8SChris Lattner     {
74630fdc8d8SChris Lattner         uint32_t num_commands = commands.GetSize();
74730fdc8d8SChris Lattner         CommandReturnObject result;
7486611103cSGreg Clayton         if (context->exe_ctx.target)
7496611103cSGreg Clayton         {
75030fdc8d8SChris Lattner 
7516611103cSGreg Clayton             Debugger &debugger = context->exe_ctx.target->GetDebugger();
7526611103cSGreg Clayton             CommandInterpreter &interpreter = debugger.GetCommandInterpreter();
75330fdc8d8SChris Lattner 
7546611103cSGreg Clayton             FILE *out_fh = debugger.GetOutputFileHandle();
7556611103cSGreg Clayton             FILE *err_fh = debugger.GetErrorFileHandle();
75630fdc8d8SChris Lattner 
75730fdc8d8SChris Lattner             uint32_t i;
75830fdc8d8SChris Lattner             for (i = 0; i < num_commands; ++i)
75930fdc8d8SChris Lattner             {
76030fdc8d8SChris Lattner 
76130fdc8d8SChris Lattner                 // First time through we use the context from the stoppoint, after that we use whatever
76230fdc8d8SChris Lattner                 // has been set by the previous command.
76330fdc8d8SChris Lattner 
7646611103cSGreg Clayton                 if (!interpreter.HandleCommand (commands.GetStringAtIndex(i), false, result, &context->exe_ctx))
76530fdc8d8SChris Lattner                     break;
76630fdc8d8SChris Lattner 
76730fdc8d8SChris Lattner                 // FIXME: This isn't really the right way to do this.  We should be able to peek at the public
76830fdc8d8SChris Lattner                 // to see if there is any new events, but that is racey, since the internal process thread has to run and
76930fdc8d8SChris Lattner                 // deliver the event to the public queue before a run will show up.  So for now we check
77030fdc8d8SChris Lattner                 // the internal thread state.
77130fdc8d8SChris Lattner 
7726611103cSGreg Clayton                 lldb::StateType internal_state = context->exe_ctx.process->GetPrivateState();
77330fdc8d8SChris Lattner                 if (internal_state != eStateStopped)
77430fdc8d8SChris Lattner                 {
77530fdc8d8SChris Lattner                     if (i < num_commands - 1)
77630fdc8d8SChris Lattner                     {
77730fdc8d8SChris Lattner                         if (out_fh)
77830fdc8d8SChris Lattner                             ::fprintf (out_fh, "Short-circuiting command execution because target state changed to %s."
77930fdc8d8SChris Lattner                                                " last command: \"%s\"\n", StateAsCString(internal_state),
78030fdc8d8SChris Lattner                                                commands.GetStringAtIndex(i));
78130fdc8d8SChris Lattner                     }
78230fdc8d8SChris Lattner                     break;
78330fdc8d8SChris Lattner                 }
78430fdc8d8SChris Lattner 
78530fdc8d8SChris Lattner                 if (out_fh)
78630fdc8d8SChris Lattner                     ::fprintf (out_fh, "%s", result.GetErrorStream().GetData());
78730fdc8d8SChris Lattner                 if (err_fh)
78830fdc8d8SChris Lattner                     ::fprintf (err_fh, "%s", result.GetOutputStream().GetData());
78930fdc8d8SChris Lattner                 result.Clear();
79030fdc8d8SChris Lattner                 result.SetStatus (eReturnStatusSuccessFinishNoResult);
79130fdc8d8SChris Lattner             }
79230fdc8d8SChris Lattner 
79330fdc8d8SChris Lattner             if (err_fh && !result.Succeeded() && i < num_commands)
79430fdc8d8SChris Lattner                 ::fprintf (err_fh, "Attempt to execute '%s' failed.\n", commands.GetStringAtIndex(i));
79530fdc8d8SChris Lattner 
79630fdc8d8SChris Lattner             if (out_fh)
79730fdc8d8SChris Lattner                 ::fprintf (out_fh, "%s", result.GetErrorStream().GetData());
79830fdc8d8SChris Lattner 
79930fdc8d8SChris Lattner             if (err_fh)
80030fdc8d8SChris Lattner                 ::fprintf (err_fh, "%s", result.GetOutputStream().GetData());
80130fdc8d8SChris Lattner         }
8026611103cSGreg Clayton     }
80330fdc8d8SChris Lattner     return ret_value;
80430fdc8d8SChris Lattner }
80530fdc8d8SChris Lattner 
806