win32/dsnd.cpp

   1 /*\r
   2  * (C) Gražvydas "notaz" Ignotas, 2009\r
   3  *\r
   4  * This work is licensed under the terms of any of these licenses\r
   5  * (at your option):\r
   6  *  - GNU GPL, version 2 or later.\r
   7  *  - GNU LGPL, version 2.1 or later.\r
   8  *  - MAME license.\r
   9  * See the COPYING file in the top-level directory.\r
  10  */\r
  11 \r
  12 #include <stdlib.h>\r
  13 #define WIN32_LEAN_AND_MEAN\r
  14 #include <windows.h>\r
  15 #include <mmsystem.h>\r
  16 #include <dsound.h>\r
  17 \r
  18 #include "dsnd.h"\r
  19 #include "../lprintf.h"\r
  20 \r
  21 #define NSEGS 4\r
  22 #define RELEASE(x) if (x) x->Release();  x=NULL;\r
  23 \r
  24 static LPDIRECTSOUND DSound;\r
  25 static LPDIRECTSOUNDBUFFER LoopBuffer;\r
  26 static LPDIRECTSOUNDNOTIFY DSoundNotify;\r
  27 static HANDLE seg_played_event;\r
  28 static int LoopLen, LoopWrite, LoopSeg; // bytes\r
  29 \r
  30 static int LoopBlank(void)\r
  31 {\r
  32   void *mema=NULL,*memb=NULL;\r
  33   DWORD sizea=0,sizeb=0;\r
  34 \r
  35   LoopBuffer->Lock(0, LoopLen, &mema,&sizea, &memb,&sizeb, 0);\r
  36   \r
  37   if (mema) memset(mema,0,sizea);\r
  38 \r
  39   LoopBuffer->Unlock(mema,sizea, memb,sizeb);\r
  40 \r
  41   return 0;\r
  42 }\r
  43 \r
  44 int DSoundInit(HWND wnd_coop, int rate, int stereo, int seg_samples)\r
  45 {\r
  46   DSBUFFERDESC dsbd;\r
  47   WAVEFORMATEX wfx;\r
  48   DSBPOSITIONNOTIFY notifies[NSEGS];\r
  49   int i;\r
  50 \r
  51   memset(&dsbd,0,sizeof(dsbd));\r
  52   memset(&wfx,0,sizeof(wfx));\r
  53 \r
  54   // Make wave format:\r
  55   wfx.wFormatTag=WAVE_FORMAT_PCM;\r
  56   wfx.nChannels=stereo ? 2 : 1;\r
  57   wfx.nSamplesPerSec=rate;\r
  58   wfx.wBitsPerSample=16;\r
  59 \r
  60   wfx.nBlockAlign=(WORD)((wfx.nChannels*wfx.wBitsPerSample)>>3);\r
  61   wfx.nAvgBytesPerSec=wfx.nBlockAlign*wfx.nSamplesPerSec;\r
  62 \r
  63   // Create the DirectSound interface:\r
  64   DirectSoundCreate(NULL,&DSound,NULL);\r
  65   if (DSound==NULL) return 1;\r
  66 \r
  67   LoopSeg = seg_samples * 2;\r
  68   if (stereo)\r
  69     LoopSeg *= 2;\r
  70 \r
  71   LoopLen = LoopSeg * NSEGS;\r
  72 \r
  73   DSound->SetCooperativeLevel(wnd_coop, DSSCL_PRIORITY);\r
  74   dsbd.dwFlags=DSBCAPS_GLOBALFOCUS;  // Play in background\r
  75   dsbd.dwFlags|=DSBCAPS_GETCURRENTPOSITION2|DSBCAPS_CTRLPOSITIONNOTIFY;\r
  76 \r
  77   // Create the looping buffer:\r
  78   dsbd.dwSize=sizeof(dsbd);\r
  79   dsbd.dwBufferBytes=LoopLen;\r
  80   dsbd.lpwfxFormat=&wfx;\r
  81 \r
  82   DSound->CreateSoundBuffer(&dsbd,&LoopBuffer,NULL);\r
  83   if (LoopBuffer==NULL) return 1;\r
  84 \r
  85   LoopBuffer->QueryInterface(IID_IDirectSoundNotify, (LPVOID*)&DSoundNotify);\r
  86   if (DSoundNotify == NULL) {\r
  87     lprintf("QueryInterface(IID_IDirectSoundNotify) failed\n");\r
  88     goto out;\r
  89   }\r
  90 \r
  91   seg_played_event = CreateEvent(NULL, 0, 0, NULL);\r
  92   if (seg_played_event == NULL)\r
  93     goto out;\r
  94 \r
  95   for (i = 0; i < NSEGS; i++) {\r
  96     notifies[i].dwOffset = i * LoopSeg;\r
  97     notifies[i].hEventNotify = seg_played_event;\r
  98   }\r
  99   i = DSoundNotify->SetNotificationPositions(NSEGS, notifies);\r
 100   if (i != DS_OK) {\r
 101     lprintf("SetNotificationPositions failed\n");\r
 102     goto out;\r
 103   }\r
 104 \r
 105 out:\r
 106   LoopBlank();\r
 107   LoopBuffer->Play(0, 0, DSBPLAY_LOOPING);\r
 108   return 0;\r
 109 }\r
 110 \r
 111 void DSoundExit(void)\r
 112 {\r
 113   if (LoopBuffer)\r
 114     LoopBuffer->Stop();\r
 115   RELEASE(DSoundNotify);\r
 116   RELEASE(LoopBuffer)\r
 117   RELEASE(DSound)\r
 118   CloseHandle(seg_played_event);\r
 119   seg_played_event = NULL;\r
 120 }\r
 121 \r
 122 static int WriteSeg(const void *buff)\r
 123 {\r
 124   void *mema=NULL,*memb=NULL;\r
 125   DWORD sizea=0,sizeb=0;\r
 126   int ret;\r
 127 \r
 128   // Lock the segment at 'LoopWrite' and copy the next segment in\r
 129   ret = LoopBuffer->Lock(LoopWrite, LoopSeg, &mema, &sizea, &memb, &sizeb, 0);\r
 130   if (ret != DS_OK)\r
 131     lprintf("LoopBuffer->Lock() failed: %i\n", ret);\r
 132 \r
 133   if (mema) memcpy(mema,buff,sizea);\r
 134 //  if (memb) memcpy(memb,DSoundNext+sizea,sizeb);\r
 135   if (sizeb != 0) lprintf("sizeb is not 0! (%i)\n", sizeb);\r
 136 \r
 137   ret = LoopBuffer->Unlock(mema,sizea, memb, sizeb);\r
 138   if (ret != DS_OK)\r
 139     lprintf("LoopBuffer->Unlock() failed: %i\n", ret);\r
 140 \r
 141   return 0;\r
 142 }\r
 143 \r
 144 int DSoundUpdate(const void *buff, int blocking)\r
 145 {\r
 146   DWORD play = 0;\r
 147   int pos;\r
 148 \r
 149   LoopBuffer->GetCurrentPosition(&play, NULL);\r
 150   pos = play;\r
 151 \r
 152   // 'LoopWrite' is the next seg in the loop that we want to write\r
 153   // First check that the sound 'play' pointer has moved out of it:\r
 154   if (blocking) {\r
 155     while (LoopWrite <= pos && pos < LoopWrite + LoopSeg) {\r
 156       WaitForSingleObject(seg_played_event, 5000);\r
 157       LoopBuffer->GetCurrentPosition(&play, NULL);\r
 158       pos = play;\r
 159     }\r
 160   }\r
 161   else {\r
 162     if (LoopWrite <= pos && pos < LoopWrite + LoopSeg)\r
 163       return 1;\r
 164   }\r
 165 \r
 166   WriteSeg(buff);\r
 167 \r
 168   // Advance LoopWrite to next seg:\r
 169   LoopWrite += LoopSeg;\r
 170   if (LoopWrite + LoopSeg > LoopLen)\r
 171     LoopWrite = 0;\r
 172 \r
 173   return 0;\r
 174 }\r
 175 \r