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 {
51ed8a705cSGreg Clayton     { LLDB_OPT_SET_ALL, false, "one-liner", 'o', required_argument, NULL, 0, "<one-liner>",
5239d7d4f0SJohnny Chen         "Specify a one-liner inline." },
5339d7d4f0SJohnny Chen 
548651121cSJim Ingham     { LLDB_OPT_SET_1, true, "script",    's', no_argument, NULL, 0, NULL,
5530fdc8d8SChris Lattner         "Write the breakpoint command script in the default scripting language."},
5630fdc8d8SChris Lattner 
578651121cSJim Ingham     { LLDB_OPT_SET_2, true, "python",    'p', no_argument, NULL, 0, NULL,
5830fdc8d8SChris Lattner         "Write the breakpoint command script in the Python scripting language."},
5930fdc8d8SChris Lattner 
608651121cSJim Ingham     { LLDB_OPT_SET_3, true, "commands",  'c', no_argument, NULL, 0, NULL,
61e3d26315SCaroline Tice         "Write the breakpoint command script using standard debugger commands."},
6230fdc8d8SChris Lattner 
6330fdc8d8SChris Lattner     { 0, false, NULL, 0, 0, NULL, 0, NULL, 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.",
13230fdc8d8SChris Lattner                    "breakpoint command add <cmd-options> <breakpoint-id>")
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\
228*650b9268SCaroline Tice  \n\
229*650b9268SCaroline Tice Final Note:  If you get a warning that no breakpoint command was generated, \n\
230*650b9268SCaroline Tice but you did not get any syntax errors, you probably forgot to add a call \n\
231*650b9268SCaroline Tice to your functions. \n\
232*650b9268SCaroline 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" );
23930fdc8d8SChris Lattner }
24030fdc8d8SChris Lattner 
24130fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::~CommandObjectBreakpointCommandAdd ()
24230fdc8d8SChris Lattner {
24330fdc8d8SChris Lattner }
24430fdc8d8SChris Lattner 
24530fdc8d8SChris Lattner bool
24630fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::Execute
24730fdc8d8SChris Lattner (
24830fdc8d8SChris Lattner     Args& command,
24930fdc8d8SChris Lattner     CommandReturnObject &result
25030fdc8d8SChris Lattner )
25130fdc8d8SChris Lattner {
252a7015092SGreg Clayton     Target *target = m_interpreter.GetDebugger().GetSelectedTarget().get();
25330fdc8d8SChris Lattner 
25430fdc8d8SChris Lattner     if (target == NULL)
25530fdc8d8SChris Lattner     {
25630fdc8d8SChris Lattner         result.AppendError ("There is not a current executable; there are no breakpoints to which to add commands");
25730fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
25830fdc8d8SChris Lattner         return false;
25930fdc8d8SChris Lattner     }
26030fdc8d8SChris Lattner 
26130fdc8d8SChris Lattner     const BreakpointList &breakpoints = target->GetBreakpointList();
26230fdc8d8SChris Lattner     size_t num_breakpoints = breakpoints.GetSize();
26330fdc8d8SChris Lattner 
26430fdc8d8SChris Lattner     if (num_breakpoints == 0)
26530fdc8d8SChris Lattner     {
26630fdc8d8SChris Lattner         result.AppendError ("No breakpoints exist to have commands added");
26730fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
26830fdc8d8SChris Lattner         return false;
26930fdc8d8SChris Lattner     }
27030fdc8d8SChris Lattner 
27130fdc8d8SChris Lattner     if (command.GetArgumentCount() == 0)
27230fdc8d8SChris Lattner     {
27330fdc8d8SChris Lattner         result.AppendError ("No breakpoint specified to which to add the commands");
27430fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
27530fdc8d8SChris Lattner         return false;
27630fdc8d8SChris Lattner     }
27730fdc8d8SChris Lattner 
27830fdc8d8SChris Lattner     BreakpointIDList valid_bp_ids;
27930fdc8d8SChris Lattner     CommandObjectMultiwordBreakpoint::VerifyBreakpointIDs (command, target, result, &valid_bp_ids);
28030fdc8d8SChris Lattner 
28130fdc8d8SChris Lattner     if (result.Succeeded())
28230fdc8d8SChris Lattner     {
283c982c768SGreg Clayton         const size_t count = valid_bp_ids.GetSize();
284c982c768SGreg Clayton         for (size_t i = 0; i < count; ++i)
28530fdc8d8SChris Lattner         {
28630fdc8d8SChris Lattner             BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex (i);
28730fdc8d8SChris Lattner             if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID)
28830fdc8d8SChris Lattner             {
28930fdc8d8SChris Lattner                 Breakpoint *bp = target->GetBreakpointByID (cur_bp_id.GetBreakpointID()).get();
29039d7d4f0SJohnny Chen                 BreakpointOptions *bp_options = NULL;
29139d7d4f0SJohnny Chen                 if (cur_bp_id.GetLocationID() == LLDB_INVALID_BREAK_ID)
29239d7d4f0SJohnny Chen                 {
29339d7d4f0SJohnny Chen                     // This breakpoint does not have an associated location.
29439d7d4f0SJohnny Chen                     bp_options = bp->GetOptions();
29539d7d4f0SJohnny Chen                 }
29639d7d4f0SJohnny Chen                 else
29730fdc8d8SChris Lattner                 {
29830fdc8d8SChris Lattner                     BreakpointLocationSP bp_loc_sp(bp->FindLocationByID (cur_bp_id.GetLocationID()));
29939d7d4f0SJohnny Chen                     // This breakpoint does have an associated location.
30039d7d4f0SJohnny Chen                     // Get its breakpoint options.
30130fdc8d8SChris Lattner                     if (bp_loc_sp)
30239d7d4f0SJohnny Chen                         bp_options = bp_loc_sp->GetLocationOptions();
30339d7d4f0SJohnny Chen                 }
30439d7d4f0SJohnny Chen 
30539d7d4f0SJohnny Chen                 // Skip this breakpoiont if bp_options is not good.
30639d7d4f0SJohnny Chen                 if (bp_options == NULL) continue;
30739d7d4f0SJohnny Chen 
30839d7d4f0SJohnny Chen                 // If we are using script language, get the script interpreter
30939d7d4f0SJohnny Chen                 // in order to set or collect command callback.  Otherwise, call
31039d7d4f0SJohnny Chen                 // the methods associated with this object.
31130fdc8d8SChris Lattner                 if (m_options.m_use_script_language)
31230fdc8d8SChris Lattner                 {
31339d7d4f0SJohnny Chen                     // Special handling for one-liner specified inline.
31439d7d4f0SJohnny Chen                     if (m_options.m_use_one_liner)
315a7015092SGreg Clayton                         m_interpreter.GetScriptInterpreter()->SetBreakpointCommandCallback (bp_options,
31639d7d4f0SJohnny Chen                                                                                             m_options.m_one_liner.c_str());
31794de55d5SJohnny Chen                     else
318a7015092SGreg Clayton                         m_interpreter.GetScriptInterpreter()->CollectDataForBreakpointCommandCallback (bp_options,
31930fdc8d8SChris Lattner                                                                                                        result);
32030fdc8d8SChris Lattner                 }
32130fdc8d8SChris Lattner                 else
32230fdc8d8SChris Lattner                 {
32339d7d4f0SJohnny Chen                     // Special handling for one-liner specified inline.
32439d7d4f0SJohnny Chen                     if (m_options.m_use_one_liner)
325a7015092SGreg Clayton                         SetBreakpointCommandCallback (bp_options,
32639d7d4f0SJohnny Chen                                                       m_options.m_one_liner.c_str());
32739d7d4f0SJohnny Chen                     else
328a7015092SGreg Clayton                         CollectDataForBreakpointCommandCallback (bp_options,
329b132097bSGreg Clayton                                                                  result);
33030fdc8d8SChris Lattner                 }
33130fdc8d8SChris Lattner             }
33230fdc8d8SChris Lattner         }
33330fdc8d8SChris Lattner     }
33430fdc8d8SChris Lattner 
33530fdc8d8SChris Lattner     return result.Succeeded();
33630fdc8d8SChris Lattner }
33730fdc8d8SChris Lattner 
33830fdc8d8SChris Lattner Options *
33930fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::GetOptions ()
34030fdc8d8SChris Lattner {
34130fdc8d8SChris Lattner     return &m_options;
34230fdc8d8SChris Lattner }
34330fdc8d8SChris Lattner 
34430fdc8d8SChris Lattner const char *g_reader_instructions = "Enter your debugger command(s).  Type 'DONE' to end.";
34530fdc8d8SChris Lattner 
34630fdc8d8SChris Lattner void
34730fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::CollectDataForBreakpointCommandCallback
34830fdc8d8SChris Lattner (
34930fdc8d8SChris Lattner     BreakpointOptions *bp_options,
35030fdc8d8SChris Lattner     CommandReturnObject &result
35130fdc8d8SChris Lattner )
35230fdc8d8SChris Lattner {
353a7015092SGreg Clayton     InputReaderSP reader_sp (new InputReader(m_interpreter.GetDebugger()));
35430fdc8d8SChris Lattner     std::auto_ptr<BreakpointOptions::CommandData> data_ap(new BreakpointOptions::CommandData());
35530fdc8d8SChris Lattner     if (reader_sp && data_ap.get())
35630fdc8d8SChris Lattner     {
35730fdc8d8SChris Lattner         BatonSP baton_sp (new BreakpointOptions::CommandBaton (data_ap.release()));
35830fdc8d8SChris Lattner         bp_options->SetCallback (CommandObjectBreakpointCommand::BreakpointOptionsCallbackFunction, baton_sp);
35930fdc8d8SChris Lattner 
36030fdc8d8SChris Lattner         Error err (reader_sp->Initialize (CommandObjectBreakpointCommandAdd::GenerateBreakpointCommandCallback,
36130fdc8d8SChris Lattner                                           bp_options,                   // baton
36230fdc8d8SChris Lattner                                           eInputReaderGranularityLine,  // token size, to pass to callback function
36330fdc8d8SChris Lattner                                           "DONE",                       // end token
36430fdc8d8SChris Lattner                                           "> ",                         // prompt
36530fdc8d8SChris Lattner                                           true));                       // echo input
36630fdc8d8SChris Lattner         if (err.Success())
36730fdc8d8SChris Lattner         {
368a7015092SGreg Clayton             m_interpreter.GetDebugger().PushInputReader (reader_sp);
36930fdc8d8SChris Lattner             result.SetStatus (eReturnStatusSuccessFinishNoResult);
37030fdc8d8SChris Lattner         }
37130fdc8d8SChris Lattner         else
37230fdc8d8SChris Lattner         {
37330fdc8d8SChris Lattner             result.AppendError (err.AsCString());
37430fdc8d8SChris Lattner             result.SetStatus (eReturnStatusFailed);
37530fdc8d8SChris Lattner         }
37630fdc8d8SChris Lattner     }
37730fdc8d8SChris Lattner     else
37830fdc8d8SChris Lattner     {
37930fdc8d8SChris Lattner         result.AppendError("out of memory");
38030fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
38130fdc8d8SChris Lattner     }
38230fdc8d8SChris Lattner 
38330fdc8d8SChris Lattner }
38430fdc8d8SChris Lattner 
3854550154dSJohnny Chen // Set a one-liner as the callback for the breakpoint.
38639d7d4f0SJohnny Chen void
387a7015092SGreg Clayton CommandObjectBreakpointCommandAdd::SetBreakpointCommandCallback (BreakpointOptions *bp_options,
38839d7d4f0SJohnny Chen                                                                  const char *oneliner)
38939d7d4f0SJohnny Chen {
39039d7d4f0SJohnny Chen     std::auto_ptr<BreakpointOptions::CommandData> data_ap(new BreakpointOptions::CommandData());
39139d7d4f0SJohnny Chen 
39239d7d4f0SJohnny Chen     // It's necessary to set both user_source and script_source to the oneliner.
39339d7d4f0SJohnny Chen     // The former is used to generate callback description (as in breakpoint command list)
39439d7d4f0SJohnny Chen     // while the latter is used for Python to interpret during the actual callback.
39539d7d4f0SJohnny Chen     data_ap->user_source.AppendString (oneliner);
39639d7d4f0SJohnny Chen     data_ap->script_source.AppendString (oneliner);
39739d7d4f0SJohnny Chen 
39839d7d4f0SJohnny Chen     BatonSP baton_sp (new BreakpointOptions::CommandBaton (data_ap.release()));
39939d7d4f0SJohnny Chen     bp_options->SetCallback (CommandObjectBreakpointCommand::BreakpointOptionsCallbackFunction, baton_sp);
40039d7d4f0SJohnny Chen 
40139d7d4f0SJohnny Chen     return;
40239d7d4f0SJohnny Chen }
40339d7d4f0SJohnny Chen 
40430fdc8d8SChris Lattner size_t
40530fdc8d8SChris Lattner CommandObjectBreakpointCommandAdd::GenerateBreakpointCommandCallback
40630fdc8d8SChris Lattner (
40730fdc8d8SChris Lattner     void *baton,
4086611103cSGreg Clayton     InputReader &reader,
40930fdc8d8SChris Lattner     lldb::InputReaderAction notification,
41030fdc8d8SChris Lattner     const char *bytes,
41130fdc8d8SChris Lattner     size_t bytes_len
41230fdc8d8SChris Lattner )
41330fdc8d8SChris Lattner {
4146611103cSGreg Clayton     FILE *out_fh = reader.GetDebugger().GetOutputFileHandle();
41530fdc8d8SChris Lattner 
41630fdc8d8SChris Lattner     switch (notification)
41730fdc8d8SChris Lattner     {
41830fdc8d8SChris Lattner     case eInputReaderActivate:
41930fdc8d8SChris Lattner         if (out_fh)
42030fdc8d8SChris Lattner         {
42130fdc8d8SChris Lattner             ::fprintf (out_fh, "%s\n", g_reader_instructions);
4226611103cSGreg Clayton             if (reader.GetPrompt())
4236611103cSGreg Clayton                 ::fprintf (out_fh, "%s", reader.GetPrompt());
42430fdc8d8SChris Lattner         }
42530fdc8d8SChris Lattner         break;
42630fdc8d8SChris Lattner 
42730fdc8d8SChris Lattner     case eInputReaderDeactivate:
42830fdc8d8SChris Lattner         break;
42930fdc8d8SChris Lattner 
43030fdc8d8SChris Lattner     case eInputReaderReactivate:
4316611103cSGreg Clayton         if (out_fh && reader.GetPrompt())
4326611103cSGreg Clayton             ::fprintf (out_fh, "%s", reader.GetPrompt());
43330fdc8d8SChris Lattner         break;
43430fdc8d8SChris Lattner 
43530fdc8d8SChris Lattner     case eInputReaderGotToken:
43630fdc8d8SChris Lattner         if (bytes && bytes_len && baton)
43730fdc8d8SChris Lattner         {
43830fdc8d8SChris Lattner             BreakpointOptions *bp_options = (BreakpointOptions *) baton;
43930fdc8d8SChris Lattner             if (bp_options)
44030fdc8d8SChris Lattner             {
44130fdc8d8SChris Lattner                 Baton *bp_options_baton = bp_options->GetBaton();
44230fdc8d8SChris Lattner                 if (bp_options_baton)
44330fdc8d8SChris Lattner                     ((BreakpointOptions::CommandData *)bp_options_baton->m_data)->user_source.AppendString (bytes, bytes_len);
44430fdc8d8SChris Lattner             }
44530fdc8d8SChris Lattner         }
4466611103cSGreg Clayton         if (out_fh && !reader.IsDone() && reader.GetPrompt())
4476611103cSGreg Clayton             ::fprintf (out_fh, "%s", reader.GetPrompt());
44830fdc8d8SChris Lattner         break;
44930fdc8d8SChris Lattner 
45030fdc8d8SChris Lattner     case eInputReaderDone:
45130fdc8d8SChris Lattner         break;
45230fdc8d8SChris Lattner     }
45330fdc8d8SChris Lattner 
45430fdc8d8SChris Lattner     return bytes_len;
45530fdc8d8SChris Lattner }
45630fdc8d8SChris Lattner 
45730fdc8d8SChris Lattner 
45830fdc8d8SChris Lattner //-------------------------------------------------------------------------
45930fdc8d8SChris Lattner // CommandObjectBreakpointCommandRemove
46030fdc8d8SChris Lattner //-------------------------------------------------------------------------
46130fdc8d8SChris Lattner 
462a7015092SGreg Clayton CommandObjectBreakpointCommandRemove::CommandObjectBreakpointCommandRemove (CommandInterpreter &interpreter) :
463a7015092SGreg Clayton     CommandObject (interpreter,
464a7015092SGreg Clayton                    "remove",
46530fdc8d8SChris Lattner                    "Remove the set of commands from a breakpoint.",
46630fdc8d8SChris Lattner                    "breakpoint command remove <breakpoint-id>")
46730fdc8d8SChris Lattner {
46830fdc8d8SChris Lattner }
46930fdc8d8SChris Lattner 
47030fdc8d8SChris Lattner CommandObjectBreakpointCommandRemove::~CommandObjectBreakpointCommandRemove ()
47130fdc8d8SChris Lattner {
47230fdc8d8SChris Lattner }
47330fdc8d8SChris Lattner 
47430fdc8d8SChris Lattner bool
4756611103cSGreg Clayton CommandObjectBreakpointCommandRemove::Execute
4766611103cSGreg Clayton (
4776611103cSGreg Clayton     Args& command,
4786611103cSGreg Clayton     CommandReturnObject &result
4796611103cSGreg Clayton )
48030fdc8d8SChris Lattner {
481a7015092SGreg Clayton     Target *target = m_interpreter.GetDebugger().GetSelectedTarget().get();
48230fdc8d8SChris Lattner 
48330fdc8d8SChris Lattner     if (target == NULL)
48430fdc8d8SChris Lattner     {
48530fdc8d8SChris Lattner         result.AppendError ("There is not a current executable; there are no breakpoints from which to remove commands");
48630fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
48730fdc8d8SChris Lattner         return false;
48830fdc8d8SChris Lattner     }
48930fdc8d8SChris Lattner 
49030fdc8d8SChris Lattner     const BreakpointList &breakpoints = target->GetBreakpointList();
49130fdc8d8SChris Lattner     size_t num_breakpoints = breakpoints.GetSize();
49230fdc8d8SChris Lattner 
49330fdc8d8SChris Lattner     if (num_breakpoints == 0)
49430fdc8d8SChris Lattner     {
49530fdc8d8SChris Lattner         result.AppendError ("No breakpoints exist to have commands removed");
49630fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
49730fdc8d8SChris Lattner         return false;
49830fdc8d8SChris Lattner     }
49930fdc8d8SChris Lattner 
50030fdc8d8SChris Lattner     if (command.GetArgumentCount() == 0)
50130fdc8d8SChris Lattner     {
50230fdc8d8SChris Lattner         result.AppendError ("No breakpoint specified from which to remove the commands");
50330fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
50430fdc8d8SChris Lattner         return false;
50530fdc8d8SChris Lattner     }
50630fdc8d8SChris Lattner 
50730fdc8d8SChris Lattner     BreakpointIDList valid_bp_ids;
50830fdc8d8SChris Lattner     CommandObjectMultiwordBreakpoint::VerifyBreakpointIDs (command, target, result, &valid_bp_ids);
50930fdc8d8SChris Lattner 
51030fdc8d8SChris Lattner     if (result.Succeeded())
51130fdc8d8SChris Lattner     {
512c982c768SGreg Clayton         const size_t count = valid_bp_ids.GetSize();
513c982c768SGreg Clayton         for (size_t i = 0; i < count; ++i)
51430fdc8d8SChris Lattner         {
51530fdc8d8SChris Lattner             BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex (i);
51630fdc8d8SChris Lattner             if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID)
51730fdc8d8SChris Lattner             {
51830fdc8d8SChris Lattner                 Breakpoint *bp = target->GetBreakpointByID (cur_bp_id.GetBreakpointID()).get();
51930fdc8d8SChris Lattner                 if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID)
52030fdc8d8SChris Lattner                 {
52130fdc8d8SChris Lattner                     BreakpointLocationSP bp_loc_sp (bp->FindLocationByID (cur_bp_id.GetLocationID()));
52230fdc8d8SChris Lattner                     if (bp_loc_sp)
52330fdc8d8SChris Lattner                         bp_loc_sp->ClearCallback();
52430fdc8d8SChris Lattner                     else
52530fdc8d8SChris Lattner                     {
52630fdc8d8SChris Lattner                         result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n",
52730fdc8d8SChris Lattner                                                      cur_bp_id.GetBreakpointID(),
52830fdc8d8SChris Lattner                                                      cur_bp_id.GetLocationID());
52930fdc8d8SChris Lattner                         result.SetStatus (eReturnStatusFailed);
53030fdc8d8SChris Lattner                         return false;
53130fdc8d8SChris Lattner                     }
53230fdc8d8SChris Lattner                 }
53330fdc8d8SChris Lattner                 else
53430fdc8d8SChris Lattner                 {
53530fdc8d8SChris Lattner                     bp->ClearCallback();
53630fdc8d8SChris Lattner                 }
53730fdc8d8SChris Lattner             }
53830fdc8d8SChris Lattner         }
53930fdc8d8SChris Lattner     }
54030fdc8d8SChris Lattner     return result.Succeeded();
54130fdc8d8SChris Lattner }
54230fdc8d8SChris Lattner 
54330fdc8d8SChris Lattner 
54430fdc8d8SChris Lattner //-------------------------------------------------------------------------
54530fdc8d8SChris Lattner // CommandObjectBreakpointCommandList
54630fdc8d8SChris Lattner //-------------------------------------------------------------------------
54730fdc8d8SChris Lattner 
548a7015092SGreg Clayton CommandObjectBreakpointCommandList::CommandObjectBreakpointCommandList (CommandInterpreter &interpreter) :
549a7015092SGreg Clayton     CommandObject (interpreter,
550a7015092SGreg Clayton                    "list",
55130fdc8d8SChris Lattner                    "List the script or set of commands to be executed when the breakpoint is hit.",
55230fdc8d8SChris Lattner                    "breakpoint command list <breakpoint-id>")
55330fdc8d8SChris Lattner {
55430fdc8d8SChris Lattner }
55530fdc8d8SChris Lattner 
55630fdc8d8SChris Lattner CommandObjectBreakpointCommandList::~CommandObjectBreakpointCommandList ()
55730fdc8d8SChris Lattner {
55830fdc8d8SChris Lattner }
55930fdc8d8SChris Lattner 
56030fdc8d8SChris Lattner bool
5616611103cSGreg Clayton CommandObjectBreakpointCommandList::Execute
5626611103cSGreg Clayton (
5636611103cSGreg Clayton     Args& command,
5646611103cSGreg Clayton     CommandReturnObject &result
5656611103cSGreg Clayton )
56630fdc8d8SChris Lattner {
567a7015092SGreg Clayton     Target *target = m_interpreter.GetDebugger().GetSelectedTarget().get();
56830fdc8d8SChris Lattner 
56930fdc8d8SChris Lattner     if (target == NULL)
57030fdc8d8SChris Lattner     {
57130fdc8d8SChris Lattner         result.AppendError ("There is not a current executable; there are no breakpoints for which to list commands");
57230fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
57330fdc8d8SChris Lattner         return false;
57430fdc8d8SChris Lattner     }
57530fdc8d8SChris Lattner 
57630fdc8d8SChris Lattner     const BreakpointList &breakpoints = target->GetBreakpointList();
57730fdc8d8SChris Lattner     size_t num_breakpoints = breakpoints.GetSize();
57830fdc8d8SChris Lattner 
57930fdc8d8SChris Lattner     if (num_breakpoints == 0)
58030fdc8d8SChris Lattner     {
58130fdc8d8SChris Lattner         result.AppendError ("No breakpoints exist for which to list commands");
58230fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
58330fdc8d8SChris Lattner         return false;
58430fdc8d8SChris Lattner     }
58530fdc8d8SChris Lattner 
58630fdc8d8SChris Lattner     if (command.GetArgumentCount() == 0)
58730fdc8d8SChris Lattner     {
58830fdc8d8SChris Lattner         result.AppendError ("No breakpoint specified for which to list the commands");
58930fdc8d8SChris Lattner         result.SetStatus (eReturnStatusFailed);
59030fdc8d8SChris Lattner         return false;
59130fdc8d8SChris Lattner     }
59230fdc8d8SChris Lattner 
59330fdc8d8SChris Lattner     BreakpointIDList valid_bp_ids;
59430fdc8d8SChris Lattner     CommandObjectMultiwordBreakpoint::VerifyBreakpointIDs (command, target, result, &valid_bp_ids);
59530fdc8d8SChris Lattner 
59630fdc8d8SChris Lattner     if (result.Succeeded())
59730fdc8d8SChris Lattner     {
598c982c768SGreg Clayton         const size_t count = valid_bp_ids.GetSize();
599c982c768SGreg Clayton         for (size_t i = 0; i < count; ++i)
60030fdc8d8SChris Lattner         {
60130fdc8d8SChris Lattner             BreakpointID cur_bp_id = valid_bp_ids.GetBreakpointIDAtIndex (i);
60230fdc8d8SChris Lattner             if (cur_bp_id.GetBreakpointID() != LLDB_INVALID_BREAK_ID)
60330fdc8d8SChris Lattner             {
60430fdc8d8SChris Lattner                 Breakpoint *bp = target->GetBreakpointByID (cur_bp_id.GetBreakpointID()).get();
60530fdc8d8SChris Lattner 
60630fdc8d8SChris Lattner                 if (bp)
60730fdc8d8SChris Lattner                 {
6081b54c88cSJim Ingham                     const BreakpointOptions *bp_options = NULL;
60930fdc8d8SChris Lattner                     if (cur_bp_id.GetLocationID() != LLDB_INVALID_BREAK_ID)
61030fdc8d8SChris Lattner                     {
61130fdc8d8SChris Lattner                         BreakpointLocationSP bp_loc_sp(bp->FindLocationByID (cur_bp_id.GetLocationID()));
61230fdc8d8SChris Lattner                         if (bp_loc_sp)
61305407f6bSJim Ingham                             bp_options = bp_loc_sp->GetOptionsNoCreate();
61430fdc8d8SChris Lattner                         else
61530fdc8d8SChris Lattner                         {
61630fdc8d8SChris Lattner                             result.AppendErrorWithFormat("Invalid breakpoint ID: %u.%u.\n",
61730fdc8d8SChris Lattner                                                          cur_bp_id.GetBreakpointID(),
61830fdc8d8SChris Lattner                                                          cur_bp_id.GetLocationID());
61930fdc8d8SChris Lattner                             result.SetStatus (eReturnStatusFailed);
62030fdc8d8SChris Lattner                             return false;
62130fdc8d8SChris Lattner                         }
62230fdc8d8SChris Lattner                     }
62330fdc8d8SChris Lattner                     else
62430fdc8d8SChris Lattner                     {
62530fdc8d8SChris Lattner                         bp_options = bp->GetOptions();
62630fdc8d8SChris Lattner                     }
62730fdc8d8SChris Lattner 
62830fdc8d8SChris Lattner                     if (bp_options)
62930fdc8d8SChris Lattner                     {
63030fdc8d8SChris Lattner                         StreamString id_str;
63130fdc8d8SChris Lattner                         BreakpointID::GetCanonicalReference (&id_str, cur_bp_id.GetBreakpointID(), cur_bp_id.GetLocationID());
6321b54c88cSJim Ingham                         const Baton *baton = bp_options->GetBaton();
63330fdc8d8SChris Lattner                         if (baton)
63430fdc8d8SChris Lattner                         {
63530fdc8d8SChris Lattner                             result.GetOutputStream().Printf ("Breakpoint %s:\n", id_str.GetData());
63630fdc8d8SChris Lattner                             result.GetOutputStream().IndentMore ();
63730fdc8d8SChris Lattner                             baton->GetDescription(&result.GetOutputStream(), eDescriptionLevelFull);
63830fdc8d8SChris Lattner                             result.GetOutputStream().IndentLess ();
63930fdc8d8SChris Lattner                         }
64030fdc8d8SChris Lattner                         else
64130fdc8d8SChris Lattner                         {
64230fdc8d8SChris Lattner                             result.AppendMessageWithFormat ("Breakpoint %s does not have an associated command.\n", id_str.GetData());
64330fdc8d8SChris Lattner                         }
64430fdc8d8SChris Lattner                     }
64530fdc8d8SChris Lattner                     result.SetStatus (eReturnStatusSuccessFinishResult);
64630fdc8d8SChris Lattner                 }
64730fdc8d8SChris Lattner                 else
64830fdc8d8SChris Lattner                 {
64930fdc8d8SChris Lattner                     result.AppendErrorWithFormat("Invalid breakpoint ID: %u.\n", cur_bp_id.GetBreakpointID());
65030fdc8d8SChris Lattner                     result.SetStatus (eReturnStatusFailed);
65130fdc8d8SChris Lattner                 }
65230fdc8d8SChris Lattner 
65330fdc8d8SChris Lattner             }
65430fdc8d8SChris Lattner         }
65530fdc8d8SChris Lattner     }
65630fdc8d8SChris Lattner 
65730fdc8d8SChris Lattner     return result.Succeeded();
65830fdc8d8SChris Lattner }
65930fdc8d8SChris Lattner 
66030fdc8d8SChris Lattner //-------------------------------------------------------------------------
66130fdc8d8SChris Lattner // CommandObjectBreakpointCommand
66230fdc8d8SChris Lattner //-------------------------------------------------------------------------
66330fdc8d8SChris Lattner 
6646611103cSGreg Clayton CommandObjectBreakpointCommand::CommandObjectBreakpointCommand (CommandInterpreter &interpreter) :
665a7015092SGreg Clayton     CommandObjectMultiword (interpreter,
666a7015092SGreg Clayton                             "command",
66730fdc8d8SChris Lattner                             "A set of commands for adding, removing and examining bits of code to be executed when the breakpoint is hit (breakpoint 'commmands').",
66830fdc8d8SChris Lattner                             "command <sub-command> [<sub-command-options>] <breakpoint-id>")
66930fdc8d8SChris Lattner {
67030fdc8d8SChris Lattner     bool status;
671a7015092SGreg Clayton     CommandObjectSP add_command_object (new CommandObjectBreakpointCommandAdd (interpreter));
672a7015092SGreg Clayton     CommandObjectSP remove_command_object (new CommandObjectBreakpointCommandRemove (interpreter));
673a7015092SGreg Clayton     CommandObjectSP list_command_object (new CommandObjectBreakpointCommandList (interpreter));
67430fdc8d8SChris Lattner 
67530fdc8d8SChris Lattner     add_command_object->SetCommandName ("breakpoint command add");
67630fdc8d8SChris Lattner     remove_command_object->SetCommandName ("breakpoint command remove");
67730fdc8d8SChris Lattner     list_command_object->SetCommandName ("breakpoint command list");
67830fdc8d8SChris Lattner 
679a7015092SGreg Clayton     status = LoadSubCommand ("add",    add_command_object);
680a7015092SGreg Clayton     status = LoadSubCommand ("remove", remove_command_object);
681a7015092SGreg Clayton     status = LoadSubCommand ("list",   list_command_object);
68230fdc8d8SChris Lattner }
68330fdc8d8SChris Lattner 
68430fdc8d8SChris Lattner 
68530fdc8d8SChris Lattner CommandObjectBreakpointCommand::~CommandObjectBreakpointCommand ()
68630fdc8d8SChris Lattner {
68730fdc8d8SChris Lattner }
68830fdc8d8SChris Lattner 
68930fdc8d8SChris Lattner bool
69030fdc8d8SChris Lattner CommandObjectBreakpointCommand::BreakpointOptionsCallbackFunction
69130fdc8d8SChris Lattner (
69230fdc8d8SChris Lattner     void *baton,
69330fdc8d8SChris Lattner     StoppointCallbackContext *context,
69430fdc8d8SChris Lattner     lldb::user_id_t break_id,
69530fdc8d8SChris Lattner     lldb::user_id_t break_loc_id
69630fdc8d8SChris Lattner )
69730fdc8d8SChris Lattner {
69830fdc8d8SChris Lattner     bool ret_value = true;
69930fdc8d8SChris Lattner     if (baton == NULL)
70030fdc8d8SChris Lattner         return true;
70130fdc8d8SChris Lattner 
70230fdc8d8SChris Lattner 
70330fdc8d8SChris Lattner     BreakpointOptions::CommandData *data = (BreakpointOptions::CommandData *) baton;
70430fdc8d8SChris Lattner     StringList &commands = data->user_source;
70530fdc8d8SChris Lattner 
70630fdc8d8SChris Lattner     if (commands.GetSize() > 0)
70730fdc8d8SChris Lattner     {
70830fdc8d8SChris Lattner         uint32_t num_commands = commands.GetSize();
70930fdc8d8SChris Lattner         CommandReturnObject result;
7106611103cSGreg Clayton         if (context->exe_ctx.target)
7116611103cSGreg Clayton         {
71230fdc8d8SChris Lattner 
7136611103cSGreg Clayton             Debugger &debugger = context->exe_ctx.target->GetDebugger();
7146611103cSGreg Clayton             CommandInterpreter &interpreter = debugger.GetCommandInterpreter();
71530fdc8d8SChris Lattner 
7166611103cSGreg Clayton             FILE *out_fh = debugger.GetOutputFileHandle();
7176611103cSGreg Clayton             FILE *err_fh = debugger.GetErrorFileHandle();
71830fdc8d8SChris Lattner 
71930fdc8d8SChris Lattner             uint32_t i;
72030fdc8d8SChris Lattner             for (i = 0; i < num_commands; ++i)
72130fdc8d8SChris Lattner             {
72230fdc8d8SChris Lattner 
72330fdc8d8SChris Lattner                 // First time through we use the context from the stoppoint, after that we use whatever
72430fdc8d8SChris Lattner                 // has been set by the previous command.
72530fdc8d8SChris Lattner 
7266611103cSGreg Clayton                 if (!interpreter.HandleCommand (commands.GetStringAtIndex(i), false, result, &context->exe_ctx))
72730fdc8d8SChris Lattner                     break;
72830fdc8d8SChris Lattner 
72930fdc8d8SChris Lattner                 // FIXME: This isn't really the right way to do this.  We should be able to peek at the public
73030fdc8d8SChris Lattner                 // to see if there is any new events, but that is racey, since the internal process thread has to run and
73130fdc8d8SChris Lattner                 // deliver the event to the public queue before a run will show up.  So for now we check
73230fdc8d8SChris Lattner                 // the internal thread state.
73330fdc8d8SChris Lattner 
7346611103cSGreg Clayton                 lldb::StateType internal_state = context->exe_ctx.process->GetPrivateState();
73530fdc8d8SChris Lattner                 if (internal_state != eStateStopped)
73630fdc8d8SChris Lattner                 {
73730fdc8d8SChris Lattner                     if (i < num_commands - 1)
73830fdc8d8SChris Lattner                     {
73930fdc8d8SChris Lattner                         if (out_fh)
74030fdc8d8SChris Lattner                             ::fprintf (out_fh, "Short-circuiting command execution because target state changed to %s."
74130fdc8d8SChris Lattner                                                " last command: \"%s\"\n", StateAsCString(internal_state),
74230fdc8d8SChris Lattner                                                commands.GetStringAtIndex(i));
74330fdc8d8SChris Lattner                     }
74430fdc8d8SChris Lattner                     break;
74530fdc8d8SChris Lattner                 }
74630fdc8d8SChris Lattner 
74730fdc8d8SChris Lattner                 if (out_fh)
74830fdc8d8SChris Lattner                     ::fprintf (out_fh, "%s", result.GetErrorStream().GetData());
74930fdc8d8SChris Lattner                 if (err_fh)
75030fdc8d8SChris Lattner                     ::fprintf (err_fh, "%s", result.GetOutputStream().GetData());
75130fdc8d8SChris Lattner                 result.Clear();
75230fdc8d8SChris Lattner                 result.SetStatus (eReturnStatusSuccessFinishNoResult);
75330fdc8d8SChris Lattner             }
75430fdc8d8SChris Lattner 
75530fdc8d8SChris Lattner             if (err_fh && !result.Succeeded() && i < num_commands)
75630fdc8d8SChris Lattner                 ::fprintf (err_fh, "Attempt to execute '%s' failed.\n", commands.GetStringAtIndex(i));
75730fdc8d8SChris Lattner 
75830fdc8d8SChris Lattner             if (out_fh)
75930fdc8d8SChris Lattner                 ::fprintf (out_fh, "%s", result.GetErrorStream().GetData());
76030fdc8d8SChris Lattner 
76130fdc8d8SChris Lattner             if (err_fh)
76230fdc8d8SChris Lattner                 ::fprintf (err_fh, "%s", result.GetOutputStream().GetData());
76330fdc8d8SChris Lattner         }
7646611103cSGreg Clayton     }
76530fdc8d8SChris Lattner     return ret_value;
76630fdc8d8SChris Lattner }
76730fdc8d8SChris Lattner 
768