cui/source/options/doclinkdialog.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 #include "doclinkdialog.hxx"
  21
  22 #include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
  23 #include <com/sun/star/beans/PropertyAttribute.hpp>
  24 #include <com/sun/star/container/XNameAccess.hpp>
  25 #include <com/sun/star/beans/XPropertySet.hpp>
  26 #include <comphelper/processfactory.hxx>
  27 #include <officecfg/Office/DataAccess.hxx>
  28 #include <strings.hrc>
  29 #include <svl/filenotation.hxx>
  30 #include <vcl/svapp.hxx>
  31 #include <vcl/weld.hxx>
  32 #include <ucbhelper/content.hxx>
  33 #include <dialmgr.hxx>
  34 #include <tools/urlobj.hxx>
  35 #include <sfx2/filedlghelper.hxx>
  36 #include <sfx2/docfilt.hxx>
  37
  38 namespace svx
  39 {
  40     using namespace ::com::sun::star;
  41     using namespace ::com::sun::star::uno;
  42     using namespace ::com::sun::star::ucb;
  43     using namespace ::svt;
  44
  45     ODocumentLinkDialog::ODocumentLinkDialog(weld::Window* pParent, bool _bCreateNew)
  46         : GenericDialogController(pParent, u"cui/ui/databaselinkdialog.ui"_ustr, u"DatabaseLinkDialog"_ustr)
  47         , m_xBrowseFile(m_xBuilder->weld_button(u"browse"_ustr))
  48         , m_xName(m_xBuilder->weld_entry(u"name"_ustr))
  49         , m_xOK(m_xBuilder->weld_button(u"ok"_ustr))
  50         , m_xAltTitle(m_xBuilder->weld_label(u"alttitle"_ustr))
  51         , m_xURL(new SvtURLBox(m_xBuilder->weld_combo_box(u"url"_ustr)))
  52     {
  53         if (!_bCreateNew)
  54             m_xDialog->set_title(m_xAltTitle->get_label());
  55
  56         m_xURL->SetSmartProtocol(INetProtocol::File);
  57         m_xURL->DisableHistory();
  58         m_xURL->SetFilter(u"*.odb");
  59
  60         const css::uno::Reference < css::uno::XComponentContext >& xContext(::comphelper::getProcessComponentContext());
  61         m_xReadWriteAccess = css::configuration::ReadWriteAccess::create(xContext, u"*"_ustr);
  62
  63         m_xName->connect_changed( LINK(this, ODocumentLinkDialog, OnEntryModified) );
  64         m_xURL->connect_changed( LINK(this, ODocumentLinkDialog, OnComboBoxModified) );
  65         m_xBrowseFile->connect_clicked( LINK(this, ODocumentLinkDialog, OnBrowseFile) );
  66         m_xOK->connect_clicked( LINK(this, ODocumentLinkDialog, OnOk) );
  67
  68         validate();
  69     }
  70
  71     ODocumentLinkDialog::~ODocumentLinkDialog()
  72     {
  73     }
  74
  75     void ODocumentLinkDialog::setLink(const OUString& rName, const OUString& rURL)
  76     {
  77         m_xName->set_text(rName);
  78         m_xURL->set_entry_text(rURL);
  79         validate();
  80     }
  81
  82     void ODocumentLinkDialog::getLink(OUString& rName, OUString& rURL) const
  83     {
  84         rName = m_xName->get_text();
  85         rURL = m_xURL->get_active_text();
  86     }
  87
  88     void ODocumentLinkDialog::validate( )
  89     {
  90         m_xOK->set_sensitive((!m_xName->get_text().isEmpty()) && (!m_xURL->get_active_text().isEmpty()));
  91
  92         if (m_xOK->get_sensitive())
  93         {
  94             Reference<container::XNameAccess> xItemList = officecfg::Office::DataAccess::RegisteredNames::get();
  95             Sequence< OUString > lNodeNames = xItemList->getElementNames();
  96
  97             for (const OUString& sNodeName : lNodeNames)
  98             {
  99                 Reference<css::beans::XPropertySet> xSet;
 100                 xItemList->getByName(sNodeName) >>= xSet;
 101
 102                 OUString aDatabaseName;
 103                 if (xSet->getPropertySetInfo()->hasPropertyByName(u"Name"_ustr))
 104                     xSet->getPropertyValue(u"Name"_ustr) >>= aDatabaseName;
 105
 106                 if (!aDatabaseName.isEmpty() && m_xName->get_text() == aDatabaseName)
 107                 {
 108                     const OUString aConfigPath = officecfg::Office::DataAccess::RegisteredNames::path() + "/" + sNodeName;
 109                     if (m_xReadWriteAccess->hasPropertyByHierarchicalName(aConfigPath + "/Name"))
 110                     {
 111                         css::beans::Property aProperty = m_xReadWriteAccess->getPropertyByHierarchicalName(aConfigPath + "/Name");
 112                         bool bReadOnly = (aProperty.Attributes & css::beans::PropertyAttribute::READONLY) != 0;
 113
 114                         m_xURL->set_sensitive(!bReadOnly);
 115                         m_xBrowseFile->set_sensitive(!bReadOnly);
 116                     }
 117
 118                     if (m_xReadWriteAccess->hasPropertyByHierarchicalName(aConfigPath + "/Location"))
 119                     {
 120                         css::beans::Property aProperty = m_xReadWriteAccess->getPropertyByHierarchicalName(aConfigPath + "/Location");
 121                         bool bReadOnly = (aProperty.Attributes & css::beans::PropertyAttribute::READONLY) != 0;
 122
 123                         m_xName->set_sensitive(!bReadOnly);
 124                     }
 125                     break;
 126                 }
 127             }
 128         }
 129     }
 130
 131     IMPL_LINK_NOARG(ODocumentLinkDialog, OnOk, weld::Button&, void)
 132     {
 133         // get the current URL
 134         OUString sURL = m_xURL->get_active_text();
 135         OFileNotation aTransformer(sURL);
 136         sURL = aTransformer.get(OFileNotation::N_URL);
 137
 138         // check for the existence of the selected file
 139         bool bFileExists = false;
 140         try
 141         {
 142             ::ucbhelper::Content aFile(sURL, Reference< XCommandEnvironment >(), comphelper::getProcessComponentContext());
 143             if (aFile.isDocument())
 144                 bFileExists = true;
 145         }
 146         catch(Exception&)
 147         {
 148         }
 149
 150         if (!bFileExists)
 151         {
 152             OUString sMsg = CuiResId(STR_LINKEDDOC_DOESNOTEXIST);
 153             sMsg = sMsg.replaceFirst("$file$", m_xURL->get_active_text());
 154             std::unique_ptr<weld::MessageDialog> xErrorBox(Application::CreateMessageDialog(m_xDialog.get(),
 155                                                            VclMessageType::Warning, VclButtonsType::Ok, sMsg));
 156             xErrorBox->run();
 157             return;
 158         } // if (!bFileExists)
 159         INetURLObject aURL( sURL );
 160         if ( aURL.GetProtocol() != INetProtocol::File )
 161         {
 162             OUString sMsg = CuiResId(STR_LINKEDDOC_NO_SYSTEM_FILE);
 163             sMsg = sMsg.replaceFirst("$file$", m_xURL->get_active_text());
 164             std::unique_ptr<weld::MessageDialog> xErrorBox(Application::CreateMessageDialog(m_xDialog.get(),
 165                                                            VclMessageType::Warning, VclButtonsType::Ok, sMsg));
 166             xErrorBox->run();
 167             return;
 168         }
 169
 170         OUString sCurrentText = m_xName->get_text();
 171         if ( m_aNameValidator.IsSet() )
 172         {
 173             if ( !m_aNameValidator.Call( sCurrentText ) )
 174             {
 175                 OUString sMsg = CuiResId(STR_NAME_CONFLICT);
 176                 sMsg = sMsg.replaceFirst("$file$", sCurrentText);
 177                 std::unique_ptr<weld::MessageDialog> xErrorBox(Application::CreateMessageDialog(m_xDialog.get(),
 178                                                                VclMessageType::Info, VclButtonsType::Ok, sMsg));
 179                 xErrorBox->run();
 180
 181                 m_xName->select_region(0, -1);
 182                 m_xName->grab_focus();
 183                 return;
 184             }
 185         }
 186
 187         m_xDialog->response(RET_OK);
 188     }
 189
 190     IMPL_LINK_NOARG(ODocumentLinkDialog, OnBrowseFile, weld::Button&, void)
 191     {
 192         ::sfx2::FileDialogHelper aFileDlg(
 193                 ui::dialogs::TemplateDescription::FILEOPEN_READONLY_VERSION, FileDialogFlags::NONE, m_xDialog.get());
 194         std::shared_ptr<const SfxFilter> pFilter = SfxFilter::GetFilterByName(u"StarOffice XML (Base)"_ustr);
 195         if ( pFilter )
 196         {
 197             aFileDlg.AddFilter(pFilter->GetUIName(),pFilter->GetDefaultExtension());
 198             aFileDlg.SetCurrentFilter(pFilter->GetUIName());
 199         }
 200
 201         OUString sPath = m_xURL->get_active_text();
 202         if (!sPath.isEmpty())
 203         {
 204             OFileNotation aTransformer( sPath, OFileNotation::N_SYSTEM );
 205             aFileDlg.SetDisplayDirectory( aTransformer.get( OFileNotation::N_URL ) );
 206         }
 207
 208         if (ERRCODE_NONE != aFileDlg.Execute())
 209             return;
 210
 211         if (m_xName->get_text().isEmpty())
 212         {   // default the name to the base of the chosen URL
 213             INetURLObject aParser;
 214
 215             aParser.SetSmartProtocol(INetProtocol::File);
 216             aParser.SetSmartURL(aFileDlg.GetPath());
 217
 218             m_xName->set_text(aParser.getBase(INetURLObject::LAST_SEGMENT, true, INetURLObject::DecodeMechanism::WithCharset));
 219
 220             m_xName->select_region(0, -1);
 221             m_xName->grab_focus();
 222         }
 223         else
 224             m_xURL->grab_focus();
 225
 226         // get the path in system notation
 227         OFileNotation aTransformer(aFileDlg.GetPath(), OFileNotation::N_URL);
 228         m_xURL->set_entry_text(aTransformer.get(OFileNotation::N_SYSTEM));
 229
 230         validate();
 231     }
 232
 233     IMPL_LINK_NOARG(ODocumentLinkDialog, OnEntryModified, weld::Entry&, void)
 234     {
 235         validate();
 236     }
 237
 238     IMPL_LINK_NOARG(ODocumentLinkDialog, OnComboBoxModified, weld::ComboBox&, void)
 239     {
 240         validate();
 241     }
 242 }
 243
 244 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */