joy.cpl: Correct joystick testing thread behavior.
[wine.git] / dlls / dsound / buffer.c
blobcaf1f864fae13d47d654cec4f7c38cfdc416d67e
1 /* DirectSound
3 * Copyright 1998 Marcus Meissner
4 * Copyright 1998 Rob Riggs
5 * Copyright 2000-2002 TransGaming Technologies, Inc.
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.
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.
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
22 #include <stdarg.h>
24 #define NONAMELESSSTRUCT
25 #define NONAMELESSUNION
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winuser.h"
29 #include "mmsystem.h"
30 #include "winternl.h"
31 #include "vfwmsgs.h"
32 #include "wine/debug.h"
33 #include "dsound.h"
34 #include "dsound_private.h"
35 #include "dsconf.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(dsound);
39 /*******************************************************************************
40 * IDirectSoundNotify
43 static inline struct IDirectSoundBufferImpl *impl_from_IDirectSoundNotify(IDirectSoundNotify *iface)
45 return CONTAINING_RECORD(iface, struct IDirectSoundBufferImpl, IDirectSoundNotify_iface);
48 static HRESULT WINAPI IDirectSoundNotifyImpl_QueryInterface(IDirectSoundNotify *iface, REFIID riid,
49 void **ppobj)
51 IDirectSoundBufferImpl *This = impl_from_IDirectSoundNotify(iface);
53 TRACE("(%p,%s,%p)\n", This, debugstr_guid(riid), ppobj);
55 return IDirectSoundBuffer8_QueryInterface(&This->IDirectSoundBuffer8_iface, riid, ppobj);
58 static ULONG WINAPI IDirectSoundNotifyImpl_AddRef(IDirectSoundNotify *iface)
60 IDirectSoundBufferImpl *This = impl_from_IDirectSoundNotify(iface);
61 ULONG ref = InterlockedIncrement(&This->refn);
63 TRACE("(%p) ref was %d\n", This, ref - 1);
65 if(ref == 1)
66 InterlockedIncrement(&This->numIfaces);
68 return ref;
71 static ULONG WINAPI IDirectSoundNotifyImpl_Release(IDirectSoundNotify *iface)
73 IDirectSoundBufferImpl *This = impl_from_IDirectSoundNotify(iface);
74 ULONG ref = InterlockedDecrement(&This->refn);
76 TRACE("(%p) ref was %d\n", This, ref + 1);
78 if (!ref && !InterlockedDecrement(&This->numIfaces))
79 secondarybuffer_destroy(This);
81 return ref;
84 static HRESULT WINAPI IDirectSoundNotifyImpl_SetNotificationPositions(IDirectSoundNotify *iface,
85 DWORD howmuch, const DSBPOSITIONNOTIFY *notify)
87 IDirectSoundBufferImpl *This = impl_from_IDirectSoundNotify(iface);
89 TRACE("(%p,0x%08x,%p)\n",This,howmuch,notify);
91 if (howmuch > 0 && notify == NULL) {
92 WARN("invalid parameter: notify == NULL\n");
93 return DSERR_INVALIDPARAM;
96 if (TRACE_ON(dsound)) {
97 unsigned int i;
98 for (i=0;i<howmuch;i++)
99 TRACE("notify at %d to %p\n",
100 notify[i].dwOffset,notify[i].hEventNotify);
103 if (howmuch > 0) {
104 /* Make an internal copy of the caller-supplied array.
105 * Replace the existing copy if one is already present. */
106 HeapFree(GetProcessHeap(), 0, This->notifies);
107 This->notifies = HeapAlloc(GetProcessHeap(), 0,
108 howmuch * sizeof(DSBPOSITIONNOTIFY));
110 if (This->notifies == NULL) {
111 WARN("out of memory\n");
112 return DSERR_OUTOFMEMORY;
114 CopyMemory(This->notifies, notify, howmuch * sizeof(DSBPOSITIONNOTIFY));
115 This->nrofnotifies = howmuch;
116 } else {
117 HeapFree(GetProcessHeap(), 0, This->notifies);
118 This->notifies = NULL;
119 This->nrofnotifies = 0;
122 return S_OK;
125 static const IDirectSoundNotifyVtbl dsnvt =
127 IDirectSoundNotifyImpl_QueryInterface,
128 IDirectSoundNotifyImpl_AddRef,
129 IDirectSoundNotifyImpl_Release,
130 IDirectSoundNotifyImpl_SetNotificationPositions,
133 /*******************************************************************************
134 * IDirectSoundBuffer
137 static inline IDirectSoundBufferImpl *impl_from_IDirectSoundBuffer8(IDirectSoundBuffer8 *iface)
139 return CONTAINING_RECORD(iface, IDirectSoundBufferImpl, IDirectSoundBuffer8_iface);
142 static inline BOOL is_primary_buffer(IDirectSoundBufferImpl *This)
144 return This->dsbd.dwFlags & DSBCAPS_PRIMARYBUFFER ? TRUE : FALSE;
147 static HRESULT WINAPI IDirectSoundBufferImpl_SetFormat(IDirectSoundBuffer8 *iface,
148 LPCWAVEFORMATEX wfex)
150 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
152 TRACE("(%p,%p)\n", iface, wfex);
154 if (is_primary_buffer(This))
155 return primarybuffer_SetFormat(This->device, wfex);
156 else {
157 WARN("not available for secondary buffers.\n");
158 return DSERR_INVALIDCALL;
162 static HRESULT WINAPI IDirectSoundBufferImpl_SetVolume(IDirectSoundBuffer8 *iface, LONG vol)
164 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
165 LONG oldVol;
167 HRESULT hres = DS_OK;
169 TRACE("(%p,%d)\n",This,vol);
171 if (!(This->dsbd.dwFlags & DSBCAPS_CTRLVOLUME)) {
172 WARN("control unavailable: This->dsbd.dwFlags = 0x%08x\n", This->dsbd.dwFlags);
173 return DSERR_CONTROLUNAVAIL;
176 if ((vol > DSBVOLUME_MAX) || (vol < DSBVOLUME_MIN)) {
177 WARN("invalid parameter: vol = %d\n", vol);
178 return DSERR_INVALIDPARAM;
181 /* **** */
182 RtlAcquireResourceExclusive(&This->lock, TRUE);
184 if (This->dsbd.dwFlags & DSBCAPS_CTRL3D) {
185 oldVol = This->ds3db_lVolume;
186 This->ds3db_lVolume = vol;
187 if (vol != oldVol)
188 /* recalc 3d volume, which in turn recalcs the pans */
189 DSOUND_Calc3DBuffer(This);
190 } else {
191 oldVol = This->volpan.lVolume;
192 This->volpan.lVolume = vol;
193 if (vol != oldVol)
194 DSOUND_RecalcVolPan(&(This->volpan));
197 RtlReleaseResource(&This->lock);
198 /* **** */
200 return hres;
203 static HRESULT WINAPI IDirectSoundBufferImpl_GetVolume(IDirectSoundBuffer8 *iface, LONG *vol)
205 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
207 TRACE("(%p,%p)\n",This,vol);
209 if (!(This->dsbd.dwFlags & DSBCAPS_CTRLVOLUME)) {
210 WARN("control unavailable\n");
211 return DSERR_CONTROLUNAVAIL;
214 if (vol == NULL) {
215 WARN("invalid parameter: vol == NULL\n");
216 return DSERR_INVALIDPARAM;
219 *vol = This->volpan.lVolume;
221 return DS_OK;
224 static HRESULT WINAPI IDirectSoundBufferImpl_SetFrequency(IDirectSoundBuffer8 *iface, DWORD freq)
226 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
227 DWORD oldFreq;
229 TRACE("(%p,%d)\n",This,freq);
231 if (is_primary_buffer(This)) {
232 WARN("not available for primary buffers.\n");
233 return DSERR_CONTROLUNAVAIL;
236 if (!(This->dsbd.dwFlags & DSBCAPS_CTRLFREQUENCY)) {
237 WARN("control unavailable\n");
238 return DSERR_CONTROLUNAVAIL;
241 if (freq == DSBFREQUENCY_ORIGINAL)
242 freq = This->pwfx->nSamplesPerSec;
244 if ((freq < DSBFREQUENCY_MIN) || (freq > DSBFREQUENCY_MAX)) {
245 WARN("invalid parameter: freq = %d\n", freq);
246 return DSERR_INVALIDPARAM;
249 /* **** */
250 RtlAcquireResourceExclusive(&This->lock, TRUE);
252 oldFreq = This->freq;
253 This->freq = freq;
254 if (freq != oldFreq) {
255 This->freqAdjust = This->freq / (float)This->device->pwfx->nSamplesPerSec;
256 This->nAvgBytesPerSec = freq * This->pwfx->nBlockAlign;
257 DSOUND_RecalcFormat(This);
260 RtlReleaseResource(&This->lock);
261 /* **** */
263 return DS_OK;
266 static HRESULT WINAPI IDirectSoundBufferImpl_Play(IDirectSoundBuffer8 *iface, DWORD reserved1,
267 DWORD reserved2, DWORD flags)
269 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
270 HRESULT hres = DS_OK;
272 TRACE("(%p,%08x,%08x,%08x)\n",This,reserved1,reserved2,flags);
274 /* **** */
275 RtlAcquireResourceExclusive(&This->lock, TRUE);
277 This->playflags = flags;
278 if (This->state == STATE_STOPPED) {
279 This->leadin = TRUE;
280 This->state = STATE_STARTING;
281 } else if (This->state == STATE_STOPPING)
282 This->state = STATE_PLAYING;
284 RtlReleaseResource(&This->lock);
285 /* **** */
287 return hres;
290 static HRESULT WINAPI IDirectSoundBufferImpl_Stop(IDirectSoundBuffer8 *iface)
292 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
293 HRESULT hres = DS_OK;
295 TRACE("(%p)\n",This);
297 /* **** */
298 RtlAcquireResourceExclusive(&This->lock, TRUE);
300 if (This->state == STATE_PLAYING)
301 This->state = STATE_STOPPING;
302 else if (This->state == STATE_STARTING)
304 This->state = STATE_STOPPED;
305 DSOUND_CheckEvent(This, 0, 0);
308 RtlReleaseResource(&This->lock);
309 /* **** */
311 return hres;
314 static ULONG WINAPI IDirectSoundBufferImpl_AddRef(IDirectSoundBuffer8 *iface)
316 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
317 ULONG ref = InterlockedIncrement(&This->ref);
319 TRACE("(%p) ref was %d\n", This, ref - 1);
321 if(ref == 1)
322 InterlockedIncrement(&This->numIfaces);
324 return ref;
327 static ULONG WINAPI IDirectSoundBufferImpl_Release(IDirectSoundBuffer8 *iface)
329 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
330 ULONG ref;
332 if (is_primary_buffer(This)){
333 ref = capped_refcount_dec(&This->ref);
334 if(!ref)
335 capped_refcount_dec(&This->numIfaces);
336 TRACE("(%p) ref is now: %d\n", This, ref);
337 return ref;
340 ref = InterlockedDecrement(&This->ref);
341 if (!ref && !InterlockedDecrement(&This->numIfaces))
342 secondarybuffer_destroy(This);
344 TRACE("(%p) ref is now %d\n", This, ref);
346 return ref;
349 static HRESULT WINAPI IDirectSoundBufferImpl_GetCurrentPosition(IDirectSoundBuffer8 *iface,
350 DWORD *playpos, DWORD *writepos)
352 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
353 DWORD pos;
355 TRACE("(%p,%p,%p)\n",This,playpos,writepos);
357 RtlAcquireResourceShared(&This->lock, TRUE);
359 pos = This->sec_mixpos;
361 /* sanity */
362 if (pos >= This->buflen){
363 FIXME("Bad play position. playpos: %d, buflen: %d\n", pos, This->buflen);
364 pos %= This->buflen;
367 if (playpos)
368 *playpos = pos;
369 if (writepos)
370 *writepos = pos;
372 if (writepos && This->state != STATE_STOPPED) {
373 /* apply the documented 10ms lead to writepos */
374 *writepos += This->writelead;
375 *writepos %= This->buflen;
378 RtlReleaseResource(&This->lock);
380 TRACE("playpos = %d, writepos = %d, buflen=%d (%p, time=%d)\n",
381 playpos?*playpos:-1, writepos?*writepos:-1, This->buflen, This, GetTickCount());
383 return DS_OK;
386 static HRESULT WINAPI IDirectSoundBufferImpl_GetStatus(IDirectSoundBuffer8 *iface, DWORD *status)
388 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
390 TRACE("(%p,%p), thread is %04x\n",This,status,GetCurrentThreadId());
392 if (status == NULL) {
393 WARN("invalid parameter: status = NULL\n");
394 return DSERR_INVALIDPARAM;
397 *status = 0;
398 RtlAcquireResourceShared(&This->lock, TRUE);
399 if ((This->state == STATE_STARTING) || (This->state == STATE_PLAYING)) {
400 *status |= DSBSTATUS_PLAYING;
401 if (This->playflags & DSBPLAY_LOOPING)
402 *status |= DSBSTATUS_LOOPING;
404 RtlReleaseResource(&This->lock);
406 TRACE("status=%x\n", *status);
407 return DS_OK;
411 static HRESULT WINAPI IDirectSoundBufferImpl_GetFormat(IDirectSoundBuffer8 *iface,
412 LPWAVEFORMATEX lpwf, DWORD wfsize, DWORD *wfwritten)
414 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
415 DWORD size;
417 TRACE("(%p,%p,%d,%p)\n",This,lpwf,wfsize,wfwritten);
419 size = sizeof(WAVEFORMATEX) + This->pwfx->cbSize;
421 if (lpwf) { /* NULL is valid */
422 if (wfsize >= size) {
423 CopyMemory(lpwf,This->pwfx,size);
424 if (wfwritten)
425 *wfwritten = size;
426 } else {
427 WARN("invalid parameter: wfsize too small\n");
428 CopyMemory(lpwf,This->pwfx,wfsize);
429 if (wfwritten)
430 *wfwritten = wfsize;
431 return DSERR_INVALIDPARAM;
433 } else {
434 if (wfwritten)
435 *wfwritten = sizeof(WAVEFORMATEX) + This->pwfx->cbSize;
436 else {
437 WARN("invalid parameter: wfwritten == NULL\n");
438 return DSERR_INVALIDPARAM;
442 return DS_OK;
445 static HRESULT WINAPI IDirectSoundBufferImpl_Lock(IDirectSoundBuffer8 *iface, DWORD writecursor,
446 DWORD writebytes, void **lplpaudioptr1, DWORD *audiobytes1, void **lplpaudioptr2,
447 DWORD *audiobytes2, DWORD flags)
449 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
450 HRESULT hres = DS_OK;
452 TRACE("(%p,%d,%d,%p,%p,%p,%p,0x%08x) at %d\n", This, writecursor, writebytes, lplpaudioptr1,
453 audiobytes1, lplpaudioptr2, audiobytes2, flags, GetTickCount());
455 if (!audiobytes1)
456 return DSERR_INVALIDPARAM;
458 /* when this flag is set, writecursor is meaningless and must be calculated */
459 if (flags & DSBLOCK_FROMWRITECURSOR) {
460 /* GetCurrentPosition does too much magic to duplicate here */
461 hres = IDirectSoundBufferImpl_GetCurrentPosition(iface, NULL, &writecursor);
462 if (hres != DS_OK) {
463 WARN("IDirectSoundBufferImpl_GetCurrentPosition failed\n");
464 return hres;
468 /* when this flag is set, writebytes is meaningless and must be set */
469 if (flags & DSBLOCK_ENTIREBUFFER)
470 writebytes = This->buflen;
472 if (writecursor >= This->buflen) {
473 WARN("Invalid parameter, writecursor: %u >= buflen: %u\n",
474 writecursor, This->buflen);
475 return DSERR_INVALIDPARAM;
478 if (writebytes > This->buflen) {
479 WARN("Invalid parameter, writebytes: %u > buflen: %u\n",
480 writebytes, This->buflen);
481 return DSERR_INVALIDPARAM;
484 /* **** */
485 RtlAcquireResourceShared(&This->lock, TRUE);
487 if (writecursor+writebytes <= This->buflen) {
488 *(LPBYTE*)lplpaudioptr1 = This->buffer->memory+writecursor;
489 if (This->sec_mixpos >= writecursor && This->sec_mixpos < writecursor + writebytes && This->state == STATE_PLAYING)
490 WARN("Overwriting mixing position, case 1\n");
491 *audiobytes1 = writebytes;
492 if (lplpaudioptr2)
493 *(LPBYTE*)lplpaudioptr2 = NULL;
494 if (audiobytes2)
495 *audiobytes2 = 0;
496 TRACE("Locked %p(%i bytes) and %p(%i bytes) writecursor=%d\n",
497 *(LPBYTE*)lplpaudioptr1, *audiobytes1, lplpaudioptr2 ? *(LPBYTE*)lplpaudioptr2 : NULL, audiobytes2 ? *audiobytes2: 0, writecursor);
498 TRACE("->%d.0\n",writebytes);
499 } else {
500 DWORD remainder = writebytes + writecursor - This->buflen;
501 *(LPBYTE*)lplpaudioptr1 = This->buffer->memory+writecursor;
502 *audiobytes1 = This->buflen-writecursor;
503 if (This->sec_mixpos >= writecursor && This->sec_mixpos < writecursor + writebytes && This->state == STATE_PLAYING)
504 WARN("Overwriting mixing position, case 2\n");
505 if (lplpaudioptr2)
506 *(LPBYTE*)lplpaudioptr2 = This->buffer->memory;
507 if (audiobytes2)
508 *audiobytes2 = writebytes-(This->buflen-writecursor);
509 if (audiobytes2 && This->sec_mixpos < remainder && This->state == STATE_PLAYING)
510 WARN("Overwriting mixing position, case 3\n");
511 TRACE("Locked %p(%i bytes) and %p(%i bytes) writecursor=%d\n", *(LPBYTE*)lplpaudioptr1, *audiobytes1, lplpaudioptr2 ? *(LPBYTE*)lplpaudioptr2 : NULL, audiobytes2 ? *audiobytes2: 0, writecursor);
514 RtlReleaseResource(&This->lock);
515 /* **** */
517 return DS_OK;
520 static HRESULT WINAPI IDirectSoundBufferImpl_SetCurrentPosition(IDirectSoundBuffer8 *iface,
521 DWORD newpos)
523 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
524 HRESULT hres = DS_OK;
526 TRACE("(%p,%d)\n",This,newpos);
528 /* **** */
529 RtlAcquireResourceExclusive(&This->lock, TRUE);
531 /* start mixing from this new location instead */
532 newpos %= This->buflen;
533 newpos -= newpos%This->pwfx->nBlockAlign;
534 This->sec_mixpos = newpos;
536 /* at this point, do not attempt to reset buffers, mess with primary mix position,
537 or anything like that to reduce latency. The data already prebuffered cannot be changed */
539 RtlReleaseResource(&This->lock);
540 /* **** */
542 return hres;
545 static HRESULT WINAPI IDirectSoundBufferImpl_SetPan(IDirectSoundBuffer8 *iface, LONG pan)
547 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
548 HRESULT hres = DS_OK;
550 TRACE("(%p,%d)\n",This,pan);
552 if ((pan > DSBPAN_RIGHT) || (pan < DSBPAN_LEFT)) {
553 WARN("invalid parameter: pan = %d\n", pan);
554 return DSERR_INVALIDPARAM;
557 /* You cannot use both pan and 3D controls */
558 if (!(This->dsbd.dwFlags & DSBCAPS_CTRLPAN) ||
559 (This->dsbd.dwFlags & DSBCAPS_CTRL3D)) {
560 WARN("control unavailable\n");
561 return DSERR_CONTROLUNAVAIL;
564 /* **** */
565 RtlAcquireResourceExclusive(&This->lock, TRUE);
567 if (This->volpan.lPan != pan) {
568 This->volpan.lPan = pan;
569 DSOUND_RecalcVolPan(&(This->volpan));
572 RtlReleaseResource(&This->lock);
573 /* **** */
575 return hres;
578 static HRESULT WINAPI IDirectSoundBufferImpl_GetPan(IDirectSoundBuffer8 *iface, LONG *pan)
580 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
582 TRACE("(%p,%p)\n",This,pan);
584 if (!(This->dsbd.dwFlags & DSBCAPS_CTRLPAN)) {
585 WARN("control unavailable\n");
586 return DSERR_CONTROLUNAVAIL;
589 if (pan == NULL) {
590 WARN("invalid parameter: pan = NULL\n");
591 return DSERR_INVALIDPARAM;
594 *pan = This->volpan.lPan;
596 return DS_OK;
599 static HRESULT WINAPI IDirectSoundBufferImpl_Unlock(IDirectSoundBuffer8 *iface, void *p1, DWORD x1,
600 void *p2, DWORD x2)
602 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface), *iter;
603 HRESULT hres = DS_OK;
605 TRACE("(%p,%p,%d,%p,%d)\n", This,p1,x1,p2,x2);
607 if (!p2)
608 x2 = 0;
610 if((p1 && ((BYTE*)p1 < This->buffer->memory ||
611 (BYTE*)p1 >= This->buffer->memory + This->buflen)) ||
612 (p2 && ((BYTE*)p2 < This->buffer->memory ||
613 (BYTE*)p2 >= This->buffer->memory + This->buflen)))
614 return DSERR_INVALIDPARAM;
616 if (x1 || x2)
618 RtlAcquireResourceShared(&This->device->buffer_list_lock, TRUE);
619 LIST_FOR_EACH_ENTRY(iter, &This->buffer->buffers, IDirectSoundBufferImpl, entry )
621 RtlAcquireResourceShared(&iter->lock, TRUE);
622 if (x1)
624 if(x1 + (DWORD_PTR)p1 - (DWORD_PTR)iter->buffer->memory > iter->buflen)
625 hres = DSERR_INVALIDPARAM;
627 RtlReleaseResource(&iter->lock);
629 RtlReleaseResource(&This->device->buffer_list_lock);
632 return hres;
635 static HRESULT WINAPI IDirectSoundBufferImpl_Restore(IDirectSoundBuffer8 *iface)
637 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
639 FIXME("(%p):stub\n",This);
640 return DS_OK;
643 static HRESULT WINAPI IDirectSoundBufferImpl_GetFrequency(IDirectSoundBuffer8 *iface, DWORD *freq)
645 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
647 TRACE("(%p,%p)\n",This,freq);
649 if (freq == NULL) {
650 WARN("invalid parameter: freq = NULL\n");
651 return DSERR_INVALIDPARAM;
654 *freq = This->freq;
655 TRACE("-> %d\n", *freq);
657 return DS_OK;
660 static HRESULT WINAPI IDirectSoundBufferImpl_SetFX(IDirectSoundBuffer8 *iface, DWORD dwEffectsCount,
661 LPDSEFFECTDESC pDSFXDesc, DWORD *pdwResultCodes)
663 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
664 DWORD u;
666 FIXME("(%p,%u,%p,%p): stub\n",This,dwEffectsCount,pDSFXDesc,pdwResultCodes);
668 if (pdwResultCodes)
669 for (u=0; u<dwEffectsCount; u++) pdwResultCodes[u] = DSFXR_UNKNOWN;
671 WARN("control unavailable\n");
672 return DSERR_CONTROLUNAVAIL;
675 static HRESULT WINAPI IDirectSoundBufferImpl_AcquireResources(IDirectSoundBuffer8 *iface,
676 DWORD dwFlags, DWORD dwEffectsCount, DWORD *pdwResultCodes)
678 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
679 DWORD u;
681 FIXME("(%p,%08u,%u,%p): stub, faking success\n",This,dwFlags,dwEffectsCount,pdwResultCodes);
683 if (pdwResultCodes)
684 for (u=0; u<dwEffectsCount; u++) pdwResultCodes[u] = DSFXR_UNKNOWN;
686 WARN("control unavailable\n");
687 return DS_OK;
690 static HRESULT WINAPI IDirectSoundBufferImpl_GetObjectInPath(IDirectSoundBuffer8 *iface,
691 REFGUID rguidObject, DWORD dwIndex, REFGUID rguidInterface, void **ppObject)
693 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
695 FIXME("(%p,%s,%u,%s,%p): stub\n",This,debugstr_guid(rguidObject),dwIndex,debugstr_guid(rguidInterface),ppObject);
697 WARN("control unavailable\n");
698 return DSERR_CONTROLUNAVAIL;
701 static HRESULT WINAPI IDirectSoundBufferImpl_Initialize(IDirectSoundBuffer8 *iface,
702 IDirectSound *dsound, LPCDSBUFFERDESC dbsd)
704 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
706 WARN("(%p) already initialized\n", This);
707 return DSERR_ALREADYINITIALIZED;
710 static HRESULT WINAPI IDirectSoundBufferImpl_GetCaps(IDirectSoundBuffer8 *iface, LPDSBCAPS caps)
712 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
714 TRACE("(%p)->(%p)\n",This,caps);
716 if (caps == NULL) {
717 WARN("invalid parameter: caps == NULL\n");
718 return DSERR_INVALIDPARAM;
721 if (caps->dwSize < sizeof(*caps)) {
722 WARN("invalid parameter: caps->dwSize = %d\n",caps->dwSize);
723 return DSERR_INVALIDPARAM;
726 caps->dwFlags = This->dsbd.dwFlags;
727 caps->dwFlags |= DSBCAPS_LOCSOFTWARE;
729 caps->dwBufferBytes = This->buflen;
731 /* According to windows, this is zero*/
732 caps->dwUnlockTransferRate = 0;
733 caps->dwPlayCpuOverhead = 0;
735 return DS_OK;
738 static HRESULT WINAPI IDirectSoundBufferImpl_QueryInterface(IDirectSoundBuffer8 *iface, REFIID riid,
739 void **ppobj)
741 IDirectSoundBufferImpl *This = impl_from_IDirectSoundBuffer8(iface);
743 TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
745 if (ppobj == NULL) {
746 WARN("invalid parameter\n");
747 return E_INVALIDARG;
750 *ppobj = NULL; /* assume failure */
752 if ( IsEqualGUID(riid, &IID_IUnknown) ||
753 IsEqualGUID(riid, &IID_IDirectSoundBuffer) ||
754 IsEqualGUID(riid, &IID_IDirectSoundBuffer8) ) {
755 IDirectSoundBuffer8_AddRef(iface);
756 *ppobj = iface;
757 return S_OK;
760 if ( IsEqualGUID( &IID_IDirectSoundNotify, riid ) ) {
761 IDirectSoundNotify_AddRef(&This->IDirectSoundNotify_iface);
762 *ppobj = &This->IDirectSoundNotify_iface;
763 return S_OK;
766 if ( IsEqualGUID( &IID_IDirectSound3DBuffer, riid ) ) {
767 if(This->dsbd.dwFlags & DSBCAPS_CTRL3D){
768 IDirectSound3DBuffer_AddRef(&This->IDirectSound3DBuffer_iface);
769 *ppobj = &This->IDirectSound3DBuffer_iface;
770 return S_OK;
772 TRACE("app requested IDirectSound3DBuffer on non-3D secondary buffer\n");
773 return E_NOINTERFACE;
776 if ( IsEqualGUID( &IID_IDirectSound3DListener, riid ) ) {
777 ERR("app requested IDirectSound3DListener on secondary buffer\n");
778 return E_NOINTERFACE;
781 if ( IsEqualGUID( &IID_IKsPropertySet, riid ) ) {
782 IKsPropertySet_AddRef(&This->IKsPropertySet_iface);
783 *ppobj = &This->IKsPropertySet_iface;
784 return S_OK;
787 FIXME( "Unknown IID %s\n", debugstr_guid( riid ) );
789 return E_NOINTERFACE;
792 static const IDirectSoundBuffer8Vtbl dsbvt =
794 IDirectSoundBufferImpl_QueryInterface,
795 IDirectSoundBufferImpl_AddRef,
796 IDirectSoundBufferImpl_Release,
797 IDirectSoundBufferImpl_GetCaps,
798 IDirectSoundBufferImpl_GetCurrentPosition,
799 IDirectSoundBufferImpl_GetFormat,
800 IDirectSoundBufferImpl_GetVolume,
801 IDirectSoundBufferImpl_GetPan,
802 IDirectSoundBufferImpl_GetFrequency,
803 IDirectSoundBufferImpl_GetStatus,
804 IDirectSoundBufferImpl_Initialize,
805 IDirectSoundBufferImpl_Lock,
806 IDirectSoundBufferImpl_Play,
807 IDirectSoundBufferImpl_SetCurrentPosition,
808 IDirectSoundBufferImpl_SetFormat,
809 IDirectSoundBufferImpl_SetVolume,
810 IDirectSoundBufferImpl_SetPan,
811 IDirectSoundBufferImpl_SetFrequency,
812 IDirectSoundBufferImpl_Stop,
813 IDirectSoundBufferImpl_Unlock,
814 IDirectSoundBufferImpl_Restore,
815 IDirectSoundBufferImpl_SetFX,
816 IDirectSoundBufferImpl_AcquireResources,
817 IDirectSoundBufferImpl_GetObjectInPath
820 HRESULT IDirectSoundBufferImpl_Create(
821 DirectSoundDevice * device,
822 IDirectSoundBufferImpl **pdsb,
823 LPCDSBUFFERDESC dsbd)
825 IDirectSoundBufferImpl *dsb;
826 LPWAVEFORMATEX wfex = dsbd->lpwfxFormat;
827 HRESULT err = DS_OK;
828 DWORD capf = 0;
829 TRACE("(%p,%p,%p)\n",device,pdsb,dsbd);
831 if (dsbd->dwBufferBytes < DSBSIZE_MIN || dsbd->dwBufferBytes > DSBSIZE_MAX) {
832 WARN("invalid parameter: dsbd->dwBufferBytes = %d\n", dsbd->dwBufferBytes);
833 *pdsb = NULL;
834 return DSERR_INVALIDPARAM; /* FIXME: which error? */
837 dsb = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(*dsb));
839 if (dsb == 0) {
840 WARN("out of memory\n");
841 *pdsb = NULL;
842 return DSERR_OUTOFMEMORY;
845 TRACE("Created buffer at %p\n", dsb);
847 dsb->ref = 0;
848 dsb->refn = 0;
849 dsb->ref3D = 0;
850 dsb->refiks = 0;
851 dsb->numIfaces = 0;
852 dsb->device = device;
853 dsb->IDirectSoundBuffer8_iface.lpVtbl = &dsbvt;
854 dsb->IDirectSoundNotify_iface.lpVtbl = &dsnvt;
855 dsb->IDirectSound3DBuffer_iface.lpVtbl = &ds3dbvt;
856 dsb->IKsPropertySet_iface.lpVtbl = &iksbvt;
858 /* size depends on version */
859 CopyMemory(&dsb->dsbd, dsbd, dsbd->dwSize);
861 dsb->pwfx = DSOUND_CopyFormat(wfex);
862 if (dsb->pwfx == NULL) {
863 HeapFree(GetProcessHeap(),0,dsb);
864 *pdsb = NULL;
865 return DSERR_OUTOFMEMORY;
868 if (dsbd->dwBufferBytes % dsbd->lpwfxFormat->nBlockAlign)
869 dsb->buflen = dsbd->dwBufferBytes +
870 (dsbd->lpwfxFormat->nBlockAlign -
871 (dsbd->dwBufferBytes % dsbd->lpwfxFormat->nBlockAlign));
872 else
873 dsb->buflen = dsbd->dwBufferBytes;
875 dsb->freq = dsbd->lpwfxFormat->nSamplesPerSec;
876 dsb->notifies = NULL;
877 dsb->nrofnotifies = 0;
879 /* Check necessary hardware mixing capabilities */
880 if (wfex->nChannels==2) capf |= DSCAPS_SECONDARYSTEREO;
881 else capf |= DSCAPS_SECONDARYMONO;
882 if (wfex->wBitsPerSample==16) capf |= DSCAPS_SECONDARY16BIT;
883 else capf |= DSCAPS_SECONDARY8BIT;
885 TRACE("capf = 0x%08x, device->drvcaps.dwFlags = 0x%08x\n", capf, device->drvcaps.dwFlags);
887 /* Allocate an empty buffer */
888 dsb->buffer = HeapAlloc(GetProcessHeap(),0,sizeof(*(dsb->buffer)));
889 if (dsb->buffer == NULL) {
890 WARN("out of memory\n");
891 HeapFree(GetProcessHeap(),0,dsb->pwfx);
892 HeapFree(GetProcessHeap(),0,dsb);
893 *pdsb = NULL;
894 return DSERR_OUTOFMEMORY;
897 /* Allocate system memory for buffer */
898 dsb->buffer->memory = HeapAlloc(GetProcessHeap(),0,dsb->buflen);
899 if (dsb->buffer->memory == NULL) {
900 WARN("out of memory\n");
901 HeapFree(GetProcessHeap(),0,dsb->pwfx);
902 HeapFree(GetProcessHeap(),0,dsb->buffer);
903 HeapFree(GetProcessHeap(),0,dsb);
904 *pdsb = NULL;
905 return DSERR_OUTOFMEMORY;
908 dsb->buffer->ref = 1;
909 list_init(&dsb->buffer->buffers);
910 list_add_head(&dsb->buffer->buffers, &dsb->entry);
911 FillMemory(dsb->buffer->memory, dsb->buflen, dsbd->lpwfxFormat->wBitsPerSample == 8 ? 128 : 0);
913 /* It's not necessary to initialize values to zero since */
914 /* we allocated this structure with HEAP_ZERO_MEMORY... */
915 dsb->sec_mixpos = 0;
916 dsb->state = STATE_STOPPED;
918 dsb->freqAdjust = dsb->freq / (float)device->pwfx->nSamplesPerSec;
919 dsb->nAvgBytesPerSec = dsb->freq *
920 dsbd->lpwfxFormat->nBlockAlign;
922 /* calculate fragment size and write lead */
923 DSOUND_RecalcFormat(dsb);
925 if (dsb->dsbd.dwFlags & DSBCAPS_CTRL3D) {
926 dsb->ds3db_ds3db.dwSize = sizeof(DS3DBUFFER);
927 dsb->ds3db_ds3db.vPosition.x = 0.0;
928 dsb->ds3db_ds3db.vPosition.y = 0.0;
929 dsb->ds3db_ds3db.vPosition.z = 0.0;
930 dsb->ds3db_ds3db.vVelocity.x = 0.0;
931 dsb->ds3db_ds3db.vVelocity.y = 0.0;
932 dsb->ds3db_ds3db.vVelocity.z = 0.0;
933 dsb->ds3db_ds3db.dwInsideConeAngle = DS3D_DEFAULTCONEANGLE;
934 dsb->ds3db_ds3db.dwOutsideConeAngle = DS3D_DEFAULTCONEANGLE;
935 dsb->ds3db_ds3db.vConeOrientation.x = 0.0;
936 dsb->ds3db_ds3db.vConeOrientation.y = 0.0;
937 dsb->ds3db_ds3db.vConeOrientation.z = 0.0;
938 dsb->ds3db_ds3db.lConeOutsideVolume = DS3D_DEFAULTCONEOUTSIDEVOLUME;
939 dsb->ds3db_ds3db.flMinDistance = DS3D_DEFAULTMINDISTANCE;
940 dsb->ds3db_ds3db.flMaxDistance = DS3D_DEFAULTMAXDISTANCE;
941 dsb->ds3db_ds3db.dwMode = DS3DMODE_NORMAL;
943 dsb->ds3db_need_recalc = FALSE;
944 DSOUND_Calc3DBuffer(dsb);
945 } else
946 DSOUND_RecalcVolPan(&(dsb->volpan));
948 RtlInitializeResource(&dsb->lock);
950 /* register buffer if not primary */
951 if (!(dsbd->dwFlags & DSBCAPS_PRIMARYBUFFER)) {
952 err = DirectSoundDevice_AddBuffer(device, dsb);
953 if (err != DS_OK) {
954 HeapFree(GetProcessHeap(),0,dsb->buffer->memory);
955 HeapFree(GetProcessHeap(),0,dsb->buffer);
956 RtlDeleteResource(&dsb->lock);
957 HeapFree(GetProcessHeap(),0,dsb->pwfx);
958 HeapFree(GetProcessHeap(),0,dsb);
959 dsb = NULL;
963 IDirectSoundBuffer8_AddRef(&dsb->IDirectSoundBuffer8_iface);
964 *pdsb = dsb;
965 return err;
968 void secondarybuffer_destroy(IDirectSoundBufferImpl *This)
970 ULONG ref = InterlockedIncrement(&This->numIfaces);
972 if (ref > 1)
973 WARN("Destroying buffer with %u in use interfaces\n", ref - 1);
975 DirectSoundDevice_RemoveBuffer(This->device, This);
976 RtlDeleteResource(&This->lock);
978 This->buffer->ref--;
979 list_remove(&This->entry);
980 if (This->buffer->ref == 0) {
981 HeapFree(GetProcessHeap(), 0, This->buffer->memory);
982 HeapFree(GetProcessHeap(), 0, This->buffer);
985 HeapFree(GetProcessHeap(), 0, This->notifies);
986 HeapFree(GetProcessHeap(), 0, This->pwfx);
987 HeapFree(GetProcessHeap(), 0, This);
989 TRACE("(%p) released\n", This);
992 HRESULT IDirectSoundBufferImpl_Duplicate(
993 DirectSoundDevice *device,
994 IDirectSoundBufferImpl **ppdsb,
995 IDirectSoundBufferImpl *pdsb)
997 IDirectSoundBufferImpl *dsb;
998 HRESULT hres = DS_OK;
999 TRACE("(%p,%p,%p)\n", device, ppdsb, pdsb);
1001 dsb = HeapAlloc(GetProcessHeap(),0,sizeof(*dsb));
1002 if (dsb == NULL) {
1003 WARN("out of memory\n");
1004 *ppdsb = NULL;
1005 return DSERR_OUTOFMEMORY;
1008 RtlAcquireResourceShared(&pdsb->lock, TRUE);
1010 CopyMemory(dsb, pdsb, sizeof(*dsb));
1012 dsb->pwfx = DSOUND_CopyFormat(pdsb->pwfx);
1014 RtlReleaseResource(&pdsb->lock);
1016 if (dsb->pwfx == NULL) {
1017 HeapFree(GetProcessHeap(),0,dsb);
1018 *ppdsb = NULL;
1019 return DSERR_OUTOFMEMORY;
1022 dsb->buffer->ref++;
1023 list_add_head(&dsb->buffer->buffers, &dsb->entry);
1024 dsb->ref = 0;
1025 dsb->refn = 0;
1026 dsb->ref3D = 0;
1027 dsb->refiks = 0;
1028 dsb->numIfaces = 0;
1029 dsb->state = STATE_STOPPED;
1030 dsb->sec_mixpos = 0;
1031 dsb->notifies = NULL;
1032 dsb->nrofnotifies = 0;
1033 dsb->device = device;
1034 DSOUND_RecalcFormat(dsb);
1036 RtlInitializeResource(&dsb->lock);
1038 /* register buffer */
1039 hres = DirectSoundDevice_AddBuffer(device, dsb);
1040 if (hres != DS_OK) {
1041 RtlDeleteResource(&dsb->lock);
1042 list_remove(&dsb->entry);
1043 dsb->buffer->ref--;
1044 HeapFree(GetProcessHeap(),0,dsb->pwfx);
1045 HeapFree(GetProcessHeap(),0,dsb);
1046 dsb = NULL;
1049 IDirectSoundBuffer8_AddRef(&dsb->IDirectSoundBuffer8_iface);
1050 *ppdsb = dsb;
1051 return hres;
1054 /*******************************************************************************
1055 * IKsPropertySet
1058 static inline IDirectSoundBufferImpl *impl_from_IKsPropertySet(IKsPropertySet *iface)
1060 return CONTAINING_RECORD(iface, IDirectSoundBufferImpl, IKsPropertySet_iface);
1063 /* IUnknown methods */
1064 static HRESULT WINAPI IKsPropertySetImpl_QueryInterface(IKsPropertySet *iface, REFIID riid,
1065 void **ppobj)
1067 IDirectSoundBufferImpl *This = impl_from_IKsPropertySet(iface);
1069 TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
1071 return IDirectSoundBuffer_QueryInterface(&This->IDirectSoundBuffer8_iface, riid, ppobj);
1074 static ULONG WINAPI IKsPropertySetImpl_AddRef(IKsPropertySet *iface)
1076 IDirectSoundBufferImpl *This = impl_from_IKsPropertySet(iface);
1077 ULONG ref = InterlockedIncrement(&This->refiks);
1079 TRACE("(%p) ref was %d\n", This, ref - 1);
1081 if(ref == 1)
1082 InterlockedIncrement(&This->numIfaces);
1084 return ref;
1087 static ULONG WINAPI IKsPropertySetImpl_Release(IKsPropertySet *iface)
1089 IDirectSoundBufferImpl *This = impl_from_IKsPropertySet(iface);
1090 ULONG ref;
1092 if (is_primary_buffer(This)){
1093 ref = capped_refcount_dec(&This->refiks);
1094 if(!ref)
1095 capped_refcount_dec(&This->numIfaces);
1096 TRACE("(%p) ref is now: %d\n", This, ref);
1097 return ref;
1100 ref = InterlockedDecrement(&This->refiks);
1101 if (!ref && !InterlockedDecrement(&This->numIfaces))
1102 secondarybuffer_destroy(This);
1104 TRACE("(%p) ref is now %d\n", This, ref);
1106 return ref;
1109 static HRESULT WINAPI IKsPropertySetImpl_Get(IKsPropertySet *iface, REFGUID guidPropSet,
1110 ULONG dwPropID, void *pInstanceData, ULONG cbInstanceData, void *pPropData,
1111 ULONG cbPropData, ULONG *pcbReturned)
1113 IDirectSoundBufferImpl *This = impl_from_IKsPropertySet(iface);
1115 TRACE("(iface=%p,guidPropSet=%s,dwPropID=%d,pInstanceData=%p,cbInstanceData=%d,pPropData=%p,cbPropData=%d,pcbReturned=%p)\n",
1116 This,debugstr_guid(guidPropSet),dwPropID,pInstanceData,cbInstanceData,pPropData,cbPropData,pcbReturned);
1118 return E_PROP_ID_UNSUPPORTED;
1121 static HRESULT WINAPI IKsPropertySetImpl_Set(IKsPropertySet *iface, REFGUID guidPropSet,
1122 ULONG dwPropID, void *pInstanceData, ULONG cbInstanceData, void *pPropData,
1123 ULONG cbPropData)
1125 IDirectSoundBufferImpl *This = impl_from_IKsPropertySet(iface);
1127 TRACE("(%p,%s,%d,%p,%d,%p,%d)\n",This,debugstr_guid(guidPropSet),dwPropID,pInstanceData,cbInstanceData,pPropData,cbPropData);
1129 return E_PROP_ID_UNSUPPORTED;
1132 static HRESULT WINAPI IKsPropertySetImpl_QuerySupport(IKsPropertySet *iface, REFGUID guidPropSet,
1133 ULONG dwPropID, ULONG *pTypeSupport)
1135 IDirectSoundBufferImpl *This = impl_from_IKsPropertySet(iface);
1137 TRACE("(%p,%s,%d,%p)\n",This,debugstr_guid(guidPropSet),dwPropID,pTypeSupport);
1139 return E_PROP_ID_UNSUPPORTED;
1142 const IKsPropertySetVtbl iksbvt = {
1143 IKsPropertySetImpl_QueryInterface,
1144 IKsPropertySetImpl_AddRef,
1145 IKsPropertySetImpl_Release,
1146 IKsPropertySetImpl_Get,
1147 IKsPropertySetImpl_Set,
1148 IKsPropertySetImpl_QuerySupport