/************************************************************************* * * $RCSfile: ole2uno.hxx,v $ * * $Revision: 1.4 $ * * last change: $Author: jl $ $Date: 2002-06-05 13:21:38 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses * * - GNU Lesser General Public License Version 2.1 * - Sun Industry Standards Source License Version 1.1 * * Sun Microsystems Inc., October, 2000 * * GNU Lesser General Public License Version 2.1 * ============================================= * Copyright 2000 by Sun Microsystems, Inc. * 901 San Antonio Road, Palo Alto, CA 94303, USA * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License version 2.1, as published by the Free Software Foundation. * * This library 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 for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, * MA 02111-1307 USA * * * Sun Industry Standards Source License Version 1.1 * ================================================= * The contents of this file are subject to the Sun Industry Standards * Source License Version 1.1 (the "License"); You may not use this file * except in compliance with the License. You may obtain a copy of the * License at http://www.openoffice.org/license.html. * * Software provided under this License is provided on an "AS IS" basis, * WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, * WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS, * MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING. * See the License for the specific provisions governing your rights and * obligations concerning the Software. * * The Initial Developer of the Original Code is: Sun Microsystems, Inc. * * Copyright: 2000 by Sun Microsystems, Inc. * * All Rights Reserved. * * Contributor(s): _______________________________________ * * ************************************************************************/ #ifndef _OLE2UNO_HXX #define _OLE2UNO_HXX #if _MSC_VER > 1000 #pragma once #endif // _MSC_VER > 1000 #define STRICT #ifndef _WIN32_WINNT #define _WIN32_WINNT 0x0400 #endif #define _WIN32_DCOM #ifdef _DEBUG //#define _ATL_DEBUG_INTERFACES #endif #include #include #if _MSC_VER >= 1200 #include #endif #include #include #include #include #include #ifndef _COM_SUN_STAR_LANG_XMULTISERVICEFACTORY_HPP_ #include #endif #ifndef _COM_SUN_STAR_LANG_XSINGLESERVICEFACTORY_HPP_ #include #endif #ifndef _COM_SUN_STAR_SCRIPT_XINVOCATION_HPP_ #include #endif #ifndef _COM_SUN_STAR_REGISTRY_XREGISTRYKEY_HPP_ #include #endif #ifndef _COM_SUN_STAR_BRIDGE_XBRIDGESUPPLIER2_HPP_ #include #endif #ifndef _COM_SUN_STAR_BRIDGE_MODELDEPENDENT_HPP_ #include #endif #ifndef _COM_SUN_STAR_REFLECTION_INVOCATIONTARGETEXCEPTION_HPP_ #include #endif #ifndef _COM_SUN_STAR_UNO_EXCEPTION_HPP_ #include #endif #ifndef _COM_SUN_STAR_BEANS_UNKNOWNPROPERTYEXCEPTION_HPP_ #include #endif #ifndef _CPPUHELPER_IMPLBASE2_HXX_ #include #endif #ifndef _CPPUHELPER_IMPLBASE1_HXX_ #include #endif #ifndef _CPPUHELPER_TYPEPROVIDER_HXX_ #include #endif #ifndef _CPPUHELPER_FACTORY_HXX_ #include #endif #ifndef _SAL_TYPES_H_ #include #endif #ifndef _TYPELIB_TYPECLASS_H_ #include #endif #ifndef _OSL_DIAGNOSE_H_ #include #endif #ifndef _OSL_MUTEX_HXX_ #include #endif #ifndef _COM_SUN_STAR_UNO_REFERENCE_H_ #include #endif #ifndef _RTL_PROCESS_H_ #include #endif #ifndef _RTL_UUID_H_ #include #endif #define UNO_2_OLE_EXCEPTIONCODE 1001 #define OUSTR(x) ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM(x) ) using namespace com::sun::star::uno; using namespace com::sun::star::lang; using namespace com::sun::star::script; using namespace com::sun::star::registry; using namespace com::sun::star::reflection; using namespace com::sun::star::beans; using namespace osl; using namespace rtl; using namespace std; namespace ole_adapter { Reference o2u_getRegistryKey(); const VARTYPE getVarType( const Any& val); Type getType( BSTR type); Uik o2u_uikFromGUID(GUID* pGuid); void o2u_attachCurrentThread(); struct equalOUString_Impl { bool operator()(const OUString & s1, const OUString & s2) const { return s1 == s2; } }; struct hashOUString_Impl { size_t operator()(const OUString & rName) const { return rName.hashCode(); } }; // ask the object for XBridgeSupplier2 and on success bridges // the uno object to IDispatch. template < class T > sal_Bool convertSelfToIDispatch( T& unoInterface, IDispatch** ppDisp) { OSL_ASSERT( ppDisp); *ppDisp= NULL; Reference< XInterface > xInt( unoInterface, UNO_QUERY); if( xInt.is()) { Reference< XBridgeSupplier2 > xSupplier( xInt, UNO_QUERY); if( xSupplier.is()) { sal_Int8 arId[16]; rtl_getGlobalProcessId( (sal_uInt8*)arId); Sequence seqId( arId, 16); Any anySource; anySource <<= xInt; Any anyDisp= xSupplier->createBridge( anySource, seqId, UNO, OLE); if( anyDisp.getValueTypeClass() == TypeClass_UNSIGNED_LONG) { VARIANT* pvar= *(VARIANT**)anyDisp.getValue(); if( pvar->vt == VT_DISPATCH) { *ppDisp= pvar->pdispVal; (*ppDisp)->AddRef(); } VariantClear( pvar); CoTaskMemFree( pvar); } } } return *ppDisp ? sal_True : sal_False; } Mutex* getBridgeMutex(); inline sal_Bool operator == (const Uik & uik1, const Uik & uik2) { if( ! memcmp( &uik1, &uik2, sizeof( Uik))) return sal_True; else return sal_False; } } // end namespace #endif _OLE2UNO_HXX