Removed some more uses of the non-standard ICOM_THIS macro.
[wine] / dlls / dsound / dsound_main.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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  */
21 /*
22  * Most thread locking is complete. There may be a few race
23  * conditions still lurking.
24  *
25  * Tested with a Soundblaster clone, a Gravis UltraSound Classic,
26  * and a Turtle Beach Tropez+.
27  *
28  * TODO:
29  *      Implement SetCooperativeLevel properly (need to address focus issues)
30  *      Implement DirectSound3DBuffers (stubs in place)
31  *      Use hardware 3D support if available
32  *      Add critical section locking inside Release and AddRef methods
33  *      Handle static buffers - put those in hardware, non-static not in hardware
34  *      Hardware DuplicateSoundBuffer
35  *      Proper volume calculation, and setting volume in HEL primary buffer
36  *      Optimize WINMM and negotiate fragment size, decrease DS_HEL_MARGIN
37  */
38
39 #include "config.h"
40 #include "wine/port.h"
41
42 #include <assert.h>
43 #include <stdarg.h>
44 #include <stdio.h>
45 #include <sys/types.h>
46 #include <sys/fcntl.h>
47 #ifdef HAVE_UNISTD_H
48 # include <unistd.h>
49 #endif
50 #include <stdlib.h>
51 #include <string.h>
52 #include <math.h>
53
54 #define NONAMELESSSTRUCT
55 #define NONAMELESSUNION
56 #include "windef.h"
57 #include "winbase.h"
58 #include "winreg.h"
59 #include "winuser.h"
60 #include "wingdi.h"
61 #include "winuser.h"
62 #include "winerror.h"
63 #include "mmsystem.h"
64 #include "winternl.h"
65 #include "mmddk.h"
66 #include "wine/windef16.h"
67 #include "wine/winbase16.h"
68 #include "wine/debug.h"
69 #include "dsound.h"
70 #include "dsdriver.h"
71 #include "dsound_private.h"
72 #include "dsconf.h"
73
74 WINE_DEFAULT_DEBUG_CHANNEL(dsound);
75
76 /* these are eligible for tuning... they must be high on slow machines... */
77 /* some stuff may get more responsive with lower values though... */
78 #define DS_EMULDRIVER 0 /* some games (Quake 2, UT) refuse to accept
79                                 emulated dsound devices. set to 0 ! */
80 #define DS_HEL_MARGIN 5 /* HEL only: number of waveOut fragments ahead to mix in new buffers
81                          * (keep this close or equal to DS_HEL_QUEUE for best results) */
82 #define DS_HEL_QUEUE  5 /* HEL only: number of waveOut fragments ahead to queue to driver
83                          * (this will affect HEL sound reliability and latency) */
84
85 #define DS_SND_QUEUE_MAX 28 /* max number of fragments to prebuffer */
86 #define DS_SND_QUEUE_MIN 12 /* min number of fragments to prebuffer */
87
88 IDirectSoundImpl*       dsound = NULL;
89 GUID                    renderer_guids[MAXWAVEDRIVERS];
90 GUID                    capture_guids[MAXWAVEDRIVERS];
91
92 HRESULT mmErr(UINT err)
93 {
94         switch(err) {
95         case MMSYSERR_NOERROR:
96                 return DS_OK;
97         case MMSYSERR_ALLOCATED:
98                 return DSERR_ALLOCATED;
99         case MMSYSERR_ERROR:
100         case MMSYSERR_INVALHANDLE:
101         case WAVERR_STILLPLAYING:
102                 return DSERR_GENERIC; /* FIXME */
103         case MMSYSERR_NODRIVER:
104                 return DSERR_NODRIVER;
105         case MMSYSERR_NOMEM:
106                 return DSERR_OUTOFMEMORY;
107         case MMSYSERR_INVALPARAM:
108         case WAVERR_BADFORMAT:
109         case WAVERR_UNPREPARED:
110                 return DSERR_INVALIDPARAM;
111         case MMSYSERR_NOTSUPPORTED:
112                 return DSERR_UNSUPPORTED;
113         default:
114                 FIXME("Unknown MMSYS error %d\n",err);
115                 return DSERR_GENERIC;
116         }
117 }
118
119 int ds_emuldriver = DS_EMULDRIVER;
120 int ds_hel_margin = DS_HEL_MARGIN;
121 int ds_hel_queue = DS_HEL_QUEUE;
122 int ds_snd_queue_max = DS_SND_QUEUE_MAX;
123 int ds_snd_queue_min = DS_SND_QUEUE_MIN;
124 int ds_hw_accel = DS_HW_ACCEL_FULL;
125 int ds_default_playback = 0;
126 int ds_default_capture = 0;
127
128 /*
129  * Get a config key from either the app-specific or the default config
130  */
131
132 inline static DWORD get_config_key( HKEY defkey, HKEY appkey, const char *name,
133                                     char *buffer, DWORD size )
134 {
135     if (appkey && !RegQueryValueExA( appkey, name, 0, NULL, buffer, &size )) return 0;
136     return RegQueryValueExA( defkey, name, 0, NULL, buffer, &size );
137 }
138
139
140 /*
141  * Setup the dsound options.
142  */
143
144 void setup_dsound_options(void)
145 {
146     char buffer[MAX_PATH+1];
147     HKEY hkey, appkey = 0;
148     DWORD len;
149
150     buffer[MAX_PATH]='\0';
151
152     if (RegCreateKeyExA( HKEY_LOCAL_MACHINE, "Software\\Wine\\Wine\\Config\\dsound", 0, NULL,
153                          REG_OPTION_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, NULL ))
154     {
155         ERR("Cannot create config registry key\n" );
156         ExitProcess(1);
157     }
158
159     len = GetModuleFileNameA( 0, buffer, MAX_PATH );
160     if (len && len < MAX_PATH)
161     {
162         HKEY tmpkey;
163
164         if (!RegOpenKeyA( HKEY_LOCAL_MACHINE, "Software\\Wine\\Wine\\Config\\AppDefaults", &tmpkey ))
165         {
166            char appname[MAX_PATH+16];
167            char *p = strrchr( buffer, '\\' );
168            if (p!=NULL) {
169                    appname[MAX_PATH]='\0';
170                    strncpy(appname,p+1,MAX_PATH);
171                    strcat(appname,"\\dsound");
172                    TRACE("appname = [%s] \n",appname);
173                    if (RegOpenKeyA( tmpkey, appname, &appkey )) appkey = 0;
174                        RegCloseKey( tmpkey );
175            }
176         }
177     }
178
179     /* get options */
180
181     if (!get_config_key( hkey, appkey, "EmulDriver", buffer, MAX_PATH ))
182         ds_emuldriver = strcmp(buffer, "N");
183
184     if (!get_config_key( hkey, appkey, "HELmargin", buffer, MAX_PATH ))
185         ds_hel_margin = atoi(buffer);
186
187     if (!get_config_key( hkey, appkey, "HELqueue", buffer, MAX_PATH ))
188         ds_hel_queue = atoi(buffer);
189
190     if (!get_config_key( hkey, appkey, "SndQueueMax", buffer, MAX_PATH ))
191         ds_snd_queue_max = atoi(buffer);
192
193     if (!get_config_key( hkey, appkey, "SndQueueMin", buffer, MAX_PATH ))
194         ds_snd_queue_min = atoi(buffer);
195
196     if (!get_config_key( hkey, appkey, "HardwareAcceleration", buffer, MAX_PATH )) {
197         if (strcmp(buffer, "Full") == 0)
198             ds_hw_accel = DS_HW_ACCEL_FULL;
199         else if (strcmp(buffer, "Standard") == 0)
200             ds_hw_accel = DS_HW_ACCEL_STANDARD;
201         else if (strcmp(buffer, "Basic") == 0)
202             ds_hw_accel = DS_HW_ACCEL_BASIC;
203         else if (strcmp(buffer, "Emulation") == 0)
204             ds_hw_accel = DS_HW_ACCEL_EMULATION;
205     }
206
207     if (!get_config_key( hkey, appkey, "DefaultPlayback", buffer, MAX_PATH ))
208             ds_default_playback = atoi(buffer);
209
210     if (!get_config_key( hkey, appkey, "DefaultCapture", buffer, MAX_PATH ))
211             ds_default_capture = atoi(buffer);
212
213     if (appkey) RegCloseKey( appkey );
214     RegCloseKey( hkey );
215
216     if (ds_emuldriver != DS_EMULDRIVER )
217        WARN("ds_emuldriver = %d (default=%d)\n",ds_emuldriver, DS_EMULDRIVER);
218     if (ds_hel_margin != DS_HEL_MARGIN )
219        WARN("ds_hel_margin = %d (default=%d)\n",ds_hel_margin, DS_HEL_MARGIN );
220     if (ds_hel_queue != DS_HEL_QUEUE )
221        WARN("ds_hel_queue = %d (default=%d)\n",ds_hel_queue, DS_HEL_QUEUE );
222     if (ds_snd_queue_max != DS_SND_QUEUE_MAX)
223        WARN("ds_snd_queue_max = %d (default=%d)\n",ds_snd_queue_max ,DS_SND_QUEUE_MAX);
224     if (ds_snd_queue_min != DS_SND_QUEUE_MIN)
225        WARN("ds_snd_queue_min = %d (default=%d)\n",ds_snd_queue_min ,DS_SND_QUEUE_MIN);
226     if (ds_hw_accel != DS_HW_ACCEL_FULL)
227         WARN("ds_hw_accel = %s (default=Full)\n",
228             ds_hw_accel==DS_HW_ACCEL_FULL ? "Full" :
229             ds_hw_accel==DS_HW_ACCEL_STANDARD ? "Standard" :
230             ds_hw_accel==DS_HW_ACCEL_BASIC ? "Basic" :
231             ds_hw_accel==DS_HW_ACCEL_EMULATION ? "Emulation" :
232             "Unknown");
233     if (ds_default_playback != 0)
234         WARN("ds_default_playback = %d (default=0)\n",ds_default_playback);
235     if (ds_default_capture != 0)
236         WARN("ds_default_capture = %d (default=0)\n",ds_default_playback);
237 }
238
239 const char * get_device_id(LPCGUID pGuid)
240 {
241     if (IsEqualGUID(&DSDEVID_DefaultPlayback, pGuid))
242         return "DSDEVID_DefaultPlayback";
243     else if (IsEqualGUID(&DSDEVID_DefaultVoicePlayback, pGuid))
244         return "DSDEVID_DefaultVoicePlayback";
245     else if (IsEqualGUID(&DSDEVID_DefaultCapture, pGuid))
246         return "DSDEVID_DefaultCapture";
247     else if (IsEqualGUID(&DSDEVID_DefaultVoiceCapture, pGuid))
248         return "DSDEVID_DefaultVoiceCapture";
249     return debugstr_guid(pGuid);
250 }
251
252 /***************************************************************************
253  * GetDeviceID  [DSOUND.9]
254  *
255  * Retrieves unique identifier of default device specified
256  *
257  * PARAMS
258  *    pGuidSrc  [I] Address of device GUID.
259  *    pGuidDest [O] Address to receive unique device GUID.
260  *
261  * RETURNS
262  *    Success: DS_OK
263  *    Failure: DSERR_INVALIDPARAM
264  *
265  * NOTES
266  *    pGuidSrc is a valid device GUID or DSDEVID_DefaultPlayback,
267  *    DSDEVID_DefaultCapture, DSDEVID_DefaultVoicePlayback, or
268  *    DSDEVID_DefaultVoiceCapture.
269  *    Returns pGuidSrc if pGuidSrc is a valid device or the device
270  *    GUID for the specified constants.
271  */
272 HRESULT WINAPI GetDeviceID(LPCGUID pGuidSrc, LPGUID pGuidDest)
273 {
274     TRACE("(%s,%p)\n", get_device_id(pGuidSrc),pGuidDest);
275
276     if ( pGuidSrc == NULL) {
277         WARN("invalid parameter: pGuidSrc == NULL\n");
278         return DSERR_INVALIDPARAM;
279     }
280
281     if ( pGuidDest == NULL ) {
282         WARN("invalid parameter: pGuidDest == NULL\n");
283         return DSERR_INVALIDPARAM;
284     }
285
286     if ( IsEqualGUID( &DSDEVID_DefaultPlayback, pGuidSrc ) ||
287          IsEqualGUID( &DSDEVID_DefaultVoicePlayback, pGuidSrc ) ) {
288         memcpy(pGuidDest, &renderer_guids[ds_default_playback], sizeof(GUID));
289         TRACE("returns %s\n", get_device_id(pGuidDest));
290         return DS_OK;
291     }
292
293     if ( IsEqualGUID( &DSDEVID_DefaultCapture, pGuidSrc ) ||
294          IsEqualGUID( &DSDEVID_DefaultVoiceCapture, pGuidSrc ) ) {
295         memcpy(pGuidDest, &capture_guids[ds_default_capture], sizeof(GUID));
296         TRACE("returns %s\n", get_device_id(pGuidDest));
297         return DS_OK;
298     }
299
300     memcpy(pGuidDest, pGuidSrc, sizeof(GUID));
301     TRACE("returns %s\n", get_device_id(pGuidDest));
302
303     return DS_OK;
304 }
305
306
307 /***************************************************************************
308  * DirectSoundEnumerateA [DSOUND.2]
309  *
310  * Enumerate all DirectSound drivers installed in the system
311  *
312  * PARAMS
313  *    lpDSEnumCallback  [I] Address of callback function.
314  *    lpContext         [I] Address of user defined context passed to callback function.
315  *
316  * RETURNS
317  *    Success: DS_OK
318  *    Failure: DSERR_INVALIDPARAM
319  */
320 HRESULT WINAPI DirectSoundEnumerateA(
321     LPDSENUMCALLBACKA lpDSEnumCallback,
322     LPVOID lpContext)
323 {
324     unsigned devs, wod;
325     DSDRIVERDESC desc;
326     GUID guid;
327     int err;
328
329     TRACE("lpDSEnumCallback = %p, lpContext = %p\n",
330         lpDSEnumCallback, lpContext);
331
332     if (lpDSEnumCallback == NULL) {
333         WARN("invalid parameter: lpDSEnumCallback == NULL\n");
334         return DSERR_INVALIDPARAM;
335     }
336
337     devs = waveOutGetNumDevs();
338     if (devs > 0) {
339         if (GetDeviceID(&DSDEVID_DefaultPlayback, &guid) == DS_OK) {
340             for (wod = 0; wod < devs; ++wod) {
341                 if (IsEqualGUID( &guid, &renderer_guids[wod]) ) {
342                     err = mmErr(waveOutMessage((HWAVEOUT)wod,DRV_QUERYDSOUNDDESC,(DWORD)&desc,0));
343                     if (err == DS_OK) {
344                         TRACE("calling lpDSEnumCallback(NULL,\"%s\",\"%s\",%p)\n",
345                               "Primary Sound Driver",desc.szDrvName,lpContext);
346                         if (lpDSEnumCallback(NULL, "Primary Sound Driver", desc.szDrvName, lpContext) == FALSE)
347                             return DS_OK;
348                     }
349                 }
350             }
351         }
352     }
353
354     for (wod = 0; wod < devs; ++wod) {
355         err = mmErr(waveOutMessage((HWAVEOUT)wod,DRV_QUERYDSOUNDDESC,(DWORD)&desc,0));
356         if (err == DS_OK) {
357             TRACE("calling lpDSEnumCallback(%s,\"%s\",\"%s\",%p)\n",
358                   debugstr_guid(&renderer_guids[wod]),desc.szDesc,desc.szDrvName,lpContext);
359             if (lpDSEnumCallback(&renderer_guids[wod], desc.szDesc, desc.szDrvName, lpContext) == FALSE)
360                 return DS_OK;
361         }
362     }
363     return DS_OK;
364 }
365
366 /***************************************************************************
367  * DirectSoundEnumerateW [DSOUND.3]
368  *
369  * Enumerate all DirectSound drivers installed in the system
370  *
371  * PARAMS
372  *    lpDSEnumCallback  [I] Address of callback function.
373  *    lpContext         [I] Address of user defined context passed to callback function.
374  *
375  * RETURNS
376  *    Success: DS_OK
377  *    Failure: DSERR_INVALIDPARAM
378  */
379 HRESULT WINAPI DirectSoundEnumerateW(
380         LPDSENUMCALLBACKW lpDSEnumCallback,
381         LPVOID lpContext )
382 {
383     unsigned devs, wod;
384     DSDRIVERDESC desc;
385     GUID guid;
386     int err;
387     WCHAR wDesc[MAXPNAMELEN];
388     WCHAR wName[MAXPNAMELEN];
389
390     TRACE("lpDSEnumCallback = %p, lpContext = %p\n",
391         lpDSEnumCallback, lpContext);
392
393     if (lpDSEnumCallback == NULL) {
394         WARN("invalid parameter: lpDSEnumCallback == NULL\n");
395         return DSERR_INVALIDPARAM;
396     }
397
398     devs = waveOutGetNumDevs();
399     if (devs > 0) {
400         if (GetDeviceID(&DSDEVID_DefaultPlayback, &guid) == DS_OK) {
401             for (wod = 0; wod < devs; ++wod) {
402                 if (IsEqualGUID( &guid, &renderer_guids[wod] ) ) {
403                     err = mmErr(waveOutMessage((HWAVEOUT)wod,DRV_QUERYDSOUNDDESC,(DWORD)&desc,0));
404                     if (err == DS_OK) {
405                         TRACE("calling lpDSEnumCallback(NULL,\"%s\",\"%s\",%p)\n",
406                               "Primary Sound Driver",desc.szDrvName,lpContext);
407                         MultiByteToWideChar( CP_ACP, 0, "Primary Sound Driver", -1,
408                                              wDesc, sizeof(wDesc)/sizeof(WCHAR) );
409                         MultiByteToWideChar( CP_ACP, 0, desc.szDrvName, -1,
410                                              wName, sizeof(wName)/sizeof(WCHAR) );
411                         if (lpDSEnumCallback(NULL, wDesc, wName, lpContext) == FALSE)
412                             return DS_OK;
413                     }
414                 }
415             }
416         }
417     }
418
419     for (wod = 0; wod < devs; ++wod) {
420         err = mmErr(waveOutMessage((HWAVEOUT)wod,DRV_QUERYDSOUNDDESC,(DWORD)&desc,0));
421         if (err == DS_OK) {
422             TRACE("calling lpDSEnumCallback(%s,\"%s\",\"%s\",%p)\n",
423                   debugstr_guid(&renderer_guids[wod]),desc.szDesc,desc.szDrvName,lpContext);
424             MultiByteToWideChar( CP_ACP, 0, desc.szDesc, -1,
425                                  wDesc, sizeof(wDesc)/sizeof(WCHAR) );
426             MultiByteToWideChar( CP_ACP, 0, desc.szDrvName, -1,
427                                  wName, sizeof(wName)/sizeof(WCHAR) );
428             if (lpDSEnumCallback(&renderer_guids[wod], wDesc, wName, lpContext) == FALSE)
429                 return DS_OK;
430         }
431     }
432     return DS_OK;
433 }
434
435 /*******************************************************************************
436  * DirectSound ClassFactory
437  */
438
439 static HRESULT WINAPI
440 DSCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
441         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
442
443         FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
444         return E_NOINTERFACE;
445 }
446
447 static ULONG WINAPI
448 DSCF_AddRef(LPCLASSFACTORY iface) {
449         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
450         TRACE("(%p) ref was %ld\n", This, This->ref);
451         return ++(This->ref);
452 }
453
454 static ULONG WINAPI DSCF_Release(LPCLASSFACTORY iface) {
455         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
456         /* static class, won't be  freed */
457         TRACE("(%p) ref was %ld\n", This, This->ref);
458         return --(This->ref);
459 }
460
461 static HRESULT WINAPI DSCF_CreateInstance(
462         LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
463 ) {
464         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
465         TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
466
467         if (ppobj == NULL) {
468                 WARN("invalid parameter\n");
469                 return DSERR_INVALIDPARAM;
470         }
471
472         *ppobj = NULL;
473
474         if ( IsEqualIID( &IID_IDirectSound, riid ) )
475                 return DSOUND_Create(0,(LPDIRECTSOUND*)ppobj,pOuter);
476
477         if ( IsEqualIID( &IID_IDirectSound8, riid ) )
478                 return DSOUND_Create8(0,(LPDIRECTSOUND8*)ppobj,pOuter);
479
480         WARN("(%p,%p,%s,%p) Interface not found!\n",This,pOuter,debugstr_guid(riid),ppobj);     
481         return E_NOINTERFACE;
482 }
483
484 static HRESULT WINAPI DSCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
485         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
486         FIXME("(%p)->(%d),stub!\n",This,dolock);
487         return S_OK;
488 }
489
490 static IClassFactoryVtbl DSCF_Vtbl = {
491         DSCF_QueryInterface,
492         DSCF_AddRef,
493         DSCF_Release,
494         DSCF_CreateInstance,
495         DSCF_LockServer
496 };
497
498 static IClassFactoryImpl DSOUND_CF = { &DSCF_Vtbl, 1 };
499
500 /*******************************************************************************
501  * DirectSoundPrivate ClassFactory
502  */
503
504 static HRESULT WINAPI
505 DSPCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
506         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
507
508         FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
509         return E_NOINTERFACE;
510 }
511
512 static ULONG WINAPI
513 DSPCF_AddRef(LPCLASSFACTORY iface) {
514         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
515         TRACE("(%p) ref was %ld\n", This, This->ref);
516         return ++(This->ref);
517 }
518
519 static ULONG WINAPI
520 DSPCF_Release(LPCLASSFACTORY iface) {
521         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
522         /* static class, won't be  freed */
523         TRACE("(%p) ref was %ld\n", This, This->ref);
524         return --(This->ref);
525 }
526
527 static HRESULT WINAPI
528 DSPCF_CreateInstance(
529         LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
530 ) {
531         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
532         TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
533
534         if (ppobj == NULL) {
535                 WARN("invalid parameter\n");
536                 return DSERR_INVALIDPARAM;
537         }
538
539         *ppobj = NULL;
540
541         if ( IsEqualGUID( &IID_IKsPropertySet, riid ) ) {
542                 return IKsPrivatePropertySetImpl_Create((IKsPrivatePropertySetImpl**)ppobj);
543         }
544
545         WARN("(%p,%p,%s,%p) Interface not found!\n",This,pOuter,debugstr_guid(riid),ppobj);     
546         return E_NOINTERFACE;
547 }
548
549 static HRESULT WINAPI
550 DSPCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
551         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
552         FIXME("(%p)->(%d),stub!\n",This,dolock);
553         return S_OK;
554 }
555
556 static IClassFactoryVtbl DSPCF_Vtbl = {
557         DSPCF_QueryInterface,
558         DSPCF_AddRef,
559         DSPCF_Release,
560         DSPCF_CreateInstance,
561         DSPCF_LockServer
562 };
563
564 static IClassFactoryImpl DSOUND_PRIVATE_CF = { &DSPCF_Vtbl, 1 };
565
566 /*******************************************************************************
567  * DllGetClassObject [DSOUND.5]
568  * Retrieves class object from a DLL object
569  *
570  * NOTES
571  *    Docs say returns STDAPI
572  *
573  * PARAMS
574  *    rclsid [I] CLSID for the class object
575  *    riid   [I] Reference to identifier of interface for class object
576  *    ppv    [O] Address of variable to receive interface pointer for riid
577  *
578  * RETURNS
579  *    Success: S_OK
580  *    Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG,
581  *             E_UNEXPECTED
582  */
583 DWORD WINAPI DSOUND_DllGetClassObject(REFCLSID rclsid,REFIID riid,LPVOID *ppv)
584 {
585     TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
586
587     if (ppv == NULL) {
588         WARN("invalid parameter\n");
589         return E_INVALIDARG;
590     }
591
592     *ppv = NULL;
593
594     if ( IsEqualCLSID( &CLSID_DirectSound, rclsid ) ||
595          IsEqualCLSID( &CLSID_DirectSound8, rclsid ) ) {
596         if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
597             *ppv = (LPVOID)&DSOUND_CF;
598             IClassFactory_AddRef((IClassFactory*)*ppv);
599             return S_OK;
600         }
601         WARN("(%s,%s,%p): no interface found.\n",
602             debugstr_guid(rclsid), debugstr_guid(riid), ppv);
603         return S_FALSE;
604     }
605
606     if ( IsEqualCLSID( &CLSID_DirectSoundCapture, rclsid ) ||
607          IsEqualCLSID( &CLSID_DirectSoundCapture8, rclsid ) ) {
608         if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
609             *ppv = (LPVOID)&DSOUND_CAPTURE_CF;
610             IClassFactory_AddRef((IClassFactory*)*ppv);
611             return S_OK;
612         }
613         WARN("(%s,%s,%p): no interface found.\n",
614             debugstr_guid(rclsid), debugstr_guid(riid), ppv);
615         return S_FALSE;
616     }
617
618     if ( IsEqualCLSID( &CLSID_DirectSoundFullDuplex, rclsid ) ) {
619         if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
620             *ppv = (LPVOID)&DSOUND_FULLDUPLEX_CF;
621             IClassFactory_AddRef((IClassFactory*)*ppv);
622             return S_OK;
623         }
624         WARN("(%s,%s,%p): no interface found.\n",
625             debugstr_guid(rclsid), debugstr_guid(riid), ppv);
626         return S_FALSE;
627     }
628
629     if ( IsEqualCLSID( &CLSID_DirectSoundPrivate, rclsid ) ) {
630         if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
631             *ppv = (LPVOID)&DSOUND_PRIVATE_CF;
632             IClassFactory_AddRef((IClassFactory*)*ppv);
633             return S_OK;
634         }
635         WARN("(%s,%s,%p): no interface found.\n",
636             debugstr_guid(rclsid), debugstr_guid(riid), ppv);
637         return S_FALSE;
638     }
639
640     WARN("(%s,%s,%p): no class found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
641     return CLASS_E_CLASSNOTAVAILABLE;
642 }
643
644
645 /*******************************************************************************
646  * DllCanUnloadNow [DSOUND.4]
647  * Determines whether the DLL is in use.
648  *
649  * RETURNS
650  *    Success: S_OK
651  *    Failure: S_FALSE
652  */
653 DWORD WINAPI DSOUND_DllCanUnloadNow(void)
654 {
655     FIXME("(void): stub\n");
656     return S_FALSE;
657 }
658
659 #define INIT_GUID(guid, l, w1, w2, b1, b2, b3, b4, b5, b6, b7, b8)      \
660         guid.Data1 = l; guid.Data2 = w1; guid.Data3 = w2;               \
661         guid.Data4[0] = b1; guid.Data4[1] = b2; guid.Data4[2] = b3;     \
662         guid.Data4[3] = b4; guid.Data4[4] = b5; guid.Data4[5] = b6;     \
663         guid.Data4[6] = b7; guid.Data4[7] = b8;
664
665 /***********************************************************************
666  *           DllMain (DSOUND.init)
667  */
668 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpvReserved)
669 {
670     int i;
671     TRACE("(%p 0x%lx %p)\n", hInstDLL, fdwReason, lpvReserved);
672
673     switch (fdwReason) {
674     case DLL_PROCESS_ATTACH:
675         TRACE("DLL_PROCESS_ATTACH\n");
676         for (i = 0; i < MAXWAVEDRIVERS; i++) {
677             INIT_GUID(renderer_guids[i], 0xbd6dd71a, 0x3deb, 0x11d1, 0xb1, 0x71, 0x00, 0xc0, 0x4f, 0xc2, 0x00, 0x00 + i);
678             INIT_GUID(capture_guids[i],  0xbd6dd71b, 0x3deb, 0x11d1, 0xb1, 0x71, 0x00, 0xc0, 0x4f, 0xc2, 0x00, 0x00 + i);
679         }
680         break;
681     case DLL_PROCESS_DETACH:
682         TRACE("DLL_PROCESS_DETACH\n");
683         break;
684     case DLL_THREAD_ATTACH:
685         TRACE("DLL_THREAD_ATTACH\n");
686         break;
687     case DLL_THREAD_DETACH:
688         TRACE("DLL_THREAD_DETACH\n");
689         break;
690     default:
691         TRACE("UNKNOWN REASON\n");
692         break;
693     }
694     return TRUE;
695 }