dbgwimg.c

来自「开放源码的编译器open watcom 1.6.0版的源代码」· C语言 代码 · 共 289 行

/****************************************************************************
*
*                            Open Watcom Project
*
*    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
*
*  ========================================================================
*
*    This file contains Original Code and/or Modifications of Original
*    Code as defined in and that are subject to the Sybase Open Watcom
*    Public License version 1.0 (the 'License'). You may not use this file
*    except in compliance with the License. BY USING THIS FILE YOU AGREE TO
*    ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is
*    provided with the Original Code and Modifications, and is also
*    available at www.sybase.com/developer/opensource.
*
*    The Original Code and all software distributed under the License are
*    distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
*    EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM
*    ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
*    MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR
*    NON-INFRINGEMENT. Please see the License for the specific language
*    governing rights and limitations under the License.
*
*  ========================================================================
*
* Description:  WHEN YOU FIGURE OUT WHAT THIS FILE DOES, PLEASE
*               DESCRIBE IT HERE!
*
****************************************************************************/


#include "dbgdefn.h"
#include "dbgwind.h"
#include "dbginfo.h"
#include "sortlist.h"
#include <string.h>
#include <stddef.h>


extern bool             ReLoadSymInfo( image_entry *image );
extern void             UnLoadSymInfo( image_entry *image, bool nofree );
extern void             SetLastSym( char *to );
extern bool             SymBrowse( char **name );
extern char             *DupStr(char*);
extern void             WndGblFuncInspect( mod_handle mod );
extern void             WndGblVarInspect( mod_handle mod );
extern void             WndModListInspect( mod_handle mod );
extern void             SetUnderLine( a_window *, wnd_line_piece * );
extern char             *ImgSymName( image_entry *img, bool always );
extern void             ImgSort(void);

#define TITLE_SIZE      2

extern image_entry      *DbgImageList;

enum {
    PIECE_IMAGE,
    PIECE_SYMBOL,
    PIECE_DIP,
    PIECE_LAST
};

static gui_ord  Indents[PIECE_LAST];

#include "menudef.h"
static gui_menu_struct ImgMenu[] = {
    #include "menuimg.h"
};


static void CalcIndents( a_window *wnd )
{
    image_entry *img;
    gui_ord     max_image;
    gui_ord     max_symbol;
    gui_ord     curr;

    max_image = WndExtentX( wnd, LIT( Executable_File ) );
    max_symbol = WndExtentX( wnd, LIT( Debug_Information ) );
    for( img = DbgImageList; img != NULL; img = img->link ) {
        curr = WndExtentX( wnd, img->image_name );
        if( curr > max_image ) max_image = curr;
        curr = WndExtentX( wnd, ImgSymName( img, FALSE ) );
        if( curr > max_symbol ) max_symbol = curr;
    }
    Indents[PIECE_SYMBOL] = max_image + 2*WndMaxCharX( wnd );
    Indents[PIECE_DIP] = Indents[PIECE_SYMBOL] + max_symbol + 4*WndMaxCharX( wnd );
}

static image_entry      *ImgGetImage( int row )
{
    image_entry *img;
    int         count;

    count = 0;
    if( row < 0 ) return( NULL );
    for( img = DbgImageList; img != NULL; img = img->link ) {
        if( count++ == row ) return( img );
    }
    return( NULL );
}

static void     ImgInit( a_window *wnd )
{
    ImgSort();
    CalcIndents( wnd );
    WndZapped( wnd );
}

static  WNDMENU ImgMenuItem;
static void     ImgMenuItem( a_window *wnd, unsigned id, int row, int piece )
{
    image_entry *img;
    char        *new_name;
    char        *old_name;

    piece=piece;
    img = ImgGetImage( row );
    switch( id ) {
    case MENU_INITIALIZE:
        WndMenuGrayAll( wnd );
        if( img != NULL ) {
            if( img->dip_handle == NO_MOD ) {
                WndMenuEnable( wnd, MENU_IMAGE_ADD_SYMBOLS, TRUE );
            } else {
                WndMenuEnableAll( wnd );
            }
        }
        break;
    case MENU_IMAGE_ADD_SYMBOLS:
        // nyi - change sym_file
        if( img->deferred_symbols ) {
            ReLoadSymInfo( img );
        } else {
            new_name = DupStr( ImgSymName( img, TRUE ) );
            if( !SymBrowse( &new_name ) ) {
                _Free( new_name );
            } else {
                UnLoadSymInfo( img, TRUE );
                old_name = img->sym_name;
                img->sym_name = new_name;
                if( ReLoadSymInfo( img ) ) {
                    _Free( old_name );
                } else {
                    img->sym_name = old_name;
                    _Free( new_name );
                }
            }
        }
        ImgInit( wnd );
        break;
    case MENU_IMAGE_DEL_SYMBOLS:
        UnLoadSymInfo( img, TRUE );
        ImgInit( wnd );
        break;
    case MENU_IMAGE_SHOW_FUNCTIONS:
        WndGblFuncInspect( img->dip_handle );
        break;
    case MENU_IMAGE_SHOW_MODULES:
        WndModListInspect( img->dip_handle );
        break;
    case MENU_IMAGE_SHOW_GLOBALS:
        WndGblVarInspect( img->dip_handle );
        break;
    }
}

static WNDNUMROWS ImgNumRows;
static int ImgNumRows( a_window *wnd )
{
    image_entry *img;
    int         count;

    wnd=wnd;
    count = 0;
    for( img = DbgImageList; img != NULL; img = img->link ) {
        ++count;
    }
    return( count );
}

static WNDGETLINE ImgGetLine;
static  bool    ImgGetLine( a_window *wnd, int row, int piece,
                             wnd_line_piece *line )
{
    image_entry         *img;

    wnd=wnd;
    line->indent = Indents[ piece ];
    if( row < 0 ) {
        row += TITLE_SIZE;
        switch( row ) {
        case 0:
            line->tabstop = FALSE;
            switch( piece ) {
            case PIECE_IMAGE:
                line->text = LIT( Executable_File );
                return( TRUE );
            case PIECE_SYMBOL:
                line->text = LIT( Debug_Information );
                return( TRUE );
            case PIECE_DIP:
                line->text = LIT( Debug_Information_Type );
                return( TRUE );
            default:
                return( FALSE );
            }
        case 1:
            if( piece != 0 ) return( FALSE );
            SetUnderLine( wnd, line );
            return( TRUE );
        default:
            return( FALSE );
        }
    } else {
        line->tabstop = FALSE;
        line->use_prev_attr = TRUE;
        line->extent = WND_MAX_EXTEND;
        img = ImgGetImage( row );
        if( img == NULL ) return( FALSE );
        switch( piece ) {
        case PIECE_IMAGE:
            line->text = img->image_name;
            line->tabstop = TRUE;
            line->use_prev_attr = FALSE;
            return( TRUE );
        case PIECE_SYMBOL:
            line->text = ImgSymName( img, FALSE );
            return( TRUE );
        case PIECE_DIP:
            if( img->dip_handle == NO_MOD ) {
                line->text = " ";
            } else {
                line->text = (char *)ImageDIP( img->dip_handle );
            }
            return( TRUE );
        }
    }
    return( FALSE );
}

static WNDREFRESH ImgRefresh;
static void     ImgRefresh( a_window *wnd )
{
    ImgInit( wnd );
}


static WNDCALLBACK ImgEventProc;
static bool ImgEventProc( a_window * wnd, gui_event gui_ev, void *parm )
{
    parm=parm;
    switch( gui_ev ) {
    case GUI_INIT_WINDOW:
        ImgInit( wnd );
        return( TRUE );
    case GUI_RESIZE:
        ImgInit( wnd );
        return( TRUE );
    case GUI_DESTROY:
        return( FALSE );
    }
    return( FALSE );
}

wnd_info ImgInfo = {
    ImgEventProc,
    ImgRefresh,
    ImgGetLine,
    ImgMenuItem,
    NoScroll,
    NoBegPaint,
    NoEndPaint,
    WndFirstMenuItem,
    ImgNumRows,
    NoNextRow,
    NoNotify,
    UP_SYM_CHANGE,
    DefPopUp( ImgMenu )
};

extern WNDOPEN WndImgOpen;
extern a_window *WndImgOpen()
{
    return( DbgTitleWndCreate( LIT( WindowImages ), &ImgInfo, WND_IMAGE,
            NULL, &ImgIcon, TITLE_SIZE, TRUE ) );
}