svx/source/form/databaselocationinput.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include <svx/databaselocationinput.hxx>
  22 #include <svx/dialmgr.hxx>
  23
  24 #include <svx/strings.hrc>
  25
  26 #include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
  27 #include <com/sun/star/container/XNameAccess.hpp>
  28 #include <com/sun/star/uno/XComponentContext.hpp>
  29
  30 #include <comphelper/namedvaluecollection.hxx>
  31 #include <rtl/ustrbuf.hxx>
  32 #include <sfx2/filedlghelper.hxx>
  33 #include <svl/filenotation.hxx>
  34 #include <svtools/inettbc.hxx>
  35 #include <tools/diagnose_ex.h>
  36 #include <unotools/confignode.hxx>
  37 #include <unotools/ucbhelper.hxx>
  38 #include <vcl/svapp.hxx>
  39 #include <vcl/weld.hxx>
  40
  41 namespace svx
  42 {
  43     using ::com::sun::star::uno::Sequence;
  44     using ::com::sun::star::uno::Reference;
  45     using ::com::sun::star::uno::XComponentContext;
  46     using ::com::sun::star::container::XNameAccess;
  47     using ::com::sun::star::uno::UNO_QUERY_THROW;
  48     using ::com::sun::star::uno::Exception;
  49
  50     namespace TemplateDescription = ::com::sun::star::ui::dialogs::TemplateDescription;
  51
  52     class DatabaseLocationInputController_Impl
  53     {
  54     public:
  55         DatabaseLocationInputController_Impl(
  56             const Reference<XComponentContext>&     _rContext,
  57             SvtURLBox& _rLocationInput,
  58             weld::Button& _rBrowseButton,
  59             weld::Window& _rDialog
  60         );
  61
  62         bool     prepareCommit();
  63         void     setURL( const OUString& _rURL );
  64         OUString getURL() const;
  65
  66     private:
  67         void     impl_initFilterProperties_nothrow();
  68         void     impl_onBrowseButtonClicked();
  69         OUString impl_getCurrentURL() const;
  70
  71         DECL_LINK( OnButtonAction, weld::Button&, void );
  72
  73     private:
  74         const Reference<XComponentContext>      m_xContext;
  75         SvtURLBox& m_rLocationInput;
  76         weld::Window& m_rDialog;
  77         Sequence< OUString >             m_aFilterExtensions;
  78         OUString                         m_sFilterUIName;
  79         bool                                    m_bNeedExistenceCheck;
  80     };
  81
  82     DatabaseLocationInputController_Impl::DatabaseLocationInputController_Impl(const Reference<XComponentContext>& _rContext,
  83             SvtURLBox& _rLocationInput, weld::Button& _rBrowseButton, weld::Window& _rDialog)
  84         :m_xContext( _rContext )
  85         ,m_rLocationInput( _rLocationInput )
  86         ,m_rDialog( _rDialog )
  87         ,m_aFilterExtensions()
  88         ,m_sFilterUIName()
  89         ,m_bNeedExistenceCheck( true )
  90     {
  91         impl_initFilterProperties_nothrow();
  92
  93         // forward the allowed extensions to the input control
  94         OUStringBuffer aExtensionList;
  95         for ( auto const & extension : std::as_const(m_aFilterExtensions) )
  96         {
  97             aExtensionList.append( extension );
  98             aExtensionList.append( ';' );
  99         }
 100         m_rLocationInput.SetFilter( aExtensionList.makeStringAndClear() );
 101         _rBrowseButton.connect_clicked(LINK(this, DatabaseLocationInputController_Impl, OnButtonAction));
 102     }
 103
 104     bool DatabaseLocationInputController_Impl::prepareCommit()
 105     {
 106         OUString sURL( impl_getCurrentURL() );
 107         if ( sURL.isEmpty() )
 108             return false;
 109
 110         // check if the name exists
 111         if ( m_bNeedExistenceCheck )
 112         {
 113             if ( ::utl::UCBContentHelper::Exists( sURL ) )
 114             {
 115                 std::unique_ptr<weld::MessageDialog> xQueryBox(Application::CreateMessageDialog(m_rLocationInput.getWidget(),
 116                                                                VclMessageType::Question, VclButtonsType::YesNo,
 117                                                                SvxResId(RID_STR_ALREADYEXISTOVERWRITE)));
 118                 if (xQueryBox->run() != RET_YES)
 119                     return false;
 120             }
 121         }
 122
 123         return true;
 124     }
 125
 126     void DatabaseLocationInputController_Impl::setURL( const OUString& _rURL )
 127     {
 128         ::svt::OFileNotation aTransformer( _rURL );
 129         m_rLocationInput.set_entry_text( aTransformer.get( ::svt::OFileNotation::N_SYSTEM ) );
 130     }
 131
 132     OUString DatabaseLocationInputController_Impl::getURL() const
 133     {
 134         return impl_getCurrentURL();
 135     }
 136
 137     void DatabaseLocationInputController_Impl::impl_initFilterProperties_nothrow()
 138     {
 139         try
 140         {
 141             // get the name of the default filter for database documents
 142             ::utl::OConfigurationTreeRoot aConfig(
 143                 ::utl::OConfigurationTreeRoot::createWithComponentContext(
 144                     m_xContext,
 145                     "/org.openoffice.Setup/Office/Factories/com.sun.star.sdb.OfficeDatabaseDocument"
 146             ) );
 147             OUString sDatabaseFilter;
 148             OSL_VERIFY( aConfig.getNodeValue( "ooSetupFactoryActualFilter" ) >>= sDatabaseFilter );
 149
 150             // get the type this filter is responsible for
 151             Reference< XNameAccess > xFilterFactory(
 152                 m_xContext->getServiceManager()->createInstanceWithContext("com.sun.star.document.FilterFactory", m_xContext),
 153                 UNO_QUERY_THROW );
 154             ::comphelper::NamedValueCollection aFilterProperties( xFilterFactory->getByName( sDatabaseFilter ) );
 155             OUString sDocumentType = aFilterProperties.getOrDefault( "Type", OUString() );
 156
 157             // get the extension(s) for this type
 158             Reference< XNameAccess > xTypeDetection(
 159                 m_xContext->getServiceManager()->createInstanceWithContext("com.sun.star.document.TypeDetection", m_xContext),
 160                 UNO_QUERY_THROW );
 161
 162             ::comphelper::NamedValueCollection aTypeProperties( xTypeDetection->getByName( sDocumentType ) );
 163             m_aFilterExtensions = aTypeProperties.getOrDefault( "Extensions", m_aFilterExtensions );
 164             m_sFilterUIName = aTypeProperties.getOrDefault( "UIName", m_sFilterUIName );
 165         }
 166         catch( const Exception& )
 167         {
 168             DBG_UNHANDLED_EXCEPTION("svx");
 169         }
 170
 171         // ensure we have at least one extension
 172         OSL_ENSURE( m_aFilterExtensions.hasElements(),
 173             "DatabaseLocationInputController_Impl::impl_initFilterProperties_nothrow: unable to determine the file extension(s)!" );
 174         if ( !m_aFilterExtensions.hasElements() )
 175         {
 176             m_aFilterExtensions.realloc(1);
 177             m_aFilterExtensions[0] = "*.odb";
 178         }
 179     }
 180
 181     IMPL_LINK_NOARG(DatabaseLocationInputController_Impl, OnButtonAction, weld::Button&, void)
 182     {
 183         impl_onBrowseButtonClicked();
 184     }
 185
 186     OUString DatabaseLocationInputController_Impl::impl_getCurrentURL() const
 187     {
 188         OUString sCurrentFile( m_rLocationInput.get_active_text() );
 189         if ( !sCurrentFile.isEmpty() )
 190         {
 191             ::svt::OFileNotation aCurrentFile( sCurrentFile );
 192             sCurrentFile = aCurrentFile.get( ::svt::OFileNotation::N_URL );
 193         }
 194         return sCurrentFile;
 195     }
 196
 197     void DatabaseLocationInputController_Impl::impl_onBrowseButtonClicked()
 198     {
 199         ::sfx2::FileDialogHelper aFileDlg(
 200             TemplateDescription::FILESAVE_AUTOEXTENSION,
 201             FileDialogFlags::NONE,
 202             &m_rDialog
 203         );
 204         aFileDlg.SetDisplayDirectory( impl_getCurrentURL() );
 205
 206         aFileDlg.AddFilter( m_sFilterUIName, "*." + m_aFilterExtensions[0] );
 207         aFileDlg.SetCurrentFilter( m_sFilterUIName );
 208
 209         if ( aFileDlg.Execute() == ERRCODE_NONE )
 210         {
 211             INetURLObject aURL( aFileDlg.GetPath() );
 212             if( aURL.GetProtocol() != INetProtocol::NotValid )
 213             {
 214                 ::svt::OFileNotation aFileNotation( aURL.GetMainURL( INetURLObject::DecodeMechanism::NONE ) );
 215                 m_rLocationInput.set_entry_text(aFileNotation.get(::svt::OFileNotation::N_SYSTEM));
 216                 m_rLocationInput.trigger_changed();
 217                 // the dialog already checked for the file's existence, so we don't need to, again
 218                 m_bNeedExistenceCheck = false;
 219             }
 220         }
 221     }
 222
 223     DatabaseLocationInputController::DatabaseLocationInputController( const Reference<XComponentContext>& _rContext,
 224             SvtURLBox& _rLocationInput, weld::Button& _rBrowseButton, weld::Window& _rDialog )
 225         :m_pImpl( new DatabaseLocationInputController_Impl( _rContext, _rLocationInput, _rBrowseButton, _rDialog ) )
 226     {
 227     }
 228
 229     DatabaseLocationInputController::~DatabaseLocationInputController()
 230     {
 231     }
 232
 233     bool DatabaseLocationInputController::prepareCommit()
 234     {
 235         return m_pImpl->prepareCommit();
 236     }
 237
 238     void DatabaseLocationInputController::setURL( const OUString& _rURL )
 239     {
 240         m_pImpl->setURL( _rURL );
 241     }
 242
 243     OUString DatabaseLocationInputController::getURL() const
 244     {
 245         return m_pImpl->getURL();
 246     }
 247 }
 248
 249 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */