push 7f8c39dca3a5819e8ef115eebf7abed537de3a22
[wine/hacks.git] / dlls / quartz / enummoniker.c
blob86b4bb424b1880c92a9f4f7ed6e22c5e8ef70591
1 /*
2 * IEnumMoniker implementation
4 * Copyright 2003 Robert Shearman
6 * This file contains the (internal) driver registration functions,
7 * driver enumeration APIs and DirectDraw creation functions.
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #define COBJMACROS
26 #include "quartz_private.h"
28 #include "wine/debug.h"
30 WINE_DEFAULT_DEBUG_CHANNEL(quartz);
32 typedef struct EnumMonikerImpl
34 const IEnumMonikerVtbl *lpVtbl;
35 LONG ref;
36 IMoniker ** ppMoniker;
37 ULONG nMonikerCount;
38 ULONG index;
39 } EnumMonikerImpl;
41 static const IEnumMonikerVtbl EnumMonikerImpl_Vtbl;
43 static ULONG WINAPI EnumMonikerImpl_AddRef(LPENUMMONIKER iface);
45 HRESULT EnumMonikerImpl_Create(IMoniker ** ppMoniker, ULONG nMonikerCount, IEnumMoniker ** ppEnum)
47 /* NOTE: assumes that array of IMonikers has already been AddRef'd
48 * I.e. this function does not AddRef the array of incoming
49 * IMonikers */
50 EnumMonikerImpl * pemi = CoTaskMemAlloc(sizeof(EnumMonikerImpl));
52 TRACE("(%p, %d, %p)\n", ppMoniker, nMonikerCount, ppEnum);
54 *ppEnum = NULL;
56 if (!pemi)
57 return E_OUTOFMEMORY;
59 pemi->lpVtbl = &EnumMonikerImpl_Vtbl;
60 pemi->ref = 1;
61 pemi->ppMoniker = CoTaskMemAlloc(nMonikerCount * sizeof(IMoniker*));
62 memcpy(pemi->ppMoniker, ppMoniker, nMonikerCount*sizeof(IMoniker*));
63 pemi->nMonikerCount = nMonikerCount;
64 pemi->index = 0;
66 *ppEnum = (IEnumMoniker *)pemi;
68 return S_OK;
71 /**********************************************************************
72 * IEnumMoniker_QueryInterface (also IUnknown)
74 static HRESULT WINAPI EnumMonikerImpl_QueryInterface(
75 LPENUMMONIKER iface,
76 REFIID riid,
77 LPVOID *ppvObj)
79 EnumMonikerImpl *This = (EnumMonikerImpl *)iface;
80 TRACE("\n\tIID:\t%s\n",debugstr_guid(riid));
82 if (This == NULL || ppvObj == NULL) return E_POINTER;
84 if (IsEqualGUID(riid, &IID_IUnknown) ||
85 IsEqualGUID(riid, &IID_IEnumMoniker))
87 *ppvObj = (LPVOID)iface;
88 EnumMonikerImpl_AddRef(iface);
89 return S_OK;
92 *ppvObj = NULL;
93 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid));
94 return E_NOINTERFACE;
97 /**********************************************************************
98 * IEnumMoniker_AddRef (also IUnknown)
100 static ULONG WINAPI EnumMonikerImpl_AddRef(LPENUMMONIKER iface)
102 EnumMonikerImpl *This = (EnumMonikerImpl *)iface;
103 ULONG ref;
105 if (This == NULL) return E_POINTER;
107 ref = InterlockedIncrement(&This->ref);
109 TRACE("(%p)->() AddRef from %d\n", iface, ref - 1);
111 return ref;
114 /**********************************************************************
115 * IEnumMoniker_Release (also IUnknown)
117 static ULONG WINAPI EnumMonikerImpl_Release(LPENUMMONIKER iface)
119 EnumMonikerImpl *This = (EnumMonikerImpl *)iface;
120 ULONG ref = InterlockedDecrement(&This->ref);
122 TRACE("(%p)->() Release from %d\n", iface, ref + 1);
124 if (!ref)
126 CoTaskMemFree(This->ppMoniker);
127 This->ppMoniker = NULL;
128 CoTaskMemFree(This);
129 return 0;
131 return ref;
134 static HRESULT WINAPI EnumMonikerImpl_Next(LPENUMMONIKER iface, ULONG celt, IMoniker ** rgelt, ULONG * pceltFetched)
136 ULONG fetched;
137 EnumMonikerImpl *This = (EnumMonikerImpl *)iface;
139 TRACE("(%p)->(%d, %p, %p)\n", iface, celt, rgelt, pceltFetched);
141 for (fetched = 0; (This->index + fetched < This->nMonikerCount) && (fetched < celt); fetched++)
143 rgelt[fetched] = This->ppMoniker[This->index + fetched];
144 IMoniker_AddRef(rgelt[fetched]);
147 This->index += fetched;
149 TRACE("-- fetched %d\n", fetched);
151 if (pceltFetched)
152 *pceltFetched = fetched;
154 if (fetched != celt)
155 return S_FALSE;
156 else
157 return S_OK;
160 static HRESULT WINAPI EnumMonikerImpl_Skip(LPENUMMONIKER iface, ULONG celt)
162 EnumMonikerImpl *This = (EnumMonikerImpl *)iface;
164 TRACE("(%p)->(%d)\n", iface, celt);
166 This->index += celt;
168 return S_OK;
171 static HRESULT WINAPI EnumMonikerImpl_Reset(LPENUMMONIKER iface)
173 EnumMonikerImpl *This = (EnumMonikerImpl *)iface;
175 TRACE("(%p)->()\n", iface);
177 This->index = 0;
179 return S_OK;
182 static HRESULT WINAPI EnumMonikerImpl_Clone(LPENUMMONIKER iface, IEnumMoniker ** ppenum)
184 FIXME("(%p)->(%p): stub\n", iface, ppenum);
186 return E_NOTIMPL;
189 /**********************************************************************
190 * IEnumMoniker_Vtbl
192 static const IEnumMonikerVtbl EnumMonikerImpl_Vtbl =
194 EnumMonikerImpl_QueryInterface,
195 EnumMonikerImpl_AddRef,
196 EnumMonikerImpl_Release,
197 EnumMonikerImpl_Next,
198 EnumMonikerImpl_Skip,
199 EnumMonikerImpl_Reset,
200 EnumMonikerImpl_Clone