259 lines
7.4 KiB
C++
259 lines
7.4 KiB
C++
/*************************************************************************
|
|
*
|
|
* $RCSfile: ScriptURI.cxx,v $
|
|
*
|
|
* $Revision: 1.8 $
|
|
*
|
|
* last change: $Author: npower $ $Date: 2003-10-15 15:03:42 $
|
|
*
|
|
* 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 <osl/diagnose.h>
|
|
#include <osl/file.h>
|
|
|
|
#ifdef _DEBUG
|
|
#include <stdio.h>
|
|
#endif
|
|
|
|
//Local headers
|
|
#include "ScriptURI.hxx"
|
|
#include <util/util.hxx>
|
|
|
|
using namespace ::rtl;
|
|
using namespace ::com::sun::star;
|
|
using namespace ::com::sun::star::uno;
|
|
using namespace ::com::sun::star::lang;
|
|
|
|
|
|
namespace scripting_impl {
|
|
|
|
static const OUString schema = OUString::createFromAscii( "vnd.sun.star.script://" );
|
|
|
|
/**
|
|
* Constructor
|
|
*
|
|
* @param scriptURI the string script URI
|
|
*/
|
|
ScriptURI::ScriptURI( const ::rtl::OUString& scriptURI )
|
|
throw ( IllegalArgumentException ) : m_uri( scriptURI )
|
|
{
|
|
OSL_TRACE( "received uri: %s\n",::rtl::OUStringToOString( m_uri, RTL_TEXTENCODING_ASCII_US).pData->buffer );
|
|
set_values( parseIt() );
|
|
if( !isValid() )
|
|
{
|
|
OSL_TRACE( "ScriptURI ctor: throwing IllegalArgException" );
|
|
throw IllegalArgumentException(
|
|
OUSTR( "Failed to parse invalid URI: " ).concat( scriptURI ),
|
|
Reference < XInterface > (), 1 );
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Destuctor
|
|
*
|
|
*/
|
|
// dtor should never throw exceptions, so ensure this by specifying it
|
|
ScriptURI::~ScriptURI() SAL_THROW( () )
|
|
{
|
|
OSL_TRACE( "< ScriptURI dtor called >\n" );
|
|
}
|
|
|
|
/**
|
|
* This function is used to determine if this object represents a valid URI
|
|
*
|
|
*/
|
|
bool ScriptURI::isValid( ) {
|
|
return ( m_valid == sal_True );
|
|
}
|
|
|
|
/**
|
|
* This function returns the location of the script
|
|
*
|
|
*/
|
|
::rtl::OUString ScriptURI::getLocation( )
|
|
{
|
|
return m_location;
|
|
}
|
|
|
|
/**
|
|
* This function returns the language of the script, eg. java, StarBasic,...
|
|
*
|
|
*/
|
|
::rtl::OUString ScriptURI::getLanguage( )
|
|
{
|
|
return m_language;
|
|
}
|
|
|
|
/**
|
|
* This function returns the language dependent function name of the script
|
|
*
|
|
*/
|
|
::rtl::OUString ScriptURI::getFunctionName( )
|
|
{
|
|
return m_functionName;
|
|
}
|
|
|
|
/**
|
|
* This function returns the language independent logical name of the script
|
|
*
|
|
*/
|
|
::rtl::OUString ScriptURI::getLogicalName( )
|
|
{
|
|
return m_logicalName;
|
|
}
|
|
|
|
/**
|
|
* This function returns the full URI
|
|
*
|
|
*/
|
|
::rtl::OUString ScriptURI::getURI( )
|
|
{
|
|
return m_uri;
|
|
}
|
|
|
|
//Private mutex guarded method for setting the members
|
|
void ScriptURI::set_values( scripting_impl::Uri values )
|
|
{
|
|
osl::Guard< ::osl::Mutex > aGuard( m_mutex );
|
|
m_valid = values.valid;
|
|
m_location = values.location;
|
|
m_language = values.language;
|
|
// format is vnd.sun.star.script://[function_name]?language=[languge]&location=[location]
|
|
// LogicalName is now not used anymore, further more the ScriptURI class
|
|
// will be retired also and a new UNO service will be used. Additionally the
|
|
// parcel-description will also need to be modified to remove logical name
|
|
// In order to temporarly support the existing code functionname is
|
|
// set to the logica name parsed by this class. So getLogicalName() and
|
|
// getFunctionName() return identical string.
|
|
//
|
|
|
|
m_functionName = values.logicalName;
|
|
m_logicalName = values.logicalName;
|
|
|
|
}
|
|
/**
|
|
* This is a private method used for parsing the URI received by the
|
|
* initialization.
|
|
*
|
|
*/
|
|
// rather naive parsing?
|
|
Uri ScriptURI::parseIt()
|
|
{
|
|
sal_Int32 schemaLen = schema.getLength();
|
|
scripting_impl::Uri results;
|
|
results.valid = sal_True;
|
|
//attempt to parse
|
|
// check that it starts vnd.sun.star.script
|
|
// better check for OBO errors here
|
|
if( m_uri.indexOf( schema ) != 0 )
|
|
{
|
|
OSL_TRACE( "wrong schema" );
|
|
results.valid=sal_False;
|
|
return results;
|
|
}
|
|
|
|
// substr from here to the '?' and set the logical name
|
|
sal_Int32 len = m_uri.indexOf( '?' );
|
|
if( len == -1 )
|
|
{
|
|
// no queries so just set the logical name
|
|
results.logicalName = m_uri.copy( schemaLen );
|
|
return results;
|
|
}
|
|
results.logicalName = m_uri.copy( schemaLen, len-schemaLen );
|
|
OSL_TRACE( "log name: %s\n", ::rtl::OUStringToOString( results.logicalName,
|
|
RTL_TEXTENCODING_ASCII_US ).pData->buffer );
|
|
|
|
len++;
|
|
// now get the attributes
|
|
OUString attr;
|
|
do
|
|
{
|
|
attr = m_uri.getToken( 0, '&', len );
|
|
OSL_TRACE( "chunk: %s\n", ::rtl::OUStringToOString( attr,
|
|
RTL_TEXTENCODING_ASCII_US ).pData->buffer );
|
|
|
|
if( attr.matchAsciiL( RTL_CONSTASCII_STRINGPARAM( "language" ) )
|
|
== sal_True )
|
|
{
|
|
sal_Int32 len2 = attr.indexOf('=');
|
|
results.language = attr.copy( len2 + 1 );
|
|
continue;
|
|
}
|
|
else if ( attr.matchAsciiL( RTL_CONSTASCII_STRINGPARAM( "location" ) )
|
|
== sal_True )
|
|
{
|
|
sal_Int32 len2 = attr.indexOf( '=' );
|
|
results.location = attr.copy( len2 + 1 );
|
|
continue;
|
|
}
|
|
else if ( attr.matchAsciiL( RTL_CONSTASCII_STRINGPARAM( "function" ) )
|
|
== sal_True )
|
|
{
|
|
sal_Int32 len2 = attr.indexOf( '=' );
|
|
results.functionName = attr.copy( len2 + 1 );
|
|
continue;
|
|
}
|
|
else
|
|
{
|
|
OSL_TRACE( "Unknown attribute?\n" );
|
|
}
|
|
}
|
|
while ( len >= 0 );
|
|
|
|
// parse is good
|
|
return results;
|
|
}
|
|
|
|
} // namespace script_uri
|