This repository has been archived on 2024-12-16. You can view files and clone it, but cannot push or open issues or pull requests.
CodeBlocksPortable/Borland/BCC55/Include/dxatlpb.h

408 lines
11 KiB
C++

#ifndef dxatlpb_h
#pragma option push -b -a8 -pc -A- /*P_O_Push*/
#define dxatlpb_h
#include <atlctl.h>
#ifndef DXTDbg_h
#include <dxtdbg.h>
#endif
#define COM_INTERFACE_ENTRY_DXIMPL(x)\
COM_INTERFACE_ENTRY_IID(IID_##x, x##DXImpl<_ComMapClass>)
/*** IOleObjectDXImpl
* This is a simplified version used to allow a transform
* to be hosted by IE
*/
template <class T>
class ATL_NO_VTABLE IOleObjectDXImpl
{
public:
// IUnknown
//
STDMETHOD(QueryInterface)(REFIID riid, void ** ppvObject) = 0;
STDMETHOD_(ULONG,AddRef)() = 0;
STDMETHOD_(ULONG,Release)() = 0;
// IOleObject
//
STDMETHOD(SetClientSite)(IOleClientSite *pClientSite)
{
DXTDBG_FUNC( "IOleObjectDXImpl::SetClientSite" );
HRESULT hr = S_OK;
if( pClientSite && DXIsBadInterfacePtr( pClientSite ) )
{
hr = E_INVALIDARG;
}
else
{
T* pT = static_cast<T*>(this);
pT->m_cpOleClientSite = pClientSite;
}
return hr;
}
STDMETHOD(GetClientSite)(IOleClientSite **ppClientSite)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetClientSite" );
HRESULT hr = S_OK;
if( DXIsBadWritePtr( ppClientSite, sizeof( *ppClientSite )) )
{
hr = E_POINTER;
}
else
{
T* pT = static_cast<T*>(this);
*ppClientSite = pT->m_cpOleClientSite;
}
return hr;
}
STDMETHOD(SetHostNames)(LPCOLESTR /* szContainerApp */, LPCOLESTR /* szContainerObj */)
{
DXTDBG_FUNC( "IOleObjectDXImpl::SetHostNames" );
return S_OK;
}
STDMETHOD(Close)(DWORD dwSaveOption)
{
DXTDBG_FUNC( "IOleObjectDXImpl::Close" );
return S_OK;
}
STDMETHOD(SetMoniker)(DWORD /* dwWhichMoniker */, IMoniker* /* pmk */)
{
DXTDBG_FUNC( "IOleObjectDXImpl::SetMoniker" );
return E_NOTIMPL;
}
STDMETHOD(GetMoniker)(DWORD /* dwAssign */, DWORD /* dwWhichMoniker */, IMoniker** /* ppmk */)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetMoniker" );
return E_NOTIMPL;
}
STDMETHOD(InitFromData)(IDataObject* /* pDataObject */, BOOL /* fCreation */, DWORD /* dwReserved */)
{
DXTDBG_FUNC( "IOleObjectDXImpl::InitFromData" );
return E_NOTIMPL;
}
STDMETHOD(GetClipboardData)(DWORD /* dwReserved */, IDataObject** /* ppDataObject */)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetClipboardData" );
return E_NOTIMPL;
}
STDMETHOD(DoVerb)(LONG iVerb, LPMSG /* lpmsg */, IOleClientSite* /* pActiveSite */, LONG /* lindex */,
HWND hwndParent, LPCRECT lprcPosRect)
{
DXTDBG_FUNC( "IOleObjectDXImpl::DoVerb" );
return S_OK;
}
STDMETHOD(EnumVerbs)(IEnumOLEVERB **ppEnumOleVerb)
{
DXTDBG_FUNC( "IOleObjectDXImpl::DoVerb" );
return OLEOBJ_E_NOVERBS;
}
STDMETHOD(Update)(void)
{
DXTDBG_FUNC( "IOleObjectDXImpl::Update" );
return S_OK;
}
STDMETHOD(IsUpToDate)(void)
{
DXTDBG_FUNC( "IOleObjectDXImpl::IsUpToDate" );
return S_OK;
}
STDMETHOD(GetUserClassID)(CLSID *pClsid)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetUserClassID" );
_ASSERTE(pClsid);
if( DXIsBadWritePtr( pClsid, sizeof( *pClsid ) ) )
{
return E_POINTER;
}
else
{
*pClsid = T::GetObjectCLSID();
return S_OK;
}
}
STDMETHOD(GetUserType)(DWORD dwFormOfType, LPOLESTR *pszUserType)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetUserType" );
return OLE_S_USEREG;
}
STDMETHOD(SetExtent)(DWORD dwDrawAspect, SIZEL *psizel)
{
DXTDBG_FUNC( "IOleObjectDXImpl::SetExtent" );
return S_OK;
}
STDMETHOD(GetExtent)(DWORD dwDrawAspect, SIZEL *psizel)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetExtent" );
HRESULT hr = S_OK;
if( DXIsBadWritePtr( psizel, sizeof( *psizel ) ) )
{
hr = E_POINTER;
}
else
{
psizel->cx = 0;
psizel->cy = 0;
}
return hr;
}
STDMETHOD(Advise)(IAdviseSink *pAdvSink, DWORD *pdwConnection)
{
DXTDBG_FUNC( "IOleObjectDXImpl::Advise" );
return S_OK;
}
STDMETHOD(Unadvise)(DWORD dwConnection)
{
DXTDBG_FUNC( "IOleObjectDXImpl::Unadvise" );
return S_OK;
}
STDMETHOD(EnumAdvise)(IEnumSTATDATA **ppenumAdvise)
{
DXTDBG_FUNC( "IOleObjectDXImpl::EnumAdvise" );
return E_FAIL;
}
STDMETHOD(GetMiscStatus)(DWORD dwAspect, DWORD *pdwStatus)
{
DXTDBG_FUNC( "IOleObjectDXImpl::GetMiscStatus" );
return OLE_S_USEREG;
}
STDMETHOD(SetColorScheme)(LOGPALETTE* /* pLogpal */)
{
DXTDBG_FUNC( "IOleObjectDXImpl::SetColorScheme" );
return E_NOTIMPL;
}
};
/*** CComPropBase
*
*/
class ATL_NO_VTABLE CComPropBase
{
public:
HRESULT IPersistPropertyBag_Load(LPPROPERTYBAG pPropBag,
LPERRORLOG pErrorLog, ATL_PROPMAP_ENTRY* pMap)
{
USES_CONVERSION;
CComPtr<IDispatch> pDispatch;
const IID* piidOld = NULL;
for(int i = 0; pMap[i].pclsidPropPage != NULL; i++)
{
if (pMap[i].szDesc == NULL)
continue;
CComVariant var;
if(pMap[i].piidDispatch != piidOld)
{
pDispatch.Release();
if(FAILED(PropQueryInterface(*pMap[i].piidDispatch, (void**)&pDispatch)))
{
ATLTRACE(_T("Failed to get a dispatch pointer for property #%i\n"), i);
return E_FAIL;
}
piidOld = pMap[i].piidDispatch;
}
if (FAILED(CComDispatchDriver::GetProperty(pDispatch, pMap[i].dispid, &var)))
{
ATLTRACE(_T("Invoked failed on DISPID %x\n"), pMap[i].dispid);
return E_FAIL;
}
HRESULT hr = pPropBag->Read(pMap[i].szDesc, &var, pErrorLog);
if (FAILED(hr))
{
if (hr == E_INVALIDARG)
{
ATLTRACE(_T("Property %s not in Bag\n"), OLE2CT(pMap[i].szDesc));
}
else
{
// Many containers return different ERROR values for Member not found
ATLTRACE(_T("Error attempting to read Property %s from PropertyBag \n"), OLE2CT(pMap[i].szDesc));
}
continue;
}
if (FAILED(CComDispatchDriver::PutProperty(pDispatch, pMap[i].dispid, &var)))
{
ATLTRACE(_T("Invoked failed on DISPID %x\n"), pMap[i].dispid);
return E_FAIL;
}
}
return S_OK;
}
HRESULT IPersistPropertyBag_Save(LPPROPERTYBAG pPropBag,
BOOL fClearDirty, BOOL /*fSaveAllProperties*/, ATL_PROPMAP_ENTRY* pMap)
{
if (pPropBag == NULL)
{
ATLTRACE(_T("PropBag pointer passed in was invalid\n"));
return E_POINTER;
}
CComPtr<IDispatch> pDispatch;
const IID* piidOld = NULL;
for(int i = 0; pMap[i].pclsidPropPage != NULL; i++)
{
if (pMap[i].szDesc == NULL)
continue;
CComVariant var;
if(pMap[i].piidDispatch != piidOld)
{
pDispatch.Release();
if(FAILED(PropQueryInterface(*pMap[i].piidDispatch, (void**)&pDispatch)))
{
ATLTRACE(_T("Failed to get a dispatch pointer for property #%i\n"), i);
return E_FAIL;
}
piidOld = pMap[i].piidDispatch;
}
if (FAILED(CComDispatchDriver::GetProperty(pDispatch, pMap[i].dispid, &var)))
{
ATLTRACE(_T("Invoked failed on DISPID %x\n"), pMap[i].dispid);
return E_FAIL;
}
if (var.vt == VT_UNKNOWN || var.vt == VT_DISPATCH)
{
if (var.punkVal == NULL)
{
ATLTRACE(_T("Warning skipping empty IUnknown in Save\n"));
continue;
}
}
HRESULT hr = pPropBag->Write(pMap[i].szDesc, &var);
if (FAILED(hr))
return hr;
}
m_bRequiresSave = FALSE;
return S_OK;
}
HRESULT ISpecifyPropertyPages_GetPages(CAUUID* pPages,
ATL_PROPMAP_ENTRY* pMap)
{
_ASSERTE(pMap != NULL);
int nCnt = 0;
// Get count of unique pages
for(int i = 0; pMap[i].pclsidPropPage != NULL; i++)
{
if (!InlineIsEqualGUID(*pMap[i].pclsidPropPage, CLSID_NULL))
nCnt++;
}
pPages->pElems = NULL;
pPages->pElems = (GUID*) CoTaskMemAlloc(sizeof(CLSID)*nCnt);
if (pPages->pElems == NULL)
return E_OUTOFMEMORY;
nCnt = 0;
for(i = 0; pMap[i].pclsidPropPage != NULL; i++)
{
if (!InlineIsEqualGUID(*pMap[i].pclsidPropPage, CLSID_NULL))
{
BOOL bMatch = FALSE;
for (int j=0;j<nCnt;j++)
{
if (InlineIsEqualGUID(*(pMap[i].pclsidPropPage), pPages->pElems[j]))
{
bMatch = TRUE;
break;
}
}
if (!bMatch)
pPages->pElems[nCnt++] = *pMap[i].pclsidPropPage;
}
}
pPages->cElems = nCnt;
return S_OK;
}
virtual HRESULT PropQueryInterface(const IID& iid, void** ppv) = 0;
BOOL m_bRequiresSave;
};
template <class T>
class ATL_NO_VTABLE CComPropertySupport : public CComPropBase
{
public:
virtual HRESULT PropQueryInterface(const IID& iid, void** ppv)
{
T* pT = static_cast<T*>(this);
return pT->_InternalQueryInterface(iid, ppv);
}
};
//////////////////////////////////////////////////////////////////////////////
// IObjectSafety
//
template <class T>
class ATL_NO_VTABLE IObjectSafetyImpl2
{
public:
DWORD m_dwSafety[4];
const IID *m_pIID[4];
IObjectSafetyImpl2()
{
m_pIID[0] = &IID_IDispatch;
m_pIID[1] = &IID_IPersistPropertyBag;
m_pIID[2] = &IID_IPersistStorage;
m_pIID[3] = &IID_IPersistStream;
for (int i = 0; i < 4; i++)
{
m_dwSafety[i] = 0;
}
}
// IUnknown
//
STDMETHOD(QueryInterface)(REFIID riid, void ** ppvObject) = 0;
_ATL_DEBUG_ADDREF_RELEASE_IMPL(IObjectSafetyImpl2)
// IObjectSafety
//
STDMETHOD(GetInterfaceSafetyOptions)(REFIID riid, DWORD *pdwSupportedOptions, DWORD *pdwEnabledOptions)
{
ATLTRACE(_T("IObjectSafetyImpl::GetInterfaceSafetyOptions\n"));
if (pdwSupportedOptions == NULL || pdwEnabledOptions == NULL)
return E_POINTER;
for (int i = 0; i < 4 && m_pIID[i]; i++)
{
if (riid == *m_pIID[i]) {
*pdwSupportedOptions = INTERFACESAFE_FOR_UNTRUSTED_CALLER;
*pdwEnabledOptions = m_dwSafety[i] & INTERFACESAFE_FOR_UNTRUSTED_CALLER;
return S_OK;
}
}
*pdwSupportedOptions = 0;
*pdwEnabledOptions = 0;
return E_NOINTERFACE;
}
STDMETHOD(SetInterfaceSafetyOptions)(REFIID riid, DWORD dwOptionSetMask, DWORD dwEnabledOptions)
{
ATLTRACE(_T("IObjectSafetyImpl::SetInterfaceSafetyOptions\n"));
// If we're being asked to set our safe for scripting option then oblige
for (int i = 0; i < 4 && m_pIID[i]; i++)
{
if (riid == *m_pIID[i]) {
m_dwSafety[i] = dwEnabledOptions & dwOptionSetMask;
return S_OK;
}
}
return E_NOINTERFACE;
}
};
#pragma option pop /*P_O_Pop*/
#endif // This must be the last line in the file