#include <stdint.h>

#include <gnome.h>

#include "interface.h"

#include "gui.h"

#include "mem.h"

#include "mmio.h"

GtkWidget *mmr_win;

GtkNotebook *mmr_book;

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';

}

static GtkCList *create_mmr_page( char *name )

{

    GtkCList *list;

    GtkWidget *scroll;

    GtkWidget *tab;

    scroll = gtk_scrolled_window_new(NULL, NULL);

    gtk_widget_show( scroll );

    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, 60);

    gtk_clist_set_column_width(list, 1, 50);

    gtk_clist_set_column_width(list, 2, 60);

    gtk_clist_set_column_width(list, 3, 220);

    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_set_style( GTK_WIDGET(list), fixed_list_style );

    gtk_widget_show( GTK_WIDGET(list) );

    tab = gtk_label_new(_(name));

    gtk_widget_show( tab );

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

    gtk_notebook_append_page( mmr_book, scroll, tab );

    gtk_object_set_data( GTK_OBJECT(mmr_win), name, list );

    return list;

}

void update_mmr_win( void )

{

    int i,j, count = 0;

    GtkCList *page, *all_page;

    char data[10], bits[40];

    all_page = GTK_CLIST(gtk_object_get_data( GTK_OBJECT(mmr_win), "All" ));

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

        page = GTK_CLIST(gtk_object_get_data( GTK_OBJECT(mmr_win),

                                              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, &clrChanged );

                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, &clrChanged );

            } else {

                gtk_clist_set_foreground( page, j, &clrNormal );

                gtk_clist_set_foreground( all_page, count, &clrNormal );

            }

            count++;

        }

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

    }

}

void init_mmr_win( void )

{

    int i, j;

    GtkCList *all_list;

    mmr_win = create_mmr_win();

    mmr_book = GTK_NOTEBOOK( gtk_object_get_data( GTK_OBJECT(mmr_win), "mmr_notebook" ));

    /* kill the dummy page glade insists on adding */

    gtk_notebook_remove_page( mmr_book, 0 );

    all_list = create_mmr_page( "All" );

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

        GtkCList *list = create_mmr_page( io_rgn[i]->id );

        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 );

        }

    }

}

void mmr_open_win( void )

{

    gtk_widget_show( mmr_win );

}

void mmr_close_win( void )

{

    gtk_widget_hide( mmr_win );

}