sc/source/ui/miscdlgs/linkarea.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 #undef SC_DLLIMPLEMENTATION
  21
  22 #include <comphelper/string.hxx>
  23 #include <sfx2/app.hxx>
  24 #include <sfx2/docfile.hxx>
  25 #include <sfx2/docfilt.hxx>
  26 #include <sfx2/docinsert.hxx>
  27 #include <sfx2/fcontnr.hxx>
  28 #include <sfx2/filedlghelper.hxx>
  29 #include <svtools/ehdl.hxx>
  30 #include <svtools/sfxecode.hxx>
  31 #include <vcl/waitobj.hxx>
  32
  33 #include "linkarea.hxx"
  34 #include "scresid.hxx"
  35 #include "sc.hrc"
  36 #include "rangeutl.hxx"
  37 #include "docsh.hxx"
  38 #include "tablink.hxx"
  39
  40 ScLinkedAreaDlg::ScLinkedAreaDlg(vcl::Window* pParent)
  41     : ModalDialog(pParent, "ExternalDataDialog", "modules/scalc/ui/externaldata.ui")
  42     , pSourceShell(nullptr)
  43     , pDocInserter(nullptr)
  44
  45 {
  46     get(m_pCbUrl, "url");
  47     get(m_pLbRanges, "ranges");
  48     m_pLbRanges->EnableMultiSelection(true);
  49     m_pLbRanges->SetDropDownLineCount(8);
  50     get(m_pBtnBrowse, "browse");
  51     get(m_pBtnReload, "reload");
  52     get(m_pNfDelay, "delay");
  53     get(m_pFtSeconds, "secondsft");
  54     get(m_pBtnOk, "ok");
  55
  56     m_pCbUrl->SetSelectHdl( LINK( this, ScLinkedAreaDlg, FileHdl ) );
  57     m_pBtnBrowse->SetClickHdl( LINK( this, ScLinkedAreaDlg, BrowseHdl ) );
  58     m_pLbRanges->SetSelectHdl( LINK( this, ScLinkedAreaDlg, RangeHdl ) );
  59     m_pBtnReload->SetClickHdl( LINK( this, ScLinkedAreaDlg, ReloadHdl ) );
  60     UpdateEnable();
  61 }
  62
  63 ScLinkedAreaDlg::~ScLinkedAreaDlg()
  64 {
  65     disposeOnce();
  66 }
  67
  68 void ScLinkedAreaDlg::dispose()
  69 {
  70     // pSourceShell is deleted by aSourceRef
  71     m_pCbUrl.clear();
  72     m_pBtnBrowse.clear();
  73     m_pLbRanges.clear();
  74     m_pBtnReload.clear();
  75     m_pNfDelay.clear();
  76     m_pFtSeconds.clear();
  77     m_pBtnOk.clear();
  78     ModalDialog::dispose();
  79 }
  80
  81 short ScLinkedAreaDlg::Execute()
  82 {
  83     return ModalDialog::Execute();
  84 }
  85
  86 #define FILTERNAME_HTML  "HTML (StarCalc)"
  87 #define FILTERNAME_QUERY "calc_HTML_WebQuery"
  88
  89 IMPL_LINK_NOARG_TYPED(ScLinkedAreaDlg, BrowseHdl, Button*, void)
  90 {
  91     if ( !pDocInserter )
  92         pDocInserter = new sfx2::DocumentInserter(
  93             OUString::createFromAscii( ScDocShell::Factory().GetShortName() ) );
  94     pDocInserter->StartExecuteModal( LINK( this, ScLinkedAreaDlg, DialogClosedHdl ) );
  95 }
  96
  97 IMPL_LINK_NOARG_TYPED(ScLinkedAreaDlg, FileHdl, ComboBox&, void)
  98 {
  99     OUString aEntered = m_pCbUrl->GetURL();
 100     if (pSourceShell)
 101     {
 102         SfxMedium* pMed = pSourceShell->GetMedium();
 103         if ( aEntered.equals(pMed->GetName()) )
 104         {
 105             //  already loaded - nothing to do
 106             return;
 107         }
 108     }
 109
 110     OUString aFilter;
 111     OUString aOptions;
 112     //  get filter name by looking at the file content (bWithContent = true)
 113     // Break operation if any error occurred inside.
 114     if (!ScDocumentLoader::GetFilterName( aEntered, aFilter, aOptions, true, true ))
 115         return;
 116
 117     // #i53241# replace HTML filter with DataQuery filter
 118     if (aFilter == FILTERNAME_HTML)
 119         aFilter = FILTERNAME_QUERY;
 120
 121     LoadDocument( aEntered, aFilter, aOptions );
 122
 123     UpdateSourceRanges();
 124     UpdateEnable();
 125 }
 126
 127 void ScLinkedAreaDlg::LoadDocument( const OUString& rFile, const OUString& rFilter, const OUString& rOptions )
 128 {
 129     if ( pSourceShell )
 130     {
 131         //  unload old document
 132         pSourceShell->DoClose();
 133         pSourceShell = nullptr;
 134         aSourceRef.Clear();
 135     }
 136
 137     if ( !rFile.isEmpty() )
 138     {
 139         WaitObject aWait( this );
 140
 141         OUString aNewFilter = rFilter;
 142         OUString aNewOptions = rOptions;
 143
 144         SfxErrorContext aEc( ERRCTX_SFX_OPENDOC, rFile );
 145
 146         ScDocumentLoader aLoader( rFile, aNewFilter, aNewOptions, 0, true );    // with interaction
 147         pSourceShell = aLoader.GetDocShell();
 148         if ( pSourceShell )
 149         {
 150             sal_uLong nErr = pSourceShell->GetErrorCode();
 151             if (nErr)
 152                 ErrorHandler::HandleError( nErr );      // including warnings
 153
 154             aSourceRef = pSourceShell;
 155             aLoader.ReleaseDocRef();    // don't call DoClose in DocLoader dtor
 156         }
 157     }
 158 }
 159
 160 void ScLinkedAreaDlg::InitFromOldLink( const OUString& rFile, const OUString& rFilter,
 161                                         const OUString& rOptions, const OUString& rSource,
 162                                         sal_uLong nRefresh )
 163 {
 164     LoadDocument( rFile, rFilter, rOptions );
 165     if (pSourceShell)
 166     {
 167         SfxMedium* pMed = pSourceShell->GetMedium();
 168         m_pCbUrl->SetText( pMed->GetName() );
 169     }
 170     else
 171         m_pCbUrl->SetText( EMPTY_OUSTRING );
 172
 173     UpdateSourceRanges();
 174
 175     sal_Int32 nRangeCount = comphelper::string::getTokenCount(rSource, ';');
 176     for ( sal_Int32 i=0; i<nRangeCount; i++ )
 177     {
 178         OUString aRange = rSource.getToken(i,';');
 179         m_pLbRanges->SelectEntry( aRange );
 180     }
 181
 182     bool bDoRefresh = (nRefresh != 0);
 183     m_pBtnReload->Check( bDoRefresh );
 184     if (bDoRefresh)
 185         m_pNfDelay->SetValue( nRefresh );
 186
 187     UpdateEnable();
 188 }
 189
 190 IMPL_LINK_NOARG_TYPED(ScLinkedAreaDlg, RangeHdl, ListBox&, void)
 191 {
 192     UpdateEnable();
 193 }
 194
 195 IMPL_LINK_NOARG_TYPED(ScLinkedAreaDlg, ReloadHdl, Button*, void)
 196 {
 197     UpdateEnable();
 198 }
 199
 200 IMPL_LINK_TYPED( ScLinkedAreaDlg, DialogClosedHdl, sfx2::FileDialogHelper*, _pFileDlg, void )
 201 {
 202     if ( _pFileDlg->GetError() != ERRCODE_NONE )
 203         return;
 204
 205     SfxMedium* pMed = pDocInserter->CreateMedium();
 206     if ( pMed )
 207     {
 208         WaitObject aWait( this );
 209
 210         // replace HTML filter with DataQuery filter
 211         const OUString aHTMLFilterName( FILTERNAME_HTML );
 212         const OUString aWebQFilterName( FILTERNAME_QUERY );
 213
 214         std::shared_ptr<const SfxFilter> pFilter = pMed->GetFilter();
 215         if (pFilter && aHTMLFilterName.equals(pFilter->GetFilterName()))
 216         {
 217             std::shared_ptr<const SfxFilter> pNewFilter =
 218                 ScDocShell::Factory().GetFilterContainer()->GetFilter4FilterName( aWebQFilterName );
 219             if( pNewFilter )
 220                 pMed->SetFilter( pNewFilter );
 221         }
 222
 223         //  ERRCTX_SFX_OPENDOC -> "Error loading document"
 224         SfxErrorContext aEc( ERRCTX_SFX_OPENDOC, pMed->GetName() );
 225
 226         if (pSourceShell)
 227             pSourceShell->DoClose();        // deleted when assigning aSourceRef
 228
 229         pMed->UseInteractionHandler( true );    // to enable the filter options dialog
 230
 231         pSourceShell = new ScDocShell;
 232         aSourceRef = pSourceShell;
 233         pSourceShell->DoLoad( pMed );
 234
 235         sal_uLong nErr = pSourceShell->GetErrorCode();
 236         if (nErr)
 237             ErrorHandler::HandleError( nErr );              // including warnings
 238
 239         if ( !pSourceShell->GetError() )                    // only errors
 240         {
 241             m_pCbUrl->SetText( pMed->GetName() );
 242         }
 243         else
 244         {
 245             pSourceShell->DoClose();
 246             pSourceShell = nullptr;
 247             aSourceRef.Clear();
 248
 249             m_pCbUrl->SetText( EMPTY_OUSTRING );
 250         }
 251     }
 252
 253     UpdateSourceRanges();
 254     UpdateEnable();
 255 }
 256
 257 #undef FILTERNAME_HTML
 258 #undef FILTERNAME_QUERY
 259
 260 void ScLinkedAreaDlg::UpdateSourceRanges()
 261 {
 262     m_pLbRanges->SetUpdateMode(false);
 263
 264     m_pLbRanges->Clear();
 265     if ( pSourceShell )
 266     {
 267         ScAreaNameIterator aIter( &pSourceShell->GetDocument() );
 268         ScRange aDummy;
 269         OUString aName;
 270         while ( aIter.Next( aName, aDummy ) )
 271             m_pLbRanges->InsertEntry( aName );
 272     }
 273
 274     m_pLbRanges->SetUpdateMode(true);
 275
 276     if ( m_pLbRanges->GetEntryCount() == 1 )
 277         m_pLbRanges->SelectEntryPos(0);
 278 }
 279
 280 void ScLinkedAreaDlg::UpdateEnable()
 281 {
 282     bool bEnable = ( pSourceShell && m_pLbRanges->GetSelectEntryCount() );
 283     m_pBtnOk->Enable( bEnable );
 284
 285     bool bReload = m_pBtnReload->IsChecked();
 286     m_pNfDelay->Enable( bReload );
 287     m_pFtSeconds->Enable( bReload );
 288 }
 289
 290 OUString ScLinkedAreaDlg::GetURL()
 291 {
 292     if (pSourceShell)
 293     {
 294         SfxMedium* pMed = pSourceShell->GetMedium();
 295         return pMed->GetName();
 296     }
 297     return EMPTY_OUSTRING;
 298 }
 299
 300 OUString ScLinkedAreaDlg::GetFilter()
 301 {
 302     if (pSourceShell)
 303     {
 304         SfxMedium* pMed = pSourceShell->GetMedium();
 305         return pMed->GetFilter()->GetFilterName();
 306     }
 307     return OUString();
 308 }
 309
 310 OUString ScLinkedAreaDlg::GetOptions()
 311 {
 312     if (pSourceShell)
 313     {
 314         SfxMedium* pMed = pSourceShell->GetMedium();
 315         return ScDocumentLoader::GetOptions( *pMed );
 316     }
 317     return OUString();
 318 }
 319
 320 OUString ScLinkedAreaDlg::GetSource()
 321 {
 322     OUStringBuffer aBuf;
 323     const sal_Int32 nCount = m_pLbRanges->GetSelectEntryCount();
 324     for (sal_Int32 i=0; i<nCount; ++i)
 325     {
 326         if (i > 0)
 327             aBuf.append(';');
 328         aBuf.append(m_pLbRanges->GetSelectEntry(i));
 329     }
 330     return aBuf.makeStringAndClear();
 331 }
 332
 333 sal_uLong ScLinkedAreaDlg::GetRefresh()
 334 {
 335     if ( m_pBtnReload->IsChecked() )
 336         return sal::static_int_cast<sal_uLong>( m_pNfDelay->GetValue() );
 337     else
 338         return 0;   // disabled
 339 }
 340
 341 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */