- int i;
- GtkWidget *fixed_frame;
-
- fixed_frame = gtk_frame_new(0);
- gtk_frame_set_shadow_type( GTK_FRAME( fixed_frame ), GTK_SHADOW_ETCHED_OUT );
- gtk_widget_set_usize( GTK_WIDGET( fixed_frame ), width, height );
-
- regclist = gtk_clist_new( 1 );
- gtk_clist_set_selection_mode( GTK_CLIST( regclist ), GTK_SELECTION_SINGLE );
- gtk_widget_set_usize( GTK_WIDGET( regclist ), width, height );
- gtk_clist_set_column_justification( GTK_CLIST( regclist ), 0, GTK_JUSTIFY_LEFT );
- gtk_clist_set_column_width( GTK_CLIST( regclist ), 0, width );
-
-#if ( GTK_MAJOR_VERSION == 2)
- PangoFontDescription *pango_font;
- pango_font = pango_font_description_from_string( FIXED_FONT );
- gtk_widget_modify_font( regclist, pango_font );
-#else
- {
- GtkStyle *style;
- /* Setting font for the widget. */
- style = gtk_style_new();
- gdk_font_unref( style->font );
-
- /* Load a fixed font */
- style->font = gdk_font_load( FIXED_FONT );
- gtk_widget_set_style( GTK_WIDGET( regclist ), style );
- }
-#endif
+ if (width == 2)
+ return cpu8051_ReadD(addr);
+ else if (width == 4) {
+ /* Address is low address. */
+ return (cpu8051_ReadD(addr + 1) << 8) +
+ cpu8051_ReadD(addr);
+ } else
+ return 0xFFFFFFFF;
+}
+
+static void
+regwin_write(int addr, int val, int width)
+{
+ if (width == 2)
+ cpu8051_WriteD(addr, (u_int8_t) val);
+ else if (width == 4) {
+ /* Address is low address. */
+ cpu8051_WriteD(addr + 1, (u_int8_t) ((val & 0x0000FFFF) >> 8));
+ cpu8051_WriteD(addr, (u_int8_t) val);
+ }
+};
+
+/* Specific read/write functions for special registers. */
+
+static unsigned int
+regwin_read_pc(int dummy)
+{
+ return cpu8051.pc;
+}
+
+static void
+regwin_write_pc(int param, int val)
+{
+ cpu8051.pc = (u_int16_t) val;
+}
+
+static unsigned int
+regwin_read_bank(int dummy)
+{
+ return BANKPSW >> 3;
+}
+
+static void
+regwin_write_bank(int param, int bank_number)
+{
+ u_int8_t psw = cpu8051_ReadD(_PSW_);
+
+ if ((bank_number < 0) || (bank_number > 3)) {
+ log_info("Error: invalid bank number: %d", bank_number);
+ bank_number = 0;
+ }
+
+ cpu8051_WriteD(_PSW_, (psw & ~0x18) | (bank_number << 3));
+}
+
+/* Read R0 - R7 in current bank. */
+static unsigned int
+regwin_read_rx(int offset)
+{
+ return cpu8051_ReadD(BANKPSW + offset);
+}
+
+static void
+regwin_write_rx(int offset, int val)
+{
+ cpu8051_WriteD(BANKPSW + offset, (u_int8_t) val);
+}
+
+/* This array defines how to read value for each register. */
+static struct regwin_infos_t regwin_infos[DATA_ROWS] = {
+ {
+ "PC",
+ HEX_DIGITS_4,
+ regwin_read_pc, regwin_write_pc,
+ 0, /* Dummy */
+ },
+ {
+ "SP",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _SP_,
+ },
+ {
+ "A",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _ACC_,
+ },
+ {
+ "B",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _B_,
+ },
+ {
+ "DPTR",
+ HEX_DIGITS_4,
+ NULL, NULL,
+ _DPL_,
+ },
+ {
+ "PSW",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _PSW_,
+ },
+ {
+ "P0",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _P0_,
+ },
+ {
+ "P1",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _P1_,
+ },
+ {
+ "P2",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _P2_,
+ },
+ {
+ "P3",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _P3_,
+ },
+ {
+ "TCON",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _TCON_,
+ },
+ {
+ "TMOD",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _TMOD_,
+ },
+ {
+ "SCON",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _SCON_,
+ },
+ {
+ "IE",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _IE_,
+ },
+ {
+ "IP",
+ HEX_DIGITS_2,
+ NULL, NULL,
+ _IP_,
+ },
+ {
+ "BANK",
+ HEX_DIGITS_2,
+ regwin_read_bank, regwin_write_bank,
+ 0, /* Dummy */
+ },
+ /* R0-R7 Registers in current Bank */
+ {
+ "R0",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R0_,
+ },
+ {
+ "R1",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R1_,
+ },
+ {
+ "R2",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R2_,
+ },
+ {
+ "R3",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R3_,
+ },
+ {
+ "R4",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R4_,
+ },
+ {
+ "R5",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R5_,
+ },
+ {
+ "R6",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R6_,
+ },
+ {
+ "R7",
+ HEX_DIGITS_2,
+ regwin_read_rx, regwin_write_rx,
+ _R7_,
+ },
+};
+
+/* Creating a model */
+static GtkListStore *
+regwin_init_store(void)
+{
+ GtkTreeIter iter;
+ int row;
+ int col;
+ GtkListStore *store;
+ GType col_types[N_COLUMNS];
+
+ /* No need for static array, all our columns are of the same type. */
+ for (col = 0; col < N_COLUMNS; col++)
+ col_types[col] = G_TYPE_STRING;
+
+ store = gtk_list_store_newv(N_COLUMNS, col_types);
+
+ /* Add rows. */
+ for (row = 0; row < DATA_ROWS; row++)
+ gtk_list_store_append(store, &iter);
+
+ return store;
+}
+
+static int
+regwin_find_row(const char *regname)
+{
+ int row;
+
+ for (row = 0; row < DATA_ROWS; row++) {
+ if (strcmp(regwin_infos[row].name, regname) == 0)
+ return row;
+ }
+
+ return -1; /* Programming error. */
+}
+
+static void
+regwin_cell_edited(GtkCellRendererText *cell, gchar *path_string,
+ gchar *new_str, gpointer model)
+{
+ GtkTreeIter iter;
+ int old;
+ int new;
+ char *str;
+ int row;
+
+ if (!model) {
+ g_error("Unable to get model from cell renderer");
+ }
+
+ /* Get the iterator */
+ gtk_tree_model_get_iter_from_string(model, &iter, path_string);
+
+ /* Get register name. */
+ gtk_tree_model_get(model, &iter, COL_NAME, &str, -1);
+
+ log_info("Register: %s", str);
+ row = regwin_find_row(str);
+ log_info(" row = %d", row);
+
+ /* Read current (old) value. */
+ gtk_tree_model_get(model, &iter, COL_VAL, &str, -1);
+
+ old = asciihex2int(str);
+
+ if (regwin_infos[row].w == 2)
+ log_info(" old value: $%02X", old);
+ else if (regwin_infos[row].w == 4)
+ log_info(" old value: $%04X", old);
+
+ new = asciihex2int(new_str);
+
+ if (regwin_infos[row].w == 2) {
+ if ((new < 0) || (new > 0xFF)) {
+ log_info(" new value: out of range");
+ new = old; /* Put back old value... */
+ } else {
+ log_info(" new value: $%02X", new);
+ }
+ } else if (regwin_infos[row].w == 4) {
+ if ((new < 0) || (new > 0xFFFF)) {
+ log_info(" new value: out of range");
+ new = old; /* Put back old value... */
+ } else {
+ log_info(" new value: $%04X", new);
+ }
+ }
+
+ /* Convert new value to text. */
+ int2asciihex(new, str, regwin_infos[row].w);
+
+ /* Store new value in emulator register. */
+ if (regwin_infos[row].write_func == NULL) {
+ /*
+ * Write register value using generic 8 or 16 bits write
+ * function, depending on width.
+ */
+ regwin_write(regwin_infos[row].param, new, regwin_infos[row].w);
+ } else {
+ /* Write register value using custom function pointer. */
+ regwin_infos[row].write_func(regwin_infos[row].param, new);
+ }
+
+ /* Store new value in gtk model. */
+ gtk_list_store_set(GTK_LIST_STORE(model), &iter, COL_VAL, str, -1);
+
+ /*
+ * Make sure to update all windows.
+ * For example, R0-R7 values depends on internal memory values.
+ */
+ emugtk_UpdateDisplay();
+};
+
+static void
+regwin_init_columns(void)
+{
+ GtkCellRenderer *renderer;
+ GtkTreeViewColumn *column;
+
+ /* Columns and cell renderers */
+ renderer = gtk_cell_renderer_text_new();
+
+ /* Add Register column */
+ column = gtk_tree_view_column_new_with_attributes(
+ "Name", renderer, "text", COL_NAME, NULL);
+ gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_AUTOSIZE);
+ gtk_tree_view_append_column(GTK_TREE_VIEW(reglist), column);
+
+ /* Add Value column */