2 * Stream on HGLOBAL Tests
4 * Copyright 2006 Robert Shearman (for CodeWeavers)
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.
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.
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
29 #include "wine/test.h"
31 #define ok_ole_success(hr, func) ok(hr == S_OK, func " failed with error 0x%08x\n", hr)
33 static char const * const *expected_method_list;
35 #define CHECK_EXPECTED_METHOD(method_name) \
37 ok(*expected_method_list != NULL, "Extra method %s called\n", method_name); \
38 if (*expected_method_list) \
40 ok(!strcmp(*expected_method_list, method_name), "Expected %s to be called instead of %s\n", \
41 *expected_method_list, method_name); \
42 expected_method_list++; \
46 static void test_streamonhglobal(IStream *pStream)
48 const char data[] = "Test String";
56 ull.QuadPart = sizeof(data);
57 hr = IStream_SetSize(pStream, ull);
58 ok_ole_success(hr, "IStream_SetSize");
60 hr = IStream_Write(pStream, data, sizeof(data), NULL);
61 ok_ole_success(hr, "IStream_Write");
64 hr = IStream_Seek(pStream, ll, STREAM_SEEK_SET, NULL);
65 ok_ole_success(hr, "IStream_Seek");
67 /* should return S_OK, not S_FALSE */
68 hr = IStream_Read(pStream, buffer, sizeof(buffer), &read);
69 ok_ole_success(hr, "IStream_Read");
70 ok(read == sizeof(data), "IStream_Read returned read %d\n", read);
72 /* ignores HighPart */
75 hr = IStream_SetSize(pStream, ull);
76 ok_ole_success(hr, "IStream_SetSize");
78 hr = IStream_Commit(pStream, STGC_DEFAULT);
79 ok_ole_success(hr, "IStream_Commit");
81 hr = IStream_Revert(pStream);
82 ok_ole_success(hr, "IStream_Revert");
84 hr = IStream_LockRegion(pStream, ull, ull, LOCK_WRITE);
85 ok(hr == STG_E_INVALIDFUNCTION, "IStream_LockRegion should have returned STG_E_INVALIDFUNCTION instead of 0x%08x\n", hr);
87 hr = IStream_Stat(pStream, &statstg, STATFLAG_DEFAULT);
88 ok_ole_success(hr, "IStream_Stat");
89 ok(statstg.type == STGTY_STREAM, "statstg.type should have been STGTY_STREAM instead of %d\n", statstg.type);
91 /* test OOM condition */
94 hr = IStream_SetSize(pStream, ull);
95 ok(hr == E_OUTOFMEMORY, "IStream_SetSize with large size should have returned E_OUTOFMEMORY instead of 0x%08x\n", hr);
98 static HRESULT WINAPI TestStream_QueryInterface(IStream *iface, REFIID riid, void **ppv)
100 if (IsEqualIID(riid, &IID_IUnknown) ||
101 IsEqualIID(riid, &IID_ISequentialStream) ||
102 IsEqualIID(riid, &IID_IStream))
105 IUnknown_AddRef(iface);
109 return E_NOINTERFACE;
112 static ULONG WINAPI TestStream_AddRef(IStream *iface)
117 static ULONG WINAPI TestStream_Release(IStream *iface)
122 static HRESULT WINAPI TestStream_Read(IStream *iface, void *pv, ULONG cb, ULONG *pcbRead)
124 CHECK_EXPECTED_METHOD("TestStream_Read");
128 static HRESULT WINAPI TestStream_Write(IStream *iface, const void *pv, ULONG cb, ULONG *pcbWritten)
130 CHECK_EXPECTED_METHOD("TestStream_Write");
135 static HRESULT WINAPI TestStream_Seek(IStream *iface, LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
137 CHECK_EXPECTED_METHOD("TestStream_Seek");
141 static HRESULT WINAPI TestStream_SetSize(IStream *iface, ULARGE_INTEGER libNewSize)
143 CHECK_EXPECTED_METHOD("TestStream_SetSize");
147 static HRESULT WINAPI TestStream_CopyTo(IStream *iface, IStream *pStream, ULARGE_INTEGER cb, ULARGE_INTEGER *pcbRead, ULARGE_INTEGER *pcbWritten)
149 CHECK_EXPECTED_METHOD("TestStream_CopyTo");
153 static HRESULT WINAPI TestStream_Commit(IStream *iface, DWORD grfCommitFlags)
155 CHECK_EXPECTED_METHOD("TestStream_Commit");
159 static HRESULT WINAPI TestStream_Revert(IStream *iface)
161 CHECK_EXPECTED_METHOD("TestStream_Revert");
165 static HRESULT WINAPI TestStream_LockRegion(IStream *iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
167 CHECK_EXPECTED_METHOD("TestStream_LockRegion");
171 static HRESULT WINAPI TestStream_UnlockRegion(IStream *iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
173 CHECK_EXPECTED_METHOD("TestStream_UnlockRegion");
177 static HRESULT WINAPI TestStream_Stat(IStream *iface, STATSTG *pstatstg, DWORD grfStatFlag)
179 CHECK_EXPECTED_METHOD("TestStream_Stat");
183 static HRESULT WINAPI TestStream_Clone(IStream *iface, IStream **pStream)
185 CHECK_EXPECTED_METHOD("TestStream_Clone");
189 static /*const*/ IStreamVtbl StreamVtbl =
191 TestStream_QueryInterface,
201 TestStream_LockRegion,
202 TestStream_UnlockRegion,
207 static IStream Test_Stream = { &StreamVtbl };
209 static void test_copyto(void)
211 IStream *pStream, *pStream2;
212 HRESULT hr = CreateStreamOnHGlobal(NULL, TRUE, &pStream);
213 static const char szHello[] = "Hello";
215 static const char *methods_copyto[] =
221 ULARGE_INTEGER ullRead;
222 ULARGE_INTEGER ullWritten;
223 ULARGE_INTEGER libNewPosition;
224 static const LARGE_INTEGER llZero;
227 expected_method_list = methods_copyto;
229 hr = IStream_Write(pStream, szHello, sizeof(szHello), &written);
230 ok_ole_success(hr, "IStream_Write");
231 ok(written == sizeof(szHello), "only %d bytes written\n", written);
233 hr = IStream_Seek(pStream, llZero, STREAM_SEEK_SET, NULL);
234 ok_ole_success(hr, "IStream_Seek");
236 cb.QuadPart = sizeof(szHello);
237 hr = IStream_CopyTo(pStream, &Test_Stream, cb, &ullRead, &ullWritten);
238 ok(ullWritten.QuadPart == 5, "ullWritten was %d instead\n", (ULONG)ullWritten.QuadPart);
239 ok(ullRead.QuadPart == sizeof(szHello), "only %d bytes read\n", (ULONG)ullRead.QuadPart);
240 ok_ole_success(hr, "IStream_CopyTo");
242 ok(!*expected_method_list, "Method sequence starting from %s not called\n", *expected_method_list);
244 hr = IStream_Clone(pStream, &pStream2);
245 ok_ole_success(hr, "IStream_Clone");
247 hr = IStream_Seek(pStream2, llZero, STREAM_SEEK_CUR, &libNewPosition);
248 ok_ole_success(hr, "IStream_Seek");
249 ok(libNewPosition.QuadPart == sizeof(szHello), "libNewPosition wasn't set correctly for the cloned stream\n");
251 hr = IStream_Seek(pStream2, llZero, STREAM_SEEK_SET, NULL);
252 ok_ole_success(hr, "IStream_Seek");
254 hr = IStream_Read(pStream2, buffer, sizeof(buffer), NULL);
255 ok_ole_success(hr, "IStream_Read");
256 ok(!strcmp(buffer, szHello), "read data \"%s\" didn't match originally written data\n", buffer);
258 IStream_Release(pStream2);
259 IStream_Release(pStream);
262 static void test_freed_hglobal(void)
272 hglobal = GlobalAlloc(GMEM_DDESHARE|GMEM_NODISCARD|GMEM_MOVEABLE, strlen("Rob") + 1);
273 ok(hglobal != NULL, "GlobalAlloc failed with error %d\n", GetLastError());
274 p = GlobalLock(hglobal);
276 GlobalUnlock(hglobal);
278 hr = CreateStreamOnHGlobal(hglobal, FALSE, &pStream);
279 ok_ole_success(hr, "CreateStreamOnHGlobal");
281 hr = IStream_Read(pStream, buffer, sizeof(buffer), &read);
282 ok_ole_success(hr, "IStream_Read");
283 ok(!strcmp(buffer, "Rob"), "buffer data %s differs\n", buffer);
284 ok(read == strlen("Rob") + 1, "read should be 4 instead of %d\n", read);
288 memset(buffer, 0, sizeof(buffer));
290 hr = IStream_Read(pStream, buffer, sizeof(buffer), &read);
291 ok_ole_success(hr, "IStream_Read");
292 ok(buffer[0] == 0, "buffer data should be untouched\n");
293 ok(read == 0, "read should be 0 instead of %d\n", read);
295 ull.QuadPart = sizeof(buffer);
296 hr = IStream_SetSize(pStream, ull);
297 ok(hr == E_OUTOFMEMORY, "IStream_SetSize with invalid HGLOBAL should return E_OUTOFMEMORY instead of 0x%08x\n", hr);
299 hr = IStream_Write(pStream, buffer, sizeof(buffer), &written);
300 ok(hr == E_OUTOFMEMORY, "IStream_Write with invalid HGLOBAL should return E_OUTOFMEMORY instead of 0x%08x\n", hr);
301 ok(written == 0, "written should be 0 instead of %d\n", written);
303 IStream_Release(pStream);
306 START_TEST(hglobalstream)
311 hr = CreateStreamOnHGlobal(NULL, TRUE, &pStream);
312 ok_ole_success(hr, "CreateStreamOnHGlobal");
314 test_streamonhglobal(pStream);
315 IStream_Release(pStream);
317 test_freed_hglobal();