summaryrefslogtreecommitdiff
path: root/extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp
diff options
context:
space:
mode:
authorMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
committerMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
commit2e626373db2412ac22e8c5c27a60d11cd29e875b (patch)
tree9e9f67205cd5b72f1031721273e1534a3a1e5b0f /extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp
parentf7ee7bbd5174b084f018c2ec94d8c70c98ee04da (diff)
replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster
Diffstat (limited to 'extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp')
-rw-r--r--extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp514
1 files changed, 0 insertions, 514 deletions
diff --git a/extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp b/extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp
deleted file mode 100644
index ea21a9695..000000000
--- a/extensions/test/ole/unoTocomCalls/XCallback_Impl/Callback.cpp
+++ /dev/null
@@ -1,514 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * This file is part of OpenOffice.org.
- *
- * OpenOffice.org is free software: you can redistribute it and/or modify
- * it under the terms of the GNU Lesser General Public License version 3
- * only, as published by the Free Software Foundation.
- *
- * OpenOffice.org is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU Lesser General Public License version 3 for more details
- * (a copy is included in the LICENSE file that accompanied this code).
- *
- * You should have received a copy of the GNU Lesser General Public License
- * version 3 along with OpenOffice.org. If not, see
- * <http://www.openoffice.org/license.html>
- * for a copy of the LGPLv3 License.
- *
- ************************************************************************/
-// Callback.cpp : Implementation of CCallback
-#include "stdafx.h"
-#include "XCallback_Impl.h"
-#include "Callback.h"
-
-/////////////////////////////////////////////////////////////////////////////
-// CCallback
-
-
-STDMETHODIMP CCallback::func1()
-{
- MessageBox( NULL, _T("Callback::func1 called"),_T(""), MB_OK);
- return S_OK;
-}
-
-STDMETHODIMP CCallback::returnInterface(IDispatch **ppdisp)
-{
- if( ! ppdisp)
- return E_POINTER;
- CComPtr<IDispatch> spDisp;
- spDisp.CoCreateInstance( L"XCallback_Impl.Simple");
- *ppdisp= spDisp;
- (*ppdisp)->AddRef();
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outInterface(IDispatch **ppdisp)
-{
-// return S_OK;
- if( ! ppdisp)
- return E_POINTER;
- CComPtr<IDispatch> spDisp;
- spDisp.CoCreateInstance( L"XCallback_Impl.Simple");
- *ppdisp= spDisp;
- (*ppdisp)->AddRef();
-
-// MessageBox( NULL, _T("CCallback::outInterface"), _T(""), MB_OK);
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outValuesMixed(long val, long *pval, BSTR string)
-{
- USES_CONVERSION;
- char buff[1024];
- *pval = val+1;
- sprintf( buff, "param1: %d, param2 out: %d, param3: %S", val, *pval, string);
- MessageBox( NULL, A2T(buff), A2T("XCallback_Impl.Callback"), MB_OK);
- return S_OK;
-}
-
-
-STDMETHODIMP CCallback::outValuesAll(
- /* [out] */ IDispatch __RPC_FAR *__RPC_FAR *ppdisp,
- /* [out] */ IDispatch __RPC_FAR *__RPC_FAR *ppSimpleStruct,
- /* [out] */ long __RPC_FAR *aSimpleEnum,
- /* [out] */ SAFEARRAY __RPC_FAR * __RPC_FAR *outSeq,
- /* [out] */ VARIANT __RPC_FAR *varAny,
- /* [out] */ VARIANT_BOOL __RPC_FAR *aBool,
- /* [out] */ short __RPC_FAR *aChar,
- /* [out] */ BSTR __RPC_FAR *aString,
- /* [out] */ float __RPC_FAR *aFloat,
- /* [out] */ double __RPC_FAR *aDouble,
- /* [out] */ unsigned char __RPC_FAR *aByte,
- /* [out] */ short __RPC_FAR *aShort,
- /* [out] */ long __RPC_FAR *aLong)
-//)
-{
-// if( ! ppdisp || ! ppSimpleStruct || ! aSimpleEnum ||
-// ! outSeq || !varAny ||! aBool || ! aChar ||
-// ! aString || ! aFloat || ! aDouble || ! aByte ||
-// ! aShort || ! aLong || ! aUShort || ! aULong)
-// return E_POINTER;
-
- HRESULT hr=S_OK;
- hr= outInterface( ppdisp);
- hr= outStruct( ppSimpleStruct);
- hr= outEnum( aSimpleEnum);
- hr= outSeqAny( outSeq);
- hr= outAny( varAny);
- hr= outBool( aBool);
- hr= outChar( aChar);
- hr= outString( aString);
- hr= outFloat( aFloat);
- hr= outDouble( aDouble);
- hr= outByte( aByte);
- hr= outShort( aShort);
- hr= outLong( aLong);
- return hr;
-}
-
-STDMETHODIMP CCallback::outStruct(IDispatch **outStruct)
-{
-// return S_OK;
- if( !outStruct)
- return E_POINTER;
- HRESULT hr= E_FAIL;
-// MessageBox( NULL, _T("CCallback::outStruct"), _T(""), MB_OK);
-
- CComPtr<IDispatch> _dispMgr;
- if( SUCCEEDED(hr= _dispMgr.CoCreateInstance(L"com.sun.star.ServiceManager")))
- {
- CComDispatchDriver manager( _dispMgr);
- CComVariant param1(L"com.sun.star.reflection.CoreReflection");
- CComVariant varRet;
- hr= manager.Invoke1( L"createInstance", &param1, &varRet);
-
- CComDispatchDriver reflection( varRet.pdispVal);
- param1= L"oletest.SimpleStruct";
- varRet.Clear();
- hr= reflection.Invoke1( L"forName", &param1, &varRet);
-
- CComDispatchDriver classSimpleStruct( varRet.pdispVal);
-
- CComPtr<IDispatch> dispStruct;
- param1.vt= VT_DISPATCH | VT_BYREF;
- param1.ppdispVal= &dispStruct;
- if( SUCCEEDED( hr= classSimpleStruct.Invoke1(L"createObject", &param1)))
- {
- // Set the value
- CComDispatchDriver simpleStruct( dispStruct);
- param1=L" this is a property string";
- hr= simpleStruct.PutPropertyByName(L"message", &param1);
- *outStruct= dispStruct;
- (*outStruct)->AddRef();
- hr= S_OK;
- }
- }
- return hr;
-}
-
-STDMETHODIMP CCallback::outEnum(long *outEnum)
-{
- if( !outEnum)
- return E_POINTER;
- *outEnum= 1;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outSeqAny(LPSAFEARRAY* outSeq)
-{
-// _CrtDbgBreak();
- SAFEARRAY* pArr= SafeArrayCreateVector( VT_VARIANT, 0, 3);
- CComVariant var[3];
- var[0]=L" variant 0";
- var[1]=L" variant 1";
- var[2]=L"variant 2";
- for( long i=0; i<3; i++)
- {
- SafeArrayPutElement( pArr, &i, (void*)&var[i]);
- }
-
- *outSeq= pArr;
- return S_OK;
-}
-
-// ATLASSERT //VT_EMPTY
-
-
-STDMETHODIMP CCallback::outAny(VARIANT *outAny)
-{
- if( ! outAny)
- return E_POINTER;
- outAny->vt= VT_BSTR;
- outAny->bstrVal= SysAllocString( L"This is a string in a VARIANT");
-
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outBool(VARIANT_BOOL *outBool)
-{
- if( ! outBool)
- return E_POINTER;
- *outBool= VARIANT_TRUE;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outChar(short *outChar)
-{
- if( !outChar)
- return E_POINTER;
- *outChar= (short)L'A';
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outString(BSTR *outString)
-{
- if( !outString)
- return E_POINTER;
- *outString= SysAllocString(L"This is a BSTR");
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outFloat(float *outFloat)
-{
- if( !outFloat)
- return E_POINTER;
- *outFloat= 3.14f;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outDouble(double *outDouble)
-{
- if(!outDouble)
- return E_POINTER;
-
- *outDouble= 3.145;
- return S_OK;
-}
-
-
-
-STDMETHODIMP CCallback::outShort(short *outShort)
-{
- if(!outShort)
- return E_POINTER;
- *outShort= -1;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outLong(long *outLong)
-{
- if(!outLong)
- return E_POINTER;
- *outLong= 0xffffffff;
- return S_OK;
-}
-
-
-
-STDMETHODIMP CCallback::outByte(unsigned char* outByte)
-{
- if(!outByte)
- return E_POINTER;
- *outByte= 0xff;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutInterface(IDispatch **ppdisp)
-{
- if( !ppdisp)
- return E_POINTER;
- CComDispatchDriver disp( *ppdisp);
- CComVariant param1(L"");
- disp.Invoke1(L"func", &param1);
-
- (*ppdisp)->Release();
-
- CComPtr<IDispatch> outDisp;
- outDisp.CoCreateInstance( L"XCallback_Impl.Simple");
- *ppdisp= outDisp;
- (*ppdisp)->AddRef();
-
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutStruct(IDispatch **inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- HRESULT hr= S_OK;
- USES_CONVERSION;
- CComVariant var;
- CComDispatchDriver disp( *inoutVal);
-
- hr= disp.GetPropertyByName(L"message", &var);
- MessageBox( NULL, W2T(var.bstrVal), _T("XCallback_Impl.Callback"), MB_OK);
-
- (*inoutVal)->Release();
-
- CComDispatchDriver dispStruct;
- hr= outStruct( &dispStruct.p);
- var.Clear();
- var= L"This struct was created in XCallback_Imp.Callback";
- hr= dispStruct.PutPropertyByName(L"message", &var);
-
- *inoutVal= dispStruct;
- (*inoutVal)->AddRef();
- return hr;
-}
-
-STDMETHODIMP CCallback::inoutEnum(long *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- *inoutVal= *inoutVal+1;
-
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutSeqAny(LPSAFEARRAY *pArray)
-{
- if( !pArray)
- return E_POINTER;
- HRESULT hr= S_OK;
- long lbound=0;
- long ubound=0;
- hr= SafeArrayGetLBound( *pArray, 1, &lbound);
- hr= SafeArrayGetUBound( *pArray, 1, &ubound);
- long count= ubound - lbound + 1;
-
- // the Array is supposet to contain variants
- CComVariant var;
- for( long i=0; i<count; i++)
- {
- var.Clear();
- hr= SafeArrayGetElement( *pArray, &i, (void*)&var);
- }
-
- SafeArrayDestroy( *pArray);
-
- outSeqAny( pArray);
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutAny(VARIANT *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- USES_CONVERSION;
- if( inoutVal->vt= VT_BSTR)
- MessageBox( NULL, W2T( inoutVal->bstrVal), _T("XCallback_Impl.Callback"), MB_OK);
-
- VariantClear( inoutVal);
- inoutVal->vt= VT_BSTR;
- inoutVal->bstrVal=SysAllocString( L" [string] XCallback_Impl.Callback inoutAny");
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutBool(VARIANT_BOOL *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
-
- *inoutVal= *inoutVal == VARIANT_TRUE ? VARIANT_FALSE : VARIANT_TRUE;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutChar(short *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- USES_CONVERSION;
- char buff[256];
- sprintf( buff, "character value: %C", *inoutVal);
- MessageBox( NULL, A2T(buff), _T("XCallback_Impl.Callback"), MB_OK);
- *inoutVal= L'B';
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutString(BSTR *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- USES_CONVERSION;
- MessageBox( NULL, W2T(*inoutVal), _T("XCallback_Impl.Callback"), MB_OK);
- SysFreeString(*inoutVal);
- *inoutVal= SysAllocString(L"a string from XCallback_Impl.Callback");
-
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutFloat(float *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- *inoutVal = *inoutVal+1;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutDouble(double *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- *inoutVal= *inoutVal+1;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutByte(unsigned char *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- *inoutVal= 0xff;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutShort(short *inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- *inoutVal= -1;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutLong(long* inoutVal)
-{
- if( !inoutVal)
- return E_POINTER;
- *inoutVal= 0xffffffff;
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inoutValuesAll(
- /* [out][in] */ IDispatch __RPC_FAR *__RPC_FAR *aXSimple,
- /* [out][in] */ IDispatch __RPC_FAR *__RPC_FAR *aStruct,
- /* [out][in] */ long __RPC_FAR *aEnum,
- /* [out][in] */ SAFEARRAY __RPC_FAR * __RPC_FAR *aSeq,
- /* [out][in] */ VARIANT __RPC_FAR *aAny,
- /* [out][in] */ VARIANT_BOOL __RPC_FAR *aBool,
- /* [out][in] */ short __RPC_FAR *aChar,
- /* [out][in] */ BSTR __RPC_FAR *aString,
- /* [out][in] */ float __RPC_FAR *aFloat,
- /* [out][in] */ double __RPC_FAR *aDouble,
- /* [out][in] */ unsigned char __RPC_FAR *aByte,
- /* [out][in] */ short __RPC_FAR *aShort,
- /* [out][in] */ long __RPC_FAR *aLong)
-{
- inoutInterface( aXSimple);
- inoutStruct( aStruct);
- inoutEnum( aEnum);
- inoutSeqAny( aSeq);
- inoutAny( aAny);
- inoutBool( aBool);
- inoutChar( aChar);
- inoutString( aString);
- inoutFloat( aFloat);
- inoutDouble( aDouble);
- inoutByte( aByte);
- inoutShort( aShort);
- inoutLong( aLong);
-
- return S_OK;
-}
-
-
-STDMETHODIMP CCallback::inValues(short aChar, long aLong, BSTR aString)
-{
- USES_CONVERSION;
- wchar_t _char= (wchar_t) aChar;
- char buff[1024];
- sprintf( buff, "Parameters: char= %C, long= %d, string= %s", _char, aLong, W2A(aString));
- MessageBox( NULL, A2T(buff), _T("XCallback_Impl.Callback"), MB_OK);
- return S_OK;
-}
-
-STDMETHODIMP CCallback::outSeqByte(LPSAFEARRAY * outVal)
-{
- // TODO: Add your implementation code here
-
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inSeqByte( LPSAFEARRAY listeners)
-{
-
- return S_OK;
-}
-
-STDMETHODIMP CCallback::inSeqXEventListener( LPSAFEARRAY listeners, LPSAFEARRAY events)
-{
- HRESULT hr= S_OK;
- long ubound= 0;
- long lbound= 0;
- long count= 0;
- hr= SafeArrayGetUBound( listeners, 1, &ubound);
- hr= SafeArrayGetLBound( listeners, 1, &lbound);
- count= ubound - lbound +1;
-
- // We assume thate the count of EventObjects in events is the same
- for( long i = 0; i < count; i++)
- {
- CComVariant varListener;
- CComVariant varEvent;
- hr= SafeArrayGetElement( listeners, &i, &varListener);
- hr= SafeArrayGetElement( events, &i, &varEvent);
- if( varListener.vt == VT_DISPATCH && varEvent.vt == VT_DISPATCH)
- {
- CComDispatchDriver disp( varListener.pdispVal);
- hr= disp.Invoke1(L"disposing", &varEvent);
- }
-
- }
-
- return S_OK;
-}
-
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */