4cfcaf218c
with the lines macro defined in term.h on AiX. * tui/tui-regs.c: %s/label_width/tui_label_width/g, to avoid a collision with the label_width macro defined in term.h on AiX.
990 lines
29 KiB
C
990 lines
29 KiB
C
/* TUI display registers in window.
|
|
|
|
Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software
|
|
Foundation, Inc.
|
|
|
|
Contributed by Hewlett-Packard Company.
|
|
|
|
This file is part of GDB.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
#include "defs.h"
|
|
#include "tui/tui.h"
|
|
#include "tui/tui-data.h"
|
|
#include "symtab.h"
|
|
#include "gdbtypes.h"
|
|
#include "gdbcmd.h"
|
|
#include "frame.h"
|
|
#include "regcache.h"
|
|
#include "inferior.h"
|
|
#include "target.h"
|
|
#include "gdb_string.h"
|
|
#include "tui/tui-layout.h"
|
|
#include "tui/tui-win.h"
|
|
#include "tui/tui-windata.h"
|
|
#include "tui/tui-wingeneral.h"
|
|
#include "tui/tui-file.h"
|
|
|
|
#include "gdb_curses.h"
|
|
|
|
/*****************************************
|
|
** LOCAL DEFINITIONS **
|
|
******************************************/
|
|
#define DOUBLE_FLOAT_LABEL_WIDTH 6
|
|
#define DOUBLE_FLOAT_LABEL_FMT "%6.6s: "
|
|
#define DOUBLE_FLOAT_VALUE_WIDTH 30 /*min of 16 but may be in sci notation */
|
|
|
|
#define SINGLE_FLOAT_LABEL_WIDTH 6
|
|
#define SINGLE_FLOAT_LABEL_FMT "%6.6s: "
|
|
#define SINGLE_FLOAT_VALUE_WIDTH 25 /* min of 8 but may be in sci notation */
|
|
|
|
#define SINGLE_LABEL_WIDTH 16
|
|
#define SINGLE_LABEL_FMT "%10.10s: "
|
|
#define SINGLE_VALUE_WIDTH 20 /* minimum of 8 but may be in sci notation */
|
|
|
|
/* In the code HP gave Cygnus, this was actually a function call to a
|
|
PA-specific function, which was supposed to determine whether the
|
|
target was a 64-bit or 32-bit processor. However, the 64-bit
|
|
support wasn't complete, so we didn't merge that in, so we leave
|
|
this here as a stub. */
|
|
#define IS_64BIT 0
|
|
|
|
/*****************************************
|
|
** STATIC DATA **
|
|
******************************************/
|
|
|
|
|
|
/*****************************************
|
|
** STATIC LOCAL FUNCTIONS FORWARD DECLS **
|
|
******************************************/
|
|
static enum tui_status tui_set_regs_content
|
|
(int, int, struct frame_info *, enum tui_register_display_type, int);
|
|
static const char *tui_register_name (int);
|
|
static enum tui_status tui_get_register_raw_value (int, char *, struct frame_info *);
|
|
static void tui_set_register_element
|
|
(int, struct frame_info *, struct tui_data_element *, int);
|
|
static void tui_display_register (int, struct tui_gen_win_info *, enum precision_type);
|
|
static void tui_register_format
|
|
(char *, int, int, struct tui_data_element *, enum precision_type);
|
|
static enum tui_status tui_set_general_regs_content (int);
|
|
static enum tui_status tui_set_special_regs_content (int);
|
|
static enum tui_status tui_set_general_and_special_regs_content (int);
|
|
static enum tui_status tui_set_float_regs_content (enum tui_register_display_type, int);
|
|
static int tui_reg_value_has_changed
|
|
(struct tui_data_element *, struct frame_info *, char *);
|
|
static void tui_show_float_command (char *, int);
|
|
static void tui_show_general_command (char *, int);
|
|
static void tui_show_special_command (char *, int);
|
|
static void tui_v_show_registers_command_support (enum tui_register_display_type);
|
|
static void _tui_toggle_float_regs_command (char *, int);
|
|
static void tui_scroll_regs_forward_command (char *, int);
|
|
static void tui_scroll_regs_backward_command (char *, int);
|
|
|
|
|
|
|
|
/*****************************************
|
|
** PUBLIC FUNCTIONS **
|
|
******************************************/
|
|
|
|
/* Answer the number of the last line in the regs display. If there
|
|
are no registers (-1) is returned. */
|
|
int
|
|
tui_last_regs_line_no (void)
|
|
{
|
|
int num_lines = (-1);
|
|
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content_count > 0)
|
|
{
|
|
num_lines = (TUI_DATA_WIN->detail.data_display_info.regs_content_count /
|
|
TUI_DATA_WIN->detail.data_display_info.regs_column_count);
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content_count %
|
|
TUI_DATA_WIN->detail.data_display_info.regs_column_count)
|
|
num_lines++;
|
|
}
|
|
return num_lines;
|
|
}
|
|
|
|
|
|
/* Answer the line number that the register element at element_no is
|
|
on. If element_no is greater than the number of register elements
|
|
there are, -1 is returned. */
|
|
int
|
|
tui_line_from_reg_element_no (int element_no)
|
|
{
|
|
if (element_no < TUI_DATA_WIN->detail.data_display_info.regs_content_count)
|
|
{
|
|
int i, line = (-1);
|
|
|
|
i = 1;
|
|
while (line == (-1))
|
|
{
|
|
if (element_no <
|
|
(TUI_DATA_WIN->detail.data_display_info.regs_column_count * i))
|
|
line = i - 1;
|
|
else
|
|
i++;
|
|
}
|
|
|
|
return line;
|
|
}
|
|
else
|
|
return (-1);
|
|
}
|
|
|
|
|
|
/* Answer the index of the first element in line_no. If line_no is past
|
|
the register area (-1) is returned. */
|
|
int
|
|
tui_first_reg_element_no_inline (int line_no)
|
|
{
|
|
if ((line_no * TUI_DATA_WIN->detail.data_display_info.regs_column_count)
|
|
<= TUI_DATA_WIN->detail.data_display_info.regs_content_count)
|
|
return ((line_no + 1) *
|
|
TUI_DATA_WIN->detail.data_display_info.regs_column_count) -
|
|
TUI_DATA_WIN->detail.data_display_info.regs_column_count;
|
|
else
|
|
return (-1);
|
|
}
|
|
|
|
|
|
/* Answer the index of the last element in line_no. If line_no is
|
|
past the register area (-1) is returned. */
|
|
int
|
|
tui_last_reg_element_no_in_line (int line_no)
|
|
{
|
|
if ((line_no * TUI_DATA_WIN->detail.data_display_info.regs_column_count) <=
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count)
|
|
return ((line_no + 1) *
|
|
TUI_DATA_WIN->detail.data_display_info.regs_column_count) - 1;
|
|
else
|
|
return (-1);
|
|
}
|
|
|
|
|
|
/* Calculate the number of columns that should be used to display the
|
|
registers. */
|
|
int
|
|
tui_calculate_regs_column_count (enum tui_register_display_type dpy_type)
|
|
{
|
|
int col_count, col_width;
|
|
|
|
if (IS_64BIT || dpy_type == TUI_DFLOAT_REGS)
|
|
col_width = DOUBLE_FLOAT_VALUE_WIDTH + DOUBLE_FLOAT_LABEL_WIDTH;
|
|
else
|
|
{
|
|
if (dpy_type == TUI_SFLOAT_REGS)
|
|
col_width = SINGLE_FLOAT_VALUE_WIDTH + SINGLE_FLOAT_LABEL_WIDTH;
|
|
else
|
|
col_width = SINGLE_VALUE_WIDTH + SINGLE_LABEL_WIDTH;
|
|
}
|
|
col_count = (TUI_DATA_WIN->generic.width - 2) / col_width;
|
|
|
|
return col_count;
|
|
}
|
|
|
|
|
|
/* Show the registers int the data window as indicated by dpy_type. If
|
|
there is any other registers being displayed, then they are
|
|
cleared. What registers are displayed is dependent upon dpy_type. */
|
|
void
|
|
tui_show_registers (enum tui_register_display_type dpy_type)
|
|
{
|
|
enum tui_status ret = TUI_FAILURE;
|
|
int refresh_values_only = FALSE;
|
|
|
|
/* Say that registers should be displayed, even if there is a problem */
|
|
TUI_DATA_WIN->detail.data_display_info.display_regs = TRUE;
|
|
|
|
if (target_has_registers)
|
|
{
|
|
refresh_values_only =
|
|
(dpy_type == TUI_DATA_WIN->detail.data_display_info.regs_display_type);
|
|
switch (dpy_type)
|
|
{
|
|
case TUI_GENERAL_REGS:
|
|
ret = tui_set_general_regs_content (refresh_values_only);
|
|
break;
|
|
case TUI_SFLOAT_REGS:
|
|
case TUI_DFLOAT_REGS:
|
|
ret = tui_set_float_regs_content (dpy_type, refresh_values_only);
|
|
break;
|
|
|
|
/* could ifdef out */
|
|
|
|
case TUI_SPECIAL_REGS:
|
|
ret = tui_set_special_regs_content (refresh_values_only);
|
|
break;
|
|
case TUI_GENERAL_AND_SPECIAL_REGS:
|
|
ret = tui_set_general_and_special_regs_content (refresh_values_only);
|
|
break;
|
|
|
|
/* end of potential if def */
|
|
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
if (ret == TUI_FAILURE)
|
|
{
|
|
TUI_DATA_WIN->detail.data_display_info.regs_display_type = TUI_UNDEFINED_REGS;
|
|
tui_erase_data_content (NO_REGS_STRING);
|
|
}
|
|
else
|
|
{
|
|
int i;
|
|
|
|
/* Clear all notation of changed values */
|
|
for (i = 0; (i < TUI_DATA_WIN->detail.data_display_info.regs_content_count); i++)
|
|
{
|
|
struct tui_gen_win_info * data_item_win;
|
|
|
|
data_item_win = &TUI_DATA_WIN->detail.data_display_info.
|
|
regs_content[i]->which_element.data_window;
|
|
(&((struct tui_win_element *)
|
|
data_item_win->content[0])->which_element.data)->highlight = FALSE;
|
|
}
|
|
TUI_DATA_WIN->detail.data_display_info.regs_display_type = dpy_type;
|
|
tui_display_all_data ();
|
|
}
|
|
(tui_layout_def ())->regs_display_type = dpy_type;
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
/* Function to display the registers in the content from
|
|
'start_element_no' until the end of the register content or the end
|
|
of the display height. No checking for displaying past the end of
|
|
the registers is done here. */
|
|
void
|
|
tui_display_registers_from (int start_element_no)
|
|
{
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content != (tui_win_content) NULL &&
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count > 0)
|
|
{
|
|
int i = start_element_no;
|
|
int j, value_chars_wide, item_win_width, cur_y;
|
|
enum precision_type precision;
|
|
|
|
/* Do not rename the following variable into "label_width".
|
|
Unfortunately, term.h on AiX systems defines a macro with
|
|
the same name, which causes a build failure if we use the
|
|
same name for this variable. */
|
|
int tui_label_width;
|
|
|
|
precision = (TUI_DATA_WIN->detail.data_display_info.regs_display_type
|
|
== TUI_DFLOAT_REGS) ?
|
|
double_precision : unspecified_precision;
|
|
if (IS_64BIT ||
|
|
TUI_DATA_WIN->detail.data_display_info.regs_display_type == TUI_DFLOAT_REGS)
|
|
{
|
|
value_chars_wide = DOUBLE_FLOAT_VALUE_WIDTH;
|
|
tui_label_width = DOUBLE_FLOAT_LABEL_WIDTH;
|
|
}
|
|
else
|
|
{
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_display_type ==
|
|
TUI_SFLOAT_REGS)
|
|
{
|
|
value_chars_wide = SINGLE_FLOAT_VALUE_WIDTH;
|
|
tui_label_width = SINGLE_FLOAT_LABEL_WIDTH;
|
|
}
|
|
else
|
|
{
|
|
value_chars_wide = SINGLE_VALUE_WIDTH;
|
|
tui_label_width = SINGLE_LABEL_WIDTH;
|
|
}
|
|
}
|
|
item_win_width = value_chars_wide + tui_label_width;
|
|
/*
|
|
** Now create each data "sub" window, and write the display into it.
|
|
*/
|
|
cur_y = 1;
|
|
while (i < TUI_DATA_WIN->detail.data_display_info.regs_content_count &&
|
|
cur_y <= TUI_DATA_WIN->generic.viewport_height)
|
|
{
|
|
for (j = 0;
|
|
(j < TUI_DATA_WIN->detail.data_display_info.regs_column_count &&
|
|
i < TUI_DATA_WIN->detail.data_display_info.regs_content_count); j++)
|
|
{
|
|
struct tui_gen_win_info * data_item_win;
|
|
struct tui_data_element * data_element_ptr;
|
|
|
|
/* create the window if necessary */
|
|
data_item_win = &TUI_DATA_WIN->detail.data_display_info.
|
|
regs_content[i]->which_element.data_window;
|
|
data_element_ptr = &((struct tui_win_element *)
|
|
data_item_win->content[0])->which_element.data;
|
|
if (data_item_win->handle == (WINDOW *) NULL)
|
|
{
|
|
data_item_win->height = 1;
|
|
data_item_win->width = (precision == double_precision) ?
|
|
item_win_width + 2 : item_win_width + 1;
|
|
data_item_win->origin.x = (item_win_width * j) + 1;
|
|
data_item_win->origin.y = cur_y;
|
|
tui_make_window (data_item_win, DONT_BOX_WINDOW);
|
|
scrollok (data_item_win->handle, FALSE);
|
|
}
|
|
touchwin (data_item_win->handle);
|
|
|
|
/*
|
|
** Get the printable representation of the register
|
|
** and display it
|
|
*/
|
|
tui_display_register (
|
|
data_element_ptr->item_no, data_item_win, precision);
|
|
i++; /* next register */
|
|
}
|
|
cur_y++; /* next row; */
|
|
}
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
/* Function to display the registers in the content from
|
|
'start_element_no' on 'start_line_no' until the end of the register
|
|
content or the end of the display height. This function checks
|
|
that we won't display off the end of the register display. */
|
|
void
|
|
tui_display_reg_element_at_line (int start_element_no, int start_line_no)
|
|
{
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content != (tui_win_content) NULL &&
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count > 0)
|
|
{
|
|
int element_no = start_element_no;
|
|
|
|
if (start_element_no != 0 && start_line_no != 0)
|
|
{
|
|
int last_line_no, first_line_on_last_page;
|
|
|
|
last_line_no = tui_last_regs_line_no ();
|
|
first_line_on_last_page = last_line_no - (TUI_DATA_WIN->generic.height - 2);
|
|
if (first_line_on_last_page < 0)
|
|
first_line_on_last_page = 0;
|
|
/*
|
|
** If there is no other data displayed except registers,
|
|
** and the element_no causes us to scroll past the end of the
|
|
** registers, adjust what element to really start the display at.
|
|
*/
|
|
if (TUI_DATA_WIN->detail.data_display_info.data_content_count <= 0 &&
|
|
start_line_no > first_line_on_last_page)
|
|
element_no = tui_first_reg_element_no_inline (first_line_on_last_page);
|
|
}
|
|
tui_display_registers_from (element_no);
|
|
}
|
|
}
|
|
|
|
|
|
|
|
/* Function to display the registers starting at line line_no in the
|
|
data window. Answers the line number that the display actually
|
|
started from. If nothing is displayed (-1) is returned. */
|
|
int
|
|
tui_display_registers_from_line (int line_no, int force_display)
|
|
{
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content_count > 0)
|
|
{
|
|
int line, element_no;
|
|
|
|
if (line_no < 0)
|
|
line = 0;
|
|
else if (force_display)
|
|
{ /*
|
|
** If we must display regs (force_display is true), then make
|
|
** sure that we don't display off the end of the registers.
|
|
*/
|
|
if (line_no >= tui_last_regs_line_no ())
|
|
{
|
|
if ((line = tui_line_from_reg_element_no (
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count - 1)) < 0)
|
|
line = 0;
|
|
}
|
|
else
|
|
line = line_no;
|
|
}
|
|
else
|
|
line = line_no;
|
|
|
|
element_no = tui_first_reg_element_no_inline (line);
|
|
if (element_no < TUI_DATA_WIN->detail.data_display_info.regs_content_count)
|
|
tui_display_reg_element_at_line (element_no, line);
|
|
else
|
|
line = (-1);
|
|
|
|
return line;
|
|
}
|
|
|
|
return (-1); /* nothing was displayed */
|
|
}
|
|
|
|
|
|
/* This function check all displayed registers for changes in values,
|
|
given a particular frame. If the values have changed, they are
|
|
updated with the new value and highlighted. */
|
|
void
|
|
tui_check_register_values (struct frame_info *frame)
|
|
{
|
|
if (TUI_DATA_WIN != NULL && TUI_DATA_WIN->generic.is_visible)
|
|
{
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content_count <= 0 &&
|
|
TUI_DATA_WIN->detail.data_display_info.display_regs)
|
|
tui_show_registers ((tui_layout_def ())->regs_display_type);
|
|
else
|
|
{
|
|
int i, j;
|
|
char raw_buf[MAX_REGISTER_SIZE];
|
|
|
|
for (i = 0;
|
|
(i < TUI_DATA_WIN->detail.data_display_info.regs_content_count); i++)
|
|
{
|
|
struct tui_data_element * data_element_ptr;
|
|
struct tui_gen_win_info * data_item_win_ptr;
|
|
int was_hilighted;
|
|
|
|
data_item_win_ptr = &TUI_DATA_WIN->detail.data_display_info.
|
|
regs_content[i]->which_element.data_window;
|
|
data_element_ptr = &((struct tui_win_element *)
|
|
data_item_win_ptr->content[0])->which_element.data;
|
|
was_hilighted = data_element_ptr->highlight;
|
|
data_element_ptr->highlight =
|
|
tui_reg_value_has_changed (data_element_ptr, frame, &raw_buf[0]);
|
|
if (data_element_ptr->highlight)
|
|
{
|
|
int size;
|
|
|
|
size = DEPRECATED_REGISTER_RAW_SIZE (data_element_ptr->item_no);
|
|
for (j = 0; j < size; j++)
|
|
((char *) data_element_ptr->value)[j] = raw_buf[j];
|
|
tui_display_register (
|
|
data_element_ptr->item_no,
|
|
data_item_win_ptr,
|
|
((TUI_DATA_WIN->detail.data_display_info.regs_display_type ==
|
|
TUI_DFLOAT_REGS) ?
|
|
double_precision : unspecified_precision));
|
|
}
|
|
else if (was_hilighted)
|
|
{
|
|
data_element_ptr->highlight = FALSE;
|
|
tui_display_register (
|
|
data_element_ptr->item_no,
|
|
data_item_win_ptr,
|
|
((TUI_DATA_WIN->detail.data_display_info.regs_display_type ==
|
|
TUI_DFLOAT_REGS) ?
|
|
double_precision : unspecified_precision));
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return;
|
|
}
|
|
|
|
|
|
/*
|
|
** tui_toggle_float_regs().
|
|
*/
|
|
void
|
|
tui_toggle_float_regs (void)
|
|
{
|
|
struct tui_layout_def * layout_def = tui_layout_def ();
|
|
|
|
if (layout_def->float_regs_display_type == TUI_SFLOAT_REGS)
|
|
layout_def->float_regs_display_type = TUI_DFLOAT_REGS;
|
|
else
|
|
layout_def->float_regs_display_type = TUI_SFLOAT_REGS;
|
|
|
|
if (TUI_DATA_WIN != NULL && TUI_DATA_WIN->generic.is_visible &&
|
|
(TUI_DATA_WIN->detail.data_display_info.regs_display_type == TUI_SFLOAT_REGS ||
|
|
TUI_DATA_WIN->detail.data_display_info.regs_display_type == TUI_DFLOAT_REGS))
|
|
tui_show_registers (layout_def->float_regs_display_type);
|
|
|
|
return;
|
|
} /* tui_toggle_float_regs */
|
|
|
|
|
|
void
|
|
_initialize_tui_regs (void)
|
|
{
|
|
if (xdb_commands)
|
|
{
|
|
add_com ("fr", class_tui, tui_show_float_command,
|
|
"Display only floating point registers\n");
|
|
add_com ("gr", class_tui, tui_show_general_command,
|
|
"Display only general registers\n");
|
|
add_com ("sr", class_tui, tui_show_special_command,
|
|
"Display only special registers\n");
|
|
add_com ("+r", class_tui, tui_scroll_regs_forward_command,
|
|
"Scroll the registers window forward\n");
|
|
add_com ("-r", class_tui, tui_scroll_regs_backward_command,
|
|
"Scroll the register window backward\n");
|
|
add_com ("tf", class_tui, _tui_toggle_float_regs_command,
|
|
"Toggle between single and double precision floating point registers.\n");
|
|
add_cmd (TUI_FLOAT_REGS_NAME_LOWER,
|
|
class_tui,
|
|
_tui_toggle_float_regs_command,
|
|
"Toggle between single and double precision floating point \
|
|
registers.\n",
|
|
&togglelist);
|
|
}
|
|
}
|
|
|
|
|
|
/*****************************************
|
|
** STATIC LOCAL FUNCTIONS **
|
|
******************************************/
|
|
|
|
|
|
/*
|
|
** tui_register_name().
|
|
** Return the register name.
|
|
*/
|
|
static const char *
|
|
tui_register_name (int reg_num)
|
|
{
|
|
return REGISTER_NAME (reg_num);
|
|
}
|
|
extern int pagination_enabled;
|
|
|
|
static void
|
|
tui_restore_gdbout (void *ui)
|
|
{
|
|
ui_file_delete (gdb_stdout);
|
|
gdb_stdout = (struct ui_file*) ui;
|
|
pagination_enabled = 1;
|
|
}
|
|
|
|
/*
|
|
** tui_register_format
|
|
** Function to format the register name and value into a buffer,
|
|
** suitable for printing or display
|
|
*/
|
|
static void
|
|
tui_register_format (char *buf, int buf_len, int reg_num,
|
|
struct tui_data_element * data_element,
|
|
enum precision_type precision)
|
|
{
|
|
struct ui_file *stream;
|
|
struct ui_file *old_stdout;
|
|
const char *name;
|
|
struct cleanup *cleanups;
|
|
char *p;
|
|
int pos;
|
|
|
|
name = REGISTER_NAME (reg_num);
|
|
if (name == 0)
|
|
{
|
|
strcpy (buf, "");
|
|
return;
|
|
}
|
|
|
|
pagination_enabled = 0;
|
|
old_stdout = gdb_stdout;
|
|
stream = tui_sfileopen (buf_len);
|
|
gdb_stdout = stream;
|
|
cleanups = make_cleanup (tui_restore_gdbout, (void*) old_stdout);
|
|
gdbarch_print_registers_info (current_gdbarch, stream, deprecated_selected_frame,
|
|
reg_num, 1);
|
|
|
|
/* Save formatted output in the buffer. */
|
|
p = tui_file_get_strbuf (stream);
|
|
pos = 0;
|
|
while (*p && *p == *name++ && buf_len)
|
|
{
|
|
*buf++ = *p++;
|
|
buf_len--;
|
|
pos++;
|
|
}
|
|
while (*p == ' ')
|
|
p++;
|
|
while (pos < 8 && buf_len)
|
|
{
|
|
*buf++ = ' ';
|
|
buf_len--;
|
|
pos++;
|
|
}
|
|
strncpy (buf, p, buf_len);
|
|
|
|
/* Remove the possible \n. */
|
|
p = strchr (buf, '\n');
|
|
if (p)
|
|
*p = 0;
|
|
|
|
do_cleanups (cleanups);
|
|
}
|
|
|
|
|
|
#define NUM_GENERAL_REGS 32
|
|
/* Set the content of the data window to consist of the general
|
|
registers. */
|
|
static enum tui_status
|
|
tui_set_general_regs_content (int refresh_values_only)
|
|
{
|
|
return (tui_set_regs_content (0,
|
|
NUM_GENERAL_REGS - 1,
|
|
deprecated_selected_frame,
|
|
TUI_GENERAL_REGS,
|
|
refresh_values_only));
|
|
|
|
}
|
|
|
|
|
|
#ifndef PCOQ_HEAD_REGNUM
|
|
#define START_SPECIAL_REGS 0
|
|
#else
|
|
#define START_SPECIAL_REGS PCOQ_HEAD_REGNUM
|
|
#endif
|
|
|
|
/* Set the content of the data window to consist of the special
|
|
registers. */
|
|
static enum tui_status
|
|
tui_set_special_regs_content (int refresh_values_only)
|
|
{
|
|
enum tui_status ret = TUI_FAILURE;
|
|
int end_reg_num;
|
|
|
|
end_reg_num = FP0_REGNUM - 1;
|
|
ret = tui_set_regs_content (START_SPECIAL_REGS,
|
|
end_reg_num,
|
|
deprecated_selected_frame,
|
|
TUI_SPECIAL_REGS,
|
|
refresh_values_only);
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
/* Set the content of the data window to consist of the special
|
|
registers. */
|
|
static enum tui_status
|
|
tui_set_general_and_special_regs_content (int refresh_values_only)
|
|
{
|
|
enum tui_status ret = TUI_FAILURE;
|
|
int end_reg_num = (-1);
|
|
|
|
end_reg_num = FP0_REGNUM - 1;
|
|
ret = tui_set_regs_content (
|
|
0, end_reg_num, deprecated_selected_frame, TUI_SPECIAL_REGS, refresh_values_only);
|
|
|
|
return ret;
|
|
}
|
|
|
|
/* Set the content of the data window to consist of the float
|
|
registers. */
|
|
static enum tui_status
|
|
tui_set_float_regs_content (enum tui_register_display_type dpy_type,
|
|
int refresh_values_only)
|
|
{
|
|
enum tui_status ret = TUI_FAILURE;
|
|
int start_reg_num;
|
|
|
|
start_reg_num = FP0_REGNUM;
|
|
ret = tui_set_regs_content (start_reg_num,
|
|
NUM_REGS - 1,
|
|
deprecated_selected_frame,
|
|
dpy_type,
|
|
refresh_values_only);
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
/* Answer TRUE if the register's value has changed, FALSE otherwise.
|
|
If TRUE, new_value is filled in with the new value. */
|
|
static int
|
|
tui_reg_value_has_changed (struct tui_data_element * data_element,
|
|
struct frame_info *frame, char *new_value)
|
|
{
|
|
int has_changed = FALSE;
|
|
|
|
if (data_element->item_no != UNDEFINED_ITEM &&
|
|
tui_register_name (data_element->item_no) != (char *) NULL)
|
|
{
|
|
char raw_buf[MAX_REGISTER_SIZE];
|
|
int i;
|
|
|
|
if (tui_get_register_raw_value (data_element->item_no, raw_buf, frame) == TUI_SUCCESS)
|
|
{
|
|
int size = DEPRECATED_REGISTER_RAW_SIZE (data_element->item_no);
|
|
|
|
for (i = 0; (i < size && !has_changed); i++)
|
|
has_changed = (((char *) data_element->value)[i] != raw_buf[i]);
|
|
if (has_changed && new_value != (char *) NULL)
|
|
{
|
|
for (i = 0; i < size; i++)
|
|
new_value[i] = raw_buf[i];
|
|
}
|
|
}
|
|
}
|
|
return has_changed;
|
|
}
|
|
|
|
|
|
|
|
/* Get the register raw value. The raw value is returned in reg_value. */
|
|
static enum tui_status
|
|
tui_get_register_raw_value (int reg_num, char *reg_value, struct frame_info *frame)
|
|
{
|
|
enum tui_status ret = TUI_FAILURE;
|
|
|
|
if (target_has_registers)
|
|
{
|
|
get_frame_register (frame, reg_num, reg_value);
|
|
/* NOTE: cagney/2003-03-13: This is bogus. It is refering to
|
|
the register cache and not the frame which could have pulled
|
|
the register value off the stack. */
|
|
if (register_cached (reg_num) >= 0)
|
|
ret = TUI_SUCCESS;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
|
|
|
|
/* Function to initialize a data element with the input and the
|
|
register value. */
|
|
static void
|
|
tui_set_register_element (int reg_num, struct frame_info *frame,
|
|
struct tui_data_element * data_element,
|
|
int refresh_value_only)
|
|
{
|
|
if (data_element != (struct tui_data_element *) NULL)
|
|
{
|
|
if (!refresh_value_only)
|
|
{
|
|
data_element->item_no = reg_num;
|
|
data_element->name = tui_register_name (reg_num);
|
|
data_element->highlight = FALSE;
|
|
}
|
|
if (data_element->value == NULL)
|
|
data_element->value = xmalloc (MAX_REGISTER_SIZE);
|
|
if (data_element->value != NULL)
|
|
tui_get_register_raw_value (reg_num, data_element->value, frame);
|
|
}
|
|
}
|
|
|
|
|
|
/* Set the content of the data window to consist of the registers
|
|
numbered from start_reg_num to end_reg_num. Note that if
|
|
refresh_values_only is TRUE, start_reg_num and end_reg_num are
|
|
ignored. */
|
|
static enum tui_status
|
|
tui_set_regs_content (int start_reg_num, int end_reg_num,
|
|
struct frame_info *frame,
|
|
enum tui_register_display_type dpy_type,
|
|
int refresh_values_only)
|
|
{
|
|
enum tui_status ret = TUI_FAILURE;
|
|
int num_regs = end_reg_num - start_reg_num + 1;
|
|
int allocated_here = FALSE;
|
|
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content_count > 0 &&
|
|
!refresh_values_only)
|
|
{
|
|
tui_free_data_content (TUI_DATA_WIN->detail.data_display_info.regs_content,
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count);
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count = 0;
|
|
}
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content_count <= 0)
|
|
{
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content =
|
|
tui_alloc_content (num_regs, DATA_WIN);
|
|
allocated_here = TRUE;
|
|
}
|
|
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_content != (tui_win_content) NULL)
|
|
{
|
|
int i;
|
|
|
|
if (!refresh_values_only || allocated_here)
|
|
{
|
|
TUI_DATA_WIN->generic.content = NULL;
|
|
TUI_DATA_WIN->generic.content_size = 0;
|
|
tui_add_content_elements (&TUI_DATA_WIN->generic, num_regs);
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content =
|
|
(tui_win_content) TUI_DATA_WIN->generic.content;
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count = num_regs;
|
|
}
|
|
/*
|
|
** Now set the register names and values
|
|
*/
|
|
for (i = start_reg_num; (i <= end_reg_num); i++)
|
|
{
|
|
struct tui_gen_win_info * data_item_win;
|
|
|
|
data_item_win = &TUI_DATA_WIN->detail.data_display_info.
|
|
regs_content[i - start_reg_num]->which_element.data_window;
|
|
tui_set_register_element (
|
|
i,
|
|
frame,
|
|
&((struct tui_win_element *) data_item_win->content[0])->which_element.data,
|
|
!allocated_here && refresh_values_only);
|
|
}
|
|
TUI_DATA_WIN->detail.data_display_info.regs_column_count =
|
|
tui_calculate_regs_column_count (dpy_type);
|
|
#ifdef LATER
|
|
if (TUI_DATA_WIN->detail.data_display_info.data_content_count > 0)
|
|
{
|
|
/* delete all the windows? */
|
|
/* realloc content equal to data_content_count + regs_content_count */
|
|
/* append TUI_DATA_WIN->detail.data_display_info.data_content to content */
|
|
}
|
|
#endif
|
|
TUI_DATA_WIN->generic.content_size =
|
|
TUI_DATA_WIN->detail.data_display_info.regs_content_count +
|
|
TUI_DATA_WIN->detail.data_display_info.data_content_count;
|
|
ret = TUI_SUCCESS;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
/* Function to display a register in a window. If hilite is TRUE,
|
|
than the value will be displayed in reverse video. */
|
|
static void
|
|
tui_display_register (int reg_num,
|
|
struct tui_gen_win_info * win_info, /* the data item window */
|
|
enum precision_type precision)
|
|
{
|
|
if (win_info->handle != (WINDOW *) NULL)
|
|
{
|
|
int i;
|
|
char buf[40];
|
|
int value_chars_wide;
|
|
struct tui_data_element * data_element_ptr = &((tui_win_content)
|
|
win_info->content)[0]->which_element.data;
|
|
|
|
/* Do not rename the following variable into "label_width".
|
|
Unfortunately, term.h on AiX systems defines a macro with
|
|
the same name, which causes a build failure if we use the
|
|
same name for this variable. */
|
|
int tui_label_width;
|
|
|
|
if (IS_64BIT ||
|
|
TUI_DATA_WIN->detail.data_display_info.regs_display_type == TUI_DFLOAT_REGS)
|
|
{
|
|
value_chars_wide = DOUBLE_FLOAT_VALUE_WIDTH;
|
|
tui_label_width = DOUBLE_FLOAT_LABEL_WIDTH;
|
|
}
|
|
else
|
|
{
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_display_type ==
|
|
TUI_SFLOAT_REGS)
|
|
{
|
|
value_chars_wide = SINGLE_FLOAT_VALUE_WIDTH;
|
|
tui_label_width = SINGLE_FLOAT_LABEL_WIDTH;
|
|
}
|
|
else
|
|
{
|
|
value_chars_wide = SINGLE_VALUE_WIDTH;
|
|
tui_label_width = SINGLE_LABEL_WIDTH;
|
|
}
|
|
}
|
|
|
|
buf[0] = (char) 0;
|
|
tui_register_format (buf,
|
|
value_chars_wide + tui_label_width,
|
|
reg_num,
|
|
data_element_ptr,
|
|
precision);
|
|
|
|
if (data_element_ptr->highlight)
|
|
wstandout (win_info->handle);
|
|
|
|
wmove (win_info->handle, 0, 0);
|
|
for (i = 1; i < win_info->width; i++)
|
|
waddch (win_info->handle, ' ');
|
|
wmove (win_info->handle, 0, 0);
|
|
waddstr (win_info->handle, buf);
|
|
|
|
if (data_element_ptr->highlight)
|
|
wstandend (win_info->handle);
|
|
tui_refresh_win (win_info);
|
|
}
|
|
}
|
|
|
|
|
|
static void
|
|
tui_v_show_registers_command_support (enum tui_register_display_type dpy_type)
|
|
{
|
|
|
|
if (TUI_DATA_WIN != NULL && TUI_DATA_WIN->generic.is_visible)
|
|
{ /* Data window already displayed, show the registers */
|
|
if (TUI_DATA_WIN->detail.data_display_info.regs_display_type != dpy_type)
|
|
tui_show_registers (dpy_type);
|
|
}
|
|
else
|
|
(tui_layout_def ())->regs_display_type = dpy_type;
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
static void
|
|
tui_show_float_command (char *arg, int from_tty)
|
|
{
|
|
if (TUI_DATA_WIN == NULL || !TUI_DATA_WIN->generic.is_visible ||
|
|
(TUI_DATA_WIN->detail.data_display_info.regs_display_type != TUI_SFLOAT_REGS &&
|
|
TUI_DATA_WIN->detail.data_display_info.regs_display_type != TUI_DFLOAT_REGS))
|
|
tui_v_show_registers_command_support ((tui_layout_def ())->float_regs_display_type);
|
|
}
|
|
|
|
|
|
static void
|
|
tui_show_general_command (char *arg, int from_tty)
|
|
{
|
|
tui_v_show_registers_command_support (TUI_GENERAL_REGS);
|
|
}
|
|
|
|
|
|
static void
|
|
tui_show_special_command (char *arg, int from_tty)
|
|
{
|
|
tui_v_show_registers_command_support (TUI_SPECIAL_REGS);
|
|
}
|
|
|
|
|
|
static void
|
|
_tui_toggle_float_regs_command (char *arg, int from_tty)
|
|
{
|
|
if (TUI_DATA_WIN != NULL && TUI_DATA_WIN->generic.is_visible)
|
|
tui_toggle_float_regs ();
|
|
else
|
|
{
|
|
struct tui_layout_def * layout_def = tui_layout_def ();
|
|
|
|
if (layout_def->float_regs_display_type == TUI_SFLOAT_REGS)
|
|
layout_def->float_regs_display_type = TUI_DFLOAT_REGS;
|
|
else
|
|
layout_def->float_regs_display_type = TUI_SFLOAT_REGS;
|
|
}
|
|
}
|
|
|
|
|
|
static void
|
|
tui_scroll_regs_forward_command (char *arg, int from_tty)
|
|
{
|
|
tui_scroll (FORWARD_SCROLL, TUI_DATA_WIN, 1);
|
|
}
|
|
|
|
|
|
static void
|
|
tui_scroll_regs_backward_command (char *arg, int from_tty)
|
|
{
|
|
tui_scroll (BACKWARD_SCROLL, TUI_DATA_WIN, 1);
|
|
}
|