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 #include "dmobject.h"
  25 #include "wine/heap.h"
  26
  27 WINE_DEFAULT_DEBUG_CHANNEL(dmusic);
  28
  29 struct synth_port {
  30     IDirectMusicPort IDirectMusicPort_iface;
  31     IDirectMusicPortDownload IDirectMusicPortDownload_iface;
  32     IDirectMusicThru IDirectMusicThru_iface;
  33     IKsControl IKsControl_iface;
  34     LONG ref;
  35     IDirectMusic8Impl *parent;
  36     IDirectSound *dsound;
  37     IDirectSoundBuffer *dsbuffer;
  38     IDirectMusicSynth *synth;
  39     IDirectMusicSynthSink *synth_sink;
  40     BOOL active;
  41     DMUS_PORTPARAMS params;
  42     int nrofgroups;
  43     DMUSIC_PRIVATE_CHANNEL_GROUP group[1];
  44 };
  45
  46 static inline IDirectMusicDownloadedInstrumentImpl* impl_from_IDirectMusicDownloadedInstrument(IDirectMusicDownloadedInstrument *iface)
  47 {
  48     return CONTAINING_RECORD(iface, IDirectMusicDownloadedInstrumentImpl, IDirectMusicDownloadedInstrument_iface);
  49 }
  50
  51 static inline struct synth_port *synth_from_IDirectMusicPort(IDirectMusicPort *iface)
  52 {
  53     return CONTAINING_RECORD(iface, struct synth_port, IDirectMusicPort_iface);
  54 }
  55
  56 static inline struct synth_port *synth_from_IDirectMusicPortDownload(IDirectMusicPortDownload *iface)
  57 {
  58     return CONTAINING_RECORD(iface, struct synth_port, IDirectMusicPortDownload_iface);
  59 }
  60
  61 static inline struct synth_port *synth_from_IDirectMusicThru(IDirectMusicThru *iface)
  62 {
  63     return CONTAINING_RECORD(iface, struct synth_port, IDirectMusicThru_iface);
  64 }
  65
  66 static inline struct synth_port *synth_from_IKsControl(IKsControl *iface)
  67 {
  68     return CONTAINING_RECORD(iface, struct synth_port, IKsControl_iface);
  69 }
  70
  71 /* IDirectMusicDownloadedInstrument IUnknown part follows: */
  72 static HRESULT WINAPI IDirectMusicDownloadedInstrumentImpl_QueryInterface(IDirectMusicDownloadedInstrument *iface, REFIID riid, VOID **ret_iface)
  73 {
  74     TRACE("(%p, %s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
  75
  76     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDirectMusicDownloadedInstrument))
  77     {
  78         IDirectMusicDownloadedInstrument_AddRef(iface);
  79         *ret_iface = iface;
  80         return S_OK;
  81     }
  82
  83     WARN("(%p, %s, %p): not found\n", iface, debugstr_dmguid(riid), ret_iface);
  84
  85     return E_NOINTERFACE;
  86 }
  87
  88 static ULONG WINAPI IDirectMusicDownloadedInstrumentImpl_AddRef(LPDIRECTMUSICDOWNLOADEDINSTRUMENT iface)
  89 {
  90     IDirectMusicDownloadedInstrumentImpl *This = impl_from_IDirectMusicDownloadedInstrument(iface);
  91     ULONG ref = InterlockedIncrement(&This->ref);
  92
  93     TRACE("(%p): new ref = %lu\n", iface, ref);
  94
  95     return ref;
  96 }
  97
  98 static ULONG WINAPI IDirectMusicDownloadedInstrumentImpl_Release(LPDIRECTMUSICDOWNLOADEDINSTRUMENT iface)
  99 {
 100     IDirectMusicDownloadedInstrumentImpl *This = impl_from_IDirectMusicDownloadedInstrument(iface);
 101     ULONG ref = InterlockedDecrement(&This->ref);
 102
 103     TRACE("(%p): new ref = %lu\n", iface, ref);
 104
 105     if (!ref)
 106     {
 107         HeapFree(GetProcessHeap(), 0, This->data);
 108         HeapFree(GetProcessHeap(), 0, This);
 109         DMUSIC_UnlockModule();
 110     }
 111
 112     return ref;
 113 }
 114
 115 static const IDirectMusicDownloadedInstrumentVtbl DirectMusicDownloadedInstrument_Vtbl = {
 116     IDirectMusicDownloadedInstrumentImpl_QueryInterface,
 117     IDirectMusicDownloadedInstrumentImpl_AddRef,
 118     IDirectMusicDownloadedInstrumentImpl_Release
 119 };
 120
 121 static inline IDirectMusicDownloadedInstrumentImpl* unsafe_impl_from_IDirectMusicDownloadedInstrument(IDirectMusicDownloadedInstrument *iface)
 122 {
 123     if (!iface)
 124         return NULL;
 125     assert(iface->lpVtbl == &DirectMusicDownloadedInstrument_Vtbl);
 126
 127     return impl_from_IDirectMusicDownloadedInstrument(iface);
 128 }
 129
 130 static HRESULT DMUSIC_CreateDirectMusicDownloadedInstrumentImpl(IDirectMusicDownloadedInstrument **instrument)
 131 {
 132     IDirectMusicDownloadedInstrumentImpl *object;
 133
 134     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
 135     if (!object)
 136     {
 137         *instrument = NULL;
 138         return E_OUTOFMEMORY;
 139     }
 140
 141     object->IDirectMusicDownloadedInstrument_iface.lpVtbl = &DirectMusicDownloadedInstrument_Vtbl;
 142     object->ref = 1;
 143
 144     *instrument = &object->IDirectMusicDownloadedInstrument_iface;
 145     DMUSIC_LockModule();
 146
 147     return S_OK;
 148 }
 149
 150 static HRESULT WINAPI synth_port_QueryInterface(IDirectMusicPort *iface, REFIID riid, void **ret_iface)
 151 {
 152     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 153
 154     TRACE("(%p, %s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
 155
 156     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualGUID(riid, &IID_IDirectMusicPort))
 157         *ret_iface = &This->IDirectMusicPort_iface;
 158     else if (IsEqualGUID(riid, &IID_IDirectMusicPortDownload))
 159         *ret_iface = &This->IDirectMusicPortDownload_iface;
 160     else if (IsEqualGUID(riid, &IID_IDirectMusicThru))
 161         *ret_iface = &This->IDirectMusicThru_iface;
 162     else if (IsEqualGUID(riid, &IID_IKsControl))
 163         *ret_iface = &This->IKsControl_iface;
 164     else {
 165         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ret_iface);
 166         *ret_iface = NULL;
 167         return E_NOINTERFACE;
 168     }
 169
 170     IUnknown_AddRef((IUnknown*)*ret_iface);
 171
 172     return S_OK;
 173 }
 174
 175 static ULONG WINAPI synth_port_AddRef(IDirectMusicPort *iface)
 176 {
 177     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 178     ULONG ref = InterlockedIncrement(&This->ref);
 179
 180     TRACE("(%p): new ref = %lu\n", This, ref);
 181
 182     DMUSIC_LockModule();
 183
 184     return ref;
 185 }
 186
 187 static ULONG WINAPI synth_port_Release(IDirectMusicPort *iface)
 188 {
 189     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 190     ULONG ref = InterlockedDecrement(&This->ref);
 191
 192     TRACE("(%p): new ref = %lu\n", This, ref);
 193
 194     if (!ref)
 195     {
 196         dmusic_remove_port(This->parent, iface);
 197         IDirectMusicSynthSink_Release(This->synth_sink);
 198         IDirectMusicSynth_Activate(This->synth, FALSE);
 199         IDirectMusicSynth_Close(This->synth);
 200         IDirectMusicSynth_Release(This->synth);
 201         if (This->dsbuffer)
 202            IDirectSoundBuffer_Release(This->dsbuffer);
 203         if (This->dsound)
 204            IDirectSound_Release(This->dsound);
 205         HeapFree(GetProcessHeap(), 0, This);
 206     }
 207
 208     DMUSIC_UnlockModule();
 209
 210     return ref;
 211 }
 212
 213 static HRESULT WINAPI synth_port_PlayBuffer(IDirectMusicPort *iface, IDirectMusicBuffer *buffer)
 214 {
 215     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 216     HRESULT hr;
 217     REFERENCE_TIME time;
 218     LPBYTE data;
 219     DWORD size;
 220
 221     TRACE("(%p, %p)\n", iface, buffer);
 222
 223     if (!buffer)
 224         return E_POINTER;
 225
 226     hr = IDirectMusicBuffer_GetStartTime(buffer, &time);
 227
 228     if (SUCCEEDED(hr))
 229         hr = IDirectMusicBuffer_GetRawBufferPtr(buffer, &data);
 230
 231     if (SUCCEEDED(hr))
 232         hr = IDirectMusicBuffer_GetUsedBytes(buffer, &size);
 233
 234     if (SUCCEEDED(hr))
 235         hr = IDirectMusicSynth_PlayBuffer(This->synth, time, data, size);
 236
 237     return hr;
 238 }
 239
 240 static HRESULT WINAPI synth_port_SetReadNotificationHandle(IDirectMusicPort *iface, HANDLE event)
 241 {
 242     TRACE("(%p, %p): method not implemented\n", iface, event);
 243     return E_NOTIMPL;
 244 }
 245
 246 static HRESULT WINAPI synth_port_Read(IDirectMusicPort *iface, IDirectMusicBuffer *buffer)
 247 {
 248     TRACE("(%p, %p): method not implemented\n", iface, buffer);
 249     return E_NOTIMPL;
 250 }
 251
 252 static HRESULT WINAPI synth_port_DownloadInstrument(IDirectMusicPort *iface, IDirectMusicInstrument *instrument,
 253         IDirectMusicDownloadedInstrument **downloaded_instrument, DMUS_NOTERANGE *note_ranges, DWORD num_note_ranges)
 254 {
 255     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 256     IDirectMusicInstrumentImpl *instrument_object;
 257     HRESULT ret;
 258     BOOL free;
 259     HANDLE download;
 260     DMUS_DOWNLOADINFO *info;
 261     DMUS_OFFSETTABLE *offset_table;
 262     DMUS_INSTRUMENT *instrument_info;
 263     BYTE *data;
 264     ULONG offset;
 265     ULONG nb_regions;
 266     ULONG size;
 267     ULONG i;
 268
 269     TRACE("(%p, %p, %p, %p, %ld)\n", iface, instrument, downloaded_instrument, note_ranges, num_note_ranges);
 270
 271     if (!instrument || !downloaded_instrument || (num_note_ranges && !note_ranges))
 272         return E_POINTER;
 273
 274     instrument_object = impl_from_IDirectMusicInstrument(instrument);
 275
 276     nb_regions = instrument_object->header.cRegions;
 277     size = sizeof(DMUS_DOWNLOADINFO) + sizeof(ULONG) * (1 + nb_regions) + sizeof(DMUS_INSTRUMENT) + sizeof(DMUS_REGION) * nb_regions;
 278
 279     data = HeapAlloc(GetProcessHeap(), 0, size);
 280     if (!data)
 281         return E_OUTOFMEMORY;
 282
 283     info = (DMUS_DOWNLOADINFO*)data;
 284     offset_table = (DMUS_OFFSETTABLE*)(data + sizeof(DMUS_DOWNLOADINFO));
 285     offset = sizeof(DMUS_DOWNLOADINFO) + sizeof(ULONG) * (1 + nb_regions);
 286
 287     info->dwDLType = DMUS_DOWNLOADINFO_INSTRUMENT2;
 288     info->dwDLId = 0;
 289     info->dwNumOffsetTableEntries = 1 + instrument_object->header.cRegions;
 290     info->cbSize = size;
 291
 292     offset_table->ulOffsetTable[0] = offset;
 293     instrument_info = (DMUS_INSTRUMENT*)(data + offset);
 294     offset += sizeof(DMUS_INSTRUMENT);
 295     instrument_info->ulPatch = MIDILOCALE2Patch(&instrument_object->header.Locale);
 296     instrument_info->ulFirstRegionIdx = 1;
 297     instrument_info->ulGlobalArtIdx = 0; /* FIXME */
 298     instrument_info->ulFirstExtCkIdx = 0; /* FIXME */
 299     instrument_info->ulCopyrightIdx = 0; /* FIXME */
 300     instrument_info->ulFlags = 0; /* FIXME */
 301
 302     for (i = 0;  i < nb_regions; i++)
 303     {
 304         DMUS_REGION *region = (DMUS_REGION*)(data + offset);
 305
 306         offset_table->ulOffsetTable[1 + i] = offset;
 307         offset += sizeof(DMUS_REGION);
 308         region->RangeKey = instrument_object->regions[i].header.RangeKey;
 309         region->RangeVelocity = instrument_object->regions[i].header.RangeVelocity;
 310         region->fusOptions = instrument_object->regions[i].header.fusOptions;
 311         region->usKeyGroup = instrument_object->regions[i].header.usKeyGroup;
 312         region->ulRegionArtIdx = 0; /* FIXME */
 313         region->ulNextRegionIdx = i != (nb_regions - 1) ? (i + 2) : 0;
 314         region->ulFirstExtCkIdx = 0; /* FIXME */
 315         region->WaveLink = instrument_object->regions[i].wave_link;
 316         region->WSMP = instrument_object->regions[i].wave_sample;
 317         region->WLOOP[0] = instrument_object->regions[i].wave_loop;
 318     }
 319
 320     ret = IDirectMusicSynth8_Download(This->synth, &download, (VOID*)data, &free);
 321
 322     if (SUCCEEDED(ret))
 323         ret = DMUSIC_CreateDirectMusicDownloadedInstrumentImpl(downloaded_instrument);
 324
 325     if (SUCCEEDED(ret))
 326     {
 327         IDirectMusicDownloadedInstrumentImpl *downloaded_object = impl_from_IDirectMusicDownloadedInstrument(*downloaded_instrument);
 328
 329         downloaded_object->data = data;
 330         downloaded_object->downloaded = TRUE;
 331     }
 332
 333     *downloaded_instrument = NULL;
 334     HeapFree(GetProcessHeap(), 0, data);
 335
 336     return E_FAIL;
 337 }
 338
 339 static HRESULT WINAPI synth_port_UnloadInstrument(IDirectMusicPort *iface,
 340         IDirectMusicDownloadedInstrument *downloaded_instrument)
 341 {
 342     IDirectMusicDownloadedInstrumentImpl *downloaded_object = unsafe_impl_from_IDirectMusicDownloadedInstrument(downloaded_instrument);
 343
 344     TRACE("(%p, %p)\n", iface, downloaded_instrument);
 345
 346     if (!downloaded_instrument)
 347         return E_POINTER;
 348
 349     if (!downloaded_object->downloaded)
 350         return DMUS_E_NOT_DOWNLOADED_TO_PORT;
 351
 352     HeapFree(GetProcessHeap(), 0, downloaded_object->data);
 353     downloaded_object->data = NULL;
 354     downloaded_object->downloaded = FALSE;
 355
 356     return S_OK;
 357 }
 358
 359 static HRESULT WINAPI synth_port_GetLatencyClock(IDirectMusicPort *iface, IReferenceClock **clock)
 360 {
 361     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 362
 363     TRACE("(%p, %p)\n", iface, clock);
 364
 365     return IDirectMusicSynth8_GetLatencyClock(This->synth, clock);
 366 }
 367
 368 static HRESULT WINAPI synth_port_GetRunningStats(IDirectMusicPort *iface, DMUS_SYNTHSTATS *stats)
 369 {
 370     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 371
 372     FIXME("(%p/%p)->(%p): stub\n", iface, This, stats);
 373
 374     return S_OK;
 375 }
 376
 377 static HRESULT WINAPI synth_port_Compact(IDirectMusicPort *iface)
 378 {
 379     TRACE("(%p): method not implemented\n", iface);
 380     return E_NOTIMPL;
 381 }
 382
 383 static HRESULT WINAPI synth_port_GetCaps(IDirectMusicPort *iface, DMUS_PORTCAPS *port_caps)
 384 {
 385     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 386
 387     TRACE("(%p, %p)\n", iface, port_caps);
 388
 389     return IDirectMusicSynth_GetPortCaps(This->synth, port_caps);
 390 }
 391
 392 static HRESULT WINAPI synth_port_DeviceIoControl(IDirectMusicPort *iface, DWORD io_control_code,
 393         void *in_buffer, DWORD in_buffer_size, void *out_buffer, DWORD out_buffer_size,
 394         DWORD *bytes_returned, OVERLAPPED *overlapped)
 395 {
 396     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 397
 398     FIXME("(%p/%p, %ld, %p, %ld, %p, %ld, %p, %p): stub\n", iface, This, io_control_code, in_buffer, in_buffer_size, out_buffer, out_buffer_size, bytes_returned, overlapped);
 399
 400     return S_OK;
 401 }
 402
 403 static HRESULT WINAPI synth_port_SetNumChannelGroups(IDirectMusicPort *iface, DWORD channel_groups)
 404 {
 405     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 406
 407     FIXME("(%p, %ld): semi-stub\n", iface, channel_groups);
 408
 409     This->nrofgroups = channel_groups;
 410
 411     return S_OK;
 412 }
 413
 414 static HRESULT WINAPI synth_port_GetNumChannelGroups(IDirectMusicPort *iface, DWORD *channel_groups)
 415 {
 416     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 417
 418     TRACE("(%p, %p)\n", iface, channel_groups);
 419
 420     *channel_groups = This->nrofgroups;
 421
 422     return S_OK;
 423 }
 424
 425 static HRESULT WINAPI synth_port_Activate(IDirectMusicPort *iface, BOOL active)
 426 {
 427     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 428
 429     FIXME("(%p/%p)->(%d): semi-stub\n", iface, This, active);
 430
 431     if (This->active == active)
 432         return S_FALSE;
 433
 434     if (active) {
 435         /* Acquire the dsound */
 436         if (!This->dsound) {
 437             IDirectSound_AddRef(This->parent->dsound);
 438             This->dsound = This->parent->dsound;
 439         }
 440         IDirectSound_AddRef(This->dsound);
 441     } else {
 442         /* Release the dsound */
 443         IDirectSound_Release(This->dsound);
 444         IDirectSound_Release(This->parent->dsound);
 445         if (This->dsound == This->parent->dsound)
 446             This->dsound = NULL;
 447     }
 448
 449     This->active = active;
 450
 451     return S_OK;
 452 }
 453
 454 static HRESULT WINAPI synth_port_SetChannelPriority(IDirectMusicPort *iface, DWORD channel_group,
 455         DWORD channel, DWORD priority)
 456 {
 457     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 458
 459     FIXME("(%p/%p, %ld, %ld, %ld): semi-stub\n", iface, This, channel_group, channel, priority);
 460
 461     if (channel > 16)
 462     {
 463         WARN("isn't there supposed to be 16 channels (no. %ld requested)?! (faking as it is ok)\n", channel);
 464         /*return E_INVALIDARG;*/
 465     }
 466
 467     return S_OK;
 468 }
 469
 470 static HRESULT WINAPI synth_port_GetChannelPriority(IDirectMusicPort *iface, DWORD channel_group,
 471         DWORD channel, DWORD *priority)
 472 {
 473     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 474
 475     TRACE("(%p, %lu, %lu, %p)\n", iface, channel_group, channel, priority);
 476
 477     *priority = This->group[channel_group - 1].channel[channel].priority;
 478
 479     return S_OK;
 480 }
 481
 482 static HRESULT WINAPI synth_port_SetDirectSound(IDirectMusicPort *iface, IDirectSound *dsound,
 483         IDirectSoundBuffer *dsbuffer)
 484 {
 485     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 486
 487     FIXME("(%p/%p)->(%p, %p): semi-stub\n", iface, This, dsound, dsbuffer);
 488
 489     if (This->active)
 490         return DMUS_E_DSOUND_ALREADY_SET;
 491
 492     if (This->dsound) {
 493         if (This->dsound != This->parent->dsound)
 494             ERR("Not the same dsound in the port (%p) and parent dmusic (%p), expect trouble!\n",
 495                     This->dsound, This->parent->dsound);
 496         if (!IDirectSound_Release(This->parent->dsound))
 497             This->parent->dsound = NULL;
 498     }
 499     if (This->dsbuffer)
 500         IDirectSoundBuffer_Release(This->dsbuffer);
 501
 502     This->dsound = dsound;
 503     This->dsbuffer = dsbuffer;
 504
 505     if (This->dsound)
 506         IDirectSound_AddRef(This->dsound);
 507     if (This->dsbuffer)
 508         IDirectSoundBuffer_AddRef(This->dsbuffer);
 509
 510     return S_OK;
 511 }
 512
 513 static HRESULT WINAPI synth_port_GetFormat(IDirectMusicPort *iface, WAVEFORMATEX *format,
 514         DWORD *fmtsize, DWORD *bufsize)
 515 {
 516     struct synth_port *This = synth_from_IDirectMusicPort(iface);
 517     HRESULT hr;
 518
 519     TRACE("(%p, %p, %p, %p)\n", This, format, fmtsize, bufsize);
 520
 521     if (FAILED(hr = IDirectMusicSynth_GetFormat(This->synth, format, fmtsize)))
 522         return hr;
 523
 524     if (bufsize)
 525         hr = IDirectMusicSynthSink_GetDesiredBufferSize(This->synth_sink, bufsize);
 526
 527     return hr;
 528 }
 529
 530 static const IDirectMusicPortVtbl synth_port_vtbl = {
 531     /**** IDirectMusicPort IUnknown part methods ***/
 532     synth_port_QueryInterface,
 533     synth_port_AddRef,
 534     synth_port_Release,
 535     /**** IDirectMusicPort methods ***/
 536     synth_port_PlayBuffer,
 537     synth_port_SetReadNotificationHandle,
 538     synth_port_Read,
 539     synth_port_DownloadInstrument,
 540     synth_port_UnloadInstrument,
 541     synth_port_GetLatencyClock,
 542     synth_port_GetRunningStats,
 543     synth_port_Compact,
 544     synth_port_GetCaps,
 545     synth_port_DeviceIoControl,
 546     synth_port_SetNumChannelGroups,
 547     synth_port_GetNumChannelGroups,
 548     synth_port_Activate,
 549     synth_port_SetChannelPriority,
 550     synth_port_GetChannelPriority,
 551     synth_port_SetDirectSound,
 552     synth_port_GetFormat
 553 };
 554
 555 static HRESULT WINAPI synth_port_download_QueryInterface(IDirectMusicPortDownload *iface, REFIID riid, void **ret_iface)
 556 {
 557     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 558
 559     TRACE("(%p, %s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
 560
 561     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
 562 }
 563
 564 static ULONG WINAPI synth_port_download_AddRef(IDirectMusicPortDownload *iface)
 565 {
 566     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 567
 568     TRACE("(%p)\n", iface);
 569
 570     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
 571 }
 572
 573 static ULONG WINAPI synth_port_download_Release(IDirectMusicPortDownload *iface)
 574 {
 575     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 576
 577     TRACE("(%p)\n", iface);
 578
 579     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
 580 }
 581
 582 static HRESULT WINAPI synth_port_download_GetBuffer(IDirectMusicPortDownload *iface, DWORD DLId,
 583         IDirectMusicDownload **IDMDownload)
 584 {
 585     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 586
 587     FIXME("(%p/%p, %lu, %p): stub\n", iface, This, DLId, IDMDownload);
 588
 589     if (!IDMDownload)
 590         return E_POINTER;
 591
 592     return DMUSIC_CreateDirectMusicDownloadImpl(&IID_IDirectMusicDownload, (LPVOID*)IDMDownload, NULL);
 593 }
 594
 595 static HRESULT WINAPI synth_port_download_AllocateBuffer(IDirectMusicPortDownload *iface, DWORD size,
 596         IDirectMusicDownload **IDMDownload)
 597 {
 598     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 599
 600     FIXME("(%p/%p, %lu, %p): stub\n", iface, This, size, IDMDownload);
 601
 602     return S_OK;
 603 }
 604
 605 static HRESULT WINAPI synth_port_download_GetDLId(IDirectMusicPortDownload *iface, DWORD *start_DLId, DWORD count)
 606 {
 607     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 608
 609     FIXME("(%p/%p, %p, %lu): stub\n", iface, This, start_DLId, count);
 610
 611     return S_OK;
 612 }
 613
 614 static HRESULT WINAPI synth_port_download_GetAppend(IDirectMusicPortDownload *iface, DWORD *append)
 615 {
 616     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 617
 618     FIXME("(%p/%p)->(%p): stub\n", iface, This, append);
 619
 620     return S_OK;
 621 }
 622
 623 static HRESULT WINAPI synth_port_download_Download(IDirectMusicPortDownload *iface, IDirectMusicDownload *IDMDownload)
 624 {
 625     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 626
 627     FIXME("(%p/%p)->(%p): stub\n", iface, This, IDMDownload);
 628
 629     return S_OK;
 630 }
 631
 632 static HRESULT WINAPI synth_port_download_Unload(IDirectMusicPortDownload *iface, IDirectMusicDownload *IDMDownload)
 633 {
 634     struct synth_port *This = synth_from_IDirectMusicPortDownload(iface);
 635
 636     FIXME("(%p/%p)->(%p): stub\n", iface, This, IDMDownload);
 637
 638     return S_OK;
 639 }
 640
 641 static const IDirectMusicPortDownloadVtbl synth_port_download_vtbl = {
 642     /*** IDirectMusicPortDownload IUnknown part methods ***/
 643     synth_port_download_QueryInterface,
 644     synth_port_download_AddRef,
 645     synth_port_download_Release,
 646     /*** IDirectMusicPortDownload methods ***/
 647     synth_port_download_GetBuffer,
 648     synth_port_download_AllocateBuffer,
 649     synth_port_download_GetDLId,
 650     synth_port_download_GetAppend,
 651     synth_port_download_Download,
 652     synth_port_download_Unload
 653 };
 654
 655 static HRESULT WINAPI synth_port_thru_QueryInterface(IDirectMusicThru *iface, REFIID riid, void **ret_iface)
 656 {
 657     struct synth_port *This = synth_from_IDirectMusicThru(iface);
 658
 659     TRACE("(%p, %s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
 660
 661     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
 662 }
 663
 664 static ULONG WINAPI synth_port_thru_AddRef(IDirectMusicThru *iface)
 665 {
 666     struct synth_port *This = synth_from_IDirectMusicThru(iface);
 667
 668     TRACE("(%p)\n", iface);
 669
 670     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
 671 }
 672
 673 static ULONG WINAPI synth_port_thru_Release(IDirectMusicThru *iface)
 674 {
 675     struct synth_port *This = synth_from_IDirectMusicThru(iface);
 676
 677     TRACE("(%p)\n", iface);
 678
 679     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
 680 }
 681
 682 static HRESULT WINAPI synth_port_thru_ThruChannel(IDirectMusicThru *iface, DWORD source_channel_group,
 683         DWORD source_channel, DWORD destination_channel_group, DWORD destination_channel,
 684         IDirectMusicPort *destination_port)
 685 {
 686     struct synth_port *This = synth_from_IDirectMusicThru(iface);
 687
 688     FIXME("(%p/%p, %ld, %ld, %ld, %ld, %p): stub\n", iface, This, source_channel_group, source_channel, destination_channel_group, destination_channel, destination_port);
 689
 690     return S_OK;
 691 }
 692
 693 static const IDirectMusicThruVtbl synth_port_thru_vtbl = {
 694     /*** IDirectMusicThru IUnknown part methods */
 695     synth_port_thru_QueryInterface,
 696     synth_port_thru_AddRef,
 697     synth_port_thru_Release,
 698     /*** IDirectMusicThru methods ***/
 699     synth_port_thru_ThruChannel
 700 };
 701
 702 static HRESULT WINAPI IKsControlImpl_QueryInterface(IKsControl *iface, REFIID riid,
 703         void **ret_iface)
 704 {
 705     struct synth_port *This = synth_from_IKsControl(iface);
 706
 707     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
 708 }
 709
 710 static ULONG WINAPI IKsControlImpl_AddRef(IKsControl *iface)
 711 {
 712     struct synth_port *This = synth_from_IKsControl(iface);
 713
 714     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
 715 }
 716
 717 static ULONG WINAPI IKsControlImpl_Release(IKsControl *iface)
 718 {
 719     struct synth_port *This = synth_from_IKsControl(iface);
 720
 721     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
 722 }
 723
 724 static HRESULT WINAPI IKsControlImpl_KsProperty(IKsControl *iface, KSPROPERTY *prop,
 725         ULONG prop_len, void *data, ULONG data_len, ULONG *ret_len)
 726 {
 727     TRACE("(%p, %p, %lu, %p, %lu, %p)\n", iface, prop, prop_len, data, data_len, ret_len);
 728     TRACE("prop = %s - %lu - %lu\n", debugstr_guid(&prop->u.s.Set), prop->u.s.Id, prop->u.s.Flags);
 729
 730     if (prop->u.s.Flags != KSPROPERTY_TYPE_GET)
 731     {
 732         FIXME("prop flags %lu not yet supported\n", prop->u.s.Flags);
 733         return S_FALSE;
 734     }
 735
 736     if (data_len <  sizeof(DWORD))
 737         return E_NOT_SUFFICIENT_BUFFER;
 738
 739     FIXME("Unknown property %s\n", debugstr_guid(&prop->u.s.Set));
 740     *(DWORD*)data = FALSE;
 741     *ret_len = sizeof(DWORD);
 742
 743     return S_OK;
 744 }
 745
 746 static HRESULT WINAPI IKsControlImpl_KsMethod(IKsControl *iface, KSMETHOD *method,
 747         ULONG method_len, void *data, ULONG data_len, ULONG *ret_len)
 748 {
 749     FIXME("(%p, %p, %lu, %p, %lu, %p): stub\n", iface, method, method_len, data, data_len, ret_len);
 750
 751     return E_NOTIMPL;
 752 }
 753
 754 static HRESULT WINAPI IKsControlImpl_KsEvent(IKsControl *iface, KSEVENT *event, ULONG event_len,
 755         void *data, ULONG data_len, ULONG *ret_len)
 756 {
 757     FIXME("(%p, %p, %lu, %p, %lu, %p): stub\n", iface, event, event_len, data, data_len, ret_len);
 758
 759     return E_NOTIMPL;
 760 }
 761
 762 static const IKsControlVtbl ikscontrol_vtbl = {
 763     IKsControlImpl_QueryInterface,
 764     IKsControlImpl_AddRef,
 765     IKsControlImpl_Release,
 766     IKsControlImpl_KsProperty,
 767     IKsControlImpl_KsMethod,
 768     IKsControlImpl_KsEvent
 769 };
 770
 771 HRESULT synth_port_create(IDirectMusic8Impl *parent, DMUS_PORTPARAMS *port_params,
 772         DMUS_PORTCAPS *port_caps, IDirectMusicPort **port)
 773 {
 774     struct synth_port *obj;
 775     HRESULT hr = E_FAIL;
 776     int i;
 777
 778     TRACE("(%p, %p)\n", port_params, port);
 779
 780     *port = NULL;
 781
 782     obj = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*obj));
 783     if (!obj)
 784         return E_OUTOFMEMORY;
 785
 786     obj->IDirectMusicPort_iface.lpVtbl = &synth_port_vtbl;
 787     obj->IDirectMusicPortDownload_iface.lpVtbl = &synth_port_download_vtbl;
 788     obj->IDirectMusicThru_iface.lpVtbl = &synth_port_thru_vtbl;
 789     obj->IKsControl_iface.lpVtbl = &ikscontrol_vtbl;
 790     obj->ref = 1;
 791     obj->parent = parent;
 792     obj->active = FALSE;
 793     obj->params = *port_params;
 794
 795     hr = CoCreateInstance(&CLSID_DirectMusicSynth, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusicSynth,
 796             (void **)&obj->synth);
 797
 798     if (SUCCEEDED(hr))
 799         hr = CoCreateInstance(&CLSID_DirectMusicSynthSink, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusicSynthSink, (void**)&obj->synth_sink);
 800
 801     if (SUCCEEDED(hr))
 802         hr = IDirectMusicSynth_SetSynthSink(obj->synth, obj->synth_sink);
 803
 804     if (SUCCEEDED(hr))
 805         hr = IDirectMusicSynth_SetMasterClock(obj->synth, obj->parent->master_clock);
 806
 807     if (SUCCEEDED(hr))
 808         hr = IDirectMusicSynth_Open(obj->synth, port_params);
 809
 810     if (0)
 811     {
 812         if (port_params->dwValidParams & DMUS_PORTPARAMS_CHANNELGROUPS) {
 813             obj->nrofgroups = port_params->dwChannelGroups;
 814             /* Setting default priorities */
 815             for (i = 0; i < obj->nrofgroups; i++) {
 816                 TRACE ("Setting default channel priorities on channel group %i\n", i + 1);
 817                 obj->group[i].channel[0].priority = DAUD_CHAN1_DEF_VOICE_PRIORITY;
 818                 obj->group[i].channel[1].priority = DAUD_CHAN2_DEF_VOICE_PRIORITY;
 819                 obj->group[i].channel[2].priority = DAUD_CHAN3_DEF_VOICE_PRIORITY;
 820                 obj->group[i].channel[3].priority = DAUD_CHAN4_DEF_VOICE_PRIORITY;
 821                 obj->group[i].channel[4].priority = DAUD_CHAN5_DEF_VOICE_PRIORITY;
 822                 obj->group[i].channel[5].priority = DAUD_CHAN6_DEF_VOICE_PRIORITY;
 823                 obj->group[i].channel[6].priority = DAUD_CHAN7_DEF_VOICE_PRIORITY;
 824                 obj->group[i].channel[7].priority = DAUD_CHAN8_DEF_VOICE_PRIORITY;
 825                 obj->group[i].channel[8].priority = DAUD_CHAN9_DEF_VOICE_PRIORITY;
 826                 obj->group[i].channel[9].priority = DAUD_CHAN10_DEF_VOICE_PRIORITY;
 827                 obj->group[i].channel[10].priority = DAUD_CHAN11_DEF_VOICE_PRIORITY;
 828                 obj->group[i].channel[11].priority = DAUD_CHAN12_DEF_VOICE_PRIORITY;
 829                 obj->group[i].channel[12].priority = DAUD_CHAN13_DEF_VOICE_PRIORITY;
 830                 obj->group[i].channel[13].priority = DAUD_CHAN14_DEF_VOICE_PRIORITY;
 831                 obj->group[i].channel[14].priority = DAUD_CHAN15_DEF_VOICE_PRIORITY;
 832                 obj->group[i].channel[15].priority = DAUD_CHAN16_DEF_VOICE_PRIORITY;
 833             }
 834         }
 835     }
 836
 837     if (SUCCEEDED(hr)) {
 838         *port = &obj->IDirectMusicPort_iface;
 839         return S_OK;
 840     }
 841
 842     if (obj->synth)
 843         IDirectMusicSynth_Release(obj->synth);
 844     if (obj->synth_sink)
 845         IDirectMusicSynthSink_Release(obj->synth_sink);
 846     HeapFree(GetProcessHeap(), 0, obj);
 847
 848     return hr;
 849 }
 850
 851 struct midi_port {
 852     IDirectMusicPort IDirectMusicPort_iface;
 853     IDirectMusicThru IDirectMusicThru_iface;
 854     LONG ref;
 855     IReferenceClock *clock;
 856 };
 857
 858 static inline struct midi_port *impl_from_IDirectMusicPort(IDirectMusicPort *iface)
 859 {
 860     return CONTAINING_RECORD(iface, struct midi_port, IDirectMusicPort_iface);
 861 }
 862
 863 static HRESULT WINAPI midi_IDirectMusicPort_QueryInterface(IDirectMusicPort *iface, REFIID riid,
 864         void **ret_iface)
 865 {
 866     struct midi_port *This = impl_from_IDirectMusicPort(iface);
 867
 868     TRACE("(%p, %s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
 869
 870     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDirectMusicPort))
 871         *ret_iface = iface;
 872     else if (IsEqualIID(riid, &IID_IDirectMusicThru))
 873         *ret_iface = &This->IDirectMusicThru_iface;
 874     else {
 875         WARN("no interface for %s\n", debugstr_dmguid(riid));
 876         *ret_iface = NULL;
 877         return E_NOINTERFACE;
 878     }
 879
 880     IUnknown_AddRef((IUnknown *)*ret_iface);
 881
 882     return S_OK;
 883 }
 884
 885 static ULONG WINAPI midi_IDirectMusicPort_AddRef(IDirectMusicPort *iface)
 886 {
 887     struct midi_port *This = impl_from_IDirectMusicPort(iface);
 888     ULONG ref = InterlockedIncrement(&This->ref);
 889
 890     TRACE("(%p) ref = %lu\n", iface, ref);
 891
 892     return ref;
 893 }
 894
 895 static ULONG WINAPI midi_IDirectMusicPort_Release(IDirectMusicPort *iface)
 896 {
 897     struct midi_port *This = impl_from_IDirectMusicPort(iface);
 898     ULONG ref = InterlockedDecrement(&This->ref);
 899
 900     TRACE("(%p) ref = %lu\n", iface, ref);
 901
 902     if (!ref) {
 903         if (This->clock)
 904             IReferenceClock_Release(This->clock);
 905         heap_free(This);
 906     }
 907
 908     return ref;
 909 }
 910
 911 static HRESULT WINAPI midi_IDirectMusicPort_PlayBuffer(IDirectMusicPort *iface,
 912         IDirectMusicBuffer *buffer)
 913 {
 914     FIXME("(%p, %p) stub!\n", iface, buffer);
 915
 916     return E_NOTIMPL;
 917 }
 918
 919 static HRESULT WINAPI midi_IDirectMusicPort_SetReadNotificationHandle(IDirectMusicPort *iface,
 920         HANDLE event)
 921 {
 922     FIXME("(%p, %p) stub!\n", iface, event);
 923
 924     return S_OK;
 925 }
 926
 927 static HRESULT WINAPI midi_IDirectMusicPort_Read(IDirectMusicPort *iface,
 928         IDirectMusicBuffer *buffer)
 929 {
 930     FIXME("(%p, %p) stub!\n", iface, buffer);
 931
 932     return E_NOTIMPL;
 933 }
 934
 935 static HRESULT WINAPI midi_IDirectMusicPort_DownloadInstrument(IDirectMusicPort *iface,
 936         IDirectMusicInstrument *instrument, IDirectMusicDownloadedInstrument **downloaded,
 937         DMUS_NOTERANGE *ranges, DWORD num_ranges)
 938 {
 939     FIXME("(%p, %p, %p, %p, %lu) stub!\n", iface, instrument, downloaded, ranges, num_ranges);
 940
 941     return E_NOTIMPL;
 942 }
 943
 944 static HRESULT WINAPI midi_IDirectMusicPort_UnloadInstrument(IDirectMusicPort *iface,
 945         IDirectMusicDownloadedInstrument *downloaded)
 946 {
 947     FIXME("(%p, %p) stub!\n", iface, downloaded);
 948
 949     return E_NOTIMPL;
 950 }
 951
 952 static HRESULT WINAPI midi_IDirectMusicPort_GetLatencyClock(IDirectMusicPort *iface,
 953         IReferenceClock **clock)
 954 {
 955     struct midi_port *This = impl_from_IDirectMusicPort(iface);
 956
 957     TRACE("(%p, %p)\n", iface, clock);
 958
 959     if (!clock)
 960         return E_POINTER;
 961
 962     *clock = This->clock;
 963     IReferenceClock_AddRef(*clock);
 964
 965     return S_OK;
 966 }
 967
 968 static HRESULT WINAPI midi_IDirectMusicPort_GetRunningStats(IDirectMusicPort *iface,
 969         DMUS_SYNTHSTATS *stats)
 970 {
 971     FIXME("(%p, %p) stub!\n", iface, stats);
 972
 973     return E_NOTIMPL;
 974 }
 975
 976 static HRESULT WINAPI midi_IDirectMusicPort_Compact(IDirectMusicPort *iface)
 977 {
 978     FIXME("(%p) stub!\n", iface);
 979
 980     return E_NOTIMPL;
 981 }
 982
 983 static HRESULT WINAPI midi_IDirectMusicPort_GetCaps(IDirectMusicPort *iface, DMUS_PORTCAPS *caps)
 984 {
 985     FIXME("(%p, %p) stub!\n", iface, caps);
 986
 987     return E_NOTIMPL;
 988 }
 989
 990 static HRESULT WINAPI midi_IDirectMusicPort_DeviceIoControl(IDirectMusicPort *iface,
 991         DWORD io_control_code, void *in, DWORD size_in, void *out, DWORD size_out, DWORD *ret_len,
 992         OVERLAPPED *overlapped)
 993 {
 994     FIXME("(%p, %lu, %p, %lu, %p, %lu, %p, %p) stub!\n", iface, io_control_code, in, size_in, out
 995             , size_out, ret_len, overlapped);
 996
 997     return E_NOTIMPL;
 998 }
 999
1000 static HRESULT WINAPI midi_IDirectMusicPort_SetNumChannelGroups(IDirectMusicPort *iface,
1001         DWORD cgroups)
1002 {
1003     FIXME("(%p, %lu) stub!\n", iface, cgroups);
1004
1005     return E_NOTIMPL;
1006 }
1007
1008 static HRESULT WINAPI midi_IDirectMusicPort_GetNumChannelGroups(IDirectMusicPort *iface,
1009         DWORD *cgroups)
1010 {
1011     FIXME("(%p, %p) stub!\n", iface, cgroups);
1012
1013     return E_NOTIMPL;
1014 }
1015
1016 static HRESULT WINAPI midi_IDirectMusicPort_Activate(IDirectMusicPort *iface, BOOL active)
1017 {
1018     FIXME("(%p, %u) stub!\n", iface, active);
1019
1020     return S_OK;
1021 }
1022
1023 static HRESULT WINAPI midi_IDirectMusicPort_SetChannelPriority(IDirectMusicPort *iface,
1024         DWORD channel_group, DWORD channel, DWORD priority)
1025 {
1026     FIXME("(%p, %lu, %lu, %lu) stub!\n", iface, channel_group, channel, priority);
1027
1028     return E_NOTIMPL;
1029 }
1030
1031 static HRESULT WINAPI midi_IDirectMusicPort_GetChannelPriority(IDirectMusicPort *iface,
1032         DWORD channel_group, DWORD channel, DWORD *priority)
1033 {
1034     FIXME("(%p, %lu, %lu, %p) stub!\n", iface, channel_group, channel, priority);
1035
1036     return E_NOTIMPL;
1037 }
1038
1039 static HRESULT WINAPI midi_IDirectMusicPort_SetDirectSound(IDirectMusicPort *iface,
1040         IDirectSound *dsound, IDirectSoundBuffer *dsbuffer)
1041 {
1042     FIXME("(%p, %p, %p) stub!\n", iface, dsound, dsbuffer);
1043
1044     return E_NOTIMPL;
1045 }
1046
1047 static HRESULT WINAPI midi_IDirectMusicPort_GetFormat(IDirectMusicPort *iface, WAVEFORMATEX *format,
1048         DWORD *format_size, DWORD *buffer_size)
1049 {
1050     FIXME("(%p, %p, %p, %p) stub!\n", iface, format, format_size, buffer_size);
1051
1052     return E_NOTIMPL;
1053 }
1054
1055 static const IDirectMusicPortVtbl midi_port_vtbl = {
1056     midi_IDirectMusicPort_QueryInterface,
1057     midi_IDirectMusicPort_AddRef,
1058     midi_IDirectMusicPort_Release,
1059     midi_IDirectMusicPort_PlayBuffer,
1060     midi_IDirectMusicPort_SetReadNotificationHandle,
1061     midi_IDirectMusicPort_Read,
1062     midi_IDirectMusicPort_DownloadInstrument,
1063     midi_IDirectMusicPort_UnloadInstrument,
1064     midi_IDirectMusicPort_GetLatencyClock,
1065     midi_IDirectMusicPort_GetRunningStats,
1066     midi_IDirectMusicPort_Compact,
1067     midi_IDirectMusicPort_GetCaps,
1068     midi_IDirectMusicPort_DeviceIoControl,
1069     midi_IDirectMusicPort_SetNumChannelGroups,
1070     midi_IDirectMusicPort_GetNumChannelGroups,
1071     midi_IDirectMusicPort_Activate,
1072     midi_IDirectMusicPort_SetChannelPriority,
1073     midi_IDirectMusicPort_GetChannelPriority,
1074     midi_IDirectMusicPort_SetDirectSound,
1075     midi_IDirectMusicPort_GetFormat,
1076 };
1077
1078 static inline struct midi_port *impl_from_IDirectMusicThru(IDirectMusicThru *iface)
1079 {
1080     return CONTAINING_RECORD(iface, struct midi_port, IDirectMusicThru_iface);
1081 }
1082
1083 static HRESULT WINAPI midi_IDirectMusicThru_QueryInterface(IDirectMusicThru *iface, REFIID riid,
1084         void **ret_iface)
1085 {
1086     struct midi_port *This = impl_from_IDirectMusicThru(iface);
1087
1088     return IDirectMusicPort_QueryInterface(&This->IDirectMusicPort_iface, riid, ret_iface);
1089 }
1090
1091 static ULONG WINAPI midi_IDirectMusicThru_AddRef(IDirectMusicThru *iface)
1092 {
1093     struct midi_port *This = impl_from_IDirectMusicThru(iface);
1094
1095     return IDirectMusicPort_AddRef(&This->IDirectMusicPort_iface);
1096 }
1097
1098 static ULONG WINAPI midi_IDirectMusicThru_Release(IDirectMusicThru *iface)
1099 {
1100     struct midi_port *This = impl_from_IDirectMusicThru(iface);
1101
1102     return IDirectMusicPort_Release(&This->IDirectMusicPort_iface);
1103 }
1104
1105 static HRESULT WINAPI midi_IDirectMusicThru_ThruChannel(IDirectMusicThru *iface, DWORD src_group,
1106         DWORD src_channel, DWORD dest_group, DWORD dest_channel, IDirectMusicPort *dest_port)
1107 {
1108     FIXME("(%p, %lu, %lu, %lu, %lu, %p) stub!\n", iface, src_group, src_channel, dest_group,
1109             dest_channel, dest_port);
1110
1111     return S_OK;
1112 }
1113
1114 static const IDirectMusicThruVtbl midi_thru_vtbl = {
1115     midi_IDirectMusicThru_QueryInterface,
1116     midi_IDirectMusicThru_AddRef,
1117     midi_IDirectMusicThru_Release,
1118     midi_IDirectMusicThru_ThruChannel,
1119 };
1120
1121 static HRESULT midi_port_create(IDirectMusic8Impl *parent, DMUS_PORTPARAMS *params,
1122         DMUS_PORTCAPS *caps, IDirectMusicPort **port)
1123 {
1124     struct midi_port *obj;
1125     HRESULT hr;
1126
1127     if (!(obj = heap_alloc_zero(sizeof(*obj))))
1128         return E_OUTOFMEMORY;
1129
1130     obj->IDirectMusicPort_iface.lpVtbl = &midi_port_vtbl;
1131     obj->IDirectMusicThru_iface.lpVtbl = &midi_thru_vtbl;
1132     obj->ref = 1;
1133
1134     hr = DMUSIC_CreateReferenceClockImpl(&IID_IReferenceClock, (void **)&obj->clock, NULL);
1135     if (hr != S_OK) {
1136         HeapFree(GetProcessHeap(), 0, obj);
1137         return hr;
1138     }
1139
1140     *port = &obj->IDirectMusicPort_iface;
1141
1142     return S_OK;
1143 }
1144
1145 HRESULT midi_out_port_create(IDirectMusic8Impl *parent, DMUS_PORTPARAMS *params,
1146         DMUS_PORTCAPS *caps, IDirectMusicPort **port)
1147 {
1148     TRACE("(%p, %p, %p, %p)\n", parent, params, caps, port);
1149
1150     return midi_port_create(parent, params, caps, port);
1151 }
1152
1153 HRESULT midi_in_port_create(IDirectMusic8Impl *parent, DMUS_PORTPARAMS *params,
1154         DMUS_PORTCAPS *caps, IDirectMusicPort **port)
1155 {
1156     TRACE("(%p, %p, %p, %p)\n", parent, params, caps, port);
1157
1158     return midi_port_create(parent, params, caps, port);
1159 }