diff options
| -rw-r--r-- | sfx2/source/doc/doctemplates.cxx | 417 |
1 files changed, 247 insertions, 170 deletions
diff --git a/sfx2/source/doc/doctemplates.cxx b/sfx2/source/doc/doctemplates.cxx index d5b0d841bd87..47e351442e9c 100644 --- a/sfx2/source/doc/doctemplates.cxx +++ b/sfx2/source/doc/doctemplates.cxx @@ -2,9 +2,9 @@ * * $RCSfile: doctemplates.cxx,v $ * - * $Revision: 1.1 $ + * $Revision: 1.2 $ * - * last change: $Author: dv $ $Date: 2001-03-09 14:50:08 $ + * last change: $Author: dv $ $Date: 2001-03-12 15:53:42 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -187,9 +187,11 @@ DECLARE_LIST( NameList_Impl, NamePair_Impl* ); class SfxDocTplService_Impl { Reference< XMultiServiceFactory > mxFactory; + Reference < XCommandEnvironment > maCmdEnv; Reference< XPersist > mxInfo; Sequence< OUString > maTemplateDirs; + OUString maRootURL; NameList_Impl maNames; Locale maLocale; Content maRootContent; @@ -213,16 +215,29 @@ class SfxDocTplService_Impl const OUString& rTargetURL ); void addToStandard( Content& rRoot, Content& rFolder ); + + sal_Bool createFolder( const OUString& rNewFolderURL, + sal_Bool bCreateParent, + Content &rNewFolder ); + sal_Bool removeFolder( const OUString& rNewFolderURL ); + + sal_Bool setProperty( Content& rContent, + const OUString& rPropName, + const Any& rPropValue ); + public: SfxDocTplService_Impl( Reference< XMultiServiceFactory > xFactory ); ~SfxDocTplService_Impl(); - void init() { if ( !mbIsInitialized ) init_Impl(); } + sal_Bool init() { if ( !mbIsInitialized ) init_Impl(); return mbIsInitialized; } Content getContent(); void setLocale( const LOCALE & rLocale ); Locale getLocale(); + sal_Bool addGroup( const OUString& rGroupName ); + sal_Bool removeGroup( const OUString& rGroupName ); + void update(); }; @@ -244,55 +259,19 @@ void SfxDocTplService_Impl::init_Impl() // entry if necessary Reference < XCommandEnvironment > aCmdEnv; - OUString aRootURL( RTL_CONSTASCII_USTRINGPARAM( TEMPLATE_ROOT_URL ) ); - aRootURL += OUString( '/' ); - aRootURL += aLang; + maCmdEnv = aCmdEnv; + + maRootURL = OUString( RTL_CONSTASCII_USTRINGPARAM( TEMPLATE_ROOT_URL ) ); + maRootURL += OUString( '/' ); + maRootURL += aLang; - if ( Content::create( aRootURL, aCmdEnv, maRootContent ) ) + if ( Content::create( maRootURL, maCmdEnv, maRootContent ) ) { mbIsInitialized = sal_True; } else { - try - { - Sequence< OUString > aNames(2); - OUString* pNames = aNames.getArray(); - pNames[0] = OUString( RTL_CONSTASCII_USTRINGPARAM( TITLE ) ); - pNames[1] = OUString( RTL_CONSTASCII_USTRINGPARAM( IS_FOLDER ) ); - - Sequence< Any > aValues(2); - Any* pValues = aValues.getArray(); - pValues[1] = makeAny( sal_Bool( sal_True ) ); - - OUString aType( RTL_CONSTASCII_USTRINGPARAM( TYPE_FOLDER ) ); - OUString aLangRootURL( RTL_CONSTASCII_USTRINGPARAM( HIERARCHIE_ROOT_URL ) ); - aLangRootURL += OUString( RTL_CONSTASCII_USTRINGPARAM( TEMPLATE_DIR_NAME ) ); - - Content aLangRoot; - - if ( ! Content::create( aLangRootURL, aCmdEnv, aLangRoot ) ) - { - OUString aHierRootURL( RTL_CONSTASCII_USTRINGPARAM( HIERARCHIE_ROOT_URL ) ); - Content aHierRoot( aHierRootURL, aCmdEnv ); - - pValues[0] = makeAny( OUString( RTL_CONSTASCII_USTRINGPARAM( TEMPLATE_DIR_NAME ) ) ); - aHierRoot.insertNewContent( aType, aNames, aValues, aLangRoot ); - } - - pValues[0] = makeAny( aLang ); - - aLangRoot.insertNewContent( aType, aNames, aValues, maRootContent ); - mbIsInitialized = sal_True; - } - catch( CommandAbortedException& ) - { - DBG_ERRORFILE( "Init_Impl(): Could not create hierarchy entry" ); - } - catch( RuntimeException& ) - { - DBG_ERRORFILE( "Init_Impl(): got runtime exception" ); - } + mbIsInitialized = createFolder( maRootURL, sal_True, maRootContent ); } if ( mbIsInitialized ) @@ -305,6 +284,10 @@ void SfxDocTplService_Impl::init_Impl() readFolderList(); update(); } + else + { + DBG_ERRORFILE( "init_Impl(): Could not create root" ); + } } //----------------------------------------------------------------------------- void SfxDocTplService_Impl::getDefaultLocale() @@ -402,26 +385,7 @@ void SfxDocTplService_Impl::getDirList() } // Store the template dir list - try - { - aValue <<= maTemplateDirs; - Reference< XPropertyContainer > xProperties( maRootContent.get(), UNO_QUERY ); - if ( xProperties.is() ) - { - try - { - xProperties->addProperty( aPropName, PropertyAttribute::MAYBEVOID, aValue ); - } - catch( PropertyExistException& ) {} - catch( IllegalTypeException& ) { DBG_ERRORFILE( "IllegalTypeException" ); } - catch( IllegalArgumentException& ) { DBG_ERRORFILE( "IllegalArgumentException" ); } - } - - maRootContent.setPropertyValue( aPropName, aValue ); - } - catch ( CommandAbortedException& ) {} - catch ( RuntimeException& ) {} - catch ( Exception& ) {} + setProperty( maRootContent, aPropName, aValue ); } // ----------------------------------------------------------------------- @@ -449,27 +413,16 @@ void SfxDocTplService_Impl::getFolders( Content& rRoot, if ( xResultSet.is() ) { - Reference< XCommandEnvironment > aCmdEnv; Reference< XContentAccess > xContentAccess( xResultSet, UNO_QUERY ); Reference< XRow > xRow( xResultSet, UNO_QUERY ); OUString aFolderURL = rFolder.get()->getIdentifier()->getContentIdentifier(); - OUString aRootURL = rRoot.get()->getIdentifier()->getContentIdentifier(); + OUString aRootURL( maRootURL ); aRootURL += OUString( '/' ); Content aFolder; - Sequence< OUString > aNames(2); - OUString* pNames = aNames.getArray(); - pNames[0] = OUString( RTL_CONSTASCII_USTRINGPARAM( TITLE ) ); - pNames[1] = OUString( RTL_CONSTASCII_USTRINGPARAM( IS_FOLDER ) ); - OUString aAdditionalProp( RTL_CONSTASCII_USTRINGPARAM( TARGET_DIR_URL ) ); - Sequence< Any > aValues(2); - Any* pValues = aValues.getArray(); - - OUString aType = OUString( RTL_CONSTASCII_USTRINGPARAM( TYPE_FOLDER ) ); - try { while ( xResultSet->next() ) @@ -491,51 +444,16 @@ void SfxDocTplService_Impl::getFolders( Content& rRoot, OUString aNewFolderURL = aNewFolderObj.GetMainURL(); - if ( ! Content::create( aNewFolderURL, aCmdEnv, aFolder ) ) + if ( ! Content::create( aNewFolderURL, maCmdEnv, aFolder ) && + createFolder( aNewFolderURL, sal_False, aFolder ) ) { - pValues[0] = makeAny( aTitle ); - pValues[1] = makeAny( sal_Bool( sal_True ) ); - - try - { - rRoot.insertNewContent( aType, aNames, aValues, aFolder ); - Reference< XPropertySetInfo > xPropSet = aFolder.getProperties(); - if ( xPropSet.is() ) - { - if ( ! xPropSet->hasPropertyByName( aAdditionalProp ) ) - { - Reference< XPropertyContainer > xFolderProp( aFolder.get(), UNO_QUERY ); - if ( xFolderProp.is() ) - { - try - { - xFolderProp->addProperty( aAdditionalProp, - PropertyAttribute::MAYBEVOID, - makeAny( aId ) ); - } - catch( PropertyExistException& ) {} - catch( IllegalTypeException& ) { DBG_ERRORFILE( "IllegalTypeException" ); } - catch( IllegalArgumentException& ) { DBG_ERRORFILE( "IllegalArgumentException" ); } - } - } - - aFolder.setPropertyValue( aAdditionalProp, makeAny( aId ) ); - } - } - catch( CommandAbortedException& ) - { - DBG_ERRORFILE( "CommandAbortedException" ); - } + setProperty( aFolder, aAdditionalProp, makeAny( aId ) ); } - Content aSubFolder( xContentAccess->queryContent(), aCmdEnv ); + Content aSubFolder( xContentAccess->queryContent(), maCmdEnv ); getTemplates( aSubFolder, aFolder ); } } - catch( CommandAbortedException& ) - { - DBG_ERRORFILE( "GetFolders::next(): CommandAbortedException" ); - } catch ( Exception& ) {} } } @@ -643,9 +561,8 @@ void SfxDocTplService_Impl::addEntry( Content& rParentFolder, OUString aLinkURL = aLinkObj.GetMainURL(); Content aLink; - Reference< XCommandEnvironment > aCmdEnv; - if ( ! Content::create( aLinkURL, aCmdEnv, aLink ) ) + if ( ! Content::create( aLinkURL, maCmdEnv, aLink ) ) { Sequence< OUString > aNames(3); OUString* pNames = aNames.getArray(); @@ -681,79 +598,156 @@ void SfxDocTplService_Impl::addToStandard( Content& rRoot, OUString aFolderURL = rFolder.get()->getIdentifier()->getContentIdentifier(); Content aFolder; - OUString aRootURL = rRoot.get()->getIdentifier()->getContentIdentifier(); - - INetURLObject aNewFolderObj( aRootURL ); + INetURLObject aNewFolderObj( maRootURL ); aNewFolderObj.insertName( aTitle, false, INetURLObject::LAST_SEGMENT, true, INetURLObject::ENCODE_ALL ); aNewFolderURL = aNewFolderObj.GetMainURL(); - Reference< XCommandEnvironment > aCmdEnv; - - if ( ! Content::create( aNewFolderURL, aCmdEnv, aFolder ) ) + if ( ! Content::create( aNewFolderURL, maCmdEnv, aFolder ) && + ! createFolder( aNewFolderURL, sal_False, aFolder ) ) { - OUString aType = OUString( RTL_CONSTASCII_USTRINGPARAM( TYPE_FOLDER ) ); + DBG_ERRORFILE( "addToStandard(): Could not create Folder!" ); + return; + } - Sequence< OUString > aNames(2); - OUString* pNames = aNames.getArray(); - pNames[0] = OUString( RTL_CONSTASCII_USTRINGPARAM( TITLE ) ); - pNames[1] = OUString( RTL_CONSTASCII_USTRINGPARAM( IS_FOLDER ) ); + // Always set the target URL, because the last one should win! - Sequence< Any > aValues(2); - Any* pValues = aValues.getArray(); + OUString aAdditionalProp( RTL_CONSTASCII_USTRINGPARAM( TARGET_DIR_URL ) ); - pValues[0] = makeAny( aTitle ); - pValues[1] = makeAny( sal_Bool( sal_True ) ); + setProperty( aFolder, aAdditionalProp, makeAny( aFolderURL ) ); + getTemplates( rFolder, aFolder ); +} + + +// ----------------------------------------------------------------------- +sal_Bool SfxDocTplService_Impl::createFolder( const OUString& rNewFolderURL, + sal_Bool bCreateParent, + Content &rNewFolder ) +{ + Content aParent; + sal_Bool bCreatedFolder = sal_False; + INetURLObject aParentURL( rNewFolderURL ); + OUString aFolderName = aParentURL.getName(); + + // compute the parent folder url from the new folder url + // and remove the final slash, because Content::create doesn't + // like it + aParentURL.removeSegment(); + if ( aParentURL.getSegmentCount() >= 1 ) + aParentURL.removeFinalSlash(); + + // if the parent exists, we can continue with the creation of the + // new folder, we have to create the parent otherwise ( as long as + // bCreateParent is set to true ) + if ( Content::create( aParentURL.GetMainURL(), maCmdEnv, aParent ) ) + { try { - rRoot.insertNewContent( aType, aNames, aValues, aFolder ); + Sequence< OUString > aNames(2); + OUString* pNames = aNames.getArray(); + pNames[0] = OUString( RTL_CONSTASCII_USTRINGPARAM( TITLE ) ); + pNames[1] = OUString( RTL_CONSTASCII_USTRINGPARAM( IS_FOLDER ) ); + + Sequence< Any > aValues(2); + Any* pValues = aValues.getArray(); + pValues[0] = makeAny( aFolderName ); + pValues[1] = makeAny( sal_Bool( sal_True ) ); + + OUString aType( RTL_CONSTASCII_USTRINGPARAM( TYPE_FOLDER ) ); + + aParent.insertNewContent( aType, aNames, aValues, rNewFolder ); + bCreatedFolder = sal_True; } catch( CommandAbortedException& ) { - DBG_ERRORFILE( "CommandAbortedException" ); - return; + DBG_ERRORFILE( "createFolder(): Could not create new folder" ); + } + catch( RuntimeException& ) + { + DBG_ERRORFILE( "createFolder(): got runtime exception" ); + } + } + else if ( bCreateParent ) + { + // if the parent doesn't exists and bCreateParent is set to true, + // we try to create the parent and if this was successful, we + // try to create the new folder again ( but this time, we set + // bCreateParent to false to avoid endless recusions ) + if ( ( aParentURL.getSegmentCount() >= 1 ) && + createFolder( aParentURL.GetMainURL(), bCreateParent, aParent ) ) + { + bCreatedFolder = createFolder( rNewFolderURL, sal_False, rNewFolder ); } - catch( Exception& ) { return; } } - // Always set the target URL, because the last one should win! + return bCreatedFolder; +} - OUString aAdditionalProp( RTL_CONSTASCII_USTRINGPARAM( TARGET_DIR_URL ) ); +// ----------------------------------------------------------------------- +sal_Bool SfxDocTplService_Impl::removeFolder( const OUString& rFolderURL ) +{ + Content aFolder; + sal_Bool bRemovedFolder = sal_False; + + if ( Content::create( rFolderURL, maCmdEnv, aFolder ) ) + { + try + { + OUString aCmd( RTL_CONSTASCII_USTRINGPARAM( COMMAND_DELETE ) ); + Any aArg = makeAny( sal_Bool( sal_True ) ); + aFolder.executeCommand( aCmd, aArg ); + bRemovedFolder = sal_True; + } + catch ( CommandAbortedException& ) {} + catch ( RuntimeException& ) {} + catch ( Exception& ) {} + } + + return bRemovedFolder; +} + +// ----------------------------------------------------------------------- +sal_Bool SfxDocTplService_Impl::setProperty( Content& rContent, + const OUString& rPropName, + const Any& rPropValue ) +{ + sal_Bool bPropertySet = sal_False; + + // Store the property try { - Reference< XPropertySetInfo > xPropSet = aFolder.getProperties(); - if ( xPropSet.is() ) + Reference< XPropertySetInfo > aPropInfo = rContent.getProperties(); + + // check, wether or not the property exists, create it, when not + if ( !aPropInfo.is() || !aPropInfo->hasPropertyByName( rPropName ) ) { - if ( ! xPropSet->hasPropertyByName( aAdditionalProp ) ) + Reference< XPropertyContainer > xProperties( rContent.get(), UNO_QUERY ); + if ( xProperties.is() ) { - Reference< XPropertyContainer > xFolderProp( aFolder.get(), UNO_QUERY ); - if ( xFolderProp.is() ) + try { - try - { - xFolderProp->addProperty( aAdditionalProp, - PropertyAttribute::MAYBEVOID, - makeAny( aFolderURL ) ); - } - catch( PropertyExistException& ) {} - catch( IllegalTypeException& ) { DBG_ERRORFILE( "IllegalTypeException" ); } - catch( IllegalArgumentException& ) { DBG_ERRORFILE( "IllegalArgumentException" ); } + xProperties->addProperty( rPropName, PropertyAttribute::MAYBEVOID, rPropValue ); } + catch( PropertyExistException& ) {} + catch( IllegalTypeException& ) { DBG_ERRORFILE( "IllegalTypeException" ); } + catch( IllegalArgumentException& ) { DBG_ERRORFILE( "IllegalArgumentException" ); } } - aFolder.setPropertyValue( aAdditionalProp, makeAny( aFolderURL ) ); } + + // now set the property + + rContent.setPropertyValue( rPropName, rPropValue ); + bPropertySet = sal_True; } - catch( CommandAbortedException& ) - { - DBG_ERRORFILE( "CommandAbortedException" ); - } - catch( Exception& ) {} + catch ( CommandAbortedException& ) {} + catch ( RuntimeException& ) {} + catch ( Exception& ) {} - getTemplates( rFolder, aFolder ); + return bPropertySet; } //----------------------------------------------------------------------------- @@ -806,8 +800,6 @@ void SfxDocTplService_Impl::update() { init(); - Reference< XCommandEnvironment > aCmdEnv; - sal_Int32 nCount = maTemplateDirs.getLength(); OUString* pDirs = maTemplateDirs.getArray(); Content aDirContent; @@ -815,12 +807,97 @@ void SfxDocTplService_Impl::update() while ( nCount ) { nCount--; - if ( Content::create( pDirs[ nCount ], aCmdEnv, aDirContent ) ) + if ( Content::create( pDirs[ nCount ], maCmdEnv, aDirContent ) ) getFolders( maRootContent, aDirContent ); } } //----------------------------------------------------------------------------- +sal_Bool SfxDocTplService_Impl::addGroup( const OUString& rGroupName ) +{ + // no init, no new group! + if ( ! init() ) + return sal_False; + + // Check, wether or not there is a group with this name + Content aNewGroup; + OUString aNewGroupURL; + INetURLObject aNewGroupObj( maRootURL ); + + aNewGroupObj.insertName( rGroupName, false, + INetURLObject::LAST_SEGMENT, true, + INetURLObject::ENCODE_ALL ); + + aNewGroupURL = aNewGroupObj.GetMainURL(); + + if ( Content::create( aNewGroupURL, maCmdEnv, aNewGroup ) || + ! createFolder( aNewGroupURL, sal_False, aNewGroup ) ) + { + // if there already was a group with this name or the new group + // could not be created, we return here + return sal_False; + } + + // Get the user template path entry ( new group will always + // be added in the user template path ) + sal_Int32 nIndex; + OUString aUserPath; + + nIndex = maTemplateDirs.getLength(); + if ( nIndex ) + nIndex--; + + aUserPath = maTemplateDirs[ nIndex ]; + + // create a new folder with the given name + Content aNewFolder; + OUString aNewFolderURL; + INetURLObject aNewFolderObj( aUserPath ); + + aNewFolderObj.insertName( rGroupName, false, + INetURLObject::LAST_SEGMENT, true, + INetURLObject::ENCODE_ALL ); + + aNewFolderURL = aNewFolderObj.GetMainURL(); + + if ( ! Content::create( aNewFolderURL, maCmdEnv, aNewFolder ) && + ! createFolder( aNewFolderURL, sal_False, aNewFolder ) ) + { + // we could not create the folder, so we delete the group in the + // hierarchy and return + removeFolder( aNewGroupURL ); + return sal_False; + } + + // Now set the target url for this group and we are done + OUString aPropName( RTL_CONSTASCII_USTRINGPARAM( TARGET_DIR_URL ) ); + Any aValue = makeAny( aNewFolderURL ); + + if ( ! setProperty( aNewGroup, aPropName, aValue ) ) + { + removeFolder( aNewGroupURL ); + return sal_False; + } + + return sal_True; +} + +//----------------------------------------------------------------------------- +sal_Bool SfxDocTplService_Impl::removeGroup( const OUString& rGroupName ) +{ + if ( ! init() ) + return sal_False; + + INetURLObject aGroupObj( maRootURL ); + + aGroupObj.insertName( rGroupName, false, + INetURLObject::LAST_SEGMENT, true, + INetURLObject::ENCODE_ALL ); + + return removeFolder( aGroupObj.GetMainURL() ); +} + +//----------------------------------------------------------------------------- //----------------------------------------------------------------------------- //----------------------------------------------------------------------------- @@ -886,25 +963,25 @@ sal_Bool SAL_CALL SfxDocTplService::addTemplate( const ::rtl::OUString& GroupNam } //----------------------------------------------------------------------------- -sal_Bool SAL_CALL SfxDocTplService::removeTemplate( const ::rtl::OUString& GroupName, - const ::rtl::OUString& TemplateName ) +sal_Bool SAL_CALL SfxDocTplService::removeTemplate( const ::rtl::OUString& rGroupName, + const ::rtl::OUString& rTemplateName ) throw( RUNTIMEEXCEPTION ) { return sal_False; } //----------------------------------------------------------------------------- -sal_Bool SAL_CALL SfxDocTplService::addGroup( const ::rtl::OUString& GroupName ) +sal_Bool SAL_CALL SfxDocTplService::addGroup( const ::rtl::OUString& rGroupName ) throw( RUNTIMEEXCEPTION ) { - return sal_False; + return pImp->addGroup( rGroupName ); } //----------------------------------------------------------------------------- -sal_Bool SAL_CALL SfxDocTplService::removeGroup( const ::rtl::OUString& GroupName ) +sal_Bool SAL_CALL SfxDocTplService::removeGroup( const ::rtl::OUString& rGroupName ) throw( RUNTIMEEXCEPTION ) { - return sal_False; + return pImp->removeGroup( rGroupName ); } //----------------------------------------------------------------------------- |