wined3d: Only link and use GLSL program if at least one GLSL shader is available.
[wine] / dlls / dmime / segtriggertrack.c
1 /* IDirectMusicSegTriggerTrack 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 modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (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
14  * GNU Library General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * 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 WINE_DECLARE_DEBUG_CHANNEL(dmfile);
25
26 /*****************************************************************************
27  * IDirectMusicSegTriggerTrack implementation
28  */
29 /* IDirectMusicSegTriggerTrack IUnknown part: */
30 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IUnknown_QueryInterface (LPUNKNOWN iface, REFIID riid, LPVOID *ppobj) {
31         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, UnknownVtbl, iface);
32         TRACE("(%p, %s, %p)\n", This, debugstr_dmguid(riid), ppobj);
33
34         if (IsEqualIID (riid, &IID_IUnknown)) {
35                 *ppobj = (LPUNKNOWN)&This->UnknownVtbl;
36                 IUnknown_AddRef (iface);
37                 return S_OK;
38         } else if (IsEqualIID (riid, &IID_IDirectMusicTrack)
39           || IsEqualIID (riid, &IID_IDirectMusicTrack8)) {
40                 *ppobj = (LPDIRECTMUSICTRACK8)&This->TrackVtbl;
41                 IUnknown_AddRef (iface);
42                 return S_OK;
43         } else if (IsEqualIID (riid, &IID_IPersistStream)) {
44                 *ppobj = (LPPERSISTSTREAM)&This->PersistStreamVtbl;
45                 IUnknown_AddRef (iface);
46                 return S_OK;
47         }
48         
49         WARN("(%p, %s, %p): not found\n", This, debugstr_dmguid(riid), ppobj);
50         return E_NOINTERFACE;
51 }
52
53 static ULONG WINAPI IDirectMusicSegTriggerTrack_IUnknown_AddRef (LPUNKNOWN iface) {
54         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, UnknownVtbl, iface);
55         ULONG ref = InterlockedIncrement(&This->ref);
56
57         TRACE("(%p): AddRef from %ld\n", This, ref - 1);
58
59         DMIME_LockModule();
60
61         return ref;
62 }
63
64 static ULONG WINAPI IDirectMusicSegTriggerTrack_IUnknown_Release (LPUNKNOWN iface) {
65         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, UnknownVtbl, iface);
66         ULONG ref = InterlockedDecrement(&This->ref);
67         TRACE("(%p): ReleaseRef to %ld\n", This, ref);
68         
69         if (ref == 0) {
70                 HeapFree(GetProcessHeap(), 0, This);
71         }
72
73         DMIME_UnlockModule();
74         
75         return ref;
76 }
77
78 static const IUnknownVtbl DirectMusicSegTriggerTrack_Unknown_Vtbl = {
79         IDirectMusicSegTriggerTrack_IUnknown_QueryInterface,
80         IDirectMusicSegTriggerTrack_IUnknown_AddRef,
81         IDirectMusicSegTriggerTrack_IUnknown_Release
82 };
83
84 /* IDirectMusicSegTriggerTrack IDirectMusicTrack8 part: */
85 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_QueryInterface (LPDIRECTMUSICTRACK8 iface, REFIID riid, LPVOID *ppobj) {
86         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
87         return IUnknown_QueryInterface ((LPUNKNOWN)&This->UnknownVtbl, riid, ppobj);
88 }
89
90 static ULONG WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_AddRef (LPDIRECTMUSICTRACK8 iface) {
91         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
92         return IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
93 }
94
95 static ULONG WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_Release (LPDIRECTMUSICTRACK8 iface) {
96         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
97         return IUnknown_Release ((LPUNKNOWN)&This->UnknownVtbl);
98 }
99
100 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_Init (LPDIRECTMUSICTRACK8 iface, IDirectMusicSegment* pSegment)
101 {
102         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
103         FIXME("(%p, %p): stub\n", This, pSegment);
104         return S_OK;
105 }
106
107 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_InitPlay (LPDIRECTMUSICTRACK8 iface, IDirectMusicSegmentState* pSegmentState, IDirectMusicPerformance* pPerformance, void** ppStateData, DWORD dwVirtualTrack8ID, DWORD dwFlags)
108 {
109         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
110         FIXME("(%p, %p, %p, %p, %ld, %ld): stub\n", This, pSegmentState, pPerformance, ppStateData, dwVirtualTrack8ID, dwFlags);
111         return S_OK;
112 }
113
114 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_EndPlay (LPDIRECTMUSICTRACK8 iface, void* pStateData)
115 {
116         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
117         FIXME("(%p, %p): stub\n", This, pStateData);
118         return S_OK;
119 }
120
121 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_Play (LPDIRECTMUSICTRACK8 iface, void* pStateData, MUSIC_TIME mtStart, MUSIC_TIME mtEnd, MUSIC_TIME mtOffset, DWORD dwFlags, IDirectMusicPerformance* pPerf, IDirectMusicSegmentState* pSegSt, DWORD dwVirtualID)
122 {
123         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
124         FIXME("(%p, %p, %ld, %ld, %ld, %ld, %p, %p, %ld): stub\n", This, pStateData, mtStart, mtEnd, mtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
125         return S_OK;
126 }
127
128 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_GetParam (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, MUSIC_TIME mtTime, MUSIC_TIME* pmtNext, void* pParam) {
129         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
130         FIXME("(%p, %s, %ld, %p, %p): stub\n", This, debugstr_dmguid(rguidType), mtTime, pmtNext, pParam);
131         return S_OK;
132 }
133
134 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_SetParam (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, MUSIC_TIME mtTime, void* pParam) {
135         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
136         FIXME("(%p, %s, %ld, %p): stub\n", This, debugstr_dmguid(rguidType), mtTime, pParam);
137         return S_OK;
138 }
139
140 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_IsParamSupported (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType) {
141         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
142
143         TRACE("(%p, %s): ", This, debugstr_dmguid(rguidType));
144         /* didn't find any params */
145         TRACE("param unsupported\n");
146         return DMUS_E_TYPE_UNSUPPORTED;
147 }
148
149 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_AddNotificationType (LPDIRECTMUSICTRACK8 iface, REFGUID rguidNotificationType) {
150         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
151         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
152         return S_OK;
153 }
154
155 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_RemoveNotificationType (LPDIRECTMUSICTRACK8 iface, REFGUID rguidNotificationType) {
156         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
157         FIXME("(%p, %s): stub\n", This, debugstr_dmguid(rguidNotificationType));
158         return S_OK;
159 }
160
161 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_Clone (LPDIRECTMUSICTRACK8 iface, MUSIC_TIME mtStart, MUSIC_TIME mtEnd, IDirectMusicTrack** ppTrack) {
162         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
163         FIXME("(%p, %ld, %ld, %p): stub\n", This, mtStart, mtEnd, ppTrack);
164         return S_OK;
165 }
166
167 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_PlayEx (LPDIRECTMUSICTRACK8 iface, void* pStateData, REFERENCE_TIME rtStart, REFERENCE_TIME rtEnd, REFERENCE_TIME rtOffset, DWORD dwFlags, IDirectMusicPerformance* pPerf, IDirectMusicSegmentState* pSegSt, DWORD dwVirtualID) {
168         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
169         FIXME("(%p, %p, %lli, %lli, %lli, %ld, %p, %p, %ld): stub\n", This, pStateData, rtStart, rtEnd, rtOffset, dwFlags, pPerf, pSegSt, dwVirtualID);
170         return S_OK;
171 }
172
173 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_GetParamEx (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, REFERENCE_TIME rtTime, REFERENCE_TIME* prtNext, void* pParam, void* pStateData, DWORD dwFlags) {
174         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
175         FIXME("(%p, %s, %lli, %p, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType), rtTime, prtNext, pParam, pStateData, dwFlags);
176         return S_OK;
177 }
178
179 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_SetParamEx (LPDIRECTMUSICTRACK8 iface, REFGUID rguidType, REFERENCE_TIME rtTime, void* pParam, void* pStateData, DWORD dwFlags) {
180         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
181         FIXME("(%p, %s, %lli, %p, %p, %ld): stub\n", This, debugstr_dmguid(rguidType), rtTime, pParam, pStateData, dwFlags);
182         return S_OK;
183 }
184
185 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_Compose (LPDIRECTMUSICTRACK8 iface, IUnknown* pContext, DWORD dwTrackGroup, IDirectMusicTrack** ppResultTrack) {
186         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
187         FIXME("(%p, %p, %ld, %p): stub\n", This, pContext, dwTrackGroup, ppResultTrack);
188         return S_OK;
189 }
190
191 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IDirectMusicTrack_Join (LPDIRECTMUSICTRACK8 iface, IDirectMusicTrack* pNewTrack, MUSIC_TIME mtJoin, IUnknown* pContext, DWORD dwTrackGroup, IDirectMusicTrack** ppResultTrack) {
192         ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, TrackVtbl, iface);
193         FIXME("(%p, %p, %ld, %p, %ld, %p): stub\n", This, pNewTrack, mtJoin, pContext, dwTrackGroup, ppResultTrack);
194         return S_OK;
195 }
196
197 static const IDirectMusicTrack8Vtbl DirectMusicSegTriggerTrack_Track_Vtbl = {
198         IDirectMusicSegTriggerTrack_IDirectMusicTrack_QueryInterface,
199         IDirectMusicSegTriggerTrack_IDirectMusicTrack_AddRef,
200         IDirectMusicSegTriggerTrack_IDirectMusicTrack_Release,
201         IDirectMusicSegTriggerTrack_IDirectMusicTrack_Init,
202         IDirectMusicSegTriggerTrack_IDirectMusicTrack_InitPlay,
203         IDirectMusicSegTriggerTrack_IDirectMusicTrack_EndPlay,
204         IDirectMusicSegTriggerTrack_IDirectMusicTrack_Play,
205         IDirectMusicSegTriggerTrack_IDirectMusicTrack_GetParam,
206         IDirectMusicSegTriggerTrack_IDirectMusicTrack_SetParam,
207         IDirectMusicSegTriggerTrack_IDirectMusicTrack_IsParamSupported,
208         IDirectMusicSegTriggerTrack_IDirectMusicTrack_AddNotificationType,
209         IDirectMusicSegTriggerTrack_IDirectMusicTrack_RemoveNotificationType,
210         IDirectMusicSegTriggerTrack_IDirectMusicTrack_Clone,
211         IDirectMusicSegTriggerTrack_IDirectMusicTrack_PlayEx,
212         IDirectMusicSegTriggerTrack_IDirectMusicTrack_GetParamEx,
213         IDirectMusicSegTriggerTrack_IDirectMusicTrack_SetParamEx,
214         IDirectMusicSegTriggerTrack_IDirectMusicTrack_Compose,
215         IDirectMusicSegTriggerTrack_IDirectMusicTrack_Join
216 };
217
218 /* IDirectMusicSegTriggerTrack IPersistStream part: */
219 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IPersistStream_QueryInterface (LPPERSISTSTREAM iface, REFIID riid, LPVOID *ppobj) {
220   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
221   return IUnknown_QueryInterface ((LPUNKNOWN)&This->UnknownVtbl, riid, ppobj);
222 }
223
224 static ULONG WINAPI IDirectMusicSegTriggerTrack_IPersistStream_AddRef (LPPERSISTSTREAM iface) {
225   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
226   return IUnknown_AddRef ((LPUNKNOWN)&This->UnknownVtbl);
227 }
228
229 static ULONG WINAPI IDirectMusicSegTriggerTrack_IPersistStream_Release (LPPERSISTSTREAM iface) {
230   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
231   return IUnknown_Release ((LPUNKNOWN)&This->UnknownVtbl);
232 }
233
234 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IPersistStream_GetClassID (LPPERSISTSTREAM iface, CLSID* pClassID) {
235   ICOM_THIS_MULTI(IDirectMusicSegment8Impl, PersistStreamVtbl, iface);
236   TRACE("(%p, %p)\n", This, pClassID);
237   memcpy(pClassID, &CLSID_DirectMusicSegTriggerTrack, sizeof(CLSID));
238   return S_OK;
239 }
240
241 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IPersistStream_IsDirty (LPPERSISTSTREAM iface) {
242   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
243   FIXME("(%p): stub, always S_FALSE\n", This);
244   return S_FALSE;
245 }
246
247 static HRESULT IDirectMusicSegTriggerTrack_IPersistStream_ParseSegment (LPPERSISTSTREAM iface, DMUS_PRIVATE_CHUNK* pChunk, IStream* pStm) {
248   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
249   DMUS_PRIVATE_CHUNK Chunk;
250   DWORD ListSize[3], ListCount[3];
251   LARGE_INTEGER liMove; /* used when skipping chunks */
252   HRESULT hr;
253
254   IDirectMusicObject* pObject = NULL;
255   LPDMUS_PRIVATE_SEGMENT_ITEM pNewItem = NULL;
256
257   if (pChunk->fccID != DMUS_FOURCC_SEGMENT_LIST) {
258     ERR_(dmfile)(": %s chunk should be a SEGMENT list\n", debugstr_fourcc (pChunk->fccID));
259     return E_FAIL;
260   }
261
262   ListSize[0] = pChunk->dwSize - sizeof(FOURCC);
263   ListCount[0] = 0;
264
265   do {
266     IStream_Read (pStm, &Chunk, sizeof(FOURCC)+sizeof(DWORD), NULL);
267     ListCount[0] += sizeof(FOURCC) + sizeof(DWORD) + Chunk.dwSize;
268     TRACE_(dmfile)(": %s chunk (size = %ld)", debugstr_fourcc (Chunk.fccID), Chunk.dwSize);
269     switch (Chunk.fccID) { 
270     case DMUS_FOURCC_SEGMENTITEM_CHUNK: {
271       TRACE_(dmfile)(": segment item chunk\n"); 
272       /** alloc new item entry */
273       pNewItem = HeapAlloc (GetProcessHeap (), HEAP_ZERO_MEMORY, sizeof(DMUS_PRIVATE_SEGMENT_ITEM));
274       if (NULL == pNewItem) {
275         ERR(": no more memory\n");
276         return  E_OUTOFMEMORY;
277       }
278       IStream_Read (pStm, &pNewItem->header, sizeof(DMUS_IO_SEGMENT_ITEM_HEADER), NULL);
279       TRACE_(dmfile)(" - lTimePhysical: %lu\n", pNewItem->header.lTimeLogical);
280       TRACE_(dmfile)(" - lTimePhysical: %lu\n", pNewItem->header.lTimePhysical);
281       TRACE_(dmfile)(" - dwPlayFlags: 0x%08lx\n", pNewItem->header.dwPlayFlags);
282       TRACE_(dmfile)(" - dwFlags: 0x%08lx\n", pNewItem->header.dwFlags);
283       list_add_tail (&This->Items, &pNewItem->entry);
284       break;
285     }
286     case DMUS_FOURCC_SEGMENTITEMNAME_CHUNK: {
287       TRACE_(dmfile)(": segment item name chunk\n");
288       IStream_Read (pStm, pNewItem->wszName, Chunk.dwSize, NULL);
289       TRACE_(dmfile)(" - name: %s\n", debugstr_w(pNewItem->wszName));
290       break;
291     }
292     case FOURCC_LIST: {
293       IStream_Read (pStm, &Chunk.fccID, sizeof(FOURCC), NULL);
294       TRACE_(dmfile)(": LIST chunk of type %s", debugstr_fourcc(Chunk.fccID));
295       ListSize[1] = Chunk.dwSize - sizeof(FOURCC);
296       ListCount[1] = 0;
297       switch (Chunk.fccID) { 
298       case DMUS_FOURCC_REF_LIST: {
299         FIXME_(dmfile)(": DMRF (DM References) list\n");
300         hr = IDirectMusicUtils_IPersistStream_ParseReference (iface,  &Chunk, pStm, &pObject);
301         if (FAILED(hr)) {
302           ERR(": could not load Reference\n");
303           return hr;
304         }
305         pNewItem->pObject = pObject;
306         break;                                          
307       }
308       default: {
309         TRACE_(dmfile)(": unknown (skipping)\n");
310         liMove.QuadPart = Chunk.dwSize - sizeof(FOURCC);
311         IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
312         break;                                          
313       }
314       } 
315       break;
316     }
317     default: {
318       TRACE_(dmfile)(": unknown chunk (irrevelant & skipping)\n");
319       liMove.QuadPart = Chunk.dwSize;
320       IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
321       break;                                            
322     }
323     }
324     TRACE_(dmfile)(": ListCount[0] = %ld < ListSize[0] = %ld\n", ListCount[0], ListSize[0]);
325   } while (ListCount[0] < ListSize[0]);
326   
327   return S_OK;
328 }
329
330 static HRESULT IDirectMusicSegTriggerTrack_IPersistStream_ParseSegmentsList (LPPERSISTSTREAM iface, DMUS_PRIVATE_CHUNK* pChunk, IStream* pStm) {
331   /*ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);*/
332   HRESULT hr = E_FAIL;
333   DMUS_PRIVATE_CHUNK Chunk;
334   DWORD ListSize[3], ListCount[3];
335   LARGE_INTEGER liMove; /* used when skipping chunks */
336
337   if (pChunk->fccID != DMUS_FOURCC_SEGMENTS_LIST) {
338     ERR_(dmfile)(": %s chunk should be a SEGMENTS list\n", debugstr_fourcc (pChunk->fccID));
339     return E_FAIL;
340   }
341
342   ListSize[0] = pChunk->dwSize - sizeof(FOURCC);
343   ListCount[0] = 0;
344
345   do {
346     IStream_Read (pStm, &Chunk, sizeof(FOURCC)+sizeof(DWORD), NULL);
347     ListCount[0] += sizeof(FOURCC) + sizeof(DWORD) + Chunk.dwSize;
348     TRACE_(dmfile)(": %s chunk (size = %ld)", debugstr_fourcc (Chunk.fccID), Chunk.dwSize);
349     switch (Chunk.fccID) { 
350     case FOURCC_LIST: {
351       IStream_Read (pStm, &Chunk.fccID, sizeof(FOURCC), NULL);
352       TRACE_(dmfile)(": LIST chunk of type %s", debugstr_fourcc(Chunk.fccID));
353       ListSize[1] = Chunk.dwSize - sizeof(FOURCC);
354       ListCount[1] = 0;
355       switch (Chunk.fccID) { 
356       case DMUS_FOURCC_SEGMENT_LIST: {
357         TRACE_(dmfile)(": SEGMENT list\n"); 
358         hr = IDirectMusicSegTriggerTrack_IPersistStream_ParseSegment (iface, &Chunk, pStm);
359         if (FAILED(hr)) return hr;      
360         break;
361       }
362       default: {
363         TRACE_(dmfile)(": unknown (skipping)\n");
364         liMove.QuadPart = Chunk.dwSize - sizeof(FOURCC);
365         IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
366         break;                                          
367       }
368       } 
369       break;
370     }
371     default: {
372       TRACE_(dmfile)(": unknown chunk (irrevelant & skipping)\n");
373       liMove.QuadPart = Chunk.dwSize;
374       IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
375       break;                                            
376     }
377     }
378     TRACE_(dmfile)(": ListCount[0] = %ld < ListSize[0] = %ld\n", ListCount[0], ListSize[0]);
379   } while (ListCount[0] < ListSize[0]);
380   
381   return S_OK;
382 }
383
384 static HRESULT IDirectMusicSegTriggerTrack_IPersistStream_ParseSegTrackList (LPPERSISTSTREAM iface, DMUS_PRIVATE_CHUNK* pChunk, IStream* pStm) {
385   /*ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);*/
386   HRESULT hr = E_FAIL;
387   DMUS_PRIVATE_CHUNK Chunk;
388   DWORD ListSize[3], ListCount[3];
389   LARGE_INTEGER liMove; /* used when skipping chunks */
390
391   if (pChunk->fccID != DMUS_FOURCC_SEGTRACK_LIST) {
392     ERR_(dmfile)(": %s chunk should be a SEGTRACK list\n", debugstr_fourcc (pChunk->fccID));
393     return E_FAIL;
394   }  
395
396   ListSize[0] = pChunk->dwSize - sizeof(FOURCC);
397   ListCount[0] = 0;
398
399   do {
400     IStream_Read (pStm, &Chunk, sizeof(FOURCC)+sizeof(DWORD), NULL);
401     ListCount[0] += sizeof(FOURCC) + sizeof(DWORD) + Chunk.dwSize;
402     TRACE_(dmfile)(": %s chunk (size = %ld)", debugstr_fourcc (Chunk.fccID), Chunk.dwSize);
403     switch (Chunk.fccID) { 
404     case DMUS_FOURCC_SEGTRACK_CHUNK: {
405       TRACE_(dmfile)(": segment trigger track chunk\n");
406       liMove.QuadPart = Chunk.dwSize;
407       IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
408       break;
409     }
410     case FOURCC_LIST: {
411       IStream_Read (pStm, &Chunk.fccID, sizeof(FOURCC), NULL);
412       TRACE_(dmfile)(": LIST chunk of type %s", debugstr_fourcc(Chunk.fccID));
413       ListSize[1] = Chunk.dwSize - sizeof(FOURCC);
414       ListCount[1] = 0;
415       switch (Chunk.fccID) { 
416       case DMUS_FOURCC_SEGMENTS_LIST: {
417         TRACE_(dmfile)(": SEGMENTS list\n"); 
418         hr = IDirectMusicSegTriggerTrack_IPersistStream_ParseSegmentsList (iface, &Chunk, pStm);
419         if (FAILED(hr)) return hr;
420         break;
421       }
422       default: {
423         TRACE_(dmfile)(": unknown (skipping)\n");
424         liMove.QuadPart = Chunk.dwSize - sizeof(FOURCC);
425         IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
426         break;                                          
427       }
428       } 
429       break;
430     }
431     default: {
432       TRACE_(dmfile)(": unknown chunk (irrevelant & skipping)\n");
433       liMove.QuadPart = Chunk.dwSize;
434       IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
435       break;                                            
436     }
437     }
438     TRACE_(dmfile)(": ListCount[0] = %ld < ListSize[0] = %ld\n", ListCount[0], ListSize[0]);
439   } while (ListCount[0] < ListSize[0]);
440
441   return S_OK;
442 }
443
444 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IPersistStream_Load (LPPERSISTSTREAM iface, IStream* pStm) {
445   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
446
447   DMUS_PRIVATE_CHUNK Chunk;
448   LARGE_INTEGER liMove;
449   HRESULT hr;
450
451   TRACE("(%p, %p): Loading\n", This, pStm);
452   
453 #if 1
454   IStream_Read (pStm, &Chunk, sizeof(FOURCC)+sizeof(DWORD), NULL);
455   TRACE_(dmfile)(": %s chunk (size = %ld)", debugstr_fourcc (Chunk.fccID), Chunk.dwSize);
456   switch (Chunk.fccID) {        
457   case FOURCC_LIST: {
458     IStream_Read (pStm, &Chunk.fccID, sizeof(FOURCC), NULL);
459     TRACE_(dmfile)(": %s chunk (size = %ld)", debugstr_fourcc (Chunk.fccID), Chunk.dwSize);
460     switch (Chunk.fccID) {
461     case DMUS_FOURCC_SEGTRACK_LIST: {
462       TRACE_(dmfile)(": segment trigger track list\n");
463       hr = IDirectMusicSegTriggerTrack_IPersistStream_ParseSegTrackList (iface, &Chunk, pStm);
464       if (FAILED(hr)) return hr;
465       break;    
466     }
467     default: {
468       TRACE_(dmfile)(": unexpected chunk; loading failed)\n");
469       liMove.QuadPart = Chunk.dwSize;
470       IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL);
471       return E_FAIL;
472     }
473     }
474     TRACE_(dmfile)(": reading finished\n");
475     break;
476   }
477   default: {
478     TRACE_(dmfile)(": unexpected chunk; loading failed)\n");
479     liMove.QuadPart = Chunk.dwSize;
480     IStream_Seek (pStm, liMove, STREAM_SEEK_CUR, NULL); /* skip the rest of the chunk */
481     return E_FAIL;
482   }
483   }  
484 #endif
485
486   return S_OK;
487 }
488
489 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IPersistStream_Save (LPPERSISTSTREAM iface, IStream* pStm, BOOL fClearDirty) {
490   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
491   FIXME("(%p): Saving not implemented yet\n", This);
492   return E_NOTIMPL;
493 }
494
495 static HRESULT WINAPI IDirectMusicSegTriggerTrack_IPersistStream_GetSizeMax (LPPERSISTSTREAM iface, ULARGE_INTEGER* pcbSize) {
496   ICOM_THIS_MULTI(IDirectMusicSegTriggerTrack, PersistStreamVtbl, iface);
497   FIXME("(%p, %p): stub\n", This, pcbSize);
498   return E_NOTIMPL;
499 }
500
501 static const IPersistStreamVtbl DirectMusicSegTriggerTrack_PersistStream_Vtbl = {
502   IDirectMusicSegTriggerTrack_IPersistStream_QueryInterface,
503   IDirectMusicSegTriggerTrack_IPersistStream_AddRef,
504   IDirectMusicSegTriggerTrack_IPersistStream_Release,
505   IDirectMusicSegTriggerTrack_IPersistStream_GetClassID,
506   IDirectMusicSegTriggerTrack_IPersistStream_IsDirty,
507   IDirectMusicSegTriggerTrack_IPersistStream_Load,
508   IDirectMusicSegTriggerTrack_IPersistStream_Save,
509   IDirectMusicSegTriggerTrack_IPersistStream_GetSizeMax
510 };
511
512 /* for ClassFactory */
513 HRESULT WINAPI DMUSIC_CreateDirectMusicSegTriggerTrack (LPCGUID lpcGUID, LPVOID *ppobj, LPUNKNOWN pUnkOuter) {
514   IDirectMusicSegTriggerTrack* track;
515         
516   track = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusicSegTriggerTrack));
517   if (NULL == track) {
518     *ppobj = NULL;
519     return E_OUTOFMEMORY;
520   }
521   track->UnknownVtbl = &DirectMusicSegTriggerTrack_Unknown_Vtbl;
522   track->TrackVtbl = &DirectMusicSegTriggerTrack_Track_Vtbl;
523   track->PersistStreamVtbl = &DirectMusicSegTriggerTrack_PersistStream_Vtbl;
524   track->pDesc = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(DMUS_OBJECTDESC));
525   DM_STRUCT_INIT(track->pDesc);
526   track->pDesc->dwValidData |= DMUS_OBJ_CLASS;
527   memcpy (&track->pDesc->guidClass, &CLSID_DirectMusicSegTriggerTrack, sizeof (CLSID));
528   track->ref = 0; /* will be inited by QueryInterface */
529   list_init (&track->Items);
530
531   return IDirectMusicSegTriggerTrack_IUnknown_QueryInterface ((LPUNKNOWN)&track->UnknownVtbl, lpcGUID, ppobj);
532 }