1*cdf0e10cSrcweir /************************************************************************* 2*cdf0e10cSrcweir * 3*cdf0e10cSrcweir * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4*cdf0e10cSrcweir * 5*cdf0e10cSrcweir * Copyright 2000, 2010 Oracle and/or its affiliates. 6*cdf0e10cSrcweir * 7*cdf0e10cSrcweir * OpenOffice.org - a multi-platform office productivity suite 8*cdf0e10cSrcweir * 9*cdf0e10cSrcweir * This file is part of OpenOffice.org. 10*cdf0e10cSrcweir * 11*cdf0e10cSrcweir * OpenOffice.org is free software: you can redistribute it and/or modify 12*cdf0e10cSrcweir * it under the terms of the GNU Lesser General Public License version 3 13*cdf0e10cSrcweir * only, as published by the Free Software Foundation. 14*cdf0e10cSrcweir * 15*cdf0e10cSrcweir * OpenOffice.org is distributed in the hope that it will be useful, 16*cdf0e10cSrcweir * but WITHOUT ANY WARRANTY; without even the implied warranty of 17*cdf0e10cSrcweir * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18*cdf0e10cSrcweir * GNU Lesser General Public License version 3 for more details 19*cdf0e10cSrcweir * (a copy is included in the LICENSE file that accompanied this code). 20*cdf0e10cSrcweir * 21*cdf0e10cSrcweir * You should have received a copy of the GNU Lesser General Public License 22*cdf0e10cSrcweir * version 3 along with OpenOffice.org. If not, see 23*cdf0e10cSrcweir * <http://www.openoffice.org/license.html> 24*cdf0e10cSrcweir * for a copy of the LGPLv3 License. 25*cdf0e10cSrcweir * 26*cdf0e10cSrcweir ************************************************************************/ 27*cdf0e10cSrcweir 28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove 29*cdf0e10cSrcweir #include "precompiled_scripting.hxx" 30*cdf0e10cSrcweir #include <cppuhelper/implementationentry.hxx> 31*cdf0e10cSrcweir #include <cppuhelper/factory.hxx> 32*cdf0e10cSrcweir #include <cppuhelper/implbase1.hxx> 33*cdf0e10cSrcweir #include <cppuhelper/exc_hlp.hxx> 34*cdf0e10cSrcweir #include <util/scriptingconstants.hxx> 35*cdf0e10cSrcweir #include <util/util.hxx> 36*cdf0e10cSrcweir #include <util/MiscUtils.hxx> 37*cdf0e10cSrcweir 38*cdf0e10cSrcweir #include <com/sun/star/beans/XPropertySet.hpp> 39*cdf0e10cSrcweir #include <com/sun/star/util/XMacroExpander.hpp> 40*cdf0e10cSrcweir #include <com/sun/star/lang/WrappedTargetRuntimeException.hpp> 41*cdf0e10cSrcweir 42*cdf0e10cSrcweir #include <com/sun/star/script/browse/BrowseNodeTypes.hpp> 43*cdf0e10cSrcweir 44*cdf0e10cSrcweir #include "MasterScriptProvider.hxx" 45*cdf0e10cSrcweir #include "ActiveMSPList.hxx" 46*cdf0e10cSrcweir 47*cdf0e10cSrcweir #include <tools/diagnose_ex.h> 48*cdf0e10cSrcweir 49*cdf0e10cSrcweir using namespace com::sun::star; 50*cdf0e10cSrcweir using namespace com::sun::star::uno; 51*cdf0e10cSrcweir using namespace com::sun::star::script; 52*cdf0e10cSrcweir using namespace ::sf_misc; 53*cdf0e10cSrcweir 54*cdf0e10cSrcweir namespace func_provider 55*cdf0e10cSrcweir { 56*cdf0e10cSrcweir 57*cdf0e10cSrcweir ActiveMSPList::ActiveMSPList( const Reference< XComponentContext > & xContext ) : m_xContext( xContext ) 58*cdf0e10cSrcweir { 59*cdf0e10cSrcweir userDirString = ::rtl::OUString::createFromAscii("user"); 60*cdf0e10cSrcweir shareDirString = ::rtl::OUString::createFromAscii("share"); 61*cdf0e10cSrcweir bundledDirString = ::rtl::OUString::createFromAscii("bundled"); 62*cdf0e10cSrcweir } 63*cdf0e10cSrcweir 64*cdf0e10cSrcweir ActiveMSPList::~ActiveMSPList() 65*cdf0e10cSrcweir { 66*cdf0e10cSrcweir } 67*cdf0e10cSrcweir 68*cdf0e10cSrcweir Reference< provider::XScriptProvider > 69*cdf0e10cSrcweir ActiveMSPList::createNewMSP( const uno::Any& context ) 70*cdf0e10cSrcweir { 71*cdf0e10cSrcweir ::rtl::OUString serviceName = ::rtl::OUString::createFromAscii("com.sun.star.script.provider.MasterScriptProvider"); 72*cdf0e10cSrcweir Sequence< Any > args( &context, 1 ); 73*cdf0e10cSrcweir 74*cdf0e10cSrcweir Reference< provider::XScriptProvider > msp( 75*cdf0e10cSrcweir m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( 76*cdf0e10cSrcweir serviceName, args, m_xContext ), UNO_QUERY ); 77*cdf0e10cSrcweir return msp; 78*cdf0e10cSrcweir } 79*cdf0e10cSrcweir 80*cdf0e10cSrcweir Reference< provider::XScriptProvider > 81*cdf0e10cSrcweir ActiveMSPList::getMSPFromAnyContext( const Any& aContext ) 82*cdf0e10cSrcweir SAL_THROW(( lang::IllegalArgumentException, RuntimeException )) 83*cdf0e10cSrcweir { 84*cdf0e10cSrcweir Reference< provider::XScriptProvider > msp; 85*cdf0e10cSrcweir ::rtl::OUString sContext; 86*cdf0e10cSrcweir if ( aContext >>= sContext ) 87*cdf0e10cSrcweir { 88*cdf0e10cSrcweir msp = getMSPFromStringContext( sContext ); 89*cdf0e10cSrcweir return msp; 90*cdf0e10cSrcweir } 91*cdf0e10cSrcweir 92*cdf0e10cSrcweir Reference< frame::XModel > xModel( aContext, UNO_QUERY ); 93*cdf0e10cSrcweir 94*cdf0e10cSrcweir Reference< document::XScriptInvocationContext > xScriptContext( aContext, UNO_QUERY ); 95*cdf0e10cSrcweir if ( xScriptContext.is() ) 96*cdf0e10cSrcweir { 97*cdf0e10cSrcweir try 98*cdf0e10cSrcweir { 99*cdf0e10cSrcweir // the component supports executing scripts embedded in a - possibly foreign document. 100*cdf0e10cSrcweir // Check whether this other document its the component itself. 101*cdf0e10cSrcweir if ( !xModel.is() || ( xModel != xScriptContext->getScriptContainer() ) ) 102*cdf0e10cSrcweir { 103*cdf0e10cSrcweir msp = getMSPFromInvocationContext( xScriptContext ); 104*cdf0e10cSrcweir return msp; 105*cdf0e10cSrcweir } 106*cdf0e10cSrcweir } 107*cdf0e10cSrcweir catch( const lang::IllegalArgumentException& ) 108*cdf0e10cSrcweir { 109*cdf0e10cSrcweir xModel.set( Reference< frame::XModel >() ); 110*cdf0e10cSrcweir } 111*cdf0e10cSrcweir } 112*cdf0e10cSrcweir 113*cdf0e10cSrcweir if ( xModel.is() ) 114*cdf0e10cSrcweir { 115*cdf0e10cSrcweir sContext = MiscUtils::xModelToTdocUrl( xModel, m_xContext ); 116*cdf0e10cSrcweir msp = getMSPFromStringContext( sContext ); 117*cdf0e10cSrcweir return msp; 118*cdf0e10cSrcweir } 119*cdf0e10cSrcweir 120*cdf0e10cSrcweir createNonDocMSPs(); 121*cdf0e10cSrcweir return m_hMsps[ shareDirString ]; 122*cdf0e10cSrcweir } 123*cdf0e10cSrcweir 124*cdf0e10cSrcweir Reference< provider::XScriptProvider > 125*cdf0e10cSrcweir ActiveMSPList::getMSPFromInvocationContext( const Reference< document::XScriptInvocationContext >& xContext ) 126*cdf0e10cSrcweir SAL_THROW(( lang::IllegalArgumentException, RuntimeException )) 127*cdf0e10cSrcweir { 128*cdf0e10cSrcweir Reference< provider::XScriptProvider > msp; 129*cdf0e10cSrcweir 130*cdf0e10cSrcweir Reference< document::XEmbeddedScripts > xScripts; 131*cdf0e10cSrcweir if ( xContext.is() ) 132*cdf0e10cSrcweir xScripts.set( xContext->getScriptContainer() ); 133*cdf0e10cSrcweir if ( !xScripts.is() ) 134*cdf0e10cSrcweir { 135*cdf0e10cSrcweir ::rtl::OUStringBuffer buf; 136*cdf0e10cSrcweir buf.appendAscii( "Failed to create MasterScriptProvider for ScriptInvocationContext: " ); 137*cdf0e10cSrcweir buf.appendAscii( "Component supporting XEmbeddScripts interface not found." ); 138*cdf0e10cSrcweir throw lang::IllegalArgumentException( buf.makeStringAndClear(), NULL, 1 ); 139*cdf0e10cSrcweir } 140*cdf0e10cSrcweir 141*cdf0e10cSrcweir ::osl::MutexGuard guard( m_mutex ); 142*cdf0e10cSrcweir 143*cdf0e10cSrcweir Reference< XInterface > xNormalized( xContext, UNO_QUERY ); 144*cdf0e10cSrcweir ScriptComponent_map::const_iterator pos = m_mScriptComponents.find( xNormalized ); 145*cdf0e10cSrcweir if ( pos == m_mScriptComponents.end() ) 146*cdf0e10cSrcweir { 147*cdf0e10cSrcweir // TODO 148*cdf0e10cSrcweir msp = createNewMSP( uno::makeAny( xContext ) ); 149*cdf0e10cSrcweir addActiveMSP( xNormalized, msp ); 150*cdf0e10cSrcweir } 151*cdf0e10cSrcweir else 152*cdf0e10cSrcweir { 153*cdf0e10cSrcweir msp = pos->second; 154*cdf0e10cSrcweir } 155*cdf0e10cSrcweir 156*cdf0e10cSrcweir return msp; 157*cdf0e10cSrcweir } 158*cdf0e10cSrcweir 159*cdf0e10cSrcweir Reference< provider::XScriptProvider > 160*cdf0e10cSrcweir ActiveMSPList::getMSPFromStringContext( const ::rtl::OUString& context ) 161*cdf0e10cSrcweir SAL_THROW(( lang::IllegalArgumentException, RuntimeException )) 162*cdf0e10cSrcweir { 163*cdf0e10cSrcweir Reference< provider::XScriptProvider > msp; 164*cdf0e10cSrcweir try 165*cdf0e10cSrcweir { 166*cdf0e10cSrcweir if ( context.indexOf( OUSTR( "vnd.sun.star.tdoc" ) ) == 0 ) 167*cdf0e10cSrcweir { 168*cdf0e10cSrcweir Reference< frame::XModel > xModel( MiscUtils::tDocUrlToModel( context ) ); 169*cdf0e10cSrcweir 170*cdf0e10cSrcweir Reference< document::XEmbeddedScripts > xScripts( xModel, UNO_QUERY ); 171*cdf0e10cSrcweir Reference< document::XScriptInvocationContext > xScriptsContext( xModel, UNO_QUERY ); 172*cdf0e10cSrcweir if ( !xScripts.is() && !xScriptsContext.is() ) 173*cdf0e10cSrcweir { 174*cdf0e10cSrcweir ::rtl::OUStringBuffer buf; 175*cdf0e10cSrcweir buf.appendAscii( "Failed to create MasterScriptProvider for '" ); 176*cdf0e10cSrcweir buf.append ( context ); 177*cdf0e10cSrcweir buf.appendAscii( "': Either XEmbeddScripts or XScriptInvocationContext need to be supported by the document." ); 178*cdf0e10cSrcweir throw lang::IllegalArgumentException( buf.makeStringAndClear(), NULL, 1 ); 179*cdf0e10cSrcweir } 180*cdf0e10cSrcweir 181*cdf0e10cSrcweir ::osl::MutexGuard guard( m_mutex ); 182*cdf0e10cSrcweir Reference< XInterface > xNormalized( xModel, UNO_QUERY ); 183*cdf0e10cSrcweir ScriptComponent_map::const_iterator pos = m_mScriptComponents.find( xNormalized ); 184*cdf0e10cSrcweir if ( pos == m_mScriptComponents.end() ) 185*cdf0e10cSrcweir { 186*cdf0e10cSrcweir msp = createNewMSP( context ); 187*cdf0e10cSrcweir addActiveMSP( xNormalized, msp ); 188*cdf0e10cSrcweir } 189*cdf0e10cSrcweir else 190*cdf0e10cSrcweir { 191*cdf0e10cSrcweir msp = pos->second; 192*cdf0e10cSrcweir } 193*cdf0e10cSrcweir } 194*cdf0e10cSrcweir else 195*cdf0e10cSrcweir { 196*cdf0e10cSrcweir ::osl::MutexGuard guard( m_mutex ); 197*cdf0e10cSrcweir Msp_hash::iterator h_itEnd = m_hMsps.end(); 198*cdf0e10cSrcweir Msp_hash::const_iterator itr = m_hMsps.find( context ); 199*cdf0e10cSrcweir if ( itr == h_itEnd ) 200*cdf0e10cSrcweir { 201*cdf0e10cSrcweir msp = createNewMSP( context ); 202*cdf0e10cSrcweir m_hMsps[ context ] = msp; 203*cdf0e10cSrcweir } 204*cdf0e10cSrcweir else 205*cdf0e10cSrcweir { 206*cdf0e10cSrcweir msp = m_hMsps[ context ]; 207*cdf0e10cSrcweir } 208*cdf0e10cSrcweir } 209*cdf0e10cSrcweir } 210*cdf0e10cSrcweir catch( const lang::IllegalArgumentException& ) 211*cdf0e10cSrcweir { 212*cdf0e10cSrcweir // allowed to leave 213*cdf0e10cSrcweir } 214*cdf0e10cSrcweir catch( const RuntimeException& ) 215*cdf0e10cSrcweir { 216*cdf0e10cSrcweir // allowed to leave 217*cdf0e10cSrcweir } 218*cdf0e10cSrcweir catch( const Exception& ) 219*cdf0e10cSrcweir { 220*cdf0e10cSrcweir ::rtl::OUStringBuffer aMessage; 221*cdf0e10cSrcweir aMessage.appendAscii( "Failed to create MasterScriptProvider for context '" ); 222*cdf0e10cSrcweir aMessage.append ( context ); 223*cdf0e10cSrcweir aMessage.appendAscii( "'." ); 224*cdf0e10cSrcweir throw lang::WrappedTargetRuntimeException( 225*cdf0e10cSrcweir aMessage.makeStringAndClear(), *this, ::cppu::getCaughtException() ); 226*cdf0e10cSrcweir } 227*cdf0e10cSrcweir return msp; 228*cdf0e10cSrcweir } 229*cdf0e10cSrcweir 230*cdf0e10cSrcweir void 231*cdf0e10cSrcweir ActiveMSPList::addActiveMSP( const Reference< uno::XInterface >& xComponent, 232*cdf0e10cSrcweir const Reference< provider::XScriptProvider >& msp ) 233*cdf0e10cSrcweir { 234*cdf0e10cSrcweir ::osl::MutexGuard guard( m_mutex ); 235*cdf0e10cSrcweir Reference< XInterface > xNormalized( xComponent, UNO_QUERY ); 236*cdf0e10cSrcweir ScriptComponent_map::const_iterator pos = m_mScriptComponents.find( xNormalized ); 237*cdf0e10cSrcweir if ( pos == m_mScriptComponents.end() ) 238*cdf0e10cSrcweir { 239*cdf0e10cSrcweir m_mScriptComponents[ xNormalized ] = msp; 240*cdf0e10cSrcweir 241*cdf0e10cSrcweir // add self as listener for component disposal 242*cdf0e10cSrcweir // should probably throw from this method!!, reexamine 243*cdf0e10cSrcweir try 244*cdf0e10cSrcweir { 245*cdf0e10cSrcweir Reference< lang::XComponent > xBroadcaster = 246*cdf0e10cSrcweir Reference< lang::XComponent >( xComponent, UNO_QUERY_THROW ); 247*cdf0e10cSrcweir xBroadcaster->addEventListener( this ); 248*cdf0e10cSrcweir } 249*cdf0e10cSrcweir catch ( const Exception& ) 250*cdf0e10cSrcweir { 251*cdf0e10cSrcweir DBG_UNHANDLED_EXCEPTION(); 252*cdf0e10cSrcweir } 253*cdf0e10cSrcweir } 254*cdf0e10cSrcweir } 255*cdf0e10cSrcweir 256*cdf0e10cSrcweir //************************************************************************* 257*cdf0e10cSrcweir void SAL_CALL 258*cdf0e10cSrcweir ActiveMSPList::disposing( const ::com::sun::star::lang::EventObject& Source ) 259*cdf0e10cSrcweir throw ( ::com::sun::star::uno::RuntimeException ) 260*cdf0e10cSrcweir 261*cdf0e10cSrcweir { 262*cdf0e10cSrcweir try 263*cdf0e10cSrcweir { 264*cdf0e10cSrcweir Reference< XInterface > xNormalized( Source.Source, UNO_QUERY ); 265*cdf0e10cSrcweir if ( xNormalized.is() ) 266*cdf0e10cSrcweir { 267*cdf0e10cSrcweir ::osl::MutexGuard guard( m_mutex ); 268*cdf0e10cSrcweir ScriptComponent_map::iterator pos = m_mScriptComponents.find( xNormalized ); 269*cdf0e10cSrcweir if ( pos != m_mScriptComponents.end() ) 270*cdf0e10cSrcweir m_mScriptComponents.erase( pos ); 271*cdf0e10cSrcweir } 272*cdf0e10cSrcweir } 273*cdf0e10cSrcweir catch ( const Exception& ) 274*cdf0e10cSrcweir { 275*cdf0e10cSrcweir // if we get an exception here, there is not much we can do about 276*cdf0e10cSrcweir // it can't throw as it will screw up the model that is calling dispose 277*cdf0e10cSrcweir DBG_UNHANDLED_EXCEPTION(); 278*cdf0e10cSrcweir } 279*cdf0e10cSrcweir } 280*cdf0e10cSrcweir 281*cdf0e10cSrcweir 282*cdf0e10cSrcweir void 283*cdf0e10cSrcweir ActiveMSPList::createNonDocMSPs() 284*cdf0e10cSrcweir { 285*cdf0e10cSrcweir static bool created = false; 286*cdf0e10cSrcweir if ( created ) 287*cdf0e10cSrcweir { 288*cdf0e10cSrcweir return; 289*cdf0e10cSrcweir } 290*cdf0e10cSrcweir else 291*cdf0e10cSrcweir { 292*cdf0e10cSrcweir ::osl::MutexGuard guard( m_mutex ); 293*cdf0e10cSrcweir if ( created ) 294*cdf0e10cSrcweir { 295*cdf0e10cSrcweir return; 296*cdf0e10cSrcweir } 297*cdf0e10cSrcweir // do creation of user and share MSPs here 298*cdf0e10cSrcweir ::rtl::OUString serviceName = ::rtl::OUString::createFromAscii("com.sun.star.script.provider.MasterScriptProvider"); 299*cdf0e10cSrcweir Sequence< Any > args(1); 300*cdf0e10cSrcweir 301*cdf0e10cSrcweir args[ 0 ] <<= userDirString; 302*cdf0e10cSrcweir Reference< provider::XScriptProvider > userMsp( m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( serviceName, args, m_xContext ), UNO_QUERY ); 303*cdf0e10cSrcweir // should check if provider reference is valid 304*cdf0e10cSrcweir m_hMsps[ userDirString ] = userMsp; 305*cdf0e10cSrcweir 306*cdf0e10cSrcweir args[ 0 ] <<= shareDirString; 307*cdf0e10cSrcweir Reference< provider::XScriptProvider > shareMsp( m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( serviceName, args, m_xContext ), UNO_QUERY ); 308*cdf0e10cSrcweir // should check if provider reference is valid 309*cdf0e10cSrcweir m_hMsps[ shareDirString ] = shareMsp; 310*cdf0e10cSrcweir 311*cdf0e10cSrcweir args[ 0 ] <<= bundledDirString; 312*cdf0e10cSrcweir Reference< provider::XScriptProvider > bundledMsp( m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( serviceName, args, m_xContext ), UNO_QUERY ); 313*cdf0e10cSrcweir // should check if provider reference is valid 314*cdf0e10cSrcweir m_hMsps[ bundledDirString ] = bundledMsp; 315*cdf0e10cSrcweir 316*cdf0e10cSrcweir created = true; 317*cdf0e10cSrcweir } 318*cdf0e10cSrcweir 319*cdf0e10cSrcweir } 320*cdf0e10cSrcweir 321*cdf0e10cSrcweir 322*cdf0e10cSrcweir } // namespace func_provider 323*cdf0e10cSrcweir 324