dma: add optional slow linked list walking
[pcsx_rearmed.git] / libpcsxcore / psxdma.c
index 6d7981f..30aa9bd 100644 (file)
@@ -22,6 +22,7 @@
 */
 
 #include "psxdma.h"
+#include "gpu.h"
 
 // Dma0/1 in Mdec.c
 // Dma3   in CdRom.c
@@ -36,7 +37,7 @@ void spuInterrupt() {
 
 void psxDma4(u32 madr, u32 bcr, u32 chcr) { // SPU
        u16 *ptr;
-       u32 size;
+       u32 words;
 
        switch (chcr) {
                case 0x01000201: //cpu to spu transfer
@@ -44,14 +45,16 @@ void psxDma4(u32 madr, u32 bcr, u32 chcr) { // SPU
                        PSXDMA_LOG("*** DMA4 SPU - mem2spu *** %x addr = %x size = %x\n", chcr, madr, bcr);
 #endif
                        ptr = (u16 *)PSXM(madr);
-                       if (ptr == NULL) {
+                       if (ptr == INVALID_PTR) {
 #ifdef CPU_LOG
                                CPU_LOG("*** DMA4 SPU - mem2spu *** NULL Pointer!!!\n");
 #endif
                                break;
                        }
-                       SPU_writeDMAMem(ptr, (bcr >> 16) * (bcr & 0xffff) * 2);
-                       SPUDMA_INT((bcr >> 16) * (bcr & 0xffff) / 2);
+                       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
@@ -59,22 +62,23 @@ void psxDma4(u32 madr, u32 bcr, u32 chcr) { // SPU
                        PSXDMA_LOG("*** DMA4 SPU - spu2mem *** %x addr = %x size = %x\n", chcr, madr, bcr);
 #endif
                        ptr = (u16 *)PSXM(madr);
-                       if (ptr == NULL) {
+                       if (ptr == INVALID_PTR) {
 #ifdef CPU_LOG
                                CPU_LOG("*** DMA4 SPU - spu2mem *** NULL Pointer!!!\n");
 #endif
                                break;
                        }
-                       size = (bcr >> 16) * (bcr & 0xffff) * 2;
-                       SPU_readDMAMem(ptr, size);
-                       psxCpu->Clear(madr, size);
-                       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;
 
-#ifdef PSXDMA_LOG
                default:
-                       PSXDMA_LOG("*** DMA4 SPU - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
+                       log_unhandled("*** DMA4 SPU - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
                        break;
-#endif
        }
 
        HW_DMA4_CHCR &= SWAP32(~0x01000000);
@@ -116,13 +120,16 @@ static u32 gpuDmaChainSize(u32 addr) {
                // next 32-bit pointer
                addr = psxMu32( addr & ~0x3 ) & 0xffffff;
                size += 1;
-       } while (addr != 0xffffff);
+       } while (!(addr & 0x800000)); // contrary to some documentation, the end-of-linked-list marker is not actually 0xFF'FFFF
+                                  // any pointer with bit 23 set will do.
 
        return size;
 }
 
 void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
-       u32 *ptr;
+       u32 *ptr, madr_next, *madr_next_p;
+       int do_walking;
+       u32 words;
        u32 size;
 
        switch (chcr) {
@@ -131,19 +138,21 @@ void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
                        PSXDMA_LOG("*** DMA2 GPU - vram2mem *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
 #endif
                        ptr = (u32 *)PSXM(madr);
-                       if (ptr == NULL) {
+                       if (ptr == INVALID_PTR) {
 #ifdef CPU_LOG
                                CPU_LOG("*** DMA2 GPU - vram2mem *** NULL Pointer!!!\n");
 #endif
                                break;
                        }
                        // BA blocks * BS words (word = 32-bits)
-                       size = (bcr >> 16) * (bcr & 0xffff);
-                       GPU_readDataMem(ptr, size);
-                       psxCpu->Clear(madr, size);
+                       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(size / 4);
+                       GPUDMA_INT(words / 4);
                        return;
 
                case 0x01000201: // mem2vram
@@ -151,43 +160,51 @@ void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
                        PSXDMA_LOG("*** DMA 2 - GPU mem2vram *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
 #endif
                        ptr = (u32 *)PSXM(madr);
-                       if (ptr == NULL) {
+                       if (ptr == INVALID_PTR) {
 #ifdef CPU_LOG
                                CPU_LOG("*** DMA2 GPU - mem2vram *** NULL Pointer!!!\n");
 #endif
                                break;
                        }
                        // BA blocks * BS words (word = 32-bits)
-                       size = (bcr >> 16) * (bcr & 0xffff);
-                       GPU_writeDataMem(ptr, size);
+                       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(size / 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
+                       // when not emulating walking progress, end immediately
+                       madr_next = 0xffffff;
 
-                       size = GPU_dmaChain((u32 *)psxM, madr & 0x1fffff);
+                       do_walking = Config.GpuListWalking;
+                       if (do_walking < 0)
+                               do_walking = Config.hacks.gpu_slow_list_walking;
+                       madr_next_p = do_walking ? &madr_next : NULL;
+
+                       size = GPU_dmaChain((u32 *)psxM, madr & 0x1fffff, madr_next_p);
                        if ((int)size <= 0)
                                size = gpuDmaChainSize(madr);
-                       
+
+                       HW_GPU_STATUS &= SWAP32(~PSXGPU_nBUSY);
+                       HW_DMA2_MADR = SWAPu32(madr_next);
+
                        // 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;
 
-#ifdef PSXDMA_LOG
                default:
-                       PSXDMA_LOG("*** DMA 2 - GPU unknown *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
+                       log_unhandled("*** DMA 2 - GPU unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
                        break;
-#endif
        }
 
        HW_DMA2_CHCR &= SWAP32(~0x01000000);
@@ -195,15 +212,24 @@ void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
 }
 
 void gpuInterrupt() {
+       if (HW_DMA2_CHCR == SWAP32(0x01000401) && !(HW_DMA2_MADR & SWAP32(0x800000)))
+       {
+               u32 size, madr_next = 0xffffff;
+               size = GPU_dmaChain((u32 *)psxM, HW_DMA2_MADR & 0x1fffff, &madr_next);
+               HW_DMA2_MADR = SWAPu32(madr_next);
+               GPUDMA_INT(size);
+               return;
+       }
        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 size;
+       u32 words;
        u32 *mem = (u32 *)PSXM(madr);
 
 #ifdef PSXDMA_LOG
@@ -211,7 +237,7 @@ void psxDma6(u32 madr, u32 bcr, u32 chcr) {
 #endif
 
        if (chcr == 0x11000002) {
-               if (mem == NULL) {
+               if (mem == INVALID_PTR) {
 #ifdef CPU_LOG
                        CPU_LOG("*** DMA6 OT *** NULL Pointer!!!\n");
 #endif
@@ -221,23 +247,24 @@ void psxDma6(u32 madr, u32 bcr, u32 chcr) {
                }
 
                // already 32-bit size
-               size = bcr;
+               words = bcr;
 
                while (bcr--) {
                        *mem-- = SWAP32((madr - 4) & 0xffffff);
                        madr -= 4;
                }
-               mem++; *mem = 0xffffff;
+               *++mem = SWAP32(0xffffff);
 
-               GPUOTCDMA_INT(size);
+               //GPUOTCDMA_INT(size);
+               // halted
+               psxRegs.cycle += words;
+               GPUOTCDMA_INT(16);
                return;
        }
-#ifdef PSXDMA_LOG
        else {
                // Unknown option
-               PSXDMA_LOG("*** DMA6 OT - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
+               log_unhandled("*** DMA6 OT - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
        }
-#endif
 
        HW_DMA6_CHCR &= SWAP32(~0x01000000);
        DMA_INTERRUPT(6);