sw/source/ui/fldui/fldtdlg.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 <config_features.h>
  21 #include <config_fuzzers.h>
  22
  23 #include <cmdid.h>
  24 #include <unotools/confignode.hxx>
  25 #include <comphelper/processfactory.hxx>
  26 #include <sfx2/dispatch.hxx>
  27 #include <sfx2/htmlmode.hxx>
  28 #include <sfx2/viewfrm.hxx>
  29 #include <osl/diagnose.h>
  30 #include <viewopt.hxx>
  31 #include <chldwrap.hxx>
  32 #include <docsh.hxx>
  33 #include "flddb.hxx"
  34 #include "flddinf.hxx"
  35 #include "fldvar.hxx"
  36 #include "flddok.hxx"
  37 #include "fldfunc.hxx"
  38 #include "fldref.hxx"
  39 #include <wrtsh.hxx>
  40 #include <view.hxx>
  41 #include <fldtdlg.hxx>
  42 #include <swmodule.hxx>
  43 #include <comphelper/lok.hxx>
  44
  45 #include <com/sun/star/beans/XPropertySet.hpp>
  46 #include <com/sun/star/document/XDocumentProperties.hpp>
  47 #include <com/sun/star/document/XDocumentPropertiesSupplier.hpp>
  48 #include <com/sun/star/frame/XModel.hpp>
  49
  50 // carrier of the dialog
  51 SwFieldDlg::SwFieldDlg(SfxBindings* pB, SwChildWinWrapper* pCW, weld::Window *pParent)
  52     : SfxTabDialogController(pParent, u"modules/swriter/ui/fielddialog.ui"_ustr, u"FieldDialog"_ustr)
  53     , m_pChildWin(pCW)
  54     , m_pBindings(pB)
  55     , m_bDataBaseMode(false)
  56     , m_bClosing(false)
  57 {
  58     m_bHtmlMode = (::GetHtmlMode(static_cast<SwDocShell*>(SfxObjectShell::Current())) & HTMLMODE_ON) != 0;
  59
  60     GetCancelButton().connect_clicked(LINK(this, SwFieldDlg, CancelHdl));
  61     GetOKButton().connect_clicked(LINK(this, SwFieldDlg, OKHdl));
  62
  63     AddTabPage(u"document"_ustr, SwFieldDokPage::Create, nullptr);
  64     AddTabPage(u"variables"_ustr, SwFieldVarPage::Create, nullptr);
  65     AddTabPage(u"docinfo"_ustr, SwFieldDokInfPage::Create, nullptr);
  66
  67     if (!m_bHtmlMode)
  68     {
  69         AddTabPage(u"ref"_ustr, SwFieldRefPage::Create, nullptr);
  70         AddTabPage(u"functions"_ustr, SwFieldFuncPage::Create, nullptr);
  71
  72         utl::OConfigurationTreeRoot aCfgRoot
  73             = utl::OConfigurationTreeRoot::createWithComponentContext(
  74                 ::comphelper::getProcessComponentContext(),
  75                 u"/org.openoffice.Office.DataAccess/Policies/Features/Writer"_ustr,
  76                 -1,
  77                 utl::OConfigurationTreeRoot::CM_READONLY);
  78
  79 #if HAVE_FEATURE_DBCONNECTIVITY && !ENABLE_FUZZERS
  80         bool bDatabaseFields = true;
  81         aCfgRoot.getNodeValue(u"DatabaseFields"_ustr) >>= bDatabaseFields;
  82
  83         if (bDatabaseFields)
  84             AddTabPage(u"database"_ustr, SwFieldDBPage::Create, nullptr);
  85         else
  86 #endif
  87             RemoveTabPage(u"database"_ustr);
  88     }
  89     else
  90     {
  91         RemoveTabPage(u"ref"_ustr);
  92         RemoveTabPage(u"functions"_ustr);
  93         RemoveTabPage(u"database"_ustr);
  94     }
  95
  96     if (comphelper::LibreOfficeKit::isActive())
  97         RemoveTabPage(u"database"_ustr);
  98 }
  99
 100 SwFieldDlg::~SwFieldDlg()
 101 {
 102 }
 103
 104 void SwFieldDlg::EndDialog(int nResponse)
 105 {
 106     m_bClosing = true;
 107     SfxTabDialogController::EndDialog(nResponse);
 108     m_bClosing = false;
 109 }
 110
 111 void SwFieldDlg::Close()
 112 {
 113     if (m_bClosing)
 114         return;
 115     const SfxPoolItemHolder aResult(m_pBindings->GetDispatcher()->
 116         Execute(m_bDataBaseMode ? FN_INSERT_FIELD_DATA_ONLY : FN_INSERT_FIELD,
 117         SfxCallMode::SYNCHRON|SfxCallMode::RECORD));
 118     if (!aResult)
 119     {
 120         // If Execute action did fail for whatever reason, this means that request
 121         // to close did fail or wasn't delivered to SwTextShell::ExecField().
 122         // Just explicitly close dialog in this case.
 123         SfxTabDialogController::EndDialog(RET_CLOSE);
 124     }
 125 }
 126
 127 void SwFieldDlg::Initialize(SfxChildWinInfo const *pInfo)
 128 {
 129     OUString aWinState = pInfo->aWinState;
 130     if (aWinState.isEmpty())
 131         return;
 132     m_xDialog->set_window_state(aWinState);
 133 }
 134
 135 SfxItemSet* SwFieldDlg::CreateInputItemSet(const OUString& rID)
 136 {
 137     SwDocShell *const pDocSh(static_cast<SwDocShell*>(SfxObjectShell::Current()));
 138     if (rID == "docinfo" && pDocSh) // might not have a shell if the dialog is restored on startup
 139     {
 140         mxInputItemSet = std::make_unique<SfxItemSetFixed<FN_FIELD_DIALOG_DOC_PROPS, FN_FIELD_DIALOG_DOC_PROPS>>( pDocSh->GetPool() );
 141         using namespace ::com::sun::star;
 142         uno::Reference<document::XDocumentPropertiesSupplier> xDPS(
 143             pDocSh->GetModel(), uno::UNO_QUERY_THROW);
 144         uno::Reference<document::XDocumentProperties> xDocProps
 145             = xDPS->getDocumentProperties();
 146         uno::Reference< beans::XPropertySet > xUDProps(
 147             xDocProps->getUserDefinedProperties(),
 148             uno::UNO_QUERY_THROW);
 149         mxInputItemSet->Put( SfxUnoAnyItem( FN_FIELD_DIALOG_DOC_PROPS, uno::Any(xUDProps) ) );
 150         return mxInputItemSet.get();
 151     }
 152     else
 153         return nullptr;
 154 }
 155
 156 // kick off inserting of new fields
 157 IMPL_LINK_NOARG(SwFieldDlg, OKHdl, weld::Button&, void)
 158 {
 159     if (GetOKButton().get_sensitive())
 160     {
 161         SfxTabPage* pPage = GetTabPage(GetCurPageId());
 162         assert(pPage);
 163         pPage->FillItemSet(nullptr);
 164
 165         GetOKButton().grab_focus();  // because of InputField-Dlg
 166     }
 167 }
 168
 169 IMPL_LINK_NOARG(SwFieldDlg, CancelHdl, weld::Button&, void)
 170 {
 171     Close();
 172 }
 173
 174 // newly initialise dialog after Doc-Switch
 175 void SwFieldDlg::ReInitDlg()
 176 {
 177     SwDocShell* pDocSh = static_cast<SwDocShell*>(SfxObjectShell::Current());
 178     bool bNewMode = (::GetHtmlMode(pDocSh) & HTMLMODE_ON) != 0;
 179
 180     if (bNewMode != m_bHtmlMode)
 181     {
 182         if (SfxViewFrame* pViewFrm = SfxViewFrame::Current())
 183         {
 184             pViewFrm->GetDispatcher()->
 185                 Execute(FN_INSERT_FIELD, SfxCallMode::ASYNCHRON|SfxCallMode::RECORD);
 186         }
 187         Close();
 188     }
 189
 190     SwView* pActiveView = ::GetActiveView();
 191     if(!pActiveView)
 192         return;
 193     const SwWrtShell& rSh = pActiveView->GetWrtShell();
 194     GetOKButton().set_sensitive((  !rSh.IsReadOnlyAvailable()
 195                                 || !rSh.HasReadonlySel())
 196                             &&  !SwCursorShell::PosInsideInputField(*rSh.GetCursor()->GetPoint()));
 197
 198     ReInitTabPage(u"document");
 199     ReInitTabPage(u"variables");
 200     ReInitTabPage(u"docinfo");
 201
 202     if (!m_bHtmlMode)
 203     {
 204         ReInitTabPage(u"ref");
 205         ReInitTabPage(u"functions");
 206         ReInitTabPage(u"database");
 207     }
 208
 209     m_pChildWin->SetOldDocShell(pDocSh);
 210 }
 211
 212 // newly initialise TabPage after Doc-Switch
 213 void SwFieldDlg::ReInitTabPage(std::u16string_view rPageId, bool bOnlyActivate)
 214 {
 215     SwFieldPage* pPage = static_cast<SwFieldPage*>(GetTabPage(rPageId));
 216     if (pPage)
 217         pPage->EditNewField( bOnlyActivate );   // newly initialise TabPage
 218 }
 219
 220 // newly initialise after activation of a few TabPages
 221 void SwFieldDlg::Activate()
 222 {
 223     SwView* pView = GetActiveView();
 224     if( !pView )
 225         return;
 226
 227     bool bHtmlMode = (::GetHtmlMode(static_cast<SwDocShell*>(SfxObjectShell::Current())) & HTMLMODE_ON) != 0;
 228     const SwWrtShell& rSh = pView->GetWrtShell();
 229     GetOKButton().set_sensitive((  !rSh.IsReadOnlyAvailable()
 230                                 || !rSh.HasReadonlySel())
 231                             &&  !SwCursorShell::PosInsideInputField(*rSh.GetCursor()->GetPoint()));
 232
 233
 234     ReInitTabPage(u"variables", true);
 235
 236     if( !bHtmlMode )
 237     {
 238         ReInitTabPage(u"ref", true);
 239         ReInitTabPage(u"functions", true);
 240     }
 241 }
 242
 243 void SwFieldDlg::ActivatePage(const OUString& rPage)
 244 {
 245     SfxTabDialogController::ActivatePage(rPage);
 246     if (SfxTabPage* pPage = GetTabPage(rPage))
 247         pPage->Activate();
 248 }
 249
 250 void SwFieldDlg::EnableInsert(bool bEnable)
 251 {
 252     if( bEnable )
 253     {
 254         SwView* pView = ::GetActiveView();
 255         if( !pView ||
 256                 (pView->GetWrtShell().IsReadOnlyAvailable() &&
 257                     pView->GetWrtShell().HasReadonlySel())
 258             || SwCursorShell::PosInsideInputField(*pView->GetWrtShell().GetCursor()->GetPoint()))
 259         {
 260             bEnable = false;
 261         }
 262     }
 263     GetOKButton().set_sensitive(bEnable);
 264 }
 265
 266 void SwFieldDlg::InsertHdl()
 267 {
 268     GetOKButton().clicked();
 269 }
 270
 271 void SwFieldDlg::ActivateDatabasePage()
 272 {
 273 #if HAVE_FEATURE_DBCONNECTIVITY && !ENABLE_FUZZERS
 274     m_bDataBaseMode = true;
 275     ShowPage(u"database"_ustr);
 276     SfxTabPage* pDBPage = GetTabPage(u"database");
 277     if( pDBPage )
 278     {
 279         static_cast<SwFieldDBPage*>(pDBPage)->ActivateMailMergeAddress();
 280     }
 281     //remove all other pages
 282     RemoveTabPage(u"document"_ustr);
 283     RemoveTabPage(u"variables"_ustr);
 284     RemoveTabPage(u"docinfo"_ustr);
 285     RemoveTabPage(u"ref"_ustr);
 286     RemoveTabPage(u"functions"_ustr);
 287 #endif
 288 }
 289
 290 void SwFieldDlg::ShowReferencePage()
 291 {
 292     ShowPage(u"ref"_ustr);
 293 }
 294
 295 void SwFieldDlg::PageCreated(const OUString& rId, SfxTabPage& rPage)
 296 {
 297 #if HAVE_FEATURE_DBCONNECTIVITY && !ENABLE_FUZZERS
 298     if (rId != "database")
 299         return;
 300
 301     SfxDispatcher* pDispatch = m_pBindings->GetDispatcher();
 302     SfxViewFrame* pViewFrame = pDispatch ? pDispatch->GetFrame() : nullptr;
 303     if(pViewFrame)
 304     {
 305         SfxViewShell* pViewShell = SfxViewShell::GetFirst( true, checkSfxViewShell<SwView> );
 306         while(pViewShell && &pViewShell->GetViewFrame() != pViewFrame)
 307         {
 308             pViewShell = SfxViewShell::GetNext( *pViewShell, true, checkSfxViewShell<SwView> );
 309         }
 310         if(pViewShell)
 311             static_cast<SwFieldDBPage&>(rPage).SetWrtShell(static_cast<SwView*>(pViewShell)->GetWrtShell());
 312     }
 313 #else
 314     (void) rId;
 315     (void) rPage;
 316 #endif
 317 }
 318
 319 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */