cui/source/dialogs/cuihyperdlg.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 <sal/config.h>
  21
  22 #include <osl/diagnose.h>
  23 #include <comphelper/lok.hxx>
  24 #include <unotools/viewoptions.hxx>
  25 #include <cuihyperdlg.hxx>
  26 #include <hlinettp.hxx>
  27 #include <hlmailtp.hxx>
  28 #include <hldoctp.hxx>
  29 #include <hldocntp.hxx>
  30 #include <sfx2/app.hxx>
  31 #include <sfx2/viewfrm.hxx>
  32 #include <svl/eitem.hxx>
  33 #include <svx/svxids.hrc>
  34 #include <dialmgr.hxx>
  35 #include <strings.hrc>
  36 #include <vector>
  37
  38 using ::com::sun::star::uno::Reference;
  39 using ::com::sun::star::frame::XFrame;
  40
  41
  42 //#                                                                      #
  43 //# Childwindow-Wrapper-Class                                            #
  44 //#                                                                      #
  45
  46
  47 SvxHlinkCtrl::SvxHlinkCtrl( sal_uInt16 _nId, SfxBindings & rBindings, SvxHpLinkDlg* pDlg )
  48     : SfxControllerItem ( _nId, rBindings )
  49     , aRdOnlyForwarder  ( SID_READONLY_MODE, *this )
  50 {
  51     pParent = pDlg;
  52 }
  53
  54 void SvxHlinkCtrl::dispose()
  55 {
  56     pParent = nullptr;
  57     aRdOnlyForwarder.dispose();
  58     ::SfxControllerItem::dispose();
  59 }
  60
  61 void SvxHlinkCtrl::StateChangedAtToolBoxControl( sal_uInt16 nSID, SfxItemState eState,
  62                                  const SfxPoolItem* pState )
  63 {
  64     if (!(eState == SfxItemState::DEFAULT && pParent))
  65         return;
  66
  67     switch ( nSID )
  68     {
  69         case SID_HYPERLINK_GETLINK :
  70         {
  71             pParent->SetPage( static_cast<const SvxHyperlinkItem*>(pState) );
  72         }
  73         break;
  74         case SID_READONLY_MODE :
  75         {
  76             pParent->SetReadOnlyMode( static_cast<const SfxBoolItem*>(pState)->GetValue() );
  77         }
  78         break;
  79     }
  80 }
  81
  82 // tdf#90496 - remember last used view in hyperlink dialog
  83 OUString SvxHpLinkDlg::msRememberedPageId(u"internet"_ustr);
  84
  85 //#                                                                      #
  86 //# Hyperlink - Dialog                                                   #
  87 //#                                                                      #
  88 SvxHpLinkDlg::SvxHpLinkDlg(SfxBindings* pBindings, SfxChildWindow* pChild, weld::Window* pParent)
  89     : SfxModelessDialogController(pBindings, pChild, pParent, u"cui/ui/hyperlinkdialog.ui"_ustr, u"HyperlinkDialog"_ustr)
  90     , pSet            ( nullptr )
  91     , maCtrl          ( SID_HYPERLINK_GETLINK, *pBindings, this )
  92     , mbIsHTMLDoc     ( false )
  93     , m_xIconCtrl(m_xBuilder->weld_notebook(u"tabcontrol"_ustr))
  94     , m_xOKBtn(m_xBuilder->weld_button(u"ok"_ustr))
  95     , m_xApplyBtn(m_xBuilder->weld_button(u"apply"_ustr))
  96     , m_xCancelBtn(m_xBuilder->weld_button(u"cancel"_ustr))
  97     , m_xHelpBtn(m_xBuilder->weld_button(u"help"_ustr))
  98     , m_xResetBtn(m_xBuilder->weld_button(u"reset"_ustr))
  99 {
 100     m_xIconCtrl->connect_enter_page( LINK ( this, SvxHpLinkDlg, ChosePageHdl_Impl ) );
 101     m_xIconCtrl->show();
 102
 103     // ItemSet
 104     if ( pSet )
 105     {
 106         pExampleSet.reset(new SfxItemSet( *pSet ));
 107         pOutSet.reset(new SfxItemSet( *pSet->GetPool(), pSet->GetRanges() ));
 108     }
 109
 110     // Buttons
 111     m_xOKBtn->show();
 112     m_xCancelBtn->show();
 113
 114     if (comphelper::LibreOfficeKit::isActive())
 115     {
 116         m_xApplyBtn->hide();
 117         m_xHelpBtn->hide();
 118         m_xResetBtn->hide();
 119     }
 120     else
 121     {
 122         m_xApplyBtn->show();
 123         m_xHelpBtn->show();
 124         m_xResetBtn->show();
 125     }
 126
 127     mbGrabFocus = true;
 128
 129     // set OK/Cancel - button
 130     m_xCancelBtn->set_label(CuiResId(RID_CUISTR_HYPDLG_CLOSEBUT));
 131
 132     // create itemset for tabpages
 133     mpItemSet = std::make_unique<SfxItemSetFixed<SID_HYPERLINK_GETLINK,
 134                                SID_HYPERLINK_SETLINK>>( SfxGetpApp()->GetPool());
 135
 136     SvxHyperlinkItem aItem(SID_HYPERLINK_GETLINK);
 137     mpItemSet->Put(aItem);
 138
 139     SetInputSet (mpItemSet.get());
 140
 141     // insert pages
 142     AddTabPage(u"internet"_ustr, SvxHyperlinkInternetTp::Create);
 143     AddTabPage(u"mail"_ustr, SvxHyperlinkMailTp::Create);
 144     if (!comphelper::LibreOfficeKit::isActive())
 145     {
 146         AddTabPage(u"document"_ustr, SvxHyperlinkDocTp::Create);
 147         AddTabPage(u"newdocument"_ustr, SvxHyperlinkNewDocTp::Create);
 148     }
 149
 150     // tdf#90496 - remember last used view in hyperlink dialog
 151     SetCurPageId(msRememberedPageId);
 152
 153     // Init Dialog
 154     Start();
 155
 156     GetBindings().Update(SID_HYPERLINK_GETLINK);
 157     GetBindings().Update(SID_READONLY_MODE);
 158
 159     m_xResetBtn->connect_clicked( LINK( this, SvxHpLinkDlg, ResetHdl ) );
 160     m_xOKBtn->connect_clicked( LINK ( this, SvxHpLinkDlg, ClickOkHdl_Impl ) );
 161     m_xApplyBtn->connect_clicked ( LINK ( this, SvxHpLinkDlg, ClickApplyHdl_Impl ) );
 162 }
 163
 164 SvxHpLinkDlg::~SvxHpLinkDlg()
 165 {
 166     mbGrabFocus = false; // don't do any grab if tear-down moves focus around during destruction
 167
 168     // delete config item, so the base class (SfxModelessDialogController) can not load it on the next start
 169     SvtViewOptions aViewOpt( EViewType::TabDialog, OUString::number(SID_HYPERLINK_DIALOG) );
 170     aViewOpt.Delete();
 171
 172     mpItemSet.reset();
 173
 174     maCtrl.dispose();
 175
 176     maPageList.clear();
 177
 178     pRanges.reset();
 179     pOutSet.reset();
 180 }
 181
 182 void SvxHpLinkDlg::Activate() {
 183     if (mbGrabFocus) {
 184         static_cast<SvxHyperlinkTabPageBase *>(GetTabPage(GetCurPageId()))->SetInitFocus();
 185         mbGrabFocus = false;
 186     }
 187     SfxModelessDialogController::Activate();
 188 }
 189
 190 void SvxHpLinkDlg::Close()
 191 {
 192     if (IsClosing())
 193         return;
 194     if (SfxViewFrame* pViewFrame = SfxViewFrame::Current())
 195         pViewFrame->ToggleChildWindow(SID_HYPERLINK_DIALOG);
 196 }
 197
 198 void SvxHpLinkDlg::Apply()
 199 {
 200     SfxItemSetFixed<SID_HYPERLINK_GETLINK, SID_HYPERLINK_SETLINK> aItemSet( SfxGetpApp()->GetPool() );
 201
 202     SvxHyperlinkTabPageBase* pCurrentPage = static_cast<SvxHyperlinkTabPageBase*>(
 203                                                 GetTabPage( GetCurPageId() ) );
 204
 205     pCurrentPage->FillItemSet( &aItemSet );
 206
 207     const SvxHyperlinkItem *aItem = aItemSet.GetItem(SID_HYPERLINK_SETLINK);
 208     if ( !aItem->GetURL().isEmpty() )
 209         GetDispatcher()->ExecuteList(SID_HYPERLINK_SETLINK,
 210                 SfxCallMode::ASYNCHRON | SfxCallMode::RECORD, { aItem });
 211
 212     static_cast<SvxHyperlinkTabPageBase*>( GetTabPage( GetCurPageId() ) )->DoApply();
 213 }
 214
 215 /// Click on OK button
 216 IMPL_LINK_NOARG(SvxHpLinkDlg, ClickOkHdl_Impl, weld::Button&, void)
 217 {
 218     Apply();
 219     m_xDialog->response(RET_OK);
 220 }
 221
 222 /*************************************************************************
 223 |*
 224 |* Click on Apply-button
 225 |*
 226 |************************************************************************/
 227 IMPL_LINK_NOARG(SvxHpLinkDlg, ClickApplyHdl_Impl, weld::Button&, void)
 228 {
 229     Apply();
 230 }
 231
 232 /*************************************************************************
 233 |*
 234 |* Set Page
 235 |*
 236 |************************************************************************/
 237 void SvxHpLinkDlg::SetPage ( SvxHyperlinkItem const * pItem )
 238 {
 239     OUString sPageId(u"internet"_ustr);
 240
 241     const OUString& aStrURL(pItem->GetURL());
 242     INetURLObject aURL(aStrURL);
 243     INetProtocol eProtocolTyp = aURL.GetProtocol();
 244
 245     switch ( eProtocolTyp )
 246     {
 247         case INetProtocol::Http :
 248         case INetProtocol::Ftp :
 249             sPageId = "internet";
 250             break;
 251         case INetProtocol::File :
 252             sPageId = "document";
 253             break;
 254         case INetProtocol::Mailto :
 255             sPageId = "mail";
 256             break;
 257         default :
 258             if (aStrURL.startsWith("#"))
 259                 sPageId = "document";
 260             else
 261             {
 262                 // not valid
 263                 sPageId = GetCurPageId();
 264             }
 265             break;
 266     }
 267
 268     ShowPage (sPageId);
 269
 270     SvxHyperlinkTabPageBase* pCurrentPage = static_cast<SvxHyperlinkTabPageBase*>(GetTabPage( sPageId ));
 271
 272     mbIsHTMLDoc = (pItem->GetInsertMode() & HLINK_HTMLMODE) != 0;
 273
 274     IconChoicePage* pPage = GetTabPage (sPageId);
 275     if(pPage)
 276     {
 277         SfxItemSet& aPageSet = const_cast<SfxItemSet&>(pPage->GetItemSet ());
 278         aPageSet.Put ( *pItem );
 279
 280         pCurrentPage->Reset( aPageSet );
 281     }
 282 }
 283
 284 /*************************************************************************
 285 |*
 286 |* Enable/Disable ReadOnly mode
 287 |*
 288 |************************************************************************/
 289 void SvxHpLinkDlg::SetReadOnlyMode( bool bRdOnly )
 290 {
 291     m_xOKBtn->set_sensitive(!bRdOnly);
 292 }
 293
 294 /*************************************************************************
 295 |*
 296 |* late-initialization of newly created pages
 297 |*
 298 |************************************************************************/
 299 void SvxHpLinkDlg::PageCreated(IconChoicePage& rPage)
 300 {
 301     SvxHyperlinkTabPageBase& rHyperlinkPage = dynamic_cast< SvxHyperlinkTabPageBase& >( rPage );
 302     Reference< XFrame > xDocumentFrame = GetBindings().GetActiveFrame();
 303     OSL_ENSURE( xDocumentFrame.is(), "SvxHpLinkDlg::PageCreated: macro assignment functionality won't work with a proper frame!" );
 304     rHyperlinkPage.SetDocumentFrame( xDocumentFrame );
 305 }
 306
 307 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */