130fdc8d8SChris Lattner //===-- CommandObjectFrame.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 #include "CommandObjectFrame.h" 1130fdc8d8SChris Lattner 1230fdc8d8SChris Lattner // C Includes 1330fdc8d8SChris Lattner // C++ Includes 1430fdc8d8SChris Lattner // Other libraries and framework includes 1530fdc8d8SChris Lattner // Project includes 1640af72e1SJim Ingham #include "lldb/Interpreter/Args.h" 1730fdc8d8SChris Lattner #include "lldb/Core/Debugger.h" 1830fdc8d8SChris Lattner #include "lldb/Core/Timer.h" 196611103cSGreg Clayton #include "lldb/Core/Debugger.h" 2030fdc8d8SChris Lattner #include "lldb/Interpreter/CommandInterpreter.h" 2130fdc8d8SChris Lattner #include "lldb/Interpreter/CommandReturnObject.h" 2230fdc8d8SChris Lattner #include "lldb/Target/Process.h" 2330fdc8d8SChris Lattner #include "lldb/Target/StackFrame.h" 2430fdc8d8SChris Lattner #include "lldb/Target/Thread.h" 2530fdc8d8SChris Lattner 2630fdc8d8SChris Lattner #include "CommandObjectThread.h" 2730fdc8d8SChris Lattner 2830fdc8d8SChris Lattner using namespace lldb; 2930fdc8d8SChris Lattner using namespace lldb_private; 3030fdc8d8SChris Lattner 3130fdc8d8SChris Lattner #pragma mark CommandObjectFrameInfo 3230fdc8d8SChris Lattner 3330fdc8d8SChris Lattner //------------------------------------------------------------------------- 3430fdc8d8SChris Lattner // CommandObjectFrameInfo 3530fdc8d8SChris Lattner //------------------------------------------------------------------------- 3630fdc8d8SChris Lattner 3730fdc8d8SChris Lattner class CommandObjectFrameInfo : public CommandObject 3830fdc8d8SChris Lattner { 3930fdc8d8SChris Lattner public: 4030fdc8d8SChris Lattner 4130fdc8d8SChris Lattner CommandObjectFrameInfo () : 4230fdc8d8SChris Lattner CommandObject ("frame info", 4330fdc8d8SChris Lattner "Lists information about the currently selected frame in the current thread.", 4430fdc8d8SChris Lattner "frame info", 4530fdc8d8SChris Lattner eFlagProcessMustBeLaunched | eFlagProcessMustBePaused) 4630fdc8d8SChris Lattner { 4730fdc8d8SChris Lattner } 4830fdc8d8SChris Lattner 4930fdc8d8SChris Lattner ~CommandObjectFrameInfo () 5030fdc8d8SChris Lattner { 5130fdc8d8SChris Lattner } 5230fdc8d8SChris Lattner 5330fdc8d8SChris Lattner bool 546611103cSGreg Clayton Execute (CommandInterpreter &interpreter, 556611103cSGreg Clayton Args& command, 5630fdc8d8SChris Lattner CommandReturnObject &result) 5730fdc8d8SChris Lattner { 586611103cSGreg Clayton ExecutionContext exe_ctx(interpreter.GetDebugger().GetExecutionContext()); 5930fdc8d8SChris Lattner if (exe_ctx.frame) 6030fdc8d8SChris Lattner { 6130fdc8d8SChris Lattner exe_ctx.frame->Dump (&result.GetOutputStream(), true); 6230fdc8d8SChris Lattner result.GetOutputStream().EOL(); 6330fdc8d8SChris Lattner result.SetStatus (eReturnStatusSuccessFinishResult); 6430fdc8d8SChris Lattner } 6530fdc8d8SChris Lattner else 6630fdc8d8SChris Lattner { 6730fdc8d8SChris Lattner result.AppendError ("no current frame"); 6830fdc8d8SChris Lattner result.SetStatus (eReturnStatusFailed); 6930fdc8d8SChris Lattner } 7030fdc8d8SChris Lattner return result.Succeeded(); 7130fdc8d8SChris Lattner } 7230fdc8d8SChris Lattner }; 7330fdc8d8SChris Lattner 7430fdc8d8SChris Lattner #pragma mark CommandObjectFrameSelect 7530fdc8d8SChris Lattner 7630fdc8d8SChris Lattner //------------------------------------------------------------------------- 7730fdc8d8SChris Lattner // CommandObjectFrameSelect 7830fdc8d8SChris Lattner //------------------------------------------------------------------------- 7930fdc8d8SChris Lattner 8030fdc8d8SChris Lattner class CommandObjectFrameSelect : public CommandObject 8130fdc8d8SChris Lattner { 8230fdc8d8SChris Lattner public: 8330fdc8d8SChris Lattner 8430fdc8d8SChris Lattner CommandObjectFrameSelect () : 8530fdc8d8SChris Lattner CommandObject ("frame select", 8630fdc8d8SChris Lattner "Select the current frame by index in the current thread.", 8730fdc8d8SChris Lattner "frame select <frame-index>", 8830fdc8d8SChris Lattner eFlagProcessMustBeLaunched | eFlagProcessMustBePaused) 8930fdc8d8SChris Lattner { 9030fdc8d8SChris Lattner } 9130fdc8d8SChris Lattner 9230fdc8d8SChris Lattner ~CommandObjectFrameSelect () 9330fdc8d8SChris Lattner { 9430fdc8d8SChris Lattner } 9530fdc8d8SChris Lattner 9630fdc8d8SChris Lattner bool 976611103cSGreg Clayton Execute (CommandInterpreter &interpreter, 986611103cSGreg Clayton Args& command, 9930fdc8d8SChris Lattner CommandReturnObject &result) 10030fdc8d8SChris Lattner { 1016611103cSGreg Clayton ExecutionContext exe_ctx (interpreter.GetDebugger().GetExecutionContext()); 10230fdc8d8SChris Lattner if (exe_ctx.thread) 10330fdc8d8SChris Lattner { 10430fdc8d8SChris Lattner if (command.GetArgumentCount() == 1) 10530fdc8d8SChris Lattner { 10630fdc8d8SChris Lattner const char *frame_idx_cstr = command.GetArgumentAtIndex(0); 10730fdc8d8SChris Lattner 10830fdc8d8SChris Lattner const uint32_t num_frames = exe_ctx.thread->GetStackFrameCount(); 10930fdc8d8SChris Lattner const uint32_t frame_idx = Args::StringToUInt32 (frame_idx_cstr, UINT32_MAX, 0); 11030fdc8d8SChris Lattner if (frame_idx < num_frames) 11130fdc8d8SChris Lattner { 112*2976d00aSJim Ingham exe_ctx.thread->SetSelectedFrameByIndex (frame_idx); 113*2976d00aSJim Ingham exe_ctx.frame = exe_ctx.thread->GetSelectedFrame ().get(); 11430fdc8d8SChris Lattner 11530fdc8d8SChris Lattner if (exe_ctx.frame) 11630fdc8d8SChris Lattner { 11730fdc8d8SChris Lattner if (DisplayFrameForExecutionContext (exe_ctx.thread, 11830fdc8d8SChris Lattner exe_ctx.frame, 11930fdc8d8SChris Lattner interpreter, 12030fdc8d8SChris Lattner result.GetOutputStream(), 12130fdc8d8SChris Lattner true, 12230fdc8d8SChris Lattner true, 12330fdc8d8SChris Lattner 3, 12430fdc8d8SChris Lattner 3)) 12530fdc8d8SChris Lattner { 12630fdc8d8SChris Lattner result.SetStatus (eReturnStatusSuccessFinishResult); 12730fdc8d8SChris Lattner return result.Succeeded(); 12830fdc8d8SChris Lattner } 12930fdc8d8SChris Lattner } 13030fdc8d8SChris Lattner } 13130fdc8d8SChris Lattner if (frame_idx == UINT32_MAX) 13230fdc8d8SChris Lattner result.AppendErrorWithFormat ("Invalid frame index: %s.\n", frame_idx_cstr); 13330fdc8d8SChris Lattner else 13430fdc8d8SChris Lattner result.AppendErrorWithFormat ("Frame index (%u) out of range.\n", frame_idx); 13530fdc8d8SChris Lattner } 13630fdc8d8SChris Lattner else 13730fdc8d8SChris Lattner { 13830fdc8d8SChris Lattner result.AppendError ("invalid arguments"); 13930fdc8d8SChris Lattner result.AppendErrorWithFormat ("Usage: %s\n", m_cmd_syntax.c_str()); 14030fdc8d8SChris Lattner } 14130fdc8d8SChris Lattner } 14230fdc8d8SChris Lattner else 14330fdc8d8SChris Lattner { 14430fdc8d8SChris Lattner result.AppendError ("no current thread"); 14530fdc8d8SChris Lattner } 14630fdc8d8SChris Lattner result.SetStatus (eReturnStatusFailed); 14730fdc8d8SChris Lattner return false; 14830fdc8d8SChris Lattner } 14930fdc8d8SChris Lattner }; 15030fdc8d8SChris Lattner 15130fdc8d8SChris Lattner #pragma mark CommandObjectMultiwordFrame 15230fdc8d8SChris Lattner 15330fdc8d8SChris Lattner //------------------------------------------------------------------------- 15430fdc8d8SChris Lattner // CommandObjectMultiwordFrame 15530fdc8d8SChris Lattner //------------------------------------------------------------------------- 15630fdc8d8SChris Lattner 1576611103cSGreg Clayton CommandObjectMultiwordFrame::CommandObjectMultiwordFrame (CommandInterpreter &interpreter) : 15830fdc8d8SChris Lattner CommandObjectMultiword ("frame", 15930fdc8d8SChris Lattner "A set of commands for operating on the current thread's frames.", 16030fdc8d8SChris Lattner "frame <subcommand> [<subcommand-options>]") 16130fdc8d8SChris Lattner { 1626611103cSGreg Clayton LoadSubCommand (interpreter, "info", CommandObjectSP (new CommandObjectFrameInfo ())); 1636611103cSGreg Clayton LoadSubCommand (interpreter, "select", CommandObjectSP (new CommandObjectFrameSelect ())); 16430fdc8d8SChris Lattner } 16530fdc8d8SChris Lattner 16630fdc8d8SChris Lattner CommandObjectMultiwordFrame::~CommandObjectMultiwordFrame () 16730fdc8d8SChris Lattner { 16830fdc8d8SChris Lattner } 16930fdc8d8SChris Lattner 170