blob: 27e542c0a3e1d5229b0ab5200a6a0131fca8e6d3 [file] [log] [blame]
Chris Lattner24943d22010-06-08 16:52:24 +00001//===-- SBCommandInterpreter.cpp --------------------------------*- C++ -*-===//
2//
3// The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9
10#include "lldb/lldb-types.h"
Jim Ingham84cdc152010-06-15 19:49:27 +000011#include "lldb/Interpreter/Args.h"
Chris Lattner24943d22010-06-08 16:52:24 +000012#include "lldb/Core/SourceManager.h"
13#include "lldb/Core/Listener.h"
14#include "lldb/Interpreter/CommandInterpreter.h"
15#include "lldb/Interpreter/CommandReturnObject.h"
16#include "lldb/Target/Target.h"
17
Eli Friedmand6ec8aa2010-06-09 07:37:52 +000018#include "lldb/API/SBBroadcaster.h"
19#include "lldb/API/SBDebugger.h"
20#include "lldb/API/SBCommandReturnObject.h"
21#include "lldb/API/SBCommandContext.h"
22#include "lldb/API/SBSourceManager.h"
23#include "lldb/API/SBCommandInterpreter.h"
24#include "lldb/API/SBProcess.h"
25#include "lldb/API/SBTarget.h"
26#include "lldb/API/SBListener.h"
27#include "lldb/API/SBStringList.h"
Chris Lattner24943d22010-06-08 16:52:24 +000028
29using namespace lldb;
30using namespace lldb_private;
31
32
Greg Clayton63094e02010-06-23 01:19:29 +000033SBCommandInterpreter::SBCommandInterpreter (CommandInterpreter *interpreter) :
34 m_opaque_ptr (interpreter)
Chris Lattner24943d22010-06-08 16:52:24 +000035{
36}
37
38SBCommandInterpreter::~SBCommandInterpreter ()
39{
40}
41
42bool
Greg Clayton63094e02010-06-23 01:19:29 +000043SBCommandInterpreter::IsValid() const
44{
45 return m_opaque_ptr != NULL;
46}
47
48
49bool
Chris Lattner24943d22010-06-08 16:52:24 +000050SBCommandInterpreter::CommandExists (const char *cmd)
51{
Greg Clayton63094e02010-06-23 01:19:29 +000052 if (m_opaque_ptr)
53 return m_opaque_ptr->CommandExists (cmd);
54 return false;
Chris Lattner24943d22010-06-08 16:52:24 +000055}
56
57bool
58SBCommandInterpreter::AliasExists (const char *cmd)
59{
Greg Clayton63094e02010-06-23 01:19:29 +000060 if (m_opaque_ptr)
61 return m_opaque_ptr->AliasExists (cmd);
62 return false;
Chris Lattner24943d22010-06-08 16:52:24 +000063}
64
65bool
66SBCommandInterpreter::UserCommandExists (const char *cmd)
67{
Greg Clayton63094e02010-06-23 01:19:29 +000068 if (m_opaque_ptr)
69 return m_opaque_ptr->UserCommandExists (cmd);
70 return false;
Chris Lattner24943d22010-06-08 16:52:24 +000071}
72
73lldb::ReturnStatus
74SBCommandInterpreter::HandleCommand (const char *command_line, SBCommandReturnObject &result, bool add_to_history)
75{
76 result.Clear();
Greg Clayton63094e02010-06-23 01:19:29 +000077 if (m_opaque_ptr)
78 {
79 m_opaque_ptr->HandleCommand (command_line, add_to_history, result.ref());
80 }
81 else
82 {
83 result->AppendError ("SBCommandInterpreter is not valid");
84 result->SetStatus (eReturnStatusFailed);
85 }
Chris Lattner24943d22010-06-08 16:52:24 +000086 return result.GetStatus();
87}
88
89int
90SBCommandInterpreter::HandleCompletion (const char *current_line,
91 const char *cursor,
92 const char *last_char,
93 int match_start_point,
94 int max_return_elements,
95 SBStringList &matches)
96{
Greg Clayton63094e02010-06-23 01:19:29 +000097 int num_completions = 0;
98 if (m_opaque_ptr)
99 {
100 lldb_private::StringList lldb_matches;
101 num_completions = m_opaque_ptr->HandleCompletion (current_line, cursor, last_char, match_start_point,
102 max_return_elements, lldb_matches);
Chris Lattner24943d22010-06-08 16:52:24 +0000103
Greg Clayton63094e02010-06-23 01:19:29 +0000104 SBStringList temp_list (&lldb_matches);
105 matches.AppendList (temp_list);
106 }
Chris Lattner24943d22010-06-08 16:52:24 +0000107 return num_completions;
108}
109
110const char **
111SBCommandInterpreter::GetEnvironmentVariables ()
112{
Greg Clayton63094e02010-06-23 01:19:29 +0000113 if (m_opaque_ptr)
114 {
115 const Args *env_vars = m_opaque_ptr->GetEnvironmentVariables();
116 if (env_vars)
117 return env_vars->GetConstArgumentVector ();
118 }
Chris Lattner24943d22010-06-08 16:52:24 +0000119 return NULL;
120}
121
122bool
123SBCommandInterpreter::HasCommands ()
124{
Greg Clayton63094e02010-06-23 01:19:29 +0000125 if (m_opaque_ptr)
126 return m_opaque_ptr->HasCommands();
127 return false;
Chris Lattner24943d22010-06-08 16:52:24 +0000128}
129
130bool
131SBCommandInterpreter::HasAliases ()
132{
Greg Clayton63094e02010-06-23 01:19:29 +0000133 if (m_opaque_ptr)
134 return m_opaque_ptr->HasAliases();
135 return false;
Chris Lattner24943d22010-06-08 16:52:24 +0000136}
137
138bool
139SBCommandInterpreter::HasUserCommands ()
140{
Greg Clayton63094e02010-06-23 01:19:29 +0000141 if (m_opaque_ptr)
142 return m_opaque_ptr->HasUserCommands ();
143 return false;
Chris Lattner24943d22010-06-08 16:52:24 +0000144}
145
146bool
147SBCommandInterpreter::HasAliasOptions ()
148{
Greg Clayton63094e02010-06-23 01:19:29 +0000149 if (m_opaque_ptr)
150 return m_opaque_ptr->HasAliasOptions ();
151 return false;
Chris Lattner24943d22010-06-08 16:52:24 +0000152}
153
154bool
155SBCommandInterpreter::HasInterpreterVariables ()
156{
Greg Clayton63094e02010-06-23 01:19:29 +0000157 if (m_opaque_ptr)
158 return m_opaque_ptr->HasInterpreterVariables ();
159 return false;
Chris Lattner24943d22010-06-08 16:52:24 +0000160}
161
162SBProcess
163SBCommandInterpreter::GetProcess ()
164{
165 SBProcess process;
Greg Clayton63094e02010-06-23 01:19:29 +0000166 if (m_opaque_ptr)
Chris Lattner24943d22010-06-08 16:52:24 +0000167 {
Greg Clayton63094e02010-06-23 01:19:29 +0000168 Debugger &debugger = m_opaque_ptr->GetDebugger();
169 Target *target = debugger.GetCurrentTarget().get();
Chris Lattner24943d22010-06-08 16:52:24 +0000170 if (target)
171 process.SetProcess(target->GetProcessSP());
172 }
173 return process;
174}
175
176ssize_t
177SBCommandInterpreter::WriteToScriptInterpreter (const char *src)
178{
Greg Clayton63094e02010-06-23 01:19:29 +0000179 if (m_opaque_ptr && src && src[0])
Chris Lattner24943d22010-06-08 16:52:24 +0000180 return WriteToScriptInterpreter (src, strlen(src));
181 return 0;
182}
183
184ssize_t
185SBCommandInterpreter::WriteToScriptInterpreter (const char *src, size_t src_len)
186{
Greg Clayton63094e02010-06-23 01:19:29 +0000187 if (m_opaque_ptr && src && src[0])
Chris Lattner24943d22010-06-08 16:52:24 +0000188 {
Greg Clayton63094e02010-06-23 01:19:29 +0000189 ScriptInterpreter *script_interpreter = m_opaque_ptr->GetScriptInterpreter();
Chris Lattner24943d22010-06-08 16:52:24 +0000190 if (script_interpreter)
191 return ::write (script_interpreter->GetMasterFileDescriptor(), src, src_len);
192 }
193 return 0;
194}
195
196
197CommandInterpreter *
Greg Clayton63094e02010-06-23 01:19:29 +0000198SBCommandInterpreter::get ()
Chris Lattner24943d22010-06-08 16:52:24 +0000199{
Greg Clayton63094e02010-06-23 01:19:29 +0000200 return m_opaque_ptr;
Chris Lattner24943d22010-06-08 16:52:24 +0000201}
202
203CommandInterpreter &
Greg Clayton63094e02010-06-23 01:19:29 +0000204SBCommandInterpreter::ref ()
Chris Lattner24943d22010-06-08 16:52:24 +0000205{
Greg Clayton63094e02010-06-23 01:19:29 +0000206 assert (m_opaque_ptr);
207 return *m_opaque_ptr;
208}
209
210void
211SBCommandInterpreter::reset (lldb_private::CommandInterpreter *interpreter)
212{
213 m_opaque_ptr = interpreter;
Chris Lattner24943d22010-06-08 16:52:24 +0000214}
215
216void
217SBCommandInterpreter::SourceInitFileInHomeDirectory (SBCommandReturnObject &result)
218{
219 result.Clear();
Greg Clayton63094e02010-06-23 01:19:29 +0000220 if (m_opaque_ptr)
221 {
222 m_opaque_ptr->SourceInitFile (false, result.ref());
223 }
224 else
225 {
226 result->AppendError ("SBCommandInterpreter is not valid");
227 result->SetStatus (eReturnStatusFailed);
228 }
Chris Lattner24943d22010-06-08 16:52:24 +0000229}
230
231void
232SBCommandInterpreter::SourceInitFileInCurrentWorkingDirectory (SBCommandReturnObject &result)
233{
234 result.Clear();
Greg Clayton63094e02010-06-23 01:19:29 +0000235 if (m_opaque_ptr)
236 {
237 m_opaque_ptr->SourceInitFile (true, result.ref());
238 }
239 else
240 {
241 result->AppendError ("SBCommandInterpreter is not valid");
242 result->SetStatus (eReturnStatusFailed);
243 }
Chris Lattner24943d22010-06-08 16:52:24 +0000244}
245
246SBBroadcaster
247SBCommandInterpreter::GetBroadcaster ()
248{
Greg Clayton63094e02010-06-23 01:19:29 +0000249 SBBroadcaster broadcaster (m_opaque_ptr, false);
Chris Lattner24943d22010-06-08 16:52:24 +0000250 return broadcaster;
251}
252