dlls/dmstyle/styletrack.c

   1 /* IDirectMusicStyleTrack Implementation
   2  *
   3  * Copyright (C) 2003-2004 Rok Mandeljc
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (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 GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include "dmstyle_private.h"
  21 #include "dmobject.h"
  22
  23 WINE_DEFAULT_DEBUG_CHANNEL(dmstyle);
  24
  25 /*****************************************************************************
  26  * IDirectMusicStyleTrack implementation
  27  */
  28 struct style_item {
  29     struct list entry;
  30     DWORD timestamp;
  31     IDirectMusicStyle8 *dmstyle;
  32 };
  33
  34 typedef struct IDirectMusicStyleTrack {
  35     IDirectMusicTrack8 IDirectMusicTrack8_iface;
  36     struct dmobject dmobj;  /* IPersistStream only */
  37     LONG ref;
  38     struct list Items;
  39 } IDirectMusicStyleTrack;
  40
  41 /* IDirectMusicStyleTrack IDirectMusicTrack8 part: */
  42 static inline IDirectMusicStyleTrack *impl_from_IDirectMusicTrack8(IDirectMusicTrack8 *iface)
  43 {
  44     return CONTAINING_RECORD(iface, IDirectMusicStyleTrack, IDirectMusicTrack8_iface);
  45 }
  46
  47 static HRESULT WINAPI style_track_QueryInterface(IDirectMusicTrack8 *iface, REFIID riid,
  48         void **ret_iface)
  49 {
  50     IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
  51
  52     TRACE("(%p, %s, %p)\n", This, debugstr_dmguid(riid), ret_iface);
  53
  54     *ret_iface = NULL;
  55
  56     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDirectMusicTrack) ||
  57             IsEqualIID(riid, &IID_IDirectMusicTrack8))
  58         *ret_iface = iface;
  59     else if (IsEqualIID(riid, &IID_IPersistStream))
  60         *ret_iface = &This->dmobj.IPersistStream_iface;
  61     else {
  62         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ret_iface);
  63         return E_NOINTERFACE;
  64     }
  65
  66     IUnknown_AddRef((IUnknown*)*ret_iface);
  67     return S_OK;
  68 }
  69
  70 static ULONG WINAPI style_track_AddRef(IDirectMusicTrack8 *iface)
  71 {
  72     IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
  73     LONG ref = InterlockedIncrement(&This->ref);
  74
  75     TRACE("(%p) ref=%ld\n", This, ref);
  76
  77     return ref;
  78 }
  79
  80 static ULONG WINAPI style_track_Release(IDirectMusicTrack8 *iface)
  81 {
  82     IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
  83     LONG ref = InterlockedDecrement(&This->ref);
  84
  85     TRACE("(%p) ref=%ld\n", This, ref);
  86
  87     if (!ref) {
  88         struct style_item *item, *item2;
  89
  90         LIST_FOR_EACH_ENTRY_SAFE(item, item2, &This->Items, struct style_item, entry) {
  91             list_remove(&item->entry);
  92             IDirectMusicStyle8_Release(item->dmstyle);
  93             free(item);
  94         }
  95
  96         free(This);
  97     }
  98
  99     return ref;
 100 }
 101
 102 static HRESULT WINAPI style_track_Init(IDirectMusicTrack8 *iface, IDirectMusicSegment *pSegment)
 103 {
 104         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 105         FIXME("(%p, %p): stub\n", This, pSegment);
 106         return S_OK;
 107 }
 108
 109 static HRESULT WINAPI style_track_InitPlay(IDirectMusicTrack8 *iface,
 110         IDirectMusicSegmentState *pSegmentState, IDirectMusicPerformance *pPerformance,
 111         void **ppStateData, DWORD dwVirtualTrack8ID, DWORD dwFlags)
 112 {
 113         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 114         FIXME("(%p, %p, %p, %p, %ld, %ld): stub\n", This, pSegmentState, pPerformance, ppStateData, dwVirtualTrack8ID, dwFlags);
 115         return S_OK;
 116 }
 117
 118 static HRESULT WINAPI style_track_EndPlay(IDirectMusicTrack8 *iface, void *pStateData)
 119 {
 120         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 121         FIXME("(%p, %p): stub\n", This, pStateData);
 122         return S_OK;
 123 }
 124
 125 static HRESULT WINAPI style_track_Play(IDirectMusicTrack8 *iface, void *pStateData,
 126         MUSIC_TIME mtStart, MUSIC_TIME mtEnd, MUSIC_TIME mtOffset, DWORD dwFlags,
 127         IDirectMusicPerformance *pPerf, IDirectMusicSegmentState *pSegSt, DWORD dwVirtualID)
 128 {
 129         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 130         FIXME("(%p, %p, %ld, %ld, %ld, %ld, %p, %p, %ld): stub\n", This, pStateData, mtStart, mtEnd, mtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
 131         return S_OK;
 132 }
 133
 134 static HRESULT WINAPI style_track_GetParam(IDirectMusicTrack8 *iface, REFGUID type,
 135         MUSIC_TIME time, MUSIC_TIME *next, void *param)
 136 {
 137     IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 138     struct style_item *item;
 139
 140     TRACE("(%p, %s, %ld, %p, %p):\n", This, debugstr_dmguid(type), time, next, param);
 141
 142     if (!type)
 143         return E_POINTER;
 144
 145     if (IsEqualGUID(&GUID_IDirectMusicStyle, type)) {
 146         LIST_FOR_EACH_ENTRY(item, &This->Items, struct style_item, entry) {
 147             IDirectMusicStyle8_AddRef(item->dmstyle);
 148             *((IDirectMusicStyle8 **)param) = item->dmstyle;
 149
 150             return S_OK;
 151         }
 152
 153         return DMUS_E_NOT_FOUND;
 154     } else if (IsEqualGUID(&GUID_TimeSignature, type)) {
 155         FIXME("GUID_TimeSignature not handled yet\n");
 156         return S_OK;
 157     }
 158
 159     return DMUS_E_GET_UNSUPPORTED;
 160 }
 161
 162 static HRESULT WINAPI style_track_SetParam(IDirectMusicTrack8 *iface, REFGUID type, MUSIC_TIME time,
 163         void *param)
 164 {
 165     IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 166
 167     TRACE("(%p, %s, %ld, %p)\n", This, debugstr_dmguid(type), time, param);
 168
 169     if (!type)
 170         return E_POINTER;
 171
 172     if (IsEqualGUID(type, &GUID_DisableTimeSig)) {
 173         FIXME("GUID_DisableTimeSig not handled yet\n");
 174         return S_OK;
 175     } else if (IsEqualGUID(type, &GUID_EnableTimeSig)) {
 176         FIXME("GUID_EnableTimeSig not handled yet\n");
 177         return S_OK;
 178     } else if (IsEqualGUID(type, &GUID_IDirectMusicStyle)) {
 179         FIXME("GUID_IDirectMusicStyle not handled yet\n");
 180         return S_OK;
 181     } else if (IsEqualGUID(type, &GUID_SeedVariations)) {
 182         FIXME("GUID_SeedVariations not handled yet\n");
 183         return S_OK;
 184     }
 185
 186     return DMUS_E_SET_UNSUPPORTED;
 187 }
 188
 189 static HRESULT WINAPI style_track_IsParamSupported(IDirectMusicTrack8 *iface, REFGUID rguidType)
 190 {
 191         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 192
 193         TRACE("(%p, %s)\n", This, debugstr_dmguid(rguidType));
 194
 195         if (!rguidType)
 196                 return E_POINTER;
 197
 198         if (IsEqualGUID (rguidType, &GUID_DisableTimeSig)
 199                 || IsEqualGUID (rguidType, &GUID_EnableTimeSig)
 200                 || IsEqualGUID (rguidType, &GUID_IDirectMusicStyle)
 201                 || IsEqualGUID (rguidType, &GUID_SeedVariations)
 202                 || IsEqualGUID (rguidType, &GUID_TimeSignature)) {
 203                 TRACE("param supported\n");
 204                 return S_OK;
 205         }
 206         TRACE("param unsupported\n");
 207         return DMUS_E_TYPE_UNSUPPORTED;
 208 }
 209
 210 static HRESULT WINAPI style_track_AddNotificationType(IDirectMusicTrack8 *iface,
 211         REFGUID rguidNotificationType)
 212 {
 213         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 214         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 215         return S_OK;
 216 }
 217
 218 static HRESULT WINAPI style_track_RemoveNotificationType(IDirectMusicTrack8 *iface,
 219         REFGUID rguidNotificationType)
 220 {
 221         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 222         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
 223         return S_OK;
 224 }
 225
 226 static HRESULT WINAPI style_track_Clone(IDirectMusicTrack8 *iface, MUSIC_TIME mtStart,
 227         MUSIC_TIME mtEnd, IDirectMusicTrack **ppTrack)
 228 {
 229         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 230         FIXME("(%p, %ld, %ld, %p): stub\n", This, mtStart, mtEnd, ppTrack);
 231         return S_OK;
 232 }
 233
 234 static HRESULT WINAPI style_track_PlayEx(IDirectMusicTrack8 *iface, void *pStateData,
 235         REFERENCE_TIME rtStart, REFERENCE_TIME rtEnd, REFERENCE_TIME rtOffset, DWORD dwFlags,
 236         IDirectMusicPerformance *pPerf, IDirectMusicSegmentState *pSegSt, DWORD dwVirtualID)
 237 {
 238         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 239         FIXME("(%p, %p, 0x%s, 0x%s, 0x%s, %ld, %p, %p, %ld): stub\n", This, pStateData, wine_dbgstr_longlong(rtStart),
 240             wine_dbgstr_longlong(rtEnd), wine_dbgstr_longlong(rtOffset), dwFlags, pPerf, pSegSt, dwVirtualID);
 241         return S_OK;
 242 }
 243
 244 static HRESULT WINAPI style_track_GetParamEx(IDirectMusicTrack8 *iface, REFGUID rguidType,
 245         REFERENCE_TIME rtTime, REFERENCE_TIME *prtNext, void *pParam, void *pStateData,
 246         DWORD dwFlags)
 247 {
 248         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 249         FIXME("(%p, %s, 0x%s, %p, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType),
 250             wine_dbgstr_longlong(rtTime), prtNext, pParam, pStateData, dwFlags);
 251         return S_OK;
 252 }
 253
 254 static HRESULT WINAPI style_track_SetParamEx(IDirectMusicTrack8 *iface, REFGUID rguidType,
 255         REFERENCE_TIME rtTime, void *pParam, void *pStateData, DWORD dwFlags)
 256 {
 257         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 258         FIXME("(%p, %s, 0x%s, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType),
 259             wine_dbgstr_longlong(rtTime), pParam, pStateData, dwFlags);
 260         return S_OK;
 261 }
 262
 263 static HRESULT WINAPI style_track_Compose(IDirectMusicTrack8 *iface, IUnknown *context,
 264         DWORD trackgroup, IDirectMusicTrack **track)
 265 {
 266     IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 267
 268     TRACE("(%p, %p, %ld, %p): method not implemented\n", This, context, trackgroup, track);
 269     return E_NOTIMPL;
 270 }
 271
 272 static HRESULT WINAPI style_track_Join(IDirectMusicTrack8 *iface, IDirectMusicTrack *pNewTrack,
 273         MUSIC_TIME mtJoin, IUnknown *pContext, DWORD dwTrackGroup,
 274         IDirectMusicTrack **ppResultTrack)
 275 {
 276         IDirectMusicStyleTrack *This = impl_from_IDirectMusicTrack8(iface);
 277         FIXME("(%p, %p, %ld, %p, %ld, %p): stub\n", This, pNewTrack, mtJoin, pContext, dwTrackGroup, ppResultTrack);
 278         return S_OK;
 279 }
 280
 281 static const IDirectMusicTrack8Vtbl dmtrack8_vtbl = {
 282     style_track_QueryInterface,
 283     style_track_AddRef,
 284     style_track_Release,
 285     style_track_Init,
 286     style_track_InitPlay,
 287     style_track_EndPlay,
 288     style_track_Play,
 289     style_track_GetParam,
 290     style_track_SetParam,
 291     style_track_IsParamSupported,
 292     style_track_AddNotificationType,
 293     style_track_RemoveNotificationType,
 294     style_track_Clone,
 295     style_track_PlayEx,
 296     style_track_GetParamEx,
 297     style_track_SetParamEx,
 298     style_track_Compose,
 299     style_track_Join
 300 };
 301
 302 static HRESULT parse_style_ref(IDirectMusicStyleTrack *This, IStream *stream, const struct chunk_entry *strf)
 303 {
 304     struct chunk_entry chunk = {.parent = strf};
 305     IDirectMusicObject *dmobj;
 306     struct style_item *item;
 307     HRESULT hr;
 308
 309     /* First chunk is a timestamp */
 310     if (stream_get_chunk(stream, &chunk) != S_OK || chunk.id != DMUS_FOURCC_TIME_STAMP_CHUNK)
 311         return DMUS_E_CHUNKNOTFOUND;
 312     if (!(item = malloc(sizeof(*item))))
 313         return E_OUTOFMEMORY;
 314     hr = stream_chunk_get_data(stream, &chunk, &item->timestamp, sizeof(item->timestamp));
 315     if (FAILED(hr))
 316         goto error;
 317
 318     /* Second chunk is a reference list */
 319     if (stream_next_chunk(stream, &chunk) != S_OK || chunk.id != FOURCC_LIST ||
 320             chunk.type != DMUS_FOURCC_REF_LIST) {
 321         hr = DMUS_E_INVALID_SEGMENTTRIGGERTRACK;
 322         goto error;
 323     }
 324     if (FAILED(hr = dmobj_parsereference(stream, &chunk, &dmobj))) {
 325         WARN("Failed to load reference: %#lx\n", hr);
 326         goto error;
 327     }
 328     hr = IDirectMusicObject_QueryInterface(dmobj, &IID_IDirectMusicStyle8, (void **)&item->dmstyle);
 329     if (FAILED(hr)) {
 330         WARN("Reference not an IDirectMusicStyle8\n");
 331         IDirectMusicObject_Release(dmobj);
 332         goto error;
 333     }
 334
 335     list_add_tail(&This->Items, &item->entry);
 336     TRACE("Found reference to style %p with timestamp %lu\n", item->dmstyle, item->timestamp);
 337
 338     return S_OK;
 339
 340 error:
 341     free(item);
 342     return hr;
 343 }
 344
 345 static inline IDirectMusicStyleTrack *impl_from_IPersistStream(IPersistStream *iface)
 346 {
 347     return CONTAINING_RECORD(iface, IDirectMusicStyleTrack, dmobj.IPersistStream_iface);
 348 }
 349
 350 static HRESULT WINAPI IPersistStreamImpl_Load(IPersistStream *iface, IStream *stream)
 351 {
 352     IDirectMusicStyleTrack *This = impl_from_IPersistStream(iface);
 353     struct chunk_entry track = {0};
 354     struct chunk_entry chunk = {.parent = &track};
 355     HRESULT hr;
 356
 357     TRACE("(%p, %p): Loading\n", This, stream);
 358
 359     if (!stream)
 360         return E_POINTER;
 361
 362     if (stream_get_chunk(stream, &track) != S_OK || track.id != FOURCC_LIST ||
 363             track.type != DMUS_FOURCC_STYLE_TRACK_LIST)
 364         return DMUS_E_TRACK_NOT_FOUND;
 365
 366     while ((hr = stream_next_chunk(stream, &chunk)) == S_OK)
 367         if (chunk.id == FOURCC_LIST && chunk.type == DMUS_FOURCC_STYLE_REF_LIST)
 368             if (FAILED(hr = parse_style_ref(This, stream, &chunk)))
 369                 break;
 370
 371     return SUCCEEDED(hr) ? S_OK : hr;
 372 }
 373
 374 static const IPersistStreamVtbl persiststream_vtbl = {
 375     dmobj_IPersistStream_QueryInterface,
 376     dmobj_IPersistStream_AddRef,
 377     dmobj_IPersistStream_Release,
 378     dmobj_IPersistStream_GetClassID,
 379     unimpl_IPersistStream_IsDirty,
 380     IPersistStreamImpl_Load,
 381     unimpl_IPersistStream_Save,
 382     unimpl_IPersistStream_GetSizeMax
 383 };
 384
 385 /* for ClassFactory */
 386 HRESULT create_dmstyletrack(REFIID lpcGUID, void **ppobj)
 387 {
 388     IDirectMusicStyleTrack *track;
 389     HRESULT hr;
 390
 391     *ppobj = NULL;
 392     if (!(track = calloc(1, sizeof(*track)))) return E_OUTOFMEMORY;
 393     track->IDirectMusicTrack8_iface.lpVtbl = &dmtrack8_vtbl;
 394     track->ref = 1;
 395     dmobject_init(&track->dmobj, &CLSID_DirectMusicStyleTrack,
 396                   (IUnknown *)&track->IDirectMusicTrack8_iface);
 397     track->dmobj.IPersistStream_iface.lpVtbl = &persiststream_vtbl;
 398     list_init (&track->Items);
 399
 400     hr = IDirectMusicTrack8_QueryInterface(&track->IDirectMusicTrack8_iface, lpcGUID, ppobj);
 401     IDirectMusicTrack8_Release(&track->IDirectMusicTrack8_iface);
 402
 403     return hr;
 404 }