IDISPIMP.CPP

/* 
 * idispimp.CPP 
 * IDispatch for Extending Dynamic HTML Object Model 
 * 
 * Copyright (c)1995-1997 Microsoft Corporation, All Rights Reserved 
 */ 
 
#include "stdafx.h" 
#include "idispimp.h" 
 
#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 
static char THIS_FILE[] = __FILE__; 
#endif 
 
 
// Hardcoded information for extending the Object Model  
// Typically this would be supplied through a TypeInfo 
// In this case the name "xxyyzz" maps to DISPID_Extend  
constWCHAR pszExtend[10]=L"xxyyzz"; 
#define DISPID_Extend 12345 
 
 
 
/* 
 * CImpIDispatch::CImpIDispatch 
 * CImpIDispatch::~CImpIDispatch 
 * 
 * Parameters (Constructor): 
 *  pSite           PCSite of the site we're in. 
 *  pUnkOuter       LPUNKNOWN to which we delegate. 
 */ 
 
CImpIDispatch::CImpIDispatch( void ) 
{ 
    m_cRef = 0; 
} 
 
CImpIDispatch::~CImpIDispatch( void ) 
{ 
ASSERT( m_cRef == 0 ); 
} 
 
 
/* 
 * CImpIDispatch::QueryInterface 
 * CImpIDispatch::AddRef 
 * CImpIDispatch::Release 
 * 
 * Purpose: 
 *  IUnknown members for CImpIDispatch object. 
 */ 
 
STDMETHODIMP CImpIDispatch::QueryInterface( REFIID riid, void **ppv ) 
{ 
    *ppv = NULL; 
 
 
    if ( IID_IDispatch == riid ) 
{ 
        *ppv = this; 
} 
 
if ( NULL != *ppv ) 
    { 
        ((LPUNKNOWN)*ppv)->AddRef(); 
        return NOERROR; 
    } 
 
return E_NOINTERFACE; 
} 
 
 
STDMETHODIMP_(ULONG) CImpIDispatch::AddRef(void) 
{ 
    return ++m_cRef; 
} 
 
STDMETHODIMP_(ULONG) CImpIDispatch::Release(void) 
{ 
    return --m_cRef; 
} 
 
 
//IDispatch 
STDMETHODIMP CImpIDispatch::GetTypeInfoCount(UINT* /*pctinfo*/) 
{ 
return E_NOTIMPL; 
} 
 
STDMETHODIMP CImpIDispatch::GetTypeInfo(/* [in] */ UINT /*iTInfo*/, 
            /* [in] */ LCID /*lcid*/, 
            /* [out] */ ITypeInfo** /*ppTInfo*/) 
{ 
return E_NOTIMPL; 
} 
 
STDMETHODIMP CImpIDispatch::GetIDsOfNames( 
            /* [in] */ REFIID riid, 
            /* [size_is][in] */ OLECHAR** rgszNames, 
            /* [in] */ UINT cNames, 
            /* [in] */ LCID lcid, 
            /* [size_is][out] */ DISPID* rgDispId) 
{ 
HRESULT hr; 
UINTi; 
 
// Assume some degree of success 
hr = NOERROR; 
 
// Hardcoded mapping for this sample 
// A more usual procedure would be to use a TypeInfo 
for ( i=0; i < cNames; i++) 
{ 
if (  2 == CompareString( lcid, NORM_IGNOREWIDTH, (char*)pszExtend, 3, (char*)rgszNames[i], 3 ) ) 
{ 
rgDispId[i] = DISPID_Extend; 
} 
else 
{ 
// One or more are unknown so set the return code accordingly 
hr = ResultFromScode(DISP_E_UNKNOWNNAME); 
rgDispId[i] = DISPID_UNKNOWN; 
} 
} 
return hr; 
} 
 
STDMETHODIMP CImpIDispatch::Invoke( 
            /* [in] */ DISPID dispIdMember, 
            /* [in] */ REFIID /*riid*/, 
            /* [in] */ LCID /*lcid*/, 
            /* [in] */ WORD wFlags, 
            /* [out][in] */ DISPPARAMS* pDispParams, 
            /* [out] */ VARIANT* pVarResult, 
            /* [out] */ EXCEPINFO* /*pExcepInfo*/, 
            /* [out] */ UINT* puArgErr) 
{ 
 
// For this sample we only support a Property Get on DISPID_Extend 
// returning a BSTR with "Wibble" as the value 
if ( dispIdMember == DISPID_Extend ) 
{ 
if ( wFlags & DISPATCH_PROPERTYGET ) 
{ 
if ( pVarResult != NULL ) 
{ 
WCHAR buff[10]=L"Wibble"; 
BSTR bstrRet = SysAllocString( buff ); 
VariantInit(pVarResult); 
V_VT(pVarResult)=VT_BSTR; 
V_BSTR(pVarResult) = bstrRet; 
} 
} 
} 
 
return S_OK; 
}