[pcsx_rearmed.git] / libpcsxcore / psxdma.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.           *
 ***************************************************************************/

/*
* Handles PSX DMA functions.
*/

#include "psxdma.h"
#include "gpu.h"

// Dma0/1 in Mdec.c
// Dma3   in CdRom.c

void spuInterrupt() {
	if (HW_DMA4_CHCR & SWAP32(0x01000000))
	{
		HW_DMA4_CHCR &= SWAP32(~0x01000000);
		DMA_INTERRUPT(4);
	}
}

void psxDma4(u32 madr, u32 bcr, u32 chcr) { // SPU
	u16 *ptr;
	u32 words;

	switch (chcr) {
		case 0x01000201: //cpu to spu transfer
#ifdef PSXDMA_LOG
			PSXDMA_LOG("*** DMA4 SPU - mem2spu *** %x addr = %x size = %x\n", chcr, madr, bcr);
#endif
			ptr = (u16 *)PSXM(madr);
			if (ptr == INVALID_PTR) {
#ifdef CPU_LOG
				CPU_LOG("*** DMA4 SPU - mem2spu *** NULL Pointer!!!\n");
#endif
				break;
			}
			words = (bcr >> 16) * (bcr & 0xffff);
			SPU_writeDMAMem(ptr, words * 2, psxRegs.cycle);
			HW_DMA4_MADR = SWAPu32(madr + words * 4);
			SPUDMA_INT(words * 4);
			return;

		case 0x01000200: //spu to cpu transfer
#ifdef PSXDMA_LOG
			PSXDMA_LOG("*** DMA4 SPU - spu2mem *** %x addr = %x size = %x\n", chcr, madr, bcr);
#endif
			ptr = (u16 *)PSXM(madr);
			if (ptr == INVALID_PTR) {
#ifdef CPU_LOG
				CPU_LOG("*** DMA4 SPU - spu2mem *** NULL Pointer!!!\n");
#endif
				break;
			}
			words = (bcr >> 16) * (bcr & 0xffff);
			SPU_readDMAMem(ptr, words * 2, psxRegs.cycle);
			psxCpu->Clear(madr, words);

			HW_DMA4_MADR = SWAPu32(madr + words * 4);
			SPUDMA_INT(words * 4);
			return;

		default:
			log_unhandled("*** DMA4 SPU - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
			break;
	}

	HW_DMA4_CHCR &= SWAP32(~0x01000000);
	DMA_INTERRUPT(4);
}

// Taken from PEOPS SOFTGPU
static inline boolean CheckForEndlessLoop(u32 laddr, u32 *lUsedAddr) {
	if (laddr == lUsedAddr[1]) return TRUE;
	if (laddr == lUsedAddr[2]) return TRUE;

	if (laddr < lUsedAddr[0]) lUsedAddr[1] = laddr;
	else lUsedAddr[2] = laddr;

	lUsedAddr[0] = laddr;

	return FALSE;
}

static u32 gpuDmaChainSize(u32 addr) {
	u32 size;
	u32 DMACommandCounter = 0;
	u32 lUsedAddr[3];

	lUsedAddr[0] = lUsedAddr[1] = lUsedAddr[2] = 0xffffff;

	// initial linked list ptr (word)
	size = 1;

	do {
		addr &= 0x1ffffc;

		if (DMACommandCounter++ > 2000000) break;
		if (CheckForEndlessLoop(addr, lUsedAddr)) break;

		// # 32-bit blocks to transfer
		size += psxMu8( addr + 3 );

		// next 32-bit pointer
		addr = psxMu32( addr & ~0x3 ) & 0xffffff;
		size += 1;
	} while (addr != 0xffffff);

	return size;
}

void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
	u32 *ptr;
	u32 words;
	u32 size;

	switch (chcr) {
		case 0x01000200: // vram2mem
#ifdef PSXDMA_LOG
			PSXDMA_LOG("*** DMA2 GPU - vram2mem *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
#endif
			ptr = (u32 *)PSXM(madr);
			if (ptr == INVALID_PTR) {
#ifdef CPU_LOG
				CPU_LOG("*** DMA2 GPU - vram2mem *** NULL Pointer!!!\n");
#endif
				break;
			}
			// BA blocks * BS words (word = 32-bits)
			words = (bcr >> 16) * (bcr & 0xffff);
			GPU_readDataMem(ptr, words);
			psxCpu->Clear(madr, words);

			HW_DMA2_MADR = SWAPu32(madr + words * 4);

			// already 32-bit word size ((size * 4) / 4)
			GPUDMA_INT(words / 4);
			return;

		case 0x01000201: // mem2vram
#ifdef PSXDMA_LOG
			PSXDMA_LOG("*** DMA 2 - GPU mem2vram *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
#endif
			ptr = (u32 *)PSXM(madr);
			if (ptr == INVALID_PTR) {
#ifdef CPU_LOG
				CPU_LOG("*** DMA2 GPU - mem2vram *** NULL Pointer!!!\n");
#endif
				break;
			}
			// BA blocks * BS words (word = 32-bits)
			words = (bcr >> 16) * (bcr & 0xffff);
			GPU_writeDataMem(ptr, words);

			HW_DMA2_MADR = SWAPu32(madr + words * 4);

			// already 32-bit word size ((size * 4) / 4)
			GPUDMA_INT(words / 4);
			return;

		case 0x01000401: // dma chain
#ifdef PSXDMA_LOG
			PSXDMA_LOG("*** DMA 2 - GPU dma chain *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
#endif

			size = GPU_dmaChain((u32 *)psxM, madr & 0x1fffff);
			if ((int)size <= 0)
				size = gpuDmaChainSize(madr);
			HW_GPU_STATUS &= SWAP32(~PSXGPU_nBUSY);

			// we don't emulate progress, just busy flag and end irq,
			// so pretend we're already at the last block
			HW_DMA2_MADR = SWAPu32(0xffffff);

			// Tekken 3 = use 1.0 only (not 1.5x)

			// Einhander = parse linked list in pieces (todo)
			// Final Fantasy 4 = internal vram time (todo)
			// Rebel Assault 2 = parse linked list in pieces (todo)
			// Vampire Hunter D = allow edits to linked list (todo)
			GPUDMA_INT(size);
			return;

		default:
			log_unhandled("*** DMA 2 - GPU unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
			break;
	}

	HW_DMA2_CHCR &= SWAP32(~0x01000000);
	DMA_INTERRUPT(2);
}

void gpuInterrupt() {
	if (HW_DMA2_CHCR & SWAP32(0x01000000))
	{
		HW_DMA2_CHCR &= SWAP32(~0x01000000);
		DMA_INTERRUPT(2);
	}
	HW_GPU_STATUS |= SWAP32(PSXGPU_nBUSY); // GPU no longer busy
}

void psxDma6(u32 madr, u32 bcr, u32 chcr) {
	u32 words;
	u32 *mem = (u32 *)PSXM(madr);

#ifdef PSXDMA_LOG
	PSXDMA_LOG("*** DMA6 OT *** %x addr = %x size = %x\n", chcr, madr, bcr);
#endif

	if (chcr == 0x11000002) {
		if (mem == INVALID_PTR) {
#ifdef CPU_LOG
			CPU_LOG("*** DMA6 OT *** NULL Pointer!!!\n");
#endif
			HW_DMA6_CHCR &= SWAP32(~0x01000000);
			DMA_INTERRUPT(6);
			return;
		}

		// already 32-bit size
		words = bcr;

		while (bcr--) {
			*mem-- = SWAP32((madr - 4) & 0xffffff);
			madr -= 4;
		}
		*++mem = SWAP32(0xffffff);

		//GPUOTCDMA_INT(size);
		// halted
		psxRegs.cycle += words;
		GPUOTCDMA_INT(16);
		return;
	}
	else {
		// Unknown option
		log_unhandled("*** DMA6 OT - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
	}

	HW_DMA6_CHCR &= SWAP32(~0x01000000);
	DMA_INTERRUPT(6);
}

void gpuotcInterrupt()
{
	if (HW_DMA6_CHCR & SWAP32(0x01000000))
	{
		HW_DMA6_CHCR &= SWAP32(~0x01000000);
		DMA_INTERRUPT(6);
	}
}
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	* Handles PSX DMA functions.
	22	*/
	23
	24	#include "psxdma.h"
6c036261	25	#include "gpu.h"
ef79bbde P	26
	27	// Dma0/1 in Mdec.c
	28	// Dma3 in CdRom.c
	29
	30	void spuInterrupt() {
ad418c19	31	if (HW_DMA4_CHCR & SWAP32(0x01000000))
	32	{
	33	HW_DMA4_CHCR &= SWAP32(~0x01000000);
	34	DMA_INTERRUPT(4);
	35	}
ef79bbde P	36	}
	37
	38	void psxDma4(u32 madr, u32 bcr, u32 chcr) { // SPU
	39	u16 *ptr;
58ebb94c	40	u32 words;
ef79bbde P	41
	42	switch (chcr) {
	43	case 0x01000201: //cpu to spu transfer
	44	#ifdef PSXDMA_LOG
	45	PSXDMA_LOG("* DMA4 SPU - mem2spu * %x addr = %x size = %x\n", chcr, madr, bcr);
	46	#endif
	47	ptr = (u16 *)PSXM(madr);
b012a437	48	if (ptr == INVALID_PTR) {
ef79bbde P	49	#ifdef CPU_LOG
	50	CPU_LOG("* DMA4 SPU - mem2spu * NULL Pointer!!!\n");
	51	#endif
	52	break;
	53	}
58ebb94c	54	words = (bcr >> 16) * (bcr & 0xffff);
	55	SPU_writeDMAMem(ptr, words * 2, psxRegs.cycle);
	56	HW_DMA4_MADR = SWAPu32(madr + words * 4);
7b68d92c	57	SPUDMA_INT(words * 4);
ef79bbde P	58	return;
	59
	60	case 0x01000200: //spu to cpu transfer
	61	#ifdef PSXDMA_LOG
	62	PSXDMA_LOG("* DMA4 SPU - spu2mem * %x addr = %x size = %x\n", chcr, madr, bcr);
	63	#endif
	64	ptr = (u16 *)PSXM(madr);
b012a437	65	if (ptr == INVALID_PTR) {
ef79bbde P	66	#ifdef CPU_LOG
	67	CPU_LOG("* DMA4 SPU - spu2mem * NULL Pointer!!!\n");
	68	#endif
	69	break;
	70	}
58ebb94c	71	words = (bcr >> 16) * (bcr & 0xffff);
	72	SPU_readDMAMem(ptr, words * 2, psxRegs.cycle);
	73	psxCpu->Clear(madr, words);
	74
	75	HW_DMA4_MADR = SWAPu32(madr + words * 4);
7b68d92c	76	SPUDMA_INT(words * 4);
58ebb94c	77	return;
ef79bbde	78
ef79bbde	79	default:
7df2c03c	80	log_unhandled("* DMA4 SPU - unknown * %x addr = %x size = %x\n", chcr, madr, bcr);
ef79bbde	81	break;
ef79bbde P	82	}
	83
	84	HW_DMA4_CHCR &= SWAP32(~0x01000000);
	85	DMA_INTERRUPT(4);
	86	}
	87
57a757ce	88	// Taken from PEOPS SOFTGPU
	89	static inline boolean CheckForEndlessLoop(u32 laddr, u32 *lUsedAddr) {
	90	if (laddr == lUsedAddr[1]) return TRUE;
	91	if (laddr == lUsedAddr[2]) return TRUE;
	92
	93	if (laddr < lUsedAddr[0]) lUsedAddr[1] = laddr;
	94	else lUsedAddr[2] = laddr;
	95
	96	lUsedAddr[0] = laddr;
	97
	98	return FALSE;
	99	}
	100
	101	static u32 gpuDmaChainSize(u32 addr) {
	102	u32 size;
	103	u32 DMACommandCounter = 0;
	104	u32 lUsedAddr[3];
	105
	106	lUsedAddr[0] = lUsedAddr[1] = lUsedAddr[2] = 0xffffff;
	107
	108	// initial linked list ptr (word)
	109	size = 1;
	110
	111	do {
	112	addr &= 0x1ffffc;
	113
	114	if (DMACommandCounter++ > 2000000) break;
	115	if (CheckForEndlessLoop(addr, lUsedAddr)) break;
	116
	117	// # 32-bit blocks to transfer
	118	size += psxMu8( addr + 3 );
	119
	120	// next 32-bit pointer
	121	addr = psxMu32( addr & ~0x3 ) & 0xffffff;
	122	size += 1;
	123	} while (addr != 0xffffff);
	124
	125	return size;
	126	}
	127
ef79bbde P	128	void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
ef79bbde P	129	u32 *ptr;
58ebb94c	130	u32 words;
ef79bbde P	131	u32 size;
ef79bbde P	132
57a757ce	133	switch (chcr) {
ef79bbde P	134	case 0x01000200: // vram2mem
ef79bbde P	135	#ifdef PSXDMA_LOG
57a757ce	136	PSXDMA_LOG("* DMA2 GPU - vram2mem * %lx addr = %lx size = %lx\n", chcr, madr, bcr);
ef79bbde P	137	#endif
ef79bbde P	138	ptr = (u32 *)PSXM(madr);
b012a437	139	if (ptr == INVALID_PTR) {
ef79bbde P	140	#ifdef CPU_LOG
	141	CPU_LOG("* DMA2 GPU - vram2mem * NULL Pointer!!!\n");
	142	#endif
	143	break;
	144	}
57a757ce	145	// BA blocks * BS words (word = 32-bits)
58ebb94c	146	words = (bcr >> 16) * (bcr & 0xffff);
	147	GPU_readDataMem(ptr, words);
	148	psxCpu->Clear(madr, words);
	149
	150	HW_DMA2_MADR = SWAPu32(madr + words * 4);
57a757ce	151
57a757ce	152	// already 32-bit word size ((size * 4) / 4)
58ebb94c	153	GPUDMA_INT(words / 4);
57a757ce	154	return;
ef79bbde P	155
	156	case 0x01000201: // mem2vram
	157	#ifdef PSXDMA_LOG
57a757ce	158	PSXDMA_LOG("* DMA 2 - GPU mem2vram * %lx addr = %lx size = %lx\n", chcr, madr, bcr);
ef79bbde P	159	#endif
ef79bbde P	160	ptr = (u32 *)PSXM(madr);
b012a437	161	if (ptr == INVALID_PTR) {
ef79bbde P	162	#ifdef CPU_LOG
	163	CPU_LOG("* DMA2 GPU - mem2vram * NULL Pointer!!!\n");
	164	#endif
	165	break;
	166	}
57a757ce	167	// BA blocks * BS words (word = 32-bits)
58ebb94c	168	words = (bcr >> 16) * (bcr & 0xffff);
	169	GPU_writeDataMem(ptr, words);
	170
	171	HW_DMA2_MADR = SWAPu32(madr + words * 4);
57a757ce	172
57a757ce	173	// already 32-bit word size ((size * 4) / 4)
58ebb94c	174	GPUDMA_INT(words / 4);
ef79bbde P	175	return;
	176
	177	case 0x01000401: // dma chain
	178	#ifdef PSXDMA_LOG
57a757ce	179	PSXDMA_LOG("* DMA 2 - GPU dma chain * %lx addr = %lx size = %lx\n", chcr, madr, bcr);
ef79bbde	180	#endif
57a757ce	181
b03e0caf	182	size = GPU_dmaChain((u32 *)psxM, madr & 0x1fffff);
	183	if ((int)size <= 0)
	184	size = gpuDmaChainSize(madr);
adb7d7ac	185	HW_GPU_STATUS &= SWAP32(~PSXGPU_nBUSY);
58ebb94c	186
	187	// we don't emulate progress, just busy flag and end irq,
	188	// so pretend we're already at the last block
	189	HW_DMA2_MADR = SWAPu32(0xffffff);
	190
57a757ce	191	// Tekken 3 = use 1.0 only (not 1.5x)
	192
	193	// Einhander = parse linked list in pieces (todo)
	194	// Final Fantasy 4 = internal vram time (todo)
	195	// Rebel Assault 2 = parse linked list in pieces (todo)
	196	// Vampire Hunter D = allow edits to linked list (todo)
	197	GPUDMA_INT(size);
	198	return;
ef79bbde	199
ef79bbde	200	default:
7df2c03c	201	log_unhandled("* DMA 2 - GPU unknown * %x addr = %x size = %x\n", chcr, madr, bcr);
ef79bbde	202	break;
ef79bbde P	203	}
	204
	205	HW_DMA2_CHCR &= SWAP32(~0x01000000);
	206	DMA_INTERRUPT(2);
	207	}
	208
	209	void gpuInterrupt() {
ad418c19	210	if (HW_DMA2_CHCR & SWAP32(0x01000000))
	211	{
	212	HW_DMA2_CHCR &= SWAP32(~0x01000000);
	213	DMA_INTERRUPT(2);
	214	}
adb7d7ac	215	HW_GPU_STATUS \|= SWAP32(PSXGPU_nBUSY); // GPU no longer busy
ef79bbde P	216	}
	217
	218	void psxDma6(u32 madr, u32 bcr, u32 chcr) {
fc4803bd	219	u32 words;
ef79bbde P	220	u32 mem = (u32 )PSXM(madr);
	221
	222	#ifdef PSXDMA_LOG
	223	PSXDMA_LOG("* DMA6 OT * %x addr = %x size = %x\n", chcr, madr, bcr);
	224	#endif
	225
	226	if (chcr == 0x11000002) {
b012a437	227	if (mem == INVALID_PTR) {
ef79bbde P	228	#ifdef CPU_LOG
	229	CPU_LOG("* DMA6 OT * NULL Pointer!!!\n");
	230	#endif
	231	HW_DMA6_CHCR &= SWAP32(~0x01000000);
	232	DMA_INTERRUPT(6);
	233	return;
	234	}
	235
57a757ce	236	// already 32-bit size
fc4803bd	237	words = bcr;
57a757ce	238
ef79bbde P	239	while (bcr--) {
	240	*mem-- = SWAP32((madr - 4) & 0xffffff);
	241	madr -= 4;
	242	}
adb7d7ac	243	*++mem = SWAP32(0xffffff);
57a757ce	244
fc4803bd	245	//GPUOTCDMA_INT(size);
	246	// halted
	247	psxRegs.cycle += words;
	248	GPUOTCDMA_INT(16);
57a757ce	249	return;
ef79bbde	250	}
ef79bbde P	251	else {
ef79bbde P	252	// Unknown option
7df2c03c	253	log_unhandled("* DMA6 OT - unknown * %x addr = %x size = %x\n", chcr, madr, bcr);
ef79bbde	254	}
ef79bbde P	255
	256	HW_DMA6_CHCR &= SWAP32(~0x01000000);
	257	DMA_INTERRUPT(6);
	258	}
	259
57a757ce	260	void gpuotcInterrupt()
57a757ce	261	{
ad418c19	262	if (HW_DMA6_CHCR & SWAP32(0x01000000))
	263	{
	264	HW_DMA6_CHCR &= SWAP32(~0x01000000);
	265	DMA_INTERRUPT(6);
	266	}
57a757ce	267	}