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, FALSE, &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 START_TEST(hglobalstream)
267 hr = CreateStreamOnHGlobal(NULL, TRUE, &pStream);
268 ok_ole_success(hr, "CreateStreamOnHGlobal");
270 test_streamonhglobal(pStream);
271 IStream_Release(pStream);