dlls/dmusic/port.c

   1 /*
   2  * IDirectMusicPort 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 <assert.h>
  23 #include "dmusic_private.h"
  24
  25 WINE_DEFAULT_DEBUG_CHANNEL(dmusic);
  26
  27 typedef struct SynthPortImpl {
  28     IDirectMusicPort IDirectMusicPort_iface;
  29     IDirectMusicPortDownload IDirectMusicPortDownload_iface;
  30     IDirectMusicThru IDirectMusicThru_iface;
  31     IKsControl IKsControl_iface;
  32     LONG ref;
  33     IDirectSound *pDirectSound;
  34     IReferenceClock *pLatencyClock;
  35     IDirectMusicSynth *synth;
  36     IDirectMusicSynthSink *synth_sink;
  37     BOOL fActive;
  38     DMUS_PORTCAPS caps;
  39     DMUS_PORTPARAMS params;
  40     int nrofgroups;
  41     DMUSIC_PRIVATE_CHANNEL_GROUP group[1];
  42 } SynthPortImpl;
  43
  44 static inline IDirectMusicDownloadedInstrumentImpl* impl_from_IDirectMusicDownloadedInstrument(IDirectMusicDownloadedInstrument *iface)
  45 {
  46     return CONTAINING_RECORD(iface, IDirectMusicDownloadedInstrumentImpl, IDirectMusicDownloadedInstrument_iface);
  47 }
  48
  49 static inline SynthPortImpl *impl_from_SynthPortImpl_IDirectMusicPort(IDirectMusicPort *iface)
  50 {
  51     return CONTAINING_RECORD(iface, SynthPortImpl, IDirectMusicPort_iface);
  52 }
  53
  54 static inline SynthPortImpl *impl_from_SynthPortImpl_IDirectMusicPortDownload(IDirectMusicPortDownload *iface)
  55 {
  56     return CONTAINING_RECORD(iface, SynthPortImpl, IDirectMusicPortDownload_iface);
  57 }
  58
  59 static inline SynthPortImpl *impl_from_SynthPortImpl_IDirectMusicThru(IDirectMusicThru *iface)
  60 {
  61     return CONTAINING_RECORD(iface, SynthPortImpl, IDirectMusicThru_iface);
  62 }
  63
  64 static inline SynthPortImpl *impl_from_IKsControl(IKsControl *iface)
  65 {
  66     return CONTAINING_RECORD(iface, SynthPortImpl, IKsControl_iface);
  67 }
  68
  69 /* IDirectMusicDownloadedInstrument IUnknown part follows: */
  70 static HRESULT WINAPI IDirectMusicDownloadedInstrumentImpl_QueryInterface(IDirectMusicDownloadedInstrument *iface, REFIID riid, VOID **ret_iface)
  71 {
  72     TRACE("(%p, %s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
  73
  74     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDirectMusicDownloadedInstrument))
  75     {
  76         IDirectMusicDownloadedInstrument_AddRef(iface);
  77         *ret_iface = iface;
  78         return S_OK;
  79     }
  80
  81     WARN("(%p, %s, %p): not found\n", iface, debugstr_dmguid(riid), ret_iface);
  82
  83     return E_NOINTERFACE;
  84 }
  85
  86 static ULONG WINAPI IDirectMusicDownloadedInstrumentImpl_AddRef(LPDIRECTMUSICDOWNLOADEDINSTRUMENT iface)
  87 {
  88     IDirectMusicDownloadedInstrumentImpl *This = impl_from_IDirectMusicDownloadedInstrument(iface);
  89     ULONG ref = InterlockedIncrement(&This->ref);
  90
  91     TRACE("(%p)->(): new ref = %u\n", iface, ref);
  92
  93     return ref;
  94 }
  95
  96 static ULONG WINAPI IDirectMusicDownloadedInstrumentImpl_Release(LPDIRECTMUSICDOWNLOADEDINSTRUMENT iface)
  97 {
  98     IDirectMusicDownloadedInstrumentImpl *This = impl_from_IDirectMusicDownloadedInstrument(iface);
  99     ULONG ref = InterlockedDecrement(&This->ref);
 100
 101     TRACE("(%p)->(): new ref = %u\n", iface, ref);
 102
 103     if (!ref)
 104     {
 105         HeapFree(GetProcessHeap(), 0, This->data);
 106         HeapFree(GetProcessHeap(), 0, This);
 107         DMUSIC_UnlockModule();
 108     }
 109
 110     return ref;
 111 }
 112
 113 static const IDirectMusicDownloadedInstrumentVtbl DirectMusicDownloadedInstrument_Vtbl = {
 114     IDirectMusicDownloadedInstrumentImpl_QueryInterface,
 115     IDirectMusicDownloadedInstrumentImpl_AddRef,
 116     IDirectMusicDownloadedInstrumentImpl_Release
 117 };
 118
 119 static inline IDirectMusicDownloadedInstrumentImpl* unsafe_impl_from_IDirectMusicDownloadedInstrument(IDirectMusicDownloadedInstrument *iface)
 120 {
 121     if (!iface)
 122         return NULL;
 123     assert(iface->lpVtbl == &DirectMusicDownloadedInstrument_Vtbl);
 124
 125     return impl_from_IDirectMusicDownloadedInstrument(iface);
 126 }
 127
 128 static HRESULT DMUSIC_CreateDirectMusicDownloadedInstrumentImpl(IDirectMusicDownloadedInstrument **instrument)
 129 {
 130     IDirectMusicDownloadedInstrumentImpl *object;
 131
 132     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
 133     if (!object)
 134     {
 135         *instrument = NULL;
 136         return E_OUTOFMEMORY;
 137     }
 138
 139     object->IDirectMusicDownloadedInstrument_iface.lpVtbl = &DirectMusicDownloadedInstrument_Vtbl;
 140     object->ref = 1;
 141
 142     *instrument = &object->IDirectMusicDownloadedInstrument_iface;
 143     DMUSIC_LockModule();
 144
 145     return S_OK;
 146 }
 147
 148 /* SynthPortImpl IDirectMusicPort IUnknown part follows: */
 149 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_QueryInterface(LPDIRECTMUSICPORT iface, REFIID riid, LPVOID *ret_iface)
 150 {
 151     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 152
 153     TRACE("(%p/%p)->(%s, %p)\n", iface, This, debugstr_dmguid(riid), ret_iface);
 154
 155     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualGUID(riid, &IID_IDirectMusicPort))
 156         *ret_iface = &This->IDirectMusicPort_iface;
 157     else if (IsEqualGUID(riid, &IID_IDirectMusicPortDownload))
 158         *ret_iface = &This->IDirectMusicPortDownload_iface;
 159     else if (IsEqualGUID(riid, &IID_IDirectMusicThru))
 160         *ret_iface = &This->IDirectMusicThru_iface;
 161     else if (IsEqualGUID(riid, &IID_IKsControl))
 162         *ret_iface = &This->IKsControl_iface;
 163     else {
 164         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ret_iface);
 165         *ret_iface = NULL;
 166         return E_NOINTERFACE;
 167     }
 168
 169     IUnknown_AddRef((IUnknown*)*ret_iface);
 170
 171     return S_OK;
 172 }
 173
 174 static ULONG WINAPI SynthPortImpl_IDirectMusicPort_AddRef(LPDIRECTMUSICPORT iface)
 175 {
 176     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 177     ULONG ref = InterlockedIncrement(&This->ref);
 178
 179     TRACE("(%p)->(): new ref = %u\n", This, ref);
 180
 181     DMUSIC_LockModule();
 182
 183     return ref;
 184 }
 185
 186 static ULONG WINAPI SynthPortImpl_IDirectMusicPort_Release(LPDIRECTMUSICPORT iface)
 187 {
 188     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 189     ULONG ref = InterlockedDecrement(&This->ref);
 190
 191     TRACE("(%p)->(): new ref = %u\n", This, ref);
 192
 193     if (!ref)
 194     {
 195         IDirectMusicSynth_Activate(This->synth, FALSE);
 196         IDirectMusicSynth_Close(This->synth);
 197         IDirectMusicSynth_Release(This->synth);
 198         IDirectMusicSynthSink_Release(This->synth_sink);
 199         IReferenceClock_Release(This->pLatencyClock);
 200         HeapFree(GetProcessHeap(), 0, This);
 201     }
 202
 203     DMUSIC_UnlockModule();
 204
 205     return ref;
 206 }
 207
 208 /* SynthPortImpl IDirectMusicPort interface follows: */
 209 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_PlayBuffer(LPDIRECTMUSICPORT iface, LPDIRECTMUSICBUFFER buffer)
 210 {
 211     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 212     HRESULT hr;
 213     REFERENCE_TIME time;
 214     LPBYTE data;
 215     DWORD size;
 216
 217     TRACE("(%p/%p)->(%p)\n", iface, This, buffer);
 218
 219     if (!buffer)
 220         return E_POINTER;
 221
 222     hr = IDirectMusicBuffer_GetStartTime(buffer, &time);
 223
 224     if (SUCCEEDED(hr))
 225         hr = IDirectMusicBuffer_GetRawBufferPtr(buffer, &data);
 226
 227     if (SUCCEEDED(hr))
 228         hr = IDirectMusicBuffer_GetUsedBytes(buffer, &size);
 229
 230     if (SUCCEEDED(hr))
 231         hr = IDirectMusicSynth_PlayBuffer(This->synth, time, data, size);
 232
 233     return hr;
 234 }
 235
 236 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_SetReadNotificationHandle(LPDIRECTMUSICPORT iface, HANDLE event)
 237 {
 238     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 239
 240     FIXME("(%p/%p)->(%p): stub\n", iface, This, event);
 241
 242     return S_OK;
 243 }
 244
 245 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_Read(LPDIRECTMUSICPORT iface, LPDIRECTMUSICBUFFER buffer)
 246 {
 247     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 248
 249     FIXME("(%p/%p)->(%p): stub\n", iface, This, buffer);
 250
 251     return S_OK;
 252 }
 253
 254 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_DownloadInstrument(LPDIRECTMUSICPORT iface, IDirectMusicInstrument* instrument, IDirectMusicDownloadedInstrument** downloaded_instrument, DMUS_NOTERANGE* note_ranges, DWORD num_note_ranges)
 255 {
 256     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 257     IDirectMusicInstrumentImpl *instrument_object;
 258     HRESULT ret;
 259     BOOL free;
 260     HANDLE download;
 261     DMUS_DOWNLOADINFO *info;
 262     DMUS_OFFSETTABLE *offset_table;
 263     DMUS_INSTRUMENT *instrument_info;
 264     BYTE *data;
 265     ULONG offset;
 266     ULONG nb_regions;
 267     ULONG size;
 268     ULONG i;
 269
 270     TRACE("(%p/%p)->(%p, %p, %p, %d)\n", iface, This, instrument, downloaded_instrument, note_ranges, num_note_ranges);
 271
 272     if (!instrument || !downloaded_instrument || (num_note_ranges && !note_ranges))
 273         return E_POINTER;
 274
 275     instrument_object = impl_from_IDirectMusicInstrument(instrument);
 276
 277     nb_regions = instrument_object->header.cRegions;
 278     size = sizeof(DMUS_DOWNLOADINFO) + sizeof(ULONG) * (1 + nb_regions) + sizeof(DMUS_INSTRUMENT) + sizeof(DMUS_REGION) * nb_regions;
 279
 280     data = HeapAlloc(GetProcessHeap(), 0, size);
 281     if (!data)
 282         return E_OUTOFMEMORY;
 283
 284     info = (DMUS_DOWNLOADINFO*)data;
 285     offset_table = (DMUS_OFFSETTABLE*)(data + sizeof(DMUS_DOWNLOADINFO));
 286     offset = sizeof(DMUS_DOWNLOADINFO) + sizeof(ULONG) * (1 + nb_regions);
 287
 288     info->dwDLType = DMUS_DOWNLOADINFO_INSTRUMENT2;
 289     info->dwDLId = 0;
 290     info->dwNumOffsetTableEntries = 1 + instrument_object->header.cRegions;
 291     info->cbSize = size;
 292
 293     offset_table->ulOffsetTable[0] = offset;
 294     instrument_info = (DMUS_INSTRUMENT*)(data + offset);
 295     offset += sizeof(DMUS_INSTRUMENT);
 296     instrument_info->ulPatch = MIDILOCALE2Patch(&instrument_object->header.Locale);
 297     instrument_info->ulFirstRegionIdx = 1;
 298     instrument_info->ulGlobalArtIdx = 0; /* FIXME */
 299     instrument_info->ulFirstExtCkIdx = 0; /* FIXME */
 300     instrument_info->ulCopyrightIdx = 0; /* FIXME */
 301     instrument_info->ulFlags = 0; /* FIXME */
 302
 303     for (i = 0;  i < nb_regions; i++)
 304     {
 305         DMUS_REGION *region = (DMUS_REGION*)(data + offset);
 306
 307         offset_table->ulOffsetTable[1 + i] = offset;
 308         offset += sizeof(DMUS_REGION);
 309         region->RangeKey = instrument_object->regions[i].header.RangeKey;
 310         region->RangeVelocity = instrument_object->regions[i].header.RangeVelocity;
 311         region->fusOptions = instrument_object->regions[i].header.fusOptions;
 312         region->usKeyGroup = instrument_object->regions[i].header.usKeyGroup;
 313         region->ulRegionArtIdx = 0; /* FIXME */
 314         region->ulNextRegionIdx = i != (nb_regions - 1) ? (i + 2) : 0;
 315         region->ulFirstExtCkIdx = 0; /* FIXME */
 316         region->WaveLink = instrument_object->regions[i].wave_link;
 317         region->WSMP = instrument_object->regions[i].wave_sample;
 318         region->WLOOP[0] = instrument_object->regions[i].wave_loop;
 319     }
 320
 321     ret = IDirectMusicSynth8_Download(This->synth, &download, (VOID*)data, &free);
 322
 323     if (SUCCEEDED(ret))
 324         ret = DMUSIC_CreateDirectMusicDownloadedInstrumentImpl(downloaded_instrument);
 325
 326     if (SUCCEEDED(ret))
 327     {
 328         IDirectMusicDownloadedInstrumentImpl *downloaded_object = impl_from_IDirectMusicDownloadedInstrument(*downloaded_instrument);
 329
 330         downloaded_object->data = data;
 331         downloaded_object->downloaded = TRUE;
 332     }
 333
 334     *downloaded_instrument = NULL;
 335     HeapFree(GetProcessHeap(), 0, data);
 336
 337     return E_FAIL;
 338 }
 339
 340 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_UnloadInstrument(LPDIRECTMUSICPORT iface, IDirectMusicDownloadedInstrument *downloaded_instrument)
 341 {
 342     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 343     IDirectMusicDownloadedInstrumentImpl *downloaded_object = unsafe_impl_from_IDirectMusicDownloadedInstrument(downloaded_instrument);
 344
 345     TRACE("(%p/%p)->(%p)\n", iface, This, downloaded_instrument);
 346
 347     if (!downloaded_instrument)
 348         return E_POINTER;
 349
 350     if (!downloaded_object->downloaded)
 351         return DMUS_E_NOT_DOWNLOADED_TO_PORT;
 352
 353     HeapFree(GetProcessHeap(), 0, downloaded_object->data);
 354     downloaded_object->data = NULL;
 355     downloaded_object->downloaded = FALSE;
 356
 357     return S_OK;
 358 }
 359
 360 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_GetLatencyClock(LPDIRECTMUSICPORT iface, IReferenceClock** clock)
 361 {
 362     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 363
 364     TRACE("(%p/%p)->(%p)\n", iface, This, clock);
 365
 366     *clock = This->pLatencyClock;
 367     IReferenceClock_AddRef(*clock);
 368
 369     return S_OK;
 370 }
 371
 372 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_GetRunningStats(LPDIRECTMUSICPORT iface, LPDMUS_SYNTHSTATS stats)
 373 {
 374     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 375
 376     FIXME("(%p/%p)->(%p): stub\n", iface, This, stats);
 377
 378     return S_OK;
 379 }
 380
 381 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_Compact(LPDIRECTMUSICPORT iface)
 382 {
 383     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 384
 385     FIXME("(%p/%p)->(): stub\n", iface, This);
 386
 387     return S_OK;
 388 }
 389
 390 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_GetCaps(LPDIRECTMUSICPORT iface, LPDMUS_PORTCAPS port_caps)
 391 {
 392     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 393
 394     TRACE("(%p/%p)->(%p)\n", iface, This, port_caps);
 395
 396     *port_caps = This->caps;
 397
 398     return S_OK;
 399 }
 400
 401 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_DeviceIoControl(LPDIRECTMUSICPORT iface, DWORD io_control_code, LPVOID in_buffer, DWORD in_buffer_size,
 402                                                            LPVOID out_buffer, DWORD out_buffer_size, LPDWORD bytes_returned, LPOVERLAPPED overlapped)
 403 {
 404     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 405
 406     FIXME("(%p/%p)->(%d, %p, %d, %p, %d, %p, %p): stub\n", iface, This, io_control_code, in_buffer, in_buffer_size, out_buffer, out_buffer_size, bytes_returned, overlapped);
 407
 408     return S_OK;
 409 }
 410
 411 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_SetNumChannelGroups(LPDIRECTMUSICPORT iface, DWORD channel_groups)
 412 {
 413     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 414
 415     FIXME("(%p/%p)->(%d): semi-stub\n", iface, This, channel_groups);
 416
 417     This->nrofgroups = channel_groups;
 418
 419     return S_OK;
 420 }
 421
 422 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_GetNumChannelGroups(LPDIRECTMUSICPORT iface, LPDWORD channel_groups)
 423 {
 424     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 425
 426     TRACE("(%p/%p)->(%p)\n", iface, This, channel_groups);
 427
 428     *channel_groups = This->nrofgroups;
 429
 430     return S_OK;
 431 }
 432
 433 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_Activate(LPDIRECTMUSICPORT iface, BOOL active)
 434 {
 435     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 436
 437     TRACE("(%p/%p)->(%d)\n", iface, This, active);
 438
 439     This->fActive = active;
 440
 441     return S_OK;
 442 }
 443
 444 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_SetChannelPriority(LPDIRECTMUSICPORT iface, DWORD channel_group, DWORD channel, DWORD priority)
 445 {
 446     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 447
 448     FIXME("(%p/%p)->(%d, %d, %d): semi-stub\n", iface, This, channel_group, channel, priority);
 449
 450     if (channel > 16)
 451     {
 452         WARN("isn't there supposed to be 16 channels (no. %d requested)?! (faking as it is ok)\n", channel);
 453         /*return E_INVALIDARG;*/
 454     }
 455
 456     return S_OK;
 457 }
 458
 459 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_GetChannelPriority(LPDIRECTMUSICPORT iface, DWORD channel_group, DWORD channel, LPDWORD priority)
 460 {
 461     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 462
 463     TRACE("(%p/%p)->(%u, %u, %p)\n", iface, This, channel_group, channel, priority);
 464
 465     *priority = This->group[channel_group - 1].channel[channel].priority;
 466
 467     return S_OK;
 468 }
 469
 470 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_SetDirectSound(LPDIRECTMUSICPORT iface, LPDIRECTSOUND direct_sound, LPDIRECTSOUNDBUFFER direct_sound_buffer)
 471 {
 472     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 473
 474     FIXME("(%p/%p)->(%p, %p): stub\n", iface, This, direct_sound, direct_sound_buffer);
 475
 476     return S_OK;
 477 }
 478
 479 static HRESULT WINAPI SynthPortImpl_IDirectMusicPort_GetFormat(LPDIRECTMUSICPORT iface, LPWAVEFORMATEX pWaveFormatEx, LPDWORD pdwWaveFormatExSize, LPDWORD pdwBufferSize)
 480 {
 481         SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPort(iface);
 482         WAVEFORMATEX format;
 483         FIXME("(%p, %p, %p, %p): stub\n", This, pWaveFormatEx, pdwWaveFormatExSize, pdwBufferSize);
 484
 485         if (pWaveFormatEx == NULL)
 486         {
 487                 if (pdwWaveFormatExSize)
 488                         *pdwWaveFormatExSize = sizeof(format);
 489                 else
 490                         return E_POINTER;
 491         }
 492         else
 493         {
 494                 if (pdwWaveFormatExSize == NULL)
 495                         return E_POINTER;
 496
 497                 /* Just fill this in with something that will not crash Direct Sound for now. */
 498                 /* It won't be used anyway until Performances are completed */
 499                 format.wFormatTag = WAVE_FORMAT_PCM;
 500                 format.nChannels = 2; /* This->params.dwAudioChannels; */
 501                 format.nSamplesPerSec = 44100; /* This->params.dwSampleRate; */
 502                 format.wBitsPerSample = 16;     /* FIXME: check this */
 503                 format.nBlockAlign = (format.wBitsPerSample * format.nChannels) / 8;
 504                 format.nAvgBytesPerSec = format.nSamplesPerSec * format.nBlockAlign;
 505                 format.cbSize = 0;
 506
 507                 if (*pdwWaveFormatExSize >= sizeof(format))
 508                 {
 509                         CopyMemory(pWaveFormatEx, &format, min(sizeof(format), *pdwWaveFormatExSize));
 510                         *pdwWaveFormatExSize = sizeof(format);  /* FIXME check if this is set */
 511                 }
 512                 else
 513                         return E_POINTER;       /* FIXME find right error */
 514         }
 515
 516         if (pdwBufferSize)
 517                 *pdwBufferSize = 44100 * 2 * 2;
 518         else
 519                 return E_POINTER;
 520
 521         return S_OK;
 522 }
 523
 524 static const IDirectMusicPortVtbl SynthPortImpl_DirectMusicPort_Vtbl = {
 525     /**** IDirectMusicPort IUnknown part methods ***/
 526     SynthPortImpl_IDirectMusicPort_QueryInterface,
 527     SynthPortImpl_IDirectMusicPort_AddRef,
 528     SynthPortImpl_IDirectMusicPort_Release,
 529     /**** IDirectMusicPort methods ***/
 530     SynthPortImpl_IDirectMusicPort_PlayBuffer,
 531     SynthPortImpl_IDirectMusicPort_SetReadNotificationHandle,
 532     SynthPortImpl_IDirectMusicPort_Read,
 533     SynthPortImpl_IDirectMusicPort_DownloadInstrument,
 534     SynthPortImpl_IDirectMusicPort_UnloadInstrument,
 535     SynthPortImpl_IDirectMusicPort_GetLatencyClock,
 536     SynthPortImpl_IDirectMusicPort_GetRunningStats,
 537     SynthPortImpl_IDirectMusicPort_Compact,
 538     SynthPortImpl_IDirectMusicPort_GetCaps,
 539     SynthPortImpl_IDirectMusicPort_DeviceIoControl,
 540     SynthPortImpl_IDirectMusicPort_SetNumChannelGroups,
 541     SynthPortImpl_IDirectMusicPort_GetNumChannelGroups,
 542     SynthPortImpl_IDirectMusicPort_Activate,
 543     SynthPortImpl_IDirectMusicPort_SetChannelPriority,
 544     SynthPortImpl_IDirectMusicPort_GetChannelPriority,
 545     SynthPortImpl_IDirectMusicPort_SetDirectSound,
 546     SynthPortImpl_IDirectMusicPort_GetFormat
 547 };
 548
 549 /* SynthPortImpl IDirectMusicPortDownload IUnknown part follows: */
 550 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_QueryInterface(LPDIRECTMUSICPORTDOWNLOAD iface, REFIID riid, LPVOID *ret_iface)
 551 {
 552     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 553
 554     TRACE("(%p/%p)->(%s, %p)\n", iface, This, debugstr_dmguid(riid), ret_iface);
 555
 556     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
 557 }
 558
 559 static ULONG WINAPI SynthPortImpl_IDirectMusicPortDownload_AddRef (LPDIRECTMUSICPORTDOWNLOAD iface)
 560 {
 561     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 562
 563     TRACE("(%p/%p)->()\n", iface, This);
 564
 565     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
 566 }
 567
 568 static ULONG WINAPI SynthPortImpl_IDirectMusicPortDownload_Release(LPDIRECTMUSICPORTDOWNLOAD iface)
 569 {
 570     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 571
 572     TRACE("(%p/%p)->()\n", iface, This);
 573
 574     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
 575 }
 576
 577 /* SynthPortImpl IDirectMusicPortDownload Interface follows: */
 578 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_GetBuffer(LPDIRECTMUSICPORTDOWNLOAD iface, DWORD DLId, IDirectMusicDownload** IDMDownload)
 579 {
 580     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 581
 582     FIXME("(%p/%p)->(%u, %p): stub\n", iface, This, DLId, IDMDownload);
 583
 584     if (!IDMDownload)
 585         return E_POINTER;
 586
 587     return DMUSIC_CreateDirectMusicDownloadImpl(&IID_IDirectMusicDownload, (LPVOID*)IDMDownload, NULL);
 588 }
 589
 590 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_AllocateBuffer(LPDIRECTMUSICPORTDOWNLOAD iface, DWORD size, IDirectMusicDownload** IDMDownload)
 591 {
 592     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 593
 594     FIXME("(%p/%p)->(%u, %p): stub\n", iface, This, size, IDMDownload);
 595
 596     return S_OK;
 597 }
 598
 599 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_GetDLId(LPDIRECTMUSICPORTDOWNLOAD iface, DWORD* start_DLId, DWORD count)
 600 {
 601     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 602
 603     FIXME("(%p/%p)->(%p, %u): stub\n", iface, This, start_DLId, count);
 604
 605     return S_OK;
 606 }
 607
 608 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_GetAppend (LPDIRECTMUSICPORTDOWNLOAD iface, DWORD* append)
 609 {
 610     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 611
 612     FIXME("(%p/%p)->(%p): stub\n", iface, This, append);
 613
 614     return S_OK;
 615 }
 616
 617 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_Download(LPDIRECTMUSICPORTDOWNLOAD iface, IDirectMusicDownload* IDMDownload)
 618 {
 619     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 620
 621     FIXME("(%p/%p)->(%p): stub\n", iface, This, IDMDownload);
 622
 623     return S_OK;
 624 }
 625
 626 static HRESULT WINAPI SynthPortImpl_IDirectMusicPortDownload_Unload(LPDIRECTMUSICPORTDOWNLOAD iface, IDirectMusicDownload* IDMDownload)
 627 {
 628     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicPortDownload(iface);
 629
 630     FIXME("(%p/%p)->(%p): stub\n", iface, This, IDMDownload);
 631
 632     return S_OK;
 633 }
 634
 635 static const IDirectMusicPortDownloadVtbl SynthPortImpl_DirectMusicPortDownload_Vtbl = {
 636     /*** IDirectMusicPortDownload IUnknown part methods ***/
 637     SynthPortImpl_IDirectMusicPortDownload_QueryInterface,
 638     SynthPortImpl_IDirectMusicPortDownload_AddRef,
 639     SynthPortImpl_IDirectMusicPortDownload_Release,
 640     /*** IDirectMusicPortDownload methods ***/
 641     SynthPortImpl_IDirectMusicPortDownload_GetBuffer,
 642     SynthPortImpl_IDirectMusicPortDownload_AllocateBuffer,
 643     SynthPortImpl_IDirectMusicPortDownload_GetDLId,
 644     SynthPortImpl_IDirectMusicPortDownload_GetAppend,
 645     SynthPortImpl_IDirectMusicPortDownload_Download,
 646     SynthPortImpl_IDirectMusicPortDownload_Unload
 647 };
 648
 649 /* SynthPortImpl IDirectMusicThru IUnknown part follows: */
 650 static HRESULT WINAPI SynthPortImpl_IDirectMusicThru_QueryInterface(LPDIRECTMUSICTHRU iface, REFIID riid, LPVOID *ret_iface)
 651 {
 652     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicThru(iface);
 653
 654     TRACE("(%p/%p)->(%s, %p)\n", iface, This, debugstr_dmguid(riid), ret_iface);
 655
 656     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
 657 }
 658
 659 static ULONG WINAPI SynthPortImpl_IDirectMusicThru_AddRef(LPDIRECTMUSICTHRU iface)
 660 {
 661     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicThru(iface);
 662
 663     TRACE("(%p/%p)->()\n", iface, This);
 664
 665     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
 666 }
 667
 668 static ULONG WINAPI SynthPortImpl_IDirectMusicThru_Release(LPDIRECTMUSICTHRU iface)
 669 {
 670     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicThru(iface);
 671
 672     TRACE("(%p/%p)->()\n", iface, This);
 673
 674     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
 675 }
 676
 677 /*  SynthPortImpl IDirectMusicThru Interface follows: */
 678 static HRESULT WINAPI SynthPortImpl_IDirectMusicThru_ThruChannel(LPDIRECTMUSICTHRU iface, DWORD source_channel_group, DWORD source_channel, DWORD destination_channel_group,
 679                                                        DWORD destination_channel, LPDIRECTMUSICPORT destination_port)
 680 {
 681     SynthPortImpl *This = impl_from_SynthPortImpl_IDirectMusicThru(iface);
 682
 683     FIXME("(%p/%p)->(%d, %d, %d, %d, %p): stub\n", iface, This, source_channel_group, source_channel, destination_channel_group, destination_channel, destination_port);
 684
 685     return S_OK;
 686 }
 687
 688 static const IDirectMusicThruVtbl SynthPortImpl_DirectMusicThru_Vtbl = {
 689     /*** IDirectMusicThru IUnknown part methods */
 690     SynthPortImpl_IDirectMusicThru_QueryInterface,
 691     SynthPortImpl_IDirectMusicThru_AddRef,
 692     SynthPortImpl_IDirectMusicThru_Release,
 693     /*** IDirectMusicThru methods ***/
 694     SynthPortImpl_IDirectMusicThru_ThruChannel
 695 };
 696
 697 static HRESULT WINAPI IKsControlImpl_QueryInterface(IKsControl *iface, REFIID riid,
 698         void **ret_iface)
 699 {
 700     SynthPortImpl *This = impl_from_IKsControl(iface);
 701
 702     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
 703 }
 704
 705 static ULONG WINAPI IKsControlImpl_AddRef(IKsControl *iface)
 706 {
 707     SynthPortImpl *This = impl_from_IKsControl(iface);
 708
 709     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
 710 }
 711
 712 static ULONG WINAPI IKsControlImpl_Release(IKsControl *iface)
 713 {
 714     SynthPortImpl *This = impl_from_IKsControl(iface);
 715
 716     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
 717 }
 718
 719 static HRESULT WINAPI IKsControlImpl_KsProperty(IKsControl *iface, KSPROPERTY *prop,
 720         ULONG prop_len, void *data, ULONG data_len, ULONG *ret_len)
 721 {
 722     TRACE("(%p)->(%p, %u, %p, %u, %p)\n", iface, prop, prop_len, data, data_len, ret_len);
 723     TRACE("prop = %s - %u - %u\n", debugstr_guid(&prop->Set), prop->Id, prop->Flags);
 724
 725     if (prop->Flags != KSPROPERTY_TYPE_GET)
 726     {
 727         FIXME("prop flags %u not yet supported\n", prop->Flags);
 728         return S_FALSE;
 729     }
 730
 731     if (data_len <  sizeof(DWORD))
 732         return E_NOT_SUFFICIENT_BUFFER;
 733
 734     FIXME("Unknown property %s\n", debugstr_guid(&prop->Set));
 735     *(DWORD*)data = FALSE;
 736     *ret_len = sizeof(DWORD);
 737
 738     return S_OK;
 739 }
 740
 741 static HRESULT WINAPI IKsControlImpl_KsMethod(IKsControl *iface, KSMETHOD *method,
 742         ULONG method_len, void *data, ULONG data_len, ULONG *ret_len)
 743 {
 744     FIXME("(%p)->(%p, %u, %p, %u, %p): stub\n", iface, method, method_len, data, data_len, ret_len);
 745
 746     return E_NOTIMPL;
 747 }
 748
 749 static HRESULT WINAPI IKsControlImpl_KsEvent(IKsControl *iface, KSEVENT *event, ULONG event_len,
 750         void *data, ULONG data_len, ULONG *ret_len)
 751 {
 752     FIXME("(%p)->(%p, %u, %p, %u, %p): stub\n", iface, event, event_len, data, data_len, ret_len);
 753
 754     return E_NOTIMPL;
 755 }
 756
 757 static const IKsControlVtbl ikscontrol_vtbl = {
 758     IKsControlImpl_QueryInterface,
 759     IKsControlImpl_AddRef,
 760     IKsControlImpl_Release,
 761     IKsControlImpl_KsProperty,
 762     IKsControlImpl_KsMethod,
 763     IKsControlImpl_KsEvent
 764 };
 765
 766 HRESULT DMUSIC_CreateSynthPortImpl(LPCGUID guid, LPVOID *object, LPUNKNOWN unkouter, LPDMUS_PORTPARAMS port_params, LPDMUS_PORTCAPS port_caps, DWORD device)
 767 {
 768     SynthPortImpl *obj;
 769     HRESULT hr = E_FAIL;
 770     int i;
 771
 772     TRACE("(%s, %p, %p, %p, %p, %d)\n", debugstr_guid(guid), object, unkouter, port_params,
 773             port_caps, device);
 774
 775     *object = NULL;
 776
 777     obj = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(SynthPortImpl));
 778     if (!obj)
 779         return E_OUTOFMEMORY;
 780
 781     obj->IDirectMusicPort_iface.lpVtbl = &SynthPortImpl_DirectMusicPort_Vtbl;
 782     obj->IDirectMusicPortDownload_iface.lpVtbl = &SynthPortImpl_DirectMusicPortDownload_Vtbl;
 783     obj->IDirectMusicThru_iface.lpVtbl = &SynthPortImpl_DirectMusicThru_Vtbl;
 784     obj->IKsControl_iface.lpVtbl = &ikscontrol_vtbl;
 785     obj->ref = 0;  /* Will be inited by QueryInterface */
 786     obj->fActive = FALSE;
 787     obj->params = *port_params;
 788     obj->caps = *port_caps;
 789
 790     hr = DMUSIC_CreateReferenceClockImpl(&IID_IReferenceClock, (LPVOID*)&obj->pLatencyClock, NULL);
 791     if (hr != S_OK)
 792     {
 793         HeapFree(GetProcessHeap(), 0, obj);
 794         return hr;
 795     }
 796
 797     if (SUCCEEDED(hr))
 798         hr = CoCreateInstance(&CLSID_DirectMusicSynth, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusicSynth, (void**)&obj->synth);
 799
 800     if (SUCCEEDED(hr))
 801         hr = CoCreateInstance(&CLSID_DirectMusicSynthSink, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusicSynthSink, (void**)&obj->synth_sink);
 802
 803     if (SUCCEEDED(hr))
 804         hr = IDirectMusicSynth_SetMasterClock(obj->synth, obj->pLatencyClock);
 805
 806     if (SUCCEEDED(hr))
 807         hr = IDirectMusicSynthSink_SetMasterClock(obj->synth_sink, obj->pLatencyClock);
 808
 809     if (SUCCEEDED(hr))
 810         hr = IDirectMusicSynth_SetSynthSink(obj->synth, obj->synth_sink);
 811
 812     if (SUCCEEDED(hr))
 813         hr = IDirectMusicSynth_Open(obj->synth, port_params);
 814
 815     if (0)
 816     {
 817         if (port_params->dwValidParams & DMUS_PORTPARAMS_CHANNELGROUPS) {
 818             obj->nrofgroups = port_params->dwChannelGroups;
 819             /* Setting default priorities */
 820             for (i = 0; i < obj->nrofgroups; i++) {
 821                 TRACE ("Setting default channel priorities on channel group %i\n", i + 1);
 822                 obj->group[i].channel[0].priority = DAUD_CHAN1_DEF_VOICE_PRIORITY;
 823                 obj->group[i].channel[1].priority = DAUD_CHAN2_DEF_VOICE_PRIORITY;
 824                 obj->group[i].channel[2].priority = DAUD_CHAN3_DEF_VOICE_PRIORITY;
 825                 obj->group[i].channel[3].priority = DAUD_CHAN4_DEF_VOICE_PRIORITY;
 826                 obj->group[i].channel[4].priority = DAUD_CHAN5_DEF_VOICE_PRIORITY;
 827                 obj->group[i].channel[5].priority = DAUD_CHAN6_DEF_VOICE_PRIORITY;
 828                 obj->group[i].channel[6].priority = DAUD_CHAN7_DEF_VOICE_PRIORITY;
 829                 obj->group[i].channel[7].priority = DAUD_CHAN8_DEF_VOICE_PRIORITY;
 830                 obj->group[i].channel[8].priority = DAUD_CHAN9_DEF_VOICE_PRIORITY;
 831                 obj->group[i].channel[9].priority = DAUD_CHAN10_DEF_VOICE_PRIORITY;
 832                 obj->group[i].channel[10].priority = DAUD_CHAN11_DEF_VOICE_PRIORITY;
 833                 obj->group[i].channel[11].priority = DAUD_CHAN12_DEF_VOICE_PRIORITY;
 834                 obj->group[i].channel[12].priority = DAUD_CHAN13_DEF_VOICE_PRIORITY;
 835                 obj->group[i].channel[13].priority = DAUD_CHAN14_DEF_VOICE_PRIORITY;
 836                 obj->group[i].channel[14].priority = DAUD_CHAN15_DEF_VOICE_PRIORITY;
 837                 obj->group[i].channel[15].priority = DAUD_CHAN16_DEF_VOICE_PRIORITY;
 838             }
 839         }
 840     }
 841
 842     if (SUCCEEDED(hr))
 843         return IDirectMusicPort_QueryInterface((LPDIRECTMUSICPORT)obj, guid, object);
 844
 845     if (obj->synth)
 846         IDirectMusicSynth_Release(obj->synth);
 847     if (obj->synth_sink)
 848         IDirectMusicSynthSink_Release(obj->synth_sink);
 849     if (obj->pLatencyClock)
 850         IReferenceClock_Release(obj->pLatencyClock);
 851     HeapFree(GetProcessHeap(), 0, obj);
 852
 853     return hr;
 854 }
 855
 856 HRESULT DMUSIC_CreateMidiOutPortImpl(LPCGUID guid, LPVOID *object, LPUNKNOWN unkouter, LPDMUS_PORTPARAMS port_params, LPDMUS_PORTCAPS port_caps, DWORD device)
 857 {
 858     TRACE("(%s, %p, %p, %p, %p, %d): stub\n", debugstr_guid(guid), object, unkouter, port_params,
 859             port_caps, device);
 860
 861     return E_NOTIMPL;
 862 }
 863
 864 HRESULT DMUSIC_CreateMidiInPortImpl(LPCGUID guid, LPVOID *object, LPUNKNOWN unkouter, LPDMUS_PORTPARAMS port_params, LPDMUS_PORTCAPS port_caps, DWORD device)
 865 {
 866     TRACE("(%s, %p, %p, %p, %p, %d): stub\n", debugstr_guid(guid), object, unkouter, port_params,
 867             port_caps, device);
 868
 869     return E_NOTIMPL;
 870 }