Break out all the file related actions and helper functions into
[wine/multimedia.git] / dlls / dmscript / dmscript_main.c
blob908d7b8502f285947a820adaec19b9f7a2761bd0
1 /* DirectMusicScript Main
3 * Copyright (C) 2003-2004 Rok Mandeljc
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.
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.
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.
20 #include "dmscript_private.h"
22 WINE_DEFAULT_DEBUG_CHANNEL(dmscript);
24 LONG DMSCRIPT_refCount = 0;
26 typedef struct {
27 const IClassFactoryVtbl *lpVtbl;
28 } IClassFactoryImpl;
30 /******************************************************************
31 * DirectMusicScriptAutoImplSegment ClassFactory
33 static HRESULT WINAPI ScriptAutoImplSegmentCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
34 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
36 if (ppobj == NULL) return E_POINTER;
38 return E_NOINTERFACE;
41 static ULONG WINAPI ScriptAutoImplSegmentCF_AddRef(LPCLASSFACTORY iface) {
42 DMSCRIPT_LockModule();
44 return 2; /* non-heap based object */
47 static ULONG WINAPI ScriptAutoImplSegmentCF_Release(LPCLASSFACTORY iface) {
48 DMSCRIPT_UnlockModule();
50 return 1; /* non-heap based object */
53 static HRESULT WINAPI ScriptAutoImplSegmentCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
54 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
56 if (ppobj == NULL) return E_POINTER;
58 return E_NOINTERFACE;
61 static HRESULT WINAPI ScriptAutoImplSegmentCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
62 TRACE("(%d)\n", dolock);
64 if (dolock)
65 DMSCRIPT_LockModule();
66 else
67 DMSCRIPT_UnlockModule();
69 return S_OK;
72 static const IClassFactoryVtbl ScriptAutoImplSegmentCF_Vtbl = {
73 ScriptAutoImplSegmentCF_QueryInterface,
74 ScriptAutoImplSegmentCF_AddRef,
75 ScriptAutoImplSegmentCF_Release,
76 ScriptAutoImplSegmentCF_CreateInstance,
77 ScriptAutoImplSegmentCF_LockServer
80 static IClassFactoryImpl ScriptAutoImplSegment_CF = {&ScriptAutoImplSegmentCF_Vtbl};
82 /******************************************************************
83 * DirectMusicScriptTrack ClassFactory
85 static HRESULT WINAPI ScriptTrackCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
86 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
88 if (ppobj == NULL) return E_POINTER;
90 return E_NOINTERFACE;
93 static ULONG WINAPI ScriptTrackCF_AddRef(LPCLASSFACTORY iface) {
94 DMSCRIPT_LockModule();
96 return 2; /* non-heap based object */
99 static ULONG WINAPI ScriptTrackCF_Release(LPCLASSFACTORY iface) {
100 DMSCRIPT_UnlockModule();
102 return 1; /* non-heap based object */
105 static HRESULT WINAPI ScriptTrackCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
106 TRACE ("(%p, %s, %p)\n", pOuter, debugstr_dmguid(riid), ppobj);
107 return DMUSIC_CreateDirectMusicScriptTrack (riid, ppobj, pOuter);
110 static HRESULT WINAPI ScriptTrackCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
111 TRACE("(%d)\n", dolock);
113 if (dolock)
114 DMSCRIPT_LockModule();
115 else
116 DMSCRIPT_UnlockModule();
118 return S_OK;
121 static const IClassFactoryVtbl ScriptTrackCF_Vtbl = {
122 ScriptTrackCF_QueryInterface,
123 ScriptTrackCF_AddRef,
124 ScriptTrackCF_Release,
125 ScriptTrackCF_CreateInstance,
126 ScriptTrackCF_LockServer
129 static IClassFactoryImpl ScriptTrack_CF = {&ScriptTrackCF_Vtbl};
131 /******************************************************************
132 * DirectMusicAudioVBScript ClassFactory
134 static HRESULT WINAPI AudioVBScriptCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
135 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
137 if (ppobj == NULL) return E_POINTER;
139 return E_NOINTERFACE;
142 static ULONG WINAPI AudioVBScriptCF_AddRef(LPCLASSFACTORY iface) {
143 DMSCRIPT_LockModule();
145 return 2; /* non-heap based object */
148 static ULONG WINAPI AudioVBScriptCF_Release(LPCLASSFACTORY iface) {
149 DMSCRIPT_UnlockModule();
151 return 1; /* non-heap based object */
154 static HRESULT WINAPI AudioVBScriptCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
155 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
157 if (ppobj == NULL) return E_POINTER;
159 return E_NOINTERFACE;
162 static HRESULT WINAPI AudioVBScriptCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
163 TRACE("(%d)\n", dolock);
165 if (dolock)
166 DMSCRIPT_LockModule();
167 else
168 DMSCRIPT_UnlockModule();
170 return S_OK;
173 static const IClassFactoryVtbl AudioVBScriptCF_Vtbl = {
174 AudioVBScriptCF_QueryInterface,
175 AudioVBScriptCF_AddRef,
176 AudioVBScriptCF_Release,
177 AudioVBScriptCF_CreateInstance,
178 AudioVBScriptCF_LockServer
181 static IClassFactoryImpl AudioVBScript_CF = {&AudioVBScriptCF_Vtbl};
183 /******************************************************************
184 * DirectMusicScript ClassFactory
186 static HRESULT WINAPI ScriptCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
187 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
189 if (ppobj == NULL) return E_POINTER;
191 return E_NOINTERFACE;
194 static ULONG WINAPI ScriptCF_AddRef(LPCLASSFACTORY iface) {
195 DMSCRIPT_LockModule();
197 return 2; /* non-heap based object */
200 static ULONG WINAPI ScriptCF_Release(LPCLASSFACTORY iface) {
201 DMSCRIPT_UnlockModule();
203 return 1; /* non-heap based object */
206 static HRESULT WINAPI ScriptCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
207 TRACE ("(%p, %s, %p)\n", pOuter, debugstr_dmguid(riid), ppobj);
209 return DMUSIC_CreateDirectMusicScriptImpl (riid, ppobj, pOuter);
212 static HRESULT WINAPI ScriptCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
213 TRACE("(%d)\n", dolock);
215 if (dolock)
216 DMSCRIPT_LockModule();
217 else
218 DMSCRIPT_UnlockModule();
220 return S_OK;
223 static const IClassFactoryVtbl ScriptCF_Vtbl = {
224 ScriptCF_QueryInterface,
225 ScriptCF_AddRef,
226 ScriptCF_Release,
227 ScriptCF_CreateInstance,
228 ScriptCF_LockServer
231 static IClassFactoryImpl Script_CF = {&ScriptCF_Vtbl};
233 /******************************************************************
234 * DirectMusicScriptAutoImplPerformance ClassFactory
236 static HRESULT WINAPI ScriptAutoImplPerformanceCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
237 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
239 if (ppobj == NULL) return E_POINTER;
241 return E_NOINTERFACE;
244 static ULONG WINAPI ScriptAutoImplPerformanceCF_AddRef(LPCLASSFACTORY iface) {
245 DMSCRIPT_LockModule();
247 return 2; /* non-heap based object */
250 static ULONG WINAPI ScriptAutoImplPerformanceCF_Release(LPCLASSFACTORY iface) {
251 DMSCRIPT_UnlockModule();
253 return 1; /* non-heap based object */
256 static HRESULT WINAPI ScriptAutoImplPerformanceCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
257 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
259 if (ppobj == NULL) return E_POINTER;
261 return E_NOINTERFACE;
264 static HRESULT WINAPI ScriptAutoImplPerformanceCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
265 TRACE("(%d)\n", dolock);
267 if (dolock)
268 DMSCRIPT_LockModule();
269 else
270 DMSCRIPT_UnlockModule();
272 return S_OK;
275 static const IClassFactoryVtbl ScriptAutoImplPerformanceCF_Vtbl = {
276 ScriptAutoImplPerformanceCF_QueryInterface,
277 ScriptAutoImplPerformanceCF_AddRef,
278 ScriptAutoImplPerformanceCF_Release,
279 ScriptAutoImplPerformanceCF_CreateInstance,
280 ScriptAutoImplPerformanceCF_LockServer
283 static IClassFactoryImpl ScriptAutoImplPerformance_CF = {&ScriptAutoImplPerformanceCF_Vtbl};
285 /******************************************************************
286 * DirectMusicScriptSourceCodeLoader ClassFactory
288 static HRESULT WINAPI ScriptSourceCodeLoaderCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
289 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
291 if (ppobj == NULL) return E_POINTER;
293 return E_NOINTERFACE;
296 static ULONG WINAPI ScriptSourceCodeLoaderCF_AddRef(LPCLASSFACTORY iface) {
297 DMSCRIPT_LockModule();
299 return 2; /* non-heap based object */
302 static ULONG WINAPI ScriptSourceCodeLoaderCF_Release(LPCLASSFACTORY iface) {
303 DMSCRIPT_UnlockModule();
305 return 1; /* non-heap based object */
308 static HRESULT WINAPI ScriptSourceCodeLoaderCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
309 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
311 if (ppobj == NULL) return E_POINTER;
313 return E_NOINTERFACE;
316 static HRESULT WINAPI ScriptSourceCodeLoaderCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
317 TRACE("(%d)\n", dolock);
319 if (dolock)
320 DMSCRIPT_LockModule();
321 else
322 DMSCRIPT_UnlockModule();
324 return S_OK;
327 static const IClassFactoryVtbl ScriptSourceCodeLoaderCF_Vtbl = {
328 ScriptSourceCodeLoaderCF_QueryInterface,
329 ScriptSourceCodeLoaderCF_AddRef,
330 ScriptSourceCodeLoaderCF_Release,
331 ScriptSourceCodeLoaderCF_CreateInstance,
332 ScriptSourceCodeLoaderCF_LockServer
335 static IClassFactoryImpl ScriptSourceCodeLoader_CF = {&ScriptSourceCodeLoaderCF_Vtbl};
337 /******************************************************************
338 * DirectMusicScriptAutoImplSegmentState ClassFactory
340 static HRESULT WINAPI ScriptAutoImplSegmentStateCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
341 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
343 if (ppobj == NULL) return E_POINTER;
345 return E_NOINTERFACE;
348 static ULONG WINAPI ScriptAutoImplSegmentStateCF_AddRef(LPCLASSFACTORY iface) {
349 DMSCRIPT_LockModule();
351 return 2; /* non-heap based object */
354 static ULONG WINAPI ScriptAutoImplSegmentStateCF_Release(LPCLASSFACTORY iface) {
355 DMSCRIPT_UnlockModule();
357 return 1; /* non-heap based object */
360 static HRESULT WINAPI ScriptAutoImplSegmentStateCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
361 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
363 if (ppobj == NULL) return E_POINTER;
365 return E_NOINTERFACE;
368 static HRESULT WINAPI ScriptAutoImplSegmentStateCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
369 TRACE("(%d)\n", dolock);
371 if (dolock)
372 DMSCRIPT_LockModule();
373 else
374 DMSCRIPT_UnlockModule();
376 return S_OK;
379 static const IClassFactoryVtbl ScriptAutoImplSegmentStateCF_Vtbl = {
380 ScriptAutoImplSegmentStateCF_QueryInterface,
381 ScriptAutoImplSegmentStateCF_AddRef,
382 ScriptAutoImplSegmentStateCF_Release,
383 ScriptAutoImplSegmentStateCF_CreateInstance,
384 ScriptAutoImplSegmentStateCF_LockServer
387 static IClassFactoryImpl ScriptAutoImplSegmentState_CF = {&ScriptAutoImplSegmentStateCF_Vtbl};
389 /******************************************************************
390 * DirectMusicScriptAutoImplAudioPathConfig ClassFactory
392 static HRESULT WINAPI ScriptAutoImplAudioPathConfigCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
393 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
395 if (ppobj == NULL) return E_POINTER;
397 return E_NOINTERFACE;
400 static ULONG WINAPI ScriptAutoImplAudioPathConfigCF_AddRef(LPCLASSFACTORY iface) {
401 DMSCRIPT_LockModule();
403 return 2; /* non-heap based object */
406 static ULONG WINAPI ScriptAutoImplAudioPathConfigCF_Release(LPCLASSFACTORY iface) {
407 DMSCRIPT_UnlockModule();
409 return 1; /* non-heap based object */
412 static HRESULT WINAPI ScriptAutoImplAudioPathConfigCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
413 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
415 if (ppobj == NULL) return E_POINTER;
417 return E_NOINTERFACE;
420 static HRESULT WINAPI ScriptAutoImplAudioPathConfigCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
421 TRACE("(%d)\n", dolock);
423 if (dolock)
424 DMSCRIPT_LockModule();
425 else
426 DMSCRIPT_UnlockModule();
428 return S_OK;
431 static const IClassFactoryVtbl ScriptAutoImplAudioPathConfigCF_Vtbl = {
432 ScriptAutoImplAudioPathConfigCF_QueryInterface,
433 ScriptAutoImplAudioPathConfigCF_AddRef,
434 ScriptAutoImplAudioPathConfigCF_Release,
435 ScriptAutoImplAudioPathConfigCF_CreateInstance,
436 ScriptAutoImplAudioPathConfigCF_LockServer
439 static IClassFactoryImpl ScriptAutoImplAudioPathConfig_CF = {&ScriptAutoImplAudioPathConfigCF_Vtbl};
441 /******************************************************************
442 * DirectMusicScriptAutoImplAudioPath ClassFactory
444 static HRESULT WINAPI ScriptAutoImplAudioPathCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
445 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
447 if (ppobj == NULL) return E_POINTER;
449 return E_NOINTERFACE;
452 static ULONG WINAPI ScriptAutoImplAudioPathCF_AddRef(LPCLASSFACTORY iface) {
453 DMSCRIPT_LockModule();
455 return 2; /* non-heap based object */
458 static ULONG WINAPI ScriptAutoImplAudioPathCF_Release(LPCLASSFACTORY iface) {
459 DMSCRIPT_UnlockModule();
461 return 1; /* non-heap based object */
464 static HRESULT WINAPI ScriptAutoImplAudioPathCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
465 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
467 if (ppobj == NULL) return E_POINTER;
469 return E_NOINTERFACE;
472 static HRESULT WINAPI ScriptAutoImplAudioPathCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
473 TRACE("(%d)\n", dolock);
475 if (dolock)
476 DMSCRIPT_LockModule();
477 else
478 DMSCRIPT_UnlockModule();
480 return S_OK;
483 static const IClassFactoryVtbl ScriptAutoImplAudioPathCF_Vtbl = {
484 ScriptAutoImplAudioPathCF_QueryInterface,
485 ScriptAutoImplAudioPathCF_AddRef,
486 ScriptAutoImplAudioPathCF_Release,
487 ScriptAutoImplAudioPathCF_CreateInstance,
488 ScriptAutoImplAudioPathCF_LockServer
491 static IClassFactoryImpl ScriptAutoImplAudioPath_CF = {&ScriptAutoImplAudioPathCF_Vtbl};
493 /******************************************************************
494 * DirectMusicScriptAutoImplSong ClassFactory
496 static HRESULT WINAPI ScriptAutoImplSongCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
497 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
499 if (ppobj == NULL) return E_POINTER;
501 return E_NOINTERFACE;
504 static ULONG WINAPI ScriptAutoImplSongCF_AddRef(LPCLASSFACTORY iface) {
505 DMSCRIPT_LockModule();
507 return 2; /* non-heap based */
510 static ULONG WINAPI ScriptAutoImplSongCF_Release(LPCLASSFACTORY iface) {
511 DMSCRIPT_UnlockModule();
513 return 1; /* non-heap based object */
516 static HRESULT WINAPI ScriptAutoImplSongCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj) {
517 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
519 if (ppobj == NULL) return E_POINTER;
521 return E_NOINTERFACE;
524 static HRESULT WINAPI ScriptAutoImplSongCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
525 TRACE("(%d)\n", dolock);
527 if (dolock)
528 DMSCRIPT_LockModule();
529 else
530 DMSCRIPT_UnlockModule();
532 return S_OK;
535 static const IClassFactoryVtbl ScriptAutoImplSongCF_Vtbl = {
536 ScriptAutoImplSongCF_QueryInterface,
537 ScriptAutoImplSongCF_AddRef,
538 ScriptAutoImplSongCF_Release,
539 ScriptAutoImplSongCF_CreateInstance,
540 ScriptAutoImplSongCF_LockServer
543 static IClassFactoryImpl ScriptAutoImplSong_CF = {&ScriptAutoImplSongCF_Vtbl};
545 /******************************************************************
546 * DllMain
550 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) {
551 if (fdwReason == DLL_PROCESS_ATTACH) {
552 DisableThreadLibraryCalls(hinstDLL);
553 /* FIXME: Initialisation */
554 } else if (fdwReason == DLL_PROCESS_DETACH) {
555 /* FIXME: Cleanup */
558 return TRUE;
562 /******************************************************************
563 * DllCanUnloadNow (DMSCRIPT.1)
567 HRESULT WINAPI DMSCRIPT_DllCanUnloadNow(void) {
568 return DMSCRIPT_refCount != 0 ? S_FALSE : S_OK;
572 /******************************************************************
573 * DllGetClassObject (DMSCRIPT.2)
577 HRESULT WINAPI DMSCRIPT_DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv) {
578 TRACE("(%s, %s, %p)\n", debugstr_dmguid(rclsid), debugstr_dmguid(riid), ppv);
579 if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpSegment) && IsEqualIID (riid, &IID_IClassFactory)) {
580 *ppv = (LPVOID) &ScriptAutoImplSegment_CF;
581 IClassFactory_AddRef((IClassFactory*)*ppv);
582 return S_OK;
583 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptTrack) && IsEqualIID (riid, &IID_IClassFactory)) {
584 *ppv = (LPVOID) &ScriptTrack_CF;
585 IClassFactory_AddRef((IClassFactory*)*ppv);
586 return S_OK;
587 } else if (IsEqualCLSID (rclsid, &CLSID_AudioVBScript) && IsEqualIID (riid, &IID_IClassFactory)) {
588 *ppv = (LPVOID) &AudioVBScript_CF;
589 IClassFactory_AddRef((IClassFactory*)*ppv);
590 return S_OK;
591 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScript) && IsEqualIID (riid, &IID_IClassFactory)) {
592 *ppv = (LPVOID) &Script_CF;
593 IClassFactory_AddRef((IClassFactory*)*ppv);
594 return S_OK;
595 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpPerformance) && IsEqualIID (riid, &IID_IClassFactory)) {
596 *ppv = (LPVOID) &ScriptAutoImplPerformance_CF;
597 IClassFactory_AddRef((IClassFactory*)*ppv);
598 return S_OK;
599 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptSourceCodeLoader) && IsEqualIID (riid, &IID_IClassFactory)) {
600 *ppv = (LPVOID) &ScriptSourceCodeLoader_CF;
601 IClassFactory_AddRef((IClassFactory*)*ppv);
602 return S_OK;
603 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpSegmentState) && IsEqualIID (riid, &IID_IClassFactory)) {
604 *ppv = (LPVOID) &ScriptAutoImplSegmentState_CF;
605 IClassFactory_AddRef((IClassFactory*)*ppv);
606 return S_OK;
607 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpAudioPathConfig) && IsEqualIID (riid, &IID_IClassFactory)) {
608 *ppv = (LPVOID) &ScriptAutoImplAudioPathConfig_CF;
609 IClassFactory_AddRef((IClassFactory*)*ppv);
610 return S_OK;
611 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpAudioPath) && IsEqualIID (riid, &IID_IClassFactory)) {
612 *ppv = (LPVOID) &ScriptAutoImplAudioPath_CF;
613 IClassFactory_AddRef((IClassFactory*)*ppv);
614 return S_OK;
615 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpSong) && IsEqualIID (riid, &IID_IClassFactory)) {
616 *ppv = (LPVOID) &ScriptAutoImplSong_CF;
617 IClassFactory_AddRef((IClassFactory*)*ppv);
618 return S_OK;
621 WARN("(%s, %s, %p): no interface found.\n", debugstr_dmguid(rclsid), debugstr_dmguid(riid), ppv);
622 return CLASS_E_CLASSNOTAVAILABLE;
626 /******************************************************************
627 * Helper functions
631 /* check whether the given DWORD is even (return 0) or odd (return 1) */
632 int even_or_odd (DWORD number) {
633 return (number & 0x1); /* basically, check if bit 0 is set ;) */
636 /* FOURCC to string conversion for debug messages */
637 const char *debugstr_fourcc (DWORD fourcc) {
638 if (!fourcc) return "'null'";
639 return wine_dbg_sprintf ("\'%c%c%c%c\'",
640 (char)(fourcc), (char)(fourcc >> 8),
641 (char)(fourcc >> 16), (char)(fourcc >> 24));
644 /* DMUS_VERSION struct to string conversion for debug messages */
645 const char *debugstr_dmversion (LPDMUS_VERSION version) {
646 if (!version) return "'null'";
647 return wine_dbg_sprintf ("\'%i,%i,%i,%i\'",
648 (int)((version->dwVersionMS && 0xFFFF0000) >> 8), (int)(version->dwVersionMS && 0x0000FFFF),
649 (int)((version->dwVersionLS && 0xFFFF0000) >> 8), (int)(version->dwVersionLS && 0x0000FFFF));
652 /* returns name of given GUID */
653 const char *debugstr_dmguid (const GUID *id) {
654 static const guid_info guids[] = {
655 /* CLSIDs */
656 GE(CLSID_AudioVBScript),
657 GE(CLSID_DirectMusic),
658 GE(CLSID_DirectMusicAudioPath),
659 GE(CLSID_DirectMusicAudioPathConfig),
660 GE(CLSID_DirectMusicAuditionTrack),
661 GE(CLSID_DirectMusicBand),
662 GE(CLSID_DirectMusicBandTrack),
663 GE(CLSID_DirectMusicChordMapTrack),
664 GE(CLSID_DirectMusicChordMap),
665 GE(CLSID_DirectMusicChordTrack),
666 GE(CLSID_DirectMusicCollection),
667 GE(CLSID_DirectMusicCommandTrack),
668 GE(CLSID_DirectMusicComposer),
669 GE(CLSID_DirectMusicContainer),
670 GE(CLSID_DirectMusicGraph),
671 GE(CLSID_DirectMusicLoader),
672 GE(CLSID_DirectMusicLyricsTrack),
673 GE(CLSID_DirectMusicMarkerTrack),
674 GE(CLSID_DirectMusicMelodyFormulationTrack),
675 GE(CLSID_DirectMusicMotifTrack),
676 GE(CLSID_DirectMusicMuteTrack),
677 GE(CLSID_DirectMusicParamControlTrack),
678 GE(CLSID_DirectMusicPatternTrack),
679 GE(CLSID_DirectMusicPerformance),
680 GE(CLSID_DirectMusicScript),
681 GE(CLSID_DirectMusicScriptAutoImpSegment),
682 GE(CLSID_DirectMusicScriptAutoImpPerformance),
683 GE(CLSID_DirectMusicScriptAutoImpSegmentState),
684 GE(CLSID_DirectMusicScriptAutoImpAudioPathConfig),
685 GE(CLSID_DirectMusicScriptAutoImpAudioPath),
686 GE(CLSID_DirectMusicScriptAutoImpSong),
687 GE(CLSID_DirectMusicScriptSourceCodeLoader),
688 GE(CLSID_DirectMusicScriptTrack),
689 GE(CLSID_DirectMusicSection),
690 GE(CLSID_DirectMusicSegment),
691 GE(CLSID_DirectMusicSegmentState),
692 GE(CLSID_DirectMusicSegmentTriggerTrack),
693 GE(CLSID_DirectMusicSegTriggerTrack),
694 GE(CLSID_DirectMusicSeqTrack),
695 GE(CLSID_DirectMusicSignPostTrack),
696 GE(CLSID_DirectMusicSong),
697 GE(CLSID_DirectMusicStyle),
698 GE(CLSID_DirectMusicStyleTrack),
699 GE(CLSID_DirectMusicSynth),
700 GE(CLSID_DirectMusicSynthSink),
701 GE(CLSID_DirectMusicSysExTrack),
702 GE(CLSID_DirectMusicTemplate),
703 GE(CLSID_DirectMusicTempoTrack),
704 GE(CLSID_DirectMusicTimeSigTrack),
705 GE(CLSID_DirectMusicWaveTrack),
706 GE(CLSID_DirectSoundWave),
707 /* IIDs */
708 GE(IID_IDirectMusic),
709 GE(IID_IDirectMusic2),
710 GE(IID_IDirectMusic8),
711 GE(IID_IDirectMusicAudioPath),
712 GE(IID_IDirectMusicBand),
713 GE(IID_IDirectMusicBuffer),
714 GE(IID_IDirectMusicChordMap),
715 GE(IID_IDirectMusicCollection),
716 GE(IID_IDirectMusicComposer),
717 GE(IID_IDirectMusicContainer),
718 GE(IID_IDirectMusicDownload),
719 GE(IID_IDirectMusicDownloadedInstrument),
720 GE(IID_IDirectMusicGetLoader),
721 GE(IID_IDirectMusicGraph),
722 GE(IID_IDirectMusicInstrument),
723 GE(IID_IDirectMusicLoader),
724 GE(IID_IDirectMusicLoader8),
725 GE(IID_IDirectMusicObject),
726 GE(IID_IDirectMusicPatternTrack),
727 GE(IID_IDirectMusicPerformance),
728 GE(IID_IDirectMusicPerformance2),
729 GE(IID_IDirectMusicPerformance8),
730 GE(IID_IDirectMusicPort),
731 GE(IID_IDirectMusicPortDownload),
732 GE(IID_IDirectMusicScript),
733 GE(IID_IDirectMusicSegment),
734 GE(IID_IDirectMusicSegment2),
735 GE(IID_IDirectMusicSegment8),
736 GE(IID_IDirectMusicSegmentState),
737 GE(IID_IDirectMusicSegmentState8),
738 GE(IID_IDirectMusicStyle),
739 GE(IID_IDirectMusicStyle8),
740 GE(IID_IDirectMusicSynth),
741 GE(IID_IDirectMusicSynth8),
742 GE(IID_IDirectMusicSynthSink),
743 GE(IID_IDirectMusicThru),
744 GE(IID_IDirectMusicTool),
745 GE(IID_IDirectMusicTool8),
746 GE(IID_IDirectMusicTrack),
747 GE(IID_IDirectMusicTrack8),
748 GE(IID_IUnknown),
749 GE(IID_IPersistStream),
750 GE(IID_IStream),
751 GE(IID_IClassFactory),
752 /* GUIDs */
753 GE(GUID_DirectMusicAllTypes),
754 GE(GUID_NOTIFICATION_CHORD),
755 GE(GUID_NOTIFICATION_COMMAND),
756 GE(GUID_NOTIFICATION_MEASUREANDBEAT),
757 GE(GUID_NOTIFICATION_PERFORMANCE),
758 GE(GUID_NOTIFICATION_RECOMPOSE),
759 GE(GUID_NOTIFICATION_SEGMENT),
760 GE(GUID_BandParam),
761 GE(GUID_ChordParam),
762 GE(GUID_CommandParam),
763 GE(GUID_CommandParam2),
764 GE(GUID_CommandParamNext),
765 GE(GUID_IDirectMusicBand),
766 GE(GUID_IDirectMusicChordMap),
767 GE(GUID_IDirectMusicStyle),
768 GE(GUID_MuteParam),
769 GE(GUID_Play_Marker),
770 GE(GUID_RhythmParam),
771 GE(GUID_TempoParam),
772 GE(GUID_TimeSignature),
773 GE(GUID_Valid_Start_Time),
774 GE(GUID_Clear_All_Bands),
775 GE(GUID_ConnectToDLSCollection),
776 GE(GUID_Disable_Auto_Download),
777 GE(GUID_DisableTempo),
778 GE(GUID_DisableTimeSig),
779 GE(GUID_Download),
780 GE(GUID_DownloadToAudioPath),
781 GE(GUID_Enable_Auto_Download),
782 GE(GUID_EnableTempo),
783 GE(GUID_EnableTimeSig),
784 GE(GUID_IgnoreBankSelectForGM),
785 GE(GUID_SeedVariations),
786 GE(GUID_StandardMIDIFile),
787 GE(GUID_Unload),
788 GE(GUID_UnloadFromAudioPath),
789 GE(GUID_Variations),
790 GE(GUID_PerfMasterTempo),
791 GE(GUID_PerfMasterVolume),
792 GE(GUID_PerfMasterGrooveLevel),
793 GE(GUID_PerfAutoDownload),
794 GE(GUID_DefaultGMCollection),
795 GE(GUID_Synth_Default),
796 GE(GUID_Buffer_Reverb),
797 GE(GUID_Buffer_EnvReverb),
798 GE(GUID_Buffer_Stereo),
799 GE(GUID_Buffer_3D_Dry),
800 GE(GUID_Buffer_Mono),
801 GE(GUID_DMUS_PROP_GM_Hardware),
802 GE(GUID_DMUS_PROP_GS_Capable),
803 GE(GUID_DMUS_PROP_GS_Hardware),
804 GE(GUID_DMUS_PROP_DLS1),
805 GE(GUID_DMUS_PROP_DLS2),
806 GE(GUID_DMUS_PROP_Effects),
807 GE(GUID_DMUS_PROP_INSTRUMENT2),
808 GE(GUID_DMUS_PROP_LegacyCaps),
809 GE(GUID_DMUS_PROP_MemorySize),
810 GE(GUID_DMUS_PROP_SampleMemorySize),
811 GE(GUID_DMUS_PROP_SamplePlaybackRate),
812 GE(GUID_DMUS_PROP_SetSynthSink),
813 GE(GUID_DMUS_PROP_SinkUsesDSound),
814 GE(GUID_DMUS_PROP_SynthSink_DSOUND),
815 GE(GUID_DMUS_PROP_SynthSink_WAVE),
816 GE(GUID_DMUS_PROP_Volume),
817 GE(GUID_DMUS_PROP_WavesReverb),
818 GE(GUID_DMUS_PROP_WriteLatency),
819 GE(GUID_DMUS_PROP_WritePeriod),
820 GE(GUID_DMUS_PROP_XG_Capable),
821 GE(GUID_DMUS_PROP_XG_Hardware)
824 unsigned int i;
826 if (!id) return "(null)";
828 for (i = 0; i < sizeof(guids)/sizeof(guids[0]); i++) {
829 if (IsEqualGUID(id, &guids[i].guid))
830 return guids[i].name;
832 /* if we didn't find it, act like standard debugstr_guid */
833 return debugstr_guid(id);
836 /* returns name of given error code */
837 const char *debugstr_dmreturn (DWORD code) {
838 static const flag_info codes[] = {
839 FE(S_OK),
840 FE(S_FALSE),
841 FE(DMUS_S_PARTIALLOAD),
842 FE(DMUS_S_PARTIALDOWNLOAD),
843 FE(DMUS_S_REQUEUE),
844 FE(DMUS_S_FREE),
845 FE(DMUS_S_END),
846 FE(DMUS_S_STRING_TRUNCATED),
847 FE(DMUS_S_LAST_TOOL),
848 FE(DMUS_S_OVER_CHORD),
849 FE(DMUS_S_UP_OCTAVE),
850 FE(DMUS_S_DOWN_OCTAVE),
851 FE(DMUS_S_NOBUFFERCONTROL),
852 FE(DMUS_S_GARBAGE_COLLECTED),
853 FE(DMUS_E_DRIVER_FAILED),
854 FE(DMUS_E_PORTS_OPEN),
855 FE(DMUS_E_DEVICE_IN_USE),
856 FE(DMUS_E_INSUFFICIENTBUFFER),
857 FE(DMUS_E_BUFFERNOTSET),
858 FE(DMUS_E_BUFFERNOTAVAILABLE),
859 FE(DMUS_E_NOTADLSCOL),
860 FE(DMUS_E_INVALIDOFFSET),
861 FE(DMUS_E_ALREADY_LOADED),
862 FE(DMUS_E_INVALIDPOS),
863 FE(DMUS_E_INVALIDPATCH),
864 FE(DMUS_E_CANNOTSEEK),
865 FE(DMUS_E_CANNOTWRITE),
866 FE(DMUS_E_CHUNKNOTFOUND),
867 FE(DMUS_E_INVALID_DOWNLOADID),
868 FE(DMUS_E_NOT_DOWNLOADED_TO_PORT),
869 FE(DMUS_E_ALREADY_DOWNLOADED),
870 FE(DMUS_E_UNKNOWN_PROPERTY),
871 FE(DMUS_E_SET_UNSUPPORTED),
872 FE(DMUS_E_GET_UNSUPPORTED),
873 FE(DMUS_E_NOTMONO),
874 FE(DMUS_E_BADARTICULATION),
875 FE(DMUS_E_BADINSTRUMENT),
876 FE(DMUS_E_BADWAVELINK),
877 FE(DMUS_E_NOARTICULATION),
878 FE(DMUS_E_NOTPCM),
879 FE(DMUS_E_BADWAVE),
880 FE(DMUS_E_BADOFFSETTABLE),
881 FE(DMUS_E_UNKNOWNDOWNLOAD),
882 FE(DMUS_E_NOSYNTHSINK),
883 FE(DMUS_E_ALREADYOPEN),
884 FE(DMUS_E_ALREADYCLOSED),
885 FE(DMUS_E_SYNTHNOTCONFIGURED),
886 FE(DMUS_E_SYNTHACTIVE),
887 FE(DMUS_E_CANNOTREAD),
888 FE(DMUS_E_DMUSIC_RELEASED),
889 FE(DMUS_E_BUFFER_EMPTY),
890 FE(DMUS_E_BUFFER_FULL),
891 FE(DMUS_E_PORT_NOT_CAPTURE),
892 FE(DMUS_E_PORT_NOT_RENDER),
893 FE(DMUS_E_DSOUND_NOT_SET),
894 FE(DMUS_E_ALREADY_ACTIVATED),
895 FE(DMUS_E_INVALIDBUFFER),
896 FE(DMUS_E_WAVEFORMATNOTSUPPORTED),
897 FE(DMUS_E_SYNTHINACTIVE),
898 FE(DMUS_E_DSOUND_ALREADY_SET),
899 FE(DMUS_E_INVALID_EVENT),
900 FE(DMUS_E_UNSUPPORTED_STREAM),
901 FE(DMUS_E_ALREADY_INITED),
902 FE(DMUS_E_INVALID_BAND),
903 FE(DMUS_E_TRACK_HDR_NOT_FIRST_CK),
904 FE(DMUS_E_TOOL_HDR_NOT_FIRST_CK),
905 FE(DMUS_E_INVALID_TRACK_HDR),
906 FE(DMUS_E_INVALID_TOOL_HDR),
907 FE(DMUS_E_ALL_TOOLS_FAILED),
908 FE(DMUS_E_ALL_TRACKS_FAILED),
909 FE(DMUS_E_NOT_FOUND),
910 FE(DMUS_E_NOT_INIT),
911 FE(DMUS_E_TYPE_DISABLED),
912 FE(DMUS_E_TYPE_UNSUPPORTED),
913 FE(DMUS_E_TIME_PAST),
914 FE(DMUS_E_TRACK_NOT_FOUND),
915 FE(DMUS_E_TRACK_NO_CLOCKTIME_SUPPORT),
916 FE(DMUS_E_NO_MASTER_CLOCK),
917 FE(DMUS_E_LOADER_NOCLASSID),
918 FE(DMUS_E_LOADER_BADPATH),
919 FE(DMUS_E_LOADER_FAILEDOPEN),
920 FE(DMUS_E_LOADER_FORMATNOTSUPPORTED),
921 FE(DMUS_E_LOADER_FAILEDCREATE),
922 FE(DMUS_E_LOADER_OBJECTNOTFOUND),
923 FE(DMUS_E_LOADER_NOFILENAME),
924 FE(DMUS_E_INVALIDFILE),
925 FE(DMUS_E_ALREADY_EXISTS),
926 FE(DMUS_E_OUT_OF_RANGE),
927 FE(DMUS_E_SEGMENT_INIT_FAILED),
928 FE(DMUS_E_ALREADY_SENT),
929 FE(DMUS_E_CANNOT_FREE),
930 FE(DMUS_E_CANNOT_OPEN_PORT),
931 FE(DMUS_E_CANNOT_CONVERT),
932 FE(DMUS_E_DESCEND_CHUNK_FAIL),
933 FE(DMUS_E_NOT_LOADED),
934 FE(DMUS_E_SCRIPT_LANGUAGE_INCOMPATIBLE),
935 FE(DMUS_E_SCRIPT_UNSUPPORTED_VARTYPE),
936 FE(DMUS_E_SCRIPT_ERROR_IN_SCRIPT),
937 FE(DMUS_E_SCRIPT_CANTLOAD_OLEAUT32),
938 FE(DMUS_E_SCRIPT_LOADSCRIPT_ERROR),
939 FE(DMUS_E_SCRIPT_INVALID_FILE),
940 FE(DMUS_E_INVALID_SCRIPTTRACK),
941 FE(DMUS_E_SCRIPT_VARIABLE_NOT_FOUND),
942 FE(DMUS_E_SCRIPT_ROUTINE_NOT_FOUND),
943 FE(DMUS_E_SCRIPT_CONTENT_READONLY),
944 FE(DMUS_E_SCRIPT_NOT_A_REFERENCE),
945 FE(DMUS_E_SCRIPT_VALUE_NOT_SUPPORTED),
946 FE(DMUS_E_INVALID_SEGMENTTRIGGERTRACK),
947 FE(DMUS_E_INVALID_LYRICSTRACK),
948 FE(DMUS_E_INVALID_PARAMCONTROLTRACK),
949 FE(DMUS_E_AUDIOVBSCRIPT_SYNTAXERROR),
950 FE(DMUS_E_AUDIOVBSCRIPT_RUNTIMEERROR),
951 FE(DMUS_E_AUDIOVBSCRIPT_OPERATIONFAILURE),
952 FE(DMUS_E_AUDIOPATHS_NOT_VALID),
953 FE(DMUS_E_AUDIOPATHS_IN_USE),
954 FE(DMUS_E_NO_AUDIOPATH_CONFIG),
955 FE(DMUS_E_AUDIOPATH_INACTIVE),
956 FE(DMUS_E_AUDIOPATH_NOBUFFER),
957 FE(DMUS_E_AUDIOPATH_NOPORT),
958 FE(DMUS_E_NO_AUDIOPATH),
959 FE(DMUS_E_INVALIDCHUNK),
960 FE(DMUS_E_AUDIOPATH_NOGLOBALFXBUFFER),
961 FE(DMUS_E_INVALID_CONTAINER_OBJECT)
963 unsigned int i;
964 for (i = 0; i < sizeof(codes)/sizeof(codes[0]); i++) {
965 if (code == codes[i].val)
966 return codes[i].name;
968 /* if we didn't find it, return value */
969 return wine_dbg_sprintf("0x%08lx", code);
972 /* generic flag-dumping function */
973 const char* debugstr_flags (DWORD flags, const flag_info* names, size_t num_names){
974 char buffer[128] = "", *ptr = &buffer[0];
975 unsigned int i, size = sizeof(buffer);
977 for (i=0; i < num_names; i++)
979 if ((flags & names[i].val) || /* standard flag*/
980 ((!flags) && (!names[i].val))) { /* zero value only */
981 int cnt = snprintf(ptr, size, "%s ", names[i].name);
982 if (cnt < 0 || cnt >= size) break;
983 size -= cnt;
984 ptr += cnt;
988 return wine_dbg_sprintf("%s", buffer);
991 /* dump DMUS_OBJ flags */
992 const char *debugstr_DMUS_OBJ_FLAGS (DWORD flagmask) {
993 static const flag_info flags[] = {
994 FE(DMUS_OBJ_OBJECT),
995 FE(DMUS_OBJ_CLASS),
996 FE(DMUS_OBJ_NAME),
997 FE(DMUS_OBJ_CATEGORY),
998 FE(DMUS_OBJ_FILENAME),
999 FE(DMUS_OBJ_FULLPATH),
1000 FE(DMUS_OBJ_URL),
1001 FE(DMUS_OBJ_VERSION),
1002 FE(DMUS_OBJ_DATE),
1003 FE(DMUS_OBJ_LOADED),
1004 FE(DMUS_OBJ_MEMORY),
1005 FE(DMUS_OBJ_STREAM)
1007 return debugstr_flags (flagmask, flags, sizeof(flags)/sizeof(flags[0]));
1010 /* dump whole DMUS_OBJECTDESC struct */
1011 const char *debugstr_DMUS_OBJECTDESC (LPDMUS_OBJECTDESC pDesc) {
1012 if (pDesc) {
1013 char buffer[1024] = "", *ptr = &buffer[0];
1015 ptr += sprintf(ptr, "DMUS_OBJECTDESC (%p):\n", pDesc);
1016 ptr += sprintf(ptr, " - dwSize = %ld\n", pDesc->dwSize);
1017 ptr += sprintf(ptr, " - dwValidData = %s\n", debugstr_DMUS_OBJ_FLAGS (pDesc->dwValidData));
1018 if (pDesc->dwValidData & DMUS_OBJ_CLASS) ptr += sprintf(ptr, " - guidClass = %s\n", debugstr_dmguid(&pDesc->guidClass));
1019 if (pDesc->dwValidData & DMUS_OBJ_OBJECT) ptr += sprintf(ptr, " - guidObject = %s\n", debugstr_guid(&pDesc->guidObject));
1020 if (pDesc->dwValidData & DMUS_OBJ_DATE) ptr += sprintf(ptr, " - ftDate = FIXME\n");
1021 if (pDesc->dwValidData & DMUS_OBJ_VERSION) ptr += sprintf(ptr, " - vVersion = %s\n", debugstr_dmversion(&pDesc->vVersion));
1022 if (pDesc->dwValidData & DMUS_OBJ_NAME) ptr += sprintf(ptr, " - wszName = %s\n", debugstr_w(pDesc->wszName));
1023 if (pDesc->dwValidData & DMUS_OBJ_CATEGORY) ptr += sprintf(ptr, " - wszCategory = %s\n", debugstr_w(pDesc->wszCategory));
1024 if (pDesc->dwValidData & DMUS_OBJ_FILENAME) ptr += sprintf(ptr, " - wszFileName = %s\n", debugstr_w(pDesc->wszFileName));
1025 if (pDesc->dwValidData & DMUS_OBJ_MEMORY) ptr += sprintf(ptr, " - llMemLength = %lli\n - pbMemData = %p\n", pDesc->llMemLength, pDesc->pbMemData);
1026 if (pDesc->dwValidData & DMUS_OBJ_STREAM) ptr += sprintf(ptr, " - pStream = %p", pDesc->pStream);
1028 return wine_dbg_sprintf("%s", buffer);
1029 } else {
1030 return wine_dbg_sprintf("(NULL)");