dlls/dsound/primary.c

   1 /*                      DirectSound
   2  *
   3  * Copyright 1998 Marcus Meissner
   4  * Copyright 1998 Rob Riggs
   5  * Copyright 2000-2002 TransGaming Technologies, Inc.
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  *
  21  * TODO:
  22  *      When PrimarySetFormat (via ReopenDevice or PrimaryOpen) fails,
  23  *       it leaves dsound in unusable (not really open) state.
  24  */
  25
  26 #include <stdarg.h>
  27
  28 #define COBJMACROS
  29 #define NONAMELESSSTRUCT
  30 #define NONAMELESSUNION
  31 #include "windef.h"
  32 #include "winbase.h"
  33 #include "winuser.h"
  34 #include "mmsystem.h"
  35 #include "winternl.h"
  36 #include "mmddk.h"
  37 #include "wine/debug.h"
  38 #include "dsound.h"
  39 #include "dsound_private.h"
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL(dsound);
  42
  43 /** Calculate how long a fragment length of about 10 ms should be in frames
  44  *
  45  * nSamplesPerSec: Frequency rate in samples per second
  46  * nBlockAlign: Size of a single blockalign
  47  *
  48  * Returns:
  49  * Size in bytes of a single fragment
  50  */
  51 DWORD DSOUND_fraglen(DWORD nSamplesPerSec, DWORD nBlockAlign)
  52 {
  53     /* Given a timer delay of 10ms, the fragment size is approximately:
  54      *     fraglen = (nSamplesPerSec * 10 / 1000) * nBlockAlign
  55      * ==> fraglen = (nSamplesPerSec / 100) * nBlockSize
  56      *
  57      * ALSA uses buffers that are powers of 2. Because of this, fraglen
  58      * is rounded up to the nearest power of 2:
  59      */
  60
  61     if (nSamplesPerSec <= 12800)
  62         return 128 * nBlockAlign;
  63
  64     if (nSamplesPerSec <= 25600)
  65         return 256 * nBlockAlign;
  66
  67     if (nSamplesPerSec <= 51200)
  68         return 512 * nBlockAlign;
  69
  70     return 1024 * nBlockAlign;
  71 }
  72
  73 static void DSOUND_RecalcPrimary(DirectSoundDevice *device)
  74 {
  75     TRACE("(%p)\n", device);
  76
  77     device->fraglen = DSOUND_fraglen(device->pwfx->nSamplesPerSec, device->pwfx->nBlockAlign);
  78     device->helfrags = device->buflen / device->fraglen;
  79     TRACE("fraglen=%d helfrags=%d\n", device->fraglen, device->helfrags);
  80
  81     /* calculate the 10ms write lead */
  82     device->writelead = (device->pwfx->nSamplesPerSec / 100) * device->pwfx->nBlockAlign;
  83 }
  84
  85 HRESULT DSOUND_ReopenDevice(DirectSoundDevice *device, BOOL forcewave)
  86 {
  87     UINT prebuf_frames;
  88     REFERENCE_TIME prebuf_rt;
  89     HRESULT hres;
  90
  91     TRACE("(%p, %d)\n", device, forcewave);
  92
  93     if(device->client){
  94         IAudioClient_Release(device->client);
  95         device->client = NULL;
  96     }
  97     if(device->render){
  98         IAudioRenderClient_Release(device->render);
  99         device->render = NULL;
 100     }
 101     if(device->clock){
 102         IAudioClock_Release(device->clock);
 103         device->clock = NULL;
 104     }
 105     if(device->volume){
 106         IAudioStreamVolume_Release(device->volume);
 107         device->volume = NULL;
 108     }
 109
 110     hres = IMMDevice_Activate(device->mmdevice, &IID_IAudioClient,
 111             CLSCTX_INPROC_SERVER, NULL, (void **)&device->client);
 112     if(FAILED(hres)){
 113         WARN("Activate failed: %08x\n", hres);
 114         return hres;
 115     }
 116
 117     prebuf_frames = device->prebuf * DSOUND_fraglen(device->pwfx->nSamplesPerSec, device->pwfx->nBlockAlign) / device->pwfx->nBlockAlign;
 118     prebuf_rt = (10000000 * (UINT64)prebuf_frames) / device->pwfx->nSamplesPerSec;
 119
 120     hres = IAudioClient_Initialize(device->client,
 121             AUDCLNT_SHAREMODE_SHARED, AUDCLNT_STREAMFLAGS_NOPERSIST,
 122             prebuf_rt, 0, device->pwfx, NULL);
 123     if(FAILED(hres)){
 124         IAudioClient_Release(device->client);
 125         device->client = NULL;
 126         WARN("Initialize failed: %08x\n", hres);
 127         return hres;
 128     }
 129
 130     hres = IAudioClient_GetService(device->client, &IID_IAudioRenderClient,
 131             (void**)&device->render);
 132     if(FAILED(hres)){
 133         IAudioClient_Release(device->client);
 134         device->client = NULL;
 135         WARN("GetService failed: %08x\n", hres);
 136         return hres;
 137     }
 138
 139     hres = IAudioClient_GetService(device->client, &IID_IAudioClock,
 140             (void**)&device->clock);
 141     if(FAILED(hres)){
 142         IAudioClient_Release(device->client);
 143         IAudioRenderClient_Release(device->render);
 144         device->client = NULL;
 145         device->render = NULL;
 146         WARN("GetService failed: %08x\n", hres);
 147         return hres;
 148     }
 149
 150     hres = IAudioClient_GetService(device->client, &IID_IAudioStreamVolume,
 151             (void**)&device->volume);
 152     if(FAILED(hres)){
 153         IAudioClient_Release(device->client);
 154         IAudioRenderClient_Release(device->render);
 155         IAudioClock_Release(device->clock);
 156         device->client = NULL;
 157         device->render = NULL;
 158         device->clock = NULL;
 159         WARN("GetService failed: %08x\n", hres);
 160         return hres;
 161     }
 162
 163     return S_OK;
 164 }
 165
 166 static HRESULT DSOUND_PrimaryOpen(DirectSoundDevice *device)
 167 {
 168         DWORD buflen;
 169         LPBYTE newbuf;
 170
 171         TRACE("(%p)\n", device);
 172
 173         /* on original windows, the buffer it set to a fixed size, no matter what the settings are.
 174            on windows this size is always fixed (tested on win-xp) */
 175         if (!device->buflen)
 176                 device->buflen = ds_hel_buflen;
 177         buflen = device->buflen;
 178         buflen -= buflen % device->pwfx->nBlockAlign;
 179         device->buflen = buflen;
 180
 181         device->mix_buffer_len = DSOUND_bufpos_to_mixpos(device, device->buflen);
 182         device->mix_buffer = HeapAlloc(GetProcessHeap(), 0, device->mix_buffer_len);
 183         if (!device->mix_buffer)
 184                 return DSERR_OUTOFMEMORY;
 185
 186         if (device->state == STATE_PLAYING) device->state = STATE_STARTING;
 187         else if (device->state == STATE_STOPPING) device->state = STATE_STOPPED;
 188
 189     TRACE("desired buflen=%d, old buffer=%p\n", buflen, device->buffer);
 190
 191     /* reallocate emulated primary buffer */
 192     if (device->buffer)
 193         newbuf = HeapReAlloc(GetProcessHeap(),0,device->buffer, buflen);
 194     else
 195         newbuf = HeapAlloc(GetProcessHeap(),0, buflen);
 196
 197     if (!newbuf) {
 198         ERR("failed to allocate primary buffer\n");
 199         return DSERR_OUTOFMEMORY;
 200         /* but the old buffer might still exist and must be re-prepared */
 201     }
 202
 203     DSOUND_RecalcPrimary(device);
 204
 205     device->buffer = newbuf;
 206
 207     TRACE("fraglen=%d\n", device->fraglen);
 208
 209         device->mixfunction = mixfunctions[device->pwfx->wBitsPerSample/8 - 1];
 210         device->normfunction = normfunctions[device->pwfx->wBitsPerSample/8 - 1];
 211         FillMemory(device->buffer, device->buflen, (device->pwfx->wBitsPerSample == 8) ? 128 : 0);
 212         FillMemory(device->mix_buffer, device->mix_buffer_len, 0);
 213         device->last_pos_bytes = device->pwplay = device->pwqueue = device->playpos = device->mixpos = 0;
 214         return DS_OK;
 215 }
 216
 217
 218 static void DSOUND_PrimaryClose(DirectSoundDevice *device)
 219 {
 220     HRESULT hr;
 221
 222     TRACE("(%p)\n", device);
 223
 224     device->pwqueue = (DWORD)-1; /* resetting queues */
 225
 226     if(device->client){
 227         hr = IAudioClient_Stop(device->client);
 228         if(FAILED(hr))
 229             WARN("Stop failed: %08x\n", hr);
 230     }
 231
 232     /* clear the queue */
 233     device->pwqueue = 0;
 234 }
 235
 236 HRESULT DSOUND_PrimaryCreate(DirectSoundDevice *device)
 237 {
 238         HRESULT err = DS_OK;
 239         TRACE("(%p)\n", device);
 240
 241         device->buflen = ds_hel_buflen;
 242         err = DSOUND_PrimaryOpen(device);
 243
 244         if (err != DS_OK) {
 245                 WARN("DSOUND_PrimaryOpen failed\n");
 246                 return err;
 247         }
 248
 249         device->state = STATE_STOPPED;
 250         return DS_OK;
 251 }
 252
 253 HRESULT DSOUND_PrimaryDestroy(DirectSoundDevice *device)
 254 {
 255         TRACE("(%p)\n", device);
 256
 257         /* **** */
 258         EnterCriticalSection(&(device->mixlock));
 259
 260         DSOUND_PrimaryClose(device);
 261         HeapFree(GetProcessHeap(),0,device->pwfx);
 262         device->pwfx=NULL;
 263
 264         LeaveCriticalSection(&(device->mixlock));
 265         /* **** */
 266
 267         return DS_OK;
 268 }
 269
 270 HRESULT DSOUND_PrimaryPlay(DirectSoundDevice *device)
 271 {
 272     HRESULT hr;
 273
 274     TRACE("(%p)\n", device);
 275
 276     hr = IAudioClient_Start(device->client);
 277     if(FAILED(hr)){
 278         WARN("Start failed: %08x\n", hr);
 279         return hr;
 280     }
 281
 282     return DS_OK;
 283 }
 284
 285 HRESULT DSOUND_PrimaryStop(DirectSoundDevice *device)
 286 {
 287     HRESULT hr;
 288
 289     TRACE("(%p)\n", device);
 290
 291     hr = IAudioClient_Stop(device->client);
 292     if(FAILED(hr)){
 293         WARN("Stop failed: %08x\n", hr);
 294         return hr;
 295     }
 296
 297     return DS_OK;
 298 }
 299
 300 HRESULT DSOUND_PrimaryGetPosition(DirectSoundDevice *device, LPDWORD playpos, LPDWORD writepos)
 301 {
 302         TRACE("(%p,%p,%p)\n", device, playpos, writepos);
 303
 304         TRACE("pwplay=%i, pwqueue=%i\n", device->pwplay, device->pwqueue);
 305
 306         /* check if playpos was requested */
 307         if (playpos)
 308                 /* use the cached play position */
 309                 *playpos = device->pwplay * device->fraglen;
 310
 311         /* check if writepos was requested */
 312         if (writepos)
 313                 /* the writepos is the first non-queued position */
 314                 *writepos = ((device->pwplay + device->pwqueue) % device->helfrags) * device->fraglen;
 315
 316         TRACE("playpos = %d, writepos = %d (%p, time=%d)\n", playpos?*playpos:-1, writepos?*writepos:-1, device, GetTickCount());
 317         return DS_OK;
 318 }
 319
 320 static DWORD DSOUND_GetFormatSize(LPCWAVEFORMATEX wfex)
 321 {
 322         if (wfex->wFormatTag == WAVE_FORMAT_PCM)
 323                 return sizeof(WAVEFORMATEX);
 324         else
 325                 return sizeof(WAVEFORMATEX) + wfex->cbSize;
 326 }
 327
 328 LPWAVEFORMATEX DSOUND_CopyFormat(LPCWAVEFORMATEX wfex)
 329 {
 330         DWORD size = DSOUND_GetFormatSize(wfex);
 331         LPWAVEFORMATEX pwfx = HeapAlloc(GetProcessHeap(),0,size);
 332         if (pwfx == NULL) {
 333                 WARN("out of memory\n");
 334         } else if (wfex->wFormatTag != WAVE_FORMAT_PCM) {
 335                 CopyMemory(pwfx, wfex, size);
 336         } else {
 337                 CopyMemory(pwfx, wfex, sizeof(PCMWAVEFORMAT));
 338                 pwfx->cbSize=0;
 339                 if (pwfx->nBlockAlign != pwfx->nChannels * pwfx->wBitsPerSample/8) {
 340                         WARN("Fixing bad nBlockAlign (%u)\n", pwfx->nBlockAlign);
 341                         pwfx->nBlockAlign  = pwfx->nChannels * pwfx->wBitsPerSample/8;
 342                 }
 343                 if (pwfx->nAvgBytesPerSec != pwfx->nSamplesPerSec * pwfx->nBlockAlign) {
 344                         WARN("Fixing bad nAvgBytesPerSec (%u)\n", pwfx->nAvgBytesPerSec);
 345                         pwfx->nAvgBytesPerSec  = pwfx->nSamplesPerSec * pwfx->nBlockAlign;
 346                 }
 347         }
 348         return pwfx;
 349 }
 350
 351 HRESULT primarybuffer_SetFormat(DirectSoundDevice *device, LPCWAVEFORMATEX passed_fmt)
 352 {
 353         HRESULT err = DSERR_BUFFERLOST;
 354         int i;
 355         WAVEFORMATEX *old_fmt;
 356         WAVEFORMATEXTENSIBLE *fmtex, *passed_fmtex = (WAVEFORMATEXTENSIBLE*)passed_fmt;
 357         BOOL forced = (device->priolevel == DSSCL_WRITEPRIMARY);
 358
 359         TRACE("(%p,%p)\n", device, passed_fmt);
 360
 361         if (device->priolevel == DSSCL_NORMAL) {
 362                 WARN("failed priority check!\n");
 363                 return DSERR_PRIOLEVELNEEDED;
 364         }
 365
 366         /* Let's be pedantic! */
 367         if (passed_fmt == NULL) {
 368                 WARN("invalid parameter: passed_fmt==NULL!\n");
 369                 return DSERR_INVALIDPARAM;
 370         }
 371         TRACE("(formattag=0x%04x,chans=%d,samplerate=%d,"
 372                           "bytespersec=%d,blockalign=%d,bitspersamp=%d,cbSize=%d)\n",
 373                   passed_fmt->wFormatTag, passed_fmt->nChannels, passed_fmt->nSamplesPerSec,
 374                   passed_fmt->nAvgBytesPerSec, passed_fmt->nBlockAlign,
 375                   passed_fmt->wBitsPerSample, passed_fmt->cbSize);
 376
 377         if(passed_fmt->wBitsPerSample < 8 || passed_fmt->wBitsPerSample % 8 != 0 ||
 378                         passed_fmt->nChannels == 0 || passed_fmt->nSamplesPerSec == 0 ||
 379                         passed_fmt->nAvgBytesPerSec == 0 ||
 380                         passed_fmt->nBlockAlign != passed_fmt->nChannels * passed_fmt->wBitsPerSample / 8)
 381                 return DSERR_INVALIDPARAM;
 382
 383         if(passed_fmt->wFormatTag == WAVE_FORMAT_EXTENSIBLE){
 384                 if(passed_fmtex->Samples.wValidBitsPerSample > passed_fmtex->Format.wBitsPerSample)
 385                         return DSERR_INVALIDPARAM;
 386         }
 387
 388         /* **** */
 389         RtlAcquireResourceExclusive(&(device->buffer_list_lock), TRUE);
 390         EnterCriticalSection(&(device->mixlock));
 391
 392         old_fmt = device->pwfx;
 393         device->pwfx = DSOUND_CopyFormat(passed_fmt);
 394         fmtex = (WAVEFORMATEXTENSIBLE *)device->pwfx;
 395         if (device->pwfx == NULL) {
 396                 device->pwfx = old_fmt;
 397                 old_fmt = NULL;
 398                 err = DSERR_OUTOFMEMORY;
 399                 goto done;
 400         }
 401
 402         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE){
 403                 if(fmtex->Samples.wValidBitsPerSample == 0){
 404                         TRACE("Correcting 0 valid bits per sample\n");
 405                         fmtex->Samples.wValidBitsPerSample = fmtex->Format.wBitsPerSample;
 406                 }
 407         }
 408
 409         DSOUND_PrimaryClose(device);
 410
 411         err = DSOUND_ReopenDevice(device, FALSE);
 412         if(SUCCEEDED(err))
 413                 goto opened;
 414
 415         /* requested format failed, so try others */
 416         if(device->pwfx->wFormatTag == WAVE_FORMAT_IEEE_FLOAT){
 417                 device->pwfx->wFormatTag = WAVE_FORMAT_PCM;
 418                 device->pwfx->wBitsPerSample = 32;
 419                 device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 420                 device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 421
 422                 err = DSOUND_ReopenDevice(device, FALSE);
 423                 if(SUCCEEDED(err))
 424                         goto opened;
 425         }
 426
 427         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE &&
 428                          IsEqualGUID(&fmtex->SubFormat, &KSDATAFORMAT_SUBTYPE_IEEE_FLOAT)){
 429                 fmtex->SubFormat = KSDATAFORMAT_SUBTYPE_PCM;
 430                 device->pwfx->wBitsPerSample = 32;
 431                 device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 432                 device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 433
 434                 err = DSOUND_ReopenDevice(device, FALSE);
 435                 if(SUCCEEDED(err))
 436                         goto opened;
 437         }
 438
 439         device->pwfx->wBitsPerSample = 32;
 440         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 441         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 442         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 443                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 444         err = DSOUND_ReopenDevice(device, FALSE);
 445         if(SUCCEEDED(err))
 446                 goto opened;
 447
 448         device->pwfx->wBitsPerSample = 16;
 449         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 450         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 451         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 452                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 453         err = DSOUND_ReopenDevice(device, FALSE);
 454         if(SUCCEEDED(err))
 455                 goto opened;
 456
 457         device->pwfx->wBitsPerSample = 8;
 458         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 459         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 460         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 461                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 462         err = DSOUND_ReopenDevice(device, FALSE);
 463         if(SUCCEEDED(err))
 464                 goto opened;
 465
 466         device->pwfx->nChannels = (passed_fmt->nChannels == 2) ? 1 : 2;
 467         device->pwfx->wBitsPerSample = passed_fmt->wBitsPerSample;
 468         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 469         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 470         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 471                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 472         err = DSOUND_ReopenDevice(device, FALSE);
 473         if(SUCCEEDED(err))
 474                 goto opened;
 475
 476         device->pwfx->wBitsPerSample = 32;
 477         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 478         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 479         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 480                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 481         err = DSOUND_ReopenDevice(device, FALSE);
 482         if(SUCCEEDED(err))
 483                 goto opened;
 484
 485         device->pwfx->wBitsPerSample = 16;
 486         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 487         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 488         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 489                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 490         err = DSOUND_ReopenDevice(device, FALSE);
 491         if(SUCCEEDED(err))
 492                 goto opened;
 493
 494         device->pwfx->wBitsPerSample = 8;
 495         device->pwfx->nAvgBytesPerSec = passed_fmt->nSamplesPerSec * device->pwfx->nBlockAlign;
 496         device->pwfx->nBlockAlign = passed_fmt->nChannels * (device->pwfx->wBitsPerSample / 8);
 497         if(device->pwfx->wFormatTag == WAVE_FORMAT_EXTENSIBLE)
 498                 fmtex->Samples.wValidBitsPerSample = device->pwfx->wBitsPerSample;
 499         err = DSOUND_ReopenDevice(device, FALSE);
 500         if(SUCCEEDED(err))
 501                 goto opened;
 502
 503         WARN("No formats could be opened\n");
 504         goto done;
 505
 506 opened:
 507         err = DSOUND_PrimaryOpen(device);
 508         if (err != DS_OK) {
 509                 WARN("DSOUND_PrimaryOpen failed\n");
 510                 goto done;
 511         }
 512
 513         if (passed_fmt->nSamplesPerSec/100 != device->pwfx->nSamplesPerSec/100 && forced && device->buffer)
 514         {
 515                 DSOUND_PrimaryClose(device);
 516                 device->pwfx->nSamplesPerSec = passed_fmt->nSamplesPerSec;
 517                 err = DSOUND_ReopenDevice(device, TRUE);
 518                 if (FAILED(err))
 519                         WARN("DSOUND_ReopenDevice(2) failed: %08x\n", err);
 520                 else if (FAILED((err = DSOUND_PrimaryOpen(device))))
 521                         WARN("DSOUND_PrimaryOpen(2) failed: %08x\n", err);
 522         }
 523
 524         device->mix_buffer_len = DSOUND_bufpos_to_mixpos(device, device->buflen);
 525         device->mix_buffer = HeapReAlloc(GetProcessHeap(), 0, device->mix_buffer, device->mix_buffer_len);
 526         FillMemory(device->mix_buffer, device->mix_buffer_len, 0);
 527         device->mixfunction = mixfunctions[device->pwfx->wBitsPerSample/8 - 1];
 528         device->normfunction = normfunctions[device->pwfx->wBitsPerSample/8 - 1];
 529
 530         if (old_fmt->nSamplesPerSec != device->pwfx->nSamplesPerSec ||
 531                         old_fmt->wBitsPerSample != device->pwfx->wBitsPerSample ||
 532                         old_fmt->nChannels != device->pwfx->nChannels) {
 533                 IDirectSoundBufferImpl** dsb = device->buffers;
 534                 for (i = 0; i < device->nrofbuffers; i++, dsb++) {
 535                         /* **** */
 536                         RtlAcquireResourceExclusive(&(*dsb)->lock, TRUE);
 537
 538                         (*dsb)->freqAdjust = (*dsb)->freq / (float)device->pwfx->nSamplesPerSec;
 539                         DSOUND_RecalcFormat((*dsb));
 540                         (*dsb)->primary_mixpos = 0;
 541
 542                         RtlReleaseResource(&(*dsb)->lock);
 543                         /* **** */
 544                 }
 545         }
 546
 547 done:
 548         LeaveCriticalSection(&(device->mixlock));
 549         RtlReleaseResource(&(device->buffer_list_lock));
 550         /* **** */
 551
 552         HeapFree(GetProcessHeap(), 0, old_fmt);
 553         return err;
 554 }
 555
 556 /*******************************************************************************
 557  *              PrimaryBuffer
 558  */
 559 static inline IDirectSoundBufferImpl *impl_from_IDirectSoundBuffer(IDirectSoundBuffer *iface)
 560 {
 561     /* IDirectSoundBuffer and IDirectSoundBuffer8 use the same iface. */
 562     return CONTAINING_RECORD(iface, IDirectSoundBufferImpl, IDirectSoundBuffer8_iface);
 563 }
 564
 565 /* This sets this format for the primary buffer only */
 566 static HRESULT WINAPI PrimaryBufferImpl_SetFormat(IDirectSoundBuffer *iface,
 567         const WAVEFORMATEX *wfex)
 568 {
 569     IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 570     TRACE("(%p,%p)\n", iface, wfex);
 571     return primarybuffer_SetFormat(This->device, wfex);
 572 }
 573
 574 static HRESULT WINAPI PrimaryBufferImpl_SetVolume(IDirectSoundBuffer *iface, LONG vol)
 575 {
 576         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 577         DirectSoundDevice *device = This->device;
 578         HRESULT hr;
 579         float lvol, rvol;
 580
 581         TRACE("(%p,%d)\n", iface, vol);
 582
 583         if (!(This->dsbd.dwFlags & DSBCAPS_CTRLVOLUME)) {
 584                 WARN("control unavailable\n");
 585                 return DSERR_CONTROLUNAVAIL;
 586         }
 587
 588         if ((vol > DSBVOLUME_MAX) || (vol < DSBVOLUME_MIN)) {
 589                 WARN("invalid parameter: vol = %d\n", vol);
 590                 return DSERR_INVALIDPARAM;
 591         }
 592
 593         /* **** */
 594         EnterCriticalSection(&device->mixlock);
 595
 596         hr = IAudioStreamVolume_GetChannelVolume(device->volume, 0, &lvol);
 597         if(FAILED(hr)){
 598                 LeaveCriticalSection(&device->mixlock);
 599                 WARN("GetChannelVolume failed: %08x\n", hr);
 600                 return hr;
 601         }
 602
 603         if(device->pwfx->nChannels > 1){
 604                 hr = IAudioStreamVolume_GetChannelVolume(device->volume, 1, &rvol);
 605                 if(FAILED(hr)){
 606                         LeaveCriticalSection(&device->mixlock);
 607                         WARN("GetChannelVolume failed: %08x\n", hr);
 608                         return hr;
 609                 }
 610         }else
 611                 rvol = 1;
 612
 613         device->volpan.dwTotalLeftAmpFactor = ((UINT16)(lvol * (DWORD)0xFFFF));
 614         device->volpan.dwTotalRightAmpFactor = ((UINT16)(rvol * (DWORD)0xFFFF));
 615
 616         DSOUND_AmpFactorToVolPan(&device->volpan);
 617         if (vol != device->volpan.lVolume) {
 618                 device->volpan.lVolume=vol;
 619                 DSOUND_RecalcVolPan(&device->volpan);
 620                 lvol = (float)((DWORD)(device->volpan.dwTotalLeftAmpFactor & 0xFFFF) / (float)0xFFFF);
 621                 hr = IAudioStreamVolume_SetChannelVolume(device->volume, 0, lvol);
 622                 if(FAILED(hr)){
 623                         LeaveCriticalSection(&device->mixlock);
 624                         WARN("SetChannelVolume failed: %08x\n", hr);
 625                         return hr;
 626                 }
 627
 628                 if(device->pwfx->nChannels > 1){
 629                         rvol = (float)((DWORD)(device->volpan.dwTotalRightAmpFactor & 0xFFFF) / (float)0xFFFF);
 630                         hr = IAudioStreamVolume_SetChannelVolume(device->volume, 1, rvol);
 631                         if(FAILED(hr)){
 632                                 LeaveCriticalSection(&device->mixlock);
 633                                 WARN("SetChannelVolume failed: %08x\n", hr);
 634                                 return hr;
 635                         }
 636                 }
 637         }
 638
 639         LeaveCriticalSection(&(device->mixlock));
 640         /* **** */
 641
 642         return DS_OK;
 643 }
 644
 645 static HRESULT WINAPI PrimaryBufferImpl_GetVolume(IDirectSoundBuffer *iface, LONG *vol)
 646 {
 647         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 648         DirectSoundDevice *device = This->device;
 649         float lvol, rvol;
 650         HRESULT hr;
 651         TRACE("(%p,%p)\n", iface, vol);
 652
 653         if (!(This->dsbd.dwFlags & DSBCAPS_CTRLVOLUME)) {
 654                 WARN("control unavailable\n");
 655                 return DSERR_CONTROLUNAVAIL;
 656         }
 657
 658         if (vol == NULL) {
 659                 WARN("invalid parameter: vol = NULL\n");
 660                 return DSERR_INVALIDPARAM;
 661         }
 662
 663         EnterCriticalSection(&device->mixlock);
 664
 665         hr = IAudioStreamVolume_GetChannelVolume(device->volume, 0, &lvol);
 666         if(FAILED(hr)){
 667                 LeaveCriticalSection(&device->mixlock);
 668                 WARN("GetChannelVolume failed: %08x\n", hr);
 669                 return hr;
 670         }
 671
 672         if(device->pwfx->nChannels > 1){
 673                 hr = IAudioStreamVolume_GetChannelVolume(device->volume, 1, &rvol);
 674                 if(FAILED(hr)){
 675                         LeaveCriticalSection(&device->mixlock);
 676                         WARN("GetChannelVolume failed: %08x\n", hr);
 677                         return hr;
 678                 }
 679         }else
 680                 rvol = 1;
 681
 682         device->volpan.dwTotalLeftAmpFactor = ((UINT16)(lvol * (DWORD)0xFFFF));
 683         device->volpan.dwTotalRightAmpFactor = ((UINT16)(rvol * (DWORD)0xFFFF));
 684
 685         DSOUND_AmpFactorToVolPan(&device->volpan);
 686         *vol = device->volpan.lVolume;
 687
 688         LeaveCriticalSection(&device->mixlock);
 689
 690         return DS_OK;
 691 }
 692
 693 static HRESULT WINAPI PrimaryBufferImpl_SetFrequency(IDirectSoundBuffer *iface, DWORD freq)
 694 {
 695         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 696         TRACE("(%p,%d)\n",This,freq);
 697
 698         /* You cannot set the frequency of the primary buffer */
 699         WARN("control unavailable\n");
 700         return DSERR_CONTROLUNAVAIL;
 701 }
 702
 703 static HRESULT WINAPI PrimaryBufferImpl_Play(IDirectSoundBuffer *iface, DWORD reserved1,
 704         DWORD reserved2, DWORD flags)
 705 {
 706         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 707         DirectSoundDevice *device = This->device;
 708         TRACE("(%p,%08x,%08x,%08x)\n", iface, reserved1, reserved2, flags);
 709
 710         if (!(flags & DSBPLAY_LOOPING)) {
 711                 WARN("invalid parameter: flags = %08x\n", flags);
 712                 return DSERR_INVALIDPARAM;
 713         }
 714
 715         /* **** */
 716         EnterCriticalSection(&(device->mixlock));
 717
 718         if (device->state == STATE_STOPPED)
 719                 device->state = STATE_STARTING;
 720         else if (device->state == STATE_STOPPING)
 721                 device->state = STATE_PLAYING;
 722
 723         LeaveCriticalSection(&(device->mixlock));
 724         /* **** */
 725
 726         return DS_OK;
 727 }
 728
 729 static HRESULT WINAPI PrimaryBufferImpl_Stop(IDirectSoundBuffer *iface)
 730 {
 731         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 732         DirectSoundDevice *device = This->device;
 733         TRACE("(%p)\n", iface);
 734
 735         /* **** */
 736         EnterCriticalSection(&(device->mixlock));
 737
 738         if (device->state == STATE_PLAYING)
 739                 device->state = STATE_STOPPING;
 740         else if (device->state == STATE_STARTING)
 741                 device->state = STATE_STOPPED;
 742
 743         LeaveCriticalSection(&(device->mixlock));
 744         /* **** */
 745
 746         return DS_OK;
 747 }
 748
 749 static ULONG WINAPI PrimaryBufferImpl_AddRef(IDirectSoundBuffer *iface)
 750 {
 751     IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 752     ULONG ref = InterlockedIncrement(&(This->ref));
 753     TRACE("(%p) ref was %d\n", This, ref - 1);
 754     if(ref == 1)
 755         InterlockedIncrement(&This->numIfaces);
 756     return ref;
 757 }
 758
 759 void primarybuffer_destroy(IDirectSoundBufferImpl *This)
 760 {
 761     This->device->primary = NULL;
 762     HeapFree(GetProcessHeap(), 0, This);
 763     TRACE("(%p) released\n", This);
 764 }
 765
 766 static ULONG WINAPI PrimaryBufferImpl_Release(IDirectSoundBuffer *iface)
 767 {
 768     IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 769     DWORD ref = InterlockedDecrement(&(This->ref));
 770     TRACE("(%p) ref was %d\n", This, ref + 1);
 771
 772     if (!ref && !InterlockedDecrement(&This->numIfaces))
 773         primarybuffer_destroy(This);
 774     return ref;
 775 }
 776
 777 static HRESULT WINAPI PrimaryBufferImpl_GetCurrentPosition(IDirectSoundBuffer *iface,
 778         DWORD *playpos, DWORD *writepos)
 779 {
 780         HRESULT hres;
 781         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 782         DirectSoundDevice *device = This->device;
 783         TRACE("(%p,%p,%p)\n", iface, playpos, writepos);
 784
 785         /* **** */
 786         EnterCriticalSection(&(device->mixlock));
 787
 788         hres = DSOUND_PrimaryGetPosition(device, playpos, writepos);
 789         if (hres != DS_OK) {
 790                 WARN("DSOUND_PrimaryGetPosition failed\n");
 791                 LeaveCriticalSection(&(device->mixlock));
 792                 return hres;
 793         }
 794         if (writepos) {
 795                 if (device->state != STATE_STOPPED)
 796                         /* apply the documented 10ms lead to writepos */
 797                         *writepos += device->writelead;
 798                 while (*writepos >= device->buflen) *writepos -= device->buflen;
 799         }
 800
 801         LeaveCriticalSection(&(device->mixlock));
 802         /* **** */
 803
 804         TRACE("playpos = %d, writepos = %d (%p, time=%d)\n", playpos?*playpos:0, writepos?*writepos:0, device, GetTickCount());
 805         return DS_OK;
 806 }
 807
 808 static HRESULT WINAPI PrimaryBufferImpl_GetStatus(IDirectSoundBuffer *iface, DWORD *status)
 809 {
 810         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 811         DirectSoundDevice *device = This->device;
 812         TRACE("(%p,%p)\n", iface, status);
 813
 814         if (status == NULL) {
 815                 WARN("invalid parameter: status == NULL\n");
 816                 return DSERR_INVALIDPARAM;
 817         }
 818
 819         *status = 0;
 820         if ((device->state == STATE_STARTING) ||
 821             (device->state == STATE_PLAYING))
 822                 *status |= DSBSTATUS_PLAYING | DSBSTATUS_LOOPING;
 823
 824         TRACE("status=%x\n", *status);
 825         return DS_OK;
 826 }
 827
 828
 829 static HRESULT WINAPI PrimaryBufferImpl_GetFormat(IDirectSoundBuffer *iface, WAVEFORMATEX *lpwf,
 830         DWORD wfsize, DWORD *wfwritten)
 831 {
 832     DWORD size;
 833     IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 834     DirectSoundDevice *device = This->device;
 835     TRACE("(%p,%p,%d,%p)\n", iface, lpwf, wfsize, wfwritten);
 836
 837     size = sizeof(WAVEFORMATEX) + device->pwfx->cbSize;
 838
 839     if (lpwf) { /* NULL is valid */
 840         if (wfsize >= size) {
 841             CopyMemory(lpwf,device->pwfx,size);
 842             if (wfwritten)
 843                 *wfwritten = size;
 844         } else {
 845             WARN("invalid parameter: wfsize too small\n");
 846             if (wfwritten)
 847                 *wfwritten = 0;
 848             return DSERR_INVALIDPARAM;
 849         }
 850     } else {
 851         if (wfwritten)
 852             *wfwritten = sizeof(WAVEFORMATEX) + device->pwfx->cbSize;
 853         else {
 854             WARN("invalid parameter: wfwritten == NULL\n");
 855             return DSERR_INVALIDPARAM;
 856         }
 857     }
 858
 859     return DS_OK;
 860 }
 861
 862 static HRESULT WINAPI PrimaryBufferImpl_Lock(IDirectSoundBuffer *iface, DWORD writecursor,
 863         DWORD writebytes, void **lplpaudioptr1, DWORD *audiobytes1, void **lplpaudioptr2,
 864         DWORD *audiobytes2, DWORD flags)
 865 {
 866         HRESULT hres;
 867         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 868         DirectSoundDevice *device = This->device;
 869         TRACE("(%p,%d,%d,%p,%p,%p,%p,0x%08x) at %d\n",
 870                 iface,
 871                 writecursor,
 872                 writebytes,
 873                 lplpaudioptr1,
 874                 audiobytes1,
 875                 lplpaudioptr2,
 876                 audiobytes2,
 877                 flags,
 878                 GetTickCount()
 879         );
 880
 881         if (!audiobytes1)
 882             return DSERR_INVALIDPARAM;
 883
 884         if (device->priolevel != DSSCL_WRITEPRIMARY) {
 885                 WARN("failed priority check!\n");
 886                 return DSERR_PRIOLEVELNEEDED;
 887         }
 888
 889         /* when this flag is set, writecursor is meaningless and must be calculated */
 890         if (flags & DSBLOCK_FROMWRITECURSOR) {
 891                 /* GetCurrentPosition does too much magic to duplicate here */
 892                 hres = IDirectSoundBuffer_GetCurrentPosition(iface, NULL, &writecursor);
 893                 if (hres != DS_OK) {
 894                         WARN("IDirectSoundBuffer_GetCurrentPosition failed\n");
 895                         return hres;
 896                 }
 897         }
 898
 899         /* when this flag is set, writebytes is meaningless and must be set */
 900         if (flags & DSBLOCK_ENTIREBUFFER)
 901                 writebytes = device->buflen;
 902
 903         if (writecursor >= device->buflen) {
 904                 WARN("Invalid parameter, writecursor: %u >= buflen: %u\n",
 905                      writecursor, device->buflen);
 906                 return DSERR_INVALIDPARAM;
 907         }
 908
 909         if (writebytes > device->buflen) {
 910                 WARN("Invalid parameter, writebytes: %u > buflen: %u\n",
 911                      writebytes, device->buflen);
 912                 return DSERR_INVALIDPARAM;
 913         }
 914
 915         if (writecursor+writebytes <= device->buflen) {
 916                 *(LPBYTE*)lplpaudioptr1 = device->buffer+writecursor;
 917                 *audiobytes1 = writebytes;
 918                 if (lplpaudioptr2)
 919                         *(LPBYTE*)lplpaudioptr2 = NULL;
 920                 if (audiobytes2)
 921                         *audiobytes2 = 0;
 922                 TRACE("->%d.0\n",writebytes);
 923         } else {
 924                 *(LPBYTE*)lplpaudioptr1 = device->buffer+writecursor;
 925                 *audiobytes1 = device->buflen-writecursor;
 926                 if (lplpaudioptr2)
 927                         *(LPBYTE*)lplpaudioptr2 = device->buffer;
 928                 if (audiobytes2)
 929                         *audiobytes2 = writebytes-(device->buflen-writecursor);
 930                 TRACE("->%d.%d\n",*audiobytes1,audiobytes2?*audiobytes2:0);
 931         }
 932         return DS_OK;
 933 }
 934
 935 static HRESULT WINAPI PrimaryBufferImpl_SetCurrentPosition(IDirectSoundBuffer *iface, DWORD newpos)
 936 {
 937         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 938         TRACE("(%p,%d)\n",This,newpos);
 939
 940         /* You cannot set the position of the primary buffer */
 941         WARN("invalid call\n");
 942         return DSERR_INVALIDCALL;
 943 }
 944
 945 static HRESULT WINAPI PrimaryBufferImpl_SetPan(IDirectSoundBuffer *iface, LONG pan)
 946 {
 947         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
 948         DirectSoundDevice *device = This->device;
 949         float lvol, rvol;
 950         HRESULT hr;
 951         TRACE("(%p,%d)\n", iface, pan);
 952
 953         if (!(This->dsbd.dwFlags & DSBCAPS_CTRLPAN)) {
 954                 WARN("control unavailable\n");
 955                 return DSERR_CONTROLUNAVAIL;
 956         }
 957
 958         if ((pan > DSBPAN_RIGHT) || (pan < DSBPAN_LEFT)) {
 959                 WARN("invalid parameter: pan = %d\n", pan);
 960                 return DSERR_INVALIDPARAM;
 961         }
 962
 963         /* **** */
 964         EnterCriticalSection(&device->mixlock);
 965
 966         hr = IAudioStreamVolume_GetChannelVolume(device->volume, 0, &lvol);
 967         if(FAILED(hr)){
 968                 LeaveCriticalSection(&device->mixlock);
 969                 WARN("GetChannelVolume failed: %08x\n", hr);
 970                 return hr;
 971         }
 972
 973         if(device->pwfx->nChannels > 1){
 974                 hr = IAudioStreamVolume_GetChannelVolume(device->volume, 1, &rvol);
 975                 if(FAILED(hr)){
 976                         LeaveCriticalSection(&device->mixlock);
 977                         WARN("GetChannelVolume failed: %08x\n", hr);
 978                         return hr;
 979                 }
 980         }else
 981                 rvol = 1;
 982
 983         device->volpan.dwTotalLeftAmpFactor = ((UINT16)(lvol * (DWORD)0xFFFF));
 984         device->volpan.dwTotalRightAmpFactor = ((UINT16)(rvol * (DWORD)0xFFFF));
 985
 986         DSOUND_AmpFactorToVolPan(&device->volpan);
 987         if (pan != device->volpan.lPan) {
 988                 device->volpan.lPan=pan;
 989                 DSOUND_RecalcVolPan(&device->volpan);
 990
 991                 lvol = (float)((DWORD)(device->volpan.dwTotalLeftAmpFactor & 0xFFFF) / (float)0xFFFF);
 992                 hr = IAudioStreamVolume_SetChannelVolume(device->volume, 0, lvol);
 993                 if(FAILED(hr)){
 994                         LeaveCriticalSection(&device->mixlock);
 995                         WARN("SetChannelVolume failed: %08x\n", hr);
 996                         return hr;
 997                 }
 998
 999                 if(device->pwfx->nChannels > 1){
1000                         rvol = (float)((DWORD)(device->volpan.dwTotalRightAmpFactor & 0xFFFF) / (float)0xFFFF);
1001                         hr = IAudioStreamVolume_SetChannelVolume(device->volume, 1, rvol);
1002                         if(FAILED(hr)){
1003                                 LeaveCriticalSection(&device->mixlock);
1004                                 WARN("SetChannelVolume failed: %08x\n", hr);
1005                                 return hr;
1006                         }
1007                 }
1008         }
1009
1010         LeaveCriticalSection(&device->mixlock);
1011         /* **** */
1012
1013         return DS_OK;
1014 }
1015
1016 static HRESULT WINAPI PrimaryBufferImpl_GetPan(IDirectSoundBuffer *iface, LONG *pan)
1017 {
1018         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1019         DirectSoundDevice *device = This->device;
1020         float lvol, rvol;
1021         HRESULT hr;
1022         TRACE("(%p,%p)\n", iface, pan);
1023
1024         if (!(This->dsbd.dwFlags & DSBCAPS_CTRLPAN)) {
1025                 WARN("control unavailable\n");
1026                 return DSERR_CONTROLUNAVAIL;
1027         }
1028
1029         if (pan == NULL) {
1030                 WARN("invalid parameter: pan == NULL\n");
1031                 return DSERR_INVALIDPARAM;
1032         }
1033
1034         EnterCriticalSection(&device->mixlock);
1035
1036         hr = IAudioStreamVolume_GetChannelVolume(device->volume, 0, &lvol);
1037         if(FAILED(hr)){
1038                 LeaveCriticalSection(&device->mixlock);
1039                 WARN("GetChannelVolume failed: %08x\n", hr);
1040                 return hr;
1041         }
1042
1043         if(device->pwfx->nChannels > 1){
1044                 hr = IAudioStreamVolume_GetChannelVolume(device->volume, 1, &rvol);
1045                 if(FAILED(hr)){
1046                         LeaveCriticalSection(&device->mixlock);
1047                         WARN("GetChannelVolume failed: %08x\n", hr);
1048                         return hr;
1049                 }
1050         }else
1051                 rvol = 1;
1052
1053         device->volpan.dwTotalLeftAmpFactor = ((UINT16)(lvol * (DWORD)0xFFFF));
1054         device->volpan.dwTotalRightAmpFactor = ((UINT16)(rvol * (DWORD)0xFFFF));
1055
1056         DSOUND_AmpFactorToVolPan(&device->volpan);
1057         *pan = device->volpan.lPan;
1058
1059         LeaveCriticalSection(&device->mixlock);
1060
1061         return DS_OK;
1062 }
1063
1064 static HRESULT WINAPI PrimaryBufferImpl_Unlock(IDirectSoundBuffer *iface, void *p1, DWORD x1,
1065         void *p2, DWORD x2)
1066 {
1067         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1068         DirectSoundDevice *device = This->device;
1069         TRACE("(%p,%p,%d,%p,%d)\n", iface, p1, x1, p2, x2);
1070
1071         if (device->priolevel != DSSCL_WRITEPRIMARY) {
1072                 WARN("failed priority check!\n");
1073                 return DSERR_PRIOLEVELNEEDED;
1074         }
1075
1076     if((p1 && ((BYTE*)p1 < device->buffer ||
1077                     (BYTE*)p1 >= device->buffer + device->buflen)) ||
1078             (p2 && ((BYTE*)p2 < device->buffer ||
1079                     (BYTE*)p2 >= device->buffer + device->buflen)))
1080         return DSERR_INVALIDPARAM;
1081
1082         return DS_OK;
1083 }
1084
1085 static HRESULT WINAPI PrimaryBufferImpl_Restore(IDirectSoundBuffer *iface)
1086 {
1087         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1088         FIXME("(%p):stub\n",This);
1089         return DS_OK;
1090 }
1091
1092 static HRESULT WINAPI PrimaryBufferImpl_GetFrequency(IDirectSoundBuffer *iface, DWORD *freq)
1093 {
1094         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1095         DirectSoundDevice *device = This->device;
1096         TRACE("(%p,%p)\n", iface, freq);
1097
1098         if (freq == NULL) {
1099                 WARN("invalid parameter: freq == NULL\n");
1100                 return DSERR_INVALIDPARAM;
1101         }
1102
1103         if (!(This->dsbd.dwFlags & DSBCAPS_CTRLFREQUENCY)) {
1104                 WARN("control unavailable\n");
1105                 return DSERR_CONTROLUNAVAIL;
1106         }
1107
1108         *freq = device->pwfx->nSamplesPerSec;
1109         TRACE("-> %d\n", *freq);
1110
1111         return DS_OK;
1112 }
1113
1114 static HRESULT WINAPI PrimaryBufferImpl_Initialize(IDirectSoundBuffer *iface, IDirectSound *dsound,
1115         const DSBUFFERDESC *dbsd)
1116 {
1117         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1118         WARN("(%p) already initialized\n", This);
1119         return DSERR_ALREADYINITIALIZED;
1120 }
1121
1122 static HRESULT WINAPI PrimaryBufferImpl_GetCaps(IDirectSoundBuffer *iface, DSBCAPS *caps)
1123 {
1124         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1125         DirectSoundDevice *device = This->device;
1126         TRACE("(%p,%p)\n", iface, caps);
1127
1128         if (caps == NULL) {
1129                 WARN("invalid parameter: caps == NULL\n");
1130                 return DSERR_INVALIDPARAM;
1131         }
1132
1133         if (caps->dwSize < sizeof(*caps)) {
1134                 WARN("invalid parameter: caps->dwSize = %d\n", caps->dwSize);
1135                 return DSERR_INVALIDPARAM;
1136         }
1137
1138         caps->dwFlags = This->dsbd.dwFlags;
1139         caps->dwBufferBytes = device->buflen;
1140
1141         /* Windows reports these as zero */
1142         caps->dwUnlockTransferRate = 0;
1143         caps->dwPlayCpuOverhead = 0;
1144
1145         return DS_OK;
1146 }
1147
1148 static HRESULT WINAPI PrimaryBufferImpl_QueryInterface(IDirectSoundBuffer *iface, REFIID riid,
1149         void **ppobj)
1150 {
1151         IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer(iface);
1152
1153         TRACE("(%p,%s,%p)\n", iface, debugstr_guid(riid), ppobj);
1154
1155         if (ppobj == NULL) {
1156                 WARN("invalid parameter\n");
1157                 return E_INVALIDARG;
1158         }
1159
1160         *ppobj = NULL;  /* assume failure */
1161
1162         if ( IsEqualGUID(riid, &IID_IUnknown) ||
1163              IsEqualGUID(riid, &IID_IDirectSoundBuffer) ) {
1164                 IDirectSoundBuffer_AddRef(iface);
1165                 *ppobj = iface;
1166                 return S_OK;
1167         }
1168
1169         /* DirectSoundBuffer and DirectSoundBuffer8 are different and */
1170         /* a primary buffer can't have a DirectSoundBuffer8 interface */
1171         if ( IsEqualGUID( &IID_IDirectSoundBuffer8, riid ) ) {
1172                 WARN("app requested DirectSoundBuffer8 on primary buffer\n");
1173                 return E_NOINTERFACE;
1174         }
1175
1176         if ( IsEqualGUID( &IID_IDirectSoundNotify, riid ) ) {
1177                 ERR("app requested IDirectSoundNotify on primary buffer\n");
1178                 /* FIXME: should we support this? */
1179                 return E_NOINTERFACE;
1180         }
1181
1182         if ( IsEqualGUID( &IID_IDirectSound3DBuffer, riid ) ) {
1183                 ERR("app requested IDirectSound3DBuffer on primary buffer\n");
1184                 return E_NOINTERFACE;
1185         }
1186
1187         if ( IsEqualGUID( &IID_IDirectSound3DListener, riid ) ) {
1188                 *ppobj = &This->IDirectSound3DListener_iface;
1189                 IDirectSound3DListener_AddRef(&This->IDirectSound3DListener_iface);
1190                 return S_OK;
1191         }
1192
1193         if ( IsEqualGUID( &IID_IKsPropertySet, riid ) ) {
1194                 *ppobj = &This->IKsPropertySet_iface;
1195                 IKsPropertySet_AddRef(&This->IKsPropertySet_iface);
1196                 return S_OK;
1197         }
1198
1199         FIXME( "Unknown IID %s\n", debugstr_guid( riid ) );
1200         return E_NOINTERFACE;
1201 }
1202
1203 static const IDirectSoundBufferVtbl dspbvt =
1204 {
1205         PrimaryBufferImpl_QueryInterface,
1206         PrimaryBufferImpl_AddRef,
1207         PrimaryBufferImpl_Release,
1208         PrimaryBufferImpl_GetCaps,
1209         PrimaryBufferImpl_GetCurrentPosition,
1210         PrimaryBufferImpl_GetFormat,
1211         PrimaryBufferImpl_GetVolume,
1212         PrimaryBufferImpl_GetPan,
1213         PrimaryBufferImpl_GetFrequency,
1214         PrimaryBufferImpl_GetStatus,
1215         PrimaryBufferImpl_Initialize,
1216         PrimaryBufferImpl_Lock,
1217         PrimaryBufferImpl_Play,
1218         PrimaryBufferImpl_SetCurrentPosition,
1219         PrimaryBufferImpl_SetFormat,
1220         PrimaryBufferImpl_SetVolume,
1221         PrimaryBufferImpl_SetPan,
1222         PrimaryBufferImpl_SetFrequency,
1223         PrimaryBufferImpl_Stop,
1224         PrimaryBufferImpl_Unlock,
1225         PrimaryBufferImpl_Restore
1226 };
1227
1228 HRESULT primarybuffer_create(DirectSoundDevice *device, IDirectSoundBufferImpl **ppdsb,
1229         const DSBUFFERDESC *dsbd)
1230 {
1231         IDirectSoundBufferImpl *dsb;
1232         TRACE("%p,%p,%p)\n",device,ppdsb,dsbd);
1233
1234         if (dsbd->lpwfxFormat) {
1235                 WARN("invalid parameter: dsbd->lpwfxFormat != NULL\n");
1236                 *ppdsb = NULL;
1237                 return DSERR_INVALIDPARAM;
1238         }
1239
1240         dsb = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(*dsb));
1241
1242         if (dsb == NULL) {
1243                 WARN("out of memory\n");
1244                 *ppdsb = NULL;
1245                 return DSERR_OUTOFMEMORY;
1246         }
1247
1248         dsb->ref = 0;
1249         dsb->ref3D = 0;
1250         dsb->refiks = 0;
1251         dsb->numIfaces = 0;
1252         dsb->device = device;
1253         dsb->IDirectSoundBuffer8_iface.lpVtbl = (IDirectSoundBuffer8Vtbl *)&dspbvt;
1254         dsb->IDirectSound3DListener_iface.lpVtbl = &ds3dlvt;
1255         dsb->IKsPropertySet_iface.lpVtbl = &iksbvt;
1256         dsb->dsbd = *dsbd;
1257
1258         /* IDirectSound3DListener */
1259         device->ds3dl.dwSize = sizeof(DS3DLISTENER);
1260         device->ds3dl.vPosition.x = 0.0;
1261         device->ds3dl.vPosition.y = 0.0;
1262         device->ds3dl.vPosition.z = 0.0;
1263         device->ds3dl.vVelocity.x = 0.0;
1264         device->ds3dl.vVelocity.y = 0.0;
1265         device->ds3dl.vVelocity.z = 0.0;
1266         device->ds3dl.vOrientFront.x = 0.0;
1267         device->ds3dl.vOrientFront.y = 0.0;
1268         device->ds3dl.vOrientFront.z = 1.0;
1269         device->ds3dl.vOrientTop.x = 0.0;
1270         device->ds3dl.vOrientTop.y = 1.0;
1271         device->ds3dl.vOrientTop.z = 0.0;
1272         device->ds3dl.flDistanceFactor = DS3D_DEFAULTDISTANCEFACTOR;
1273         device->ds3dl.flRolloffFactor = DS3D_DEFAULTROLLOFFFACTOR;
1274         device->ds3dl.flDopplerFactor = DS3D_DEFAULTDOPPLERFACTOR;
1275         device->ds3dl_need_recalc = TRUE;
1276
1277         TRACE("Created primary buffer at %p\n", dsb);
1278         TRACE("(formattag=0x%04x,chans=%d,samplerate=%d,"
1279                 "bytespersec=%d,blockalign=%d,bitspersamp=%d,cbSize=%d)\n",
1280                 device->pwfx->wFormatTag, device->pwfx->nChannels,
1281                 device->pwfx->nSamplesPerSec, device->pwfx->nAvgBytesPerSec,
1282                 device->pwfx->nBlockAlign, device->pwfx->wBitsPerSample,
1283                 device->pwfx->cbSize);
1284
1285         IDirectSoundBuffer_AddRef(&dsb->IDirectSoundBuffer8_iface);
1286         *ppdsb = dsb;
1287         return S_OK;
1288 }