1 /* DirectSound
2 *
3 * Copyright 1998 Marcus Meissner
4 * Copyright 1998 Rob Riggs
5 * Copyright 2000-2001 TransGaming Technologies, Inc.
6 * Copyright 2002-2003 Rok Mandeljc <rok.mandeljc@gimb.org>
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 */
22 /*
23 * Most thread locking is complete. There may be a few race
24 * conditions still lurking.
25 *
26 * Tested with a Soundblaster clone, a Gravis UltraSound Classic,
27 * and a Turtle Beach Tropez+.
28 *
29 * TODO:
30 * Implement SetCooperativeLevel properly (need to address focus issues)
31 * Implement DirectSound3DBuffers (stubs in place)
32 * Use hardware 3D support if available
33 * Add critical section locking inside Release and AddRef methods
34 * Handle static buffers - put those in hardware, non-static not in hardware
35 * Hardware DuplicateSoundBuffer
36 * Proper volume calculation, and setting volume in HEL primary buffer
37 * Optimize WINMM and negotiate fragment size, decrease DS_HEL_MARGIN
38 */
39
40 #include <stdarg.h>
41 #include <math.h> /* Insomnia - pow() function */
42
43 #define NONAMELESSUNION
44 #define NONAMELESSSTRUCT
45 #include "windef.h"
46 #include "winbase.h"
47 #include "winuser.h"
48 #include "mmsystem.h"
49 #include "winternl.h"
50 #include "mmddk.h"
51 #include "wine/debug.h"
52 #include "dsound.h"
53 #include "dsdriver.h"
54 #include "dsound_private.h"
55
56 /* default velocity of sound in the air */
57 #define DEFAULT_VELOCITY 340
58
59 WINE_DEFAULT_DEBUG_CHANNEL(dsound3d);
60
61 /*******************************************************************************
62 * Auxiliary functions
63 */
64
65 /* scalar product (i believe it's called dot product in english) */
66 static inline D3DVALUE ScalarProduct (const D3DVECTOR *a, const D3DVECTOR *b)
67 {
68 D3DVALUE c;
69 c = (a->x*b->x) + (a->y*b->y) + (a->z*b->z);
70 TRACE("(%f,%f,%f) * (%f,%f,%f) = %f)\n", a->x, a->y, a->z, b->x, b->y,
71 b->z, c);
72 return c;
73 }
74
75 /* vector product (i believe it's called cross product in english */
76 static inline D3DVECTOR VectorProduct (const D3DVECTOR *a, const D3DVECTOR *b)
77 {
78 D3DVECTOR c;
79 c.x = (a->y*b->z) - (a->z*b->y);
80 c.y = (a->z*b->x) - (a->x*b->z);
81 c.z = (a->x*b->y) - (a->y*b->x);
82 TRACE("(%f,%f,%f) x (%f,%f,%f) = (%f,%f,%f)\n", a->x, a->y, a->z, b->x, b->y,
83 b->z, c.x, c.y, c.z);
84 return c;
85 }
86
87 /* magnitude (length) of vector */
88 static inline D3DVALUE VectorMagnitude (const D3DVECTOR *a)
89 {
90 D3DVALUE l;
91 l = sqrt (ScalarProduct (a, a));
92 TRACE("|(%f,%f,%f)| = %f\n", a->x, a->y, a->z, l);
93 return l;
94 }
95
96 /* conversion between radians and degrees */
97 static inline D3DVALUE RadToDeg (D3DVALUE angle)
98 {
99 D3DVALUE newangle;
100 newangle = angle * (360/(2*M_PI));
101 TRACE("%f rad = %f deg\n", angle, newangle);
102 return newangle;
103 }
104
105 /* angle between vectors - rad version */
106 static inline D3DVALUE AngleBetweenVectorsRad (const D3DVECTOR *a, const D3DVECTOR *b)
107 {
108 D3DVALUE la, lb, product, angle, cos;
109 /* definition of scalar product: a*b = |a|*|b|*cos...therefore: */
110 product = ScalarProduct (a,b);
111 la = VectorMagnitude (a);
112 lb = VectorMagnitude (b);
113 if (!la || !lb)
114 return 0;
115
116 cos = product/(la*lb);
117 angle = acos(cos);
118 TRACE("angle between (%f,%f,%f) and (%f,%f,%f) = %f radians (%f degrees)\n", a->x, a->y, a->z, b->x,
119 b->y, b->z, angle, RadToDeg(angle));
120 return angle;
121 }
122
123 static inline D3DVALUE AngleBetweenVectorsDeg (const D3DVECTOR *a, const D3DVECTOR *b)
124 {
125 return RadToDeg(AngleBetweenVectorsRad(a, b));
126 }
127
128 /* calculates vector between two points */
129 static inline D3DVECTOR VectorBetweenTwoPoints (const D3DVECTOR *a, const D3DVECTOR *b)
130 {
131 D3DVECTOR c;
132 c.x = b->x - a->x;
133 c.y = b->y - a->y;
134 c.z = b->z - a->z;
135 TRACE("A (%f,%f,%f), B (%f,%f,%f), AB = (%f,%f,%f)\n", a->x, a->y, a->z, b->x, b->y,
136 b->z, c.x, c.y, c.z);
137 return c;
138 }
139
140 /* calculates the length of vector's projection on another vector */
141 static inline D3DVALUE ProjectVector (const D3DVECTOR *a, const D3DVECTOR *p)
142 {
143 D3DVALUE prod, result;
144 prod = ScalarProduct(a, p);
145 result = prod/VectorMagnitude(p);
146 TRACE("length projection of (%f,%f,%f) on (%f,%f,%f) = %f\n", a->x, a->y, a->z, p->x,
147 p->y, p->z, result);
148 return result;
149 }
150
151 /*******************************************************************************
152 * 3D Buffer and Listener mixing
153 */
154
155 void DSOUND_Calc3DBuffer(IDirectSoundBufferImpl *dsb)
156 {
157 /* volume, at which the sound will be played after all calcs. */
158 D3DVALUE lVolume = 0;
159 /* stuff for distance related stuff calc. */
160 D3DVECTOR vDistance;
161 D3DVALUE flDistance = 0;
162 /* panning related stuff */
163 D3DVALUE flAngle;
164 D3DVECTOR vLeft;
165 /* doppler shift related stuff */
166 #if 0
167 D3DVALUE flFreq, flBufferVel, flListenerVel;
168 #endif
169
170 TRACE("(%p)\n",dsb);
171
172 /* initial buffer volume */
173 lVolume = dsb->ds3db_lVolume;
174
175 switch (dsb->ds3db_ds3db.dwMode)
176 {
177 case DS3DMODE_DISABLE:
178 TRACE("3D processing disabled\n");
179 /* this one is here only to eliminate annoying warning message */
180 DSOUND_RecalcVolPan (&dsb->volpan);
181 break;
182 case DS3DMODE_NORMAL:
183 TRACE("Normal 3D processing mode\n");
184 /* we need to calculate distance between buffer and listener*/
185 vDistance = VectorBetweenTwoPoints(&dsb->ds3db_ds3db.vPosition, &dsb->device->ds3dl.vPosition);
186 flDistance = VectorMagnitude (&vDistance);
187 break;
188 case DS3DMODE_HEADRELATIVE:
189 TRACE("Head-relative 3D processing mode\n");
190 /* distance between buffer and listener is same as buffer's position */
191 flDistance = VectorMagnitude (&dsb->ds3db_ds3db.vPosition);
192 break;
193 }
194
195 if (flDistance > dsb->ds3db_ds3db.flMaxDistance)
196 {
197 /* some apps don't want you to hear too distant sounds... */
198 if (dsb->dsbd.dwFlags & DSBCAPS_MUTE3DATMAXDISTANCE)
199 {
200 dsb->volpan.lVolume = DSBVOLUME_MIN;
201 DSOUND_RecalcVolPan (&dsb->volpan);
202 /* i guess mixing here would be a waste of power */
203 return;
204 }
205 else
206 flDistance = dsb->ds3db_ds3db.flMaxDistance;
207 }
208
209 if (flDistance < dsb->ds3db_ds3db.flMinDistance)
210 flDistance = dsb->ds3db_ds3db.flMinDistance;
211
212 /* attenuation proportional to the distance squared, converted to millibels as in lVolume*/
213 lVolume -= log10(flDistance/dsb->ds3db_ds3db.flMinDistance * flDistance/dsb->ds3db_ds3db.flMinDistance)*1000;
214 TRACE("dist. att: Distance = %f, MinDistance = %f => adjusting volume %d to %f\n", flDistance, dsb->ds3db_ds3db.flMinDistance, dsb->ds3db_lVolume, lVolume);
215
216 /* conning */
217 /* sometimes it happens that vConeOrientation vector = (0,0,0); in this case angle is "nan" and it's useless*/
218 if (dsb->ds3db_ds3db.vConeOrientation.x == 0 && dsb->ds3db_ds3db.vConeOrientation.y == 0 && dsb->ds3db_ds3db.vConeOrientation.z == 0)
219 {
220 TRACE("conning: cones not set\n");
221 }
222 else
223 {
224 /* calculate angle */
225 flAngle = AngleBetweenVectorsDeg(&dsb->ds3db_ds3db.vConeOrientation, &vDistance);
226 /* if by any chance it happens that OutsideConeAngle = InsideConeAngle (that means that conning has no effect) */
227 if (dsb->ds3db_ds3db.dwInsideConeAngle != dsb->ds3db_ds3db.dwOutsideConeAngle)
228 {
229 /* my test show that for my way of calc., we need only half of angles */
230 DWORD dwInsideConeAngle = dsb->ds3db_ds3db.dwInsideConeAngle/2;
231 DWORD dwOutsideConeAngle = dsb->ds3db_ds3db.dwOutsideConeAngle/2;
232 if (dwOutsideConeAngle == dwInsideConeAngle)
233 ++dwOutsideConeAngle;
234
235 /* full volume */
236 if (flAngle < dwInsideConeAngle)
237 flAngle = dwInsideConeAngle;
238 /* min (app defined) volume */
239 if (flAngle > dwOutsideConeAngle)
240 flAngle = dwOutsideConeAngle;
241 /* this probably isn't the right thing, but it's ok for the time being */
242 lVolume += ((dsb->ds3db_ds3db.lConeOutsideVolume)/((dwOutsideConeAngle) - (dwInsideConeAngle))) * flAngle;
243 }
244 TRACE("conning: Angle = %f deg; InsideConeAngle(/2) = %d deg; OutsideConeAngle(/2) = %d deg; ConeOutsideVolume = %d => adjusting volume to %f\n",
245 flAngle, dsb->ds3db_ds3db.dwInsideConeAngle/2, dsb->ds3db_ds3db.dwOutsideConeAngle/2, dsb->ds3db_ds3db.lConeOutsideVolume, lVolume);
246 }
247 dsb->volpan.lVolume = lVolume;
248
249 /* panning */
250 if (dsb->device->ds3dl.vPosition.x == dsb->ds3db_ds3db.vPosition.x &&
251 dsb->device->ds3dl.vPosition.y == dsb->ds3db_ds3db.vPosition.y &&
252 dsb->device->ds3dl.vPosition.z == dsb->ds3db_ds3db.vPosition.z) {
253 dsb->volpan.lPan = 0;
254 flAngle = 0.0;
255 }
256 else
257 {
258 vDistance = VectorBetweenTwoPoints(&dsb->device->ds3dl.vPosition, &dsb->ds3db_ds3db.vPosition);
259 vLeft = VectorProduct(&dsb->device->ds3dl.vOrientFront, &dsb->device->ds3dl.vOrientTop);
260 flAngle = AngleBetweenVectorsRad(&vLeft, &vDistance);
261 /* for now, we'll use "linear formula" (which is probably incorrect); if someone has it in book, correct it */
262 dsb->volpan.lPan = 10000*2*flAngle/M_PI - 10000;
263 }
264 TRACE("panning: Angle = %f rad, lPan = %d\n", flAngle, dsb->volpan.lPan);
265
266 /* FIXME: Doppler Effect disabled since i have no idea which frequency to change and how to do it */
267 #if 0
268 /* doppler shift*/
269 if ((VectorMagnitude(&ds3db_ds3db.vVelocity) == 0) && (VectorMagnitude(&dsb->device->ds3dl.vVelocity) == 0))
270 {
271 TRACE("doppler: Buffer and Listener don't have velocities\n");
272 }
273 else if (ds3db_ds3db.vVelocity != dsb->device->ds3dl.vVelocity)
274 {
275 /* calculate length of ds3db_ds3db.vVelocity component which causes Doppler Effect
276 NOTE: if buffer moves TOWARDS the listener, it's velocity component is NEGATIVE
277 if buffer moves AWAY from listener, it's velocity component is POSITIVE */
278 flBufferVel = ProjectVector(&dsb->ds3db_ds3db.vVelocity, &vDistance);
279 /* calculate length of ds3dl.vVelocity component which causes Doppler Effect
280 NOTE: if listener moves TOWARDS the buffer, it's velocity component is POSITIVE
281 if listener moves AWAY from buffer, it's velocity component is NEGATIVE */
282 flListenerVel = ProjectVector(&dsb->device->ds3dl.vVelocity, &vDistance);
283 /* formula taken from Gianicoli D.: Physics, 4th edition: */
284 /* FIXME: replace dsb->freq with appropriate frequency ! */
285 flFreq = dsb->freq * ((DEFAULT_VELOCITY + flListenerVel)/(DEFAULT_VELOCITY + flBufferVel));
286 TRACE("doppler: Buffer velocity (component) = %lf, Listener velocity (component) = %lf => Doppler shift: %ld Hz -> %lf Hz\n", flBufferVel, flListenerVel,
287 dsb->freq, flFreq);
288 /* FIXME: replace following line with correct frequency setting ! */
289 dsb->freq = flFreq;
290 DSOUND_RecalcFormat(dsb);
291 DSOUND_MixToTemporary(dsb, 0, dsb->buflen);
292 }
293 #endif
294
295 /* time for remix */
296 DSOUND_RecalcVolPan(&dsb->volpan);
297 }
298
299 static void DSOUND_Mix3DBuffer(IDirectSoundBufferImpl *dsb)
300 {
301 TRACE("(%p)\n",dsb);
302
303 DSOUND_Calc3DBuffer(dsb);
304 }
305
306 static void DSOUND_ChangeListener(IDirectSound3DListenerImpl *ds3dl)
307 {
308 int i;
309 TRACE("(%p)\n",ds3dl);
310 for (i = 0; i < ds3dl->device->nrofbuffers; i++)
311 {
312 /* check if this buffer is waiting for recalculation */
313 if (ds3dl->device->buffers[i]->ds3db_need_recalc)
314 {
315 DSOUND_Mix3DBuffer(ds3dl->device->buffers[i]);
316 }
317 }
318 }
319
320 /*******************************************************************************
321 * IDirectSound3DBuffer
322 */
323
324 /* IUnknown methods */
325 static HRESULT WINAPI IDirectSound3DBufferImpl_QueryInterface(
326 LPDIRECTSOUND3DBUFFER iface, REFIID riid, LPVOID *ppobj)
327 {
328 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
329
330 TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
331 return IDirectSoundBuffer_QueryInterface((LPDIRECTSOUNDBUFFER8)This->dsb, riid, ppobj);
332 }
333
334 static ULONG WINAPI IDirectSound3DBufferImpl_AddRef(LPDIRECTSOUND3DBUFFER iface)
335 {
336 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
337 ULONG ref = InterlockedIncrement(&(This->ref));
338 TRACE("(%p) ref was %d\n", This, ref - 1);
339 return ref;
340 }
341
342 static ULONG WINAPI IDirectSound3DBufferImpl_Release(LPDIRECTSOUND3DBUFFER iface)
343 {
344 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
345 ULONG ref = InterlockedDecrement(&(This->ref));
346 TRACE("(%p) ref was %d\n", This, ref + 1);
347
348 if (!ref) {
349 This->dsb->ds3db = NULL;
350 IDirectSoundBuffer_Release((LPDIRECTSOUNDBUFFER8)This->dsb);
351 HeapFree(GetProcessHeap(), 0, This);
352 TRACE("(%p) released\n", This);
353 }
354 return ref;
355 }
356
357 /* IDirectSound3DBuffer methods */
358 static HRESULT WINAPI IDirectSound3DBufferImpl_GetAllParameters(
359 LPDIRECTSOUND3DBUFFER iface,
360 LPDS3DBUFFER lpDs3dBuffer)
361 {
362 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
363 TRACE("(%p,%p)\n",This,lpDs3dBuffer);
364
365 if (lpDs3dBuffer == NULL) {
366 WARN("invalid parameter: lpDs3dBuffer == NULL\n");
367 return DSERR_INVALIDPARAM;
368 }
369
370 if (lpDs3dBuffer->dwSize < sizeof(*lpDs3dBuffer)) {
371 WARN("invalid parameter: lpDs3dBuffer->dwSize = %d\n",lpDs3dBuffer->dwSize);
372 return DSERR_INVALIDPARAM;
373 }
374
375 TRACE("returning: all parameters\n");
376 *lpDs3dBuffer = This->dsb->ds3db_ds3db;
377 return DS_OK;
378 }
379
380 static HRESULT WINAPI IDirectSound3DBufferImpl_GetConeAngles(
381 LPDIRECTSOUND3DBUFFER iface,
382 LPDWORD lpdwInsideConeAngle,
383 LPDWORD lpdwOutsideConeAngle)
384 {
385 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
386 TRACE("returning: Inside Cone Angle = %d degrees; Outside Cone Angle = %d degrees\n",
387 This->dsb->ds3db_ds3db.dwInsideConeAngle, This->dsb->ds3db_ds3db.dwOutsideConeAngle);
388 *lpdwInsideConeAngle = This->dsb->ds3db_ds3db.dwInsideConeAngle;
389 *lpdwOutsideConeAngle = This->dsb->ds3db_ds3db.dwOutsideConeAngle;
390 return DS_OK;
391 }
392
393 static HRESULT WINAPI IDirectSound3DBufferImpl_GetConeOrientation(
394 LPDIRECTSOUND3DBUFFER iface,
395 LPD3DVECTOR lpvConeOrientation)
396 {
397 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
398 TRACE("returning: Cone Orientation vector = (%f,%f,%f)\n",
399 This->dsb->ds3db_ds3db.vConeOrientation.x,
400 This->dsb->ds3db_ds3db.vConeOrientation.y,
401 This->dsb->ds3db_ds3db.vConeOrientation.z);
402 *lpvConeOrientation = This->dsb->ds3db_ds3db.vConeOrientation;
403 return DS_OK;
404 }
405
406 static HRESULT WINAPI IDirectSound3DBufferImpl_GetConeOutsideVolume(
407 LPDIRECTSOUND3DBUFFER iface,
408 LPLONG lplConeOutsideVolume)
409 {
410 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
411 TRACE("returning: Cone Outside Volume = %d\n", This->dsb->ds3db_ds3db.lConeOutsideVolume);
412 *lplConeOutsideVolume = This->dsb->ds3db_ds3db.lConeOutsideVolume;
413 return DS_OK;
414 }
415
416 static HRESULT WINAPI IDirectSound3DBufferImpl_GetMaxDistance(
417 LPDIRECTSOUND3DBUFFER iface,
418 LPD3DVALUE lpfMaxDistance)
419 {
420 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
421 TRACE("returning: Max Distance = %f\n", This->dsb->ds3db_ds3db.flMaxDistance);
422 *lpfMaxDistance = This->dsb->ds3db_ds3db.flMaxDistance;
423 return DS_OK;
424 }
425
426 static HRESULT WINAPI IDirectSound3DBufferImpl_GetMinDistance(
427 LPDIRECTSOUND3DBUFFER iface,
428 LPD3DVALUE lpfMinDistance)
429 {
430 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
431 TRACE("returning: Min Distance = %f\n", This->dsb->ds3db_ds3db.flMinDistance);
432 *lpfMinDistance = This->dsb->ds3db_ds3db.flMinDistance;
433 return DS_OK;
434 }
435
436 static HRESULT WINAPI IDirectSound3DBufferImpl_GetMode(
437 LPDIRECTSOUND3DBUFFER iface,
438 LPDWORD lpdwMode)
439 {
440 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
441 TRACE("returning: Mode = %d\n", This->dsb->ds3db_ds3db.dwMode);
442 *lpdwMode = This->dsb->ds3db_ds3db.dwMode;
443 return DS_OK;
444 }
445
446 static HRESULT WINAPI IDirectSound3DBufferImpl_GetPosition(
447 LPDIRECTSOUND3DBUFFER iface,
448 LPD3DVECTOR lpvPosition)
449 {
450 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
451 TRACE("returning: Position vector = (%f,%f,%f)\n",
452 This->dsb->ds3db_ds3db.vPosition.x,
453 This->dsb->ds3db_ds3db.vPosition.y,
454 This->dsb->ds3db_ds3db.vPosition.z);
455 *lpvPosition = This->dsb->ds3db_ds3db.vPosition;
456 return DS_OK;
457 }
458
459 static HRESULT WINAPI IDirectSound3DBufferImpl_GetVelocity(
460 LPDIRECTSOUND3DBUFFER iface,
461 LPD3DVECTOR lpvVelocity)
462 {
463 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
464 TRACE("returning: Velocity vector = (%f,%f,%f)\n",
465 This->dsb->ds3db_ds3db.vVelocity.x,
466 This->dsb->ds3db_ds3db.vVelocity.y,
467 This->dsb->ds3db_ds3db.vVelocity.z);
468 *lpvVelocity = This->dsb->ds3db_ds3db.vVelocity;
469 return DS_OK;
470 }
471
472 static HRESULT WINAPI IDirectSound3DBufferImpl_SetAllParameters(
473 LPDIRECTSOUND3DBUFFER iface,
474 LPCDS3DBUFFER lpcDs3dBuffer,
475 DWORD dwApply)
476 {
477 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
478 DWORD status = DSERR_INVALIDPARAM;
479 TRACE("(%p,%p,%x)\n",iface,lpcDs3dBuffer,dwApply);
480
481 if (lpcDs3dBuffer == NULL) {
482 WARN("invalid parameter: lpcDs3dBuffer == NULL\n");
483 return status;
484 }
485
486 if (lpcDs3dBuffer->dwSize != sizeof(DS3DBUFFER)) {
487 WARN("invalid parameter: lpcDs3dBuffer->dwSize = %d\n", lpcDs3dBuffer->dwSize);
488 return status;
489 }
490
491 TRACE("setting: all parameters; dwApply = %d\n", dwApply);
492 This->dsb->ds3db_ds3db = *lpcDs3dBuffer;
493
494 if (dwApply == DS3D_IMMEDIATE)
495 {
496 DSOUND_Mix3DBuffer(This->dsb);
497 }
498 This->dsb->ds3db_need_recalc = TRUE;
499 status = DS_OK;
500
501 return status;
502 }
503
504 static HRESULT WINAPI IDirectSound3DBufferImpl_SetConeAngles(
505 LPDIRECTSOUND3DBUFFER iface,
506 DWORD dwInsideConeAngle,
507 DWORD dwOutsideConeAngle,
508 DWORD dwApply)
509 {
510 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
511 TRACE("setting: Inside Cone Angle = %d; Outside Cone Angle = %d; dwApply = %d\n",
512 dwInsideConeAngle, dwOutsideConeAngle, dwApply);
513 This->dsb->ds3db_ds3db.dwInsideConeAngle = dwInsideConeAngle;
514 This->dsb->ds3db_ds3db.dwOutsideConeAngle = dwOutsideConeAngle;
515 if (dwApply == DS3D_IMMEDIATE)
516 {
517 DSOUND_Mix3DBuffer(This->dsb);
518 }
519 This->dsb->ds3db_need_recalc = TRUE;
520 return DS_OK;
521 }
522
523 static HRESULT WINAPI IDirectSound3DBufferImpl_SetConeOrientation(
524 LPDIRECTSOUND3DBUFFER iface,
525 D3DVALUE x, D3DVALUE y, D3DVALUE z,
526 DWORD dwApply)
527 {
528 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
529 TRACE("setting: Cone Orientation vector = (%f,%f,%f); dwApply = %d\n", x, y, z, dwApply);
530 This->dsb->ds3db_ds3db.vConeOrientation.x = x;
531 This->dsb->ds3db_ds3db.vConeOrientation.y = y;
532 This->dsb->ds3db_ds3db.vConeOrientation.z = z;
533 if (dwApply == DS3D_IMMEDIATE)
534 {
535 This->dsb->ds3db_need_recalc = FALSE;
536 DSOUND_Mix3DBuffer(This->dsb);
537 }
538 This->dsb->ds3db_need_recalc = TRUE;
539 return DS_OK;
540 }
541
542 static HRESULT WINAPI IDirectSound3DBufferImpl_SetConeOutsideVolume(
543 LPDIRECTSOUND3DBUFFER iface,
544 LONG lConeOutsideVolume,
545 DWORD dwApply)
546 {
547 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
548 TRACE("setting: ConeOutsideVolume = %d; dwApply = %d\n", lConeOutsideVolume, dwApply);
549 This->dsb->ds3db_ds3db.lConeOutsideVolume = lConeOutsideVolume;
550 if (dwApply == DS3D_IMMEDIATE)
551 {
552 This->dsb->ds3db_need_recalc = FALSE;
553 DSOUND_Mix3DBuffer(This->dsb);
554 }
555 This->dsb->ds3db_need_recalc = TRUE;
556 return DS_OK;
557 }
558
559 static HRESULT WINAPI IDirectSound3DBufferImpl_SetMaxDistance(
560 LPDIRECTSOUND3DBUFFER iface,
561 D3DVALUE fMaxDistance,
562 DWORD dwApply)
563 {
564 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
565 TRACE("setting: MaxDistance = %f; dwApply = %d\n", fMaxDistance, dwApply);
566 This->dsb->ds3db_ds3db.flMaxDistance = fMaxDistance;
567 if (dwApply == DS3D_IMMEDIATE)
568 {
569 This->dsb->ds3db_need_recalc = FALSE;
570 DSOUND_Mix3DBuffer(This->dsb);
571 }
572 This->dsb->ds3db_need_recalc = TRUE;
573 return DS_OK;
574 }
575
576 static HRESULT WINAPI IDirectSound3DBufferImpl_SetMinDistance(
577 LPDIRECTSOUND3DBUFFER iface,
578 D3DVALUE fMinDistance,
579 DWORD dwApply)
580 {
581 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
582 TRACE("setting: MinDistance = %f; dwApply = %d\n", fMinDistance, dwApply);
583 This->dsb->ds3db_ds3db.flMinDistance = fMinDistance;
584 if (dwApply == DS3D_IMMEDIATE)
585 {
586 This->dsb->ds3db_need_recalc = FALSE;
587 DSOUND_Mix3DBuffer(This->dsb);
588 }
589 This->dsb->ds3db_need_recalc = TRUE;
590 return DS_OK;
591 }
592
593 static HRESULT WINAPI IDirectSound3DBufferImpl_SetMode(
594 LPDIRECTSOUND3DBUFFER iface,
595 DWORD dwMode,
596 DWORD dwApply)
597 {
598 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
599 TRACE("setting: Mode = %d; dwApply = %d\n", dwMode, dwApply);
600 This->dsb->ds3db_ds3db.dwMode = dwMode;
601 if (dwApply == DS3D_IMMEDIATE)
602 {
603 This->dsb->ds3db_need_recalc = FALSE;
604 DSOUND_Mix3DBuffer(This->dsb);
605 }
606 This->dsb->ds3db_need_recalc = TRUE;
607 return DS_OK;
608 }
609
610 static HRESULT WINAPI IDirectSound3DBufferImpl_SetPosition(
611 LPDIRECTSOUND3DBUFFER iface,
612 D3DVALUE x, D3DVALUE y, D3DVALUE z,
613 DWORD dwApply)
614 {
615 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
616 TRACE("setting: Position vector = (%f,%f,%f); dwApply = %d\n", x, y, z, dwApply);
617 This->dsb->ds3db_ds3db.vPosition.x = x;
618 This->dsb->ds3db_ds3db.vPosition.y = y;
619 This->dsb->ds3db_ds3db.vPosition.z = z;
620 if (dwApply == DS3D_IMMEDIATE)
621 {
622 This->dsb->ds3db_need_recalc = FALSE;
623 DSOUND_Mix3DBuffer(This->dsb);
624 }
625 This->dsb->ds3db_need_recalc = TRUE;
626 return DS_OK;
627 }
628
629 static HRESULT WINAPI IDirectSound3DBufferImpl_SetVelocity(
630 LPDIRECTSOUND3DBUFFER iface,
631 D3DVALUE x, D3DVALUE y, D3DVALUE z,
632 DWORD dwApply)
633 {
634 IDirectSound3DBufferImpl *This = (IDirectSound3DBufferImpl *)iface;
635 TRACE("setting: Velocity vector = (%f,%f,%f); dwApply = %d\n", x, y, z, dwApply);
636 This->dsb->ds3db_ds3db.vVelocity.x = x;
637 This->dsb->ds3db_ds3db.vVelocity.y = y;
638 This->dsb->ds3db_ds3db.vVelocity.z = z;
639 if (dwApply == DS3D_IMMEDIATE)
640 {
641 This->dsb->ds3db_need_recalc = FALSE;
642 DSOUND_Mix3DBuffer(This->dsb);
643 }
644 This->dsb->ds3db_need_recalc = TRUE;
645 return DS_OK;
646 }
647
648 static const IDirectSound3DBufferVtbl ds3dbvt =
649 {
650 /* IUnknown methods */
651 IDirectSound3DBufferImpl_QueryInterface,
652 IDirectSound3DBufferImpl_AddRef,
653 IDirectSound3DBufferImpl_Release,
654 /* IDirectSound3DBuffer methods */
655 IDirectSound3DBufferImpl_GetAllParameters,
656 IDirectSound3DBufferImpl_GetConeAngles,
657 IDirectSound3DBufferImpl_GetConeOrientation,
658 IDirectSound3DBufferImpl_GetConeOutsideVolume,
659 IDirectSound3DBufferImpl_GetMaxDistance,
660 IDirectSound3DBufferImpl_GetMinDistance,
661 IDirectSound3DBufferImpl_GetMode,
662 IDirectSound3DBufferImpl_GetPosition,
663 IDirectSound3DBufferImpl_GetVelocity,
664 IDirectSound3DBufferImpl_SetAllParameters,
665 IDirectSound3DBufferImpl_SetConeAngles,
666 IDirectSound3DBufferImpl_SetConeOrientation,
667 IDirectSound3DBufferImpl_SetConeOutsideVolume,
668 IDirectSound3DBufferImpl_SetMaxDistance,
669 IDirectSound3DBufferImpl_SetMinDistance,
670 IDirectSound3DBufferImpl_SetMode,
671 IDirectSound3DBufferImpl_SetPosition,
672 IDirectSound3DBufferImpl_SetVelocity,
673 };
674
675 HRESULT IDirectSound3DBufferImpl_Create(
676 IDirectSoundBufferImpl *dsb,
677 IDirectSound3DBufferImpl **pds3db)
678 {
679 IDirectSound3DBufferImpl *ds3db;
680 TRACE("(%p,%p)\n",dsb,pds3db);
681
682 ds3db = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(*ds3db));
683
684 if (ds3db == NULL) {
685 WARN("out of memory\n");
686 *pds3db = 0;
687 return DSERR_OUTOFMEMORY;
688 }
689
690 ds3db->ref = 0;
691 ds3db->dsb = dsb;
692 ds3db->lpVtbl = &ds3dbvt;
693
694 ds3db->dsb->ds3db_ds3db.dwSize = sizeof(DS3DBUFFER);
695 ds3db->dsb->ds3db_ds3db.vPosition.x = 0.0;
696 ds3db->dsb->ds3db_ds3db.vPosition.y = 0.0;
697 ds3db->dsb->ds3db_ds3db.vPosition.z = 0.0;
698 ds3db->dsb->ds3db_ds3db.vVelocity.x = 0.0;
699 ds3db->dsb->ds3db_ds3db.vVelocity.y = 0.0;
700 ds3db->dsb->ds3db_ds3db.vVelocity.z = 0.0;
701 ds3db->dsb->ds3db_ds3db.dwInsideConeAngle = DS3D_DEFAULTCONEANGLE;
702 ds3db->dsb->ds3db_ds3db.dwOutsideConeAngle = DS3D_DEFAULTCONEANGLE;
703 ds3db->dsb->ds3db_ds3db.vConeOrientation.x = 0.0;
704 ds3db->dsb->ds3db_ds3db.vConeOrientation.y = 0.0;
705 ds3db->dsb->ds3db_ds3db.vConeOrientation.z = 0.0;
706 ds3db->dsb->ds3db_ds3db.lConeOutsideVolume = DS3D_DEFAULTCONEOUTSIDEVOLUME;
707 ds3db->dsb->ds3db_ds3db.flMinDistance = DS3D_DEFAULTMINDISTANCE;
708 ds3db->dsb->ds3db_ds3db.flMaxDistance = DS3D_DEFAULTMAXDISTANCE;
709 ds3db->dsb->ds3db_ds3db.dwMode = DS3DMODE_NORMAL;
710
711 ds3db->dsb->ds3db_need_recalc = TRUE;
712
713 IDirectSoundBuffer_AddRef((LPDIRECTSOUNDBUFFER8)dsb);
714
715 *pds3db = ds3db;
716 return S_OK;
717 }
718
719 HRESULT IDirectSound3DBufferImpl_Destroy(
720 IDirectSound3DBufferImpl *pds3db)
721 {
722 TRACE("(%p)\n",pds3db);
723
724 while (IDirectSound3DBufferImpl_Release((LPDIRECTSOUND3DBUFFER)pds3db) > 0);
725
726 return S_OK;
727 }
728
729 /*******************************************************************************
730 * IDirectSound3DListener
731 */
732
733 /* IUnknown methods */
734 static HRESULT WINAPI IDirectSound3DListenerImpl_QueryInterface(
735 LPDIRECTSOUND3DLISTENER iface, REFIID riid, LPVOID *ppobj)
736 {
737 IDirectSound3DListenerImpl *This = (IDirectSound3DListenerImpl *)iface;
738
739 TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
740
741 if (ppobj == NULL) {
742 WARN("invalid parameter\n");
743 return E_INVALIDARG;
744 }
745
746 *ppobj = NULL; /* assume failure */
747
748 if ( IsEqualGUID(riid, &IID_IUnknown) ||
749 IsEqualGUID(riid, &IID_IDirectSound3DListener ) ) {
750 IDirectSound3DListener_AddRef((LPDIRECTSOUND3DLISTENER)This);
751 *ppobj = This;
752 return S_OK;
753 }
754
755 if ( IsEqualGUID(riid, &IID_IDirectSoundBuffer) ) {
756 if (!This->device->primary)
757 PrimaryBufferImpl_Create(This->device, &(This->device->primary), &(This->device->dsbd));
758 if (This->device->primary) {
759 *ppobj = This->device->primary;
760 IDirectSoundBuffer_AddRef((LPDIRECTSOUNDBUFFER)*ppobj);
761 return S_OK;
762 }
763 }
764
765 FIXME( "Unknown IID %s\n", debugstr_guid( riid ) );
766 return E_NOINTERFACE;
767 }
768
769 static ULONG WINAPI IDirectSound3DListenerImpl_AddRef(LPDIRECTSOUND3DLISTENER iface)
770 {
771 IDirectSound3DListenerImpl *This = (IDirectSound3DListenerImpl *)iface;
772 ULONG ref = InterlockedIncrement(&(This->ref));
773 TRACE("(%p) ref was %d\n", This, ref - 1);
774 return ref;
775 }
776
777 static ULONG WINAPI IDirectSound3DListenerImpl_Release(LPDIRECTSOUND3DLISTENER iface)
778 {
779 IDirectSound3DListenerImpl *This = (IDirectSound3DListenerImpl *)iface;
780 ULONG ref = InterlockedDecrement(&(This->ref));
781 TRACE("(%p) ref was %d\n", This, ref + 1);
782
783 if (!ref) {
784 This->device->listener = 0;
785 HeapFree(GetProcessHeap(), 0, This);
786 TRACE("(%p) released\n", This);
787 }
788 return ref;
789 }
790
791 /* IDirectSound3DListener methods */
792 static HRESULT WINAPI IDirectSound3DListenerImpl_GetAllParameter(
793 LPDIRECTSOUND3DLISTENER iface,
794 LPDS3DLISTENER lpDS3DL)
795 {
796 IDirectSound3DListenerImpl *This = (IDirectSound3DListenerImpl *)iface;
797 TRACE("(%p,%p)\n",This,lpDS3DL);
798
799 if (lpDS3DL == NULL) {
800 WARN("invalid parameter: lpDS3DL == NULL\n");
801 return DSERR_INVALIDPARAM;
802 }
803
804 if (lpDS3DL->dwSize < sizeof(*lpDS3DL)) {
805 WARN("invalid parameter: lpDS3DL->dwSize = %d\n",lpDS3DL->dwSize);
806 return DSERR_INVALIDPARAM;
807 }
808
809 TRACE("returning: all parameters\n");
810 *lpDS3DL = This->device->ds3dl;
811 return DS_OK;
812 }
813
814 static HRESULT WINAPI IDirectSound3DListenerImpl_GetDistanceFactor(
815 LPDIRECTSOUND3DLISTENER iface,
816 LPD3DVALUE lpfDistanceFactor)
817 {
818 IDirectSound3DListenerImpl *This = (IDirectSound3DListenerImpl *)iface;
819 TRACE("returning: Distance Factor = %f\n", This->device->ds3dl.flDistanceFactor);
820 *lpfDistanceFactor = This->device->ds3dl.flDistanceFactor;
821 return DS_OK;
822 }
823
824 static HRESULT WINAPI IDirectSound3DListenerImpl_GetDopplerFactor(
825 LPDIRECTSOUND3DLISTENER iface,
826 LPD3DVALUE lpfDopplerFactor)
827 {
828 IDirectSound3DListenerImpl *This = (IDirectSound3DListenerImpl *)iface;
829 TRACE("returning: Doppler Factor = %f\n", This->device->ds3dl.flDopplerFactor);
830 *lpfDopplerFactor =