1 /* Unit tests for autocomplete
3 * Copyright 2007 Mikolaj Zalewski
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
29 #include "wine/test.h"
31 #define stop_on_error(exp) \
33 HRESULT res = (exp); \
36 ok(FALSE, #exp " failed: %x\n", res); \
43 HRESULT res = (exp); \
45 ok(FALSE, #exp " failed: %x\n", res); \
48 static LPWSTR
strdup_AtoW(LPCSTR str
)
50 int size
= MultiByteToWideChar(CP_ACP
, 0, str
, -1, NULL
, 0);
51 LPWSTR wstr
= CoTaskMemAlloc((size
+ 1)*sizeof(WCHAR
));
52 MultiByteToWideChar(CP_ACP
, 0, str
, -1, wstr
, size
+1);
58 IEnumString IEnumString_iface
;
59 IACList IACList_iface
;
68 extern IEnumStringVtbl TestACLVtbl
;
69 extern IACListVtbl TestACL_ACListVtbl
;
71 static inline TestACL
*impl_from_IEnumString(IEnumString
*iface
)
73 return CONTAINING_RECORD(iface
, TestACL
, IEnumString_iface
);
76 static TestACL
*impl_from_IACList(IACList
*iface
)
78 return CONTAINING_RECORD(iface
, TestACL
, IACList_iface
);
81 static TestACL
*TestACL_Constructor(int limit
, const char **strings
)
83 TestACL
*This
= CoTaskMemAlloc(sizeof(TestACL
));
84 ZeroMemory(This
, sizeof(*This
));
85 This
->IEnumString_iface
.lpVtbl
= &TestACLVtbl
;
86 This
->IACList_iface
.lpVtbl
= &TestACL_ACListVtbl
;
94 static ULONG STDMETHODCALLTYPE
TestACL_AddRef(IEnumString
*iface
)
96 TestACL
*This
= impl_from_IEnumString(iface
);
97 trace("ACL(%p): addref (%d)\n", This
, This
->ref
+1);
98 return InterlockedIncrement(&This
->ref
);
101 static ULONG STDMETHODCALLTYPE
TestACL_Release(IEnumString
*iface
)
103 TestACL
*This
= impl_from_IEnumString(iface
);
106 res
= InterlockedDecrement(&This
->ref
);
107 trace("ACL(%p): release (%d)\n", This
, res
);
111 static HRESULT STDMETHODCALLTYPE
TestACL_QueryInterface(IEnumString
*iface
, REFIID iid
, LPVOID
*ppvOut
)
113 TestACL
*This
= impl_from_IEnumString(iface
);
115 if (IsEqualGUID(iid
, &IID_IUnknown
) || IsEqualGUID(iid
, &IID_IEnumString
))
119 else if (IsEqualGUID(iid
, &IID_IACList
))
121 *ppvOut
= &This
->IACList_iface
;
126 iface
->lpVtbl
->AddRef(iface
);
130 if (!IsEqualGUID(iid
, &IID_IEnumACString
))
131 trace("unknown interface queried\n");
132 return E_NOINTERFACE
;
135 static HRESULT STDMETHODCALLTYPE
TestACL_Next(IEnumString
*iface
, ULONG celt
, LPOLESTR
*rgelt
, ULONG
*pceltFetched
)
137 TestACL
*This
= impl_from_IEnumString(iface
);
140 trace("ACL(%p): read %d item(s)\n", This
, celt
);
141 for (i
= 0; i
< celt
; i
++)
143 if (This
->pos
>= This
->limit
)
145 rgelt
[i
] = strdup_AtoW(This
->data
[This
->pos
]);
156 static HRESULT STDMETHODCALLTYPE
TestACL_Skip(IEnumString
*iface
, ULONG celt
)
158 ok(FALSE
, "Unexpected call to TestACL_Skip\n");
162 static HRESULT STDMETHODCALLTYPE
TestACL_Clone(IEnumString
*iface
, IEnumString
**out
)
164 ok(FALSE
, "Unexpected call to TestACL_Clone\n");
165 return E_OUTOFMEMORY
;
168 static HRESULT STDMETHODCALLTYPE
TestACL_Reset(IEnumString
*iface
)
170 TestACL
*This
= impl_from_IEnumString(iface
);
171 trace("ACL(%p): Reset\n", This
);
176 static HRESULT STDMETHODCALLTYPE
TestACL_Expand(IACList
*iface
, LPCOLESTR str
)
178 TestACL
*This
= impl_from_IACList(iface
);
179 trace("ACL(%p): Expand\n", This
);
184 IEnumStringVtbl TestACLVtbl
=
186 TestACL_QueryInterface
,
196 static ULONG STDMETHODCALLTYPE
TestACL_ACList_AddRef(IACList
*iface
)
198 TestACL
*This
= impl_from_IACList(iface
);
199 return TestACL_AddRef(&This
->IEnumString_iface
);
202 static ULONG STDMETHODCALLTYPE
TestACL_ACList_Release(IACList
*iface
)
204 TestACL
*This
= impl_from_IACList(iface
);
205 return TestACL_Release(&This
->IEnumString_iface
);
208 static HRESULT STDMETHODCALLTYPE
TestACL_ACList_QueryInterface(IACList
*iface
, REFIID iid
, LPVOID
*ppvout
)
210 TestACL
*This
= impl_from_IACList(iface
);
211 return TestACL_QueryInterface(&This
->IEnumString_iface
, iid
, ppvout
);
214 IACListVtbl TestACL_ACListVtbl
=
216 TestACL_ACList_QueryInterface
,
217 TestACL_ACList_AddRef
,
218 TestACL_ACList_Release
,
223 #define expect_str(obj, str) \
225 ole_ok(obj->lpVtbl->Next(obj, 1, &wstr, &i)); \
226 ok(i == 1, "Expected i == 1, got %d\n", i); \
227 ok(str[0] == wstr[0], "String mismatch\n"); \
228 CoTaskMemFree(wstr); \
231 #define expect_end(obj) \
232 ok(obj->lpVtbl->Next(obj, 1, &wstr, &i) == S_FALSE, "Unexpected return from Next\n");
234 static void test_ACLMulti(void)
236 const char *strings1
[] = {"a", "c", "e"};
237 const char *strings2
[] = {"a", "b", "d"};
238 WCHAR exp
[] = {'A','B','C',0};
242 TestACL
*acl1
, *acl2
;
250 stop_on_error(CoCreateInstance(&CLSID_ACLMulti
, NULL
, CLSCTX_INPROC
, &IID_IEnumString
, (LPVOID
*)&obj
));
251 stop_on_error(obj
->lpVtbl
->QueryInterface(obj
, &IID_IACList
, (LPVOID
*)&acl
));
252 ok(obj
->lpVtbl
->QueryInterface(obj
, &IID_IACList2
, &tmp
) == E_NOINTERFACE
,
253 "Unexpected interface IACList2 in ACLMulti\n");
254 stop_on_error(obj
->lpVtbl
->QueryInterface(obj
, &IID_IObjMgr
, (LPVOID
*)&mgr
));
256 hr
= obj
->lpVtbl
->QueryInterface(obj
, &IID_IEnumACString
, (LPVOID
*)&unk
);
257 if (hr
== E_NOINTERFACE
)
258 todo_wine
win_skip("IEnumACString is not supported, skipping tests\n");
261 ok(hr
== S_OK
, "QueryInterface(IID_IEnumACString) failed: %x\n", hr
);
263 unk
->lpVtbl
->Release(unk
);
266 ok(obj
->lpVtbl
->Next(obj
, 1, (LPOLESTR
*)&tmp
, &i
) == S_FALSE
, "Unexpected return from Next\n");
267 ok(i
== 0, "Unexpected fetched value %d\n", i
);
268 ok(obj
->lpVtbl
->Next(obj
, 44, (LPOLESTR
*)&tmp
, &i
) == S_FALSE
, "Unexpected return from Next\n");
269 ok(obj
->lpVtbl
->Skip(obj
, 1) == E_NOTIMPL
, "Unexpected return from Skip\n");
270 ok(obj
->lpVtbl
->Clone(obj
, (IEnumString
**)&tmp
) == E_OUTOFMEMORY
, "Unexpected return from Clone\n");
271 ole_ok(acl
->lpVtbl
->Expand(acl
, exp
));
273 acl1
= TestACL_Constructor(3, strings1
);
274 acl2
= TestACL_Constructor(3, strings2
);
275 stop_on_error(mgr
->lpVtbl
->Append(mgr
, (IUnknown
*)&acl1
->IACList_iface
));
276 stop_on_error(mgr
->lpVtbl
->Append(mgr
, (IUnknown
*)&acl2
->IACList_iface
));
277 ok(mgr
->lpVtbl
->Append(mgr
, NULL
) == E_FAIL
, "Unexpected return from Append\n");
278 expect_str(obj
, "a");
279 expect_str(obj
, "c");
280 expect_str(obj
, "e");
281 expect_str(obj
, "a");
282 expect_str(obj
, "b");
283 expect_str(obj
, "d");
286 ole_ok(obj
->lpVtbl
->Reset(obj
));
287 ok(acl1
->pos
== 0, "acl1 not reset\n");
288 ok(acl2
->pos
== 0, "acl2 not reset\n");
290 ole_ok(acl
->lpVtbl
->Expand(acl
, exp
));
291 ok(acl1
->expcount
== 1, "expcount - expected 1, got %d\n", acl1
->expcount
);
292 ok(acl2
->expcount
== 0 /* XP */ || acl2
->expcount
== 1 /* Vista */,
293 "expcount - expected 0 or 1, got %d\n", acl2
->expcount
);
295 ole_ok(obj
->lpVtbl
->Next(obj
, 15, wstrtab
, &i
));
296 ok(i
== 1, "Expected i == 1, got %d\n", i
);
297 CoTaskMemFree(wstrtab
[0]);
298 ole_ok(obj
->lpVtbl
->Next(obj
, 15, wstrtab
, &i
));
299 CoTaskMemFree(wstrtab
[0]);
300 ole_ok(obj
->lpVtbl
->Next(obj
, 15, wstrtab
, &i
));
301 CoTaskMemFree(wstrtab
[0]);
302 ole_ok(obj
->lpVtbl
->Next(obj
, 15, wstrtab
, &i
));
303 CoTaskMemFree(wstrtab
[0]);
304 ole_ok(acl
->lpVtbl
->Expand(acl
, exp
));
305 ok(acl1
->expcount
== 2, "expcount - expected 1, got %d\n", acl1
->expcount
);
306 ok(acl2
->expcount
== 0 /* XP */ || acl2
->expcount
== 2 /* Vista */,
307 "expcount - expected 0 or 2, got %d\n", acl2
->expcount
);
308 acl1
->expret
= S_FALSE
;
309 ole_ok(acl
->lpVtbl
->Expand(acl
, exp
));
310 ok(acl1
->expcount
== 3, "expcount - expected 1, got %d\n", acl1
->expcount
);
311 ok(acl2
->expcount
== 1 /* XP */ || acl2
->expcount
== 3 /* Vista */,
312 "expcount - expected 0 or 3, got %d\n", acl2
->expcount
);
313 acl1
->expret
= E_NOTIMPL
;
314 ole_ok(acl
->lpVtbl
->Expand(acl
, exp
));
315 ok(acl1
->expcount
== 4, "expcount - expected 1, got %d\n", acl1
->expcount
);
316 ok(acl2
->expcount
== 2 /* XP */ || acl2
->expcount
== 4 /* Vista */,
317 "expcount - expected 0 or 4, got %d\n", acl2
->expcount
);
318 acl2
->expret
= E_OUTOFMEMORY
;
319 ok(acl
->lpVtbl
->Expand(acl
, exp
) == E_OUTOFMEMORY
, "Unexpected Expand return\n");
320 acl2
->expret
= E_FAIL
;
321 ok(acl
->lpVtbl
->Expand(acl
, exp
) == E_FAIL
, "Unexpected Expand return\n");
323 stop_on_error(mgr
->lpVtbl
->Remove(mgr
, (IUnknown
*)&acl1
->IACList_iface
));
324 ok(acl1
->ref
== 1, "acl1 not released\n");
326 obj
->lpVtbl
->Reset(obj
);
327 expect_str(obj
, "a");
328 expect_str(obj
, "b");
329 expect_str(obj
, "d");
332 obj
->lpVtbl
->Release(obj
);
333 acl
->lpVtbl
->Release(acl
);
334 ok(mgr
->lpVtbl
->Release(mgr
) == 0, "Unexpected references\n");
335 ok(acl1
->ref
== 1, "acl1 not released\n");
336 ok(acl2
->ref
== 1, "acl2 not released\n");
342 START_TEST(autocomplete
)