/************************************************************************* * * $RCSfile: ActiveMSPList.cxx,v $ * * $Revision: 1.1 $ * * last change: $Author: npower $ $Date: 2003-09-04 07:23:28 $ * * 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 #include #include #include #include #include #include #include #include #include "ActiveMSPList.hxx" using namespace com::sun::star; using namespace com::sun::star::uno; using namespace drafts::com::sun::star::script::framework; namespace func_provider { class BrowseNodeImpl : public ::cppu::WeakImplHelper1< browse::XBrowseNode > { public: BrowseNodeImpl( const Reference< provider::XScriptProvider >& msp, const ::rtl::OUString& location ): m_sNodeName( location ), m_xSP( msp ) { // strip out the last leaf of location name // e.g. file://dir1/dir2/Blah.sxw - > Blah.sxw ::rtl::OUString temp = location; sal_Int32 lastSlashIndex = temp.lastIndexOf( ::rtl::OUString::createFromAscii( "/" ) ); if ( ( lastSlashIndex + 1 ) < temp.getLength() ) { temp = temp.copy( lastSlashIndex + 1 ); } // maybe we should throw here!!! else { OSL_TRACE("Something wrong with name, perhaps we should throw an exception"); } m_sNodeName = temp ; } virtual ::rtl::OUString SAL_CALL getName() throw ( RuntimeException ) { return m_sNodeName; } virtual Sequence< Reference< browse::XBrowseNode > > SAL_CALL getChildNodes() throw ( RuntimeException ) { Reference < provider::XScriptProviderAccess > providerGetter( m_xSP, UNO_QUERY ); Sequence< Reference< provider::XScriptProvider > > providers = providerGetter->getAllProviders(); Sequence< Reference< browse::XBrowseNode > > children( providers.getLength() ); for ( sal_Int32 index = 0; index < providers.getLength(); index++ ) { children[ index ] = Reference< browse::XBrowseNode >( providers[ index ], UNO_QUERY ); } return children; } virtual sal_Bool SAL_CALL hasChildNodes() throw ( RuntimeException ) { return true; //will always be user and share } virtual sal_Int16 SAL_CALL getType() throw ( RuntimeException ) { return browse::BrowseNodeTypes::CONTAINER; } private: ::rtl::OUString m_sNodeName; Reference < provider::XScriptProvider > m_xSP; }; ActiveMSPList::ActiveMSPList( const Reference< XComponentContext > & xContext ) : m_xContext( xContext ) { OSL_TRACE("ActiveMSPList::ActiveMSPList) - ctor"); // needs some exception handling Any aAny = m_xContext->getValueByName( ::rtl::OUString::createFromAscii( "/singletons/com.sun.star.util.theMacroExpander" ) ); Reference< util::XMacroExpander > xME; if ( sal_False == ( aAny >>= xME ) ) { OSL_TRACE("Couln't locate user or share directories"); } else { ::rtl::OUString base = ::rtl::OUString::createFromAscii( SAL_CONFIGFILE( "${$SYSBINDIR/bootstrap" ) ); ::rtl::OUString user = ::rtl::OUString::createFromAscii( "::UserInstallation}/user" ); ::rtl::OUString share = ::rtl::OUString::createFromAscii( "::BaseInstallation}/share" ); userDirString = xME->expandMacros( base.concat( user ) ); shareDirString = xME->expandMacros( base.concat( share ) ); } } ActiveMSPList::~ActiveMSPList() { OSL_TRACE("ActiveMSPList::ActiveMSPList) - dtor"); } void ActiveMSPList::addActiveMSP( const Reference< frame::XModel >& xModel, const Reference< dcsssf::provider::XScriptProvider >& msp ) { // add self as listener for document dispose // should probably throw from this method!!, reexamine try { Reference< lang::XComponent > xComponent = Reference< lang::XComponent >( xModel, UNO_QUERY_THROW ); validateXRef( xComponent, "ActiveMSPList::addActiveMSP: model not XComponent\n" ); xComponent->addEventListener( this ); } catch ( RuntimeException& e ) { OSL_TRACE("ActiveMSPList::addActiveMSP() failed to add self as listener: %s", ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } ::rtl::OUString doc = getDocNameOrURLFromModel( xModel ); if ( doc.getLength() != 0 ) { ::osl::MutexGuard guard( m_mutex ); Model_map::const_iterator itr = m_mModels.find( xModel ); if ( itr != m_mModels.end() ) { OSL_TRACE("ActiveMSPList::addActiveMSP() have MSP for model already" ); } else { MspInst theMsp; theMsp.docName = doc; theMsp.provider = msp; m_mModels[ xModel ] = theMsp; } } else { OSL_TRACE("ActiveMSPList::addActiveMSP() couldn't get document name from model" ); } } //************************************************************************* void SAL_CALL ActiveMSPList::disposing( const ::com::sun::star::lang::EventObject& Source ) throw ( ::com::sun::star::uno::RuntimeException ) { OSL_TRACE("ActiveMSPList::disposing() "); Reference< frame::XModel > xModel; try { Reference< XInterface > xInterface = Source.Source; xModel = Reference< frame::XModel > ( xInterface, UNO_QUERY ); if ( xModel.is() ) { OSL_TRACE("ActiveMSPList::disposing() model is valid"); ::osl::MutexGuard guard( m_mutex ); Model_map::const_iterator itr = m_mModels.find( xModel ); if ( itr != m_mModels.end() ) { OSL_TRACE("ActiveMSPList::disposing() model for doc %s exists in map", ::rtl::OUStringToOString( xModel->getURL(), RTL_TEXTENCODING_ASCII_US ).pData->buffer ); m_mModels.erase( xModel ); } } else { OSL_TRACE("ActiveMSPList::disposing() doc model invalid or unknown" ); } } catch ( RuntimeException& e ) { // if we get an exception here, there is not much we can do // about it can't throw as it will screw up the model that is calling dispose ::rtl::OUString message = OUSTR( "ActiveMSPList::disposing: document invalid model." ); message = message.concat( e.Message ); OSL_TRACE( ::rtl::OUStringToOString( message, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } } ::rtl::OUString ActiveMSPList::getDocNameOrURLFromModel( const Reference< frame::XModel >& xModel ) { ::rtl::OUString docNameOrURL; if ( xModel.is() ) { if ( xModel->getURL().getLength() != 0) { docNameOrURL = xModel->getURL(); OSL_TRACE("ActiveMSPList::getDocNameOrURLFromModel() url for document %s.", ::rtl::OUStringToOString( docNameOrURL, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } else // Untitled document { ::rtl::OUString tempName; try { Reference< beans::XPropertySet > propSet( xModel->getCurrentController()->getFrame(), UNO_QUERY ); if ( propSet.is() ) { if ( sal_True == ( propSet->getPropertyValue(::rtl::OUString::createFromAscii( "Title" ) ) >>= tempName ) ) { // process "UntitledX - YYYYYYYY" // to get UntitledX sal_Int32 pos = 0; docNameOrURL = tempName.getToken(0,' ',pos); OSL_TRACE("ActiveMSPList::getDocNameOrURLFromModel() Title for document is %s.", ::rtl::OUStringToOString( docNameOrURL, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } } else { OSL_TRACE("ActiveMSPList::getDocNameOrURLFromModel() doc model invalid" ); } } catch ( Exception& e ) { OSL_TRACE("ActiveMSPList::getDocNameOrURLFromModel() exception thrown: ", ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } } } else { OSL_TRACE("ActiveMSPList::getDocNameOrURLFromModel() doc model is null" ); } return docNameOrURL; } ActiveMSPList& ActiveMSPList::instance( const Reference< XComponentContext > & xContext ) { static ActiveMSPList* inst = 0; static Reference< lang::XEventListener > holder; if ( !inst ) { ::osl::MutexGuard guard( ::osl::Mutex::getGlobalMutex() ); if ( !inst ) { inst = new ActiveMSPList( xContext ); holder = inst; } } return *inst; } void ActiveMSPList::createNonDocMSPs() { static bool created = false; if ( created ) { return; } else { ::osl::MutexGuard guard( m_mutex ); if ( created ) { return; } // do creation of user and share MSPs here ::rtl::OUString serviceName = ::rtl::OUString::createFromAscii("drafts.com.sun.star.script.framework.provider.MasterScriptProvider"); Sequence< Any > args(1); args[ 0 ] <<= userDirString; Reference< provider::XScriptProvider > userMsp( m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( serviceName, args, m_xContext ), UNO_QUERY ); // should check if provider reference is valid m_hMsps[ userDirString ] = userMsp; args[ 0 ] <<= shareDirString; Reference< provider::XScriptProvider > shareMsp( m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( serviceName, args, m_xContext ), UNO_QUERY ); // should check if provider reference is valid m_hMsps[ shareDirString ] = shareMsp; created = true; } } ::rtl::OUString SAL_CALL ActiveMSPList::getName() throw ( css::uno::RuntimeException ) { return ::rtl::OUString::createFromAscii("Root"); } Sequence< Reference< browse::XBrowseNode > > SAL_CALL ActiveMSPList::getChildNodes() throw ( css::uno::RuntimeException ) { // 1. create a XBrowseNodeImpl (location )node for each MSP in the ActiveMSPList // 2. add each Provider as a childNode for (location ) node // create user & share MSP's if needed ::osl::MutexGuard guard( m_mutex ); createNonDocMSPs(); // number of child nodes is number of providers for application ( user & share ) // + providers for active documents sal_Int32 numChildNodes = m_hMsps.size() + m_mModels.size(); // get providers for application Msp_hash::iterator h_itEnd = m_hMsps.end(); Sequence< Reference< browse::XBrowseNode > > children( numChildNodes ); sal_Int32 count = 0; for ( Msp_hash::iterator h_it = m_hMsps.begin(); h_it != h_itEnd; ++h_it ) { OSL_TRACE("Adding application browsenode index [ %d ]", count ); children[ count++ ] = new BrowseNodeImpl( h_it->second, h_it->first ); } // get providers for active documents Model_map::iterator m_itEnd = m_mModels.end(); for ( Model_map::iterator m_it = m_mModels.begin(); m_it != m_itEnd; ++m_it ) { OSL_TRACE("Adding document browsenode index [ %d ]", count ); ::rtl::OUString docName = m_it->second.docName; if ( m_it->first->getURL().getLength() > 0 ) { if ( ! m_it->second.docName.equals( m_it->first->getURL() ) ) { OSL_TRACE("Need to change doc name" ); m_it->second.docName = m_it->first->getURL(); } } children[ count++ ] = new BrowseNodeImpl( m_it->second.provider, m_it->second.docName ); } return children; } sal_Bool SAL_CALL ActiveMSPList::hasChildNodes() throw ( css::uno::RuntimeException ) { return sal_True; } sal_Int16 SAL_CALL ActiveMSPList::getType() throw ( css::uno::RuntimeException ) { return browse::BrowseNodeTypes::ROOT; } } // namespace func_provider