[pcsx_rearmed.git] / libpcsxcore / psxmem.c

/***************************************************************************
 *   Copyright (C) 2007 Ryan Schultz, PCSX-df Team, PCSX team              *
 *                                                                         *
 *   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 Street, Fifth Floor, Boston, MA 02111-1307 USA.           *
 ***************************************************************************/

/*
* PSX memory functions.
*/

// TODO: Implement caches & cycle penalty.

#include "psxmem.h"
#include "psxmem_map.h"
#include "r3000a.h"
#include "psxhw.h"
//#include "debug.h"
#define DebugCheckBP(...)

#include "lightrec/mem.h"
#include "memmap.h"

#ifdef USE_LIBRETRO_VFS
#include <streams/file_stream_transforms.h>
#endif

#ifndef MAP_ANONYMOUS
#define MAP_ANONYMOUS MAP_ANON
#endif

void *(*psxMapHook)(unsigned long addr, size_t size, int is_fixed,
		enum psxMapTag tag);
void (*psxUnmapHook)(void *ptr, size_t size, enum psxMapTag tag);

void *psxMap(unsigned long addr, size_t size, int is_fixed,
		enum psxMapTag tag)
{
	int flags = MAP_PRIVATE | MAP_ANONYMOUS;
	int try_ = 0;
	unsigned long mask;
	void *req, *ret;

retry:
	if (psxMapHook != NULL) {
		ret = psxMapHook(addr, size, 0, tag);
		if (ret == NULL)
			return MAP_FAILED;
	}
	else {
		/* avoid MAP_FIXED, it overrides existing mappings.. */
		/* if (is_fixed)
			flags |= MAP_FIXED; */

		req = (void *)(uintptr_t)addr;
		ret = mmap(req, size, PROT_READ | PROT_WRITE, flags, -1, 0);
		if (ret == MAP_FAILED)
			return ret;
	}

	if (addr != 0 && ret != (void *)(uintptr_t)addr) {
		SysMessage("psxMap: warning: wanted to map @%08x, got %p\n",
			addr, ret);

		if (is_fixed) {
			psxUnmap(ret, size, tag);
			return MAP_FAILED;
		}

		if (((addr ^ (unsigned long)(uintptr_t)ret) & ~0xff000000l) && try_ < 2)
		{
			psxUnmap(ret, size, tag);

			// try to use similarly aligned memory instead
			// (recompiler needs this)
			mask = try_ ? 0xffff : 0xffffff;
			addr = ((uintptr_t)ret + mask) & ~mask;
			try_++;
			goto retry;
		}
	}

	return ret;
}

void psxUnmap(void *ptr, size_t size, enum psxMapTag tag)
{
	if (psxUnmapHook != NULL) {
		psxUnmapHook(ptr, size, tag);
		return;
	}

	if (ptr)
		munmap(ptr, size);
}

s8 *psxM = NULL; // Kernel & User Memory (2 Meg)
s8 *psxP = NULL; // Parallel Port (64K)
s8 *psxR = NULL; // BIOS ROM (512K)
s8 *psxH = NULL; // Scratch Pad (1K) & Hardware Registers (8K)

u8 **psxMemWLUT = NULL;
u8 **psxMemRLUT = NULL;

/*  Playstation Memory Map (from Playstation doc by Joshua Walker)
0x0000_0000-0x0000_ffff		Kernel (64K)
0x0001_0000-0x001f_ffff		User Memory (1.9 Meg)

0x1f00_0000-0x1f00_ffff		Parallel Port (64K)

0x1f80_0000-0x1f80_03ff		Scratch Pad (1024 bytes)

0x1f80_1000-0x1f80_2fff		Hardware Registers (8K)

0x1fc0_0000-0x1fc7_ffff		BIOS (512K)

0x8000_0000-0x801f_ffff		Kernel and User Memory Mirror (2 Meg) Cached
0x9fc0_0000-0x9fc7_ffff		BIOS Mirror (512K) Cached

0xa000_0000-0xa01f_ffff		Kernel and User Memory Mirror (2 Meg) Uncached
0xbfc0_0000-0xbfc7_ffff		BIOS Mirror (512K) Uncached
*/

static int psxMemInitMap(void)
{
	psxM = psxMap(0x80000000, 0x00210000, 1, MAP_TAG_RAM);
	if (psxM == MAP_FAILED)
		psxM = psxMap(0x77000000, 0x00210000, 0, MAP_TAG_RAM);
	if (psxM == MAP_FAILED) {
		SysMessage(_("mapping main RAM failed"));
		psxM = NULL;
		return -1;
	}
	psxP = &psxM[0x200000];

	psxH = psxMap(0x1f800000, 0x10000, 0, MAP_TAG_OTHER);
	if (psxH == MAP_FAILED) {
		SysMessage(_("Error allocating memory!"));
		psxMemShutdown();
		return -1;
	}

	psxR = psxMap(0x1fc00000, 0x80000, 0, MAP_TAG_OTHER);
	if (psxR == MAP_FAILED) {
		SysMessage(_("Error allocating memory!"));
		psxMemShutdown();
		return -1;
	}

	return 0;
}

static void psxMemFreeMap(void)
{
	if (psxM) psxUnmap(psxM, 0x00210000, MAP_TAG_RAM);
	if (psxH) psxUnmap(psxH, 0x10000, MAP_TAG_OTHER);
	if (psxR) psxUnmap(psxR, 0x80000, MAP_TAG_OTHER);
	psxM = psxH = psxR = NULL;
	psxP = NULL;
}

int psxMemInit(void)
{
	unsigned int i;
	int ret;

	if (LIGHTREC_CUSTOM_MAP)
		ret = lightrec_init_mmap();
	else
		ret = psxMemInitMap();
	if (ret) {
		SysMessage(_("Error allocating memory!"));
		psxMemShutdown();
		return -1;
	}

	psxMemRLUT = (u8 **)malloc(0x10000 * sizeof(void *));
	psxMemWLUT = (u8 **)malloc(0x10000 * sizeof(void *));

	if (psxMemRLUT == NULL || psxMemWLUT == NULL) {
		SysMessage(_("Error allocating memory!"));
		psxMemShutdown();
		return -1;
	}

	memset(psxMemRLUT, (int)(uintptr_t)INVALID_PTR, 0x10000 * sizeof(void *));
	memset(psxMemWLUT, (int)(uintptr_t)INVALID_PTR, 0x10000 * sizeof(void *));

// MemR
	for (i = 0; i < 0x80; i++) psxMemRLUT[i + 0x0000] = (u8 *)&psxM[(i & 0x1f) << 16];

	memcpy(psxMemRLUT + 0x8000, psxMemRLUT, 0x80 * sizeof(void *));
	memcpy(psxMemRLUT + 0xa000, psxMemRLUT, 0x80 * sizeof(void *));

	psxMemRLUT[0x1f00] = (u8 *)psxP;
	psxMemRLUT[0x1f80] = (u8 *)psxH;

	for (i = 0; i < 0x08; i++) psxMemRLUT[i + 0x1fc0] = (u8 *)&psxR[i << 16];

	memcpy(psxMemRLUT + 0x9fc0, psxMemRLUT + 0x1fc0, 0x08 * sizeof(void *));
	memcpy(psxMemRLUT + 0xbfc0, psxMemRLUT + 0x1fc0, 0x08 * sizeof(void *));

// MemW
	for (i = 0; i < 0x80; i++) psxMemWLUT[i + 0x0000] = (u8 *)&psxM[(i & 0x1f) << 16];

	memcpy(psxMemWLUT + 0x8000, psxMemWLUT, 0x80 * sizeof(void *));
	memcpy(psxMemWLUT + 0xa000, psxMemWLUT, 0x80 * sizeof(void *));

	// Don't allow writes to PIO Expansion region (psxP) to take effect.
	// NOTE: Not sure if this is needed to fix any games but seems wise,
	//       seeing as some games do read from PIO as part of copy-protection
	//       check. (See fix in psxMemReset() regarding psxP region reads).
	psxMemWLUT[0x1f00] = INVALID_PTR;
	psxMemWLUT[0x1f80] = (u8 *)psxH;

	return 0;
}

void psxMemReset() {
	FILE *f = NULL;
	char bios[1024];

	memset(psxM, 0, 0x00200000);
	memset(psxP, 0xff, 0x00010000);

	Config.HLE = TRUE;

	if (strcmp(Config.Bios, "HLE") != 0) {
		sprintf(bios, "%s/%s", Config.BiosDir, Config.Bios);
		f = fopen(bios, "rb");

		if (f == NULL) {
			SysMessage(_("Could not open BIOS:\"%s\". Enabling HLE Bios!\n"), bios);
			memset(psxR, 0, 0x80000);
		} else {
			if (fread(psxR, 1, 0x80000, f) == 0x80000) {
				Config.HLE = FALSE;
			} else {
				SysMessage(_("The selected BIOS:\"%s\" is of wrong size. Enabling HLE Bios!\n"), bios);
			}
			fclose(f);
		}
	}
}

void psxMemShutdown() {
	if (LIGHTREC_CUSTOM_MAP)
		lightrec_free_mmap();
	else
		psxMemFreeMap();

	free(psxMemRLUT); psxMemRLUT = NULL;
	free(psxMemWLUT); psxMemWLUT = NULL;
}

void psxMemOnIsolate(int enable)
{
	if (enable) {
		memset(psxMemWLUT + 0x0000, (int)(uintptr_t)INVALID_PTR, 0x80 * sizeof(void *));
		memset(psxMemWLUT + 0x8000, (int)(uintptr_t)INVALID_PTR, 0x80 * sizeof(void *));
		//memset(psxMemWLUT + 0xa000, (int)(uintptr_t)INVALID_PTR, 0x80 * sizeof(void *));
	} else {
		int i;
		for (i = 0; i < 0x80; i++)
			psxMemWLUT[i + 0x0000] = (void *)&psxM[(i & 0x1f) << 16];
		memcpy(psxMemWLUT + 0x8000, psxMemWLUT, 0x80 * sizeof(void *));
		memcpy(psxMemWLUT + 0xa000, psxMemWLUT, 0x80 * sizeof(void *));
	}
	psxCpu->Notify(enable ? R3000ACPU_NOTIFY_CACHE_ISOLATED
			: R3000ACPU_NOTIFY_CACHE_UNISOLATED, NULL);
}

u8 psxMemRead8(u32 mem) {
	char *p;
	u32 t;

	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			return psxHu8(mem);
		else
			return psxHwRead8(mem);
	} else {
		p = (char *)(psxMemRLUT[t]);
		if (p != INVALID_PTR) {
			if (Config.Debug)
				DebugCheckBP((mem & 0xffffff) | 0x80000000, R1);
			return *(u8 *)(p + (mem & 0xffff));
		} else {
#ifdef PSXMEM_LOG
			PSXMEM_LOG("err lb %8.8lx\n", mem);
#endif
			return 0xFF;
		}
	}
}

u16 psxMemRead16(u32 mem) {
	char *p;
	u32 t;

	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			return psxHu16(mem);
		else
			return psxHwRead16(mem);
	} else {
		p = (char *)(psxMemRLUT[t]);
		if (p != INVALID_PTR) {
			if (Config.Debug)
				DebugCheckBP((mem & 0xffffff) | 0x80000000, R2);
			return SWAPu16(*(u16 *)(p + (mem & 0xffff)));
		} else {
#ifdef PSXMEM_LOG
			PSXMEM_LOG("err lh %8.8lx\n", mem);
#endif
			return 0xFFFF;
		}
	}
}

u32 psxMemRead32(u32 mem) {
	char *p;
	u32 t;

	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			return psxHu32(mem);
		else
			return psxHwRead32(mem);
	} else {
		p = (char *)(psxMemRLUT[t]);
		if (p != INVALID_PTR) {
			if (Config.Debug)
				DebugCheckBP((mem & 0xffffff) | 0x80000000, R4);
			return SWAPu32(*(u32 *)(p + (mem & 0xffff)));
		} else {
			if (mem == 0xfffe0130)
				return psxRegs.biuReg;
#ifdef PSXMEM_LOG
			PSXMEM_LOG("err lw %8.8lx\n", mem);
#endif
			return 0xFFFFFFFF;
		}
	}
}

void psxMemWrite8(u32 mem, u8 value) {
	char *p;
	u32 t;

	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			psxHu8(mem) = value;
		else
			psxHwWrite8(mem, value);
	} else {
		p = (char *)(psxMemWLUT[t]);
		if (p != INVALID_PTR) {
			if (Config.Debug)
				DebugCheckBP((mem & 0xffffff) | 0x80000000, W1);
			*(u8 *)(p + (mem & 0xffff)) = value;
#ifndef DRC_DISABLE
			psxCpu->Clear((mem & (~3)), 1);
#endif
		} else {
#ifdef PSXMEM_LOG
			PSXMEM_LOG("err sb %8.8lx\n", mem);
#endif
		}
	}
}

void psxMemWrite16(u32 mem, u16 value) {
	char *p;
	u32 t;

	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			psxHu16ref(mem) = SWAPu16(value);
		else
			psxHwWrite16(mem, value);
	} else {
		p = (char *)(psxMemWLUT[t]);
		if (p != INVALID_PTR) {
			if (Config.Debug)
				DebugCheckBP((mem & 0xffffff) | 0x80000000, W2);
			*(u16 *)(p + (mem & 0xffff)) = SWAPu16(value);
#ifndef DRC_DISABLE
			psxCpu->Clear((mem & (~3)), 1);
#endif
		} else {
#ifdef PSXMEM_LOG
			PSXMEM_LOG("err sh %8.8lx\n", mem);
#endif
		}
	}
}

void psxMemWrite32(u32 mem, u32 value) {
	char *p;
	u32 t;

//	if ((mem&0x1fffff) == 0x71E18 || value == 0x48088800) SysPrintf("t2fix!!\n");
	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			psxHu32ref(mem) = SWAPu32(value);
		else
			psxHwWrite32(mem, value);
	} else {
		p = (char *)(psxMemWLUT[t]);
		if (p != INVALID_PTR) {
			if (Config.Debug)
				DebugCheckBP((mem & 0xffffff) | 0x80000000, W4);
			*(u32 *)(p + (mem & 0xffff)) = SWAPu32(value);
#ifndef DRC_DISABLE
			psxCpu->Clear(mem, 1);
#endif
		} else {
			if (mem == 0xfffe0130) {
				psxRegs.biuReg = value;
				return;
			}
#ifdef PSXMEM_LOG
			PSXMEM_LOG("err sw %8.8lx\n", mem);
#endif
		}
	}
}

void *psxMemPointer(u32 mem) {
	char *p;
	u32 t;

	t = mem >> 16;
	if (t == 0x1f80 || t == 0x9f80 || t == 0xbf80) {
		if ((mem & 0xffff) < 0x400)
			return (void *)&psxH[mem];
		else
			return NULL;
	} else {
		p = (char *)(psxMemWLUT[t]);
		if (p != INVALID_PTR) {
			return (void *)(p + (mem & 0xffff));
		}
		return NULL;
	}
}
Commit	Line	Data
ef79bbde P	1	/***************************************************************************
	2	* Copyright (C) 2007 Ryan Schultz, PCSX-df Team, PCSX team *
	3	* *
	4	* This program is free software; you can redistribute it and/or modify *
	5	* it under the terms of the GNU General Public License as published by *
	6	* the Free Software Foundation; either version 2 of the License, or *
	7	* (at your option) any later version. *
	8	* *
	9	* This program is distributed in the hope that it will be useful, *
	10	* but WITHOUT ANY WARRANTY; without even the implied warranty of *
	11	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
	12	* GNU General Public License for more details. *
	13	* *
	14	* You should have received a copy of the GNU General Public License *
	15	* along with this program; if not, write to the *
	16	* Free Software Foundation, Inc., *
	17	* 51 Franklin Street, Fifth Floor, Boston, MA 02111-1307 USA. *
	18	***************************************************************************/
	19
	20	/*
	21	* PSX memory functions.
	22	*/
	23
	24	// TODO: Implement caches & cycle penalty.
	25
	26	#include "psxmem.h"
87e5b45f	27	#include "psxmem_map.h"
ef79bbde P	28	#include "r3000a.h"
ef79bbde P	29	#include "psxhw.h"
7d7672a5	30	//#include "debug.h"
7d7672a5	31	#define DebugCheckBP(...)
ce0e7ac9	32
7a8d521f	33	#include "lightrec/mem.h"
ce0e7ac9	34	#include "memmap.h"
ef79bbde	35
7a8d521f	36	#ifdef USE_LIBRETRO_VFS
	37	#include <streams/file_stream_transforms.h>
	38	#endif
	39
ef79bbde P	40	#ifndef MAP_ANONYMOUS
	41	#define MAP_ANONYMOUS MAP_ANON
	42	#endif
	43
87e5b45f	44	void (psxMapHook)(unsigned long addr, size_t size, int is_fixed,
	45	enum psxMapTag tag);
	46	void (psxUnmapHook)(void ptr, size_t size, enum psxMapTag tag);
	47
	48	void *psxMap(unsigned long addr, size_t size, int is_fixed,
	49	enum psxMapTag tag)
	50	{
	51	int flags = MAP_PRIVATE \| MAP_ANONYMOUS;
5644b26c	52	int try_ = 0;
b0dd9956	53	unsigned long mask;
87e5b45f	54	void req, ret;
87e5b45f	55
b0dd9956	56	retry:
b0dd9956	57	if (psxMapHook != NULL) {
85f23982	58	ret = psxMapHook(addr, size, 0, tag);
85f23982	59	if (ret == NULL)
7a8d521f	60	return MAP_FAILED;
85f23982	61	}
	62	else {
	63	/* avoid MAP_FIXED, it overrides existing mappings.. */
	64	/* if (is_fixed)
	65	flags \|= MAP_FIXED; */
	66
77e1e479	67	req = (void *)(uintptr_t)addr;
85f23982	68	ret = mmap(req, size, PROT_READ \| PROT_WRITE, flags, -1, 0);
85f23982	69	if (ret == MAP_FAILED)
7a8d521f	70	return ret;
b0dd9956	71	}
87e5b45f	72
77e1e479	73	if (addr != 0 && ret != (void *)(uintptr_t)addr) {
b0dd9956	74	SysMessage("psxMap: warning: wanted to map @%08x, got %p\n",
	75	addr, ret);
	76
0069615f	77	if (is_fixed) {
0069615f	78	psxUnmap(ret, size, tag);
7a8d521f	79	return MAP_FAILED;
0069615f	80	}
0069615f	81
77e1e479	82	if (((addr ^ (unsigned long)(uintptr_t)ret) & ~0xff000000l) && try_ < 2)
b0dd9956	83	{
	84	psxUnmap(ret, size, tag);
	85
	86	// try to use similarly aligned memory instead
	87	// (recompiler needs this)
5644b26c	88	mask = try_ ? 0xffff : 0xffffff;
77e1e479	89	addr = ((uintptr_t)ret + mask) & ~mask;
5644b26c	90	try_++;
b0dd9956	91	goto retry;
	92	}
	93	}
87e5b45f	94
	95	return ret;
	96	}
	97
	98	void psxUnmap(void *ptr, size_t size, enum psxMapTag tag)
	99	{
	100	if (psxUnmapHook != NULL) {
	101	psxUnmapHook(ptr, size, tag);
	102	return;
	103	}
	104
88901dd2	105	if (ptr)
88901dd2	106	munmap(ptr, size);
87e5b45f	107	}
87e5b45f	108
ef79bbde P	109	s8 *psxM = NULL; // Kernel & User Memory (2 Meg)
	110	s8 *psxP = NULL; // Parallel Port (64K)
	111	s8 *psxR = NULL; // BIOS ROM (512K)
	112	s8 *psxH = NULL; // Scratch Pad (1K) & Hardware Registers (8K)
	113
	114	u8 **psxMemWLUT = NULL;
	115	u8 **psxMemRLUT = NULL;
	116
	117	/* Playstation Memory Map (from Playstation doc by Joshua Walker)
	118	0x0000_0000-0x0000_ffff Kernel (64K)
	119	0x0001_0000-0x001f_ffff User Memory (1.9 Meg)
	120
	121	0x1f00_0000-0x1f00_ffff Parallel Port (64K)
	122
	123	0x1f80_0000-0x1f80_03ff Scratch Pad (1024 bytes)
	124
	125	0x1f80_1000-0x1f80_2fff Hardware Registers (8K)
	126
	127	0x1fc0_0000-0x1fc7_ffff BIOS (512K)
	128
	129	0x8000_0000-0x801f_ffff Kernel and User Memory Mirror (2 Meg) Cached
	130	0x9fc0_0000-0x9fc7_ffff BIOS Mirror (512K) Cached
	131
	132	0xa000_0000-0xa01f_ffff Kernel and User Memory Mirror (2 Meg) Uncached
	133	0xbfc0_0000-0xbfc7_ffff BIOS Mirror (512K) Uncached
	134	*/
	135
7a8d521f	136	static int psxMemInitMap(void)
7a8d521f	137	{
87e5b45f	138	psxM = psxMap(0x80000000, 0x00210000, 1, MAP_TAG_RAM);
7a8d521f	139	if (psxM == MAP_FAILED)
f23d3386	140	psxM = psxMap(0x77000000, 0x00210000, 0, MAP_TAG_RAM);
7a8d521f	141	if (psxM == MAP_FAILED) {
a327ad27	142	SysMessage(_("mapping main RAM failed"));
7a8d521f	143	psxM = NULL;
a327ad27	144	return -1;
a327ad27	145	}
ef79bbde	146	psxP = &psxM[0x200000];
7a8d521f	147
6d760c92	148	psxH = psxMap(0x1f800000, 0x10000, 0, MAP_TAG_OTHER);
7a8d521f	149	if (psxH == MAP_FAILED) {
	150	SysMessage(_("Error allocating memory!"));
	151	psxMemShutdown();
	152	return -1;
	153	}
	154
87e5b45f	155	psxR = psxMap(0x1fc00000, 0x80000, 0, MAP_TAG_OTHER);
7a8d521f	156	if (psxR == MAP_FAILED) {
	157	SysMessage(_("Error allocating memory!"));
	158	psxMemShutdown();
	159	return -1;
	160	}
ef79bbde	161
7a8d521f	162	return 0;
	163	}
	164
	165	static void psxMemFreeMap(void)
	166	{
	167	if (psxM) psxUnmap(psxM, 0x00210000, MAP_TAG_RAM);
	168	if (psxH) psxUnmap(psxH, 0x10000, MAP_TAG_OTHER);
	169	if (psxR) psxUnmap(psxR, 0x80000, MAP_TAG_OTHER);
	170	psxM = psxH = psxR = NULL;
	171	psxP = NULL;
	172	}
	173
	174	int psxMemInit(void)
	175	{
	176	unsigned int i;
	177	int ret;
	178
	179	if (LIGHTREC_CUSTOM_MAP)
	180	ret = lightrec_init_mmap();
	181	else
	182	ret = psxMemInitMap();
	183	if (ret) {
	184	SysMessage(_("Error allocating memory!"));
	185	psxMemShutdown();
	186	return -1;
	187	}
	188
	189	psxMemRLUT = (u8 *)malloc(0x10000 sizeof(void *));
	190	psxMemWLUT = (u8 *)malloc(0x10000 sizeof(void *));
	191
	192	if (psxMemRLUT == NULL \|\| psxMemWLUT == NULL) {
ef79bbde	193	SysMessage(_("Error allocating memory!"));
88901dd2	194	psxMemShutdown();
ef79bbde P	195	return -1;
	196	}
	197
679d5ee3	198	memset(psxMemRLUT, (int)(uintptr_t)INVALID_PTR, 0x10000 * sizeof(void *));
679d5ee3	199	memset(psxMemWLUT, (int)(uintptr_t)INVALID_PTR, 0x10000 * sizeof(void *));
7a8d521f	200
ef79bbde P	201	// MemR
	202	for (i = 0; i < 0x80; i++) psxMemRLUT[i + 0x0000] = (u8 *)&psxM[(i & 0x1f) << 16];
	203
	204	memcpy(psxMemRLUT + 0x8000, psxMemRLUT, 0x80 * sizeof(void *));
	205	memcpy(psxMemRLUT + 0xa000, psxMemRLUT, 0x80 * sizeof(void *));
	206
	207	psxMemRLUT[0x1f00] = (u8 *)psxP;
	208	psxMemRLUT[0x1f80] = (u8 *)psxH;
	209
	210	for (i = 0; i < 0x08; i++) psxMemRLUT[i + 0x1fc0] = (u8 *)&psxR[i << 16];
	211
	212	memcpy(psxMemRLUT + 0x9fc0, psxMemRLUT + 0x1fc0, 0x08 * sizeof(void *));
	213	memcpy(psxMemRLUT + 0xbfc0, psxMemRLUT + 0x1fc0, 0x08 * sizeof(void *));
	214
	215	// MemW
	216	for (i = 0; i < 0x80; i++) psxMemWLUT[i + 0x0000] = (u8 *)&psxM[(i & 0x1f) << 16];
	217
	218	memcpy(psxMemWLUT + 0x8000, psxMemWLUT, 0x80 * sizeof(void *));
	219	memcpy(psxMemWLUT + 0xa000, psxMemWLUT, 0x80 * sizeof(void *));
	220
fa18abb2	221	// Don't allow writes to PIO Expansion region (psxP) to take effect.
	222	// NOTE: Not sure if this is needed to fix any games but seems wise,
	223	// seeing as some games do read from PIO as part of copy-protection
	224	// check. (See fix in psxMemReset() regarding psxP region reads).
7a8d521f	225	psxMemWLUT[0x1f00] = INVALID_PTR;
ef79bbde P	226	psxMemWLUT[0x1f80] = (u8 *)psxH;
	227
	228	return 0;
	229	}
	230
	231	void psxMemReset() {
	232	FILE *f = NULL;
	233	char bios[1024];
	234
	235	memset(psxM, 0, 0x00200000);
23643ee7	236	memset(psxP, 0xff, 0x00010000);
ef79bbde	237
7a8d521f	238	Config.HLE = TRUE;
7a8d521f	239
ef79bbde P	240	if (strcmp(Config.Bios, "HLE") != 0) {
	241	sprintf(bios, "%s/%s", Config.BiosDir, Config.Bios);
	242	f = fopen(bios, "rb");
	243
	244	if (f == NULL) {
	245	SysMessage(_("Could not open BIOS:\"%s\". Enabling HLE Bios!\n"), bios);
	246	memset(psxR, 0, 0x80000);
ef79bbde	247	} else {
7a8d521f	248	if (fread(psxR, 1, 0x80000, f) == 0x80000) {
	249	Config.HLE = FALSE;
	250	} else {
	251	SysMessage(_("The selected BIOS:\"%s\" is of wrong size. Enabling HLE Bios!\n"), bios);
	252	}
ef79bbde	253	fclose(f);
ef79bbde	254	}
7a8d521f	255	}
ef79bbde P	256	}
	257
	258	void psxMemShutdown() {
7a8d521f	259	if (LIGHTREC_CUSTOM_MAP)
	260	lightrec_free_mmap();
	261	else
	262	psxMemFreeMap();
ef79bbde	263
88901dd2	264	free(psxMemRLUT); psxMemRLUT = NULL;
88901dd2	265	free(psxMemWLUT); psxMemWLUT = NULL;
ef79bbde P	266	}
ef79bbde P	267
679d5ee3	268	void psxMemOnIsolate(int enable)
	269	{
	270	if (enable) {
	271	memset(psxMemWLUT + 0x0000, (int)(uintptr_t)INVALID_PTR, 0x80 * sizeof(void *));
	272	memset(psxMemWLUT + 0x8000, (int)(uintptr_t)INVALID_PTR, 0x80 * sizeof(void *));
	273	//memset(psxMemWLUT + 0xa000, (int)(uintptr_t)INVALID_PTR, 0x80 * sizeof(void *));
	274	} else {
	275	int i;
	276	for (i = 0; i < 0x80; i++)
	277	psxMemWLUT[i + 0x0000] = (void *)&psxM[(i & 0x1f) << 16];
	278	memcpy(psxMemWLUT + 0x8000, psxMemWLUT, 0x80 * sizeof(void *));
	279	memcpy(psxMemWLUT + 0xa000, psxMemWLUT, 0x80 * sizeof(void *));
	280	}
	281	psxCpu->Notify(enable ? R3000ACPU_NOTIFY_CACHE_ISOLATED
	282	: R3000ACPU_NOTIFY_CACHE_UNISOLATED, NULL);
	283	}
ef79bbde P	284
	285	u8 psxMemRead8(u32 mem) {
	286	char *p;
	287	u32 t;
	288
	289	t = mem >> 16;
9dd7d179	290	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	291	if ((mem & 0xffff) < 0x400)
ef79bbde P	292	return psxHu8(mem);
	293	else
	294	return psxHwRead8(mem);
	295	} else {
	296	p = (char *)(psxMemRLUT[t]);
7a8d521f	297	if (p != INVALID_PTR) {
ef79bbde P	298	if (Config.Debug)
	299	DebugCheckBP((mem & 0xffffff) \| 0x80000000, R1);
	300	return (u8 )(p + (mem & 0xffff));
	301	} else {
	302	#ifdef PSXMEM_LOG
	303	PSXMEM_LOG("err lb %8.8lx\n", mem);
	304	#endif
943a507a	305	return 0xFF;
ef79bbde P	306	}
	307	}
	308	}
	309
	310	u16 psxMemRead16(u32 mem) {
	311	char *p;
	312	u32 t;
	313
	314	t = mem >> 16;
9dd7d179	315	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	316	if ((mem & 0xffff) < 0x400)
ef79bbde P	317	return psxHu16(mem);
	318	else
	319	return psxHwRead16(mem);
	320	} else {
	321	p = (char *)(psxMemRLUT[t]);
7a8d521f	322	if (p != INVALID_PTR) {
ef79bbde P	323	if (Config.Debug)
	324	DebugCheckBP((mem & 0xffffff) \| 0x80000000, R2);
	325	return SWAPu16((u16 )(p + (mem & 0xffff)));
	326	} else {
	327	#ifdef PSXMEM_LOG
	328	PSXMEM_LOG("err lh %8.8lx\n", mem);
	329	#endif
943a507a	330	return 0xFFFF;
ef79bbde P	331	}
	332	}
	333	}
	334
	335	u32 psxMemRead32(u32 mem) {
	336	char *p;
	337	u32 t;
	338
	339	t = mem >> 16;
9dd7d179	340	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	341	if ((mem & 0xffff) < 0x400)
ef79bbde P	342	return psxHu32(mem);
	343	else
	344	return psxHwRead32(mem);
	345	} else {
	346	p = (char *)(psxMemRLUT[t]);
7a8d521f	347	if (p != INVALID_PTR) {
ef79bbde P	348	if (Config.Debug)
	349	DebugCheckBP((mem & 0xffffff) \| 0x80000000, R4);
	350	return SWAPu32((u32 )(p + (mem & 0xffff)));
	351	} else {
679d5ee3	352	if (mem == 0xfffe0130)
679d5ee3	353	return psxRegs.biuReg;
ef79bbde	354	#ifdef PSXMEM_LOG
679d5ee3	355	PSXMEM_LOG("err lw %8.8lx\n", mem);
ef79bbde	356	#endif
943a507a	357	return 0xFFFFFFFF;
ef79bbde P	358	}
	359	}
	360	}
	361
	362	void psxMemWrite8(u32 mem, u8 value) {
	363	char *p;
	364	u32 t;
	365
	366	t = mem >> 16;
9dd7d179	367	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	368	if ((mem & 0xffff) < 0x400)
ef79bbde P	369	psxHu8(mem) = value;
	370	else
	371	psxHwWrite8(mem, value);
	372	} else {
	373	p = (char *)(psxMemWLUT[t]);
7a8d521f	374	if (p != INVALID_PTR) {
ef79bbde P	375	if (Config.Debug)
	376	DebugCheckBP((mem & 0xffffff) \| 0x80000000, W1);
	377	(u8 )(p + (mem & 0xffff)) = value;
41e82ad4	378	#ifndef DRC_DISABLE
ef79bbde P	379	psxCpu->Clear((mem & (~3)), 1);
	380	#endif
	381	} else {
	382	#ifdef PSXMEM_LOG
	383	PSXMEM_LOG("err sb %8.8lx\n", mem);
	384	#endif
	385	}
	386	}
	387	}
	388
	389	void psxMemWrite16(u32 mem, u16 value) {
	390	char *p;
	391	u32 t;
	392
	393	t = mem >> 16;
9dd7d179	394	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	395	if ((mem & 0xffff) < 0x400)
ef79bbde P	396	psxHu16ref(mem) = SWAPu16(value);
	397	else
	398	psxHwWrite16(mem, value);
	399	} else {
	400	p = (char *)(psxMemWLUT[t]);
7a8d521f	401	if (p != INVALID_PTR) {
ef79bbde P	402	if (Config.Debug)
	403	DebugCheckBP((mem & 0xffffff) \| 0x80000000, W2);
	404	(u16 )(p + (mem & 0xffff)) = SWAPu16(value);
41e82ad4	405	#ifndef DRC_DISABLE
3e31e934	406	psxCpu->Clear((mem & (~3)), 1);
ef79bbde P	407	#endif
	408	} else {
	409	#ifdef PSXMEM_LOG
	410	PSXMEM_LOG("err sh %8.8lx\n", mem);
	411	#endif
	412	}
	413	}
	414	}
	415
	416	void psxMemWrite32(u32 mem, u32 value) {
	417	char *p;
	418	u32 t;
	419
	420	// if ((mem&0x1fffff) == 0x71E18 \|\| value == 0x48088800) SysPrintf("t2fix!!\n");
	421	t = mem >> 16;
9dd7d179	422	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	423	if ((mem & 0xffff) < 0x400)
ef79bbde P	424	psxHu32ref(mem) = SWAPu32(value);
	425	else
	426	psxHwWrite32(mem, value);
	427	} else {
	428	p = (char *)(psxMemWLUT[t]);
7a8d521f	429	if (p != INVALID_PTR) {
ef79bbde P	430	if (Config.Debug)
	431	DebugCheckBP((mem & 0xffffff) \| 0x80000000, W4);
	432	(u32 )(p + (mem & 0xffff)) = SWAPu32(value);
41e82ad4	433	#ifndef DRC_DISABLE
ef79bbde P	434	psxCpu->Clear(mem, 1);
	435	#endif
	436	} else {
679d5ee3	437	if (mem == 0xfffe0130) {
	438	psxRegs.biuReg = value;
	439	return;
	440	}
ef79bbde	441	#ifdef PSXMEM_LOG
679d5ee3	442	PSXMEM_LOG("err sw %8.8lx\n", mem);
ef79bbde	443	#endif
ef79bbde P	444	}
	445	}
	446	}
	447
	448	void *psxMemPointer(u32 mem) {
	449	char *p;
	450	u32 t;
	451
	452	t = mem >> 16;
9dd7d179	453	if (t == 0x1f80 \|\| t == 0x9f80 \|\| t == 0xbf80) {
9dd7d179	454	if ((mem & 0xffff) < 0x400)
ef79bbde P	455	return (void *)&psxH[mem];
	456	else
	457	return NULL;
	458	} else {
	459	p = (char *)(psxMemWLUT[t]);
7a8d521f	460	if (p != INVALID_PTR) {
ef79bbde P	461	return (void *)(p + (mem & 0xffff));
	462	}
	463	return NULL;
	464	}
	465	}