[deliverable/binutils-gdb.git] / gdb / tui / tuiStack.c

/* 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.  */

/* If we need <curses.h>, we must include it before we get "bfd.h".  */
#include "config.h"
#ifdef HAVE_NCURSES_H       
#include <ncurses.h>
#else
#ifdef HAVE_CURSES_H
#include <curses.h>
#endif
#endif

#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    **
******************************************/

static char *_getFuncNameFromFrame (struct frame_info *);
static void _tuiUpdateLocation_command (char *, int);


/*****************************************
** PUBLIC FUNCTION                        **
******************************************/

/*
   ** 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.
       */
      /* 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 */


/*
   ** 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 */


/* Update the locator, with the provided arguments.  */
void
tuiSetLocatorInfo (char *fname, char *procname, int lineNo,
                   CORE_ADDR addr, TuiLocatorElementPtr element)
{
  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);
  element->lineNo = lineNo;
  element->addr = addr;
}


/*
   ** tuiUpdateLocatorFilename().
   **        Update only the filename portion of the locator.
 */
void
tuiUpdateLocatorFilename (const 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 */

/*
   ** 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,
		     (CORE_ADDR) 0,
	   &((TuiWinElementPtr) locator->content[0])->whichElement.locator);

  tuiShowLocatorContent ();

  return;
}				/* tuiSwitchFilename */


/*
   ** 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 */


/*
   ** 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,
		       frameInfo->pc,
		       element);
  else
    tuiSetLocatorInfo ((char *) NULL,
		       _getFuncNameFromFrame (frameInfo),
		       0,
		       frameInfo->pc,
		       element);

  return;
}				/* tuiUpdateLocatorInfoFromFrame */


/*
   ** 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,
		       (CORE_ADDR) 0,
	   &((TuiWinElementPtr) locator->content[0])->whichElement.locator);
  return;
}				/* tuiSetLocatorContent */


/*
   ** tuiUpdateLocatorDisplay().
   **        Function to update the locator display
 */
void
tuiUpdateLocatorDisplay (struct frame_info *frameInfo)
{
  tuiClearLocatorDisplay ();
  tuiSetLocatorContent (frameInfo);
  tuiShowLocatorContent ();

  return;
}				/* tuiUpdateLocatorDisplay */


/*
   ** 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;

      startLine = 0;
      sourceAlreadyDisplayed = tuiSourceIsDisplayed (s->filename);
      tuiUpdateLocatorDisplay (fi);
      for (i = 0; i < (sourceWindows ())->count; i++)
	{
	  TuiWhichElement *item;
	  winInfo = (TuiWinInfoPtr) (sourceWindows ())->list[i];

	  item = &((TuiWinElementPtr) locator->content[0])->whichElement;
	  if (winInfo == srcWin)
	    {
	      startLine = (item->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 = tuiGetLowDisassemblyAddress (low, fi->pc);
	    }

	  if (winInfo == srcWin)
	    {
	      TuiLineOrAddress l;
	      l.lineNo = startLine;
	      if (!(sourceAlreadyDisplayed
		    && tuiLineIsDisplayed (item->locator.lineNo, winInfo, TRUE)))
		tuiUpdateSourceWindow (winInfo, s, l, TRUE);
	      else
		{
		  l.lineNo = item->locator.lineNo;
		  tuiSetIsExecPointAt (l, winInfo);
		}
	    }
	  else
	    {
	      if (winInfo == disassemWin)
		{
		  TuiLineOrAddress a;
		  a.addr = low;
		  if (!tuiAddrIsDisplayed (item->locator.addr, winInfo, TRUE))
		    tuiUpdateSourceWindow (winInfo, s, a, TRUE);
		  else
		    {
		      a.addr = item->locator.addr;
		      tuiSetIsExecPointAt (a, 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 */

/*
   ** _initialize_tuiStack().
   **      Function to initialize gdb commands, for tui window stack manipulation.
 */
void
_initialize_tuiStack (void)
{
  add_com ("update", class_tui, _tuiUpdateLocation_command,
           "Update the source window and locator to display the current execution point.\n");
}


/*****************************************
** STATIC LOCAL FUNCTIONS                 **
******************************************/

/*
   **    _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 */


/*
   ** _tuiUpdateLocation_command().
   **        Command to update the display with the current execution point
 */
static void
_tuiUpdateLocation_command (char *arg, int fromTTY)
{
#ifndef TRY
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 */
Commit	Line	Data
f377b406 SC	1	/* TUI display locator.
	2	Copyright 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
	3	Contributed by Hewlett-Packard Company.
	4
	5	This file is part of GDB.
	6
	7	This program is free software; you can redistribute it and/or modify
	8	it under the terms of the GNU General Public License as published by
	9	the Free Software Foundation; either version 2 of the License, or
	10	(at your option) any later version.
	11
	12	This program is distributed in the hope that it will be useful,
	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public License
	18	along with this program; if not, write to the Free Software
	19	Foundation, Inc., 59 Temple Place - Suite 330,
	20	Boston, MA 02111-1307, USA. */
c906108c	21
4e8f7a8b DJ	22	/* If we need <curses.h>, we must include it before we get "bfd.h". */
	23	#include "config.h"
	24	#ifdef HAVE_NCURSES_H
	25	#include <ncurses.h>
	26	#else
	27	#ifdef HAVE_CURSES_H
	28	#include <curses.h>
	29	#endif
	30	#endif
	31
c906108c SS	32	#include "defs.h"
	33	#include "symtab.h"
	34	#include "breakpoint.h"
	35	#include "frame.h"
75fd9bc1	36	#include "command.h"
c906108c SS	37
	38	#include "tui.h"
	39	#include "tuiData.h"
	40	#include "tuiStack.h"
75fd9bc1 SC	41	#include "tuiGeneralWin.h"
75fd9bc1 SC	42	#include "tuiSource.h"
c906108c SS	43	#include "tuiSourceWin.h"
	44
	45
	46	/*****************************************
	47	STATIC LOCAL FUNCTIONS FORWARD DECLS
	48	******************************************/
	49
a14ed312 KB	50	static char _getFuncNameFromFrame (struct frame_info );
a14ed312 KB	51	static void _tuiUpdateLocation_command (char *, int);
c906108c SS	52
	53
	54
	55	/*****************************************
	56	PUBLIC FUNCTION
	57	******************************************/
	58
	59	/*
c5aa993b JM	60	** tuiClearLocatorDisplay()
c5aa993b JM	61	*/
c906108c	62	void
c906108c	63	tuiClearLocatorDisplay (void)
c906108c SS	64	{
	65	TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
	66	int i;
	67
	68	if (locator->handle != (WINDOW *) NULL)
	69	{
	70	/* No need to werase, since writing a line of
	71	* blanks which we do below, is equivalent.
c5aa993b	72	*/
c906108c SS	73	/* werase(locator->handle); */
	74	wmove (locator->handle, 0, 0);
	75	wstandout (locator->handle);
	76	for (i = 0; i < locator->width; i++)
	77	waddch (locator->handle, ' ');
	78	wstandend (locator->handle);
	79	tuiRefreshWin (locator);
	80	wmove (locator->handle, 0, 0);
	81	locator->contentInUse = FALSE;
	82	}
	83
	84	return;
	85	} /* tuiClearLocatorDisplay */
	86
	87
	88	/*
c5aa993b JM	89	** tuiShowLocatorContent()
c5aa993b JM	90	*/
c906108c	91	void
c906108c	92	tuiShowLocatorContent (void)
c906108c SS	93	{
	94	char *string;
	95	TuiGenWinInfoPtr locator;
	96
	97	locator = locatorWinInfoPtr ();
	98
	99	if (m_genWinPtrNotNull (locator) && locator->handle != (WINDOW *) NULL)
	100	{
	101	string = displayableWinContentAt (locator, 0);
	102	if (string != (char *) NULL)
	103	{
	104	wmove (locator->handle, 0, 0);
	105	wstandout (locator->handle);
	106	waddstr (locator->handle, string);
	107	wstandend (locator->handle);
	108	tuiRefreshWin (locator);
	109	wmove (locator->handle, 0, 0);
	110	if (string != nullStr ())
	111	tuiFree (string);
	112	locator->contentInUse = TRUE;
	113	}
	114	}
	115
	116	return;
	117	} /* tuiShowLocatorContent */
	118
	119
c7c228ed	120	/* Update the locator, with the provided arguments. */
c906108c	121	void
eca6576c	122	tuiSetLocatorInfo (char fname, char procname, int lineNo,
c774cec6	123	CORE_ADDR addr, TuiLocatorElementPtr element)
c906108c	124	{
c906108c SS	125	element->fileName[0] = (char) 0;
	126	element->procName[0] = (char) 0;
	127	strcat_to_buf (element->fileName, MAX_LOCATOR_ELEMENT_LEN, fname);
	128	strcat_to_buf (element->procName, MAX_LOCATOR_ELEMENT_LEN, procname);
c906108c	129	element->lineNo = lineNo;
c774cec6	130	element->addr = addr;
c7c228ed	131	}
c906108c SS	132
	133
	134	/*
c5aa993b JM	135	** tuiUpdateLocatorFilename().
	136	** Update only the filename portion of the locator.
	137	*/
c906108c	138	void
c6f60bcd	139	tuiUpdateLocatorFilename (const char *fileName)
c906108c SS	140	{
	141	TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
	142
	143	if (locator->content[0] == (Opaque) NULL)
	144	tuiSetLocatorContent ((struct frame_info *) NULL);
	145	((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName[0] = (char) 0;
	146	strcat_to_buf (((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName,
	147	MAX_LOCATOR_ELEMENT_LEN,
	148	fileName);
	149
	150	tuiShowLocatorContent ();
	151
	152	return;
	153	} /* tuiUpdateLocatorFilename */
	154
c906108c	155	/*
c5aa993b JM	156	** tuiSwitchFilename().
	157	** Update the filename portion of the locator. Clear the other info in locator.
	158	** (elz)
	159	*/
c906108c	160	void
eca6576c	161	tuiSwitchFilename (char *fileName)
c906108c SS	162	{
	163	TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
	164
	165	if (locator->content[0] == (Opaque) NULL)
	166	tuiSetLocatorContent ((struct frame_info *) NULL);
	167	((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName[0] = (char) 0;
	168
	169	tuiSetLocatorInfo (fileName,
	170	(char *) NULL,
	171	0,
c774cec6	172	(CORE_ADDR) 0,
c906108c SS	173	&((TuiWinElementPtr) locator->content[0])->whichElement.locator);
	174
	175	tuiShowLocatorContent ();
	176
	177	return;
	178	} /* tuiSwitchFilename */
	179
	180
	181	/*
c5aa993b JM	182	** tuiGetLocatorFilename().
	183	** Get the filename portion of the locator.
	184	** (elz)
	185	*/
c906108c	186	void
eca6576c	187	tuiGetLocatorFilename (TuiGenWinInfoPtr locator, char **filename)
c906108c SS	188	{
	189
	190	/* the current filename could be non known, in which case the xmalloc would
	191	allocate no memory, because the length would be 0 */
	192	if (((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName)
	193	{
	194	int name_length =
	195	strlen (((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName);
	196
	197	(filename) = (char ) xmalloc (name_length + 1);
	198	strcpy ((*filename),
	199	((TuiWinElementPtr) locator->content[0])->whichElement.locator.fileName);
	200	}
	201
	202	return;
	203	} /* tuiGetLocatorFilename */
	204
	205
	206	/*
c5aa993b JM	207	** tuiUpdateLocatorInfoFromFrame().
	208	** Function to update the locator, with the information extracted from frameInfo
	209	*/
c906108c	210	void
eca6576c SC	211	tuiUpdateLocatorInfoFromFrame (struct frame_info *frameInfo,
eca6576c SC	212	TuiLocatorElementPtr element)
c906108c SS	213	{
	214	struct symtab_and_line symtabAndLine;
	215
	216	/* now get the new info */
	217	symtabAndLine = find_pc_line (frameInfo->pc,
	218	(frameInfo->next != (struct frame_info *) NULL &&
	219	!frameInfo->next->signal_handler_caller &&
	220	!frame_in_dummy (frameInfo->next)));
	221	if (symtabAndLine.symtab && symtabAndLine.symtab->filename)
	222	tuiSetLocatorInfo (symtabAndLine.symtab->filename,
	223	_getFuncNameFromFrame (frameInfo),
	224	symtabAndLine.line,
c774cec6	225	frameInfo->pc,
c906108c SS	226	element);
	227	else
	228	tuiSetLocatorInfo ((char *) NULL,
	229	_getFuncNameFromFrame (frameInfo),
	230	0,
c774cec6	231	frameInfo->pc,
c906108c SS	232	element);
	233
	234	return;
	235	} /* tuiUpdateLocatorInfoFromFrame */
	236
	237
	238	/*
c5aa993b JM	239	** tuiSetLocatorContent().
	240	** Function to set the content of the locator
	241	*/
c906108c	242	void
eca6576c	243	tuiSetLocatorContent (struct frame_info *frameInfo)
c906108c SS	244	{
	245	TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
	246	TuiWinElementPtr element;
	247	struct symtab_and_line symtabAndLine;
	248
	249	/* Allocate the element if necessary */
	250	if (locator->contentSize <= 0)
	251	{
	252	TuiWinContent contentPtr;
	253
	254	if ((locator->content = (OpaquePtr) allocContent (1, locator->type)) == (OpaquePtr) NULL)
	255	error ("Unable to Allocate Memory to Display Location.");
	256	locator->contentSize = 1;
	257	}
	258
	259	if (frameInfo != (struct frame_info *) NULL)
	260	tuiUpdateLocatorInfoFromFrame (frameInfo,
	261	&((TuiWinElementPtr) locator->content[0])->whichElement.locator);
	262	else
	263	tuiSetLocatorInfo ((char *) NULL,
	264	(char *) NULL,
	265	0,
c774cec6	266	(CORE_ADDR) 0,
c906108c SS	267	&((TuiWinElementPtr) locator->content[0])->whichElement.locator);
	268	return;
	269	} /* tuiSetLocatorContent */
	270
	271
	272	/*
c5aa993b JM	273	** tuiUpdateLocatorDisplay().
	274	** Function to update the locator display
	275	*/
c906108c	276	void
eca6576c	277	tuiUpdateLocatorDisplay (struct frame_info *frameInfo)
c906108c SS	278	{
	279	tuiClearLocatorDisplay ();
	280	tuiSetLocatorContent (frameInfo);
	281	tuiShowLocatorContent ();
	282
	283	return;
	284	} /* tuiUpdateLocatorDisplay */
	285
	286
	287	/*
c5aa993b JM	288	** tuiShowFrameInfo().
	289	** Function to print the frame inforrmation for the TUI.
	290	*/
c906108c	291	void
eca6576c	292	tuiShowFrameInfo (struct frame_info *fi)
c906108c SS	293	{
	294	TuiWinInfoPtr winInfo;
	295	register int i;
	296
	297	if (fi)
	298	{
	299	register int startLine, i;
	300	register struct symtab *s;
	301	CORE_ADDR low;
	302	TuiGenWinInfoPtr locator = locatorWinInfoPtr ();
	303	int sourceAlreadyDisplayed;
	304
	305
	306	s = find_pc_symtab (fi->pc);
75fd9bc1 SC	307	if (s == 0)
	308	return;
	309
a4b99e53	310	startLine = 0;
c906108c SS	311	sourceAlreadyDisplayed = tuiSourceIsDisplayed (s->filename);
	312	tuiUpdateLocatorDisplay (fi);
	313	for (i = 0; i < (sourceWindows ())->count; i++)
	314	{
a4b99e53	315	TuiWhichElement *item;
c906108c	316	winInfo = (TuiWinInfoPtr) (sourceWindows ())->list[i];
a4b99e53 SC	317
a4b99e53 SC	318	item = &((TuiWinElementPtr) locator->content[0])->whichElement;
c906108c SS	319	if (winInfo == srcWin)
c906108c SS	320	{
a4b99e53 SC	321	startLine = (item->locator.lineNo -
a4b99e53 SC	322	(winInfo->generic.viewportHeight / 2)) + 1;
c906108c SS	323	if (startLine <= 0)
	324	startLine = 1;
	325	}
	326	else
	327	{
	328	if (find_pc_partial_function (fi->pc, (char **) NULL, &low, (CORE_ADDR) NULL) == 0)
	329	error ("No function contains program counter for selected frame.\n");
	330	else
c774cec6	331	low = tuiGetLowDisassemblyAddress (low, fi->pc);
c906108c SS	332	}
	333
	334	if (winInfo == srcWin)
	335	{
a4b99e53 SC	336	TuiLineOrAddress l;
	337	l.lineNo = startLine;
	338	if (!(sourceAlreadyDisplayed
	339	&& tuiLineIsDisplayed (item->locator.lineNo, winInfo, TRUE)))
	340	tuiUpdateSourceWindow (winInfo, s, l, TRUE);
c906108c	341	else
a4b99e53 SC	342	{
	343	l.lineNo = item->locator.lineNo;
	344	tuiSetIsExecPointAt (l, winInfo);
	345	}
c906108c SS	346	}
	347	else
	348	{
	349	if (winInfo == disassemWin)
	350	{
a4b99e53 SC	351	TuiLineOrAddress a;
	352	a.addr = low;
	353	if (!tuiAddrIsDisplayed (item->locator.addr, winInfo, TRUE))
	354	tuiUpdateSourceWindow (winInfo, s, a, TRUE);
c906108c	355	else
a4b99e53 SC	356	{
	357	a.addr = item->locator.addr;
	358	tuiSetIsExecPointAt (a, winInfo);
	359	}
c906108c SS	360	}
	361	}
	362	tuiUpdateExecInfo (winInfo);
	363	}
	364	}
	365	else
	366	{
	367	tuiUpdateLocatorDisplay (fi);
	368	for (i = 0; i < (sourceWindows ())->count; i++)
	369	{
	370	winInfo = (TuiWinInfoPtr) (sourceWindows ())->list[i];
	371	tuiClearSourceContent (winInfo, EMPTY_SOURCE_PROMPT);
	372	tuiUpdateExecInfo (winInfo);
	373	}
	374	}
	375
	376	return;
	377	} /* tuiShowFrameInfo */
	378
c906108c	379	/*
c5aa993b JM	380	** _initialize_tuiStack().
	381	** Function to initialize gdb commands, for tui window stack manipulation.
	382	*/
c906108c	383	void
fba45db2	384	_initialize_tuiStack (void)
c906108c	385	{
41783295 SC	386	add_com ("update", class_tui, _tuiUpdateLocation_command,
	387	"Update the source window and locator to display the current execution point.\n");
	388	}
c906108c SS	389
	390
	391	/*****************************************
	392	STATIC LOCAL FUNCTIONS
	393	******************************************/
	394
	395	/*
c5aa993b JM	396	** _getFuncNameFromFrame().
c5aa993b JM	397	*/
c906108c	398	static char *
eca6576c	399	_getFuncNameFromFrame (struct frame_info *frameInfo)
c906108c SS	400	{
	401	char funcName = (char ) NULL;
	402
	403	find_pc_partial_function (frameInfo->pc,
	404	&funcName,
	405	(CORE_ADDR *) NULL,
	406	(CORE_ADDR *) NULL);
	407	return funcName;
	408	} /* _getFuncNameFromFrame */
	409
	410
	411	/*
c5aa993b JM	412	** _tuiUpdateLocation_command().
	413	** Command to update the display with the current execution point
	414	*/
c906108c	415	static void
eca6576c	416	_tuiUpdateLocation_command (char *arg, int fromTTY)
c906108c SS	417	{
c906108c SS	418	#ifndef TRY
a14ed312	419	extern void frame_command (char *, int);
c906108c SS	420	frame_command ("0", FALSE);
	421	#else
	422	struct frame_info *curFrame;
	423
	424	/* Obtain the current execution point */
	425	if ((curFrame = get_current_frame ()) != (struct frame_info *) NULL)
	426	{
	427	struct frame_info *frame;
	428	int curLevel = 0;
	429
	430	for (frame = get_prev_frame (curLevel);
	431	(frame != (struct frame_info *) NULL && (frame != curFrame));
	432	frame = get_prev_frame (frame))
	433	curLevel++;
	434
	435	if (curFrame != (struct frame_info *) NULL)
	436	print_frame_info (frame, curLevel, 0, 1);
	437	}
	438	#endif
	439
	440	return;
	441	} /* _tuiUpdateLocation_command */