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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
25 #define COM_NO_WINDOWS_H
27 #include "quartz_private.h"
29 #include "wine/debug.h"
31 WINE_DEFAULT_DEBUG_CHANNEL(quartz
);
33 typedef struct EnumMonikerImpl
35 const IEnumMonikerVtbl
*lpVtbl
;
37 IMoniker
** ppMoniker
;
42 static const IEnumMonikerVtbl EnumMonikerImpl_Vtbl
;
44 static ULONG WINAPI
EnumMonikerImpl_AddRef(LPENUMMONIKER iface
);
46 HRESULT
EnumMonikerImpl_Create(IMoniker
** ppMoniker
, ULONG nMonikerCount
, IEnumMoniker
** ppEnum
)
48 /* NOTE: assumes that array of IMonikers has already been AddRef'd
49 * I.e. this function does not AddRef the array of incoming
51 EnumMonikerImpl
* pemi
= CoTaskMemAlloc(sizeof(EnumMonikerImpl
));
53 TRACE("(%p, %ld, %p)\n", ppMoniker
, nMonikerCount
, ppEnum
);
60 pemi
->lpVtbl
= &EnumMonikerImpl_Vtbl
;
62 pemi
->ppMoniker
= CoTaskMemAlloc(nMonikerCount
* sizeof(IMoniker
*));
63 memcpy(pemi
->ppMoniker
, ppMoniker
, nMonikerCount
*sizeof(IMoniker
*));
64 pemi
->nMonikerCount
= nMonikerCount
;
67 *ppEnum
= (IEnumMoniker
*)pemi
;
72 /**********************************************************************
73 * IEnumMoniker_QueryInterface (also IUnknown)
75 static HRESULT WINAPI
EnumMonikerImpl_QueryInterface(
80 EnumMonikerImpl
*This
= (EnumMonikerImpl
*)iface
;
81 TRACE("\n\tIID:\t%s\n",debugstr_guid(riid
));
83 if (This
== NULL
|| ppvObj
== NULL
) return E_POINTER
;
85 if (IsEqualGUID(riid
, &IID_IUnknown
) ||
86 IsEqualGUID(riid
, &IID_IEnumMoniker
))
88 *ppvObj
= (LPVOID
)iface
;
89 EnumMonikerImpl_AddRef(iface
);
93 FIXME("- no interface\n\tIID:\t%s\n", debugstr_guid(riid
));
97 /**********************************************************************
98 * IEnumMoniker_AddRef (also IUnknown)
100 static ULONG WINAPI
EnumMonikerImpl_AddRef(LPENUMMONIKER iface
)
102 EnumMonikerImpl
*This
= (EnumMonikerImpl
*)iface
;
105 if (This
== NULL
) return E_POINTER
;
107 ref
= InterlockedIncrement(&This
->ref
);
109 TRACE("(%p)->() AddRef from %ld\n", iface
, ref
- 1);
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 %ld\n", iface
, ref
+ 1);
126 CoTaskMemFree(This
->ppMoniker
);
127 This
->ppMoniker
= NULL
;
134 static HRESULT WINAPI
EnumMonikerImpl_Next(LPENUMMONIKER iface
, ULONG celt
, IMoniker
** rgelt
, ULONG
* pceltFetched
)
137 EnumMonikerImpl
*This
= (EnumMonikerImpl
*)iface
;
139 TRACE("(%p)->(%ld, %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 %ld\n", fetched
);
152 *pceltFetched
= fetched
;
160 static HRESULT WINAPI
EnumMonikerImpl_Skip(LPENUMMONIKER iface
, ULONG celt
)
162 EnumMonikerImpl
*This
= (EnumMonikerImpl
*)iface
;
164 TRACE("(%p)->(%ld)\n", iface
, celt
);
171 static HRESULT WINAPI
EnumMonikerImpl_Reset(LPENUMMONIKER iface
)
173 EnumMonikerImpl
*This
= (EnumMonikerImpl
*)iface
;
175 TRACE("(%p)->()\n", iface
);
182 static HRESULT WINAPI
EnumMonikerImpl_Clone(LPENUMMONIKER iface
, IEnumMoniker
** ppenum
)
184 FIXME("(%p)->(%p): stub\n", iface
, ppenum
);
189 /**********************************************************************
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