sfx2/source/appl/appopen.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 <com/sun/star/uno/Reference.h>
  21 #include <com/sun/star/beans/PropertyValue.hpp>
  22 #include <com/sun/star/frame/FrameSearchFlag.hpp>
  23 #include <com/sun/star/frame/XComponentLoader.hpp>
  24 #include <com/sun/star/frame/XNotifyingDispatch.hpp>
  25 #include <com/sun/star/frame/XDispatchProvider.hpp>
  26 #include <com/sun/star/util/XCloseable.hpp>
  27 #include <com/sun/star/frame/XFrame.hpp>
  28 #include <com/sun/star/frame/Desktop.hpp>
  29 #include <com/sun/star/frame/DispatchResultState.hpp>
  30 #include <com/sun/star/frame/XDispatchResultListener.hpp>
  31 #include <com/sun/star/util/URL.hpp>
  32 #include <com/sun/star/util/URLTransformer.hpp>
  33 #include <com/sun/star/util/XURLTransformer.hpp>
  34 #include <com/sun/star/system/SystemShellExecuteException.hpp>
  35 #include <com/sun/star/document/XTypeDetection.hpp>
  36 #include <com/sun/star/document/MacroExecMode.hpp>
  37 #include <com/sun/star/document/UpdateDocMode.hpp>
  38 #include <com/sun/star/task/ErrorCodeRequest.hpp>
  39 #include <com/sun/star/task/InteractionHandler.hpp>
  40 #include <com/sun/star/beans/XPropertySet.hpp>
  41 #include <com/sun/star/embed/ElementModes.hpp>
  42 #include <com/sun/star/container/XNameAccess.hpp>
  43 #include <com/sun/star/uno/Sequence.h>
  44 #include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
  45 #include <cppuhelper/implbase1.hxx>
  46 #include <rtl/ustring.hxx>
  47
  48 #include <comphelper/processfactory.hxx>
  49 #include <comphelper/sequenceasvector.hxx>
  50 #include <comphelper/storagehelper.hxx>
  51 #include <comphelper/string.hxx>
  52 #include <comphelper/synchronousdispatch.hxx>
  53
  54 #include <vcl/wrkwin.hxx>
  55 #include <svl/intitem.hxx>
  56 #include <vcl/msgbox.hxx>
  57 #include <svl/stritem.hxx>
  58 #include <svl/eitem.hxx>
  59 #include <sfx2/doctempl.hxx>
  60 #include <svtools/sfxecode.hxx>
  61 #include <framework/preventduplicateinteraction.hxx>
  62 #include <svtools/ehdl.hxx>
  63 #include <basic/sbxobj.hxx>
  64 #include <svl/urihelper.hxx>
  65 #include <unotools/localfilehelper.hxx>
  66 #include <unotools/pathoptions.hxx>
  67 #include <unotools/moduleoptions.hxx>
  68 #include <svtools/miscopt.hxx>
  69 #include <svtools/templdlg.hxx>
  70 #include <osl/file.hxx>
  71 #include <unotools/extendedsecurityoptions.hxx>
  72 #include <comphelper/docpasswordhelper.hxx>
  73 #include <vcl/svapp.hxx>
  74
  75 #include <osl/mutex.hxx>
  76
  77
  78 #include <sfx2/app.hxx>
  79 #include <sfx2/bindings.hxx>
  80 #include <sfx2/dispatch.hxx>
  81 #include <sfx2/docfile.hxx>
  82 #include <sfx2/fcontnr.hxx>
  83 #include <sfx2/new.hxx>
  84 #include <sfx2/objitem.hxx>
  85 #include <sfx2/objsh.hxx>
  86 #include <svl/slstitm.hxx>
  87 #include "objshimp.hxx"
  88 #include "openflag.hxx"
  89 #include <sfx2/passwd.hxx>
  90 #include <sfx2/request.hxx>
  91 #include <sfx2/sfxresid.hxx>
  92 #include <sfx2/viewsh.hxx>
  93 #include "app.hrc"
  94 #include <sfx2/viewfrm.hxx>
  95 #include <sfx2/sfxuno.hxx>
  96 #include <sfx2/objface.hxx>
  97 #include <sfx2/filedlghelper.hxx>
  98 #include <sfx2/docfac.hxx>
  99 #include <sfx2/event.hxx>
 100 #include "templatedlg.hxx"
 101 #include "openuriexternally.hxx"
 102
 103 #include <officecfg/Office/ProtocolHandler.hxx>
 104
 105 using namespace ::com::sun::star;
 106 using namespace ::com::sun::star::beans;
 107 using namespace ::com::sun::star::frame;
 108 using namespace ::com::sun::star::lang;
 109 using namespace ::com::sun::star::uno;
 110 using namespace ::com::sun::star::util;
 111 using namespace ::com::sun::star::task;
 112 using namespace ::com::sun::star::container;
 113 using namespace ::cppu;
 114 using namespace ::sfx2;
 115
 116 //=========================================================================
 117
 118 class SfxOpenDocStatusListener_Impl : public WeakImplHelper1< XDispatchResultListener >
 119 {
 120 public:
 121     sal_Bool    bFinished;
 122     sal_Bool    bSuccess;
 123     virtual void SAL_CALL   dispatchFinished( const DispatchResultEvent& Event ) throw(RuntimeException);
 124     virtual void SAL_CALL   disposing( const EventObject& Source ) throw(RuntimeException);
 125                             SfxOpenDocStatusListener_Impl()
 126                                 : bFinished( sal_False )
 127                                 , bSuccess( sal_False )
 128                             {}
 129 };
 130
 131 void SAL_CALL SfxOpenDocStatusListener_Impl::dispatchFinished( const DispatchResultEvent& aEvent ) throw(RuntimeException)
 132 {
 133     bSuccess = ( aEvent.State == DispatchResultState::SUCCESS );
 134     bFinished = sal_True;
 135 }
 136
 137 void SAL_CALL SfxOpenDocStatusListener_Impl::disposing( const EventObject& ) throw(RuntimeException)
 138 {
 139 }
 140
 141 //====================================================================
 142
 143 void SetTemplate_Impl( const OUString &rFileName,
 144                         const OUString &rLongName,
 145                         SfxObjectShell *pDoc)
 146 {
 147     // write TemplateName to DocumentProperties of document
 148     // TemplateDate stays as default (=current date)
 149     pDoc->ResetFromTemplate( rLongName, rFileName );
 150 }
 151
 152 //====================================================================
 153 class SfxDocPasswordVerifier : public ::comphelper::IDocPasswordVerifier
 154 {
 155 public:
 156     inline explicit     SfxDocPasswordVerifier( const Reference< embed::XStorage >& rxStorage ) :
 157                             mxStorage( rxStorage ) {}
 158
 159     virtual ::comphelper::DocPasswordVerifierResult
 160                         verifyPassword( const OUString& rPassword, uno::Sequence< beans::NamedValue >& o_rEncryptionData );
 161     virtual ::comphelper::DocPasswordVerifierResult
 162                         verifyEncryptionData( const uno::Sequence< beans::NamedValue >& rEncryptionData );
 163
 164
 165 private:
 166     Reference< embed::XStorage > mxStorage;
 167 };
 168
 169 //--------------------------------------------------------------------
 170 ::comphelper::DocPasswordVerifierResult SfxDocPasswordVerifier::verifyPassword( const OUString& rPassword, uno::Sequence< beans::NamedValue >& o_rEncryptionData )
 171 {
 172     o_rEncryptionData = ::comphelper::OStorageHelper::CreatePackageEncryptionData( rPassword );
 173     return verifyEncryptionData( o_rEncryptionData );
 174 }
 175
 176
 177 //--------------------------------------------------------------------
 178 ::comphelper::DocPasswordVerifierResult SfxDocPasswordVerifier::verifyEncryptionData( const uno::Sequence< beans::NamedValue >& rEncryptionData )
 179 {
 180     ::comphelper::DocPasswordVerifierResult eResult = ::comphelper::DocPasswordVerifierResult_WRONG_PASSWORD;
 181     try
 182     {
 183         // check the encryption data
 184         // if the data correct is the stream will be opened successfully
 185         // and immediatelly closed
 186         ::comphelper::OStorageHelper::SetCommonStorageEncryptionData( mxStorage, rEncryptionData );
 187
 188         mxStorage->openStreamElement(
 189                 OUString( "content.xml"  ),
 190                 embed::ElementModes::READ | embed::ElementModes::NOCREATE );
 191
 192         // no exception -> success
 193         eResult = ::comphelper::DocPasswordVerifierResult_OK;
 194     }
 195     catch( const packages::WrongPasswordException& )
 196     {
 197         eResult = ::comphelper::DocPasswordVerifierResult_WRONG_PASSWORD;
 198     }
 199     catch( const uno::Exception& )
 200     {
 201         // unknown error, report it as wrong password
 202         // TODO/LATER: we need an additional way to report unknown problems in this case
 203         eResult = ::comphelper::DocPasswordVerifierResult_WRONG_PASSWORD;
 204     }
 205     return eResult;
 206 }
 207
 208 //====================================================================
 209
 210 //--------------------------------------------------------------------
 211
 212 sal_uInt32 CheckPasswd_Impl
 213 (
 214     SfxObjectShell*  pDoc,
 215     SfxItemPool&     /*rPool*/, // Pool, if a Set has to be created
 216     SfxMedium*       pFile      // the Medium and its Password shold be obtained
 217 )
 218
 219 /*  [Description]
 220
 221     Ask for the password for a medium, only works if it concerns storage.
 222     If the password flag is set in the Document Info, then the password is
 223     requested through a user dialogue and the set at the Set of the medium.
 224     If the set does not exist the it is created.
 225 */
 226 {
 227     sal_uIntPtr nRet = ERRCODE_NONE;
 228
 229     if( ( !pFile->GetFilter() || pFile->IsStorage() ) )
 230     {
 231         uno::Reference< embed::XStorage > xStorage = pFile->GetStorage( sal_True );
 232         if( xStorage.is() )
 233         {
 234             uno::Reference< beans::XPropertySet > xStorageProps( xStorage, uno::UNO_QUERY );
 235             if ( xStorageProps.is() )
 236             {
 237                 sal_Bool bIsEncrypted = sal_False;
 238                 try {
 239                     xStorageProps->getPropertyValue("HasEncryptedEntries")
 240                         >>= bIsEncrypted;
 241                 } catch( uno::Exception& )
 242                 {
 243                     // TODO/LATER:
 244                     // the storage either has no encrypted elements or it's just
 245                     // does not allow to detect it, probably it should be implemented laiter
 246                 }
 247
 248                 if ( bIsEncrypted )
 249                 {
 250                     Window* pWin = pDoc ? pDoc->GetDialogParent( pFile ) : NULL;
 251                     if ( pWin )
 252                         pWin->Show();
 253
 254                     nRet = ERRCODE_SFX_CANTGETPASSWD;
 255
 256                     SfxItemSet *pSet = pFile->GetItemSet();
 257                     if( pSet )
 258                     {
 259                         Reference< ::com::sun::star::task::XInteractionHandler > xInteractionHandler = pFile->GetInteractionHandler();
 260                         if( xInteractionHandler.is() )
 261                         {
 262                             // use the comphelper password helper to request a password
 263                             OUString aPassword;
 264                             SFX_ITEMSET_ARG( pSet, pPasswordItem, SfxStringItem, SID_PASSWORD, sal_False);
 265                             if ( pPasswordItem )
 266                                 aPassword = pPasswordItem->GetValue();
 267
 268                             uno::Sequence< beans::NamedValue > aEncryptionData;
 269                             SFX_ITEMSET_ARG( pSet, pEncryptionDataItem, SfxUnoAnyItem, SID_ENCRYPTIONDATA, sal_False);
 270                             if ( pEncryptionDataItem )
 271                                 pEncryptionDataItem->GetValue() >>= aEncryptionData;
 272
 273                             OUString aDocumentName = INetURLObject( pFile->GetOrigURL() ).GetMainURL( INetURLObject::DECODE_WITH_CHARSET );
 274
 275                             SfxDocPasswordVerifier aVerifier( xStorage );
 276                             aEncryptionData = ::comphelper::DocPasswordHelper::requestAndVerifyDocPassword(
 277                                 aVerifier, aEncryptionData, aPassword, xInteractionHandler, aDocumentName, comphelper::DocPasswordRequestType_STANDARD );
 278
 279                             pSet->ClearItem( SID_PASSWORD );
 280                             pSet->ClearItem( SID_ENCRYPTIONDATA );
 281
 282                             if ( aEncryptionData.getLength() > 0 )
 283                             {
 284                                 pSet->Put( SfxUnoAnyItem( SID_ENCRYPTIONDATA, uno::makeAny( aEncryptionData ) ) );
 285
 286                                 try
 287                                 {
 288                                     // update the version list of the medium using the new password
 289                                     pFile->GetVersionList();
 290                                 }
 291                                 catch( uno::Exception& )
 292                                 {
 293                                     // TODO/LATER: set the error code
 294                                 }
 295
 296                                 nRet = ERRCODE_NONE;
 297                             }
 298                             else
 299                                 nRet = ERRCODE_IO_ABORT;
 300                         }
 301                     }
 302                 }
 303             }
 304             else
 305             {
 306                 OSL_FAIL( "A storage must implement XPropertySet interface!" );
 307                 nRet = ERRCODE_SFX_CANTGETPASSWD;
 308             }
 309         }
 310     }
 311
 312     return nRet;
 313 }
 314
 315 //--------------------------------------------------------------------
 316
 317
 318 sal_uIntPtr SfxApplication::LoadTemplate( SfxObjectShellLock& xDoc, const OUString &rFileName, sal_Bool bCopy, SfxItemSet* pSet )
 319 {
 320     const SfxFilter* pFilter = NULL;
 321     SfxMedium aMedium( rFileName,  ( STREAM_READ | STREAM_SHARE_DENYNONE ) );
 322
 323     if ( !aMedium.GetStorage( sal_False ).is() )
 324         aMedium.GetInStream();
 325
 326     if ( aMedium.GetError() )
 327     {
 328         delete pSet;
 329         return aMedium.GetErrorCode();
 330     }
 331
 332     aMedium.UseInteractionHandler( sal_True );
 333     sal_uIntPtr nErr = GetFilterMatcher().GuessFilter( aMedium,&pFilter,SFX_FILTER_TEMPLATE, 0 );
 334     if ( 0 != nErr)
 335     {
 336         delete pSet;
 337         return ERRCODE_SFX_NOTATEMPLATE;
 338     }
 339
 340     if( !pFilter || !pFilter->IsAllowedAsTemplate() )
 341     {
 342         delete pSet;
 343         return ERRCODE_SFX_NOTATEMPLATE;
 344     }
 345
 346     if ( pFilter->GetFilterFlags() & SFX_FILTER_STARONEFILTER )
 347     {
 348         DBG_ASSERT( !xDoc.Is(), "Sorry, not implemented!" );
 349         delete pSet;
 350         SfxStringItem aName( SID_FILE_NAME, rFileName );
 351         SfxStringItem aReferer( SID_REFERER, OUString("private:user") );
 352         SfxStringItem aFlags( SID_OPTIONS, OUString("T") );
 353         SfxBoolItem aHidden( SID_HIDDEN, sal_True );
 354         const SfxPoolItem *pRet = GetDispatcher_Impl()->Execute( SID_OPENDOC, SFX_CALLMODE_SYNCHRON, &aName, &aHidden, &aReferer, &aFlags, 0L );
 355         const SfxObjectItem *pObj = PTR_CAST( SfxObjectItem, pRet );
 356         if ( pObj )
 357             xDoc = PTR_CAST( SfxObjectShell, pObj->GetShell() );
 358         else
 359         {
 360             const SfxViewFrameItem *pView = PTR_CAST( SfxViewFrameItem, pRet );
 361             if ( pView )
 362             {
 363                 SfxViewFrame *pFrame = pView->GetFrame();
 364                 if ( pFrame )
 365                     xDoc = pFrame->GetObjectShell();
 366             }
 367         }
 368
 369         if ( !xDoc.Is() )
 370             return ERRCODE_SFX_DOLOADFAILED;
 371     }
 372     else
 373     {
 374         if ( !xDoc.Is() )
 375             xDoc = SfxObjectShell::CreateObject( pFilter->GetServiceName() );
 376
 377         //pMedium takes ownership of pSet
 378         SfxMedium *pMedium = new SfxMedium( rFileName, STREAM_STD_READ, pFilter, pSet );
 379         if(!xDoc->DoLoad(pMedium))
 380         {
 381             ErrCode nErrCode = xDoc->GetErrorCode();
 382             xDoc->DoClose();
 383             xDoc.Clear();
 384             return nErrCode;
 385         }
 386     }
 387
 388     if( bCopy )
 389     {
 390         try
 391         {
 392             // TODO: introduce error handling
 393
 394             uno::Reference< embed::XStorage > xTempStorage = ::comphelper::OStorageHelper::GetTemporaryStorage();
 395             if( !xTempStorage.is() )
 396                 throw uno::RuntimeException();
 397
 398                xDoc->GetStorage()->copyToStorage( xTempStorage );
 399
 400             if ( !xDoc->DoSaveCompleted( new SfxMedium( xTempStorage, OUString() ) ) )
 401                 throw uno::RuntimeException();
 402         }
 403         catch( uno::Exception& )
 404         {
 405             xDoc->DoClose();
 406             xDoc.Clear();
 407
 408             // TODO: transfer correct error outside
 409             return ERRCODE_SFX_GENERAL;
 410         }
 411
 412         SetTemplate_Impl( rFileName, OUString(), xDoc );
 413     }
 414     else
 415         SetTemplate_Impl( rFileName, OUString(), xDoc );
 416
 417     xDoc->SetNoName();
 418     xDoc->InvalidateName();
 419     xDoc->SetModified(sal_False);
 420     xDoc->ResetError();
 421
 422     ::com::sun::star::uno::Reference< ::com::sun::star::frame::XModel >  xModel ( xDoc->GetModel(), ::com::sun::star::uno::UNO_QUERY );
 423     if ( xModel.is() )
 424     {
 425         SfxItemSet* pNew = xDoc->GetMedium()->GetItemSet()->Clone();
 426         pNew->ClearItem( SID_PROGRESS_STATUSBAR_CONTROL );
 427         pNew->ClearItem( SID_FILTER_NAME );
 428         ::com::sun::star::uno::Sequence< ::com::sun::star::beans::PropertyValue > aArgs;
 429         TransformItems( SID_OPENDOC, *pNew, aArgs );
 430         sal_Int32 nLength = aArgs.getLength();
 431         aArgs.realloc( nLength + 1 );
 432         aArgs[nLength].Name = "Title";
 433         aArgs[nLength].Value <<= OUString( xDoc->GetTitle( SFX_TITLE_DETECT ) );
 434         xModel->attachResource( OUString(), aArgs );
 435         delete pNew;
 436     }
 437
 438     return xDoc->GetErrorCode();
 439 }
 440
 441 //--------------------------------------------------------------------
 442
 443 void SfxApplication::NewDocDirectExec_Impl( SfxRequest& rReq )
 444 {
 445     SFX_REQUEST_ARG( rReq, pFactoryItem, SfxStringItem, SID_NEWDOCDIRECT, sal_False);
 446     OUString aFactName;
 447     if ( pFactoryItem )
 448         aFactName = pFactoryItem->GetValue();
 449    else
 450         aFactName = SvtModuleOptions().GetDefaultModuleName();
 451
 452
 453     SfxRequest aReq( SID_OPENDOC, SFX_CALLMODE_SYNCHRON, GetPool() );
 454     OUString aFact("private:factory/");
 455     aFact += aFactName;
 456     aReq.AppendItem( SfxStringItem( SID_FILE_NAME, aFact ) );
 457     aReq.AppendItem( SfxFrameItem( SID_DOCFRAME, GetFrame() ) );
 458     aReq.AppendItem( SfxStringItem( SID_TARGETNAME, OUString( "_default" ) ) );
 459
 460     // TODO/LATER: Should the other arguments be transferred as well?
 461     SFX_REQUEST_ARG( rReq, pDefaultPathItem, SfxStringItem, SID_DEFAULTFILEPATH, sal_False);
 462     if ( pDefaultPathItem )
 463         aReq.AppendItem( *pDefaultPathItem );
 464     SFX_REQUEST_ARG( rReq, pDefaultNameItem, SfxStringItem, SID_DEFAULTFILENAME, sal_False);
 465     if ( pDefaultNameItem )
 466         aReq.AppendItem( *pDefaultNameItem );
 467
 468     SFX_APP()->ExecuteSlot( aReq );
 469     const SfxViewFrameItem* pItem = PTR_CAST( SfxViewFrameItem, aReq.GetReturnValue() );
 470     if ( pItem )
 471         rReq.SetReturnValue( SfxFrameItem( 0, pItem->GetFrame() ) );
 472 }
 473
 474 //--------------------------------------------------------------------
 475
 476 void SfxApplication::NewDocExec_Impl( SfxRequest& rReq )
 477 {
 478     // No Parameter from BASIC only Factory given?
 479     SFX_REQUEST_ARG(rReq, pTemplNameItem, SfxStringItem, SID_TEMPLATE_NAME, sal_False);
 480     SFX_REQUEST_ARG(rReq, pTemplFileNameItem, SfxStringItem, SID_FILE_NAME, sal_False);
 481     SFX_REQUEST_ARG(rReq, pTemplRegionNameItem, SfxStringItem, SID_TEMPLATE_REGIONNAME, sal_False);
 482
 483     SfxObjectShellLock xDoc;
 484
 485     OUString  aTemplateRegion, aTemplateName, aTemplateFileName;
 486     sal_Bool    bDirect = sal_False; // through FileName instead of Region/Template
 487     SfxErrorContext aEc(ERRCTX_SFX_NEWDOC);
 488     if ( !pTemplNameItem && !pTemplFileNameItem )
 489     {
 490         sal_Bool bNewWin = sal_False;
 491         Window* pTopWin = GetTopWindow();
 492
 493         SfxTemplateManagerDlg aTemplDlg;
 494         int nRet = aTemplDlg.Execute();
 495         if ( nRet == RET_OK )
 496         {
 497             rReq.Done();
 498             if ( pTopWin != GetTopWindow() )
 499             {
 500                 // the dialogue opens a document -> a new TopWindow appears
 501                 pTopWin = GetTopWindow();
 502                 bNewWin = sal_True;
 503             }
 504         }
 505
 506         if ( bNewWin && pTopWin )
 507             // after the destruction of the dialogue its parent comes to top,
 508             // but we want that the new document is on top
 509             pTopWin->ToTop();
 510
 511         return;
 512     }
 513     else
 514     {
 515         // Template-Name
 516         if ( pTemplNameItem )
 517             aTemplateName = pTemplNameItem->GetValue();
 518
 519         // Template-Region
 520         if ( pTemplRegionNameItem )
 521             aTemplateRegion = pTemplRegionNameItem->GetValue();
 522
 523         // Template-File-Name
 524         if ( pTemplFileNameItem )
 525         {
 526             aTemplateFileName = pTemplFileNameItem->GetValue();
 527             bDirect = sal_True;
 528         }
 529     }
 530
 531     sal_uIntPtr lErr = 0;
 532     SfxItemSet* pSet = new SfxAllItemSet( GetPool() );
 533     pSet->Put( SfxBoolItem( SID_TEMPLATE, sal_True ) );
 534     if ( !bDirect )
 535     {
 536         SfxDocumentTemplates aTmpFac;
 537         if( aTemplateFileName.isEmpty() )
 538             aTmpFac.GetFull( aTemplateRegion, aTemplateName, aTemplateFileName );
 539
 540         if( aTemplateFileName.isEmpty() )
 541             lErr = ERRCODE_SFX_TEMPLATENOTFOUND;
 542     }
 543
 544     INetURLObject aObj( aTemplateFileName );
 545     SfxErrorContext aEC( ERRCTX_SFX_LOADTEMPLATE, aObj.PathToFileName() );
 546
 547     if ( lErr != ERRCODE_NONE )
 548     {
 549         sal_uIntPtr lFatalErr = ERRCODE_TOERROR(lErr);
 550         if ( lFatalErr )
 551             ErrorHandler::HandleError(lErr);
 552     }
 553     else
 554     {
 555         SfxCallMode eMode = SFX_CALLMODE_SYNCHRON;
 556
 557         const SfxPoolItem *pRet=0;
 558         SfxStringItem aReferer( SID_REFERER, "private:user" );
 559         SfxStringItem aTarget( SID_TARGETNAME, "_default" );
 560         if ( !aTemplateFileName.isEmpty() )
 561         {
 562             DBG_ASSERT( aObj.GetProtocol() != INET_PROT_NOT_VALID, "Illegal URL!" );
 563
 564             SfxStringItem aName( SID_FILE_NAME, aObj.GetMainURL( INetURLObject::NO_DECODE ) );
 565             SfxStringItem aTemplName( SID_TEMPLATE_NAME, aTemplateName );
 566             SfxStringItem aTemplRegionName( SID_TEMPLATE_REGIONNAME, aTemplateRegion );
 567             pRet = GetDispatcher_Impl()->Execute( SID_OPENDOC, eMode, &aName, &aTarget, &aReferer, &aTemplName, &aTemplRegionName, 0L );
 568         }
 569         else
 570         {
 571             SfxStringItem aName( SID_FILE_NAME, "private:factory" );
 572             pRet = GetDispatcher_Impl()->Execute( SID_OPENDOC, eMode, &aName, &aTarget, &aReferer, 0L );
 573         }
 574
 575         if ( pRet )
 576             rReq.SetReturnValue( *pRet );
 577     }
 578 }
 579
 580 //---------------------------------------------------------------------------
 581
 582 namespace {
 583
 584 /**
 585  * Check if a given filter type should open the hyperlinked document
 586  * natively.
 587  *
 588  * @param rFilter filter object
 589  */
 590 bool lcl_isFilterNativelySupported(const SfxFilter& rFilter)
 591 {
 592     if (rFilter.IsOwnFormat())
 593         return true;
 594
 595     OUString aName = rFilter.GetFilterName();
 596     if (aName.startsWith("MS Excel"))
 597         // We can handle all Excel variants natively.
 598         return true;
 599
 600     return false;
 601 }
 602
 603 }
 604
 605 void SfxApplication::OpenDocExec_Impl( SfxRequest& rReq )
 606 {
 607     OUString aDocService;
 608     SFX_REQUEST_ARG(rReq, pDocSrvItem, SfxStringItem, SID_DOC_SERVICE, false);
 609     if (pDocSrvItem)
 610         aDocService = pDocSrvItem->GetValue();
 611
 612     sal_uInt16 nSID = rReq.GetSlot();
 613     SFX_REQUEST_ARG( rReq, pFileNameItem, SfxStringItem, SID_FILE_NAME, sal_False );
 614     if ( pFileNameItem )
 615     {
 616         OUString aCommand( pFileNameItem->GetValue() );
 617         const SfxSlot* pSlot = GetInterface()->GetSlot( aCommand );
 618         if ( pSlot )
 619         {
 620             pFileNameItem = NULL;
 621         }
 622         else
 623         {
 624             if ( aCommand.startsWith("slot:") )
 625             {
 626                 sal_uInt16 nSlotId = (sal_uInt16) aCommand.copy(5).toInt32();
 627                 if ( nSlotId == SID_OPENDOC )
 628                     pFileNameItem = NULL;
 629             }
 630         }
 631     }
 632
 633     if ( !pFileNameItem )
 634     {
 635         // get FileName from dialog
 636         std::vector<OUString> pURLList;
 637         OUString aFilter;
 638         SfxItemSet* pSet = NULL;
 639         OUString aPath;
 640         SFX_REQUEST_ARG( rReq, pFolderNameItem, SfxStringItem, SID_PATH, sal_False );
 641         if ( pFolderNameItem )
 642             aPath = pFolderNameItem->GetValue();
 643         else if ( nSID == SID_OPENTEMPLATE )
 644         {
 645             aPath = SvtPathOptions().GetTemplatePath();
 646             sal_Int32 nTokenCount = comphelper::string::getTokenCount(aPath, ';');
 647             aPath = aPath.getToken( nTokenCount ? ( nTokenCount - 1 ) : 0 , ';' );
 648         }
 649
 650         sal_Int16 nDialog = SFX2_IMPL_DIALOG_CONFIG;
 651         SFX_REQUEST_ARG( rReq, pSystemDialogItem, SfxBoolItem, SID_FILE_DIALOG, sal_False );
 652         if ( pSystemDialogItem )
 653             nDialog = pSystemDialogItem->GetValue() ? SFX2_IMPL_DIALOG_SYSTEM : SFX2_IMPL_DIALOG_OOO;
 654
 655         OUString sStandardDir;
 656
 657         SFX_REQUEST_ARG( rReq, pStandardDirItem, SfxStringItem, SID_STANDARD_DIR, sal_False );
 658         if ( pStandardDirItem )
 659             sStandardDir = pStandardDirItem->GetValue();
 660
 661         ::com::sun::star::uno::Sequence< OUString >  aBlackList;
 662
 663         SFX_REQUEST_ARG( rReq, pBlackListItem, SfxStringListItem, SID_BLACK_LIST, sal_False );
 664         if ( pBlackListItem )
 665             pBlackListItem->GetStringList( aBlackList );
 666
 667
 668         sal_uIntPtr nErr = sfx2::FileOpenDialog_Impl(
 669                 ui::dialogs::TemplateDescription::FILEOPEN_READONLY_VERSION,
 670                 SFXWB_MULTISELECTION, OUString(), pURLList,
 671                 aFilter, pSet, &aPath, nDialog, sStandardDir, aBlackList );
 672
 673         if ( nErr == ERRCODE_ABORT )
 674         {
 675             pURLList.clear();
 676             return;
 677         }
 678
 679         rReq.SetArgs( *(SfxAllItemSet*)pSet );
 680         if ( !aFilter.isEmpty() )
 681             rReq.AppendItem( SfxStringItem( SID_FILTER_NAME, aFilter ) );
 682         rReq.AppendItem( SfxStringItem( SID_TARGETNAME, OUString("_default") ) );
 683         rReq.AppendItem( SfxStringItem( SID_REFERER, "private:user" ) );
 684         delete pSet;
 685
 686         if(!pURLList.empty())
 687         {
 688             if ( nSID == SID_OPENTEMPLATE )
 689                 rReq.AppendItem( SfxBoolItem( SID_TEMPLATE, sal_False ) );
 690
 691             // This helper wraps an existing (or may new created InteractionHandler)
 692             // intercept all incoming interactions and provide useful information
 693             // later if the following transaction was finished.
 694
 695             ::framework::PreventDuplicateInteraction*                 pHandler       = new ::framework::PreventDuplicateInteraction(::comphelper::getProcessComponentContext());
 696             css::uno::Reference< css::task::XInteractionHandler >     xHandler       (static_cast< css::task::XInteractionHandler* >(pHandler), css::uno::UNO_QUERY);
 697             css::uno::Reference< css::task::XInteractionHandler >     xWrappedHandler;
 698
 699             // wrap existing handler or create new UUI handler
 700             SFX_REQUEST_ARG(rReq, pInteractionItem, SfxUnoAnyItem, SID_INTERACTIONHANDLER, sal_False);
 701             if (pInteractionItem)
 702             {
 703                 pInteractionItem->GetValue() >>= xWrappedHandler;
 704                 rReq.RemoveItem( SID_INTERACTIONHANDLER );
 705             }
 706             if (xWrappedHandler.is())
 707                 pHandler->setHandler(xWrappedHandler);
 708             else
 709                 pHandler->useDefaultUUIHandler();
 710             rReq.AppendItem( SfxUnoAnyItem(SID_INTERACTIONHANDLER,::com::sun::star::uno::makeAny(xHandler)) );
 711
 712             // define rules for this handler
 713             css::uno::Type                                            aInteraction = ::getCppuType(static_cast< css::task::ErrorCodeRequest* >(0));
 714             ::framework::PreventDuplicateInteraction::InteractionInfo aRule        (aInteraction, 1);
 715             pHandler->addInteractionRule(aRule);
 716
 717             if (!aDocService.isEmpty())
 718             {
 719                 rReq.RemoveItem(SID_DOC_SERVICE);
 720                 rReq.AppendItem(SfxStringItem(SID_DOC_SERVICE, aDocService));
 721             }
 722
 723             for(std::vector<OUString>::const_iterator i = pURLList.begin(); i != pURLList.end(); ++i)
 724             {
 725                 rReq.RemoveItem( SID_FILE_NAME );
 726                 rReq.AppendItem( SfxStringItem( SID_FILE_NAME, *i ) );
 727
 728                 // Run synchronous, so that not the next document is loaded
 729                 // when rescheduling
 730                 // TODO/LATER: use URLList argument and always remove one document after another, each step in asychronous execution, until finished
 731                 // but only if reschedule is a problem
 732                 GetDispatcher_Impl()->Execute( SID_OPENDOC, SFX_CALLMODE_SYNCHRON, *rReq.GetArgs() );
 733
 734                 // check for special interaction "NO MORE DOCUMENTS ALLOWED" and
 735                 // break loop then. Otherwise we risk showing the same interaction more then once.
 736                 if ( pHandler->getInteractionInfo(aInteraction, &aRule) )
 737                 {
 738                     if (aRule.m_nCallCount > 0)
 739                     {
 740                         if (aRule.m_xRequest.is())
 741                         {
 742                             css::task::ErrorCodeRequest aRequest;
 743                             if (aRule.m_xRequest->getRequest() >>= aRequest)
 744                             {
 745                                 if (aRequest.ErrCode ==
 746                                     sal::static_int_cast< sal_Int32 >(
 747                                         ERRCODE_SFX_NOMOREDOCUMENTSALLOWED))
 748                                     break;
 749                             }
 750                         }
 751                     }
 752                 }
 753             }
 754
 755             pURLList.clear();
 756             return;
 757         }
 758         pURLList.clear();
 759     }
 760
 761     sal_Bool bHyperlinkUsed = sal_False;
 762
 763     if ( SID_OPENURL == nSID )
 764     {
 765         // SID_OPENURL does the same as SID_OPENDOC!
 766         rReq.SetSlot( SID_OPENDOC );
 767         nSID = SID_OPENDOC;
 768     }
 769     else if ( nSID == SID_OPENTEMPLATE )
 770     {
 771         rReq.AppendItem( SfxBoolItem( SID_TEMPLATE, sal_False ) );
 772     }
 773     // pass URL to OS by using ShellExecuter or open it internal
 774     // if it seams to be an own format.
 775     /* Attention!
 776             There exist two possibilities to open hyperlinks:
 777             a) using SID_OPENHYPERLINK (new)
 778             b) using SID_BROWSE        (old)
 779      */
 780     else if ( nSID == SID_OPENHYPERLINK )
 781     {
 782         rReq.SetSlot( SID_OPENDOC );
 783         nSID = SID_OPENDOC;
 784         bHyperlinkUsed = sal_True;
 785     }
 786
 787     // no else here! It's optional ...
 788     if (!bHyperlinkUsed)
 789     {
 790         SFX_REQUEST_ARG(rReq, pHyperLinkUsedItem, SfxBoolItem, SID_BROWSE, sal_False);
 791         if ( pHyperLinkUsedItem )
 792             bHyperlinkUsed = pHyperLinkUsedItem->GetValue();
 793         // no "official" item, so remove it from ItemSet before using UNO-API
 794         rReq.RemoveItem( SID_BROWSE );
 795     }
 796
 797     SFX_REQUEST_ARG( rReq, pFileName, SfxStringItem, SID_FILE_NAME, sal_False );
 798     OUString aFileName = pFileName->GetValue();
 799
 800     OUString aReferer;
 801     SFX_REQUEST_ARG( rReq, pRefererItem, SfxStringItem, SID_REFERER, sal_False );
 802     if ( pRefererItem )
 803         aReferer = pRefererItem->GetValue();
 804
 805     SFX_REQUEST_ARG( rReq, pFileFlagsItem, SfxStringItem, SID_OPTIONS, sal_False);
 806     if ( pFileFlagsItem )
 807     {
 808         OUString aFileFlags = pFileFlagsItem->GetValue();
 809         aFileFlags = aFileFlags.toAsciiUpperCase();
 810         if ( -1 != aFileFlags.indexOf( 0x0054 ) )               // T = 54h
 811         {
 812             rReq.RemoveItem( SID_TEMPLATE );
 813             rReq.AppendItem( SfxBoolItem( SID_TEMPLATE, sal_True ) );
 814         }
 815
 816         if ( -1 != aFileFlags.indexOf( 0x0048 ) )               // H = 48h
 817         {
 818             rReq.RemoveItem( SID_HIDDEN );
 819             rReq.AppendItem( SfxBoolItem( SID_HIDDEN, sal_True ) );
 820         }
 821
 822         if ( -1 != aFileFlags.indexOf( 0x0052 ) )               // R = 52h
 823         {
 824             rReq.RemoveItem( SID_DOC_READONLY );
 825             rReq.AppendItem( SfxBoolItem( SID_DOC_READONLY, sal_True ) );
 826         }
 827
 828         if ( -1 != aFileFlags.indexOf( 0x0042 ) )               // B = 42h
 829         {
 830             rReq.RemoveItem( SID_PREVIEW );
 831             rReq.AppendItem( SfxBoolItem( SID_PREVIEW, sal_True ) );
 832         }
 833
 834         rReq.RemoveItem( SID_OPTIONS );
 835     }
 836
 837     // Mark without URL cannot be handled by hyperlink code
 838     if ( bHyperlinkUsed && !aFileName.isEmpty() && aFileName[0] != '#' )
 839     {
 840         Reference< ::com::sun::star::document::XTypeDetection > xTypeDetection(
 841                                                                     ::comphelper::getProcessServiceFactory()->createInstance(
 842                                                                     OUString("com.sun.star.document.TypeDetection")),
 843                                                                     UNO_QUERY );
 844         if ( xTypeDetection.is() )
 845         {
 846             URL             aURL;
 847             OUString aTypeName;
 848
 849             aURL.Complete = aFileName;
 850             Reference< util::XURLTransformer > xTrans( util::URLTransformer::create( ::comphelper::getProcessComponentContext() ) );
 851             xTrans->parseStrict( aURL );
 852
 853             INetProtocol aINetProtocol = INetURLObject( aURL.Complete ).GetProtocol();
 854             SvtExtendedSecurityOptions aExtendedSecurityOptions;
 855             SvtExtendedSecurityOptions::OpenHyperlinkMode eMode = aExtendedSecurityOptions.GetOpenHyperlinkMode();
 856
 857             if ( eMode == SvtExtendedSecurityOptions::OPEN_NEVER && aINetProtocol != INET_PROT_VND_SUN_STAR_HELP )
 858             {
 859                 SolarMutexGuard aGuard;
 860                 Window *pWindow = SFX_APP()->GetTopWindow();
 861
 862                 WarningBox  aSecurityWarningBox( pWindow, SfxResId( RID_SECURITY_WARNING_NO_HYPERLINKS ));
 863                 aSecurityWarningBox.SetText( SfxResId(RID_SECURITY_WARNING_TITLE).toString() );
 864                 aSecurityWarningBox.Execute();
 865                 return;
 866             }
 867
 868             aTypeName = xTypeDetection->queryTypeByURL( aURL.Main );
 869             SfxFilterMatcher& rMatcher = SFX_APP()->GetFilterMatcher();
 870             const SfxFilter* pFilter = rMatcher.GetFilter4EA( aTypeName );
 871             if (!pFilter || !lcl_isFilterNativelySupported(*pFilter))
 872             {
 873                 // hyperlink does not link to own type => special handling (http, ftp) browser and (other external protocols) OS
 874                 if ( aINetProtocol == INET_PROT_MAILTO )
 875                 {
 876                     // don't dispatch mailto hyperlink to desktop dispatcher
 877                     rReq.RemoveItem( SID_TARGETNAME );
 878                     rReq.AppendItem( SfxStringItem( SID_TARGETNAME, OUString("_self") ) );
 879                 }
 880                 else if ( aINetProtocol == INET_PROT_FTP ||
 881                      aINetProtocol == INET_PROT_HTTP ||
 882                      aINetProtocol == INET_PROT_HTTPS )
 883                 {
 884                     sfx2::openUriExternally(aURL.Complete, true);
 885                     return;
 886                 }
 887                 else
 888                 {
 889                     // check for "internal" protocols that should not be forwarded to the system
 890                     Sequence < OUString > aProtocols(2);
 891
 892                     // add special protocols that always should be treated as internal
 893                     aProtocols[0] = "private:*";
 894                     aProtocols[1] = "vnd.sun.star.*";
 895
 896                     // get registered protocol handlers from configuration
 897                     Reference < XNameAccess > xAccess(officecfg::Office::ProtocolHandler::HandlerSet::get());
 898                     Sequence < OUString > aNames = xAccess->getElementNames();
 899                     for ( sal_Int32 nName = 0; nName < aNames.getLength(); nName ++)
 900                     {
 901                         Reference < XPropertySet > xSet;
 902                         Any aRet = xAccess->getByName( aNames[nName] );
 903                         aRet >>= xSet;
 904                         if ( xSet.is() )
 905                         {
 906                             // copy protocols
 907                             aRet = xSet->getPropertyValue("Protocols");
 908                             Sequence < OUString > aTmp;
 909                             aRet >>= aTmp;
 910
 911                             // todo: add operator+= to SequenceAsVector class and use SequenceAsVector for aProtocols
 912                             sal_Int32 nLength = aProtocols.getLength();
 913                             aProtocols.realloc( nLength+aTmp.getLength() );
 914                             for ( sal_Int32 n=0; n<aTmp.getLength(); n++ )
 915                                 aProtocols[(++nLength)-1] = aTmp[n];
 916                         }
 917                     }
 918
 919                     sal_Bool bFound = sal_False;
 920                     for ( sal_Int32 nProt=0; nProt<aProtocols.getLength(); nProt++ )
 921                     {
 922                         WildCard aPattern(aProtocols[nProt]);
 923                         if ( aPattern.Matches( aURL.Complete ) )
 924                         {
 925                             bFound = sal_True;
 926                             break;
 927                         }
 928                     }
 929
 930                     if ( !bFound )
 931                     {
 932                         sal_Bool bLoadInternal = sal_False;
 933                         try
 934                         {
 935                             sfx2::openUriExternally(
 936                                 aURL.Complete, pFilter == 0);
 937                         }
 938                         catch ( ::com::sun::star::system::SystemShellExecuteException& )
 939                         {
 940                             rReq.RemoveItem( SID_TARGETNAME );
 941                             rReq.AppendItem( SfxStringItem( SID_TARGETNAME, OUString("_default") ) );
 942                             bLoadInternal = sal_True;
 943                         }
 944                         if ( !bLoadInternal )
 945                             return;
 946                     }
 947                 }
 948             }
 949             else
 950             {
 951                 // hyperlink document must be loaded into a new frame
 952                 rReq.RemoveItem( SID_TARGETNAME );
 953                 rReq.AppendItem( SfxStringItem( SID_TARGETNAME, OUString("_default") ) );
 954             }
 955         }
 956     }
 957
 958     if (!SvtSecurityOptions().isSecureMacroUri(aFileName, aReferer))
 959     {
 960         SfxErrorContext aCtx( ERRCTX_SFX_OPENDOC, aFileName );
 961         ErrorHandler::HandleError( ERRCODE_IO_ACCESSDENIED );
 962         return;
 963     }
 964
 965     SfxFrame* pTargetFrame = NULL;
 966     Reference< XFrame > xTargetFrame;
 967
 968     SFX_REQUEST_ARG(rReq, pFrameItem, SfxFrameItem, SID_DOCFRAME, sal_False);
 969     if ( pFrameItem )
 970         pTargetFrame = pFrameItem->GetFrame();
 971
 972     if ( !pTargetFrame )
 973     {
 974         SFX_REQUEST_ARG(rReq, pUnoFrameItem, SfxUnoFrameItem, SID_FILLFRAME, sal_False);
 975         if ( pUnoFrameItem )
 976             xTargetFrame = pUnoFrameItem->GetFrame();
 977     }
 978
 979     if ( !pTargetFrame && !xTargetFrame.is() && SfxViewFrame::Current() )
 980         pTargetFrame = &SfxViewFrame::Current()->GetFrame();
 981
 982     // check if caller has set a callback
 983     SFX_REQUEST_ARG(rReq, pLinkItem, SfxLinkItem, SID_DONELINK, sal_False );
 984
 985     // remove from Itemset, because it confuses the parameter transformation
 986     if ( pLinkItem )
 987         pLinkItem = (SfxLinkItem*) pLinkItem->Clone();
 988
 989     rReq.RemoveItem( SID_DONELINK );
 990
 991     // check if the view must be hidden
 992     sal_Bool bHidden = sal_False;
 993     SFX_REQUEST_ARG(rReq, pHidItem, SfxBoolItem, SID_HIDDEN, sal_False);
 994     if ( pHidItem )
 995         bHidden = pHidItem->GetValue();
 996
 997     // This request is a UI call. We have to set the right values inside the MediaDescriptor
 998     // for: InteractionHandler, StatusIndicator, MacroExecutionMode and DocTemplate.
 999     // But we have to look for already existing values or for real hidden requests.
1000     SFX_REQUEST_ARG(rReq, pPreviewItem, SfxBoolItem, SID_PREVIEW, sal_False);
1001     if (!bHidden && ( !pPreviewItem || !pPreviewItem->GetValue() ) )
1002     {
1003         SFX_REQUEST_ARG(rReq, pInteractionItem, SfxUnoAnyItem, SID_INTERACTIONHANDLER, sal_False);
1004         SFX_REQUEST_ARG(rReq, pMacroExecItem  , SfxUInt16Item, SID_MACROEXECMODE     , sal_False);
1005         SFX_REQUEST_ARG(rReq, pDocTemplateItem, SfxUInt16Item, SID_UPDATEDOCMODE     , sal_False);
1006
1007         if (!pInteractionItem)
1008         {
1009             Reference < task::XInteractionHandler2 > xHdl = task::InteractionHandler::createWithParent( ::comphelper::getProcessComponentContext(), 0 );
1010             rReq.AppendItem( SfxUnoAnyItem(SID_INTERACTIONHANDLER,::com::sun::star::uno::makeAny(xHdl)) );
1011         }
1012         if (!pMacroExecItem)
1013             rReq.AppendItem( SfxUInt16Item(SID_MACROEXECMODE,::com::sun::star::document::MacroExecMode::USE_CONFIG) );
1014         if (!pDocTemplateItem)
1015             rReq.AppendItem( SfxUInt16Item(SID_UPDATEDOCMODE,::com::sun::star::document::UpdateDocMode::ACCORDING_TO_CONFIG) );
1016     }
1017
1018     // extract target name
1019     OUString aTarget;
1020     SFX_REQUEST_ARG(rReq, pTargetItem, SfxStringItem, SID_TARGETNAME, sal_False);
1021     if ( pTargetItem )
1022         aTarget = pTargetItem->GetValue();
1023     else
1024     {
1025         SFX_REQUEST_ARG( rReq, pNewViewItem, SfxBoolItem, SID_OPEN_NEW_VIEW, sal_False );
1026         if ( pNewViewItem && pNewViewItem->GetValue() )
1027             aTarget = "_blank" ;
1028     }
1029
1030     if ( bHidden )
1031     {
1032         aTarget = "_blank";
1033         DBG_ASSERT( rReq.IsSynchronCall() || pLinkItem, "Hidden load process must be done synchronously!" );
1034     }
1035
1036     Reference < XController > xController;
1037         // if a frame is given, it must be used for the starting point of the targetting mechanism
1038         // this code is also used if asynchronous loading is possible, because loadComponent always is synchron
1039         if ( !xTargetFrame.is() )
1040         {
1041             if ( pTargetFrame )
1042             {
1043                 xTargetFrame = pTargetFrame->GetFrameInterface();
1044             }
1045             else
1046             {
1047                 xTargetFrame.set( Desktop::create(::comphelper::getProcessComponentContext()), UNO_QUERY );
1048             }
1049         }
1050
1051         // make URL ready
1052         SFX_REQUEST_ARG( rReq, pURLItem, SfxStringItem, SID_FILE_NAME, sal_False );
1053         aFileName = pURLItem->GetValue();
1054         if( !aFileName.isEmpty() && aFileName[0] == '#' ) // Mark without URL
1055         {
1056             SfxViewFrame *pView = pTargetFrame ? pTargetFrame->GetCurrentViewFrame() : 0;
1057             if ( !pView )
1058                 pView = SfxViewFrame::Current();
1059             pView->GetViewShell()->JumpToMark( aFileName.copy(1) );
1060             rReq.SetReturnValue( SfxViewFrameItem( 0, pView ) );
1061             return;
1062         }
1063
1064         // convert items to properties for framework API calls
1065         Sequence < PropertyValue > aArgs;
1066         TransformItems( SID_OPENDOC, *rReq.GetArgs(), aArgs );
1067         // Any Referer (that was relevant in the above call to
1068         // SvtSecurityOptions::isSecureMacroUri) is no longer relevant, assuming
1069         // this "open" request is initiated directly by the user:
1070         for (sal_Int32 i = 0; i != aArgs.getLength(); ++i) {
1071             if (aArgs[i].Name == "Referer") {
1072                 ++i;
1073                 for (; i != aArgs.getLength(); ++i) {
1074                     aArgs[i - 1] = aArgs[i];
1075                 }
1076                 aArgs.realloc(aArgs.getLength()-1);
1077                 break;
1078             }
1079         }
1080
1081         // TODO/LATER: either remove LinkItem or create an asynchronous process for it
1082         if( bHidden || pLinkItem || rReq.IsSynchronCall() )
1083         {
1084             // if loading must be done synchron, we must wait for completion to get a return value
1085             // find frame by myself; I must konw the exact frame to get the controller for the return value from it
1086             Reference < XComponent > xComp;
1087
1088             try
1089             {
1090                 xComp = ::comphelper::SynchronousDispatch::dispatch( xTargetFrame, aFileName, aTarget, 0, aArgs );
1091             }
1092             catch(const RuntimeException&)
1093             {
1094                 throw;
1095             }
1096             catch(const ::com::sun::star::uno::Exception&)
1097             {
1098             }
1099
1100             Reference < XModel > xModel( xComp, UNO_QUERY );
1101             if ( xModel.is() )
1102                 xController = xModel->getCurrentController();
1103             else
1104                 xController = Reference < XController >( xComp, UNO_QUERY );
1105
1106         }
1107         else
1108         {
1109             URL aURL;
1110             aURL.Complete = aFileName;
1111             Reference< util::XURLTransformer > xTrans( util::URLTransformer::create( ::comphelper::getProcessComponentContext() ) );
1112             xTrans->parseStrict( aURL );
1113
1114             Reference < XDispatchProvider > xProv( xTargetFrame, UNO_QUERY );
1115             Reference < XDispatch > xDisp = xProv.is() ? xProv->queryDispatch( aURL, aTarget, FrameSearchFlag::ALL ) : Reference < XDispatch >();;
1116             SAL_INFO( "sfx2.appl", "PERFORMANCE - SfxApplication::OpenDocExec_Impl" );
1117             if ( xDisp.is() )
1118                 xDisp->dispatch( aURL, aArgs );
1119         }
1120
1121     if ( xController.is() )
1122     {
1123         // try to find the SfxFrame for the controller
1124         SfxFrame* pCntrFrame = NULL;
1125         for ( SfxViewShell* pShell = SfxViewShell::GetFirst( 0, sal_False ); pShell; pShell = SfxViewShell::GetNext( *pShell, 0, sal_False ) )
1126         {
1127             if ( pShell->GetController() == xController )
1128             {
1129                 pCntrFrame = &pShell->GetViewFrame()->GetFrame();
1130                 break;
1131             }
1132         }
1133
1134         if ( pCntrFrame )
1135         {
1136             SfxObjectShell* pSh = pCntrFrame->GetCurrentDocument();
1137             DBG_ASSERT( pSh, "Controller without ObjectShell ?!" );
1138
1139             rReq.SetReturnValue( SfxViewFrameItem( 0, pCntrFrame->GetCurrentViewFrame() ) );
1140
1141             if ( bHidden )
1142                 pSh->RestoreNoDelete();
1143         }
1144     }
1145
1146     if ( pLinkItem )
1147     {
1148         SfxPoolItem* pRet = rReq.GetReturnValue()->Clone();
1149         pLinkItem->GetValue().Call(pRet);
1150         delete pLinkItem;
1151     }
1152 }
1153
1154 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */