dlls/dxdiagn/container.c

   1 /*
   2  * IDxDiagContainer Implementation
   3  *
   4  * Copyright 2004 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
  23 #define COBJMACROS
  24 #include "dxdiag_private.h"
  25 #include "wine/debug.h"
  26
  27 WINE_DEFAULT_DEBUG_CHANNEL(dxdiag);
  28
  29 static inline IDxDiagContainerImpl *impl_from_IDxDiagContainer(IDxDiagContainer *iface)
  30 {
  31     return CONTAINING_RECORD(iface, IDxDiagContainerImpl, IDxDiagContainer_iface);
  32 }
  33
  34 /* IDxDiagContainer IUnknown parts follow: */
  35 static HRESULT WINAPI IDxDiagContainerImpl_QueryInterface(IDxDiagContainer *iface, REFIID riid,
  36         void **ppobj)
  37 {
  38     IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
  39
  40     if (!ppobj) return E_INVALIDARG;
  41
  42     if (IsEqualGUID(riid, &IID_IUnknown)
  43         || IsEqualGUID(riid, &IID_IDxDiagContainer)) {
  44         IUnknown_AddRef(iface);
  45         *ppobj = This;
  46         return S_OK;
  47     }
  48
  49     WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppobj);
  50     *ppobj = NULL;
  51     return E_NOINTERFACE;
  52 }
  53
  54 static ULONG WINAPI IDxDiagContainerImpl_AddRef(IDxDiagContainer *iface)
  55 {
  56     IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
  57     ULONG refCount = InterlockedIncrement(&This->ref);
  58
  59     TRACE("(%p)->(ref before=%u)\n", This, refCount - 1);
  60
  61     DXDIAGN_LockModule();
  62
  63     return refCount;
  64 }
  65
  66 static ULONG WINAPI IDxDiagContainerImpl_Release(IDxDiagContainer *iface)
  67 {
  68     IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
  69     ULONG refCount = InterlockedDecrement(&This->ref);
  70
  71     TRACE("(%p)->(ref before=%u)\n", This, refCount + 1);
  72
  73     if (!refCount) {
  74         IDxDiagProvider_Release(This->pProv);
  75         HeapFree(GetProcessHeap(), 0, This);
  76     }
  77
  78     DXDIAGN_UnlockModule();
  79
  80     return refCount;
  81 }
  82
  83 /* IDxDiagContainer Interface follow: */
  84 static HRESULT WINAPI IDxDiagContainerImpl_GetNumberOfChildContainers(IDxDiagContainer *iface,
  85         DWORD *pdwCount)
  86 {
  87   IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
  88
  89   TRACE("(%p)\n", iface);
  90   if (NULL == pdwCount) {
  91     return E_INVALIDARG;
  92   }
  93   *pdwCount = This->cont->nSubContainers;
  94   return S_OK;
  95 }
  96
  97 static HRESULT WINAPI IDxDiagContainerImpl_EnumChildContainerNames(IDxDiagContainer *iface,
  98         DWORD dwIndex, LPWSTR pwszContainer, DWORD cchContainer)
  99 {
 100   IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
 101   IDxDiagContainerImpl_Container *p;
 102   DWORD i = 0;
 103
 104   TRACE("(%p, %u, %p, %u)\n", iface, dwIndex, pwszContainer, cchContainer);
 105
 106   if (NULL == pwszContainer || 0 == cchContainer) {
 107     return E_INVALIDARG;
 108   }
 109
 110   LIST_FOR_EACH_ENTRY(p, &This->cont->subContainers, IDxDiagContainerImpl_Container, entry)
 111   {
 112     if (dwIndex == i) {
 113       TRACE("Found container name %s, copying string\n", debugstr_w(p->contName));
 114       lstrcpynW(pwszContainer, p->contName, cchContainer);
 115       return (cchContainer <= lstrlenW(p->contName)) ?
 116               DXDIAG_E_INSUFFICIENT_BUFFER : S_OK;
 117     }
 118     ++i;
 119   }
 120
 121   TRACE("Failed to find container name at specified index\n");
 122   *pwszContainer = '\0';
 123   return E_INVALIDARG;
 124 }
 125
 126 static HRESULT IDxDiagContainerImpl_GetChildContainerInternal(IDxDiagContainerImpl_Container *cont, LPCWSTR pwszContainer, IDxDiagContainerImpl_Container **subcont) {
 127   IDxDiagContainerImpl_Container *p;
 128
 129   LIST_FOR_EACH_ENTRY(p, &cont->subContainers, IDxDiagContainerImpl_Container, entry)
 130   {
 131     if (0 == lstrcmpW(p->contName, pwszContainer)) {
 132       *subcont = p;
 133       return S_OK;
 134     }
 135   }
 136
 137   return E_INVALIDARG;
 138 }
 139
 140 static HRESULT WINAPI IDxDiagContainerImpl_GetChildContainer(IDxDiagContainer *iface,
 141         LPCWSTR pwszContainer, IDxDiagContainer **ppInstance)
 142 {
 143   IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
 144   IDxDiagContainerImpl_Container *pContainer = This->cont;
 145   LPWSTR tmp, orig_tmp;
 146   INT tmp_len;
 147   WCHAR* cur;
 148   HRESULT hr = E_INVALIDARG;
 149
 150   TRACE("(%p, %s, %p)\n", iface, debugstr_w(pwszContainer), ppInstance);
 151
 152   if (NULL == ppInstance || NULL == pwszContainer) {
 153     return E_INVALIDARG;
 154   }
 155
 156   *ppInstance = NULL;
 157
 158   tmp_len = lstrlenW(pwszContainer) + 1;
 159   orig_tmp = tmp = HeapAlloc(GetProcessHeap(), 0, tmp_len * sizeof(WCHAR));
 160   if (NULL == tmp) return E_FAIL;
 161   lstrcpynW(tmp, pwszContainer, tmp_len);
 162
 163   /* special handling for an empty string and leaf container */
 164   if (!tmp[0] && list_empty(&pContainer->subContainers)) {
 165     hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, pContainer, This->pProv, (void **)ppInstance);
 166     if (SUCCEEDED(hr))
 167       TRACE("Succeeded in getting the container instance\n");
 168     goto out;
 169   }
 170
 171   cur = wcschr(tmp, '.');
 172   while (NULL != cur) {
 173     *cur = '\0'; /* cut tmp string to '.' */
 174     if (!*(cur + 1)) break; /* Account for a lone terminating period, as in "cont1.cont2.". */
 175     TRACE("Trying to get parent container %s\n", debugstr_w(tmp));
 176     hr = IDxDiagContainerImpl_GetChildContainerInternal(pContainer, tmp, &pContainer);
 177     if (FAILED(hr))
 178       goto out;
 179     cur++; /* go after '.' (just replaced by \0) */
 180     tmp = cur;
 181     cur = wcschr(tmp, '.');
 182   }
 183
 184   TRACE("Trying to get container %s\n", debugstr_w(tmp));
 185   hr = IDxDiagContainerImpl_GetChildContainerInternal(pContainer, tmp, &pContainer);
 186   if (SUCCEEDED(hr)) {
 187     hr = DXDiag_CreateDXDiagContainer(&IID_IDxDiagContainer, pContainer, This->pProv, (void **)ppInstance);
 188     if (SUCCEEDED(hr))
 189         TRACE("Succeeded in getting the container instance\n");
 190   }
 191
 192 out:
 193   HeapFree(GetProcessHeap(), 0, orig_tmp);
 194   return hr;
 195 }
 196
 197 static HRESULT WINAPI IDxDiagContainerImpl_GetNumberOfProps(IDxDiagContainer *iface,
 198         DWORD *pdwCount)
 199 {
 200   IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
 201
 202   TRACE("(%p)\n", iface);
 203   if (NULL == pdwCount) {
 204     return E_INVALIDARG;
 205   }
 206   *pdwCount = This->cont->nProperties;
 207   return S_OK;
 208 }
 209
 210 static HRESULT WINAPI IDxDiagContainerImpl_EnumPropNames(IDxDiagContainer *iface, DWORD dwIndex,
 211         LPWSTR pwszPropName, DWORD cchPropName)
 212 {
 213   IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
 214   IDxDiagContainerImpl_Property *p;
 215   DWORD i = 0;
 216
 217   TRACE("(%p, %u, %p, %u)\n", iface, dwIndex, pwszPropName, cchPropName);
 218
 219   if (NULL == pwszPropName || 0 == cchPropName) {
 220     return E_INVALIDARG;
 221   }
 222
 223   LIST_FOR_EACH_ENTRY(p, &This->cont->properties, IDxDiagContainerImpl_Property, entry)
 224   {
 225     if (dwIndex == i) {
 226       TRACE("Found property name %s, copying string\n", debugstr_w(p->propName));
 227       lstrcpynW(pwszPropName, p->propName, cchPropName);
 228       return (cchPropName <= lstrlenW(p->propName)) ?
 229               DXDIAG_E_INSUFFICIENT_BUFFER : S_OK;
 230     }
 231     ++i;
 232   }
 233
 234   TRACE("Failed to find property name at specified index\n");
 235   return E_INVALIDARG;
 236 }
 237
 238 static HRESULT WINAPI IDxDiagContainerImpl_GetProp(IDxDiagContainer *iface, LPCWSTR pwszPropName,
 239         VARIANT *pvarProp)
 240 {
 241   IDxDiagContainerImpl *This = impl_from_IDxDiagContainer(iface);
 242   IDxDiagContainerImpl_Property *p;
 243
 244   TRACE("(%p, %s, %p)\n", iface, debugstr_w(pwszPropName), pvarProp);
 245
 246   if (NULL == pvarProp || NULL == pwszPropName) {
 247     return E_INVALIDARG;
 248   }
 249
 250   LIST_FOR_EACH_ENTRY(p, &This->cont->properties, IDxDiagContainerImpl_Property, entry)
 251   {
 252     if (0 == lstrcmpW(p->propName, pwszPropName)) {
 253       VariantInit(pvarProp);
 254       return VariantCopy(pvarProp, &p->vProp);
 255     }
 256   }
 257
 258   return E_INVALIDARG;
 259 }
 260
 261 static const IDxDiagContainerVtbl DxDiagContainer_Vtbl =
 262 {
 263     IDxDiagContainerImpl_QueryInterface,
 264     IDxDiagContainerImpl_AddRef,
 265     IDxDiagContainerImpl_Release,
 266     IDxDiagContainerImpl_GetNumberOfChildContainers,
 267     IDxDiagContainerImpl_EnumChildContainerNames,
 268     IDxDiagContainerImpl_GetChildContainer,
 269     IDxDiagContainerImpl_GetNumberOfProps,
 270     IDxDiagContainerImpl_EnumPropNames,
 271     IDxDiagContainerImpl_GetProp
 272 };
 273
 274
 275 HRESULT DXDiag_CreateDXDiagContainer(REFIID riid, IDxDiagContainerImpl_Container *cont, IDxDiagProvider *pProv, LPVOID *ppobj) {
 276   IDxDiagContainerImpl* container;
 277
 278   TRACE("(%s, %p)\n", debugstr_guid(riid), ppobj);
 279
 280   container = HeapAlloc(GetProcessHeap(), 0, sizeof(IDxDiagContainerImpl));
 281   if (NULL == container) {
 282     *ppobj = NULL;
 283     return E_OUTOFMEMORY;
 284   }
 285   container->IDxDiagContainer_iface.lpVtbl = &DxDiagContainer_Vtbl;
 286   container->ref = 0; /* will be inited with QueryInterface */
 287   container->cont = cont;
 288   container->pProv = pProv;
 289   IDxDiagProvider_AddRef(pProv);
 290   return IDxDiagContainerImpl_QueryInterface(&container->IDxDiagContainer_iface, riid, ppobj);
 291 }