/**

  * $Id: gui.c,v 1.15 2007-10-08 11:48:56 nkeynes Exp $

  * 

  * Top-level GUI (GTK2) module.

  *

  * Copyright (c) 2005 Nathan Keynes.

  *

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

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

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

  * (at your option) any later version.

  *

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

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

  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

  * GNU General Public License for more details.

  */

 #include <stdlib.h>

 #include <stdarg.h>

 #include <gnome.h>

 #include <math.h>

 #include "dream.h"

 #include "dreamcast.h"

 #include "mem.h"

 #include "sh4/sh4dasm.h"

 #include "aica/armdasm.h"

 #include "gui/gui.h"

 #define REGISTER_FONT "-*-fixed-medium-r-normal--12-*-*-*-*-*-iso8859-1"

 GdkColor clrNormal, clrChanged, clrError, clrWarn, clrPC, clrDebug, clrTrace;

 GdkColor clrBreak, clrTempBreak, clrWhite;

 PangoFontDescription *fixed_list_font;

 debug_info_t main_debug = NULL;

 void open_file_callback(GtkWidget *btn, gint result, gpointer user_data);

 void gtk_gui_init( void );

 void gtk_gui_update( void );

 void gtk_gui_start( void );

 void gtk_gui_stop( void );

 uint32_t gtk_gui_run_slice( uint32_t nanosecs );

 struct dreamcast_module gtk_gui_module = { "Debugger", gtk_gui_init,

 					   gtk_gui_update, gtk_gui_start, 

 					   gtk_gui_run_slice, 

 					   gtk_gui_stop, 

 					   NULL, NULL };

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

 void gtk_gui_init() {

     GdkColormap *map;

     clrNormal.red = clrNormal.green = clrNormal.blue = 0;

     clrChanged.red = clrChanged.green = 64*256;

     clrChanged.blue = 154*256;

     clrError.red = 65535;

     clrError.green = clrError.blue = 64*256;

     clrPC.red = 32*256;

     clrPC.green = 170*256;

     clrPC.blue = 52*256;

     clrWarn = clrChanged;

     clrTrace.red = 156*256;

     clrTrace.green = 78*256;

     clrTrace.blue = 201*256;

     clrDebug = clrPC;

     clrBreak.red = 65535;

     clrBreak.green = clrBreak.blue = 192*256;

     clrTempBreak.red = clrTempBreak.green = 128*256;

     clrTempBreak.blue = 32*256;

     clrWhite.red = clrWhite.green = clrWhite.blue = 65535;

     map = gdk_colormap_new(gdk_visual_get_best(), TRUE);

     gdk_colormap_alloc_color(map, &clrNormal, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrChanged, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrError, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrWarn, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrPC, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrDebug, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrTrace, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrBreak, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrTempBreak, TRUE, TRUE);

     gdk_colormap_alloc_color(map, &clrWhite, TRUE, TRUE);

     fixed_list_font = pango_font_description_from_string("Courier 10");

 }

 void gtk_gui_show_debugger()

 {

     GtkWidget *debug_win = create_debug_win ();

     main_debug = init_debug_win(debug_win, cpu_descs);

     init_mmr_win();

     gtk_widget_show (debug_win);

 }    

 /**

  * Hook called when DC starts running. Just disables the run/step buttons

  * and enables the stop button.

  */

 void gtk_gui_start( void )

 {

     debug_win_set_running( main_debug, TRUE );

 }

 /**

  * Hook called when DC stops running. Enables the run/step buttons

  * and disables the stop button.

  */

 void gtk_gui_stop( void )

 {

     debug_win_set_running( main_debug, FALSE );

     gtk_gui_update();

 }

 uint32_t gtk_gui_nanos = 0;

 uint32_t gtk_gui_run_slice( uint32_t nanosecs ) 

 {

     gtk_gui_nanos += nanosecs;

     if( gtk_gui_nanos > 10000000 ) { /* About 10/sec */

 	gtk_gui_nanos = 0;

 	while( gtk_events_pending() )

 	    gtk_main_iteration();

 	update_icount(main_debug);

     }

     return nanosecs;

 }

 void gtk_gui_update(void) {

     if( main_debug != NULL ) {

 	update_registers(main_debug);

 	update_icount(main_debug);

 	update_mmr_win();

 	dump_win_update_all();

     }

 }

 void open_file_callback(GtkWidget *btn, gint result, gpointer user_data) {

     GtkFileChooser *file = GTK_FILE_CHOOSER(user_data);

     if( result == GTK_RESPONSE_ACCEPT ) {

 	gchar *filename =gtk_file_chooser_get_filename(

 						       GTK_FILE_CHOOSER(file) );

 	file_callback_t action = (file_callback_t)gtk_object_get_data( GTK_OBJECT(file), "file_action" );

 	gtk_widget_destroy(GTK_WIDGET(file));

 	action( filename );

 	g_free(filename);

     } else {

 	gtk_widget_destroy(GTK_WIDGET(file));

     }

 }

 static void add_file_pattern( GtkFileChooser *chooser, char *pattern, char *patname )

 {

     if( pattern != NULL ) {

 	GtkFileFilter *filter = gtk_file_filter_new();

 	gtk_file_filter_add_pattern( filter, pattern );

 	gtk_file_filter_set_name( filter, patname );

 	gtk_file_chooser_add_filter( chooser, filter );

 	filter = gtk_file_filter_new();

 	gtk_file_filter_set_name( filter, "All files" );

 	gtk_file_filter_add_pattern( filter, "*" );

 	gtk_file_chooser_add_filter( chooser, filter );

     }

 }

 void open_file_dialog( char *title, file_callback_t action, char *pattern, char *patname,

 		       gchar const *initial_dir )

 {

     GtkWidget *file;

     file = gtk_file_chooser_dialog_new( title, NULL,

 					GTK_FILE_CHOOSER_ACTION_OPEN,

 					GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,

 					GTK_STOCK_OPEN, GTK_RESPONSE_ACCEPT,

 					NULL );

     add_file_pattern( GTK_FILE_CHOOSER(file), pattern, patname );

     g_signal_connect( GTK_OBJECT(file), "response", 

 		      GTK_SIGNAL_FUNC(open_file_callback), file );

     gtk_object_set_data( GTK_OBJECT(file), "file_action", action );

     gtk_file_chooser_set_current_folder( GTK_FILE_CHOOSER(file), initial_dir );

     gtk_widget_show( file );

 }

 void save_file_dialog( char *title, file_callback_t action, char *pattern, char *patname,

 		       gchar const *initial_dir )

 {

     GtkWidget *file;

     file = gtk_file_chooser_dialog_new( title, NULL,

 					GTK_FILE_CHOOSER_ACTION_SAVE,

 					GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,

 					GTK_STOCK_SAVE, GTK_RESPONSE_ACCEPT,

 					NULL );

     add_file_pattern( GTK_FILE_CHOOSER(file), pattern, patname );

     g_signal_connect( GTK_OBJECT(file), "response", 

 		      GTK_SIGNAL_FUNC(open_file_callback), file );

     gtk_object_set_data( GTK_OBJECT(file), "file_action", action );

     gtk_file_chooser_set_current_folder( GTK_FILE_CHOOSER(file), initial_dir );

     gtk_widget_show( file );

 }

 uint32_t gtk_entry_get_hex_value( GtkEntry *entry, uint32_t defaultValue )

 {

     const gchar *text = gtk_entry_get_text(entry);

     if( text == NULL )

         return defaultValue;

     gchar *endptr;

     uint32_t value = strtoul( text, &endptr, 16 );

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

         value = defaultValue;

         gtk_entry_set_hex_value( entry, value );

     }

     return value;

 }

 void gtk_entry_set_hex_value( GtkEntry *entry, uint32_t value )

 {

     char buf[10];

     sprintf( buf, "%08X", value );

     gtk_entry_set_text( entry, buf );

 }