filter/source/xsltdialog/xmlfiltertestdialog.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 <com/sun/star/beans/XPropertySet.hpp>
  22 #include <com/sun/star/document/XFilter.hpp>
  23 #include <com/sun/star/document/XExporter.hpp>
  24 #include <com/sun/star/document/XDocumentPropertiesSupplier.hpp>
  25 #include <com/sun/star/document/XGraphicStorageHandler.hpp>
  26 #include <com/sun/star/document/XEmbeddedObjectResolver.hpp>
  27 #include <com/sun/star/frame/theGlobalEventBroadcaster.hpp>
  28 #include <com/sun/star/frame/Desktop.hpp>
  29 #include <com/sun/star/frame/XStorable.hpp>
  30 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
  31 #include <com/sun/star/lang/XServiceInfo.hpp>
  32 #include <com/sun/star/system/SystemShellExecute.hpp>
  33 #include <com/sun/star/system/SystemShellExecuteFlags.hpp>
  34 #include <com/sun/star/task/InteractionHandler.hpp>
  35 #include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
  36 #include <com/sun/star/xml/XImportFilter.hpp>
  37 #include <com/sun/star/xml/XExportFilter.hpp>
  38 #include <com/sun/star/xml/sax/Writer.hpp>
  39
  40 #include <comphelper/oslfile2streamwrap.hxx>
  41 #include <vcl/svapp.hxx>
  42 #include <sfx2/filedlghelper.hxx>
  43 #include <osl/file.hxx>
  44 #include <unotools/tempfile.hxx>
  45 #include <tools/diagnose_ex.h>
  46 #include <tools/debug.hxx>
  47 #include <tools/urlobj.hxx>
  48 #include <comphelper/processfactory.hxx>
  49
  50 #include "xmlfiltercommon.hxx"
  51 #include "xmlfiltertestdialog.hxx"
  52
  53
  54 using namespace utl;
  55 using namespace osl;
  56 using namespace comphelper;
  57 using namespace com::sun::star::lang;
  58 using namespace com::sun::star::beans;
  59 using namespace com::sun::star::container;
  60 using namespace com::sun::star::document;
  61 using namespace com::sun::star::frame;
  62 using namespace com::sun::star::task;
  63 using namespace com::sun::star::uno;
  64 using namespace com::sun::star::io;
  65 using namespace com::sun::star::system;
  66 using namespace com::sun::star::xml;
  67 using namespace com::sun::star::xml::sax;
  68
  69 namespace {
  70
  71 class GlobalEventListenerImpl : public ::cppu::WeakImplHelper< css::document::XDocumentEventListener >
  72 {
  73 public:
  74     explicit GlobalEventListenerImpl( XMLFilterTestDialog* pDialog );
  75
  76     // XDocumentEventListener
  77     virtual void SAL_CALL documentEventOccured( const css::document::DocumentEvent& Event ) override;
  78
  79     // lang::XEventListener
  80     virtual void SAL_CALL disposing( const css::lang::EventObject& Source ) override;
  81 private:
  82     XMLFilterTestDialog* mpDialog;
  83 };
  84
  85 }
  86
  87 GlobalEventListenerImpl::GlobalEventListenerImpl( XMLFilterTestDialog* pDialog )
  88 : mpDialog( pDialog )
  89 {
  90 }
  91
  92 void SAL_CALL GlobalEventListenerImpl::documentEventOccured( const css::document::DocumentEvent& Event )
  93 {
  94     ::SolarMutexGuard aGuard;
  95     if( Event.EventName == "OnFocus" || Event.EventName == "OnUnload" )
  96     {
  97         Reference< XComponent > xComp( Event.Source, UNO_QUERY );
  98         mpDialog->updateCurrentDocumentButtonState( &xComp );
  99     }
 100 }
 101
 102 void SAL_CALL GlobalEventListenerImpl::disposing( const css::lang::EventObject& /* Source */ )
 103 {
 104 }
 105
 106 /** returns true if the given component supports the given service */
 107 static bool checkComponent( Reference< XComponent > const & rxComponent, const OUString& rServiceName )
 108 {
 109     try
 110     {
 111         Reference< XServiceInfo > xInfo( rxComponent, UNO_QUERY );
 112         if( xInfo.is() )
 113         {
 114             if( xInfo->supportsService( rServiceName ) )
 115             {
 116                 // special case for impress documents which supports same service as draw documents
 117                 if ( rServiceName == "com.sun.star.drawing.DrawingDocument" )
 118                 {
 119                     // so if we want a draw we need to check if it's not an impress
 120                     if( !xInfo->supportsService("com.sun.star.presentation.PresentationDocument") )
 121                         return true;
 122                 }
 123                 else
 124                 {
 125                     return true;
 126                 }
 127             }
 128         }
 129     }
 130     catch( const Exception& )
 131     {
 132         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 133     }
 134
 135     return false;
 136 }
 137
 138 XMLFilterTestDialog::XMLFilterTestDialog(weld::Window* pParent,
 139     const Reference<XComponentContext>& rxContext)
 140     : GenericDialogController(pParent, "filter/ui/testxmlfilter.ui", "TestXMLFilterDialog")
 141     , mxContext(rxContext)
 142     , m_xExport(m_xBuilder->weld_widget("export"))
 143     , m_xFTExportXSLTFile(m_xBuilder->weld_label("exportxsltfile"))
 144     , m_xPBExportBrowse(m_xBuilder->weld_button("exportbrowse"))
 145     , m_xPBCurrentDocument(m_xBuilder->weld_button("currentdocument"))
 146     , m_xFTNameOfCurrentFile(m_xBuilder->weld_label("currentfilename"))
 147     , m_xImport(m_xBuilder->weld_widget("import"))
 148     , m_xFTImportXSLTFile(m_xBuilder->weld_label("importxsltfile"))
 149     , m_xFTImportTemplate(m_xBuilder->weld_label("templateimport"))
 150     , m_xFTImportTemplateFile(m_xBuilder->weld_label("importxslttemplate"))
 151     , m_xCBXDisplaySource(m_xBuilder->weld_check_button("displaysource"))
 152     , m_xPBImportBrowse(m_xBuilder->weld_button("importbrowse"))
 153     , m_xPBRecentFile(m_xBuilder->weld_button("recentfile"))
 154     , m_xFTNameOfRecentFile(m_xBuilder->weld_label("recentfilename"))
 155     , m_xPBClose(m_xBuilder->weld_button("close"))
 156 {
 157     m_xPBExportBrowse->connect_clicked(LINK( this, XMLFilterTestDialog, ClickHdl_Impl ) );
 158     m_xPBCurrentDocument->connect_clicked(LINK( this, XMLFilterTestDialog, ClickHdl_Impl ) );
 159     m_xPBImportBrowse->connect_clicked(LINK( this, XMLFilterTestDialog, ClickHdl_Impl ) );
 160     m_xPBRecentFile->connect_clicked(LINK( this, XMLFilterTestDialog, ClickHdl_Impl ) );
 161     m_xPBClose->connect_clicked(LINK( this, XMLFilterTestDialog, ClickHdl_Impl ) );
 162
 163     m_sDialogTitle = m_xDialog->get_title();
 164
 165     try
 166     {
 167         mxGlobalBroadcaster = theGlobalEventBroadcaster::get(mxContext);
 168         mxGlobalEventListener = new GlobalEventListenerImpl( this );
 169         mxGlobalBroadcaster->addDocumentEventListener( mxGlobalEventListener );
 170     }
 171     catch( const Exception& )
 172     {
 173         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 174     }
 175 }
 176
 177 XMLFilterTestDialog::~XMLFilterTestDialog()
 178 {
 179     try
 180     {
 181         if( mxGlobalBroadcaster.is() )
 182             mxGlobalBroadcaster->removeDocumentEventListener( mxGlobalEventListener );
 183     }
 184     catch( const Exception& )
 185     {
 186         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 187     }
 188 }
 189
 190 void XMLFilterTestDialog::test( const filter_info_impl& rFilterInfo )
 191 {
 192     m_xFilterInfo.reset(new filter_info_impl( rFilterInfo ));
 193
 194     m_sImportRecentFile.clear();
 195
 196     initDialog();
 197
 198     m_xDialog->run();
 199 }
 200
 201 static OUString getFileNameFromURL( OUString const & rURL )
 202 {
 203     INetURLObject aURL( rURL );
 204     OUString aName( aURL.getName(INetURLObject::LAST_SEGMENT, true, INetURLObject::DecodeMechanism::WithCharset) );
 205     return aName;
 206 }
 207
 208 void XMLFilterTestDialog::updateCurrentDocumentButtonState( Reference< XComponent > const * pRef /* = NULL */ )
 209 {
 210     if( pRef && pRef->is() )
 211     {
 212         if( checkComponent( *pRef, m_xFilterInfo->maDocumentService ) )
 213             mxLastFocusModel = *pRef;
 214     }
 215
 216     bool bExport = (m_xFilterInfo->maFlags & 2) == 2;
 217     Reference< XComponent > xCurrentDocument;
 218     if( bExport )
 219         xCurrentDocument = getFrontMostDocument( m_xFilterInfo->maDocumentService );
 220     m_xPBCurrentDocument->set_sensitive( bExport && xCurrentDocument.is() );
 221     m_xFTNameOfCurrentFile->set_sensitive( bExport && xCurrentDocument.is() );
 222
 223     if( !xCurrentDocument.is() )
 224         return;
 225
 226     OUString aTitle;
 227     Reference< XDocumentPropertiesSupplier > xDPS( xCurrentDocument, UNO_QUERY );
 228     if( xDPS.is() )
 229     {
 230         Reference< XDocumentProperties > xProps( xDPS->getDocumentProperties() );
 231         if( xProps.is() )
 232         {
 233             aTitle = xProps->getTitle();
 234         }
 235     }
 236
 237     if( aTitle.isEmpty() )
 238     {
 239         Reference< XStorable > xStorable( xCurrentDocument, UNO_QUERY );
 240         if( xStorable.is() )
 241         {
 242             if( xStorable->hasLocation() )
 243             {
 244                 OUString aURL( xStorable->getLocation() );
 245                 aTitle = getFileNameFromURL( aURL );
 246             }
 247         }
 248     }
 249
 250     m_xFTNameOfCurrentFile->set_label( aTitle );
 251 }
 252
 253 void XMLFilterTestDialog::initDialog()
 254 {
 255     DBG_ASSERT( m_xFilterInfo, "i need a filter I can test!" );
 256     if( nullptr == m_xFilterInfo )
 257         return;
 258
 259     OUString aTitle( m_sDialogTitle );
 260     aTitle = aTitle.replaceFirst( "%s", m_xFilterInfo->maFilterName );
 261     m_xDialog->set_title( aTitle );
 262
 263     bool bImport = (m_xFilterInfo->maFlags & 1) == 1;
 264     bool bExport = (m_xFilterInfo->maFlags & 2) == 2;
 265
 266     updateCurrentDocumentButtonState();
 267
 268     m_xExport->set_sensitive(bExport);
 269     m_xFTExportXSLTFile->set_label( getFileNameFromURL( m_xFilterInfo->maExportXSLT ) );
 270
 271
 272     m_xImport->set_sensitive(bImport);
 273     m_xFTImportTemplate->set_sensitive(bImport && !m_xFilterInfo->maImportTemplate.isEmpty());
 274     m_xFTImportTemplateFile->set_sensitive(bImport && !m_xFilterInfo->maImportTemplate.isEmpty());
 275     m_xPBRecentFile->set_sensitive(bImport && !m_sImportRecentFile.isEmpty());
 276     m_xFTNameOfRecentFile->set_sensitive(bImport && !m_sImportRecentFile.isEmpty());
 277
 278     m_xFTImportXSLTFile->set_label( getFileNameFromURL( m_xFilterInfo->maImportXSLT ) );
 279     m_xFTImportTemplateFile->set_label( getFileNameFromURL( m_xFilterInfo->maImportTemplate ) );
 280     m_xFTNameOfRecentFile->set_label( getFileNameFromURL( m_sImportRecentFile ) );
 281 }
 282
 283 void XMLFilterTestDialog::onExportBrowse()
 284 {
 285     try
 286     {
 287         // Open Fileopen-Dialog
 288         ::sfx2::FileDialogHelper aDlg(
 289             css::ui::dialogs::TemplateDescription::FILEOPEN_SIMPLE,
 290             FileDialogFlags::NONE, m_xDialog.get());
 291
 292         Reference< XNameAccess > xFilterContainer( mxContext->getServiceManager()->createInstanceWithContext( "com.sun.star.document.FilterFactory", mxContext ), UNO_QUERY );
 293         Reference< XNameAccess > xTypeDetection( mxContext->getServiceManager()->createInstanceWithContext( "com.sun.star.document.TypeDetection", mxContext ), UNO_QUERY );
 294         if( xFilterContainer.is() && xTypeDetection.is() )
 295         {
 296             const Sequence< OUString > aFilterNames( xFilterContainer->getElementNames() );
 297
 298             for( OUString const & filterName : aFilterNames )
 299             {
 300                 Sequence< PropertyValue > aValues;
 301
 302                 Any aAny( xFilterContainer->getByName( filterName ) );
 303                 if( !(aAny >>= aValues) )
 304                     continue;
 305
 306                 OUString aInterfaceName;
 307                 OUString aType, aService;
 308                 sal_Int32 nFlags( 0 );
 309
 310                 int nFound = 0;
 311
 312                 for( const PropertyValue& rValue : std::as_const(aValues) )
 313                 {
 314                     if ( rValue.Name == "Type" )
 315                     {
 316                         rValue.Value >>= aType;
 317                         nFound |= 1;
 318                     }
 319                     else if ( rValue.Name == "DocumentService" )
 320                     {
 321                         rValue.Value >>= aService;
 322                         nFound |= 2;
 323                     }
 324                     else if ( rValue.Name == "Flags" )
 325                     {
 326                         rValue.Value >>= nFlags;
 327                         nFound |= 4;
 328                     }
 329                     else if ( rValue.Name == "UIName" )
 330                     {
 331                         rValue.Value >>= aInterfaceName;
 332                         nFound |= 8;
 333                     }
 334
 335                     if (nFound == 15)
 336                         break;
 337                 }
 338
 339                 if( (nFound == 15) && (!aType.isEmpty() && aService == m_xFilterInfo->maDocumentService) )
 340                 {
 341                     // see if this filter is not suppressed in dialog
 342                     if( (nFlags & 0x1000) == 0 )
 343                     {
 344                         aAny = xTypeDetection->getByName( aType );
 345                         Sequence< PropertyValue > aValues2;
 346
 347                         if( aAny >>= aValues2 )
 348                         {
 349                             OUString aExtension;
 350                             for( const PropertyValue& rProp : std::as_const(aValues2) )
 351                             {
 352                                 if ( rProp.Name == "Extensions" )
 353                                 {
 354                                     Sequence< OUString > aExtensions;
 355                                     if( rProp.Value >>= aExtensions )
 356                                     {
 357                                         const sal_Int32 nCount( aExtensions.getLength() );
 358                                         OUString* pExtensions = aExtensions.getArray();
 359                                         sal_Int32 n;
 360                                         for( n = 0; n < nCount; n++ )
 361                                         {
 362                                             if( n > 0 )
 363                                                 aExtension += ";";
 364                                             aExtension += "*." + *pExtensions++;
 365                                         }
 366                                     }
 367                                 }
 368                             }
 369
 370                             OUString aFilterName( aInterfaceName + " (" + aExtension + ")" );
 371
 372                             aDlg.AddFilter( aFilterName, aExtension );
 373
 374                             if( (nFlags & 0x100) == 0x100 )
 375                                 aDlg.SetCurrentFilter( aFilterName );
 376                         }
 377                     }
 378                 }
 379
 380             }
 381         }
 382
 383         aDlg.SetDisplayDirectory( m_sExportRecentFile );
 384
 385         if ( aDlg.Execute() == ERRCODE_NONE )
 386         {
 387             m_sExportRecentFile = aDlg.GetPath();
 388
 389             Reference< XDesktop2 > xLoader = Desktop::create( mxContext );
 390             Reference< XInteractionHandler2 > xInter = InteractionHandler::createWithParent(mxContext, nullptr);
 391             Sequence< PropertyValue > aArguments(1);
 392             aArguments[0].Name = "InteractionHandler";
 393             aArguments[0].Value <<= xInter;
 394             Reference< XComponent > xComp( xLoader->loadComponentFromURL( m_sExportRecentFile, "_default", 0, aArguments ) );
 395             if( xComp.is() )
 396             {
 397                 doExport( xComp );
 398             }
 399         }
 400     }
 401     catch(const Exception&)
 402     {
 403         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 404     }
 405
 406     initDialog();
 407 }
 408
 409 void XMLFilterTestDialog::onExportCurrentDocument()
 410 {
 411     doExport( getFrontMostDocument( m_xFilterInfo->maDocumentService ) );
 412 }
 413
 414 void XMLFilterTestDialog::doExport( const Reference< XComponent >& xComp )
 415 {
 416     try
 417     {
 418         Reference< XStorable > xStorable( xComp, UNO_QUERY );
 419         if( xStorable.is() )
 420         {
 421             OUString const ext(".xml");
 422             utl::TempFile aTempFile(OUString(), true, &ext);
 423             OUString aTempFileURL( aTempFile.GetURL() );
 424
 425             const application_info_impl* pAppInfo = getApplicationInfo( m_xFilterInfo->maExportService );
 426             if( pAppInfo )
 427             {
 428                 File aOutputFile( aTempFileURL );
 429                 /* File::RC rc = */ aOutputFile.open( osl_File_OpenFlag_Write );
 430
 431                 // create xslt exporter
 432                 Reference< XOutputStream > xIS( new comphelper::OSLOutputStreamWrapper( aOutputFile ) );
 433                 int bUseDocType = m_xFilterInfo->maDocType.isEmpty()  ? 0 : 1;
 434                 Sequence< PropertyValue > aSourceData( 2 + bUseDocType );
 435                 int i = 0;
 436
 437
 438                 aSourceData[i  ].Name = "OutputStream";
 439                 aSourceData[i++].Value <<= xIS;
 440
 441                 aSourceData[i].Name = "Indent";
 442                 aSourceData[i++].Value <<= true;
 443
 444                 if( bUseDocType )
 445                     {
 446                         aSourceData[i  ].Name = "DocType_Public";
 447                         aSourceData[i++].Value <<= m_xFilterInfo->maDocType;
 448                     }
 449
 450                 Reference< XExportFilter > xExporter( mxContext->getServiceManager()->createInstanceWithContext( "com.sun.star.documentconversion.XSLTFilter", mxContext ), UNO_QUERY );
 451                 Reference< XDocumentHandler > xHandler( xExporter, UNO_QUERY );
 452                 if( xHandler.is() )
 453                 {
 454                     Sequence< OUString > aFilterUserData( m_xFilterInfo->getFilterUserData() );
 455                     xExporter->exporter( aSourceData, aFilterUserData );
 456
 457                     Reference< XMultiServiceFactory > xDocFac( xComp, UNO_QUERY );
 458
 459                     Reference< XEmbeddedObjectResolver > xObjectResolver;
 460                     Reference<XGraphicStorageHandler> xGraphicStorageHandler;
 461
 462                     if( xDocFac.is() )
 463                     {
 464                         try
 465                         {
 466                             xGraphicStorageHandler.set(xDocFac->createInstance("com.sun.star.document.ExportGraphicStorageHandler"), UNO_QUERY);
 467                             xObjectResolver.set( xDocFac->createInstance("com.sun.star.document.ExportEmbeddedObjectResolver"), UNO_QUERY );
 468                         }
 469                         catch( const Exception& )
 470                         {
 471                         }
 472                     }
 473
 474                     Sequence< Any > aArgs( 1 + ( xGraphicStorageHandler.is() ? 1 : 0 ) + ( xObjectResolver.is() ? 1 : 0 ) );
 475                     Any* pArgs = aArgs.getArray();
 476                     if (xGraphicStorageHandler.is())
 477                         *pArgs++ <<= xGraphicStorageHandler;
 478
 479                     if  (xObjectResolver.is())
 480                         *pArgs++ <<= xObjectResolver;
 481
 482     //              *pArgs++ <<= xInfoSet;
 483                     *pArgs   <<= xHandler;
 484
 485                     Reference< XFilter > xFilter( mxContext->getServiceManager()->createInstanceWithArgumentsAndContext( pAppInfo->maXMLExporter, aArgs, mxContext ), UNO_QUERY );
 486                     if( xFilter.is() )
 487                     {
 488                         Reference< XExporter > xExporter2( xFilter, UNO_QUERY );
 489                         if( xExporter2.is() )
 490                         {
 491                             xExporter2->setSourceDocument( xComp );
 492
 493                             Sequence< PropertyValue > aDescriptor( 1 );
 494                             aDescriptor[0].Name = "FileName";
 495                             aDescriptor[0].Value <<= aTempFileURL;
 496
 497                             if( xFilter->filter( aDescriptor ) )
 498                                 displayXMLFile( aTempFileURL );
 499                         }
 500                     }
 501                 }
 502             }
 503         }
 504     }
 505     catch( const Exception& )
 506     {
 507         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 508     }
 509 }
 510
 511 void XMLFilterTestDialog::displayXMLFile( const OUString& rURL )
 512 {
 513     Reference< XSystemShellExecute > xSystemShellExecute(
 514           SystemShellExecute::create(comphelper::getProcessComponentContext()) );
 515     xSystemShellExecute->execute( rURL, OUString(), SystemShellExecuteFlags::URIS_ONLY );
 516 }
 517
 518 void XMLFilterTestDialog::onImportBrowse()
 519 {
 520     // Open Fileopen-Dialog
 521     ::sfx2::FileDialogHelper aDlg(
 522         css::ui::dialogs::TemplateDescription::FILEOPEN_SIMPLE,
 523         FileDialogFlags::NONE, m_xDialog.get());
 524     OUString aFilterName( m_xFilterInfo->maInterfaceName );
 525     OUString aExtensions;
 526
 527     int nLastIndex = 0;
 528     int nCurrentIndex = 0;
 529     for( int i = 0; nLastIndex != -1; i++ )
 530     {
 531         nLastIndex = m_xFilterInfo->maExtension.indexOf( ';', nLastIndex );
 532
 533         if( i > 0 )
 534             aExtensions += ";";
 535
 536         aExtensions += "*.";
 537
 538         if( nLastIndex == -1 )
 539         {
 540
 541             aExtensions += m_xFilterInfo->maExtension.subView( nCurrentIndex );
 542         }
 543         else
 544         {
 545             aExtensions += m_xFilterInfo->maExtension.subView( nCurrentIndex, nLastIndex - nCurrentIndex );
 546             nCurrentIndex = nLastIndex + 1;
 547             nLastIndex = nCurrentIndex;
 548         }
 549     }
 550
 551     aFilterName += " (" + aExtensions + ")";
 552
 553     aDlg.AddFilter( aFilterName, aExtensions );
 554     aDlg.SetDisplayDirectory( m_sImportRecentFile );
 555
 556     if ( aDlg.Execute() == ERRCODE_NONE )
 557     {
 558         m_sImportRecentFile = aDlg.GetPath();
 559         import( m_sImportRecentFile );
 560     }
 561
 562     initDialog();
 563 }
 564
 565 void XMLFilterTestDialog::import( const OUString& rURL )
 566 {
 567     try
 568     {
 569         Reference< XDesktop2 > xLoader = Desktop::create( mxContext );
 570         Reference< XInteractionHandler2 > xInter = InteractionHandler::createWithParent(mxContext, nullptr);
 571
 572         Sequence< PropertyValue > aArguments(2);
 573         aArguments[0].Name = "FilterName";
 574         aArguments[0].Value <<= m_xFilterInfo->maFilterName;
 575         aArguments[1].Name = "InteractionHandler";
 576         aArguments[1].Value <<= xInter;
 577
 578         xLoader->loadComponentFromURL( rURL, "_default", 0, aArguments );
 579
 580         if( m_xCBXDisplaySource->get_active() )
 581         {
 582             OUString const ext(".xml");
 583             TempFile aTempFile(OUString(), true, &ext);
 584             OUString aTempFileURL( aTempFile.GetURL() );
 585
 586             Reference< XImportFilter > xImporter( mxContext->getServiceManager()->createInstanceWithContext( "com.sun.star.documentconversion.XSLTFilter", mxContext ), UNO_QUERY );
 587             if( xImporter.is() )
 588             {
 589                 osl::File aInputFile( rURL );
 590                 aInputFile.open( osl_File_OpenFlag_Read );
 591
 592                 Reference< XInputStream > xIS( new comphelper::OSLInputStreamWrapper( aInputFile ) );
 593
 594                 Sequence< PropertyValue > aSourceData( 3 );
 595                 int i = 0;
 596
 597                 aSourceData[i  ].Name = "InputStream";
 598                 aSourceData[i++].Value <<= xIS;
 599
 600                 aSourceData[i  ].Name = "FileName";
 601                 aSourceData[i++].Value <<= rURL;
 602
 603                 aSourceData[i  ].Name = "Indent";
 604                 aSourceData[i++].Value <<= true;
 605
 606                 Reference< XWriter > xWriter = Writer::create( mxContext );
 607
 608                 File aOutputFile( aTempFileURL );
 609                 aOutputFile.open( osl_File_OpenFlag_Write );
 610
 611                 Reference< XOutputStream > xOS( new OSLOutputStreamWrapper( aOutputFile ) );
 612                 xWriter->setOutputStream( xOS );
 613
 614                 Sequence< OUString > aFilterUserData( m_xFilterInfo->getFilterUserData() );
 615                 xImporter->importer( aSourceData, xWriter, aFilterUserData );
 616             }
 617
 618             displayXMLFile( aTempFileURL );
 619         }
 620     }
 621     catch(const Exception&)
 622     {
 623         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 624     }
 625 }
 626
 627 IMPL_LINK(XMLFilterTestDialog, ClickHdl_Impl, weld::Button&, rButton, void )
 628 {
 629     if (m_xPBExportBrowse.get() == &rButton)
 630     {
 631         onExportBrowse();
 632     }
 633     else if (m_xPBCurrentDocument.get() == &rButton)
 634     {
 635         onExportCurrentDocument();
 636     }
 637     else if (m_xPBImportBrowse.get() == &rButton)
 638     {
 639         onImportBrowse();
 640     }
 641     else if (m_xPBRecentFile.get() == &rButton)
 642     {
 643         import( m_sImportRecentFile );
 644     }
 645     else if (m_xPBClose.get() == &rButton)
 646     {
 647         m_xDialog->response(RET_CLOSE);
 648     }
 649 }
 650
 651 /** returns the front most open component that supports the given service */
 652 Reference< XComponent > XMLFilterTestDialog::getFrontMostDocument( const OUString& rServiceName )
 653 {
 654     Reference< XComponent > xRet;
 655
 656     try
 657     {
 658         Reference< XDesktop2 > xDesktop = Desktop::create( mxContext );
 659         Reference< XComponent > xTest( mxLastFocusModel );
 660         if( checkComponent( xTest, rServiceName ) )
 661         {
 662             xRet = xTest;
 663         }
 664         else
 665         {
 666             xTest = xDesktop->getCurrentComponent();
 667
 668             if( checkComponent( xTest, rServiceName ) )
 669             {
 670                 xRet = xTest;
 671             }
 672             else
 673             {
 674                 Reference< XEnumerationAccess > xAccess( xDesktop->getComponents() );
 675                 if( xAccess.is() )
 676                 {
 677                     Reference< XEnumeration > xEnum( xAccess->createEnumeration() );
 678                     if( xEnum.is() )
 679                     {
 680                         while( xEnum->hasMoreElements() )
 681                         {
 682                             if( (xEnum->nextElement() >>= xTest) && xTest.is() )
 683                             {
 684                                 if( checkComponent( xTest, rServiceName ) )
 685                                 {
 686                                     xRet = xTest;
 687                                     break;
 688                                 }
 689                             }
 690                         }
 691                     }
 692                 }
 693             }
 694         }
 695     }
 696     catch( const Exception& )
 697     {
 698         TOOLS_WARN_EXCEPTION("filter.xslt", "");
 699     }
 700
 701     return xRet;
 702 }
 703
 704 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */