Search
lxdream.org :: lxdream/src/gui/debug_win.c
lxdream 0.9.1
released Jun 29
Download Now
filename src/gui/debug_win.c
changeset 14:fc481a638848
prev11:0a82ef380c45
next26:ad258e3daaa5
author nkeynes
date Mon Dec 12 10:37:41 2005 +0000 (15 years ago)
permissions -rw-r--r--
last change Use cpu-specific is_valid_page function
file annotate diff log raw
nkeynes@10
     1
/**
nkeynes@14
     2
 * $Id: debug_win.c,v 1.6 2005-12-12 10:37:36 nkeynes Exp $
nkeynes@10
     3
 * This file is responsible for the main debugger gui frame.
nkeynes@10
     4
 *
nkeynes@10
     5
 * Copyright (c) 2005 Nathan Keynes.
nkeynes@10
     6
 *
nkeynes@10
     7
 * This program is free software; you can redistribute it and/or modify
nkeynes@10
     8
 * it under the terms of the GNU General Public License as published by
nkeynes@10
     9
 * the Free Software Foundation; either version 2 of the License, or
nkeynes@10
    10
 * (at your option) any later version.
nkeynes@10
    11
 *
nkeynes@10
    12
 * This program is distributed in the hope that it will be useful,
nkeynes@10
    13
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
nkeynes@10
    14
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
nkeynes@10
    15
 * GNU General Public License for more details.
nkeynes@10
    16
 */
nkeynes@2
    17
#include <stdlib.h>
nkeynes@2
    18
#include <stdarg.h>
nkeynes@2
    19
#include <gnome.h>
nkeynes@2
    20
#include <math.h>
nkeynes@2
    21
#include "gui.h"
nkeynes@2
    22
#include "mem.h"
nkeynes@9
    23
#include "disasm.h"
nkeynes@2
    24
nkeynes@2
    25
GdkColor *msg_colors[] = { &clrError, &clrError, &clrWarn, &clrNormal,
nkeynes@2
    26
                           &clrDebug, &clrTrace };
nkeynes@2
    27
nkeynes@9
    28
struct debug_info_struct {
nkeynes@9
    29
    int disasm_from;
nkeynes@9
    30
    int disasm_to;
nkeynes@9
    31
    int disasm_pc;
nkeynes@9
    32
    struct cpu_desc_struct *cpu;
nkeynes@11
    33
    struct cpu_desc_struct **cpu_list;
nkeynes@9
    34
    GtkCList *msgs_list;
nkeynes@9
    35
    GtkCList *regs_list;
nkeynes@9
    36
    GtkCList *disasm_list;
nkeynes@9
    37
    GtkEntry *page_field;
nkeynes@9
    38
    GtkProgressBar *icounter;
nkeynes@9
    39
    char icounter_text[16];
nkeynes@9
    40
    char saved_regs[0];
nkeynes@8
    41
};
nkeynes@8
    42
nkeynes@11
    43
debug_info_t init_debug_win(GtkWidget *win, struct cpu_desc_struct **cpu_list )
nkeynes@2
    44
{
nkeynes@2
    45
    GnomeAppBar *appbar;
nkeynes@9
    46
    
nkeynes@11
    47
    debug_info_t data = g_malloc0( sizeof(struct debug_info_struct) + cpu_list[0]->regs_size );
nkeynes@9
    48
    data->disasm_from = -1;
nkeynes@9
    49
    data->disasm_to = -1;
nkeynes@9
    50
    data->disasm_pc = -1;
nkeynes@11
    51
    data->cpu = cpu_list[0];
nkeynes@11
    52
    data->cpu_list = cpu_list;
nkeynes@9
    53
    
nkeynes@9
    54
    data->regs_list= gtk_object_get_data(GTK_OBJECT(win), "reg_list");
nkeynes@9
    55
    gtk_widget_modify_font( GTK_WIDGET(data->regs_list), fixed_list_font );
nkeynes@11
    56
    init_register_list( data );
nkeynes@9
    57
    data->msgs_list = gtk_object_get_data(GTK_OBJECT(win), "output_list");
nkeynes@9
    58
    data->disasm_list = gtk_object_get_data(GTK_OBJECT(win), "disasm_list");
nkeynes@9
    59
    gtk_clist_set_column_width( data->disasm_list, 1, 16 );
nkeynes@9
    60
    data->page_field = gtk_object_get_data(GTK_OBJECT(win), "page_field");
nkeynes@2
    61
nkeynes@2
    62
    appbar = gtk_object_get_data(GTK_OBJECT(win), "debug_appbar");
nkeynes@9
    63
    data->icounter = gnome_appbar_get_progress( appbar );
nkeynes@9
    64
    gtk_progress_bar_set_text(data->icounter, "1");
nkeynes@10
    65
    
nkeynes@9
    66
    gtk_object_set_data( GTK_OBJECT(win), "debug_data", data );
nkeynes@9
    67
    return data;
nkeynes@2
    68
}
nkeynes@2
    69
nkeynes@11
    70
void init_register_list( debug_info_t data ) 
nkeynes@11
    71
{
nkeynes@11
    72
    int i;
nkeynes@11
    73
    char buf[20];
nkeynes@11
    74
    char *arr[2];
nkeynes@11
    75
nkeynes@11
    76
    gtk_clist_clear( data->regs_list );
nkeynes@11
    77
    arr[1] = buf;
nkeynes@11
    78
    for( i=0; data->cpu->regs_info[i].name != NULL; i++ ) {
nkeynes@11
    79
        arr[0] = data->cpu->regs_info[i].name;
nkeynes@11
    80
        if( data->cpu->regs_info->type == REG_INT )
nkeynes@11
    81
            sprintf( buf, "%08X", *((uint32_t *)data->cpu->regs_info[i].value) );
nkeynes@11
    82
        else
nkeynes@11
    83
            sprintf( buf, "%f", *((float *)data->cpu->regs_info[i].value) );
nkeynes@11
    84
        gtk_clist_append( data->regs_list, arr );
nkeynes@11
    85
    }
nkeynes@11
    86
}
nkeynes@11
    87
nkeynes@2
    88
/*
nkeynes@2
    89
 * Check for changed registers and update the display
nkeynes@2
    90
 */
nkeynes@9
    91
void update_registers( debug_info_t data )
nkeynes@2
    92
{
nkeynes@2
    93
    int i;
nkeynes@9
    94
    for( i=0; data->cpu->regs_info[i].name != NULL; i++ ) {
nkeynes@9
    95
        if( data->cpu->regs_info[i].type == REG_INT ) {
nkeynes@2
    96
            /* Yes this _is_ probably fairly evil */
nkeynes@9
    97
            if( *((uint32_t *)data->cpu->regs_info[i].value) !=
nkeynes@9
    98
                *((uint32_t *)((char *)data->saved_regs + ((char *)data->cpu->regs_info[i].value - (char *)data->cpu->regs))) ) {
nkeynes@2
    99
                char buf[20];
nkeynes@9
   100
                sprintf( buf, "%08X", *((uint32_t *)data->cpu->regs_info[i].value) );
nkeynes@9
   101
                gtk_clist_set_text( data->regs_list, i, 1, buf );
nkeynes@9
   102
                gtk_clist_set_foreground( data->regs_list, i, &clrChanged );
nkeynes@2
   103
            } else {
nkeynes@9
   104
                gtk_clist_set_foreground( data->regs_list, i, &clrNormal );
nkeynes@2
   105
            }
nkeynes@2
   106
        } else {
nkeynes@9
   107
            if( *((float *)data->cpu->regs_info[i].value) !=
nkeynes@9
   108
                *((float *)((char *)data->saved_regs + ((char *)data->cpu->regs_info[i].value - (char *)data->cpu->regs))) ) {
nkeynes@2
   109
                char buf[20];
nkeynes@9
   110
                sprintf( buf, "%f", *((float *)data->cpu->regs_info[i].value) );
nkeynes@9
   111
                gtk_clist_set_text( data->regs_list, i, 1, buf );
nkeynes@9
   112
                gtk_clist_set_foreground( data->regs_list, i, &clrChanged );
nkeynes@2
   113
            } else {
nkeynes@9
   114
                gtk_clist_set_foreground( data->regs_list, i, &clrNormal );
nkeynes@2
   115
            }
nkeynes@2
   116
        }
nkeynes@2
   117
    }
nkeynes@9
   118
nkeynes@9
   119
    set_disassembly_pc( data, *data->cpu->pc, FALSE );
nkeynes@9
   120
    memcpy( data->saved_regs, data->cpu->regs, data->cpu->regs_size );
nkeynes@2
   121
}
nkeynes@2
   122
nkeynes@9
   123
void update_icount( debug_info_t data )
nkeynes@2
   124
{
nkeynes@9
   125
    sprintf( data->icounter_text, "%d", *data->cpu->icount );
nkeynes@9
   126
    gtk_progress_bar_set_text( data->icounter, data->icounter_text );
nkeynes@2
   127
}
nkeynes@2
   128
nkeynes@9
   129
void set_disassembly_region( debug_info_t data, unsigned int page )
nkeynes@2
   130
{
nkeynes@11
   131
    uint32_t i, posn, next;
nkeynes@2
   132
    uint16_t op;
nkeynes@2
   133
    char buf[80];
nkeynes@2
   134
    char addr[10];
nkeynes@11
   135
    char opcode[16] = "";
nkeynes@2
   136
    char *arr[4] = { addr, " ", opcode, buf };
nkeynes@2
   137
    unsigned int from = page & 0xFFFFF000;
nkeynes@2
   138
    unsigned int to = from + 4096;
nkeynes@2
   139
    
nkeynes@9
   140
    gtk_clist_clear(data->disasm_list);
nkeynes@2
   141
nkeynes@2
   142
    sprintf( addr, "%08X", from );
nkeynes@9
   143
    gtk_entry_set_text( data->page_field, addr );
nkeynes@2
   144
nkeynes@14
   145
    if( !data->cpu->is_valid_page_func( from ) ) {
nkeynes@2
   146
        arr[3] = "This page is currently unmapped";
nkeynes@9
   147
        gtk_clist_append( data->disasm_list, arr );
nkeynes@9
   148
        gtk_clist_set_foreground( data->disasm_list, 0, &clrError );
nkeynes@2
   149
    } else {
nkeynes@11
   150
        for( i=from; i<to; i = next ) {
nkeynes@11
   151
	    next = data->cpu->disasm_func( i, buf, sizeof(buf), opcode );
nkeynes@2
   152
            sprintf( addr, "%08X", i );
nkeynes@10
   153
            op = sh4_read_phys_word(i);
nkeynes@9
   154
            posn = gtk_clist_append( data->disasm_list, arr );
nkeynes@2
   155
            if( buf[0] == '?' )
nkeynes@9
   156
                gtk_clist_set_foreground( data->disasm_list, posn, &clrWarn );
nkeynes@2
   157
        }
nkeynes@9
   158
        if( data->disasm_pc != -1 && data->disasm_pc >= from && data->disasm_pc < to )
nkeynes@9
   159
            gtk_clist_set_foreground( data->disasm_list, address_to_row(data, data->disasm_pc),
nkeynes@2
   160
                                      &clrPC );
nkeynes@2
   161
    }
nkeynes@2
   162
nkeynes@2
   163
    if( page != from ) { /* not a page boundary */
nkeynes@9
   164
        gtk_clist_moveto( data->disasm_list, (page-from)>>1, 0, 0.5, 0.0 );
nkeynes@2
   165
    }
nkeynes@9
   166
    data->disasm_from = from;
nkeynes@9
   167
    data->disasm_to = to;
nkeynes@2
   168
}
nkeynes@2
   169
nkeynes@9
   170
void jump_to_disassembly( debug_info_t data, unsigned int addr, gboolean select )
nkeynes@2
   171
{
nkeynes@2
   172
    int row;
nkeynes@2
   173
    
nkeynes@9
   174
    if( addr < data->disasm_from || addr >= data->disasm_to )
nkeynes@9
   175
        set_disassembly_region(data,addr);
nkeynes@2
   176
nkeynes@9
   177
    row = address_to_row( data, addr );
nkeynes@2
   178
    if(select) {
nkeynes@9
   179
        gtk_clist_select_row( data->disasm_list, row, 0 );
nkeynes@2
   180
    }
nkeynes@9
   181
    if( gtk_clist_row_is_visible( data->disasm_list, row ) != GTK_VISIBILITY_FULL ){
nkeynes@9
   182
        gtk_clist_moveto( data->disasm_list, row, 0, 0.5, 0.0 );
nkeynes@2
   183
    }
nkeynes@2
   184
}
nkeynes@2
   185
nkeynes@9
   186
void jump_to_pc( debug_info_t data, gboolean select )
nkeynes@9
   187
{
nkeynes@9
   188
    jump_to_disassembly( data, *data->cpu->pc, select );
nkeynes@9
   189
}
nkeynes@9
   190
nkeynes@9
   191
void set_disassembly_pc( debug_info_t data, unsigned int pc, gboolean select )
nkeynes@2
   192
{
nkeynes@2
   193
    int row;
nkeynes@2
   194
    
nkeynes@9
   195
    jump_to_disassembly( data, pc, select );
nkeynes@9
   196
    if( data->disasm_pc != -1 && data->disasm_pc >= data->disasm_from && 
nkeynes@9
   197
	data->disasm_pc < data->disasm_to )
nkeynes@9
   198
        gtk_clist_set_foreground( data->disasm_list, 
nkeynes@9
   199
				  (data->disasm_pc - data->disasm_from) / data->cpu->instr_size,
nkeynes@2
   200
                                  &clrNormal );
nkeynes@9
   201
    row = address_to_row( data, pc );
nkeynes@9
   202
    gtk_clist_set_foreground( data->disasm_list, row, &clrPC );
nkeynes@9
   203
    data->disasm_pc = pc;
nkeynes@2
   204
}
nkeynes@2
   205
nkeynes@10
   206
void set_disassembly_cpu( debug_info_t data, char *cpu )
nkeynes@10
   207
{
nkeynes@11
   208
    int i;
nkeynes@11
   209
    for( i=0; data->cpu_list[i] != NULL; i++ ) {
nkeynes@11
   210
	if( strcmp( data->cpu_list[i]->name, cpu ) == 0 ) {
nkeynes@11
   211
	    if( data->cpu != data->cpu_list[i] ) {
nkeynes@11
   212
		data->cpu = data->cpu_list[i];
nkeynes@11
   213
		set_disassembly_region( data, data->disasm_from );
nkeynes@11
   214
		init_register_list( data );
nkeynes@11
   215
	    }
nkeynes@11
   216
	    return;
nkeynes@11
   217
	}
nkeynes@11
   218
    }
nkeynes@10
   219
}
nkeynes@10
   220
nkeynes@9
   221
uint32_t row_to_address( debug_info_t data, int row ) {
nkeynes@9
   222
    return data->cpu->instr_size * row + data->disasm_from;
nkeynes@9
   223
}
nkeynes@2
   224
nkeynes@9
   225
int address_to_row( debug_info_t data, uint32_t address ) {
nkeynes@9
   226
    if( data->disasm_from > address || data->disasm_to <= address )
nkeynes@9
   227
	return -1;
nkeynes@9
   228
    return (address - data->disasm_from) / data->cpu->instr_size;
nkeynes@9
   229
}
nkeynes@9
   230
nkeynes@10
   231
nkeynes@9
   232
void emit( void *ptr, int level, int source, char *msg, ... )
nkeynes@2
   233
{
nkeynes@2
   234
    char buf[20], addr[10] = "", *p;
nkeynes@2
   235
    char *arr[3] = {buf, addr};
nkeynes@2
   236
    int posn;
nkeynes@2
   237
    time_t tm = time(NULL);
nkeynes@2
   238
    va_list ap;
nkeynes@9
   239
    debug_info_t data;
nkeynes@9
   240
    if( ptr == NULL )
nkeynes@9
   241
	data = main_debug;
nkeynes@9
   242
    else data = (debug_info_t)ptr;
nkeynes@2
   243
nkeynes@2
   244
    va_start(ap, msg);
nkeynes@2
   245
    p = g_strdup_vprintf( msg, ap );
nkeynes@2
   246
    strftime( buf, sizeof(buf), "%H:%M:%S", localtime(&tm) );
nkeynes@2
   247
    if( source != -1 )
nkeynes@9
   248
        sprintf( addr, "%08X", *data->cpu->pc );
nkeynes@2
   249
    arr[2] = p;
nkeynes@9
   250
    posn = gtk_clist_append(data->msgs_list, arr);
nkeynes@2
   251
    free(p);
nkeynes@2
   252
    va_end(ap);
nkeynes@2
   253
nkeynes@9
   254
    gtk_clist_set_foreground( data->msgs_list, posn, msg_colors[level] );
nkeynes@9
   255
    gtk_clist_moveto( data->msgs_list, posn, 0, 1.0, 0.0 );
nkeynes@2
   256
nkeynes@2
   257
    /* emit _really_ slows down the emu, to the point where the gui can be
nkeynes@2
   258
     * completely unresponsive if I don't include this:
nkeynes@2
   259
     */
nkeynes@2
   260
    while( gtk_events_pending() )
nkeynes@2
   261
        gtk_main_iteration();
nkeynes@2
   262
}
nkeynes@9
   263
nkeynes@9
   264
debug_info_t get_debug_info( GtkWidget *widget ) {
nkeynes@9
   265
    
nkeynes@9
   266
    GtkWidget *win = gtk_widget_get_toplevel(widget);
nkeynes@9
   267
    debug_info_t data = (debug_info_t)gtk_object_get_data( GTK_OBJECT(win), "debug_data" );
nkeynes@9
   268
    return data;
nkeynes@9
   269
}
nkeynes@9
   270
.