Add option no-define to AM_INIT_AUTOMAKE
[emu8051.git] / src / gtk / memwin.c
index 58ce1d2..96be0b5 100644 (file)
@@ -4,19 +4,7 @@
  * Copyright (C) 1999 Jonathan St-AndrĂ©
  * Copyright (C) 1999 Hugo Villeneuve <hugo@hugovil.com>
  *
- * 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.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
+ * This file is released under the GPLv2
  */
 
 #if HAVE_CONFIG_H
 #endif
 
 #include <stdio.h>
+#include <stdint.h>
+#include <stdbool.h>
 #include <ctype.h> /* For isprint */
+#include <zlib.h> /* For crc32 routine */
 
 #include "common.h"
 #include "memory.h"
@@ -32,8 +23,9 @@
 #include "cpu8051.h"
 #include "regwin.h"
 #include "memwin.h"
-#include "emugtk.h"
+#include "main.h"
 #include "options.h"
+#include "log.h"
 #include "app-config.h"
 
 extern struct app_config_t *cfg;
@@ -42,14 +34,22 @@ extern struct options_t options;
 static int COL_ASCII;
 static int N_COLUMNS;
 
-enum
-{
+enum {
        COL_ADDRESS = 0,
        COL_DATA0,
 };
 
-static GtkWidget *memlist_internal;
-static GtkWidget *memlist_external;
+/* Contains informations for the two different memory window types. */
+struct memwin_infos_t {
+       GtkWidget *memlist;
+       int data_rows;
+       uint32_t *crc;
+       int crc_init;
+};
+
+static struct memwin_infos_t memwin_infos_internal;
+static struct memwin_infos_t memwin_infos_external;
+static struct memwin_infos_t *memwin_infos;
 
 /* Creating a model */
 static GtkListStore *
@@ -79,68 +79,72 @@ memwin_cell_edited(GtkCellRendererText *cell, gchar *path_string,
                   gchar *new_str, gpointer model)
 {
        guint column;
-       guint memory_id;
+       enum mem_id_t memory_id;
        gpointer columnptr;
        gpointer memory_id_ptr;
        GtkTreeIter iter;
        int address;
-       u_int8_t old;
+       uint8_t old;
        int new;
        char *str;
 
-       if (!model) {
-               g_error("Unable to get model from cell renderer");
-       }
+       if (!model)
+               log_err("Unable to get model from cell renderer");
 
        /* Column number is passed as renderer object data */
-        columnptr = g_object_get_data(G_OBJECT(cell), "column");
-        column = GPOINTER_TO_UINT(columnptr);
+       columnptr = g_object_get_data(G_OBJECT(cell), "column");
+       column = GPOINTER_TO_UINT(columnptr);
 
        /* Memory ID  is passed as renderer object data */
        memory_id_ptr = g_object_get_data(G_OBJECT(cell), "memory_id");
        memory_id = GPOINTER_TO_UINT(memory_id_ptr);
 
        /* Get the iterator */
-        gtk_tree_model_get_iter_from_string(model, &iter, path_string);
+       gtk_tree_model_get_iter_from_string(model, &iter, path_string);
 
        /* Get base address. */
        gtk_tree_model_get(model, &iter, COL_ADDRESS, &str, -1);
+
+       /* No need to check error, has already been validated. */
        address = asciihex2int(str);
 
        /* Convert column number (1, 2, 3...) to index (0, 1, 2...) */
        address += (column - COL_DATA0);
-       old = memory_read8(memory_id, address);
+       old = mem_read8(memory_id, address);
 
        log_info("Address: $%02X", address);
        log_info("  old value: $%02X", old);
 
        /* Convert new value (asciihex) to integer. */
        new = asciihex2int(new_str);
-       if ((new < 0) || (new > 255)) {
-               log_info("  new value: out of range");
-               new = old; /* Put back old value... */
+       if (asciihex2int_get_error()) {
+               log_warn("  new value: invalid");
+               return;
+       } else if ((new < 0) || (new > 255)) {
+               log_warn("  new value: out of range");
+               return;
        } else {
                log_info("  new value: $%02X", new);
        }
 
        /* Store new value in emulator memory. */
-       memory_write8(memory_id, address, new);
+       mem_write8(memory_id, address, new);
 
        /* Convert to text. */
        int2asciihex(new, str, 2);
 
        /* Store new value in gtk model. */
-        gtk_list_store_set(GTK_LIST_STORE(model), &iter, column, str, -1);
+       gtk_list_store_set(GTK_LIST_STORE(model), &iter, column, str, -1);
 
        /*
         * Make sure to update all registers and memory.
         * For example, BANKed registers depends on internal memory.
         */
-       emugtk_UpdateDisplay();
+       emugtk_update_display();
 };
 
 static void
-memwin_init_columns(GtkWidget *listview, int memory_id)
+memwin_init_columns(GtkWidget *listview, enum mem_id_t memory_id)
 {
        int i;
        GtkCellRenderer *renderer;
@@ -155,7 +159,7 @@ memwin_init_columns(GtkWidget *listview, int memory_id)
        gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_AUTOSIZE);
        gtk_tree_view_append_column(GTK_TREE_VIEW(listview), column);
 
-       for (i = COL_DATA0; i < (COL_DATA0 + cfg->bits_per_row); i++) {
+       for (i = COL_DATA0; i < (COL_DATA0 + cfg->bytes_per_row); i++) {
                char col_name[8];
 
                /* Create new renderer for each editable cell. */
@@ -169,14 +173,14 @@ memwin_init_columns(GtkWidget *listview, int memory_id)
                                 gtk_tree_view_get_model(
                                         GTK_TREE_VIEW(listview)));
 
-               /* Add column index and memory_id, used when editing the cell. */
+               /* Add column index and memory_id, used when editing the cell */
                g_object_set_data(G_OBJECT(renderer), "column",
                                  GUINT_TO_POINTER(i));
                g_object_set_data(G_OBJECT(renderer), "memory_id",
                                  GUINT_TO_POINTER(memory_id));
 
                /* Use two digits only if DATA_ROWS > 10 */
-               if (cfg->bits_per_row < 10)
+               if (cfg->bytes_per_row < 10)
                        sprintf(col_name, "B%1d", i - COL_DATA0);
                else
                        sprintf(col_name, "B%02d", i - COL_DATA0);
@@ -197,33 +201,48 @@ memwin_init_columns(GtkWidget *listview, int memory_id)
        gtk_tree_view_append_column(GTK_TREE_VIEW(listview), column);
 }
 
-static int
-compute_data_rows(int memory_id)
+static void
+memwin_infos_select(enum mem_id_t memory_id)
 {
-       int data_rows;
-
        if (memory_id == INT_MEM_ID) {
-               data_rows = options.iram_size / cfg->bits_per_row;
+               log_debug("memory ID = INTERNAL");
+               memwin_infos = &memwin_infos_internal;
        } else if (memory_id == EXT_MEM_ID) {
-               data_rows = options.xram_size / cfg->bits_per_row;
+               log_debug("memory ID = EXTERNAL");
+               memwin_infos = &memwin_infos_external;
        } else {
                log_fail("Invalid memory type");
                exit(1);
        }
+}
 
-       return data_rows;
+static void
+compute_data_rows(int memory_id)
+{
+       if (memory_id == INT_MEM_ID)
+               memwin_infos->data_rows = options.iram_size /
+                       cfg->bytes_per_row;
+       else if (memory_id == EXT_MEM_ID)
+               memwin_infos->data_rows = options.xram_size /
+                       cfg->bytes_per_row;
+
+       if (memwin_infos->crc)
+               free(memwin_infos->crc);
+
+       memwin_infos->crc = malloc(memwin_infos->data_rows * sizeof(uint32_t));
+       memwin_infos->crc_init = false;
 }
 
 GtkWidget *
-memwin_init(char *title, int memory_id)
+memwin_init(char *title, enum mem_id_t memory_id)
 {
        GtkWidget *frame;
        GtkWidget *scrollwin;
        GtkListStore *store;
-       GtkWidget *memlist;
-       int data_rows;
 
-       COL_ASCII = cfg->bits_per_row + 1;
+       log_debug("memwin_init");
+
+       COL_ASCII = cfg->bytes_per_row + 1;
        N_COLUMNS = COL_ASCII + 1;
 
        frame = gtk_frame_new(title);
@@ -239,26 +258,20 @@ memwin_init(char *title, int memory_id)
 
        gtk_container_add(GTK_CONTAINER(frame), scrollwin);
 
-       data_rows = compute_data_rows(memory_id);
+       memwin_infos_select(memory_id);
+       compute_data_rows(memory_id);
 
        /* Creating a model */
-       store = memwin_init_store(data_rows);
+       store = memwin_init_store(memwin_infos->data_rows);
 
        /* Creating the view component */
-       memlist = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
-       gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(memlist), TRUE);
-       gtk_container_add(GTK_CONTAINER(scrollwin), memlist);
-
-       if (memory_id == INT_MEM_ID) {
-               memlist_internal = memlist;
-       } else if (memory_id == EXT_MEM_ID) {
-               memlist_external = memlist;
-       } else {
-               log_fail("Invalid memory type");
-               exit(1);
-       }
+       memwin_infos->memlist = gtk_tree_view_new_with_model(
+               GTK_TREE_MODEL(store));
+       gtk_tree_view_set_headers_visible(
+               GTK_TREE_VIEW(memwin_infos->memlist), TRUE);
+       gtk_container_add(GTK_CONTAINER(scrollwin), memwin_infos->memlist);
 
-       memwin_init_columns(memlist, memory_id);
+       memwin_init_columns(memwin_infos->memlist, memory_id);
 
        /*
         * The tree view has acquired its own reference to the model, so we can
@@ -270,35 +283,54 @@ memwin_init(char *title, int memory_id)
        return frame;
 }
 
+/*
+ * Use CRC to detect which rows have changed. This is only to
+ * improve performance when using stepping mode, as we then only update
+ * rows which have been modified.
+ */
+static int
+memwin_row_changed(enum mem_id_t memory_id, int row, unsigned int address)
+{
+       int row_changed;
+       uint32_t crc_new = 0;
+       uint8_t *buf8;
+
+       buf8 = mem_getbuf(memory_id, address);
+       crc_new = crc32(0L, Z_NULL, 0);
+       crc_new = crc32(crc_new, buf8, cfg->bytes_per_row);
+
+       if ((memwin_infos->crc_init) &&
+           (crc_new == memwin_infos->crc[row])) {
+               row_changed = false;
+       } else {
+               memwin_infos->crc[row] = crc_new;
+               log_debug("  Row %02d value(s) change", row);
+               row_changed = true;
+       }
+
+       return row_changed;
+}
+
 /* Dump internal or external memory. */
 void
-memwin_refresh(int memory_id)
+memwin_refresh(enum mem_id_t memory_id)
 {
        int row;
-       unsigned int Address;
+       unsigned int address = 0;
        GtkListStore *store;
-       GtkWidget *memlist;
-       int data_rows;
 
-       Address = 0;
+       log_debug("memwin_refresh");
 
-       data_rows = compute_data_rows(memory_id);
+       memwin_infos_select(memory_id);
 
-       if (memory_id == INT_MEM_ID) {
-               memlist = memlist_internal;
-       } else if (memory_id == EXT_MEM_ID) {
-               memlist = memlist_external;
-       } else {
-               log_fail("Invalid memory type");
-               exit(1);
-       }
-
-       store = GTK_LIST_STORE(gtk_tree_view_get_model(GTK_TREE_VIEW(memlist)));
+       store = GTK_LIST_STORE(gtk_tree_view_get_model(
+                                      GTK_TREE_VIEW(memwin_infos->memlist)));
 
-       for (row = 0; row < data_rows; row++) {
+       for (row = 0; row < memwin_infos->data_rows;
+            row++, address += cfg->bytes_per_row) {
                int valid;
                GtkTreeIter iter;
-               char str[4+1]; /* Maximum str len is for address column (4 digits) */
+               char str[4+1]; /* Max. str len for address column (4 digits) */
                char ascii_str[16+1]; /* Maximum 16 data columns. */
                int col;
 
@@ -313,34 +345,40 @@ memwin_refresh(int memory_id)
                }
 
                if (!valid) {
-                       printf("Invalid iter...\n");
+                       log_err("Tree model: invalid iter");
                        return;
                }
 
-               /* Display base address. */
-               int2asciihex(Address, str, 4);
-
-               gtk_list_store_set(store, &iter, COL_ADDRESS, str, -1);
+               /* Only update row if it has been modified. */
+               if (memwin_row_changed(memory_id, row, address)) {
+                       /* Display base address. */
+                       int2asciihex(address, str, 4);
 
-               for (col = 0; col < cfg->bits_per_row; col++) {
-                       u_int8_t data;
+                       gtk_list_store_set(store, &iter, COL_ADDRESS, str, -1);
 
-                       data = memory_read8(memory_id, Address + col);
+                       for (col = 0; col < cfg->bytes_per_row; col++) {
+                               uint8_t data;
 
-                       /* Display hex data */
-                       int2asciihex(data, str, 2);
+                               data = mem_read8(memory_id, address + col);
 
-                       gtk_list_store_set(store, &iter, col + 1, str, -1);
+                               /* Display hex data */
+                               int2asciihex(data, str, 2);
 
-                       /* Append to ASCII string (if applicable). */
-                       if (!isprint(data))
-                               data = '.';
-                       sprintf(&ascii_str[col], "%c", data);
-               }
+                               gtk_list_store_set(store, &iter, col + 1, str,
+                                                  -1);
 
-               /* Display ASCII characters. */
-               gtk_list_store_set(store, &iter, COL_ASCII, ascii_str, -1);
+                               /* Append to ASCII string (if applicable). */
+                               if (!isprint(data))
+                                       data = '.';
+                               sprintf(&ascii_str[col], "%c", data);
+                       }
 
-               Address += cfg->bits_per_row;
+                       /* Display ASCII characters. */
+                       gtk_list_store_set(store, &iter, COL_ASCII, ascii_str,
+                                          -1);
+               }
        }
+
+       /* At this point we know all rows crc have been initialized. */
+       memwin_infos->crc_init = true;
 }