LibreOffice Module svx (master)  1
databaselocationinput.cxx
Go to the documentation of this file.
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 
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 
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 
53  {
54  public:
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:
69  OUString impl_getCurrentURL() const;
70 
71  DECL_LINK( OnButtonAction, weld::Button&, void );
72 
73  private:
78  OUString m_sFilterUIName;
80  };
81 
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  {
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 
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 );
130  }
131 
133  {
134  return impl_getCurrentURL();
135  }
136 
138  {
139  try
140  {
141  // get the name of the default filter for database documents
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  {
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 
182  {
183  impl_onBrowseButtonClicked();
184  }
185 
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 
198  {
199  ::sfx2::FileDialogHelper aFileDlg(
200  TemplateDescription::FILESAVE_AUTOEXTENSION,
201  FileDialogFlags::NONE,
202  &m_rDialog
203  );
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 ) );
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 
224  SvtURLBox& _rLocationInput, weld::Button& _rBrowseButton, weld::Window& _rDialog )
225  :m_pImpl( new DatabaseLocationInputController_Impl( _rContext, _rLocationInput, _rBrowseButton, _rDialog ) )
226  {
227  }
228 
230  {
231  }
232 
234  {
235  return m_pImpl->prepareCommit();
236  }
237 
238  void DatabaseLocationInputController::setURL( const OUString& _rURL )
239  {
240  m_pImpl->setURL( _rURL );
241  }
242 
244  {
245  return m_pImpl->getURL();
246  }
247 }
248 
249 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
UNOTOOLS_DLLPUBLIC bool Exists(OUString const &url)
URL aURL
DatabaseLocationInputController_Impl(const Reference< XComponentContext > &_rContext, SvtURLBox &_rLocationInput, weld::Button &_rBrowseButton, weld::Window &_rDialog)
IMPL_LINK_NOARG(SuggestionDisplay, SelectSuggestionValueSetHdl, SvtValueSet *, void)
void AddFilter(const OUString &rFilterName, const OUString &rExtension)
OUString GetPath() const
VALUE_TYPE getOrDefault(const char *_pAsciiValueName, const VALUE_TYPE &_rDefault) const
const Reference< XComponentContext > m_xContext
void trigger_changed()
void SetDisplayDirectory(const OUString &rPath)
static OConfigurationTreeRoot createWithComponentContext(const css::uno::Reference< css::uno::XComponentContext > &_rxContext, const OUString &_rPath, sal_Int32 _nDepth=-1, CREATION_MODE _eMode=CM_UPDATABLE)
RET_YES
OUString SvxResId(const char *pId)
Definition: dialmgr.cxx:28
bool prepareCommit()
prepares committing the database location entered in the input field
void SetFilter(const OUString &_sFilter)
void set_entry_text(const OUString &rStr)
#define DBG_UNHANDLED_EXCEPTION(...)
void connect_clicked(const Link< Button &, void > &rLink)
DECL_LINK(OnButtonAction, weld::Button &, void)
void SetCurrentFilter(const OUString &rFilter)
OUString getURL() const
returns the current database location, in form of a URL (not a system path)
#define ERRCODE_NONE
void setURL(const OUString &_rURL)
sets the given URL at the input control, after translating it into a system path
OUString get(NOTATION _eOutputNotation) const
css::uno::Any getNodeValue(const OUString &_rPath) const
static weld::MessageDialog * CreateMessageDialog(weld::Widget *pParent, VclMessageType eMessageType, VclButtonsType eButtonType, const OUString &rPrimaryMessage)
weld::ComboBox * getWidget()
Reference< XComponentContext > m_xContext
::std::unique_ptr< DatabaseLocationInputController_Impl > m_pImpl
::std::unique_ptr< XmlIdRegistry_Impl > m_pImpl
DatabaseLocationInputController(const css::uno::Reference< css::uno::XComponentContext > &_rContext, SvtURLBox &_rLocationInput, weld::Button &_rBrowseButton, weld::Window &_rDialog)
OUString get_active_text() const