nkeynes@10: /**
nkeynes@10:  * $Id: debug_win.c,v 1.4 2005-12-11 05:15:36 nkeynes Exp $
nkeynes@10:  * This file is responsible for the main debugger gui frame.
nkeynes@10:  *
nkeynes@10:  * Copyright (c) 2005 Nathan Keynes.
nkeynes@10:  *
nkeynes@10:  * This program is free software; you can redistribute it and/or modify
nkeynes@10:  * it under the terms of the GNU General Public License as published by
nkeynes@10:  * the Free Software Foundation; either version 2 of the License, or
nkeynes@10:  * (at your option) any later version.
nkeynes@10:  *
nkeynes@10:  * This program is distributed in the hope that it will be useful,
nkeynes@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
nkeynes@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
nkeynes@10:  * GNU General Public License for more details.
nkeynes@10:  */
nkeynes@2: #include <stdlib.h>
nkeynes@2: #include <stdarg.h>
nkeynes@2: #include <gnome.h>
nkeynes@2: #include <math.h>
nkeynes@2: #include "gui.h"
nkeynes@2: #include "mem.h"
nkeynes@9: #include "disasm.h"
nkeynes@2: 
nkeynes@2: GdkColor *msg_colors[] = { &clrError, &clrError, &clrWarn, &clrNormal,
nkeynes@2:                            &clrDebug, &clrTrace };
nkeynes@2: 
nkeynes@9: struct debug_info_struct {
nkeynes@9:     int disasm_from;
nkeynes@9:     int disasm_to;
nkeynes@9:     int disasm_pc;
nkeynes@9:     struct cpu_desc_struct *cpu;
nkeynes@9:     GtkCList *msgs_list;
nkeynes@9:     GtkCList *regs_list;
nkeynes@9:     GtkCList *disasm_list;
nkeynes@9:     GtkEntry *page_field;
nkeynes@9:     GtkProgressBar *icounter;
nkeynes@9:     char icounter_text[16];
nkeynes@9:     char saved_regs[0];
nkeynes@8: };
nkeynes@8: 
nkeynes@9: debug_info_t init_debug_win(GtkWidget *win, struct cpu_desc_struct *cpu )
nkeynes@2: {
nkeynes@2:     int i;
nkeynes@2:     char buf[20];
nkeynes@2:     char *arr[2];
nkeynes@2:     GnomeAppBar *appbar;
nkeynes@9:     
nkeynes@9:     debug_info_t data = g_malloc0( sizeof(struct debug_info_struct) + cpu->regs_size );
nkeynes@9:     data->disasm_from = -1;
nkeynes@9:     data->disasm_to = -1;
nkeynes@9:     data->disasm_pc = -1;
nkeynes@9:     data->cpu = cpu;
nkeynes@9:     
nkeynes@9:     data->regs_list= gtk_object_get_data(GTK_OBJECT(win), "reg_list");
nkeynes@9:     arr[1] = buf;
nkeynes@9:     for( i=0; data->cpu->regs_info[i].name != NULL; i++ ) {
nkeynes@9:         arr[0] = data->cpu->regs_info[i].name;
nkeynes@9:         if( data->cpu->regs_info->type == REG_INT )
nkeynes@9:             sprintf( buf, "%08X", *((uint32_t *)data->cpu->regs_info->value) );
nkeynes@9:         else
nkeynes@9:             sprintf( buf, "%f", *((float *)data->cpu->regs_info->value) );
nkeynes@9:         gtk_clist_append( data->regs_list, arr );
nkeynes@9:     }
nkeynes@9:     gtk_widget_modify_font( GTK_WIDGET(data->regs_list), fixed_list_font );
nkeynes@2: 
nkeynes@9:     data->msgs_list = gtk_object_get_data(GTK_OBJECT(win), "output_list");
nkeynes@9:     data->disasm_list = gtk_object_get_data(GTK_OBJECT(win), "disasm_list");
nkeynes@9:     gtk_clist_set_column_width( data->disasm_list, 1, 16 );
nkeynes@9:     data->page_field = gtk_object_get_data(GTK_OBJECT(win), "page_field");
nkeynes@2: 
nkeynes@2:     appbar = gtk_object_get_data(GTK_OBJECT(win), "debug_appbar");
nkeynes@9:     data->icounter = gnome_appbar_get_progress( appbar );
nkeynes@9:     gtk_progress_bar_set_text(data->icounter, "1");
nkeynes@10:     
nkeynes@9:     gtk_object_set_data( GTK_OBJECT(win), "debug_data", data );
nkeynes@9:     return data;
nkeynes@2: }
nkeynes@2: 
nkeynes@2: /*
nkeynes@2:  * Check for changed registers and update the display
nkeynes@2:  */
nkeynes@9: void update_registers( debug_info_t data )
nkeynes@2: {
nkeynes@2:     int i;
nkeynes@9:     for( i=0; data->cpu->regs_info[i].name != NULL; i++ ) {
nkeynes@9:         if( data->cpu->regs_info[i].type == REG_INT ) {
nkeynes@2:             /* Yes this _is_ probably fairly evil */
nkeynes@9:             if( *((uint32_t *)data->cpu->regs_info[i].value) !=
nkeynes@9:                 *((uint32_t *)((char *)data->saved_regs + ((char *)data->cpu->regs_info[i].value - (char *)data->cpu->regs))) ) {
nkeynes@2:                 char buf[20];
nkeynes@9:                 sprintf( buf, "%08X", *((uint32_t *)data->cpu->regs_info[i].value) );
nkeynes@9:                 gtk_clist_set_text( data->regs_list, i, 1, buf );
nkeynes@9:                 gtk_clist_set_foreground( data->regs_list, i, &clrChanged );
nkeynes@2:             } else {
nkeynes@9:                 gtk_clist_set_foreground( data->regs_list, i, &clrNormal );
nkeynes@2:             }
nkeynes@2:         } else {
nkeynes@9:             if( *((float *)data->cpu->regs_info[i].value) !=
nkeynes@9:                 *((float *)((char *)data->saved_regs + ((char *)data->cpu->regs_info[i].value - (char *)data->cpu->regs))) ) {
nkeynes@2:                 char buf[20];
nkeynes@9:                 sprintf( buf, "%f", *((float *)data->cpu->regs_info[i].value) );
nkeynes@9:                 gtk_clist_set_text( data->regs_list, i, 1, buf );
nkeynes@9:                 gtk_clist_set_foreground( data->regs_list, i, &clrChanged );
nkeynes@2:             } else {
nkeynes@9:                 gtk_clist_set_foreground( data->regs_list, i, &clrNormal );
nkeynes@2:             }
nkeynes@2:         }
nkeynes@2:     }
nkeynes@9: 
nkeynes@9:     set_disassembly_pc( data, *data->cpu->pc, FALSE );
nkeynes@9:     memcpy( data->saved_regs, data->cpu->regs, data->cpu->regs_size );
nkeynes@2: }
nkeynes@2: 
nkeynes@9: void update_icount( debug_info_t data )
nkeynes@2: {
nkeynes@9:     sprintf( data->icounter_text, "%d", *data->cpu->icount );
nkeynes@9:     gtk_progress_bar_set_text( data->icounter, data->icounter_text );
nkeynes@2: }
nkeynes@2: 
nkeynes@9: void set_disassembly_region( debug_info_t data, unsigned int page )
nkeynes@2: {
nkeynes@2:     uint32_t i, posn;
nkeynes@2:     uint16_t op;
nkeynes@2:     char buf[80];
nkeynes@2:     char addr[10];
nkeynes@2:     char opcode[6] = "";
nkeynes@2:     char *arr[4] = { addr, " ", opcode, buf };
nkeynes@2:     unsigned int from = page & 0xFFFFF000;
nkeynes@2:     unsigned int to = from + 4096;
nkeynes@2:     
nkeynes@9:     gtk_clist_clear(data->disasm_list);
nkeynes@2: 
nkeynes@2:     sprintf( addr, "%08X", from );
nkeynes@9:     gtk_entry_set_text( data->page_field, addr );
nkeynes@2: 
nkeynes@2:     if( !mem_has_page( from ) ) {
nkeynes@2:         arr[3] = "This page is currently unmapped";
nkeynes@9:         gtk_clist_append( data->disasm_list, arr );
nkeynes@9:         gtk_clist_set_foreground( data->disasm_list, 0, &clrError );
nkeynes@2:     } else {
nkeynes@9:         for( i=from; i<to; ) {
nkeynes@9: 	    i = data->cpu->disasm_func( i, buf, sizeof(buf) );
nkeynes@2:             sprintf( addr, "%08X", i );
nkeynes@10:             op = sh4_read_phys_word(i);
nkeynes@2:             sprintf( opcode, "%02X %02X", op&0xFF, op>>8 );
nkeynes@9:             posn = gtk_clist_append( data->disasm_list, arr );
nkeynes@2:             if( buf[0] == '?' )
nkeynes@9:                 gtk_clist_set_foreground( data->disasm_list, posn, &clrWarn );
nkeynes@2:         }
nkeynes@9:         if( data->disasm_pc != -1 && data->disasm_pc >= from && data->disasm_pc < to )
nkeynes@9:             gtk_clist_set_foreground( data->disasm_list, address_to_row(data, data->disasm_pc),
nkeynes@2:                                       &clrPC );
nkeynes@2:     }
nkeynes@2: 
nkeynes@2:     if( page != from ) { /* not a page boundary */
nkeynes@9:         gtk_clist_moveto( data->disasm_list, (page-from)>>1, 0, 0.5, 0.0 );
nkeynes@2:     }
nkeynes@9:     data->disasm_from = from;
nkeynes@9:     data->disasm_to = to;
nkeynes@2: }
nkeynes@2: 
nkeynes@9: void jump_to_disassembly( debug_info_t data, unsigned int addr, gboolean select )
nkeynes@2: {
nkeynes@2:     int row;
nkeynes@2:     
nkeynes@9:     if( addr < data->disasm_from || addr >= data->disasm_to )
nkeynes@9:         set_disassembly_region(data,addr);
nkeynes@2: 
nkeynes@9:     row = address_to_row( data, addr );
nkeynes@2:     if(select) {
nkeynes@9:         gtk_clist_select_row( data->disasm_list, row, 0 );
nkeynes@2:     }
nkeynes@9:     if( gtk_clist_row_is_visible( data->disasm_list, row ) != GTK_VISIBILITY_FULL ){
nkeynes@9:         gtk_clist_moveto( data->disasm_list, row, 0, 0.5, 0.0 );
nkeynes@2:     }
nkeynes@2: }
nkeynes@2: 
nkeynes@9: void jump_to_pc( debug_info_t data, gboolean select )
nkeynes@9: {
nkeynes@9:     jump_to_disassembly( data, *data->cpu->pc, select );
nkeynes@9: }
nkeynes@9: 
nkeynes@9: void set_disassembly_pc( debug_info_t data, unsigned int pc, gboolean select )
nkeynes@2: {
nkeynes@2:     int row;
nkeynes@2:     
nkeynes@9:     jump_to_disassembly( data, pc, select );
nkeynes@9:     if( data->disasm_pc != -1 && data->disasm_pc >= data->disasm_from && 
nkeynes@9: 	data->disasm_pc < data->disasm_to )
nkeynes@9:         gtk_clist_set_foreground( data->disasm_list, 
nkeynes@9: 				  (data->disasm_pc - data->disasm_from) / data->cpu->instr_size,
nkeynes@2:                                   &clrNormal );
nkeynes@9:     row = address_to_row( data, pc );
nkeynes@9:     gtk_clist_set_foreground( data->disasm_list, row, &clrPC );
nkeynes@9:     data->disasm_pc = pc;
nkeynes@2: }
nkeynes@2: 
nkeynes@10: void set_disassembly_cpu( debug_info_t data, char *cpu )
nkeynes@10: {
nkeynes@10: 
nkeynes@10: 
nkeynes@10: }
nkeynes@10: 
nkeynes@9: uint32_t row_to_address( debug_info_t data, int row ) {
nkeynes@9:     return data->cpu->instr_size * row + data->disasm_from;
nkeynes@9: }
nkeynes@2: 
nkeynes@9: int address_to_row( debug_info_t data, uint32_t address ) {
nkeynes@9:     if( data->disasm_from > address || data->disasm_to <= address )
nkeynes@9: 	return -1;
nkeynes@9:     return (address - data->disasm_from) / data->cpu->instr_size;
nkeynes@9: }
nkeynes@9: 
nkeynes@10: 
nkeynes@9: void emit( void *ptr, int level, int source, char *msg, ... )
nkeynes@2: {
nkeynes@2:     char buf[20], addr[10] = "", *p;
nkeynes@2:     char *arr[3] = {buf, addr};
nkeynes@2:     int posn;
nkeynes@2:     time_t tm = time(NULL);
nkeynes@2:     va_list ap;
nkeynes@9:     debug_info_t data;
nkeynes@9:     if( ptr == NULL )
nkeynes@9: 	data = main_debug;
nkeynes@9:     else data = (debug_info_t)ptr;
nkeynes@2: 
nkeynes@2:     va_start(ap, msg);
nkeynes@2:     p = g_strdup_vprintf( msg, ap );
nkeynes@2:     strftime( buf, sizeof(buf), "%H:%M:%S", localtime(&tm) );
nkeynes@2:     if( source != -1 )
nkeynes@9:         sprintf( addr, "%08X", *data->cpu->pc );
nkeynes@2:     arr[2] = p;
nkeynes@9:     posn = gtk_clist_append(data->msgs_list, arr);
nkeynes@2:     free(p);
nkeynes@2:     va_end(ap);
nkeynes@2: 
nkeynes@9:     gtk_clist_set_foreground( data->msgs_list, posn, msg_colors[level] );
nkeynes@9:     gtk_clist_moveto( data->msgs_list, posn, 0, 1.0, 0.0 );
nkeynes@2: 
nkeynes@2:     /* emit _really_ slows down the emu, to the point where the gui can be
nkeynes@2:      * completely unresponsive if I don't include this:
nkeynes@2:      */
nkeynes@2:     while( gtk_events_pending() )
nkeynes@2:         gtk_main_iteration();
nkeynes@2: }
nkeynes@9: 
nkeynes@9: debug_info_t get_debug_info( GtkWidget *widget ) {
nkeynes@9:     
nkeynes@9:     GtkWidget *win = gtk_widget_get_toplevel(widget);
nkeynes@9:     debug_info_t data = (debug_info_t)gtk_object_get_data( GTK_OBJECT(win), "debug_data" );
nkeynes@9:     return data;
nkeynes@9: }
nkeynes@9: