dswave/tests: Test some IPersistStream methods of DirectSoundWave

Michael Stefaniuc mstefani at redhat.de
Tue May 27 15:43:58 CDT 2014


---
 dlls/dswave/tests/dswave.c | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/dlls/dswave/tests/dswave.c b/dlls/dswave/tests/dswave.c
index 154c899..1a96548 100644
--- a/dlls/dswave/tests/dswave.c
+++ b/dlls/dswave/tests/dswave.c
@@ -86,6 +86,37 @@ static void test_COM(void)
     while (IDirectMusicObject_Release(dmo));
 }
 
+static void test_dswave(void)
+{
+    IDirectMusicObject *dmo;
+    IPersistStream *ps;
+    CLSID class = { 0 };
+    ULARGE_INTEGER size;
+    HRESULT hr;
+
+    hr = CoCreateInstance(&CLSID_DirectSoundWave, NULL, CLSCTX_INPROC_SERVER,
+            &IID_IDirectMusicObject, (void**)&dmo);
+    ok(hr == S_OK, "DirectSoundWave create failed: %08x, expected S_OK\n", hr);
+
+    /* IPersistStream */
+    hr = IDirectMusicObject_QueryInterface(dmo, &IID_IPersistStream, (void**)&ps);
+    ok(hr == S_OK, "QueryInterface for IID_IPersistStream failed: %08x\n", hr);
+    hr = IPersistStream_GetClassID(ps, &class);
+    todo_wine ok(hr == S_OK, "IPersistStream_GetClassID failed: %08x\n", hr);
+    todo_wine ok(IsEqualGUID(&class, &CLSID_DirectSoundWave),
+            "Expected class CLSID_DirectSoundWave got %s\n", wine_dbgstr_guid(&class));
+
+    /* Unimplemented IPersistStream methods */
+    hr = IPersistStream_IsDirty(ps);
+    todo_wine ok(hr == S_FALSE, "IPersistStream_IsDirty failed: %08x\n", hr);
+    hr = IPersistStream_GetSizeMax(ps, &size);
+    ok(hr == E_NOTIMPL, "IPersistStream_GetSizeMax failed: %08x\n", hr);
+    hr = IPersistStream_Save(ps, NULL, TRUE);
+    ok(hr == E_NOTIMPL, "IPersistStream_Save failed: %08x\n", hr);
+
+    while (IDirectMusicObject_Release(dmo));
+}
+
 START_TEST(dswave)
 {
     CoInitialize(NULL);
@@ -97,6 +128,7 @@ START_TEST(dswave)
         return;
     }
     test_COM();
+    test_dswave();
 
     CoUninitialize();
 }
-- 
1.8.3.1



More information about the wine-patches mailing list