libpcsxcore/psxdma.c

   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"
  25 #include "gpu.h"
  26
  27 // Dma0/1 in Mdec.c
  28 // Dma3   in CdRom.c
  29
  30 void spuInterrupt() {
  31         if (HW_DMA4_CHCR & SWAP32(0x01000000))
  32         {
  33                 HW_DMA4_CHCR &= SWAP32(~0x01000000);
  34                 DMA_INTERRUPT(4);
  35         }
  36 }
  37
  38 void psxDma4(u32 madr, u32 bcr, u32 chcr) { // SPU
  39         u16 *ptr;
  40         u32 words;
  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);
  48                         if (ptr == INVALID_PTR) {
  49 #ifdef CPU_LOG
  50                                 CPU_LOG("*** DMA4 SPU - mem2spu *** NULL Pointer!!!\n");
  51 #endif
  52                                 break;
  53                         }
  54                         words = (bcr >> 16) * (bcr & 0xffff);
  55                         SPU_writeDMAMem(ptr, words * 2, psxRegs.cycle);
  56                         HW_DMA4_MADR = SWAPu32(madr + words * 4);
  57                         SPUDMA_INT(words * 4);
  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);
  65                         if (ptr == INVALID_PTR) {
  66 #ifdef CPU_LOG
  67                                 CPU_LOG("*** DMA4 SPU - spu2mem *** NULL Pointer!!!\n");
  68 #endif
  69                                 break;
  70                         }
  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);
  76                         SPUDMA_INT(words * 4);
  77                         return;
  78
  79                 default:
  80                         log_unhandled("*** DMA4 SPU - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
  81                         break;
  82         }
  83
  84         HW_DMA4_CHCR &= SWAP32(~0x01000000);
  85         DMA_INTERRUPT(4);
  86 }
  87
  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 & 0x800000)); // contrary to some documentation, the end-of-linked-list marker is not actually 0xFF'FFFF
 124                                   // any pointer with bit 23 set will do.
 125
 126         return size;
 127 }
 128
 129 void psxDma2(u32 madr, u32 bcr, u32 chcr) { // GPU
 130         u32 *ptr, madr_next, *madr_next_p;
 131         int do_walking;
 132         u32 words;
 133         u32 size;
 134
 135         switch (chcr) {
 136                 case 0x01000200: // vram2mem
 137 #ifdef PSXDMA_LOG
 138                         PSXDMA_LOG("*** DMA2 GPU - vram2mem *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
 139 #endif
 140                         ptr = (u32 *)PSXM(madr);
 141                         if (ptr == INVALID_PTR) {
 142 #ifdef CPU_LOG
 143                                 CPU_LOG("*** DMA2 GPU - vram2mem *** NULL Pointer!!!\n");
 144 #endif
 145                                 break;
 146                         }
 147                         // BA blocks * BS words (word = 32-bits)
 148                         words = (bcr >> 16) * (bcr & 0xffff);
 149                         GPU_readDataMem(ptr, words);
 150                         psxCpu->Clear(madr, words);
 151
 152                         HW_DMA2_MADR = SWAPu32(madr + words * 4);
 153
 154                         // already 32-bit word size ((size * 4) / 4)
 155                         GPUDMA_INT(words / 4);
 156                         return;
 157
 158                 case 0x01000201: // mem2vram
 159 #ifdef PSXDMA_LOG
 160                         PSXDMA_LOG("*** DMA 2 - GPU mem2vram *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
 161 #endif
 162                         ptr = (u32 *)PSXM(madr);
 163                         if (ptr == INVALID_PTR) {
 164 #ifdef CPU_LOG
 165                                 CPU_LOG("*** DMA2 GPU - mem2vram *** NULL Pointer!!!\n");
 166 #endif
 167                                 break;
 168                         }
 169                         // BA blocks * BS words (word = 32-bits)
 170                         words = (bcr >> 16) * (bcr & 0xffff);
 171                         GPU_writeDataMem(ptr, words);
 172
 173                         HW_DMA2_MADR = SWAPu32(madr + words * 4);
 174
 175                         // already 32-bit word size ((size * 4) / 4)
 176                         GPUDMA_INT(words / 4);
 177                         return;
 178
 179                 case 0x01000401: // dma chain
 180 #ifdef PSXDMA_LOG
 181                         PSXDMA_LOG("*** DMA 2 - GPU dma chain *** %lx addr = %lx size = %lx\n", chcr, madr, bcr);
 182 #endif
 183                         // when not emulating walking progress, end immediately
 184                         madr_next = 0xffffff;
 185
 186                         do_walking = Config.GpuListWalking;
 187                         if (do_walking < 0)
 188                                 do_walking = Config.hacks.gpu_slow_list_walking;
 189                         madr_next_p = do_walking ? &madr_next : NULL;
 190
 191                         size = GPU_dmaChain((u32 *)psxM, madr & 0x1fffff, madr_next_p);
 192                         if ((int)size <= 0)
 193                                 size = gpuDmaChainSize(madr);
 194
 195                         HW_GPU_STATUS &= SWAP32(~PSXGPU_nBUSY);
 196                         HW_DMA2_MADR = SWAPu32(madr_next);
 197
 198                         // Tekken 3 = use 1.0 only (not 1.5x)
 199
 200                         // Einhander = parse linked list in pieces (todo)
 201                         // Rebel Assault 2 = parse linked list in pieces (todo)
 202                         GPUDMA_INT(size);
 203                         return;
 204
 205                 default:
 206                         log_unhandled("*** DMA 2 - GPU unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
 207                         break;
 208         }
 209
 210         HW_DMA2_CHCR &= SWAP32(~0x01000000);
 211         DMA_INTERRUPT(2);
 212 }
 213
 214 void gpuInterrupt() {
 215         if (HW_DMA2_CHCR == SWAP32(0x01000401) && !(HW_DMA2_MADR & SWAP32(0x800000)))
 216         {
 217                 u32 size, madr_next = 0xffffff;
 218                 size = GPU_dmaChain((u32 *)psxM, HW_DMA2_MADR & 0x1fffff, &madr_next);
 219                 HW_DMA2_MADR = SWAPu32(madr_next);
 220                 GPUDMA_INT(size);
 221                 return;
 222         }
 223         if (HW_DMA2_CHCR & SWAP32(0x01000000))
 224         {
 225                 HW_DMA2_CHCR &= SWAP32(~0x01000000);
 226                 DMA_INTERRUPT(2);
 227         }
 228         HW_GPU_STATUS |= SWAP32(PSXGPU_nBUSY); // GPU no longer busy
 229 }
 230
 231 void psxDma6(u32 madr, u32 bcr, u32 chcr) {
 232         u32 words;
 233         u32 *mem = (u32 *)PSXM(madr);
 234
 235 #ifdef PSXDMA_LOG
 236         PSXDMA_LOG("*** DMA6 OT *** %x addr = %x size = %x\n", chcr, madr, bcr);
 237 #endif
 238
 239         if (chcr == 0x11000002) {
 240                 if (mem == INVALID_PTR) {
 241 #ifdef CPU_LOG
 242                         CPU_LOG("*** DMA6 OT *** NULL Pointer!!!\n");
 243 #endif
 244                         HW_DMA6_CHCR &= SWAP32(~0x01000000);
 245                         DMA_INTERRUPT(6);
 246                         return;
 247                 }
 248
 249                 // already 32-bit size
 250                 words = bcr;
 251
 252                 while (bcr--) {
 253                         *mem-- = SWAP32((madr - 4) & 0xffffff);
 254                         madr -= 4;
 255                 }
 256                 *++mem = SWAP32(0xffffff);
 257
 258                 //GPUOTCDMA_INT(size);
 259                 // halted
 260                 psxRegs.cycle += words;
 261                 GPUOTCDMA_INT(16);
 262                 return;
 263         }
 264         else {
 265                 // Unknown option
 266                 log_unhandled("*** DMA6 OT - unknown *** %x addr = %x size = %x\n", chcr, madr, bcr);
 267         }
 268
 269         HW_DMA6_CHCR &= SWAP32(~0x01000000);
 270         DMA_INTERRUPT(6);
 271 }
 272
 273 void gpuotcInterrupt()
 274 {
 275         if (HW_DMA6_CHCR & SWAP32(0x01000000))
 276         {
 277                 HW_DMA6_CHCR &= SWAP32(~0x01000000);
 278                 DMA_INTERRUPT(6);
 279         }
 280 }