From 47857e3fd1f3c8d8d91a57694491dd62df78bd2c Mon Sep 17 00:00:00 2001 From: MusicalProgrammer Date: Sat, 7 Mar 2020 12:57:30 -0500 Subject: [PATCH 1/3] ax.cpp has more functions now for us to play with --- ax.cpp | 87 +++++++++++++++++++++++++++++++++++++++++++++++++++++++--- ax.h | 63 ++++++++++++++++++++++++++++++++++++++++-- 2 files changed, 144 insertions(+), 6 deletions(-) diff --git a/ax.cpp b/ax.cpp index f636501..d602a04 100644 --- a/ax.cpp +++ b/ax.cpp @@ -26,6 +26,76 @@ AXClientSite :: ~AXClientSite() } +STDMETHODIMP AXClientSite :: ShowContextMenu(DWORD dwID, POINT *ppt, IUnknown *pcmdtReserved, IDispatch *pdispReserved) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: GetHostInfo(DOCHOSTUIINFO *pInfo) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: ShowUI( DWORD dwID, IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget, IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: HideUI( void) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: UpdateUI( void) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: OnDocWindowActivate(BOOL fActivate) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: OnFrameWindowActivate(BOOL fActivate) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: ResizeBorder( LPCRECT prcBorder, IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: TranslateAccelerator( LPMSG lpMsg, const GUID *pguidCmdGroup, DWORD nCmdID) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: GetOptionKeyPath( LPOLESTR *pchKey, DWORD dw) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: GetDropTarget( IDropTarget *pDropTarget, IDropTarget **ppDropTarget) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: GetExternal(IDispatch **ppDispatch) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite ::TranslateUrl( DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut) +{ + return E_NOTIMPL; +} + +STDMETHODIMP AXClientSite :: FilterDataObject( IDataObject *pDO, IDataObject **ppDORet) +{ + return E_NOTIMPL; +} + // IUnknown methods STDMETHODIMP AXClientSite :: QueryInterface(REFIID iid,void**ppvObject) { @@ -46,6 +116,8 @@ STDMETHODIMP AXClientSite :: QueryInterface(REFIID iid,void**ppvObject) *ppvObject = (IOleInPlaceFrame*)this; if (iid == IID_IOleInPlaceUIWindow) *ppvObject = (IOleInPlaceUIWindow*)this; + if (iid == IID_IDocHostUIHandler) + *ppvObject = (IDocHostUIHandler*)this; } //* Log Call @@ -229,9 +301,9 @@ STDMETHODIMP AXClientSite :: SetActiveObject(IOleInPlaceActiveObject*pV,LPCOLEST STDMETHODIMP AXClientSite :: SetStatusText(LPCOLESTR t) - { +{ return E_NOTIMPL; - } +} STDMETHODIMP AXClientSite :: EnableModeless(BOOL f) { @@ -251,14 +323,20 @@ HRESULT _stdcall AXClientSite :: GetTypeInfoCount( HRESULT _stdcall AXClientSite :: GetTypeInfo( unsigned int iTInfo, LCID lcid, - ITypeInfo FAR* FAR* ppTInfo) {return E_NOTIMPL;} + ITypeInfo FAR* FAR* ppTInfo) +{ + return E_NOTIMPL; +} HRESULT _stdcall AXClientSite :: GetIDsOfNames( REFIID riid, OLECHAR FAR* FAR*, unsigned int cNames, LCID lcid, - DISPID FAR* ) {return E_NOTIMPL;} + DISPID FAR* ) +{ + return E_NOTIMPL; +} // Other Methods @@ -277,6 +355,7 @@ void AX :: Init(char* cls) AdviseToken = 0; memset(DAdviseToken,0,sizeof(DAdviseToken)); Site.ax = this; + } AX :: AX(char* cls) diff --git a/ax.h b/ax.h index e935a9b..1884d5b 100644 --- a/ax.h +++ b/ax.h @@ -1,4 +1,5 @@ // AX.H +#include // messages #define AX_QUERYINTERFACE (WM_USER + 1) @@ -20,7 +21,8 @@ class AXClientSite : public IDispatch, public IAdviseSink, public IOleInPlaceSite, - public IOleInPlaceFrame + public IOleInPlaceFrame, + public IDocHostUIHandler { protected: @@ -55,7 +57,64 @@ class AXClientSite : STDMETHODIMP ShowObject(); STDMETHODIMP OnShowWindow(BOOL f); STDMETHODIMP RequestNewObjectLayout(); - + + // IDDocHandler methods + STDMETHODIMP ShowContextMenu( + /* [in] */ DWORD dwID, + /* [in] */ POINT *ppt, + /* [in] */ IUnknown *pcmdtReserved, + /* [in] */ IDispatch *pdispReserved); + + STDMETHODIMP GetHostInfo( + /* [out][in] */ DOCHOSTUIINFO *pInfo); + + STDMETHODIMP ShowUI( + /* [in] */ DWORD dwID, + /* [in] */ IOleInPlaceActiveObject *pActiveObject, + /* [in] */ IOleCommandTarget *pCommandTarget, + /* [in] */ IOleInPlaceFrame *pFrame, + /* [in] */ IOleInPlaceUIWindow *pDoc); + + STDMETHODIMP HideUI( void); + + STDMETHODIMP UpdateUI( void); + + STDMETHODIMP OnDocWindowActivate( + /* [in] */ BOOL fActivate); + + STDMETHODIMP OnFrameWindowActivate( + /* [in] */ BOOL fActivate); + + STDMETHODIMP ResizeBorder( + /* [in] */ LPCRECT prcBorder, + /* [in] */ IOleInPlaceUIWindow *pUIWindow, + /* [in] */ BOOL fRameWindow); + + STDMETHODIMP TranslateAccelerator( + /* [in] */ LPMSG lpMsg, + /* [in] */ const GUID *pguidCmdGroup, + /* [in] */ DWORD nCmdID); + + STDMETHODIMP GetOptionKeyPath( + /* [out] */ LPOLESTR *pchKey, + /* [in] */ DWORD dw); + + STDMETHODIMP GetDropTarget( + /* [in] */ IDropTarget *pDropTarget, + /* [out] */ IDropTarget **ppDropTarget); + + STDMETHODIMP GetExternal( + /* [out] */ IDispatch **ppDispatch); + + STDMETHODIMP TranslateUrl( + /* [in] */ DWORD dwTranslate, + /* [in] */ OLECHAR *pchURLIn, + /* [out] */ OLECHAR **ppchURLOut); + + STDMETHODIMP FilterDataObject( + /* [in] */ IDataObject *pDO, + /* [out] */ IDataObject **ppDORet); + // IAdviseSink methods STDMETHODIMP_(void) OnDataChange(FORMATETC *pFormatEtc,STGMEDIUM *pStgmed); From 94b787804df7d145e1cbd405a1e3517da822577a Mon Sep 17 00:00:00 2001 From: MusicalProgrammer Date: Sat, 7 Mar 2020 16:05:15 -0500 Subject: [PATCH 2/3] External function support added. --- IEBrowser.cpp | 47 +--------------------------------------------- ax.cpp | 52 +++++++++++++++++++++++++++++++++++++++++++-------- ax.h | 16 ++++++++-------- 3 files changed, 53 insertions(+), 62 deletions(-) diff --git a/IEBrowser.cpp b/IEBrowser.cpp index 97f1b3a..ea3f2cd 100644 --- a/IEBrowser.cpp +++ b/IEBrowser.cpp @@ -62,56 +62,11 @@ bool IEBrowser::navigateSyncURL(wchar_t* url) if (webBrowser) { webBrowser->Navigate(url,0,0,0,0); - for (int i=1;i<1000;i++) - { - while (PeekMessage (&messages, NULL, 0, 0,PM_REMOVE)) - { - if (IsDialogMessage(hwnd, &messages) == 0) - { - TranslateMessage(&messages); - DispatchMessage(&messages); - } - } - - Sleep(30); - - HRESULT hresult = webBrowser->get_Document(&spDocument); - if (SUCCEEDED(hresult) && (spDocument != 0)) - { - - IOleObject* spOleObject; - if (SUCCEEDED(spDocument->QueryInterface(IID_IOleObject,(void**)&spOleObject))) - { - IOleClientSite* spClientSite; - hresult = spOleObject->GetClientSite(&spClientSite); - if (SUCCEEDED(hresult) && spClientSite) - { - m_spDefaultDocHostUIHandler = spClientSite; - ICustomDoc* spCustomDoc; - - //IEDispatcher* spIEDispatcher; - if (SUCCEEDED(m_spDefaultDocHostUIHandler->QueryInterface(IID_IDocHostUIHandler,(void**)&m_spHandler))) - { - if (SUCCEEDED(spDocument->QueryInterface(IID_ICustomDoc,(void**)&spCustomDoc))) - { - spCustomDoc->SetUIHandler(m_spHandler); - m_spHandler->GetExternal(&m_spExternal); - spDocument->QueryInterface(IID_IHTMLDocument2, (void **) &spDocument2); - setExternal(&m_spExternal); - } - } - } - } - - - - return true; - } - } } else { MessageBox(NULL,"Cannot read IWebBrowser2...",(g_PlaceholderName+" Crash").c_str(),MB_OK); } + return false; } diff --git a/ax.cpp b/ax.cpp index d602a04..91cfa4f 100644 --- a/ax.cpp +++ b/ax.cpp @@ -11,7 +11,6 @@ #pragma warning (disable: 4244) #pragma warning (disable: 4800) - // AXClientSite class // ------- Implement member functions AXClientSite :: AXClientSite() @@ -83,7 +82,14 @@ STDMETHODIMP AXClientSite :: GetDropTarget( IDropTarget *pDropTarget, IDropTarge STDMETHODIMP AXClientSite :: GetExternal(IDispatch **ppDispatch) { - return E_NOTIMPL; + //IDispatch* disp = ax->GetExternalDispatch(); + *ppDispatch = this; + /* if (disp!=NULL) + { + *ppDispatch = this; + return S_OK; + } */ + return S_OK; } STDMETHODIMP AXClientSite ::TranslateUrl( DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut) @@ -330,12 +336,13 @@ HRESULT _stdcall AXClientSite :: GetTypeInfo( HRESULT _stdcall AXClientSite :: GetIDsOfNames( REFIID riid, - OLECHAR FAR* FAR*, + OLECHAR FAR* FAR* ext_function_name, unsigned int cNames, LCID lcid, DISPID FAR* ) { - return E_NOTIMPL; + m_lastExternalName = *ext_function_name; + return S_OK; } @@ -355,7 +362,7 @@ void AX :: Init(char* cls) AdviseToken = 0; memset(DAdviseToken,0,sizeof(DAdviseToken)); Site.ax = this; - + m_externalDisp = 0; } AX :: AX(char* cls) @@ -364,6 +371,15 @@ AX :: AX(char* cls) } +void AX :: SetExternalDispatch(IDispatch* externalDisp) +{ + m_externalDisp = externalDisp; +} + +IDispatch* AX :: GetExternalDispatch() +{ + return m_externalDisp; +} void AX :: Clean() { @@ -501,9 +517,24 @@ HRESULT _stdcall AXClientSite :: Invoke( VARIANT FAR* pVarResult, EXCEPINFO FAR* pExcepInfo, unsigned int FAR* puArgErr) - { - return E_NOTIMPL; - } +{ + + if (m_lastExternalName==L"Insert") + { + + MessageBoxW(NULL, pDispParams->rgvarg->bstrVal,L"Add insert here...",MB_OK); + return S_OK; + } + else if (m_lastExternalName==L"Boop") + { + MessageBox(NULL, "BOOP", "Boopity boop",MB_OK); + } + else + { + return E_NOTIMPL; + } + return S_OK; +} void _stdcall AXClientSite :: OnDataChange(FORMATETC *pFormatEtc,STGMEDIUM *pStgmed) @@ -610,6 +641,11 @@ LRESULT CALLBACK AXWndProc(HWND hh,UINT mm,WPARAM ww,LPARAM ll) return true; } + if (mm == AX_SETEXTERNALDISP) + { + AX* ax = (AX*)GetWindowLong(hh,GWL_USERDATA); + ax->SetExternalDispatch((IDispatch*)ll); + } if (mm == AX_GETAXINTERFACE) { diff --git a/ax.h b/ax.h index 1884d5b..e32ac9c 100644 --- a/ax.h +++ b/ax.h @@ -1,5 +1,6 @@ // AX.H #include +#include // messages #define AX_QUERYINTERFACE (WM_USER + 1) @@ -9,6 +10,7 @@ #define AX_DISCONNECTOBJECT (WM_USER + 5) #define AX_SETDATAADVISE (WM_USER + 6) #define AX_DOVERB (WM_USER + 7) +#define AX_SETEXTERNALDISP (WM_USER + 8) // Registration function @@ -30,7 +32,6 @@ class AXClientSite : public: - HWND Window; HWND Parent; HMENU Menu; @@ -149,14 +150,13 @@ class AXClientSite : STDMETHODIMP EnableModeless(BOOL f); STDMETHODIMP TranslateAccelerator(LPMSG,WORD); - + std::wstring m_lastExternalName; + // IDispatch Methods HRESULT _stdcall GetTypeInfoCount(unsigned int * pctinfo); HRESULT _stdcall GetTypeInfo(unsigned int iTInfo,LCID lcid,ITypeInfo FAR* FAR* ppTInfo); HRESULT _stdcall GetIDsOfNames(REFIID riid,OLECHAR FAR* FAR*,unsigned int cNames,LCID lcid,DISPID FAR* ); HRESULT _stdcall Invoke(DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS FAR* pDispParams,VARIANT FAR* pVarResult,EXCEPINFO FAR* pExcepInfo,unsigned int FAR* puArgErr); - - // IOleControlSite Methods }; @@ -187,12 +187,12 @@ class AX bool AddMenu; DWORD AdviseToken; DWORD DAdviseToken[100]; - - - + void SetExternalDispatch(IDispatch* externalDisp); + IDispatch* GetExternalDispatch(); + private: - + IDispatch* m_externalDisp; CLSID clsid; From bf0115f2adc3e2fb077e3700a5045d3ab26d9df0 Mon Sep 17 00:00:00 2001 From: MusicalProgrammer Date: Sat, 7 Mar 2020 18:32:54 -0500 Subject: [PATCH 3/3] Cleaning up failed experiments --- IEBrowser.cpp | 21 +-------------------- IEBrowser.h | 8 -------- ax.cpp | 18 ------------------ ax.h | 8 +------- 4 files changed, 2 insertions(+), 53 deletions(-) diff --git a/IEBrowser.cpp b/IEBrowser.cpp index ea3f2cd..d3848dd 100644 --- a/IEBrowser.cpp +++ b/IEBrowser.cpp @@ -9,10 +9,9 @@ #include "Globals.h" #include "ax.h" -//#include "IEDispatcher.h" - void IEBrowser::Boop(char* test) { + // External functions may end up here in the future } IEBrowser::IEBrowser(HWND attachHWnd) { @@ -26,7 +25,6 @@ IEBrowser::IEBrowser(HWND attachHWnd) { } } hwnd = attachHWnd; - spDocument = 0; webBrowser = 0; SendMessage(hwnd,AX_INPLACE,1,0); SendMessage(hwnd,AX_QUERYINTERFACE,(WPARAM)&IID_IWebBrowser2,(LPARAM)&webBrowser); @@ -39,23 +37,6 @@ IEBrowser::~IEBrowser(void) { } } -// Something goes here -int IEBrowser::setExternal(IDispatch** ext) -{ - std::cout << &m_IEDispatcher; - IInternetHostSecurityManager* spSecMan; - spDocument2->QueryInterface(IID_IInternetHostSecurityManager, - (void **) &spSecMan); - - // TODO: hr needs to say: 'S_OK' - //spSecMan->QueryCustomPolicy - HRESULT hr = spSecMan->ProcessUrlAction(URLACTION_ACTIVEX_OVERRIDE_OBJECT_SAFETY, - NULL, 0, NULL, 0, 0, PUAF_WARN_IF_DENIED); - - (*ext) = &m_IEDispatcher; - return 1; -} - bool IEBrowser::navigateSyncURL(wchar_t* url) { MSG messages; diff --git a/IEBrowser.h b/IEBrowser.h index b3d00dd..1bef0a7 100644 --- a/IEBrowser.h +++ b/IEBrowser.h @@ -14,12 +14,4 @@ class IEBrowser { private: IWebBrowser2* webBrowser; HWND hwnd; - IDispatch* spDocument; - IHTMLDocument* spDocument2; - IDocHostUIHandler* m_spHandler; - IDispatch* m_spExternal; - IDispatch* m_newExternal; - IEDispatcher m_IEDispatcher; - IOleClientSite* m_spDefaultDocHostUIHandler; - int setExternal(IDispatch** ext); }; diff --git a/ax.cpp b/ax.cpp index 91cfa4f..b8ce2e1 100644 --- a/ax.cpp +++ b/ax.cpp @@ -362,7 +362,6 @@ void AX :: Init(char* cls) AdviseToken = 0; memset(DAdviseToken,0,sizeof(DAdviseToken)); Site.ax = this; - m_externalDisp = 0; } AX :: AX(char* cls) @@ -370,17 +369,6 @@ AX :: AX(char* cls) Init(cls); } - -void AX :: SetExternalDispatch(IDispatch* externalDisp) -{ - m_externalDisp = externalDisp; -} - -IDispatch* AX :: GetExternalDispatch() -{ - return m_externalDisp; -} - void AX :: Clean() { if (Site.InPlace == true) @@ -641,12 +629,6 @@ LRESULT CALLBACK AXWndProc(HWND hh,UINT mm,WPARAM ww,LPARAM ll) return true; } - if (mm == AX_SETEXTERNALDISP) - { - AX* ax = (AX*)GetWindowLong(hh,GWL_USERDATA); - ax->SetExternalDispatch((IDispatch*)ll); - } - if (mm == AX_GETAXINTERFACE) { AX* ax = (AX*)GetWindowLong(hh,GWL_USERDATA); diff --git a/ax.h b/ax.h index e32ac9c..6f56add 100644 --- a/ax.h +++ b/ax.h @@ -10,8 +10,6 @@ #define AX_DISCONNECTOBJECT (WM_USER + 5) #define AX_SETDATAADVISE (WM_USER + 6) #define AX_DOVERB (WM_USER + 7) -#define AX_SETEXTERNALDISP (WM_USER + 8) - // Registration function ATOM AXRegister(); @@ -186,13 +184,9 @@ class AX //AX_CONNECTSTRUCT* tcs; bool AddMenu; DWORD AdviseToken; - DWORD DAdviseToken[100]; - void SetExternalDispatch(IDispatch* externalDisp); - IDispatch* GetExternalDispatch(); - + DWORD DAdviseToken[100]; private: - IDispatch* m_externalDisp; CLSID clsid;