2 * PROJECT: ReactOS api tests
3 * LICENSE: GPLv2+ - See COPYING in the top level directory
4 * PURPOSE: COM interface test
5 * PROGRAMMER: Thomas Faber <thomas.faber@reactos.org>
8 #include "com_apitest.h"
13 #define myskip(c, ...) ((c) ? 0 : (skip(__VA_ARGS__), 1))
14 #define mytrace(...) do { \
15 int debug = winetest_debug; \
18 winetest_debug = debug; \
21 typedef struct _KNOWN_INTERFACE
28 typedef const KNOWN_INTERFACE
*PCKNOWN_INTERFACE
;
31 #define ID_NAME(c) &c, #c, L ## #c
32 static KNOWN_INTERFACE KnownInterfaces
[] =
34 { ID_NAME(IID_IACList
), TRUE
},
35 { ID_NAME(IID_IACList2
), TRUE
},
36 { ID_NAME(IID_IADesktopP2
), TRUE
},
37 { ID_NAME(IID_IAccIdentity
) },
38 { ID_NAME(IID_IAccPropServer
) },
39 { ID_NAME(IID_IAccPropServices
) },
40 { ID_NAME(IID_IAccessible
) },
41 { ID_NAME(IID_IAccessibleHandler
) },
42 { ID_NAME(IID_IAccessControl
), TRUE
},
43 { ID_NAME(IID_IAccessor
) },
44 { ID_NAME(IID_IActiveDesktop
), TRUE
},
45 { ID_NAME(IID_IActiveDesktopP
), TRUE
},
46 { ID_NAME(IID_IActionProgress
) },
47 { ID_NAME(IID_IActionProgressDialog
) },
48 { ID_NAME(IID_IAddressBarParser
), TRUE
},
49 { ID_NAME(IID_IAddressBand
), TRUE
},
50 { ID_NAME(IID_IAddressEditBox
), TRUE
},
51 { ID_NAME(IID_IAugmentedShellFolder
), TRUE
},
52 { ID_NAME(IID_IAugmentedShellFolder2
), TRUE
},
53 { ID_NAME(IID_IAutoComplete
), TRUE
},
54 { ID_NAME(IID_IAutoComplete2
), TRUE
},
55 { ID_NAME(IID_IAutoCompleteDropDown
) },
56 { ID_NAME(IID_IBandHost
) },
57 { ID_NAME(IID_IBandNavigate
), },
58 { ID_NAME(IID_IBandProxy
), TRUE
},
59 { ID_NAME(IID_IBandSite
) },
60 { ID_NAME(IID_IBandSiteHelper
), TRUE
},
61 { ID_NAME(IID_IBanneredBar
), TRUE
},
62 { ID_NAME(IID_IBindCtx
) },
63 { ID_NAME(IID_IBindEventHandler
) },
64 { ID_NAME(IID_IBindHost
) },
65 { ID_NAME(IID_IBinding
) },
66 { ID_NAME(IID_IBindProtocol
), TRUE
},
67 { ID_NAME(IID_IBindResource
) },
68 { ID_NAME(IID_IBindStatusCallback
) },
69 { ID_NAME(IID_IBrowserFrameOptions
), TRUE
},
70 { ID_NAME(IID_IBrowserService
) },
71 { ID_NAME(IID_IBrowserService2
), TRUE
},
72 { ID_NAME(IID_IBrowserService3
), TRUE
},
73 { ID_NAME(IID_IBrowserService4
), TRUE
},
74 { ID_NAME(IID_ICDBurn
) },
75 { ID_NAME(IID_ICDBurnExt
) },
76 { ID_NAME(IID_ICDBurnPriv
) },
77 { ID_NAME(IID_ICallFactory
), TRUE
},
78 { ID_NAME(IID_ICatInformation
) },
79 { ID_NAME(IID_ICatRegister
) },
80 { ID_NAME(IID_IClassFactory
) },
81 { ID_NAME(IID_IClassFactory2
) },
82 { ID_NAME(IID_IClassFactory3
), TRUE
},
83 { ID_NAME(IID_IClientSecurity
), TRUE
},
84 { ID_NAME(IID_ICommDlgBrowser
) },
85 { ID_NAME(IID_ICommDlgBrowser2
) },
86 { ID_NAME(IID_ICommDlgBrowser3
) },
87 { ID_NAME(IID_ICompositeFolder
) },
88 { ID_NAME(IID_IComputerInfoChangeNotify
), },
89 { ID_NAME(IID_IComThreadingInfo
), TRUE
},
90 { ID_NAME(IID_IConnectionPointContainer
) },
91 { ID_NAME(IID_IContext
), TRUE
},
92 { ID_NAME(IID_IContextMenu
), TRUE
},
93 { ID_NAME(IID_IContextMenu2
), TRUE
},
94 { ID_NAME(IID_IContextMenu3
), TRUE
},
95 { ID_NAME(IID_IContextMenuCB
), TRUE
},
96 { ID_NAME(IID_IContextMenuSite
) },
97 { ID_NAME(IID_IContinue
) },
98 { ID_NAME(IID_ICopyHookA
), TRUE
},
99 { ID_NAME(IID_ICopyHookW
), TRUE
},
100 { ID_NAME(IID_ICustomizeInfoTip
) },
101 { ID_NAME(IID_IDVGetEnum
), TRUE
},
102 { ID_NAME(IID_IDataObject
) },
103 //{ ID_NAME(IID_IDefViewID) }, == DefViewFrame3
104 { ID_NAME(IID_IDefViewFrame
), TRUE
},
105 { ID_NAME(IID_IDefViewFrame3
) },
106 { ID_NAME(IID_IDefViewFrameGroup
) },
107 { ID_NAME(IID_IDefViewSafety
), },
108 { ID_NAME(IID_IDefViewScript
), TRUE
},
109 { ID_NAME(IID_IDelayedRelease
), TRUE
},
110 { ID_NAME(IID_IDeskBand
) },
111 { ID_NAME(IID_IDeskBandEx
) },
112 { ID_NAME(IID_IDeskBar
), TRUE
},
113 { ID_NAME(IID_IDeskBarClient
), TRUE
},
114 { ID_NAME(IID_IDeskMovr
), TRUE
},
115 { ID_NAME(IID_IDiscMasterProgressEvents
) },
116 { ID_NAME(IID_IDispatch
) },
117 { ID_NAME(IID_IDispatchEx
) },
118 { ID_NAME(IID_IDockingWindow
) },
119 { ID_NAME(IID_IDockingWindowFrame
), TRUE
},
120 { ID_NAME(IID_IDockingWindowSite
), TRUE
},
121 { ID_NAME(IID_IDocViewSite
), TRUE
},
122 { ID_NAME(IID_IDragSourceHelper
), TRUE
},
123 { ID_NAME(IID_IDriveFolderExt
) },
124 { ID_NAME(IID_IDropSource
) },
125 { ID_NAME(IID_IDropTarget
) },
126 { ID_NAME(IID_IDropTargetHelper
), TRUE
},
127 { ID_NAME(IID_IEFrameAuto
) },
128 { ID_NAME(IID_IEnumExtraSearch
) },
129 { ID_NAME(IID_IEnumGUID
) },
130 { ID_NAME(IID_IEnumIDList
) },
131 { ID_NAME(IID_IEnumMoniker
) },
132 //{ ID_NAME(IID_IEnumNetCfgBindingInterface) },
133 //{ ID_NAME(IID_IEnumNetCfgBindingPath) },
134 { ID_NAME(IID_IEnumNetCfgComponent
), TRUE
},
135 { ID_NAME(IID_IEnumNetConnection
) },
136 { ID_NAME(IID_IEnumShellItems
) },
137 { ID_NAME(IID_IEnumSTATSTG
) },
138 { ID_NAME(IID_IEnumString
) },
139 { ID_NAME(IID_IEnumUnknown
) },
140 { ID_NAME(IID_IEnumVARIANT
) },
141 { ID_NAME(IID_IErrorLog
) },
142 { ID_NAME(IID_IExplorerBrowser
) },
143 { ID_NAME(IID_IExplorerToolbar
), TRUE
},
144 { ID_NAME(IID_IExtractIconA
), TRUE
},
145 { ID_NAME(IID_IExtractIconW
), TRUE
},
146 { ID_NAME(IID_IExtractImage
) },
147 { ID_NAME(IID_IExtractImage2
) },
148 { ID_NAME(IID_IFileDialog
) },
149 { ID_NAME(IID_IFileDialog2
), TRUE
},
150 { ID_NAME(IID_IFileOpenDialog
) },
151 { ID_NAME(IID_IFileSaveDialog
) },
152 { ID_NAME(IID_IFileSearchBand
) },
153 { ID_NAME(IID_IFileViewerA
), TRUE
},
154 { ID_NAME(IID_IFileViewerSite
), TRUE
},
155 { ID_NAME(IID_IFileViewerW
), TRUE
},
156 { ID_NAME(IID_IFilter
) },
157 { ID_NAME(IID_IFolderBandPriv
) },
158 { ID_NAME(IID_IFolderFilter
) },
159 { ID_NAME(IID_IFolderFilterSite
) },
160 { ID_NAME(IID_IFolderView
) },
161 { ID_NAME(IID_IFolderView2
) },
162 { ID_NAME(IID_IFolderViewHost
), TRUE
},
163 { ID_NAME(IID_IFolderViewOC
) },
164 { ID_NAME(IID_IFolderViewSettings
) },
165 { ID_NAME(IID_IForegroundTransfer
), TRUE
},
166 { ID_NAME(IID_IGetNameSpaceExtensionPointer
),TRUE
},
167 { ID_NAME(IID_IGlobalFolderSettings
), TRUE
},
168 { ID_NAME(IID_IHWEventHandler
) },
169 { ID_NAME(IID_IHWEventHandler2
) },
170 { ID_NAME(IID_IHlinkFrame
) },
171 { ID_NAME(IID_IImageList
), TRUE
},
172 { ID_NAME(IID_IImageList2
), TRUE
},
173 { ID_NAME(IID_IInitializeObject
), TRUE
},
174 { ID_NAME(IID_IInitializeWithBindCtx
) },
175 { ID_NAME(IID_IInitializeWithFile
) },
176 { ID_NAME(IID_IInputObject
) },
177 { ID_NAME(IID_IInputObjectSite
) },
178 { ID_NAME(IID_IInternalUnknown
), TRUE
},
179 { ID_NAME(IID_IItemNameLimits
) },
180 { ID_NAME(IID_IMarshal
) },
181 { ID_NAME(IID_IMarshal2
), TRUE
},
182 { ID_NAME(IID_IMenuBand
), TRUE
},
183 { ID_NAME(IID_IMenuPopup
), TRUE
},
184 { ID_NAME(IID_IModalWindow
) },
185 { ID_NAME(IID_IMoniker
) },
186 { ID_NAME(IID_IMultiMonitorDockingSite
), TRUE
},
187 { ID_NAME(IID_IMultiQI
), TRUE
},
188 { ID_NAME(IID_INameSpaceTreeControl
), TRUE
},
189 { ID_NAME(IID_INamespaceProxy
), TRUE
},
190 { ID_NAME(IID_INamespaceWalk
) },
191 { ID_NAME(IID_INamespaceWalkCB
) },
192 { ID_NAME(IID_INamespaceWalkCB2
) },
193 { ID_NAME(IID_INetCfg
), TRUE
},
194 //{ ID_NAME(IID_INetCfgBindingInterface) },
195 //{ ID_NAME(IID_INetCfgBindingPath) },
196 { ID_NAME(IID_INetCfgComponent
), TRUE
},
197 { ID_NAME(IID_INetCfgComponentBindings
), TRUE
},
198 { ID_NAME(IID_INetCfgComponentControl
), TRUE
},
199 { ID_NAME(IID_INetCfgComponentPropertyUi
), TRUE
},
200 { ID_NAME(IID_INetCfgLock
), TRUE
},
201 { ID_NAME(IID_INetCfgPnpReconfigCallback
), TRUE
},
202 { ID_NAME(IID_INetConnectionConnectUi
), TRUE
},
203 { ID_NAME(IID_INetConnectionPropertyUi
), TRUE
},
204 { ID_NAME(IID_INetConnectionPropertyUi2
), TRUE
},
205 { ID_NAME(IID_INetConnectionManager
) },
206 { ID_NAME(IID_INetLanConnectionUiInfo
), TRUE
},
207 { ID_NAME(IID_INewMenuClient
) },
208 { ID_NAME(IID_INewShortcutHookA
), TRUE
},
209 { ID_NAME(IID_INewShortcutHookW
), TRUE
},
210 { ID_NAME(IID_INewWindowManager
) },
211 { ID_NAME(IID_INSCTree
), TRUE
},
212 { ID_NAME(IID_INSCTree2
), TRUE
},
213 { ID_NAME(IID_IObjMgr
), TRUE
},
214 { ID_NAME(IID_IObjectSafety
) },
215 { ID_NAME(IID_IObjectWithBackReferences
) },
216 { ID_NAME(IID_IObjectWithSite
) },
217 { ID_NAME(IID_IOleClientSite
) },
218 { ID_NAME(IID_IOleCommandTarget
) },
219 { ID_NAME(IID_IOleContainer
) },
220 { ID_NAME(IID_IOleControl
) },
221 { ID_NAME(IID_IOleControlSite
) },
222 { ID_NAME(IID_IOleInPlaceActiveObject
) },
223 { ID_NAME(IID_IOleInPlaceFrame
) },
224 { ID_NAME(IID_IOleInPlaceObject
) },
225 { ID_NAME(IID_IOleInPlaceObjectWindowless
), TRUE
},
226 { ID_NAME(IID_IOleInPlaceSite
) },
227 { ID_NAME(IID_IOleInPlaceSiteEx
) },
228 { ID_NAME(IID_IOleInPlaceSiteWindowless
), TRUE
},
229 { ID_NAME(IID_IOleInPlaceUIWindow
) },
230 { ID_NAME(IID_IOleObject
) },
231 { ID_NAME(IID_IOleWindow
) },
232 { ID_NAME(IID_IParentAndItem
) },
233 { ID_NAME(IID_IPersist
) },
234 { ID_NAME(IID_IPersistFile
) },
235 { ID_NAME(IID_IPersistFolder
) },
236 { ID_NAME(IID_IPersistFolder2
) },
237 { ID_NAME(IID_IPersistFolder3
) },
238 { ID_NAME(IID_IPersistFreeThreadedObject
), TRUE
},
239 { ID_NAME(IID_IPersistHistory
) },
240 { ID_NAME(IID_IPersistIDList
) },
241 { ID_NAME(IID_IPersistMemory
) },
242 { ID_NAME(IID_IPersistPropertyBag
) },
243 { ID_NAME(IID_IPersistPropertyBag2
) },
244 { ID_NAME(IID_IPersistStorage
) },
245 { ID_NAME(IID_IPersistStream
) },
246 { ID_NAME(IID_IPersistStreamInit
) },
247 { ID_NAME(IID_IPreviewHandler
) },
248 { ID_NAME(IID_IPreviewHandlerFrame
) },
249 { ID_NAME(IID_IPreviewHandlerVisuals
) },
250 { ID_NAME(IID_IProgressDialog
), TRUE
},
251 { ID_NAME(IID_IPropertyBag
) },
252 { ID_NAME(IID_IPropertyBag2
) },
253 { ID_NAME(IID_IPropertySetStorage
) },
254 { ID_NAME(IID_IPropertyStore
) },
255 { ID_NAME(IID_IPropSheetPage
), TRUE
},
256 { ID_NAME(IID_IProvideClassInfo
) },
257 { ID_NAME(IID_IProvideClassInfo2
) },
258 { ID_NAME(IID_IQueryAssociations
), TRUE
},
259 { ID_NAME(IID_IQueryCancelAutoPlay
) },
260 { ID_NAME(IID_IQueryInfo
), TRUE
},
261 { ID_NAME(IID_IQuickActivate
) },
262 { ID_NAME(IID_IRegTreeOptions
), TRUE
},
263 { ID_NAME(IID_IRemoteComputer
) },
264 { ID_NAME(IID_IResolveShellLink
) },
265 { ID_NAME(IID_IRpcOptions
), TRUE
},
266 { ID_NAME(IID_IRunnableObject
) },
267 { ID_NAME(IID_ISLTracker
) },
268 { ID_NAME(IID_IScriptErrorList
) },
269 { ID_NAME(IID_ISearch
) },
270 { ID_NAME(IID_ISearchAssistantOC
) },
271 { ID_NAME(IID_ISearchAssistantOC2
) },
272 { ID_NAME(IID_ISearchAssistantOC3
) },
273 { ID_NAME(IID_ISearchBar
) },
274 { ID_NAME(IID_ISearches
) },
275 { ID_NAME(IID_ISecMgrCacheSeedTarget
) },
276 { ID_NAME(IID_IServerSecurity
), TRUE
},
277 { ID_NAME(IID_IServiceProvider
) },
278 { ID_NAME(IID_IShellApp
), TRUE
},
279 { ID_NAME(IID_IShellBrowser
) },
280 { ID_NAME(IID_IShellBrowserService
), TRUE
},
281 { ID_NAME(IID_IShellChangeNotify
), TRUE
},
282 { ID_NAME(IID_IShellCopyHookA
), TRUE
},
283 { ID_NAME(IID_IShellCopyHookW
), TRUE
},
284 { ID_NAME(IID_IShellDesktopTray
), TRUE
},
285 { ID_NAME(IID_IShellDetails
), TRUE
},
286 { ID_NAME(IID_IShellDispatch
) },
287 { ID_NAME(IID_IShellDispatch2
) },
288 { ID_NAME(IID_IShellDispatch3
) },
289 { ID_NAME(IID_IShellDispatch4
) },
290 { ID_NAME(IID_IShellDispatch5
), TRUE
},
291 { ID_NAME(IID_IShellDispatch6
), TRUE
},
292 { ID_NAME(IID_IShellExecuteHookA
), TRUE
},
293 { ID_NAME(IID_IShellExecuteHookW
), TRUE
},
294 { ID_NAME(IID_IShellExtInit
), TRUE
},
295 { ID_NAME(IID_IShellFavoritesNameSpace
) },
296 { ID_NAME(IID_IShellFolder
) },
297 { ID_NAME(IID_IShellFolder2
) },
298 { ID_NAME(IID_IShellFolderBand
), TRUE
},
299 { ID_NAME(IID_IShellFolderSearchable
), TRUE
},
300 { ID_NAME(IID_IShellFolderSearchableCallback
), TRUE
},
301 { ID_NAME(IID_IShellFolderView
), TRUE
},
302 { ID_NAME(IID_IShellFolderViewCB
), TRUE
},
303 { ID_NAME(IID_IShellFolderViewDual
) },
304 { ID_NAME(IID_IShellFolderViewDual2
) },
305 { ID_NAME(IID_IShellFolderViewDual3
), TRUE
},
306 { ID_NAME(IID_IShellFolderViewType
), TRUE
},
307 { ID_NAME(IID_IShellIcon
) },
308 { ID_NAME(IID_IShellIconOverlay
), TRUE
},
309 { ID_NAME(IID_IShellIconOverlayIdentifier
), TRUE
},
310 { ID_NAME(IID_IShellImageData
), TRUE
},
311 { ID_NAME(IID_IShellImageDataAbort
), TRUE
},
312 { ID_NAME(IID_IShellImageDataFactory
), TRUE
},
313 { ID_NAME(IID_IShellItem
) },
314 { ID_NAME(IID_IShellItem2
) },
315 { ID_NAME(IID_IShellItemArray
) },
316 { ID_NAME(IID_IShellItemFilter
) },
317 { ID_NAME(IID_IShellLinkA
) },
318 { ID_NAME(IID_IShellLinkDataList
), TRUE
},
319 { ID_NAME(IID_IShellLinkDual
) },
320 { ID_NAME(IID_IShellLinkDual2
) },
321 { ID_NAME(IID_IShellLinkW
) },
322 { ID_NAME(IID_IShellMenu
), TRUE
},
323 { ID_NAME(IID_IShellMenu2
), TRUE
},
324 { ID_NAME(IID_IShellMenuAcc
), TRUE
},
325 { ID_NAME(IID_IShellMenuCallback
), TRUE
},
326 { ID_NAME(IID_IShellNameSpace
) },
327 { ID_NAME(IID_IShellPropSheetExt
), TRUE
},
328 { ID_NAME(IID_IShellService
), TRUE
},
329 { ID_NAME(IID_IShellTaskScheduler
), TRUE
},
330 { ID_NAME(IID_IShellUIHelper
) },
331 { ID_NAME(IID_IShellUIHelper2
), TRUE
},
332 { ID_NAME(IID_IShellView
) },
333 { ID_NAME(IID_IShellView2
) },
334 { ID_NAME(IID_IShellView3
) },
335 { ID_NAME(IID_IShellWindows
) },
336 { ID_NAME(IID_ISpecifyPropertyPages
) },
337 { ID_NAME(IID_IStorage
) },
338 { ID_NAME(IID_IStream
) },
339 { ID_NAME(IID_ISurrogate
) },
340 { ID_NAME(IID_ISynchronize
) },
341 { ID_NAME(IID_ISynchronizeContainer
), TRUE
},
342 { ID_NAME(IID_ISynchronizeEvent
), TRUE
},
343 { ID_NAME(IID_ISynchronizeHandle
), TRUE
},
344 { ID_NAME(IID_ITargetEmbedding
) },
345 { ID_NAME(IID_ITargetFrame
) },
346 { ID_NAME(IID_ITargetFrame2
) },
347 { ID_NAME(IID_ITargetFramePriv
) },
348 { ID_NAME(IID_ITargetFramePriv2
) },
349 { ID_NAME(IID_ITargetNotify
) },
350 { ID_NAME(IID_ITaskbarList
) },
351 { ID_NAME(IID_ITaskbarList2
) },
352 { ID_NAME(IID_ITrackShellMenu
), TRUE
},
353 /* This interface is completely different between PSDK and registry/shell32 */
354 { ID_NAME(IID_ITransferAdviseSink
), TRUE
},
355 #define IID_ITransferAdviseSink IID_ITransferAdviseSinkPriv
356 { ID_NAME(IID_ITransferAdviseSink
) },
357 #undef IID_ITransferAdviseSink
358 { ID_NAME(IID_ITransferDestination
), TRUE
},
359 { ID_NAME(IID_ITransferSource
), TRUE
},
360 { ID_NAME(IID_ITranslateShellChangeNotify
), TRUE
},
361 { ID_NAME(IID_ITrayPriv
), TRUE
},
362 { ID_NAME(IID_ITrayPriv2
), TRUE
},
363 { ID_NAME(IID_IUnknown
) },
364 { ID_NAME(IID_IURLSearchHook
), TRUE
},
365 { ID_NAME(IID_IURLSearchHook2
), TRUE
},
366 { ID_NAME(IID_IUrlHistoryNotify
) },
367 { ID_NAME(IID_IUrlHistoryStg
) },
368 { ID_NAME(IID_IUrlHistoryStg2
) },
369 { ID_NAME(IID_IViewObject
) },
370 { ID_NAME(IID_IViewObject2
) },
371 { ID_NAME(IID_IViewObjectEx
), TRUE
},
372 { ID_NAME(IID_IVisualProperties
) },
373 { ID_NAME(IID_IWebBrowser
) },
374 { ID_NAME(IID_IWebBrowser2
) },
375 { ID_NAME(IID_IWebBrowserApp
) },
376 { ID_NAME(IID_IWebBrowserPriv
) },
377 { ID_NAME(IID_IWebBrowserPriv2
) },
378 { ID_NAME(IID_IWinEventHandler
), TRUE
},
380 { ID_NAME(IID_DFConstraint
), TRUE
},
381 { ID_NAME(DIID__SearchAssistantEvents
) },
382 { ID_NAME(DIID_DShellFolderViewEvents
) },
383 { ID_NAME(DIID_DShellNameSpaceEvents
) },
384 { ID_NAME(DIID_DShellWindowsEvents
) },
385 { ID_NAME(DIID_DWebBrowserEvents
) },
386 { ID_NAME(DIID_DWebBrowserEvents2
) },
387 { ID_NAME(DIID_XMLDOMDocumentEvents
) },
389 { ID_NAME(IID_CDefView
), TRUE
},
390 { ID_NAME(IID_Folder
) },
391 { ID_NAME(IID_Folder2
) },
392 { ID_NAME(IID_Folder3
) },
393 { ID_NAME(IID_FolderItem
) },
394 { ID_NAME(IID_FolderItem2
) },
395 { ID_NAME(IID_FolderItems
) },
396 { ID_NAME(IID_FolderItems2
) },
397 { ID_NAME(IID_FolderItems3
) },
398 { ID_NAME(IID_FolderItemVerb
) },
399 { ID_NAME(IID_FolderItemVerbs
) },
401 { ID_NAME(CLSID_ShellDesktop
), TRUE
}
403 static const INT KnownInterfaceCount
= RTL_NUMBER_OF(KnownInterfaces
);
412 for (i
= 0; i
< KnownInterfaceCount
; i
++)
413 if (IsEqualIID(KnownInterfaces
[i
].iid
, iid
))
414 return &KnownInterfaces
[i
];
415 ASSERT(i
!= KnownInterfaceCount
);
422 _In_ PCCLASS_AND_INTERFACES
class,
427 for (i
= 0; class->ifaces
[i
].iid
; i
++)
428 if (IsEqualIID(class->ifaces
[i
].iid
, iid
))
433 #define INTF_NOT_EXPOSED LONG_MAX
445 hr
= IUnknown_QueryInterface(pUnk
, iid
, &pObj
);
446 ok(hr
== S_OK
|| hr
== E_NOINTERFACE
, "IUnknown::QueryInterface returned 0x%lx\n", hr
);
448 return INTF_NOT_EXPOSED
;
451 offset
= (LONG_PTR
)pObj
- (LONG_PTR
)pUnk
;
452 IUnknown_Release(pUnk2
);
458 TestModuleInterfaces(
459 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces
,
460 _In_ INT ExpectedInterfaceCount
)
466 PCCLASS_AND_INTERFACES
class;
468 for (iClass
= 0; iClass
< ExpectedInterfaceCount
; iClass
++)
470 class = &ExpectedInterfaces
[iClass
];
471 hr
= CoCreateInstance(class->clsid
,
473 CLSCTX_INPROC_SERVER
,
476 ok(hr
== S_OK
, "CoCreateInstance failed. hr=0x%lx\n", hr
);
479 skip("Failed to instantiate %s.\n", class->name
);
485 /* Check that all expected interfaces are present and have the right offset */
486 for (iIntf
= 0; class->ifaces
[iIntf
].iid
; iIntf
++)
488 PCKNOWN_INTERFACE iface
= FindInterface(class->ifaces
[iIntf
].iid
);
489 LONG offset
= GetInterfaceOffset(pUnk
, iface
->iid
);
490 if (offset
== INTF_NOT_EXPOSED
)
491 ok(0, "%s is missing %s (offset %ld)\n", class->name
, iface
->name
, class->ifaces
[iIntf
].offset
);
492 else if (class->ifaces
[iIntf
].offset
!= FARAWY
)
494 #ifdef FAIL_WRONG_OFFSET
495 ok(offset
== class->ifaces
[iIntf
].offset
, "%s, %s offset is %ld, expected %ld\n", class->name
, iface
->name
, offset
, class->ifaces
[iIntf
].offset
);
497 if (offset
!= class->ifaces
[iIntf
].offset
)
498 mytrace("%s, %s offset is %ld, expected %ld\n", class->name
, iface
->name
, offset
, class->ifaces
[iIntf
].offset
);
503 /* Check that none other than the expected interfaces are present */
504 for (iIntf
= 0; iIntf
< KnownInterfaceCount
; iIntf
++)
506 PCKNOWN_INTERFACE iface
= &KnownInterfaces
[iIntf
];
508 if (IsInterfaceExpected(class, iface
->iid
))
510 offset
= GetInterfaceOffset(pUnk
, iface
->iid
);
511 #ifdef GENERATE_TABLE_ENTRIES
512 ok(offset
== INTF_NOT_EXPOSED
, "%s: { %s0x%lx, &%s },\n", class->name
, offset
< 0 ? "-" : "", offset
< 0 ? -offset
: offset
, iface
->name
);
514 ok(offset
== INTF_NOT_EXPOSED
, "%s exposes %s (offset %ld), but shouldn't\n", class->name
, iface
->name
, offset
);
518 // TODO: do some aggregation
520 IUnknown_Release(pUnk
);
527 _In_ PCWSTR ModuleName
,
528 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces
,
529 _In_ INT ExpectedInterfaceCount
)
532 PCCLASS_AND_INTERFACES
class;
536 result
= RegOpenKeyExW(HKEY_LOCAL_MACHINE
, L
"Software\\Classes\\CLSID", 0, KEY_ENUMERATE_SUB_KEYS
, &hKeyClasses
);
537 ok(result
== NO_ERROR
, "Failed to open classes key, error %lu\n", result
);
538 if (!myskip(result
== NO_ERROR
, "No classes key\n"))
540 for (iClass
= 0; iClass
< ExpectedInterfaceCount
; iClass
++)
545 UNICODE_STRING clsid
;
549 PCWSTR expectedThreadingModel
;
551 class = &ExpectedInterfaces
[iClass
];
552 status
= RtlStringFromGUID(class->clsid
, &clsid
);
553 ok(status
== STATUS_SUCCESS
, "Failed to convert guid to string for %s, status %lx\n", class->name
, status
);
554 if (myskip(NT_SUCCESS(status
), "No guid string\n"))
557 result
= RegOpenKeyExW(hKeyClasses
, clsid
.Buffer
, 0, KEY_ENUMERATE_SUB_KEYS
, &hKey
);
558 ok(result
== NO_ERROR
, "Failed to open key for %s, error %lu\n", class->name
, result
);
559 RtlFreeUnicodeString(&clsid
);
560 if (myskip(result
== NO_ERROR
, "No key\n"))
563 result
= RegOpenKeyExW(hKey
, L
"InProcServer32", 0, KEY_QUERY_VALUE
, &hKeyServer
);
564 ok(result
== NO_ERROR
, "Failed to open key for %s, error %lu\n", class->name
, result
);
566 if (myskip(result
== NO_ERROR
, "No key\n"))
569 dataSize
= sizeof(data
);
570 result
= RegQueryValueExW(hKeyServer
, NULL
, NULL
, &type
, (PBYTE
)data
, &dataSize
);
571 ok(result
== NO_ERROR
, "Failed to query value for %s, error %lu\n", class->name
, result
);
572 if (!myskip(result
== NO_ERROR
, "No module name\n"))
574 ok(type
== REG_SZ
|| type
== REG_EXPAND_SZ
, "type %lu for %s\n", type
, class->name
);
575 ok(dataSize
% sizeof(WCHAR
) == 0, "size %lu for %s\n", dataSize
, class->name
);
576 ok(dataSize
<= sizeof(data
), "size %lu for %s\n", dataSize
, class->name
);
577 ok(data
[dataSize
/ sizeof(WCHAR
) - 1] == UNICODE_NULL
, "Not null terminated for %s\n", class->name
);
578 // TODO: Use SearchPath (or assume everything's in system32) and do a proper full path compare
579 PathStripPathW(data
);
580 PathRemoveExtensionW(data
);
581 ok(!wcsicmp(data
, ModuleName
), "Server is %ls, expected %ls for %s\n", data
, ModuleName
, class->name
);
584 dataSize
= sizeof(data
);
585 result
= RegQueryValueExW(hKeyServer
, L
"ThreadingModel", NULL
, &type
, (PBYTE
)data
, &dataSize
);
586 ok(result
== NO_ERROR
, "Failed to query value for %s, error %lu\n", class->name
, result
);
587 if (!myskip(result
== NO_ERROR
, "No ThreadingModel\n"))
589 ok(type
== REG_SZ
|| type
== REG_EXPAND_SZ
, "type %lu for %s\n", type
, class->name
);
590 ok(dataSize
% sizeof(WCHAR
) == 0, "size %lu for %s\n", dataSize
, class->name
);
591 ok(dataSize
<= sizeof(data
), "size %lu for %s\n", dataSize
, class->name
);
592 ok(data
[dataSize
/ sizeof(WCHAR
) - 1] == UNICODE_NULL
, "Not null terminated for %s\n", class->name
);
593 expectedThreadingModel
= class->ThreadingModel
;
594 if (!expectedThreadingModel
)
595 expectedThreadingModel
= L
"Apartment";
596 ok(!wcsicmp(data
, expectedThreadingModel
), "Server is %ls, expected %ls for %s\n", data
, expectedThreadingModel
, class->name
);
599 RegCloseKey(hKeyServer
);
601 RegCloseKey(hKeyClasses
);
607 TestManualInstantiation(
608 _In_ PCWSTR ModuleName
,
609 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces
,
610 _In_ INT ExpectedInterfaceCount
)
613 PCCLASS_AND_INTERFACES
class;
614 HRESULT (__stdcall
*DllGetClassObject
)(REFCLSID
, REFIID
, PVOID
*);
616 DllGetClassObject
= (PVOID
)GetProcAddress(GetModuleHandleW(ModuleName
), "DllGetClassObject");
617 ok(DllGetClassObject
!= NULL
, "DllGetClassObject not found in %ls, error %lu\n", ModuleName
, GetLastError());
618 if (myskip(DllGetClassObject
!= NULL
, "No DllGetClassObject\n"))
621 for (iClass
= 0; iClass
< ExpectedInterfaceCount
; iClass
++)
625 class = &ExpectedInterfaces
[iClass
];
626 hr
= DllGetClassObject(class->clsid
, &IID_IClassFactory
, &pv
);
627 ok(hr
== S_OK
, "DllGetClassObject failed for %s, hr = 0x%lx\n", class->name
, hr
);
628 if (!myskip(SUCCEEDED(hr
), "No class factory\n"))
630 IClassFactory
*pCF
= pv
;
631 hr
= IClassFactory_CreateInstance(pCF
, NULL
, &IID_IUnknown
, &pv
);
632 ok(hr
== S_OK
, "IClassFactory::CreateInstance failed for %s, hr = 0x%lx\n", class->name
, hr
);
633 if (!myskip(SUCCEEDED(hr
), "No instance\n"))
636 IUnknown_Release(pUnk
);
638 IClassFactory_Release(pCF
);
645 _In_ PCWSTR ModuleName
,
646 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces
,
647 _In_ INT ExpectedInterfaceCount
)
651 hr
= CoInitializeEx(NULL
, COINIT_APARTMENTTHREADED
);
652 ok(hr
== S_OK
, "CoInitializeEx failed. hr=0x%lx\n", hr
);
653 if (myskip(SUCCEEDED(hr
), "Failed to initialize COM. Cannot perform tests\n"))
656 TestModuleInterfaces(ExpectedInterfaces
, ExpectedInterfaceCount
);
657 TestModuleRegistry(ModuleName
, ExpectedInterfaces
, ExpectedInterfaceCount
);
658 TestManualInstantiation(ModuleName
, ExpectedInterfaces
, ExpectedInterfaceCount
);
665 TestInterfaceRegistry(
666 _In_ PCKNOWN_INTERFACE Interfaces
,
667 _In_ INT InterfaceCount
)
673 result
= RegOpenKeyExW(HKEY_LOCAL_MACHINE
, L
"Software\\Classes\\Interface", 0, KEY_ENUMERATE_SUB_KEYS
, &hKeyInterface
);
674 ok(result
== NO_ERROR
, "Failed to open interface key, error %lu\n", result
);
675 if (!myskip(result
== NO_ERROR
, "No interface key\n"))
677 for (i
= 0; i
< InterfaceCount
; i
++)
685 PCKNOWN_INTERFACE iface
;
688 iface
= &Interfaces
[i
];
689 status
= RtlStringFromGUID(iface
->iid
, &iid
);
690 ok(status
== STATUS_SUCCESS
, "Failed to convert guid to string for %s, status %lx\n", iface
->name
, status
);
691 if (myskip(NT_SUCCESS(status
), "No guid string\n"))
694 result
= RegOpenKeyExW(hKeyInterface
, iid
.Buffer
, 0, KEY_QUERY_VALUE
, &hKey
);
697 ok(result
== ERROR_FILE_NOT_FOUND
, "RegOpenKeyEx returned %lu for %s\n", result
, iface
->name
);
701 ok(result
== NO_ERROR
, "Failed to open key for %s, error %lu\n", iface
->name
, result
);
702 (void)myskip(result
== NO_ERROR
, "No key\n");
704 RtlFreeUnicodeString(&iid
);
705 if (result
!= NO_ERROR
)
708 dataSize
= sizeof(data
);
709 result
= RegQueryValueExW(hKey
, NULL
, NULL
, &type
, (PBYTE
)data
, &dataSize
);
710 ok(result
== NO_ERROR
, "Failed to query value for %s, error %lu\n", iface
->name
, result
);
711 if (!myskip(result
== NO_ERROR
, "No module name\n"))
713 ok(type
== REG_SZ
, "type %lu for %s\n", type
, iface
->name
);
714 ok(dataSize
% sizeof(WCHAR
) == 0, "size %lu for %s\n", dataSize
, iface
->name
);
715 ok(dataSize
<= sizeof(data
), "size %lu for %s\n", dataSize
, iface
->name
);
716 ok(data
[dataSize
/ sizeof(WCHAR
) - 1] == UNICODE_NULL
, "Not null terminated for %s\n", iface
->name
);
717 expectedName
= wcschr(iface
->wname
, L
'_');
721 expectedName
= iface
->wname
;
722 ok(!wcsicmp(data
, expectedName
), "Name is %ls, expected %ls\n", data
, expectedName
);
727 RegCloseKey(hKeyInterface
);
731 START_TEST(interfaces
)
733 TestInterfaceRegistry(KnownInterfaces
, KnownInterfaceCount
);
projects / reactos.git / blob