dlls/dmscript/scripttrack.c

   1 /* IDirectMusicScriptTrack Implementation
   2  *
   3  * Copyright (C) 2003-2004 Rok Mandeljc
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU Library General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #include "dmscript_private.h"
  21
  22 WINE_DEFAULT_DEBUG_CHANNEL(dmscript);
  23
  24 /*****************************************************************************
  25  * IDirectMusicScriptTrack implementation
  26  */
  27 /* IDirectMusicScriptTrack IUnknown part: */
  28 HRESULT WINAPI IDirectMusicScriptTrack_IUnknown_QueryInterface (LPUNKNOWN iface, REFIID riid, LPVOID *ppobj) {
  29         ICOM_THIS_MULTI(IDirectMusicScriptTrack, UnknownVtbl, iface);
  30
  31         TRACE("(%p, %s, %p)\n", This, debugstr_dmguid(riid), ppobj);
  32         if (IsEqualIID (riid, &IID_IUnknown)) {
  33                 *ppobj = (LPUNKNOWN)&This->UnknownVtbl;
  34                 IDirectMusicScriptTrack_IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
  35                 return S_OK;
  36         } else if (IsEqualIID (riid, &IID_IDirectMusicTrack)
  37           || IsEqualIID (riid, &IID_IDirectMusicTrack8)) {
  38                 *ppobj = (LPDIRECTMUSICTRACK8)&This->TrackVtbl;
  39                 IDirectMusicScriptTrack_IDirectMusicTrack_AddRef ((LPDIRECTMUSICTRACK8)&This->TrackVtbl);
  40                 return S_OK;
  41         } else if (IsEqualIID (riid, &IID_IPersistStream)) {
  42                 *ppobj = (LPPERSISTSTREAM)&This->PersistStreamVtbl;
  43                 IDirectMusicScriptTrack_IPersistStream_AddRef ((LPPERSISTSTREAM)&This->PersistStreamVtbl);
  44                 return S_OK;
  45         }
  46
  47         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ppobj);
  48         return E_NOINTERFACE;
  49 }
  50
  51 ULONG WINAPI IDirectMusicScriptTrack_IUnknown_AddRef (LPUNKNOWN iface) {
  52         ICOM_THIS_MULTI(IDirectMusicScriptTrack, UnknownVtbl, iface);
  53         ULONG ref = InterlockedIncrement(&This->ref);
  54
  55         TRACE("(%p): AddRef from %ld\n", This, ref - 1);
  56
  57         DMSCRIPT_LockModule();
  58
  59         return ref;
  60 }
  61
  62 ULONG WINAPI IDirectMusicScriptTrack_IUnknown_Release (LPUNKNOWN iface) {
  63         ICOM_THIS_MULTI(IDirectMusicScriptTrack, UnknownVtbl, iface);
  64         ULONG ref = InterlockedDecrement(&This->ref);
  65
  66         TRACE("(%p): ReleaseRef to %ld\n", This, ref);
  67
  68         if (ref == 0) {
  69                 HeapFree(GetProcessHeap(), 0, This);
  70         }
  71
  72         DMSCRIPT_UnlockModule();
  73
  74         return ref;
  75 }
  76
  77 static const IUnknownVtbl DirectMusicScriptTrack_Unknown_Vtbl = {
  78         IDirectMusicScriptTrack_IUnknown_QueryInterface,
  79         IDirectMusicScriptTrack_IUnknown_AddRef,
  80         IDirectMusicScriptTrack_IUnknown_Release
  81 };
  82
  83 /* IDirectMusicScriptTrack IDirectMusicTrack8 part: */
  84 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_QueryInterface (LPDIRECTMUSICTRACK8 iface, REFIID riid, LPVOID *ppobj) {
  85         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  86         return IDirectMusicScriptTrack_IUnknown_QueryInterface ((LPUNKNOWN)&This->UnknownVtbl, riid, ppobj);
  87 }
  88
  89 ULONG WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_AddRef (LPDIRECTMUSICTRACK8 iface) {
  90         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  91         return IDirectMusicScriptTrack_IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
  92 }
  93
  94 ULONG WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Release (LPDIRECTMUSICTRACK8 iface) {
  95         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  96         return IDirectMusicScriptTrack_IUnknown_Release ((LPUNKNOWN)&This->UnknownVtbl);
  97 }
  98
  99 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Init (LPDIRECTMUSICTRACK8 iface, IDirectMusicSegment* pSegment)
 100 {
 101         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 102         FIXME("(%p, %p): stub\n", This, pSegment);
 103         return S_OK;
 104 }
 105
 106 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_InitPlay (LPDIRECTMUSICTRACK8 iface, IDirectMusicSegmentState* pSegmentState, IDirectMusicPerformance* pPerformance, void** ppStateData, DWORD dwVirtualTrack8ID, DWORD dwFlags)
 107 {
 108         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 109         FIXME("(%p, %p, %p, %p, %ld, %ld): stub\n", This, pSegmentState, pPerformance, ppStateData, dwVirtualTrack8ID, dwFlags);
 110         return S_OK;
 111 }
 112
 113 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_EndPlay (LPDIRECTMUSICTRACK8 iface, void* pStateData)
 114 {
 115         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 116         FIXME("(%p, %p): stub\n", This, pStateData);
 117         return S_OK;
 118 }
 119
 120 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Play (LPDIRECTMUSICTRACK8 iface, void* pStateData, MUSIC_TIME mtStart, MUSIC_TIME mtEnd, MUSIC_TIME mtOffset, DWORD dwFlags, IDirectMusicPerformance* pPerf, IDirectMusicSegmentState* pSegSt, DWORD dwVirtualID)
 121 {
 122         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 123         FIXME("(%p, %p, %ld, %ld, %ld, %ld, %p, %p, %ld): stub\n", This, pStateData, mtStart, mtEnd, mtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
 124         return S_OK;
 125 }
 126
 127 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_GetParam (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, MUSIC_TIME mtTime, MUSIC_TIME* pmtNext, void* pParam) {
 128         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 129         FIXME("(%p, %s, %ld, %p, %p): stub\n", This, debugstr_dmguid(rguidType), mtTime, pmtNext, pParam);
 130         return S_OK;
 131 }
 132
 133 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_SetParam (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, MUSIC_TIME mtTime, void* pParam) {
 134         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 135         FIXME("(%p, %s, %ld, %p): stub\n", This, debugstr_dmguid(rguidType), mtTime, pParam);
 136         return S_OK;
 137 }
 138
 139 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_IsParamSupported (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType) {
 140         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 141
 142         TRACE("(%p, %s): ", This, debugstr_dmguid(rguidType));
 143         /* didn't find any params */
 144         TRACE("param unsupported\n");
 145         return DMUS_E_TYPE_UNSUPPORTED;
 146 }
 147
 148 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_AddNotificationType (LPDIRECTMUSICTRACK8 iface, REFGUID rguidNotificationType) {
 149         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 150         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 151         return S_OK;
 152 }
 153
 154 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_RemoveNotificationType (LPDIRECTMUSICTRACK8 iface, REFGUID rguidNotificationType) {
 155         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 156         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 157         return S_OK;
 158 }
 159
 160 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Clone (LPDIRECTMUSICTRACK8 iface, MUSIC_TIME mtStart, MUSIC_TIME mtEnd, IDirectMusicTrack** ppTrack) {
 161         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 162         FIXME("(%p, %ld, %ld, %p): stub\n", This, mtStart, mtEnd, ppTrack);
 163         return S_OK;
 164 }
 165
 166 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_PlayEx (LPDIRECTMUSICTRACK8 iface, void* pStateData, REFERENCE_TIME rtStart, REFERENCE_TIME rtEnd, REFERENCE_TIME rtOffset, DWORD dwFlags, IDirectMusicPerformance* pPerf, IDirectMusicSegmentState* pSegSt, DWORD dwVirtualID) {
 167         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 168         FIXME("(%p, %p, %lli, %lli, %lli, %ld, %p, %p, %ld): stub\n", This, pStateData, rtStart, rtEnd, rtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
 169         return S_OK;
 170 }
 171
 172 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_GetParamEx (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, REFERENCE_TIME rtTime, REFERENCE_TIME* prtNext, void* pParam, void* pStateData, DWORD dwFlags) {
 173         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 174         FIXME("(%p, %s, %lli, %p, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType), rtTime, prtNext, pParam, pStateData, dwFlags);
 175         return S_OK;
 176 }
 177
 178 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_SetParamEx (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, REFERENCE_TIME rtTime, void* pParam, void* pStateData, DWORD dwFlags) {
 179         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 180         FIXME("(%p, %s, %lli, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType), rtTime, pParam, pStateData, dwFlags);
 181         return S_OK;
 182 }
 183
 184 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Compose (LPDIRECTMUSICTRACK8 iface, IUnknown* pContext, DWORD dwTrackGroup, IDirectMusicTrack** ppResultTrack) {
 185         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 186         FIXME("(%p, %p, %ld, %p): stub\n", This, pContext, dwTrackGroup, ppResultTrack);
 187         return S_OK;
 188 }
 189
 190 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Join (LPDIRECTMUSICTRACK8 iface, IDirectMusicTrack* pNewTrack, MUSIC_TIME mtJoin, IUnknown* pContext, DWORD dwTrackGroup, IDirectMusicTrack** ppResultTrack) {
 191         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 192         FIXME("(%p, %p, %ld, %p, %ld, %p): stub\n", This, pNewTrack, mtJoin, pContext, dwTrackGroup, ppResultTrack);
 193         return S_OK;
 194 }
 195
 196 static const IDirectMusicTrack8Vtbl DirectMusicScriptTrack_Track_Vtbl = {
 197         IDirectMusicScriptTrack_IDirectMusicTrack_QueryInterface,
 198         IDirectMusicScriptTrack_IDirectMusicTrack_AddRef,
 199         IDirectMusicScriptTrack_IDirectMusicTrack_Release,
 200         IDirectMusicScriptTrack_IDirectMusicTrack_Init,
 201         IDirectMusicScriptTrack_IDirectMusicTrack_InitPlay,
 202         IDirectMusicScriptTrack_IDirectMusicTrack_EndPlay,
 203         IDirectMusicScriptTrack_IDirectMusicTrack_Play,
 204         IDirectMusicScriptTrack_IDirectMusicTrack_GetParam,
 205         IDirectMusicScriptTrack_IDirectMusicTrack_SetParam,
 206         IDirectMusicScriptTrack_IDirectMusicTrack_IsParamSupported,
 207         IDirectMusicScriptTrack_IDirectMusicTrack_AddNotificationType,
 208         IDirectMusicScriptTrack_IDirectMusicTrack_RemoveNotificationType,
 209         IDirectMusicScriptTrack_IDirectMusicTrack_Clone,
 210         IDirectMusicScriptTrack_IDirectMusicTrack_PlayEx,
 211         IDirectMusicScriptTrack_IDirectMusicTrack_GetParamEx,
 212         IDirectMusicScriptTrack_IDirectMusicTrack_SetParamEx,
 213         IDirectMusicScriptTrack_IDirectMusicTrack_Compose,
 214         IDirectMusicScriptTrack_IDirectMusicTrack_Join
 215 };
 216
 217 /* IDirectMusicScriptTrack IPersistStream part: */
 218 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_QueryInterface (LPPERSISTSTREAM iface, REFIID riid, LPVOID *ppobj) {
 219         ICOM_THIS_MULTI(IDirectMusicScriptTrack, PersistStreamVtbl, iface);
 220         return IDirectMusicScriptTrack_IUnknown_QueryInterface ((LPUNKNOWN)&This->UnknownVtbl, riid, ppobj);
 221 }
 222
 223 ULONG WINAPI IDirectMusicScriptTrack_IPersistStream_AddRef (LPPERSISTSTREAM iface) {
 224         ICOM_THIS_MULTI(IDirectMusicScriptTrack, PersistStreamVtbl, iface);
 225         return IDirectMusicScriptTrack_IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
 226 }
 227
 228 ULONG WINAPI IDirectMusicScriptTrack_IPersistStream_Release (LPPERSISTSTREAM iface) {
 229         ICOM_THIS_MULTI(IDirectMusicScriptTrack, PersistStreamVtbl, iface);
 230         return IDirectMusicScriptTrack_IUnknown_Release ((LPUNKNOWN)&This->UnknownVtbl);
 231 }
 232
 233 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_GetClassID (LPPERSISTSTREAM iface, CLSID* pClassID) {
 234         return E_NOTIMPL;
 235 }
 236
 237 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_IsDirty (LPPERSISTSTREAM iface) {
 238         return E_NOTIMPL;
 239 }
 240
 241 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_Load (LPPERSISTSTREAM iface, IStream* pStm) {
 242         FIXME(": Loading not implemented yet\n");
 243         return S_OK;
 244 }
 245
 246 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_Save (LPPERSISTSTREAM iface, IStream* pStm, BOOL fClearDirty) {
 247         return E_NOTIMPL;
 248 }
 249
 250 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_GetSizeMax (LPPERSISTSTREAM iface, ULARGE_INTEGER* pcbSize) {
 251         return E_NOTIMPL;
 252 }
 253
 254 static const IPersistStreamVtbl DirectMusicScriptTrack_PersistStream_Vtbl = {
 255         IDirectMusicScriptTrack_IPersistStream_QueryInterface,
 256         IDirectMusicScriptTrack_IPersistStream_AddRef,
 257         IDirectMusicScriptTrack_IPersistStream_Release,
 258         IDirectMusicScriptTrack_IPersistStream_GetClassID,
 259         IDirectMusicScriptTrack_IPersistStream_IsDirty,
 260         IDirectMusicScriptTrack_IPersistStream_Load,
 261         IDirectMusicScriptTrack_IPersistStream_Save,
 262         IDirectMusicScriptTrack_IPersistStream_GetSizeMax
 263 };
 264
 265 /* for ClassFactory */
 266 HRESULT WINAPI DMUSIC_CreateDirectMusicScriptTrack (LPCGUID lpcGUID, LPVOID *ppobj, LPUNKNOWN pUnkOuter) {
 267         IDirectMusicScriptTrack* track;
 268
 269         track = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusicScriptTrack));
 270         if (NULL == track) {
 271                 *ppobj = NULL;
 272                 return E_OUTOFMEMORY;
 273         }
 274         track->UnknownVtbl = &DirectMusicScriptTrack_Unknown_Vtbl;
 275         track->TrackVtbl = &DirectMusicScriptTrack_Track_Vtbl;
 276         track->PersistStreamVtbl = &DirectMusicScriptTrack_PersistStream_Vtbl;
 277         track->pDesc = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(DMUS_OBJECTDESC));
 278         DM_STRUCT_INIT(track->pDesc);
 279         track->pDesc->dwValidData |= DMUS_OBJ_CLASS;
 280         memcpy (&track->pDesc->guidClass, &CLSID_DirectMusicScriptTrack, sizeof (CLSID));
 281         track->ref = 0; /* will be inited by QueryInterface */
 282
 283         return IDirectMusicScriptTrack_IUnknown_QueryInterface ((LPUNKNOWN)&track->UnknownVtbl, lpcGUID, ppobj);
 284 }