dlls/dmsynth/synth.c

   1 /*
   2  * IDirectMusicSynth8 Implementation
   3  *
   4  * Copyright (C) 2003-2004 Rok Mandeljc
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #define COBJMACROS
  22
  23 #include "objbase.h"
  24 #include "initguid.h"
  25 #include "dmksctrl.h"
  26
  27 #include "dmsynth_private.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(dmsynth);
  30
  31 static inline IDirectMusicSynth8Impl *impl_from_IDirectMusicSynth8(IDirectMusicSynth8 *iface)
  32 {
  33     return CONTAINING_RECORD(iface, IDirectMusicSynth8Impl, IDirectMusicSynth8_iface);
  34 }
  35
  36 /* IDirectMusicSynth8Impl IUnknown part: */
  37 static HRESULT WINAPI IDirectMusicSynth8Impl_QueryInterface(LPDIRECTMUSICSYNTH8 iface, REFIID riid, LPVOID *ppobj)
  38 {
  39         IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  40
  41         TRACE("(%p, %s, %p)\n", This, debugstr_dmguid(riid), ppobj);
  42
  43         if (IsEqualIID (riid, &IID_IUnknown) ||
  44             IsEqualIID (riid, &IID_IDirectMusicSynth) ||
  45             IsEqualIID (riid, &IID_IDirectMusicSynth8)) {
  46                 IUnknown_AddRef(iface);
  47                 *ppobj = This;
  48                 return S_OK;
  49         }
  50     else if (IsEqualIID(riid, &IID_IKsControl)) {
  51                 IUnknown_AddRef(iface);
  52                 *ppobj = &This->IKsControl_iface;
  53                 return S_OK;
  54     }
  55
  56         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ppobj);
  57         return E_NOINTERFACE;
  58 }
  59
  60 static ULONG WINAPI IDirectMusicSynth8Impl_AddRef(LPDIRECTMUSICSYNTH8 iface)
  61 {
  62     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  63     ULONG ref = InterlockedIncrement(&This->ref);
  64
  65     TRACE("(%p)->(): new ref = %u\n", This, ref);
  66
  67     DMSYNTH_LockModule();
  68
  69     return ref;
  70 }
  71
  72 static ULONG WINAPI IDirectMusicSynth8Impl_Release(LPDIRECTMUSICSYNTH8 iface)
  73 {
  74     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  75     ULONG ref = InterlockedDecrement(&This->ref);
  76
  77     TRACE("(%p)->(): new ref = %u\n", This, ref);
  78
  79     if (!ref) {
  80         if (This->pLatencyClock)
  81             IReferenceClock_Release(This->pLatencyClock);
  82         HeapFree(GetProcessHeap(), 0, This);
  83     }
  84
  85     DMSYNTH_UnlockModule();
  86
  87     return ref;
  88 }
  89
  90 /* IDirectMusicSynth8Impl IDirectMusicSynth part: */
  91 static HRESULT WINAPI IDirectMusicSynth8Impl_Open(LPDIRECTMUSICSYNTH8 iface, LPDMUS_PORTPARAMS pPortParams)
  92 {
  93     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  94
  95     FIXME("(%p)->(%p): stub\n", This, pPortParams);
  96
  97     return S_OK;
  98 }
  99
 100 static HRESULT WINAPI IDirectMusicSynth8Impl_Close(LPDIRECTMUSICSYNTH8 iface)
 101 {
 102     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 103
 104     FIXME("(%p)->(): stub\n", This);
 105
 106     return S_OK;
 107 }
 108
 109 static HRESULT WINAPI IDirectMusicSynth8Impl_SetNumChannelGroups(LPDIRECTMUSICSYNTH8 iface, DWORD groups)
 110 {
 111     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 112
 113     FIXME("(%p->(%d): stub\n", This, groups);
 114
 115     return S_OK;
 116 }
 117
 118 static HRESULT WINAPI IDirectMusicSynth8Impl_Download(LPDIRECTMUSICSYNTH8 iface, LPHANDLE hDownload, LPVOID data, LPBOOL free)
 119 {
 120     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 121
 122     FIXME("(%p)->(%p, %p, %p): stub\n", This, hDownload, data, free);
 123
 124     return S_OK;
 125 }
 126
 127 static HRESULT WINAPI IDirectMusicSynth8Impl_Unload(LPDIRECTMUSICSYNTH8 iface, HANDLE hDownload, HRESULT (CALLBACK* lpFreeHandle)(HANDLE,HANDLE), HANDLE hUserData)
 128 {
 129     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 130
 131     FIXME("(%p)->(%p, %p, %p): stub\n", This, hDownload, lpFreeHandle, hUserData);
 132
 133     return S_OK;
 134 }
 135
 136 static HRESULT WINAPI IDirectMusicSynth8Impl_PlayBuffer(LPDIRECTMUSICSYNTH8 iface, REFERENCE_TIME rt, LPBYTE buffer, DWORD size)
 137 {
 138     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 139
 140     FIXME("(%p)->(0x%s, %p, %u): stub\n", This, wine_dbgstr_longlong(rt), buffer, size);
 141
 142     return S_OK;
 143 }
 144
 145 static HRESULT WINAPI IDirectMusicSynth8Impl_GetRunningStats(LPDIRECTMUSICSYNTH8 iface, LPDMUS_SYNTHSTATS stats)
 146 {
 147     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 148
 149     FIXME("(%p)->(%p): stub\n", This, stats);
 150
 151     return S_OK;
 152 }
 153
 154 static HRESULT WINAPI IDirectMusicSynth8Impl_GetPortCaps(LPDIRECTMUSICSYNTH8 iface, LPDMUS_PORTCAPS caps)
 155 {
 156     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 157
 158     TRACE("(%p)->(%p)\n", This, caps);
 159
 160     *caps = This->pCaps;
 161
 162     return S_OK;
 163 }
 164
 165 static HRESULT WINAPI IDirectMusicSynth8Impl_SetMasterClock(LPDIRECTMUSICSYNTH8 iface, IReferenceClock* clock)
 166 {
 167     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 168
 169     FIXME("(%p)->(%p): stub\n", This, clock);
 170
 171     return S_OK;
 172 }
 173
 174 static HRESULT WINAPI IDirectMusicSynth8Impl_GetLatencyClock(LPDIRECTMUSICSYNTH8 iface, IReferenceClock** clock)
 175 {
 176     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 177
 178     TRACE("(%p)->(%p)\n", iface, clock);
 179
 180     if (!clock)
 181         return E_POINTER;
 182
 183     if (!This->pSynthSink)
 184         return DMUS_E_NOSYNTHSINK;
 185
 186     *clock = This->pLatencyClock;
 187     IReferenceClock_AddRef(This->pLatencyClock);
 188
 189     return S_OK;
 190 }
 191
 192 static HRESULT WINAPI IDirectMusicSynth8Impl_Activate(LPDIRECTMUSICSYNTH8 iface, BOOL enable)
 193 {
 194     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 195
 196     TRACE("(%p)->(%d)\n", This, enable);
 197
 198     This->fActive = enable;
 199
 200     return S_OK;
 201 }
 202
 203 static HRESULT WINAPI IDirectMusicSynth8Impl_SetSynthSink(LPDIRECTMUSICSYNTH8 iface, IDirectMusicSynthSink* synth_sink)
 204 {
 205     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 206
 207     TRACE("(%p)->(%p)\n", iface, synth_sink);
 208
 209     This->pSynthSink = (IDirectMusicSynthSinkImpl*)synth_sink;
 210
 211     if (synth_sink)
 212         return IDirectMusicSynthSink_GetLatencyClock(synth_sink, &This->pLatencyClock);
 213
 214     return S_OK;
 215 }
 216
 217 static HRESULT WINAPI IDirectMusicSynth8Impl_Render(LPDIRECTMUSICSYNTH8 iface, short* buffer, DWORD length, LONGLONG position)
 218 {
 219     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 220
 221     FIXME("(%p)->(%p, %d, 0x%s): stub\n", This, buffer, length, wine_dbgstr_longlong(position));
 222
 223     return S_OK;
 224 }
 225
 226 static HRESULT WINAPI IDirectMusicSynth8Impl_SetChannelPriority(LPDIRECTMUSICSYNTH8 iface, DWORD channel_group, DWORD channel, DWORD priority)
 227 {
 228     /* IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface); */
 229
 230     /* Silenced because of too many messages - 1000 groups * 16 channels ;=) */
 231     /* FIXME("(%p)->(%ld, %ld, %ld): stub\n", This, channel_group, channel, priority); */
 232
 233     return S_OK;
 234 }
 235
 236 static HRESULT WINAPI IDirectMusicSynth8Impl_GetChannelPriority(LPDIRECTMUSICSYNTH8 iface, DWORD channel_group, DWORD channel, LPDWORD priority)
 237 {
 238     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 239
 240     FIXME("(%p)->(%d, %d, %p): stub\n", This, channel_group, channel, priority);
 241
 242     return S_OK;
 243 }
 244
 245 static HRESULT WINAPI IDirectMusicSynth8Impl_GetFormat(LPDIRECTMUSICSYNTH8 iface, LPWAVEFORMATEX wave_format, LPDWORD wave_format_size)
 246 {
 247     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 248
 249     FIXME("(%p)->(%p, %p): stub\n", This, wave_format, wave_format_size);
 250
 251     return S_OK;
 252 }
 253
 254 static HRESULT WINAPI IDirectMusicSynth8Impl_GetAppend(LPDIRECTMUSICSYNTH8 iface, DWORD* append)
 255 {
 256     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 257
 258     FIXME("(%p)->(%p): stub\n", This, append);
 259
 260     return S_OK;
 261 }
 262
 263 /* IDirectMusicSynth8Impl IDirectMusicSynth8 part: */
 264 static HRESULT WINAPI IDirectMusicSynth8Impl_PlayVoice(LPDIRECTMUSICSYNTH8 iface, REFERENCE_TIME ref_time, DWORD voice_id, DWORD channel_group, DWORD channel,
 265                                                        DWORD dwDLId, LONG prPitch, LONG vrVolume, SAMPLE_TIME stVoiceStart, SAMPLE_TIME stLoopStart, SAMPLE_TIME stLoopEnd)
 266 {
 267     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 268
 269     FIXME("(%p)->(0x%s, %d, %d, %d, %d, %i, %i,0x%s, 0x%s, 0x%s): stub\n",
 270           This, wine_dbgstr_longlong(ref_time), voice_id, channel_group, channel, dwDLId, prPitch, vrVolume,
 271           wine_dbgstr_longlong(stVoiceStart), wine_dbgstr_longlong(stLoopStart), wine_dbgstr_longlong(stLoopEnd));
 272
 273     return S_OK;
 274 }
 275
 276 static HRESULT WINAPI IDirectMusicSynth8Impl_StopVoice(LPDIRECTMUSICSYNTH8 iface, REFERENCE_TIME ref_time, DWORD voice_id)
 277 {
 278     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 279
 280     FIXME("(%p)->(0x%s, %d): stub\n", This, wine_dbgstr_longlong(ref_time), voice_id);
 281
 282     return S_OK;
 283 }
 284
 285 static HRESULT WINAPI IDirectMusicSynth8Impl_GetVoiceState(LPDIRECTMUSICSYNTH8 iface, DWORD dwVoice[], DWORD cbVoice, DMUS_VOICE_STATE dwVoiceState[])
 286 {
 287     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 288
 289     FIXME("(%p)->(%p, %d, %p): stub\n", This, dwVoice, cbVoice, dwVoiceState);
 290
 291     return S_OK;
 292 }
 293
 294 static HRESULT WINAPI IDirectMusicSynth8Impl_Refresh(LPDIRECTMUSICSYNTH8 iface, DWORD download_id, DWORD flags)
 295 {
 296     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 297
 298     FIXME("(%p)->(%d, %d): stub\n", This, download_id, flags);
 299
 300     return S_OK;
 301 }
 302
 303 static HRESULT WINAPI IDirectMusicSynth8Impl_AssignChannelToBuses(LPDIRECTMUSICSYNTH8 iface, DWORD channel_group, DWORD channel, LPDWORD pdwBuses, DWORD cBuses)
 304 {
 305     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 306
 307     FIXME("(%p)->(%d, %d, %p, %d): stub\n", This, channel_group, channel, pdwBuses, cBuses);
 308
 309     return S_OK;
 310 }
 311
 312 static const IDirectMusicSynth8Vtbl DirectMusicSynth8_Vtbl = {
 313         IDirectMusicSynth8Impl_QueryInterface,
 314         IDirectMusicSynth8Impl_AddRef,
 315         IDirectMusicSynth8Impl_Release,
 316         IDirectMusicSynth8Impl_Open,
 317         IDirectMusicSynth8Impl_Close,
 318         IDirectMusicSynth8Impl_SetNumChannelGroups,
 319         IDirectMusicSynth8Impl_Download,
 320         IDirectMusicSynth8Impl_Unload,
 321         IDirectMusicSynth8Impl_PlayBuffer,
 322         IDirectMusicSynth8Impl_GetRunningStats,
 323         IDirectMusicSynth8Impl_GetPortCaps,
 324         IDirectMusicSynth8Impl_SetMasterClock,
 325         IDirectMusicSynth8Impl_GetLatencyClock,
 326         IDirectMusicSynth8Impl_Activate,
 327         IDirectMusicSynth8Impl_SetSynthSink,
 328         IDirectMusicSynth8Impl_Render,
 329         IDirectMusicSynth8Impl_SetChannelPriority,
 330         IDirectMusicSynth8Impl_GetChannelPriority,
 331         IDirectMusicSynth8Impl_GetFormat,
 332         IDirectMusicSynth8Impl_GetAppend,
 333         IDirectMusicSynth8Impl_PlayVoice,
 334         IDirectMusicSynth8Impl_StopVoice,
 335         IDirectMusicSynth8Impl_GetVoiceState,
 336         IDirectMusicSynth8Impl_Refresh,
 337         IDirectMusicSynth8Impl_AssignChannelToBuses
 338 };
 339
 340 static inline IDirectMusicSynth8Impl *impl_from_IKsControl(IKsControl *iface)
 341 {
 342     return CONTAINING_RECORD(iface, IDirectMusicSynth8Impl, IKsControl_iface);
 343 }
 344
 345 static HRESULT WINAPI DMSynthImpl_IKsControl_QueryInterface(IKsControl* iface, REFIID riid, LPVOID *ppobj)
 346 {
 347     IDirectMusicSynth8Impl *This = impl_from_IKsControl(iface);
 348
 349     return IDirectMusicSynth8Impl_QueryInterface(&This->IDirectMusicSynth8_iface, riid, ppobj);
 350 }
 351
 352 static ULONG WINAPI DMSynthImpl_IKsControl_AddRef(IKsControl* iface)
 353 {
 354     IDirectMusicSynth8Impl *This = impl_from_IKsControl(iface);
 355
 356     return IDirectMusicSynth8Impl_AddRef(&This->IDirectMusicSynth8_iface);
 357 }
 358
 359 static ULONG WINAPI DMSynthImpl_IKsControl_Release(IKsControl* iface)
 360 {
 361     IDirectMusicSynth8Impl *This = impl_from_IKsControl(iface);
 362
 363     return IDirectMusicSynth8Impl_Release(&This->IDirectMusicSynth8_iface);
 364 }
 365
 366 static HRESULT WINAPI DMSynthImpl_IKsControl_KsProperty(IKsControl* iface, PKSPROPERTY Property, ULONG PropertyLength, LPVOID PropertyData,
 367                                                         ULONG DataLength, ULONG* BytesReturned)
 368 {
 369     FIXME("(%p)->(%p, %u, %p, %u, %p): stub\n", iface, Property, PropertyLength, PropertyData, DataLength, BytesReturned);
 370
 371     return E_NOTIMPL;
 372 }
 373
 374 static HRESULT WINAPI DMSynthImpl_IKsControl_KsMethod(IKsControl* iface, PKSMETHOD Method, ULONG MethodLength, LPVOID MethodData,
 375                                                       ULONG DataLength, ULONG* BytesReturned)
 376 {
 377     FIXME("(%p)->(%p, %u, %p, %u, %p): stub\n", iface, Method, MethodLength, MethodData, DataLength, BytesReturned);
 378
 379     return E_NOTIMPL;
 380 }
 381
 382 static HRESULT WINAPI DMSynthImpl_IKsControl_KsEvent(IKsControl* iface, PKSEVENT Event, ULONG EventLength, LPVOID EventData,
 383                                                      ULONG DataLength, ULONG* BytesReturned)
 384 {
 385     FIXME("(%p)->(%p, %u, %p, %u, %p): stub\n", iface, Event, EventLength, EventData, DataLength, BytesReturned);
 386
 387     return E_NOTIMPL;
 388 }
 389
 390
 391 static const IKsControlVtbl DMSynthImpl_IKsControl_Vtbl = {
 392     DMSynthImpl_IKsControl_QueryInterface,
 393     DMSynthImpl_IKsControl_AddRef,
 394     DMSynthImpl_IKsControl_Release,
 395     DMSynthImpl_IKsControl_KsProperty,
 396     DMSynthImpl_IKsControl_KsMethod,
 397     DMSynthImpl_IKsControl_KsEvent
 398 };
 399
 400 /* for ClassFactory */
 401 HRESULT WINAPI DMUSIC_CreateDirectMusicSynthImpl (LPCGUID lpcGUID, LPVOID* ppobj, LPUNKNOWN pUnkOuter)
 402 {
 403         IDirectMusicSynth8Impl *obj;
 404
 405         TRACE("(%p,%p,%p)\n", lpcGUID, ppobj, pUnkOuter);
 406         obj = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusicSynth8Impl));
 407         if (NULL == obj) {
 408                 *ppobj = NULL;
 409                 return E_OUTOFMEMORY;
 410         }
 411         obj->IDirectMusicSynth8_iface.lpVtbl = &DirectMusicSynth8_Vtbl;
 412         obj->IKsControl_iface.lpVtbl = &DMSynthImpl_IKsControl_Vtbl;
 413         obj->ref = 0;
 414         /* fill in caps */
 415         obj->pCaps.dwSize = sizeof(DMUS_PORTCAPS);
 416         obj->pCaps.dwFlags = DMUS_PC_DLS | DMUS_PC_SOFTWARESYNTH | DMUS_PC_DIRECTSOUND | DMUS_PC_DLS2 | DMUS_PC_AUDIOPATH | DMUS_PC_WAVE;
 417         obj->pCaps.guidPort = CLSID_DirectMusicSynth;
 418         obj->pCaps.dwClass = DMUS_PC_OUTPUTCLASS;
 419         obj->pCaps.dwType = DMUS_PORT_USER_MODE_SYNTH;
 420         obj->pCaps.dwMemorySize = DMUS_PC_SYSTEMMEMORY;
 421         obj->pCaps.dwMaxChannelGroups = 1000;
 422         obj->pCaps.dwMaxVoices = 1000;
 423         obj->pCaps.dwMaxAudioChannels = 2;
 424         obj->pCaps.dwEffectFlags = DMUS_EFFECT_REVERB;
 425         MultiByteToWideChar (CP_ACP, 0, "Microsoft Synthesizer", -1, obj->pCaps.wszDescription, sizeof(obj->pCaps.wszDescription)/sizeof(WCHAR));
 426
 427         return IDirectMusicSynth8Impl_QueryInterface ((LPDIRECTMUSICSYNTH8)obj, lpcGUID, ppobj);
 428 }