Commit | Line | Data |
---|---|---|
f377b406 | 1 | /* TUI display registers in window. |
f33c6cbf | 2 | |
42a4f53d | 3 | Copyright (C) 1998-2019 Free Software Foundation, Inc. |
f33c6cbf | 4 | |
f377b406 | 5 | Contributed by Hewlett-Packard Company. |
c906108c | 6 | |
f377b406 | 7 | This file is part of GDB. |
c906108c | 8 | |
f377b406 SC |
9 | This program is free software; you can redistribute it and/or modify |
10 | it under the terms of the GNU General Public License as published by | |
a9762ec7 | 11 | the Free Software Foundation; either version 3 of the License, or |
f377b406 SC |
12 | (at your option) any later version. |
13 | ||
14 | This program is distributed in the hope that it will be useful, | |
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | GNU General Public License for more details. | |
18 | ||
19 | You should have received a copy of the GNU General Public License | |
a9762ec7 | 20 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
c906108c SS |
21 | |
22 | #include "defs.h" | |
e17c207e | 23 | #include "arch-utils.h" |
d7b2e967 AC |
24 | #include "tui/tui.h" |
25 | #include "tui/tui-data.h" | |
c906108c SS |
26 | #include "symtab.h" |
27 | #include "gdbtypes.h" | |
28 | #include "gdbcmd.h" | |
29 | #include "frame.h" | |
bc77de56 | 30 | #include "regcache.h" |
c906108c SS |
31 | #include "inferior.h" |
32 | #include "target.h" | |
d7b2e967 AC |
33 | #include "tui/tui-layout.h" |
34 | #include "tui/tui-win.h" | |
d7b2e967 AC |
35 | #include "tui/tui-wingeneral.h" |
36 | #include "tui/tui-file.h" | |
2c0b251b | 37 | #include "tui/tui-regs.h" |
312809f8 | 38 | #include "tui/tui-io.h" |
10f59415 | 39 | #include "reggroups.h" |
79a45b7d | 40 | #include "valprint.h" |
51f0e40d | 41 | #include "completer.h" |
c906108c | 42 | |
6a83354a | 43 | #include "gdb_curses.h" |
96ec9981 | 44 | |
1a4f81dd TT |
45 | /* Get the register from the frame and return a printable |
46 | representation of it. */ | |
47 | ||
b9ad3686 | 48 | static gdb::unique_xmalloc_ptr<char> |
1a4f81dd TT |
49 | tui_register_format (struct frame_info *frame, int regnum) |
50 | { | |
51 | struct gdbarch *gdbarch = get_frame_arch (frame); | |
5eccfcc2 | 52 | |
1a4f81dd TT |
53 | string_file stream; |
54 | ||
55 | scoped_restore save_pagination | |
56 | = make_scoped_restore (&pagination_enabled, 0); | |
57 | scoped_restore save_stdout | |
58 | = make_scoped_restore (&gdb_stdout, &stream); | |
59 | ||
60 | gdbarch_print_registers_info (gdbarch, &stream, frame, regnum, 1); | |
61 | ||
62 | /* Remove the possible \n. */ | |
63 | std::string &str = stream.string (); | |
64 | if (!str.empty () && str.back () == '\n') | |
65 | str.resize (str.size () - 1); | |
66 | ||
67 | /* Expand tabs into spaces, since ncurses on MS-Windows doesn't. */ | |
b9ad3686 | 68 | return tui_expand_tabs (str.c_str ()); |
1a4f81dd TT |
69 | } |
70 | ||
71 | /* Get the register value from the given frame and format it for the | |
72 | display. When changep is set, check if the new register value has | |
73 | changed with respect to the previous call. */ | |
74 | static void | |
75 | tui_get_register (struct frame_info *frame, | |
76 | struct tui_data_item_window *data, | |
77 | int regnum, bool *changedp) | |
78 | { | |
79 | if (changedp) | |
80 | *changedp = false; | |
81 | if (target_has_registers) | |
82 | { | |
b9ad3686 TT |
83 | gdb::unique_xmalloc_ptr<char> new_content |
84 | = tui_register_format (frame, regnum); | |
1a4f81dd TT |
85 | |
86 | if (changedp != NULL | |
b9ad3686 | 87 | && strcmp (data->content.get (), new_content.get ()) != 0) |
1a4f81dd TT |
88 | *changedp = true; |
89 | ||
b9ad3686 | 90 | data->content = std::move (new_content); |
1a4f81dd TT |
91 | } |
92 | } | |
96bd6233 TT |
93 | |
94 | /* See tui-regs.h. */ | |
95 | ||
c906108c | 96 | int |
0b5ec218 | 97 | tui_data_window::last_regs_line_no () const |
c906108c | 98 | { |
80df3337 TT |
99 | int num_lines = m_regs_content.size () / m_regs_column_count; |
100 | if (m_regs_content.size () % m_regs_column_count) | |
0670413d | 101 | num_lines++; |
6ba8e26f | 102 | return num_lines; |
55fb0713 | 103 | } |
c906108c | 104 | |
18ab23af | 105 | /* See tui-regs.h. */ |
c906108c | 106 | |
c906108c | 107 | int |
3b23c5f2 | 108 | tui_data_window::line_from_reg_element_no (int element_no) const |
c906108c | 109 | { |
80df3337 | 110 | if (element_no < m_regs_content.size ()) |
c906108c SS |
111 | { |
112 | int i, line = (-1); | |
113 | ||
114 | i = 1; | |
115 | while (line == (-1)) | |
116 | { | |
80df3337 | 117 | if (element_no < m_regs_column_count * i) |
c906108c SS |
118 | line = i - 1; |
119 | else | |
120 | i++; | |
121 | } | |
122 | ||
123 | return line; | |
124 | } | |
125 | else | |
126 | return (-1); | |
55fb0713 | 127 | } |
c906108c | 128 | |
18ab23af | 129 | /* See tui-regs.h. */ |
c906108c | 130 | |
c906108c | 131 | int |
baff0c28 | 132 | tui_data_window::first_reg_element_no_inline (int line_no) const |
c906108c | 133 | { |
80df3337 TT |
134 | if (line_no * m_regs_column_count <= m_regs_content.size ()) |
135 | return ((line_no + 1) * m_regs_column_count) - m_regs_column_count; | |
c906108c SS |
136 | else |
137 | return (-1); | |
55fb0713 | 138 | } |
c906108c | 139 | |
10f59415 SC |
140 | /* Show the registers of the given group in the data window |
141 | and refresh the window. */ | |
c906108c | 142 | void |
ca02d7c8 | 143 | tui_data_window::show_registers (struct reggroup *group) |
c906108c | 144 | { |
10f59415 SC |
145 | if (group == 0) |
146 | group = general_reggroup; | |
c906108c | 147 | |
10f59415 | 148 | if (target_has_registers && target_has_stack && target_has_memory) |
c906108c | 149 | { |
ca02d7c8 | 150 | show_register_group (group, get_selected_frame (NULL), |
80df3337 | 151 | group == m_current_group); |
368c1354 | 152 | |
1cc6d956 | 153 | /* Clear all notation of changed values. */ |
80df3337 | 154 | for (auto &&data_item_win : m_regs_content) |
fa4dc567 | 155 | data_item_win.highlight = false; |
80df3337 | 156 | m_current_group = group; |
c906108c | 157 | } |
368c1354 TT |
158 | else |
159 | { | |
80df3337 | 160 | m_current_group = 0; |
a31bff9d | 161 | m_regs_content.clear (); |
368c1354 | 162 | } |
a31bff9d TT |
163 | |
164 | rerender (); | |
55fb0713 | 165 | } |
c906108c SS |
166 | |
167 | ||
10f59415 | 168 | /* Set the data window to display the registers of the register group |
1cc6d956 | 169 | using the given frame. Values are refreshed only when |
b5457826 | 170 | refresh_values_only is true. */ |
10f59415 | 171 | |
ca02d7c8 TT |
172 | void |
173 | tui_data_window::show_register_group (struct reggroup *group, | |
174 | struct frame_info *frame, | |
b5457826 | 175 | bool refresh_values_only) |
10f59415 | 176 | { |
5eccfcc2 | 177 | struct gdbarch *gdbarch = get_frame_arch (frame); |
10f59415 | 178 | int nr_regs; |
10f59415 | 179 | int regnum, pos; |
10f59415 SC |
180 | |
181 | /* Make a new title showing which group we display. */ | |
ab0e1f1a | 182 | title = string_printf ("Register group: %s", reggroup_name (group)); |
10f59415 SC |
183 | |
184 | /* See how many registers must be displayed. */ | |
185 | nr_regs = 0; | |
f6efe3f8 | 186 | for (regnum = 0; regnum < gdbarch_num_cooked_regs (gdbarch); regnum++) |
10f59415 | 187 | { |
d20c1c3f PA |
188 | const char *name; |
189 | ||
190 | /* Must be in the group. */ | |
191 | if (!gdbarch_register_reggroup_p (gdbarch, regnum, group)) | |
192 | continue; | |
193 | ||
194 | /* If the register name is empty, it is undefined for this | |
195 | processor, so don't display anything. */ | |
196 | name = gdbarch_register_name (gdbarch, regnum); | |
197 | if (name == 0 || *name == '\0') | |
198 | continue; | |
199 | ||
200 | nr_regs++; | |
10f59415 SC |
201 | } |
202 | ||
80df3337 | 203 | m_regs_content.resize (nr_regs); |
10f59415 | 204 | |
21e1c91e TT |
205 | /* Now set the register names and values. */ |
206 | pos = 0; | |
207 | for (regnum = 0; regnum < gdbarch_num_cooked_regs (gdbarch); regnum++) | |
10f59415 | 208 | { |
21e1c91e TT |
209 | struct tui_data_item_window *data_item_win; |
210 | const char *name; | |
10f59415 | 211 | |
21e1c91e TT |
212 | /* Must be in the group. */ |
213 | if (!gdbarch_register_reggroup_p (gdbarch, regnum, group)) | |
214 | continue; | |
10f59415 | 215 | |
21e1c91e TT |
216 | /* If the register name is empty, it is undefined for this |
217 | processor, so don't display anything. */ | |
218 | name = gdbarch_register_name (gdbarch, regnum); | |
219 | if (name == 0 || *name == '\0') | |
220 | continue; | |
10f59415 | 221 | |
80df3337 | 222 | data_item_win = &m_regs_content[pos]; |
21e1c91e TT |
223 | if (data_item_win) |
224 | { | |
225 | if (!refresh_values_only) | |
226 | { | |
227 | data_item_win->item_no = regnum; | |
228 | data_item_win->name = name; | |
229 | data_item_win->highlight = false; | |
230 | } | |
231 | tui_get_register (frame, data_item_win, regnum, 0); | |
232 | } | |
233 | pos++; | |
234 | } | |
10f59415 SC |
235 | } |
236 | ||
18ab23af | 237 | /* See tui-regs.h. */ |
517e9505 | 238 | |
c906108c | 239 | void |
517e9505 | 240 | tui_data_window::display_registers_from (int start_element_no) |
c906108c | 241 | { |
0670413d TT |
242 | int j, item_win_width, cur_y; |
243 | ||
244 | int max_len = 0; | |
80df3337 | 245 | for (auto &&data_item_win : m_regs_content) |
c906108c | 246 | { |
0670413d TT |
247 | const char *p; |
248 | int len; | |
10f59415 | 249 | |
0670413d TT |
250 | len = 0; |
251 | p = data_item_win.content.get (); | |
252 | if (p != 0) | |
253 | len = strlen (p); | |
254 | ||
255 | if (len > max_len) | |
256 | max_len = len; | |
257 | } | |
258 | item_win_width = max_len + 1; | |
259 | int i = start_element_no; | |
260 | ||
80df3337 TT |
261 | m_regs_column_count = (width - 2) / item_win_width; |
262 | if (m_regs_column_count == 0) | |
263 | m_regs_column_count = 1; | |
264 | item_win_width = (width - 2) / m_regs_column_count; | |
0670413d TT |
265 | |
266 | /* Now create each data "sub" window, and write the display into | |
267 | it. */ | |
268 | cur_y = 1; | |
80df3337 | 269 | while (i < m_regs_content.size () |
0670413d TT |
270 | && cur_y <= viewport_height) |
271 | { | |
272 | for (j = 0; | |
80df3337 | 273 | j < m_regs_column_count && i < m_regs_content.size (); |
0670413d | 274 | j++) |
c906108c | 275 | { |
0670413d | 276 | /* Create the window if necessary. */ |
80df3337 TT |
277 | m_regs_content[i].resize (1, item_win_width, |
278 | (item_win_width * j) + 1, cur_y); | |
0670413d | 279 | i++; /* Next register. */ |
c906108c | 280 | } |
0670413d | 281 | cur_y++; /* Next row. */ |
c906108c | 282 | } |
55fb0713 | 283 | } |
c906108c | 284 | |
18ab23af | 285 | /* See tui-regs.h. */ |
c906108c | 286 | |
aca2dd16 TT |
287 | void |
288 | tui_data_window::display_reg_element_at_line (int start_element_no, | |
289 | int start_line_no) | |
c906108c | 290 | { |
0670413d | 291 | int element_no = start_element_no; |
c906108c | 292 | |
0670413d TT |
293 | if (start_element_no != 0 && start_line_no != 0) |
294 | { | |
295 | int last_line_no, first_line_on_last_page; | |
296 | ||
297 | last_line_no = last_regs_line_no (); | |
298 | first_line_on_last_page = last_line_no - (height - 2); | |
299 | if (first_line_on_last_page < 0) | |
300 | first_line_on_last_page = 0; | |
301 | ||
302 | /* If the element_no causes us to scroll past the end of the | |
303 | registers, adjust what element to really start the | |
304 | display at. */ | |
305 | if (start_line_no > first_line_on_last_page) | |
306 | element_no = first_reg_element_no_inline (first_line_on_last_page); | |
c906108c | 307 | } |
0670413d | 308 | display_registers_from (element_no); |
6ba8e26f | 309 | } |
c906108c | 310 | |
18ab23af | 311 | /* See tui-regs.h. */ |
c906108c | 312 | |
c906108c | 313 | int |
517e9505 | 314 | tui_data_window::display_registers_from_line (int line_no) |
c906108c | 315 | { |
0670413d TT |
316 | int element_no; |
317 | ||
318 | if (line_no < 0) | |
319 | line_no = 0; | |
320 | else | |
321 | { | |
322 | /* Make sure that we don't display off the end of the | |
323 | registers. */ | |
324 | if (line_no >= last_regs_line_no ()) | |
80cb6c27 | 325 | { |
80df3337 | 326 | line_no = line_from_reg_element_no (m_regs_content.size () - 1); |
0670413d TT |
327 | if (line_no < 0) |
328 | line_no = 0; | |
c906108c | 329 | } |
c906108c SS |
330 | } |
331 | ||
0670413d | 332 | element_no = first_reg_element_no_inline (line_no); |
80df3337 | 333 | if (element_no < m_regs_content.size ()) |
0670413d TT |
334 | display_reg_element_at_line (element_no, line_no); |
335 | else | |
336 | line_no = (-1); | |
337 | ||
338 | return line_no; | |
55fb0713 | 339 | } |
c906108c SS |
340 | |
341 | ||
18ab23af TT |
342 | /* Answer the index first element displayed. If none are displayed, |
343 | then return (-1). */ | |
344 | int | |
345 | tui_data_window::first_data_item_displayed () | |
346 | { | |
80df3337 | 347 | for (int i = 0; i < m_regs_content.size (); i++) |
18ab23af TT |
348 | { |
349 | struct tui_gen_win_info *data_item_win; | |
350 | ||
80df3337 | 351 | data_item_win = &m_regs_content[i]; |
2d83e710 | 352 | if (data_item_win->is_visible ()) |
18ab23af TT |
353 | return i; |
354 | } | |
355 | ||
356 | return -1; | |
357 | } | |
358 | ||
359 | /* See tui-regs.h. */ | |
360 | ||
361 | void | |
362 | tui_data_window::delete_data_content_windows () | |
363 | { | |
80df3337 | 364 | for (auto &&win : m_regs_content) |
7523da63 | 365 | win.handle.reset (nullptr); |
18ab23af TT |
366 | } |
367 | ||
368 | ||
369 | void | |
370 | tui_data_window::erase_data_content (const char *prompt) | |
371 | { | |
7523da63 | 372 | werase (handle.get ()); |
b4ef5aeb | 373 | check_and_display_highlight_if_needed (); |
18ab23af TT |
374 | if (prompt != NULL) |
375 | { | |
376 | int half_width = (width - 2) / 2; | |
377 | int x_pos; | |
378 | ||
379 | if (strlen (prompt) >= half_width) | |
380 | x_pos = 1; | |
381 | else | |
382 | x_pos = half_width - strlen (prompt); | |
7523da63 | 383 | mvwaddstr (handle.get (), (height / 2), x_pos, (char *) prompt); |
18ab23af | 384 | } |
7523da63 | 385 | wrefresh (handle.get ()); |
18ab23af TT |
386 | } |
387 | ||
388 | /* See tui-regs.h. */ | |
389 | ||
390 | void | |
18bb55c7 | 391 | tui_data_window::rerender () |
18ab23af | 392 | { |
80df3337 | 393 | if (m_regs_content.empty ()) |
1f6d2f10 | 394 | erase_data_content (_("[ Register Values Unavailable ]")); |
18ab23af TT |
395 | else |
396 | { | |
397 | erase_data_content (NULL); | |
398 | delete_data_content_windows (); | |
18ab23af TT |
399 | display_registers_from (0); |
400 | } | |
401 | } | |
402 | ||
403 | ||
18ab23af TT |
404 | /* Scroll the data window vertically forward or backward. */ |
405 | void | |
406 | tui_data_window::do_scroll_vertical (int num_to_scroll) | |
407 | { | |
408 | int first_element_no; | |
409 | int first_line = (-1); | |
410 | ||
411 | first_element_no = first_data_item_displayed (); | |
80df3337 | 412 | if (first_element_no < m_regs_content.size ()) |
18ab23af TT |
413 | first_line = line_from_reg_element_no (first_element_no); |
414 | else | |
415 | { /* Calculate the first line from the element number which is in | |
416 | the general data content. */ | |
417 | } | |
418 | ||
419 | if (first_line >= 0) | |
420 | { | |
421 | first_line += num_to_scroll; | |
422 | erase_data_content (NULL); | |
423 | delete_data_content_windows (); | |
424 | display_registers_from_line (first_line); | |
425 | } | |
426 | } | |
427 | ||
428 | /* See tui-regs.h. */ | |
429 | ||
18ab23af TT |
430 | void |
431 | tui_data_window::refresh_window () | |
432 | { | |
433 | tui_gen_win_info::refresh_window (); | |
80df3337 | 434 | for (auto &&win : m_regs_content) |
fa4dc567 | 435 | win.refresh_window (); |
18ab23af TT |
436 | } |
437 | ||
55fb0713 AC |
438 | /* This function check all displayed registers for changes in values, |
439 | given a particular frame. If the values have changed, they are | |
440 | updated with the new value and highlighted. */ | |
c906108c | 441 | void |
63356bfd | 442 | tui_data_window::check_register_values (struct frame_info *frame) |
c906108c | 443 | { |
80df3337 TT |
444 | if (m_regs_content.empty ()) |
445 | show_registers (m_current_group); | |
63356bfd | 446 | else |
c906108c | 447 | { |
80df3337 | 448 | for (auto &&data_item_win : m_regs_content) |
c906108c | 449 | { |
63356bfd | 450 | int was_hilighted; |
c906108c | 451 | |
fa4dc567 | 452 | was_hilighted = data_item_win.highlight; |
10f59415 | 453 | |
fa4dc567 TT |
454 | tui_get_register (frame, &data_item_win, |
455 | data_item_win.item_no, | |
456 | &data_item_win.highlight); | |
10f59415 | 457 | |
fa4dc567 | 458 | if (data_item_win.highlight || was_hilighted) |
cdaa6eb4 | 459 | data_item_win.rerender (); |
c906108c SS |
460 | } |
461 | } | |
55fb0713 | 462 | } |
c906108c | 463 | |
1cc6d956 MS |
464 | /* Display a register in a window. If hilite is TRUE, then the value |
465 | will be displayed in reverse video. */ | |
cdaa6eb4 TT |
466 | void |
467 | tui_data_item_window::rerender () | |
10f59415 | 468 | { |
cdaa6eb4 TT |
469 | int i; |
470 | ||
7523da63 | 471 | scrollok (handle.get (), FALSE); |
cdaa6eb4 TT |
472 | if (highlight) |
473 | /* We ignore the return value, casting it to void in order to avoid | |
474 | a compiler warning. The warning itself was introduced by a patch | |
475 | to ncurses 5.7 dated 2009-08-29, changing this macro to expand | |
476 | to code that causes the compiler to generate an unused-value | |
477 | warning. */ | |
7523da63 | 478 | (void) wstandout (handle.get ()); |
10f59415 | 479 | |
7523da63 | 480 | wmove (handle.get (), 0, 0); |
cdaa6eb4 | 481 | for (i = 1; i < width; i++) |
7523da63 TT |
482 | waddch (handle.get (), ' '); |
483 | wmove (handle.get (), 0, 0); | |
cdaa6eb4 | 484 | if (content) |
7523da63 | 485 | waddstr (handle.get (), content.get ()); |
cdaa6eb4 TT |
486 | |
487 | if (highlight) | |
488 | /* We ignore the return value, casting it to void in order to avoid | |
489 | a compiler warning. The warning itself was introduced by a patch | |
490 | to ncurses 5.7 dated 2009-08-29, changing this macro to expand | |
491 | to code that causes the compiler to generate an unused-value | |
492 | warning. */ | |
7523da63 | 493 | (void) wstandend (handle.get ()); |
cdaa6eb4 TT |
494 | refresh_window (); |
495 | } | |
496 | ||
497 | void | |
498 | tui_data_item_window::refresh_window () | |
499 | { | |
500 | if (handle != nullptr) | |
501 | { | |
502 | /* This seems to be needed because the data items are nested | |
503 | windows, which according to the ncurses man pages aren't well | |
504 | supported. */ | |
7523da63 TT |
505 | touchwin (handle.get ()); |
506 | wrefresh (handle.get ()); | |
10f59415 SC |
507 | } |
508 | } | |
509 | ||
51f0e40d AB |
510 | /* Helper for "tui reg next", wraps a call to REGGROUP_NEXT, but adds wrap |
511 | around behaviour. Returns the next register group, or NULL if the | |
512 | register window is not currently being displayed. */ | |
513 | ||
514 | static struct reggroup * | |
fe3eaf1c | 515 | tui_reg_next (struct reggroup *current_group, struct gdbarch *gdbarch) |
c906108c | 516 | { |
51f0e40d | 517 | struct reggroup *group = NULL; |
e17c207e | 518 | |
fe3eaf1c | 519 | if (current_group != NULL) |
10f59415 | 520 | { |
fe3eaf1c | 521 | group = reggroup_next (gdbarch, current_group); |
b75c69bb AB |
522 | if (group == NULL) |
523 | group = reggroup_next (gdbarch, NULL); | |
10f59415 | 524 | } |
51f0e40d | 525 | return group; |
10f59415 SC |
526 | } |
527 | ||
51f0e40d AB |
528 | /* Helper for "tui reg prev", wraps a call to REGGROUP_PREV, but adds wrap |
529 | around behaviour. Returns the previous register group, or NULL if the | |
530 | register window is not currently being displayed. */ | |
55b40027 | 531 | |
51f0e40d | 532 | static struct reggroup * |
fe3eaf1c | 533 | tui_reg_prev (struct reggroup *current_group, struct gdbarch *gdbarch) |
55b40027 | 534 | { |
51f0e40d | 535 | struct reggroup *group = NULL; |
55b40027 | 536 | |
fe3eaf1c | 537 | if (current_group != NULL) |
55b40027 | 538 | { |
fe3eaf1c | 539 | group = reggroup_prev (gdbarch, current_group); |
55b40027 AB |
540 | if (group == NULL) |
541 | group = reggroup_prev (gdbarch, NULL); | |
55b40027 | 542 | } |
51f0e40d | 543 | return group; |
55b40027 AB |
544 | } |
545 | ||
42cc14a7 TT |
546 | /* A helper function to display the register window in the appropriate |
547 | way. */ | |
548 | ||
549 | static void | |
550 | tui_reg_layout () | |
551 | { | |
552 | enum tui_layout_type cur_layout = tui_current_layout (); | |
553 | enum tui_layout_type new_layout; | |
554 | if (cur_layout == SRC_COMMAND || cur_layout == SRC_DATA_COMMAND) | |
555 | new_layout = SRC_DATA_COMMAND; | |
556 | else | |
557 | new_layout = DISASSEM_DATA_COMMAND; | |
558 | tui_set_layout (new_layout); | |
559 | } | |
560 | ||
51f0e40d AB |
561 | /* Implement the 'tui reg' command. Changes the register group displayed |
562 | in the tui register window. Displays the tui register window if it is | |
563 | not already on display. */ | |
c906108c | 564 | |
10f59415 | 565 | static void |
e2d8ae16 | 566 | tui_reg_command (const char *args, int from_tty) |
10f59415 | 567 | { |
51f0e40d | 568 | struct gdbarch *gdbarch = get_current_arch (); |
c906108c | 569 | |
51f0e40d AB |
570 | if (args != NULL) |
571 | { | |
572 | struct reggroup *group, *match = NULL; | |
573 | size_t len = strlen (args); | |
574 | ||
575 | /* Make sure the curses mode is enabled. */ | |
576 | tui_enable (); | |
577 | ||
578 | /* Make sure the register window is visible. If not, select an | |
579 | appropriate layout. We need to do this before trying to run the | |
580 | 'next' or 'prev' commands. */ | |
2d83e710 | 581 | if (TUI_DATA_WIN == NULL || !TUI_DATA_WIN->is_visible ()) |
0379b883 | 582 | tui_reg_layout (); |
51f0e40d | 583 | |
89df7f90 | 584 | struct reggroup *current_group = TUI_DATA_WIN->get_current_group (); |
51f0e40d | 585 | if (strncmp (args, "next", len) == 0) |
fe3eaf1c | 586 | match = tui_reg_next (current_group, gdbarch); |
51f0e40d | 587 | else if (strncmp (args, "prev", len) == 0) |
fe3eaf1c | 588 | match = tui_reg_prev (current_group, gdbarch); |
51f0e40d AB |
589 | |
590 | /* This loop matches on the initial part of a register group | |
591 | name. If this initial part in ARGS matches only one register | |
592 | group then the switch is made. */ | |
593 | for (group = reggroup_next (gdbarch, NULL); | |
594 | group != NULL; | |
595 | group = reggroup_next (gdbarch, group)) | |
596 | { | |
597 | if (strncmp (reggroup_name (group), args, len) == 0) | |
598 | { | |
599 | if (match != NULL) | |
600 | error (_("ambiguous register group name '%s'"), args); | |
601 | match = group; | |
602 | } | |
603 | } | |
604 | ||
605 | if (match == NULL) | |
606 | error (_("unknown register group '%s'"), args); | |
607 | ||
ca02d7c8 | 608 | TUI_DATA_WIN->show_registers (match); |
51f0e40d AB |
609 | } |
610 | else | |
611 | { | |
612 | struct reggroup *group; | |
613 | int first; | |
614 | ||
615 | printf_unfiltered (_("\"tui reg\" must be followed by the name of " | |
616 | "either a register group,\nor one of 'next' " | |
617 | "or 'prev'. Known register groups are:\n")); | |
618 | ||
619 | for (first = 1, group = reggroup_next (gdbarch, NULL); | |
620 | group != NULL; | |
621 | first = 0, group = reggroup_next (gdbarch, group)) | |
622 | { | |
623 | if (!first) | |
624 | printf_unfiltered (", "); | |
625 | printf_unfiltered ("%s", reggroup_name (group)); | |
626 | } | |
627 | ||
628 | printf_unfiltered ("\n"); | |
629 | } | |
10f59415 SC |
630 | } |
631 | ||
51f0e40d AB |
632 | /* Complete names of register groups, and add the special "prev" and "next" |
633 | names. */ | |
c906108c | 634 | |
eb3ff9a5 | 635 | static void |
51f0e40d | 636 | tui_reggroup_completer (struct cmd_list_element *ignore, |
eb3ff9a5 | 637 | completion_tracker &tracker, |
51f0e40d | 638 | const char *text, const char *word) |
10f59415 | 639 | { |
51f0e40d AB |
640 | static const char *extra[] = { "next", "prev", NULL }; |
641 | size_t len = strlen (word); | |
642 | const char **tmp; | |
643 | ||
eb3ff9a5 | 644 | reggroup_completer (ignore, tracker, text, word); |
51f0e40d | 645 | |
eb3ff9a5 | 646 | /* XXXX use complete_on_enum instead? */ |
51f0e40d AB |
647 | for (tmp = extra; *tmp != NULL; ++tmp) |
648 | { | |
649 | if (strncmp (word, *tmp, len) == 0) | |
b02f78f9 | 650 | tracker.add_completion (make_unique_xstrdup (*tmp)); |
51f0e40d | 651 | } |
10f59415 | 652 | } |
c906108c | 653 | |
18ab23af TT |
654 | void |
655 | _initialize_tui_regs (void) | |
656 | { | |
657 | struct cmd_list_element **tuicmd, *cmd; | |
658 | ||
659 | tuicmd = tui_get_cmd_list (); | |
660 | ||
661 | cmd = add_cmd ("reg", class_tui, tui_reg_command, _("\ | |
662 | TUI command to control the register window."), tuicmd); | |
663 | set_cmd_completer (cmd, tui_reggroup_completer); | |
664 | } |