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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
20 #include "dmscript_private.h"
22 WINE_DEFAULT_DEBUG_CHANNEL(dmscript);
24 LONG DMSCRIPT_refCount = 0;
27 const IClassFactoryVtbl *lpVtbl;
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;
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;
61 static HRESULT WINAPI ScriptAutoImplSegmentCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
62 TRACE("(%d)\n", dolock);
65 DMSCRIPT_LockModule();
67 DMSCRIPT_UnlockModule();
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;
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);
114 DMSCRIPT_LockModule();
116 DMSCRIPT_UnlockModule();
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);
166 DMSCRIPT_LockModule();
168 DMSCRIPT_UnlockModule();
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);
216 DMSCRIPT_LockModule();
218 DMSCRIPT_UnlockModule();
223 static const IClassFactoryVtbl ScriptCF_Vtbl = {
224 ScriptCF_QueryInterface,
227 ScriptCF_CreateInstance,
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);
268 DMSCRIPT_LockModule();
270 DMSCRIPT_UnlockModule();
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);
320 DMSCRIPT_LockModule();
322 DMSCRIPT_UnlockModule();
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);
372 DMSCRIPT_LockModule();
374 DMSCRIPT_UnlockModule();
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);
424 DMSCRIPT_LockModule();
426 DMSCRIPT_UnlockModule();
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);
476 DMSCRIPT_LockModule();
478 DMSCRIPT_UnlockModule();
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);
528 DMSCRIPT_LockModule();
530 DMSCRIPT_UnlockModule();
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 /******************************************************************
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) {
562 /******************************************************************
563 * DllCanUnloadNow (DMSCRIPT.@)
567 HRESULT WINAPI DllCanUnloadNow(void)
569 return DMSCRIPT_refCount != 0 ? S_FALSE : S_OK;
573 /******************************************************************
574 * DllGetClassObject (DMSCRIPT.@)
578 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
580 TRACE("(%s, %s, %p)\n", debugstr_dmguid(rclsid), debugstr_dmguid(riid), ppv);
581 if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpSegment) && IsEqualIID (riid, &IID_IClassFactory)) {
582 *ppv = (LPVOID) &ScriptAutoImplSegment_CF;
583 IClassFactory_AddRef((IClassFactory*)*ppv);
585 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptTrack) && IsEqualIID (riid, &IID_IClassFactory)) {
586 *ppv = (LPVOID) &ScriptTrack_CF;
587 IClassFactory_AddRef((IClassFactory*)*ppv);
589 } else if (IsEqualCLSID (rclsid, &CLSID_AudioVBScript) && IsEqualIID (riid, &IID_IClassFactory)) {
590 *ppv = (LPVOID) &AudioVBScript_CF;
591 IClassFactory_AddRef((IClassFactory*)*ppv);
593 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScript) && IsEqualIID (riid, &IID_IClassFactory)) {
594 *ppv = (LPVOID) &Script_CF;
595 IClassFactory_AddRef((IClassFactory*)*ppv);
597 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpPerformance) && IsEqualIID (riid, &IID_IClassFactory)) {
598 *ppv = (LPVOID) &ScriptAutoImplPerformance_CF;
599 IClassFactory_AddRef((IClassFactory*)*ppv);
601 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptSourceCodeLoader) && IsEqualIID (riid, &IID_IClassFactory)) {
602 *ppv = (LPVOID) &ScriptSourceCodeLoader_CF;
603 IClassFactory_AddRef((IClassFactory*)*ppv);
605 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpSegmentState) && IsEqualIID (riid, &IID_IClassFactory)) {
606 *ppv = (LPVOID) &ScriptAutoImplSegmentState_CF;
607 IClassFactory_AddRef((IClassFactory*)*ppv);
609 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpAudioPathConfig) && IsEqualIID (riid, &IID_IClassFactory)) {
610 *ppv = (LPVOID) &ScriptAutoImplAudioPathConfig_CF;
611 IClassFactory_AddRef((IClassFactory*)*ppv);
613 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpAudioPath) && IsEqualIID (riid, &IID_IClassFactory)) {
614 *ppv = (LPVOID) &ScriptAutoImplAudioPath_CF;
615 IClassFactory_AddRef((IClassFactory*)*ppv);
617 } else if (IsEqualCLSID (rclsid, &CLSID_DirectMusicScriptAutoImpSong) && IsEqualIID (riid, &IID_IClassFactory)) {
618 *ppv = (LPVOID) &ScriptAutoImplSong_CF;
619 IClassFactory_AddRef((IClassFactory*)*ppv);
623 WARN("(%s, %s, %p): no interface found.\n", debugstr_dmguid(rclsid), debugstr_dmguid(riid), ppv);
624 return CLASS_E_CLASSNOTAVAILABLE;
628 /******************************************************************
633 /* check whether the given DWORD is even (return 0) or odd (return 1) */
634 int even_or_odd (DWORD number) {
635 return (number & 0x1); /* basically, check if bit 0 is set ;) */
638 /* FOURCC to string conversion for debug messages */
639 const char *debugstr_fourcc (DWORD fourcc) {
640 if (!fourcc) return "'null'";
641 return wine_dbg_sprintf ("\'%c%c%c%c\'",
642 (char)(fourcc), (char)(fourcc >> 8),
643 (char)(fourcc >> 16), (char)(fourcc >> 24));
646 /* DMUS_VERSION struct to string conversion for debug messages */
647 const char *debugstr_dmversion (LPDMUS_VERSION version) {
648 if (!version) return "'null'";
649 return wine_dbg_sprintf ("\'%i,%i,%i,%i\'",
650 (int)((version->dwVersionMS && 0xFFFF0000) >> 8), (int)(version->dwVersionMS && 0x0000FFFF),
651 (int)((version->dwVersionLS && 0xFFFF0000) >> 8), (int)(version->dwVersionLS && 0x0000FFFF));
654 /* returns name of given GUID */
655 const char *debugstr_dmguid (const GUID *id) {
656 static const guid_info guids[] = {
658 GE(CLSID_AudioVBScript),
659 GE(CLSID_DirectMusic),
660 GE(CLSID_DirectMusicAudioPath),
661 GE(CLSID_DirectMusicAudioPathConfig),
662 GE(CLSID_DirectMusicAuditionTrack),
663 GE(CLSID_DirectMusicBand),
664 GE(CLSID_DirectMusicBandTrack),
665 GE(CLSID_DirectMusicChordMapTrack),
666 GE(CLSID_DirectMusicChordMap),
667 GE(CLSID_DirectMusicChordTrack),
668 GE(CLSID_DirectMusicCollection),
669 GE(CLSID_DirectMusicCommandTrack),
670 GE(CLSID_DirectMusicComposer),
671 GE(CLSID_DirectMusicContainer),
672 GE(CLSID_DirectMusicGraph),
673 GE(CLSID_DirectMusicLoader),
674 GE(CLSID_DirectMusicLyricsTrack),
675 GE(CLSID_DirectMusicMarkerTrack),
676 GE(CLSID_DirectMusicMelodyFormulationTrack),
677 GE(CLSID_DirectMusicMotifTrack),
678 GE(CLSID_DirectMusicMuteTrack),
679 GE(CLSID_DirectMusicParamControlTrack),
680 GE(CLSID_DirectMusicPatternTrack),
681 GE(CLSID_DirectMusicPerformance),
682 GE(CLSID_DirectMusicScript),
683 GE(CLSID_DirectMusicScriptAutoImpSegment),
684 GE(CLSID_DirectMusicScriptAutoImpPerformance),
685 GE(CLSID_DirectMusicScriptAutoImpSegmentState),
686 GE(CLSID_DirectMusicScriptAutoImpAudioPathConfig),
687 GE(CLSID_DirectMusicScriptAutoImpAudioPath),
688 GE(CLSID_DirectMusicScriptAutoImpSong),
689 GE(CLSID_DirectMusicScriptSourceCodeLoader),
690 GE(CLSID_DirectMusicScriptTrack),
691 GE(CLSID_DirectMusicSection),
692 GE(CLSID_DirectMusicSegment),
693 GE(CLSID_DirectMusicSegmentState),
694 GE(CLSID_DirectMusicSegmentTriggerTrack),
695 GE(CLSID_DirectMusicSegTriggerTrack),
696 GE(CLSID_DirectMusicSeqTrack),
697 GE(CLSID_DirectMusicSignPostTrack),
698 GE(CLSID_DirectMusicSong),
699 GE(CLSID_DirectMusicStyle),
700 GE(CLSID_DirectMusicStyleTrack),
701 GE(CLSID_DirectMusicSynth),
702 GE(CLSID_DirectMusicSynthSink),
703 GE(CLSID_DirectMusicSysExTrack),
704 GE(CLSID_DirectMusicTemplate),
705 GE(CLSID_DirectMusicTempoTrack),
706 GE(CLSID_DirectMusicTimeSigTrack),
707 GE(CLSID_DirectMusicWaveTrack),
708 GE(CLSID_DirectSoundWave),
710 GE(IID_IDirectMusic),
711 GE(IID_IDirectMusic2),
712 GE(IID_IDirectMusic8),
713 GE(IID_IDirectMusicAudioPath),
714 GE(IID_IDirectMusicBand),
715 GE(IID_IDirectMusicBuffer),
716 GE(IID_IDirectMusicChordMap),
717 GE(IID_IDirectMusicCollection),
718 GE(IID_IDirectMusicComposer),
719 GE(IID_IDirectMusicContainer),
720 GE(IID_IDirectMusicDownload),
721 GE(IID_IDirectMusicDownloadedInstrument),
722 GE(IID_IDirectMusicGetLoader),
723 GE(IID_IDirectMusicGraph),
724 GE(IID_IDirectMusicInstrument),
725 GE(IID_IDirectMusicLoader),
726 GE(IID_IDirectMusicLoader8),
727 GE(IID_IDirectMusicObject),
728 GE(IID_IDirectMusicPatternTrack),
729 GE(IID_IDirectMusicPerformance),
730 GE(IID_IDirectMusicPerformance2),
731 GE(IID_IDirectMusicPerformance8),
732 GE(IID_IDirectMusicPort),
733 GE(IID_IDirectMusicPortDownload),
734 GE(IID_IDirectMusicScript),
735 GE(IID_IDirectMusicSegment),
736 GE(IID_IDirectMusicSegment2),
737 GE(IID_IDirectMusicSegment8),
738 GE(IID_IDirectMusicSegmentState),
739 GE(IID_IDirectMusicSegmentState8),
740 GE(IID_IDirectMusicStyle),
741 GE(IID_IDirectMusicStyle8),
742 GE(IID_IDirectMusicSynth),
743 GE(IID_IDirectMusicSynth8),
744 GE(IID_IDirectMusicSynthSink),
745 GE(IID_IDirectMusicThru),
746 GE(IID_IDirectMusicTool),
747 GE(IID_IDirectMusicTool8),
748 GE(IID_IDirectMusicTrack),
749 GE(IID_IDirectMusicTrack8),
751 GE(IID_IPersistStream),
753 GE(IID_IClassFactory),
755 GE(GUID_DirectMusicAllTypes),
756 GE(GUID_NOTIFICATION_CHORD),
757 GE(GUID_NOTIFICATION_COMMAND),
758 GE(GUID_NOTIFICATION_MEASUREANDBEAT),
759 GE(GUID_NOTIFICATION_PERFORMANCE),
760 GE(GUID_NOTIFICATION_RECOMPOSE),
761 GE(GUID_NOTIFICATION_SEGMENT),
764 GE(GUID_CommandParam),
765 GE(GUID_CommandParam2),
766 GE(GUID_CommandParamNext),
767 GE(GUID_IDirectMusicBand),
768 GE(GUID_IDirectMusicChordMap),
769 GE(GUID_IDirectMusicStyle),
771 GE(GUID_Play_Marker),
772 GE(GUID_RhythmParam),
774 GE(GUID_TimeSignature),
775 GE(GUID_Valid_Start_Time),
776 GE(GUID_Clear_All_Bands),
777 GE(GUID_ConnectToDLSCollection),
778 GE(GUID_Disable_Auto_Download),
779 GE(GUID_DisableTempo),
780 GE(GUID_DisableTimeSig),
782 GE(GUID_DownloadToAudioPath),
783 GE(GUID_Enable_Auto_Download),
784 GE(GUID_EnableTempo),
785 GE(GUID_EnableTimeSig),
786 GE(GUID_IgnoreBankSelectForGM),
787 GE(GUID_SeedVariations),
788 GE(GUID_StandardMIDIFile),
790 GE(GUID_UnloadFromAudioPath),
792 GE(GUID_PerfMasterTempo),
793 GE(GUID_PerfMasterVolume),
794 GE(GUID_PerfMasterGrooveLevel),
795 GE(GUID_PerfAutoDownload),
796 GE(GUID_DefaultGMCollection),
797 GE(GUID_Synth_Default),
798 GE(GUID_Buffer_Reverb),
799 GE(GUID_Buffer_EnvReverb),
800 GE(GUID_Buffer_Stereo),
801 GE(GUID_Buffer_3D_Dry),
802 GE(GUID_Buffer_Mono),
803 GE(GUID_DMUS_PROP_GM_Hardware),
804 GE(GUID_DMUS_PROP_GS_Capable),
805 GE(GUID_DMUS_PROP_GS_Hardware),
806 GE(GUID_DMUS_PROP_DLS1),
807 GE(GUID_DMUS_PROP_DLS2),
808 GE(GUID_DMUS_PROP_Effects),
809 GE(GUID_DMUS_PROP_INSTRUMENT2),
810 GE(GUID_DMUS_PROP_LegacyCaps),
811 GE(GUID_DMUS_PROP_MemorySize),
812 GE(GUID_DMUS_PROP_SampleMemorySize),
813 GE(GUID_DMUS_PROP_SamplePlaybackRate),
814 GE(GUID_DMUS_PROP_SetSynthSink),
815 GE(GUID_DMUS_PROP_SinkUsesDSound),
816 GE(GUID_DMUS_PROP_SynthSink_DSOUND),
817 GE(GUID_DMUS_PROP_SynthSink_WAVE),
818 GE(GUID_DMUS_PROP_Volume),
819 GE(GUID_DMUS_PROP_WavesReverb),
820 GE(GUID_DMUS_PROP_WriteLatency),
821 GE(GUID_DMUS_PROP_WritePeriod),
822 GE(GUID_DMUS_PROP_XG_Capable),
823 GE(GUID_DMUS_PROP_XG_Hardware)
828 if (!id) return "(null)";
830 for (i = 0; i < sizeof(guids)/sizeof(guids[0]); i++) {
831 if (IsEqualGUID(id, &guids[i].guid))
832 return guids[i].name;
834 /* if we didn't find it, act like standard debugstr_guid */
835 return debugstr_guid(id);
838 /* returns name of given error code */
839 const char *debugstr_dmreturn (DWORD code) {
840 static const flag_info codes[] = {
843 FE(DMUS_S_PARTIALLOAD),
844 FE(DMUS_S_PARTIALDOWNLOAD),
848 FE(DMUS_S_STRING_TRUNCATED),
849 FE(DMUS_S_LAST_TOOL),
850 FE(DMUS_S_OVER_CHORD),
851 FE(DMUS_S_UP_OCTAVE),
852 FE(DMUS_S_DOWN_OCTAVE),
853 FE(DMUS_S_NOBUFFERCONTROL),
854 FE(DMUS_S_GARBAGE_COLLECTED),
855 FE(DMUS_E_DRIVER_FAILED),
856 FE(DMUS_E_PORTS_OPEN),
857 FE(DMUS_E_DEVICE_IN_USE),
858 FE(DMUS_E_INSUFFICIENTBUFFER),
859 FE(DMUS_E_BUFFERNOTSET),
860 FE(DMUS_E_BUFFERNOTAVAILABLE),
861 FE(DMUS_E_NOTADLSCOL),
862 FE(DMUS_E_INVALIDOFFSET),
863 FE(DMUS_E_ALREADY_LOADED),
864 FE(DMUS_E_INVALIDPOS),
865 FE(DMUS_E_INVALIDPATCH),
866 FE(DMUS_E_CANNOTSEEK),
867 FE(DMUS_E_CANNOTWRITE),
868 FE(DMUS_E_CHUNKNOTFOUND),
869 FE(DMUS_E_INVALID_DOWNLOADID),
870 FE(DMUS_E_NOT_DOWNLOADED_TO_PORT),
871 FE(DMUS_E_ALREADY_DOWNLOADED),
872 FE(DMUS_E_UNKNOWN_PROPERTY),
873 FE(DMUS_E_SET_UNSUPPORTED),
874 FE(DMUS_E_GET_UNSUPPORTED),
876 FE(DMUS_E_BADARTICULATION),
877 FE(DMUS_E_BADINSTRUMENT),
878 FE(DMUS_E_BADWAVELINK),
879 FE(DMUS_E_NOARTICULATION),
882 FE(DMUS_E_BADOFFSETTABLE),
883 FE(DMUS_E_UNKNOWNDOWNLOAD),
884 FE(DMUS_E_NOSYNTHSINK),
885 FE(DMUS_E_ALREADYOPEN),
886 FE(DMUS_E_ALREADYCLOSED),
887 FE(DMUS_E_SYNTHNOTCONFIGURED),
888 FE(DMUS_E_SYNTHACTIVE),
889 FE(DMUS_E_CANNOTREAD),
890 FE(DMUS_E_DMUSIC_RELEASED),
891 FE(DMUS_E_BUFFER_EMPTY),
892 FE(DMUS_E_BUFFER_FULL),
893 FE(DMUS_E_PORT_NOT_CAPTURE),
894 FE(DMUS_E_PORT_NOT_RENDER),
895 FE(DMUS_E_DSOUND_NOT_SET),
896 FE(DMUS_E_ALREADY_ACTIVATED),
897 FE(DMUS_E_INVALIDBUFFER),
898 FE(DMUS_E_WAVEFORMATNOTSUPPORTED),
899 FE(DMUS_E_SYNTHINACTIVE),
900 FE(DMUS_E_DSOUND_ALREADY_SET),
901 FE(DMUS_E_INVALID_EVENT),
902 FE(DMUS_E_UNSUPPORTED_STREAM),
903 FE(DMUS_E_ALREADY_INITED),
904 FE(DMUS_E_INVALID_BAND),
905 FE(DMUS_E_TRACK_HDR_NOT_FIRST_CK),
906 FE(DMUS_E_TOOL_HDR_NOT_FIRST_CK),
907 FE(DMUS_E_INVALID_TRACK_HDR),
908 FE(DMUS_E_INVALID_TOOL_HDR),
909 FE(DMUS_E_ALL_TOOLS_FAILED),
910 FE(DMUS_E_ALL_TRACKS_FAILED),
911 FE(DMUS_E_NOT_FOUND),
913 FE(DMUS_E_TYPE_DISABLED),
914 FE(DMUS_E_TYPE_UNSUPPORTED),
915 FE(DMUS_E_TIME_PAST),
916 FE(DMUS_E_TRACK_NOT_FOUND),
917 FE(DMUS_E_TRACK_NO_CLOCKTIME_SUPPORT),
918 FE(DMUS_E_NO_MASTER_CLOCK),
919 FE(DMUS_E_LOADER_NOCLASSID),
920 FE(DMUS_E_LOADER_BADPATH),
921 FE(DMUS_E_LOADER_FAILEDOPEN),
922 FE(DMUS_E_LOADER_FORMATNOTSUPPORTED),
923 FE(DMUS_E_LOADER_FAILEDCREATE),
924 FE(DMUS_E_LOADER_OBJECTNOTFOUND),
925 FE(DMUS_E_LOADER_NOFILENAME),
926 FE(DMUS_E_INVALIDFILE),
927 FE(DMUS_E_ALREADY_EXISTS),
928 FE(DMUS_E_OUT_OF_RANGE),
929 FE(DMUS_E_SEGMENT_INIT_FAILED),
930 FE(DMUS_E_ALREADY_SENT),
931 FE(DMUS_E_CANNOT_FREE),
932 FE(DMUS_E_CANNOT_OPEN_PORT),
933 FE(DMUS_E_CANNOT_CONVERT),
934 FE(DMUS_E_DESCEND_CHUNK_FAIL),
935 FE(DMUS_E_NOT_LOADED),
936 FE(DMUS_E_SCRIPT_LANGUAGE_INCOMPATIBLE),
937 FE(DMUS_E_SCRIPT_UNSUPPORTED_VARTYPE),
938 FE(DMUS_E_SCRIPT_ERROR_IN_SCRIPT),
939 FE(DMUS_E_SCRIPT_CANTLOAD_OLEAUT32),
940 FE(DMUS_E_SCRIPT_LOADSCRIPT_ERROR),
941 FE(DMUS_E_SCRIPT_INVALID_FILE),
942 FE(DMUS_E_INVALID_SCRIPTTRACK),
943 FE(DMUS_E_SCRIPT_VARIABLE_NOT_FOUND),
944 FE(DMUS_E_SCRIPT_ROUTINE_NOT_FOUND),
945 FE(DMUS_E_SCRIPT_CONTENT_READONLY),
946 FE(DMUS_E_SCRIPT_NOT_A_REFERENCE),
947 FE(DMUS_E_SCRIPT_VALUE_NOT_SUPPORTED),
948 FE(DMUS_E_INVALID_SEGMENTTRIGGERTRACK),
949 FE(DMUS_E_INVALID_LYRICSTRACK),
950 FE(DMUS_E_INVALID_PARAMCONTROLTRACK),
951 FE(DMUS_E_AUDIOVBSCRIPT_SYNTAXERROR),
952 FE(DMUS_E_AUDIOVBSCRIPT_RUNTIMEERROR),
953 FE(DMUS_E_AUDIOVBSCRIPT_OPERATIONFAILURE),
954 FE(DMUS_E_AUDIOPATHS_NOT_VALID),
955 FE(DMUS_E_AUDIOPATHS_IN_USE),
956 FE(DMUS_E_NO_AUDIOPATH_CONFIG),
957 FE(DMUS_E_AUDIOPATH_INACTIVE),
958 FE(DMUS_E_AUDIOPATH_NOBUFFER),
959 FE(DMUS_E_AUDIOPATH_NOPORT),
960 FE(DMUS_E_NO_AUDIOPATH),
961 FE(DMUS_E_INVALIDCHUNK),
962 FE(DMUS_E_AUDIOPATH_NOGLOBALFXBUFFER),
963 FE(DMUS_E_INVALID_CONTAINER_OBJECT)
966 for (i = 0; i < sizeof(codes)/sizeof(codes[0]); i++) {
967 if (code == codes[i].val)
968 return codes[i].name;
970 /* if we didn't find it, return value */
971 return wine_dbg_sprintf("0x%08lx", code);
974 /* generic flag-dumping function */
975 const char* debugstr_flags (DWORD flags, const flag_info* names, size_t num_names){
976 char buffer[128] = "", *ptr = &buffer[0];
977 unsigned int i, size = sizeof(buffer);
979 for (i=0; i < num_names; i++)
981 if ((flags & names[i].val) || /* standard flag*/
982 ((!flags) && (!names[i].val))) { /* zero value only */
983 int cnt = snprintf(ptr, size, "%s ", names[i].name);
984 if (cnt < 0 || cnt >= size) break;
990 return wine_dbg_sprintf("%s", buffer);
993 /* dump DMUS_OBJ flags */
994 const char *debugstr_DMUS_OBJ_FLAGS (DWORD flagmask) {
995 static const flag_info flags[] = {
999 FE(DMUS_OBJ_CATEGORY),
1000 FE(DMUS_OBJ_FILENAME),
1001 FE(DMUS_OBJ_FULLPATH),
1003 FE(DMUS_OBJ_VERSION),
1005 FE(DMUS_OBJ_LOADED),
1006 FE(DMUS_OBJ_MEMORY),
1009 return debugstr_flags (flagmask, flags, sizeof(flags)/sizeof(flags[0]));
1012 /* dump whole DMUS_OBJECTDESC struct */
1013 const char *debugstr_DMUS_OBJECTDESC (LPDMUS_OBJECTDESC pDesc) {
1015 char buffer[1024] = "", *ptr = &buffer[0];
1017 ptr += sprintf(ptr, "DMUS_OBJECTDESC (%p):\n", pDesc);
1018 ptr += sprintf(ptr, " - dwSize = %ld\n", pDesc->dwSize);
1019 ptr += sprintf(ptr, " - dwValidData = %s\n", debugstr_DMUS_OBJ_FLAGS (pDesc->dwValidData));
1020 if (pDesc->dwValidData & DMUS_OBJ_CLASS) ptr += sprintf(ptr, " - guidClass = %s\n", debugstr_dmguid(&pDesc->guidClass));
1021 if (pDesc->dwValidData & DMUS_OBJ_OBJECT) ptr += sprintf(ptr, " - guidObject = %s\n", debugstr_guid(&pDesc->guidObject));
1022 if (pDesc->dwValidData & DMUS_OBJ_DATE) ptr += sprintf(ptr, " - ftDate = FIXME\n");
1023 if (pDesc->dwValidData & DMUS_OBJ_VERSION) ptr += sprintf(ptr, " - vVersion = %s\n", debugstr_dmversion(&pDesc->vVersion));
1024 if (pDesc->dwValidData & DMUS_OBJ_NAME) ptr += sprintf(ptr, " - wszName = %s\n", debugstr_w(pDesc->wszName));
1025 if (pDesc->dwValidData & DMUS_OBJ_CATEGORY) ptr += sprintf(ptr, " - wszCategory = %s\n", debugstr_w(pDesc->wszCategory));
1026 if (pDesc->dwValidData & DMUS_OBJ_FILENAME) ptr += sprintf(ptr, " - wszFileName = %s\n", debugstr_w(pDesc->wszFileName));
1027 if (pDesc->dwValidData & DMUS_OBJ_MEMORY) ptr += sprintf(ptr, " - llMemLength = %lli\n - pbMemData = %p\n", pDesc->llMemLength, pDesc->pbMemData);
1028 if (pDesc->dwValidData & DMUS_OBJ_STREAM) ptr += sprintf(ptr, " - pStream = %p", pDesc->pStream);
1030 return wine_dbg_sprintf("%s", buffer);
1032 return wine_dbg_sprintf("(NULL)");