sfx2/source/inet/inettbc.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 <inettbc.hxx>
  22
  23 #include <com/sun/star/awt/XTopWindow.hpp>
  24 #include <com/sun/star/frame/Desktop.hpp>
  25 #include <com/sun/star/task/XInteractionHandler.hpp>
  26 #include <com/sun/star/util/XURLTransformer.hpp>
  27
  28 #include <comphelper/propertyvalue.hxx>
  29 #include <svl/stritem.hxx>
  30 #include <unotools/historyoptions.hxx>
  31 #include <vcl/toolbox.hxx>
  32 #include <vcl/svapp.hxx>
  33 #include <osl/file.hxx>
  34 #include <rtl/ustring.hxx>
  35
  36 #include <svtools/inettbc.hxx>
  37
  38 #include <vcl/InterimItemWindow.hxx>
  39 #include <sfx2/sfxsids.hrc>
  40
  41 using namespace ::com::sun::star::uno;
  42 using namespace ::com::sun::star::beans;
  43 using namespace ::com::sun::star::util;
  44 using namespace ::com::sun::star::frame;
  45
  46
  47 // SfxURLToolBoxControl_Impl
  48
  49
  50 SFX_IMPL_TOOLBOX_CONTROL(SfxURLToolBoxControl_Impl,SfxStringItem)
  51
  52 SfxURLToolBoxControl_Impl::SfxURLToolBoxControl_Impl( sal_uInt16 nSlotId, ToolBoxItemId nId, ToolBox& rBox )
  53     : SfxToolBoxControl( nSlotId, nId, rBox )
  54     , m_bModified(false)
  55 {
  56     addStatusListener( u".uno:CurrentURL"_ustr);
  57 }
  58
  59 SfxURLToolBoxControl_Impl::~SfxURLToolBoxControl_Impl()
  60 {
  61 }
  62
  63 class URLBoxItemWindow final : public InterimItemWindow
  64 {
  65 private:
  66     std::unique_ptr<SvtURLBox> m_xWidget;
  67
  68     DECL_LINK(KeyInputHdl, const KeyEvent&, bool);
  69 public:
  70     URLBoxItemWindow(vcl::Window* pParent)
  71         : InterimItemWindow(pParent, u"sfx/ui/urlbox.ui"_ustr, u"URLBox"_ustr)
  72         , m_xWidget(new SvtURLBox(m_xBuilder->weld_combo_box(u"urlbox"_ustr)))
  73     {
  74         InitControlBase(m_xWidget->getWidget());
  75
  76         m_xWidget->connect_key_press(LINK(this, URLBoxItemWindow, KeyInputHdl));
  77
  78         int nWidth = GetDesktopRectPixel().GetWidth() > 800 ? 300 : 225;
  79         SetSizePixel(Size(nWidth, m_xWidget->get_preferred_size().Height()));
  80     }
  81
  82     SvtURLBox* GetURLBox()
  83     {
  84         return m_xWidget.get();
  85     }
  86
  87     virtual void dispose() override
  88     {
  89         m_xWidget.reset();
  90         InterimItemWindow::dispose();
  91     }
  92
  93     void set_sensitive(bool bSensitive)
  94     {
  95         Enable(bSensitive);
  96         m_xWidget->set_sensitive(bSensitive);
  97     }
  98
  99     virtual ~URLBoxItemWindow() override
 100     {
 101         disposeOnce();
 102     }
 103 };
 104
 105 IMPL_LINK(URLBoxItemWindow, KeyInputHdl, const KeyEvent&, rKEvt, bool)
 106 {
 107     return ChildKeyInput(rKEvt);
 108 }
 109
 110 URLBoxItemWindow* SfxURLToolBoxControl_Impl::GetURLBoxItemWindow() const
 111 {
 112     return static_cast<URLBoxItemWindow*>(GetToolBox().GetItemWindow(GetId()));
 113 }
 114
 115 SvtURLBox* SfxURLToolBoxControl_Impl::GetURLBox() const
 116 {
 117     return GetURLBoxItemWindow()->GetURLBox();
 118 }
 119
 120 void SfxURLToolBoxControl_Impl::OpenURL( const OUString& rName ) const
 121 {
 122     OUString aName;
 123
 124     INetURLObject aObj( rName );
 125     if ( aObj.GetProtocol() == INetProtocol::NotValid )
 126     {
 127         aName = SvtURLBox::ParseSmart( rName, u""_ustr );
 128     }
 129     else
 130         aName = rName;
 131
 132     if ( aName.isEmpty() )
 133         return;
 134
 135     Reference< XDispatchProvider > xDispatchProvider( getFrameInterface(), UNO_QUERY );
 136     if ( !xDispatchProvider.is() )
 137         return;
 138
 139     URL             aTargetURL;
 140     aTargetURL.Complete = aName;
 141
 142     getURLTransformer()->parseStrict( aTargetURL );
 143     Reference< XDispatch > xDispatch = xDispatchProvider->queryDispatch( aTargetURL, u"_default"_ustr, 0 );
 144     if ( !xDispatch.is() )
 145         return;
 146
 147     SfxURLToolBoxControl_Impl::ExecuteInfo* pExecuteInfo = new SfxURLToolBoxControl_Impl::ExecuteInfo;
 148     pExecuteInfo->xDispatch     = std::move(xDispatch);
 149     pExecuteInfo->aTargetURL    = std::move(aTargetURL);
 150     pExecuteInfo->aArgs         = {
 151         comphelper::makePropertyValue(u"Referer"_ustr, u"private:user"_ustr),
 152         comphelper::makePropertyValue(u"FileName"_ustr, aName)
 153     };
 154
 155     Application::PostUserEvent( LINK( nullptr, SfxURLToolBoxControl_Impl, ExecuteHdl_Impl), pExecuteInfo );
 156 }
 157
 158
 159 IMPL_STATIC_LINK( SfxURLToolBoxControl_Impl, ExecuteHdl_Impl, void*, p, void )
 160 {
 161     ExecuteInfo* pExecuteInfo = static_cast<ExecuteInfo*>(p);
 162     try
 163     {
 164         // Asynchronous execution as this can lead to our own destruction!
 165         // Framework can recycle our current frame and the layout manager disposes all user interface
 166         // elements if a component gets detached from its frame!
 167         pExecuteInfo->xDispatch->dispatch( pExecuteInfo->aTargetURL, pExecuteInfo->aArgs );
 168     }
 169     catch ( Exception& )
 170     {
 171     }
 172
 173     delete pExecuteInfo;
 174 }
 175
 176 VclPtr<InterimItemWindow> SfxURLToolBoxControl_Impl::CreateItemWindow( vcl::Window* pParent )
 177 {
 178     VclPtrInstance<URLBoxItemWindow> xURLBox(pParent);
 179     SvtURLBox* pURLBox = xURLBox->GetURLBox();
 180     pURLBox->connect_changed(LINK(this, SfxURLToolBoxControl_Impl, SelectHdl));
 181     pURLBox->connect_entry_activate(LINK(this, SfxURLToolBoxControl_Impl, OpenHdl));
 182     xURLBox->Show();
 183     return xURLBox;
 184 }
 185
 186 IMPL_LINK(SfxURLToolBoxControl_Impl, SelectHdl, weld::ComboBox&, rComboBox, void)
 187 {
 188     m_bModified = true;
 189
 190     SvtURLBox* pURLBox = GetURLBox();
 191     OUString aName( pURLBox->GetURL() );
 192
 193     if (rComboBox.changed_by_direct_pick() && !aName.isEmpty())
 194         OpenURL( aName );
 195 }
 196
 197 IMPL_LINK_NOARG(SfxURLToolBoxControl_Impl, OpenHdl, weld::ComboBox&, bool)
 198 {
 199     SvtURLBox* pURLBox = GetURLBox();
 200     OpenURL( pURLBox->GetURL() );
 201
 202     Reference< XDesktop2 > xDesktop = Desktop::create( m_xContext );
 203     Reference< XFrame > xFrame = xDesktop->getActiveFrame();
 204     if (!xFrame.is())
 205         return true;
 206
 207     auto xWin = xFrame->getContainerWindow();
 208     if (!xWin)
 209         return true;
 210     xWin->setFocus();
 211     Reference<css::awt::XTopWindow> xTop(xWin, UNO_QUERY);
 212     if (!xTop)
 213         return true;
 214     xTop->toFront();
 215     return true;
 216 }
 217
 218 void SfxURLToolBoxControl_Impl::StateChangedAtToolBoxControl
 219 (
 220     sal_uInt16          nSID,
 221     SfxItemState        eState,
 222     const SfxPoolItem*  pState
 223 )
 224 {
 225     if ( nSID == SID_OPENURL )
 226     {
 227         // Disable URL box if command is disabled
 228         GetURLBoxItemWindow()->set_sensitive( SfxItemState::DISABLED != eState );
 229     }
 230
 231     if ( !GetURLBoxItemWindow()->IsEnabled() )
 232         return;
 233
 234     if( nSID == SID_FOCUSURLBOX )
 235     {
 236         if ( GetURLBoxItemWindow()->IsVisible() )
 237             GetURLBoxItemWindow()->GrabFocus();
 238     }
 239     else if ( !m_bModified && SfxItemState::DEFAULT == eState )
 240     {
 241         SvtURLBox* pURLBox = GetURLBox();
 242         pURLBox->clear();
 243
 244         const std::vector< SvtHistoryOptions::HistoryItem > lList = SvtHistoryOptions::GetList(EHistoryType::PickList);
 245         for (const SvtHistoryOptions::HistoryItem& lProps : lList)
 246         {
 247             if (!lProps.sURL.isEmpty())
 248             {
 249                 INetURLObject aURL    ( lProps.sURL );
 250                 OUString      sMainURL( aURL.GetMainURL( INetURLObject::DecodeMechanism::WithCharset ) );
 251                 OUString      sFile;
 252
 253                 if (osl::FileBase::getSystemPathFromFileURL(sMainURL, sFile) == osl::FileBase::E_None)
 254                     pURLBox->append_text(sFile);
 255                 else
 256                     pURLBox->append_text(sMainURL);
 257             }
 258         }
 259
 260         const SfxStringItem *pURL = dynamic_cast< const SfxStringItem* >(pState);
 261         assert(pURL);
 262         INetURLObject aURL( pURL->GetValue() );
 263         INetProtocol eProt = aURL.GetProtocol();
 264         if ( eProt == INetProtocol::File )
 265         {
 266             pURLBox->set_entry_text( aURL.PathToFileName() );
 267         }
 268         else
 269             pURLBox->set_entry_text( aURL.GetURLNoPass() );
 270     }
 271 }
 272
 273 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */