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