dlls/dmsynth/synth.c

   1 /*
   2  * IDirectMusicSynth8 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 #define COBJMACROS
  23
  24 #define NONAMELESSUNION
  25 #define NONAMELESSSTRUCT
  26 #include "objbase.h"
  27 #include "initguid.h"
  28 #include "dmksctrl.h"
  29
  30 #include "dmsynth_private.h"
  31
  32 WINE_DEFAULT_DEBUG_CHANNEL(dmsynth);
  33
  34 static inline IDirectMusicSynth8Impl *impl_from_IDirectMusicSynth8(IDirectMusicSynth8 *iface)
  35 {
  36     return CONTAINING_RECORD(iface, IDirectMusicSynth8Impl, IDirectMusicSynth8_iface);
  37 }
  38
  39 /* IDirectMusicSynth8Impl IUnknown part: */
  40 static HRESULT WINAPI IDirectMusicSynth8Impl_QueryInterface(IDirectMusicSynth8 *iface, REFIID riid,
  41         void **ret_iface)
  42 {
  43     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  44
  45     TRACE("(%p)->(%s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
  46
  47     if (IsEqualIID (riid, &IID_IUnknown) ||
  48         IsEqualIID (riid, &IID_IDirectMusicSynth) ||
  49         IsEqualIID (riid, &IID_IDirectMusicSynth8))
  50     {
  51         IUnknown_AddRef(iface);
  52         *ret_iface = iface;
  53         return S_OK;
  54     }
  55     else if (IsEqualIID(riid, &IID_IKsControl))
  56     {
  57         IUnknown_AddRef(iface);
  58         *ret_iface = &This->IKsControl_iface;
  59         return S_OK;
  60     }
  61
  62     *ret_iface = NULL;
  63
  64     WARN("(%p)->(%s, %p): not found\n", iface, debugstr_dmguid(riid), ret_iface);
  65
  66     return E_NOINTERFACE;
  67 }
  68
  69 static ULONG WINAPI IDirectMusicSynth8Impl_AddRef(IDirectMusicSynth8 *iface)
  70 {
  71     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  72     ULONG ref = InterlockedIncrement(&This->ref);
  73
  74     TRACE("(%p): new ref = %lu\n", This, ref);
  75
  76     return ref;
  77 }
  78
  79 static ULONG WINAPI IDirectMusicSynth8Impl_Release(IDirectMusicSynth8 *iface)
  80 {
  81     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
  82     ULONG ref = InterlockedDecrement(&This->ref);
  83
  84     TRACE("(%p): new ref = %lu\n", This, ref);
  85
  86     if (!ref) {
  87         if (This->latency_clock)
  88             IReferenceClock_Release(This->latency_clock);
  89         HeapFree(GetProcessHeap(), 0, This);
  90         DMSYNTH_UnlockModule();
  91     }
  92
  93     return ref;
  94 }
  95
  96 /* IDirectMusicSynth8Impl IDirectMusicSynth part: */
  97 static HRESULT WINAPI IDirectMusicSynth8Impl_Open(IDirectMusicSynth8 *iface,
  98         DMUS_PORTPARAMS *pPortParams)
  99 {
 100     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 101
 102     FIXME("(%p)->(%p): stub\n", This, pPortParams);
 103
 104     return S_OK;
 105 }
 106
 107 static HRESULT WINAPI IDirectMusicSynth8Impl_Close(IDirectMusicSynth8 *iface)
 108 {
 109     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 110
 111     FIXME("(%p)->(): stub\n", This);
 112
 113     return S_OK;
 114 }
 115
 116 static HRESULT WINAPI IDirectMusicSynth8Impl_SetNumChannelGroups(IDirectMusicSynth8 *iface,
 117         DWORD groups)
 118 {
 119     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 120
 121     FIXME("(%p, %ld): stub\n", This, groups);
 122
 123     return S_OK;
 124 }
 125
 126 static HRESULT WINAPI IDirectMusicSynth8Impl_Download(IDirectMusicSynth8 *iface, HANDLE *hDownload,
 127         void *data, BOOL *free)
 128 {
 129     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 130     LPBYTE buffer = data;
 131     DMUS_DOWNLOADINFO *info = (DMUS_DOWNLOADINFO*)buffer;
 132     ULONG *offsets = ((DMUS_OFFSETTABLE*)(buffer + sizeof(DMUS_DOWNLOADINFO)))->ulOffsetTable;
 133     LPBYTE object = buffer + sizeof(DMUS_DOWNLOADINFO) + info->dwNumOffsetTableEntries * sizeof(ULONG);
 134
 135     FIXME("(%p)->(%p, %p, %p): stub\n", This, hDownload, data, free);
 136
 137     /* FIXME: Currently we only dump data which is very useful to known how native dmusic behave and debug builtin dmusic */
 138
 139     if (!hDownload || !free)
 140         return E_POINTER;
 141
 142     if (TRACE_ON(dmsynth))
 143     {
 144         TRACE("Dump DMUS_DOWNLOADINFO struct:\n");
 145         TRACE(" - dwDLType                = %lu\n", info->dwDLType);
 146         TRACE(" - dwDLId                  = %lu\n", info->dwDLId);
 147         TRACE(" - dwNumOffsetTableEntries = %lu\n", info->dwNumOffsetTableEntries);
 148         TRACE(" - cbSize                  = %lu\n", info->cbSize);
 149     }
 150
 151     /* The struct should have at least one offset corresponding to the download object itself */
 152     if (!info->dwNumOffsetTableEntries)
 153     {
 154         FIXME("Offset table is empty\n");
 155         return DMUS_E_BADOFFSETTABLE;
 156     }
 157
 158     /* First offset should point to the download object */
 159     if ((buffer + offsets[0]) != object)
 160     {
 161         FIXME("Object is not at the beginning\n");
 162         return DMUS_E_BADOFFSETTABLE;
 163     }
 164
 165     if (info->dwDLType == DMUS_DOWNLOADINFO_INSTRUMENT)
 166     {
 167         FIXME("Download type DMUS_DOWNLOADINFO_INSTRUMENT not yet supported\n");
 168     }
 169     else if (info->dwDLType == DMUS_DOWNLOADINFO_WAVE)
 170     {
 171         DMUS_WAVE *wave = (DMUS_WAVE*)object;
 172         DMUS_WAVEDATA *wave_data;
 173
 174         TRACE("Processing download type DMUS_DOWNLOADINFO_WAVE\n");
 175
 176         if (TRACE_ON(dmsynth))
 177         {
 178             TRACE("Dump DMUS_WAVE struct\n");
 179             TRACE(" - ulFirstExtCkIdx   = %lu\n", wave->ulFirstExtCkIdx);
 180             TRACE(" - ulCopyrightIdx    = %lu\n", wave->ulCopyrightIdx);
 181             TRACE(" - ulWaveDataIdx     = %lu\n", wave->ulWaveDataIdx);
 182             TRACE(" - WaveformatEx:\n");
 183             TRACE("   - wFormatTag      = %u\n", wave->WaveformatEx.wFormatTag);
 184             TRACE("   - nChannels       = %u\n", wave->WaveformatEx.nChannels);
 185             TRACE("   - nSamplesPerSec  = %lu\n", wave->WaveformatEx.nSamplesPerSec);
 186             TRACE("   - nAvgBytesPerSec = %lu\n", wave->WaveformatEx.nAvgBytesPerSec);
 187             TRACE("   - nBlockAlign     = %u\n", wave->WaveformatEx.nBlockAlign);
 188             TRACE("   - wBitsPerSample  = %u\n", wave->WaveformatEx.wBitsPerSample);
 189             TRACE("   - cbSize          = %u\n", wave->WaveformatEx.cbSize);
 190
 191             if (wave->ulCopyrightIdx)
 192             {
 193                 DMUS_COPYRIGHT *copyright = (DMUS_COPYRIGHT*)(buffer + offsets[wave->ulCopyrightIdx]);
 194                 TRACE("Copyright = '%s'\n",  (char*)copyright->byCopyright);
 195             }
 196
 197             wave_data = (DMUS_WAVEDATA*)(buffer + offsets[wave->ulWaveDataIdx]);
 198             TRACE("Found %lu bytes of wave data\n", wave_data->cbSize);
 199         }
 200     }
 201     else if (info->dwDLType == DMUS_DOWNLOADINFO_INSTRUMENT2)
 202     {
 203         DMUS_INSTRUMENT *instrument = (DMUS_INSTRUMENT*)object;
 204         ULONG nb_regions = 0;
 205
 206         TRACE("Processing download type DMUS_DOWNLOADINFO_INSTRUMENT2\n");
 207
 208         if (TRACE_ON(dmsynth))
 209         {
 210             TRACE("Dump DMUS_INSTRUMENT struct\n");
 211             TRACE(" - ulPatch          = %lu\n", instrument->ulPatch);
 212             TRACE(" - ulFirstRegionIdx = %lu\n", instrument->ulFirstRegionIdx);
 213             TRACE(" - ulGlobalArtIdx   = %lu\n", instrument->ulGlobalArtIdx);
 214             TRACE(" - ulFirstExtCkIdx  = %lu\n", instrument->ulFirstExtCkIdx);
 215             TRACE(" - ulCopyrightIdx   = %lu\n", instrument->ulCopyrightIdx);
 216             TRACE(" - ulFlags          = %lu\n", instrument->ulFlags);
 217
 218             if (instrument->ulCopyrightIdx)
 219             {
 220                 DMUS_COPYRIGHT *copyright = (DMUS_COPYRIGHT*)(buffer + offsets[instrument->ulCopyrightIdx]);
 221                 TRACE("Copyright = '%s'\n",  (char*)copyright->byCopyright);
 222             }
 223         }
 224
 225         if (instrument->ulFirstRegionIdx)
 226         {
 227             ULONG region_idx = instrument->ulFirstRegionIdx;
 228
 229             while (region_idx)
 230             {
 231                 DMUS_REGION *region = (DMUS_REGION*)(buffer + offsets[region_idx]);
 232
 233                 region_idx = region->ulNextRegionIdx;
 234                 nb_regions++;
 235             }
 236         }
 237
 238         TRACE("Number of regions = %lu\n", nb_regions);
 239     }
 240     else if (info->dwDLType == DMUS_DOWNLOADINFO_WAVEARTICULATION)
 241     {
 242         FIXME("Download type DMUS_DOWNLOADINFO_WAVEARTICULATION not yet supported\n");
 243     }
 244     else if (info->dwDLType == DMUS_DOWNLOADINFO_STREAMINGWAVE)
 245     {
 246         FIXME("Download type DMUS_DOWNLOADINFO_STREAMINGWAVE not yet supported\n");
 247     }
 248     else if (info->dwDLType == DMUS_DOWNLOADINFO_ONESHOTWAVE)
 249     {
 250         FIXME("Download type DMUS_DOWNLOADINFO_ONESHOTWAVE not yet supported\n");
 251     }
 252     else
 253     {
 254         WARN("Unknown download type %lu\n", info->dwDLType);
 255         return DMUS_E_UNKNOWNDOWNLOAD;
 256     }
 257
 258     return S_OK;
 259 }
 260
 261 static HRESULT WINAPI IDirectMusicSynth8Impl_Unload(IDirectMusicSynth8 *iface, HANDLE hDownload,
 262         HRESULT (CALLBACK *lpFreeHandle)(HANDLE,HANDLE), HANDLE hUserData)
 263 {
 264     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 265
 266     FIXME("(%p)->(%p, %p, %p): stub\n", This, hDownload, lpFreeHandle, hUserData);
 267
 268     return S_OK;
 269 }
 270
 271 static HRESULT WINAPI IDirectMusicSynth8Impl_PlayBuffer(IDirectMusicSynth8 *iface,
 272         REFERENCE_TIME rt, BYTE *buffer, DWORD size)
 273 {
 274     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 275
 276     FIXME("(%p, 0x%s, %p, %lu): stub\n", This, wine_dbgstr_longlong(rt), buffer, size);
 277
 278     return S_OK;
 279 }
 280
 281 static HRESULT WINAPI IDirectMusicSynth8Impl_GetRunningStats(IDirectMusicSynth8 *iface,
 282         DMUS_SYNTHSTATS *stats)
 283 {
 284     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 285
 286     FIXME("(%p)->(%p): stub\n", This, stats);
 287
 288     return S_OK;
 289 }
 290
 291 static HRESULT WINAPI IDirectMusicSynth8Impl_GetPortCaps(IDirectMusicSynth8 *iface,
 292         DMUS_PORTCAPS *caps)
 293 {
 294     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 295
 296     TRACE("(%p)->(%p)\n", This, caps);
 297
 298     if (!caps || caps->dwSize < sizeof(*caps))
 299         return E_INVALIDARG;
 300
 301     *caps = This->caps;
 302
 303     return S_OK;
 304 }
 305
 306 static HRESULT WINAPI IDirectMusicSynth8Impl_SetMasterClock(IDirectMusicSynth8 *iface,
 307         IReferenceClock *clock)
 308 {
 309     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 310
 311     TRACE("(%p)->(%p)\n", This, clock);
 312
 313     if (!This->sink)
 314         return DMUS_E_NOSYNTHSINK;
 315
 316     return IDirectMusicSynthSink_SetMasterClock(This->sink, clock);
 317 }
 318
 319 static HRESULT WINAPI IDirectMusicSynth8Impl_GetLatencyClock(IDirectMusicSynth8 *iface,
 320         IReferenceClock **clock)
 321 {
 322     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 323
 324     TRACE("(%p)->(%p)\n", iface, clock);
 325
 326     if (!clock)
 327         return E_POINTER;
 328
 329     if (!This->sink)
 330         return DMUS_E_NOSYNTHSINK;
 331
 332     *clock = This->latency_clock;
 333     IReferenceClock_AddRef(This->latency_clock);
 334
 335     return S_OK;
 336 }
 337
 338 static HRESULT WINAPI IDirectMusicSynth8Impl_Activate(IDirectMusicSynth8 *iface, BOOL enable)
 339 {
 340     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 341     HRESULT hr;
 342
 343     TRACE("(%p)->(%d)\n", This, enable);
 344
 345     if (!This->sink)
 346         return DMUS_E_NOSYNTHSINK;
 347
 348     if (enable == This->active) {
 349         if (enable)
 350             return DMUS_E_SYNTHACTIVE;
 351         else
 352             return S_FALSE;
 353     }
 354
 355     if ((hr = IDirectMusicSynthSink_Activate(This->sink, enable)) != S_OK) {
 356         if (hr == DMUS_E_SYNTHACTIVE || hr == S_FALSE)
 357             WARN("Synth and sink active state out of sync. Fixing.\n");
 358         else
 359             return hr;
 360     }
 361
 362     This->active = enable;
 363
 364     return S_OK;
 365 }
 366
 367 static HRESULT WINAPI IDirectMusicSynth8Impl_SetSynthSink(IDirectMusicSynth8 *iface,
 368         IDirectMusicSynthSink *sink)
 369 {
 370     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 371     HRESULT hr;
 372
 373     TRACE("(%p)->(%p)\n", iface, sink);
 374
 375     if (sink == This->sink)
 376         return S_OK;
 377
 378     if (!sink || This->sink) {
 379         /* Disconnect the sink */
 380         if (This->latency_clock)
 381             IReferenceClock_Release(This->latency_clock);
 382         IDirectMusicSynthSink_Release(This->sink);
 383     }
 384
 385     This->sink = sink;
 386     if (!sink)
 387         return S_OK;
 388
 389     IDirectMusicSynthSink_AddRef(This->sink);
 390     if (FAILED(hr = IDirectMusicSynthSink_Init(sink, (IDirectMusicSynth *)iface)))
 391         return hr;
 392     return IDirectMusicSynthSink_GetLatencyClock(sink, &This->latency_clock);
 393 }
 394
 395 static HRESULT WINAPI IDirectMusicSynth8Impl_Render(IDirectMusicSynth8 *iface, short *buffer,
 396         DWORD length, LONGLONG position)
 397 {
 398     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 399
 400     FIXME("(%p, %p, %ld, 0x%s): stub\n", This, buffer, length, wine_dbgstr_longlong(position));
 401
 402     return S_OK;
 403 }
 404
 405 static HRESULT WINAPI IDirectMusicSynth8Impl_SetChannelPriority(IDirectMusicSynth8 *iface,
 406         DWORD channel_group, DWORD channel, DWORD priority)
 407 {
 408     /* IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface); */
 409
 410     /* Silenced because of too many messages - 1000 groups * 16 channels ;=) */
 411     /* FIXME("(%p)->(%ld, %ld, %ld): stub\n", This, channel_group, channel, priority); */
 412
 413     return S_OK;
 414 }
 415
 416 static HRESULT WINAPI IDirectMusicSynth8Impl_GetChannelPriority(IDirectMusicSynth8 *iface,
 417         DWORD channel_group, DWORD channel, DWORD *priority)
 418 {
 419     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 420
 421     FIXME("(%p, %ld, %ld, %p): stub\n", This, channel_group, channel, priority);
 422
 423     return S_OK;
 424 }
 425
 426 static HRESULT WINAPI IDirectMusicSynth8Impl_GetFormat(IDirectMusicSynth8 *iface,
 427         WAVEFORMATEX *wave_format, DWORD *wave_format_size)
 428 {
 429     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 430
 431     FIXME("(%p)->(%p, %p): stub\n", This, wave_format, wave_format_size);
 432
 433     return S_OK;
 434 }
 435
 436 static HRESULT WINAPI IDirectMusicSynth8Impl_GetAppend(IDirectMusicSynth8 *iface, DWORD *append)
 437 {
 438     TRACE("(%p)->(%p)\n", iface, append);
 439
 440     /* We don't need extra space at the end of buffers passed to us for now */
 441     *append = 0;
 442
 443     return S_OK;
 444 }
 445
 446 /* IDirectMusicSynth8Impl IDirectMusicSynth8 part: */
 447 static HRESULT WINAPI IDirectMusicSynth8Impl_PlayVoice(IDirectMusicSynth8 *iface,
 448         REFERENCE_TIME ref_time, DWORD voice_id, DWORD channel_group, DWORD channel, DWORD dwDLId,
 449         LONG prPitch, LONG vrVolume, SAMPLE_TIME stVoiceStart, SAMPLE_TIME stLoopStart,
 450         SAMPLE_TIME stLoopEnd)
 451 {
 452     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 453
 454     FIXME("(%p, 0x%s, %ld, %ld, %ld, %ld, %li, %li, 0x%s, 0x%s, 0x%s): stub\n",
 455           This, wine_dbgstr_longlong(ref_time), voice_id, channel_group, channel, dwDLId, prPitch, vrVolume,
 456           wine_dbgstr_longlong(stVoiceStart), wine_dbgstr_longlong(stLoopStart), wine_dbgstr_longlong(stLoopEnd));
 457
 458     return S_OK;
 459 }
 460
 461 static HRESULT WINAPI IDirectMusicSynth8Impl_StopVoice(IDirectMusicSynth8 *iface,
 462         REFERENCE_TIME ref_time, DWORD voice_id)
 463 {
 464     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 465
 466     FIXME("(%p, 0x%s, %ld): stub\n", This, wine_dbgstr_longlong(ref_time), voice_id);
 467
 468     return S_OK;
 469 }
 470
 471 static HRESULT WINAPI IDirectMusicSynth8Impl_GetVoiceState(IDirectMusicSynth8 *iface,
 472         DWORD dwVoice[], DWORD cbVoice, DMUS_VOICE_STATE dwVoiceState[])
 473 {
 474     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 475
 476     FIXME("(%p, %p, %ld, %p): stub\n", This, dwVoice, cbVoice, dwVoiceState);
 477
 478     return S_OK;
 479 }
 480
 481 static HRESULT WINAPI IDirectMusicSynth8Impl_Refresh(IDirectMusicSynth8 *iface, DWORD download_id,
 482         DWORD flags)
 483 {
 484     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 485
 486     FIXME("(%p, %ld, %ld): stub\n", This, download_id, flags);
 487
 488     return S_OK;
 489 }
 490
 491 static HRESULT WINAPI IDirectMusicSynth8Impl_AssignChannelToBuses(IDirectMusicSynth8 *iface,
 492         DWORD channel_group, DWORD channel, DWORD *pdwBuses, DWORD cBuses)
 493 {
 494     IDirectMusicSynth8Impl *This = impl_from_IDirectMusicSynth8(iface);
 495
 496     FIXME("(%p, %ld, %ld, %p, %ld): stub\n", This, channel_group, channel, pdwBuses, cBuses);
 497
 498     return S_OK;
 499 }
 500
 501 static const IDirectMusicSynth8Vtbl DirectMusicSynth8_Vtbl = {
 502         IDirectMusicSynth8Impl_QueryInterface,
 503         IDirectMusicSynth8Impl_AddRef,
 504         IDirectMusicSynth8Impl_Release,
 505         IDirectMusicSynth8Impl_Open,
 506         IDirectMusicSynth8Impl_Close,
 507         IDirectMusicSynth8Impl_SetNumChannelGroups,
 508         IDirectMusicSynth8Impl_Download,
 509         IDirectMusicSynth8Impl_Unload,
 510         IDirectMusicSynth8Impl_PlayBuffer,
 511         IDirectMusicSynth8Impl_GetRunningStats,
 512         IDirectMusicSynth8Impl_GetPortCaps,
 513         IDirectMusicSynth8Impl_SetMasterClock,
 514         IDirectMusicSynth8Impl_GetLatencyClock,
 515         IDirectMusicSynth8Impl_Activate,
 516         IDirectMusicSynth8Impl_SetSynthSink,
 517         IDirectMusicSynth8Impl_Render,
 518         IDirectMusicSynth8Impl_SetChannelPriority,
 519         IDirectMusicSynth8Impl_GetChannelPriority,
 520         IDirectMusicSynth8Impl_GetFormat,
 521         IDirectMusicSynth8Impl_GetAppend,
 522         IDirectMusicSynth8Impl_PlayVoice,
 523         IDirectMusicSynth8Impl_StopVoice,
 524         IDirectMusicSynth8Impl_GetVoiceState,
 525         IDirectMusicSynth8Impl_Refresh,
 526         IDirectMusicSynth8Impl_AssignChannelToBuses
 527 };
 528
 529 static inline IDirectMusicSynth8Impl *impl_from_IKsControl(IKsControl *iface)
 530 {
 531     return CONTAINING_RECORD(iface, IDirectMusicSynth8Impl, IKsControl_iface);
 532 }
 533
 534 static HRESULT WINAPI DMSynthImpl_IKsControl_QueryInterface(IKsControl* iface, REFIID riid, LPVOID *ppobj)
 535 {
 536     IDirectMusicSynth8Impl *This = impl_from_IKsControl(iface);
 537
 538     return IDirectMusicSynth8Impl_QueryInterface(&This->IDirectMusicSynth8_iface, riid, ppobj);
 539 }
 540
 541 static ULONG WINAPI DMSynthImpl_IKsControl_AddRef(IKsControl* iface)
 542 {
 543     IDirectMusicSynth8Impl *This = impl_from_IKsControl(iface);
 544
 545     return IDirectMusicSynth8Impl_AddRef(&This->IDirectMusicSynth8_iface);
 546 }
 547
 548 static ULONG WINAPI DMSynthImpl_IKsControl_Release(IKsControl* iface)
 549 {
 550     IDirectMusicSynth8Impl *This = impl_from_IKsControl(iface);
 551
 552     return IDirectMusicSynth8Impl_Release(&This->IDirectMusicSynth8_iface);
 553 }
 554
 555 static HRESULT WINAPI DMSynthImpl_IKsControl_KsProperty(IKsControl* iface, PKSPROPERTY Property, ULONG PropertyLength, LPVOID PropertyData,
 556                                                         ULONG DataLength, ULONG* BytesReturned)
 557 {
 558     TRACE("(%p, %p, %lu, %p, %lu, %p)\n", iface, Property, PropertyLength, PropertyData, DataLength, BytesReturned);
 559
 560     TRACE("Property = %s - %lu - %lu\n", debugstr_guid(&Property->u.s.Set), Property->u.s.Id, Property->u.s.Flags);
 561
 562     if (Property->u.s.Flags != KSPROPERTY_TYPE_GET)
 563     {
 564         FIXME("Property flags %lu not yet supported\n", Property->u.s.Flags);
 565         return S_FALSE;
 566     }
 567
 568     if (DataLength <  sizeof(DWORD))
 569         return E_NOT_SUFFICIENT_BUFFER;
 570
 571     if (IsEqualGUID(&Property->u.s.Set, &GUID_DMUS_PROP_INSTRUMENT2))
 572     {
 573         *(DWORD*)PropertyData = TRUE;
 574         *BytesReturned = sizeof(DWORD);
 575     }
 576     else if (IsEqualGUID(&Property->u.s.Set, &GUID_DMUS_PROP_DLS2))
 577     {
 578         *(DWORD*)PropertyData = TRUE;
 579         *BytesReturned = sizeof(DWORD);
 580     }
 581     else if (IsEqualGUID(&Property->u.s.Set, &GUID_DMUS_PROP_GM_Hardware))
 582     {
 583         *(DWORD*)PropertyData = FALSE;
 584         *BytesReturned = sizeof(DWORD);
 585     }
 586     else if (IsEqualGUID(&Property->u.s.Set, &GUID_DMUS_PROP_GS_Hardware))
 587     {
 588         *(DWORD*)PropertyData = FALSE;
 589         *BytesReturned = sizeof(DWORD);
 590     }
 591     else if (IsEqualGUID(&Property->u.s.Set, &GUID_DMUS_PROP_XG_Hardware))
 592     {
 593         *(DWORD*)PropertyData = FALSE;
 594         *BytesReturned = sizeof(DWORD);
 595     }
 596     else
 597     {
 598         FIXME("Unknown property %s\n", debugstr_guid(&Property->u.s.Set));
 599         *(DWORD*)PropertyData = FALSE;
 600         *BytesReturned = sizeof(DWORD);
 601     }
 602
 603     return S_OK;
 604 }
 605
 606 static HRESULT WINAPI DMSynthImpl_IKsControl_KsMethod(IKsControl* iface, PKSMETHOD Method, ULONG MethodLength, LPVOID MethodData,
 607                                                       ULONG DataLength, ULONG* BytesReturned)
 608 {
 609     FIXME("(%p, %p, %lu, %p, %lu, %p): stub\n", iface, Method, MethodLength, MethodData, DataLength, BytesReturned);
 610
 611     return E_NOTIMPL;
 612 }
 613
 614 static HRESULT WINAPI DMSynthImpl_IKsControl_KsEvent(IKsControl* iface, PKSEVENT Event, ULONG EventLength, LPVOID EventData,
 615                                                      ULONG DataLength, ULONG* BytesReturned)
 616 {
 617     FIXME("(%p, %p, %lu, %p, %lu, %p): stub\n", iface, Event, EventLength, EventData, DataLength, BytesReturned);
 618
 619     return E_NOTIMPL;
 620 }
 621
 622
 623 static const IKsControlVtbl DMSynthImpl_IKsControl_Vtbl = {
 624     DMSynthImpl_IKsControl_QueryInterface,
 625     DMSynthImpl_IKsControl_AddRef,
 626     DMSynthImpl_IKsControl_Release,
 627     DMSynthImpl_IKsControl_KsProperty,
 628     DMSynthImpl_IKsControl_KsMethod,
 629     DMSynthImpl_IKsControl_KsEvent
 630 };
 631
 632 /* for ClassFactory */
 633 HRESULT WINAPI DMUSIC_CreateDirectMusicSynthImpl(REFIID riid, void **ppobj)
 634 {
 635     IDirectMusicSynth8Impl *obj;
 636     HRESULT hr;
 637
 638     TRACE("(%s, %p)\n", debugstr_guid(riid), ppobj);
 639
 640     obj = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*obj));
 641     if (NULL == obj) {
 642         *ppobj = NULL;
 643         return E_OUTOFMEMORY;
 644     }
 645     obj->IDirectMusicSynth8_iface.lpVtbl = &DirectMusicSynth8_Vtbl;
 646     obj->IKsControl_iface.lpVtbl = &DMSynthImpl_IKsControl_Vtbl;
 647     obj->ref = 1;
 648     /* fill in caps */
 649     obj->caps.dwSize = sizeof(DMUS_PORTCAPS);
 650     obj->caps.dwFlags = DMUS_PC_DLS | DMUS_PC_SOFTWARESYNTH | DMUS_PC_DIRECTSOUND | DMUS_PC_DLS2 | DMUS_PC_AUDIOPATH | DMUS_PC_WAVE;
 651     obj->caps.guidPort = CLSID_DirectMusicSynth;
 652     obj->caps.dwClass = DMUS_PC_OUTPUTCLASS;
 653     obj->caps.dwType = DMUS_PORT_USER_MODE_SYNTH;
 654     obj->caps.dwMemorySize = DMUS_PC_SYSTEMMEMORY;
 655     obj->caps.dwMaxChannelGroups = 1000;
 656     obj->caps.dwMaxVoices = 1000;
 657     obj->caps.dwMaxAudioChannels = 2;
 658     obj->caps.dwEffectFlags = DMUS_EFFECT_REVERB;
 659     lstrcpyW(obj->caps.wszDescription, L"Microsoft Synthesizer");
 660
 661     DMSYNTH_LockModule();
 662     hr = IDirectMusicSynth8_QueryInterface(&obj->IDirectMusicSynth8_iface, riid, ppobj);
 663     IDirectMusicSynth8_Release(&obj->IDirectMusicSynth8_iface);
 664
 665     return hr;
 666 }