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