/************************************************************************* * * $RCSfile: ActiveMSPList.cxx,v $ * * $Revision: 1.4 $ * * last change: $Author: rt $ $Date: 2004-01-05 14:14:04 $ * * 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 "MasterScriptProvider.hxx" #include "ActiveMSPList.hxx" using namespace com::sun::star; using namespace com::sun::star::uno; using namespace drafts::com::sun::star::script; namespace func_provider { class BrowseNodeImpl : public ::cppu::WeakImplHelper1< browse::XBrowseNode > { public: BrowseNodeImpl( const Reference< provider::XScriptProvider >& msp, const ::rtl::OUString& location ): m_xSP( msp ) { m_sNodeName = parseLocationName( location ); } virtual ::rtl::OUString SAL_CALL getName() throw ( RuntimeException ) { return m_sNodeName; } virtual Sequence< Reference< browse::XBrowseNode > > SAL_CALL getChildNodes() throw ( RuntimeException ) { MasterScriptProvider* providerGetter = static_cast< MasterScriptProvider* >( m_xSP.get() ); 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; } protected: ::rtl::OUString parseLocationName( const ::rtl::OUString& location ) { // 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"); } return temp; } BrowseNodeImpl(){} ::rtl::OUString m_sNodeName; Reference < provider::XScriptProvider > m_xSP; }; class DocBrowseNodeImpl : public BrowseNodeImpl { public: DocBrowseNodeImpl( const Reference< provider::XScriptProvider >& msp, const Reference< frame::XModel >& xModel ) : m_xModel( xModel ) { OSL_TRACE("DocBrowseNodeImpl() ctor"); m_sNodeName = parseLocationName( getTitleFromModel( m_xModel ) ); m_xSP = msp; } virtual ::rtl::OUString SAL_CALL getName() throw ( RuntimeException ) { if ( m_xModel->getURL().getLength() > 0 ) { ::rtl::OUString docName = getTitleFromModel( m_xModel ); if ( !m_sNodeName.equals( docName ) ) { OSL_TRACE("DocBrowseNodeImpl::getName() have to change name"); m_sNodeName = docName; } } return m_sNodeName; } private: Reference< frame::XModel > m_xModel; ::rtl::OUString getTitleFromModel( const Reference< frame::XModel >& xModel ) { { // Set a default name, this should never be seen. ::rtl::OUString docNameOrURL; docNameOrURL = ::rtl::OUString::createFromAscii("Unknown"); if ( xModel.is() ) { ::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 ) ) { docNameOrURL = tempName; if ( xModel->getURL().getLength() == 0 ) { // process "UntitledX - YYYYYYYY" // to get UntitledX sal_Int32 pos = 0; docNameOrURL = tempName.getToken(0,' ',pos); OSL_TRACE("DocBrowseNodeImpl::getDocNameOrURLFromModel() Title for document is %s.", ::rtl::OUStringToOString( docNameOrURL, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } else { Reference< document::XDocumentInfoSupplier > xDIS( xModel, UNO_QUERY_THROW ); Reference< beans::XPropertySet > xProp (xDIS->getDocumentInfo(), UNO_QUERY_THROW ); Any aTitle = xProp->getPropertyValue(::rtl::OUString::createFromAscii( "Title" ) ); aTitle >>= docNameOrURL; if ( docNameOrURL.getLength() == 0 ) { docNameOrURL = parseLocationName( xModel->getURL() ); } } } } } catch ( Exception& e ) { OSL_TRACE("DocBrowseNodeImpl::getDocNameOrURLFromModel() exception thrown: !!! %s", ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer ); } } else { OSL_TRACE("DocBrowseNodeImpl::getDocNameOrURLFromModel() doc model is null" ); } return docNameOrURL; } } }; 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< provider::XScriptProvider >& msp ) { OSL_TRACE("ActiveMSPList::addActiveMSP() for %s", ::rtl::OUStringToOString( xModel->getURL(), RTL_TEXTENCODING_ASCII_US ).pData->buffer ); ::osl::MutexGuard guard( m_mutex ); Model_map::const_iterator itr = m_mModels.find( xModel ); if ( itr == m_mModels.end() ) { MspInst theMsp; theMsp.provider = msp; theMsp.node = new DocBrowseNodeImpl( msp, xModel ); m_mModels[ xModel ] = theMsp; // 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 ); } } else { OSL_TRACE("ActiveMSPList::addActiveMSP() model for document exists already in map" ); } } //************************************************************************* 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 ); } } ActiveMSPList& ActiveMSPList::instance( const Reference< XComponentContext > & xContext ) { static ActiveMSPList* inst = 0; // need to not only hold a static pointer to this object but also // keep it aqcuired 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.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 MspInst userInstance; userInstance.node = new BrowseNodeImpl( userMsp, userDirString ); userInstance.provider = userMsp; m_hMsps[ userDirString ] = userInstance; args[ 0 ] <<= shareDirString; Reference< provider::XScriptProvider > shareMsp( m_xContext->getServiceManager()->createInstanceWithArgumentsAndContext( serviceName, args, m_xContext ), UNO_QUERY ); MspInst shareInstance; shareInstance.node = new BrowseNodeImpl( shareMsp, shareDirString ); shareInstance.provider = shareMsp; // should check if provider reference is valid m_hMsps[ shareDirString ] = shareInstance; 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++ ] = h_it->second.node; } // 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 ); children[ count++ ] = m_it->second.node; } 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