+ }
+ else
+ {
+ IActiveMovie2* pAM2 = NULL;
+ ReadyStateConstants nState;
+ if(m_parent->m_pAM->QueryInterface(IID_IActiveMovie2,
+ (void**)&pAM2) == 0 &&
+ pAM2->get_ReadyState(&nState) == 0)
+ {
+ pAM2->Release();
+ if(nState != amvLoading)
+ {
+ Stop();
+ m_parent->FinishLoad();
+ delete this;
+ }
+ }
+ else
+ {
+ if(pAM2)
+ pAM2->Release();
+
+ Stop();
+ m_parent->FinishLoad();
+ delete this;
+ }
+ }
+
+ }
+
+protected:
+ wxAMMediaBackend* m_parent; //Backend pointer
+};
+
+//---------------------------------------------------------------------------
+// wxAMPlayTimer
+//
+// Sets m_hNotifyWnd to NULL to signify that we haven't loaded anything yet
+// Queries the control periodically to see if it has stopped -
+// if it has it sends the stop event
+//---------------------------------------------------------------------------
+class wxAMPlayTimer : public wxTimer
+{
+public:
+ wxAMPlayTimer(wxAMMediaBackend* parent) :
+ m_parent(parent) {}
+
+ void Notify()
+ {
+ if(m_parent->GetState() == wxMEDIASTATE_STOPPED &&
+ //NB: Stop events could get triggered by the interface
+ //if ShowPlayerControls is enabled,
+ //so we need this hack here to make an attempt
+ //at it not getting sent - but its far from ideal -
+ //they can still get sent in some cases
+ m_parent->GetPosition() == m_parent->GetDuration())
+ {
+ if ( m_parent->SendStopEvent() )
+ {
+ //Seek to beginning of movie
+ m_parent->wxAMMediaBackend::SetPosition(0);
+ Stop();
+
+ //send the event to our child
+ m_parent->QueueFinishEvent();
+ }
+ }
+ }
+
+protected:
+ wxAMMediaBackend* m_parent; //Backend pointer
+};
+
+
+/*
+// The following is an alternative way - but it doesn't seem
+// to work with the IActiveMovie control - it probably processes
+// its own events
+//---------------------------------------------------------------------------
+// wxAMPlayTimer
+//
+// Query the IMediaEvent interface from the embedded WMP's
+// filtergraph, then process the events from it - sending
+// EC_COMPLETE events as stop events to the media control.
+//---------------------------------------------------------------------------
+class wxAMPlayTimer : public wxTimer
+{
+public:
+ wxAMPlayTimer(wxAMMediaBackend* pBE) : m_pBE(pBE), m_pME(NULL)
+ {
+ HRESULT hr;
+ IUnknown* pGB;
+ hr = m_pBE->m_pAM->get_FilterGraph(&pGB);
+ wxASSERT(SUCCEEDED(hr));
+ hr = pGB->QueryInterface(IID_IMediaEvent, (void**)&m_pME);
+ wxASSERT(SUCCEEDED(hr));
+ pGB->Release();
+ }
+
+ ~wxAMPlayTimer()
+ {
+ SAFE_RELEASE(m_pME);
+ }
+
+ void Notify()
+ {
+ LONG evCode;
+ LONG_PTR evParam1,
+ evParam2;
+
+ //
+ // DirectShow keeps a list of queued events, and we need
+ // to go through them one by one, stopping at (Hopefully only one)
+ // EC_COMPLETE message
+ //
+ while( m_pME->GetEvent(&evCode, &evParam1, &evParam2, 0) == 0 )
+ {
+ // Cleanup memory that GetEvent allocated
+ HRESULT hr = m_pME->FreeEventParams(evCode,
+ evParam1, evParam2);
+ if(hr != 0)
+ {
+ //Even though this makes a messagebox this
+ //is windows where we can do gui stuff in seperate
+ //threads :)
+ wxFAIL_MSG(m_pBE->GetErrorString(hr));
+ }
+ // If this is the end of the clip, notify handler
+ else if(1 == evCode) //EC_COMPLETE
+ {
+ if ( m_pBE->SendStopEvent() )
+ {
+ Stop();
+
+ m_pBE->QueueFinishEvent();
+ }
+ }
+ }
+ }
+
+protected:
+ wxAMMediaBackend* m_pBE; //Backend pointer
+ IMediaEvent* m_pME; //To determine when to send stop event
+};
+*/
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend Constructor
+//---------------------------------------------------------------------------
+wxAMMediaBackend::wxAMMediaBackend()
+ :m_pAX(NULL),
+ m_pAM(NULL),
+ m_pMP(NULL),
+ m_pTimer(NULL)
+{
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend Destructor
+//---------------------------------------------------------------------------
+wxAMMediaBackend::~wxAMMediaBackend()
+{
+ Clear(); //Free memory from Load()
+
+ if(m_pAX)
+ {
+ {
+ wxLogNull noLog;
+ m_pAX->DissociateHandle();
+ }
+ delete m_pAX;
+ m_pAM->Release();
+
+ if(m_pMP)
+ m_pMP->Release();
+ }
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Clear
+//
+// Free up interfaces and memory allocated by LoadXXX
+//---------------------------------------------------------------------------
+void wxAMMediaBackend::Clear()
+{
+ if(m_pTimer)
+ {
+ delete m_pTimer;
+ m_pTimer = NULL;
+ }
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::CreateControl
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::CreateControl(wxControl* ctrl, wxWindow* parent,
+ wxWindowID id,
+ const wxPoint& pos,
+ const wxSize& size,
+ long style,
+ const wxValidator& validator,
+ const wxString& name)
+{
+ // First get the AMGetErrorText procedure in debug
+ // mode for more meaningful messages
+#ifdef __WXDEBUG__
+ if ( m_dllQuartz.Load(_T("quartz.dll"), wxDL_VERBATIM) )
+ {
+ m_lpAMGetErrorText = (LPAMGETERRORTEXT)
+ m_dllQuartz.GetSymbolAorW(wxT("AMGetErrorText"));
+ }
+#endif // __WXDEBUG__
+
+ // Now determine which (if any) media player interface is
+ // available - IMediaPlayer or IActiveMovie
+ if( ::CoCreateInstance(CLSID_MediaPlayer, NULL,
+ CLSCTX_INPROC_SERVER,
+ IID_IMediaPlayer, (void**)&m_pMP) != 0 )
+ {
+ if( ::CoCreateInstance(CLSID_ActiveMovie, NULL,
+ CLSCTX_INPROC_SERVER,
+ IID_IActiveMovie, (void**)&m_pAM) != 0 )
+ return false;
+ m_pAM->QueryInterface(IID_IMediaPlayer, (void**)&m_pMP);
+ }
+ else
+ {
+ m_pMP->QueryInterface(IID_IActiveMovie, (void**)&m_pAM);
+ }
+ //
+ // Create window
+ // By default wxWindow(s) is created with a border -
+ // so we need to get rid of those
+ //
+ // Since we don't have a child window like most other
+ // backends, we don't need wxCLIP_CHILDREN
+ //
+ if ( !ctrl->wxControl::Create(parent, id, pos, size,
+ (style & ~wxBORDER_MASK) | wxBORDER_NONE,
+ validator, name) )
+ return false;
+
+ //
+ // Now create the ActiveX container along with the media player
+ // interface and query them
+ //
+ m_ctrl = wxStaticCast(ctrl, wxMediaCtrl);
+ m_pAX = new wxActiveXContainer(ctrl,
+ m_pMP ? IID_IMediaPlayer : IID_IActiveMovie,
+ m_pAM);
+
+
+ //
+ // Here we set up wx-specific stuff for the default
+ // settings wxMediaCtrl says it will stay to
+ //
+ if(m_pMP)
+ {
+ m_pMP->put_DisplaySize(mpFitToSize);
+ // TODO: Unsure what actual effect this has
+ m_pMP->put_WindowlessVideo(VARIANT_TRUE);
+ }
+ else
+ m_pAM->put_MovieWindowSize(amvDoubleOriginalSize);
+
+ //by default true
+ m_pAM->put_AutoStart(VARIANT_FALSE);
+ //by default enabled
+ wxAMMediaBackend::ShowPlayerControls(wxMEDIACTRLPLAYERCONTROLS_NONE);
+ //by default with AM only 0.5
+ wxAMMediaBackend::SetVolume(1.0);
+
+ // don't erase the background of our control window so that resizing is a
+ // bit smoother
+ m_ctrl->SetBackgroundStyle(wxBG_STYLE_CUSTOM);
+
+ // success
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Load (file version)
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::Load(const wxString& fileName)
+{
+ return DoLoad(fileName);
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Load (URL Version)
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::Load(const wxURI& location)
+{
+ // Turn off loading from a proxy as user
+ // may have set it previously
+ INSPlay* pPlay = NULL;
+ m_pAM->QueryInterface(IID_INSPlay, (void**) &pPlay);
+ if(pPlay)
+ {
+ pPlay->put_UseHTTPProxy(VARIANT_FALSE);
+ pPlay->Release();
+ }
+
+ return DoLoad(location.BuildURI());
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Load (URL Version with Proxy)
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::Load(const wxURI& location, const wxURI& proxy)
+{
+ // Set the proxy of the NETSHOW interface
+ INSPlay* pPlay = NULL;
+ m_pAM->QueryInterface(IID_INSPlay, (void**) &pPlay);
+
+ if(pPlay)
+ {
+ pPlay->put_UseHTTPProxy(VARIANT_TRUE);
+ pPlay->put_HTTPProxyHost(wxBasicString(proxy.GetServer()).Get());
+ pPlay->put_HTTPProxyPort(wxAtoi(proxy.GetPort()));
+ pPlay->Release();
+ }
+
+ return DoLoad(location.BuildURI());
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::DoLoad
+//
+// Called by all functions - this actually renders
+// the file and sets up the filter graph
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::DoLoad(const wxString& location)
+{
+ Clear(); //Clear up previously allocated memory
+
+ HRESULT hr;
+
+ // Play the movie the normal way through the embedded
+ // WMP. Supposively Open is better in theory because
+ // the docs say its async and put_FileName is not -
+ // but in practice they both seem to be async anyway
+ if(m_pMP)
+ hr = m_pMP->Open( wxBasicString(location).Get() );
+ else
+ hr = m_pAM->put_FileName( wxBasicString(location).Get() );
+
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return false;
+ }
+
+ // In AM playing will FAIL if
+ // the user plays before the media is loaded
+ m_pTimer = new wxAMLoadTimer(this);
+ m_pTimer->Start(20);
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::FinishLoad
+//
+// Called by our wxAMLoadTimer when the
+// embedded WMP tells its the media is ready to play.
+//
+// Here we get the original size of the video and
+// send the loaded event to our watcher :).
+//---------------------------------------------------------------------------
+void wxAMMediaBackend::FinishLoad()
+{
+ //Get the original video size
+ m_pAM->get_ImageSourceWidth((long*)&m_bestSize.x);
+ m_pAM->get_ImageSourceHeight((long*)&m_bestSize.y);
+
+ //
+ //Start the play timer to catch stop events
+ //Previous load timer cleans up itself
+ //
+ m_pTimer = new wxAMPlayTimer(this);
+
+ NotifyMovieLoaded();
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::ShowPlayerControls
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::ShowPlayerControls(wxMediaCtrlPlayerControls flags)
+{
+ // Note that IMediaPlayer doesn't have a statusbar by
+ // default but IActiveMovie does - so lets try to keep
+ // the interface consistant
+ if(!flags)
+ {
+ m_pAM->put_Enabled(VARIANT_FALSE);
+ m_pAM->put_ShowControls(VARIANT_FALSE);
+ if(m_pMP)
+ m_pMP->put_ShowStatusBar(VARIANT_FALSE);
+ }
+ else
+ {
+ m_pAM->put_Enabled(VARIANT_TRUE);
+ m_pAM->put_ShowControls(VARIANT_TRUE);
+
+ m_pAM->put_ShowPositionControls(
+ (flags & wxMEDIACTRLPLAYERCONTROLS_STEP) ?
+ VARIANT_TRUE : VARIANT_FALSE);
+
+ if(m_pMP)
+ {
+ m_pMP->put_ShowStatusBar(VARIANT_TRUE);
+ m_pMP->put_ShowAudioControls(
+ (flags & wxMEDIACTRLPLAYERCONTROLS_VOLUME) ?
+ VARIANT_TRUE : VARIANT_FALSE);
+ }
+ }
+
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Play
+//
+// Plays the stream. If it is non-seekable, it will restart it (implicit).
+//
+// Note that we use SUCCEEDED here because run/pause/stop tend to be overly
+// picky and return warnings on pretty much every call
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::Play()
+{
+ // Actually try to play the movie, even though it may not be loaded yet.
+ HRESULT hr = m_pAM->Run();
+ if(SUCCEEDED(hr))
+ {
+ m_pTimer->Start(20);
+ return true;
+ }
+ wxAMLOG(hr);
+ return false;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Pause
+//
+// Pauses the stream.
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::Pause()
+{
+ HRESULT hr = m_pAM->Pause();
+ if(SUCCEEDED(hr))
+ return true;
+ wxAMLOG(hr);
+ return false;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Stop
+//
+// Stops the stream.
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::Stop()
+{
+ HRESULT hr = m_pAM->Stop();
+ if(SUCCEEDED(hr))
+ {
+ //Seek to beginning
+ wxAMMediaBackend::SetPosition(0);
+ //Stop stop event timer
+ m_pTimer->Stop();
+ return true;
+ }
+ wxAMLOG(hr);
+ return false;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::SetPosition
+//
+// 1) Translates the current position's time to directshow time,
+// which is in a scale of 1 second (in a double)
+// 2) Sets the play position of the IMediaSeeking interface -
+// passing NULL as the stop position means to keep the old
+// stop position
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::SetPosition(wxLongLong where)
+{
+ HRESULT hr = m_pAM->put_CurrentPosition(
+ ((LONGLONG)where.GetValue()) / 1000.0
+ );
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return false;
+ }
+
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetPosition
+//
+// 1) Obtains the current play and stop positions from IMediaSeeking
+// 2) Returns the play position translated to our time base
+//---------------------------------------------------------------------------
+wxLongLong wxAMMediaBackend::GetPosition()
+{
+ double outCur;
+ HRESULT hr = m_pAM->get_CurrentPosition(&outCur);
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return 0;
+ }
+
+ //h,m,s,milli - outdur is in 1 second (double)
+ outCur *= 1000;
+ wxLongLong ll;
+ ll.Assign(outCur);
+
+ return ll;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetVolume
+//
+// Gets the volume through the IBasicAudio interface -
+// value ranges from 0 (MAX volume) to -10000 (minimum volume).
+// -100 per decibel.
+//---------------------------------------------------------------------------
+double wxAMMediaBackend::GetVolume()
+{
+ long lVolume;
+ HRESULT hr = m_pAM->get_Volume(&lVolume);
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return 0.0;
+ }
+ return pow(10.0, lVolume/2000.0);
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::SetVolume
+//
+// Sets the volume through the IBasicAudio interface -
+// value ranges from 0 (MAX volume) to -10000 (minimum volume).
+// -100 per decibel.
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::SetVolume(double dVolume)
+{
+ //pow(10.0, -80.0) to correct 0 == -INF
+ long lVolume = (long)(2000.0 * log10(pow(10.0, -80.0)+dVolume));
+ HRESULT hr = m_pAM->put_Volume( lVolume );
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return false;
+ }
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetDuration
+//
+// 1) Obtains the duration of the media from IAMMultiMediaStream
+// 2) Converts that value to our time base, and returns it
+//
+// NB: With VBR MP3 files the default DirectShow MP3 render does not
+// read the Xing header correctly, resulting in skewed values for duration
+// and seeking
+//---------------------------------------------------------------------------
+wxLongLong wxAMMediaBackend::GetDuration()
+{
+ double outDuration;
+ HRESULT hr = m_pAM->get_Duration(&outDuration);
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return 0;
+ }
+
+ //h,m,s,milli - outdur is in 1 second (double)
+ outDuration *= 1000;
+ wxLongLong ll;
+ ll.Assign(outDuration);
+
+ return ll;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetState
+//
+// Returns the cached state
+//---------------------------------------------------------------------------
+wxMediaState wxAMMediaBackend::GetState()
+{
+ StateConstants nState;
+ HRESULT hr = m_pAM->get_CurrentState(&nState);
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return wxMEDIASTATE_STOPPED;
+ }
+
+ return (wxMediaState)nState;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetPlaybackRate
+//
+// Pretty simple way of obtaining the playback rate from
+// the IMediaSeeking interface
+//---------------------------------------------------------------------------
+double wxAMMediaBackend::GetPlaybackRate()
+{
+ double dRate;
+ HRESULT hr = m_pAM->get_Rate(&dRate);
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return 0.0;
+ }
+ return dRate;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::SetPlaybackRate
+//
+// Sets the playback rate of the media - DirectShow is pretty good
+// about this, actually
+//---------------------------------------------------------------------------
+bool wxAMMediaBackend::SetPlaybackRate(double dRate)
+{
+ HRESULT hr = m_pAM->put_Rate(dRate);
+ if(FAILED(hr))
+ {
+ wxAMLOG(hr);
+ return false;
+ }
+
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetDownloadXXX
+//
+// Queries for and gets the total size of the file and the current
+// progress in downloading that file from the IAMOpenProgress
+// interface from the media player interface's filter graph
+//---------------------------------------------------------------------------
+void wxAMMediaBackend::DoGetDownloadProgress(wxLongLong* pLoadProgress,
+ wxLongLong* pLoadTotal)
+{
+ LONGLONG loadTotal = 0, loadProgress = 0;
+ IUnknown* pFG;
+ IAMOpenProgress* pOP;
+ HRESULT hr;
+ hr = m_pAM->get_FilterGraph(&pFG);
+ if(SUCCEEDED(hr))
+ {
+ hr = pFG->QueryInterface(IID_IAMOpenProgress, (void**)&pOP);
+ if(SUCCEEDED(hr))
+ {
+ hr = pOP->QueryProgress(&loadTotal, &loadProgress);
+ pOP->Release();
+ }
+ pFG->Release();
+ }
+
+ if(SUCCEEDED(hr))
+ {
+ *pLoadProgress = loadProgress;
+ *pLoadTotal = loadTotal;
+ }
+ else
+ {
+ //When not loading from a URL QueryProgress will return
+ //E_NOINTERFACE or whatever
+ //wxAMFAIL(hr);
+ *pLoadProgress = 0;
+ *pLoadTotal = 0;
+ }
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::GetVideoSize
+//
+// Obtains the cached original video size
+//---------------------------------------------------------------------------
+wxSize wxAMMediaBackend::GetVideoSize() const
+{
+ return m_bestSize;
+}
+
+//---------------------------------------------------------------------------
+// wxAMMediaBackend::Move
+//
+// We take care of this in our redrawing
+//---------------------------------------------------------------------------
+void wxAMMediaBackend::Move(int WXUNUSED(x), int WXUNUSED(y),
+ int WXUNUSED(w), int WXUNUSED(h))
+{
+}
+
+//---------------------------------------------------------------------------
+// End of wxAMMediaBackend
+//---------------------------------------------------------------------------
+
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//
+// wxMCIMediaBackend
+//
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+IMPLEMENT_DYNAMIC_CLASS(wxMCIMediaBackend, wxMediaBackend)
+
+//---------------------------------------------------------------------------
+// Usual debugging macros for MCI returns
+//---------------------------------------------------------------------------
+
+#ifdef __WXDEBUG__
+#define wxMCIVERIFY(arg) \
+{ \
+ DWORD nRet; \
+ if ( (nRet = (arg)) != 0) \
+ { \
+ TCHAR sz[5000]; \
+ mciGetErrorString(nRet, sz, 5000); \
+ wxFAIL_MSG(wxString::Format(_T("MCI Error:%s"), sz)); \
+ } \
+}
+#else
+#define wxMCIVERIFY(arg) (arg);
+#endif
+
+//---------------------------------------------------------------------------
+// Simulation for <digitalv.h>
+//
+// Mingw and possibly other compilers don't have the digitalv.h header
+// that is needed to have some essential features of mci work with
+// windows - so we provide the declarations for the types we use here
+//---------------------------------------------------------------------------
+
+typedef struct {
+ DWORD_PTR dwCallback;
+#ifdef MCI_USE_OFFEXT
+ POINT ptOffset;
+ POINT ptExtent;
+#else
+ RECT rc;
+#endif
+} MCI_DGV_RECT_PARMS;
+
+typedef struct {
+ DWORD_PTR dwCallback;
+ HWND hWnd;
+#ifndef _WIN32
+ WORD wReserved1;
+#endif
+ UINT nCmdShow;
+#ifndef _WIN32
+ WORD wReserved2;
+#endif
+ wxChar* lpstrText;
+} MCI_DGV_WINDOW_PARMS;
+
+typedef struct {
+ DWORD_PTR dwCallback;
+ DWORD dwTimeFormat;
+ DWORD dwAudio;
+ DWORD dwFileFormat;
+ DWORD dwSpeed;
+} MCI_DGV_SET_PARMS;
+
+typedef struct {
+ DWORD_PTR dwCallback;
+ DWORD dwItem;
+ DWORD dwValue;
+ DWORD dwOver;
+ wxChar* lpstrAlgorithm;
+ wxChar* lpstrQuality;
+} MCI_DGV_SETAUDIO_PARMS;
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend Constructor
+//
+// Here we don't need to do much except say we don't have any video :)
+//---------------------------------------------------------------------------
+wxMCIMediaBackend::wxMCIMediaBackend() : m_hNotifyWnd(NULL), m_bVideo(false)
+{
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend Destructor
+//
+// We close the mci device - note that there may not be an mci device here,
+// or it may fail - but we don't really care, since we're destructing
+//---------------------------------------------------------------------------
+wxMCIMediaBackend::~wxMCIMediaBackend()
+{
+ if(m_hNotifyWnd)
+ {
+ mciSendCommand(m_hDev, MCI_CLOSE, 0, 0);
+ DestroyWindow(m_hNotifyWnd);
+ m_hNotifyWnd = NULL;
+ }
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Create
+//
+// Here we just tell wxMediaCtrl that mci does exist (which it does, on all
+// msw systems, at least in some form dating back to win16 days)
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::CreateControl(wxControl* ctrl, wxWindow* parent,
+ wxWindowID id,
+ const wxPoint& pos,
+ const wxSize& size,
+ long style,
+ const wxValidator& validator,
+ const wxString& name)
+{
+ //
+ // Create window
+ // By default wxWindow(s) is created with a border -
+ // so we need to get rid of those, and create with
+ // wxCLIP_CHILDREN, so that if the driver/backend
+ // is a child window, it refereshes properly
+ //
+ if ( !ctrl->wxControl::Create(parent, id, pos, size,
+ (style & ~wxBORDER_MASK) | wxBORDER_NONE | wxCLIP_CHILDREN,
+ validator, name) )
+ return false;
+
+ m_ctrl = wxStaticCast(ctrl, wxMediaCtrl);
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Load (file version)
+//
+// Here we have MCI load a file and device, set the time format to our
+// default (milliseconds), and set the video (if any) to play in the control
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::Load(const wxString& fileName)
+{
+ //
+ //if the user already called load close the previous MCI device
+ //
+ if(m_hNotifyWnd)
+ {
+ mciSendCommand(m_hDev, MCI_CLOSE, 0, 0);
+ DestroyWindow(m_hNotifyWnd);
+ m_hNotifyWnd = NULL;
+ }
+
+ //
+ //Opens a file and has MCI select a device. Normally you'd put
+ //MCI_OPEN_TYPE in addition to MCI_OPEN_ELEMENT - however if you
+ //omit this it tells MCI to select the device instead. This is
+ //good because we have no reliable way of "enumerating" the devices
+ //in MCI
+ //
+ MCI_OPEN_PARMS openParms;
+ openParms.lpstrElementName = (wxChar*) fileName.c_str();
+
+ if ( mciSendCommand(0, MCI_OPEN, MCI_OPEN_ELEMENT,
+ (DWORD)(LPVOID)&openParms) != 0)
+ return false;
+
+ m_hDev = openParms.wDeviceID;
+
+ //
+ //Now set the time format for the device to milliseconds
+ //
+ MCI_SET_PARMS setParms;
+ setParms.dwCallback = 0;
+ setParms.dwTimeFormat = MCI_FORMAT_MILLISECONDS;
+
+ if (mciSendCommand(m_hDev, MCI_SET, MCI_SET_TIME_FORMAT,
+ (DWORD)(LPVOID)&setParms) != 0)
+ return false;
+
+ //
+ //Now tell the MCI device to display the video in our wxMediaCtrl
+ //
+ MCI_DGV_WINDOW_PARMS windowParms;
+ windowParms.hWnd = (HWND)m_ctrl->GetHandle();
+
+ m_bVideo = (mciSendCommand(m_hDev, MCI_WINDOW,
+ 0x00010000L, //MCI_DGV_WINDOW_HWND
+ (DWORD)(LPVOID)&windowParms) == 0);
+
+ //
+ // Create a hidden window and register to handle
+ // MCI events
+ // Note that wxCanvasClassName is already registered
+ // and used by all wxWindows and normal wxControls
+ //
+ m_hNotifyWnd = ::CreateWindow
+ (
+ wxCanvasClassName,
+ NULL,
+ 0, 0, 0, 0,
+ 0,
+ (HWND) NULL,
+ (HMENU)NULL,
+ wxGetInstance(),
+ (LPVOID) NULL
+ );
+
+ if(!m_hNotifyWnd)
+ {
+ wxLogSysError( wxT("Could not create hidden needed for ")
+ wxT("registering for MCI events!") );
+
+ return false;
+ }
+
+ wxSetWindowProc(m_hNotifyWnd, wxMCIMediaBackend::NotifyWndProc);
+ wxSetWindowUserData(m_hNotifyWnd, this);
+
+ NotifyMovieLoaded();
+
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Load (URL version)
+//
+// MCI doesn't support URLs directly (?)
+//
+// TODO: Use wxURL/wxFileSystem and mmioInstallProc
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::Load(const wxURI& WXUNUSED(location))
+{
+ return false;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Play
+//
+// Plays/Resumes the MCI device... a couple notes:
+// 1) Certain drivers will crash and burn if we don't pass them an
+// MCI_PLAY_PARMS, despite the documentation that says otherwise...
+// 2) There is a MCI_RESUME command, but MCI_PLAY does the same thing
+// and will resume from a stopped state also, so there's no need to
+// call both, for example
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::Play()
+{
+ MCI_PLAY_PARMS playParms;
+ playParms.dwCallback = (DWORD)m_hNotifyWnd;
+
+ bool bOK = ( mciSendCommand(m_hDev, MCI_PLAY, MCI_NOTIFY,
+ (DWORD)(LPVOID)&playParms) == 0 );
+
+ if(bOK)
+ m_ctrl->Show(m_bVideo);
+
+ return bOK;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Pause
+//
+// Pauses the MCI device - nothing special
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::Pause()
+{
+ return (mciSendCommand(m_hDev, MCI_PAUSE, MCI_WAIT, 0) == 0);
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Stop
+//
+// Stops the MCI device & seeks to the beginning as wxMediaCtrl docs outline
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::Stop()
+{
+ return (mciSendCommand(m_hDev, MCI_STOP, MCI_WAIT, 0) == 0) &&
+ (mciSendCommand(m_hDev, MCI_SEEK, MCI_SEEK_TO_START, 0) == 0);
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::GetState
+//
+// Here we get the state and convert it to a wxMediaState -
+// since we use direct comparisons with MCI_MODE_PLAY and
+// MCI_MODE_PAUSE, we don't care if the MCI_STATUS call
+// fails or not
+//---------------------------------------------------------------------------
+wxMediaState wxMCIMediaBackend::GetState()
+{
+ MCI_STATUS_PARMS statusParms;
+ statusParms.dwItem = MCI_STATUS_MODE;
+
+ mciSendCommand(m_hDev, MCI_STATUS, MCI_STATUS_ITEM,
+ (DWORD)(LPVOID)&statusParms);
+
+ if(statusParms.dwReturn == MCI_MODE_PAUSE)
+ return wxMEDIASTATE_PAUSED;
+ else if(statusParms.dwReturn == MCI_MODE_PLAY)
+ return wxMEDIASTATE_PLAYING;
+ else
+ return wxMEDIASTATE_STOPPED;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::SetPosition
+//
+// Here we set the position of the device in the stream.
+// Note that MCI actually stops the device after you seek it if the
+// device is playing/paused, so we need to play the file after
+// MCI seeks like normal APIs would
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::SetPosition(wxLongLong where)
+{
+ MCI_SEEK_PARMS seekParms;
+ seekParms.dwCallback = 0;
+#if wxUSE_LONGLONG_NATIVE && !wxUSE_LONGLONG_WX
+ seekParms.dwTo = (DWORD)where.GetValue();
+#else /* wxUSE_LONGLONG_WX */
+ /* no way to return it in one piece */
+ wxASSERT( where.GetHi()==0 );
+ seekParms.dwTo = (DWORD)where.GetLo();
+#endif /* wxUSE_LONGLONG_* */
+
+ //device was playing?
+ bool bReplay = GetState() == wxMEDIASTATE_PLAYING;
+
+ if( mciSendCommand(m_hDev, MCI_SEEK, MCI_TO,
+ (DWORD)(LPVOID)&seekParms) != 0)
+ return false;
+
+ //If the device was playing, resume it
+ if (bReplay)
+ return Play();
+ else
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::GetPosition
+//
+// Gets the position of the device in the stream using the current
+// time format... nothing special here...
+//---------------------------------------------------------------------------
+wxLongLong wxMCIMediaBackend::GetPosition()
+{
+ MCI_STATUS_PARMS statusParms;
+ statusParms.dwItem = MCI_STATUS_POSITION;
+
+ if (mciSendCommand(m_hDev, MCI_STATUS, MCI_STATUS_ITEM,
+ (DWORD)(LPSTR)&statusParms) != 0)
+ return 0;
+
+ return statusParms.dwReturn;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::GetVolume
+//
+// Gets the volume of the current media via the MCI_DGV_STATUS_VOLUME
+// message. Value ranges from 0 (minimum) to 1000 (maximum volume).
+//---------------------------------------------------------------------------
+double wxMCIMediaBackend::GetVolume()
+{
+ MCI_STATUS_PARMS statusParms;
+ statusParms.dwCallback = 0;
+ statusParms.dwItem = 0x4019; //MCI_DGV_STATUS_VOLUME
+
+ if (mciSendCommand(m_hDev, MCI_STATUS, MCI_STATUS_ITEM,
+ (DWORD)(LPSTR)&statusParms) != 0)
+ return 0;
+
+ return ((double)statusParms.dwReturn) / 1000.0;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::SetVolume
+//
+// Sets the volume of the current media via the MCI_DGV_SETAUDIO_VOLUME
+// message. Value ranges from 0 (minimum) to 1000 (maximum volume).
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::SetVolume(double dVolume)
+{
+ MCI_DGV_SETAUDIO_PARMS audioParms;
+ audioParms.dwCallback = 0;
+ audioParms.dwItem = 0x4002; //MCI_DGV_SETAUDIO_VOLUME
+ audioParms.dwValue = (DWORD) (dVolume * 1000.0);
+ audioParms.dwOver = 0;
+ audioParms.lpstrAlgorithm = NULL;
+ audioParms.lpstrQuality = NULL;
+
+ if (mciSendCommand(m_hDev, 0x0873, //MCI_SETAUDIO
+ //MCI_DGV_SETAUDIO+(_ITEM | _VALUE)
+ 0x00800000L | 0x01000000L,
+ (DWORD)(LPSTR)&audioParms) != 0)
+ return false;
+ return true;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::GetDuration
+//
+// Gets the duration of the stream... nothing special
+//---------------------------------------------------------------------------
+wxLongLong wxMCIMediaBackend::GetDuration()
+{
+ MCI_STATUS_PARMS statusParms;
+ statusParms.dwItem = MCI_STATUS_LENGTH;
+
+ if (mciSendCommand(m_hDev, MCI_STATUS, MCI_STATUS_ITEM,
+ (DWORD)(LPSTR)&statusParms) != 0)
+ return 0;
+
+ return statusParms.dwReturn;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::Move
+//
+// Moves the window to a location
+//---------------------------------------------------------------------------
+void wxMCIMediaBackend::Move(int WXUNUSED(x), int WXUNUSED(y),
+ int w, int h)
+{
+ if (m_hNotifyWnd && m_bVideo)
+ {
+ MCI_DGV_RECT_PARMS putParms; //ifdefed MCI_DGV_PUT_PARMS
+ memset(&putParms, 0, sizeof(MCI_DGV_RECT_PARMS));
+ putParms.rc.bottom = h;
+ putParms.rc.right = w;
+
+ //wxStackWalker will crash and burn here on assert
+ //and mci doesn't like 0 and 0 for some reason (out of range )
+ //so just don't it in that case
+ if(w || h)
+ {
+ wxMCIVERIFY( mciSendCommand(m_hDev, MCI_PUT,
+ 0x00040000L, //MCI_DGV_PUT_DESTINATION
+ (DWORD)(LPSTR)&putParms) );
+ }
+ }
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::GetVideoSize
+//
+// Gets the original size of the movie for sizers
+//---------------------------------------------------------------------------
+wxSize wxMCIMediaBackend::GetVideoSize() const
+{
+ if(m_bVideo)
+ {
+ MCI_DGV_RECT_PARMS whereParms; //ifdefed MCI_DGV_WHERE_PARMS
+
+ wxMCIVERIFY( mciSendCommand(m_hDev, MCI_WHERE,
+ 0x00020000L, //MCI_DGV_WHERE_SOURCE
+ (DWORD)(LPSTR)&whereParms) );
+
+ return wxSize(whereParms.rc.right, whereParms.rc.bottom);
+ }
+ return wxSize(0,0);
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::GetPlaybackRate
+//
+// TODO
+//---------------------------------------------------------------------------
+double wxMCIMediaBackend::GetPlaybackRate()
+{
+ return 1.0;
+}
+
+//---------------------------------------------------------------------------
+// wxMCIMediaBackend::SetPlaybackRate
+//
+// TODO
+//---------------------------------------------------------------------------
+bool wxMCIMediaBackend::SetPlaybackRate(double WXUNUSED(dRate))
+{
+/*
+ MCI_WAVE_SET_SAMPLESPERSEC
+ MCI_DGV_SET_PARMS setParms;
+ setParms.dwSpeed = (DWORD) (dRate * 1000.0);
+
+ return (mciSendCommand(m_hDev, MCI_SET,
+ 0x00020000L, //MCI_DGV_SET_SPEED
+ (DWORD)(LPSTR)&setParms) == 0);
+*/
+ return false;
+}
+
+//---------------------------------------------------------------------------
+// [static] wxMCIMediaBackend::MSWWindowProc
+//
+// Here we process a message when MCI reaches the stopping point
+// in the stream
+//---------------------------------------------------------------------------
+LRESULT CALLBACK wxMCIMediaBackend::NotifyWndProc(HWND hWnd, UINT nMsg,
+ WPARAM wParam,
+ LPARAM lParam)
+{
+ wxMCIMediaBackend* backend =
+ (wxMCIMediaBackend*)wxGetWindowUserData(hWnd);
+
+ return backend->OnNotifyWndProc(hWnd, nMsg, wParam, lParam);
+}
+
+LRESULT CALLBACK wxMCIMediaBackend::OnNotifyWndProc(HWND hWnd, UINT nMsg,
+ WPARAM wParam,
+ LPARAM lParam)
+{
+ if(nMsg == MM_MCINOTIFY)
+ {
+ wxASSERT(lParam == (LPARAM) m_hDev);
+ if(wParam == MCI_NOTIFY_SUCCESSFUL && lParam == (LPARAM)m_hDev)
+ {
+ if ( SendStopEvent() )
+ {
+ wxMCIVERIFY( mciSendCommand(m_hDev, MCI_SEEK,
+ MCI_SEEK_TO_START, 0) );
+
+ QueueFinishEvent();
+ }
+ }
+ }
+ return DefWindowProc(hWnd, nMsg, wParam, lParam);
+}
+
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//
+// wxQTMediaBackend
+//
+// TODO: Use a less cludgy way to pause/get state/set state
+// FIXME: Greg Hazel reports that sometimes files that cannot be played
+// with this backend are treated as playable anyway - not verifyed though.
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+IMPLEMENT_DYNAMIC_CLASS(wxQTMediaBackend, wxMediaBackend)
+
+//Time between timer calls - this is the Apple recommondation to the TCL
+//team I believe
+#define MOVIE_DELAY 20
+
+#include "wx/timer.h"
+
+
+//---------------------------------------------------------------------------
+// wxQTLoadTimer
+//
+// QT, esp. QT for Windows is very picky about how you go about
+// async loading. If you were to go through a Windows message loop
+// or a MoviesTask or both and then check the movie load state
+// it would still return 1000 (loading)... even (pre)prerolling doesn't
+// help. However, making a load timer like this works
+//---------------------------------------------------------------------------
+class wxQTLoadTimer : public wxTimer
+{
+public:
+ wxQTLoadTimer(Movie movie, wxQTMediaBackend* parent, wxQuickTimeLibrary* pLib) :
+ m_movie(movie), m_parent(parent), m_pLib(pLib) {}
+
+ void Notify()
+ {
+ m_pLib->MoviesTask(m_movie, 0);
+ //kMovieLoadStatePlayable
+ if(m_pLib->GetMovieLoadState(m_movie) >= 10000)
+ {
+ m_parent->FinishLoad();
+ delete this;
+ }
+ }
+
+protected:
+ Movie m_movie; //Our movie instance
+ wxQTMediaBackend* m_parent; //Backend pointer
+ wxQuickTimeLibrary* m_pLib; //Interfaces
+};
+
+
+// --------------------------------------------------------------------------
+// wxQTPlayTimer - Handle Asyncronous Playing
+//
+// 1) Checks to see if the movie is done, and if not continues
+// streaming the movie
+// 2) Sends the wxEVT_MEDIA_STOP event if we have reached the end of
+// the movie.
+// --------------------------------------------------------------------------
+class wxQTPlayTimer : public wxTimer
+{
+public:
+ wxQTPlayTimer(Movie movie, wxQTMediaBackend* parent,
+ wxQuickTimeLibrary* pLib) :
+ m_movie(movie), m_parent(parent), m_pLib(pLib) {}
+
+ void Notify()
+ {
+ //
+ // OK, a little explaining - basically originally
+ // we only called MoviesTask if the movie was actually
+ // playing (not paused or stopped)... this was before
+ // we realized MoviesTask actually handles repainting
+ // of the current frame - so if you were to resize
+ // or something it would previously not redraw that
+ // portion of the movie.
+ //
+ // So now we call MoviesTask always so that it repaints
+ // correctly.
+ //
+ m_pLib->MoviesTask(m_movie, 0);
+
+ //
+ // Handle the stop event - if the movie has reached
+ // the end, notify our handler
+ //
+ // m_bPlaying == !(Stopped | Paused)
+ //
+ if (m_parent->m_bPlaying)
+ {
+ if(m_pLib->IsMovieDone(m_movie))
+ {
+ if ( m_parent->SendStopEvent() )
+ {
+ m_parent->Stop();
+ wxASSERT(m_pLib->GetMoviesError() == noErr);
+
+ m_parent->QueueFinishEvent();
+ }
+ }
+ }
+ }
+
+protected:
+ Movie m_movie; //Our movie instance
+ wxQTMediaBackend* m_parent; //Backend pointer
+ wxQuickTimeLibrary* m_pLib; //Interfaces
+};
+
+
+//---------------------------------------------------------------------------
+// wxQTMediaBackend::QTWndProc
+//
+// Forwards events to the Movie Controller so that it can
+// redraw itself/process messages etc..
+//---------------------------------------------------------------------------
+LRESULT CALLBACK wxQTMediaBackend::QTWndProc(HWND hWnd, UINT nMsg,
+ WPARAM wParam, LPARAM lParam)
+{
+ wxQTMediaBackend* pThis = (wxQTMediaBackend*)wxGetWindowUserData(hWnd);
+
+ MSG msg;
+ msg.hwnd = hWnd;
+ msg.message = nMsg;
+ msg.wParam = wParam;
+ msg.lParam = lParam;
+ msg.time = 0;
+ msg.pt.x = 0;
+ msg.pt.y = 0;
+ EventRecord theEvent;
+ pThis->m_lib.NativeEventToMacEvent(&msg, &theEvent);
+ pThis->m_lib.MCIsPlayerEvent(pThis->m_pMC, &theEvent);
+ return pThis->m_ctrl->MSWWindowProc(nMsg, wParam, lParam);
+}
+
+//---------------------------------------------------------------------------
+// wxQTMediaBackend Destructor
+//
+// Sets m_timer to NULL signifying we havn't loaded anything yet
+//---------------------------------------------------------------------------
+wxQTMediaBackend::wxQTMediaBackend()
+: m_movie(NULL), m_bPlaying(false), m_timer(NULL), m_pMC(NULL)
+{
+}
+
+//---------------------------------------------------------------------------
+// wxQTMediaBackend Destructor
+//
+// 1) Cleans up the QuickTime movie instance
+// 2) Decrements the QuickTime reference counter - if this reaches
+// 0, QuickTime shuts down
+// 3) Decrements the QuickTime Windows Media Layer reference counter -
+// if this reaches 0, QuickTime shuts down the Windows Media Layer
+//---------------------------------------------------------------------------
+wxQTMediaBackend::~wxQTMediaBackend()
+{
+ if(m_movie)
+ Cleanup();
+
+ if(m_lib.IsOk())
+ {
+ if(m_pMC)
+ {
+ m_lib.DisposeMovieController(m_pMC);
+ // m_pMC = NULL;
+ }
+
+ // destroy wxQTMediaEvtHandler we pushed on it
+ m_ctrl->PopEventHandler(true);
+
+ m_lib.DestroyPortAssociation(
+ (CGrafPtr)m_lib.GetNativeWindowPort(m_ctrl->GetHWND()));
+
+ //Note that ExitMovies() is not necessary, but
+ //the docs are fuzzy on whether or not TerminateQTML is
+ m_lib.ExitMovies();
+ m_lib.TerminateQTML();
projects / wxWidgets.git / blobdiff