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         ICOM_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         ICOM_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         ICOM_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         ICOM_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         ICOM_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         ICOM_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         ICOM_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         ICOM_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         ICOM_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         ICOM_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     default:
 685         TRACE("UNKNOWN REASON\n");
 686         break;
 687     }
 688     return TRUE;
 689 }