/**

  * $Id$

  *

  * Implements the MMIO register viewing window

  *

  * 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 <stdint.h>

 #include <string.h>

 #include "gtkui/gtkui.h"

 #include "mem.h"

 #include "mmio.h"

 struct mmio_window_info {

     GtkWidget *window;

     GtkWidget *notebook;

 };

 static void printbits( char *out, int nbits, uint32_t value )

 {

     if( nbits < 32 ) {

         int i;

         for( i=32; i>nbits; i-- ) {

             if( !(i % 8) ) *out++ = ' ';

             *out++ = ' ';

         }

     }

     while( nbits > 0 ) {

         *out++ = (value&(1<<--nbits) ? '1' : '0');

         if( !(nbits % 8) ) *out++ = ' ';

     }

     *out = '\0';

 }

 static void printhex( char *out, int nbits, uint32_t value )

 {

     char tmp[10], *p = tmp;

     int i;

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

     for( i=32; i>0; i-=4, p++ ) {

         if( i <= nbits ) *out++ = *p;

         else *out++ = ' ';

     }

     *out = '\0';

 }

 gboolean

 on_mmio_delete_event                (GtkWidget       *widget,

                                      GdkEvent        *event,

                                      gpointer         user_data)

 {

     gtk_widget_hide(widget);

     return TRUE;

 }

 void on_mmio_close_clicked( GtkButton *button, gpointer user_data)

 {

     gtk_widget_hide( ((mmio_window_t)user_data)->window );

 }

 void on_trace_button_toggled           (GtkToggleButton *button,

                                         gpointer user_data)

 {

     struct mmio_region *io_rgn = (struct mmio_region *)user_data;

     gboolean isActive = gtk_toggle_button_get_active(button);

     if( io_rgn != NULL ) {

         io_rgn->trace_flag = isActive ? 1 : 0;

     }

 }

 static GtkCList *mmio_window_add_page( mmio_window_t mmio, char *name, struct mmio_region *io_rgn )

 {

     GtkCList *list;

     GtkWidget *scroll;

     GtkWidget *tab;

     GtkCheckButton *trace_button;

     GtkVBox *vbox;

     scroll = gtk_scrolled_window_new(NULL, NULL);

     gtk_scrolled_window_set_policy( GTK_SCROLLED_WINDOW(scroll),

                                     GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS );

     list = GTK_CLIST(gtk_clist_new(5));

     gtk_clist_set_column_width(list, 0, 70);

     gtk_clist_set_column_width(list, 1, 75);

     gtk_clist_set_column_width(list, 2, 70);

     gtk_clist_set_column_width(list, 3, 280);

     gtk_clist_set_column_width(list, 4, 160);

     gtk_clist_set_column_justification(list, 0, GTK_JUSTIFY_CENTER );

     gtk_clist_set_column_justification(list, 2, GTK_JUSTIFY_CENTER );

     gtk_clist_set_column_justification(list, 3, GTK_JUSTIFY_CENTER );

     gtk_clist_set_column_title(list, 0, _("Address"));

     gtk_clist_set_column_title(list, 1, _("Register"));

     gtk_clist_set_column_title(list, 2, _("Value"));

     gtk_clist_set_column_title(list, 3, _("Bit Pattern"));

     gtk_clist_set_column_title(list, 4, _("Description"));

     gtk_clist_column_titles_show(list);

     gtk_widget_modify_font( GTK_WIDGET(list), gui_fixed_font );

     tab = gtk_label_new(_(name));

     gtk_container_add( GTK_CONTAINER(scroll), GTK_WIDGET(list) );

     vbox = GTK_VBOX(gtk_vbox_new( FALSE, 0 ));

     gtk_container_add( GTK_CONTAINER(vbox), GTK_WIDGET(scroll) );

     trace_button = GTK_CHECK_BUTTON(gtk_check_button_new_with_label(_("Trace access")));

     if( io_rgn != NULL ) {

         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(trace_button), 

                 io_rgn->trace_flag ? TRUE : FALSE);

     }

     gtk_container_add( GTK_CONTAINER(vbox), GTK_WIDGET(trace_button) );

     gtk_box_set_child_packing( GTK_BOX(vbox), GTK_WIDGET(trace_button), 

                                FALSE, FALSE, 0, GTK_PACK_START );

     gtk_notebook_append_page( GTK_NOTEBOOK(mmio->notebook), GTK_WIDGET(vbox), tab );

     gtk_object_set_data( GTK_OBJECT(mmio->window), name, list );

     g_signal_connect ((gpointer) trace_button, "toggled",

                       G_CALLBACK (on_trace_button_toggled),

                       io_rgn);

     return list;

 }

 mmio_window_t mmio_window_new( const gchar *title )

 {

     mmio_window_t mmio = g_malloc0( sizeof(struct mmio_window_info) );

     int i, j;

     GtkCList *all_list;

     GtkWidget *vbox1;

     GtkWidget *hbuttonbox1;

     GtkWidget *mmr_close;

     mmio->window = gtk_window_new (GTK_WINDOW_TOPLEVEL);

     gtk_window_set_title (GTK_WINDOW (mmio->window), title);

     gtk_window_set_default_size (GTK_WINDOW (mmio->window), 600, 600);

     vbox1 = gtk_vbox_new (FALSE, 0);

     gtk_container_add (GTK_CONTAINER (mmio->window), vbox1);

     mmio->notebook = gtk_notebook_new ();

     gtk_box_pack_start (GTK_BOX (vbox1), mmio->notebook, TRUE, TRUE, 0);

     gtk_notebook_set_tab_pos (GTK_NOTEBOOK (mmio->notebook), GTK_POS_LEFT);

     hbuttonbox1 = gtk_hbutton_box_new ();

     gtk_box_pack_start (GTK_BOX (vbox1), hbuttonbox1, FALSE, TRUE, 0);

     gtk_box_set_spacing (GTK_BOX (hbuttonbox1), 30);

     mmr_close = gtk_button_new_with_mnemonic (_("Close"));

     gtk_container_add (GTK_CONTAINER (hbuttonbox1), mmr_close);

     GTK_WIDGET_SET_FLAGS (mmr_close, GTK_CAN_DEFAULT);

     /* Add the mmio register data */

     all_list = mmio_window_add_page( mmio, "All", NULL );

     for( i=0; i < num_io_rgns; i++ ) {

         GtkCList *list = mmio_window_add_page( mmio, io_rgn[i]->id, io_rgn[i] );

         for( j=0; io_rgn[i]->ports[j].id != NULL; j++ ) {

             int sz = io_rgn[i]->ports[j].width;

             char addr[10], data[10], bits[40];

             char *arr[] = { addr, io_rgn[i]->ports[j].id, data, bits,

                     io_rgn[i]->ports[j].desc };

             sprintf( addr, "%08X",

                      io_rgn[i]->base + io_rgn[i]->ports[j].offset );

             printhex( data, sz, *io_rgn[i]->ports[j].val );

             printbits( bits, io_rgn[i]->ports[j].width,

                        *io_rgn[i]->ports[j].val );

             gtk_clist_append( list, arr );

             gtk_clist_append( all_list, arr );

         }

     }

     g_signal_connect ((gpointer) mmio->window, "delete_event",

                       G_CALLBACK (on_mmio_delete_event),

                       NULL);

     g_signal_connect ((gpointer) mmr_close, "clicked",

                       G_CALLBACK (on_mmio_close_clicked),

                       mmio);

     gtk_widget_show_all( mmio->window );

     return mmio;

 }

 void mmio_window_update( mmio_window_t mmio )

 {

     int i,j, count = 0;

     GtkCList *page, *all_page;

     char data[10], bits[40];

     all_page = GTK_CLIST(gtk_object_get_data( GTK_OBJECT(mmio->window), "All" ));

     for( i=0; i < num_io_rgns; i++ ) {

         page = GTK_CLIST(gtk_object_get_data( GTK_OBJECT(mmio->window),

                 io_rgn[i]->id ));

         for( j=0; io_rgn[i]->ports[j].id != NULL; j++ ) {

             if( *io_rgn[i]->ports[j].val !=

                 *(uint32_t *)(io_rgn[i]->save_mem+io_rgn[i]->ports[j].offset)){

                 int sz = io_rgn[i]->ports[j].width;

                 /* Changed */

                 printhex( data, sz, *io_rgn[i]->ports[j].val );

                 printbits( bits, sz, *io_rgn[i]->ports[j].val );

                 gtk_clist_set_text( page, j, 2, data );

                 gtk_clist_set_text( page, j, 3, bits );

                 gtk_clist_set_foreground( page, j, &gui_colour_changed );

                 gtk_clist_set_text( all_page, count, 2, data );

                 gtk_clist_set_text( all_page, count, 3, bits );

                 gtk_clist_set_foreground( all_page, count, &gui_colour_changed );

             } else {

                 gtk_clist_set_foreground( page, j, &gui_colour_normal );

                 gtk_clist_set_foreground( all_page, count, &gui_colour_normal );

             }

             count++;

         }

         memcpy( io_rgn[i]->save_mem, io_rgn[i]->mem, LXDREAM_PAGE_SIZE );

     }

 }

 void mmio_window_show( mmio_window_t mmio, gboolean show )

 {

     if( show ) {

         gtk_widget_show( mmio->window );

     } else {

         gtk_widget_hide( mmio->window );

     }

 }