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