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 #include "config.h"
  23
  24 #define COBJMACROS
  25 #include "dxdiag_private.h"
  26 #include "wine/debug.h"
  27 #include "wine/unicode.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(dxdiag);
  30
  31 /* IDxDiagContainer IUnknown parts follow: */
  32 HRESULT WINAPI IDxDiagContainerImpl_QueryInterface(PDXDIAGCONTAINER iface, REFIID riid, LPVOID *ppobj)
  33 {
  34     IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
  35
  36     if (IsEqualGUID(riid, &IID_IUnknown)
  37         || IsEqualGUID(riid, &IID_IDxDiagContainer)) {
  38         IUnknown_AddRef(iface);
  39         *ppobj = This;
  40         return S_OK;
  41     }
  42
  43     WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppobj);
  44     return E_NOINTERFACE;
  45 }
  46
  47 static ULONG WINAPI IDxDiagContainerImpl_AddRef(PDXDIAGCONTAINER iface) {
  48     IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
  49     ULONG refCount = InterlockedIncrement(&This->ref);
  50
  51     TRACE("(%p)->(ref before=%u)\n", This, refCount - 1);
  52
  53     DXDIAGN_LockModule();
  54
  55     return refCount;
  56 }
  57
  58 static ULONG WINAPI IDxDiagContainerImpl_Release(PDXDIAGCONTAINER iface) {
  59     IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
  60     ULONG refCount = InterlockedDecrement(&This->ref);
  61
  62     TRACE("(%p)->(ref before=%u)\n", This, refCount + 1);
  63
  64     if (!refCount) {
  65         HeapFree(GetProcessHeap(), 0, This);
  66     }
  67
  68     DXDIAGN_UnlockModule();
  69
  70     return refCount;
  71 }
  72
  73 /* IDxDiagContainer Interface follow: */
  74 static HRESULT WINAPI IDxDiagContainerImpl_GetNumberOfChildContainers(PDXDIAGCONTAINER iface, DWORD* pdwCount) {
  75   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
  76   TRACE("(%p)\n", iface);
  77   if (NULL == pdwCount) {
  78     return E_INVALIDARG;
  79   }
  80   *pdwCount = This->nSubContainers;
  81   return S_OK;
  82 }
  83
  84 static HRESULT WINAPI IDxDiagContainerImpl_EnumChildContainerNames(PDXDIAGCONTAINER iface, DWORD dwIndex, LPWSTR pwszContainer, DWORD cchContainer) {
  85   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
  86   IDxDiagContainerImpl_SubContainer* p = NULL;
  87   DWORD i = 0;
  88
  89   TRACE("(%p, %u, %s, %u)\n", iface, dwIndex, debugstr_w(pwszContainer), cchContainer);
  90
  91   if (NULL == pwszContainer) {
  92     return E_INVALIDARG;
  93   }
  94   if (256 > cchContainer) {
  95     return DXDIAG_E_INSUFFICIENT_BUFFER;
  96   }
  97
  98   p = This->subContainers;
  99   while (NULL != p) {
 100     if (dwIndex == i) {
 101       if (cchContainer <= strlenW(p->contName)) {
 102         return DXDIAG_E_INSUFFICIENT_BUFFER;
 103       }
 104       lstrcpynW(pwszContainer, p->contName, cchContainer);
 105       return S_OK;
 106     }
 107     p = p->next;
 108     ++i;
 109   }
 110   return E_INVALIDARG;
 111 }
 112
 113 static HRESULT WINAPI IDxDiagContainerImpl_GetChildContainerInternal(PDXDIAGCONTAINER iface, LPCWSTR pwszContainer, IDxDiagContainer** ppInstance) {
 114   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 115   IDxDiagContainerImpl_SubContainer* p = NULL;
 116
 117   p = This->subContainers;
 118   while (NULL != p) {
 119     if (0 == lstrcmpW(p->contName, pwszContainer)) {
 120       *ppInstance = (PDXDIAGCONTAINER)p->pCont;
 121       return S_OK;
 122     }
 123     p = p->next;
 124   }
 125   return E_INVALIDARG;
 126 }
 127
 128 static HRESULT WINAPI IDxDiagContainerImpl_GetChildContainer(PDXDIAGCONTAINER iface, LPCWSTR pwszContainer, IDxDiagContainer** ppInstance) {
 129   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 130   IDxDiagContainer* pContainer = NULL;
 131   LPWSTR tmp, orig_tmp;
 132   INT tmp_len;
 133   WCHAR* cur;
 134   HRESULT hr = E_INVALIDARG;
 135
 136   FIXME("(%p, %s, %p)\n", iface, debugstr_w(pwszContainer), ppInstance);
 137
 138   if (NULL == ppInstance || NULL == pwszContainer) {
 139     return E_INVALIDARG;
 140   }
 141
 142   pContainer = (PDXDIAGCONTAINER) This;
 143
 144   tmp_len = strlenW(pwszContainer) + 1;
 145   orig_tmp = tmp = HeapAlloc(GetProcessHeap(), 0, tmp_len * sizeof(WCHAR));
 146   if (NULL == tmp) return E_FAIL;
 147   lstrcpynW(tmp, pwszContainer, tmp_len);
 148
 149   cur = strchrW(tmp, '.');
 150   while (NULL != cur) {
 151     *cur = '\0'; /* cut tmp string to '.' */
 152     hr = IDxDiagContainerImpl_GetChildContainerInternal(pContainer, tmp, &pContainer);
 153     if (!SUCCEEDED(hr) || NULL == pContainer)
 154       goto on_error;
 155     cur++; /* go after '.' (just replaced by \0) */
 156     tmp = cur;
 157     cur = strchrW(tmp, '.');
 158   }
 159
 160   hr = IDxDiagContainerImpl_GetChildContainerInternal(pContainer, tmp, ppInstance);
 161   if (SUCCEEDED(hr)) {
 162     IDxDiagContainerImpl_AddRef((PDXDIAGCONTAINER)*ppInstance);
 163   }
 164
 165 on_error:
 166   HeapFree(GetProcessHeap(), 0, orig_tmp);
 167   return hr;
 168 }
 169
 170 static HRESULT WINAPI IDxDiagContainerImpl_GetNumberOfProps(PDXDIAGCONTAINER iface, DWORD* pdwCount) {
 171   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 172   TRACE("(%p)\n", iface);
 173   if (NULL == pdwCount) {
 174     return E_INVALIDARG;
 175   }
 176   *pdwCount = This->nProperties;
 177   return S_OK;
 178 }
 179
 180 static HRESULT WINAPI IDxDiagContainerImpl_EnumPropNames(PDXDIAGCONTAINER iface, DWORD dwIndex, LPWSTR pwszPropName, DWORD cchPropName) {
 181   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 182   IDxDiagContainerImpl_Property* p = NULL;
 183   DWORD i = 0;
 184
 185   FIXME("(%p, %u, %s, %u)\n", iface, dwIndex, debugstr_w(pwszPropName), cchPropName);
 186
 187   if (NULL == pwszPropName) {
 188     return E_INVALIDARG;
 189   }
 190   if (256 > cchPropName) {
 191     return DXDIAG_E_INSUFFICIENT_BUFFER;
 192   }
 193
 194   p = This->properties;
 195   while (NULL != p) {
 196     if (dwIndex == i) {
 197       if (cchPropName <= lstrlenW(p->vName)) {
 198         return DXDIAG_E_INSUFFICIENT_BUFFER;
 199       }
 200       lstrcpynW(pwszPropName, p->vName, cchPropName);
 201       return S_OK;
 202     }
 203     p = p->next;
 204     ++i;
 205   }
 206   return E_INVALIDARG;
 207 }
 208
 209 static HRESULT WINAPI IDxDiagContainerImpl_GetProp(PDXDIAGCONTAINER iface, LPCWSTR pwszPropName, VARIANT* pvarProp) {
 210   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 211   IDxDiagContainerImpl_Property* p = NULL;
 212   FIXME("(%p, %s, %p)\n", iface, debugstr_w(pwszPropName), pvarProp);
 213
 214   if (NULL == pvarProp || NULL == pwszPropName) {
 215     return E_INVALIDARG;
 216   }
 217
 218   p = This->properties;
 219   while (NULL != p) {
 220     if (0 == lstrcmpW(p->vName, pwszPropName)) {
 221       VariantCopy(pvarProp, &p->v);
 222       return S_OK;
 223     }
 224     p = p->next;
 225   }
 226   return S_OK;
 227 }
 228
 229 HRESULT WINAPI IDxDiagContainerImpl_AddProp(PDXDIAGCONTAINER iface, LPCWSTR pwszPropName, VARIANT* pVarProp) {
 230   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 231   IDxDiagContainerImpl_Property* p = NULL;
 232   IDxDiagContainerImpl_Property* pNew = NULL;
 233
 234   FIXME("(%p, %s, %p)\n", iface, debugstr_w(pwszPropName), pVarProp);
 235
 236   if (NULL == pVarProp || NULL == pwszPropName) {
 237     return E_INVALIDARG;
 238   }
 239
 240   pNew =  HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDxDiagContainerImpl_Property));
 241   if (NULL == pNew) {
 242     return E_OUTOFMEMORY;
 243   }
 244   VariantInit(&pNew->v);
 245   VariantCopy(&pNew->v, pVarProp);
 246   pNew->vName = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, (lstrlenW(pwszPropName) + 1) * sizeof(WCHAR));
 247   lstrcpyW(pNew->vName, pwszPropName);
 248   pNew->next = NULL;
 249
 250   p = This->properties;
 251   if (NULL == p) {
 252     This->properties = pNew;
 253   } else {
 254     while (NULL != p->next) {
 255       p = p->next;
 256     }
 257     p->next = pNew;
 258   }
 259   ++This->nProperties;
 260   return S_OK;
 261 }
 262
 263 HRESULT WINAPI IDxDiagContainerImpl_AddChildContainer(PDXDIAGCONTAINER iface, LPCWSTR pszContName, PDXDIAGCONTAINER pSubCont) {
 264   IDxDiagContainerImpl *This = (IDxDiagContainerImpl *)iface;
 265   IDxDiagContainerImpl_SubContainer* p = NULL;
 266   IDxDiagContainerImpl_SubContainer* pNew = NULL;
 267
 268   FIXME("(%p, %s, %p)\n", iface, debugstr_w(pszContName), pSubCont);
 269
 270   if (NULL == pSubCont || NULL == pszContName) {
 271     return E_INVALIDARG;
 272   }
 273
 274   pNew =  HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDxDiagContainerImpl_SubContainer));
 275   if (NULL == pNew) {
 276     return E_OUTOFMEMORY;
 277   }
 278   pNew->pCont = pSubCont;
 279   pNew->contName = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, (lstrlenW(pszContName) + 1) * sizeof(WCHAR));
 280   lstrcpyW(pNew->contName, pszContName);
 281   pNew->next = NULL;
 282
 283   p = This->subContainers;
 284   if (NULL == p) {
 285     This->subContainers = pNew;
 286   } else {
 287     while (NULL != p->next) {
 288       p = p->next;
 289     }
 290     p->next = pNew;
 291   }
 292   ++This->nSubContainers;
 293   return S_OK;
 294 }
 295
 296 static const IDxDiagContainerVtbl DxDiagContainer_Vtbl =
 297 {
 298     IDxDiagContainerImpl_QueryInterface,
 299     IDxDiagContainerImpl_AddRef,
 300     IDxDiagContainerImpl_Release,
 301     IDxDiagContainerImpl_GetNumberOfChildContainers,
 302     IDxDiagContainerImpl_EnumChildContainerNames,
 303     IDxDiagContainerImpl_GetChildContainer,
 304     IDxDiagContainerImpl_GetNumberOfProps,
 305     IDxDiagContainerImpl_EnumPropNames,
 306     IDxDiagContainerImpl_GetProp
 307 };
 308
 309
 310 HRESULT DXDiag_CreateDXDiagContainer(REFIID riid, LPVOID *ppobj) {
 311   IDxDiagContainerImpl* container;
 312
 313   TRACE("(%p, %p)\n", debugstr_guid(riid), ppobj);
 314
 315   container = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDxDiagContainerImpl));
 316   if (NULL == container) {
 317     *ppobj = NULL;
 318     return E_OUTOFMEMORY;
 319   }
 320   container->lpVtbl = &DxDiagContainer_Vtbl;
 321   container->ref = 0; /* will be inited with QueryInterface */
 322   return IDxDiagContainerImpl_QueryInterface((PDXDIAGCONTAINER)container, riid, ppobj);
 323 }