wmp: Improve URL property handling.
[wine.git] / dlls / wmp / tests / media.c
blobdd6fdcbc919059769be9cf73d742466ccb750218
1 /*
2 * This library is free software; you can redistribute it and/or
3 * modify it under the terms of the GNU Lesser General Public
4 * License as published by the Free Software Foundation; either
5 * version 2.1 of the License, or (at your option) any later version.
7 * This library is distributed in the hope that it will be useful,
8 * but WITHOUT ANY WARRANTY; without even the implied warranty of
9 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
10 * Lesser General Public License for more details.
12 * You should have received a copy of the GNU Lesser General Public
13 * License along with this library; if not, write to the Free Software
14 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 #define WIN32_LEAN_AND_MEAN
18 #define COBJMACROS
19 #include <wmp.h>
20 #include <olectl.h>
21 #include <nserror.h>
22 #include <wmpids.h>
23 #include <math.h>
24 #include <assert.h>
26 #include "wine/test.h"
28 #define DEFINE_EXPECT(kind) \
29 static DWORD expect_ ## kind = 0, called_ ## kind = 0
31 #define SET_EXPECT(kind, index) \
32 do { \
33 assert(index < 8 * sizeof(expect_ ## kind)); \
34 expect_ ## kind |= (1 << index); \
35 }while(0)
37 #define CHECK_EXPECT(kind, index) \
38 do { \
39 ok(expect_ ##kind & (1 << index), "unexpected event for " #kind ", index:%d\n", index); \
40 called_ ## kind |= (1 << index); \
41 }while(0)
43 #define CLEAR_CALLED(kind, index) \
44 do { \
45 expect_ ## kind &= ~(1 << index); \
46 called_ ## kind &= ~(1 << index); \
47 }while(0)
49 #define CHECK_CALLED(kind, index) \
50 do { \
51 ok(called_ ## kind & (1 << index), "expected " #kind ", %d\n", index); \
52 expect_ ## kind &= ~(1 << index); \
53 called_ ## kind &= ~(1 << index); \
54 }while(0)
56 #define CHECK_NOT_CALLED(kind, index) \
57 do { \
58 ok(!(called_ ## kind & (1 << index)), "not expected " #kind ", %d\n", index); \
59 expect_ ## kind &= ~(1 << index); \
60 called_ ## kind &= ~(1 << index); \
61 }while(0)
63 DEFINE_EXPECT(PLAYSTATE);
64 DEFINE_EXPECT(OPENSTATE);
66 static HANDLE playing_event;
67 static HANDLE completed_event;
68 static DWORD main_thread_id;
70 static const WCHAR mp3file[] = {'t','e','s','t','.','m','p','3',0};
71 static const WCHAR mp3file1s[] = {'t','e','s','t','1','s','.','m','p','3',0};
72 static inline WCHAR *load_resource(const WCHAR *name)
74 static WCHAR pathW[MAX_PATH];
75 DWORD written;
76 HANDLE file;
77 HRSRC res;
78 void *ptr;
80 GetTempPathW(ARRAY_SIZE(pathW), pathW);
81 lstrcatW(pathW, name);
83 file = CreateFileW(pathW, GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0);
84 ok(file != INVALID_HANDLE_VALUE, "file creation failed, at %s, error %d\n", wine_dbgstr_w(pathW),
85 GetLastError());
87 res = FindResourceW(NULL, name, (LPCWSTR)RT_RCDATA);
88 ok( res != 0, "couldn't find resource\n" );
89 ptr = LockResource( LoadResource( GetModuleHandleA(NULL), res ));
90 WriteFile( file, ptr, SizeofResource( GetModuleHandleA(NULL), res ), &written, NULL );
91 ok( written == SizeofResource( GetModuleHandleA(NULL), res ), "couldn't write resource\n" );
92 CloseHandle( file );
94 return pathW;
97 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
99 return 2;
102 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
104 return 1;
107 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
109 ok(0, "unexpected call\n");
110 return E_NOTIMPL;
113 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
114 ITypeInfo **ppTInfo)
116 ok(0, "unexpected call\n");
117 return E_NOTIMPL;
120 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
121 UINT cNames, LCID lcid, DISPID *rgDispId)
123 ok(0, "unexpected call\n");
124 return E_NOTIMPL;
127 static HRESULT WINAPI WMPOCXEvents_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
129 *ppv = NULL;
131 if(IsEqualGUID(&IID__WMPOCXEvents, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
132 *ppv = iface;
133 return S_OK;
136 ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid));
137 return E_NOINTERFACE;
140 static HRESULT WINAPI WMPOCXEvents_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
141 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
142 EXCEPINFO *pExcepInfo, UINT *puArgErr)
144 ok(main_thread_id == GetCurrentThreadId(), "Got notification outside of main thread!\n");
145 switch(dispIdMember) {
146 case DISPID_WMPCOREEVENT_OPENSTATECHANGE:
147 CHECK_EXPECT(OPENSTATE, V_UI4(pDispParams->rgvarg));
148 if (winetest_debug > 1)
149 trace("DISPID_WMPCOREEVENT_OPENSTATECHANGE, %d\n", V_UI4(pDispParams->rgvarg));
150 break;
151 case DISPID_WMPCOREEVENT_PLAYSTATECHANGE:
152 CHECK_EXPECT(PLAYSTATE, V_UI4(pDispParams->rgvarg));
153 if (V_UI4(pDispParams->rgvarg) == wmppsPlaying) {
154 SetEvent(playing_event);
155 } else if (V_UI4(pDispParams->rgvarg) == wmppsMediaEnded) {
156 SetEvent(completed_event);
158 if (winetest_debug > 1)
159 trace("DISPID_WMPCOREEVENT_PLAYSTATECHANGE, %d\n", V_UI4(pDispParams->rgvarg));
160 break;
161 case DISPID_WMPCOREEVENT_MEDIACHANGE:
162 if (winetest_debug > 1)
163 trace("DISPID_WMPCOREEVENT_MEDIACHANGE\n");
164 break;
165 case DISPID_WMPCOREEVENT_CURRENTITEMCHANGE:
166 if (winetest_debug > 1)
167 trace("DISPID_WMPCOREEVENT_CURRENTITEMCHANGE\n");
168 break;
169 case DISPID_WMPCOREEVENT_STATUSCHANGE:
170 if (winetest_debug > 1)
171 trace("DISPID_WMPCOREEVENT_STATUSCHANGE\n");
172 break;
173 default:
174 if (winetest_debug > 1)
175 trace("event: %d\n", dispIdMember);
176 break;
179 return E_NOTIMPL;
182 static IDispatchVtbl WMPOcxEventsVtbl = {
183 WMPOCXEvents_QueryInterface,
184 Dispatch_AddRef,
185 Dispatch_Release,
186 Dispatch_GetTypeInfoCount,
187 Dispatch_GetTypeInfo,
188 Dispatch_GetIDsOfNames,
189 WMPOCXEvents_Invoke,
192 static IDispatch WMPOCXEvents = { &WMPOcxEventsVtbl };
194 static HRESULT pump_messages(DWORD timeout, DWORD count, const HANDLE *handles) {
195 MSG msg;
196 HRESULT res;
197 DWORD start_time = GetTickCount();
198 do {
199 DWORD now = GetTickCount();
200 res = MsgWaitForMultipleObjectsEx(count, handles, start_time + timeout - now,
201 QS_ALLINPUT ,MWMO_ALERTABLE | MWMO_INPUTAVAILABLE);
202 if (res == WAIT_OBJECT_0 + 1) {
203 GetMessageW(&msg, 0, 0, 0);
204 if (winetest_debug > 1)
205 trace("Dispatching %d\n", msg.message);
206 TranslateMessage(&msg);
207 DispatchMessageW(&msg);
210 while (res == WAIT_OBJECT_0 + 1);
211 return res;
214 static void test_completion_event(void)
216 DWORD res = 0;
217 IWMPPlayer4 *player4;
218 HRESULT hres;
219 BSTR filename;
220 IConnectionPointContainer *container;
221 IConnectionPoint *point;
222 IOleObject *oleobj;
223 static DWORD dw = 100;
225 hres = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IOleObject, (void**)&oleobj);
226 if(hres == REGDB_E_CLASSNOTREG) {
227 win_skip("CLSID_WindowsMediaPlayer not registered\n");
228 return;
230 ok(hres == S_OK, "Could not create CLSID_WindowsMediaPlayer instance: %08x\n", hres);
232 hres = IOleObject_QueryInterface(oleobj, &IID_IConnectionPointContainer, (void**)&container);
233 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
234 if(FAILED(hres))
235 return;
237 hres = IConnectionPointContainer_FindConnectionPoint(container, &IID__WMPOCXEvents, &point);
238 IConnectionPointContainer_Release(container);
239 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
241 hres = IConnectionPoint_Advise(point, (IUnknown*)&WMPOCXEvents, &dw);
242 ok(hres == S_OK, "Advise failed: %08x\n", hres);
244 hres = IOleObject_QueryInterface(oleobj, &IID_IWMPPlayer4, (void**)&player4);
245 ok(hres == S_OK, "Could not get IWMPPlayer4 iface: %08x\n", hres);
247 filename = SysAllocString(load_resource(mp3file1s));
249 SET_EXPECT(OPENSTATE, wmposPlaylistChanging);
250 SET_EXPECT(OPENSTATE, wmposPlaylistOpenNoMedia);
251 SET_EXPECT(OPENSTATE, wmposPlaylistChanged);
252 SET_EXPECT(OPENSTATE, wmposOpeningUnknownURL);
253 SET_EXPECT(OPENSTATE, wmposMediaOpen);
254 SET_EXPECT(OPENSTATE, wmposMediaOpening);
255 SET_EXPECT(PLAYSTATE, wmppsPlaying);
256 SET_EXPECT(PLAYSTATE, wmppsMediaEnded);
257 SET_EXPECT(PLAYSTATE, wmppsStopped);
258 SET_EXPECT(PLAYSTATE, wmppsTransitioning);
259 /* following two are sent on vistau64 vms only */
260 SET_EXPECT(OPENSTATE, wmposMediaChanging);
261 SET_EXPECT(PLAYSTATE, wmppsReady);
262 hres = IWMPPlayer4_put_URL(player4, filename);
263 ok(hres == S_OK, "IWMPPlayer4_put_URL failed: %08x\n", hres);
264 res = pump_messages(3000, 1, &completed_event);
265 ok(res == WAIT_OBJECT_0, "Timed out while waiting for media to complete\n");
267 /* following two are sent on vistau64 vms only */
268 CLEAR_CALLED(OPENSTATE, wmposMediaChanging);
269 CLEAR_CALLED(PLAYSTATE, wmppsReady);
271 CHECK_CALLED(OPENSTATE, wmposPlaylistChanging);
272 CHECK_CALLED(OPENSTATE, wmposPlaylistChanged);
273 CHECK_CALLED(OPENSTATE, wmposPlaylistOpenNoMedia);
274 CHECK_CALLED(PLAYSTATE, wmppsTransitioning);
275 CHECK_CALLED(OPENSTATE, wmposOpeningUnknownURL);
276 CHECK_CALLED(OPENSTATE, wmposMediaOpen);
277 CHECK_CALLED(PLAYSTATE, wmppsPlaying);
278 CHECK_CALLED(PLAYSTATE, wmppsMediaEnded);
279 CHECK_CALLED(PLAYSTATE, wmppsStopped);
280 /* MediaOpening happens only on xp, 2003 */
281 CLEAR_CALLED(OPENSTATE, wmposMediaOpening);
283 hres = IConnectionPoint_Unadvise(point, dw);
284 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
286 IConnectionPoint_Release(point);
287 IWMPPlayer4_Release(player4);
288 IOleObject_Release(oleobj);
289 DeleteFileW(filename);
290 SysFreeString(filename);
293 static BOOL test_wmp(void)
295 DWORD res = 0;
296 IWMPPlayer4 *player4;
297 IWMPControls *controls;
298 HRESULT hres;
299 BSTR filename;
300 IConnectionPointContainer *container;
301 IConnectionPoint *point;
302 IOleObject *oleobj;
303 static DWORD dw = 100;
304 IWMPSettings *settings;
305 BOOL test_ran = TRUE;
306 IWMPNetwork *network;
307 DOUBLE duration;
308 VARIANT_BOOL vbool;
309 LONG progress;
310 IWMPMedia *media;
311 static const WCHAR currentPosition[] = {'c','u','r','r','e','n','t','P','o','s','i','t','i','o','n',0};
312 BSTR bstrcurrentPosition;
314 hres = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IOleObject, (void**)&oleobj);
315 if(hres == REGDB_E_CLASSNOTREG) {
316 win_skip("CLSID_WindowsMediaPlayer not registered\n");
317 return FALSE;
319 ok(hres == S_OK, "Could not create CLSID_WindowsMediaPlayer instance: %08x\n", hres);
321 hres = IOleObject_QueryInterface(oleobj, &IID_IConnectionPointContainer, (void**)&container);
322 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
324 hres = IConnectionPointContainer_FindConnectionPoint(container, &IID__WMPOCXEvents, &point);
325 IConnectionPointContainer_Release(container);
326 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
328 hres = IConnectionPoint_Advise(point, (IUnknown*)&WMPOCXEvents, &dw);
329 ok(hres == S_OK, "Advise failed: %08x\n", hres);
331 hres = IOleObject_QueryInterface(oleobj, &IID_IWMPPlayer4, (void**)&player4);
332 ok(hres == S_OK, "Could not get IWMPPlayer4 iface: %08x\n", hres);
334 settings = NULL;
335 hres = IWMPPlayer4_get_settings(player4, &settings);
336 ok(hres == S_OK, "get_settings failed: %08x\n", hres);
337 ok(settings != NULL, "settings = NULL\n");
339 hres = IWMPSettings_put_autoStart(settings, VARIANT_FALSE);
340 ok(hres == S_OK, "Could not put autoStart in IWMPSettings: %08x\n", hres);
342 controls = NULL;
343 hres = IWMPPlayer4_get_controls(player4, &controls);
344 ok(hres == S_OK, "get_controls failed: %08x\n", hres);
345 ok(controls != NULL, "controls = NULL\n");
347 bstrcurrentPosition = SysAllocString(currentPosition);
348 hres = IWMPControls_get_isAvailable(controls, bstrcurrentPosition, &vbool);
349 ok(hres == S_OK, "IWMPControls_get_isAvailable failed: %08x\n", hres);
350 ok(vbool == VARIANT_FALSE, "unexpected value\n");
352 hres = IWMPControls_play(controls);
353 ok(hres == NS_S_WMPCORE_COMMAND_NOT_AVAILABLE, "IWMPControls_play is available: %08x\n", hres);
355 hres = IWMPSettings_put_volume(settings, 36);
356 ok(hres == S_OK, "IWMPSettings_put_volume failed: %08x\n", hres);
357 hres = IWMPSettings_get_volume(settings, &progress);
358 ok(hres == S_OK, "IWMPSettings_get_volume failed: %08x\n", hres);
359 ok(progress == 36, "unexpected value: %d\n", progress);
361 filename = SysAllocString(load_resource(mp3file));
363 SET_EXPECT(OPENSTATE, wmposPlaylistChanging);
364 SET_EXPECT(OPENSTATE, wmposPlaylistOpenNoMedia);
365 SET_EXPECT(OPENSTATE, wmposPlaylistChanged);
366 SET_EXPECT(PLAYSTATE, wmppsTransitioning);
367 SET_EXPECT(PLAYSTATE, wmppsReady);
368 hres = IWMPPlayer4_put_URL(player4, filename);
369 ok(hres == S_OK, "IWMPPlayer4_put_URL failed: %08x\n", hres);
370 CHECK_CALLED(OPENSTATE, wmposPlaylistChanging);
371 CHECK_CALLED(OPENSTATE, wmposPlaylistChanged);
372 CHECK_CALLED(OPENSTATE, wmposPlaylistOpenNoMedia);
373 CHECK_CALLED(PLAYSTATE, wmppsTransitioning);
374 CHECK_CALLED(PLAYSTATE, wmppsReady);
376 SET_EXPECT(OPENSTATE, wmposOpeningUnknownURL);
377 SET_EXPECT(OPENSTATE, wmposMediaOpen);
378 SET_EXPECT(PLAYSTATE, wmppsPlaying);
379 SET_EXPECT(PLAYSTATE, wmppsTransitioning);
380 /* MediaOpening happens only on xp, 2003 */
381 SET_EXPECT(OPENSTATE, wmposMediaOpening);
382 hres = IWMPControls_play(controls);
383 ok(hres == S_OK, "IWMPControls_play failed: %08x\n", hres);
384 res = pump_messages(1000, 1, &playing_event);
385 ok(res == WAIT_OBJECT_0 || broken(res == WAIT_TIMEOUT), "Timed out while waiting for media to become ready\n");
386 if (res == WAIT_TIMEOUT) {
387 /* This happens on Vista Ultimate 64 vms
388 * I have been unable to find out source of this behaviour */
389 win_skip("Failed to transition media to playing state.\n");
390 test_ran = FALSE;
391 goto playback_skip;
393 CHECK_CALLED(OPENSTATE, wmposOpeningUnknownURL);
394 CHECK_CALLED(OPENSTATE, wmposMediaOpen);
395 CHECK_CALLED(PLAYSTATE, wmppsPlaying);
396 CHECK_CALLED(PLAYSTATE, wmppsTransitioning);
397 /* MediaOpening happens only on xp, 2003 */
398 CLEAR_CALLED(OPENSTATE, wmposMediaOpening);
400 hres = IWMPControls_get_isAvailable(controls, bstrcurrentPosition, &vbool);
401 ok(hres == S_OK, "IWMPControls_get_isAvailable failed: %08x\n", hres);
402 ok(vbool == VARIANT_TRUE, "unexpected value\n");
404 duration = 0.0;
405 hres = IWMPControls_get_currentPosition(controls, &duration);
406 ok(hres == S_OK, "IWMPControls_get_currentPosition failed: %08x\n", hres);
407 ok((int)duration == 0, "unexpected value %f\n", duration);
409 duration = 1.1;
410 hres = IWMPControls_put_currentPosition(controls, duration);
411 ok(hres == S_OK, "IWMPControls_put_currentPosition failed: %08x\n", hres);
413 duration = 0.0;
414 hres = IWMPControls_get_currentPosition(controls, &duration);
415 ok(hres == S_OK, "IWMPControls_get_currentPosition failed: %08x\n", hres);
416 /* builtin quartz does not handle this currently and resets to 0.0, works
417 * with native quartz */
418 todo_wine ok(duration >= 1.05 /* save some fp errors */, "unexpected value %f\n", duration);
420 hres = IWMPPlayer4_get_currentMedia(player4, &media);
421 ok(hres == S_OK, "IWMPPlayer4_get_currentMedia failed: %08x\n", hres);
422 hres = IWMPMedia_get_duration(media, &duration);
423 ok(hres == S_OK, "IWMPMedia_get_duration failed: %08x\n", hres);
424 ok(round(duration) == 3, "unexpected value: %f\n", duration);
425 IWMPMedia_Release(media);
427 network = NULL;
428 hres = IWMPPlayer4_get_network(player4, &network);
429 ok(hres == S_OK, "get_network failed: %08x\n", hres);
430 ok(network != NULL, "network = NULL\n");
431 progress = 0;
432 hres = IWMPNetwork_get_bufferingProgress(network, &progress);
433 ok(hres == S_OK || broken(hres == S_FALSE), "IWMPNetwork_get_bufferingProgress failed: %08x\n", hres);
434 ok(progress == 100, "unexpected value: %d\n", progress);
435 progress = 0;
436 hres = IWMPNetwork_get_downloadProgress(network, &progress);
437 ok(hres == S_OK, "IWMPNetwork_get_downloadProgress failed: %08x\n", hres);
438 ok(progress == 100, "unexpected value: %d\n", progress);
439 IWMPNetwork_Release(network);
441 SET_EXPECT(PLAYSTATE, wmppsStopped);
442 /* The following happens on wine only since we close media on stop */
443 SET_EXPECT(OPENSTATE, wmposPlaylistOpenNoMedia);
444 hres = IWMPControls_stop(controls);
445 ok(hres == S_OK, "IWMPControls_stop failed: %08x\n", hres);
446 CHECK_CALLED(PLAYSTATE, wmppsStopped);
447 todo_wine CHECK_NOT_CALLED(OPENSTATE, wmposPlaylistOpenNoMedia);
449 /* Already Stopped */
450 hres = IWMPControls_stop(controls);
451 ok(hres == NS_S_WMPCORE_COMMAND_NOT_AVAILABLE, "IWMPControls_stop is available: %08x\n", hres);
453 SET_EXPECT(PLAYSTATE, wmppsPlaying);
454 /* The following happens on wine only since we close media on stop */
455 SET_EXPECT(OPENSTATE, wmposOpeningUnknownURL);
456 SET_EXPECT(OPENSTATE, wmposMediaOpen);
457 SET_EXPECT(PLAYSTATE, wmppsTransitioning);
458 hres = IWMPControls_play(controls);
459 ok(hres == S_OK, "IWMPControls_play failed: %08x\n", hres);
460 CHECK_CALLED(PLAYSTATE, wmppsPlaying);
461 todo_wine CHECK_NOT_CALLED(OPENSTATE, wmposOpeningUnknownURL);
462 todo_wine CHECK_NOT_CALLED(OPENSTATE, wmposMediaOpen);
463 todo_wine CHECK_NOT_CALLED(PLAYSTATE, wmppsTransitioning);
465 playback_skip:
466 hres = IConnectionPoint_Unadvise(point, dw);
467 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
469 hres = IWMPSettings_get_volume(settings, &progress);
470 ok(hres == S_OK, "IWMPSettings_get_volume failed: %08x\n", hres);
471 ok(progress == 36, "unexpected value: %d\n", progress);
472 hres = IWMPSettings_put_volume(settings, 99);
473 ok(hres == S_OK, "IWMPSettings_put_volume failed: %08x\n", hres);
474 hres = IWMPSettings_get_volume(settings, &progress);
475 ok(hres == S_OK, "IWMPSettings_get_volume failed: %08x\n", hres);
476 ok(progress == 99, "unexpected value: %d\n", progress);
478 IConnectionPoint_Release(point);
479 IWMPSettings_Release(settings);
480 IWMPControls_Release(controls);
481 IWMPPlayer4_Release(player4);
482 IOleObject_Release(oleobj);
483 DeleteFileW(filename);
484 SysFreeString(filename);
485 SysFreeString(bstrcurrentPosition);
487 return test_ran;
490 static void test_media_item(void)
492 static const WCHAR testW[] = {'t','e','s','t',0};
493 IWMPMedia *media, *media2;
494 IWMPPlayer4 *player;
495 HRESULT hr;
496 BSTR str;
498 hr = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IWMPPlayer4, (void **)&player);
499 if (hr == REGDB_E_CLASSNOTREG)
501 win_skip("CLSID_WindowsMediaPlayer is not registered.\n");
502 return;
504 ok(hr == S_OK, "Failed to create media player instance, hr %#x.\n", hr);
506 hr = IWMPPlayer4_newMedia(player, NULL, &media);
507 ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
508 hr = IWMPMedia_get_name(media, &str);
509 ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
510 ok(*str == 0, "Unexpected name %s.\n", wine_dbgstr_w(str));
511 SysFreeString(str);
513 media2 = (void *)0xdeadbeef;
514 hr = IWMPPlayer4_get_currentMedia(player, &media2);
515 ok(hr == S_FALSE, "Failed to get current media, hr %#x.\n", hr);
516 ok(media2 == NULL, "Unexpected media instance.\n");
518 hr = IWMPPlayer4_put_currentMedia(player, media);
519 ok(hr == S_OK, "Failed to set current media, hr %#x.\n", hr);
521 hr = IWMPPlayer4_get_currentMedia(player, &media2);
522 ok(hr == S_OK, "Failed to get current media, hr %#x.\n", hr);
523 ok(media2 != NULL && media != media2, "Unexpected media instance.\n");
524 IWMPMedia_Release(media2);
526 IWMPMedia_Release(media);
528 str = SysAllocStringLen(NULL, 0);
529 hr = IWMPPlayer4_newMedia(player, str, &media);
530 ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
531 SysFreeString(str);
532 hr = IWMPMedia_get_name(media, &str);
533 ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
534 ok(*str == 0, "Unexpected name %s.\n", wine_dbgstr_w(str));
535 SysFreeString(str);
536 IWMPMedia_Release(media);
538 str = SysAllocString(mp3file);
539 hr = IWMPPlayer4_newMedia(player, str, &media);
540 ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
541 SysFreeString(str);
542 hr = IWMPMedia_get_name(media, &str);
543 ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
544 todo_wine
545 ok(!lstrcmpW(str, testW), "Unexpected name %s.\n", wine_dbgstr_w(str));
546 SysFreeString(str);
548 hr = IWMPPlayer4_put_currentMedia(player, media);
549 ok(hr == S_OK, "Failed to set current media, hr %#x.\n", hr);
550 IWMPMedia_Release(media);
552 hr = IWMPPlayer4_get_currentMedia(player, &media2);
553 ok(hr == S_OK, "Failed to get current media, hr %#x.\n", hr);
554 ok(media2 != NULL, "Unexpected media instance.\n");
555 hr = IWMPMedia_get_name(media2, &str);
556 ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
557 todo_wine
558 ok(!lstrcmpW(str, testW), "Unexpected name %s.\n", wine_dbgstr_w(str));
559 SysFreeString(str);
560 IWMPMedia_Release(media2);
562 IWMPPlayer4_Release(player);
565 static void test_player_url(void)
567 IWMPPlayer4 *player;
568 BSTR str, str2;
569 HRESULT hr;
571 hr = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IWMPPlayer4, (void **)&player);
572 if (hr == REGDB_E_CLASSNOTREG)
574 win_skip("CLSID_WindowsMediaPlayer is not registered.\n");
575 return;
577 ok(hr == S_OK, "Failed to create media player instance, hr %#x.\n", hr);
579 hr = IWMPPlayer4_get_URL(player, &str);
580 ok(hr == S_OK, "Failed to get url, hr %#x.\n", hr);
581 ok(*str == 0, "Unexpected url %s.\n", wine_dbgstr_w(str));
582 SysFreeString(str);
584 str2 = SysAllocString(mp3file);
585 hr = IWMPPlayer4_put_URL(player, str2);
586 ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
588 hr = IWMPPlayer4_put_URL(player, NULL);
589 ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
590 hr = IWMPPlayer4_get_URL(player, &str);
591 ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
592 ok(*str == 0, "Unexpected url, %s.\n", wine_dbgstr_w(str));
593 SysFreeString(str);
595 /* Empty url */
596 hr = IWMPPlayer4_put_URL(player, str2);
597 ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
599 str = SysAllocStringLen(NULL, 0);
600 hr = IWMPPlayer4_put_URL(player, str);
601 ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
602 SysFreeString(str);
604 hr = IWMPPlayer4_get_URL(player, &str);
605 ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
606 ok(*str == 0, "Unexpected url, %s.\n", wine_dbgstr_w(str));
607 SysFreeString(str);
609 SysFreeString(str2);
610 IWMPPlayer4_Release(player);
613 START_TEST(media)
615 CoInitialize(NULL);
617 main_thread_id = GetCurrentThreadId();
618 playing_event = CreateEventW(NULL, FALSE, FALSE, NULL);
619 completed_event = CreateEventW(NULL, FALSE, FALSE, NULL);
621 test_media_item();
622 test_player_url();
623 if (test_wmp()) {
624 test_completion_event();
625 } else {
626 win_skip("Failed to play media\n");
629 CloseHandle(playing_event);
630 CloseHandle(completed_event);
632 CoUninitialize();