1*b1cdbd2cSJim Jagielski /************************************************************** 2*b1cdbd2cSJim Jagielski * 3*b1cdbd2cSJim Jagielski * Licensed to the Apache Software Foundation (ASF) under one 4*b1cdbd2cSJim Jagielski * or more contributor license agreements. See the NOTICE file 5*b1cdbd2cSJim Jagielski * distributed with this work for additional information 6*b1cdbd2cSJim Jagielski * regarding copyright ownership. The ASF licenses this file 7*b1cdbd2cSJim Jagielski * to you under the Apache License, Version 2.0 (the 8*b1cdbd2cSJim Jagielski * "License"); you may not use this file except in compliance 9*b1cdbd2cSJim Jagielski * with the License. You may obtain a copy of the License at 10*b1cdbd2cSJim Jagielski * 11*b1cdbd2cSJim Jagielski * http://www.apache.org/licenses/LICENSE-2.0 12*b1cdbd2cSJim Jagielski * 13*b1cdbd2cSJim Jagielski * Unless required by applicable law or agreed to in writing, 14*b1cdbd2cSJim Jagielski * software distributed under the License is distributed on an 15*b1cdbd2cSJim Jagielski * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*b1cdbd2cSJim Jagielski * KIND, either express or implied. See the License for the 17*b1cdbd2cSJim Jagielski * specific language governing permissions and limitations 18*b1cdbd2cSJim Jagielski * under the License. 19*b1cdbd2cSJim Jagielski * 20*b1cdbd2cSJim Jagielski *************************************************************/ 21*b1cdbd2cSJim Jagielski 22*b1cdbd2cSJim Jagielski 23*b1cdbd2cSJim Jagielski 24*b1cdbd2cSJim Jagielski #ifndef _UNOOBJW_HXX 25*b1cdbd2cSJim Jagielski #define _UNOOBJW_HXX 26*b1cdbd2cSJim Jagielski 27*b1cdbd2cSJim Jagielski #include <com/sun/star/bridge/XBridgeSupplier2.hpp> 28*b1cdbd2cSJim Jagielski #include <com/sun/star/beans/XExactName.hpp> 29*b1cdbd2cSJim Jagielski #include <com/sun/star/lang/XInitialization.hpp> 30*b1cdbd2cSJim Jagielski #include <com/sun/star/script/InvocationInfo.hpp> 31*b1cdbd2cSJim Jagielski #include <vos/refernce.hxx> 32*b1cdbd2cSJim Jagielski 33*b1cdbd2cSJim Jagielski #include <tools/presys.h> 34*b1cdbd2cSJim Jagielski #include "comifaces.hxx" 35*b1cdbd2cSJim Jagielski #include <tools/postsys.h> 36*b1cdbd2cSJim Jagielski 37*b1cdbd2cSJim Jagielski #include "ole2uno.hxx" 38*b1cdbd2cSJim Jagielski #include "unoconversionutilities.hxx" 39*b1cdbd2cSJim Jagielski 40*b1cdbd2cSJim Jagielski //#define INVOCATION_SERVICE L"com.sun.star.script.Invocation" 41*b1cdbd2cSJim Jagielski #define JSCRIPT_VALUE_FUNC L"_GetValueObject" 42*b1cdbd2cSJim Jagielski #define GET_STRUCT_FUNC L"_GetStruct" 43*b1cdbd2cSJim Jagielski #define BRIDGE_VALUE_FUNC L"Bridge_GetValueObject" 44*b1cdbd2cSJim Jagielski #define BRIDGE_GET_STRUCT_FUNC L"Bridge_GetStruct" 45*b1cdbd2cSJim Jagielski #define BRIDGE_CREATE_TYPE_FUNC L"Bridge_CreateType" 46*b1cdbd2cSJim Jagielski 47*b1cdbd2cSJim Jagielski #define DISPID_JSCRIPT_VALUE_FUNC -10l 48*b1cdbd2cSJim Jagielski #define DISPID_GET_STRUCT_FUNC -102 49*b1cdbd2cSJim Jagielski #define DISPID_CREATE_TYPE_FUNC -103 50*b1cdbd2cSJim Jagielski 51*b1cdbd2cSJim Jagielski using namespace std; 52*b1cdbd2cSJim Jagielski using namespace cppu; 53*b1cdbd2cSJim Jagielski using namespace com::sun::star::bridge; 54*b1cdbd2cSJim Jagielski using namespace com::sun::star::script; 55*b1cdbd2cSJim Jagielski namespace ole_adapter 56*b1cdbd2cSJim Jagielski { 57*b1cdbd2cSJim Jagielski 58*b1cdbd2cSJim Jagielski 59*b1cdbd2cSJim Jagielski 60*b1cdbd2cSJim Jagielski struct hash_IUnknown_Impl 61*b1cdbd2cSJim Jagielski { operator ()ole_adapter::hash_IUnknown_Impl62*b1cdbd2cSJim Jagielski size_t operator()(const IUnknown* p) const 63*b1cdbd2cSJim Jagielski { 64*b1cdbd2cSJim Jagielski return (size_t)p; 65*b1cdbd2cSJim Jagielski } 66*b1cdbd2cSJim Jagielski }; 67*b1cdbd2cSJim Jagielski 68*b1cdbd2cSJim Jagielski struct equal_to_IUnknown_Impl 69*b1cdbd2cSJim Jagielski { operator ()ole_adapter::equal_to_IUnknown_Impl70*b1cdbd2cSJim Jagielski bool operator()(const IUnknown* s1, const IUnknown* s2) const 71*b1cdbd2cSJim Jagielski { 72*b1cdbd2cSJim Jagielski return s1 == s2; 73*b1cdbd2cSJim Jagielski } 74*b1cdbd2cSJim Jagielski }; 75*b1cdbd2cSJim Jagielski 76*b1cdbd2cSJim Jagielski 77*b1cdbd2cSJim Jagielski 78*b1cdbd2cSJim Jagielski struct MemberInfo 79*b1cdbd2cSJim Jagielski { MemberInfoole_adapter::MemberInfo80*b1cdbd2cSJim Jagielski MemberInfo() : flags(0), name() {} MemberInfoole_adapter::MemberInfo81*b1cdbd2cSJim Jagielski MemberInfo(WORD f, const OUString& n) : flags(f), name(n) {} 82*b1cdbd2cSJim Jagielski 83*b1cdbd2cSJim Jagielski WORD flags; 84*b1cdbd2cSJim Jagielski OUString name; 85*b1cdbd2cSJim Jagielski }; 86*b1cdbd2cSJim Jagielski 87*b1cdbd2cSJim Jagielski typedef hash_map 88*b1cdbd2cSJim Jagielski < 89*b1cdbd2cSJim Jagielski OUString, 90*b1cdbd2cSJim Jagielski DISPID, 91*b1cdbd2cSJim Jagielski hashOUString_Impl, 92*b1cdbd2cSJim Jagielski equalOUString_Impl 93*b1cdbd2cSJim Jagielski > NameToIdMap; 94*b1cdbd2cSJim Jagielski 95*b1cdbd2cSJim Jagielski typedef hash_map 96*b1cdbd2cSJim Jagielski < 97*b1cdbd2cSJim Jagielski OUString, 98*b1cdbd2cSJim Jagielski sal_Bool, 99*b1cdbd2cSJim Jagielski hashOUString_Impl, 100*b1cdbd2cSJim Jagielski equalOUString_Impl 101*b1cdbd2cSJim Jagielski > BadNameMap; 102*b1cdbd2cSJim Jagielski 103*b1cdbd2cSJim Jagielski typedef hash_map 104*b1cdbd2cSJim Jagielski < 105*b1cdbd2cSJim Jagielski DISPID, 106*b1cdbd2cSJim Jagielski MemberInfo 107*b1cdbd2cSJim Jagielski > IdToMemberInfoMap; 108*b1cdbd2cSJim Jagielski 109*b1cdbd2cSJim Jagielski /***************************************************************************** 110*b1cdbd2cSJim Jagielski 111*b1cdbd2cSJim Jagielski class declaration: InterfaceOleWrapper_Impl 112*b1cdbd2cSJim Jagielski 113*b1cdbd2cSJim Jagielski *****************************************************************************/ 114*b1cdbd2cSJim Jagielski 115*b1cdbd2cSJim Jagielski class InterfaceOleWrapper_Impl : public WeakImplHelper2<XBridgeSupplier2, XInitialization>, 116*b1cdbd2cSJim Jagielski public IDispatchEx, 117*b1cdbd2cSJim Jagielski public UnoConversionUtilities<InterfaceOleWrapper_Impl>, 118*b1cdbd2cSJim Jagielski public IUnoObjectWrapper 119*b1cdbd2cSJim Jagielski { 120*b1cdbd2cSJim Jagielski public: 121*b1cdbd2cSJim Jagielski 122*b1cdbd2cSJim Jagielski 123*b1cdbd2cSJim Jagielski InterfaceOleWrapper_Impl(Reference<XMultiServiceFactory>& xFactory, sal_uInt8 unoWrapperClass, sal_uInt8 comWrapperClass); 124*b1cdbd2cSJim Jagielski ~InterfaceOleWrapper_Impl(); 125*b1cdbd2cSJim Jagielski 126*b1cdbd2cSJim Jagielski /* IUnknown methods */ 127*b1cdbd2cSJim Jagielski STDMETHOD(QueryInterface)(REFIID riid, LPVOID FAR * ppvObj); 128*b1cdbd2cSJim Jagielski STDMETHOD_(ULONG, AddRef)(); 129*b1cdbd2cSJim Jagielski STDMETHOD_(ULONG, Release)(); 130*b1cdbd2cSJim Jagielski 131*b1cdbd2cSJim Jagielski /* IDispatch methods */ 132*b1cdbd2cSJim Jagielski STDMETHOD( GetTypeInfoCount )( unsigned int * pctinfo ); 133*b1cdbd2cSJim Jagielski STDMETHOD( GetTypeInfo )( unsigned int itinfo, LCID lcid, ITypeInfo ** pptinfo ); 134*b1cdbd2cSJim Jagielski STDMETHOD( GetIDsOfNames )( REFIID riid, OLECHAR ** rgszNames, unsigned int cNames, 135*b1cdbd2cSJim Jagielski LCID lcid, DISPID * rgdispid ); 136*b1cdbd2cSJim Jagielski STDMETHOD( Invoke )( DISPID dispidMember, REFIID riid, LCID lcid, unsigned short wFlags, 137*b1cdbd2cSJim Jagielski DISPPARAMS * pdispparams, VARIANT * pvarResult, EXCEPINFO * pexcepinfo, 138*b1cdbd2cSJim Jagielski unsigned int * puArgErr ); 139*b1cdbd2cSJim Jagielski 140*b1cdbd2cSJim Jagielski /* IDispatchEx methods */ 141*b1cdbd2cSJim Jagielski 142*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE GetDispID( 143*b1cdbd2cSJim Jagielski /* [in] */ BSTR bstrName, 144*b1cdbd2cSJim Jagielski /* [in] */ DWORD grfdex, 145*b1cdbd2cSJim Jagielski /* [out] */ DISPID __RPC_FAR *pid); 146*b1cdbd2cSJim Jagielski 147*b1cdbd2cSJim Jagielski virtual /* [local] */ HRESULT STDMETHODCALLTYPE InvokeEx( 148*b1cdbd2cSJim Jagielski /* [in] */ DISPID id, 149*b1cdbd2cSJim Jagielski /* [in] */ LCID lcid, 150*b1cdbd2cSJim Jagielski /* [in] */ WORD wFlags, 151*b1cdbd2cSJim Jagielski /* [in] */ DISPPARAMS __RPC_FAR *pdp, 152*b1cdbd2cSJim Jagielski /* [out] */ VARIANT __RPC_FAR *pvarRes, 153*b1cdbd2cSJim Jagielski /* [out] */ EXCEPINFO __RPC_FAR *pei, 154*b1cdbd2cSJim Jagielski /* [unique][in] */ IServiceProvider __RPC_FAR *pspCaller); 155*b1cdbd2cSJim Jagielski 156*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE DeleteMemberByName( 157*b1cdbd2cSJim Jagielski /* [in] */ BSTR bstr, 158*b1cdbd2cSJim Jagielski /* [in] */ DWORD grfdex); 159*b1cdbd2cSJim Jagielski 160*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE DeleteMemberByDispID( 161*b1cdbd2cSJim Jagielski /* [in] */ DISPID id); 162*b1cdbd2cSJim Jagielski 163*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE GetMemberProperties( 164*b1cdbd2cSJim Jagielski /* [in] */ DISPID id, 165*b1cdbd2cSJim Jagielski /* [in] */ DWORD grfdexFetch, 166*b1cdbd2cSJim Jagielski /* [out] */ DWORD __RPC_FAR *pgrfdex); 167*b1cdbd2cSJim Jagielski 168*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE GetMemberName( 169*b1cdbd2cSJim Jagielski /* [in] */ DISPID id, 170*b1cdbd2cSJim Jagielski /* [out] */ BSTR __RPC_FAR *pbstrName); 171*b1cdbd2cSJim Jagielski 172*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE GetNextDispID( 173*b1cdbd2cSJim Jagielski /* [in] */ DWORD grfdex, 174*b1cdbd2cSJim Jagielski /* [in] */ DISPID id, 175*b1cdbd2cSJim Jagielski /* [out] */ DISPID __RPC_FAR *pid); 176*b1cdbd2cSJim Jagielski 177*b1cdbd2cSJim Jagielski virtual HRESULT STDMETHODCALLTYPE GetNameSpaceParent( 178*b1cdbd2cSJim Jagielski /* [out] */ IUnknown __RPC_FAR *__RPC_FAR *ppunk); 179*b1cdbd2cSJim Jagielski 180*b1cdbd2cSJim Jagielski // XBridgeSupplier2 --------------------------------------------------- 181*b1cdbd2cSJim Jagielski virtual Any SAL_CALL createBridge(const Any& modelDepObject, 182*b1cdbd2cSJim Jagielski const Sequence<sal_Int8>& ProcessId, 183*b1cdbd2cSJim Jagielski sal_Int16 sourceModelType, 184*b1cdbd2cSJim Jagielski sal_Int16 destModelType) 185*b1cdbd2cSJim Jagielski throw (IllegalArgumentException, RuntimeException); 186*b1cdbd2cSJim Jagielski 187*b1cdbd2cSJim Jagielski //XInitialization ----------------------------------------------------- 188*b1cdbd2cSJim Jagielski virtual void SAL_CALL initialize( const Sequence< Any >& aArguments ) throw(Exception, RuntimeException); 189*b1cdbd2cSJim Jagielski 190*b1cdbd2cSJim Jagielski // IUnoObjectWrapper 191*b1cdbd2cSJim Jagielski STDMETHOD( getWrapperXInterface)( Reference<XInterface>* pXInt); 192*b1cdbd2cSJim Jagielski STDMETHOD( getOriginalUnoObject)( Reference<XInterface>* pXInt); 193*b1cdbd2cSJim Jagielski STDMETHOD( getOriginalUnoStruct)( Any * pStruct); 194*b1cdbd2cSJim Jagielski 195*b1cdbd2cSJim Jagielski // UnoConversionUtility 196*b1cdbd2cSJim Jagielski virtual Reference< XInterface > createUnoWrapperInstance(); 197*b1cdbd2cSJim Jagielski virtual Reference< XInterface > createComWrapperInstance(); 198*b1cdbd2cSJim Jagielski 199*b1cdbd2cSJim Jagielski 200*b1cdbd2cSJim Jagielski protected: 201*b1cdbd2cSJim Jagielski virtual HRESULT doInvoke( DISPPARAMS * pdispparams, VARIANT * pvarResult, 202*b1cdbd2cSJim Jagielski EXCEPINFO * pexcepinfo, unsigned int * puArgErr, OUString & name, Sequence<Any>& params); 203*b1cdbd2cSJim Jagielski 204*b1cdbd2cSJim Jagielski virtual HRESULT doGetProperty( DISPPARAMS * pdispparams, VARIANT * pvarResult, 205*b1cdbd2cSJim Jagielski EXCEPINFO * pexcepinfo, OUString & name ); 206*b1cdbd2cSJim Jagielski 207*b1cdbd2cSJim Jagielski virtual HRESULT doSetProperty( DISPPARAMS * pdispparams, VARIANT * pvarResult, 208*b1cdbd2cSJim Jagielski EXCEPINFO * pexcepinfo, unsigned int * puArgErr, OUString & name, Sequence<Any> params); 209*b1cdbd2cSJim Jagielski 210*b1cdbd2cSJim Jagielski virtual HRESULT InvokeGeneral( DISPID dispidMember, unsigned short wFlags, 211*b1cdbd2cSJim Jagielski DISPPARAMS * pdispparams, VARIANT * pvarResult, EXCEPINFO * pexcepinfo, 212*b1cdbd2cSJim Jagielski unsigned int * puArgErr, sal_Bool& bHandled); 213*b1cdbd2cSJim Jagielski 214*b1cdbd2cSJim Jagielski void convertDispparamsArgs( DISPID id, unsigned short wFlags, DISPPARAMS* pdispparams, 215*b1cdbd2cSJim Jagielski Sequence<Any>& rSeq); 216*b1cdbd2cSJim Jagielski 217*b1cdbd2cSJim Jagielski sal_Bool getInvocationInfoForCall(DISPID id, InvocationInfo& info); 218*b1cdbd2cSJim Jagielski 219*b1cdbd2cSJim Jagielski // vos::ORefCount m_refCount; 220*b1cdbd2cSJim Jagielski Reference<XInvocation> m_xInvocation; 221*b1cdbd2cSJim Jagielski Reference<XExactName> m_xExactName; 222*b1cdbd2cSJim Jagielski Reference<XInterface> m_xOrigin; 223*b1cdbd2cSJim Jagielski NameToIdMap m_nameToDispIdMap; 224*b1cdbd2cSJim Jagielski vector<MemberInfo> m_MemberInfos; 225*b1cdbd2cSJim Jagielski // This member is used to determine the default value 226*b1cdbd2cSJim Jagielski // denoted by DISPID_VALUE (0). For proper results in JavaScript 227*b1cdbd2cSJim Jagielski // we have to return the default value when we write an object 228*b1cdbd2cSJim Jagielski // as out parameter. That is, we get an JScript Array as parameter 229*b1cdbd2cSJim Jagielski // and put a wrapped object on index null. The array object tries 230*b1cdbd2cSJim Jagielski // to detect the default value. The wrapped object must then return 231*b1cdbd2cSJim Jagielski // its own IDispatch* otherwise we cannot access it within the script. 232*b1cdbd2cSJim Jagielski // see InterfaceOleWrapper_Impl::Invoke 233*b1cdbd2cSJim Jagielski VARTYPE m_defaultValueType; 234*b1cdbd2cSJim Jagielski 235*b1cdbd2cSJim Jagielski }; 236*b1cdbd2cSJim Jagielski 237*b1cdbd2cSJim Jagielski /***************************************************************************** 238*b1cdbd2cSJim Jagielski 239*b1cdbd2cSJim Jagielski class declaration: UnoObjectWrapperRemoteOpt 240*b1cdbd2cSJim Jagielski ( Uno Object Wrapper Remote Optimized) 241*b1cdbd2cSJim Jagielski This is the UNO wrapper used in the service com.sun.star.bridge.OleBridgeSupplierVar1. 242*b1cdbd2cSJim Jagielski Key features: 243*b1cdbd2cSJim Jagielski DISPIDs are passed out blindly. That is in GetIDsOfNames is no name checking carried out. 244*b1cdbd2cSJim Jagielski Only if Invoke fails the name is being checked. Moreover Invoke tries to figure out 245*b1cdbd2cSJim Jagielski if a call is made to a property or method if the flags are DISPATCH_METHOD | DISPATCH_PROPERTYPUT. 246*b1cdbd2cSJim Jagielski If something has been found out about a property or member than it is saved 247*b1cdbd2cSJim Jagielski in a MemberInfo structure hold by a IdToMemberInfoMap stl map. 248*b1cdbd2cSJim Jagielski 249*b1cdbd2cSJim Jagielski *****************************************************************************/ 250*b1cdbd2cSJim Jagielski class UnoObjectWrapperRemoteOpt: public InterfaceOleWrapper_Impl 251*b1cdbd2cSJim Jagielski { 252*b1cdbd2cSJim Jagielski public: 253*b1cdbd2cSJim Jagielski UnoObjectWrapperRemoteOpt( Reference<XMultiServiceFactory>& aFactory, sal_uInt8 unoWrapperClass, sal_uInt8 comWrapperClass); 254*b1cdbd2cSJim Jagielski ~UnoObjectWrapperRemoteOpt(); 255*b1cdbd2cSJim Jagielski 256*b1cdbd2cSJim Jagielski STDMETHOD( GetIDsOfNames )( REFIID riid, OLECHAR ** rgszNames, unsigned int cNames, 257*b1cdbd2cSJim Jagielski LCID lcid, DISPID * rgdispid ); 258*b1cdbd2cSJim Jagielski STDMETHOD( Invoke )( DISPID dispidMember, REFIID riid, LCID lcid, unsigned short wFlags, 259*b1cdbd2cSJim Jagielski DISPPARAMS * pdispparams, VARIANT * pvarResult, EXCEPINFO * pexcepinfo, 260*b1cdbd2cSJim Jagielski unsigned int * puArgErr ); 261*b1cdbd2cSJim Jagielski 262*b1cdbd2cSJim Jagielski // UnoConversionUtility 263*b1cdbd2cSJim Jagielski // If UNO interfaces are converted in methods of this class then 264*b1cdbd2cSJim Jagielski // they are always wrapped with instances of this class 265*b1cdbd2cSJim Jagielski virtual Reference< XInterface > createUnoWrapperInstance(); 266*b1cdbd2cSJim Jagielski 267*b1cdbd2cSJim Jagielski protected: 268*b1cdbd2cSJim Jagielski 269*b1cdbd2cSJim Jagielski HRESULT methodInvoke( DISPID dispidMember, DISPPARAMS * pdispparams, VARIANT * pvarResult, 270*b1cdbd2cSJim Jagielski EXCEPINFO * pexcepinfo, unsigned int * puArgErr, Sequence<Any> params); 271*b1cdbd2cSJim Jagielski // In GetIDsOfNames are blindly passed out, that is without verifying 272*b1cdbd2cSJim Jagielski // the name. If two names are passed in during different calls to 273*b1cdbd2cSJim Jagielski // GetIDsOfNames and the names differ only in their cases then different 274*b1cdbd2cSJim Jagielski // id's are passed out ( e.g. "doSomethingMethod" or "dosomethingmethod"). 275*b1cdbd2cSJim Jagielski // In Invoke the DISPID is remapped to the name passed to GetIDsOfNames 276*b1cdbd2cSJim Jagielski // and the name is used as parameter for XInvocation::invoke. If invoke 277*b1cdbd2cSJim Jagielski // fails because of a wrong name, then m_xExactName ( XExactName) is used 278*b1cdbd2cSJim Jagielski // to verify the name. The correct name is then inserted to m_MemberInfos 279*b1cdbd2cSJim Jagielski // ( vector<MemberInfo> ). During the next call to Invoke the right name 280*b1cdbd2cSJim Jagielski // is used. . 281*b1cdbd2cSJim Jagielski 282*b1cdbd2cSJim Jagielski 283*b1cdbd2cSJim Jagielski BadNameMap m_badNameMap; 284*b1cdbd2cSJim Jagielski 285*b1cdbd2cSJim Jagielski IdToMemberInfoMap m_idToMemberInfoMap; 286*b1cdbd2cSJim Jagielski 287*b1cdbd2cSJim Jagielski DISPID m_currentId; 288*b1cdbd2cSJim Jagielski 289*b1cdbd2cSJim Jagielski 290*b1cdbd2cSJim Jagielski }; 291*b1cdbd2cSJim Jagielski 292*b1cdbd2cSJim Jagielski 293*b1cdbd2cSJim Jagielski 294*b1cdbd2cSJim Jagielski } // end namespace 295*b1cdbd2cSJim Jagielski 296*b1cdbd2cSJim Jagielski #endif 297