binutils-gdb/gdb/tui/tuiStack.c

486 lines
12 KiB
C
Raw Normal View History

/* TUI display locator.
Copyright 1998, 1999, 2000, 2001 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 "symtab.h"
#include "breakpoint.h"
#include "frame.h"
#include "command.h"
#include "tui.h"
#include "tuiData.h"
#include "tuiStack.h"
#include "tuiGeneralWin.h"
#include "tuiSource.h"
#include "tuiSourceWin.h"
/*****************************************
** STATIC LOCAL FUNCTIONS FORWARD DECLS **
******************************************/
2000-05-28 03:12:42 +02:00
static char *_getFuncNameFromFrame (struct frame_info *);
static void _tuiUpdateLocation_command (char *, int);
/*****************************************
** PUBLIC FUNCTION **
******************************************/
/*
1999-07-07 22:19:36 +02:00
** tuiClearLocatorDisplay()
*/
void
tuiClearLocatorDisplay (void)
{
TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
int i;
if (locator->handle != (WINDOW *) NULL)
{
/* No need to werase, since writing a line of
* blanks which we do below, is equivalent.
1999-07-07 22:19:36 +02:00
*/
/* werase(locator->handle); */
wmove (locator->handle, 0, 0);
wstandout (locator->handle);
for (i = 0; i < locator->width; i++)
waddch (locator->handle, ' ');
wstandend (locator->handle);
tuiRefreshWin (locator);
wmove (locator->handle, 0, 0);
locator->contentInUse = FALSE;
}
return;
} /* tuiClearLocatorDisplay */
/*
1999-07-07 22:19:36 +02:00
** tuiShowLocatorContent()
*/
void
tuiShowLocatorContent (void)
{
char *string;
TuiGenWinInfoPtr locator;
locator = locatorWinInfoPtr ();
if (m_genWinPtrNotNull (locator) && locator->handle != (WINDOW *) NULL)
{
string = displayableWinContentAt (locator, 0);
if (string != (char *) NULL)
{
wmove (locator->handle, 0, 0);
wstandout (locator->handle);
waddstr (locator->handle, string);
wstandend (locator->handle);
tuiRefreshWin (locator);
wmove (locator->handle, 0, 0);
if (string != nullStr ())
tuiFree (string);
locator->contentInUse = TRUE;
}
}
return;
} /* tuiShowLocatorContent */
/*
1999-07-07 22:19:36 +02:00
** tuiSetLocatorInfo().
** Function to update the locator, with the provided arguments.
*/
void
tuiSetLocatorInfo (char *fname, char *procname, int lineNo,
Opaque addr, TuiLocatorElementPtr element)
{
#ifdef COMMENT
/* first free the old info */
if (element->fileName)
tuiFree (element->fileName);
if (element->procName)
tuiFree (element->procName);
if (fname == (char *) NULL)
element->fileName = fname;
else
element->fileName = tuiStrDup (fname);
if (procname == (char *) NULL)
element->procName = procname;
else
element->procName = tuiStrDup (procname);
#else
element->fileName[0] = (char) 0;
element->procName[0] = (char) 0;
strcat_to_buf (element->fileName, MAX_LOCATOR_ELEMENT_LEN, fname);
strcat_to_buf (element->procName, MAX_LOCATOR_ELEMENT_LEN, procname);
#endif
element->lineNo = lineNo;
element->addr = (Opaque) addr;
return;
} /* tuiSetLocatorInfo */
/*
1999-07-07 22:19:36 +02:00
** tuiUpdateLocatorFilename().
** Update only the filename portion of the locator.
*/
void
tuiUpdateLocatorFilename (char *fileName)
{
TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
if (locator->content[0] == (Opaque) NULL)
tuiSetLocatorContent ((struct frame_info *) NULL);
((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName[0] = (char) 0;
strcat_to_buf (((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName,
MAX_LOCATOR_ELEMENT_LEN,
fileName);
tuiShowLocatorContent ();
return;
} /* tuiUpdateLocatorFilename */
/*
1999-07-07 22:19:36 +02:00
** tui_vUpdateLocatorFilename().
** Update only the filename portion of the locator with args in a va_list.
*/
void
tui_vUpdateLocatorFilename (va_list args)
{
char *fileName;
fileName = va_arg (args, char *);
tuiUpdateLocatorFilename (fileName);
return;
} /* tui_vUpdateLocatorFilename */
/*
1999-07-07 22:19:36 +02:00
** tuiSwitchFilename().
** Update the filename portion of the locator. Clear the other info in locator.
** (elz)
*/
void
tuiSwitchFilename (char *fileName)
{
TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
if (locator->content[0] == (Opaque) NULL)
tuiSetLocatorContent ((struct frame_info *) NULL);
((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName[0] = (char) 0;
tuiSetLocatorInfo (fileName,
(char *) NULL,
0,
(Opaque) NULL,
&((TuiWinElementPtr) locator->content[0])->whichElement.locator);
tuiShowLocatorContent ();
return;
} /* tuiSwitchFilename */
/*
1999-07-07 22:19:36 +02:00
** tuiGetLocatorFilename().
** Get the filename portion of the locator.
** (elz)
*/
void
tuiGetLocatorFilename (TuiGenWinInfoPtr locator, char **filename)
{
/* the current filename could be non known, in which case the xmalloc would
allocate no memory, because the length would be 0 */
if (((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName)
{
int name_length =
strlen (((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName);
(*filename) = (char *) xmalloc (name_length + 1);
strcpy ((*filename),
((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName);
}
return;
} /* tuiGetLocatorFilename */
/*
1999-07-07 22:19:36 +02:00
** tuiUpdateLocatorInfoFromFrame().
** Function to update the locator, with the information extracted from frameInfo
*/
void
tuiUpdateLocatorInfoFromFrame (struct frame_info *frameInfo,
TuiLocatorElementPtr element)
{
struct symtab_and_line symtabAndLine;
/* now get the new info */
symtabAndLine = find_pc_line (frameInfo->pc,
(frameInfo->next != (struct frame_info *) NULL &&
!frameInfo->next->signal_handler_caller &&
!frame_in_dummy (frameInfo->next)));
if (symtabAndLine.symtab && symtabAndLine.symtab->filename)
tuiSetLocatorInfo (symtabAndLine.symtab->filename,
_getFuncNameFromFrame (frameInfo),
symtabAndLine.line,
(Opaque) frameInfo->pc,
element);
else
tuiSetLocatorInfo ((char *) NULL,
_getFuncNameFromFrame (frameInfo),
0,
(Opaque) frameInfo->pc,
element);
return;
} /* tuiUpdateLocatorInfoFromFrame */
/*
1999-07-07 22:19:36 +02:00
** tuiSetLocatorContent().
** Function to set the content of the locator
*/
void
tuiSetLocatorContent (struct frame_info *frameInfo)
{
TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
TuiWinElementPtr element;
struct symtab_and_line symtabAndLine;
/* Allocate the element if necessary */
if (locator->contentSize <= 0)
{
TuiWinContent contentPtr;
if ((locator->content = (OpaquePtr) allocContent (1, locator->type)) == (OpaquePtr) NULL)
error ("Unable to Allocate Memory to Display Location.");
locator->contentSize = 1;
}
if (frameInfo != (struct frame_info *) NULL)
tuiUpdateLocatorInfoFromFrame (frameInfo,
&((TuiWinElementPtr) locator->content[0])->whichElement.locator);
else
tuiSetLocatorInfo ((char *) NULL,
(char *) NULL,
0,
(Opaque) NULL,
&((TuiWinElementPtr) locator->content[0])->whichElement.locator);
return;
} /* tuiSetLocatorContent */
/*
1999-07-07 22:19:36 +02:00
** tuiUpdateLocatorDisplay().
** Function to update the locator display
*/
void
tuiUpdateLocatorDisplay (struct frame_info *frameInfo)
{
tuiClearLocatorDisplay ();
tuiSetLocatorContent (frameInfo);
tuiShowLocatorContent ();
return;
} /* tuiUpdateLocatorDisplay */
/*
1999-07-07 22:19:36 +02:00
** tuiShowFrameInfo().
** Function to print the frame inforrmation for the TUI.
*/
void
tuiShowFrameInfo (struct frame_info *fi)
{
TuiWinInfoPtr winInfo;
register int i;
if (fi)
{
register int startLine, i;
register struct symtab *s;
CORE_ADDR low;
TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
int sourceAlreadyDisplayed;
s = find_pc_symtab (fi->pc);
if (s == 0)
return;
sourceAlreadyDisplayed = tuiSourceIsDisplayed (s->filename);
tuiUpdateLocatorDisplay (fi);
for (i = 0; i < (sourceWindows ())->count; i++)
{
winInfo = (TuiWinInfoPtr) (sourceWindows ())->list[i];
if (winInfo == srcWin)
{
startLine =
(((TuiWinElementPtr) locator->content[0])->whichElement.locator.lineNo -
(winInfo->generic.viewportHeight / 2)) + 1;
if (startLine <= 0)
startLine = 1;
}
else
{
if (find_pc_partial_function (fi->pc, (char **) NULL, &low, (CORE_ADDR) NULL) == 0)
error ("No function contains program counter for selected frame.\n");
else
low = (CORE_ADDR) tuiGetLowDisassemblyAddress ((Opaque) low, (Opaque) fi->pc);
}
if (winInfo == srcWin)
{
if (!(sourceAlreadyDisplayed && m_tuiLineDisplayedWithinThreshold (
winInfo,
((TuiWinElementPtr) locator->content[0])->whichElement.locator.lineNo)))
tuiUpdateSourceWindow (winInfo, s, (Opaque) startLine, TRUE);
else
tuiSetIsExecPointAt ((Opaque)
((TuiWinElementPtr) locator->content[0])->whichElement.locator.lineNo,
winInfo);
}
else
{
if (winInfo == disassemWin)
{
if (!m_tuiLineDisplayedWithinThreshold (winInfo,
((TuiWinElementPtr) locator->content[0])->whichElement.locator.addr))
tuiUpdateSourceWindow (winInfo, s, (Opaque) low, TRUE);
else
tuiSetIsExecPointAt ((Opaque)
((TuiWinElementPtr) locator->content[0])->whichElement.locator.addr,
winInfo);
}
}
tuiUpdateExecInfo (winInfo);
}
}
else
{
tuiUpdateLocatorDisplay (fi);
for (i = 0; i < (sourceWindows ())->count; i++)
{
winInfo = (TuiWinInfoPtr) (sourceWindows ())->list[i];
tuiClearSourceContent (winInfo, EMPTY_SOURCE_PROMPT);
tuiUpdateExecInfo (winInfo);
}
}
return;
} /* tuiShowFrameInfo */
/*
1999-07-07 22:19:36 +02:00
** tui_vShowFrameInfo().
** Function to print the frame inforrmation for the TUI with args in a va_list.
*/
void
tui_vShowFrameInfo (va_list args)
{
struct frame_info *fi;
fi = va_arg (args, struct frame_info *);
tuiShowFrameInfo (fi);
return;
} /* tui_vShowFrameInfo */
/*
1999-07-07 22:19:36 +02:00
** _initialize_tuiStack().
** Function to initialize gdb commands, for tui window stack manipulation.
*/
void
2000-07-30 03:48:28 +02:00
_initialize_tuiStack (void)
{
if (tui_version)
{
add_com ("update", class_tui, _tuiUpdateLocation_command,
"Update the source window and locator to display the current execution point.\n");
}
return;
} /* _initialize_tuiStack */
/*****************************************
** STATIC LOCAL FUNCTIONS **
******************************************/
/*
1999-07-07 22:19:36 +02:00
** _getFuncNameFromFrame().
*/
static char *
_getFuncNameFromFrame (struct frame_info *frameInfo)
{
char *funcName = (char *) NULL;
find_pc_partial_function (frameInfo->pc,
&funcName,
(CORE_ADDR *) NULL,
(CORE_ADDR *) NULL);
return funcName;
} /* _getFuncNameFromFrame */
/*
1999-07-07 22:19:36 +02:00
** _tuiUpdateLocation_command().
** Command to update the display with the current execution point
*/
static void
_tuiUpdateLocation_command (char *arg, int fromTTY)
{
#ifndef TRY
2000-05-28 03:12:42 +02:00
extern void frame_command (char *, int);
frame_command ("0", FALSE);
#else
struct frame_info *curFrame;
/* Obtain the current execution point */
if ((curFrame = get_current_frame ()) != (struct frame_info *) NULL)
{
struct frame_info *frame;
int curLevel = 0;
for (frame = get_prev_frame (curLevel);
(frame != (struct frame_info *) NULL && (frame != curFrame));
frame = get_prev_frame (frame))
curLevel++;
if (curFrame != (struct frame_info *) NULL)
print_frame_info (frame, curLevel, 0, 1);
}
#endif
return;
} /* _tuiUpdateLocation_command */