dlls/winmm/playsound.c

   1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
   2
   3 /*
   4  * MMSYSTEM functions
   5  *
   6  * Copyright 1993      Martin Ayotte
   7  *           1998-2002 Eric Pouech
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with this library; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  22  */
  23
  24 #include <stdarg.h>
  25 #include <string.h>
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "mmsystem.h"
  30 #include "wingdi.h"
  31 #include "winuser.h"
  32 #include "winreg.h"
  33 #include "winemm.h"
  34 #include "winternl.h"
  35
  36 #include "wine/debug.h"
  37
  38 WINE_DEFAULT_DEBUG_CHANNEL(winmm);
  39
  40 typedef struct tagWINE_PLAYSOUND
  41 {
  42     unsigned                    bLoop : 1,
  43                                 bAlloc : 1;
  44     LPCWSTR                     pszSound;
  45     HMODULE                     hMod;
  46     DWORD                       fdwSound;
  47     HANDLE                      hThread;
  48     HWAVEOUT                    hWave;
  49     struct tagWINE_PLAYSOUND*   lpNext;
  50 } WINE_PLAYSOUND;
  51
  52 static WINE_PLAYSOUND *PlaySoundList;
  53
  54 static HMMIO    get_mmioFromFile(LPCWSTR lpszName)
  55 {
  56     HMMIO       ret;
  57     WCHAR       buf[256];
  58     LPWSTR      dummy;
  59
  60     ret = mmioOpenW((LPWSTR)lpszName, NULL,
  61                     MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
  62     if (ret != 0) return ret;
  63     if (SearchPathW(NULL, lpszName, NULL, sizeof(buf)/sizeof(buf[0]), buf, &dummy))
  64     {
  65         return mmioOpenW(buf, NULL,
  66                          MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
  67     }
  68     return 0;
  69 }
  70
  71 static HMMIO    get_mmioFromProfile(UINT uFlags, LPCWSTR lpszName)
  72 {
  73     WCHAR       str[128];
  74     LPWSTR      ptr;
  75     HMMIO       hmmio;
  76     HKEY        hRegSnd, hRegApp, hScheme, hSnd;
  77     DWORD       err, type, count;
  78
  79     static const WCHAR  wszSounds[] = {'S','o','u','n','d','s',0};
  80     static const WCHAR  wszDefault[] = {'D','e','f','a','u','l','t',0};
  81     static const WCHAR  wszKey[] = {'A','p','p','E','v','e','n','t','s','\\',
  82                                     'S','c','h','e','m','e','s','\\',
  83                                     'A','p','p','s',0};
  84     static const WCHAR  wszDotDefault[] = {'.','D','e','f','a','u','l','t',0};
  85     static const WCHAR  wszDotCurrent[] = {'.','C','u','r','r','e','n','t',0};
  86     static const WCHAR  wszNull[] = {0};
  87
  88     TRACE("searching in SystemSound list for %s\n", debugstr_w(lpszName));
  89     GetProfileStringW(wszSounds, lpszName, wszNull, str, sizeof(str)/sizeof(str[0]));
  90     if (lstrlenW(str) == 0)
  91     {
  92         if (uFlags & SND_NODEFAULT) goto next;
  93         GetProfileStringW(wszSounds, wszDefault, wszNull, str, sizeof(str)/sizeof(str[0]));
  94         if (lstrlenW(str) == 0) goto next;
  95     }
  96     for (ptr = str; *ptr && *ptr != ','; ptr++);
  97     if (*ptr) *ptr = 0;
  98     hmmio = mmioOpenW(str, NULL, MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
  99     if (hmmio != 0) return hmmio;
 100  next:
 101     /* we look up the registry under
 102      *      HKCU\AppEvents\Schemes\Apps\.Default
 103      *      HKCU\AppEvents\Schemes\Apps\<AppName>
 104      */
 105     if (RegOpenKeyW(HKEY_CURRENT_USER, wszKey, &hRegSnd) != 0) goto none;
 106     if (uFlags & SND_APPLICATION)
 107     {
 108         DWORD len;
 109
 110         err = 1; /* error */
 111         len = GetModuleFileNameW(0, str, sizeof(str)/sizeof(str[0]));
 112         if (len > 0 && len < sizeof(str)/sizeof(str[0]))
 113         {
 114             for (ptr = str + lstrlenW(str) - 1; ptr >= str; ptr--)
 115             {
 116                 if (*ptr == '.') *ptr = 0;
 117                 if (*ptr == '\\')
 118                 {
 119                     err = RegOpenKeyW(hRegSnd, ptr+1, &hRegApp);
 120                     break;
 121                 }
 122             }
 123         }
 124     }
 125     else
 126     {
 127         err = RegOpenKeyW(hRegSnd, wszDotDefault, &hRegApp);
 128     }
 129     RegCloseKey(hRegSnd);
 130     if (err != 0) goto none;
 131     err = RegOpenKeyW(hRegApp, lpszName, &hScheme);
 132     RegCloseKey(hRegApp);
 133     if (err != 0) goto none;
 134     /* what's the difference between .Current and .Default ? */
 135     err = RegOpenKeyW(hScheme, wszDotDefault, &hSnd);
 136     if (err != 0)
 137     {
 138         err = RegOpenKeyW(hScheme, wszDotCurrent, &hSnd);
 139         RegCloseKey(hScheme);
 140         if (err != 0)
 141             goto none;
 142     }
 143     count = sizeof(str)/sizeof(str[0]);
 144     err = RegQueryValueExW(hSnd, NULL, 0, &type, (LPBYTE)str, &count);
 145     RegCloseKey(hSnd);
 146     if (err != 0 || !*str) goto none;
 147     hmmio = mmioOpenW(str, NULL, MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
 148     if (hmmio) return hmmio;
 149  none:
 150     WARN("can't find SystemSound=%s !\n", debugstr_w(lpszName));
 151     return 0;
 152 }
 153
 154 struct playsound_data
 155 {
 156     HANDLE      hEvent;
 157     LONG        dwEventCount;
 158 };
 159
 160 static void CALLBACK PlaySound_Callback(HWAVEOUT hwo, UINT uMsg,
 161                                         DWORD_PTR dwInstance,
 162                                         DWORD_PTR dwParam1, DWORD_PTR dwParam2)
 163 {
 164     struct playsound_data*      s = (struct playsound_data*)dwInstance;
 165
 166     switch (uMsg) {
 167     case WOM_OPEN:
 168     case WOM_CLOSE:
 169         break;
 170     case WOM_DONE:
 171         InterlockedIncrement(&s->dwEventCount);
 172         TRACE("Returning waveHdr=%lx\n", dwParam1);
 173         SetEvent(s->hEvent);
 174         break;
 175     default:
 176         ERR("Unknown uMsg=%d\n", uMsg);
 177     }
 178 }
 179
 180 static void PlaySound_WaitDone(struct playsound_data* s)
 181 {
 182     for (;;) {
 183         ResetEvent(s->hEvent);
 184         if (InterlockedDecrement(&s->dwEventCount) >= 0) break;
 185         InterlockedIncrement(&s->dwEventCount);
 186
 187         WaitForSingleObject(s->hEvent, INFINITE);
 188     }
 189 }
 190
 191 static BOOL PlaySound_IsString(DWORD fdwSound, const void* psz)
 192 {
 193     /* SND_RESOURCE is 0x40004 while
 194      * SND_MEMORY is 0x00004
 195      */
 196     switch (fdwSound & (SND_RESOURCE|SND_ALIAS_ID|SND_FILENAME))
 197     {
 198     case SND_RESOURCE:  return HIWORD(psz) != 0; /* by name or by ID ? */
 199     case SND_ALIAS_ID:
 200     case SND_MEMORY:    return FALSE;
 201     case SND_ALIAS:
 202     case SND_FILENAME:
 203     case SND_ALIAS|SND_FILENAME:
 204     case 0:             return TRUE;
 205     default:            FIXME("WTF\n"); return FALSE;
 206     }
 207 }
 208
 209 static void     PlaySound_Free(WINE_PLAYSOUND* wps)
 210 {
 211     WINE_PLAYSOUND**    p;
 212
 213     EnterCriticalSection(&WINMM_cs);
 214     for (p = &PlaySoundList; *p && *p != wps; p = &((*p)->lpNext));
 215     if (*p) *p = (*p)->lpNext;
 216     if (PlaySoundList == NULL) SetEvent(psLastEvent);
 217     LeaveCriticalSection(&WINMM_cs);
 218     if (wps->bAlloc) HeapFree(GetProcessHeap(), 0, (void*)wps->pszSound);
 219     if (wps->hThread) CloseHandle(wps->hThread);
 220     HeapFree(GetProcessHeap(), 0, wps);
 221 }
 222
 223 static WINE_PLAYSOUND*  PlaySound_Alloc(const void* pszSound, HMODULE hmod,
 224                                         DWORD fdwSound, BOOL bUnicode)
 225 {
 226     WINE_PLAYSOUND* wps;
 227
 228     wps = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*wps));
 229     if (!wps) return NULL;
 230
 231     wps->hMod = hmod;
 232     wps->fdwSound = fdwSound;
 233     if (PlaySound_IsString(fdwSound, pszSound))
 234     {
 235         if (bUnicode)
 236         {
 237             if (fdwSound & SND_ASYNC)
 238             {
 239                 LPWSTR sound = HeapAlloc(GetProcessHeap(), 0,
 240                                          (lstrlenW(pszSound)+1) * sizeof(WCHAR));
 241                 if (!sound) goto oom_error;
 242                 wps->pszSound = lstrcpyW(sound, pszSound);
 243                 wps->bAlloc = TRUE;
 244             }
 245             else
 246                 wps->pszSound = pszSound;
 247         }
 248         else
 249         {
 250             UNICODE_STRING usBuffer;
 251             RtlCreateUnicodeStringFromAsciiz(&usBuffer, pszSound);
 252             wps->pszSound = usBuffer.Buffer;
 253             if (!wps->pszSound) goto oom_error;
 254             wps->bAlloc = TRUE;
 255         }
 256     }
 257     else
 258         wps->pszSound = pszSound;
 259
 260     return wps;
 261  oom_error:
 262     PlaySound_Free(wps);
 263     return NULL;
 264 }
 265
 266 static DWORD WINAPI proc_PlaySound(LPVOID arg)
 267 {
 268     WINE_PLAYSOUND*     wps = arg;
 269     BOOL                bRet = FALSE;
 270     HMMIO               hmmio = 0;
 271     MMCKINFO            ckMainRIFF;
 272     MMCKINFO            mmckInfo;
 273     LPWAVEFORMATEX      lpWaveFormat = NULL;
 274     LPWAVEHDR           waveHdr = NULL;
 275     INT                 count, bufsize, left, index;
 276     struct playsound_data       s;
 277     void*               data;
 278
 279     s.hEvent = 0;
 280
 281     TRACE("SoundName=%s !\n", debugstr_w(wps->pszSound));
 282
 283     /* if resource, grab it */
 284     if ((wps->fdwSound & SND_RESOURCE) == SND_RESOURCE) {
 285         static const WCHAR wszWave[] = {'W','A','V','E',0};
 286         HRSRC   hRes;
 287         HGLOBAL hGlob;
 288
 289         if ((hRes = FindResourceW(wps->hMod, wps->pszSound, wszWave)) == 0 ||
 290             (hGlob = LoadResource(wps->hMod, hRes)) == 0)
 291             goto errCleanUp;
 292         if ((data = LockResource(hGlob)) == NULL) {
 293             FreeResource(hGlob);
 294             goto errCleanUp;
 295         }
 296         FreeResource(hGlob);
 297     } else
 298         data = (void*)wps->pszSound;
 299
 300     /* construct an MMIO stream (either in memory, or from a file */
 301     if (wps->fdwSound & SND_MEMORY)
 302     { /* NOTE: SND_RESOURCE has the SND_MEMORY bit set */
 303         MMIOINFO        mminfo;
 304
 305         memset(&mminfo, 0, sizeof(mminfo));
 306         mminfo.fccIOProc = FOURCC_MEM;
 307         mminfo.pchBuffer = data;
 308         mminfo.cchBuffer = -1; /* FIXME: when a resource, could grab real size */
 309         TRACE("Memory sound %p\n", data);
 310         hmmio = mmioOpenW(NULL, &mminfo, MMIO_READ);
 311     }
 312     if (!hmmio && wps->fdwSound & SND_ALIAS)
 313     {
 314         if ((wps->fdwSound & SND_ALIAS_ID) == SND_ALIAS_ID)
 315         {
 316             static const WCHAR  wszSystemAsterisk[] = {'S','y','s','t','e','m','A','s','t','e','r','i','s','k',0};
 317             static const WCHAR  wszSystemDefault[] = {'S','y','s','t','e','m','D','e','f','a','u','l','t',0};
 318             static const WCHAR  wszSystemExclamation[] = {'S','y','s','t','e','m','E','x','c','l','a','m','a','t','i','o','n',0};
 319             static const WCHAR  wszSystemExit[] = {'S','y','s','t','e','m','E','x','i','t',0};
 320             static const WCHAR  wszSystemHand[] = {'S','y','s','t','e','m','H','a','n','d',0};
 321             static const WCHAR  wszSystemQuestion[] = {'S','y','s','t','e','m','Q','u','e','s','t','i','o','n',0};
 322             static const WCHAR  wszSystemStart[] = {'S','y','s','t','e','m','S','t','a','r','t',0};
 323             static const WCHAR  wszSystemWelcome[] = {'S','y','s','t','e','m','W','e','l','c','o','m','e',0};
 324
 325             wps->fdwSound &= ~(SND_ALIAS_ID ^ SND_ALIAS);
 326             if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMASTERISK)
 327                 wps->pszSound = wszSystemAsterisk;
 328             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMDEFAULT)
 329                 wps->pszSound = wszSystemDefault;
 330             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMEXCLAMATION)
 331                 wps->pszSound = wszSystemExclamation;
 332             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMEXIT)
 333                 wps->pszSound = wszSystemExit;
 334             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMHAND)
 335                 wps->pszSound = wszSystemHand;
 336             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMQUESTION)
 337                 wps->pszSound = wszSystemQuestion;
 338             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMSTART)
 339                 wps->pszSound = wszSystemStart;
 340             else if (wps->pszSound == (LPCWSTR)SND_ALIAS_SYSTEMWELCOME)
 341                 wps->pszSound = wszSystemWelcome;
 342             else goto errCleanUp;
 343         }
 344         hmmio = get_mmioFromProfile(wps->fdwSound, wps->pszSound);
 345     }
 346     if (!hmmio && wps->fdwSound & SND_FILENAME)
 347     {
 348         hmmio = get_mmioFromFile(wps->pszSound);
 349     }
 350     if (!(wps->fdwSound & (SND_FILENAME|SND_ALIAS|SND_MEMORY)))
 351     {
 352         if ((hmmio = get_mmioFromProfile(wps->fdwSound | SND_NODEFAULT, wps->pszSound)) == 0)
 353         {
 354             if ((hmmio = get_mmioFromFile(wps->pszSound)) == 0)
 355             {
 356                 hmmio = get_mmioFromProfile(wps->fdwSound, wps->pszSound);
 357             }
 358         }
 359     }
 360     if (hmmio == 0) goto errCleanUp;
 361
 362     if (mmioDescend(hmmio, &ckMainRIFF, NULL, 0))
 363         goto errCleanUp;
 364
 365     TRACE("ParentChunk ckid=%.4s fccType=%.4s cksize=%08X\n",
 366           (LPSTR)&ckMainRIFF.ckid, (LPSTR)&ckMainRIFF.fccType, ckMainRIFF.cksize);
 367
 368     if ((ckMainRIFF.ckid != FOURCC_RIFF) ||
 369         (ckMainRIFF.fccType != mmioFOURCC('W', 'A', 'V', 'E')))
 370         goto errCleanUp;
 371
 372     mmckInfo.ckid = mmioFOURCC('f', 'm', 't', ' ');
 373     if (mmioDescend(hmmio, &mmckInfo, &ckMainRIFF, MMIO_FINDCHUNK))
 374         goto errCleanUp;
 375
 376     TRACE("Chunk Found ckid=%.4s fccType=%08x cksize=%08X\n",
 377           (LPSTR)&mmckInfo.ckid, mmckInfo.fccType, mmckInfo.cksize);
 378
 379     lpWaveFormat = HeapAlloc(GetProcessHeap(), 0, mmckInfo.cksize);
 380     if (mmioRead(hmmio, (HPSTR)lpWaveFormat, mmckInfo.cksize) < sizeof(PCMWAVEFORMAT))
 381         goto errCleanUp;
 382
 383     TRACE("wFormatTag=%04X !\n",        lpWaveFormat->wFormatTag);
 384     TRACE("nChannels=%d\n",             lpWaveFormat->nChannels);
 385     TRACE("nSamplesPerSec=%d\n",        lpWaveFormat->nSamplesPerSec);
 386     TRACE("nAvgBytesPerSec=%d\n",       lpWaveFormat->nAvgBytesPerSec);
 387     TRACE("nBlockAlign=%d\n",           lpWaveFormat->nBlockAlign);
 388     TRACE("wBitsPerSample=%u !\n",      lpWaveFormat->wBitsPerSample);
 389
 390     /* move to end of 'fmt ' chunk */
 391     mmioAscend(hmmio, &mmckInfo, 0);
 392
 393     mmckInfo.ckid = mmioFOURCC('d', 'a', 't', 'a');
 394     if (mmioDescend(hmmio, &mmckInfo, &ckMainRIFF, MMIO_FINDCHUNK))
 395         goto errCleanUp;
 396
 397     TRACE("Chunk Found ckid=%.4s fccType=%08x cksize=%08X\n",
 398           (LPSTR)&mmckInfo.ckid, mmckInfo.fccType, mmckInfo.cksize);
 399
 400     s.hEvent = CreateEventW(NULL, FALSE, FALSE, NULL);
 401
 402     if (waveOutOpen(&wps->hWave, WAVE_MAPPER, lpWaveFormat, (DWORD_PTR)PlaySound_Callback,
 403                     (DWORD_PTR)&s, CALLBACK_FUNCTION) != MMSYSERR_NOERROR)
 404         goto errCleanUp;
 405
 406     /* make it so that 3 buffers per second are needed */
 407     bufsize = (((lpWaveFormat->nAvgBytesPerSec / 3) - 1) / lpWaveFormat->nBlockAlign + 1) *
 408         lpWaveFormat->nBlockAlign;
 409     waveHdr = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(WAVEHDR) + 2 * bufsize);
 410     waveHdr[0].lpData = (char*)waveHdr + 2 * sizeof(WAVEHDR);
 411     waveHdr[1].lpData = (char*)waveHdr + 2 * sizeof(WAVEHDR) + bufsize;
 412     waveHdr[0].dwUser = waveHdr[1].dwUser = 0L;
 413     waveHdr[0].dwLoops = waveHdr[1].dwLoops = 0L;
 414     waveHdr[0].dwFlags = waveHdr[1].dwFlags = 0L;
 415     waveHdr[0].dwBufferLength = waveHdr[1].dwBufferLength = bufsize;
 416     if (waveOutPrepareHeader(wps->hWave, &waveHdr[0], sizeof(WAVEHDR)) ||
 417         waveOutPrepareHeader(wps->hWave, &waveHdr[1], sizeof(WAVEHDR))) {
 418         goto errCleanUp;
 419     }
 420
 421     s.dwEventCount = 1L; /* for first buffer */
 422     index = 0;
 423
 424     do {
 425         left = mmckInfo.cksize;
 426
 427         mmioSeek(hmmio, mmckInfo.dwDataOffset, SEEK_SET);
 428         while (left)
 429         {
 430             if (WaitForSingleObject(psStopEvent, 0) == WAIT_OBJECT_0)
 431             {
 432                 wps->bLoop = FALSE;
 433                 break;
 434             }
 435             count = mmioRead(hmmio, waveHdr[index].lpData, min(bufsize, left));
 436             if (count < 1) break;
 437             left -= count;
 438             waveHdr[index].dwBufferLength = count;
 439             waveHdr[index].dwFlags &= ~WHDR_DONE;
 440             if (waveOutWrite(wps->hWave, &waveHdr[index], sizeof(WAVEHDR)) == MMSYSERR_NOERROR) {
 441                 index ^= 1;
 442                 PlaySound_WaitDone(&s);
 443             }
 444             else FIXME("Couldn't play header\n");
 445         }
 446         bRet = TRUE;
 447     } while (wps->bLoop);
 448
 449     PlaySound_WaitDone(&s); /* for last buffer */
 450     waveOutReset(wps->hWave);
 451
 452     waveOutUnprepareHeader(wps->hWave, &waveHdr[0], sizeof(WAVEHDR));
 453     waveOutUnprepareHeader(wps->hWave, &waveHdr[1], sizeof(WAVEHDR));
 454
 455 errCleanUp:
 456     TRACE("Done playing=%s => %s!\n", debugstr_w(wps->pszSound), bRet ? "ok" : "ko");
 457     CloseHandle(s.hEvent);
 458     HeapFree(GetProcessHeap(), 0, waveHdr);
 459     HeapFree(GetProcessHeap(), 0, lpWaveFormat);
 460     if (wps->hWave)     while (waveOutClose(wps->hWave) == WAVERR_STILLPLAYING) Sleep(100);
 461     if (hmmio)          mmioClose(hmmio, 0);
 462
 463     PlaySound_Free(wps);
 464
 465     return bRet;
 466 }
 467
 468 static BOOL MULTIMEDIA_PlaySound(const void* pszSound, HMODULE hmod, DWORD fdwSound, BOOL bUnicode)
 469 {
 470     WINE_PLAYSOUND*     wps = NULL;
 471
 472     TRACE("pszSound='%p' hmod=%p fdwSound=%08X\n",
 473           pszSound, hmod, fdwSound);
 474
 475     /* FIXME? I see no difference between SND_NOWAIT and SND_NOSTOP !
 476      * there could be one if several sounds can be played at once...
 477      */
 478     if ((fdwSound & (SND_NOWAIT | SND_NOSTOP)) && PlaySoundList != NULL)
 479         return FALSE;
 480
 481     /* alloc internal structure, if we need to play something */
 482     if (pszSound && !(fdwSound & SND_PURGE))
 483     {
 484         if (!(wps = PlaySound_Alloc(pszSound, hmod, fdwSound, bUnicode)))
 485             return FALSE;
 486     }
 487
 488     EnterCriticalSection(&WINMM_cs);
 489     /* since several threads can enter PlaySound in parallel, we're not
 490      * sure, at this point, that another thread didn't start a new playsound
 491      */
 492     while (PlaySoundList != NULL)
 493     {
 494         ResetEvent(psLastEvent);
 495         /* FIXME: doc says we have to stop all instances of pszSound if it's non
 496          * NULL... as of today, we stop all playing instances */
 497         SetEvent(psStopEvent);
 498
 499         waveOutReset(PlaySoundList->hWave);
 500         LeaveCriticalSection(&WINMM_cs);
 501         WaitForSingleObject(psLastEvent, INFINITE);
 502         EnterCriticalSection(&WINMM_cs);
 503
 504         ResetEvent(psStopEvent);
 505     }
 506
 507     if (wps) wps->lpNext = PlaySoundList;
 508     PlaySoundList = wps;
 509     LeaveCriticalSection(&WINMM_cs);
 510
 511     if (!pszSound || (fdwSound & SND_PURGE)) return TRUE;
 512
 513     if (fdwSound & SND_ASYNC)
 514     {
 515         DWORD       id;
 516         HANDLE      handle;
 517         wps->bLoop = (fdwSound & SND_LOOP) ? TRUE : FALSE;
 518         if ((handle = CreateThread(NULL, 0, proc_PlaySound, wps, 0, &id)) != 0) {
 519             wps->hThread = handle;
 520             SetThreadPriority(handle, THREAD_PRIORITY_TIME_CRITICAL);
 521             return TRUE;
 522         }
 523     }
 524     else return proc_PlaySound(wps);
 525
 526     /* error cases */
 527     PlaySound_Free(wps);
 528     return FALSE;
 529 }
 530
 531 /**************************************************************************
 532  *                              PlaySoundA              [WINMM.@]
 533  */
 534 BOOL WINAPI PlaySoundA(LPCSTR pszSoundA, HMODULE hmod, DWORD fdwSound)
 535 {
 536     return MULTIMEDIA_PlaySound(pszSoundA, hmod, fdwSound, FALSE);
 537 }
 538
 539 /**************************************************************************
 540  *                              PlaySoundW              [WINMM.@]
 541  */
 542 BOOL WINAPI PlaySoundW(LPCWSTR pszSoundW, HMODULE hmod, DWORD fdwSound)
 543 {
 544     return MULTIMEDIA_PlaySound(pszSoundW, hmod, fdwSound, TRUE);
 545 }
 546
 547 /**************************************************************************
 548  *                              sndPlaySoundA           [WINMM.@]
 549  */
 550 BOOL WINAPI sndPlaySoundA(LPCSTR pszSoundA, UINT uFlags)
 551 {
 552     uFlags &= SND_ASYNC|SND_LOOP|SND_MEMORY|SND_NODEFAULT|SND_NOSTOP|SND_SYNC;
 553     return MULTIMEDIA_PlaySound(pszSoundA, 0, uFlags, FALSE);
 554 }
 555
 556 /**************************************************************************
 557  *                              sndPlaySoundW           [WINMM.@]
 558  */
 559 BOOL WINAPI sndPlaySoundW(LPCWSTR pszSound, UINT uFlags)
 560 {
 561     uFlags &= SND_ASYNC|SND_LOOP|SND_MEMORY|SND_NODEFAULT|SND_NOSTOP|SND_SYNC;
 562     return MULTIMEDIA_PlaySound(pszSound, 0, uFlags, TRUE);
 563 }
 564
 565 /**************************************************************************
 566  *                              mmsystemGetVersion      [WINMM.@]
 567  */
 568 UINT WINAPI mmsystemGetVersion(void)
 569 {
 570     TRACE("3.10 (Win95?)\n");
 571     return 0x030a;
 572 }