X-Git-Url: http://gitweb.hugovil.com/?a=blobdiff_plain;f=src%2Fmemory.c;h=0b69e320b5d02d6e566c176dd6c6fc45eb4abdbf;hb=9b40aee50be61b462dcaa0a075d4f7fd66f9262d;hp=6c854c2e0e63a9d067ea4ffe644860e7fd27a4e0;hpb=4c305c73f8110d03b99cec045b3c5741867fd46b;p=emu8051.git

diff --git a/src/memory.c b/src/memory.c
index 6c854c2..0b69e32 100644
--- a/src/memory.c
+++ b/src/memory.c
@@ -1,103 +1,158 @@
-/* memory.c */
+/*
+ * memory.c
+ *
+ * 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.
+ */
 
+#include <stdio.h>
+#include <string.h>
 
+#include "common.h"
+#include "cpu8051.h"
+#include "hexfile.h"
 #include "memory.h"
 
-
-#define SFR_MEM_SIZE 128
 #define PGM_MEM_SIZE 65536
-#define INT_MEM_SIZE 128
+#define INT_MEM_SIZE 256 /* IRAM = Direct addresses $00 to $7F
+			  * SFR  = Direct addresses $80 to $FF */
 #define EXT_MEM_SIZE 65536
 
-
-u_int8_t sfr_mem[SFR_MEM_SIZE];
-u_int8_t pgm_mem[PGM_MEM_SIZE];
-u_int8_t int_mem[INT_MEM_SIZE];
-u_int8_t ext_mem[EXT_MEM_SIZE];
-
+static u_int8_t pgm_mem[PGM_MEM_SIZE];
+static u_int8_t int_mem[INT_MEM_SIZE];
+static u_int8_t ext_mem[EXT_MEM_SIZE];
 
 void
-memory_write8( int memory_id, unsigned long address, u_int8_t value )
+memory_write8(int memory_id, unsigned long address, u_int8_t value)
 {
-  switch( memory_id ) {
-  case SFR_MEM_ID:
-    if( address >= SFR_MEM_SIZE ) {
-      return;
-    }
-    else {
-      sfr_mem[address] = value;
-    }
-    break;
-  case PGM_MEM_ID:
-    if( address >= PGM_MEM_SIZE ) {
-      return;
-    }
-    else {
-      pgm_mem[address] = value;
-    }
-    break;
-  case INT_MEM_ID:
-    if( address >= INT_MEM_SIZE ) {
-      return;
-    }
-    else {
-      int_mem[address] = value;
-    }
-    break;
-  case EXT_MEM_ID:
-    if( address >= EXT_MEM_SIZE ) {
-      return;
-    }
-    else {
-      ext_mem[address] = value;
-    }
-    break; 
-  default:
-    /* Error. */
-    break;
-  }
+	switch (memory_id) {
+	case PGM_MEM_ID:
+		if (address >= PGM_MEM_SIZE) {
+			printf("Address (%lu) is greater than PGM_MEM_SIZE\n",
+			       address);
+			return;
+		} else
+			pgm_mem[address] = value;
+		break;
+	case INT_MEM_ID:
+		if (address >= INT_MEM_SIZE) {
+			printf("Address (%lu) is greater than INT_MEM_SIZE\n",
+			       address);
+			return;
+		} else
+			int_mem[address] = value;
+		break;
+	case EXT_MEM_ID:
+		if (address >= EXT_MEM_SIZE) {
+			printf("Address (%lu) is greater than EXT_MEM_SIZE\n",
+			       address);
+			return;
+		} else
+			ext_mem[address] = value;
+		break;
+	default:
+		/* Error. */
+		break;
+	}
 }
 
-
 u_int8_t
-memory_read8( int memory_id, unsigned long address )
+memory_read8(int memory_id, unsigned long address)
 {
-  switch( memory_id ) {
-  case SFR_MEM_ID:
-    if( address < SFR_MEM_SIZE ) {
-      return sfr_mem[address];
-    }
-    else {
-      return 0;
-    }
-    break;
-  case PGM_MEM_ID:
-    if( address < PGM_MEM_SIZE ) {
-      return pgm_mem[address];
-    }
-    else {
-      return 0;
-    }
-    break;
-  case INT_MEM_ID:
-    if( address < INT_MEM_SIZE ) {
-      return int_mem[address];
-    }
-    else {
-      return 0;
-    }
-    break;
-  case EXT_MEM_ID:
-    if( address < EXT_MEM_SIZE ) {
-      return ext_mem[address];
-    }
-    else {
-      return 0;
-    }
-    break; 
-  default:
-    /* Error. */
-    return 0;
-    break;
-  }
+	switch (memory_id) {
+	case PGM_MEM_ID:
+		if (address < PGM_MEM_SIZE)
+			return pgm_mem[address];
+		else {
+			printf("Address (%lu) is greater than PGM_MEM_SIZE\n",
+				address);
+			return 0;
+		}
+		break;
+	case INT_MEM_ID:
+		if (address < INT_MEM_SIZE)
+			return int_mem[address];
+		else {
+			printf("Address (%lu) is greater than INT_MEM_SIZE\n",
+			       address);
+			return 0;
+		}
+		break;
+	case EXT_MEM_ID:
+		if (address < EXT_MEM_SIZE)
+			return ext_mem[address];
+		else {
+			printf("Address (%lu) is greater than EXT_MEM_SIZE\n",
+			       address);
+			return 0;
+		}
+		break;
+	default:
+		/* Error. */
+		return 0;
+		break;
+	}
+}
+
+/* Dump memory */
+void
+DumpMem(char *buf, char *Address, int memory_id)
+{
+	unsigned int MemAddress;
+	int Offset, Column;
+	int size = 256;
+	int k = 0;
+
+	if (strlen(Address) != 0) {
+		if (STREQ(Address, "PC"))
+			MemAddress = cpu8051.pc;
+		else
+			MemAddress = Ascii2Hex(Address, strlen(Address));
+	} else {
+		MemAddress = 0;
+	}
+
+	for (Offset = 0; Offset < size; Offset += 16) {
+		unsigned char data[16];
+
+		sprintf(&buf[k], "%.4X ", MemAddress + Offset);
+		k = strlen(buf);
+
+		for (Column = 0; Column < 16; Column++) {
+			data[Column] = memory_read8(memory_id, MemAddress +
+						    Offset + Column);
+			sprintf(&buf[k], " %.2X", (int) data[Column]);
+			k = strlen(buf);
+		}
+		sprintf(&buf[k], "  ");
+		k = strlen(buf);
+
+		/* Display any ASCII characters */
+		for (Column = 0; Column < 16; Column++) {
+			if ((int) data[Column] >= 32 &&
+			    (int) data[Column] <= 126) {
+				sprintf(&buf[k], "%c", data[Column]);
+				k = strlen(buf);
+			} else {
+				sprintf(&buf[k], ".");
+				k = strlen(buf);
+			}
+		}
+		sprintf(&buf[k], "\n");
+		k = strlen(buf);
+	}
 }