annotate lldb/source/Host/common/Editline.cpp @ 150:1d019706d866

LLVM10
author anatofuz
date Thu, 13 Feb 2020 15:10:13 +0900
parents
children 0572611fdcc8
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
150
anatofuz
parents:
diff changeset
1 //===-- Editline.cpp ------------------------------------------------------===//
anatofuz
parents:
diff changeset
2 //
anatofuz
parents:
diff changeset
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
anatofuz
parents:
diff changeset
4 // See https://llvm.org/LICENSE.txt for license information.
anatofuz
parents:
diff changeset
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
anatofuz
parents:
diff changeset
6 //
anatofuz
parents:
diff changeset
7 //===----------------------------------------------------------------------===//
anatofuz
parents:
diff changeset
8
anatofuz
parents:
diff changeset
9 #include <iomanip>
anatofuz
parents:
diff changeset
10 #include <iostream>
anatofuz
parents:
diff changeset
11 #include <limits.h>
anatofuz
parents:
diff changeset
12
anatofuz
parents:
diff changeset
13 #include "lldb/Host/ConnectionFileDescriptor.h"
anatofuz
parents:
diff changeset
14 #include "lldb/Host/Editline.h"
anatofuz
parents:
diff changeset
15 #include "lldb/Host/FileSystem.h"
anatofuz
parents:
diff changeset
16 #include "lldb/Host/Host.h"
anatofuz
parents:
diff changeset
17 #include "lldb/Utility/CompletionRequest.h"
anatofuz
parents:
diff changeset
18 #include "lldb/Utility/FileSpec.h"
anatofuz
parents:
diff changeset
19 #include "lldb/Utility/LLDBAssert.h"
anatofuz
parents:
diff changeset
20 #include "lldb/Utility/SelectHelper.h"
anatofuz
parents:
diff changeset
21 #include "lldb/Utility/Status.h"
anatofuz
parents:
diff changeset
22 #include "lldb/Utility/StreamString.h"
anatofuz
parents:
diff changeset
23 #include "lldb/Utility/StringList.h"
anatofuz
parents:
diff changeset
24 #include "lldb/Utility/Timeout.h"
anatofuz
parents:
diff changeset
25
anatofuz
parents:
diff changeset
26 #include "llvm/Support/FileSystem.h"
anatofuz
parents:
diff changeset
27 #include "llvm/Support/Threading.h"
anatofuz
parents:
diff changeset
28
anatofuz
parents:
diff changeset
29 using namespace lldb_private;
anatofuz
parents:
diff changeset
30 using namespace lldb_private::line_editor;
anatofuz
parents:
diff changeset
31
anatofuz
parents:
diff changeset
32 // Workaround for what looks like an OS X-specific issue, but other platforms
anatofuz
parents:
diff changeset
33 // may benefit from something similar if issues arise. The libedit library
anatofuz
parents:
diff changeset
34 // doesn't explicitly initialize the curses termcap library, which it gets away
anatofuz
parents:
diff changeset
35 // with until TERM is set to VT100 where it stumbles over an implementation
anatofuz
parents:
diff changeset
36 // assumption that may not exist on other platforms. The setupterm() function
anatofuz
parents:
diff changeset
37 // would normally require headers that don't work gracefully in this context,
anatofuz
parents:
diff changeset
38 // so the function declaraction has been hoisted here.
anatofuz
parents:
diff changeset
39 #if defined(__APPLE__)
anatofuz
parents:
diff changeset
40 extern "C" {
anatofuz
parents:
diff changeset
41 int setupterm(char *term, int fildes, int *errret);
anatofuz
parents:
diff changeset
42 }
anatofuz
parents:
diff changeset
43 #define USE_SETUPTERM_WORKAROUND
anatofuz
parents:
diff changeset
44 #endif
anatofuz
parents:
diff changeset
45
anatofuz
parents:
diff changeset
46 // Editline uses careful cursor management to achieve the illusion of editing a
anatofuz
parents:
diff changeset
47 // multi-line block of text with a single line editor. Preserving this
anatofuz
parents:
diff changeset
48 // illusion requires fairly careful management of cursor state. Read and
anatofuz
parents:
diff changeset
49 // understand the relationship between DisplayInput(), MoveCursor(),
anatofuz
parents:
diff changeset
50 // SetCurrentLine(), and SaveEditedLine() before making changes.
anatofuz
parents:
diff changeset
51
anatofuz
parents:
diff changeset
52 #define ESCAPE "\x1b"
anatofuz
parents:
diff changeset
53 #define ANSI_FAINT ESCAPE "[2m"
anatofuz
parents:
diff changeset
54 #define ANSI_UNFAINT ESCAPE "[22m"
anatofuz
parents:
diff changeset
55 #define ANSI_CLEAR_BELOW ESCAPE "[J"
anatofuz
parents:
diff changeset
56 #define ANSI_CLEAR_RIGHT ESCAPE "[K"
anatofuz
parents:
diff changeset
57 #define ANSI_SET_COLUMN_N ESCAPE "[%dG"
anatofuz
parents:
diff changeset
58 #define ANSI_UP_N_ROWS ESCAPE "[%dA"
anatofuz
parents:
diff changeset
59 #define ANSI_DOWN_N_ROWS ESCAPE "[%dB"
anatofuz
parents:
diff changeset
60
anatofuz
parents:
diff changeset
61 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
62
anatofuz
parents:
diff changeset
63 #define EditLineConstString(str) L##str
anatofuz
parents:
diff changeset
64 #define EditLineStringFormatSpec "%ls"
anatofuz
parents:
diff changeset
65
anatofuz
parents:
diff changeset
66 #else
anatofuz
parents:
diff changeset
67
anatofuz
parents:
diff changeset
68 #define EditLineConstString(str) str
anatofuz
parents:
diff changeset
69 #define EditLineStringFormatSpec "%s"
anatofuz
parents:
diff changeset
70
anatofuz
parents:
diff changeset
71 // use #defines so wide version functions and structs will resolve to old
anatofuz
parents:
diff changeset
72 // versions for case of libedit not built with wide char support
anatofuz
parents:
diff changeset
73 #define history_w history
anatofuz
parents:
diff changeset
74 #define history_winit history_init
anatofuz
parents:
diff changeset
75 #define history_wend history_end
anatofuz
parents:
diff changeset
76 #define HistoryW History
anatofuz
parents:
diff changeset
77 #define HistEventW HistEvent
anatofuz
parents:
diff changeset
78 #define LineInfoW LineInfo
anatofuz
parents:
diff changeset
79
anatofuz
parents:
diff changeset
80 #define el_wgets el_gets
anatofuz
parents:
diff changeset
81 #define el_wgetc el_getc
anatofuz
parents:
diff changeset
82 #define el_wpush el_push
anatofuz
parents:
diff changeset
83 #define el_wparse el_parse
anatofuz
parents:
diff changeset
84 #define el_wset el_set
anatofuz
parents:
diff changeset
85 #define el_wget el_get
anatofuz
parents:
diff changeset
86 #define el_wline el_line
anatofuz
parents:
diff changeset
87 #define el_winsertstr el_insertstr
anatofuz
parents:
diff changeset
88 #define el_wdeletestr el_deletestr
anatofuz
parents:
diff changeset
89
anatofuz
parents:
diff changeset
90 #endif // #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
91
anatofuz
parents:
diff changeset
92 bool IsOnlySpaces(const EditLineStringType &content) {
anatofuz
parents:
diff changeset
93 for (wchar_t ch : content) {
anatofuz
parents:
diff changeset
94 if (ch != EditLineCharType(' '))
anatofuz
parents:
diff changeset
95 return false;
anatofuz
parents:
diff changeset
96 }
anatofuz
parents:
diff changeset
97 return true;
anatofuz
parents:
diff changeset
98 }
anatofuz
parents:
diff changeset
99
anatofuz
parents:
diff changeset
100 static int GetOperation(HistoryOperation op) {
anatofuz
parents:
diff changeset
101 // The naming used by editline for the history operations is counter
anatofuz
parents:
diff changeset
102 // intuitive to how it's used here.
anatofuz
parents:
diff changeset
103 //
anatofuz
parents:
diff changeset
104 // - The H_PREV operation returns the previous element in the history, which
anatofuz
parents:
diff changeset
105 // is newer than the current one.
anatofuz
parents:
diff changeset
106 //
anatofuz
parents:
diff changeset
107 // - The H_NEXT operation returns the next element in the history, which is
anatofuz
parents:
diff changeset
108 // older than the current one.
anatofuz
parents:
diff changeset
109 //
anatofuz
parents:
diff changeset
110 // The naming of the enum entries match the semantic meaning.
anatofuz
parents:
diff changeset
111 switch(op) {
anatofuz
parents:
diff changeset
112 case HistoryOperation::Oldest:
anatofuz
parents:
diff changeset
113 return H_FIRST;
anatofuz
parents:
diff changeset
114 case HistoryOperation::Older:
anatofuz
parents:
diff changeset
115 return H_NEXT;
anatofuz
parents:
diff changeset
116 case HistoryOperation::Current:
anatofuz
parents:
diff changeset
117 return H_CURR;
anatofuz
parents:
diff changeset
118 case HistoryOperation::Newer:
anatofuz
parents:
diff changeset
119 return H_PREV;
anatofuz
parents:
diff changeset
120 case HistoryOperation::Newest:
anatofuz
parents:
diff changeset
121 return H_LAST;
anatofuz
parents:
diff changeset
122 }
anatofuz
parents:
diff changeset
123 llvm_unreachable("Fully covered switch!");
anatofuz
parents:
diff changeset
124 }
anatofuz
parents:
diff changeset
125
anatofuz
parents:
diff changeset
126
anatofuz
parents:
diff changeset
127 EditLineStringType CombineLines(const std::vector<EditLineStringType> &lines) {
anatofuz
parents:
diff changeset
128 EditLineStringStreamType combined_stream;
anatofuz
parents:
diff changeset
129 for (EditLineStringType line : lines) {
anatofuz
parents:
diff changeset
130 combined_stream << line.c_str() << "\n";
anatofuz
parents:
diff changeset
131 }
anatofuz
parents:
diff changeset
132 return combined_stream.str();
anatofuz
parents:
diff changeset
133 }
anatofuz
parents:
diff changeset
134
anatofuz
parents:
diff changeset
135 std::vector<EditLineStringType> SplitLines(const EditLineStringType &input) {
anatofuz
parents:
diff changeset
136 std::vector<EditLineStringType> result;
anatofuz
parents:
diff changeset
137 size_t start = 0;
anatofuz
parents:
diff changeset
138 while (start < input.length()) {
anatofuz
parents:
diff changeset
139 size_t end = input.find('\n', start);
anatofuz
parents:
diff changeset
140 if (end == std::string::npos) {
anatofuz
parents:
diff changeset
141 result.insert(result.end(), input.substr(start));
anatofuz
parents:
diff changeset
142 break;
anatofuz
parents:
diff changeset
143 }
anatofuz
parents:
diff changeset
144 result.insert(result.end(), input.substr(start, end - start));
anatofuz
parents:
diff changeset
145 start = end + 1;
anatofuz
parents:
diff changeset
146 }
anatofuz
parents:
diff changeset
147 return result;
anatofuz
parents:
diff changeset
148 }
anatofuz
parents:
diff changeset
149
anatofuz
parents:
diff changeset
150 EditLineStringType FixIndentation(const EditLineStringType &line,
anatofuz
parents:
diff changeset
151 int indent_correction) {
anatofuz
parents:
diff changeset
152 if (indent_correction == 0)
anatofuz
parents:
diff changeset
153 return line;
anatofuz
parents:
diff changeset
154 if (indent_correction < 0)
anatofuz
parents:
diff changeset
155 return line.substr(-indent_correction);
anatofuz
parents:
diff changeset
156 return EditLineStringType(indent_correction, EditLineCharType(' ')) + line;
anatofuz
parents:
diff changeset
157 }
anatofuz
parents:
diff changeset
158
anatofuz
parents:
diff changeset
159 int GetIndentation(const EditLineStringType &line) {
anatofuz
parents:
diff changeset
160 int space_count = 0;
anatofuz
parents:
diff changeset
161 for (EditLineCharType ch : line) {
anatofuz
parents:
diff changeset
162 if (ch != EditLineCharType(' '))
anatofuz
parents:
diff changeset
163 break;
anatofuz
parents:
diff changeset
164 ++space_count;
anatofuz
parents:
diff changeset
165 }
anatofuz
parents:
diff changeset
166 return space_count;
anatofuz
parents:
diff changeset
167 }
anatofuz
parents:
diff changeset
168
anatofuz
parents:
diff changeset
169 bool IsInputPending(FILE *file) {
anatofuz
parents:
diff changeset
170 // FIXME: This will be broken on Windows if we ever re-enable Editline. You
anatofuz
parents:
diff changeset
171 // can't use select
anatofuz
parents:
diff changeset
172 // on something that isn't a socket. This will have to be re-written to not
anatofuz
parents:
diff changeset
173 // use a FILE*, but instead use some kind of yet-to-be-created abstraction
anatofuz
parents:
diff changeset
174 // that select-like functionality on non-socket objects.
anatofuz
parents:
diff changeset
175 const int fd = fileno(file);
anatofuz
parents:
diff changeset
176 SelectHelper select_helper;
anatofuz
parents:
diff changeset
177 select_helper.SetTimeout(std::chrono::microseconds(0));
anatofuz
parents:
diff changeset
178 select_helper.FDSetRead(fd);
anatofuz
parents:
diff changeset
179 return select_helper.Select().Success();
anatofuz
parents:
diff changeset
180 }
anatofuz
parents:
diff changeset
181
anatofuz
parents:
diff changeset
182 namespace lldb_private {
anatofuz
parents:
diff changeset
183 namespace line_editor {
anatofuz
parents:
diff changeset
184 typedef std::weak_ptr<EditlineHistory> EditlineHistoryWP;
anatofuz
parents:
diff changeset
185
anatofuz
parents:
diff changeset
186 // EditlineHistory objects are sometimes shared between multiple Editline
anatofuz
parents:
diff changeset
187 // instances with the same program name.
anatofuz
parents:
diff changeset
188
anatofuz
parents:
diff changeset
189 class EditlineHistory {
anatofuz
parents:
diff changeset
190 private:
anatofuz
parents:
diff changeset
191 // Use static GetHistory() function to get a EditlineHistorySP to one of
anatofuz
parents:
diff changeset
192 // these objects
anatofuz
parents:
diff changeset
193 EditlineHistory(const std::string &prefix, uint32_t size, bool unique_entries)
anatofuz
parents:
diff changeset
194 : m_history(nullptr), m_event(), m_prefix(prefix), m_path() {
anatofuz
parents:
diff changeset
195 m_history = history_winit();
anatofuz
parents:
diff changeset
196 history_w(m_history, &m_event, H_SETSIZE, size);
anatofuz
parents:
diff changeset
197 if (unique_entries)
anatofuz
parents:
diff changeset
198 history_w(m_history, &m_event, H_SETUNIQUE, 1);
anatofuz
parents:
diff changeset
199 }
anatofuz
parents:
diff changeset
200
anatofuz
parents:
diff changeset
201 const char *GetHistoryFilePath() {
anatofuz
parents:
diff changeset
202 // Compute the history path lazily.
anatofuz
parents:
diff changeset
203 if (m_path.empty() && m_history && !m_prefix.empty()) {
anatofuz
parents:
diff changeset
204 llvm::SmallString<128> lldb_history_file;
anatofuz
parents:
diff changeset
205 llvm::sys::path::home_directory(lldb_history_file);
anatofuz
parents:
diff changeset
206 llvm::sys::path::append(lldb_history_file, ".lldb");
anatofuz
parents:
diff changeset
207
anatofuz
parents:
diff changeset
208 // LLDB stores its history in ~/.lldb/. If for some reason this directory
anatofuz
parents:
diff changeset
209 // isn't writable or cannot be created, history won't be available.
anatofuz
parents:
diff changeset
210 if (!llvm::sys::fs::create_directory(lldb_history_file)) {
anatofuz
parents:
diff changeset
211 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
212 std::string filename = m_prefix + "-widehistory";
anatofuz
parents:
diff changeset
213 #else
anatofuz
parents:
diff changeset
214 std::string filename = m_prefix + "-history";
anatofuz
parents:
diff changeset
215 #endif
anatofuz
parents:
diff changeset
216 llvm::sys::path::append(lldb_history_file, filename);
anatofuz
parents:
diff changeset
217 m_path = std::string(lldb_history_file.str());
anatofuz
parents:
diff changeset
218 }
anatofuz
parents:
diff changeset
219 }
anatofuz
parents:
diff changeset
220
anatofuz
parents:
diff changeset
221 if (m_path.empty())
anatofuz
parents:
diff changeset
222 return nullptr;
anatofuz
parents:
diff changeset
223
anatofuz
parents:
diff changeset
224 return m_path.c_str();
anatofuz
parents:
diff changeset
225 }
anatofuz
parents:
diff changeset
226
anatofuz
parents:
diff changeset
227 public:
anatofuz
parents:
diff changeset
228 ~EditlineHistory() {
anatofuz
parents:
diff changeset
229 Save();
anatofuz
parents:
diff changeset
230
anatofuz
parents:
diff changeset
231 if (m_history) {
anatofuz
parents:
diff changeset
232 history_wend(m_history);
anatofuz
parents:
diff changeset
233 m_history = nullptr;
anatofuz
parents:
diff changeset
234 }
anatofuz
parents:
diff changeset
235 }
anatofuz
parents:
diff changeset
236
anatofuz
parents:
diff changeset
237 static EditlineHistorySP GetHistory(const std::string &prefix) {
anatofuz
parents:
diff changeset
238 typedef std::map<std::string, EditlineHistoryWP> WeakHistoryMap;
anatofuz
parents:
diff changeset
239 static std::recursive_mutex g_mutex;
anatofuz
parents:
diff changeset
240 static WeakHistoryMap g_weak_map;
anatofuz
parents:
diff changeset
241 std::lock_guard<std::recursive_mutex> guard(g_mutex);
anatofuz
parents:
diff changeset
242 WeakHistoryMap::const_iterator pos = g_weak_map.find(prefix);
anatofuz
parents:
diff changeset
243 EditlineHistorySP history_sp;
anatofuz
parents:
diff changeset
244 if (pos != g_weak_map.end()) {
anatofuz
parents:
diff changeset
245 history_sp = pos->second.lock();
anatofuz
parents:
diff changeset
246 if (history_sp)
anatofuz
parents:
diff changeset
247 return history_sp;
anatofuz
parents:
diff changeset
248 g_weak_map.erase(pos);
anatofuz
parents:
diff changeset
249 }
anatofuz
parents:
diff changeset
250 history_sp.reset(new EditlineHistory(prefix, 800, true));
anatofuz
parents:
diff changeset
251 g_weak_map[prefix] = history_sp;
anatofuz
parents:
diff changeset
252 return history_sp;
anatofuz
parents:
diff changeset
253 }
anatofuz
parents:
diff changeset
254
anatofuz
parents:
diff changeset
255 bool IsValid() const { return m_history != nullptr; }
anatofuz
parents:
diff changeset
256
anatofuz
parents:
diff changeset
257 HistoryW *GetHistoryPtr() { return m_history; }
anatofuz
parents:
diff changeset
258
anatofuz
parents:
diff changeset
259 void Enter(const EditLineCharType *line_cstr) {
anatofuz
parents:
diff changeset
260 if (m_history)
anatofuz
parents:
diff changeset
261 history_w(m_history, &m_event, H_ENTER, line_cstr);
anatofuz
parents:
diff changeset
262 }
anatofuz
parents:
diff changeset
263
anatofuz
parents:
diff changeset
264 bool Load() {
anatofuz
parents:
diff changeset
265 if (m_history) {
anatofuz
parents:
diff changeset
266 const char *path = GetHistoryFilePath();
anatofuz
parents:
diff changeset
267 if (path) {
anatofuz
parents:
diff changeset
268 history_w(m_history, &m_event, H_LOAD, path);
anatofuz
parents:
diff changeset
269 return true;
anatofuz
parents:
diff changeset
270 }
anatofuz
parents:
diff changeset
271 }
anatofuz
parents:
diff changeset
272 return false;
anatofuz
parents:
diff changeset
273 }
anatofuz
parents:
diff changeset
274
anatofuz
parents:
diff changeset
275 bool Save() {
anatofuz
parents:
diff changeset
276 if (m_history) {
anatofuz
parents:
diff changeset
277 const char *path = GetHistoryFilePath();
anatofuz
parents:
diff changeset
278 if (path) {
anatofuz
parents:
diff changeset
279 history_w(m_history, &m_event, H_SAVE, path);
anatofuz
parents:
diff changeset
280 return true;
anatofuz
parents:
diff changeset
281 }
anatofuz
parents:
diff changeset
282 }
anatofuz
parents:
diff changeset
283 return false;
anatofuz
parents:
diff changeset
284 }
anatofuz
parents:
diff changeset
285
anatofuz
parents:
diff changeset
286 protected:
anatofuz
parents:
diff changeset
287 HistoryW *m_history; // The history object
anatofuz
parents:
diff changeset
288 HistEventW m_event; // The history event needed to contain all history events
anatofuz
parents:
diff changeset
289 std::string m_prefix; // The prefix name (usually the editline program name)
anatofuz
parents:
diff changeset
290 // to use when loading/saving history
anatofuz
parents:
diff changeset
291 std::string m_path; // Path to the history file
anatofuz
parents:
diff changeset
292 };
anatofuz
parents:
diff changeset
293 }
anatofuz
parents:
diff changeset
294 }
anatofuz
parents:
diff changeset
295
anatofuz
parents:
diff changeset
296 // Editline private methods
anatofuz
parents:
diff changeset
297
anatofuz
parents:
diff changeset
298 void Editline::SetBaseLineNumber(int line_number) {
anatofuz
parents:
diff changeset
299 std::stringstream line_number_stream;
anatofuz
parents:
diff changeset
300 line_number_stream << line_number;
anatofuz
parents:
diff changeset
301 m_base_line_number = line_number;
anatofuz
parents:
diff changeset
302 m_line_number_digits =
anatofuz
parents:
diff changeset
303 std::max(3, (int)line_number_stream.str().length() + 1);
anatofuz
parents:
diff changeset
304 }
anatofuz
parents:
diff changeset
305
anatofuz
parents:
diff changeset
306 std::string Editline::PromptForIndex(int line_index) {
anatofuz
parents:
diff changeset
307 bool use_line_numbers = m_multiline_enabled && m_base_line_number > 0;
anatofuz
parents:
diff changeset
308 std::string prompt = m_set_prompt;
anatofuz
parents:
diff changeset
309 if (use_line_numbers && prompt.length() == 0) {
anatofuz
parents:
diff changeset
310 prompt = ": ";
anatofuz
parents:
diff changeset
311 }
anatofuz
parents:
diff changeset
312 std::string continuation_prompt = prompt;
anatofuz
parents:
diff changeset
313 if (m_set_continuation_prompt.length() > 0) {
anatofuz
parents:
diff changeset
314 continuation_prompt = m_set_continuation_prompt;
anatofuz
parents:
diff changeset
315
anatofuz
parents:
diff changeset
316 // Ensure that both prompts are the same length through space padding
anatofuz
parents:
diff changeset
317 while (continuation_prompt.length() < prompt.length()) {
anatofuz
parents:
diff changeset
318 continuation_prompt += ' ';
anatofuz
parents:
diff changeset
319 }
anatofuz
parents:
diff changeset
320 while (prompt.length() < continuation_prompt.length()) {
anatofuz
parents:
diff changeset
321 prompt += ' ';
anatofuz
parents:
diff changeset
322 }
anatofuz
parents:
diff changeset
323 }
anatofuz
parents:
diff changeset
324
anatofuz
parents:
diff changeset
325 if (use_line_numbers) {
anatofuz
parents:
diff changeset
326 StreamString prompt_stream;
anatofuz
parents:
diff changeset
327 prompt_stream.Printf(
anatofuz
parents:
diff changeset
328 "%*d%s", m_line_number_digits, m_base_line_number + line_index,
anatofuz
parents:
diff changeset
329 (line_index == 0) ? prompt.c_str() : continuation_prompt.c_str());
anatofuz
parents:
diff changeset
330 return std::string(std::move(prompt_stream.GetString()));
anatofuz
parents:
diff changeset
331 }
anatofuz
parents:
diff changeset
332 return (line_index == 0) ? prompt : continuation_prompt;
anatofuz
parents:
diff changeset
333 }
anatofuz
parents:
diff changeset
334
anatofuz
parents:
diff changeset
335 void Editline::SetCurrentLine(int line_index) {
anatofuz
parents:
diff changeset
336 m_current_line_index = line_index;
anatofuz
parents:
diff changeset
337 m_current_prompt = PromptForIndex(line_index);
anatofuz
parents:
diff changeset
338 }
anatofuz
parents:
diff changeset
339
anatofuz
parents:
diff changeset
340 int Editline::GetPromptWidth() { return (int)PromptForIndex(0).length(); }
anatofuz
parents:
diff changeset
341
anatofuz
parents:
diff changeset
342 bool Editline::IsEmacs() {
anatofuz
parents:
diff changeset
343 const char *editor;
anatofuz
parents:
diff changeset
344 el_get(m_editline, EL_EDITOR, &editor);
anatofuz
parents:
diff changeset
345 return editor[0] == 'e';
anatofuz
parents:
diff changeset
346 }
anatofuz
parents:
diff changeset
347
anatofuz
parents:
diff changeset
348 bool Editline::IsOnlySpaces() {
anatofuz
parents:
diff changeset
349 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
350 for (const EditLineCharType *character = info->buffer;
anatofuz
parents:
diff changeset
351 character < info->lastchar; character++) {
anatofuz
parents:
diff changeset
352 if (*character != ' ')
anatofuz
parents:
diff changeset
353 return false;
anatofuz
parents:
diff changeset
354 }
anatofuz
parents:
diff changeset
355 return true;
anatofuz
parents:
diff changeset
356 }
anatofuz
parents:
diff changeset
357
anatofuz
parents:
diff changeset
358 int Editline::GetLineIndexForLocation(CursorLocation location, int cursor_row) {
anatofuz
parents:
diff changeset
359 int line = 0;
anatofuz
parents:
diff changeset
360 if (location == CursorLocation::EditingPrompt ||
anatofuz
parents:
diff changeset
361 location == CursorLocation::BlockEnd ||
anatofuz
parents:
diff changeset
362 location == CursorLocation::EditingCursor) {
anatofuz
parents:
diff changeset
363 for (unsigned index = 0; index < m_current_line_index; index++) {
anatofuz
parents:
diff changeset
364 line += CountRowsForLine(m_input_lines[index]);
anatofuz
parents:
diff changeset
365 }
anatofuz
parents:
diff changeset
366 if (location == CursorLocation::EditingCursor) {
anatofuz
parents:
diff changeset
367 line += cursor_row;
anatofuz
parents:
diff changeset
368 } else if (location == CursorLocation::BlockEnd) {
anatofuz
parents:
diff changeset
369 for (unsigned index = m_current_line_index; index < m_input_lines.size();
anatofuz
parents:
diff changeset
370 index++) {
anatofuz
parents:
diff changeset
371 line += CountRowsForLine(m_input_lines[index]);
anatofuz
parents:
diff changeset
372 }
anatofuz
parents:
diff changeset
373 --line;
anatofuz
parents:
diff changeset
374 }
anatofuz
parents:
diff changeset
375 }
anatofuz
parents:
diff changeset
376 return line;
anatofuz
parents:
diff changeset
377 }
anatofuz
parents:
diff changeset
378
anatofuz
parents:
diff changeset
379 void Editline::MoveCursor(CursorLocation from, CursorLocation to) {
anatofuz
parents:
diff changeset
380 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
381 int editline_cursor_position =
anatofuz
parents:
diff changeset
382 (int)((info->cursor - info->buffer) + GetPromptWidth());
anatofuz
parents:
diff changeset
383 int editline_cursor_row = editline_cursor_position / m_terminal_width;
anatofuz
parents:
diff changeset
384
anatofuz
parents:
diff changeset
385 // Determine relative starting and ending lines
anatofuz
parents:
diff changeset
386 int fromLine = GetLineIndexForLocation(from, editline_cursor_row);
anatofuz
parents:
diff changeset
387 int toLine = GetLineIndexForLocation(to, editline_cursor_row);
anatofuz
parents:
diff changeset
388 if (toLine != fromLine) {
anatofuz
parents:
diff changeset
389 fprintf(m_output_file,
anatofuz
parents:
diff changeset
390 (toLine > fromLine) ? ANSI_DOWN_N_ROWS : ANSI_UP_N_ROWS,
anatofuz
parents:
diff changeset
391 std::abs(toLine - fromLine));
anatofuz
parents:
diff changeset
392 }
anatofuz
parents:
diff changeset
393
anatofuz
parents:
diff changeset
394 // Determine target column
anatofuz
parents:
diff changeset
395 int toColumn = 1;
anatofuz
parents:
diff changeset
396 if (to == CursorLocation::EditingCursor) {
anatofuz
parents:
diff changeset
397 toColumn =
anatofuz
parents:
diff changeset
398 editline_cursor_position - (editline_cursor_row * m_terminal_width) + 1;
anatofuz
parents:
diff changeset
399 } else if (to == CursorLocation::BlockEnd && !m_input_lines.empty()) {
anatofuz
parents:
diff changeset
400 toColumn =
anatofuz
parents:
diff changeset
401 ((m_input_lines[m_input_lines.size() - 1].length() + GetPromptWidth()) %
anatofuz
parents:
diff changeset
402 80) +
anatofuz
parents:
diff changeset
403 1;
anatofuz
parents:
diff changeset
404 }
anatofuz
parents:
diff changeset
405 fprintf(m_output_file, ANSI_SET_COLUMN_N, toColumn);
anatofuz
parents:
diff changeset
406 }
anatofuz
parents:
diff changeset
407
anatofuz
parents:
diff changeset
408 void Editline::DisplayInput(int firstIndex) {
anatofuz
parents:
diff changeset
409 fprintf(m_output_file, ANSI_SET_COLUMN_N ANSI_CLEAR_BELOW, 1);
anatofuz
parents:
diff changeset
410 int line_count = (int)m_input_lines.size();
anatofuz
parents:
diff changeset
411 const char *faint = m_color_prompts ? ANSI_FAINT : "";
anatofuz
parents:
diff changeset
412 const char *unfaint = m_color_prompts ? ANSI_UNFAINT : "";
anatofuz
parents:
diff changeset
413
anatofuz
parents:
diff changeset
414 for (int index = firstIndex; index < line_count; index++) {
anatofuz
parents:
diff changeset
415 fprintf(m_output_file, "%s"
anatofuz
parents:
diff changeset
416 "%s"
anatofuz
parents:
diff changeset
417 "%s" EditLineStringFormatSpec " ",
anatofuz
parents:
diff changeset
418 faint, PromptForIndex(index).c_str(), unfaint,
anatofuz
parents:
diff changeset
419 m_input_lines[index].c_str());
anatofuz
parents:
diff changeset
420 if (index < line_count - 1)
anatofuz
parents:
diff changeset
421 fprintf(m_output_file, "\n");
anatofuz
parents:
diff changeset
422 }
anatofuz
parents:
diff changeset
423 }
anatofuz
parents:
diff changeset
424
anatofuz
parents:
diff changeset
425 int Editline::CountRowsForLine(const EditLineStringType &content) {
anatofuz
parents:
diff changeset
426 auto prompt =
anatofuz
parents:
diff changeset
427 PromptForIndex(0); // Prompt width is constant during an edit session
anatofuz
parents:
diff changeset
428 int line_length = (int)(content.length() + prompt.length());
anatofuz
parents:
diff changeset
429 return (line_length / m_terminal_width) + 1;
anatofuz
parents:
diff changeset
430 }
anatofuz
parents:
diff changeset
431
anatofuz
parents:
diff changeset
432 void Editline::SaveEditedLine() {
anatofuz
parents:
diff changeset
433 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
434 m_input_lines[m_current_line_index] =
anatofuz
parents:
diff changeset
435 EditLineStringType(info->buffer, info->lastchar - info->buffer);
anatofuz
parents:
diff changeset
436 }
anatofuz
parents:
diff changeset
437
anatofuz
parents:
diff changeset
438 StringList Editline::GetInputAsStringList(int line_count) {
anatofuz
parents:
diff changeset
439 StringList lines;
anatofuz
parents:
diff changeset
440 for (EditLineStringType line : m_input_lines) {
anatofuz
parents:
diff changeset
441 if (line_count == 0)
anatofuz
parents:
diff changeset
442 break;
anatofuz
parents:
diff changeset
443 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
444 lines.AppendString(m_utf8conv.to_bytes(line));
anatofuz
parents:
diff changeset
445 #else
anatofuz
parents:
diff changeset
446 lines.AppendString(line);
anatofuz
parents:
diff changeset
447 #endif
anatofuz
parents:
diff changeset
448 --line_count;
anatofuz
parents:
diff changeset
449 }
anatofuz
parents:
diff changeset
450 return lines;
anatofuz
parents:
diff changeset
451 }
anatofuz
parents:
diff changeset
452
anatofuz
parents:
diff changeset
453 unsigned char Editline::RecallHistory(HistoryOperation op) {
anatofuz
parents:
diff changeset
454 assert(op == HistoryOperation::Older || op == HistoryOperation::Newer);
anatofuz
parents:
diff changeset
455 if (!m_history_sp || !m_history_sp->IsValid())
anatofuz
parents:
diff changeset
456 return CC_ERROR;
anatofuz
parents:
diff changeset
457
anatofuz
parents:
diff changeset
458 HistoryW *pHistory = m_history_sp->GetHistoryPtr();
anatofuz
parents:
diff changeset
459 HistEventW history_event;
anatofuz
parents:
diff changeset
460 std::vector<EditLineStringType> new_input_lines;
anatofuz
parents:
diff changeset
461
anatofuz
parents:
diff changeset
462 // Treat moving from the "live" entry differently
anatofuz
parents:
diff changeset
463 if (!m_in_history) {
anatofuz
parents:
diff changeset
464 switch (op) {
anatofuz
parents:
diff changeset
465 case HistoryOperation::Newer:
anatofuz
parents:
diff changeset
466 return CC_ERROR; // Can't go newer than the "live" entry
anatofuz
parents:
diff changeset
467 case HistoryOperation::Older: {
anatofuz
parents:
diff changeset
468 if (history_w(pHistory, &history_event,
anatofuz
parents:
diff changeset
469 GetOperation(HistoryOperation::Newest)) == -1)
anatofuz
parents:
diff changeset
470 return CC_ERROR;
anatofuz
parents:
diff changeset
471 // Save any edits to the "live" entry in case we return by moving forward
anatofuz
parents:
diff changeset
472 // in history (it would be more bash-like to save over any current entry,
anatofuz
parents:
diff changeset
473 // but libedit doesn't offer the ability to add entries anywhere except
anatofuz
parents:
diff changeset
474 // the end.)
anatofuz
parents:
diff changeset
475 SaveEditedLine();
anatofuz
parents:
diff changeset
476 m_live_history_lines = m_input_lines;
anatofuz
parents:
diff changeset
477 m_in_history = true;
anatofuz
parents:
diff changeset
478 } break;
anatofuz
parents:
diff changeset
479 default:
anatofuz
parents:
diff changeset
480 llvm_unreachable("unsupported history direction");
anatofuz
parents:
diff changeset
481 }
anatofuz
parents:
diff changeset
482 } else {
anatofuz
parents:
diff changeset
483 if (history_w(pHistory, &history_event, GetOperation(op)) == -1) {
anatofuz
parents:
diff changeset
484 switch (op) {
anatofuz
parents:
diff changeset
485 case HistoryOperation::Older:
anatofuz
parents:
diff changeset
486 // Can't move earlier than the earliest entry.
anatofuz
parents:
diff changeset
487 return CC_ERROR;
anatofuz
parents:
diff changeset
488 case HistoryOperation::Newer:
anatofuz
parents:
diff changeset
489 // Moving to newer-than-the-newest entry yields the "live" entry.
anatofuz
parents:
diff changeset
490 new_input_lines = m_live_history_lines;
anatofuz
parents:
diff changeset
491 m_in_history = false;
anatofuz
parents:
diff changeset
492 break;
anatofuz
parents:
diff changeset
493 default:
anatofuz
parents:
diff changeset
494 llvm_unreachable("unsupported history direction");
anatofuz
parents:
diff changeset
495 }
anatofuz
parents:
diff changeset
496 }
anatofuz
parents:
diff changeset
497 }
anatofuz
parents:
diff changeset
498
anatofuz
parents:
diff changeset
499 // If we're pulling the lines from history, split them apart
anatofuz
parents:
diff changeset
500 if (m_in_history)
anatofuz
parents:
diff changeset
501 new_input_lines = SplitLines(history_event.str);
anatofuz
parents:
diff changeset
502
anatofuz
parents:
diff changeset
503 // Erase the current edit session and replace it with a new one
anatofuz
parents:
diff changeset
504 MoveCursor(CursorLocation::EditingCursor, CursorLocation::BlockStart);
anatofuz
parents:
diff changeset
505 m_input_lines = new_input_lines;
anatofuz
parents:
diff changeset
506 DisplayInput();
anatofuz
parents:
diff changeset
507
anatofuz
parents:
diff changeset
508 // Prepare to edit the last line when moving to previous entry, or the first
anatofuz
parents:
diff changeset
509 // line when moving to next entry
anatofuz
parents:
diff changeset
510 switch (op) {
anatofuz
parents:
diff changeset
511 case HistoryOperation::Older:
anatofuz
parents:
diff changeset
512 m_current_line_index = (int)m_input_lines.size() - 1;
anatofuz
parents:
diff changeset
513 break;
anatofuz
parents:
diff changeset
514 case HistoryOperation::Newer:
anatofuz
parents:
diff changeset
515 m_current_line_index = 0;
anatofuz
parents:
diff changeset
516 break;
anatofuz
parents:
diff changeset
517 default:
anatofuz
parents:
diff changeset
518 llvm_unreachable("unsupported history direction");
anatofuz
parents:
diff changeset
519 }
anatofuz
parents:
diff changeset
520 SetCurrentLine(m_current_line_index);
anatofuz
parents:
diff changeset
521 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
522 return CC_NEWLINE;
anatofuz
parents:
diff changeset
523 }
anatofuz
parents:
diff changeset
524
anatofuz
parents:
diff changeset
525 int Editline::GetCharacter(EditLineGetCharType *c) {
anatofuz
parents:
diff changeset
526 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
527
anatofuz
parents:
diff changeset
528 // Paint a faint version of the desired prompt over the version libedit draws
anatofuz
parents:
diff changeset
529 // (will only be requested if colors are supported)
anatofuz
parents:
diff changeset
530 if (m_needs_prompt_repaint) {
anatofuz
parents:
diff changeset
531 MoveCursor(CursorLocation::EditingCursor, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
532 fprintf(m_output_file, "%s"
anatofuz
parents:
diff changeset
533 "%s"
anatofuz
parents:
diff changeset
534 "%s",
anatofuz
parents:
diff changeset
535 ANSI_FAINT, Prompt(), ANSI_UNFAINT);
anatofuz
parents:
diff changeset
536 MoveCursor(CursorLocation::EditingPrompt, CursorLocation::EditingCursor);
anatofuz
parents:
diff changeset
537 m_needs_prompt_repaint = false;
anatofuz
parents:
diff changeset
538 }
anatofuz
parents:
diff changeset
539
anatofuz
parents:
diff changeset
540 if (m_multiline_enabled) {
anatofuz
parents:
diff changeset
541 // Detect when the number of rows used for this input line changes due to
anatofuz
parents:
diff changeset
542 // an edit
anatofuz
parents:
diff changeset
543 int lineLength = (int)((info->lastchar - info->buffer) + GetPromptWidth());
anatofuz
parents:
diff changeset
544 int new_line_rows = (lineLength / m_terminal_width) + 1;
anatofuz
parents:
diff changeset
545 if (m_current_line_rows != -1 && new_line_rows != m_current_line_rows) {
anatofuz
parents:
diff changeset
546 // Respond by repainting the current state from this line on
anatofuz
parents:
diff changeset
547 MoveCursor(CursorLocation::EditingCursor, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
548 SaveEditedLine();
anatofuz
parents:
diff changeset
549 DisplayInput(m_current_line_index);
anatofuz
parents:
diff changeset
550 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingCursor);
anatofuz
parents:
diff changeset
551 }
anatofuz
parents:
diff changeset
552 m_current_line_rows = new_line_rows;
anatofuz
parents:
diff changeset
553 }
anatofuz
parents:
diff changeset
554
anatofuz
parents:
diff changeset
555 // Read an actual character
anatofuz
parents:
diff changeset
556 while (true) {
anatofuz
parents:
diff changeset
557 lldb::ConnectionStatus status = lldb::eConnectionStatusSuccess;
anatofuz
parents:
diff changeset
558 char ch = 0;
anatofuz
parents:
diff changeset
559
anatofuz
parents:
diff changeset
560 // This mutex is locked by our caller (GetLine). Unlock it while we read a
anatofuz
parents:
diff changeset
561 // character (blocking operation), so we do not hold the mutex
anatofuz
parents:
diff changeset
562 // indefinitely. This gives a chance for someone to interrupt us. After
anatofuz
parents:
diff changeset
563 // Read returns, immediately lock the mutex again and check if we were
anatofuz
parents:
diff changeset
564 // interrupted.
anatofuz
parents:
diff changeset
565 m_output_mutex.unlock();
anatofuz
parents:
diff changeset
566 int read_count =
anatofuz
parents:
diff changeset
567 m_input_connection.Read(&ch, 1, llvm::None, status, nullptr);
anatofuz
parents:
diff changeset
568 m_output_mutex.lock();
anatofuz
parents:
diff changeset
569 if (m_editor_status == EditorStatus::Interrupted) {
anatofuz
parents:
diff changeset
570 while (read_count > 0 && status == lldb::eConnectionStatusSuccess)
anatofuz
parents:
diff changeset
571 read_count =
anatofuz
parents:
diff changeset
572 m_input_connection.Read(&ch, 1, llvm::None, status, nullptr);
anatofuz
parents:
diff changeset
573 lldbassert(status == lldb::eConnectionStatusInterrupted);
anatofuz
parents:
diff changeset
574 return 0;
anatofuz
parents:
diff changeset
575 }
anatofuz
parents:
diff changeset
576
anatofuz
parents:
diff changeset
577 if (read_count) {
anatofuz
parents:
diff changeset
578 if (CompleteCharacter(ch, *c))
anatofuz
parents:
diff changeset
579 return 1;
anatofuz
parents:
diff changeset
580 } else {
anatofuz
parents:
diff changeset
581 switch (status) {
anatofuz
parents:
diff changeset
582 case lldb::eConnectionStatusSuccess: // Success
anatofuz
parents:
diff changeset
583 break;
anatofuz
parents:
diff changeset
584
anatofuz
parents:
diff changeset
585 case lldb::eConnectionStatusInterrupted:
anatofuz
parents:
diff changeset
586 llvm_unreachable("Interrupts should have been handled above.");
anatofuz
parents:
diff changeset
587
anatofuz
parents:
diff changeset
588 case lldb::eConnectionStatusError: // Check GetError() for details
anatofuz
parents:
diff changeset
589 case lldb::eConnectionStatusTimedOut: // Request timed out
anatofuz
parents:
diff changeset
590 case lldb::eConnectionStatusEndOfFile: // End-of-file encountered
anatofuz
parents:
diff changeset
591 case lldb::eConnectionStatusNoConnection: // No connection
anatofuz
parents:
diff changeset
592 case lldb::eConnectionStatusLostConnection: // Lost connection while
anatofuz
parents:
diff changeset
593 // connected to a valid
anatofuz
parents:
diff changeset
594 // connection
anatofuz
parents:
diff changeset
595 m_editor_status = EditorStatus::EndOfInput;
anatofuz
parents:
diff changeset
596 return 0;
anatofuz
parents:
diff changeset
597 }
anatofuz
parents:
diff changeset
598 }
anatofuz
parents:
diff changeset
599 }
anatofuz
parents:
diff changeset
600 }
anatofuz
parents:
diff changeset
601
anatofuz
parents:
diff changeset
602 const char *Editline::Prompt() {
anatofuz
parents:
diff changeset
603 if (m_color_prompts)
anatofuz
parents:
diff changeset
604 m_needs_prompt_repaint = true;
anatofuz
parents:
diff changeset
605 return m_current_prompt.c_str();
anatofuz
parents:
diff changeset
606 }
anatofuz
parents:
diff changeset
607
anatofuz
parents:
diff changeset
608 unsigned char Editline::BreakLineCommand(int ch) {
anatofuz
parents:
diff changeset
609 // Preserve any content beyond the cursor, truncate and save the current line
anatofuz
parents:
diff changeset
610 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
611 auto current_line =
anatofuz
parents:
diff changeset
612 EditLineStringType(info->buffer, info->cursor - info->buffer);
anatofuz
parents:
diff changeset
613 auto new_line_fragment =
anatofuz
parents:
diff changeset
614 EditLineStringType(info->cursor, info->lastchar - info->cursor);
anatofuz
parents:
diff changeset
615 m_input_lines[m_current_line_index] = current_line;
anatofuz
parents:
diff changeset
616
anatofuz
parents:
diff changeset
617 // Ignore whitespace-only extra fragments when breaking a line
anatofuz
parents:
diff changeset
618 if (::IsOnlySpaces(new_line_fragment))
anatofuz
parents:
diff changeset
619 new_line_fragment = EditLineConstString("");
anatofuz
parents:
diff changeset
620
anatofuz
parents:
diff changeset
621 // Establish the new cursor position at the start of a line when inserting a
anatofuz
parents:
diff changeset
622 // line break
anatofuz
parents:
diff changeset
623 m_revert_cursor_index = 0;
anatofuz
parents:
diff changeset
624
anatofuz
parents:
diff changeset
625 // Don't perform automatic formatting when pasting
anatofuz
parents:
diff changeset
626 if (!IsInputPending(m_input_file)) {
anatofuz
parents:
diff changeset
627 // Apply smart indentation
anatofuz
parents:
diff changeset
628 if (m_fix_indentation_callback) {
anatofuz
parents:
diff changeset
629 StringList lines = GetInputAsStringList(m_current_line_index + 1);
anatofuz
parents:
diff changeset
630 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
631 lines.AppendString(m_utf8conv.to_bytes(new_line_fragment));
anatofuz
parents:
diff changeset
632 #else
anatofuz
parents:
diff changeset
633 lines.AppendString(new_line_fragment);
anatofuz
parents:
diff changeset
634 #endif
anatofuz
parents:
diff changeset
635
anatofuz
parents:
diff changeset
636 int indent_correction = m_fix_indentation_callback(
anatofuz
parents:
diff changeset
637 this, lines, 0, m_fix_indentation_callback_baton);
anatofuz
parents:
diff changeset
638 new_line_fragment = FixIndentation(new_line_fragment, indent_correction);
anatofuz
parents:
diff changeset
639 m_revert_cursor_index = GetIndentation(new_line_fragment);
anatofuz
parents:
diff changeset
640 }
anatofuz
parents:
diff changeset
641 }
anatofuz
parents:
diff changeset
642
anatofuz
parents:
diff changeset
643 // Insert the new line and repaint everything from the split line on down
anatofuz
parents:
diff changeset
644 m_input_lines.insert(m_input_lines.begin() + m_current_line_index + 1,
anatofuz
parents:
diff changeset
645 new_line_fragment);
anatofuz
parents:
diff changeset
646 MoveCursor(CursorLocation::EditingCursor, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
647 DisplayInput(m_current_line_index);
anatofuz
parents:
diff changeset
648
anatofuz
parents:
diff changeset
649 // Reposition the cursor to the right line and prepare to edit the new line
anatofuz
parents:
diff changeset
650 SetCurrentLine(m_current_line_index + 1);
anatofuz
parents:
diff changeset
651 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
652 return CC_NEWLINE;
anatofuz
parents:
diff changeset
653 }
anatofuz
parents:
diff changeset
654
anatofuz
parents:
diff changeset
655 unsigned char Editline::EndOrAddLineCommand(int ch) {
anatofuz
parents:
diff changeset
656 // Don't perform end of input detection when pasting, always treat this as a
anatofuz
parents:
diff changeset
657 // line break
anatofuz
parents:
diff changeset
658 if (IsInputPending(m_input_file)) {
anatofuz
parents:
diff changeset
659 return BreakLineCommand(ch);
anatofuz
parents:
diff changeset
660 }
anatofuz
parents:
diff changeset
661
anatofuz
parents:
diff changeset
662 // Save any edits to this line
anatofuz
parents:
diff changeset
663 SaveEditedLine();
anatofuz
parents:
diff changeset
664
anatofuz
parents:
diff changeset
665 // If this is the end of the last line, consider whether to add a line
anatofuz
parents:
diff changeset
666 // instead
anatofuz
parents:
diff changeset
667 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
668 if (m_current_line_index == m_input_lines.size() - 1 &&
anatofuz
parents:
diff changeset
669 info->cursor == info->lastchar) {
anatofuz
parents:
diff changeset
670 if (m_is_input_complete_callback) {
anatofuz
parents:
diff changeset
671 auto lines = GetInputAsStringList();
anatofuz
parents:
diff changeset
672 if (!m_is_input_complete_callback(this, lines,
anatofuz
parents:
diff changeset
673 m_is_input_complete_callback_baton)) {
anatofuz
parents:
diff changeset
674 return BreakLineCommand(ch);
anatofuz
parents:
diff changeset
675 }
anatofuz
parents:
diff changeset
676
anatofuz
parents:
diff changeset
677 // The completion test is allowed to change the input lines when complete
anatofuz
parents:
diff changeset
678 m_input_lines.clear();
anatofuz
parents:
diff changeset
679 for (unsigned index = 0; index < lines.GetSize(); index++) {
anatofuz
parents:
diff changeset
680 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
681 m_input_lines.insert(m_input_lines.end(),
anatofuz
parents:
diff changeset
682 m_utf8conv.from_bytes(lines[index]));
anatofuz
parents:
diff changeset
683 #else
anatofuz
parents:
diff changeset
684 m_input_lines.insert(m_input_lines.end(), lines[index]);
anatofuz
parents:
diff changeset
685 #endif
anatofuz
parents:
diff changeset
686 }
anatofuz
parents:
diff changeset
687 }
anatofuz
parents:
diff changeset
688 }
anatofuz
parents:
diff changeset
689 MoveCursor(CursorLocation::EditingCursor, CursorLocation::BlockEnd);
anatofuz
parents:
diff changeset
690 fprintf(m_output_file, "\n");
anatofuz
parents:
diff changeset
691 m_editor_status = EditorStatus::Complete;
anatofuz
parents:
diff changeset
692 return CC_NEWLINE;
anatofuz
parents:
diff changeset
693 }
anatofuz
parents:
diff changeset
694
anatofuz
parents:
diff changeset
695 unsigned char Editline::DeleteNextCharCommand(int ch) {
anatofuz
parents:
diff changeset
696 LineInfoW *info = const_cast<LineInfoW *>(el_wline(m_editline));
anatofuz
parents:
diff changeset
697
anatofuz
parents:
diff changeset
698 // Just delete the next character normally if possible
anatofuz
parents:
diff changeset
699 if (info->cursor < info->lastchar) {
anatofuz
parents:
diff changeset
700 info->cursor++;
anatofuz
parents:
diff changeset
701 el_deletestr(m_editline, 1);
anatofuz
parents:
diff changeset
702 return CC_REFRESH;
anatofuz
parents:
diff changeset
703 }
anatofuz
parents:
diff changeset
704
anatofuz
parents:
diff changeset
705 // Fail when at the end of the last line, except when ^D is pressed on the
anatofuz
parents:
diff changeset
706 // line is empty, in which case it is treated as EOF
anatofuz
parents:
diff changeset
707 if (m_current_line_index == m_input_lines.size() - 1) {
anatofuz
parents:
diff changeset
708 if (ch == 4 && info->buffer == info->lastchar) {
anatofuz
parents:
diff changeset
709 fprintf(m_output_file, "^D\n");
anatofuz
parents:
diff changeset
710 m_editor_status = EditorStatus::EndOfInput;
anatofuz
parents:
diff changeset
711 return CC_EOF;
anatofuz
parents:
diff changeset
712 }
anatofuz
parents:
diff changeset
713 return CC_ERROR;
anatofuz
parents:
diff changeset
714 }
anatofuz
parents:
diff changeset
715
anatofuz
parents:
diff changeset
716 // Prepare to combine this line with the one below
anatofuz
parents:
diff changeset
717 MoveCursor(CursorLocation::EditingCursor, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
718
anatofuz
parents:
diff changeset
719 // Insert the next line of text at the cursor and restore the cursor position
anatofuz
parents:
diff changeset
720 const EditLineCharType *cursor = info->cursor;
anatofuz
parents:
diff changeset
721 el_winsertstr(m_editline, m_input_lines[m_current_line_index + 1].c_str());
anatofuz
parents:
diff changeset
722 info->cursor = cursor;
anatofuz
parents:
diff changeset
723 SaveEditedLine();
anatofuz
parents:
diff changeset
724
anatofuz
parents:
diff changeset
725 // Delete the extra line
anatofuz
parents:
diff changeset
726 m_input_lines.erase(m_input_lines.begin() + m_current_line_index + 1);
anatofuz
parents:
diff changeset
727
anatofuz
parents:
diff changeset
728 // Clear and repaint from this line on down
anatofuz
parents:
diff changeset
729 DisplayInput(m_current_line_index);
anatofuz
parents:
diff changeset
730 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingCursor);
anatofuz
parents:
diff changeset
731 return CC_REFRESH;
anatofuz
parents:
diff changeset
732 }
anatofuz
parents:
diff changeset
733
anatofuz
parents:
diff changeset
734 unsigned char Editline::DeletePreviousCharCommand(int ch) {
anatofuz
parents:
diff changeset
735 LineInfoW *info = const_cast<LineInfoW *>(el_wline(m_editline));
anatofuz
parents:
diff changeset
736
anatofuz
parents:
diff changeset
737 // Just delete the previous character normally when not at the start of a
anatofuz
parents:
diff changeset
738 // line
anatofuz
parents:
diff changeset
739 if (info->cursor > info->buffer) {
anatofuz
parents:
diff changeset
740 el_deletestr(m_editline, 1);
anatofuz
parents:
diff changeset
741 return CC_REFRESH;
anatofuz
parents:
diff changeset
742 }
anatofuz
parents:
diff changeset
743
anatofuz
parents:
diff changeset
744 // No prior line and no prior character? Let the user know
anatofuz
parents:
diff changeset
745 if (m_current_line_index == 0)
anatofuz
parents:
diff changeset
746 return CC_ERROR;
anatofuz
parents:
diff changeset
747
anatofuz
parents:
diff changeset
748 // No prior character, but prior line? Combine with the line above
anatofuz
parents:
diff changeset
749 SaveEditedLine();
anatofuz
parents:
diff changeset
750 SetCurrentLine(m_current_line_index - 1);
anatofuz
parents:
diff changeset
751 auto priorLine = m_input_lines[m_current_line_index];
anatofuz
parents:
diff changeset
752 m_input_lines.erase(m_input_lines.begin() + m_current_line_index);
anatofuz
parents:
diff changeset
753 m_input_lines[m_current_line_index] =
anatofuz
parents:
diff changeset
754 priorLine + m_input_lines[m_current_line_index];
anatofuz
parents:
diff changeset
755
anatofuz
parents:
diff changeset
756 // Repaint from the new line down
anatofuz
parents:
diff changeset
757 fprintf(m_output_file, ANSI_UP_N_ROWS ANSI_SET_COLUMN_N,
anatofuz
parents:
diff changeset
758 CountRowsForLine(priorLine), 1);
anatofuz
parents:
diff changeset
759 DisplayInput(m_current_line_index);
anatofuz
parents:
diff changeset
760
anatofuz
parents:
diff changeset
761 // Put the cursor back where libedit expects it to be before returning to
anatofuz
parents:
diff changeset
762 // editing by telling libedit about the newly inserted text
anatofuz
parents:
diff changeset
763 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
764 el_winsertstr(m_editline, priorLine.c_str());
anatofuz
parents:
diff changeset
765 return CC_REDISPLAY;
anatofuz
parents:
diff changeset
766 }
anatofuz
parents:
diff changeset
767
anatofuz
parents:
diff changeset
768 unsigned char Editline::PreviousLineCommand(int ch) {
anatofuz
parents:
diff changeset
769 SaveEditedLine();
anatofuz
parents:
diff changeset
770
anatofuz
parents:
diff changeset
771 if (m_current_line_index == 0) {
anatofuz
parents:
diff changeset
772 return RecallHistory(HistoryOperation::Older);
anatofuz
parents:
diff changeset
773 }
anatofuz
parents:
diff changeset
774
anatofuz
parents:
diff changeset
775 // Start from a known location
anatofuz
parents:
diff changeset
776 MoveCursor(CursorLocation::EditingCursor, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
777
anatofuz
parents:
diff changeset
778 // Treat moving up from a blank last line as a deletion of that line
anatofuz
parents:
diff changeset
779 if (m_current_line_index == m_input_lines.size() - 1 && IsOnlySpaces()) {
anatofuz
parents:
diff changeset
780 m_input_lines.erase(m_input_lines.begin() + m_current_line_index);
anatofuz
parents:
diff changeset
781 fprintf(m_output_file, ANSI_CLEAR_BELOW);
anatofuz
parents:
diff changeset
782 }
anatofuz
parents:
diff changeset
783
anatofuz
parents:
diff changeset
784 SetCurrentLine(m_current_line_index - 1);
anatofuz
parents:
diff changeset
785 fprintf(m_output_file, ANSI_UP_N_ROWS ANSI_SET_COLUMN_N,
anatofuz
parents:
diff changeset
786 CountRowsForLine(m_input_lines[m_current_line_index]), 1);
anatofuz
parents:
diff changeset
787 return CC_NEWLINE;
anatofuz
parents:
diff changeset
788 }
anatofuz
parents:
diff changeset
789
anatofuz
parents:
diff changeset
790 unsigned char Editline::NextLineCommand(int ch) {
anatofuz
parents:
diff changeset
791 SaveEditedLine();
anatofuz
parents:
diff changeset
792
anatofuz
parents:
diff changeset
793 // Handle attempts to move down from the last line
anatofuz
parents:
diff changeset
794 if (m_current_line_index == m_input_lines.size() - 1) {
anatofuz
parents:
diff changeset
795 // Don't add an extra line if the existing last line is blank, move through
anatofuz
parents:
diff changeset
796 // history instead
anatofuz
parents:
diff changeset
797 if (IsOnlySpaces()) {
anatofuz
parents:
diff changeset
798 return RecallHistory(HistoryOperation::Newer);
anatofuz
parents:
diff changeset
799 }
anatofuz
parents:
diff changeset
800
anatofuz
parents:
diff changeset
801 // Determine indentation for the new line
anatofuz
parents:
diff changeset
802 int indentation = 0;
anatofuz
parents:
diff changeset
803 if (m_fix_indentation_callback) {
anatofuz
parents:
diff changeset
804 StringList lines = GetInputAsStringList();
anatofuz
parents:
diff changeset
805 lines.AppendString("");
anatofuz
parents:
diff changeset
806 indentation = m_fix_indentation_callback(
anatofuz
parents:
diff changeset
807 this, lines, 0, m_fix_indentation_callback_baton);
anatofuz
parents:
diff changeset
808 }
anatofuz
parents:
diff changeset
809 m_input_lines.insert(
anatofuz
parents:
diff changeset
810 m_input_lines.end(),
anatofuz
parents:
diff changeset
811 EditLineStringType(indentation, EditLineCharType(' ')));
anatofuz
parents:
diff changeset
812 }
anatofuz
parents:
diff changeset
813
anatofuz
parents:
diff changeset
814 // Move down past the current line using newlines to force scrolling if
anatofuz
parents:
diff changeset
815 // needed
anatofuz
parents:
diff changeset
816 SetCurrentLine(m_current_line_index + 1);
anatofuz
parents:
diff changeset
817 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
818 int cursor_position = (int)((info->cursor - info->buffer) + GetPromptWidth());
anatofuz
parents:
diff changeset
819 int cursor_row = cursor_position / m_terminal_width;
anatofuz
parents:
diff changeset
820 for (int line_count = 0; line_count < m_current_line_rows - cursor_row;
anatofuz
parents:
diff changeset
821 line_count++) {
anatofuz
parents:
diff changeset
822 fprintf(m_output_file, "\n");
anatofuz
parents:
diff changeset
823 }
anatofuz
parents:
diff changeset
824 return CC_NEWLINE;
anatofuz
parents:
diff changeset
825 }
anatofuz
parents:
diff changeset
826
anatofuz
parents:
diff changeset
827 unsigned char Editline::PreviousHistoryCommand(int ch) {
anatofuz
parents:
diff changeset
828 SaveEditedLine();
anatofuz
parents:
diff changeset
829
anatofuz
parents:
diff changeset
830 return RecallHistory(HistoryOperation::Older);
anatofuz
parents:
diff changeset
831 }
anatofuz
parents:
diff changeset
832
anatofuz
parents:
diff changeset
833 unsigned char Editline::NextHistoryCommand(int ch) {
anatofuz
parents:
diff changeset
834 SaveEditedLine();
anatofuz
parents:
diff changeset
835
anatofuz
parents:
diff changeset
836 return RecallHistory(HistoryOperation::Newer);
anatofuz
parents:
diff changeset
837 }
anatofuz
parents:
diff changeset
838
anatofuz
parents:
diff changeset
839 unsigned char Editline::FixIndentationCommand(int ch) {
anatofuz
parents:
diff changeset
840 if (!m_fix_indentation_callback)
anatofuz
parents:
diff changeset
841 return CC_NORM;
anatofuz
parents:
diff changeset
842
anatofuz
parents:
diff changeset
843 // Insert the character typed before proceeding
anatofuz
parents:
diff changeset
844 EditLineCharType inserted[] = {(EditLineCharType)ch, 0};
anatofuz
parents:
diff changeset
845 el_winsertstr(m_editline, inserted);
anatofuz
parents:
diff changeset
846 LineInfoW *info = const_cast<LineInfoW *>(el_wline(m_editline));
anatofuz
parents:
diff changeset
847 int cursor_position = info->cursor - info->buffer;
anatofuz
parents:
diff changeset
848
anatofuz
parents:
diff changeset
849 // Save the edits and determine the correct indentation level
anatofuz
parents:
diff changeset
850 SaveEditedLine();
anatofuz
parents:
diff changeset
851 StringList lines = GetInputAsStringList(m_current_line_index + 1);
anatofuz
parents:
diff changeset
852 int indent_correction = m_fix_indentation_callback(
anatofuz
parents:
diff changeset
853 this, lines, cursor_position, m_fix_indentation_callback_baton);
anatofuz
parents:
diff changeset
854
anatofuz
parents:
diff changeset
855 // If it is already correct no special work is needed
anatofuz
parents:
diff changeset
856 if (indent_correction == 0)
anatofuz
parents:
diff changeset
857 return CC_REFRESH;
anatofuz
parents:
diff changeset
858
anatofuz
parents:
diff changeset
859 // Change the indentation level of the line
anatofuz
parents:
diff changeset
860 std::string currentLine = lines.GetStringAtIndex(m_current_line_index);
anatofuz
parents:
diff changeset
861 if (indent_correction > 0) {
anatofuz
parents:
diff changeset
862 currentLine = currentLine.insert(0, indent_correction, ' ');
anatofuz
parents:
diff changeset
863 } else {
anatofuz
parents:
diff changeset
864 currentLine = currentLine.erase(0, -indent_correction);
anatofuz
parents:
diff changeset
865 }
anatofuz
parents:
diff changeset
866 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
867 m_input_lines[m_current_line_index] = m_utf8conv.from_bytes(currentLine);
anatofuz
parents:
diff changeset
868 #else
anatofuz
parents:
diff changeset
869 m_input_lines[m_current_line_index] = currentLine;
anatofuz
parents:
diff changeset
870 #endif
anatofuz
parents:
diff changeset
871
anatofuz
parents:
diff changeset
872 // Update the display to reflect the change
anatofuz
parents:
diff changeset
873 MoveCursor(CursorLocation::EditingCursor, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
874 DisplayInput(m_current_line_index);
anatofuz
parents:
diff changeset
875
anatofuz
parents:
diff changeset
876 // Reposition the cursor back on the original line and prepare to restart
anatofuz
parents:
diff changeset
877 // editing with a new cursor position
anatofuz
parents:
diff changeset
878 SetCurrentLine(m_current_line_index);
anatofuz
parents:
diff changeset
879 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
880 m_revert_cursor_index = cursor_position + indent_correction;
anatofuz
parents:
diff changeset
881 return CC_NEWLINE;
anatofuz
parents:
diff changeset
882 }
anatofuz
parents:
diff changeset
883
anatofuz
parents:
diff changeset
884 unsigned char Editline::RevertLineCommand(int ch) {
anatofuz
parents:
diff changeset
885 el_winsertstr(m_editline, m_input_lines[m_current_line_index].c_str());
anatofuz
parents:
diff changeset
886 if (m_revert_cursor_index >= 0) {
anatofuz
parents:
diff changeset
887 LineInfoW *info = const_cast<LineInfoW *>(el_wline(m_editline));
anatofuz
parents:
diff changeset
888 info->cursor = info->buffer + m_revert_cursor_index;
anatofuz
parents:
diff changeset
889 if (info->cursor > info->lastchar) {
anatofuz
parents:
diff changeset
890 info->cursor = info->lastchar;
anatofuz
parents:
diff changeset
891 }
anatofuz
parents:
diff changeset
892 m_revert_cursor_index = -1;
anatofuz
parents:
diff changeset
893 }
anatofuz
parents:
diff changeset
894 return CC_REFRESH;
anatofuz
parents:
diff changeset
895 }
anatofuz
parents:
diff changeset
896
anatofuz
parents:
diff changeset
897 unsigned char Editline::BufferStartCommand(int ch) {
anatofuz
parents:
diff changeset
898 SaveEditedLine();
anatofuz
parents:
diff changeset
899 MoveCursor(CursorLocation::EditingCursor, CursorLocation::BlockStart);
anatofuz
parents:
diff changeset
900 SetCurrentLine(0);
anatofuz
parents:
diff changeset
901 m_revert_cursor_index = 0;
anatofuz
parents:
diff changeset
902 return CC_NEWLINE;
anatofuz
parents:
diff changeset
903 }
anatofuz
parents:
diff changeset
904
anatofuz
parents:
diff changeset
905 unsigned char Editline::BufferEndCommand(int ch) {
anatofuz
parents:
diff changeset
906 SaveEditedLine();
anatofuz
parents:
diff changeset
907 MoveCursor(CursorLocation::EditingCursor, CursorLocation::BlockEnd);
anatofuz
parents:
diff changeset
908 SetCurrentLine((int)m_input_lines.size() - 1);
anatofuz
parents:
diff changeset
909 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingPrompt);
anatofuz
parents:
diff changeset
910 return CC_NEWLINE;
anatofuz
parents:
diff changeset
911 }
anatofuz
parents:
diff changeset
912
anatofuz
parents:
diff changeset
913 /// Prints completions and their descriptions to the given file. Only the
anatofuz
parents:
diff changeset
914 /// completions in the interval [start, end) are printed.
anatofuz
parents:
diff changeset
915 static void
anatofuz
parents:
diff changeset
916 PrintCompletion(FILE *output_file,
anatofuz
parents:
diff changeset
917 llvm::ArrayRef<CompletionResult::Completion> results,
anatofuz
parents:
diff changeset
918 size_t max_len) {
anatofuz
parents:
diff changeset
919 for (const CompletionResult::Completion &c : results) {
anatofuz
parents:
diff changeset
920 fprintf(output_file, "\t%-*s", (int)max_len, c.GetCompletion().c_str());
anatofuz
parents:
diff changeset
921 if (!c.GetDescription().empty())
anatofuz
parents:
diff changeset
922 fprintf(output_file, " -- %s", c.GetDescription().c_str());
anatofuz
parents:
diff changeset
923 fprintf(output_file, "\n");
anatofuz
parents:
diff changeset
924 }
anatofuz
parents:
diff changeset
925 }
anatofuz
parents:
diff changeset
926
anatofuz
parents:
diff changeset
927 static void
anatofuz
parents:
diff changeset
928 DisplayCompletions(::EditLine *editline, FILE *output_file,
anatofuz
parents:
diff changeset
929 llvm::ArrayRef<CompletionResult::Completion> results) {
anatofuz
parents:
diff changeset
930 assert(!results.empty());
anatofuz
parents:
diff changeset
931
anatofuz
parents:
diff changeset
932 fprintf(output_file, "\n" ANSI_CLEAR_BELOW "Available completions:\n");
anatofuz
parents:
diff changeset
933 const size_t page_size = 40;
anatofuz
parents:
diff changeset
934 bool all = false;
anatofuz
parents:
diff changeset
935
anatofuz
parents:
diff changeset
936 auto longest =
anatofuz
parents:
diff changeset
937 std::max_element(results.begin(), results.end(), [](auto &c1, auto &c2) {
anatofuz
parents:
diff changeset
938 return c1.GetCompletion().size() < c2.GetCompletion().size();
anatofuz
parents:
diff changeset
939 });
anatofuz
parents:
diff changeset
940
anatofuz
parents:
diff changeset
941 const size_t max_len = longest->GetCompletion().size();
anatofuz
parents:
diff changeset
942
anatofuz
parents:
diff changeset
943 if (results.size() < page_size) {
anatofuz
parents:
diff changeset
944 PrintCompletion(output_file, results, max_len);
anatofuz
parents:
diff changeset
945 return;
anatofuz
parents:
diff changeset
946 }
anatofuz
parents:
diff changeset
947
anatofuz
parents:
diff changeset
948 size_t cur_pos = 0;
anatofuz
parents:
diff changeset
949 while (cur_pos < results.size()) {
anatofuz
parents:
diff changeset
950 size_t remaining = results.size() - cur_pos;
anatofuz
parents:
diff changeset
951 size_t next_size = all ? remaining : std::min(page_size, remaining);
anatofuz
parents:
diff changeset
952
anatofuz
parents:
diff changeset
953 PrintCompletion(output_file, results.slice(cur_pos, next_size), max_len);
anatofuz
parents:
diff changeset
954
anatofuz
parents:
diff changeset
955 cur_pos += next_size;
anatofuz
parents:
diff changeset
956
anatofuz
parents:
diff changeset
957 if (cur_pos >= results.size())
anatofuz
parents:
diff changeset
958 break;
anatofuz
parents:
diff changeset
959
anatofuz
parents:
diff changeset
960 fprintf(output_file, "More (Y/n/a): ");
anatofuz
parents:
diff changeset
961 char reply = 'n';
anatofuz
parents:
diff changeset
962 int got_char = el_getc(editline, &reply);
anatofuz
parents:
diff changeset
963 fprintf(output_file, "\n");
anatofuz
parents:
diff changeset
964 if (got_char == -1 || reply == 'n')
anatofuz
parents:
diff changeset
965 break;
anatofuz
parents:
diff changeset
966 if (reply == 'a')
anatofuz
parents:
diff changeset
967 all = true;
anatofuz
parents:
diff changeset
968 }
anatofuz
parents:
diff changeset
969 }
anatofuz
parents:
diff changeset
970
anatofuz
parents:
diff changeset
971 unsigned char Editline::TabCommand(int ch) {
anatofuz
parents:
diff changeset
972 if (m_completion_callback == nullptr)
anatofuz
parents:
diff changeset
973 return CC_ERROR;
anatofuz
parents:
diff changeset
974
anatofuz
parents:
diff changeset
975 const LineInfo *line_info = el_line(m_editline);
anatofuz
parents:
diff changeset
976
anatofuz
parents:
diff changeset
977 llvm::StringRef line(line_info->buffer,
anatofuz
parents:
diff changeset
978 line_info->lastchar - line_info->buffer);
anatofuz
parents:
diff changeset
979 unsigned cursor_index = line_info->cursor - line_info->buffer;
anatofuz
parents:
diff changeset
980 CompletionResult result;
anatofuz
parents:
diff changeset
981 CompletionRequest request(line, cursor_index, result);
anatofuz
parents:
diff changeset
982
anatofuz
parents:
diff changeset
983 m_completion_callback(request, m_completion_callback_baton);
anatofuz
parents:
diff changeset
984
anatofuz
parents:
diff changeset
985 llvm::ArrayRef<CompletionResult::Completion> results = result.GetResults();
anatofuz
parents:
diff changeset
986
anatofuz
parents:
diff changeset
987 StringList completions;
anatofuz
parents:
diff changeset
988 result.GetMatches(completions);
anatofuz
parents:
diff changeset
989
anatofuz
parents:
diff changeset
990 if (results.size() == 0)
anatofuz
parents:
diff changeset
991 return CC_ERROR;
anatofuz
parents:
diff changeset
992
anatofuz
parents:
diff changeset
993 if (results.size() == 1) {
anatofuz
parents:
diff changeset
994 CompletionResult::Completion completion = results.front();
anatofuz
parents:
diff changeset
995 switch (completion.GetMode()) {
anatofuz
parents:
diff changeset
996 case CompletionMode::Normal: {
anatofuz
parents:
diff changeset
997 std::string to_add = completion.GetCompletion();
anatofuz
parents:
diff changeset
998 to_add = to_add.substr(request.GetCursorArgumentPrefix().size());
anatofuz
parents:
diff changeset
999 if (request.GetParsedArg().IsQuoted())
anatofuz
parents:
diff changeset
1000 to_add.push_back(request.GetParsedArg().GetQuoteChar());
anatofuz
parents:
diff changeset
1001 to_add.push_back(' ');
anatofuz
parents:
diff changeset
1002 el_insertstr(m_editline, to_add.c_str());
anatofuz
parents:
diff changeset
1003 break;
anatofuz
parents:
diff changeset
1004 }
anatofuz
parents:
diff changeset
1005 case CompletionMode::Partial: {
anatofuz
parents:
diff changeset
1006 std::string to_add = completion.GetCompletion();
anatofuz
parents:
diff changeset
1007 to_add = to_add.substr(request.GetCursorArgumentPrefix().size());
anatofuz
parents:
diff changeset
1008 el_insertstr(m_editline, to_add.c_str());
anatofuz
parents:
diff changeset
1009 break;
anatofuz
parents:
diff changeset
1010 }
anatofuz
parents:
diff changeset
1011 case CompletionMode::RewriteLine: {
anatofuz
parents:
diff changeset
1012 el_deletestr(m_editline, line_info->cursor - line_info->buffer);
anatofuz
parents:
diff changeset
1013 el_insertstr(m_editline, completion.GetCompletion().c_str());
anatofuz
parents:
diff changeset
1014 break;
anatofuz
parents:
diff changeset
1015 }
anatofuz
parents:
diff changeset
1016 }
anatofuz
parents:
diff changeset
1017 return CC_REDISPLAY;
anatofuz
parents:
diff changeset
1018 }
anatofuz
parents:
diff changeset
1019
anatofuz
parents:
diff changeset
1020 // If we get a longer match display that first.
anatofuz
parents:
diff changeset
1021 std::string longest_prefix = completions.LongestCommonPrefix();
anatofuz
parents:
diff changeset
1022 if (!longest_prefix.empty())
anatofuz
parents:
diff changeset
1023 longest_prefix =
anatofuz
parents:
diff changeset
1024 longest_prefix.substr(request.GetCursorArgumentPrefix().size());
anatofuz
parents:
diff changeset
1025 if (!longest_prefix.empty()) {
anatofuz
parents:
diff changeset
1026 el_insertstr(m_editline, longest_prefix.c_str());
anatofuz
parents:
diff changeset
1027 return CC_REDISPLAY;
anatofuz
parents:
diff changeset
1028 }
anatofuz
parents:
diff changeset
1029
anatofuz
parents:
diff changeset
1030 DisplayCompletions(m_editline, m_output_file, results);
anatofuz
parents:
diff changeset
1031
anatofuz
parents:
diff changeset
1032 DisplayInput();
anatofuz
parents:
diff changeset
1033 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingCursor);
anatofuz
parents:
diff changeset
1034 return CC_REDISPLAY;
anatofuz
parents:
diff changeset
1035 }
anatofuz
parents:
diff changeset
1036
anatofuz
parents:
diff changeset
1037 void Editline::ConfigureEditor(bool multiline) {
anatofuz
parents:
diff changeset
1038 if (m_editline && m_multiline_enabled == multiline)
anatofuz
parents:
diff changeset
1039 return;
anatofuz
parents:
diff changeset
1040 m_multiline_enabled = multiline;
anatofuz
parents:
diff changeset
1041
anatofuz
parents:
diff changeset
1042 if (m_editline) {
anatofuz
parents:
diff changeset
1043 // Disable edit mode to stop the terminal from flushing all input during
anatofuz
parents:
diff changeset
1044 // the call to el_end() since we expect to have multiple editline instances
anatofuz
parents:
diff changeset
1045 // in this program.
anatofuz
parents:
diff changeset
1046 el_set(m_editline, EL_EDITMODE, 0);
anatofuz
parents:
diff changeset
1047 el_end(m_editline);
anatofuz
parents:
diff changeset
1048 }
anatofuz
parents:
diff changeset
1049
anatofuz
parents:
diff changeset
1050 m_editline =
anatofuz
parents:
diff changeset
1051 el_init(m_editor_name.c_str(), m_input_file, m_output_file, m_error_file);
anatofuz
parents:
diff changeset
1052 TerminalSizeChanged();
anatofuz
parents:
diff changeset
1053
anatofuz
parents:
diff changeset
1054 if (m_history_sp && m_history_sp->IsValid()) {
anatofuz
parents:
diff changeset
1055 if (!m_history_sp->Load()) {
anatofuz
parents:
diff changeset
1056 fputs("Could not load history file\n.", m_output_file);
anatofuz
parents:
diff changeset
1057 }
anatofuz
parents:
diff changeset
1058 el_wset(m_editline, EL_HIST, history, m_history_sp->GetHistoryPtr());
anatofuz
parents:
diff changeset
1059 }
anatofuz
parents:
diff changeset
1060 el_set(m_editline, EL_CLIENTDATA, this);
anatofuz
parents:
diff changeset
1061 el_set(m_editline, EL_SIGNAL, 0);
anatofuz
parents:
diff changeset
1062 el_set(m_editline, EL_EDITOR, "emacs");
anatofuz
parents:
diff changeset
1063 el_set(m_editline, EL_PROMPT,
anatofuz
parents:
diff changeset
1064 (EditlinePromptCallbackType)([](EditLine *editline) {
anatofuz
parents:
diff changeset
1065 return Editline::InstanceFor(editline)->Prompt();
anatofuz
parents:
diff changeset
1066 }));
anatofuz
parents:
diff changeset
1067
anatofuz
parents:
diff changeset
1068 el_wset(m_editline, EL_GETCFN, (EditlineGetCharCallbackType)([](
anatofuz
parents:
diff changeset
1069 EditLine *editline, EditLineGetCharType *c) {
anatofuz
parents:
diff changeset
1070 return Editline::InstanceFor(editline)->GetCharacter(c);
anatofuz
parents:
diff changeset
1071 }));
anatofuz
parents:
diff changeset
1072
anatofuz
parents:
diff changeset
1073 // Commands used for multiline support, registered whether or not they're
anatofuz
parents:
diff changeset
1074 // used
anatofuz
parents:
diff changeset
1075 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-break-line"),
anatofuz
parents:
diff changeset
1076 EditLineConstString("Insert a line break"),
anatofuz
parents:
diff changeset
1077 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1078 return Editline::InstanceFor(editline)->BreakLineCommand(ch);
anatofuz
parents:
diff changeset
1079 }));
anatofuz
parents:
diff changeset
1080 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-end-or-add-line"),
anatofuz
parents:
diff changeset
1081 EditLineConstString("End editing or continue when incomplete"),
anatofuz
parents:
diff changeset
1082 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1083 return Editline::InstanceFor(editline)->EndOrAddLineCommand(ch);
anatofuz
parents:
diff changeset
1084 }));
anatofuz
parents:
diff changeset
1085 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-delete-next-char"),
anatofuz
parents:
diff changeset
1086 EditLineConstString("Delete next character"),
anatofuz
parents:
diff changeset
1087 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1088 return Editline::InstanceFor(editline)->DeleteNextCharCommand(ch);
anatofuz
parents:
diff changeset
1089 }));
anatofuz
parents:
diff changeset
1090 el_wset(
anatofuz
parents:
diff changeset
1091 m_editline, EL_ADDFN, EditLineConstString("lldb-delete-previous-char"),
anatofuz
parents:
diff changeset
1092 EditLineConstString("Delete previous character"),
anatofuz
parents:
diff changeset
1093 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1094 return Editline::InstanceFor(editline)->DeletePreviousCharCommand(ch);
anatofuz
parents:
diff changeset
1095 }));
anatofuz
parents:
diff changeset
1096 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-previous-line"),
anatofuz
parents:
diff changeset
1097 EditLineConstString("Move to previous line"),
anatofuz
parents:
diff changeset
1098 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1099 return Editline::InstanceFor(editline)->PreviousLineCommand(ch);
anatofuz
parents:
diff changeset
1100 }));
anatofuz
parents:
diff changeset
1101 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-next-line"),
anatofuz
parents:
diff changeset
1102 EditLineConstString("Move to next line"),
anatofuz
parents:
diff changeset
1103 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1104 return Editline::InstanceFor(editline)->NextLineCommand(ch);
anatofuz
parents:
diff changeset
1105 }));
anatofuz
parents:
diff changeset
1106 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-previous-history"),
anatofuz
parents:
diff changeset
1107 EditLineConstString("Move to previous history"),
anatofuz
parents:
diff changeset
1108 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1109 return Editline::InstanceFor(editline)->PreviousHistoryCommand(ch);
anatofuz
parents:
diff changeset
1110 }));
anatofuz
parents:
diff changeset
1111 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-next-history"),
anatofuz
parents:
diff changeset
1112 EditLineConstString("Move to next history"),
anatofuz
parents:
diff changeset
1113 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1114 return Editline::InstanceFor(editline)->NextHistoryCommand(ch);
anatofuz
parents:
diff changeset
1115 }));
anatofuz
parents:
diff changeset
1116 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-buffer-start"),
anatofuz
parents:
diff changeset
1117 EditLineConstString("Move to start of buffer"),
anatofuz
parents:
diff changeset
1118 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1119 return Editline::InstanceFor(editline)->BufferStartCommand(ch);
anatofuz
parents:
diff changeset
1120 }));
anatofuz
parents:
diff changeset
1121 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-buffer-end"),
anatofuz
parents:
diff changeset
1122 EditLineConstString("Move to end of buffer"),
anatofuz
parents:
diff changeset
1123 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1124 return Editline::InstanceFor(editline)->BufferEndCommand(ch);
anatofuz
parents:
diff changeset
1125 }));
anatofuz
parents:
diff changeset
1126 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-fix-indentation"),
anatofuz
parents:
diff changeset
1127 EditLineConstString("Fix line indentation"),
anatofuz
parents:
diff changeset
1128 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1129 return Editline::InstanceFor(editline)->FixIndentationCommand(ch);
anatofuz
parents:
diff changeset
1130 }));
anatofuz
parents:
diff changeset
1131
anatofuz
parents:
diff changeset
1132 // Register the complete callback under two names for compatibility with
anatofuz
parents:
diff changeset
1133 // older clients using custom .editrc files (largely because libedit has a
anatofuz
parents:
diff changeset
1134 // bad bug where if you have a bind command that tries to bind to a function
anatofuz
parents:
diff changeset
1135 // name that doesn't exist, it can corrupt the heap and crash your process
anatofuz
parents:
diff changeset
1136 // later.)
anatofuz
parents:
diff changeset
1137 EditlineCommandCallbackType complete_callback = [](EditLine *editline,
anatofuz
parents:
diff changeset
1138 int ch) {
anatofuz
parents:
diff changeset
1139 return Editline::InstanceFor(editline)->TabCommand(ch);
anatofuz
parents:
diff changeset
1140 };
anatofuz
parents:
diff changeset
1141 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-complete"),
anatofuz
parents:
diff changeset
1142 EditLineConstString("Invoke completion"), complete_callback);
anatofuz
parents:
diff changeset
1143 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb_complete"),
anatofuz
parents:
diff changeset
1144 EditLineConstString("Invoke completion"), complete_callback);
anatofuz
parents:
diff changeset
1145
anatofuz
parents:
diff changeset
1146 // General bindings we don't mind being overridden
anatofuz
parents:
diff changeset
1147 if (!multiline) {
anatofuz
parents:
diff changeset
1148 el_set(m_editline, EL_BIND, "^r", "em-inc-search-prev",
anatofuz
parents:
diff changeset
1149 NULL); // Cycle through backwards search, entering string
anatofuz
parents:
diff changeset
1150 }
anatofuz
parents:
diff changeset
1151 el_set(m_editline, EL_BIND, "^w", "ed-delete-prev-word",
anatofuz
parents:
diff changeset
1152 NULL); // Delete previous word, behave like bash in emacs mode
anatofuz
parents:
diff changeset
1153 el_set(m_editline, EL_BIND, "\t", "lldb-complete",
anatofuz
parents:
diff changeset
1154 NULL); // Bind TAB to auto complete
anatofuz
parents:
diff changeset
1155
anatofuz
parents:
diff changeset
1156 // Allow ctrl-left-arrow and ctrl-right-arrow for navigation, behave like
anatofuz
parents:
diff changeset
1157 // bash in emacs mode.
anatofuz
parents:
diff changeset
1158 el_set(m_editline, EL_BIND, ESCAPE "[1;5C", "em-next-word", NULL);
anatofuz
parents:
diff changeset
1159 el_set(m_editline, EL_BIND, ESCAPE "[1;5D", "ed-prev-word", NULL);
anatofuz
parents:
diff changeset
1160 el_set(m_editline, EL_BIND, ESCAPE "[5C", "em-next-word", NULL);
anatofuz
parents:
diff changeset
1161 el_set(m_editline, EL_BIND, ESCAPE "[5D", "ed-prev-word", NULL);
anatofuz
parents:
diff changeset
1162 el_set(m_editline, EL_BIND, ESCAPE ESCAPE "[C", "em-next-word", NULL);
anatofuz
parents:
diff changeset
1163 el_set(m_editline, EL_BIND, ESCAPE ESCAPE "[D", "ed-prev-word", NULL);
anatofuz
parents:
diff changeset
1164
anatofuz
parents:
diff changeset
1165 // Allow user-specific customization prior to registering bindings we
anatofuz
parents:
diff changeset
1166 // absolutely require
anatofuz
parents:
diff changeset
1167 el_source(m_editline, nullptr);
anatofuz
parents:
diff changeset
1168
anatofuz
parents:
diff changeset
1169 // Register an internal binding that external developers shouldn't use
anatofuz
parents:
diff changeset
1170 el_wset(m_editline, EL_ADDFN, EditLineConstString("lldb-revert-line"),
anatofuz
parents:
diff changeset
1171 EditLineConstString("Revert line to saved state"),
anatofuz
parents:
diff changeset
1172 (EditlineCommandCallbackType)([](EditLine *editline, int ch) {
anatofuz
parents:
diff changeset
1173 return Editline::InstanceFor(editline)->RevertLineCommand(ch);
anatofuz
parents:
diff changeset
1174 }));
anatofuz
parents:
diff changeset
1175
anatofuz
parents:
diff changeset
1176 // Register keys that perform auto-indent correction
anatofuz
parents:
diff changeset
1177 if (m_fix_indentation_callback && m_fix_indentation_callback_chars) {
anatofuz
parents:
diff changeset
1178 char bind_key[2] = {0, 0};
anatofuz
parents:
diff changeset
1179 const char *indent_chars = m_fix_indentation_callback_chars;
anatofuz
parents:
diff changeset
1180 while (*indent_chars) {
anatofuz
parents:
diff changeset
1181 bind_key[0] = *indent_chars;
anatofuz
parents:
diff changeset
1182 el_set(m_editline, EL_BIND, bind_key, "lldb-fix-indentation", NULL);
anatofuz
parents:
diff changeset
1183 ++indent_chars;
anatofuz
parents:
diff changeset
1184 }
anatofuz
parents:
diff changeset
1185 }
anatofuz
parents:
diff changeset
1186
anatofuz
parents:
diff changeset
1187 // Multi-line editor bindings
anatofuz
parents:
diff changeset
1188 if (multiline) {
anatofuz
parents:
diff changeset
1189 el_set(m_editline, EL_BIND, "\n", "lldb-end-or-add-line", NULL);
anatofuz
parents:
diff changeset
1190 el_set(m_editline, EL_BIND, "\r", "lldb-end-or-add-line", NULL);
anatofuz
parents:
diff changeset
1191 el_set(m_editline, EL_BIND, ESCAPE "\n", "lldb-break-line", NULL);
anatofuz
parents:
diff changeset
1192 el_set(m_editline, EL_BIND, ESCAPE "\r", "lldb-break-line", NULL);
anatofuz
parents:
diff changeset
1193 el_set(m_editline, EL_BIND, "^p", "lldb-previous-line", NULL);
anatofuz
parents:
diff changeset
1194 el_set(m_editline, EL_BIND, "^n", "lldb-next-line", NULL);
anatofuz
parents:
diff changeset
1195 el_set(m_editline, EL_BIND, "^?", "lldb-delete-previous-char", NULL);
anatofuz
parents:
diff changeset
1196 el_set(m_editline, EL_BIND, "^d", "lldb-delete-next-char", NULL);
anatofuz
parents:
diff changeset
1197 el_set(m_editline, EL_BIND, ESCAPE "[3~", "lldb-delete-next-char", NULL);
anatofuz
parents:
diff changeset
1198 el_set(m_editline, EL_BIND, ESCAPE "[\\^", "lldb-revert-line", NULL);
anatofuz
parents:
diff changeset
1199
anatofuz
parents:
diff changeset
1200 // Editor-specific bindings
anatofuz
parents:
diff changeset
1201 if (IsEmacs()) {
anatofuz
parents:
diff changeset
1202 el_set(m_editline, EL_BIND, ESCAPE "<", "lldb-buffer-start", NULL);
anatofuz
parents:
diff changeset
1203 el_set(m_editline, EL_BIND, ESCAPE ">", "lldb-buffer-end", NULL);
anatofuz
parents:
diff changeset
1204 el_set(m_editline, EL_BIND, ESCAPE "[A", "lldb-previous-line", NULL);
anatofuz
parents:
diff changeset
1205 el_set(m_editline, EL_BIND, ESCAPE "[B", "lldb-next-line", NULL);
anatofuz
parents:
diff changeset
1206 el_set(m_editline, EL_BIND, ESCAPE ESCAPE "[A", "lldb-previous-history",
anatofuz
parents:
diff changeset
1207 NULL);
anatofuz
parents:
diff changeset
1208 el_set(m_editline, EL_BIND, ESCAPE ESCAPE "[B", "lldb-next-history",
anatofuz
parents:
diff changeset
1209 NULL);
anatofuz
parents:
diff changeset
1210 el_set(m_editline, EL_BIND, ESCAPE "[1;3A", "lldb-previous-history",
anatofuz
parents:
diff changeset
1211 NULL);
anatofuz
parents:
diff changeset
1212 el_set(m_editline, EL_BIND, ESCAPE "[1;3B", "lldb-next-history", NULL);
anatofuz
parents:
diff changeset
1213 } else {
anatofuz
parents:
diff changeset
1214 el_set(m_editline, EL_BIND, "^H", "lldb-delete-previous-char", NULL);
anatofuz
parents:
diff changeset
1215
anatofuz
parents:
diff changeset
1216 el_set(m_editline, EL_BIND, "-a", ESCAPE "[A", "lldb-previous-line",
anatofuz
parents:
diff changeset
1217 NULL);
anatofuz
parents:
diff changeset
1218 el_set(m_editline, EL_BIND, "-a", ESCAPE "[B", "lldb-next-line", NULL);
anatofuz
parents:
diff changeset
1219 el_set(m_editline, EL_BIND, "-a", "x", "lldb-delete-next-char", NULL);
anatofuz
parents:
diff changeset
1220 el_set(m_editline, EL_BIND, "-a", "^H", "lldb-delete-previous-char",
anatofuz
parents:
diff changeset
1221 NULL);
anatofuz
parents:
diff changeset
1222 el_set(m_editline, EL_BIND, "-a", "^?", "lldb-delete-previous-char",
anatofuz
parents:
diff changeset
1223 NULL);
anatofuz
parents:
diff changeset
1224
anatofuz
parents:
diff changeset
1225 // Escape is absorbed exiting edit mode, so re-register important
anatofuz
parents:
diff changeset
1226 // sequences without the prefix
anatofuz
parents:
diff changeset
1227 el_set(m_editline, EL_BIND, "-a", "[A", "lldb-previous-line", NULL);
anatofuz
parents:
diff changeset
1228 el_set(m_editline, EL_BIND, "-a", "[B", "lldb-next-line", NULL);
anatofuz
parents:
diff changeset
1229 el_set(m_editline, EL_BIND, "-a", "[\\^", "lldb-revert-line", NULL);
anatofuz
parents:
diff changeset
1230 }
anatofuz
parents:
diff changeset
1231 }
anatofuz
parents:
diff changeset
1232 }
anatofuz
parents:
diff changeset
1233
anatofuz
parents:
diff changeset
1234 // Editline public methods
anatofuz
parents:
diff changeset
1235
anatofuz
parents:
diff changeset
1236 Editline *Editline::InstanceFor(EditLine *editline) {
anatofuz
parents:
diff changeset
1237 Editline *editor;
anatofuz
parents:
diff changeset
1238 el_get(editline, EL_CLIENTDATA, &editor);
anatofuz
parents:
diff changeset
1239 return editor;
anatofuz
parents:
diff changeset
1240 }
anatofuz
parents:
diff changeset
1241
anatofuz
parents:
diff changeset
1242 Editline::Editline(const char *editline_name, FILE *input_file,
anatofuz
parents:
diff changeset
1243 FILE *output_file, FILE *error_file, bool color_prompts)
anatofuz
parents:
diff changeset
1244 : m_editor_status(EditorStatus::Complete), m_color_prompts(color_prompts),
anatofuz
parents:
diff changeset
1245 m_input_file(input_file), m_output_file(output_file),
anatofuz
parents:
diff changeset
1246 m_error_file(error_file), m_input_connection(fileno(input_file), false) {
anatofuz
parents:
diff changeset
1247 // Get a shared history instance
anatofuz
parents:
diff changeset
1248 m_editor_name = (editline_name == nullptr) ? "lldb-tmp" : editline_name;
anatofuz
parents:
diff changeset
1249 m_history_sp = EditlineHistory::GetHistory(m_editor_name);
anatofuz
parents:
diff changeset
1250
anatofuz
parents:
diff changeset
1251 #ifdef USE_SETUPTERM_WORKAROUND
anatofuz
parents:
diff changeset
1252 if (m_output_file) {
anatofuz
parents:
diff changeset
1253 const int term_fd = fileno(m_output_file);
anatofuz
parents:
diff changeset
1254 if (term_fd != -1) {
anatofuz
parents:
diff changeset
1255 static std::mutex *g_init_terminal_fds_mutex_ptr = nullptr;
anatofuz
parents:
diff changeset
1256 static std::set<int> *g_init_terminal_fds_ptr = nullptr;
anatofuz
parents:
diff changeset
1257 static llvm::once_flag g_once_flag;
anatofuz
parents:
diff changeset
1258 llvm::call_once(g_once_flag, [&]() {
anatofuz
parents:
diff changeset
1259 g_init_terminal_fds_mutex_ptr =
anatofuz
parents:
diff changeset
1260 new std::mutex(); // NOTE: Leak to avoid C++ destructor chain issues
anatofuz
parents:
diff changeset
1261 g_init_terminal_fds_ptr = new std::set<int>(); // NOTE: Leak to avoid
anatofuz
parents:
diff changeset
1262 // C++ destructor chain
anatofuz
parents:
diff changeset
1263 // issues
anatofuz
parents:
diff changeset
1264 });
anatofuz
parents:
diff changeset
1265
anatofuz
parents:
diff changeset
1266 // We must make sure to initialize the terminal a given file descriptor
anatofuz
parents:
diff changeset
1267 // only once. If we do this multiple times, we start leaking memory.
anatofuz
parents:
diff changeset
1268 std::lock_guard<std::mutex> guard(*g_init_terminal_fds_mutex_ptr);
anatofuz
parents:
diff changeset
1269 if (g_init_terminal_fds_ptr->find(term_fd) ==
anatofuz
parents:
diff changeset
1270 g_init_terminal_fds_ptr->end()) {
anatofuz
parents:
diff changeset
1271 g_init_terminal_fds_ptr->insert(term_fd);
anatofuz
parents:
diff changeset
1272 setupterm((char *)0, term_fd, (int *)0);
anatofuz
parents:
diff changeset
1273 }
anatofuz
parents:
diff changeset
1274 }
anatofuz
parents:
diff changeset
1275 }
anatofuz
parents:
diff changeset
1276 #endif
anatofuz
parents:
diff changeset
1277 }
anatofuz
parents:
diff changeset
1278
anatofuz
parents:
diff changeset
1279 Editline::~Editline() {
anatofuz
parents:
diff changeset
1280 if (m_editline) {
anatofuz
parents:
diff changeset
1281 // Disable edit mode to stop the terminal from flushing all input during
anatofuz
parents:
diff changeset
1282 // the call to el_end() since we expect to have multiple editline instances
anatofuz
parents:
diff changeset
1283 // in this program.
anatofuz
parents:
diff changeset
1284 el_set(m_editline, EL_EDITMODE, 0);
anatofuz
parents:
diff changeset
1285 el_end(m_editline);
anatofuz
parents:
diff changeset
1286 m_editline = nullptr;
anatofuz
parents:
diff changeset
1287 }
anatofuz
parents:
diff changeset
1288
anatofuz
parents:
diff changeset
1289 // EditlineHistory objects are sometimes shared between multiple Editline
anatofuz
parents:
diff changeset
1290 // instances with the same program name. So just release our shared pointer
anatofuz
parents:
diff changeset
1291 // and if we are the last owner, it will save the history to the history save
anatofuz
parents:
diff changeset
1292 // file automatically.
anatofuz
parents:
diff changeset
1293 m_history_sp.reset();
anatofuz
parents:
diff changeset
1294 }
anatofuz
parents:
diff changeset
1295
anatofuz
parents:
diff changeset
1296 void Editline::SetPrompt(const char *prompt) {
anatofuz
parents:
diff changeset
1297 m_set_prompt = prompt == nullptr ? "" : prompt;
anatofuz
parents:
diff changeset
1298 }
anatofuz
parents:
diff changeset
1299
anatofuz
parents:
diff changeset
1300 void Editline::SetContinuationPrompt(const char *continuation_prompt) {
anatofuz
parents:
diff changeset
1301 m_set_continuation_prompt =
anatofuz
parents:
diff changeset
1302 continuation_prompt == nullptr ? "" : continuation_prompt;
anatofuz
parents:
diff changeset
1303 }
anatofuz
parents:
diff changeset
1304
anatofuz
parents:
diff changeset
1305 void Editline::TerminalSizeChanged() {
anatofuz
parents:
diff changeset
1306 if (m_editline != nullptr) {
anatofuz
parents:
diff changeset
1307 el_resize(m_editline);
anatofuz
parents:
diff changeset
1308 int columns;
anatofuz
parents:
diff changeset
1309 // This function is documenting as taking (const char *, void *) for the
anatofuz
parents:
diff changeset
1310 // vararg part, but in reality in was consuming arguments until the first
anatofuz
parents:
diff changeset
1311 // null pointer. This was fixed in libedit in April 2019
anatofuz
parents:
diff changeset
1312 // <http://mail-index.netbsd.org/source-changes/2019/04/26/msg105454.html>,
anatofuz
parents:
diff changeset
1313 // but we're keeping the workaround until a version with that fix is more
anatofuz
parents:
diff changeset
1314 // widely available.
anatofuz
parents:
diff changeset
1315 if (el_get(m_editline, EL_GETTC, "co", &columns, nullptr) == 0) {
anatofuz
parents:
diff changeset
1316 m_terminal_width = columns;
anatofuz
parents:
diff changeset
1317 if (m_current_line_rows != -1) {
anatofuz
parents:
diff changeset
1318 const LineInfoW *info = el_wline(m_editline);
anatofuz
parents:
diff changeset
1319 int lineLength =
anatofuz
parents:
diff changeset
1320 (int)((info->lastchar - info->buffer) + GetPromptWidth());
anatofuz
parents:
diff changeset
1321 m_current_line_rows = (lineLength / columns) + 1;
anatofuz
parents:
diff changeset
1322 }
anatofuz
parents:
diff changeset
1323 } else {
anatofuz
parents:
diff changeset
1324 m_terminal_width = INT_MAX;
anatofuz
parents:
diff changeset
1325 m_current_line_rows = 1;
anatofuz
parents:
diff changeset
1326 }
anatofuz
parents:
diff changeset
1327 }
anatofuz
parents:
diff changeset
1328 }
anatofuz
parents:
diff changeset
1329
anatofuz
parents:
diff changeset
1330 const char *Editline::GetPrompt() { return m_set_prompt.c_str(); }
anatofuz
parents:
diff changeset
1331
anatofuz
parents:
diff changeset
1332 uint32_t Editline::GetCurrentLine() { return m_current_line_index; }
anatofuz
parents:
diff changeset
1333
anatofuz
parents:
diff changeset
1334 bool Editline::Interrupt() {
anatofuz
parents:
diff changeset
1335 bool result = true;
anatofuz
parents:
diff changeset
1336 std::lock_guard<std::mutex> guard(m_output_mutex);
anatofuz
parents:
diff changeset
1337 if (m_editor_status == EditorStatus::Editing) {
anatofuz
parents:
diff changeset
1338 fprintf(m_output_file, "^C\n");
anatofuz
parents:
diff changeset
1339 result = m_input_connection.InterruptRead();
anatofuz
parents:
diff changeset
1340 }
anatofuz
parents:
diff changeset
1341 m_editor_status = EditorStatus::Interrupted;
anatofuz
parents:
diff changeset
1342 return result;
anatofuz
parents:
diff changeset
1343 }
anatofuz
parents:
diff changeset
1344
anatofuz
parents:
diff changeset
1345 bool Editline::Cancel() {
anatofuz
parents:
diff changeset
1346 bool result = true;
anatofuz
parents:
diff changeset
1347 std::lock_guard<std::mutex> guard(m_output_mutex);
anatofuz
parents:
diff changeset
1348 if (m_editor_status == EditorStatus::Editing) {
anatofuz
parents:
diff changeset
1349 MoveCursor(CursorLocation::EditingCursor, CursorLocation::BlockStart);
anatofuz
parents:
diff changeset
1350 fprintf(m_output_file, ANSI_CLEAR_BELOW);
anatofuz
parents:
diff changeset
1351 result = m_input_connection.InterruptRead();
anatofuz
parents:
diff changeset
1352 }
anatofuz
parents:
diff changeset
1353 m_editor_status = EditorStatus::Interrupted;
anatofuz
parents:
diff changeset
1354 return result;
anatofuz
parents:
diff changeset
1355 }
anatofuz
parents:
diff changeset
1356
anatofuz
parents:
diff changeset
1357 void Editline::SetAutoCompleteCallback(CompleteCallbackType callback,
anatofuz
parents:
diff changeset
1358 void *baton) {
anatofuz
parents:
diff changeset
1359 m_completion_callback = callback;
anatofuz
parents:
diff changeset
1360 m_completion_callback_baton = baton;
anatofuz
parents:
diff changeset
1361 }
anatofuz
parents:
diff changeset
1362
anatofuz
parents:
diff changeset
1363 void Editline::SetIsInputCompleteCallback(IsInputCompleteCallbackType callback,
anatofuz
parents:
diff changeset
1364 void *baton) {
anatofuz
parents:
diff changeset
1365 m_is_input_complete_callback = callback;
anatofuz
parents:
diff changeset
1366 m_is_input_complete_callback_baton = baton;
anatofuz
parents:
diff changeset
1367 }
anatofuz
parents:
diff changeset
1368
anatofuz
parents:
diff changeset
1369 bool Editline::SetFixIndentationCallback(FixIndentationCallbackType callback,
anatofuz
parents:
diff changeset
1370 void *baton,
anatofuz
parents:
diff changeset
1371 const char *indent_chars) {
anatofuz
parents:
diff changeset
1372 m_fix_indentation_callback = callback;
anatofuz
parents:
diff changeset
1373 m_fix_indentation_callback_baton = baton;
anatofuz
parents:
diff changeset
1374 m_fix_indentation_callback_chars = indent_chars;
anatofuz
parents:
diff changeset
1375 return false;
anatofuz
parents:
diff changeset
1376 }
anatofuz
parents:
diff changeset
1377
anatofuz
parents:
diff changeset
1378 bool Editline::GetLine(std::string &line, bool &interrupted) {
anatofuz
parents:
diff changeset
1379 ConfigureEditor(false);
anatofuz
parents:
diff changeset
1380 m_input_lines = std::vector<EditLineStringType>();
anatofuz
parents:
diff changeset
1381 m_input_lines.insert(m_input_lines.begin(), EditLineConstString(""));
anatofuz
parents:
diff changeset
1382
anatofuz
parents:
diff changeset
1383 std::lock_guard<std::mutex> guard(m_output_mutex);
anatofuz
parents:
diff changeset
1384
anatofuz
parents:
diff changeset
1385 lldbassert(m_editor_status != EditorStatus::Editing);
anatofuz
parents:
diff changeset
1386 if (m_editor_status == EditorStatus::Interrupted) {
anatofuz
parents:
diff changeset
1387 m_editor_status = EditorStatus::Complete;
anatofuz
parents:
diff changeset
1388 interrupted = true;
anatofuz
parents:
diff changeset
1389 return true;
anatofuz
parents:
diff changeset
1390 }
anatofuz
parents:
diff changeset
1391
anatofuz
parents:
diff changeset
1392 SetCurrentLine(0);
anatofuz
parents:
diff changeset
1393 m_in_history = false;
anatofuz
parents:
diff changeset
1394 m_editor_status = EditorStatus::Editing;
anatofuz
parents:
diff changeset
1395 m_revert_cursor_index = -1;
anatofuz
parents:
diff changeset
1396
anatofuz
parents:
diff changeset
1397 int count;
anatofuz
parents:
diff changeset
1398 auto input = el_wgets(m_editline, &count);
anatofuz
parents:
diff changeset
1399
anatofuz
parents:
diff changeset
1400 interrupted = m_editor_status == EditorStatus::Interrupted;
anatofuz
parents:
diff changeset
1401 if (!interrupted) {
anatofuz
parents:
diff changeset
1402 if (input == nullptr) {
anatofuz
parents:
diff changeset
1403 fprintf(m_output_file, "\n");
anatofuz
parents:
diff changeset
1404 m_editor_status = EditorStatus::EndOfInput;
anatofuz
parents:
diff changeset
1405 } else {
anatofuz
parents:
diff changeset
1406 m_history_sp->Enter(input);
anatofuz
parents:
diff changeset
1407 #if LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
1408 line = m_utf8conv.to_bytes(SplitLines(input)[0]);
anatofuz
parents:
diff changeset
1409 #else
anatofuz
parents:
diff changeset
1410 line = SplitLines(input)[0];
anatofuz
parents:
diff changeset
1411 #endif
anatofuz
parents:
diff changeset
1412 m_editor_status = EditorStatus::Complete;
anatofuz
parents:
diff changeset
1413 }
anatofuz
parents:
diff changeset
1414 }
anatofuz
parents:
diff changeset
1415 return m_editor_status != EditorStatus::EndOfInput;
anatofuz
parents:
diff changeset
1416 }
anatofuz
parents:
diff changeset
1417
anatofuz
parents:
diff changeset
1418 bool Editline::GetLines(int first_line_number, StringList &lines,
anatofuz
parents:
diff changeset
1419 bool &interrupted) {
anatofuz
parents:
diff changeset
1420 ConfigureEditor(true);
anatofuz
parents:
diff changeset
1421
anatofuz
parents:
diff changeset
1422 // Print the initial input lines, then move the cursor back up to the start
anatofuz
parents:
diff changeset
1423 // of input
anatofuz
parents:
diff changeset
1424 SetBaseLineNumber(first_line_number);
anatofuz
parents:
diff changeset
1425 m_input_lines = std::vector<EditLineStringType>();
anatofuz
parents:
diff changeset
1426 m_input_lines.insert(m_input_lines.begin(), EditLineConstString(""));
anatofuz
parents:
diff changeset
1427
anatofuz
parents:
diff changeset
1428 std::lock_guard<std::mutex> guard(m_output_mutex);
anatofuz
parents:
diff changeset
1429 // Begin the line editing loop
anatofuz
parents:
diff changeset
1430 DisplayInput();
anatofuz
parents:
diff changeset
1431 SetCurrentLine(0);
anatofuz
parents:
diff changeset
1432 MoveCursor(CursorLocation::BlockEnd, CursorLocation::BlockStart);
anatofuz
parents:
diff changeset
1433 m_editor_status = EditorStatus::Editing;
anatofuz
parents:
diff changeset
1434 m_in_history = false;
anatofuz
parents:
diff changeset
1435
anatofuz
parents:
diff changeset
1436 m_revert_cursor_index = -1;
anatofuz
parents:
diff changeset
1437 while (m_editor_status == EditorStatus::Editing) {
anatofuz
parents:
diff changeset
1438 int count;
anatofuz
parents:
diff changeset
1439 m_current_line_rows = -1;
anatofuz
parents:
diff changeset
1440 el_wpush(m_editline, EditLineConstString(
anatofuz
parents:
diff changeset
1441 "\x1b[^")); // Revert to the existing line content
anatofuz
parents:
diff changeset
1442 el_wgets(m_editline, &count);
anatofuz
parents:
diff changeset
1443 }
anatofuz
parents:
diff changeset
1444
anatofuz
parents:
diff changeset
1445 interrupted = m_editor_status == EditorStatus::Interrupted;
anatofuz
parents:
diff changeset
1446 if (!interrupted) {
anatofuz
parents:
diff changeset
1447 // Save the completed entry in history before returning
anatofuz
parents:
diff changeset
1448 m_history_sp->Enter(CombineLines(m_input_lines).c_str());
anatofuz
parents:
diff changeset
1449
anatofuz
parents:
diff changeset
1450 lines = GetInputAsStringList();
anatofuz
parents:
diff changeset
1451 }
anatofuz
parents:
diff changeset
1452 return m_editor_status != EditorStatus::EndOfInput;
anatofuz
parents:
diff changeset
1453 }
anatofuz
parents:
diff changeset
1454
anatofuz
parents:
diff changeset
1455 void Editline::PrintAsync(Stream *stream, const char *s, size_t len) {
anatofuz
parents:
diff changeset
1456 std::lock_guard<std::mutex> guard(m_output_mutex);
anatofuz
parents:
diff changeset
1457 if (m_editor_status == EditorStatus::Editing) {
anatofuz
parents:
diff changeset
1458 MoveCursor(CursorLocation::EditingCursor, CursorLocation::BlockStart);
anatofuz
parents:
diff changeset
1459 fprintf(m_output_file, ANSI_CLEAR_BELOW);
anatofuz
parents:
diff changeset
1460 }
anatofuz
parents:
diff changeset
1461 stream->Write(s, len);
anatofuz
parents:
diff changeset
1462 stream->Flush();
anatofuz
parents:
diff changeset
1463 if (m_editor_status == EditorStatus::Editing) {
anatofuz
parents:
diff changeset
1464 DisplayInput();
anatofuz
parents:
diff changeset
1465 MoveCursor(CursorLocation::BlockEnd, CursorLocation::EditingCursor);
anatofuz
parents:
diff changeset
1466 }
anatofuz
parents:
diff changeset
1467 }
anatofuz
parents:
diff changeset
1468
anatofuz
parents:
diff changeset
1469 bool Editline::CompleteCharacter(char ch, EditLineGetCharType &out) {
anatofuz
parents:
diff changeset
1470 #if !LLDB_EDITLINE_USE_WCHAR
anatofuz
parents:
diff changeset
1471 if (ch == (char)EOF)
anatofuz
parents:
diff changeset
1472 return false;
anatofuz
parents:
diff changeset
1473
anatofuz
parents:
diff changeset
1474 out = (unsigned char)ch;
anatofuz
parents:
diff changeset
1475 return true;
anatofuz
parents:
diff changeset
1476 #else
anatofuz
parents:
diff changeset
1477 std::codecvt_utf8<wchar_t> cvt;
anatofuz
parents:
diff changeset
1478 llvm::SmallString<4> input;
anatofuz
parents:
diff changeset
1479 for (;;) {
anatofuz
parents:
diff changeset
1480 const char *from_next;
anatofuz
parents:
diff changeset
1481 wchar_t *to_next;
anatofuz
parents:
diff changeset
1482 std::mbstate_t state = std::mbstate_t();
anatofuz
parents:
diff changeset
1483 input.push_back(ch);
anatofuz
parents:
diff changeset
1484 switch (cvt.in(state, input.begin(), input.end(), from_next, &out, &out + 1,
anatofuz
parents:
diff changeset
1485 to_next)) {
anatofuz
parents:
diff changeset
1486 case std::codecvt_base::ok:
anatofuz
parents:
diff changeset
1487 return out != (int)WEOF;
anatofuz
parents:
diff changeset
1488
anatofuz
parents:
diff changeset
1489 case std::codecvt_base::error:
anatofuz
parents:
diff changeset
1490 case std::codecvt_base::noconv:
anatofuz
parents:
diff changeset
1491 return false;
anatofuz
parents:
diff changeset
1492
anatofuz
parents:
diff changeset
1493 case std::codecvt_base::partial:
anatofuz
parents:
diff changeset
1494 lldb::ConnectionStatus status;
anatofuz
parents:
diff changeset
1495 size_t read_count = m_input_connection.Read(
anatofuz
parents:
diff changeset
1496 &ch, 1, std::chrono::seconds(0), status, nullptr);
anatofuz
parents:
diff changeset
1497 if (read_count == 0)
anatofuz
parents:
diff changeset
1498 return false;
anatofuz
parents:
diff changeset
1499 break;
anatofuz
parents:
diff changeset
1500 }
anatofuz
parents:
diff changeset
1501 }
anatofuz
parents:
diff changeset
1502 #endif
anatofuz
parents:
diff changeset
1503 }