513 lines
20 KiB
C++
513 lines
20 KiB
C++
/*************************************************************************
|
|
*
|
|
* $RCSfile: ScriptNameResolverImpl.cxx,v $
|
|
*
|
|
* $Revision: 1.19 $
|
|
*
|
|
* last change: $Author: npower $ $Date: 2003-03-03 20:17:33 $
|
|
*
|
|
* 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): _______________________________________
|
|
*
|
|
*
|
|
************************************************************************/
|
|
|
|
#include <vector>
|
|
|
|
#include <cppuhelper/implementationentry.hxx>
|
|
#include <com/sun/star/beans/XPropertySet.hpp>
|
|
|
|
#include <util/util.hxx>
|
|
#include <util/scriptingconstants.hxx>
|
|
|
|
#include <drafts/com/sun/star/script/framework/storage/XScriptStorageManager.hpp>
|
|
#include <drafts/com/sun/star/script/framework/security/XScriptSecurity.hpp>
|
|
|
|
#include "ScriptNameResolverImpl.hxx"
|
|
#include "ScriptRuntimeManager.hxx"
|
|
|
|
using namespace ::rtl;
|
|
using namespace ::com::sun::star;
|
|
using namespace ::com::sun::star::uno;
|
|
using namespace ::drafts::com::sun::star::script::framework;
|
|
|
|
namespace scripting_runtimemgr
|
|
{
|
|
|
|
const sal_Char* const LANGUAGE_TO_RESOLVE_ON[] = { "All" }; // should be configurable
|
|
OUString nrs_implName = OUString::createFromAscii(
|
|
"drafts.com.sun.star.script.framework.runtime.DefaultScriptNameResolver" );
|
|
OUString nrs_serviceName = OUString::createFromAscii(
|
|
"drafts.com.sun.star.script.framework.runtime.DefaultScriptNameResolver" );
|
|
Sequence< OUString > nrs_serviceNames = Sequence< OUString >( &nrs_serviceName, 1 );
|
|
|
|
const char* const SCRIPTSTORAGEMANAGER_SERVICE =
|
|
"/singletons/drafts.com.sun.star.script.framework.storage.theScriptStorageManager";
|
|
|
|
extern ::rtl_StandardModuleCount s_moduleCount;
|
|
|
|
// define storages to search
|
|
static ::std::vector< sal_Int32 >* m_pSearchIDs = NULL;
|
|
|
|
//*************************************************************************
|
|
ScriptNameResolverImpl::ScriptNameResolverImpl(
|
|
const Reference< XComponentContext > & xContext ) :
|
|
m_xContext( xContext )
|
|
{
|
|
OSL_TRACE( "< ScriptNameResolverImpl ctor called >\n" );
|
|
validateXRef( m_xContext, "ScriptNameResolverImpl::ScriptNameResolverImpl: invalid context" );
|
|
m_xMultiComFac = m_xContext->getServiceManager();
|
|
|
|
validateXRef( m_xMultiComFac, "ScriptNameResolverImpl::ScriptNameResolverImpl: invalid XMultiComponentFactory " );
|
|
|
|
if( !m_pSearchIDs )
|
|
{
|
|
osl::Guard< osl::Mutex > aGuard( m_mutex );
|
|
if( !m_pSearchIDs )
|
|
{
|
|
scripting_constants::ScriptingConstantsPool& scriptingConstantsPool =
|
|
scripting_constants::ScriptingConstantsPool::instance();
|
|
m_pSearchIDs = new ::std::vector< sal_Int32 >();
|
|
m_pSearchIDs->push_back( scriptingConstantsPool.DOC_STORAGE_ID_NOT_SET );
|
|
m_pSearchIDs->push_back( scriptingConstantsPool.USER_STORAGE_ID );
|
|
m_pSearchIDs->push_back( scriptingConstantsPool.SHARED_STORAGE_ID );
|
|
}
|
|
}
|
|
|
|
s_moduleCount.modCnt.acquire( &s_moduleCount.modCnt );
|
|
}
|
|
|
|
//*************************************************************************
|
|
ScriptNameResolverImpl::~ScriptNameResolverImpl()
|
|
{
|
|
OSL_TRACE( "< ScriptNameResolverImpl dtor called >\n" );
|
|
s_moduleCount.modCnt.release( &s_moduleCount.modCnt );
|
|
}
|
|
|
|
//*************************************************************************
|
|
Reference< storage::XScriptInfo > ScriptNameResolverImpl::resolve(
|
|
const ::rtl::OUString & scriptURI, Any& invocationCtx )
|
|
throw ( lang::IllegalArgumentException, script::CannotConvertException, RuntimeException )
|
|
{
|
|
|
|
Reference< storage::XScriptInfo > resolvedName;
|
|
Reference< beans::XPropertySet > xPropSetScriptingContext;
|
|
scripting_constants::ScriptingConstantsPool& scriptingConstantsPool =
|
|
scripting_constants::ScriptingConstantsPool::instance();
|
|
|
|
OSL_TRACE( "ScriptNameResolverImpl::resolve: in resolve - start" );
|
|
|
|
if ( sal_False == ( invocationCtx >>= xPropSetScriptingContext ) )
|
|
{
|
|
throw RuntimeException( OUSTR(
|
|
"ScriptNameResolverImpl::resolve : unable to get XScriptingContext from param" ),
|
|
Reference< XInterface > () );
|
|
}
|
|
|
|
Any any;
|
|
OUString docUri;
|
|
sal_Int32 docSid;
|
|
try
|
|
{
|
|
any = xPropSetScriptingContext->getPropertyValue(
|
|
scriptingConstantsPool.DOC_URI );
|
|
OSL_TRACE( "ScriptNameResolverImpl::resolve: in resolve - got anyUri" );
|
|
if ( sal_False == ( any >>= docUri ) )
|
|
{
|
|
throw RuntimeException( OUSTR(
|
|
"ScriptNameResolverImpl::resolve : unable to get doc Uri from xPropSetScriptingContext" ),
|
|
Reference< XInterface > () );
|
|
}
|
|
any = xPropSetScriptingContext->getPropertyValue(
|
|
scriptingConstantsPool.DOC_STORAGE_ID );
|
|
if ( sal_False == ( any >>= docSid ) )
|
|
{
|
|
throw RuntimeException( OUSTR(
|
|
"ScriptNameResolverImpl::resolve : unable to get doc storage id from xPropSetScriptingContext" ),
|
|
Reference< XInterface > () );
|
|
}
|
|
}
|
|
catch ( Exception & e )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve : problem with getPropertyValue" );
|
|
throw RuntimeException( temp.concat( e.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
#ifdef _DEBUG
|
|
catch ( ... )
|
|
{
|
|
throw RuntimeException( OUSTR(
|
|
"ScriptNameResolverImpl::resolve Unknown Exception caught - RuntimeException rethrown" ),
|
|
Reference< XInterface > () );
|
|
}
|
|
#endif
|
|
|
|
|
|
::rtl::OString docUriO(
|
|
::rtl::OUStringToOString( docUri , RTL_TEXTENCODING_ASCII_US ) );
|
|
OSL_TRACE(
|
|
"ScriptNameResolverImpl::resolve: *** >>> DOC URI: %s, doc sid is %d\n",
|
|
docUriO.pData->buffer, docSid );
|
|
|
|
|
|
OSL_TRACE( "ScriptNameResolverImpl::resolve Starting..." );
|
|
OUString docString = OUString::createFromAscii( "location=document" );
|
|
OUString userString = OUString::createFromAscii( "location=user" );
|
|
OUString shareString = OUString::createFromAscii( "location=share" );
|
|
|
|
// initialise vector with doc, user and share
|
|
|
|
// m_pSearchIDs is initialised as follows,
|
|
// m_pSearchIDs [ 0 ] empty
|
|
// m_pSearchIDs [ 1 ] user storage id
|
|
// m_pSearchIDs [ 2 ] share " "
|
|
|
|
::std::vector< sal_Int32 > m_vSearchIDs = *m_pSearchIDs;
|
|
m_vSearchIDs[ 0 ] = docSid;
|
|
|
|
if ( scriptURI.indexOf( docString ) != -1 )
|
|
{
|
|
OSL_TRACE("Full resolution available, search document");
|
|
// search in document
|
|
m_vSearchIDs.resize( 1 );
|
|
}
|
|
else if ( scriptURI.indexOf( userString ) != -1 )
|
|
{
|
|
OSL_TRACE("Full resolution available, search user");
|
|
// search in user
|
|
m_vSearchIDs[ 0 ] = ( *m_pSearchIDs )[ 1 ];
|
|
m_vSearchIDs.resize( 1 );
|
|
}
|
|
else if ( scriptURI.indexOf( shareString ) != -1 )
|
|
{
|
|
OSL_TRACE("Full resolution available, search share");
|
|
// search in share
|
|
m_vSearchIDs[ 0 ] = ( *m_pSearchIDs )[ 2 ];
|
|
m_vSearchIDs.resize( 1 );
|
|
}
|
|
else
|
|
{
|
|
OSL_TRACE("Only partial uri available, search doc, user & share");
|
|
// is this illegal or do we search in a default way
|
|
// if we get to here a uri has been passed in that has:
|
|
// a) not got a location specified
|
|
// b) an illegal location
|
|
|
|
// detect illegal location
|
|
if ( scriptURI.indexOf( OUString::createFromAscii( "location=" ) ) != -1 )
|
|
{
|
|
OSL_TRACE(
|
|
"ScriptNameResolver::resolve, throwing IllegalArgException" );
|
|
throw lang::IllegalArgumentException(
|
|
OUSTR( "invalid URI: " ).concat( scriptURI ),
|
|
Reference < XInterface > (), 1 );
|
|
|
|
}
|
|
// leave vSearchIDs take care of the search...
|
|
}
|
|
|
|
::std::vector< sal_Int32 >::const_iterator iter;
|
|
::std::vector< sal_Int32 >::const_iterator iterEnd = m_vSearchIDs.end();
|
|
|
|
for ( iter = m_vSearchIDs.begin() ; iter != iterEnd; ++iter )
|
|
{
|
|
try
|
|
{
|
|
OSL_TRACE( "** about to resolve from storage using id %d from vector of size %d",
|
|
*iter, m_vSearchIDs.size() );
|
|
if ( ( resolvedName = resolveURIFromStorageID( *iter, docUri, scriptURI ) ).is() )
|
|
{
|
|
OSL_TRACE( "found match in uri from storage %d", *iter );
|
|
xPropSetScriptingContext->setPropertyValue(
|
|
scriptingConstantsPool.RESOLVED_STORAGE_ID, makeAny(*iter) );
|
|
break;
|
|
}
|
|
|
|
}
|
|
catch ( beans::UnknownPropertyException & e )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve : UnknownPropertyException" );
|
|
throw RuntimeException( temp.concat( e.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
catch ( beans::PropertyVetoException & e )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve : PropertyVetoException " );
|
|
throw RuntimeException( temp.concat( e.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
catch ( lang::IllegalArgumentException & e )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve : IllegalArgumentException " );
|
|
throw lang::IllegalArgumentException( temp.concat( e.Message ),
|
|
Reference< XInterface > (), e.ArgumentPosition );
|
|
}
|
|
catch ( lang::WrappedTargetException & e )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve : WrappedTargetException " );
|
|
throw RuntimeException( temp.concat( e.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
catch ( Exception & e )
|
|
{
|
|
OSL_TRACE(
|
|
"Exception thrown by storage %d, failed to match uri: %s",
|
|
*iter,
|
|
::rtl::OUStringToOString( e.Message,
|
|
RTL_TEXTENCODING_ASCII_US ).pData->buffer );
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve : unknown exception" );
|
|
throw RuntimeException( temp.concat( e.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
#ifdef _DEBUG
|
|
catch ( ... )
|
|
{
|
|
OSL_TRACE(
|
|
"unknown exception thrown by storage %d, failed to match uri",
|
|
*iter );
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolve Unknown exception caught - RuntimeException rethrown" );
|
|
throw RuntimeException( temp,
|
|
Reference< XInterface > () );
|
|
}
|
|
#endif
|
|
|
|
}
|
|
return resolvedName;
|
|
}
|
|
|
|
//*************************************************************************
|
|
OUString SAL_CALL
|
|
ScriptNameResolverImpl::getImplementationName( )
|
|
throw( RuntimeException )
|
|
{
|
|
return nrs_implName;
|
|
}
|
|
|
|
//*************************************************************************
|
|
sal_Bool SAL_CALL
|
|
ScriptNameResolverImpl::supportsService( const OUString& serviceName )
|
|
throw( RuntimeException )
|
|
{
|
|
OUString const * pNames = nrs_serviceNames.getConstArray();
|
|
for ( sal_Int32 nPos = nrs_serviceNames.getLength(); nPos--; )
|
|
{
|
|
if ( serviceName.equals( pNames[ nPos ] ) )
|
|
{
|
|
return sal_True;
|
|
}
|
|
}
|
|
return sal_False;
|
|
}
|
|
|
|
//*************************************************************************
|
|
|
|
Reference< storage::XScriptInfo >
|
|
ScriptNameResolverImpl::resolveURIFromStorageID
|
|
( sal_Int32 sid, const ::rtl::OUString & docURI,
|
|
const ::rtl::OUString& scriptURI )
|
|
SAL_THROW ( ( lang::IllegalArgumentException, RuntimeException ) )
|
|
{
|
|
Reference< storage::XScriptInfo > resolvedScriptInfo;
|
|
scripting_constants::ScriptingConstantsPool& scriptingConstantsPool =
|
|
scripting_constants::ScriptingConstantsPool::instance();
|
|
if ( sid == scriptingConstantsPool.DOC_STORAGE_ID_NOT_SET )
|
|
{
|
|
OSL_TRACE( "@@@@ **** ScriptNameResolverImpl::resolve DOC_STORAGE_ID_NOT_SET" );
|
|
return resolvedScriptInfo;
|
|
}
|
|
try
|
|
{
|
|
Reference< storage::XScriptInfoAccess > storage = getStorageInstance( sid, docURI );
|
|
validateXRef( storage,
|
|
"ScriptNameResolverImpl::resolveURIFromStorageID: cannot get XScriptInfoAccess" );
|
|
Sequence< Reference< storage::XScriptInfo > > results =
|
|
storage->getImplementations( scriptURI );
|
|
|
|
const sal_Int32 length = results.getLength();
|
|
|
|
if ( !length )
|
|
{
|
|
return resolvedScriptInfo;
|
|
}
|
|
|
|
OSL_TRACE( "ScriptNameResolverImpl::resolve Got some results..." );
|
|
// if we get results, just return first in list,
|
|
// storage has already matched language, function name etc. if
|
|
// that information was in the uri
|
|
resolvedScriptInfo = results[ 0 ];
|
|
}
|
|
catch ( lang::IllegalArgumentException & iae )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptRuntimeManager::resolveURIFromStorageID IllegalArgumentException: " );
|
|
throw lang::IllegalArgumentException( temp.concat( iae.Message ),
|
|
Reference< XInterface > (),
|
|
iae.ArgumentPosition );
|
|
}
|
|
catch ( RuntimeException & re )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptRuntimeManager::resolveURIFromStorageID RuntimeException: " );
|
|
throw RuntimeException( temp.concat( re.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
catch ( Exception & e )
|
|
{
|
|
OUString temp = OUSTR(
|
|
"ScriptNameResolverImpl::resolveURIFromStorageID : Exception caught - RuntimeException rethrown" );
|
|
throw RuntimeException( temp.concat( e.Message ),
|
|
Reference< XInterface > () );
|
|
}
|
|
#ifdef _DEBUG
|
|
catch ( ... )
|
|
{
|
|
throw RuntimeException( OUSTR(
|
|
"ScriptNameResolverImpl::resolveURIFromStorageID Unknown exception caught - RuntimeException rethrown" ),
|
|
Reference< XInterface > () );
|
|
}
|
|
#endif
|
|
return resolvedScriptInfo;
|
|
}
|
|
//*************************************************************************
|
|
|
|
Reference< storage::XScriptInfoAccess >
|
|
|
|
ScriptNameResolverImpl::getStorageInstance( sal_Int32 sid,
|
|
const ::rtl::OUString & docURI ) SAL_THROW ( ( RuntimeException ) )
|
|
{
|
|
Reference< storage::XScriptInfoAccess > xScriptInfoAccess;
|
|
try
|
|
{
|
|
Reference< XInterface > xInterface;
|
|
|
|
Any a = m_xContext->getValueByName(
|
|
OUString::createFromAscii( SCRIPTSTORAGEMANAGER_SERVICE ) );
|
|
if ( sal_False == ( a >>= xInterface ) )
|
|
{
|
|
throw RuntimeException(
|
|
OUSTR( "ScriptNameResolverImpl::getStorageInstance: could not obtain ScriptStorageManager singleton" ),
|
|
Reference< XInterface >() );
|
|
}
|
|
validateXRef( xInterface,
|
|
"ScriptNameResolverImpl::getStorageInstance: cannot get Storage service" );
|
|
// check that we have permissions for this storage
|
|
Reference< security::XScriptSecurity > xScriptSecurity( xInterface, UNO_QUERY_THROW );
|
|
validateXRef( xScriptSecurity,
|
|
"ScriptNameResolverImpl::getStorageInstance: cannot get Script Security service" );
|
|
scripting_constants::ScriptingConstantsPool& scriptingConstantsPool =
|
|
scripting_constants::ScriptingConstantsPool::instance();
|
|
// if we dealing with a document storage (ie. not user or share
|
|
// we need to check the permission
|
|
if( ( sid != scriptingConstantsPool.USER_STORAGE_ID ) &&
|
|
( sid != scriptingConstantsPool.SHARED_STORAGE_ID ) &&
|
|
( xScriptSecurity->checkPermission( docURI,
|
|
OUString::createFromAscii( "execute" ) ) == false ) )
|
|
{
|
|
OSL_TRACE( "ScriptNameResolverImpl::getStorageInstance: no permission for ID=%d", sid );
|
|
return xScriptInfoAccess;
|
|
}
|
|
Reference< storage::XScriptStorageManager > xScriptStorageManager( xInterface, UNO_QUERY_THROW );
|
|
validateXRef( xScriptStorageManager,
|
|
"ScriptNameResolverImpl::getStorageInstance: cannot get Script Storage Manager service" );
|
|
Reference< XInterface > xScriptStorage =
|
|
xScriptStorageManager->getScriptStorage( sid );
|
|
validateXRef( xScriptStorage,
|
|
"ScriptNameResolverImpl::getStorageInstance: cannot get Script Storage service" );
|
|
xScriptInfoAccess = Reference<
|
|
storage::XScriptInfoAccess > ( xScriptStorage, UNO_QUERY_THROW );
|
|
}
|
|
catch ( RuntimeException & re )
|
|
{
|
|
OUString temp = OUSTR( "ScriptNameResolverImpl::getStorageInstance: " );
|
|
throw RuntimeException( temp.concat( re.Message ), Reference< XInterface >() );
|
|
}
|
|
catch ( Exception & e )
|
|
{
|
|
OUString temp = OUSTR( "ScriptNameResolverImpl::getStorageInstance: " );
|
|
throw RuntimeException( temp.concat( e.Message ), Reference< XInterface >() );
|
|
}
|
|
return xScriptInfoAccess;
|
|
}
|
|
//*************************************************************************
|
|
Sequence<OUString> SAL_CALL
|
|
ScriptNameResolverImpl::getSupportedServiceNames( )
|
|
throw( RuntimeException )
|
|
{
|
|
return nrs_serviceNames;
|
|
}
|
|
|
|
//*************************************************************************
|
|
Reference< XInterface > SAL_CALL scriptnri_create(
|
|
Reference< XComponentContext > const & xComponentContext )
|
|
SAL_THROW( ( Exception ) )
|
|
{
|
|
return ( cppu::OWeakObject * ) new ScriptNameResolverImpl( xComponentContext );
|
|
}
|
|
|
|
//*************************************************************************
|
|
Sequence< OUString > scriptnri_getSupportedServiceNames() SAL_THROW( () )
|
|
{
|
|
return nrs_serviceNames;
|
|
}
|
|
|
|
//*************************************************************************
|
|
OUString scriptnri_getImplementationName() SAL_THROW( () )
|
|
{
|
|
return nrs_implName;
|
|
}
|
|
} // namespace scripting_runtimemgr
|