dlls/dmusic/dmusic.c

   1 /* IDirectMusic8 Implementation
   2  *
   3  * Copyright (C) 2003-2004 Rok Mandeljc
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include <stdio.h>
  21
  22 #include "dmusic_private.h"
  23
  24 WINE_DEFAULT_DEBUG_CHANNEL(dmusic);
  25
  26 /* IDirectMusic8Impl IUnknown part: */
  27 static HRESULT WINAPI IDirectMusic8Impl_QueryInterface (LPDIRECTMUSIC8 iface, REFIID riid, LPVOID *ppobj) {
  28         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
  29         TRACE("(%p, %s, %p)\n", This, debugstr_dmguid(riid), ppobj);
  30
  31         if (IsEqualIID (riid, &IID_IUnknown) ||
  32             IsEqualIID (riid, &IID_IDirectMusic) ||
  33             IsEqualIID (riid, &IID_IDirectMusic2) ||
  34             IsEqualIID (riid, &IID_IDirectMusic8)) {
  35                 IUnknown_AddRef(iface);
  36                 *ppobj = This;
  37                 return S_OK;
  38         }
  39
  40         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ppobj);
  41         return E_NOINTERFACE;
  42 }
  43
  44 static ULONG WINAPI IDirectMusic8Impl_AddRef (LPDIRECTMUSIC8 iface) {
  45         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
  46         ULONG refCount = InterlockedIncrement(&This->ref);
  47
  48         TRACE("(%p)->(ref before=%u)\n", This, refCount - 1);
  49
  50         DMUSIC_LockModule();
  51
  52         return refCount;
  53 }
  54
  55 static ULONG WINAPI IDirectMusic8Impl_Release (LPDIRECTMUSIC8 iface) {
  56         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
  57         ULONG refCount = InterlockedDecrement(&This->ref);
  58
  59         TRACE("(%p)->(ref before=%u)\n", This, refCount + 1);
  60
  61         if (!refCount) {
  62                 HeapFree(GetProcessHeap(), 0, This->ppPorts);
  63                 HeapFree(GetProcessHeap(), 0, This);
  64         }
  65
  66         DMUSIC_UnlockModule();
  67
  68         return refCount;
  69 }
  70
  71 /* IDirectMusic8Impl IDirectMusic part: */
  72 static HRESULT WINAPI IDirectMusic8Impl_EnumPort(LPDIRECTMUSIC8 iface, DWORD index, LPDMUS_PORTCAPS port_caps)
  73 {
  74     IDirectMusic8Impl *This = (IDirectMusic8Impl*)iface;
  75     ULONG nb_midi_out;
  76     ULONG nb_midi_in;
  77     const WCHAR emulated[] = {' ','[','E','m','u','l','a','t','e','d',']',0};
  78
  79     TRACE("(%p, %d, %p)\n", This, index, port_caps);
  80
  81     if (!port_caps)
  82         return E_POINTER;
  83
  84     /* NOTE: It seems some native versions get the rest of devices through dmusic32.EnumLegacyDevices...*sigh*...which is undocumented */
  85
  86     /* NOTE: Should we enum wave devices ? Native does not seem to */
  87
  88     /* Fill common port caps for winmm ports */
  89     port_caps->dwType = DMUS_PORT_WINMM_DRIVER;
  90     port_caps->dwMemorySize = 0;
  91     port_caps->dwMaxChannelGroups = 1;
  92     port_caps->dwMaxVoices = 0;
  93     port_caps->dwMaxAudioChannels = 0;
  94     port_caps->dwEffectFlags = DMUS_EFFECT_NONE;
  95     /* Fake port GUID */
  96     port_caps->guidPort = IID_IUnknown;
  97     port_caps->guidPort.Data1 = index + 1;
  98
  99     nb_midi_out = midiOutGetNumDevs();
 100
 101     if (index == 0)
 102     {
 103         MIDIOUTCAPSW caps;
 104         midiOutGetDevCapsW(MIDI_MAPPER, &caps, sizeof(caps));
 105         strcpyW(port_caps->wszDescription, caps.szPname);
 106         strcatW(port_caps->wszDescription, emulated);
 107         port_caps->dwFlags = DMUS_PC_SHAREABLE;
 108         port_caps->dwClass = DMUS_PC_OUTPUTCLASS;
 109         TRACE("Enumerating port: %s\n", debugstr_w(port_caps->wszDescription));
 110         return S_OK;
 111     }
 112
 113     if (index < (nb_midi_out + 1))
 114     {
 115         MIDIOUTCAPSW caps;
 116         midiOutGetDevCapsW(index - 1, &caps, sizeof(caps));
 117         strcpyW(port_caps->wszDescription, caps.szPname);
 118         strcatW(port_caps->wszDescription, emulated);
 119         port_caps->dwFlags = DMUS_PC_SHAREABLE | DMUS_PC_EXTERNAL;
 120         port_caps->dwClass = DMUS_PC_OUTPUTCLASS;
 121         TRACE("Enumerating port: %s\n", debugstr_w(port_caps->wszDescription));
 122         return S_OK;
 123     }
 124
 125     nb_midi_in = midiInGetNumDevs();
 126
 127     if (index < (nb_midi_in + nb_midi_out + 1))
 128     {
 129         MIDIINCAPSW caps;
 130         midiInGetDevCapsW(index - nb_midi_out - 1, &caps, sizeof(caps));
 131         strcpyW(port_caps->wszDescription, caps.szPname);
 132         strcatW(port_caps->wszDescription, emulated);
 133         port_caps->dwFlags = DMUS_PC_EXTERNAL;
 134         port_caps->dwClass = DMUS_PC_INPUTCLASS;
 135         TRACE("Enumerating port: %s\n", debugstr_w(port_caps->wszDescription));
 136         return S_OK;
 137     }
 138
 139     if (index == (nb_midi_in + nb_midi_out + 1))
 140     {
 141         IDirectMusicSynth8* synth = NULL;
 142         HRESULT hr;
 143         hr = CoCreateInstance(&CLSID_DirectMusicSynth, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusicSynth8, (void**)&synth);
 144         if (SUCCEEDED(hr))
 145             hr = IDirectMusicSynth8_GetPortCaps(synth, port_caps);
 146         if (SUCCEEDED(hr))
 147             TRACE("Enumerating port: %s\n", debugstr_w(port_caps->wszDescription));
 148         if (synth)
 149             IDirectMusicSynth8_Release(synth);
 150         return hr;
 151     }
 152
 153     return S_FALSE;
 154 }
 155
 156 static HRESULT WINAPI IDirectMusic8Impl_CreateMusicBuffer(LPDIRECTMUSIC8 iface, LPDMUS_BUFFERDESC pBufferDesc, LPDIRECTMUSICBUFFER* ppBuffer, LPUNKNOWN pUnkOuter)
 157 {
 158         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 159
 160         TRACE("(%p, %p, %p, %p)\n", This, pBufferDesc, ppBuffer, pUnkOuter);
 161
 162         if (pUnkOuter)
 163                 return CLASS_E_NOAGGREGATION;
 164
 165         if (!pBufferDesc || !ppBuffer)
 166                 return E_POINTER;
 167
 168         return DMUSIC_CreateDirectMusicBufferImpl(&IID_IDirectMusicBuffer, (LPVOID)ppBuffer, NULL);
 169 }
 170
 171 static HRESULT WINAPI IDirectMusic8Impl_CreatePort(LPDIRECTMUSIC8 iface, REFCLSID rclsidPort, LPDMUS_PORTPARAMS pPortParams, LPDIRECTMUSICPORT* ppPort, LPUNKNOWN pUnkOuter)
 172 {
 173         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 174         int i;
 175         DMUS_PORTCAPS PortCaps;
 176         IDirectMusicPort* pNewPort = NULL;
 177         HRESULT hr;
 178         GUID default_port;
 179         const GUID *request_port = rclsidPort;
 180
 181         TRACE("(%p, %s, %p, %p, %p)\n", This, debugstr_dmguid(rclsidPort), pPortParams, ppPort, pUnkOuter);
 182
 183         if (TRACE_ON(dmusic))
 184                 dump_DMUS_PORTPARAMS(pPortParams);
 185
 186         if (!rclsidPort)
 187                 return E_POINTER;
 188         if (!pPortParams)
 189                 return E_INVALIDARG;
 190         if (!ppPort)
 191                 return E_POINTER;
 192         if (pUnkOuter)
 193                 return CLASS_E_NOAGGREGATION;
 194
 195         if (TRACE_ON(dmusic))
 196                 dump_DMUS_PORTPARAMS(pPortParams);
 197
 198         ZeroMemory(&PortCaps, sizeof(DMUS_PORTCAPS));
 199         PortCaps.dwSize = sizeof(DMUS_PORTCAPS);
 200
 201         if(IsEqualGUID(request_port, &GUID_NULL)){
 202                 hr = IDirectMusic8_GetDefaultPort(iface, &default_port);
 203                 if(FAILED(hr))
 204                         return hr;
 205                 request_port = &default_port;
 206         }
 207
 208         for (i = 0; S_FALSE != IDirectMusic8Impl_EnumPort(iface, i, &PortCaps); i++) {
 209                 if (IsEqualCLSID (request_port, &PortCaps.guidPort)) {
 210                         hr = DMUSIC_CreateDirectMusicPortImpl(&IID_IDirectMusicPort, (LPVOID*) &pNewPort, (LPUNKNOWN) This, pPortParams, &PortCaps);
 211                         if (FAILED(hr)) {
 212                           *ppPort = NULL;
 213                           return hr;
 214                         }
 215                         This->nrofports++;
 216                         if (!This->ppPorts) This->ppPorts = HeapAlloc(GetProcessHeap(), 0, sizeof(LPDIRECTMUSICPORT) * This->nrofports);
 217                         else This->ppPorts = HeapReAlloc(GetProcessHeap(), 0, This->ppPorts, sizeof(LPDIRECTMUSICPORT) * This->nrofports);
 218                         This->ppPorts[This->nrofports - 1] = pNewPort;
 219                         *ppPort = pNewPort;
 220                         return S_OK;
 221                 }
 222         }
 223         return E_NOINTERFACE;
 224 }
 225
 226 static HRESULT WINAPI IDirectMusic8Impl_EnumMasterClock (LPDIRECTMUSIC8 iface, DWORD dwIndex, LPDMUS_CLOCKINFO lpClockInfo) {
 227         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 228         FIXME("(%p, %d, %p): stub\n", This, dwIndex, lpClockInfo);
 229         return S_FALSE;
 230 }
 231
 232 static HRESULT WINAPI IDirectMusic8Impl_GetMasterClock (LPDIRECTMUSIC8 iface, LPGUID pguidClock, IReferenceClock** ppReferenceClock) {
 233         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 234
 235         TRACE("(%p, %p, %p)\n", This, pguidClock, ppReferenceClock);
 236         if (pguidClock)
 237                 *pguidClock = This->pMasterClock->pClockInfo.guidClock;
 238         if(ppReferenceClock)
 239                 *ppReferenceClock = (IReferenceClock *)This->pMasterClock;
 240
 241         return S_OK;
 242 }
 243
 244 static HRESULT WINAPI IDirectMusic8Impl_SetMasterClock (LPDIRECTMUSIC8 iface, REFGUID rguidClock) {
 245         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 246         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidClock));
 247         return S_OK;
 248 }
 249
 250 static HRESULT WINAPI IDirectMusic8Impl_Activate (LPDIRECTMUSIC8 iface, BOOL fEnable) {
 251         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 252         int i;
 253
 254         FIXME("(%p, %d): stub\n", This, fEnable);
 255         for (i = 0; i < This->nrofports; i++) {
 256             IDirectMusicPort_Activate(This->ppPorts[i], fEnable);
 257         }
 258
 259         return S_OK;
 260 }
 261
 262 static HRESULT WINAPI IDirectMusic8Impl_GetDefaultPort (LPDIRECTMUSIC8 iface, LPGUID pguidPort) {
 263         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 264         HKEY hkGUID;
 265         DWORD returnTypeGUID, sizeOfReturnBuffer = 50;
 266         char returnBuffer[51];
 267         GUID defaultPortGUID;
 268         WCHAR buff[51];
 269
 270         TRACE("(%p, %p)\n", This, pguidPort);
 271         if ((RegOpenKeyExA(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\DirectMusic\\Defaults" , 0, KEY_READ, &hkGUID) != ERROR_SUCCESS) ||
 272             (RegQueryValueExA(hkGUID, "DefaultOutputPort", NULL, &returnTypeGUID, (LPBYTE)returnBuffer, &sizeOfReturnBuffer) != ERROR_SUCCESS))
 273         {
 274                 WARN(": registry entry missing\n" );
 275                 *pguidPort = CLSID_DirectMusicSynth;
 276                 return S_OK;
 277         }
 278         /* FIXME: Check return types to ensure we're interpreting data right */
 279         MultiByteToWideChar(CP_ACP, 0, returnBuffer, -1, buff, sizeof(buff) / sizeof(WCHAR));
 280         CLSIDFromString(buff, &defaultPortGUID);
 281         *pguidPort = defaultPortGUID;
 282
 283         return S_OK;
 284 }
 285
 286 static HRESULT WINAPI IDirectMusic8Impl_SetDirectSound (LPDIRECTMUSIC8 iface, LPDIRECTSOUND pDirectSound, HWND hWnd) {
 287         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 288         FIXME("(%p, %p, %p): stub\n", This, pDirectSound, hWnd);
 289         return S_OK;
 290 }
 291
 292 static HRESULT WINAPI IDirectMusic8Impl_SetExternalMasterClock (LPDIRECTMUSIC8 iface, IReferenceClock* pClock) {
 293         IDirectMusic8Impl *This = (IDirectMusic8Impl *)iface;
 294         FIXME("(%p, %p): stub\n", This, pClock);
 295         return S_OK;
 296 }
 297
 298 static const IDirectMusic8Vtbl DirectMusic8_Vtbl = {
 299         IDirectMusic8Impl_QueryInterface,
 300         IDirectMusic8Impl_AddRef,
 301         IDirectMusic8Impl_Release,
 302         IDirectMusic8Impl_EnumPort,
 303         IDirectMusic8Impl_CreateMusicBuffer,
 304         IDirectMusic8Impl_CreatePort,
 305         IDirectMusic8Impl_EnumMasterClock,
 306         IDirectMusic8Impl_GetMasterClock,
 307         IDirectMusic8Impl_SetMasterClock,
 308         IDirectMusic8Impl_Activate,
 309         IDirectMusic8Impl_GetDefaultPort,
 310         IDirectMusic8Impl_SetDirectSound,
 311         IDirectMusic8Impl_SetExternalMasterClock
 312 };
 313
 314 /* for ClassFactory */
 315 HRESULT WINAPI DMUSIC_CreateDirectMusicImpl (LPCGUID lpcGUID, LPVOID* ppobj, LPUNKNOWN pUnkOuter) {
 316         IDirectMusic8Impl *dmusic;
 317
 318         TRACE("(%p,%p,%p)\n",lpcGUID, ppobj, pUnkOuter);
 319
 320         dmusic = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusic8Impl));
 321         if (NULL == dmusic) {
 322                 *ppobj = NULL;
 323                 return E_OUTOFMEMORY;
 324         }
 325         dmusic->lpVtbl = &DirectMusic8_Vtbl;
 326         dmusic->ref = 0; /* will be inited with QueryInterface */
 327         dmusic->pMasterClock = NULL;
 328         dmusic->ppPorts = NULL;
 329         dmusic->nrofports = 0;
 330         DMUSIC_CreateReferenceClockImpl (&IID_IReferenceClock, (LPVOID*)&dmusic->pMasterClock, NULL);
 331
 332         return IDirectMusic8Impl_QueryInterface ((LPDIRECTMUSIC8)dmusic, lpcGUID, ppobj);
 333 }