Line data Source code
1 : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 : /*
3 : * This file is part of the LibreOffice project.
4 : *
5 : * This Source Code Form is subject to the terms of the Mozilla Public
6 : * License, v. 2.0. If a copy of the MPL was not distributed with this
7 : * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 : *
9 : * This file incorporates work covered by the following license notice:
10 : *
11 : * Licensed to the Apache Software Foundation (ASF) under one or more
12 : * contributor license agreements. See the NOTICE file distributed
13 : * with this work for additional information regarding copyright
14 : * ownership. The ASF licenses this file to you under the Apache
15 : * License, Version 2.0 (the "License"); you may not use this file
16 : * except in compliance with the License. You may obtain a copy of
17 : * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 : */
19 :
20 : #include "basprov.hxx"
21 : #include "basscript.hxx"
22 : #include "baslibnode.hxx"
23 : #include <com/sun/star/frame/XModel.hpp>
24 : #include <com/sun/star/script/browse/BrowseNodeTypes.hpp>
25 : #include <com/sun/star/script/provider/ScriptFrameworkErrorType.hpp>
26 : #include <com/sun/star/document/XEmbeddedScripts.hpp>
27 : #include <com/sun/star/uri/UriReferenceFactory.hpp>
28 :
29 : #include <cppuhelper/implementationentry.hxx>
30 : #include <rtl/uri.hxx>
31 : #include <osl/process.h>
32 : #include <osl/file.hxx>
33 : #include <osl/mutex.hxx>
34 : #include <vcl/svapp.hxx>
35 : #include <basic/sbx.hxx>
36 : #include <basic/basmgr.hxx>
37 : #include <basic/basicmanagerrepository.hxx>
38 : #include <basic/sbstar.hxx>
39 : #include <basic/sbmod.hxx>
40 : #include <basic/sbmeth.hxx>
41 : #include <sfx2/app.hxx>
42 : #include <sfx2/objsh.hxx>
43 :
44 : #include <com/sun/star/util/XMacroExpander.hpp>
45 : #include <com/sun/star/script/XLibraryContainer2.hpp>
46 : #include <com/sun/star/uri/XUriReference.hpp>
47 : #include <com/sun/star/uri/XUriReferenceFactory.hpp>
48 : #include <com/sun/star/uri/XVndSunStarScriptUrl.hpp>
49 :
50 : #include <util/util.hxx>
51 : #include <util/MiscUtils.hxx>
52 :
53 :
54 : using namespace ::com::sun::star;
55 : using namespace ::com::sun::star::lang;
56 : using namespace ::com::sun::star::uno;
57 : using namespace ::com::sun::star::script;
58 : using namespace ::com::sun::star::document;
59 : using namespace ::sf_misc;
60 :
61 : //.........................................................................
62 : namespace basprov
63 : {
64 : //.........................................................................
65 :
66 : // =============================================================================
67 : // component operations
68 : // =============================================================================
69 :
70 1 : static ::rtl::OUString getImplementationName_BasicProviderImpl()
71 : {
72 : static ::rtl::OUString* pImplName = 0;
73 1 : if ( !pImplName )
74 : {
75 1 : ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
76 1 : if ( !pImplName )
77 : {
78 1 : static ::rtl::OUString aImplName( "com.sun.star.comp.scripting.ScriptProviderForBasic" );
79 1 : pImplName = &aImplName;
80 1 : }
81 : }
82 1 : return *pImplName;
83 : }
84 :
85 : // -----------------------------------------------------------------------------
86 :
87 1 : static Sequence< ::rtl::OUString > getSupportedServiceNames_BasicProviderImpl()
88 : {
89 : static Sequence< ::rtl::OUString >* pNames = 0;
90 1 : if ( !pNames )
91 : {
92 1 : ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
93 1 : if ( !pNames )
94 : {
95 1 : static Sequence< ::rtl::OUString > aNames(4);
96 1 : aNames.getArray()[0] = ::rtl::OUString( "com.sun.star.script.provider.ScriptProviderForBasic" );
97 1 : aNames.getArray()[1] = ::rtl::OUString( "com.sun.star.script.provider.LanguageScriptProvider" );
98 1 : aNames.getArray()[2] = ::rtl::OUString( "com.sun.star.script.provider.ScriptProvider" );
99 1 : aNames.getArray()[3] = ::rtl::OUString( "com.sun.star.script.browse.BrowseNode" );
100 1 : pNames = &aNames;
101 1 : }
102 : }
103 1 : return *pNames;
104 : }
105 :
106 : // =============================================================================
107 : // BasicProviderImpl
108 : // =============================================================================
109 :
110 1 : BasicProviderImpl::BasicProviderImpl( const Reference< XComponentContext >& xContext )
111 : :m_pAppBasicManager( 0 )
112 : ,m_pDocBasicManager( 0 )
113 : ,m_xLibContainerApp( 0 )
114 : ,m_xLibContainerDoc( 0 )
115 : ,m_xContext( xContext )
116 : ,m_bIsAppScriptCtx( true )
117 1 : ,m_bIsUserCtx(true)
118 : {
119 1 : }
120 :
121 : // -----------------------------------------------------------------------------
122 :
123 2 : BasicProviderImpl::~BasicProviderImpl()
124 : {
125 2 : }
126 :
127 : // -----------------------------------------------------------------------------
128 :
129 0 : bool BasicProviderImpl::isLibraryShared( const Reference< script::XLibraryContainer >& rxLibContainer, const ::rtl::OUString& rLibName )
130 : {
131 0 : bool bIsShared = false;
132 :
133 0 : Reference< script::XLibraryContainer2 > xLibContainer( rxLibContainer, UNO_QUERY );
134 0 : if ( xLibContainer.is() && xLibContainer->hasByName( rLibName ) && xLibContainer->isLibraryLink( rLibName ) )
135 : {
136 0 : ::rtl::OUString aFileURL;
137 0 : if ( m_xContext.is() )
138 : {
139 0 : Reference< uri::XUriReferenceFactory > xUriFac( uri::UriReferenceFactory::create( m_xContext ) );
140 :
141 0 : ::rtl::OUString aLinkURL( xLibContainer->getLibraryLinkURL( rLibName ) );
142 0 : Reference< uri::XUriReference > xUriRef( xUriFac->parse( aLinkURL ), UNO_QUERY );
143 :
144 0 : if ( xUriRef.is() )
145 : {
146 0 : ::rtl::OUString aScheme = xUriRef->getScheme();
147 0 : if ( aScheme.equalsIgnoreAsciiCaseAsciiL(RTL_CONSTASCII_STRINGPARAM("file")) )
148 : {
149 0 : aFileURL = aLinkURL;
150 : }
151 0 : else if ( aScheme.equalsIgnoreAsciiCaseAsciiL(RTL_CONSTASCII_STRINGPARAM("vnd.sun.star.pkg")) )
152 : {
153 0 : ::rtl::OUString aAuthority = xUriRef->getAuthority();
154 0 : if ( aAuthority.matchIgnoreAsciiCaseAsciiL( RTL_CONSTASCII_STRINGPARAM( "vnd.sun.star.expand:" ) ) )
155 : {
156 0 : ::rtl::OUString aDecodedURL( aAuthority.copy( sizeof ( "vnd.sun.star.expand:" ) - 1 ) );
157 0 : aDecodedURL = ::rtl::Uri::decode( aDecodedURL, rtl_UriDecodeWithCharset, RTL_TEXTENCODING_UTF8 );
158 : Reference<util::XMacroExpander> xMacroExpander(
159 0 : m_xContext->getValueByName(
160 0 : ::rtl::OUString("/singletons/com.sun.star.util.theMacroExpander") ),
161 0 : UNO_QUERY );
162 0 : if ( xMacroExpander.is() )
163 0 : aFileURL = xMacroExpander->expandMacros( aDecodedURL );
164 0 : }
165 0 : }
166 0 : }
167 : }
168 :
169 0 : if ( !aFileURL.isEmpty() )
170 : {
171 0 : osl::DirectoryItem aFileItem;
172 0 : osl::FileStatus aFileStatus( osl_FileStatus_Mask_FileURL );
173 0 : OSL_VERIFY( osl::DirectoryItem::get( aFileURL, aFileItem ) == osl::FileBase::E_None );
174 0 : OSL_VERIFY( aFileItem.getFileStatus( aFileStatus ) == osl::FileBase::E_None );
175 0 : ::rtl::OUString aCanonicalFileURL( aFileStatus.getFileURL() );
176 :
177 0 : ::rtl::OUString aSearchURL1( "share/basic" );
178 0 : ::rtl::OUString aSearchURL2( "share/uno_packages" );
179 0 : if( aCanonicalFileURL.indexOf( aSearchURL1 ) != -1 || aCanonicalFileURL.indexOf( aSearchURL2 ) != -1 )
180 0 : bIsShared = true;
181 0 : }
182 : }
183 :
184 0 : return bIsShared;
185 : }
186 :
187 : // -----------------------------------------------------------------------------
188 : // XServiceInfo
189 : // -----------------------------------------------------------------------------
190 :
191 0 : ::rtl::OUString BasicProviderImpl::getImplementationName( ) throw (RuntimeException)
192 : {
193 0 : return getImplementationName_BasicProviderImpl();
194 : }
195 :
196 : // -----------------------------------------------------------------------------
197 :
198 0 : sal_Bool BasicProviderImpl::supportsService( const ::rtl::OUString& rServiceName ) throw (RuntimeException)
199 : {
200 0 : Sequence< ::rtl::OUString > aNames( getSupportedServiceNames() );
201 0 : const ::rtl::OUString* pNames = aNames.getConstArray();
202 0 : const ::rtl::OUString* pEnd = pNames + aNames.getLength();
203 0 : for ( ; pNames != pEnd && !pNames->equals( rServiceName ); ++pNames )
204 : ;
205 :
206 0 : return pNames != pEnd;
207 : }
208 :
209 : // -----------------------------------------------------------------------------
210 :
211 0 : Sequence< ::rtl::OUString > BasicProviderImpl::getSupportedServiceNames( ) throw (RuntimeException)
212 : {
213 0 : return getSupportedServiceNames_BasicProviderImpl();
214 : }
215 :
216 : // -----------------------------------------------------------------------------
217 : // XInitialization
218 : // -----------------------------------------------------------------------------
219 :
220 1 : void BasicProviderImpl::initialize( const Sequence< Any >& aArguments ) throw (Exception, RuntimeException)
221 : {
222 : // TODO
223 :
224 1 : SolarMutexGuard aGuard;
225 :
226 1 : if ( aArguments.getLength() != 1 )
227 : {
228 : throw IllegalArgumentException(
229 : ::rtl::OUString( "BasicProviderImpl::initialize: incorrect argument count." ),
230 : *this,
231 : 1
232 0 : );
233 : }
234 :
235 1 : Reference< frame::XModel > xModel;
236 :
237 1 : m_xInvocationContext.set( aArguments[0], UNO_QUERY );
238 1 : if ( m_xInvocationContext.is() )
239 : {
240 0 : xModel.set( m_xInvocationContext->getScriptContainer(), UNO_QUERY );
241 0 : if ( !xModel.is() )
242 : {
243 : throw IllegalArgumentException(
244 : ::rtl::OUString( "BasicProviderImpl::initialize: unable to determine the document model from the script invocation context." ),
245 : *this,
246 : 1
247 0 : );
248 : }
249 : }
250 : else
251 : {
252 1 : if ( !( aArguments[0] >>= m_sScriptingContext ) )
253 : {
254 : throw IllegalArgumentException(
255 0 : ::rtl::OUString( "BasicProviderImpl::initialize: incorrect argument type " ).concat( aArguments[0].getValueTypeName() ),
256 : *this,
257 : 1
258 0 : );
259 : }
260 :
261 1 : ::rtl::OUString sDoc = OUSTR("vnd.sun.star.tdoc");
262 1 : if ( m_sScriptingContext.indexOf( sDoc ) == 0 )
263 : {
264 1 : xModel = MiscUtils::tDocUrlToModel( m_sScriptingContext );
265 : // TODO: use ScriptingContantsPool for SCRIPTING_DOC_REF
266 1 : }
267 : }
268 :
269 1 : if ( xModel.is() )
270 : {
271 1 : Reference< XEmbeddedScripts > xDocumentScripts( xModel, UNO_QUERY );
272 1 : if ( xDocumentScripts.is() )
273 : {
274 1 : m_pDocBasicManager = ::basic::BasicManagerRepository::getDocumentBasicManager( xModel );
275 1 : m_xLibContainerDoc.set( xDocumentScripts->getBasicLibraries(), UNO_QUERY );
276 : OSL_ENSURE( m_pDocBasicManager && m_xLibContainerDoc.is(),
277 : "BasicProviderImpl::initialize: invalid BasicManager, or invalid script container!" );
278 : }
279 1 : m_bIsAppScriptCtx = false;
280 : }
281 : else
282 : {
283 : // Provider has been created with application context for user
284 : // or share
285 0 : if ( m_sScriptingContext != "user" )
286 : {
287 0 : m_bIsUserCtx = false;
288 : }
289 : else
290 : {
291 : /*
292 : throw RuntimeException(
293 : ::rtl::OUString( "BasicProviderImpl::initialize: no scripting context!" ),
294 : Reference< XInterface >() );
295 : */
296 : }
297 : }
298 :
299 : // TODO
300 1 : if ( !m_pAppBasicManager )
301 1 : m_pAppBasicManager = SFX_APP()->GetBasicManager();
302 :
303 1 : if ( !m_xLibContainerApp.is() )
304 1 : m_xLibContainerApp = Reference< script::XLibraryContainer >( SFX_APP()->GetBasicContainer(), UNO_QUERY );
305 1 : }
306 :
307 : // -----------------------------------------------------------------------------
308 :
309 : // XScriptProvider
310 : // -----------------------------------------------------------------------------
311 :
312 1 : Reference < provider::XScript > BasicProviderImpl::getScript( const ::rtl::OUString& scriptURI )
313 : throw ( provider::ScriptFrameworkErrorException, RuntimeException)
314 : {
315 : // TODO
316 :
317 1 : SolarMutexGuard aGuard;
318 :
319 1 : Reference< provider::XScript > xScript;
320 1 : Reference< uri::XUriReferenceFactory > xFac ( uri::UriReferenceFactory::create( m_xContext ) );
321 :
322 : Reference< uri::XUriReference > uriRef(
323 1 : xFac->parse( scriptURI ), UNO_QUERY );
324 :
325 1 : Reference < uri::XVndSunStarScriptUrl > sfUri( uriRef, UNO_QUERY );
326 :
327 1 : if ( !uriRef.is() || !sfUri.is() )
328 : {
329 0 : ::rtl::OUString errorMsg("BasicProviderImpl::getScript: failed to parse URI: ");
330 0 : errorMsg = errorMsg.concat( scriptURI );
331 : throw provider::ScriptFrameworkErrorException(
332 : errorMsg, Reference< XInterface >(),
333 : scriptURI, OUSTR("Basic"),
334 0 : provider::ScriptFrameworkErrorType::MALFORMED_URL );
335 : }
336 :
337 :
338 1 : ::rtl::OUString aDescription = sfUri->getName();
339 1 : ::rtl::OUString aLocation = sfUri->getParameter(
340 1 : ::rtl::OUString("location") );
341 :
342 1 : sal_Int32 nIndex = 0;
343 : // In some strange circumstances the Library name can have an
344 : // apparantly illegal '.' in it ( in imported VBA )
345 :
346 1 : BasicManager* pBasicMgr = NULL;
347 1 : if ( aLocation == "document" )
348 : {
349 1 : pBasicMgr = m_pDocBasicManager;
350 : }
351 0 : else if ( aLocation == "application" )
352 : {
353 0 : pBasicMgr = m_pAppBasicManager;
354 : }
355 1 : rtl::OUString sProjectName;
356 1 : if ( pBasicMgr )
357 1 : sProjectName = pBasicMgr->GetName();
358 :
359 1 : ::rtl::OUString aLibrary;
360 1 : if ( !sProjectName.isEmpty() && aDescription.match( sProjectName ) )
361 : {
362 : OSL_TRACE("LibraryName %s is part of the url %s",
363 : rtl::OUStringToOString( sProjectName, RTL_TEXTENCODING_UTF8 ).getStr(),
364 : rtl::OUStringToOString( aDescription, RTL_TEXTENCODING_UTF8 ).getStr() );
365 0 : aLibrary = sProjectName;
366 0 : nIndex = sProjectName.getLength() + 1;
367 : }
368 : else
369 1 : aLibrary = aDescription.getToken( 0, (sal_Unicode)'.', nIndex );
370 1 : ::rtl::OUString aModule;
371 1 : if ( nIndex != -1 )
372 1 : aModule = aDescription.getToken( 0, (sal_Unicode)'.', nIndex );
373 1 : ::rtl::OUString aMethod;
374 1 : if ( nIndex != -1 )
375 1 : aMethod = aDescription.getToken( 0, (sal_Unicode)'.', nIndex );
376 :
377 1 : if ( !aLibrary.isEmpty() && !aModule.isEmpty() && !aMethod.isEmpty() && !aLocation.isEmpty() )
378 : {
379 :
380 1 : if ( pBasicMgr )
381 : {
382 1 : StarBASIC* pBasic = pBasicMgr->GetLib( aLibrary );
383 1 : if ( !pBasic )
384 : {
385 1 : sal_uInt16 nId = pBasicMgr->GetLibId( aLibrary );
386 1 : if ( nId != LIB_NOTFOUND )
387 : {
388 0 : pBasicMgr->LoadLib( nId );
389 0 : pBasic = pBasicMgr->GetLib( aLibrary );
390 : }
391 : }
392 1 : if ( pBasic )
393 : {
394 0 : SbModule* pModule = pBasic->FindModule( aModule );
395 0 : if ( pModule )
396 : {
397 0 : SbxArray* pMethods = pModule->GetMethods();
398 0 : if ( pMethods )
399 : {
400 0 : SbMethod* pMethod = static_cast< SbMethod* >( pMethods->Find( aMethod, SbxCLASS_METHOD ) );
401 0 : if ( pMethod && !pMethod->IsHidden() )
402 : {
403 0 : if ( m_pDocBasicManager == pBasicMgr )
404 0 : xScript = new BasicScriptImpl( aDescription, pMethod, *m_pDocBasicManager, m_xInvocationContext );
405 : else
406 0 : xScript = new BasicScriptImpl( aDescription, pMethod );
407 : }
408 : }
409 : }
410 : }
411 : }
412 : }
413 :
414 1 : if ( !xScript.is() )
415 : {
416 1 : ::rtl::OUStringBuffer aMessage;
417 1 : aMessage.appendAscii( "The following Basic script could not be found:\n" );
418 1 : aMessage.appendAscii( "library: '" ).append( aLibrary ).appendAscii( "'\n" );
419 1 : aMessage.appendAscii( "module: '" ).append( aModule ).appendAscii( "'\n" );
420 1 : aMessage.appendAscii( "method: '" ).append( aMethod ).appendAscii( "'\n" );
421 1 : aMessage.appendAscii( "location: '" ).append( aLocation ).appendAscii( "'\n" );
422 : throw provider::ScriptFrameworkErrorException(
423 : aMessage.makeStringAndClear(),
424 : Reference< XInterface >(),
425 : scriptURI, OUSTR("Basic"),
426 1 : provider::ScriptFrameworkErrorType::NO_SUCH_SCRIPT );
427 : }
428 :
429 1 : return xScript;
430 : }
431 :
432 : // -----------------------------------------------------------------------------
433 : // XBrowseNode
434 : // -----------------------------------------------------------------------------
435 :
436 0 : ::rtl::OUString BasicProviderImpl::getName( ) throw (RuntimeException)
437 : {
438 : // TODO
439 :
440 0 : SolarMutexGuard aGuard;
441 :
442 0 : return ::rtl::OUString("Basic");
443 : }
444 :
445 : // -----------------------------------------------------------------------------
446 :
447 0 : Sequence< Reference< browse::XBrowseNode > > BasicProviderImpl::getChildNodes( ) throw (RuntimeException)
448 : {
449 0 : SolarMutexGuard aGuard;
450 :
451 0 : Reference< script::XLibraryContainer > xLibContainer;
452 0 : BasicManager* pBasicManager = NULL;
453 :
454 0 : if ( m_bIsAppScriptCtx )
455 : {
456 0 : xLibContainer = m_xLibContainerApp;
457 0 : pBasicManager = m_pAppBasicManager;
458 : }
459 : else
460 : {
461 0 : xLibContainer = m_xLibContainerDoc;
462 0 : pBasicManager = m_pDocBasicManager;
463 : }
464 :
465 0 : Sequence< Reference< browse::XBrowseNode > > aChildNodes;
466 :
467 0 : if ( pBasicManager && xLibContainer.is() )
468 : {
469 0 : Sequence< ::rtl::OUString > aLibNames = xLibContainer->getElementNames();
470 0 : sal_Int32 nLibCount = aLibNames.getLength();
471 0 : const ::rtl::OUString* pLibNames = aLibNames.getConstArray();
472 0 : aChildNodes.realloc( nLibCount );
473 0 : Reference< browse::XBrowseNode >* pChildNodes = aChildNodes.getArray();
474 0 : sal_Int32 childrenFound = 0;
475 :
476 0 : for ( sal_Int32 i = 0 ; i < nLibCount ; ++i )
477 : {
478 0 : bool bCreate = false;
479 0 : if ( m_bIsAppScriptCtx )
480 : {
481 0 : bool bShared = isLibraryShared( xLibContainer, pLibNames[i] );
482 0 : if ( ( m_bIsUserCtx && !bShared ) || ( !m_bIsUserCtx && bShared ) )
483 0 : bCreate = true;
484 : }
485 : else
486 : {
487 0 : bCreate = true;
488 : }
489 0 : if ( bCreate )
490 : {
491 : pChildNodes[childrenFound++] = static_cast< browse::XBrowseNode* >( new BasicLibraryNodeImpl(
492 0 : m_xContext, m_sScriptingContext, pBasicManager, xLibContainer, pLibNames[i], m_bIsAppScriptCtx ) );
493 : }
494 : }
495 :
496 0 : if ( childrenFound != nLibCount )
497 0 : aChildNodes.realloc( childrenFound );
498 : }
499 :
500 0 : return aChildNodes;
501 : }
502 :
503 : // -----------------------------------------------------------------------------
504 :
505 0 : sal_Bool BasicProviderImpl::hasChildNodes( ) throw (RuntimeException)
506 : {
507 0 : SolarMutexGuard aGuard;
508 :
509 0 : sal_Bool bReturn = sal_False;
510 0 : Reference< script::XLibraryContainer > xLibContainer;
511 0 : if ( m_bIsAppScriptCtx )
512 : {
513 0 : xLibContainer = m_xLibContainerApp;
514 : }
515 : else
516 : {
517 0 : xLibContainer = m_xLibContainerDoc;
518 : }
519 0 : if ( xLibContainer.is() )
520 0 : bReturn = xLibContainer->hasElements();
521 :
522 0 : return bReturn;
523 : }
524 :
525 : // -----------------------------------------------------------------------------
526 :
527 0 : sal_Int16 BasicProviderImpl::getType( ) throw (RuntimeException)
528 : {
529 0 : SolarMutexGuard aGuard;
530 :
531 0 : return browse::BrowseNodeTypes::CONTAINER;
532 : }
533 :
534 : // =============================================================================
535 : // component operations
536 : // =============================================================================
537 :
538 1 : static Reference< XInterface > SAL_CALL create_BasicProviderImpl(
539 : Reference< XComponentContext > const & xContext )
540 : SAL_THROW(())
541 : {
542 1 : return static_cast< lang::XTypeProvider * >( new BasicProviderImpl( xContext ) );
543 : }
544 :
545 : // -----------------------------------------------------------------------------
546 :
547 : static struct ::cppu::ImplementationEntry s_component_entries [] =
548 : {
549 : {
550 : create_BasicProviderImpl, getImplementationName_BasicProviderImpl,
551 : getSupportedServiceNames_BasicProviderImpl, ::cppu::createSingleComponentFactory,
552 : 0, 0
553 : },
554 : { 0, 0, 0, 0, 0, 0 }
555 : };
556 :
557 : // -----------------------------------------------------------------------------
558 :
559 : //.........................................................................
560 : } // namespace basprov
561 : //.........................................................................
562 :
563 :
564 : // =============================================================================
565 : // component exports
566 : // =============================================================================
567 :
568 : extern "C"
569 : {
570 1 : SAL_DLLPUBLIC_EXPORT void * SAL_CALL basprov_component_getFactory(
571 : const sal_Char * pImplName, lang::XMultiServiceFactory * pServiceManager,
572 : registry::XRegistryKey * pRegistryKey )
573 : {
574 : return ::cppu::component_getFactoryHelper(
575 1 : pImplName, pServiceManager, pRegistryKey, ::basprov::s_component_entries );
576 : }
577 : }
578 :
579 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|