1 /* DirectMusicScript Main
3 * Copyright (C) 2003-2004 Rok Mandeljc
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.
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.
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
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 (const DMUS_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%08x", 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 = %d\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 = 0x%s\n - pbMemData = %p\n",
1028 wine_dbgstr_longlong(pDesc
->llMemLength
), pDesc
->pbMemData
);
1029 if (pDesc
->dwValidData
& DMUS_OBJ_STREAM
) ptr
+= sprintf(ptr
, " - pStream = %p", pDesc
->pStream
);
1031 return wine_dbg_sprintf("%s", buffer
);
1033 return wine_dbg_sprintf("(NULL)");