git.oblomov.eu Git - wine/blob - 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 WINE_DECLARE_DEBUG_CHANNEL(dmfile);
  24
  25 /*****************************************************************************
  26  * IDirectMusicScriptTrack implementation
  27  */
  28 /* IDirectMusicScriptTrack IUnknown part: */
  29 HRESULT WINAPI IDirectMusicScriptTrack_IUnknown_QueryInterface (LPUNKNOWN iface, REFIID riid, LPVOID *ppobj) {
  30         ICOM_THIS_MULTI(IDirectMusicScriptTrack, UnknownVtbl, iface);
  31
  32         TRACE("(%p, %s, %p)\n", This, debugstr_dmguid(riid), ppobj);
  33         if (IsEqualIID (riid, &IID_IUnknown)) {
  34                 *ppobj = (LPUNKNOWN)&This->UnknownVtbl;
  35                 IDirectMusicScriptTrack_IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
  36                 return S_OK;
  37         } else if (IsEqualIID (riid, &IID_IDirectMusicTrack)
  38           || IsEqualIID (riid, &IID_IDirectMusicTrack8)) {
  39                 *ppobj = (LPDIRECTMUSICTRACK8)&This->TrackVtbl;
  40                 IDirectMusicScriptTrack_IDirectMusicTrack_AddRef ((LPDIRECTMUSICTRACK8)&This->TrackVtbl);
  41                 return S_OK;
  42         } else if (IsEqualIID (riid, &IID_IPersistStream)) {
  43                 *ppobj = (LPPERSISTSTREAM)&This->PersistStreamVtbl;
  44                 IDirectMusicScriptTrack_IPersistStream_AddRef ((LPPERSISTSTREAM)&This->PersistStreamVtbl);
  45                 return S_OK;
  46         }
  47
  48         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ppobj);
  49         return E_NOINTERFACE;
  50 }
  51
  52 ULONG WINAPI IDirectMusicScriptTrack_IUnknown_AddRef (LPUNKNOWN iface) {
  53         ICOM_THIS_MULTI(IDirectMusicScriptTrack, UnknownVtbl, iface);
  54         ULONG ref = InterlockedIncrement(&This->ref);
  55
  56         TRACE("(%p): AddRef from %ld\n", This, ref - 1);
  57
  58         return ref;
  59 }
  60
  61 ULONG WINAPI IDirectMusicScriptTrack_IUnknown_Release (LPUNKNOWN iface) {
  62         ICOM_THIS_MULTI(IDirectMusicScriptTrack, UnknownVtbl, iface);
  63         ULONG ref = InterlockedDecrement(&This->ref);
  64
  65         TRACE("(%p): ReleaseRef to %ld\n", This, ref);
  66
  67         if (ref == 0) {
  68                 HeapFree(GetProcessHeap(), 0, This);
  69         }
  70         return ref;
  71 }
  72
  73 IUnknownVtbl DirectMusicScriptTrack_Unknown_Vtbl = {
  74         IDirectMusicScriptTrack_IUnknown_QueryInterface,
  75         IDirectMusicScriptTrack_IUnknown_AddRef,
  76         IDirectMusicScriptTrack_IUnknown_Release
  77 };
  78
  79 /* IDirectMusicScriptTrack IDirectMusicTrack8 part: */
  80 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_QueryInterface (LPDIRECTMUSICTRACK8 iface, REFIID riid, LPVOID *ppobj) {
  81         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  82         return IDirectMusicScriptTrack_IUnknown_QueryInterface ((LPUNKNOWN)&This->UnknownVtbl, riid, ppobj);
  83 }
  84
  85 ULONG WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_AddRef (LPDIRECTMUSICTRACK8 iface) {
  86         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  87         return IDirectMusicScriptTrack_IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
  88 }
  89
  90 ULONG WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Release (LPDIRECTMUSICTRACK8 iface) {
  91         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  92         return IDirectMusicScriptTrack_IUnknown_Release ((LPUNKNOWN)&This->UnknownVtbl);
  93 }
  94
  95 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Init (LPDIRECTMUSICTRACK8 iface, IDirectMusicSegment* pSegment)
  96 {
  97         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
  98         FIXME("(%p, %p): stub\n", This, pSegment);
  99         return S_OK;
 100 }
 101
 102 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_InitPlay (LPDIRECTMUSICTRACK8 iface, IDirectMusicSegmentState* pSegmentState, IDirectMusicPerformance* pPerformance, void** ppStateData, DWORD dwVirtualTrack8ID, DWORD dwFlags)
 103 {
 104         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 105         FIXME("(%p, %p, %p, %p, %ld, %ld): stub\n", This, pSegmentState, pPerformance, ppStateData, dwVirtualTrack8ID, dwFlags);
 106         return S_OK;
 107 }
 108
 109 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_EndPlay (LPDIRECTMUSICTRACK8 iface, void* pStateData)
 110 {
 111         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 112         FIXME("(%p, %p): stub\n", This, pStateData);
 113         return S_OK;
 114 }
 115
 116 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)
 117 {
 118         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 119         FIXME("(%p, %p, %ld, %ld, %ld, %ld, %p, %p, %ld): stub\n", This, pStateData, mtStart, mtEnd, mtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
 120         return S_OK;
 121 }
 122
 123 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_GetParam (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, MUSIC_TIME mtTime, MUSIC_TIME* pmtNext, void* pParam) {
 124         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 125         FIXME("(%p, %s, %ld, %p, %p): stub\n", This, debugstr_dmguid(rguidType), mtTime, pmtNext, pParam);
 126         return S_OK;
 127 }
 128
 129 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_SetParam (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, MUSIC_TIME mtTime, void* pParam) {
 130         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 131         FIXME("(%p, %s, %ld, %p): stub\n", This, debugstr_dmguid(rguidType), mtTime, pParam);
 132         return S_OK;
 133 }
 134
 135 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_IsParamSupported (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType) {
 136         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 137
 138         TRACE("(%p, %s): ", This, debugstr_dmguid(rguidType));
 139         /* didn't find any params */
 140         TRACE("param unsupported\n");
 141         return DMUS_E_TYPE_UNSUPPORTED;
 142 }
 143
 144 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_AddNotificationType (LPDIRECTMUSICTRACK8 iface, REFGUID rguidNotificationType) {
 145         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 146         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 147         return S_OK;
 148 }
 149
 150 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_RemoveNotificationType (LPDIRECTMUSICTRACK8 iface, REFGUID rguidNotificationType) {
 151         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 152         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 153         return S_OK;
 154 }
 155
 156 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Clone (LPDIRECTMUSICTRACK8 iface, MUSIC_TIME mtStart, MUSIC_TIME mtEnd, IDirectMusicTrack** ppTrack) {
 157         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 158         FIXME("(%p, %ld, %ld, %p): stub\n", This, mtStart, mtEnd, ppTrack);
 159         return S_OK;
 160 }
 161
 162 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) {
 163         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 164         FIXME("(%p, %p, %lli, %lli, %lli, %ld, %p, %p, %ld): stub\n", This, pStateData, rtStart, rtEnd, rtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
 165         return S_OK;
 166 }
 167
 168 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_GetParamEx (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, REFERENCE_TIME rtTime, REFERENCE_TIME* prtNext, void* pParam, void* pStateData, DWORD dwFlags) {
 169         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 170         FIXME("(%p, %s, %lli, %p, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType), rtTime, prtNext, pParam, pStateData, dwFlags);
 171         return S_OK;
 172 }
 173
 174 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_SetParamEx (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, REFERENCE_TIME rtTime, void* pParam, void* pStateData, DWORD dwFlags) {
 175         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 176         FIXME("(%p, %s, %lli, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType), rtTime, pParam, pStateData, dwFlags);
 177         return S_OK;
 178 }
 179
 180 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Compose (LPDIRECTMUSICTRACK8 iface, IUnknown* pContext, DWORD dwTrackGroup, IDirectMusicTrack** ppResultTrack) {
 181         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 182         FIXME("(%p, %p, %ld, %p): stub\n", This, pContext, dwTrackGroup, ppResultTrack);
 183         return S_OK;
 184 }
 185
 186 HRESULT WINAPI IDirectMusicScriptTrack_IDirectMusicTrack_Join (LPDIRECTMUSICTRACK8 iface, IDirectMusicTrack* pNewTrack, MUSIC_TIME mtJoin, IUnknown* pContext, DWORD dwTrackGroup, IDirectMusicTrack** ppResultTrack) {
 187         ICOM_THIS_MULTI(IDirectMusicScriptTrack, TrackVtbl, iface);
 188         FIXME("(%p, %p, %ld, %p, %ld, %p): stub\n", This, pNewTrack, mtJoin, pContext, dwTrackGroup, ppResultTrack);
 189         return S_OK;
 190 }
 191
 192 IDirectMusicTrack8Vtbl DirectMusicScriptTrack_Track_Vtbl = {
 193         IDirectMusicScriptTrack_IDirectMusicTrack_QueryInterface,
 194         IDirectMusicScriptTrack_IDirectMusicTrack_AddRef,
 195         IDirectMusicScriptTrack_IDirectMusicTrack_Release,
 196         IDirectMusicScriptTrack_IDirectMusicTrack_Init,
 197         IDirectMusicScriptTrack_IDirectMusicTrack_InitPlay,
 198         IDirectMusicScriptTrack_IDirectMusicTrack_EndPlay,
 199         IDirectMusicScriptTrack_IDirectMusicTrack_Play,
 200         IDirectMusicScriptTrack_IDirectMusicTrack_GetParam,
 201         IDirectMusicScriptTrack_IDirectMusicTrack_SetParam,
 202         IDirectMusicScriptTrack_IDirectMusicTrack_IsParamSupported,
 203         IDirectMusicScriptTrack_IDirectMusicTrack_AddNotificationType,
 204         IDirectMusicScriptTrack_IDirectMusicTrack_RemoveNotificationType,
 205         IDirectMusicScriptTrack_IDirectMusicTrack_Clone,
 206         IDirectMusicScriptTrack_IDirectMusicTrack_PlayEx,
 207         IDirectMusicScriptTrack_IDirectMusicTrack_GetParamEx,
 208         IDirectMusicScriptTrack_IDirectMusicTrack_SetParamEx,
 209         IDirectMusicScriptTrack_IDirectMusicTrack_Compose,
 210         IDirectMusicScriptTrack_IDirectMusicTrack_Join
 211 };
 212
 213 /* IDirectMusicScriptTrack IPersistStream part: */
 214 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_QueryInterface (LPPERSISTSTREAM iface, REFIID riid, LPVOID *ppobj) {
 215         ICOM_THIS_MULTI(IDirectMusicScriptTrack, PersistStreamVtbl, iface);
 216         return IDirectMusicScriptTrack_IUnknown_QueryInterface ((LPUNKNOWN)&This->UnknownVtbl, riid, ppobj);
 217 }
 218
 219 ULONG WINAPI IDirectMusicScriptTrack_IPersistStream_AddRef (LPPERSISTSTREAM iface) {
 220         ICOM_THIS_MULTI(IDirectMusicScriptTrack, PersistStreamVtbl, iface);
 221         return IDirectMusicScriptTrack_IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
 222 }
 223
 224 ULONG WINAPI IDirectMusicScriptTrack_IPersistStream_Release (LPPERSISTSTREAM iface) {
 225         ICOM_THIS_MULTI(IDirectMusicScriptTrack, PersistStreamVtbl, iface);
 226         return IDirectMusicScriptTrack_IUnknown_Release ((LPUNKNOWN)&This->UnknownVtbl);
 227 }
 228
 229 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_GetClassID (LPPERSISTSTREAM iface, CLSID* pClassID) {
 230         return E_NOTIMPL;
 231 }
 232
 233 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_IsDirty (LPPERSISTSTREAM iface) {
 234         return E_NOTIMPL;
 235 }
 236
 237 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_Load (LPPERSISTSTREAM iface, IStream* pStm) {
 238         FIXME(": Loading not implemented yet\n");
 239         return S_OK;
 240 }
 241
 242 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_Save (LPPERSISTSTREAM iface, IStream* pStm, BOOL fClearDirty) {
 243         return E_NOTIMPL;
 244 }
 245
 246 HRESULT WINAPI IDirectMusicScriptTrack_IPersistStream_GetSizeMax (LPPERSISTSTREAM iface, ULARGE_INTEGER* pcbSize) {
 247         return E_NOTIMPL;
 248 }
 249
 250 IPersistStreamVtbl DirectMusicScriptTrack_PersistStream_Vtbl = {
 251         IDirectMusicScriptTrack_IPersistStream_QueryInterface,
 252         IDirectMusicScriptTrack_IPersistStream_AddRef,
 253         IDirectMusicScriptTrack_IPersistStream_Release,
 254         IDirectMusicScriptTrack_IPersistStream_GetClassID,
 255         IDirectMusicScriptTrack_IPersistStream_IsDirty,
 256         IDirectMusicScriptTrack_IPersistStream_Load,
 257         IDirectMusicScriptTrack_IPersistStream_Save,
 258         IDirectMusicScriptTrack_IPersistStream_GetSizeMax
 259 };
 260
 261 /* for ClassFactory */
 262 HRESULT WINAPI DMUSIC_CreateDirectMusicScriptTrack (LPCGUID lpcGUID, LPVOID *ppobj, LPUNKNOWN pUnkOuter) {
 263         IDirectMusicScriptTrack* track;
 264
 265         track = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusicScriptTrack));
 266         if (NULL == track) {
 267                 *ppobj = NULL;
 268                 return E_OUTOFMEMORY;
 269         }
 270         track->UnknownVtbl = &DirectMusicScriptTrack_Unknown_Vtbl;
 271         track->TrackVtbl = &DirectMusicScriptTrack_Track_Vtbl;
 272         track->PersistStreamVtbl = &DirectMusicScriptTrack_PersistStream_Vtbl;
 273         track->pDesc = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(DMUS_OBJECTDESC));
 274         DM_STRUCT_INIT(track->pDesc);
 275         track->pDesc->dwValidData |= DMUS_OBJ_CLASS;
 276         memcpy (&track->pDesc->guidClass, &CLSID_DirectMusicScriptTrack, sizeof (CLSID));
 277         track->ref = 0; /* will be inited by QueryInterface */
 278
 279         return IDirectMusicScriptTrack_IUnknown_QueryInterface ((LPUNKNOWN)&track->UnknownVtbl, lpcGUID, ppobj);
 280 }