win32 Pico work nearly done

[picodrive.git] / platform / win32 / GenaDrive / DSound.cpp

\r
#include "app.h"\r
\r
#ifndef _XBOX\r
#pragma warning (disable:4201)\r
#include <mmsystem.h>\r
#include <dsound.h>\r
#endif\r
\r
static IDirectSound *DSound=NULL;\r
static IDirectSoundBuffer *LoopBuffer=NULL;\r
static int LoopLen=0,LoopWrite=0; // Next position in loop to write\r
\r
short *DSoundNext=NULL; // Buffer for next sound data to put in loop\r
\r
static int LoopBlank()\r
{\r
  void *mema=NULL,*memb=NULL;\r
  DWORD sizea=0,sizeb=0;\r
\r
  LoopBuffer->Lock(0,LoopLen<<((PicoOpt&8) ? 2 : 1), &mema,&sizea, &memb,&sizeb, 0);\r
  \r
  if (mema) memset(mema,0,sizea);\r
\r
  LoopBuffer->Unlock(mema,sizea, memb,sizeb);\r
\r
  return 0;\r
}\r
\r
int DSoundInit()\r
{\r
  DSBUFFERDESC dsbd;\r
  WAVEFORMATEX wfx;\r
\r
  memset(&dsbd,0,sizeof(dsbd));\r
  memset(&wfx,0,sizeof(wfx));\r
\r
  // Make wave format:\r
  wfx.wFormatTag=WAVE_FORMAT_PCM;\r
  wfx.nChannels=(unsigned short)((PicoOpt&8) ? 2 : 1); // Stereo/mono\r
  wfx.nSamplesPerSec=PsndRate;\r
  wfx.wBitsPerSample=16;\r
\r
  wfx.nBlockAlign=(WORD)((wfx.nChannels*wfx.wBitsPerSample)>>3);\r
  wfx.nAvgBytesPerSec=wfx.nBlockAlign*wfx.nSamplesPerSec;\r
\r
  // Make buffer for the next seg to put into the loop:\r
  DSoundNext=(short *)malloc((PsndLen<<2)+64); if (DSoundNext==NULL) return 1;\r
  memset(DSoundNext,0,PsndLen<<2);\r
//  lprintf("p %p\n", DSoundNext);\r
\r
  // Create the DirectSound interface:\r
  DirectSoundCreate(NULL,&DSound,NULL);\r
  if (DSound==NULL) return 1;\r
\r
  LoopLen=PsndLen<<1; // 2 segs\r
\r
#ifndef _XBOX\r
  LoopLen<<=1; // 4 segs\r
  DSound->SetCooperativeLevel(FrameWnd,DSSCL_PRIORITY);\r
  dsbd.dwFlags=DSBCAPS_GLOBALFOCUS;  // Play in background\r
#endif\r
\r
  // Create the looping buffer:\r
  dsbd.dwSize=sizeof(dsbd);\r
  dsbd.dwBufferBytes=LoopLen<<wfx.nChannels; // 16bit stereo?\r
  dsbd.lpwfxFormat=&wfx;\r
\r
  DSound->CreateSoundBuffer(&dsbd,&LoopBuffer,NULL);\r
  if (LoopBuffer==NULL) return 1;\r
\r
  LoopBlank();\r
  LoopBuffer->Play(0,0,DSBPLAY_LOOPING);\r
  return 0;\r
}\r
\r
void DSoundExit()\r
{\r
  if (LoopBuffer) LoopBuffer->Stop();\r
  RELEASE(LoopBuffer)\r
  RELEASE(DSound)\r
  DSound=0;\r
  if (DSoundNext) free(DSoundNext); DSoundNext=NULL;\r
}\r
\r
static int WriteSeg()\r
{\r
  void *mema=NULL,*memb=NULL;\r
  DWORD sizea=0,sizeb=0;\r
  int ret;\r
\r
  // Lock the segment at 'LoopWrite' and copy the next segment in\r
  ret = LoopBuffer->Lock(LoopWrite<<((PicoOpt&8) ? 2 : 1),PsndLen<<((PicoOpt&8) ? 2 : 1), &mema,&sizea, &memb,&sizeb, 0);\r
  if (ret) lprintf("LoopBuffer->Lock() failed: %i\n", ret);\r
\r
  if (mema) memcpy(mema,DSoundNext,sizea);\r
//  if (memb) memcpy(memb,DSoundNext+sizea,sizeb);\r
  if (sizeb != 0) lprintf("sizeb is not 0! (%i)\n", sizeb);\r
\r
  ret = LoopBuffer->Unlock(mema,sizea, memb,0);\r
  if (ret) lprintf("LoopBuffer->Unlock() failed: %i\n", ret);\r
\r
  return 0;\r
}\r
\r
static int DSoundFake()\r
{\r
  static int ticks_old = 0;\r
  int ticks = GetTickCount() * 1000;\r
  int diff;\r
\r
  diff = ticks - ticks_old;\r
  if (diff >= 0 && diff < 1000000/60*4)\r
  {\r
    while (diff >= 0 && diff < 1000000/60)\r
    {\r
      Sleep(1);\r
      diff = GetTickCount()*1000 - ticks_old;\r
    }\r
    ticks_old += 1000000/60;\r
  }\r
  else\r
    ticks_old = ticks;\r
  return 0;\r
}\r
\r
int DSoundUpdate()\r
{\r
  DWORD play=0;\r
  int pos=0;\r
\r
  if (LoopBuffer==NULL) return DSoundFake();\r
\r
  LoopBuffer->GetCurrentPosition(&play,NULL);\r
  pos=play>>((PicoOpt&8) ? 2 : 1);\r
\r
  // 'LoopWrite' is the next seg in the loop that we want to write\r
  // First check that the sound 'play' pointer has moved out of it:\r
  if (pos>=LoopWrite && pos<LoopWrite+PsndLen) return 1; // No, it hasn't\r
\r
  WriteSeg();\r
\r
  // Advance LoopWrite to next seg:\r
  LoopWrite+=PsndLen; if (LoopWrite+PsndLen>LoopLen) LoopWrite=0;\r
\r
  return 0;\r
}\r
\r