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