lxdream.org :: lxdream/src/gtkui/gtk_debug.c r887:8b3ee741c9d7

tree revision 889:5baaea6d9722

filename	src/gtkui/gtk_debug.c
changeset	887:8b3ee741c9d7
prev	763:b3ce4448f200
next	998:1754a8c6a9cf
author	nkeynes
date	Mon Oct 20 06:19:07 2008 +0000 (15 years ago)
permissions	-rw-r--r--
last change	Remove run button disabling, instead print an error when attempting to run in an unrunnable situation and stop.

view

     1 /**

     2  * $Id$

     3  * This file is responsible for the main debugger gui frame.

     4  *

     5  * Copyright (c) 2005 Nathan Keynes.

     6  *

     7  * This program is free software; you can redistribute it and/or modify

     8  * it under the terms of the GNU General Public License as published by

     9  * the Free Software Foundation; either version 2 of the License, or

    10  * (at your option) any later version.

    11  *

    12  * This program is distributed in the hope that it will be useful,

    13  * but WITHOUT ANY WARRANTY; without even the implied warranty of

    14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    15  * GNU General Public License for more details.

    16  */

    17 #include <stdlib.h>

    18 #include <stdarg.h>

    19 #include <stdio.h>

    20 #include <string.h>

    21 #include <math.h>

    22 #include <gdk/gdkkeysyms.h>

    23 #include "mem.h"

    24 #include "cpu.h"

    25 #include "dreamcast.h"

    26 #include "gtkui/gtkui.h"

    27 #include "sh4/sh4dasm.h"

    28 #include "aica/armdasm.h"

    30 GdkColor *msg_colors[] = { &gui_colour_error, &gui_colour_error, &gui_colour_warn,

    31         &gui_colour_normal,&gui_colour_debug, &gui_colour_trace };

    33 const cpu_desc_t cpu_list[4] = { &sh4_cpu_desc, &arm_cpu_desc, &armt_cpu_desc, NULL };

    35 void init_register_list( debug_window_t data );

    36 uint32_t row_to_address( debug_window_t data, int row );

    37 int address_to_row( debug_window_t data, uint32_t address );

    38 void set_disassembly_pc( debug_window_t data, unsigned int pc, gboolean select );

    39 void set_disassembly_region( debug_window_t data, unsigned int page );

    40 void set_disassembly_cpu( debug_window_t data, const gchar *cpu );

    42 void on_mode_field_changed ( GtkEditable *editable, gpointer user_data);

    43 gboolean on_page_field_key_press_event( GtkWidget * widget, GdkEventKey *event,

    44                                         gpointer user_data);

    45 void on_jump_pc_btn_clicked( GtkButton *button, gpointer user_data);

    46 void on_disasm_list_select_row (GtkCList *clist, gint row, gint column,

    47                                 GdkEvent *event, gpointer user_data);

    48 void on_disasm_list_unselect_row (GtkCList *clist, gint row, gint column,

    49                                   GdkEvent *event, gpointer user_data);

    50 gboolean on_debug_delete_event(GtkWidget *widget, GdkEvent event, gpointer user_data);

    52 struct debug_window_info {

    53     int disasm_from;

    54     int disasm_to;

    55     int disasm_pc;

    56     const struct cpu_desc_struct *cpu;

    57     const cpu_desc_t *cpu_list;

    58     GtkCList *regs_list;

    59     GtkCList *disasm_list;

    60     GtkEntry *page_field;

    61     GtkWidget *window;

    62     GtkWidget *statusbar;

    63     char saved_regs[0];

    64 };

    66 debug_window_t debug_window_new( const gchar *title, GtkWidget *menubar,

    67                                  GtkWidget *toolbar, GtkAccelGroup *accel_group )

    68 {

    69     debug_window_t data = g_malloc0( sizeof(struct debug_window_info) + cpu_list[0]->regs_size );

    70     GtkWidget *vbox;

    72     data->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);

    73     gtk_window_set_default_size (GTK_WINDOW (data->window), 700, 480);

    74     gtk_window_set_title( GTK_WINDOW(data->window), title );

    75     gtk_window_add_accel_group (GTK_WINDOW (data->window), accel_group);

    77     gtk_toolbar_set_style( GTK_TOOLBAR(toolbar), GTK_TOOLBAR_ICONS );

    79     data->statusbar = gtk_statusbar_new();

    81     GtkWidget *hpaned = gtk_hpaned_new ();

    82     gtk_paned_set_position (GTK_PANED (hpaned), 500);

    84     GtkWidget *disasm_box = gtk_vbox_new(FALSE,0);

    85     gtk_paned_pack1 (GTK_PANED (hpaned), disasm_box, TRUE, TRUE);

    87     GtkWidget *hbox1 = gtk_hbox_new (FALSE, 0);

    88     gtk_box_pack_start (GTK_BOX (disasm_box), hbox1, FALSE, FALSE, 3);

    89     gtk_box_pack_start (GTK_BOX (hbox1), gtk_label_new (_("Page")), FALSE, FALSE, 4);

    91     data->page_field = GTK_ENTRY(gtk_entry_new ());

    92     gtk_box_pack_start (GTK_BOX (hbox1), GTK_WIDGET(data->page_field), FALSE, TRUE, 0);

    94     GtkWidget *jump_pc_btn = gtk_button_new_with_mnemonic (_(" Jump to PC "));

    95     gtk_box_pack_start (GTK_BOX (hbox1), jump_pc_btn, FALSE, FALSE, 4);

    97     gtk_box_pack_start (GTK_BOX (hbox1), gtk_label_new(_("Mode")), FALSE, FALSE, 5);

    99     GtkWidget *mode_box = gtk_combo_new ();

   100     gtk_box_pack_start (GTK_BOX (hbox1), mode_box, FALSE, FALSE, 0);

   101     GList *mode_box_items = NULL;

   102     mode_box_items = g_list_append (mode_box_items, (gpointer) _("SH4"));

   103     mode_box_items = g_list_append (mode_box_items, (gpointer) _("ARM7"));

   104     mode_box_items = g_list_append (mode_box_items, (gpointer) _("ARM7T"));

   105     gtk_combo_set_popdown_strings (GTK_COMBO (mode_box), mode_box_items);

   106     g_list_free (mode_box_items);

   108     GtkWidget *mode_field = GTK_COMBO (mode_box)->entry;

   109     gtk_editable_set_editable (GTK_EDITABLE (mode_field), FALSE);

   111     GtkWidget *disasm_scroll = gtk_scrolled_window_new (NULL, NULL);

   112     gtk_box_pack_start (GTK_BOX (disasm_box), disasm_scroll, TRUE, TRUE, 0);

   113     gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (disasm_scroll), GTK_SHADOW_IN);

   114     data->disasm_list = GTK_CLIST(gtk_clist_new (4));

   115     gtk_clist_set_column_width (GTK_CLIST (data->disasm_list), 0, 80);

   116     gtk_clist_set_column_width (GTK_CLIST (data->disasm_list), 2, 80);

   117     gtk_clist_set_column_width (GTK_CLIST (data->disasm_list), 3, 80);

   118     gtk_clist_set_column_width( data->disasm_list, 1, 16 );

   119     gtk_clist_column_titles_hide (GTK_CLIST (data->disasm_list));

   120     gtk_container_add (GTK_CONTAINER (disasm_scroll), GTK_WIDGET(data->disasm_list));

   122     GtkWidget *reg_scroll = gtk_scrolled_window_new (NULL, NULL);

   123     gtk_paned_pack2 (GTK_PANED (hpaned), reg_scroll, FALSE, TRUE);

   124     gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (reg_scroll), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);

   125     gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (reg_scroll), GTK_SHADOW_IN);

   127     data->regs_list = GTK_CLIST(gtk_clist_new (2));

   128     gtk_container_add (GTK_CONTAINER (reg_scroll), GTK_WIDGET(data->regs_list));

   129     gtk_clist_set_column_width (GTK_CLIST (data->regs_list), 0, 80);

   130     gtk_clist_set_column_width (GTK_CLIST (data->regs_list), 1, 80);

   131     gtk_clist_column_titles_hide (GTK_CLIST (data->regs_list));

   132     gtk_widget_modify_font( GTK_WIDGET(data->regs_list), gui_fixed_font );

   134     vbox = gtk_vbox_new(FALSE, 0);

   135     gtk_container_add( GTK_CONTAINER(data->window), vbox );

   136     gtk_box_pack_start( GTK_BOX(vbox), menubar, FALSE, FALSE, 0 );

   137     gtk_box_pack_start( GTK_BOX(vbox), toolbar, FALSE, FALSE, 0 );

   138     gtk_box_pack_start( GTK_BOX(vbox), hpaned, TRUE, TRUE, 0 );

   139     gtk_box_pack_start( GTK_BOX(vbox), data->statusbar, FALSE, FALSE, 0 );

   141     g_signal_connect ((gpointer) data->page_field, "key_press_event",

   142                       G_CALLBACK (on_page_field_key_press_event),

   143                       data);

   144     g_signal_connect ((gpointer) jump_pc_btn, "clicked",

   145                       G_CALLBACK (on_jump_pc_btn_clicked),

   146                       data);

   147     g_signal_connect ((gpointer) mode_field, "changed",

   148                       G_CALLBACK (on_mode_field_changed),

   149                       data);

   150     g_signal_connect ((gpointer) data->disasm_list, "select_row",

   151                       G_CALLBACK (on_disasm_list_select_row),

   152                       data);

   153     g_signal_connect ((gpointer) data->disasm_list, "unselect_row",

   154                       G_CALLBACK (on_disasm_list_unselect_row),

   155                       data);

   156     g_signal_connect ((gpointer) data->window, "delete_event",

   157                       G_CALLBACK (on_debug_delete_event),

   158                       data);

   160     data->disasm_from = -1;

   161     data->disasm_to = -1;

   162     data->disasm_pc = -1;

   163     data->cpu = cpu_list[0];

   164     data->cpu_list = cpu_list;

   166     init_register_list( data );

   167     gtk_object_set_data( GTK_OBJECT(data->window), "debug_data", data );

   168     set_disassembly_pc( data, *data->cpu->pc, FALSE );

   169     debug_window_set_running( data, FALSE );

   171     gtk_widget_show_all( data->window );

   172     return data;

   173 }

   175 void debug_window_show( debug_window_t data, gboolean show )

   176 {

   177     if( show ) {

   178         gtk_widget_show( data->window );

   179     } else {

   180         gtk_widget_hide( data->window );

   181     }

   182 }

   184 int debug_window_get_selected_row( debug_window_t data )

   185 {

   186     if( data->disasm_list->selection == NULL ) {

   187         return -1;

   188     } else {

   189         return GPOINTER_TO_INT(data->disasm_list->selection->data);

   190     }

   191 }

   193 void init_register_list( debug_window_t data )

   194 {

   195     int i;

   196     char buf[20];

   197     char *arr[2];

   199     gtk_clist_clear( data->regs_list );

   200     arr[1] = buf;

   201     for( i=0; data->cpu->regs_info[i].name != NULL; i++ ) {

   202         arr[0] = data->cpu->regs_info[i].name;

   203         if( data->cpu->regs_info->type == REG_INT )

   204             sprintf( buf, "%08X", *((uint32_t *)data->cpu->regs_info[i].value) );

   205         else

   206             sprintf( buf, "%f", *((float *)data->cpu->regs_info[i].value) );

   207         gtk_clist_append( data->regs_list, arr );

   208     }

   209 }

   211 /*

   212  * Check for changed registers and update the display

   213  */

   214 void debug_window_update( debug_window_t data )

   215 {

   216     int i;

   217     for( i=0; data->cpu->regs_info[i].name != NULL; i++ ) {

   218         if( data->cpu->regs_info[i].type == REG_INT ) {

   219             /* Yes this _is_ probably fairly evil */

   220             if( *((uint32_t *)data->cpu->regs_info[i].value) !=

   221                 *((uint32_t *)((char *)data->saved_regs + ((char *)data->cpu->regs_info[i].value - (char *)data->cpu->regs))) ) {

   222                 char buf[20];

   223                 sprintf( buf, "%08X", *((uint32_t *)data->cpu->regs_info[i].value) );

   224                 gtk_clist_set_text( data->regs_list, i, 1, buf );

   225                 gtk_clist_set_foreground( data->regs_list, i, &gui_colour_changed );

   226             } else {

   227                 gtk_clist_set_foreground( data->regs_list, i, &gui_colour_normal );

   228             }

   229         } else {

   230             if( *((float *)data->cpu->regs_info[i].value) !=

   231                 *((float *)((char *)data->saved_regs + ((char *)data->cpu->regs_info[i].value - (char *)data->cpu->regs))) ) {

   232                 char buf[20];

   233                 sprintf( buf, "%f", *((float *)data->cpu->regs_info[i].value) );

   234                 gtk_clist_set_text( data->regs_list, i, 1, buf );

   235                 gtk_clist_set_foreground( data->regs_list, i, &gui_colour_changed );

   236             } else {

   237                 gtk_clist_set_foreground( data->regs_list, i, &gui_colour_normal );

   238             }

   239         }

   240     }

   242     set_disassembly_pc( data, *data->cpu->pc, TRUE );

   243     memcpy( data->saved_regs, data->cpu->regs, data->cpu->regs_size );

   244 }

   246 void set_disassembly_region( debug_window_t data, unsigned int page )

   247 {

   248     uint32_t i, posn, next;

   249     char buf[80];

   250     char addr[10];

   251     char opcode[16] = "";

   252     char *arr[4] = { addr, " ", opcode, buf };

   253     unsigned int from = page & 0xFFFFF000;

   254     unsigned int to = from + 4096;

   256     gtk_clist_clear(data->disasm_list);

   258     sprintf( addr, "%08X", from );

   259     gtk_entry_set_text( data->page_field, addr );

   261     if( !data->cpu->is_valid_page_func( from ) ) {

   262         arr[3] = (char *)_("This page is currently unmapped");

   263         gtk_clist_append( data->disasm_list, arr );

   264         gtk_clist_set_foreground( data->disasm_list, 0, &gui_colour_error );

   265     } else {

   266         for( i=from; i<to; i = next ) {

   267             next = data->cpu->disasm_func( i, buf, sizeof(buf), opcode );

   268             sprintf( addr, "%08X", i );

   269             posn = gtk_clist_append( data->disasm_list, arr );

   270             if( buf[0] == '?' )

   271                 gtk_clist_set_foreground( data->disasm_list, posn, &gui_colour_warn );

   272             if( data->cpu->get_breakpoint != NULL ) {

   273                 int type = data->cpu->get_breakpoint( i );

   274                 switch(type) {

   275                 case BREAK_ONESHOT:

   276                     gtk_clist_set_background( data->disasm_list, posn, &gui_colour_temp_break );

   277                     break;

   278                 case BREAK_KEEP:

   279                     gtk_clist_set_background( data->disasm_list, posn, &gui_colour_break );

   280                     break;

   281                 }

   282             }

   283         }

   284         if( data->disasm_pc != -1 && data->disasm_pc >= from && data->disasm_pc < to )

   285             gtk_clist_set_foreground( data->disasm_list, address_to_row(data, data->disasm_pc),

   286                     &gui_colour_pc );

   287     }

   289     if( page != from ) { /* not a page boundary */

   290         gtk_clist_moveto( data->disasm_list, (page-from)>>1, 0, 0.5, 0.0 );

   291     }

   292     data->disasm_from = from;

   293     data->disasm_to = to;

   294 }

   296 void jump_to_disassembly( debug_window_t data, unsigned int addr, gboolean select )

   297 {

   298     int row;

   300     if( addr < data->disasm_from || addr >= data->disasm_to )

   301         set_disassembly_region(data,addr);

   303     row = address_to_row( data, addr );

   304     if(select) {

   305         gtk_clist_select_row( data->disasm_list, row, 0 );

   306     }

   307     if( gtk_clist_row_is_visible( data->disasm_list, row ) != GTK_VISIBILITY_FULL ){

   308         gtk_clist_moveto( data->disasm_list, row, 0, 0.5, 0.0 );

   309     }

   310 }

   312 void jump_to_pc( debug_window_t data, gboolean select )

   313 {

   314     jump_to_disassembly( data, *data->cpu->pc, select );

   315 }

   317 void set_disassembly_pc( debug_window_t data, unsigned int pc, gboolean select )

   318 {

   319     int row;

   321     jump_to_disassembly( data, pc, select );

   322     if( data->disasm_pc != -1 && data->disasm_pc >= data->disasm_from &&

   323             data->disasm_pc < data->disasm_to )

   324         gtk_clist_set_foreground( data->disasm_list,

   325                 (data->disasm_pc - data->disasm_from) / data->cpu->instr_size,

   326                 &gui_colour_normal );

   327     row = address_to_row( data, pc );

   328     gtk_clist_set_foreground( data->disasm_list, row, &gui_colour_pc );

   329     data->disasm_pc = pc;

   330 }

   332 void set_disassembly_cpu( debug_window_t data, const gchar *cpu )

   333 {

   334     int i;

   335     for( i=0; data->cpu_list[i] != NULL; i++ ) {

   336         if( strcmp( data->cpu_list[i]->name, cpu ) == 0 ) {

   337             if( data->cpu != data->cpu_list[i] ) {

   338                 data->cpu = data->cpu_list[i];

   339                 data->disasm_from = data->disasm_to = -1; /* Force reload */

   340                 set_disassembly_pc( data, *data->cpu->pc, FALSE );

   341                 init_register_list( data );

   342             }

   343             return;

   344         }

   345     }

   346 }

   348 void debug_window_toggle_breakpoint( debug_window_t data, int row )

   349 {

   350     uint32_t pc = row_to_address( data, row );

   351     int oldType = data->cpu->get_breakpoint( pc );

   352     if( oldType != BREAK_NONE ) {

   353         data->cpu->clear_breakpoint( pc, oldType );

   354         gtk_clist_set_background( data->disasm_list, row, &gui_colour_white );

   355     } else {

   356         data->cpu->set_breakpoint( pc, BREAK_KEEP );

   357         gtk_clist_set_background( data->disasm_list, row, &gui_colour_break );

   358     }

   359 }

   361 void debug_window_set_oneshot_breakpoint( debug_window_t data, int row )

   362 {

   363     uint32_t pc = row_to_address( data, row );

   364     data->cpu->clear_breakpoint( pc, BREAK_ONESHOT );

   365     data->cpu->set_breakpoint( pc, BREAK_ONESHOT );

   366     gtk_clist_set_background( data->disasm_list, row, &gui_colour_temp_break );

   367 }

   369 /**

   370  * Execute a single instruction using the current CPU mode.

   371  */

   372 void debug_window_single_step( debug_window_t data )

   373 {

   374     data->cpu->step_func();

   375     gtk_gui_update();

   376 }

   378 uint32_t row_to_address( debug_window_t data, int row ) {

   379     return data->cpu->instr_size * row + data->disasm_from;

   380 }

   382 int address_to_row( debug_window_t data, uint32_t address ) {

   383     if( data->disasm_from > address || data->disasm_to <= address )

   384         return -1;

   385     return (address - data->disasm_from) / data->cpu->instr_size;

   386 }

   388 debug_window_t get_debug_info( GtkWidget *widget ) {

   390     GtkWidget *win = gtk_widget_get_toplevel(widget);

   391     debug_window_t data = (debug_window_t)gtk_object_get_data( GTK_OBJECT(win), "debug_data" );

   392     return data;

   393 }

   395 void debug_window_set_running( debug_window_t data, gboolean isRunning )

   396 {

   397     if( data != NULL ) {

   398         gtk_gui_enable_action( "SingleStep", !isRunning );

   399         gtk_gui_enable_action( "RunTo", !isRunning && dreamcast_can_run() );

   400     }

   401 }

   403 void on_mode_field_changed ( GtkEditable *editable, gpointer user_data)

   404 {

   405     const gchar *text = gtk_entry_get_text( GTK_ENTRY(editable) );

   406     set_disassembly_cpu( gtk_gui_get_debugger(), text );

   407 }

   410 gboolean on_page_field_key_press_event( GtkWidget * widget, GdkEventKey *event,

   411                                         gpointer user_data)

   412 {

   413     if( event->keyval == GDK_Return || event->keyval == GDK_Linefeed ) {

   414         debug_window_t data = get_debug_info(widget);

   415         const gchar *text = gtk_entry_get_text( GTK_ENTRY(widget) );

   416         gchar *endptr;

   417         unsigned int val = strtoul( text, &endptr, 16 );

   418         if( text == endptr ) { /* invalid input */

   419             char buf[10];

   420             sprintf( buf, "%08X", row_to_address(data,0) );

   421             gtk_entry_set_text( GTK_ENTRY(widget), buf );

   422         } else {

   423             set_disassembly_region(data, val);

   424         }

   425     }

   426     return FALSE;

   427 }

   430 void on_jump_pc_btn_clicked( GtkButton *button, gpointer user_data)

   431 {

   432     debug_window_t data = get_debug_info( GTK_WIDGET(button) );

   433     jump_to_pc( data, TRUE );

   434 }

   436 void on_disasm_list_select_row (GtkCList *clist, gint row, gint column,

   437                                 GdkEvent *event, gpointer user_data)

   438 {

   439     gtk_gui_enable_action( "SetBreakpoint", TRUE );

   440     gtk_gui_enable_action( "RunTo", dreamcast_can_run() );

   441 }

   443 void on_disasm_list_unselect_row (GtkCList *clist, gint row, gint column,

   444                                   GdkEvent *event, gpointer user_data)

   445 {

   446     gtk_gui_enable_action( "SetBreakpoint", FALSE );

   447     gtk_gui_enable_action( "RunTo", FALSE );

   448 }

   450 gboolean on_debug_delete_event(GtkWidget *widget, GdkEvent event, gpointer user_data)

   451 {

   452     gtk_widget_hide( widget );

   453     return TRUE;

   454 }