[COM_APITEST] Fix test failures on Win2003.
[reactos.git] / modules / rostests / apitests / com / com_apitest.c
1 /*
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>
6 */
7
8 #include "com_apitest.h"
9
10 #include <winreg.h>
11 #include <mshtmhst.h>
12 #include <shlwapi.h>
13 #include <commoncontrols.h>
14 #include <activscp.h>
15 #include <ndk/rtlfuncs.h>
16
17 #define NDEBUG
18 #include <debug.h>
19
20 #define myskip(c, ...) ((c) ? 0 : (skip(__VA_ARGS__), 1))
21 #define mytrace(...) do { \
22 int debug = winetest_debug; \
23 winetest_debug = 1; \
24 trace(__VA_ARGS__); \
25 winetest_debug = debug; \
26 } while (0)
27
28 typedef struct _KNOWN_INTERFACE
29 {
30 const IID *iid;
31 PCSTR name;
32 PCWSTR wname;
33 BOOLEAN noreg;
34 } KNOWN_INTERFACE;
35 typedef const KNOWN_INTERFACE *PCKNOWN_INTERFACE;
36
37 #undef ID_NAME
38 #define ID_NAME(c) &c, #c, L ## #c
39 static KNOWN_INTERFACE KnownInterfaces[] =
40 {
41 { ID_NAME(IID_IACList), TRUE },
42 { ID_NAME(IID_IACList2), TRUE },
43 { ID_NAME(IID_IADesktopP2), TRUE },
44 { ID_NAME(IID_IAccIdentity) },
45 { ID_NAME(IID_IAccPropServer) },
46 { ID_NAME(IID_IAccPropServices) },
47 { ID_NAME(IID_IAccessible) },
48 { ID_NAME(IID_IAccessibleHandler) },
49 { ID_NAME(IID_IAccessControl), TRUE },
50 { ID_NAME(IID_IAccessor) },
51 { ID_NAME(IID_IACLCustomMRU), TRUE },
52 { ID_NAME(IID_IActiveDesktop), TRUE },
53 { ID_NAME(IID_IActiveDesktopP), TRUE },
54 { ID_NAME(IID_IActionProgress) },
55 { ID_NAME(IID_IActionProgressDialog) },
56 { ID_NAME(IID_IAddressBarParser), TRUE },
57 { ID_NAME(IID_IAddressBand), TRUE },
58 { ID_NAME(IID_IAddressEditBox), TRUE },
59 { ID_NAME(IID_IAugmentedShellFolder), TRUE },
60 { ID_NAME(IID_IAugmentedShellFolder2), TRUE },
61 { ID_NAME(IID_IAutoComplete), TRUE },
62 { ID_NAME(IID_IAutoComplete2), TRUE },
63 { ID_NAME(IID_IAutoCompleteDropDown) },
64 { ID_NAME(IID_IBandHost) },
65 { ID_NAME(IID_IBandNavigate), },
66 { ID_NAME(IID_IBandProxy), TRUE },
67 { ID_NAME(IID_IBandSite) },
68 { ID_NAME(IID_IBandSiteHelper), TRUE },
69 { ID_NAME(IID_IBanneredBar), TRUE },
70 { ID_NAME(IID_IBindCtx) },
71 { ID_NAME(IID_IBindEventHandler) },
72 { ID_NAME(IID_IBindHost) },
73 { ID_NAME(IID_IBinding) },
74 { ID_NAME(IID_IBindProtocol), TRUE },
75 { ID_NAME(IID_IBindResource) },
76 { ID_NAME(IID_IBindStatusCallback) },
77 { ID_NAME(IID_IBrowserFrameOptions), TRUE },
78 { ID_NAME(IID_IBrowserService) },
79 { ID_NAME(IID_IBrowserService2), TRUE },
80 { ID_NAME(IID_IBrowserService3), TRUE },
81 { ID_NAME(IID_IBrowserService4), TRUE },
82 { ID_NAME(IID_ICDBurn) },
83 { ID_NAME(IID_ICDBurnExt) },
84 { ID_NAME(IID_ICDBurnPriv) },
85 { ID_NAME(IID_ICallFactory), TRUE },
86 { ID_NAME(IID_ICatInformation) },
87 { ID_NAME(IID_ICatRegister) },
88 { ID_NAME(IID_IClassFactory) },
89 { ID_NAME(IID_IClassFactory2) },
90 { ID_NAME(IID_IClassFactory3), TRUE },
91 { ID_NAME(IID_IClientSecurity), TRUE },
92 { ID_NAME(IID_ICommDlgBrowser) },
93 { ID_NAME(IID_ICommDlgBrowser2) },
94 { ID_NAME(IID_ICommDlgBrowser3) },
95 { ID_NAME(IID_ICompositeFolder) },
96 { ID_NAME(IID_IComputerInfoChangeNotify), },
97 { ID_NAME(IID_IComThreadingInfo), TRUE },
98 { ID_NAME(IID_IConnectionPointContainer) },
99 { ID_NAME(IID_IContext), TRUE },
100 { ID_NAME(IID_IContextMenu), TRUE },
101 { ID_NAME(IID_IContextMenu2), TRUE },
102 { ID_NAME(IID_IContextMenu3), TRUE },
103 { ID_NAME(IID_IContextMenuCB), TRUE },
104 { ID_NAME(IID_IContextMenuSite) },
105 { ID_NAME(IID_IContinue) },
106 { ID_NAME(IID_ICopyHookA), TRUE },
107 { ID_NAME(IID_ICopyHookW), TRUE },
108 { ID_NAME(IID_ICurrentWorkingDirectory), TRUE },
109 { ID_NAME(IID_ICustomizeInfoTip) },
110 { ID_NAME(IID_IDVGetEnum), TRUE },
111 { ID_NAME(IID_IDataObject) },
112 //{ ID_NAME(IID_IDefViewID) }, == DefViewFrame3
113 { ID_NAME(IID_IDefViewFrame), TRUE },
114 { ID_NAME(IID_IDefViewFrame3) },
115 { ID_NAME(IID_IDefViewFrameGroup) },
116 { ID_NAME(IID_IDefViewSafety), },
117 { ID_NAME(IID_IDefViewScript), TRUE },
118 { ID_NAME(IID_IDelayedRelease), TRUE },
119 { ID_NAME(IID_IDeskBand) },
120 { ID_NAME(IID_IDeskBandEx) },
121 { ID_NAME(IID_IDeskBar), TRUE },
122 { ID_NAME(IID_IDeskBarClient), TRUE },
123 { ID_NAME(IID_IDeskMovr), TRUE },
124 { ID_NAME(IID_IDiscMasterProgressEvents) },
125 { ID_NAME(IID_IDispatch) },
126 { ID_NAME(IID_IDispatchEx) },
127 { ID_NAME(IID_IDockingWindow) },
128 { ID_NAME(IID_IDockingWindowFrame), TRUE },
129 { ID_NAME(IID_IDockingWindowSite), TRUE },
130 { ID_NAME(IID_IDocViewSite), TRUE },
131 { ID_NAME(IID_IDragSourceHelper), TRUE },
132 { ID_NAME(IID_IDriveFolderExt), TRUE },
133 { ID_NAME(IID_IDropSource) },
134 { ID_NAME(IID_IDropTarget) },
135 { ID_NAME(IID_IDropTargetHelper), TRUE },
136 { ID_NAME(IID_IEFrameAuto) },
137 { ID_NAME(IID_IEnumExtraSearch) },
138 { ID_NAME(IID_IEnumGUID) },
139 { ID_NAME(IID_IEnumIDList) },
140 { ID_NAME(IID_IEnumMoniker) },
141 //{ ID_NAME(IID_IEnumNetCfgBindingInterface) },
142 //{ ID_NAME(IID_IEnumNetCfgBindingPath) },
143 { ID_NAME(IID_IEnumNetCfgComponent), TRUE },
144 { ID_NAME(IID_IEnumNetConnection) },
145 { ID_NAME(IID_IEnumShellItems) },
146 { ID_NAME(IID_IEnumSTATSTG) },
147 { ID_NAME(IID_IEnumString) },
148 { ID_NAME(IID_IEnumUnknown) },
149 { ID_NAME(IID_IEnumVARIANT) },
150 { ID_NAME(IID_IErrorLog) },
151 { ID_NAME(IID_IExplorerBrowser) },
152 { ID_NAME(IID_IExplorerToolbar), TRUE },
153 { ID_NAME(IID_IExtractIconA), TRUE },
154 { ID_NAME(IID_IExtractIconW), TRUE },
155 { ID_NAME(IID_IExtractImage) },
156 { ID_NAME(IID_IExtractImage2) },
157 { ID_NAME(IID_IFileDialog) },
158 { ID_NAME(IID_IFileDialog2), TRUE },
159 { ID_NAME(IID_IFileOpenDialog) },
160 { ID_NAME(IID_IFileSaveDialog) },
161 { ID_NAME(IID_IFileSearchBand) },
162 { ID_NAME(IID_IFileViewerA), TRUE },
163 { ID_NAME(IID_IFileViewerSite), TRUE },
164 { ID_NAME(IID_IFileViewerW), TRUE },
165 { ID_NAME(IID_IFilter) },
166 { ID_NAME(IID_IFolderBandPriv) },
167 { ID_NAME(IID_IFolderFilter) },
168 { ID_NAME(IID_IFolderFilterSite) },
169 { ID_NAME(IID_IFolderView) },
170 { ID_NAME(IID_IFolderView2) },
171 { ID_NAME(IID_IFolderViewHost), TRUE },
172 { ID_NAME(IID_IFolderViewOC) },
173 { ID_NAME(IID_IFolderViewSettings) },
174 { ID_NAME(IID_IForegroundTransfer), TRUE },
175 { ID_NAME(IID_IGetNameSpaceExtensionPointer),TRUE},
176 { ID_NAME(IID_IGlobalFolderSettings), TRUE },
177 { ID_NAME(IID_IHWEventHandler) },
178 { ID_NAME(IID_IHWEventHandler2) },
179 { ID_NAME(IID_IHlinkFrame) },
180 { ID_NAME(IID_IImageList), TRUE },
181 { ID_NAME(IID_IImageList2), TRUE },
182 { ID_NAME(IID_IInitializeObject), TRUE },
183 { ID_NAME(IID_IInitializeWithBindCtx) },
184 { ID_NAME(IID_IInitializeWithFile) },
185 { ID_NAME(IID_IInputObject) },
186 { ID_NAME(IID_IInputObjectSite) },
187 { ID_NAME(IID_IInternalUnknown), TRUE },
188 { ID_NAME(IID_IInternetSecurityManager) },
189 { ID_NAME(IID_IInternetZoneManager), TRUE },
190 { ID_NAME(IID_IItemNameLimits) },
191 { ID_NAME(IID_IMarshal) },
192 { ID_NAME(IID_IMarshal2), TRUE },
193 { ID_NAME(IID_IMenuBand), TRUE },
194 { ID_NAME(IID_IMenuPopup), TRUE },
195 { ID_NAME(IID_IModalWindow) },
196 { ID_NAME(IID_IMoniker) },
197 { ID_NAME(IID_IMultiMonitorDockingSite), TRUE },
198 { ID_NAME(IID_IMultiQI), TRUE },
199 { ID_NAME(IID_INameSpaceTreeControl), TRUE },
200 { ID_NAME(IID_INamespaceProxy), TRUE },
201 { ID_NAME(IID_INamespaceWalk) },
202 { ID_NAME(IID_INamespaceWalkCB) },
203 { ID_NAME(IID_INamespaceWalkCB2) },
204 { ID_NAME(IID_INetCfg), TRUE },
205 //{ ID_NAME(IID_INetCfgBindingInterface) },
206 //{ ID_NAME(IID_INetCfgBindingPath) },
207 { ID_NAME(IID_INetCfgComponent), TRUE },
208 { ID_NAME(IID_INetCfgComponentBindings), TRUE },
209 { ID_NAME(IID_INetCfgComponentControl), TRUE },
210 { ID_NAME(IID_INetCfgComponentPropertyUi), TRUE },
211 { ID_NAME(IID_INetCfgLock), TRUE },
212 { ID_NAME(IID_INetCfgPnpReconfigCallback), TRUE },
213 { ID_NAME(IID_INetConnectionConnectUi), TRUE },
214 { ID_NAME(IID_INetConnectionPropertyUi), TRUE },
215 { ID_NAME(IID_INetConnectionPropertyUi2), TRUE },
216 { ID_NAME(IID_INetConnectionManager) },
217 { ID_NAME(IID_INetLanConnectionUiInfo), TRUE },
218 { ID_NAME(IID_INewMenuClient) },
219 { ID_NAME(IID_INewShortcutHookA), TRUE },
220 { ID_NAME(IID_INewShortcutHookW), TRUE },
221 { ID_NAME(IID_INewWindowManager) },
222 { ID_NAME(IID_INSCTree), TRUE },
223 { ID_NAME(IID_INSCTree2), TRUE },
224 { ID_NAME(IID_IObjMgr), TRUE },
225 { ID_NAME(IID_IObjectSafety) },
226 { ID_NAME(IID_IObjectWithBackReferences) },
227 { ID_NAME(IID_IObjectWithSite) },
228 { ID_NAME(IID_IOleClientSite) },
229 { ID_NAME(IID_IOleCommandTarget) },
230 { ID_NAME(IID_IOleContainer) },
231 { ID_NAME(IID_IOleControl) },
232 { ID_NAME(IID_IOleControlSite) },
233 { ID_NAME(IID_IOleInPlaceActiveObject) },
234 { ID_NAME(IID_IOleInPlaceFrame) },
235 { ID_NAME(IID_IOleInPlaceObject) },
236 { ID_NAME(IID_IOleInPlaceObjectWindowless), TRUE },
237 { ID_NAME(IID_IOleInPlaceSite) },
238 { ID_NAME(IID_IOleInPlaceSiteEx) },
239 { ID_NAME(IID_IOleInPlaceSiteWindowless), TRUE },
240 { ID_NAME(IID_IOleInPlaceUIWindow) },
241 { ID_NAME(IID_IOleObject) },
242 { ID_NAME(IID_IOleWindow) },
243 { ID_NAME(IID_IParentAndItem) },
244 { ID_NAME(IID_IPersist) },
245 { ID_NAME(IID_IPersistFile) },
246 { ID_NAME(IID_IPersistFolder) },
247 { ID_NAME(IID_IPersistFolder2) },
248 { ID_NAME(IID_IPersistFolder3) },
249 { ID_NAME(IID_IPersistFreeThreadedObject), TRUE },
250 { ID_NAME(IID_IPersistHistory) },
251 { ID_NAME(IID_IPersistIDList) },
252 { ID_NAME(IID_IPersistMemory) },
253 { ID_NAME(IID_IPersistPropertyBag) },
254 { ID_NAME(IID_IPersistPropertyBag2) },
255 { ID_NAME(IID_IPersistStorage) },
256 { ID_NAME(IID_IPersistStream) },
257 { ID_NAME(IID_IPersistStreamInit) },
258 { ID_NAME(IID_IPreviewHandler) },
259 { ID_NAME(IID_IPreviewHandlerFrame) },
260 { ID_NAME(IID_IPreviewHandlerVisuals) },
261 { ID_NAME(IID_IProgressDialog), TRUE },
262 { ID_NAME(IID_IPropertyBag) },
263 { ID_NAME(IID_IPropertyBag2) },
264 { ID_NAME(IID_IPropertySetStorage) },
265 { ID_NAME(IID_IPropertyStore) },
266 { ID_NAME(IID_IPropSheetPage), TRUE },
267 { ID_NAME(IID_IProvideClassInfo) },
268 { ID_NAME(IID_IProvideClassInfo2) },
269 { ID_NAME(IID_IQueryAssociations), TRUE },
270 { ID_NAME(IID_IQueryCancelAutoPlay) },
271 { ID_NAME(IID_IQueryInfo), TRUE },
272 { ID_NAME(IID_IQuickActivate) },
273 { ID_NAME(IID_IRegTreeOptions), TRUE },
274 { ID_NAME(IID_IRemoteComputer) },
275 { ID_NAME(IID_IResolveShellLink) },
276 { ID_NAME(IID_IRpcOptions), TRUE },
277 { ID_NAME(IID_IRunnableObject) },
278 { ID_NAME(IID_ISLTracker), TRUE },
279 { ID_NAME(IID_IScriptErrorList) },
280 { ID_NAME(IID_ISearch) },
281 { ID_NAME(IID_ISearchAssistantOC) },
282 { ID_NAME(IID_ISearchAssistantOC2) },
283 { ID_NAME(IID_ISearchAssistantOC3) },
284 { ID_NAME(IID_ISearchBar) },
285 { ID_NAME(IID_ISearches) },
286 { ID_NAME(IID_ISecMgrCacheSeedTarget) },
287 { ID_NAME(IID_IServerSecurity), TRUE },
288 { ID_NAME(IID_IServiceProvider) },
289 { ID_NAME(IID_IShellApp), TRUE },
290 { ID_NAME(IID_IShellBrowser) },
291 { ID_NAME(IID_IShellBrowserService), TRUE },
292 { ID_NAME(IID_IShellChangeNotify), TRUE },
293 { ID_NAME(IID_IShellCopyHookA), TRUE },
294 { ID_NAME(IID_IShellCopyHookW), TRUE },
295 { ID_NAME(IID_IShellDesktopTray), TRUE },
296 { ID_NAME(IID_IShellDetails), TRUE },
297 { ID_NAME(IID_IShellDispatch) },
298 { ID_NAME(IID_IShellDispatch2) },
299 { ID_NAME(IID_IShellDispatch3) },
300 { ID_NAME(IID_IShellDispatch4) },
301 { ID_NAME(IID_IShellDispatch5), TRUE },
302 { ID_NAME(IID_IShellDispatch6), TRUE },
303 { ID_NAME(IID_IShellExecuteHookA), TRUE },
304 { ID_NAME(IID_IShellExecuteHookW), TRUE },
305 { ID_NAME(IID_IShellExtInit), TRUE },
306 { ID_NAME(IID_IShellFavoritesNameSpace) },
307 { ID_NAME(IID_IShellFolder) },
308 { ID_NAME(IID_IShellFolder2) },
309 { ID_NAME(IID_IShellFolderBand), TRUE },
310 { ID_NAME(IID_IShellFolderSearchable), TRUE },
311 { ID_NAME(IID_IShellFolderSearchableCallback), TRUE },
312 { ID_NAME(IID_IShellFolderView), TRUE },
313 { ID_NAME(IID_IShellFolderViewCB), TRUE },
314 { ID_NAME(IID_IShellFolderViewDual) },
315 { ID_NAME(IID_IShellFolderViewDual2) },
316 { ID_NAME(IID_IShellFolderViewDual3), TRUE },
317 { ID_NAME(IID_IShellFolderViewType), TRUE },
318 { ID_NAME(IID_IShellIcon) },
319 { ID_NAME(IID_IShellIconOverlay), TRUE },
320 { ID_NAME(IID_IShellIconOverlayIdentifier), TRUE },
321 { ID_NAME(IID_IShellImageData), TRUE },
322 { ID_NAME(IID_IShellImageDataAbort), TRUE },
323 { ID_NAME(IID_IShellImageDataFactory), TRUE },
324 { ID_NAME(IID_IShellItem) },
325 { ID_NAME(IID_IShellItem2) },
326 { ID_NAME(IID_IShellItemArray) },
327 { ID_NAME(IID_IShellItemFilter) },
328 { ID_NAME(IID_IShellLinkA) },
329 { ID_NAME(IID_IShellLinkDataList), TRUE },
330 { ID_NAME(IID_IShellLinkDual) },
331 { ID_NAME(IID_IShellLinkDual2) },
332 { ID_NAME(IID_IShellLinkW) },
333 { ID_NAME(IID_IShellMenu), TRUE },
334 { ID_NAME(IID_IShellMenu2), TRUE },
335 { ID_NAME(IID_IShellMenuAcc), TRUE },
336 { ID_NAME(IID_IShellMenuCallback), TRUE },
337 { ID_NAME(IID_IShellNameSpace) },
338 { ID_NAME(IID_IShellPropSheetExt), TRUE },
339 { ID_NAME(IID_IShellService), TRUE },
340 { ID_NAME(IID_IShellTaskScheduler), TRUE },
341 { ID_NAME(IID_IShellUIHelper) },
342 { ID_NAME(IID_IShellUIHelper2), TRUE },
343 { ID_NAME(IID_IShellView) },
344 { ID_NAME(IID_IShellView2) },
345 { ID_NAME(IID_IShellView3) },
346 { ID_NAME(IID_IShellWindows) },
347 { ID_NAME(IID_ISpecifyPropertyPages) },
348 { ID_NAME(IID_IStorage) },
349 { ID_NAME(IID_IStream) },
350 { ID_NAME(IID_ISurrogate) },
351 { ID_NAME(IID_ISynchronize) },
352 { ID_NAME(IID_ISynchronizeContainer), TRUE },
353 { ID_NAME(IID_ISynchronizeEvent), TRUE },
354 { ID_NAME(IID_ISynchronizeHandle), TRUE },
355 { ID_NAME(IID_ITargetEmbedding) },
356 { ID_NAME(IID_ITargetFrame) },
357 { ID_NAME(IID_ITargetFrame2) },
358 { ID_NAME(IID_ITargetFramePriv) },
359 { ID_NAME(IID_ITargetFramePriv2) },
360 { ID_NAME(IID_ITargetNotify) },
361 { ID_NAME(IID_ITaskbarList) },
362 { ID_NAME(IID_ITaskbarList2) },
363 { ID_NAME(IID_ITrackShellMenu), TRUE },
364 /* This interface is completely different between PSDK and registry/shell32 */
365 { ID_NAME(IID_ITransferAdviseSink), TRUE },
366 #define IID_ITransferAdviseSink IID_ITransferAdviseSinkPriv
367 { ID_NAME(IID_ITransferAdviseSink) },
368 #undef IID_ITransferAdviseSink
369 { ID_NAME(IID_ITransferDestination), TRUE },
370 { ID_NAME(IID_ITransferSource), TRUE },
371 { ID_NAME(IID_ITranslateShellChangeNotify), TRUE },
372 { ID_NAME(IID_ITrayPriv), TRUE },
373 { ID_NAME(IID_ITrayPriv2), TRUE },
374 { ID_NAME(IID_IUnknown) },
375 { ID_NAME(IID_IURLSearchHook), TRUE },
376 { ID_NAME(IID_IURLSearchHook2), TRUE },
377 { ID_NAME(IID_IUrlHistoryNotify) },
378 { ID_NAME(IID_IUrlHistoryStg) },
379 { ID_NAME(IID_IUrlHistoryStg2) },
380 { ID_NAME(IID_IViewObject) },
381 { ID_NAME(IID_IViewObject2) },
382 { ID_NAME(IID_IViewObjectEx), TRUE },
383 { ID_NAME(IID_IVisualProperties) },
384 { ID_NAME(IID_IWebBrowser) },
385 { ID_NAME(IID_IWebBrowser2) },
386 { ID_NAME(IID_IWebBrowserApp) },
387 { ID_NAME(IID_IWebBrowserPriv) },
388 { ID_NAME(IID_IWebBrowserPriv2) },
389 { ID_NAME(IID_IWinEventHandler), TRUE },
390
391 { ID_NAME(IID_DFConstraint), TRUE },
392 { ID_NAME(DIID__SearchAssistantEvents) },
393 { ID_NAME(DIID_DShellFolderViewEvents) },
394 { ID_NAME(DIID_DShellNameSpaceEvents) },
395 { ID_NAME(DIID_DShellWindowsEvents) },
396 { ID_NAME(DIID_DWebBrowserEvents) },
397 { ID_NAME(DIID_DWebBrowserEvents2) },
398 { ID_NAME(DIID_XMLDOMDocumentEvents ) },
399
400 { ID_NAME(IID_CDefView), TRUE },
401 { ID_NAME(IID_Folder) },
402 { ID_NAME(IID_Folder2) },
403 { ID_NAME(IID_Folder3) },
404 { ID_NAME(IID_FolderItem) },
405 { ID_NAME(IID_FolderItem2) },
406 { ID_NAME(IID_FolderItems) },
407 { ID_NAME(IID_FolderItems2) },
408 { ID_NAME(IID_FolderItems3) },
409 { ID_NAME(IID_FolderItemVerb) },
410 { ID_NAME(IID_FolderItemVerbs) },
411
412 { ID_NAME(CLSID_ShellDesktop), TRUE },
413
414 { ID_NAME(IID_IQueryContinue) },
415 { ID_NAME(IID_IUserNotification) },
416 { ID_NAME(IID_IUserNotificationCallback) }, // On Vista+
417 { ID_NAME(IID_IUserNotification2) }, // On Vista+
418
419 { ID_NAME(IID_IAggregateFilterCondition) },
420 { ID_NAME(IID_IAliasRegistrationCallback), TRUE },
421 { ID_NAME(IID_IAssociationArrayInitialize), TRUE },
422 { ID_NAME(IID_IAssociationList), TRUE },
423 { ID_NAME(IID_IBackReferencedObject), TRUE },
424 { ID_NAME(IID_IBasePropPage), TRUE },
425 { ID_NAME(IID_ICommonLayoutDefinition), TRUE },
426 { ID_NAME(IID_IControlPanelEnumerator), TRUE },
427 { ID_NAME(IID_IDelegateHostItemContainer), TRUE },
428 { ID_NAME(IID_IDrawPropertyControl), TRUE },
429 { ID_NAME(IID_IEnumAssociationElements), TRUE },
430 { ID_NAME(IID_IEnumerateAssociationElements),TRUE },
431 { ID_NAME(IID_IExecuteCommand), TRUE },
432 { ID_NAME(IID_IFilterCondition) },
433 { ID_NAME(IID_IFolderNotify), TRUE },
434 { ID_NAME(IID_IFolderProperties), TRUE },
435 { ID_NAME(IID_IFolderType), TRUE },
436 { ID_NAME(IID_IFolderWithSearchRoot), TRUE },
437 { ID_NAME(IID_IFrameLayoutDefinition), TRUE },
438 { ID_NAME(IID_IItemFilter), TRUE },
439 { ID_NAME(IID_IItemFilterOwner), TRUE },
440 { ID_NAME(IID_ILocalizableItemParent), TRUE },
441 { ID_NAME(IID_INewItemAdvisor), TRUE },
442 { ID_NAME(IID_IObjectWithAssociationElement),TRUE },
443 { ID_NAME(IID_IObjectWithAssociationList), TRUE },
444 { ID_NAME(IID_IObjectWithQuerySource), TRUE },
445 { ID_NAME(IID_IObjectWithSelection), TRUE },
446 { ID_NAME(IID_IPersistString2), TRUE },
447 { ID_NAME(IID_IPrinterFolder), TRUE },
448 { ID_NAME(IID_IPropertyControl), TRUE },
449 { ID_NAME(IID_IPropertyControlBase), TRUE },
450 { ID_NAME(IID_IPropertyControlSite), TRUE },
451 { ID_NAME(IID_IRegItemCustomAttributes), TRUE },
452 { ID_NAME(IID_IRegItemCustomEnumerator), TRUE },
453 { ID_NAME(IID_IRegItemFolder), TRUE },
454 { ID_NAME(IID_IRootAndRelativeParsingFolder),TRUE },
455 { ID_NAME(IID_IScope), TRUE },
456 { ID_NAME(IID_IScopeItem), TRUE },
457 { ID_NAME(IID_IShellBrowserServce), TRUE },
458 { ID_NAME(IID_IShellFolder3), TRUE },
459 { ID_NAME(IID_ITaskCondition), TRUE },
460 { ID_NAME(IID_ITaskConditionCombiner), TRUE },
461 { ID_NAME(IID_ITaskConditionInit), TRUE },
462 { ID_NAME(IID_ITransferProvider), TRUE },
463 { ID_NAME(IID_IUserEventTimer) },
464 { ID_NAME(IID_IUserEventTimerCallback) },
465 { ID_NAME(IID_IAssociationArrayOld), TRUE },
466 { ID_NAME(IID_IAssociationArray), TRUE },
467 #define IID_IDriveFolderExt IID_IDriveFolderExtOld
468 { ID_NAME(IID_IDriveFolderExt) },
469 #undef IID_IDriveFolderExt
470 { ID_NAME(IID_IPinnedListOld), TRUE },
471 { ID_NAME(IID_IPinnedList), TRUE },
472 { ID_NAME(IID_IAttachmentExecute), TRUE },
473 };
474 static const INT KnownInterfaceCount = RTL_NUMBER_OF(KnownInterfaces);
475
476 static
477 PCKNOWN_INTERFACE
478 FindInterface(
479 _In_ const IID *iid)
480 {
481 INT i;
482
483 for (i = 0; i < KnownInterfaceCount; i++)
484 if (IsEqualIID(KnownInterfaces[i].iid, iid))
485 return &KnownInterfaces[i];
486 ASSERT(i != KnownInterfaceCount);
487 return NULL;
488 }
489
490 static
491 BOOLEAN
492 IsInterfaceExpected(
493 _In_ PCCLASS_AND_INTERFACES class,
494 _In_ const IID *iid)
495 {
496 INT i;
497
498 for (i = 0; class->ifaces[i].iid; i++)
499 if (IsEqualIID(class->ifaces[i].iid, iid))
500 return TRUE;
501 return FALSE;
502 }
503
504 #define INTF_NOT_EXPOSED LONG_MAX
505 static
506 LONG
507 GetInterfaceOffset(
508 _In_ PUNKNOWN pUnk,
509 _In_ const IID *iid)
510 {
511 HRESULT hr;
512 PVOID pObj;
513 PUNKNOWN pUnk2;
514 LONG offset;
515
516 hr = IUnknown_QueryInterface(pUnk, iid, &pObj);
517 ok(hr == S_OK || hr == E_NOINTERFACE, "IUnknown::QueryInterface returned 0x%lx\n", hr);
518 if (FAILED(hr))
519 return INTF_NOT_EXPOSED;
520
521 pUnk2 = pObj;
522 offset = (LONG_PTR)pObj - (LONG_PTR)pUnk;
523 IUnknown_Release(pUnk2);
524 return offset;
525 }
526
527 static
528 VOID
529 TestModuleInterfaces(
530 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces,
531 _In_ INT ExpectedInterfaceCount)
532 {
533 HRESULT hr;
534 PVOID pObj;
535 PUNKNOWN pUnk;
536 INT iClass, iIntf;
537 PCCLASS_AND_INTERFACES class;
538
539 for (iClass = 0; iClass < ExpectedInterfaceCount; iClass++)
540 {
541 class = &ExpectedInterfaces[iClass];
542 hr = CoCreateInstance(class->clsid,
543 NULL,
544 CLSCTX_INPROC_SERVER,
545 &IID_IUnknown,
546 &pObj);
547 ok(hr == S_OK, "CoCreateInstance failed. hr=0x%lx\n", hr);
548 if (FAILED(hr))
549 {
550 skip("Failed to instantiate %s.\n", class->name);
551 continue;
552 }
553
554 pUnk = pObj;
555
556 /* Check that all expected interfaces are present and have the right offset */
557 for (iIntf = 0; class->ifaces[iIntf].iid; iIntf++)
558 {
559 PCKNOWN_INTERFACE iface = FindInterface(class->ifaces[iIntf].iid);
560 LONG offset = GetInterfaceOffset(pUnk, iface->iid);
561 if (offset == INTF_NOT_EXPOSED)
562 ok(0, "%s is missing %s (offset %ld)\n", class->name, iface->name, class->ifaces[iIntf].offset);
563 else if (class->ifaces[iIntf].offset != FARAWY)
564 {
565 #ifdef FAIL_WRONG_OFFSET
566 ok(offset == class->ifaces[iIntf].offset, "%s, %s offset is %ld, expected %ld\n", class->name, iface->name, offset, class->ifaces[iIntf].offset);
567 #else
568 if (offset != class->ifaces[iIntf].offset)
569 mytrace("%s, %s offset is %ld, expected %ld\n", class->name, iface->name, offset, class->ifaces[iIntf].offset);
570 #endif
571 }
572 }
573
574 /* Check that none other than the expected interfaces are present */
575 for (iIntf = 0; iIntf < KnownInterfaceCount; iIntf++)
576 {
577 PCKNOWN_INTERFACE iface = &KnownInterfaces[iIntf];
578 LONG offset;
579 if (IsInterfaceExpected(class, iface->iid))
580 continue;
581 offset = GetInterfaceOffset(pUnk, iface->iid);
582 #ifdef GENERATE_TABLE_ENTRIES
583 ok(offset == INTF_NOT_EXPOSED, "%s: { %s0x%lx, &%s },\n", class->name, offset < 0 ? "-" : "", offset < 0 ? -offset : offset, iface->name);
584 #else
585 ok(offset == INTF_NOT_EXPOSED, "%s exposes %s (offset %ld), but shouldn't\n", class->name, iface->name, offset);
586 #endif
587 }
588
589 // TODO: do some aggregation
590
591 IUnknown_Release(pUnk);
592 }
593 }
594
595 static
596 VOID
597 TestModuleRegistry(
598 _In_ PCWSTR ModuleName,
599 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces,
600 _In_ INT ExpectedInterfaceCount)
601 {
602 INT iClass;
603 PCCLASS_AND_INTERFACES class;
604 HKEY hKeyClasses;
605 LONG result;
606
607 result = RegOpenKeyExW(HKEY_LOCAL_MACHINE, L"Software\\Classes\\CLSID", 0, KEY_ENUMERATE_SUB_KEYS, &hKeyClasses);
608 ok(result == NO_ERROR, "Failed to open classes key, error %lu\n", result);
609 if (!myskip(result == NO_ERROR, "No classes key\n"))
610 {
611 for (iClass = 0; iClass < ExpectedInterfaceCount; iClass++)
612 {
613 HKEY hKey;
614 HKEY hKeyServer;
615 NTSTATUS status;
616 UNICODE_STRING clsid;
617 DWORD type;
618 WCHAR data[100];
619 DWORD dataSize;
620 PCWSTR expectedThreadingModel;
621
622 class = &ExpectedInterfaces[iClass];
623 status = RtlStringFromGUID(class->clsid, &clsid);
624 ok(status == STATUS_SUCCESS, "Failed to convert guid to string for %s, status %lx\n", class->name, status);
625 if (myskip(NT_SUCCESS(status), "No guid string\n"))
626 continue;
627
628 result = RegOpenKeyExW(hKeyClasses, clsid.Buffer, 0, KEY_ENUMERATE_SUB_KEYS, &hKey);
629 ok(result == NO_ERROR, "Failed to open key for %s, error %lu\n", class->name, result);
630 RtlFreeUnicodeString(&clsid);
631 if (myskip(result == NO_ERROR, "No key\n"))
632 continue;
633
634 result = RegOpenKeyExW(hKey, L"InProcServer32", 0, KEY_QUERY_VALUE, &hKeyServer);
635 ok(result == NO_ERROR, "Failed to open key for %s, error %lu\n", class->name, result);
636 RegCloseKey(hKey);
637 if (myskip(result == NO_ERROR, "No key\n"))
638 continue;
639
640 dataSize = sizeof(data);
641 result = RegQueryValueExW(hKeyServer, NULL, NULL, &type, (PBYTE)data, &dataSize);
642 ok(result == NO_ERROR, "Failed to query value for %s, error %lu\n", class->name, result);
643 if (!myskip(result == NO_ERROR, "No module name\n"))
644 {
645 ok(type == REG_SZ || type == REG_EXPAND_SZ, "type %lu for %s\n", type, class->name);
646 ok(dataSize % sizeof(WCHAR) == 0, "size %lu for %s\n", dataSize, class->name);
647 ok(dataSize <= sizeof(data), "size %lu for %s\n", dataSize, class->name);
648 ok(data[dataSize / sizeof(WCHAR) - 1] == UNICODE_NULL, "Not null terminated for %s\n", class->name);
649 // TODO: Use SearchPath (or assume everything's in system32) and do a proper full path compare
650 PathStripPathW(data);
651 PathRemoveExtensionW(data);
652 ok(!wcsicmp(data, ModuleName), "Server is %ls, expected %ls for %s\n", data, ModuleName, class->name);
653 }
654
655 dataSize = sizeof(data);
656 result = RegQueryValueExW(hKeyServer, L"ThreadingModel", NULL, &type, (PBYTE)data, &dataSize);
657 ok(result == NO_ERROR, "Failed to query value for %s, error %lu\n", class->name, result);
658 if (!myskip(result == NO_ERROR, "No ThreadingModel\n"))
659 {
660 ok(type == REG_SZ || type == REG_EXPAND_SZ, "type %lu for %s\n", type, class->name);
661 ok(dataSize % sizeof(WCHAR) == 0, "size %lu for %s\n", dataSize, class->name);
662 ok(dataSize <= sizeof(data), "size %lu for %s\n", dataSize, class->name);
663 ok(data[dataSize / sizeof(WCHAR) - 1] == UNICODE_NULL, "Not null terminated for %s\n", class->name);
664 expectedThreadingModel = class->ThreadingModel;
665 if (!expectedThreadingModel)
666 expectedThreadingModel = L"Apartment";
667 ok(!wcsicmp(data, expectedThreadingModel), "Server is %ls, expected %ls for %s\n", data, expectedThreadingModel, class->name);
668 }
669
670 RegCloseKey(hKeyServer);
671 }
672 RegCloseKey(hKeyClasses);
673 }
674 }
675
676 static
677 VOID
678 TestManualInstantiation(
679 _In_ PCWSTR ModuleName,
680 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces,
681 _In_ INT ExpectedInterfaceCount)
682 {
683 INT iClass;
684 PCCLASS_AND_INTERFACES class;
685 HRESULT (__stdcall *DllGetClassObject)(REFCLSID, REFIID, PVOID *);
686
687 DllGetClassObject = (PVOID)GetProcAddress(GetModuleHandleW(ModuleName), "DllGetClassObject");
688 ok(DllGetClassObject != NULL, "DllGetClassObject not found in %ls, error %lu\n", ModuleName, GetLastError());
689 if (myskip(DllGetClassObject != NULL, "No DllGetClassObject\n"))
690 return;
691
692 for (iClass = 0; iClass < ExpectedInterfaceCount; iClass++)
693 {
694 PVOID pv;
695 HRESULT hr;
696 class = &ExpectedInterfaces[iClass];
697 hr = DllGetClassObject(class->clsid, &IID_IClassFactory, &pv);
698 ok(hr == S_OK, "DllGetClassObject failed for %s, hr = 0x%lx\n", class->name, hr);
699 if (!myskip(SUCCEEDED(hr), "No class factory\n"))
700 {
701 IClassFactory *pCF = pv;
702 hr = IClassFactory_CreateInstance(pCF, NULL, &IID_IUnknown, &pv);
703 ok(hr == S_OK, "IClassFactory::CreateInstance failed for %s, hr = 0x%lx\n", class->name, hr);
704 if (!myskip(SUCCEEDED(hr), "No instance\n"))
705 {
706 IUnknown *pUnk = pv;
707 IUnknown_Release(pUnk);
708 }
709 IClassFactory_Release(pCF);
710 }
711 }
712 }
713
714 VOID
715 TestClasses(
716 _In_ PCWSTR ModuleName,
717 _In_ PCCLASS_AND_INTERFACES ExpectedInterfaces,
718 _In_ INT ExpectedInterfaceCount)
719 {
720 HRESULT hr;
721
722 hr = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
723 ok(hr == S_OK, "CoInitializeEx failed. hr=0x%lx\n", hr);
724 if (myskip(SUCCEEDED(hr), "Failed to initialize COM. Cannot perform tests\n"))
725 return;
726
727 TestModuleInterfaces(ExpectedInterfaces, ExpectedInterfaceCount);
728 TestModuleRegistry(ModuleName, ExpectedInterfaces, ExpectedInterfaceCount);
729 TestManualInstantiation(ModuleName, ExpectedInterfaces, ExpectedInterfaceCount);
730
731 CoUninitialize();
732 }
733
734 static
735 VOID
736 TestInterfaceRegistry(
737 _In_ PCKNOWN_INTERFACE Interfaces,
738 _In_ INT InterfaceCount)
739 {
740 INT i;
741 HKEY hKeyInterface;
742 LONG result;
743
744 result = RegOpenKeyExW(HKEY_LOCAL_MACHINE, L"Software\\Classes\\Interface", 0, KEY_ENUMERATE_SUB_KEYS, &hKeyInterface);
745 ok(result == NO_ERROR, "Failed to open interface key, error %lu\n", result);
746 if (!myskip(result == NO_ERROR, "No interface key\n"))
747 {
748 for (i = 0; i < InterfaceCount; i++)
749 {
750 HKEY hKey;
751 NTSTATUS status;
752 UNICODE_STRING iid;
753 DWORD type;
754 WCHAR data[100];
755 DWORD dataSize;
756 PCKNOWN_INTERFACE iface;
757 PCWSTR expectedName;
758
759 iface = &Interfaces[i];
760 status = RtlStringFromGUID(iface->iid, &iid);
761 ok(status == STATUS_SUCCESS, "Failed to convert guid to string for %s, status %lx\n", iface->name, status);
762 if (myskip(NT_SUCCESS(status), "No guid string\n"))
763 continue;
764
765 result = RegOpenKeyExW(hKeyInterface, iid.Buffer, 0, KEY_QUERY_VALUE, &hKey);
766 if (iface->noreg)
767 {
768 ok(result == ERROR_FILE_NOT_FOUND, "RegOpenKeyEx returned %lu for %s\n", result, iface->name);
769 }
770 else
771 {
772 ok(result == NO_ERROR, "Failed to open key for %s, error %lu\n", iface->name, result);
773 (void)myskip(result == NO_ERROR, "No key\n");
774 }
775 RtlFreeUnicodeString(&iid);
776 if (result != NO_ERROR)
777 continue;
778
779 dataSize = sizeof(data);
780 result = RegQueryValueExW(hKey, NULL, NULL, &type, (PBYTE)data, &dataSize);
781 ok(result == NO_ERROR, "Failed to query value for %s, error %lu\n", iface->name, result);
782 if (!myskip(result == NO_ERROR, "No module name\n"))
783 {
784 ok(type == REG_SZ, "type %lu for %s\n", type, iface->name);
785 ok(dataSize % sizeof(WCHAR) == 0, "size %lu for %s\n", dataSize, iface->name);
786 ok(dataSize <= sizeof(data), "size %lu for %s\n", dataSize, iface->name);
787 ok(data[dataSize / sizeof(WCHAR) - 1] == UNICODE_NULL, "Not null terminated for %s\n", iface->name);
788 expectedName = wcschr(iface->wname, L'_');
789 if (expectedName)
790 expectedName++;
791 else
792 expectedName = iface->wname;
793 ok(!wcsicmp(data, expectedName), "Name is %ls, expected %ls\n", data, expectedName);
794 }
795
796 RegCloseKey(hKey);
797 }
798 RegCloseKey(hKeyInterface);
799 }
800 }
801
802 START_TEST(interfaces)
803 {
804 TestInterfaceRegistry(KnownInterfaces, KnownInterfaceCount);
805 }