dlls/dxdiagn/provider.c

   1 /*
   2  * IDxDiagProvider Implementation
   3  *
   4  * Copyright 2004-2005 Raphael Junqueira
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  *
  20  */
  21
  22 #include "config.h"
  23
  24 #define COBJMACROS
  25 #define NONAMELESSUNION
  26 #include "dxdiag_private.h"
  27 #include "wine/unicode.h"
  28 #include "winver.h"
  29 #include "objidl.h"
  30 #include "dshow.h"
  31 #include "strmif.h"
  32 #include "vfw.h"
  33 #include "mmddk.h"
  34 #include "ddraw.h"
  35
  36 #include "wine/debug.h"
  37
  38 WINE_DEFAULT_DEBUG_CHANNEL(dxdiag);
  39
  40 static HRESULT DXDiag_InitRootDXDiagContainer(IDxDiagContainer* pRootCont);
  41
  42 /* IDxDiagProvider IUnknown parts follow: */
  43 static HRESULT WINAPI IDxDiagProviderImpl_QueryInterface(PDXDIAGPROVIDER iface, REFIID riid, LPVOID *ppobj)
  44 {
  45     IDxDiagProviderImpl *This = (IDxDiagProviderImpl *)iface;
  46
  47     if (IsEqualGUID(riid, &IID_IUnknown)
  48         || IsEqualGUID(riid, &IID_IDxDiagProvider)) {
  49         IUnknown_AddRef(iface);
  50         *ppobj = This;
  51         return S_OK;
  52     }
  53
  54     WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppobj);
  55     return E_NOINTERFACE;
  56 }
  57
  58 static ULONG WINAPI IDxDiagProviderImpl_AddRef(PDXDIAGPROVIDER iface) {
  59     IDxDiagProviderImpl *This = (IDxDiagProviderImpl *)iface;
  60     ULONG refCount = InterlockedIncrement(&This->ref);
  61
  62     TRACE("(%p)->(ref before=%u)\n", This, refCount - 1);
  63
  64     DXDIAGN_LockModule();
  65
  66     return refCount;
  67 }
  68
  69 static ULONG WINAPI IDxDiagProviderImpl_Release(PDXDIAGPROVIDER iface) {
  70     IDxDiagProviderImpl *This = (IDxDiagProviderImpl *)iface;
  71     ULONG refCount = InterlockedDecrement(&This->ref);
  72
  73     TRACE("(%p)->(ref before=%u)\n", This, refCount + 1);
  74
  75     if (!refCount) {
  76         HeapFree(GetProcessHeap(), 0, This);
  77     }
  78
  79     DXDIAGN_UnlockModule();
  80
  81     return refCount;
  82 }
  83
  84 /* IDxDiagProvider Interface follow: */
  85 static HRESULT WINAPI IDxDiagProviderImpl_Initialize(PDXDIAGPROVIDER iface, DXDIAG_INIT_PARAMS* pParams) {
  86     IDxDiagProviderImpl *This = (IDxDiagProviderImpl *)iface;
  87     TRACE("(%p,%p)\n", iface, pParams);
  88
  89     if (NULL == pParams) {
  90       return E_POINTER;
  91     }
  92     if (pParams->dwSize != sizeof(DXDIAG_INIT_PARAMS)) {
  93       return E_INVALIDARG;
  94     }
  95
  96     This->init = TRUE;
  97     memcpy(&This->params, pParams, pParams->dwSize);
  98     return S_OK;
  99 }
 100
 101 static HRESULT WINAPI IDxDiagProviderImpl_GetRootContainer(PDXDIAGPROVIDER iface, IDxDiagContainer** ppInstance) {
 102   HRESULT hr = S_OK;
 103   IDxDiagProviderImpl *This = (IDxDiagProviderImpl *)iface;
 104   TRACE("(%p,%p)\n", iface, ppInstance);
 105
 106   if (NULL == ppInstance) {
 107     return E_INVALIDARG;
 108   }
 109   if (FALSE == This->init) {
 110     return E_INVALIDARG; /* should be E_CO_UNINITIALIZED */
 111   }
 112   if (NULL == This->pRootContainer) {
 113     hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &This->pRootContainer);
 114     if (FAILED(hr)) {
 115       return hr;
 116     }
 117     hr = DXDiag_InitRootDXDiagContainer(This->pRootContainer);
 118   }
 119   return IDxDiagContainerImpl_QueryInterface((PDXDIAGCONTAINER)This->pRootContainer, &IID_IDxDiagContainer, (void**) ppInstance);
 120 }
 121
 122 static const IDxDiagProviderVtbl DxDiagProvider_Vtbl =
 123 {
 124     IDxDiagProviderImpl_QueryInterface,
 125     IDxDiagProviderImpl_AddRef,
 126     IDxDiagProviderImpl_Release,
 127     IDxDiagProviderImpl_Initialize,
 128     IDxDiagProviderImpl_GetRootContainer
 129 };
 130
 131 HRESULT DXDiag_CreateDXDiagProvider(LPCLASSFACTORY iface, LPUNKNOWN punkOuter, REFIID riid, LPVOID *ppobj) {
 132   IDxDiagProviderImpl* provider;
 133
 134   TRACE("(%p, %s, %p)\n", punkOuter, debugstr_guid(riid), ppobj);
 135
 136   provider = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDxDiagProviderImpl));
 137   if (NULL == provider) {
 138     *ppobj = NULL;
 139     return E_OUTOFMEMORY;
 140   }
 141   provider->lpVtbl = &DxDiagProvider_Vtbl;
 142   provider->ref = 0; /* will be inited with QueryInterface */
 143   return IDxDiagProviderImpl_QueryInterface ((PDXDIAGPROVIDER)provider, riid, ppobj);
 144 }
 145
 146 static inline HRESULT add_prop_str( IDxDiagContainer* cont, LPCWSTR prop, LPCWSTR str )
 147 {
 148     HRESULT hr;
 149     VARIANT var;
 150
 151     V_VT( &var ) = VT_BSTR;
 152     V_BSTR( &var ) = SysAllocString( str );
 153     hr = IDxDiagContainerImpl_AddProp( cont, prop, &var );
 154     VariantClear( &var );
 155
 156     return hr;
 157 }
 158
 159 static inline HRESULT add_prop_ui4( IDxDiagContainer* cont, LPCWSTR prop, DWORD data )
 160 {
 161     VARIANT var;
 162
 163     V_VT( &var ) = VT_UI4;
 164     V_UI4( &var ) = data;
 165     return IDxDiagContainerImpl_AddProp( cont, prop, &var );
 166 }
 167
 168 static inline HRESULT add_prop_bool( IDxDiagContainer* cont, LPCWSTR prop, BOOL data )
 169 {
 170     VARIANT var;
 171
 172     V_VT( &var ) = VT_BOOL;
 173     V_BOOL( &var ) = data;
 174     return IDxDiagContainerImpl_AddProp( cont, prop, &var );
 175 }
 176
 177 static inline HRESULT add_prop_ull_as_str( IDxDiagContainer* cont, LPCWSTR prop, ULONGLONG data )
 178 {
 179     HRESULT hr;
 180     VARIANT var;
 181
 182     V_VT( &var ) = VT_UI8;
 183     V_UI8( &var ) = data;
 184     VariantChangeType( &var, &var, 0, VT_BSTR );
 185     hr = IDxDiagContainerImpl_AddProp( cont, prop, &var );
 186     VariantClear( &var );
 187
 188     return hr;
 189 }
 190
 191 /**
 192  * @param szFilePath: usually GetSystemDirectoryW
 193  * @param szFileName: name of the dll without path
 194  */
 195 static HRESULT DXDiag_AddFileDescContainer(IDxDiagContainer* pSubCont, const WCHAR* szFilePath, const WCHAR* szFileName) {
 196   HRESULT hr = S_OK;
 197   /**/
 198   static const WCHAR szSlashSep[] = {'\\',0};
 199   static const WCHAR szPath[] = {'s','z','P','a','t','h',0};
 200   static const WCHAR szName[] = {'s','z','N','a','m','e',0};
 201   static const WCHAR szVersion[] = {'s','z','V','e','r','s','i','o','n',0};
 202   static const WCHAR szAttributes[] = {'s','z','A','t','t','r','i','b','u','t','e','s',0};
 203   static const WCHAR szLanguageEnglish[] = {'s','z','L','a','n','g','u','a','g','e','E','n','g','l','i','s','h',0};
 204   static const WCHAR dwFileTimeHigh[] = {'d','w','F','i','l','e','T','i','m','e','H','i','g','h',0};
 205   static const WCHAR dwFileTimeLow[] = {'d','w','F','i','l','e','T','i','m','e','L','o','w',0};
 206   static const WCHAR bBeta[] = {'b','B','e','t','a',0};
 207   static const WCHAR bDebug[] = {'b','D','e','b','u','g',0};
 208   static const WCHAR bExists[] = {'b','E','x','i','s','t','s',0};
 209   /** values */
 210   static const WCHAR szFinal_Retail_v[] = {'F','i','n','a','l',' ','R','e','t','a','i','l',0};
 211   static const WCHAR szEnglish_v[] = {'E','n','g','l','i','s','h',0};
 212   static const WCHAR szVersionFormat[] = {'%','u','.','%','0','2','u','.','%','0','4','u','.','%','0','4','u',0};
 213
 214   WCHAR szFile[512];
 215   WCHAR szVersion_v[1024];
 216   DWORD retval, hdl;
 217   LPVOID pVersionInfo;
 218   BOOL boolret;
 219   UINT uiLength;
 220   VS_FIXEDFILEINFO* pFileInfo;
 221
 222   TRACE("(%p,%s)\n", pSubCont, debugstr_w(szFileName));
 223
 224   lstrcpyW(szFile, szFilePath);
 225   lstrcatW(szFile, szSlashSep);
 226   lstrcatW(szFile, szFileName);
 227
 228   retval = GetFileVersionInfoSizeW(szFile, &hdl);
 229   pVersionInfo = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, retval);
 230   boolret = GetFileVersionInfoW(szFile, 0, retval, pVersionInfo);
 231   boolret = VerQueryValueW(pVersionInfo, szSlashSep, (LPVOID) &pFileInfo, &uiLength);
 232
 233   add_prop_str(pSubCont, szPath, szFile);
 234   add_prop_str(pSubCont, szName, szFileName);
 235   add_prop_bool(pSubCont, bExists, boolret);
 236
 237   if (boolret) {
 238     snprintfW(szVersion_v, sizeof(szVersion_v)/sizeof(szVersion_v[0]),
 239               szVersionFormat,
 240               HIWORD(pFileInfo->dwFileVersionMS),
 241               LOWORD(pFileInfo->dwFileVersionMS),
 242               HIWORD(pFileInfo->dwFileVersionLS),
 243               LOWORD(pFileInfo->dwFileVersionLS));
 244
 245     TRACE("Found version as (%s)\n", debugstr_w(szVersion_v));
 246
 247     add_prop_str(pSubCont, szVersion,         szVersion_v);
 248     add_prop_str(pSubCont, szAttributes,      szFinal_Retail_v);
 249     add_prop_str(pSubCont, szLanguageEnglish, szEnglish_v);
 250     add_prop_ui4(pSubCont, dwFileTimeHigh,    pFileInfo->dwFileDateMS);
 251     add_prop_ui4(pSubCont, dwFileTimeLow,     pFileInfo->dwFileDateLS);
 252     add_prop_bool(pSubCont, bBeta,  0 != ((pFileInfo->dwFileFlags & pFileInfo->dwFileFlagsMask) & VS_FF_PRERELEASE));
 253     add_prop_bool(pSubCont, bDebug, 0 != ((pFileInfo->dwFileFlags & pFileInfo->dwFileFlagsMask) & VS_FF_DEBUG));
 254   }
 255
 256   HeapFree(GetProcessHeap(), 0, pVersionInfo);
 257
 258   return hr;
 259 }
 260
 261 static HRESULT DXDiag_InitDXDiagSystemInfoContainer(IDxDiagContainer* pSubCont) {
 262   static const WCHAR dwDirectXVersionMajor[] = {'d','w','D','i','r','e','c','t','X','V','e','r','s','i','o','n','M','a','j','o','r',0};
 263   static const WCHAR dwDirectXVersionMinor[] = {'d','w','D','i','r','e','c','t','X','V','e','r','s','i','o','n','M','i','n','o','r',0};
 264   static const WCHAR szDirectXVersionLetter[] = {'s','z','D','i','r','e','c','t','X','V','e','r','s','i','o','n','L','e','t','t','e','r',0};
 265   static const WCHAR szDirectXVersionLetter_v[] = {'c',0};
 266   static const WCHAR bDebug[] = {'b','D','e','b','u','g',0};
 267   static const WCHAR szDirectXVersionEnglish[] = {'s','z','D','i','r','e','c','t','X','V','e','r','s','i','o','n','E','n','g','l','i','s','h',0};
 268   static const WCHAR szDirectXVersionEnglish_v[] = {'4','.','0','9','.','0','0','0','0','.','0','9','0','4',0};
 269   static const WCHAR szDirectXVersionLongEnglish[] = {'s','z','D','i','r','e','c','t','X','V','e','r','s','i','o','n','L','o','n','g','E','n','g','l','i','s','h',0};
 270   static const WCHAR szDirectXVersionLongEnglish_v[] = {'=',' ','"','D','i','r','e','c','t','X',' ','9','.','0','c',' ','(','4','.','0','9','.','0','0','0','0','.','0','9','0','4',')',0};
 271   static const WCHAR ullPhysicalMemory[] = {'u','l','l','P','h','y','s','i','c','a','l','M','e','m','o','r','y',0};
 272   static const WCHAR ullUsedPageFile[]   = {'u','l','l','U','s','e','d','P','a','g','e','F','i','l','e',0};
 273   static const WCHAR ullAvailPageFile[]  = {'u','l','l','A','v','a','i','l','P','a','g','e','F','i','l','e',0};
 274   /*static const WCHAR szDxDiagVersion[] = {'s','z','D','x','D','i','a','g','V','e','r','s','i','o','n',0};*/
 275   static const WCHAR szWindowsDir[] = {'s','z','W','i','n','d','o','w','s','D','i','r',0};
 276   static const WCHAR dwOSMajorVersion[] = {'d','w','O','S','M','a','j','o','r','V','e','r','s','i','o','n',0};
 277   static const WCHAR dwOSMinorVersion[] = {'d','w','O','S','M','i','n','o','r','V','e','r','s','i','o','n',0};
 278   static const WCHAR dwOSBuildNumber[] = {'d','w','O','S','B','u','i','l','d','N','u','m','b','e','r',0};
 279   static const WCHAR dwOSPlatformID[] = {'d','w','O','S','P','l','a','t','f','o','r','m','I','D',0};
 280   static const WCHAR szCSDVersion[] = {'s','z','C','S','D','V','e','r','s','i','o','n',0};
 281   MEMORYSTATUSEX msex;
 282   OSVERSIONINFOW info;
 283   WCHAR buffer[MAX_PATH];
 284
 285   add_prop_ui4(pSubCont, dwDirectXVersionMajor, 9);
 286   add_prop_ui4(pSubCont, dwDirectXVersionMinor, 0);
 287   add_prop_str(pSubCont, szDirectXVersionLetter, szDirectXVersionLetter_v);
 288   add_prop_str(pSubCont, szDirectXVersionEnglish, szDirectXVersionEnglish_v);
 289   add_prop_str(pSubCont, szDirectXVersionLongEnglish, szDirectXVersionLongEnglish_v);
 290   add_prop_bool(pSubCont, bDebug, FALSE);
 291
 292   msex.dwLength = sizeof(msex);
 293   GlobalMemoryStatusEx( &msex );
 294   add_prop_ull_as_str(pSubCont, ullPhysicalMemory, msex.ullTotalPhys);
 295   add_prop_ull_as_str(pSubCont, ullUsedPageFile, msex.ullTotalPageFile - msex.ullAvailPageFile);
 296   add_prop_ull_as_str(pSubCont, ullAvailPageFile, msex.ullAvailPageFile);
 297
 298   info.dwOSVersionInfoSize = sizeof(info);
 299   GetVersionExW( &info );
 300   add_prop_ui4(pSubCont, dwOSMajorVersion, info.dwMajorVersion);
 301   add_prop_ui4(pSubCont, dwOSMinorVersion, info.dwMinorVersion);
 302   add_prop_ui4(pSubCont, dwOSBuildNumber,  info.dwBuildNumber);
 303   add_prop_ui4(pSubCont, dwOSPlatformID,   info.dwPlatformId);
 304   add_prop_str(pSubCont, szCSDVersion,     info.szCSDVersion);
 305
 306   GetWindowsDirectoryW(buffer, MAX_PATH);
 307   add_prop_str(pSubCont, szWindowsDir, buffer);
 308
 309   return S_OK;
 310 }
 311
 312 static HRESULT DXDiag_InitDXDiagSystemDevicesContainer(IDxDiagContainer* pSubCont) {
 313   HRESULT hr = S_OK;
 314   /*
 315   static const WCHAR szDescription[] = {'s','z','D','e','s','c','r','i','p','t','i','o','n',0};
 316   static const WCHAR szDeviceID[] = {'s','z','D','e','v','i','c','e','I','D',0};
 317
 318   static const WCHAR szDrivers[] = {'s','z','D','r','i','v','e','r','s',0};
 319
 320   VARIANT v;
 321   IDxDiagContainer* pDeviceSubCont = NULL;
 322   IDxDiagContainer* pDriversCont = NULL;
 323
 324   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pDeviceSubCont);
 325   if (FAILED(hr)) { return hr; }
 326   V_VT(pvarProp) = VT_BSTR; V_BSTR(pvarProp) = SysAllocString(property->psz);
 327   hr = IDxDiagContainerImpl_AddProp(pDeviceSubCont, szDescription, &v);
 328   VariantClear(&v);
 329   V_VT(pvarProp) = VT_BSTR; V_BSTR(pvarProp) = SysAllocString(property->psz);
 330   hr = IDxDiagContainerImpl_AddProp(pDeviceSubCont, szDeviceID, &v);
 331   VariantClear(&v);
 332
 333   hr = IDxDiagContainerImpl_AddChildContainer(pSubCont, "", pDeviceSubCont);
 334   */
 335
 336   /*
 337    * Drivers Cont contains Files Desc Containers
 338    */
 339   /*
 340   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pDriversCont);
 341   if (FAILED(hr)) { return hr; }
 342   hr = IDxDiagContainerImpl_AddChildContainer(pDeviceSubCont, szDrivers, pDriversCont);
 343
 344   */
 345   return hr;
 346 }
 347
 348 static HRESULT DXDiag_InitDXDiagLogicalDisksContainer(IDxDiagContainer* pSubCont) {
 349   HRESULT hr = S_OK;
 350   /*
 351   static const WCHAR szDriveLetter[] = {'s','z','D','r','i','v','e','L','e','t','t','e','r',0};
 352   static const WCHAR szFreeSpace[] = {'s','z','F','r','e','e','S','p','a','c','e',0};
 353   static const WCHAR szMaxSpace[] = {'s','z','M','a','x','S','p','a','c','e',0};
 354   static const WCHAR szFileSystem[] = {'s','z','F','i','l','e','S','y','s','t','e','m',0};
 355   static const WCHAR szModel[] = {'s','z','M','o','d','e','l',0};
 356   static const WCHAR szPNPDeviceID[] = {'s','z','P','N','P','D','e','v','i','c','e','I','D',0};
 357   static const WCHAR dwHardDriveIndex[] = {'d','w','H','a','r','d','D','r','i','v','e','I','n','d','e','x',0};
 358
 359   static const WCHAR szDrivers[] = {'s','z','D','r','i','v','e','r','s',0};
 360
 361   VARIANT v;
 362   IDxDiagContainer* pDiskSubCont = NULL;
 363   IDxDiagContainer* pDriversCont = NULL;
 364
 365   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pDiskSubCont);
 366   if (FAILED(hr)) { return hr; }
 367   hr = IDxDiagContainerImpl_AddChildContainer(pSubCont, "" , pDiskSubCont);
 368   */
 369
 370   /*
 371    * Drivers Cont contains Files Desc Containers
 372    */
 373   /*
 374   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pDriversCont);
 375   if (FAILED(hr)) { return hr; }
 376   hr = IDxDiagContainerImpl_AddChildContainer(pDeviceSubCont, szDrivers, pDriversCont);
 377   */
 378   return hr;
 379 }
 380
 381 static HRESULT DXDiag_InitDXDiagDirectXFilesContainer(IDxDiagContainer* pSubCont)
 382 {
 383     HRESULT hr = S_OK;
 384     static const WCHAR dlls[][15] =
 385     {
 386         {'d','3','d','8','.','d','l','l',0},
 387         {'d','3','d','9','.','d','l','l',0},
 388         {'d','d','r','a','w','.','d','l','l',0},
 389         {'d','e','v','e','n','u','m','.','d','l','l',0},
 390         {'d','i','n','p','u','t','8','.','d','l','l',0},
 391         {'d','i','n','p','u','t','.','d','l','l',0},
 392         {'d','m','b','a','n','d','.','d','l','l',0},
 393         {'d','m','c','o','m','p','o','s','.','d','l','l',0},
 394         {'d','m','i','m','e','.','d','l','l',0},
 395         {'d','m','l','o','a','d','e','r','.','d','l','l',0},
 396         {'d','m','s','c','r','i','p','t','.','d','l','l',0},
 397         {'d','m','s','t','y','l','e','.','d','l','l',0},
 398         {'d','m','s','y','n','t','h','.','d','l','l',0},
 399         {'d','m','u','s','i','c','.','d','l','l',0},
 400         {'d','p','l','a','y','x','.','d','l','l',0},
 401         {'d','p','n','e','t','.','d','l','l',0},
 402         {'d','s','o','u','n','d','.','d','l','l',0},
 403         {'d','s','w','a','v','e','.','d','l','l',0},
 404         {'q','u','a','r','t','z','.','d','l','l',0}
 405     };
 406     WCHAR szFilePath[MAX_PATH];
 407     INT i;
 408
 409     GetSystemDirectoryW(szFilePath, MAX_PATH);
 410
 411     for (i = 0; i < sizeof(dlls) / sizeof(dlls[0]); i++)
 412     {
 413         static const WCHAR szFormat[] = {'%','d',0};
 414         WCHAR szFileID[5];
 415         IDxDiagContainer *pDXFileSubCont;
 416
 417         snprintfW(szFileID, sizeof(szFileID)/sizeof(szFileID[0]), szFormat, i);
 418
 419         hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pDXFileSubCont);
 420         if (FAILED(hr)) continue;
 421
 422         if (FAILED(DXDiag_AddFileDescContainer(pDXFileSubCont, szFilePath, dlls[i])) ||
 423             FAILED(IDxDiagContainerImpl_AddChildContainer(pSubCont, szFileID, pDXFileSubCont)))
 424         {
 425             IUnknown_Release(pDXFileSubCont);
 426             continue;
 427         }
 428     }
 429     return hr;
 430 }
 431
 432 static HRESULT DXDiag_InitDXDiagDisplayContainer(IDxDiagContainer* pSubCont)
 433 {
 434     static const WCHAR szDescription[] = {'s','z','D','e','s','c','r','i','p','t','i','o','n',0};
 435     static const WCHAR szDeviceName[] = {'s','z','D','e','v','i','c','e','N','a','m','e',0};
 436     static const WCHAR szKeyDeviceID[] = {'s','z','K','e','y','D','e','v','i','c','e','I','D',0};
 437     static const WCHAR szKeyDeviceKey[] = {'s','z','K','e','y','D','e','v','i','c','e','K','e','y',0};
 438     static const WCHAR szVendorId[] = {'s','z','V','e','n','d','o','r','I','d',0};
 439     static const WCHAR szDeviceId[] = {'s','z','D','e','v','i','c','e','I','d',0};
 440     static const WCHAR dwWidth[] = {'d','w','W','i','d','t','h',0};
 441     static const WCHAR dwHeight[] = {'d','w','H','e','i','g','h','t',0};
 442     static const WCHAR dwBpp[] = {'d','w','B','p','p',0};
 443     static const WCHAR szDisplayMemoryLocalized[] = {'s','z','D','i','s','p','l','a','y','M','e','m','o','r','y','L','o','c','a','l','i','z','e','d',0};
 444     static const WCHAR szDisplayMemoryEnglish[] = {'s','z','D','i','s','p','l','a','y','M','e','m','o','r','y','E','n','g','l','i','s','h',0};
 445
 446     static const WCHAR szAdapterID[] = {'0',0};
 447     static const WCHAR szEmpty[] = {0};
 448
 449     HRESULT                 hr;
 450     IDxDiagContainer       *pDisplayAdapterSubCont = NULL;
 451
 452     IDirectDraw7           *pDirectDraw;
 453     DDSCAPS2                dd_caps;
 454     DISPLAY_DEVICEW         disp_dev;
 455     DDSURFACEDESC2          surface_descr;
 456     DWORD                   tmp;
 457     WCHAR                   buffer[256];
 458
 459     hr = DXDiag_CreateDXDiagContainer( &IID_IDxDiagContainer, (void**) &pDisplayAdapterSubCont );
 460     if (FAILED( hr )) return hr;
 461     hr = IDxDiagContainerImpl_AddChildContainer( pSubCont, szAdapterID, pDisplayAdapterSubCont );
 462     if (FAILED( hr )) return hr;
 463
 464     if (EnumDisplayDevicesW( NULL, 0, &disp_dev, 0 ))
 465     {
 466         add_prop_str( pDisplayAdapterSubCont, szDeviceName, disp_dev.DeviceName );
 467         add_prop_str( pDisplayAdapterSubCont, szDescription, disp_dev.DeviceString );
 468     }
 469
 470     hr = DirectDrawCreateEx( NULL, (LPVOID *)&pDirectDraw, &IID_IDirectDraw7, NULL);
 471     if (FAILED( hr )) return hr;
 472
 473     dd_caps.dwCaps = DDSCAPS_LOCALVIDMEM | DDSCAPS_VIDEOMEMORY;
 474     dd_caps.dwCaps2 = dd_caps.dwCaps3 = dd_caps.dwCaps4 = 0;
 475     hr = IDirectDraw7_GetAvailableVidMem( pDirectDraw, &dd_caps, &tmp, NULL );
 476     if (SUCCEEDED(hr))
 477     {
 478         static const WCHAR mem_fmt[] = {'%','.','1','f',' ','M','B',0};
 479
 480         snprintfW( buffer, sizeof(buffer)/sizeof(buffer[0]), mem_fmt, ((float)tmp) / 1000000.0 );
 481         add_prop_str( pDisplayAdapterSubCont, szDisplayMemoryLocalized, buffer );
 482         add_prop_str( pDisplayAdapterSubCont, szDisplayMemoryEnglish, buffer );
 483     }
 484
 485     surface_descr.dwSize = sizeof(surface_descr);
 486     hr = IDirectDraw7_GetDisplayMode( pDirectDraw, &surface_descr );
 487     if (SUCCEEDED(hr))
 488     {
 489         if (surface_descr.dwFlags & DDSD_WIDTH)
 490             add_prop_ui4( pDisplayAdapterSubCont, dwWidth, surface_descr.dwWidth );
 491         if (surface_descr.dwFlags & DDSD_HEIGHT)
 492             add_prop_ui4( pDisplayAdapterSubCont, dwHeight, surface_descr.dwHeight );
 493         if (surface_descr.dwFlags & DDSD_PIXELFORMAT)
 494             add_prop_ui4( pDisplayAdapterSubCont, dwBpp, surface_descr.u4.ddpfPixelFormat.u1.dwRGBBitCount );
 495     }
 496
 497     add_prop_str( pDisplayAdapterSubCont, szVendorId, szEmpty );
 498     add_prop_str( pDisplayAdapterSubCont, szDeviceId, szEmpty );
 499     add_prop_str( pDisplayAdapterSubCont, szKeyDeviceKey, szEmpty );
 500     add_prop_str( pDisplayAdapterSubCont, szKeyDeviceID, szEmpty );
 501
 502     IUnknown_Release( pDirectDraw );
 503     return hr;
 504 }
 505
 506 static HRESULT DXDiag_InitDXDiagDirectSoundContainer(IDxDiagContainer* pSubCont) {
 507   HRESULT hr = S_OK;
 508   static const WCHAR DxDiag_SoundDevices[] = {'D','x','D','i','a','g','_','S','o','u','n','d','D','e','v','i','c','e','s',0};
 509   static const WCHAR DxDiag_SoundCaptureDevices[] = {'D','x','D','i','a','g','_','S','o','u','n','d','C','a','p','t','u','r','e','D','e','v','i','c','e','s',0};
 510   IDxDiagContainer* pSubSubCont = NULL;
 511
 512   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubSubCont);
 513   if (FAILED(hr)) { return hr; }
 514   hr = IDxDiagContainerImpl_AddChildContainer(pSubCont, DxDiag_SoundDevices, pSubSubCont);
 515
 516   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubSubCont);
 517   if (FAILED(hr)) { return hr; }
 518   hr = IDxDiagContainerImpl_AddChildContainer(pSubCont, DxDiag_SoundCaptureDevices, pSubSubCont);
 519
 520   return hr;
 521 }
 522
 523 static HRESULT DXDiag_InitDXDiagDirectMusicContainer(IDxDiagContainer* pSubCont) {
 524   HRESULT hr = S_OK;
 525   return hr;
 526 }
 527
 528 static HRESULT DXDiag_InitDXDiagDirectInputContainer(IDxDiagContainer* pSubCont) {
 529   HRESULT hr = S_OK;
 530   return hr;
 531 }
 532
 533 static HRESULT DXDiag_InitDXDiagDirectPlayContainer(IDxDiagContainer* pSubCont) {
 534   HRESULT hr = S_OK;
 535   return hr;
 536 }
 537
 538 struct REG_RF {
 539   DWORD dwVersion;
 540   DWORD dwMerit;
 541   DWORD dwPins;
 542   DWORD dwUnused;
 543 };
 544 struct REG_RFP {
 545   BYTE signature[4]; /* e.g. "0pi3" */
 546   DWORD dwFlags;
 547   DWORD dwInstances;
 548   DWORD dwMediaTypes;
 549   DWORD dwMediums;
 550   DWORD bCategory; /* is there a category clsid? */
 551   /* optional: dwOffsetCategoryClsid */
 552 };
 553 struct REG_TYPE {
 554   BYTE signature[4]; /* e.g. "0ty3" */
 555   DWORD dwUnused;
 556   DWORD dwOffsetMajor;
 557   DWORD dwOffsetMinor;
 558 };
 559
 560 static HRESULT DXDiag_InitDXDiagDirectShowFiltersContainer(IDxDiagContainer* pSubCont) {
 561   HRESULT hr = S_OK;
 562   static const WCHAR szName[] = {'s','z','N','a','m','e',0};
 563   static const WCHAR szCatName[] = {'s','z','C','a','t','N','a','m','e',0};
 564   static const WCHAR szClsidCat[] = {'s','z','C','l','s','i','d','C','a','t',0};
 565   static const WCHAR szClsidFilter[] = {'s','z','C','l','s','i','d','F','i','l','t','e','r',0};
 566   static const WCHAR dwInputs[] = {'d','w','I','n','p','u','t','s',0};
 567   static const WCHAR dwOutputs[] = {'d','w','O','u','t','p','u','t','s',0};
 568   static const WCHAR dwMerit[] = {'d','w','M','e','r','i','t',0};
 569   /*
 570   static const WCHAR szFileName[] = {'s','z','F','i','l','e','N','a','m','e',0};
 571   static const WCHAR szFileVersion[] = {'s','z','F','i','l','e','V','e','r','s','i','o','n',0};
 572   */
 573   VARIANT v;
 574
 575   static const WCHAR wszClsidName[] = {'C','L','S','I','D',0};
 576   static const WCHAR wszFriendlyName[] = {'F','r','i','e','n','d','l','y','N','a','m','e',0};
 577   static const WCHAR wszFilterDataName[] = {'F','i','l','t','e','r','D','a','t','a',0};
 578   /*static const WCHAR wszMeritName[] = {'M','e','r','i','t',0};*/
 579
 580   ICreateDevEnum* pCreateDevEnum = NULL;
 581   IEnumMoniker* pEmCat = NULL;
 582   IMoniker* pMCat = NULL;
 583   /** */
 584   hr = CoCreateInstance(&CLSID_SystemDeviceEnum,
 585                         NULL,
 586                         CLSCTX_INPROC_SERVER,
 587                         &IID_ICreateDevEnum,
 588                         (void**) &pCreateDevEnum);
 589   if (FAILED(hr)) return hr;
 590
 591   hr = ICreateDevEnum_CreateClassEnumerator(pCreateDevEnum, &CLSID_ActiveMovieCategories, &pEmCat, 0);
 592   if (FAILED(hr)) goto out_show_filters;
 593
 594   VariantInit(&v);
 595
 596   while (S_OK == IEnumMoniker_Next(pEmCat, 1, &pMCat, NULL)) {
 597     IPropertyBag* pPropBag = NULL;
 598     CLSID clsidCat;
 599     hr = IMoniker_BindToStorage(pMCat, NULL, NULL, &IID_IPropertyBag, (void**) &pPropBag);
 600     if (SUCCEEDED(hr)) {
 601       WCHAR* wszCatName = NULL;
 602       WCHAR* wszCatClsid = NULL;
 603
 604       hr = IPropertyBag_Read(pPropBag, wszFriendlyName, &v, 0);
 605       wszCatName = SysAllocString(V_BSTR(&v));
 606       VariantClear(&v);
 607
 608       hr = IPropertyBag_Read(pPropBag, wszClsidName, &v, 0);
 609       wszCatClsid = SysAllocString(V_BSTR(&v));
 610       hr = CLSIDFromString(V_UNION(&v, bstrVal), &clsidCat);
 611       VariantClear(&v);
 612
 613       /*
 614       hr = IPropertyBag_Read(pPropBag, wszMeritName, &v, 0);
 615       hr = IDxDiagContainerImpl_AddProp(pSubCont, dwMerit, &v);
 616       VariantClear(&v);
 617       */
 618
 619       if (SUCCEEDED(hr)) {
 620         IEnumMoniker* pEnum = NULL;
 621         IMoniker* pMoniker = NULL;
 622         hr = ICreateDevEnum_CreateClassEnumerator(pCreateDevEnum, &clsidCat, &pEnum, 0);
 623         TRACE("\tClassEnumerator for clsid(%s) pEnum(%p)\n", debugstr_guid(&clsidCat), pEnum);
 624         if (FAILED(hr) || pEnum == NULL) {
 625           goto class_enum_failed;
 626         }
 627         while (NULL != pEnum && S_OK == IEnumMoniker_Next(pEnum, 1, &pMoniker, NULL)) {
 628           IPropertyBag* pPropFilterBag = NULL;
 629           TRACE("\tIEnumMoniker_Next(%p, 1, %p)\n", pEnum, pMoniker);
 630           hr = IMoniker_BindToStorage(pMoniker, NULL, NULL, &IID_IPropertyBag, (void**) &pPropFilterBag);
 631           if (SUCCEEDED(hr)) {
 632             LPBYTE pData = NULL;
 633             LPBYTE pCurrent = NULL;
 634             struct REG_RF* prrf = NULL;
 635             DWORD it;
 636             DWORD dwNOutputs = 0;
 637             DWORD dwNInputs = 0;
 638
 639             add_prop_str(pSubCont, szCatName, wszCatName);
 640             add_prop_str(pSubCont, szClsidCat, wszCatClsid);
 641
 642             hr = IPropertyBag_Read(pPropFilterBag, wszFriendlyName, &v, 0);
 643             hr = IDxDiagContainerImpl_AddProp(pSubCont, szName, &v);
 644             TRACE("\tName:%s\n", debugstr_w(V_BSTR(&v)));
 645             VariantClear(&v);
 646
 647             hr = IPropertyBag_Read(pPropFilterBag, wszClsidName, &v, 0);
 648             TRACE("\tClsid:%s\n", debugstr_w(V_BSTR(&v)));
 649             hr = IDxDiagContainerImpl_AddProp(pSubCont, szClsidFilter, &v);
 650             VariantClear(&v);
 651
 652             hr = IPropertyBag_Read(pPropFilterBag, wszFilterDataName, &v, NULL);
 653             hr = SafeArrayAccessData(V_UNION(&v, parray), (LPVOID*) &pData);
 654             prrf = (struct REG_RF*) pData;
 655             pCurrent = pData;
 656
 657             add_prop_ui4(pSubCont, szName, prrf->dwVersion);
 658             add_prop_ui4(pSubCont, dwMerit, prrf->dwMerit);
 659
 660             pCurrent += sizeof(struct REG_RF);
 661             for (it = 0; it < prrf->dwPins; ++it) {
 662               struct REG_RFP* prrfp = (struct REG_RFP*) pCurrent;
 663               UINT j;
 664
 665               if (prrfp->dwFlags & REG_PINFLAG_B_OUTPUT) ++dwNOutputs;
 666               else ++dwNInputs;
 667
 668               pCurrent += sizeof(struct REG_RFP);
 669               if (prrfp->bCategory) {
 670                 pCurrent += sizeof(DWORD);
 671               }
 672               for (j = 0; j < prrfp->dwMediaTypes; ++j) {
 673                 struct REG_TYPE* prt = (struct REG_TYPE *)pCurrent;
 674                 pCurrent += sizeof(*prt);
 675               }
 676               for (j = 0; j < prrfp->dwMediums; ++j) {
 677                 DWORD dwOffset = *(DWORD*) pCurrent;
 678                 pCurrent += sizeof(dwOffset);
 679               }
 680             }
 681
 682             add_prop_ui4(pSubCont, dwInputs,  dwNInputs);
 683             add_prop_ui4(pSubCont, dwOutputs, dwNOutputs);
 684
 685             SafeArrayUnaccessData(V_UNION(&v, parray));
 686             VariantClear(&v);
 687           }
 688           IPropertyBag_Release(pPropFilterBag); pPropFilterBag = NULL;
 689         }
 690         IEnumMoniker_Release(pEnum); pEnum = NULL;
 691       }
 692 class_enum_failed:
 693       SysFreeString(wszCatName);
 694       SysFreeString(wszCatClsid);
 695       IPropertyBag_Release(pPropBag); pPropBag = NULL;
 696     }
 697     IEnumMoniker_Release(pMCat); pMCat = NULL;
 698   }
 699
 700 out_show_filters:
 701   if (NULL != pEmCat) { IEnumMoniker_Release(pEmCat); pEmCat = NULL; }
 702   if (NULL != pCreateDevEnum) { ICreateDevEnum_Release(pCreateDevEnum); pCreateDevEnum = NULL; }
 703   return hr;
 704 }
 705
 706 static HRESULT DXDiag_InitRootDXDiagContainer(IDxDiagContainer* pRootCont) {
 707   HRESULT hr = S_OK;
 708   static const WCHAR DxDiag_SystemInfo[] = {'D','x','D','i','a','g','_','S','y','s','t','e','m','I','n','f','o',0};
 709   static const WCHAR DxDiag_SystemDevices[] = {'D','x','D','i','a','g','_','S','y','s','t','e','m','D','e','v','i','c','e','s',0};
 710   static const WCHAR DxDiag_LogicalDisks[] = {'D','x','D','i','a','g','_','L','o','g','i','c','a','l','D','i','s','k','s',0};
 711   static const WCHAR DxDiag_DirectXFiles[] = {'D','x','D','i','a','g','_','D','i','r','e','c','t','X','F','i','l','e','s',0};
 712   static const WCHAR DxDiag_DisplayDevices[] = {'D','x','D','i','a','g','_','D','i','s','p','l','a','y','D','e','v','i','c','e','s',0};
 713   static const WCHAR DxDiag_DirectSound[] = {'D','x','D','i','a','g','_','D','i','r','e','c','t','S','o','u','n','d',0};
 714   static const WCHAR DxDiag_DirectMusic[] = {'D','x','D','i','a','g','_','D','i','r','e','c','t','M','u','s','i','c',0};
 715   static const WCHAR DxDiag_DirectInput[] = {'D','x','D','i','a','g','_','D','i','r','e','c','t','I','n','p','u','t',0};
 716   static const WCHAR DxDiag_DirectPlay[] = {'D','x','D','i','a','g','_','D','i','r','e','c','t','P','l','a','y',0};
 717   static const WCHAR DxDiag_DirectShowFilters[] = {'D','x','D','i','a','g','_','D','i','r','e','c','t','S','h','o','w','F','i','l','t','e','r','s',0};
 718   IDxDiagContainer* pSubCont = NULL;
 719
 720   TRACE("(%p)\n", pRootCont);
 721
 722   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 723   if (FAILED(hr)) { return hr; }
 724   hr = DXDiag_InitDXDiagSystemInfoContainer(pSubCont);
 725   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_SystemInfo, pSubCont);
 726
 727   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 728   if (FAILED(hr)) { return hr; }
 729   hr = DXDiag_InitDXDiagSystemDevicesContainer(pSubCont);
 730   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_SystemDevices, pSubCont);
 731
 732   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 733   if (FAILED(hr)) { return hr; }
 734   hr = DXDiag_InitDXDiagLogicalDisksContainer(pSubCont);
 735   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_LogicalDisks, pSubCont);
 736
 737   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 738   if (FAILED(hr)) { return hr; }
 739   hr = DXDiag_InitDXDiagDirectXFilesContainer(pSubCont);
 740   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DirectXFiles, pSubCont);
 741
 742   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 743   if (FAILED(hr)) { return hr; }
 744   hr = DXDiag_InitDXDiagDisplayContainer(pSubCont);
 745   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DisplayDevices, pSubCont);
 746
 747   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 748   if (FAILED(hr)) { return hr; }
 749   hr = DXDiag_InitDXDiagDirectSoundContainer(pSubCont);
 750   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DirectSound, pSubCont);
 751
 752   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 753   if (FAILED(hr)) { return hr; }
 754   hr = DXDiag_InitDXDiagDirectMusicContainer(pSubCont);
 755   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DirectMusic, pSubCont);
 756
 757   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 758   if (FAILED(hr)) { return hr; }
 759   hr = DXDiag_InitDXDiagDirectInputContainer(pSubCont);
 760   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DirectInput, pSubCont);
 761
 762   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 763   if (FAILED(hr)) { return hr; }
 764   hr = DXDiag_InitDXDiagDirectPlayContainer(pSubCont);
 765   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DirectPlay, pSubCont);
 766
 767   hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, (void**) &pSubCont);
 768   if (FAILED(hr)) { return hr; }
 769   hr = DXDiag_InitDXDiagDirectShowFiltersContainer(pSubCont);
 770   hr = IDxDiagContainerImpl_AddChildContainer(pRootCont, DxDiag_DirectShowFilters, pSubCont);
 771
 772   return hr;
 773 }