diff options
Diffstat (limited to 'scripting/source/runtimemgr/ScriptNameResolverImpl.cxx')
-rw-r--r-- | scripting/source/runtimemgr/ScriptNameResolverImpl.cxx | 611 |
1 files changed, 0 insertions, 611 deletions
diff --git a/scripting/source/runtimemgr/ScriptNameResolverImpl.cxx b/scripting/source/runtimemgr/ScriptNameResolverImpl.cxx deleted file mode 100644 index 5e7b571a0970..000000000000 --- a/scripting/source/runtimemgr/ScriptNameResolverImpl.cxx +++ /dev/null @@ -1,611 +0,0 @@ -/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ -/* - * This file is part of the LibreOffice project. - * - * This Source Code Form is subject to the terms of the Mozilla Public - * License, v. 2.0. If a copy of the MPL was not distributed with this - * file, You can obtain one at http://mozilla.org/MPL/2.0/. - * - * This file incorporates work covered by the following license notice: - * - * Licensed to the Apache Software Foundation (ASF) under one or more - * contributor license agreements. See the NOTICE file distributed - * with this work for additional information regarding copyright - * ownership. The ASF licenses this file to you under the Apache - * License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 . - */ - - -#include <vector> -#include <stdlib.h> - -#include <cppuhelper/implementationentry.hxx> -#include <com/sun/star/beans/XPropertySet.hpp> -#include <com/sun/star/security/AccessControlException.hpp> -#include <com/sun/star/ucb/SimpleFileAccess.hpp> -#include <com/sun/star/ucb/XSimpleFileAccess2.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( - "drafts.com.sun.star.script.framework.runtime.DefaultScriptNameResolver" ); -OUString nrs_serviceName( - "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, UNO_SET_THROW ) -{ - OSL_TRACE( "< ScriptNameResolverImpl ctor called >" ); - validateXRef( m_xContext, "ScriptNameResolverImpl::ScriptNameResolverImpl: invalid context" ); - m_xMultiComFac.set( m_xContext->getServiceManager(), UNO_SET_THROW ); - - 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 >" ); - 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 filesysScriptStorageID = -1; - Reference < storage::XScriptStorageManager > xScriptStorageMgr; - 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 ( const 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("location=document"); - OUString userString("location=user"); - OUString shareString("location=share"); - OUString filesysString("location=filesystem"); - - // 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 if ( scriptURI.indexOf( filesysString ) != -1 ) - { - OSL_TRACE("Full resolution available, create & search filesystem"); - OUString filesysURL; - try - { - filesysURL = getFilesysURL( scriptURI ); - } - catch ( const lang::IllegalArgumentException & e ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::resolve: " ); - throw RuntimeException( temp.concat( e.Message ), Reference< XInterface >() ); - } - Reference < ucb::XSimpleFileAccess2 > xSimpleFileAccess = ucb::SimpleFileAccess::create(m_xContext); - - // do we need to encode this? hope not. - OSL_TRACE( ">>>> About to create storage for %s", - ::rtl::OUStringToOString( filesysURL, - RTL_TEXTENCODING_ASCII_US ).pData->buffer ); - // ask storage manager to create storage - try - { - // need to get the ScriptStorageManager - xScriptStorageMgr.set( m_xContext->getValueByName( - scriptingConstantsPool.SCRIPTSTORAGEMANAGER_SERVICE ), UNO_QUERY_THROW ); - filesysScriptStorageID = - xScriptStorageMgr->createScriptStorageWithURI( - xSimpleFileAccess, filesysURL ); - OSL_TRACE( ">>>> Created storage %d - for %s ", - filesysScriptStorageID, ::rtl::OUStringToOString( - filesysURL, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); - } - catch ( const RuntimeException & e ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::resolve: " ); - throw RuntimeException( temp.concat( e.Message ), Reference< XInterface >() ); - } - m_vSearchIDs[ 0 ] = filesysScriptStorageID; - 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( "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 ( css::security::AccessControlException & ) - { - // no execute permission - OSL_TRACE( "ScriptNameResolverImpl::resolve : AccessControlException " ); - continue; - } - catch ( const beans::UnknownPropertyException & e ) - { - OUString temp = OUSTR( - "ScriptNameResolverImpl::resolve : UnknownPropertyException" ); - throw RuntimeException( temp.concat( e.Message ), - Reference< XInterface > () ); - } - catch ( const beans::PropertyVetoException & e ) - { - OUString temp = OUSTR( - "ScriptNameResolverImpl::resolve : PropertyVetoException " ); - throw RuntimeException( temp.concat( e.Message ), - Reference< XInterface > () ); - } - catch ( const lang::IllegalArgumentException & e ) - { - OUString temp = OUSTR( - "ScriptNameResolverImpl::resolve : IllegalArgumentException " ); - throw lang::IllegalArgumentException( temp.concat( e.Message ), - Reference< XInterface > (), e.ArgumentPosition ); - } - catch ( const lang::WrappedTargetException & e ) - { - OUString temp = OUSTR( - "ScriptNameResolverImpl::resolve : WrappedTargetException " ); - throw RuntimeException( temp.concat( e.Message ), - Reference< XInterface > () ); - } - catch ( const 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 - - } - if ( !resolvedName.is() ) - { - if( filesysScriptStorageID > 2 ) - { - // get the filesys storage and dispose of it - Reference< XInterface > xScriptStorage( xScriptStorageMgr->getScriptStorage( filesysScriptStorageID ), UNO_SET_THROW ); - Reference< storage::XScriptInfoAccess > xScriptInfoAccess = Reference< - storage::XScriptInfoAccess > ( xScriptStorage, UNO_QUERY_THROW ); - Sequence< Reference< storage::XScriptInfo > > results = - xScriptInfoAccess->getAllImplementations( ); - Reference < lang::XEventListener > xEL_ScriptStorageMgr( xScriptStorageMgr ,UNO_QUERY_THROW ); - lang::EventObject event( results[ 0 ] ); - xEL_ScriptStorageMgr->disposing( event ); - } - throw lang::IllegalArgumentException( OUSTR( - "ScriptNameResolverImpl::resolve: no script found for uri=" ).concat( scriptURI ), - Reference< XInterface > (), 0 ); - } - 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, css::security::AccessControlException, 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 - { - OUString permissionURI = docURI; - OUString filesysString("location=filesystem"); - if ( scriptURI.indexOf( filesysString ) != -1 ) - { - // in the case of filesys scripts we're checking whether the - // location of the script, rather than the location of the document, - // has execute permission - try - { - permissionURI = getFilesysURL( scriptURI ); - } - catch ( const lang::IllegalArgumentException & e ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::resolveFromURI: " ); - throw RuntimeException( temp.concat( e.Message ), Reference< XInterface >() ); - } - } - Reference< storage::XScriptInfoAccess > storage( getStorageInstance( sid, permissionURI ), UNO_SET_THROW ); - 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 ( const css::security::AccessControlException & ace ) - { - OUString temp = OUSTR( - "ScriptRuntimeManager::resolveURIFromStorageID AccessControlException: " ); - throw css::security::AccessControlException( temp.concat( ace.Message ), - Reference< XInterface > (), - ace.LackingPermission ); - } - catch ( const lang::IllegalArgumentException & iae ) - { - OUString temp = OUSTR( - "ScriptRuntimeManager::resolveURIFromStorageID IllegalArgumentException: " ); - throw lang::IllegalArgumentException( temp.concat( iae.Message ), - Reference< XInterface > (), - iae.ArgumentPosition ); - } - catch ( const RuntimeException & re ) - { - OUString temp = OUSTR( - "ScriptRuntimeManager::resolveURIFromStorageID RuntimeException: " ); - throw RuntimeException( temp.concat( re.Message ), - Reference< XInterface > () ); - } - catch ( const 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 & permissionURI ) SAL_THROW ( ( RuntimeException, css::security::AccessControlException, lang::IllegalArgumentException ) ) -{ - Reference< storage::XScriptInfoAccess > xScriptInfoAccess; - try - { - Reference< XInterface > xInterface( m_xContext->getValueByName( - OUString::createFromAscii( SCRIPTSTORAGEMANAGER_SERVICE ) ), UNO_QUERY_THROW ); - // check that we have permissions for this storage - Reference< ::drafts::com::sun::star::script::framework::security::XScriptSecurity > xScriptSecurity( xInterface, UNO_QUERY_THROW ); - 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( permissionURI, - OUString("execute") ); - // if we get here, the checkPermission hasn't thrown an - // AccessControlException, ie. permission has been granted - OSL_TRACE( "ScriptNameResolverImpl::getStorageInstance: got execute permission for ID=%d", sid ); - } - Reference< storage::XScriptStorageManager > xScriptStorageManager( xInterface, UNO_QUERY_THROW ); - Reference< XInterface > xScriptStorage( ScriptStorageManager->getScriptStorage( sid ), UNO_SET_THROW ); - xScriptInfoAccess.set( xScriptStorage, UNO_QUERY_THROW ); - } - catch ( const lang::IllegalArgumentException & e ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::getStorageInstance: " ); - throw lang::IllegalArgumentException( temp.concat( e.Message ), - Reference< XInterface >(), e.ArgumentPosition ); - } - catch ( const css::security::AccessControlException & e ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::getStorageInstance: AccessControlException " ); - throw css::security::AccessControlException( temp.concat( e.Message ), Reference< XInterface >(), e.LackingPermission ); - } - catch ( const RuntimeException & re ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::getStorageInstance: " ); - throw RuntimeException( temp.concat( re.Message ), Reference< XInterface >() ); - } - catch ( const Exception & e ) - { - OUString temp = OUSTR( "ScriptNameResolverImpl::getStorageInstance: " ); - throw RuntimeException( temp.concat( e.Message ), Reference< XInterface >() ); - } - return xScriptInfoAccess; -} -//************************************************************************* -OUString -ScriptNameResolverImpl::getFilesysURL( const OUString & scriptURI ) -throw( lang::IllegalArgumentException ) -{ - OUString filePath; - OUString fileName; - OUString filesysString("location=filesystem"); - sal_Int32 locationPos = scriptURI.indexOf( filesysString ); - // expect location=filesys:file:///foo/bar/myscript.bsh etc - // except the file url at this point is encoded - // so we should be ok searching for the '&' - sal_Int32 filesysStrLen = filesysString.getLength() + 1; - sal_Int32 endOfLocn = scriptURI.indexOf( '&', locationPos ); - if (endOfLocn == -1 ) - { - filePath = scriptURI.copy( locationPos + filesysString.getLength() + 1 ); - } - else - { - filePath = scriptURI.copy( locationPos + filesysStrLen, - endOfLocn - locationPos - filesysStrLen ); - } - //file name shoul also be encoded so again ok to search for '&' - OUString functionKey("function="); - sal_Int32 functionKeyLength = functionKey.getLength(); - sal_Int32 functionNamePos = scriptURI.indexOf( functionKey ); - if ( functionNamePos > 0 ) - { - sal_Int32 endOfFn = scriptURI.indexOf( '&', functionNamePos ); - if ( endOfFn == -1 ) - { - fileName = scriptURI.copy( functionNamePos + functionKeyLength ); - } - else - { - fileName = scriptURI.copy( functionNamePos + functionKeyLength, - endOfFn - functionNamePos - functionKeyLength ); - } - } - else - { - // we need to throw - OUString temp = OUSTR( "ScriptNameResolverImpl::getFilesysURL: error getting the filesysURL" ); - throw lang::IllegalArgumentException( temp, Reference< XInterface >(), 0 ); - } - filePath+=fileName; - OSL_TRACE( "ScriptNameResolverImpl::getFilesysURL: filesys URL = %s", - ::rtl::OUStringToOString( filePath, - RTL_TEXTENCODING_ASCII_US ).pData->buffer ); - return filePath; -} -//************************************************************************* -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 - -/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |