4 * Copyright 2002 Lionel Ulmer
5 * Copyright 2005 Mike McCormack
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
34 #include "wine/debug.h"
36 #include "msxml_private.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(msxml
);
40 static HINSTANCE hInstance
;
41 static ITypeLib
*typelib
;
42 static ITypeInfo
*typeinfos
[LAST_tid
];
44 static REFIID tid_ids
[] = {
45 &IID_IXMLDOMAttribute
,
46 &IID_IXMLDOMCDATASection
,
48 &IID_IXMLDOMDocument2
,
49 &IID_IXMLDOMDocumentFragment
,
51 &IID_IXMLDOMEntityReference
,
52 &IID_IXMLDOMImplementation
,
53 &IID_IXMLDOMNamedNodeMap
,
55 &IID_IXMLDOMParseError
,
56 &IID_IXMLDOMProcessingInstruction
,
57 &IID_IXMLDOMSchemaCollection
,
63 HRESULT
get_typeinfo(enum tid_t tid
, ITypeInfo
**typeinfo
)
70 hres
= LoadRegTypeLib(&LIBID_MSXML2
, 3, 0, LOCALE_SYSTEM_DEFAULT
, &tl
);
72 ERR("LoadRegTypeLib failed: %08x\n", hres
);
76 if(InterlockedCompareExchangePointer((void**)&typelib
, tl
, NULL
))
83 hres
= ITypeLib_GetTypeInfoOfGuid(typelib
, tid_ids
[tid
], &typeinfo
);
85 ERR("GetTypeInfoOfGuid failed: %08x\n", hres
);
89 if(InterlockedCompareExchangePointer((void**)(typeinfos
+tid
), typeinfo
, NULL
))
90 ITypeInfo_Release(typeinfo
);
93 *typeinfo
= typeinfos
[tid
];
95 ITypeInfo_AddRef(typeinfos
[tid
]);
99 static CRITICAL_SECTION MSXML3_typelib_cs
;
100 static CRITICAL_SECTION_DEBUG MSXML3_typelib_cs_debug
=
102 0, 0, &MSXML3_typelib_cs
,
103 { &MSXML3_typelib_cs_debug
.ProcessLocksList
,
104 &MSXML3_typelib_cs_debug
.ProcessLocksList
},
105 0, 0, { (DWORD_PTR
)(__FILE__
": MSXML3_typelib_cs") }
107 static CRITICAL_SECTION MSXML3_typelib_cs
= { &MSXML3_typelib_cs_debug
, -1, 0, 0, 0, 0 };
109 ITypeLib
*get_msxml3_typelib( LPWSTR
*path
)
111 static WCHAR msxml3_path
[MAX_PATH
];
113 EnterCriticalSection( &MSXML3_typelib_cs
);
117 TRACE("loading typelib\n");
119 if (GetModuleFileNameW( hInstance
, msxml3_path
, MAX_PATH
))
120 LoadTypeLib( msxml3_path
, &typelib
);
123 LeaveCriticalSection( &MSXML3_typelib_cs
);
129 ITypeLib_AddRef( typelib
);
134 static void process_detach(void)
139 for(i
=0; i
< sizeof(typeinfos
)/sizeof(*typeinfos
); i
++)
141 ITypeInfo_Release(typeinfos
[i
]);
143 ITypeLib_Release(typelib
);
147 HRESULT WINAPI
DllCanUnloadNow(void)
153 BOOL WINAPI
DllMain(HINSTANCE hInstDLL
, DWORD fdwReason
, LPVOID lpv
)
157 case DLL_PROCESS_ATTACH
:
161 hInstance
= hInstDLL
;
162 DisableThreadLibraryCalls(hInstDLL
);
164 case DLL_PROCESS_DETACH
: