nkeynes@10 | 1 | /**
|
nkeynes@11 | 2 | * $Id: debug_win.c,v 1.5 2005-12-11 12:00:03 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@2 | 145 | if( !mem_has_page( 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 |
|