mirror of
https://github.com/gwenhael-le-moine/x49gp.git
synced 2024-12-26 21:58:41 +01:00
793 lines
16 KiB
C
793 lines
16 KiB
C
/* $Id: sram.c,v 1.18 2008/12/11 12:18:17 ecd Exp $
|
|
*/
|
|
|
|
#include <unistd.h>
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <fcntl.h>
|
|
#include <sys/mman.h>
|
|
#include <errno.h>
|
|
|
|
#include <x49gp.h>
|
|
#include <memory.h>
|
|
#include <byteorder.h>
|
|
|
|
#include <saturn.h>
|
|
|
|
typedef struct {
|
|
void *data;
|
|
void *shadow;
|
|
char *filename;
|
|
int fd;
|
|
size_t size;
|
|
uint32_t offset;
|
|
x49gp_t *x49gp;
|
|
} x49gp_sram_t;
|
|
|
|
#define S3C2410_SRAM_BASE 0x08000000
|
|
#define S3C2410_SRAM_SIZE 0x00080000
|
|
|
|
#define BASE 0xbcbb5
|
|
|
|
#define SATURN(r) ((target_phys_addr_t) &((saturn_cpu_t *)0)->r)
|
|
|
|
#if defined(DEBUG_X49GP_SYSRAM_READ) || defined(DEBUG_X49GP_SYSRAM_WRITE) || \
|
|
defined(DEBUG_X49GP_IRAM_READ) || defined(DEBUG_X49GP_IRAM_WRITE) || \
|
|
defined(DEBUG_X49GP_ERAM_READ) || defined(DEBUG_X49GP_ERAM_WRITE)
|
|
#define DEBUG_X49GP_SRAM 1
|
|
#endif
|
|
|
|
typedef struct {
|
|
uint32_t x;
|
|
uint32_t ml;
|
|
uint32_t mh;
|
|
uint8_t m;
|
|
uint8_t s;
|
|
} hp_real_t;
|
|
|
|
#ifdef DEBUG_X49GP_SRAM
|
|
|
|
static uint32_t
|
|
saturn_map_s2a(saturn_cpu_t *saturn, uint32_t saddr)
|
|
{
|
|
uint32_t addr;
|
|
|
|
addr = ldl_p(&saturn->read_map[saddr >> 12]) | ((saddr >> 1) & 0x7ff);
|
|
|
|
// printf("SATURN: saddr %05x, addr %08x\n", saddr, addr);
|
|
|
|
return addr;
|
|
}
|
|
|
|
static uint32_t
|
|
saturn_peek(saturn_cpu_t *saturn, uint32_t saddr, uint32_t size)
|
|
{
|
|
uint32_t addr, rot, mask, data;
|
|
uint64_t value;
|
|
|
|
addr = saturn_map_s2a(saturn, saddr) & 0xfffffffc;
|
|
if (addr > 0x08080000)
|
|
return 0;
|
|
|
|
// printf("SATURN: addr %08x\n", addr);
|
|
value = ((uint64_t) ldl_phys(addr)) | (((uint64_t) ldl_phys(addr + 4)) << 32);
|
|
// printf("SATURN: value %016llx\n", value);
|
|
|
|
rot = (saddr & 7) << 2;
|
|
mask = (1ULL << (size << 2)) - 1;
|
|
// printf("SATURN: rot %u, mask %08x\n", rot, mask);
|
|
|
|
data = ((uint32_t) (value >> rot)) & mask;
|
|
// printf("SATURN: data %08x\n", data);
|
|
|
|
return data;
|
|
}
|
|
|
|
static uint32_t
|
|
saturn_peek_address(saturn_cpu_t *saturn, uint32_t saddr)
|
|
{
|
|
return saturn_peek(saturn, saddr, 5);
|
|
}
|
|
|
|
static int
|
|
hxs2real(int hxs)
|
|
{
|
|
int n = 0, c = 1;
|
|
|
|
while (hxs) {
|
|
n += (hxs & 0xf) * c;
|
|
c *= 10;
|
|
hxs >>= 4;
|
|
}
|
|
return n;
|
|
}
|
|
|
|
static char *
|
|
real_number(saturn_cpu_t *saturn, uint32_t saddr, char *buffer, int ml, int xl)
|
|
{
|
|
char *p = buffer;
|
|
char fmt[20];
|
|
char m[16];
|
|
hp_real_t r;
|
|
int re, xs;
|
|
int i;
|
|
uint32_t pc;
|
|
|
|
pc = saddr;
|
|
|
|
/*
|
|
* Read the number
|
|
*/
|
|
r.x = saturn_peek(saturn, pc, xl);
|
|
pc += xl;
|
|
r.ml = saturn_peek(saturn, pc, ml - 8);
|
|
pc += ml - 8;
|
|
r.mh = saturn_peek(saturn, pc, 8);
|
|
pc += 8;
|
|
r.m = saturn_peek(saturn, pc, 1);
|
|
pc += 1;
|
|
r.s = saturn_peek(saturn, pc, 1);
|
|
pc += 1;
|
|
|
|
/*
|
|
* Figure out the exponent
|
|
*/
|
|
xs = 5;
|
|
while (--xl)
|
|
xs *= 10;
|
|
re = hxs2real(r.x);
|
|
if (re >= xs)
|
|
re = re - 2 * xs;
|
|
|
|
if ((re >= 0) && (re < ml + 1)) {
|
|
if (r.s >= 5)
|
|
*p++ = '-';
|
|
|
|
sprintf(fmt, "%%.1X%%.8X%%.%dX", ml - 8);
|
|
sprintf(m, fmt, r.m, r.mh, r.ml);
|
|
|
|
for (i = 0; i <= re; i++)
|
|
*p++ = m[i];
|
|
*p++ = '.';
|
|
for ( ; i < ml + 1; i++)
|
|
*p++ = m[i];
|
|
p--;
|
|
while(*p == '0')
|
|
p--;
|
|
if (*p == '.')
|
|
p--;
|
|
*++p = '\0';
|
|
|
|
return buffer;
|
|
}
|
|
|
|
if ((re < 0) && (re >= -ml - 1)) {
|
|
sprintf(fmt, "%%.1X%%.8X%%.%dX", ml - 8);
|
|
sprintf(m, fmt, r.m, r.mh, r.ml);
|
|
|
|
for (i = ml; m[i] == '0'; i--)
|
|
;
|
|
|
|
if (-re <= ml - i + 1) {
|
|
if (r.s >= 5)
|
|
*p++ = '-';
|
|
|
|
*p++ = '.';
|
|
|
|
for (i = 1; i < -re; i++)
|
|
*p++ = '0';
|
|
|
|
for (i = 0; i < ml + 1; i++)
|
|
*p++ = m[i];
|
|
p--;
|
|
while(*p == '0')
|
|
p--;
|
|
*++p = '\0';
|
|
|
|
return buffer;
|
|
}
|
|
}
|
|
|
|
sprintf(fmt, "%%s%%X.%%.8X%%.%dX", ml - 8);
|
|
sprintf(p, fmt, (r.s >= 5) ? "-" : "", r.m, r.mh, r.ml);
|
|
|
|
p += strlen(p) - 1;
|
|
|
|
while(*p == '0')
|
|
p--;
|
|
*++p = '\0';
|
|
|
|
if (re) {
|
|
sprintf(p, "E%d", re);
|
|
p += strlen(p);
|
|
*p = '\0';
|
|
}
|
|
|
|
return buffer;
|
|
}
|
|
|
|
static uint32_t
|
|
dump_object(x49gp_t *x49gp, x49gp_sram_t *sram, uint32_t saddr)
|
|
{
|
|
saturn_cpu_t *saturn = (sram->data + 0x3340);
|
|
char buffer[128];
|
|
uint32_t prolog, pc;
|
|
char c;
|
|
int i, n;
|
|
|
|
pc = saddr;
|
|
|
|
prolog = saturn_peek(saturn, pc, 5);
|
|
pc += 5;
|
|
|
|
switch (prolog) {
|
|
case 0x02e48:
|
|
case 0x02e6d:
|
|
printf(" ");
|
|
n = saturn_peek(saturn, pc, 2);
|
|
pc += 2;
|
|
for (i = 0; i < n; i++) {
|
|
c = saturn_peek(saturn, pc, 2);
|
|
printf("%c", c);
|
|
pc += 2;
|
|
}
|
|
break;
|
|
|
|
case 0x02a4e:
|
|
n = saturn_peek(saturn, pc, 5);
|
|
pc += 5;
|
|
if (n <= 16) {
|
|
printf(" #%08x%08xh", saturn_peek(saturn, pc + 8, 8),
|
|
saturn_peek(saturn, pc + 0, 8));
|
|
} else {
|
|
printf(" C#");
|
|
for (i = 0; i < n; i++) {
|
|
printf("%x", saturn_peek(saturn, pc + i, 1));
|
|
}
|
|
}
|
|
pc += n;
|
|
break;
|
|
|
|
case 0x02911:
|
|
printf(" <%05x>", saturn_peek(saturn, pc, 5));
|
|
pc += 5;
|
|
break;
|
|
|
|
case 0x02933:
|
|
printf(" %%%s", real_number(saturn, pc, buffer, 11, 3));
|
|
pc += 16;
|
|
break;
|
|
|
|
case 0x02955:
|
|
printf(" %%%%%s", real_number(saturn, pc, buffer, 14, 5));
|
|
pc += 21;
|
|
break;
|
|
|
|
case 0x02e92:
|
|
printf(" <%03x %03x>", saturn_peek(saturn, pc + 0, 3),
|
|
saturn_peek(saturn, pc + 3, 3));
|
|
pc += 6;
|
|
break;
|
|
|
|
case 0x026ac:
|
|
printf(" <%03x %04x>", saturn_peek(saturn, pc + 0, 3),
|
|
saturn_peek(saturn, pc + 3, 4));
|
|
pc += 7;
|
|
break;
|
|
|
|
case 0x02ab8:
|
|
printf(" '");
|
|
while (1) {
|
|
prolog = saturn_peek(saturn, pc, 5);
|
|
if (prolog == 0x0312b) {
|
|
pc += 5;
|
|
break;
|
|
}
|
|
pc += dump_object(x49gp, sram, pc);
|
|
}
|
|
printf(" '");
|
|
break;
|
|
|
|
case 0x02d9d:
|
|
printf(" :");
|
|
while (1) {
|
|
prolog = saturn_peek(saturn, pc, 5);
|
|
if (prolog == 0x0312b) {
|
|
pc += 5;
|
|
break;
|
|
}
|
|
pc += dump_object(x49gp, sram, pc);
|
|
}
|
|
printf(" ;");
|
|
break;
|
|
|
|
default:
|
|
printf(" %05x", prolog);
|
|
break;
|
|
}
|
|
|
|
return pc - saddr;
|
|
}
|
|
|
|
static void
|
|
debug_saturn(x49gp_t *x49gp, x49gp_sram_t *sram)
|
|
{
|
|
saturn_cpu_t *saturn = (sram->data + 0x3340);
|
|
uint32_t sp, se;
|
|
uint32_t prolog;
|
|
uint32_t rsp;
|
|
uint32_t first;
|
|
static uint32_t prev_first = 0;
|
|
static int state = 0;
|
|
int depth;
|
|
int i;
|
|
|
|
// printf("SATURN: %p, RPLTOP: %08x\n", saturn, saturn_map_s2a(saturn, SAT_RPLTOP));
|
|
// printf("SATURN: %p, RSKTOP: %08x\n", saturn, saturn_map_s2a(saturn, SAT_RSKTOP));
|
|
|
|
// rpltop = saturn_peek_address(saturn, SAT_RPLTOP);
|
|
// printf("SATURN: RPLTOP: %05x\n", rpltop);
|
|
|
|
rsp = saturn_peek_address(saturn, SAT_RSKTOP);
|
|
if (rsp == 0)
|
|
return;
|
|
|
|
first = saturn_peek_address(saturn, rsp - 5);
|
|
if (first == prev_first) {
|
|
return;
|
|
}
|
|
prev_first = first;
|
|
|
|
if (first == (BASE + 0x14a54)) {
|
|
state = 1;
|
|
}
|
|
if (state == 0)
|
|
return;
|
|
|
|
printf("SATURN: %p, rsp: %05x %08x\n", saturn, rsp, saturn_map_s2a(saturn, rsp));
|
|
|
|
for (i = 0; ; i++) {
|
|
rsp -= 5;
|
|
|
|
se = saturn_peek_address(saturn, rsp);
|
|
if (se == 0)
|
|
break;
|
|
|
|
if (se > BASE)
|
|
printf("SATURN: RSTK %02u: %05x <%05x>\n", i, se, se - BASE);
|
|
else
|
|
printf("SATURN: RSTK %02u: %05x\n", i, se);
|
|
}
|
|
|
|
|
|
depth = (saturn_peek_address(saturn, SAT_EDITLINE) - saturn_peek_address(saturn, SAT_DSKTOP) - 5) / 5;
|
|
|
|
printf("SATURN: depth %d\n", depth);
|
|
|
|
sp = saturn_peek_address(saturn, SAT_EDITLINE) - 10;
|
|
|
|
for (i = 0; i < depth; i++) {
|
|
se = saturn_peek_address(saturn, sp);
|
|
sp -= 5;
|
|
|
|
prolog = saturn_peek(saturn, se, 5);
|
|
|
|
printf("SATURN: %02u: <%05x> <%05x>", depth - i, se, prolog);
|
|
|
|
dump_object(x49gp, sram, se);
|
|
|
|
printf("\n");
|
|
}
|
|
}
|
|
|
|
static uint32_t
|
|
sram_get_word(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
x49gp_sram_t *sram = opaque;
|
|
uint32_t data;
|
|
|
|
data = ldl_p(sram->data + offset);
|
|
|
|
#if 0
|
|
if (offset == 0x00000a1c) {
|
|
printf("read SRAM at offset %08x: %08x (pc %08x)\n", offset, data, x49gp->arm->Reg[15]);
|
|
}
|
|
#endif
|
|
|
|
#ifdef DEBUG_X49GP_SYSRAM_READ
|
|
if ((offset & ~(0x0001ffff)) == 0x00000000) {
|
|
printf("read SRAM 4 at offset %08x: %08x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_ERAM_READ
|
|
if ((offset & ~(0x0001ffff)) == 0x00020000) {
|
|
printf("read SRAM 4 at offset %08x: %08x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_IRAM_READ
|
|
if ((offset & ~(0x0003ffff)) == 0x00040000) {
|
|
printf("read SRAM 4 at offset %08x: %08x\n", offset, data);
|
|
}
|
|
#endif
|
|
|
|
return data;
|
|
}
|
|
|
|
static uint32_t
|
|
sram_get_halfword(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
x49gp_sram_t *sram = opaque;
|
|
unsigned short data;
|
|
|
|
data = lduw_p(sram->data + offset);
|
|
|
|
#ifdef DEBUG_X49GP_SYSRAM_READ
|
|
if ((offset & ~(0x0001ffff)) == 0x00000000) {
|
|
printf("read SRAM 2 at offset %08x: %04x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_ERAM_READ
|
|
if ((offset & ~(0x0001ffff)) == 0x00020000) {
|
|
printf("read SRAM 2 at offset %08x: %04x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_IRAM_READ
|
|
if ((offset & ~(0x0003ffff)) == 0x00040000) {
|
|
printf("read SRAM 2 at offset %08x: %04x\n", offset, data);
|
|
}
|
|
#endif
|
|
|
|
return data;
|
|
}
|
|
|
|
static uint32_t
|
|
sram_get_byte(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
x49gp_sram_t *sram = opaque;
|
|
unsigned char data;
|
|
|
|
data = ldub_p(sram->data + offset);
|
|
|
|
#ifdef DEBUG_X49GP_SYSRAM_READ
|
|
if ((offset & ~(0x0001ffff)) == 0x00000000) {
|
|
printf("read SRAM 1 at offset %08x: %02x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_ERAM_READ
|
|
if ((offset & ~(0x0001ffff)) == 0x00020000) {
|
|
printf("read SRAM 1 at offset %08x: %02x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_IRAM_READ
|
|
if ((offset & ~(0x0003ffff)) == 0x00040000) {
|
|
printf("read SRAM 1 at offset %08x: %02x\n", offset, data);
|
|
}
|
|
#endif
|
|
|
|
return data;
|
|
}
|
|
|
|
static void
|
|
sram_put_word(void *opaque, target_phys_addr_t offset, uint32_t data)
|
|
{
|
|
x49gp_sram_t *sram = opaque;
|
|
|
|
if (offset == 0x00000a1c) {
|
|
printf("write SRAM 4 at offset %08x: %08x (pc %08x)\n",
|
|
offset, data, sram->x49gp->env->regs[15]);
|
|
}
|
|
|
|
debug_saturn(sram->x49gp, sram);
|
|
|
|
#if 0
|
|
if (offset == 0x3340 + SATURN(D1)) {
|
|
printf("write D1 at offset %08x: %08x (pc %08x)\n",
|
|
offset, data, sram->x49gp->env->regs[15]);
|
|
}
|
|
if (offset == 0x3340 + SATURN(A)) {
|
|
printf("write A at offset %08x: %08x (pc %08x)\n",
|
|
offset, data, sram->x49gp->env->regs[15]);
|
|
}
|
|
if (offset == 0x3340 + SATURN(A) + 8) {
|
|
printf("write Al at offset %08x: %08x (pc %08x)\n",
|
|
offset, data, sram->x49gp->env->regs[15]);
|
|
}
|
|
#endif
|
|
|
|
#ifdef DEBUG_X49GP_SYSRAM_WRITE
|
|
if ((offset & ~(0x0001ffff)) == 0x00000000) {
|
|
printf("write SRAM 4 at offset %08x: %08x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_ERAM_WRITE
|
|
if ((offset & ~(0x0001ffff)) == 0x00020000) {
|
|
printf("write SRAM 4 at offset %08x: %08x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_IRAM_WRITE
|
|
if ((offset & ~(0x0003ffff)) == 0x00040000) {
|
|
printf("write SRAM 4 at offset %08x: %08x\n", offset, data);
|
|
}
|
|
#endif
|
|
|
|
stl_p(sram->data + offset, data);
|
|
}
|
|
|
|
static void
|
|
sram_put_halfword(void *opaque, target_phys_addr_t offset, uint32_t data)
|
|
{
|
|
x49gp_sram_t *sram = opaque;
|
|
|
|
data &= 0xffff;
|
|
|
|
#ifdef DEBUG_X49GP_SYSRAM_WRITE
|
|
if ((offset & ~(0x0001ffff)) == 0x00000000) {
|
|
printf("write SRAM 2 at offset %08x: %04x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_ERAM_WRITE
|
|
if ((offset & ~(0x0001ffff)) == 0x00020000) {
|
|
printf("write SRAM 2 at offset %08x: %04x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_IRAM_WRITE
|
|
if ((offset & ~(0x0003ffff)) == 0x00040000) {
|
|
printf("write SRAM 2 at offset %08x: %04x\n", offset, data);
|
|
}
|
|
#endif
|
|
|
|
stw_p(sram->data + offset, data);
|
|
}
|
|
|
|
static void
|
|
sram_put_byte(void *opaque, target_phys_addr_t offset, uint32_t data)
|
|
{
|
|
x49gp_sram_t *sram = opaque;
|
|
|
|
data &= 0xff;
|
|
|
|
#ifdef DEBUG_X49GP_SYSRAM_WRITE
|
|
if ((offset & ~(0x0001ffff)) == 0x00000000) {
|
|
printf("write SRAM 1 at offset %08x: %02x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_ERAM_WRITE
|
|
if ((offset & ~(0x0001ffff)) == 0x00020000) {
|
|
printf("write SRAM 1 at offset %08x: %02x\n", offset, data);
|
|
}
|
|
#endif
|
|
#ifdef DEBUG_X49GP_IRAM_WRITE
|
|
if ((offset & ~(0x0003ffff)) == 0x00040000) {
|
|
printf("write SRAM 1 at offset %08x: %02x\n", offset, data);
|
|
}
|
|
#endif
|
|
|
|
stb_p(sram->data + offset, data);
|
|
}
|
|
|
|
static CPUReadMemoryFunc *sram_readfn[] =
|
|
{
|
|
sram_get_byte,
|
|
sram_get_halfword,
|
|
sram_get_word
|
|
};
|
|
|
|
static CPUWriteMemoryFunc *sram_writefn[] =
|
|
{
|
|
sram_put_byte,
|
|
sram_put_halfword,
|
|
sram_put_word
|
|
};
|
|
|
|
#endif /* DEBUG_X49GP_SRAM */
|
|
|
|
static int
|
|
sram_load(x49gp_module_t *module, GKeyFile *key)
|
|
{
|
|
x49gp_sram_t *sram = module->user_data;
|
|
char *filename;
|
|
int error;
|
|
|
|
#ifdef DEBUG_X49GP_MODULES
|
|
printf("%s: %s:%u\n", module->name, __FUNCTION__, __LINE__);
|
|
#endif
|
|
|
|
error = x49gp_module_get_filename(module, key, "filename", "sram",
|
|
&(sram->filename), &filename);
|
|
|
|
sram->fd = open(filename, O_RDWR | O_CREAT, 0644);
|
|
if (sram->fd < 0) {
|
|
error = -errno;
|
|
fprintf(stderr, "%s: %s:%u: open %s: %s\n",
|
|
module->name, __FUNCTION__, __LINE__,
|
|
filename, strerror(errno));
|
|
g_free(filename);
|
|
return error;
|
|
}
|
|
|
|
sram->size = 0x00080000;
|
|
if (ftruncate(sram->fd, sram->size) < 0) {
|
|
error = -errno;
|
|
fprintf(stderr, "%s: %s:%u: ftruncate %s: %s\n",
|
|
module->name, __FUNCTION__, __LINE__,
|
|
filename, strerror(errno));
|
|
g_free(filename);
|
|
close(sram->fd);
|
|
sram->fd = -1;
|
|
return error;
|
|
}
|
|
|
|
sram->data = mmap(phys_ram_base + sram->offset, sram->size,
|
|
PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED,
|
|
sram->fd, 0);
|
|
if (sram->data == (void *) -1) {
|
|
error = -errno;
|
|
fprintf(stderr, "%s: %s:%u: mmap %s: %s\n",
|
|
module->name, __FUNCTION__, __LINE__,
|
|
filename, strerror(errno));
|
|
g_free(filename);
|
|
close(sram->fd);
|
|
sram->fd = -1;
|
|
return error;
|
|
}
|
|
|
|
sram->shadow = mmap(phys_ram_base + sram->offset + sram->size,
|
|
sram->size,
|
|
PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED,
|
|
sram->fd, 0);
|
|
if (sram->shadow == (void *) -1) {
|
|
error = -errno;
|
|
fprintf(stderr, "%s: %s:%u: mmap %s (shadow): %s\n",
|
|
module->name, __FUNCTION__, __LINE__,
|
|
filename, strerror(errno));
|
|
g_free(filename);
|
|
close(sram->fd);
|
|
sram->fd = -1;
|
|
return error;
|
|
}
|
|
|
|
sram->x49gp->sram = phys_ram_base + sram->offset;
|
|
|
|
g_free(filename);
|
|
return error;
|
|
}
|
|
|
|
static int
|
|
sram_save(x49gp_module_t *module, GKeyFile *key)
|
|
{
|
|
x49gp_sram_t *sram = module->user_data;
|
|
int error;
|
|
|
|
#ifdef DEBUG_X49GP_MODULES
|
|
printf("%s: %s:%u\n", module->name, __FUNCTION__, __LINE__);
|
|
#endif
|
|
|
|
x49gp_module_set_filename(module, key, "filename", sram->filename);
|
|
|
|
error = msync(sram->data, sram->size, MS_ASYNC);
|
|
if (error) {
|
|
fprintf(stderr, "%s:%u: msync: %s\n",
|
|
__FUNCTION__, __LINE__, strerror(errno));
|
|
return error;
|
|
}
|
|
|
|
error = fsync(sram->fd);
|
|
if (error) {
|
|
fprintf(stderr, "%s:%u: fsync: %s\n",
|
|
__FUNCTION__, __LINE__, strerror(errno));
|
|
return error;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
sram_reset(x49gp_module_t *module, x49gp_reset_t reset)
|
|
{
|
|
#ifdef DEBUG_X49GP_MODULES
|
|
printf("%s: %s:%u\n", module->name, __FUNCTION__, __LINE__);
|
|
#endif
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
sram_init(x49gp_module_t *module)
|
|
{
|
|
x49gp_sram_t *sram;
|
|
|
|
#ifdef DEBUG_X49GP_MODULES
|
|
printf("%s: %s:%u\n", module->name, __FUNCTION__, __LINE__);
|
|
#endif
|
|
|
|
sram = malloc(sizeof(x49gp_sram_t));
|
|
if (NULL == sram) {
|
|
fprintf(stderr, "%s:%u: Out of memory\n",
|
|
__FUNCTION__, __LINE__);
|
|
return -ENOMEM;
|
|
}
|
|
memset(sram, 0, sizeof(x49gp_sram_t));
|
|
|
|
sram->fd = -1;
|
|
|
|
module->user_data = sram;
|
|
sram->x49gp = module->x49gp;
|
|
|
|
sram->data = (void *) -1;
|
|
sram->shadow = (void *) -1;
|
|
sram->offset = phys_ram_size;
|
|
phys_ram_size += S3C2410_SRAM_SIZE;
|
|
phys_ram_size += S3C2410_SRAM_SIZE;
|
|
|
|
#ifdef DEBUG_X49GP_SRAM
|
|
{
|
|
int iotype;
|
|
|
|
iotype = cpu_register_io_memory(0, sram_readfn, sram_writefn, sram);
|
|
printf("%s: iotype %08x\n", __FUNCTION__, iotype);
|
|
cpu_register_physical_memory(S3C2410_SRAM_BASE,
|
|
S3C2410_SRAM_SIZE,
|
|
sram->offset | iotype | IO_MEM_ROMD);
|
|
|
|
iotype = cpu_register_io_memory(0, sram_readfn, sram_writefn, sram);
|
|
printf("%s: iotype %08x\n", __FUNCTION__, iotype);
|
|
cpu_register_physical_memory(S3C2410_SRAM_BASE + S3C2410_SRAM_SIZE,
|
|
S3C2410_SRAM_SIZE,
|
|
(sram->offset + S3C2410_SRAM_SIZE) | iotype | IO_MEM_ROMD);
|
|
}
|
|
#else
|
|
cpu_register_physical_memory(S3C2410_SRAM_BASE, S3C2410_SRAM_SIZE,
|
|
sram->offset | IO_MEM_RAM);
|
|
cpu_register_physical_memory(S3C2410_SRAM_BASE + S3C2410_SRAM_SIZE,
|
|
S3C2410_SRAM_SIZE,
|
|
(sram->offset + S3C2410_SRAM_SIZE) | IO_MEM_RAM);
|
|
#endif
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
sram_exit(x49gp_module_t *module)
|
|
{
|
|
x49gp_sram_t *sram;
|
|
|
|
#ifdef DEBUG_X49GP_MODULES
|
|
printf("%s: %s:%u\n", module->name, __FUNCTION__, __LINE__);
|
|
#endif
|
|
|
|
if (module->user_data) {
|
|
sram = module->user_data;
|
|
|
|
if (sram->shadow != (void *) -1) {
|
|
munmap(sram->shadow, sram->size);
|
|
}
|
|
if (sram->data != (void *) -1) {
|
|
munmap(sram->data, sram->size);
|
|
}
|
|
if (sram->fd >= 0) {
|
|
close(sram->fd);
|
|
}
|
|
|
|
free(sram);
|
|
}
|
|
|
|
x49gp_module_unregister(module);
|
|
free(module);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
x49gp_sram_init(x49gp_t *x49gp)
|
|
{
|
|
x49gp_module_t *module;
|
|
|
|
if (x49gp_module_init(x49gp, "sram", sram_init, sram_exit,
|
|
sram_reset, sram_load, sram_save, NULL,
|
|
&module)) {
|
|
return -1;
|
|
}
|
|
|
|
return x49gp_module_register(module);
|
|
}
|