git.oblomov.eu Git - wine/blob - dlls/dmime/performance.c

   1 /* IDirectMusicPerformance Implementation
   2  *
   3  * Copyright (C) 2003-2004 Rok Mandeljc
   4  * Copyright (C) 2003-2004 Raphael Junqueira
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "dmime_private.h"
  22
  23 WINE_DEFAULT_DEBUG_CHANNEL(dmime);
  24
  25 typedef struct DMUS_PMSGItem DMUS_PMSGItem;
  26 struct DMUS_PMSGItem {
  27   DMUS_PMSGItem* next;
  28   DMUS_PMSGItem* prev;
  29
  30   REFERENCE_TIME rtItemTime;
  31   BOOL bInUse;
  32   DWORD cb;
  33   DMUS_PMSG pMsg;
  34 };
  35
  36 #define DMUS_PMSGToItem(pMSG)   ((DMUS_PMSGItem*) (((unsigned char*) pPMSG) -  offsetof(DMUS_PMSGItem, pMsg)))
  37 #define DMUS_ItemToPMSG(pItem)  (&(pItem->pMsg))
  38 #define DMUS_ItemRemoveFromQueue(This,pItem) \
  39 {\
  40   if (pItem->prev) pItem->prev->next = pItem->next;\
  41   if (pItem->next) pItem->next->prev = pItem->prev;\
  42   if (This->head == pItem) This->head = pItem->next;\
  43   if (This->imm_head == pItem) This->imm_head = pItem->next;\
  44   pItem->bInUse = FALSE;\
  45 }
  46
  47 #define PROCESSMSG_START           (WM_APP + 0)
  48 #define PROCESSMSG_EXIT            (WM_APP + 1)
  49 #define PROCESSMSG_REMOVE          (WM_APP + 2)
  50 #define PROCESSMSG_ADD             (WM_APP + 4)
  51
  52
  53 static DMUS_PMSGItem* ProceedMsg(IDirectMusicPerformance8Impl* This, DMUS_PMSGItem* cur) {
  54   if (cur->pMsg.dwType == DMUS_PMSGT_NOTIFICATION) {
  55     SetEvent(This->hNotification);
  56   }
  57   DMUS_ItemRemoveFromQueue(This, cur);
  58   switch (cur->pMsg.dwType) {
  59   case DMUS_PMSGT_WAVE:
  60   case DMUS_PMSGT_TEMPO:
  61   case DMUS_PMSGT_STOP:
  62   default:
  63     FIXME("Unhandled PMsg Type: 0x%x\n", cur->pMsg.dwType);
  64     break;
  65   }
  66   return cur;
  67 }
  68
  69 static DWORD WINAPI ProcessMsgThread(LPVOID lpParam) {
  70   IDirectMusicPerformance8Impl* This = (IDirectMusicPerformance8Impl*) lpParam;
  71   DWORD timeOut = INFINITE;
  72   MSG msg;
  73   HRESULT hr;
  74   REFERENCE_TIME rtCurTime;
  75   DMUS_PMSGItem* it = NULL;
  76   DMUS_PMSGItem* cur = NULL;
  77   DMUS_PMSGItem* it_next = NULL;
  78
  79   while (TRUE) {
  80     DWORD dwDec = This->rtLatencyTime + This->dwBumperLength;
  81
  82     if (timeOut > 0) MsgWaitForMultipleObjects(0, NULL, FALSE, timeOut, QS_POSTMESSAGE|QS_SENDMESSAGE|QS_TIMER);
  83     timeOut = INFINITE;
  84
  85     EnterCriticalSection(&This->safe);
  86     hr = IDirectMusicPerformance8_GetTime((IDirectMusicPerformance8*) This, &rtCurTime, NULL);
  87     if (FAILED(hr)) {
  88       goto outrefresh;
  89     }
  90
  91     for (it = This->imm_head; NULL != it; ) {
  92       it_next = it->next;
  93       cur = ProceedMsg(This, it);
  94       HeapFree(GetProcessHeap(), 0, cur);
  95       it = it_next;
  96     }
  97
  98     for (it = This->head; NULL != it && it->rtItemTime < rtCurTime + dwDec; ) {
  99       it_next = it->next;
 100       cur = ProceedMsg(This, it);
 101       HeapFree(GetProcessHeap(), 0, cur);
 102       it = it_next;
 103     }
 104     if (NULL != it) {
 105       timeOut = ( it->rtItemTime - rtCurTime ) + This->rtLatencyTime;
 106     }
 107
 108 outrefresh:
 109     LeaveCriticalSection(&This->safe);
 110
 111     while (PeekMessageA(&msg, NULL, 0, 0, PM_REMOVE)) {
 112       /** if hwnd we suppose that is a windows event ... */
 113       if  (NULL != msg.hwnd) {
 114         TranslateMessage(&msg);
 115         DispatchMessageA(&msg);
 116       } else {
 117         switch (msg.message) {
 118         case WM_QUIT:
 119         case PROCESSMSG_EXIT:
 120           goto outofthread;
 121         case PROCESSMSG_START:
 122           break;
 123         case PROCESSMSG_ADD:
 124           break;
 125         case PROCESSMSG_REMOVE:
 126           break;
 127         default:
 128           ERR("Unhandled message %u. Critical Path\n", msg.message);
 129           break;
 130         }
 131       }
 132     }
 133
 134     /** here we should run a little of current AudioPath */
 135
 136   }
 137
 138 outofthread:
 139   TRACE("(%p): Exiting\n", This);
 140
 141   return 0;
 142 }
 143
 144 static BOOL PostMessageToProcessMsgThread(IDirectMusicPerformance8Impl* This, UINT iMsg) {
 145   if (FALSE == This->procThreadTicStarted && PROCESSMSG_EXIT != iMsg) {
 146     BOOL res;
 147     This->procThread = CreateThread(NULL, 0, ProcessMsgThread, This, 0, &This->procThreadId);
 148     if (NULL == This->procThread) return FALSE;
 149     SetThreadPriority(This->procThread, THREAD_PRIORITY_TIME_CRITICAL);
 150     This->procThreadTicStarted = TRUE;
 151     while(1) {
 152       res = PostThreadMessageA(This->procThreadId, iMsg, 0, 0);
 153       /* Let the thread creates its message queue (with MsgWaitForMultipleObjects call) by yielding and retrying */
 154       if (!res && (GetLastError() == ERROR_INVALID_THREAD_ID))
 155         Sleep(0);
 156       else
 157         break;
 158     }
 159     return res;
 160   }
 161   return PostThreadMessageA(This->procThreadId, iMsg, 0, 0);
 162 }
 163
 164 /* IDirectMusicPerformance8 IUnknown part: */
 165 static HRESULT WINAPI IDirectMusicPerformance8Impl_QueryInterface (LPDIRECTMUSICPERFORMANCE8 iface, REFIID riid, LPVOID *ppobj) {
 166   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 167   TRACE("(%p, %s,%p)\n", This, debugstr_dmguid(riid), ppobj);
 168
 169   if (IsEqualIID (riid, &IID_IUnknown) ||
 170       IsEqualIID (riid, &IID_IDirectMusicPerformance) ||
 171       IsEqualIID (riid, &IID_IDirectMusicPerformance2) ||
 172       IsEqualIID (riid, &IID_IDirectMusicPerformance8)) {
 173     IUnknown_AddRef(iface);
 174     *ppobj = This;
 175     return S_OK;
 176   }
 177
 178   WARN("(%p, %s,%p): not found\n", This, debugstr_dmguid(riid), ppobj);
 179   return E_NOINTERFACE;
 180 }
 181
 182 static ULONG WINAPI IDirectMusicPerformance8Impl_AddRef (LPDIRECTMUSICPERFORMANCE8 iface) {
 183   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 184   ULONG ref = InterlockedIncrement(&This->ref);
 185
 186   TRACE("(%p): AddRef from %d\n", This, ref - 1);
 187
 188   DMIME_LockModule();
 189
 190   return ref;
 191 }
 192
 193 static ULONG WINAPI IDirectMusicPerformance8Impl_Release (LPDIRECTMUSICPERFORMANCE8 iface) {
 194   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 195   ULONG ref = InterlockedDecrement(&This->ref);
 196   TRACE("(%p): ReleaseRef to %d\n", This, ref);
 197
 198   if (ref == 0) {
 199     This->safe.DebugInfo->Spare[0] = 0;
 200     DeleteCriticalSection(&This->safe);
 201     HeapFree(GetProcessHeap(), 0, This);
 202   }
 203
 204   DMIME_UnlockModule();
 205
 206   return ref;
 207 }
 208
 209 /* IDirectMusicPerformanceImpl IDirectMusicPerformance Interface part: */
 210 static HRESULT WINAPI IDirectMusicPerformance8Impl_Init (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusic** ppDirectMusic, LPDIRECTSOUND pDirectSound, HWND hWnd) {
 211         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 212
 213         FIXME("(iface = %p, dmusic = %p, dsound = %p, hwnd = %p)\n", This, ppDirectMusic, pDirectSound, hWnd);
 214         if (This->pDirectMusic || This->pDirectSound)
 215           return DMUS_E_ALREADY_INITED;
 216
 217         if (NULL == hWnd) {
 218           hWnd = GetForegroundWindow();
 219         }
 220
 221         if (NULL != pDirectSound) {
 222           This->pDirectSound = pDirectSound;
 223           IDirectSound_AddRef(This->pDirectSound);
 224         } else {
 225           DirectSoundCreate8(NULL, (LPDIRECTSOUND8*) &This->pDirectSound, NULL);
 226           if (!This->pDirectSound) return DSERR_NODRIVER;
 227
 228           if (NULL != hWnd) {
 229             IDirectSound8_SetCooperativeLevel(This->pDirectSound, hWnd, DSSCL_PRIORITY);
 230           } else {
 231             /* how to get the ForeGround window handle ? */
 232             /*IDirectSound8_SetCooperativeLevel(This->pDirectSound, hWnd, DSSCL_PRIORITY);*/
 233           }
 234         }
 235
 236         if (NULL != ppDirectMusic && NULL != *ppDirectMusic) {
 237           /* app creates it's own dmusic object and gives it to performance */
 238           This->pDirectMusic = (IDirectMusic8*) *ppDirectMusic;
 239           IDirectMusic8_AddRef(This->pDirectMusic);
 240         } else {
 241           /* app allows the performance to initialise itself and needs a pointer to object*/
 242           CoCreateInstance (&CLSID_DirectMusic, NULL, CLSCTX_INPROC_SERVER, &IID_IDirectMusic8, (void**)&This->pDirectMusic);
 243           if (ppDirectMusic) {
 244             *ppDirectMusic = (LPDIRECTMUSIC) This->pDirectMusic;
 245             IDirectMusic8_AddRef((LPDIRECTMUSIC8) *ppDirectMusic);
 246           }
 247         }
 248
 249         return S_OK;
 250 }
 251
 252 static HRESULT WINAPI IDirectMusicPerformance8Impl_PlaySegment (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicSegment* pSegment, DWORD dwFlags, __int64 i64StartTime, IDirectMusicSegmentState** ppSegmentState) {
 253         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 254         FIXME("(%p, %p, %d, 0x%s, %p): stub\n", This, pSegment, dwFlags,
 255             wine_dbgstr_longlong(i64StartTime), ppSegmentState);
 256         if (ppSegmentState)
 257           return DMUSIC_CreateDirectMusicSegmentStateImpl(&IID_IDirectMusicSegmentState, (LPVOID*)ppSegmentState, NULL);
 258         return S_OK;
 259 }
 260
 261 static HRESULT WINAPI IDirectMusicPerformance8Impl_Stop (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicSegment* pSegment, IDirectMusicSegmentState* pSegmentState, MUSIC_TIME mtTime, DWORD dwFlags) {
 262         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 263         FIXME("(%p, %p, %p, %d, %d): stub\n", This, pSegment, pSegmentState, mtTime, dwFlags);
 264         return S_OK;
 265 }
 266
 267 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetSegmentState (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicSegmentState** ppSegmentState, MUSIC_TIME mtTime) {
 268         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 269         FIXME("(%p,%p, %d): stub\n", This, ppSegmentState, mtTime);
 270         return S_OK;
 271 }
 272
 273 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetPrepareTime (LPDIRECTMUSICPERFORMANCE8 iface, DWORD dwMilliSeconds) {
 274   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 275   TRACE("(%p, %d)\n", This, dwMilliSeconds);
 276   This->dwPrepareTime = dwMilliSeconds;
 277   return S_OK;
 278 }
 279
 280 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetPrepareTime (LPDIRECTMUSICPERFORMANCE8 iface, DWORD* pdwMilliSeconds) {
 281   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 282   TRACE("(%p, %p)\n", This, pdwMilliSeconds);
 283   if (NULL == pdwMilliSeconds) {
 284     return E_POINTER;
 285   }
 286   *pdwMilliSeconds = This->dwPrepareTime;
 287   return S_OK;
 288 }
 289
 290 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetBumperLength (LPDIRECTMUSICPERFORMANCE8 iface, DWORD dwMilliSeconds) {
 291   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 292   TRACE("(%p, %d)\n", This, dwMilliSeconds);
 293   This->dwBumperLength =  dwMilliSeconds;
 294   return S_OK;
 295 }
 296
 297 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetBumperLength (LPDIRECTMUSICPERFORMANCE8 iface, DWORD* pdwMilliSeconds) {
 298   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 299   TRACE("(%p, %p)\n", This, pdwMilliSeconds);
 300   if (NULL == pdwMilliSeconds) {
 301     return E_POINTER;
 302   }
 303   *pdwMilliSeconds = This->dwBumperLength;
 304   return S_OK;
 305 }
 306
 307 static HRESULT WINAPI IDirectMusicPerformance8Impl_SendPMsg (LPDIRECTMUSICPERFORMANCE8 iface, DMUS_PMSG* pPMSG) {
 308   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 309   DMUS_PMSGItem* pItem = NULL;
 310   DMUS_PMSGItem* it = NULL;
 311   DMUS_PMSGItem* prev_it = NULL;
 312   DMUS_PMSGItem** queue = NULL;
 313
 314   FIXME("(%p, %p): stub\n", This, pPMSG);
 315
 316   if (NULL == pPMSG) {
 317     return E_POINTER;
 318   }
 319   pItem = DMUS_PMSGToItem(pPMSG);
 320   if (NULL == pItem) {
 321     return E_POINTER;
 322   }
 323   if (pItem->bInUse) {
 324     return DMUS_E_ALREADY_SENT;
 325   }
 326
 327   /* TODO: Valid Flags */
 328   /* TODO: DMUS_PMSGF_MUSICTIME */
 329   pItem->rtItemTime = pPMSG->rtTime;
 330
 331   if (pPMSG->dwFlags & DMUS_PMSGF_TOOL_IMMEDIATE) {
 332     queue = &This->imm_head;
 333   } else {
 334     queue = &This->head;
 335   }
 336
 337   EnterCriticalSection(&This->safe);
 338   for (it = *queue; NULL != it && it->rtItemTime < pItem->rtItemTime; it = it->next) {
 339     prev_it = it;
 340   }
 341   if (NULL == prev_it) {
 342     pItem->prev = NULL;
 343     if (NULL != *queue) pItem->next = (*queue)->next;
 344     /*assert( NULL == pItem->next->prev );*/
 345     if (NULL != pItem->next) pItem->next->prev = pItem;
 346     *queue = pItem;
 347   } else {
 348     pItem->prev = prev_it;
 349     pItem->next = prev_it->next;
 350     prev_it->next = pItem;
 351     if (NULL != pItem->next) pItem->next->prev = pItem;
 352   }
 353   LeaveCriticalSection(&This->safe);
 354
 355   /** now in use, prevent from stupid Frees */
 356   pItem->bInUse = TRUE;
 357   return S_OK;
 358 }
 359
 360 static HRESULT WINAPI IDirectMusicPerformance8Impl_MusicToReferenceTime (LPDIRECTMUSICPERFORMANCE8 iface, MUSIC_TIME mtTime, REFERENCE_TIME* prtTime) {
 361         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 362         FIXME("(%p, %d, %p): stub\n", This, mtTime, prtTime);
 363         return S_OK;
 364 }
 365
 366 static HRESULT WINAPI IDirectMusicPerformance8Impl_ReferenceToMusicTime (LPDIRECTMUSICPERFORMANCE8 iface, REFERENCE_TIME rtTime, MUSIC_TIME* pmtTime) {
 367         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 368         FIXME("(%p, 0x%s, %p): stub\n", This, wine_dbgstr_longlong(rtTime), pmtTime);
 369         return S_OK;
 370 }
 371
 372 static HRESULT WINAPI IDirectMusicPerformance8Impl_IsPlaying (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicSegment* pSegment, IDirectMusicSegmentState* pSegState) {
 373         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 374         FIXME("(%p, %p, %p): stub\n", This, pSegment, pSegState);
 375         return S_FALSE;
 376 }
 377
 378 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetTime (LPDIRECTMUSICPERFORMANCE8 iface, REFERENCE_TIME* prtNow, MUSIC_TIME* pmtNow) {
 379   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 380   HRESULT hr = S_OK;
 381   REFERENCE_TIME rtCur = 0;
 382
 383   /*TRACE("(%p, %p, %p)\n", This, prtNow, pmtNow); */
 384   if (This->procThreadTicStarted) {
 385     rtCur = ((REFERENCE_TIME) GetTickCount() * 10000) - This->procThreadStartTime;
 386   } else {
 387     /*return DMUS_E_NO_MASTER_CLOCK;*/
 388   }
 389   if (NULL != prtNow) {
 390     *prtNow = rtCur;
 391   }
 392   if (NULL != pmtNow) {
 393     hr = IDirectMusicPerformance8_ReferenceToMusicTime(iface, rtCur, pmtNow);
 394   }
 395   return hr;
 396 }
 397
 398 static HRESULT WINAPI IDirectMusicPerformance8Impl_AllocPMsg (LPDIRECTMUSICPERFORMANCE8 iface, ULONG cb, DMUS_PMSG** ppPMSG) {
 399   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 400   DMUS_PMSGItem* pItem = NULL;
 401
 402   FIXME("(%p, %d, %p): stub\n", This, cb, ppPMSG);
 403
 404   if (sizeof(DMUS_PMSG) > cb) {
 405     return E_INVALIDARG;
 406   }
 407   if (NULL == ppPMSG) {
 408     return E_POINTER;
 409   }
 410   pItem = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, cb - sizeof(DMUS_PMSG)  + sizeof(DMUS_PMSGItem));
 411   if (NULL == pItem) {
 412     return E_OUTOFMEMORY;
 413   }
 414   pItem->pMsg.dwSize = cb;
 415   *ppPMSG = DMUS_ItemToPMSG(pItem);
 416   return S_OK;
 417 }
 418
 419 static HRESULT WINAPI IDirectMusicPerformance8Impl_FreePMsg (LPDIRECTMUSICPERFORMANCE8 iface, DMUS_PMSG* pPMSG) {
 420   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 421   DMUS_PMSGItem* pItem = NULL;
 422
 423   FIXME("(%p, %p): stub\n", This, pPMSG);
 424
 425   if (NULL == pPMSG) {
 426     return E_POINTER;
 427   }
 428   pItem = DMUS_PMSGToItem(pPMSG);
 429   if (NULL == pItem) {
 430     return E_POINTER;
 431   }
 432   if (pItem->bInUse) {
 433     /** prevent for freeing PMsg in queue (ie to be processed) */
 434     return DMUS_E_CANNOT_FREE;
 435   }
 436   /** now we can remove it safely */
 437   EnterCriticalSection(&This->safe);
 438   DMUS_ItemRemoveFromQueue( This, pItem );
 439   LeaveCriticalSection(&This->safe);
 440
 441   /** TODO: see if we should Release the pItem->pMsg->punkUser and others Interfaces */
 442   HeapFree(GetProcessHeap(), 0, pItem);
 443   return S_OK;
 444 }
 445
 446 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetGraph (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicGraph** ppGraph) {
 447   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 448   FIXME("(%p, %p): to check\n", This, ppGraph);
 449   if (NULL != This->pToolGraph) {
 450     *ppGraph = This->pToolGraph;
 451     IDirectMusicGraph_AddRef(*ppGraph);
 452   } else {
 453     return E_FAIL;
 454   }
 455   return S_OK;
 456 }
 457
 458 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetGraph (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicGraph* pGraph) {
 459   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 460
 461   FIXME("(%p, %p): to check\n", This, pGraph);
 462
 463   if (NULL != This->pToolGraph) {
 464     /* Todo clean buffers and tools before */
 465     IDirectMusicGraph_Release(This->pToolGraph);
 466   }
 467   This->pToolGraph = pGraph;
 468   if (NULL != This->pToolGraph) {
 469     IDirectMusicGraph_AddRef(This->pToolGraph);
 470   }
 471   return S_OK;
 472 }
 473
 474 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetNotificationHandle (LPDIRECTMUSICPERFORMANCE8 iface, HANDLE hNotification, REFERENCE_TIME rtMinimum) {
 475   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 476   FIXME("(%p, %p, 0x%s): stub\n", This, hNotification, wine_dbgstr_longlong(rtMinimum));
 477   This->hNotification = hNotification;
 478   if (rtMinimum) This->rtMinimum = rtMinimum;
 479   return S_OK;
 480 }
 481
 482 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetNotificationPMsg (LPDIRECTMUSICPERFORMANCE8 iface, DMUS_NOTIFICATION_PMSG** ppNotificationPMsg) {
 483   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 484
 485
 486   FIXME("(%p, %p): stub\n", This, ppNotificationPMsg);
 487   if (NULL == ppNotificationPMsg) {
 488     return E_POINTER;
 489   }
 490
 491
 492
 493   return S_FALSE;
 494   /*return S_OK;*/
 495 }
 496
 497 static HRESULT WINAPI IDirectMusicPerformance8Impl_AddNotificationType (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidNotificationType) {
 498         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 499         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 500         return S_OK;
 501 }
 502
 503 static HRESULT WINAPI IDirectMusicPerformance8Impl_RemoveNotificationType (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidNotificationType) {
 504         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 505         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 506         return S_OK;
 507 }
 508
 509 static HRESULT WINAPI IDirectMusicPerformance8Impl_AddPort (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicPort* pPort) {
 510         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 511         HRESULT hr = E_FAIL;
 512         FIXME("(%p, %p): stub\n", This, pPort);
 513         if (!This->pDirectMusic || !This->pDirectSound) return DMUS_E_NOT_INIT;
 514         if (NULL == pPort) {
 515           GUID port_guid;
 516           IDirectMusicPort* pDefaultPort = NULL;
 517           DMUS_PORTPARAMS params;
 518           int i, j;
 519           hr = IDirectMusic8_GetDefaultPort(This->pDirectMusic, &port_guid);
 520           if (FAILED(hr)) return hr;
 521           ZeroMemory(&params, sizeof(params));
 522           params.dwSize = sizeof(params);
 523           params.dwValidParams = DMUS_PORTPARAMS_CHANNELGROUPS | DMUS_PORTPARAMS_SHARE;
 524           params.dwChannelGroups = 1;
 525           params.fShare = TRUE;
 526           hr = IDirectMusic8_CreatePort(This->pDirectMusic, &port_guid, &params, &pDefaultPort, NULL);
 527           if (FAILED(hr)) return hr;
 528           hr = IDirectMusicPort_Activate(pDefaultPort, TRUE);
 529           if (FAILED(hr)) { IDirectMusicPort_Release(pDefaultPort); return hr; }
 530           j = 0;
 531           for (i = 0; i < 16; ++i) {
 532             if (NULL == This->PChannel[i].port) {
 533               This->PChannel[i].port = pPort;
 534               This->PChannel[i].group = 0;
 535               This->PChannel[i].channel = j; /* FIXME: should this be assigned? */
 536               j++;
 537             }
 538           }
 539         } else {
 540           IDirectMusicPort_AddRef(pPort);
 541         }
 542         /**
 543          * We should remember added Ports (for example using a list)
 544          * and control if Port is registered for each api who use ports
 545          */
 546         return S_OK;
 547 }
 548
 549 static HRESULT WINAPI IDirectMusicPerformance8Impl_RemovePort (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicPort* pPort) {
 550         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 551         FIXME("(%p, %p): stub\n", This, pPort);
 552         IDirectMusicPort_Release (pPort);
 553         return S_OK;
 554 }
 555
 556 static HRESULT WINAPI IDirectMusicPerformance8Impl_AssignPChannelBlock (LPDIRECTMUSICPERFORMANCE8 iface, DWORD dwBlockNum, IDirectMusicPort* pPort, DWORD dwGroup) {
 557         int i, j, range /* min value in range */;
 558         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 559
 560         FIXME("(%p, %d, %p, %d): semi-stub\n", This, dwBlockNum, pPort, dwGroup-1);
 561         if (NULL == pPort) return E_POINTER;
 562
 563         range = 16 * dwBlockNum;
 564         j = 0;
 565         for (i = range; i < range+16; i++) {
 566                 /*TRACE("Setting PChannel[%i] to port %p, group %ld, MIDI port %i\n", i, pPort, dwGroup-1, j); */
 567                 This->PChannel[i].port = pPort;
 568                 This->PChannel[i].group = dwGroup - 1; /* first index is always zero */
 569                 This->PChannel[i].channel = j; /* FIXME: should this be assigned? */
 570                 j++;
 571         }
 572         /*if (dwGroup > 2) return S_FALSE;*/
 573
 574         return S_OK;
 575 }
 576
 577 static HRESULT WINAPI IDirectMusicPerformance8Impl_AssignPChannel (LPDIRECTMUSICPERFORMANCE8 iface, DWORD dwPChannel, IDirectMusicPort* pPort, DWORD dwGroup, DWORD dwMChannel) {
 578         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 579
 580         TRACE("(%p, %d, %p, %d, %d)\n", This, dwPChannel, pPort, dwGroup, dwMChannel);
 581         if (NULL == pPort) return E_POINTER;
 582         This->PChannel[dwPChannel].port = pPort;
 583         This->PChannel[dwPChannel].group = dwGroup;
 584         This->PChannel[dwPChannel].channel = dwMChannel;
 585
 586         return S_OK;
 587 }
 588
 589 static HRESULT WINAPI IDirectMusicPerformance8Impl_PChannelInfo (LPDIRECTMUSICPERFORMANCE8 iface, DWORD dwPChannel, IDirectMusicPort** ppPort, DWORD* pdwGroup, DWORD* pdwMChannel) {
 590         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 591         FIXME("(%p, %d, %p, %p, %p): stub\n", This, dwPChannel, ppPort, pdwGroup, pdwMChannel);
 592         return S_OK;
 593 }
 594
 595 static HRESULT WINAPI IDirectMusicPerformance8Impl_DownloadInstrument (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicInstrument* pInst, DWORD dwPChannel, IDirectMusicDownloadedInstrument** ppDownInst, DMUS_NOTERANGE* pNoteRanges, DWORD dwNumNoteRanges, IDirectMusicPort** ppPort, DWORD* pdwGroup, DWORD* pdwMChannel) {
 596         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 597         FIXME("(%p, %p, %d, %p, %p, %d, %p, %p, %p): stub\n", This, pInst, dwPChannel, ppDownInst, pNoteRanges, dwNumNoteRanges, ppPort, pdwGroup, pdwMChannel);
 598         return S_OK;
 599 }
 600
 601 static HRESULT WINAPI IDirectMusicPerformance8Impl_Invalidate (LPDIRECTMUSICPERFORMANCE8 iface, MUSIC_TIME mtTime, DWORD dwFlags) {
 602         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 603         FIXME("(%p, %d, %d): stub\n", This, mtTime, dwFlags);
 604         return S_OK;
 605 }
 606
 607 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetParam (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidType, DWORD dwGroupBits, DWORD dwIndex, MUSIC_TIME mtTime, MUSIC_TIME* pmtNext, void* pParam) {
 608         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 609         FIXME("(%p, %s, %d, %d, %d, %p, %p): stub\n", This, debugstr_dmguid(rguidType), dwGroupBits, dwIndex, mtTime, pmtNext, pParam);
 610         return S_OK;
 611 }
 612
 613 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetParam (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidType, DWORD dwGroupBits, DWORD dwIndex, MUSIC_TIME mtTime, void* pParam) {
 614         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 615         FIXME("(%p, %s, %d, %d, %d, %p): stub\n", This, debugstr_dmguid(rguidType), dwGroupBits, dwIndex, mtTime, pParam);
 616         return S_OK;
 617 }
 618
 619 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetGlobalParam (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidType, void* pParam, DWORD dwSize) {
 620         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 621
 622         TRACE("(%p, %s, %p, %d): stub\n", This, debugstr_dmguid(rguidType), pParam, dwSize);
 623
 624         if (IsEqualGUID (rguidType, &GUID_PerfAutoDownload))
 625                 memcpy(pParam, &This->fAutoDownload, sizeof(This->fAutoDownload));
 626         if (IsEqualGUID (rguidType, &GUID_PerfMasterGrooveLevel))
 627                 memcpy(pParam, &This->cMasterGrooveLevel, sizeof(This->cMasterGrooveLevel));
 628         if (IsEqualGUID (rguidType, &GUID_PerfMasterTempo))
 629                 memcpy(pParam, &This->fMasterTempo, sizeof(This->fMasterTempo));
 630         if (IsEqualGUID (rguidType, &GUID_PerfMasterVolume))
 631                 memcpy(pParam, &This->lMasterVolume, sizeof(This->lMasterVolume));
 632
 633         return S_OK;
 634 }
 635
 636 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetGlobalParam (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidType, void* pParam, DWORD dwSize) {
 637         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 638
 639         TRACE("(%p, %s, %p, %d)\n", This, debugstr_dmguid(rguidType), pParam, dwSize);
 640
 641         if (IsEqualGUID (rguidType, &GUID_PerfAutoDownload)) {
 642                 memcpy(&This->fAutoDownload, pParam, dwSize);
 643                 TRACE("=> AutoDownload set to %d\n", This->fAutoDownload);
 644         }
 645         if (IsEqualGUID (rguidType, &GUID_PerfMasterGrooveLevel)) {
 646                 memcpy(&This->cMasterGrooveLevel, pParam, dwSize);
 647                 TRACE("=> MasterGrooveLevel set to %i\n", This->cMasterGrooveLevel);
 648         }
 649         if (IsEqualGUID (rguidType, &GUID_PerfMasterTempo)) {
 650                 memcpy(&This->fMasterTempo, pParam, dwSize);
 651                 TRACE("=> MasterTempo set to %f\n", This->fMasterTempo);
 652         }
 653         if (IsEqualGUID (rguidType, &GUID_PerfMasterVolume)) {
 654                 memcpy(&This->lMasterVolume, pParam, dwSize);
 655                 TRACE("=> MasterVolume set to %li\n", This->lMasterVolume);
 656         }
 657
 658         return S_OK;
 659 }
 660
 661 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetLatencyTime (LPDIRECTMUSICPERFORMANCE8 iface, REFERENCE_TIME* prtTime) {
 662         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 663         TRACE("(%p, %p): stub\n", This, prtTime);
 664         *prtTime = This->rtLatencyTime;
 665         return S_OK;
 666 }
 667
 668 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetQueueTime (LPDIRECTMUSICPERFORMANCE8 iface, REFERENCE_TIME* prtTime) {
 669         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 670         FIXME("(%p, %p): stub\n", This, prtTime);
 671         return S_OK;
 672 }
 673
 674 static HRESULT WINAPI IDirectMusicPerformance8Impl_AdjustTime (LPDIRECTMUSICPERFORMANCE8 iface, REFERENCE_TIME rtAmount) {
 675         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 676         FIXME("(%p, 0x%s): stub\n", This, wine_dbgstr_longlong(rtAmount));
 677         return S_OK;
 678 }
 679
 680 static HRESULT WINAPI IDirectMusicPerformance8Impl_CloseDown (LPDIRECTMUSICPERFORMANCE8 iface) {
 681   IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 682   FIXME("(%p): stub\n", This);
 683   if (PostMessageToProcessMsgThread(This, PROCESSMSG_EXIT)) {
 684     WaitForSingleObject(This->procThread, INFINITE);
 685     This->procThreadTicStarted = FALSE;
 686     CloseHandle(This->procThread);
 687   }
 688   if (NULL != This->pDirectSound) {
 689     IDirectSound_Release(This->pDirectSound);
 690     This->pDirectSound = NULL;
 691   }
 692   if (NULL != This->pDirectMusic) {
 693     IDirectMusic8_Release(This->pDirectMusic);
 694     This->pDirectMusic = NULL;
 695   }
 696   return S_OK;
 697 }
 698
 699 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetResolvedTime (LPDIRECTMUSICPERFORMANCE8 iface, REFERENCE_TIME rtTime, REFERENCE_TIME* prtResolved, DWORD dwTimeResolveFlags) {
 700         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 701         FIXME("(%p, 0x%s, %p, %d): stub\n", This, wine_dbgstr_longlong(rtTime),
 702             prtResolved, dwTimeResolveFlags);
 703         return S_OK;
 704 }
 705
 706 static HRESULT WINAPI IDirectMusicPerformance8Impl_MIDIToMusic (LPDIRECTMUSICPERFORMANCE8 iface, BYTE bMIDIValue, DMUS_CHORD_KEY* pChord, BYTE bPlayMode, BYTE bChordLevel, WORD* pwMusicValue) {
 707         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 708         FIXME("(%p, %d, %p, %d, %d, %p): stub\n", This, bMIDIValue, pChord, bPlayMode, bChordLevel, pwMusicValue);
 709         return S_OK;
 710 }
 711
 712 static HRESULT WINAPI IDirectMusicPerformance8Impl_MusicToMIDI (LPDIRECTMUSICPERFORMANCE8 iface, WORD wMusicValue, DMUS_CHORD_KEY* pChord, BYTE bPlayMode, BYTE bChordLevel, BYTE* pbMIDIValue) {
 713         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 714         FIXME("(%p, %d, %p, %d, %d, %p): stub\n", This, wMusicValue, pChord, bPlayMode, bChordLevel, pbMIDIValue);
 715         return S_OK;
 716 }
 717
 718 static HRESULT WINAPI IDirectMusicPerformance8Impl_TimeToRhythm (LPDIRECTMUSICPERFORMANCE8 iface, MUSIC_TIME mtTime, DMUS_TIMESIGNATURE* pTimeSig, WORD* pwMeasure, BYTE* pbBeat, BYTE* pbGrid, short* pnOffset) {
 719         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 720         FIXME("(%p, %d, %p, %p, %p, %p, %p): stub\n", This, mtTime, pTimeSig, pwMeasure, pbBeat, pbGrid, pnOffset);
 721         return S_OK;
 722 }
 723
 724 static HRESULT WINAPI IDirectMusicPerformance8Impl_RhythmToTime (LPDIRECTMUSICPERFORMANCE8 iface, WORD wMeasure, BYTE bBeat, BYTE bGrid, short nOffset, DMUS_TIMESIGNATURE* pTimeSig, MUSIC_TIME* pmtTime) {
 725         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 726         FIXME("(%p, %d, %d, %d, %i, %p, %p): stub\n", This, wMeasure, bBeat, bGrid, nOffset, pTimeSig, pmtTime);
 727         return S_OK;
 728 }
 729
 730 /* IDirectMusicPerformance8 Interface part follow: */
 731 static HRESULT WINAPI IDirectMusicPerformance8Impl_InitAudio (LPDIRECTMUSICPERFORMANCE8 iface,
 732                                                       IDirectMusic** ppDirectMusic,
 733                                                       IDirectSound** ppDirectSound,
 734                                                       HWND hWnd,
 735                                                       DWORD dwDefaultPathType,
 736                                                       DWORD dwPChannelCount,
 737                                                       DWORD dwFlags,
 738                                                       DMUS_AUDIOPARAMS* pParams) {
 739
 740         IDirectSound* dsound = NULL;
 741         HRESULT hr = S_OK;
 742
 743         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 744         FIXME("(%p, %p, %p, %p, %x, %u, %x, %p): to check\n", This, ppDirectMusic, ppDirectSound, hWnd, dwDefaultPathType, dwPChannelCount, dwFlags, pParams);
 745
 746         if (This->pDirectMusic || This->pDirectSound)
 747           return DMUS_E_ALREADY_INITED;
 748
 749         if (NULL != ppDirectSound && NULL != *ppDirectSound) {
 750           dsound = *ppDirectSound;
 751         } else {
 752           hr = DirectSoundCreate8 (NULL, (LPDIRECTSOUND8*) &dsound, NULL);
 753           FIXME("return dsound(%p,%d)\n", dsound, hr);
 754           if (FAILED(hr) || !dsound)
 755             return DSERR_NODRIVER;
 756           if (ppDirectSound)
 757             *ppDirectSound = dsound;
 758         }
 759
 760         IDirectMusicPerformance8Impl_Init(iface, ppDirectMusic, dsound, hWnd);
 761
 762         /* Init increases the ref count of the dsound object. Decrement it if the app doesn't want a pointer to the object. */
 763         if (NULL == ppDirectSound) {
 764           IDirectSound_Release(This->pDirectSound);
 765         }
 766
 767         /* as seen in msdn we need params init before audio path creation */
 768         if (NULL != pParams) {
 769           This->pParams = *pParams;
 770         } else {
 771           /* TODO, how can i fill the struct as seen on msdn */
 772           memset(&This->pParams, 0, sizeof(DMUS_AUDIOPARAMS));
 773           This->pParams.dwSize = sizeof(DMUS_AUDIOPARAMS);
 774           This->pParams.fInitNow = FALSE;
 775           This->pParams.dwValidData = DMUS_AUDIOPARAMS_FEATURES | DMUS_AUDIOPARAMS_VOICES | DMUS_AUDIOPARAMS_SAMPLERATE | DMUS_AUDIOPARAMS_DEFAULTSYNTH;
 776           This->pParams.dwVoices = 64;
 777           This->pParams.dwSampleRate = (DWORD) 22.050;
 778           This->pParams.dwFeatures = dwFlags;
 779           This->pParams.clsidDefaultSynth = CLSID_DirectMusicSynthSink;
 780         }
 781         hr = IDirectMusicPerformance8_CreateStandardAudioPath(iface, dwDefaultPathType, dwPChannelCount, FALSE, &This->pDefaultPath);
 782
 783         PostMessageToProcessMsgThread(This, PROCESSMSG_START);
 784
 785         return hr;
 786 }
 787
 788 static HRESULT WINAPI IDirectMusicPerformance8Impl_PlaySegmentEx (LPDIRECTMUSICPERFORMANCE8 iface, IUnknown* pSource, WCHAR* pwzSegmentName, IUnknown* pTransition, DWORD dwFlags, __int64 i64StartTime, IDirectMusicSegmentState** ppSegmentState, IUnknown* pFrom, IUnknown* pAudioPath) {
 789         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 790         FIXME("(%p, %p, %p, %p, %d, 0x%s, %p, %p, %p): stub\n", This, pSource, pwzSegmentName,
 791             pTransition, dwFlags, wine_dbgstr_longlong(i64StartTime), ppSegmentState, pFrom, pAudioPath);
 792         if (ppSegmentState)
 793           return DMUSIC_CreateDirectMusicSegmentStateImpl(&IID_IDirectMusicSegmentState, (LPVOID*)ppSegmentState, NULL);
 794         return S_OK;
 795 }
 796
 797 static HRESULT WINAPI IDirectMusicPerformance8Impl_StopEx (LPDIRECTMUSICPERFORMANCE8 iface, IUnknown* pObjectToStop, __int64 i64StopTime, DWORD dwFlags) {
 798         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 799         FIXME("(%p, %p, 0x%s, %d): stub\n", This, pObjectToStop,
 800             wine_dbgstr_longlong(i64StopTime), dwFlags);
 801         return S_OK;
 802 }
 803
 804 static HRESULT WINAPI IDirectMusicPerformance8Impl_ClonePMsg (LPDIRECTMUSICPERFORMANCE8 iface, DMUS_PMSG* pSourcePMSG, DMUS_PMSG** ppCopyPMSG) {
 805         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 806         FIXME("(%p, %p, %p): stub\n", This, pSourcePMSG, ppCopyPMSG);
 807         return S_OK;
 808 }
 809
 810 static HRESULT WINAPI IDirectMusicPerformance8Impl_CreateAudioPath (LPDIRECTMUSICPERFORMANCE8 iface, IUnknown* pSourceConfig, BOOL fActivate, IDirectMusicAudioPath** ppNewPath) {
 811         IDirectMusicAudioPathImpl *default_path;
 812         IDirectMusicAudioPath *pPath;
 813
 814         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 815         FIXME("(%p, %p, %d, %p): stub\n", This, pSourceConfig, fActivate, ppNewPath);
 816
 817         if (NULL == ppNewPath) {
 818           return E_POINTER;
 819         }
 820
 821         DMUSIC_CreateDirectMusicAudioPathImpl (&IID_IDirectMusicAudioPath, (LPVOID*)&pPath, NULL);
 822         default_path = (IDirectMusicAudioPathImpl*)((char*)(pPath) - offsetof(IDirectMusicAudioPathImpl,AudioPathVtbl));
 823         default_path->pPerf = (IDirectMusicPerformance8*) This;
 824
 825         /** TODO */
 826
 827         *ppNewPath = pPath;
 828
 829         return IDirectMusicAudioPath_Activate(*ppNewPath, fActivate);
 830 }
 831
 832 static HRESULT WINAPI IDirectMusicPerformance8Impl_CreateStandardAudioPath (LPDIRECTMUSICPERFORMANCE8 iface, DWORD dwType, DWORD dwPChannelCount, BOOL fActivate, IDirectMusicAudioPath** ppNewPath) {
 833         IDirectMusicAudioPathImpl *default_path;
 834         IDirectMusicAudioPath *pPath;
 835         DSBUFFERDESC desc;
 836         WAVEFORMATEX format;
 837         LPDIRECTSOUNDBUFFER buffer;
 838         HRESULT hr = S_OK;
 839
 840         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 841
 842         FIXME("(%p)->(%d, %d, %d, %p): semi-stub\n", This, dwType, dwPChannelCount, fActivate, ppNewPath);
 843
 844         if (NULL == ppNewPath) {
 845           return E_POINTER;
 846         }
 847
 848         DMUSIC_CreateDirectMusicAudioPathImpl (&IID_IDirectMusicAudioPath, (LPVOID*)&pPath, NULL);
 849         default_path = (IDirectMusicAudioPathImpl*)((char*)(pPath) - offsetof(IDirectMusicAudioPathImpl,AudioPathVtbl));
 850         default_path->pPerf = (IDirectMusicPerformance8*) This;
 851
 852         /* Secondary buffer description */
 853         memset(&format, 0, sizeof(format));
 854         format.wFormatTag = WAVE_FORMAT_PCM;
 855         format.nChannels = 1;
 856         format.nSamplesPerSec = 44000;
 857         format.nAvgBytesPerSec = 44000*2;
 858         format.nBlockAlign = 2;
 859         format.wBitsPerSample = 16;
 860         format.cbSize = 0;
 861
 862         memset(&desc, 0, sizeof(desc));
 863         desc.dwSize = sizeof(desc);
 864         desc.dwFlags = DSBCAPS_CTRLFX | DSBCAPS_CTRLPAN | DSBCAPS_CTRLVOLUME | DSBCAPS_GLOBALFOCUS;
 865         desc.dwBufferBytes = DSBSIZE_MIN;
 866         desc.dwReserved = 0;
 867         desc.lpwfxFormat = &format;
 868         desc.guid3DAlgorithm = GUID_NULL;
 869
 870         switch(dwType) {
 871         case DMUS_APATH_DYNAMIC_3D:
 872                 desc.dwFlags |= DSBCAPS_CTRL3D | DSBCAPS_CTRLFREQUENCY | DSBCAPS_MUTE3DATMAXDISTANCE;
 873                 break;
 874         case DMUS_APATH_DYNAMIC_MONO:
 875                 desc.dwFlags |= DSBCAPS_CTRLFREQUENCY;
 876                 break;
 877         case DMUS_APATH_SHARED_STEREOPLUSREVERB:
 878                 /* normally we have to create 2 buffers (one for music other for reverb)
 879                  * in this case. See msdn
 880                  */
 881         case DMUS_APATH_DYNAMIC_STEREO:
 882                 desc.dwFlags |= DSBCAPS_CTRLFREQUENCY;
 883                 format.nChannels = 2;
 884                 format.nBlockAlign *= 2;
 885                 format.nAvgBytesPerSec *=2;
 886                 break;
 887         default:
 888                 HeapFree(GetProcessHeap(), 0, default_path);
 889                 *ppNewPath = NULL;
 890                 return E_INVALIDARG;
 891         }
 892
 893         /* FIXME: Should we create one secondary buffer for each PChannel? */
 894         hr = IDirectSound8_CreateSoundBuffer ((LPDIRECTSOUND8) This->pDirectSound, &desc, &buffer, NULL);
 895         if (FAILED(hr)) {
 896                 HeapFree(GetProcessHeap(), 0, default_path);
 897                 *ppNewPath = NULL;
 898                 return DSERR_BUFFERLOST;
 899         }
 900         default_path->pDSBuffer = buffer;
 901
 902         /* Update description for creating primary buffer */
 903         desc.dwFlags |= DSBCAPS_PRIMARYBUFFER;
 904         desc.dwBufferBytes = 0;
 905         desc.lpwfxFormat = NULL;
 906
 907         hr = IDirectSound8_CreateSoundBuffer ((LPDIRECTSOUND8) This->pDirectSound, &desc, &buffer, NULL);
 908         if (FAILED(hr)) {
 909                 IDirectSoundBuffer_Release(default_path->pDSBuffer);
 910                 HeapFree(GetProcessHeap(), 0, default_path);
 911                 *ppNewPath = NULL;
 912                 return DSERR_BUFFERLOST;
 913         }
 914         default_path->pPrimary = buffer;
 915
 916         *ppNewPath = pPath;
 917
 918         TRACE(" returning IDirectMusicPerformance interface at %p.\n", *ppNewPath);
 919
 920         return IDirectMusicAudioPath_Activate(*ppNewPath, fActivate);
 921 }
 922
 923 static HRESULT WINAPI IDirectMusicPerformance8Impl_SetDefaultAudioPath (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicAudioPath* pAudioPath) {
 924         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 925
 926         FIXME("(%p, %p): semi-stub\n", This, pAudioPath);
 927         if (NULL != This->pDefaultPath) {
 928                 IDirectMusicAudioPath_Release(This->pDefaultPath);
 929                 ((IDirectMusicAudioPathImpl*) This->pDefaultPath)->pPerf = NULL;
 930                 This->pDefaultPath = NULL;
 931         }
 932         This->pDefaultPath = pAudioPath;
 933         if (NULL != This->pDefaultPath) {
 934                 IDirectMusicAudioPath_AddRef(This->pDefaultPath);
 935                 ((IDirectMusicAudioPathImpl*) This->pDefaultPath)->pPerf = (IDirectMusicPerformance8*) This;
 936         }
 937
 938         return S_OK;
 939 }
 940
 941 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetDefaultAudioPath (LPDIRECTMUSICPERFORMANCE8 iface, IDirectMusicAudioPath** ppAudioPath) {
 942     IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 943
 944         FIXME("(%p, %p): semi-stub (%p)\n", This, ppAudioPath, This->pDefaultPath);
 945
 946         if (NULL != This->pDefaultPath) {
 947           *ppAudioPath = This->pDefaultPath;
 948           IDirectMusicAudioPath_AddRef(*ppAudioPath);
 949         } else {
 950           *ppAudioPath = NULL;
 951         }
 952         return S_OK;
 953 }
 954
 955 static HRESULT WINAPI IDirectMusicPerformance8Impl_GetParamEx (LPDIRECTMUSICPERFORMANCE8 iface, REFGUID rguidType, DWORD dwTrackID, DWORD dwGroupBits, DWORD dwIndex, MUSIC_TIME mtTime, MUSIC_TIME* pmtNext, void* pParam) {
 956         IDirectMusicPerformance8Impl *This = (IDirectMusicPerformance8Impl *)iface;
 957
 958         FIXME("(%p, %s, %d, %d, %d, %d, %p, %p): stub\n", This, debugstr_dmguid(rguidType), dwTrackID, dwGroupBits, dwIndex, mtTime, pmtNext, pParam);
 959
 960         return S_OK;
 961 }
 962
 963 static const IDirectMusicPerformance8Vtbl DirectMusicPerformance8_Vtbl = {
 964         IDirectMusicPerformance8Impl_QueryInterface,
 965         IDirectMusicPerformance8Impl_AddRef,
 966         IDirectMusicPerformance8Impl_Release,
 967         IDirectMusicPerformance8Impl_Init,
 968         IDirectMusicPerformance8Impl_PlaySegment,
 969         IDirectMusicPerformance8Impl_Stop,
 970         IDirectMusicPerformance8Impl_GetSegmentState,
 971         IDirectMusicPerformance8Impl_SetPrepareTime,
 972         IDirectMusicPerformance8Impl_GetPrepareTime,
 973         IDirectMusicPerformance8Impl_SetBumperLength,
 974         IDirectMusicPerformance8Impl_GetBumperLength,
 975         IDirectMusicPerformance8Impl_SendPMsg,
 976         IDirectMusicPerformance8Impl_MusicToReferenceTime,
 977         IDirectMusicPerformance8Impl_ReferenceToMusicTime,
 978         IDirectMusicPerformance8Impl_IsPlaying,
 979         IDirectMusicPerformance8Impl_GetTime,
 980         IDirectMusicPerformance8Impl_AllocPMsg,
 981         IDirectMusicPerformance8Impl_FreePMsg,
 982         IDirectMusicPerformance8Impl_GetGraph,
 983         IDirectMusicPerformance8Impl_SetGraph,
 984         IDirectMusicPerformance8Impl_SetNotificationHandle,
 985         IDirectMusicPerformance8Impl_GetNotificationPMsg,
 986         IDirectMusicPerformance8Impl_AddNotificationType,
 987         IDirectMusicPerformance8Impl_RemoveNotificationType,
 988         IDirectMusicPerformance8Impl_AddPort,
 989         IDirectMusicPerformance8Impl_RemovePort,
 990         IDirectMusicPerformance8Impl_AssignPChannelBlock,
 991         IDirectMusicPerformance8Impl_AssignPChannel,
 992         IDirectMusicPerformance8Impl_PChannelInfo,
 993         IDirectMusicPerformance8Impl_DownloadInstrument,
 994         IDirectMusicPerformance8Impl_Invalidate,
 995         IDirectMusicPerformance8Impl_GetParam,
 996         IDirectMusicPerformance8Impl_SetParam,
 997         IDirectMusicPerformance8Impl_GetGlobalParam,
 998         IDirectMusicPerformance8Impl_SetGlobalParam,
 999         IDirectMusicPerformance8Impl_GetLatencyTime,
1000         IDirectMusicPerformance8Impl_GetQueueTime,
1001         IDirectMusicPerformance8Impl_AdjustTime,
1002         IDirectMusicPerformance8Impl_CloseDown,
1003         IDirectMusicPerformance8Impl_GetResolvedTime,
1004         IDirectMusicPerformance8Impl_MIDIToMusic,
1005         IDirectMusicPerformance8Impl_MusicToMIDI,
1006         IDirectMusicPerformance8Impl_TimeToRhythm,
1007         IDirectMusicPerformance8Impl_RhythmToTime,
1008         IDirectMusicPerformance8Impl_InitAudio,
1009         IDirectMusicPerformance8Impl_PlaySegmentEx,
1010         IDirectMusicPerformance8Impl_StopEx,
1011         IDirectMusicPerformance8Impl_ClonePMsg,
1012         IDirectMusicPerformance8Impl_CreateAudioPath,
1013         IDirectMusicPerformance8Impl_CreateStandardAudioPath,
1014         IDirectMusicPerformance8Impl_SetDefaultAudioPath,
1015         IDirectMusicPerformance8Impl_GetDefaultAudioPath,
1016         IDirectMusicPerformance8Impl_GetParamEx
1017 };
1018
1019 /* for ClassFactory */
1020 HRESULT WINAPI DMUSIC_CreateDirectMusicPerformanceImpl (LPCGUID lpcGUID, LPVOID *ppobj, LPUNKNOWN pUnkOuter) {
1021         IDirectMusicPerformance8Impl *obj;
1022
1023         TRACE("(%p,%p,%p)\n", lpcGUID, ppobj, pUnkOuter);
1024
1025         obj = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusicPerformance8Impl));
1026         if (NULL == obj)        {
1027                 *ppobj = NULL;
1028                 return E_OUTOFMEMORY;
1029         }
1030         obj->lpVtbl = &DirectMusicPerformance8_Vtbl;
1031         obj->ref = 0;  /* will be inited by QueryInterface */
1032         obj->pDirectMusic = NULL;
1033         obj->pDirectSound = NULL;
1034         obj->pDefaultPath = NULL;
1035         InitializeCriticalSection(&obj->safe);
1036         obj->safe.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": IDirectMusicPerformance8Impl*->safe");
1037
1038         obj->rtLatencyTime  = 100;  /* 100ms TO FIX */
1039         obj->dwBumperLength =   50; /* 50ms default */
1040         obj->dwPrepareTime  = 1000; /* 1000ms default */
1041         return IDirectMusicPerformance8Impl_QueryInterface ((LPDIRECTMUSICPERFORMANCE8)obj, lpcGUID, ppobj);
1042 }