--- hatari/src/uae-cpu/memory.c 2019/04/01 07:11:37 1.1.1.6 +++ hatari/src/uae-cpu/memory.c 2019/04/09 08:47:25 1.1.1.13 @@ -10,34 +10,43 @@ * This file is distributed under the GNU Public License, version 2 or at * your option any later version. Read the file gpl.txt for details. */ -char Memory_rcsid[] = "Hatari $Id: memory.c,v 1.1.1.6 2019/04/01 07:11:37 root Exp $"; +const char Memory_fileid[] = "Hatari memory.c : " __DATE__ " " __TIME__; +#include "config.h" #include "sysdeps.h" #include "hatari-glue.h" #include "maccess.h" #include "memory.h" #include "../includes/main.h" #include "../includes/tos.h" -#include "../includes/intercept.h" +#include "../includes/ide.h" +#include "../includes/ioMem.h" #include "../includes/reset.h" #include "../includes/stMemory.h" #include "../includes/m68000.h" #include "newcpu.h" +/* Set illegal_mem to 1 for debug output: */ +#define illegal_mem 1 + + static uae_u32 STmem_size, TTmem_size = 0; static uae_u32 TTmem_mask; #define STmem_start 0x00000000 #define ROMmem_start 0x00E00000 +#define IdeMem_start 0x00F00000 #define IOmem_start 0x00FF0000 #define TTmem_start 0x01000000 +#define IdeMem_size 65536 #define IOmem_size 65536 #define ROMmem_size (0x00FF0000 - 0x00E00000) /* So we cover both possible ROM regions + cartridge */ #define STmem_mask 0x00ffffff #define ROMmem_mask 0x00ffffff +#define IdeMem_mask (IdeMem_size - 1) #define IOmem_mask (IOmem_size - 1) @@ -76,6 +85,7 @@ __inline__ void byteput (uaecptr addr, u /* Some prototypes: */ +extern void SDL_Quit(void); static int STmem_check (uaecptr addr, uae_u32 size) REGPARAM; static uae_u8 *STmem_xlate (uaecptr addr) REGPARAM; @@ -214,26 +224,21 @@ static uae_u8 *BusErrMem_xlate (uaecptr /* **** ST RAM memory **** */ -static uae_u8 *STmemory; +/*static uae_u8 *STmemory;*/ +#define STmemory STRam static uae_u32 STmem_lget(uaecptr addr) { - uae_u32 *m; - addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u32 *)(STmemory + addr); - return do_get_mem_long (m); + return do_get_mem_long(STmemory + addr); } static uae_u32 STmem_wget(uaecptr addr) { - uae_u16 *m; - addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u16 *)(STmemory + addr); - return do_get_mem_word (m); + return do_get_mem_word(STmemory + addr); } static uae_u32 STmem_bget(uaecptr addr) @@ -245,22 +250,16 @@ static uae_u32 STmem_bget(uaecptr addr) static void STmem_lput(uaecptr addr, uae_u32 l) { - uae_u32 *m; - addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u32 *)(STmemory + addr); - do_put_mem_long (m, l); + do_put_mem_long(STmemory + addr, l); } static void STmem_wput(uaecptr addr, uae_u32 w) { - uae_u16 *m; - addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u16 *)(STmemory + addr); - do_put_mem_word (m, w); + do_put_mem_word(STmemory + addr, w); } static void STmem_bput(uaecptr addr, uae_u32 b) @@ -294,8 +293,6 @@ static uae_u8 *STmem_xlate(uaecptr addr) */ static uae_u32 SysMem_lget(uaecptr addr) { - uae_u32 *m; - if(addr < 0x800 && !regs.s) { M68000_BusError(addr, 1); @@ -304,14 +301,12 @@ static uae_u32 SysMem_lget(uaecptr addr) addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u32 *)(STmemory + addr); - return do_get_mem_long (m); + + return do_get_mem_long(STmemory + addr); } static uae_u32 SysMem_wget(uaecptr addr) { - uae_u16 *m; - if(addr < 0x800 && !regs.s) { M68000_BusError(addr, 1); @@ -320,8 +315,8 @@ static uae_u32 SysMem_wget(uaecptr addr) addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u16 *)(STmemory + addr); - return do_get_mem_word (m); + + return do_get_mem_word(STmemory + addr); } static uae_u32 SysMem_bget(uaecptr addr) @@ -339,8 +334,6 @@ static uae_u32 SysMem_bget(uaecptr addr) static void SysMem_lput(uaecptr addr, uae_u32 l) { - uae_u32 *m; - if(addr < 0x8 || (addr < 0x800 && !regs.s)) { M68000_BusError(addr, 0); @@ -349,14 +342,12 @@ static void SysMem_lput(uaecptr addr, ua addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u32 *)(STmemory + addr); - do_put_mem_long (m, l); + + do_put_mem_long(STmemory + addr, l); } static void SysMem_wput(uaecptr addr, uae_u32 w) { - uae_u16 *m; - if(addr < 0x8 || (addr < 0x800 && !regs.s)) { M68000_BusError(addr, 0); @@ -365,8 +356,8 @@ static void SysMem_wput(uaecptr addr, ua addr -= STmem_start & STmem_mask; addr &= STmem_mask; - m = (uae_u16 *)(STmemory + addr); - do_put_mem_word (m, w); + + do_put_mem_word(STmemory + addr, w); } static void SysMem_bput(uaecptr addr, uae_u32 b) @@ -439,20 +430,16 @@ static uae_u8 *TTmemory; static uae_u32 TTmem_lget(uaecptr addr) { - uae_u32 *m; addr -= TTmem_start & TTmem_mask; addr &= TTmem_mask; - m = (uae_u32 *)(TTmemory + addr); - return do_get_mem_long (m); + return do_get_mem_long(TTmemory + addr); } static uae_u32 TTmem_wget(uaecptr addr) { - uae_u16 *m; addr -= TTmem_start & TTmem_mask; addr &= TTmem_mask; - m = (uae_u16 *)(TTmemory + addr); - return do_get_mem_word (m); + return do_get_mem_word(TTmemory + addr); } static uae_u32 TTmem_bget(uaecptr addr) @@ -464,20 +451,16 @@ static uae_u32 TTmem_bget(uaecptr addr) static void TTmem_lput(uaecptr addr, uae_u32 l) { - uae_u32 *m; addr -= TTmem_start & TTmem_mask; addr &= TTmem_mask; - m = (uae_u32 *)(TTmemory + addr); - do_put_mem_long (m, l); + do_put_mem_long(TTmemory + addr, l); } static void TTmem_wput(uaecptr addr, uae_u32 w) { - uae_u16 *m; addr -= TTmem_start & TTmem_mask; addr &= TTmem_mask; - m = (uae_u16 *)(TTmemory + addr); - do_put_mem_word (m, w); + do_put_mem_word(TTmemory + addr, w); } static void TTmem_bput(uaecptr addr, uae_u32 b) @@ -504,24 +487,20 @@ static uae_u8 *TTmem_xlate(uaecptr addr) /* **** ROM memory **** */ -static uae_u8 *ROMmemory; +uae_u8 *ROMmemory; static uae_u32 ROMmem_lget(uaecptr addr) { - uae_u32 *m; addr -= ROMmem_start & ROMmem_mask; addr &= ROMmem_mask; - m = (uae_u32 *)(ROMmemory + addr); - return do_get_mem_long (m); + return do_get_mem_long(ROMmemory + addr); } static uae_u32 ROMmem_wget(uaecptr addr) { - uae_u16 *m; addr -= ROMmem_start & ROMmem_mask; addr &= ROMmem_mask; - m = (uae_u16 *)(ROMmemory + addr); - return do_get_mem_word (m); + return do_get_mem_word(ROMmemory + addr); } static uae_u32 ROMmem_bget(uaecptr addr) @@ -570,10 +549,30 @@ static uae_u8 *ROMmem_xlate(uaecptr addr } +/* IDE controller IO memory */ +/* see also ide.c */ + +static uae_u8 *IdeMemory; + +static int IdeMem_check(uaecptr addr, uae_u32 size) +{ + addr -= IdeMem_start; + addr &= IdeMem_mask; + return (addr + size) <= IdeMem_size; +} + +static uae_u8 *IdeMem_xlate(uaecptr addr) +{ + addr -= IdeMem_start; + addr &= IdeMem_mask; + return IdeMemory + addr; +} + + /* Hardware IO memory */ -/* see also intercept.c */ +/* see also ioMem.c */ -static uae_u8 *IOmemory; +uae_u8 *IOmemory; static int IOmem_check(uaecptr addr, uae_u32 size) { @@ -642,10 +641,17 @@ static addrbank ROMmem_bank = ROMmem_xlate, ROMmem_check }; +static addrbank IdeMem_bank = +{ + Ide_Mem_lget, Ide_Mem_wget, Ide_Mem_bget, + Ide_Mem_lput, Ide_Mem_wput, Ide_Mem_bput, + IdeMem_xlate, IdeMem_check +}; + static addrbank IOmem_bank = { - Intercept_ReadLong, Intercept_ReadWord, Intercept_ReadByte, - Intercept_WriteLong, Intercept_WriteWord, Intercept_WriteByte, + IoMem_lget, IoMem_wget, IoMem_bget, + IoMem_lput, IoMem_wput, IoMem_bput, IOmem_xlate, IOmem_check }; @@ -662,35 +668,59 @@ static void init_mem_banks (void) /* * Initialize the memory banks */ -void memory_init(uae_u32 f_STMemSize, uae_u32 f_TTMemSize, uae_u32 f_RomMemStart) +void memory_init(uae_u32 nNewSTMemSize, uae_u32 nNewTTMemSize, uae_u32 nNewRomMemStart) { - STmem_size = (f_STMemSize + 65535) & 0xFFFF0000; - TTmem_size = (f_TTMemSize + 65535) & 0xFFFF0000; + STmem_size = (nNewSTMemSize + 65535) & 0xFFFF0000; + TTmem_size = (nNewTTMemSize + 65535) & 0xFFFF0000; /*write_log("memory_init: STmem_size=$%x, TTmem_size=$%x, ROM-Start=$%x,\n", - STmem_size, TTmem_size, f_RomMemStart);*/ + STmem_size, TTmem_size, nNewRomMemStart);*/ - STmemory = STRam; - ROMmemory = STRam + ROMmem_start; - IOmemory = STRam + IOmem_start; -/* - while (! STmemory && STmem_size > 512*1024) { +#if ENABLE_SMALL_MEM + + /* Allocate memory for ROM areas and IO memory space (0xE00000 - 0xFFFFFF) */ + ROMmemory = malloc(2*1024*1024); + if (!ROMmemory) { + fprintf(stderr, "Out of memory (ROM/IO mem)!\n"); + SDL_Quit(); + exit(1); + } + IdeMemory = ROMmemory + 0x100000; + IOmemory = ROMmemory + 0x1f0000; + + /* Allocate memory for normal ST RAM */ + STmemory = malloc(STmem_size); + while (!STmemory && STmem_size > 512*1024) { STmem_size >>= 1; STmemory = (uae_u8 *)malloc (STmem_size); if (STmemory) - fprintf (stderr, "Reducing STmem size to %dkb\n", STmem_size >> 10); + write_log ("Reducing STmem size to %dkb\n", STmem_size >> 10); } - if (! STmemory) { + if (!STmemory) { write_log ("virtual memory exhausted (STmemory)!\n"); - abort (); + SDL_Quit(); + exit(1); } -*/ + +#else + + /* STmemory points to the 16 MiB STRam array, we just have to set up + * the remaining pointers here: */ + ROMmemory = STRam + ROMmem_start; + IdeMemory = STRam + IdeMem_start; + IOmemory = STRam + IOmem_start; + +#endif init_mem_banks(); - /* Map the ST RAM: */ + /* Map the ST system RAM: */ map_banks(&SysMem_bank, 0x00, 1); - map_banks(&VoidMem_bank, 0x08, 0x38); /* Between STRamEnd and 4MB barrier, there is void space! */ + /* Between STRamEnd and 4MB barrier, there is void space: */ + map_banks(&VoidMem_bank, 0x08, 0x38); + /* Space between 4MB barrier and TOS ROM causes a bus error: */ + map_banks(&BusErrMem_bank, 0x400000 >> 16, 0xA0); + /* Now map main ST RAM, overwriting the void and bus error regions if necessary: */ map_banks(&STmem_bank, 0x01, (STmem_size >> 16) - 1); /* TT memory isn't really supported yet */ @@ -704,12 +734,12 @@ void memory_init(uae_u32 f_STMemSize, ua /* ROM memory: */ /* Depending on which ROM version we are using, the other ROM region is illegal! */ - if(f_RomMemStart == 0xFC0000) + if(nNewRomMemStart == 0xFC0000) { map_banks(&ROMmem_bank, 0xFC0000 >> 16, 0x3); map_banks(&BusErrMem_bank, 0xE00000 >> 16, 0x10); } - else if(f_RomMemStart == 0xE00000) + else if(nNewRomMemStart == 0xE00000) { map_banks(&ROMmem_bank, 0xE00000 >> 16, 0x10); map_banks(&BusErrMem_bank, 0xFC0000 >> 16, 0x3); @@ -725,9 +755,11 @@ void memory_init(uae_u32 f_STMemSize, ua /* IO memory: */ map_banks(&IOmem_bank, IOmem_start>>16, 0x1); + /* IDE controller memory region: */ + map_banks(&IdeMem_bank, IdeMem_start >> 16, 0x1); /* IDE controller on the Falcon */ + /* Illegal memory regions cause a bus error on the ST: */ - map_banks(&BusErrMem_bank, 0x400000 >> 16, 0xA0); /* Space between 4MB barrier and TOS ROM */ - map_banks(&BusErrMem_bank, 0xF00000 >> 16, 0xA); /* IDE controler on the Falcon */ + map_banks(&BusErrMem_bank, 0xF10000 >> 16, 0x9); } @@ -737,11 +769,24 @@ void memory_init(uae_u32 f_STMemSize, ua void memory_uninit (void) { /* Here, we free allocated memory from memory_init */ - if(TTmem_size > 0) - { - free(TTmemory); - TTmemory = NULL; + if (TTmem_size > 0) { + free(TTmemory); + TTmemory = NULL; } + +#if ENABLE_SMALL_MEM + + if (STmemory) { + free(STmemory); + STmemory = NULL; + } + + if (ROMmemory) { + free(ROMmemory); + ROMmemory = NULL; + } + +#endif /* ENABLE_SMALL_MEM */ } @@ -756,7 +801,7 @@ void map_banks (addrbank *bank, int star return; } /* Some ROMs apparently require a 24 bit address space... */ - if (address_space_24) + if (currprefs.address_space_24) endhioffs = 0x10000; for (hioffs = 0; hioffs < endhioffs; hioffs += 0x100) for (bnr = start; bnr < start+size; bnr++)