dlls/dmusic/dmusic.c

   1 /*
   2  * IDirectMusic8 Implementation
   3  *
   4  * Copyright (C) 2003-2004 Rok Mandeljc
   5  * Copyright (C) 2012 Christian Costa
   6  *
   7  * This program 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 program 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 program; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <stdio.h>
  23
  24 #include "dmusic_private.h"
  25
  26 WINE_DEFAULT_DEBUG_CHANNEL(dmusic);
  27
  28 static inline IDirectMusic8Impl *impl_from_IDirectMusic8(IDirectMusic8 *iface)
  29 {
  30     return CONTAINING_RECORD(iface, IDirectMusic8Impl, IDirectMusic8_iface);
  31 }
  32
  33 /* IDirectMusic8Impl IUnknown part: */
  34 static HRESULT WINAPI IDirectMusic8Impl_QueryInterface(LPDIRECTMUSIC8 iface, REFIID riid, LPVOID *ret_iface)
  35 {
  36     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
  37
  38     TRACE("(%p)->(%s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
  39
  40     if (IsEqualIID (riid, &IID_IUnknown) ||
  41         IsEqualIID (riid, &IID_IDirectMusic) ||
  42         IsEqualIID (riid, &IID_IDirectMusic2) ||
  43         IsEqualIID (riid, &IID_IDirectMusic8))
  44     {
  45         IDirectMusic8_AddRef(iface);
  46         *ret_iface = iface;
  47         return S_OK;
  48     }
  49
  50     *ret_iface = NULL;
  51
  52     WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ret_iface);
  53
  54     return E_NOINTERFACE;
  55 }
  56
  57 static ULONG WINAPI IDirectMusic8Impl_AddRef(LPDIRECTMUSIC8 iface)
  58 {
  59     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
  60     ULONG ref = InterlockedIncrement(&This->ref);
  61
  62     TRACE("(%p)->(): new ref = %u\n", This, ref);
  63
  64     DMUSIC_LockModule();
  65
  66     return ref;
  67 }
  68
  69 static ULONG WINAPI IDirectMusic8Impl_Release(LPDIRECTMUSIC8 iface)
  70 {
  71     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
  72     ULONG ref = InterlockedDecrement(&This->ref);
  73
  74     TRACE("(%p)->(): new ref = %u\n", This, ref);
  75
  76     if (!ref) {
  77         HeapFree(GetProcessHeap(), 0, This->system_ports);
  78         HeapFree(GetProcessHeap(), 0, This->ppPorts);
  79         HeapFree(GetProcessHeap(), 0, This);
  80     }
  81
  82     DMUSIC_UnlockModule();
  83
  84     return ref;
  85 }
  86
  87 /* IDirectMusic8Impl IDirectMusic part: */
  88 static HRESULT WINAPI IDirectMusic8Impl_EnumPort(LPDIRECTMUSIC8 iface, DWORD index, LPDMUS_PORTCAPS port_caps)
  89 {
  90     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
  91
  92     TRACE("(%p, %d, %p)\n", This, index, port_caps);
  93
  94     if (!port_caps)
  95         return E_POINTER;
  96
  97     if (index >= This->nb_system_ports)
  98         return S_FALSE;
  99
 100     *port_caps = This->system_ports[index].caps;
 101
 102     return S_OK;
 103 }
 104
 105 static HRESULT WINAPI IDirectMusic8Impl_CreateMusicBuffer(LPDIRECTMUSIC8 iface, LPDMUS_BUFFERDESC buffer_desc, LPDIRECTMUSICBUFFER* buffer, LPUNKNOWN unkouter)
 106 {
 107     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 108
 109     TRACE("(%p)->(%p, %p, %p)\n", This, buffer_desc, buffer, unkouter);
 110
 111     if (unkouter)
 112         return CLASS_E_NOAGGREGATION;
 113
 114     if (!buffer_desc || !buffer)
 115         return E_POINTER;
 116
 117     return DMUSIC_CreateDirectMusicBufferImpl(buffer_desc, (LPVOID)buffer);
 118 }
 119
 120 static HRESULT WINAPI IDirectMusic8Impl_CreatePort(LPDIRECTMUSIC8 iface, REFCLSID rclsid_port, LPDMUS_PORTPARAMS port_params, LPDIRECTMUSICPORT* port, LPUNKNOWN unkouter)
 121 {
 122     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 123     int i;
 124     DMUS_PORTCAPS port_caps;
 125     IDirectMusicPort* new_port = NULL;
 126     HRESULT hr;
 127     GUID default_port;
 128     const GUID *request_port = rclsid_port;
 129
 130     TRACE("(%p)->(%s, %p, %p, %p)\n", This, debugstr_dmguid(rclsid_port), port_params, port, unkouter);
 131
 132     if (TRACE_ON(dmusic))
 133         dump_DMUS_PORTPARAMS(port_params);
 134
 135     if (!rclsid_port)
 136         return E_POINTER;
 137     if (!port_params)
 138         return E_INVALIDARG;
 139     if (!port)
 140         return E_POINTER;
 141     if (unkouter)
 142         return CLASS_E_NOAGGREGATION;
 143
 144     if (TRACE_ON(dmusic))
 145         dump_DMUS_PORTPARAMS(port_params);
 146
 147     ZeroMemory(&port_caps, sizeof(DMUS_PORTCAPS));
 148     port_caps.dwSize = sizeof(DMUS_PORTCAPS);
 149
 150     if (IsEqualGUID(request_port, &GUID_NULL)) {
 151         hr = IDirectMusic8_GetDefaultPort(iface, &default_port);
 152         if(FAILED(hr))
 153             return hr;
 154         request_port = &default_port;
 155     }
 156
 157     for (i = 0; S_FALSE != IDirectMusic8Impl_EnumPort(iface, i, &port_caps); i++) {
 158         if (IsEqualCLSID(request_port, &port_caps.guidPort)) {
 159             hr = This->system_ports[i].create(&IID_IDirectMusicPort, (LPVOID*)&new_port, (LPUNKNOWN)This, port_params, &port_caps, This->system_ports[i].device);
 160             if (FAILED(hr)) {
 161                  *port = NULL;
 162                  return hr;
 163             }
 164             This->nrofports++;
 165             if (!This->ppPorts)
 166                 This->ppPorts = HeapAlloc(GetProcessHeap(), 0, sizeof(LPDIRECTMUSICPORT) * This->nrofports);
 167             else
 168                 This->ppPorts = HeapReAlloc(GetProcessHeap(), 0, This->ppPorts, sizeof(LPDIRECTMUSICPORT) * This->nrofports);
 169             This->ppPorts[This->nrofports - 1] = new_port;
 170             *port = new_port;
 171             return S_OK;
 172         }
 173     }
 174
 175     return E_NOINTERFACE;
 176 }
 177
 178 static HRESULT WINAPI IDirectMusic8Impl_EnumMasterClock(LPDIRECTMUSIC8 iface, DWORD index, LPDMUS_CLOCKINFO clock_info)
 179 {
 180     TRACE("(%p)->(%d, %p)\n", iface, index, clock_info);
 181
 182     if (!clock_info)
 183         return E_POINTER;
 184
 185     if (index > 1)
 186         return S_FALSE;
 187
 188     if (!index)
 189     {
 190         static const GUID guid_system_clock = { 0x58d58419, 0x71b4, 0x11d1, { 0xa7, 0x4c, 0x00, 0x00, 0xf8, 0x75, 0xac, 0x12 } };
 191         static const WCHAR name_system_clock[] = { 'S','y','s','t','e','m',' ','C','l','o','c','k',0 };
 192
 193         clock_info->ctType = 0;
 194         clock_info->guidClock = guid_system_clock;
 195         strcpyW(clock_info->wszDescription, name_system_clock);
 196     }
 197     else
 198     {
 199         static const GUID guid_dsound_clock = { 0x58d58420, 0x71b4, 0x11d1, { 0xa7, 0x4c, 0x00, 0x00, 0xf8, 0x75, 0xac, 0x12 } };
 200         static const WCHAR name_dsound_clock[] = { 'D','i','r','e','c','t','S','o','u','n','d',' ','C','l','o','c','k',0 };
 201
 202         clock_info->ctType = 0;
 203         clock_info->guidClock = guid_dsound_clock;
 204         strcpyW(clock_info->wszDescription, name_dsound_clock);
 205     }
 206
 207     return S_OK;
 208 }
 209
 210 static HRESULT WINAPI IDirectMusic8Impl_GetMasterClock(LPDIRECTMUSIC8 iface, LPGUID guid_clock, IReferenceClock** reference_clock)
 211 {
 212     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 213
 214     TRACE("(%p)->(%p, %p)\n", This, guid_clock, reference_clock);
 215
 216     if (guid_clock)
 217         *guid_clock = This->pMasterClock->pClockInfo.guidClock;
 218     if (reference_clock)
 219         *reference_clock = (IReferenceClock*)This->pMasterClock;
 220
 221     return S_OK;
 222 }
 223
 224 static HRESULT WINAPI IDirectMusic8Impl_SetMasterClock(LPDIRECTMUSIC8 iface, REFGUID rguidClock)
 225 {
 226     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 227
 228     FIXME("(%p)->(%s): stub\n", This, debugstr_dmguid(rguidClock));
 229
 230     return S_OK;
 231 }
 232
 233 static HRESULT WINAPI IDirectMusic8Impl_Activate(LPDIRECTMUSIC8 iface, BOOL enable)
 234 {
 235     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 236     int i;
 237     HRESULT hr;
 238
 239     TRACE("(%p)->(%u)\n", This, enable);
 240
 241     for (i = 0; i < This->nrofports; i++)
 242     {
 243         hr = IDirectMusicPort_Activate(This->ppPorts[i], enable);
 244         if (FAILED(hr))
 245             return hr;
 246     }
 247
 248     return S_OK;
 249 }
 250
 251 static HRESULT WINAPI IDirectMusic8Impl_GetDefaultPort(LPDIRECTMUSIC8 iface, LPGUID guid_port)
 252 {
 253     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 254     HKEY hkGUID;
 255     DWORD returnTypeGUID, sizeOfReturnBuffer = 50;
 256     char returnBuffer[51];
 257     GUID defaultPortGUID;
 258     WCHAR buff[51];
 259
 260     TRACE("(%p)->(%p)\n", This, guid_port);
 261
 262     if ((RegOpenKeyExA(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\DirectMusic\\Defaults" , 0, KEY_READ, &hkGUID) != ERROR_SUCCESS) ||
 263         (RegQueryValueExA(hkGUID, "DefaultOutputPort", NULL, &returnTypeGUID, (LPBYTE)returnBuffer, &sizeOfReturnBuffer) != ERROR_SUCCESS))
 264     {
 265         WARN(": registry entry missing\n" );
 266         *guid_port = CLSID_DirectMusicSynth;
 267         return S_OK;
 268     }
 269     /* FIXME: Check return types to ensure we're interpreting data right */
 270     MultiByteToWideChar(CP_ACP, 0, returnBuffer, -1, buff, sizeof(buff) / sizeof(WCHAR));
 271     CLSIDFromString(buff, &defaultPortGUID);
 272     *guid_port = defaultPortGUID;
 273
 274     return S_OK;
 275 }
 276
 277 static HRESULT WINAPI IDirectMusic8Impl_SetDirectSound(LPDIRECTMUSIC8 iface, LPDIRECTSOUND dsound, HWND wnd)
 278 {
 279     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 280
 281     FIXME("(%p)->(%p, %p): stub\n", This, dsound, wnd);
 282
 283     return S_OK;
 284 }
 285
 286 static HRESULT WINAPI IDirectMusic8Impl_SetExternalMasterClock(LPDIRECTMUSIC8 iface, IReferenceClock* clock)
 287 {
 288     IDirectMusic8Impl *This = impl_from_IDirectMusic8(iface);
 289
 290     FIXME("(%p)->(%p): stub\n", This, clock);
 291
 292     return S_OK;
 293 }
 294
 295 static const IDirectMusic8Vtbl DirectMusic8_Vtbl = {
 296     IDirectMusic8Impl_QueryInterface,
 297     IDirectMusic8Impl_AddRef,
 298     IDirectMusic8Impl_Release,
 299     IDirectMusic8Impl_EnumPort,
 300     IDirectMusic8Impl_CreateMusicBuffer,
 301     IDirectMusic8Impl_CreatePort,
 302     IDirectMusic8Impl_EnumMasterClock,
 303     IDirectMusic8Impl_GetMasterClock,
 304     IDirectMusic8Impl_SetMasterClock,
 305     IDirectMusic8Impl_Activate,
 306     IDirectMusic8Impl_GetDefaultPort,
 307     IDirectMusic8Impl_SetDirectSound,
 308     IDirectMusic8Impl_SetExternalMasterClock
 309 };
 310
 311 static void create_system_ports_list(IDirectMusic8Impl* object)
 312 {
 313     port_info * port;
 314     const WCHAR emulated[] = {' ','[','E','m','u','l','a','t','e','d',']',0};
 315     ULONG nb_ports;
 316     ULONG nb_midi_out;
 317     ULONG nb_midi_in;
 318     MIDIOUTCAPSW caps_out;
 319     MIDIINCAPSW caps_in;
 320     IDirectMusicSynth8* synth;
 321     HRESULT hr;
 322     int i;
 323
 324     TRACE("(%p)\n", object);
 325
 326     /* NOTE:
 327        - it seems some native versions get the rest of devices through dmusic32.EnumLegacyDevices...*sigh*...which is undocumented
 328        - should we enum wave devices ? Native does not seem to
 329     */
 330
 331     nb_midi_out = midiOutGetNumDevs();
 332     nb_midi_in = midiInGetNumDevs();
 333     nb_ports = 1 /* midi mapper */ + nb_midi_out + nb_midi_in + 1 /* synth port */;
 334
 335     port = object->system_ports = HeapAlloc(GetProcessHeap(), 0, nb_ports * sizeof(port_info));
 336     if (!object->system_ports)
 337         return;
 338
 339     /* Fill common port caps for all winmm ports */
 340     for (i = 0; i < (nb_ports - 1 /* synth port*/); i++)
 341     {
 342         object->system_ports[i].caps.dwSize = sizeof(DMUS_PORTCAPS);
 343         object->system_ports[i].caps.dwType = DMUS_PORT_WINMM_DRIVER;
 344         object->system_ports[i].caps.dwMemorySize = 0;
 345         object->system_ports[i].caps.dwMaxChannelGroups = 1;
 346         object->system_ports[i].caps.dwMaxVoices = 0;
 347         object->system_ports[i].caps.dwMaxAudioChannels = 0;
 348         object->system_ports[i].caps.dwEffectFlags = DMUS_EFFECT_NONE;
 349         /* Fake port GUID */
 350         object->system_ports[i].caps.guidPort = IID_IUnknown;
 351         object->system_ports[i].caps.guidPort.Data1 = i + 1;
 352     }
 353
 354     /* Fill midi mapper port info */
 355     port->device = MIDI_MAPPER;
 356     port->create = DMUSIC_CreateMidiOutPortImpl;
 357     midiOutGetDevCapsW(MIDI_MAPPER, &caps_out, sizeof(caps_out));
 358     strcpyW(port->caps.wszDescription, caps_out.szPname);
 359     strcatW(port->caps.wszDescription, emulated);
 360     port->caps.dwFlags = DMUS_PC_SHAREABLE;
 361     port->caps.dwClass = DMUS_PC_OUTPUTCLASS;
 362     port++;
 363
 364     /* Fill midi out port info */
 365     for (i = 0; i < nb_midi_out; i++)
 366     {
 367         port->device = i;
 368         port->create = DMUSIC_CreateMidiOutPortImpl;
 369         midiOutGetDevCapsW(i, &caps_out, sizeof(caps_out));
 370         strcpyW(port->caps.wszDescription, caps_out.szPname);
 371         strcatW(port->caps.wszDescription, emulated);
 372         port->caps.dwFlags = DMUS_PC_SHAREABLE | DMUS_PC_EXTERNAL;
 373         port->caps.dwClass = DMUS_PC_OUTPUTCLASS;
 374         port++;
 375     }
 376
 377     /* Fill midi in port info */
 378     for (i = 0; i < nb_midi_in; i++)
 379     {
 380         port->device = i;
 381         port->create = DMUSIC_CreateMidiInPortImpl;
 382         midiInGetDevCapsW(i, &caps_in, sizeof(caps_in));
 383         strcpyW(port->caps.wszDescription, caps_in.szPname);
 384         strcatW(port->caps.wszDescription, emulated);
 385         port->caps.dwFlags = DMUS_PC_EXTERNAL;
 386         port->caps.dwClass = DMUS_PC_INPUTCLASS;
 387         port++;
 388     }
 389
 390     /* Fill synth port info */
 391     port->create = DMUSIC_CreateSynthPortImpl;
 392     hr = CoCreateInstance(&CLSID_DirectMusicSynth, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusicSynth8, (void**)&synth);
 393     if (SUCCEEDED(hr))
 394     {
 395         hr = IDirectMusicSynth8_GetPortCaps(synth, &port->caps);
 396         IDirectMusicSynth8_Release(synth);
 397     }
 398     if (FAILED(hr))
 399         nb_ports--;
 400
 401     object->nb_system_ports = nb_ports;
 402 }
 403
 404 /* For ClassFactory */
 405 HRESULT WINAPI DMUSIC_CreateDirectMusicImpl(LPCGUID riid, LPVOID* ret_iface, LPUNKNOWN unkouter)
 406 {
 407     IDirectMusic8Impl *dmusic;
 408     HRESULT ret;
 409
 410     TRACE("(%p,%p,%p)\n", riid, ret_iface, unkouter);
 411
 412     *ret_iface = NULL;
 413
 414     dmusic = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusic8Impl));
 415     if (!dmusic)
 416         return E_OUTOFMEMORY;
 417
 418     dmusic->IDirectMusic8_iface.lpVtbl = &DirectMusic8_Vtbl;
 419     dmusic->ref = 0; /* Will be inited by QueryInterface */
 420     dmusic->pMasterClock = NULL;
 421     dmusic->ppPorts = NULL;
 422     dmusic->nrofports = 0;
 423     ret = DMUSIC_CreateReferenceClockImpl(&IID_IReferenceClock, (LPVOID*)&dmusic->pMasterClock, NULL);
 424     if (FAILED(ret)) {
 425         HeapFree(GetProcessHeap(), 0, dmusic);
 426         return ret;
 427     }
 428
 429     ret = IDirectMusic8Impl_QueryInterface(&dmusic->IDirectMusic8_iface, riid, ret_iface);
 430     if (FAILED(ret)) {
 431         IReferenceClock_Release(&dmusic->pMasterClock->IReferenceClock_iface);
 432         HeapFree(GetProcessHeap(), 0, dmusic);
 433         return ret;
 434     }
 435
 436     create_system_ports_list(dmusic);
 437
 438     return S_OK;
 439 }