/* 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 ** ******************************************/ 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 */ /* ** tuiSetLocatorInfo(). ** Function to update the locator, with the provided arguments. */ void tuiSetLocatorInfo (char *fname, char *procname, int lineNo, CORE_ADDR 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 = addr; return; } /* tuiSetLocatorInfo */ /* ** 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 */ /* ** 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 */