/***************************************************************************
                            dma.c  -  description
                             -------------------
    begin                : Wed May 15 2002
    copyright            : (C) 2002 by Pete Bernert
    email                : BlackDove@addcom.de
 ***************************************************************************/

/***************************************************************************
 *                                                                         *
 *   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. See also the license.txt file for *
 *   additional informations.                                              *
 *                                                                         *
 ***************************************************************************/

//*************************************************************************//
// History of changes:
//
// 2004/04/04 - Pete
// - changed plugin to emulate PS2 spu
//
// 2002/05/15 - Pete
// - generic cleanup for the Peops release
//
//*************************************************************************//

#include "../peops2/stdafx.h"

#define _IN_DMA

#include "../peops2/externals.h"
#include "../peops2/registers.h"
//#include "debug.h"
#include "../psx.h"
#include "../peops2/spu.h"

//extern uint32 psx_ram[(2*1024*1024)/4];

////////////////////////////////////////////////////////////////////////
// READ DMA (many values)
////////////////////////////////////////////////////////////////////////

EXPORT_GCC void CALLBACK SPU2readDMA4Mem(mips_cpu_context *cpu, u32 usPSXMem,int iSize)
{
    spu2_state_t *spu = cpu->spu2;
 int i;
 u16 *ram16 = (u16 *)&cpu->psx_ram[0];

 for(i=0;i<iSize;i++)
  {
   ram16[usPSXMem>>1]=spu->spuMem[spu->spuAddr2[0]];                  // spu addr 0 got by writeregister
   usPSXMem+=2;
   spu->spuAddr2[0]++;                                     // inc spu addr
   if(spu->spuAddr2[0]>0xfffff) spu->spuAddr2[0]=0;             // wrap
  }

 spu->spuAddr2[0]+=0x20; //?????
 

 spu->iSpuAsyncWait=0;

 // got from J.F. and Kanodin... is it needed?
 spu->regArea[(PS2_C0_ADMAS)>>1]=0;                         // Auto DMA complete
 spu->spuStat2[0]=0x80;                                     // DMA complete
}

EXPORT_GCC void CALLBACK SPU2readDMA7Mem(mips_cpu_context *cpu, u32 usPSXMem,int iSize)
{
    spu2_state_t *spu = cpu->spu2;
 int i;
 u16 *ram16 = (u16 *)&cpu->psx_ram[0];

 for(i=0;i<iSize;i++)
  {
   ram16[usPSXMem>>1]=spu->spuMem[spu->spuAddr2[1]];             // spu addr 1 got by writeregister
   usPSXMem+=2;
   spu->spuAddr2[1]++;                                      // inc spu addr
   if(spu->spuAddr2[1]>0xfffff) spu->spuAddr2[1]=0;              // wrap
  }

 spu->spuAddr2[1]+=0x20; //?????

 spu->iSpuAsyncWait=0;

 // got from J.F. and Kanodin... is it needed?
 spu->regArea[(PS2_C1_ADMAS)>>1]=0;                         // Auto DMA complete
 spu->spuStat2[1]=0x80;                                     // DMA complete
}

////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////

// to investigate: do sound data updates by writedma affect spu
// irqs? Will an irq be triggered, if new data is written to
// the memory irq address?

////////////////////////////////////////////////////////////////////////
// WRITE DMA (many values)
////////////////////////////////////////////////////////////////////////

EXPORT_GCC void CALLBACK SPU2writeDMA4Mem(mips_cpu_context *cpu, u32 usPSXMem,int iSize)
{
    spu2_state_t *spu = cpu->spu2;
 int i;
 u16 *ram16 = (u16 *)&cpu->psx_ram[0];

 for(i=0;i<iSize;i++)
  {
   spu->spuMem[spu->spuAddr2[0]] = ram16[usPSXMem>>1];                 // spu addr 0 got by writeregister
   usPSXMem+=2;
   spu->spuAddr2[0]++;                                      // inc spu addr
   if(spu->spuAddr2[0]>0xfffff) spu->spuAddr2[0]=0;              // wrap
  }
 
 spu->iSpuAsyncWait=0;

 // got from J.F. and Kanodin... is it needed?
 spu->spuStat2[0]=0x80;                                     // DMA complete
}

EXPORT_GCC void CALLBACK SPU2writeDMA7Mem(mips_cpu_context *cpu, u32 usPSXMem,int iSize)
{
    spu2_state_t *spu = cpu->spu2;
 int i;
 u16 *ram16 = (u16 *)&cpu->psx_ram[0];

 for(i=0;i<iSize;i++)
  {
   spu->spuMem[spu->spuAddr2[1]] = ram16[usPSXMem>>1];           // spu addr 1 got by writeregister
   spu->spuAddr2[1]++;                                      // inc spu addr
   if(spu->spuAddr2[1]>0xfffff) spu->spuAddr2[1]=0;              // wrap
  }
 
 spu->iSpuAsyncWait=0;

 // got from J.F. and Kanodin... is it needed?
 spu->spuStat2[1]=0x80;                                     // DMA complete
}

////////////////////////////////////////////////////////////////////////
// INTERRUPTS
////////////////////////////////////////////////////////////////////////

void InterruptDMA4(mips_cpu_context *cpu) 
{
    spu2_state_t *spu = cpu->spu2;
// taken from linuzappz NULL spu2
//	spu2Rs16(CORE0_ATTR)&= ~0x30;
//	spu2Rs16(REG__1B0) = 0;
//	spu2Rs16(SPU2_STATX_WRDY_M)|= 0x80;

 spu->spuCtrl2[0]&=~0x30;
 spu->regArea[(PS2_C0_ADMAS)>>1]=0;
 spu->spuStat2[0]|=0x80;
}
                       
EXPORT_GCC void CALLBACK SPU2interruptDMA4(mips_cpu_context *cpu) 
{
 InterruptDMA4(cpu);
}

void InterruptDMA7(mips_cpu_context *cpu) 
{
    spu2_state_t *spu = cpu->spu2;
// taken from linuzappz NULL spu2
//	spu2Rs16(CORE1_ATTR)&= ~0x30;
//	spu2Rs16(REG__5B0) = 0;
//	spu2Rs16(SPU2_STATX_DREQ)|= 0x80;

 spu->spuCtrl2[1]&=~0x30;
 spu->regArea[(PS2_C1_ADMAS)>>1]=0;
 spu->spuStat2[1]|=0x80;
}

EXPORT_GCC void CALLBACK SPU2interruptDMA7(mips_cpu_context *cpu) 
{
 InterruptDMA7(cpu);
}