dlls/wmp/tests/media.c

   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.
   6  *
   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.
  11  *
  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
  15  */
  16
  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>
  25
  26 #include "wine/test.h"
  27
  28 #define DEFINE_EXPECT(kind) \
  29     static DWORD expect_ ## kind = 0, called_ ## kind = 0
  30
  31 #define SET_EXPECT(kind, index) \
  32     do { \
  33         assert(index < 8 * sizeof(expect_ ## kind)); \
  34         expect_ ## kind |= (1 << index); \
  35     }while(0)
  36
  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)
  42
  43 #define CLEAR_CALLED(kind, index) \
  44     do { \
  45         expect_ ## kind &= ~(1 << index); \
  46         called_ ## kind &= ~(1 << index); \
  47     }while(0)
  48
  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)
  55
  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)
  62
  63 DEFINE_EXPECT(PLAYSTATE);
  64 DEFINE_EXPECT(OPENSTATE);
  65
  66 static HANDLE playing_event;
  67 static HANDLE completed_event;
  68 static DWORD main_thread_id;
  69
  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)
  73 {
  74     static WCHAR pathW[MAX_PATH];
  75     DWORD written;
  76     HANDLE file;
  77     HRSRC res;
  78     void *ptr;
  79
  80     GetTempPathW(ARRAY_SIZE(pathW), pathW);
  81     lstrcatW(pathW, name);
  82
  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());
  86
  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 );
  93
  94     return pathW;
  95 }
  96
  97 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
  98 {
  99     return 2;
 100 }
 101
 102 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
 103 {
 104     return 1;
 105 }
 106
 107 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
 108 {
 109     ok(0, "unexpected call\n");
 110     return E_NOTIMPL;
 111 }
 112
 113 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
 114         ITypeInfo **ppTInfo)
 115 {
 116     ok(0, "unexpected call\n");
 117     return E_NOTIMPL;
 118 }
 119
 120 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
 121         UINT cNames, LCID lcid, DISPID *rgDispId)
 122 {
 123     ok(0, "unexpected call\n");
 124     return E_NOTIMPL;
 125 }
 126
 127 static HRESULT WINAPI WMPOCXEvents_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
 128 {
 129     *ppv = NULL;
 130
 131     if(IsEqualGUID(&IID__WMPOCXEvents, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
 132         *ppv = iface;
 133         return S_OK;
 134     }
 135
 136     ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid));
 137     return E_NOINTERFACE;
 138 }
 139
 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)
 143 {
 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);
 157             }
 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;
 177     }
 178
 179     return E_NOTIMPL;
 180 }
 181
 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,
 190 };
 191
 192 static IDispatch WMPOCXEvents = { &WMPOcxEventsVtbl };
 193
 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);
 208         }
 209     }
 210     while (res == WAIT_OBJECT_0 + 1);
 211     return res;
 212 }
 213
 214 static void test_completion_event(void)
 215 {
 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;
 224
 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;
 229     }
 230     ok(hres == S_OK, "Could not create CLSID_WindowsMediaPlayer instance: %08x\n", hres);
 231
 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;
 236
 237     hres = IConnectionPointContainer_FindConnectionPoint(container, &IID__WMPOCXEvents, &point);
 238     IConnectionPointContainer_Release(container);
 239     ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
 240
 241     hres = IConnectionPoint_Advise(point, (IUnknown*)&WMPOCXEvents, &dw);
 242     ok(hres == S_OK, "Advise failed: %08x\n", hres);
 243
 244     hres = IOleObject_QueryInterface(oleobj, &IID_IWMPPlayer4, (void**)&player4);
 245     ok(hres == S_OK, "Could not get IWMPPlayer4 iface: %08x\n", hres);
 246
 247     filename = SysAllocString(load_resource(mp3file1s));
 248
 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");
 266
 267     /* following two are sent on vistau64 vms only */
 268     CLEAR_CALLED(OPENSTATE, wmposMediaChanging);
 269     CLEAR_CALLED(PLAYSTATE, wmppsReady);
 270
 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);
 282
 283     hres = IConnectionPoint_Unadvise(point, dw);
 284     ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
 285
 286     IConnectionPoint_Release(point);
 287     IWMPPlayer4_Release(player4);
 288     IOleObject_Release(oleobj);
 289     DeleteFileW(filename);
 290     SysFreeString(filename);
 291 }
 292
 293 static BOOL test_wmp(void)
 294 {
 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;
 313
 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;
 318     }
 319     ok(hres == S_OK, "Could not create CLSID_WindowsMediaPlayer instance: %08x\n", hres);
 320
 321     hres = IOleObject_QueryInterface(oleobj, &IID_IConnectionPointContainer, (void**)&container);
 322     ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
 323
 324     hres = IConnectionPointContainer_FindConnectionPoint(container, &IID__WMPOCXEvents, &point);
 325     IConnectionPointContainer_Release(container);
 326     ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
 327
 328     hres = IConnectionPoint_Advise(point, (IUnknown*)&WMPOCXEvents, &dw);
 329     ok(hres == S_OK, "Advise failed: %08x\n", hres);
 330
 331     hres = IOleObject_QueryInterface(oleobj, &IID_IWMPPlayer4, (void**)&player4);
 332     ok(hres == S_OK, "Could not get IWMPPlayer4 iface: %08x\n", hres);
 333
 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");
 338
 339     hres = IWMPSettings_put_autoStart(settings, VARIANT_FALSE);
 340     ok(hres == S_OK, "Could not put autoStart in IWMPSettings: %08x\n", hres);
 341
 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");
 346
 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");
 351
 352     hres = IWMPControls_play(controls);
 353     ok(hres == NS_S_WMPCORE_COMMAND_NOT_AVAILABLE, "IWMPControls_play is available: %08x\n", hres);
 354
 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);
 360
 361     filename = SysAllocString(load_resource(mp3file));
 362
 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);
 375
 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;
 392     }
 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);
 399
 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");
 403
 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);
 408
 409     duration = 1.1;
 410     hres = IWMPControls_put_currentPosition(controls, duration);
 411     ok(hres == S_OK, "IWMPControls_put_currentPosition failed: %08x\n", hres);
 412
 413     duration = 0.0;
 414     hres = IWMPControls_get_currentPosition(controls, &duration);
 415     ok(hres == S_OK, "IWMPControls_get_currentPosition failed: %08x\n", hres);
 416     ok(duration >= 1.05 /* save some fp errors */, "unexpected value %f\n", duration);
 417
 418     hres = IWMPPlayer4_get_currentMedia(player4, &media);
 419     ok(hres == S_OK, "IWMPPlayer4_get_currentMedia failed: %08x\n", hres);
 420     hres = IWMPMedia_get_duration(media, &duration);
 421     ok(hres == S_OK, "IWMPMedia_get_duration failed: %08x\n", hres);
 422     ok(floor(duration + 0.5) == 3, "unexpected value: %f\n", duration);
 423     IWMPMedia_Release(media);
 424
 425     network = NULL;
 426     hres = IWMPPlayer4_get_network(player4, &network);
 427     ok(hres == S_OK, "get_network failed: %08x\n", hres);
 428     ok(network != NULL, "network = NULL\n");
 429     progress = 0;
 430     hres = IWMPNetwork_get_bufferingProgress(network, &progress);
 431     ok(hres == S_OK || broken(hres == S_FALSE), "IWMPNetwork_get_bufferingProgress failed: %08x\n", hres);
 432     ok(progress == 100, "unexpected value: %d\n", progress);
 433     progress = 0;
 434     hres = IWMPNetwork_get_downloadProgress(network, &progress);
 435     ok(hres == S_OK, "IWMPNetwork_get_downloadProgress failed: %08x\n", hres);
 436     ok(progress == 100, "unexpected value: %d\n", progress);
 437     IWMPNetwork_Release(network);
 438
 439     SET_EXPECT(PLAYSTATE, wmppsStopped);
 440     /* The following happens on wine only since we close media on stop */
 441     SET_EXPECT(OPENSTATE, wmposPlaylistOpenNoMedia);
 442     hres = IWMPControls_stop(controls);
 443     ok(hres == S_OK, "IWMPControls_stop failed: %08x\n", hres);
 444     CHECK_CALLED(PLAYSTATE, wmppsStopped);
 445     todo_wine CHECK_NOT_CALLED(OPENSTATE, wmposPlaylistOpenNoMedia);
 446
 447     /* Already Stopped */
 448     hres = IWMPControls_stop(controls);
 449     ok(hres == NS_S_WMPCORE_COMMAND_NOT_AVAILABLE, "IWMPControls_stop is available: %08x\n", hres);
 450
 451     SET_EXPECT(PLAYSTATE, wmppsPlaying);
 452     /* The following happens on wine only since we close media on stop */
 453     SET_EXPECT(OPENSTATE, wmposOpeningUnknownURL);
 454     SET_EXPECT(OPENSTATE, wmposMediaOpen);
 455     SET_EXPECT(PLAYSTATE, wmppsTransitioning);
 456     hres = IWMPControls_play(controls);
 457     ok(hres == S_OK, "IWMPControls_play failed: %08x\n", hres);
 458     CHECK_CALLED(PLAYSTATE, wmppsPlaying);
 459     todo_wine CHECK_NOT_CALLED(OPENSTATE, wmposOpeningUnknownURL);
 460     todo_wine CHECK_NOT_CALLED(OPENSTATE, wmposMediaOpen);
 461     todo_wine CHECK_NOT_CALLED(PLAYSTATE, wmppsTransitioning);
 462
 463 playback_skip:
 464     hres = IConnectionPoint_Unadvise(point, dw);
 465     ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
 466
 467     hres = IWMPSettings_get_volume(settings, &progress);
 468     ok(hres == S_OK, "IWMPSettings_get_volume failed: %08x\n", hres);
 469     ok(progress == 36, "unexpected value: %d\n", progress);
 470     hres = IWMPSettings_put_volume(settings, 99);
 471     ok(hres == S_OK, "IWMPSettings_put_volume failed: %08x\n", hres);
 472     hres = IWMPSettings_get_volume(settings, &progress);
 473     ok(hres == S_OK, "IWMPSettings_get_volume failed: %08x\n", hres);
 474     ok(progress == 99, "unexpected value: %d\n", progress);
 475
 476     IConnectionPoint_Release(point);
 477     IWMPSettings_Release(settings);
 478     IWMPControls_Release(controls);
 479     IWMPPlayer4_Release(player4);
 480     IOleObject_Release(oleobj);
 481     DeleteFileW(filename);
 482     SysFreeString(filename);
 483     SysFreeString(bstrcurrentPosition);
 484
 485     return test_ran;
 486 }
 487
 488 static void test_media_item(void)
 489 {
 490     static const WCHAR slashW[] = {'\\',0};
 491     static const WCHAR testW[] = {'t','e','s','t',0};
 492     static const WCHAR fooW[] = {'f','o','o',':','/','/',0};
 493     static const WCHAR fileW[] = {'f','i','l','e',':','/','/','/',0};
 494     static const WCHAR httpW[] = {'h','t','t','p',':','/','/',0};
 495     static const WCHAR httpsW[] = {'h','t','t','p','s',':','/','/',0};
 496     static const WCHAR invalidurlW[] = {'i','n','v','a','l','i','d','_','u','r','l',0};
 497     static const WCHAR invalidurlmp3W[] = {'i','n','v','a','l','i','d','_','u','r','l','.','m','p','3',0};
 498     static const WCHAR winehqurlW[] = {'t','e','s','t','.','w','i','n','e','h','q','.','o','r','g',
 499                                                     '/','t','e','s','t','s','/','t','e','s','t','.','m','p','3',0};
 500     static WCHAR pathW[MAX_PATH];
 501     static WCHAR currentdirW[MAX_PATH];
 502     struct {
 503         const WCHAR *prefix;
 504         const WCHAR *filename;
 505         const WCHAR *expected;
 506     } tests[] = {
 507         { NULL, invalidurlmp3W, invalidurlW },
 508         { currentdirW, mp3file, testW },
 509         { currentdirW, invalidurlmp3W, invalidurlW },
 510         { httpW, winehqurlW, testW },
 511         { httpW, invalidurlmp3W, invalidurlmp3W },
 512         { httpsW, winehqurlW, testW },
 513         { httpsW, invalidurlmp3W, invalidurlmp3W },
 514         { fileW, mp3file, testW },
 515         { fileW, invalidurlmp3W, invalidurlW },
 516         { fooW, mp3file, mp3file },
 517         { fooW, invalidurlmp3W, invalidurlmp3W }
 518     };
 519     IWMPMedia *media, *media2;
 520     IWMPPlayer4 *player;
 521     HRESULT hr;
 522     BSTR str;
 523     int i;
 524
 525     hr = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IWMPPlayer4, (void **)&player);
 526     if (hr == REGDB_E_CLASSNOTREG)
 527     {
 528         win_skip("CLSID_WindowsMediaPlayer is not registered.\n");
 529         return;
 530     }
 531     ok(hr == S_OK, "Failed to create media player instance, hr %#x.\n", hr);
 532
 533     hr = IWMPPlayer4_newMedia(player, NULL, &media);
 534     ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
 535     hr = IWMPMedia_get_name(media, NULL);
 536     ok(hr == E_POINTER, "Unexpected hr %#x.\n", hr);
 537     hr = IWMPMedia_get_name(media, &str);
 538     ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
 539     ok(*str == 0, "Unexpected name %s.\n", wine_dbgstr_w(str));
 540     SysFreeString(str);
 541
 542     media2 = (void *)0xdeadbeef;
 543     hr = IWMPPlayer4_get_currentMedia(player, &media2);
 544     ok(hr == S_FALSE, "Failed to get current media, hr %#x.\n", hr);
 545     ok(media2 == NULL, "Unexpected media instance.\n");
 546
 547     hr = IWMPPlayer4_put_currentMedia(player, media);
 548     ok(hr == S_OK, "Failed to set current media, hr %#x.\n", hr);
 549
 550     hr = IWMPPlayer4_get_currentMedia(player, &media2);
 551     ok(hr == S_OK, "Failed to get current media, hr %#x.\n", hr);
 552     ok(media2 != NULL && media != media2, "Unexpected media instance.\n");
 553     IWMPMedia_Release(media2);
 554
 555     IWMPMedia_Release(media);
 556
 557     str = SysAllocStringLen(NULL, 0);
 558     hr = IWMPPlayer4_newMedia(player, str, &media);
 559     ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
 560     SysFreeString(str);
 561     hr = IWMPMedia_get_name(media, &str);
 562     ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
 563     ok(*str == 0, "Unexpected name %s.\n", wine_dbgstr_w(str));
 564     SysFreeString(str);
 565     IWMPMedia_Release(media);
 566
 567     str = SysAllocString(mp3file);
 568     hr = IWMPPlayer4_newMedia(player, str, &media);
 569     ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
 570     SysFreeString(str);
 571     hr = IWMPMedia_get_name(media, &str);
 572     ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
 573     ok(!lstrcmpW(str, testW), "Expected %s, got %s\n", wine_dbgstr_w(testW), wine_dbgstr_w(str));
 574     SysFreeString(str);
 575     hr = IWMPMedia_put_name(media, NULL);
 576     ok(hr == E_POINTER, "Unexpected hr %#x.\n", hr);
 577     hr = IWMPMedia_get_name(media, &str);
 578     ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
 579     ok(!lstrcmpW(str, testW), "Expected %s, got %s\n", wine_dbgstr_w(testW), wine_dbgstr_w(str));
 580     SysFreeString(str);
 581
 582     hr = IWMPPlayer4_put_currentMedia(player, media);
 583     ok(hr == S_OK, "Failed to set current media, hr %#x.\n", hr);
 584     IWMPMedia_Release(media);
 585
 586     hr = IWMPPlayer4_get_currentMedia(player, &media2);
 587     ok(hr == S_OK, "Failed to get current media, hr %#x.\n", hr);
 588     ok(media2 != NULL, "Unexpected media instance.\n");
 589     hr = IWMPMedia_get_name(media2, &str);
 590     ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
 591     ok(!lstrcmpW(str, testW), "Expected %s, got %s\n", wine_dbgstr_w(testW), wine_dbgstr_w(str));
 592     SysFreeString(str);
 593     IWMPMedia_Release(media2);
 594
 595     GetCurrentDirectoryW(ARRAY_SIZE(currentdirW), currentdirW);
 596     lstrcatW(currentdirW, slashW);
 597
 598     for (i=0; i<ARRAY_SIZE(tests); i++)
 599     {
 600
 601         pathW[0] = '\0';
 602         if(tests[i].prefix) lstrcatW(pathW, tests[i].prefix);
 603         lstrcatW(pathW, tests[i].filename);
 604
 605         str = SysAllocString(pathW);
 606         hr = IWMPPlayer4_newMedia(player, str, &media);
 607         ok(hr == S_OK, "Failed to create a media item, hr %#x.\n", hr);
 608         SysFreeString(str);
 609         hr = IWMPMedia_get_name(media, &str);
 610         ok(hr == S_OK, "Failed to get item name, hr %#x.\n", hr);
 611         ok(!lstrcmpW(str, tests[i].expected), "Expected %s, got %s\n", wine_dbgstr_w(tests[i].expected), wine_dbgstr_w(str));
 612         SysFreeString(str);
 613         IWMPMedia_Release(media);
 614     }
 615
 616     IWMPPlayer4_Release(player);
 617 }
 618
 619 static void test_player_url(void)
 620 {
 621     IWMPPlayer4 *player;
 622     BSTR str, str2;
 623     HRESULT hr;
 624
 625     hr = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IWMPPlayer4, (void **)&player);
 626     if (hr == REGDB_E_CLASSNOTREG)
 627     {
 628         win_skip("CLSID_WindowsMediaPlayer is not registered.\n");
 629         return;
 630     }
 631     ok(hr == S_OK, "Failed to create media player instance, hr %#x.\n", hr);
 632
 633     hr = IWMPPlayer4_get_URL(player, &str);
 634     ok(hr == S_OK, "Failed to get url, hr %#x.\n", hr);
 635     ok(*str == 0, "Unexpected url %s.\n", wine_dbgstr_w(str));
 636     SysFreeString(str);
 637
 638     str2 = SysAllocString(mp3file);
 639     hr = IWMPPlayer4_put_URL(player, str2);
 640     ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
 641
 642     hr = IWMPPlayer4_put_URL(player, NULL);
 643     ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
 644     hr = IWMPPlayer4_get_URL(player, &str);
 645     ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
 646     ok(*str == 0, "Unexpected url, %s.\n", wine_dbgstr_w(str));
 647     SysFreeString(str);
 648
 649     /* Empty url */
 650     hr = IWMPPlayer4_put_URL(player, str2);
 651     ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
 652
 653     str = SysAllocStringLen(NULL, 0);
 654     hr = IWMPPlayer4_put_URL(player, str);
 655     ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
 656     SysFreeString(str);
 657
 658     hr = IWMPPlayer4_get_URL(player, &str);
 659     ok(hr == S_OK, "Failed to set url, hr %#x.\n", hr);
 660     ok(*str == 0, "Unexpected url, %s.\n", wine_dbgstr_w(str));
 661     SysFreeString(str);
 662
 663     SysFreeString(str2);
 664     IWMPPlayer4_Release(player);
 665 }
 666
 667 static void test_playlist(void)
 668 {
 669     IWMPPlayer4 *player;
 670     IWMPPlaylist *playlist, *playlist2;
 671     HRESULT hr;
 672     BSTR str, str2;
 673     LONG count;
 674     static const WCHAR nameW[] = {'P','l','a','y','l','i','s','t','1',0};
 675
 676     hr = CoCreateInstance(&CLSID_WindowsMediaPlayer, NULL, CLSCTX_INPROC_SERVER, &IID_IWMPPlayer4, (void **)&player);
 677     if (hr == REGDB_E_CLASSNOTREG)
 678     {
 679         win_skip("CLSID_WindowsMediaPlayer is not registered.\n");
 680         return;
 681     }
 682     ok(hr == S_OK, "Failed to create media player instance, hr %#x.\n", hr);
 683
 684     playlist = NULL;
 685     hr = IWMPPlayer4_get_currentPlaylist(player, &playlist);
 686     ok(hr == S_OK, "IWMPPlayer4_get_currentPlaylist failed: %08x\n", hr);
 687     ok(playlist != NULL, "playlist == NULL\n");
 688
 689     if (0) /* fails on non-English locales */
 690     {
 691         hr = IWMPPlaylist_get_name(playlist, &str);
 692         ok(hr == S_OK, "Failed to get playlist name, hr %#x.\n", hr);
 693         ok(!lstrcmpW(str, nameW), "Expected %s, got %s\n", wine_dbgstr_w(nameW), wine_dbgstr_w(str));
 694         SysFreeString(str);
 695     }
 696
 697     hr = IWMPPlaylist_get_count(playlist, NULL);
 698     ok(hr == E_POINTER, "Failed to get count, hr %#x.\n", hr);
 699
 700     count = -1;
 701     hr = IWMPPlaylist_get_count(playlist, &count);
 702     ok(hr == S_OK, "Failed to get count, hr %#x.\n", hr);
 703     ok(count == 0, "Expected 0, got %d\n", count);
 704
 705     IWMPPlaylist_Release(playlist);
 706
 707     /* newPlaylist doesn't change current playlist */
 708     hr = IWMPPlayer4_newPlaylist(player, NULL, NULL, &playlist);
 709     ok(hr == S_OK, "Failed to create a playlist, hr %#x.\n", hr);
 710
 711     playlist2 = NULL;
 712     hr = IWMPPlayer4_get_currentPlaylist(player, &playlist2);
 713     ok(hr == S_OK, "IWMPPlayer4_get_currentPlaylist failed: %08x\n", hr);
 714     ok(playlist2 != NULL && playlist2 != playlist, "Unexpected playlist instance\n");
 715
 716     IWMPPlaylist_Release(playlist2);
 717
 718     /* different playlists can have the same name */
 719     str = SysAllocString(nameW);
 720     hr = IWMPPlaylist_put_name(playlist, str);
 721     ok(hr == S_OK, "Failed to get playlist name, hr %#x.\n", hr);
 722
 723     playlist2 = NULL;
 724     hr = IWMPPlayer4_newPlaylist(player, str, NULL, &playlist2);
 725     ok(hr == S_OK, "Failed to create a playlist, hr %#x.\n", hr);
 726     hr = IWMPPlaylist_get_name(playlist2, &str2);
 727     ok(hr == S_OK, "Failed to get playlist name, hr %#x.\n", hr);
 728     ok(playlist != playlist2, "Expected playlists to be different");
 729     ok(!lstrcmpW(str, str2), "Expected names to be the same\n");
 730     SysFreeString(str);
 731     SysFreeString(str2);
 732
 733     IWMPPlaylist_Release(playlist2);
 734
 735     IWMPPlaylist_Release(playlist);
 736     IWMPPlayer4_Release(player);
 737 }
 738
 739 START_TEST(media)
 740 {
 741     CoInitialize(NULL);
 742
 743     main_thread_id = GetCurrentThreadId();
 744     playing_event = CreateEventW(NULL, FALSE, FALSE, NULL);
 745     completed_event = CreateEventW(NULL, FALSE, FALSE, NULL);
 746
 747     test_playlist();
 748     test_media_item();
 749     test_player_url();
 750     if (test_wmp()) {
 751         test_completion_event();
 752     } else {
 753         win_skip("Failed to play media\n");
 754     }
 755
 756     CloseHandle(playing_event);
 757     CloseHandle(completed_event);
 758
 759     CoUninitialize();
 760 }