336 lines
13 KiB
C++
336 lines
13 KiB
C++
/*************************************************************************
|
|
*
|
|
* $RCSfile: ScriptNameResolverImpl.cxx,v $
|
|
*
|
|
* $Revision: 1.2 $
|
|
*
|
|
* last change: $Author: aledoux $ $Date: 2002-09-24 12:59:31 $
|
|
*
|
|
* 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 <stdio.h>
|
|
#include <vector>
|
|
|
|
#include <cppuhelper/implementationentry.hxx>
|
|
#include <util/util.hxx>
|
|
#include <util/scriptingconstants.hxx>
|
|
|
|
#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 SERVICE_NAME="drafts.com.sun.star.script.framework.DefaultScriptNameResolver";
|
|
const sal_Char* const IMPL_NAME="drafts.com.sun.star.script.framework.DefaultScriptNameResolver";
|
|
const sal_Char* const LANGUAGE_TO_RESOLVE_ON="Java"; // should be configurable
|
|
OUString nrs_implName = OUString::createFromAscii(IMPL_NAME);
|
|
OUString nrs_serviceName = OUString::createFromAscii(SERVICE_NAME);
|
|
Sequence< OUString > nrs_serviceNames = Sequence< OUString >( &nrs_serviceName, 1 );
|
|
|
|
const sal_Int16 SHARED_STORAGE_ID = 1; // should be in constants def file!!!!???? TBD
|
|
const sal_Int16 USER_STORAGE_ID = 0;
|
|
const sal_Int16 DOC_STORAGE_ID_NOT_SET = -1;
|
|
extern ::rtl_StandardModuleCount s_moduleCount;
|
|
|
|
// define storages to search
|
|
::std::vector< int > SEARCHSIDS;
|
|
|
|
//*************************************************************************
|
|
ScriptNameResolverImpl::ScriptNameResolverImpl(const Reference< XComponentContext > & xContext ):m_xContext(xContext),mStorageFactory(xContext)
|
|
{
|
|
OSL_TRACE( "< ScriptNameResolverImpl ctor called >\n" );
|
|
SEARCHSIDS.clear();
|
|
SEARCHSIDS.push_back(DOC_STORAGE_ID_NOT_SET);
|
|
SEARCHSIDS.push_back(USER_STORAGE_ID);
|
|
SEARCHSIDS.push_back(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< scripturi::XScriptURI >
|
|
ScriptNameResolverImpl::resolve(const Reference<scripturi::XScriptURI> & scriptURI, Any& invocationCtx)
|
|
throw (lang::IllegalArgumentException, script::CannotConvertException, RuntimeException)
|
|
{
|
|
|
|
Reference <scripturi::XScriptURI> resolvedName;
|
|
Reference< beans::XPropertySet > xPropSetScriptingContext;
|
|
OSL_TRACE( "ScriptNameResolverImpl::resolve: in resolve - start" );
|
|
|
|
if (sal_False == (invocationCtx >>= xPropSetScriptingContext))
|
|
{
|
|
throw RuntimeException(OUSTR("ScriptNameResolverImpl::resolve : unable to get XScriptingContext from invocationCtx in/out param"), Reference<XInterface> ());
|
|
}
|
|
|
|
Any any;
|
|
OUString docUri;
|
|
sal_Int16 docSid;
|
|
try
|
|
{
|
|
any = xPropSetScriptingContext->getPropertyValue( scripting_constants::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( scripting_constants::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
|
|
|
|
|
|
#ifdef _DEBUG
|
|
::rtl::OString docUriO(::rtl::OUStringToOString(docUri ,RTL_TEXTENCODING_ASCII_US));
|
|
fprintf(stderr,"ScriptNameResolverImpl::resolve: *** >>> DOC URI: %s, doc sid is %d\n", docUriO.pData->buffer,docSid);
|
|
#endif
|
|
|
|
|
|
OSL_TRACE("ScriptNameResolverImpl::resolve Starting...");
|
|
SEARCHSIDS[0] = docSid;
|
|
::std::vector< int >::const_iterator iter;
|
|
|
|
|
|
for ( iter = SEARCHSIDS.begin() ; iter != SEARCHSIDS.end(); ++iter)
|
|
{
|
|
try
|
|
{
|
|
OSL_TRACE("** about to resolve from storage using id %d from vector of size %d",*iter,SEARCHSIDS.size());
|
|
if ( (resolvedName = resolveURIFromStorageID(*iter,scriptURI) ).is() )
|
|
{
|
|
OSL_TRACE("found match in uri from storage %d",*iter);
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
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);
|
|
}
|
|
#ifdef _DEBUG
|
|
catch ( ... )
|
|
{
|
|
OSL_TRACE("unknown exception thrown by storage %d, failed to match uri",*iter);
|
|
}
|
|
#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< scripturi::XScriptURI >
|
|
ScriptNameResolverImpl::resolveURIFromStorageID(sal_Int16 sid, const Reference< scripturi::XScriptURI >& scriptURI) SAL_THROW ( (lang::IllegalArgumentException, RuntimeException) )
|
|
{
|
|
|
|
#ifdef _DEBUG
|
|
|
|
::rtl::OString locationO(::rtl::OUStringToOString(scriptURI->getLocation(),RTL_TEXTENCODING_ASCII_US));
|
|
::rtl::OString languageO(::rtl::OUStringToOString(scriptURI->getLanguage(),RTL_TEXTENCODING_ASCII_US));
|
|
::rtl::OString functionName(::rtl::OUStringToOString(scriptURI->getFunctionName(),RTL_TEXTENCODING_ASCII_US));
|
|
::rtl::OString logicalName(::rtl::OUStringToOString(scriptURI->getLogicalName(),RTL_TEXTENCODING_ASCII_US));
|
|
fprintf(stderr,"trying to resolve URI, {location = %s}, {language = %s}, {funtionName = %s}, {logicalName = %s}\n", locationO.pData->buffer, languageO.pData->buffer,functionName.pData->buffer, logicalName.pData->buffer);
|
|
#endif
|
|
|
|
Reference< scripturi::XScriptURI > resolvedName;
|
|
if ( sid == DOC_STORAGE_ID_NOT_SET )
|
|
{
|
|
return resolvedName;
|
|
|
|
}
|
|
try
|
|
{
|
|
Reference<storage::XScriptImplAccess> storage = mStorageFactory.getStorageInstance(sid);
|
|
validateXRef(storage, "ScriptNameResolverImpl::resolveURIFromStorageID: cannot get XScriptImplAccess");
|
|
Sequence< Reference< scripturi::XScriptURI > > results = storage->getImplementations(scriptURI);
|
|
if ( !results.getLength() )
|
|
{
|
|
return resolvedName;
|
|
}
|
|
|
|
OSL_TRACE("ScriptNameResolverImpl::resolve Got some results...");
|
|
for(int index=0;index<results.getLength();index++)
|
|
{
|
|
Reference< scripturi::XScriptURI > uri = results[index];
|
|
#ifdef _DEBUG
|
|
|
|
::rtl::OString locationO(::rtl::OUStringToOString(uri->getLocation(),RTL_TEXTENCODING_ASCII_US));
|
|
::rtl::OString languageO(::rtl::OUStringToOString(uri->getLanguage(),RTL_TEXTENCODING_ASCII_US));
|
|
::rtl::OString functionName(::rtl::OUStringToOString(uri->getFunctionName(),RTL_TEXTENCODING_ASCII_US));
|
|
::rtl::OString logicalName(::rtl::OUStringToOString(uri->getLogicalName(),RTL_TEXTENCODING_ASCII_US));
|
|
fprintf(stderr,"[%d] URI, {location = %s}, {language = %s}, {funtionName = %s}, {logicalName = %s}\n",
|
|
index, locationO.pData->buffer, languageO.pData->buffer,functionName.pData->buffer, logicalName.pData->buffer);
|
|
#endif
|
|
|
|
// just choose first one that has language=LANGUAGE_TO_RESOLVE_ON
|
|
::rtl::OUString language(uri->getLanguage());
|
|
|
|
if (( language.compareToAscii(LANGUAGE_TO_RESOLVE_ON)== 0))
|
|
{
|
|
OSL_TRACE("Found desired language\n");
|
|
resolvedName = uri;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
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 : Unknown 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 resolvedName;
|
|
}
|
|
//*************************************************************************
|
|
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
|