oox/source/ppt/pptimport.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <sal/config.h>
  21
  22 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
  23 #include <com/sun/star/uno/XComponentContext.hpp>
  24 #include <com/sun/star/document/XUndoManager.hpp>
  25 #include <com/sun/star/document/XUndoManagerSupplier.hpp>
  26 #include <comphelper/propertysequence.hxx>
  27 #include <osl/diagnose.h>
  28 #include <vcl/svapp.hxx>
  29 #include <vcl/weld.hxx>
  30 #include <svtools/sfxecode.hxx>
  31 #include <svtools/ehdl.hxx>
  32 #include <tools/urlobj.hxx>
  33 #include <svx/dialmgr.hxx>
  34 #include <svx/strings.hrc>
  35 #include <oox/ppt/pptimport.hxx>
  36 #include <oox/drawingml/chart/chartconverter.hxx>
  37 #include <oox/dump/pptxdumper.hxx>
  38 #include <drawingml/table/tablestylelistfragmenthandler.hxx>
  39 #include <oox/helper/graphichelper.hxx>
  40 #include <oox/ole/vbaproject.hxx>
  41 #include <oox/ppt/presentationfragmenthandler.hxx>
  42 #include <oox/token/tokens.hxx>
  43
  44 #include <services.hxx>
  45
  46 using namespace ::com::sun::star;
  47 using namespace ::com::sun::star::uno;
  48 using namespace ::com::sun::star::xml::sax;
  49 using namespace oox::core;
  50
  51 using ::com::sun::star::beans::PropertyValue;
  52 using ::com::sun::star::lang::XComponent;
  53
  54 namespace oox { namespace ppt {
  55
  56 OUString PowerPointImport_getImplementationName()
  57 {
  58     return OUString( "com.sun.star.comp.oox.ppt.PowerPointImport" );
  59 }
  60
  61 uno::Sequence< OUString > PowerPointImport_getSupportedServiceNames()
  62 {
  63     Sequence< OUString > aSeq( 2 );
  64     aSeq[ 0 ] = "com.sun.star.document.ImportFilter";
  65     aSeq[ 1 ] = "com.sun.star.document.ExportFilter";
  66     return aSeq;
  67 }
  68
  69 uno::Reference< uno::XInterface > PowerPointImport_createInstance( const Reference< XComponentContext >& rxContext )
  70 {
  71     return static_cast< ::cppu::OWeakObject* >( new PowerPointImport( rxContext ) );
  72 }
  73
  74 #if OSL_DEBUG_LEVEL > 0
  75 XmlFilterBase* PowerPointImport::mpDebugFilterBase = nullptr;
  76 #endif
  77
  78 PowerPointImport::PowerPointImport( const Reference< XComponentContext >& rxContext ) :
  79     XmlFilterBase( rxContext ),
  80     mxChartConv( new ::oox::drawingml::chart::ChartConverter )
  81
  82 {
  83 #if OSL_DEBUG_LEVEL > 0
  84     mpDebugFilterBase = this;
  85 #endif
  86 }
  87
  88 PowerPointImport::~PowerPointImport()
  89 {
  90 }
  91
  92 /// Visits the relations from pRelations which are of type rType.
  93 static void visitRelations(PowerPointImport& rImport, const core::RelationsRef& pRelations, const OUString& rType, std::vector<OUString>& rImageFragments)
  94 {
  95     if (core::RelationsRef pRelationsOfType = pRelations->getRelationsFromTypeFromOfficeDoc(rType))
  96     {
  97         for (const auto& rRelation : *pRelationsOfType)
  98         {
  99             OUString aFragment = pRelationsOfType->getFragmentPathFromRelation(rRelation.second);
 100             if (core::RelationsRef pFragmentRelations = rImport.importRelations(aFragment))
 101             {
 102                 // See if the fragment has images.
 103                 if (core::RelationsRef pImages = pFragmentRelations->getRelationsFromTypeFromOfficeDoc("image"))
 104                 {
 105                     for (const auto& rImage : *pImages)
 106                     {
 107                         OUString aPath = pImages->getFragmentPathFromRelation(rImage.second);
 108                         // Safe subset: e.g. WMF may have an external header from the
 109                         // referencing fragment.
 110                         if (aPath.endsWith(".jpg") || aPath.endsWith(".jpeg"))
 111                             rImageFragments.push_back(aPath);
 112                     }
 113                 }
 114
 115                 // See if the fragment has a slide layout, and recurse.
 116                 visitRelations(rImport, pFragmentRelations, "slideLayout", rImageFragments);
 117             }
 118         }
 119     }
 120 }
 121
 122 bool PowerPointImport::importDocument()
 123 {
 124     /*  to activate the PPTX dumper, define the environment variable
 125         OOO_PPTXDUMPER and insert the full path to the file
 126         file:///<path-to-oox-module>/source/dump/pptxdumper.ini. */
 127     OOX_DUMP_FILE( ::oox::dump::pptx::Dumper );
 128
 129     uno::Reference< document::XUndoManagerSupplier > xUndoManagerSupplier (getModel(), UNO_QUERY );
 130     uno::Reference< util::XLockable > xUndoManager;
 131     bool bWasUnLocked = true;
 132     if(xUndoManagerSupplier.is())
 133     {
 134         xUndoManager = xUndoManagerSupplier->getUndoManager();
 135         if(xUndoManager.is())
 136         {
 137             bWasUnLocked = !xUndoManager->isLocked();
 138             xUndoManager->lock();
 139         }
 140     }
 141
 142     importDocumentProperties();
 143
 144     OUString aFragmentPath = getFragmentPathFromFirstTypeFromOfficeDoc( "officeDocument" );
 145     FragmentHandlerRef xPresentationFragmentHandler( new PresentationFragmentHandler( *this, aFragmentPath ) );
 146     maTableStyleListPath = xPresentationFragmentHandler->getFragmentPathFromFirstTypeFromOfficeDoc( "tableStyles" );
 147
 148     // importRelations() is cheap, it will do an actual import for the first time only.
 149     if (core::RelationsRef pFragmentRelations = importRelations(aFragmentPath))
 150     {
 151         std::vector<OUString> aImageFragments;
 152         visitRelations(*this, pFragmentRelations, "slide", aImageFragments);
 153         visitRelations(*this, pFragmentRelations, "slideMaster", aImageFragments);
 154
 155         getGraphicHelper().importEmbeddedGraphics(aImageFragments);
 156     }
 157
 158     bool bRet = importFragment(xPresentationFragmentHandler);
 159
 160     if (mbMissingExtDrawing)
 161     {
 162         // Construct a warning message.
 163         INetURLObject aURL(getFileUrl());
 164         SfxErrorContext aContext(ERRCTX_SFX_OPENDOC, aURL.getName(INetURLObject::LAST_SEGMENT, true, INetURLObject::DecodeMechanism::WithCharset), nullptr, RID_ERRCTX);
 165         OUString aWarning;
 166         aContext.GetString(ERRCODE_NONE.MakeWarning(), aWarning);
 167         aWarning += ":\n";
 168         aWarning += SvxResId(RID_SVXSTR_WARN_MISSING_SMARTART);
 169
 170         // Show it.
 171         std::unique_ptr<weld::MessageDialog> xWarn(Application::CreateMessageDialog(nullptr,
 172                                                    VclMessageType::Warning, VclButtonsType::Ok,
 173                                                    aWarning));
 174         xWarn->run();
 175     }
 176
 177     if(xUndoManager.is() && bWasUnLocked)
 178         xUndoManager->unlock();
 179
 180     return bRet;
 181
 182 }
 183
 184 bool PowerPointImport::exportDocument() throw()
 185 {
 186     return false;
 187 }
 188
 189 ::Color PowerPointImport::getSchemeColor( sal_Int32 nToken ) const
 190 {
 191     ::Color nColor;
 192     if ( mpActualSlidePersist )
 193     {
 194         bool bColorMapped = false;
 195         oox::drawingml::ClrMapPtr pClrMapPtr( mpActualSlidePersist->getClrMap() );
 196         if ( pClrMapPtr )
 197             bColorMapped = pClrMapPtr->getColorMap( nToken );
 198
 199         if ( !bColorMapped )    // try masterpage mapping
 200         {
 201             SlidePersistPtr pMasterPersist = mpActualSlidePersist->getMasterPersist();
 202             if ( pMasterPersist )
 203             {
 204                 pClrMapPtr = pMasterPersist->getClrMap();
 205                 if ( pClrMapPtr )
 206                     pClrMapPtr->getColorMap( nToken );
 207             }
 208         }
 209
 210         ::oox::drawingml::ThemePtr pTheme = mpActualSlidePersist->getTheme();
 211         if( pTheme )
 212         {
 213             pTheme->getClrScheme().getColor( nToken, nColor );
 214         }
 215         else
 216         {
 217             SAL_WARN("oox", "OOX: PowerPointImport::mpThemePtr is NULL");
 218         }
 219     }
 220     return nColor;
 221 }
 222
 223 const ::oox::drawingml::Theme* PowerPointImport::getCurrentTheme() const
 224 {
 225     return mpActualSlidePersist ? mpActualSlidePersist->getTheme().get() : nullptr;
 226 }
 227
 228 sal_Bool SAL_CALL PowerPointImport::filter( const Sequence< PropertyValue >& rDescriptor )
 229 {
 230     if( XmlFilterBase::filter( rDescriptor ) )
 231         return true;
 232
 233     if (isExportFilter())
 234     {
 235         uno::Sequence<uno::Any> aArguments(comphelper::InitAnyPropertySequence(
 236         {
 237             {"IsPPTM", uno::makeAny(exportVBA())},
 238         }));
 239
 240         Reference<css::lang::XMultiServiceFactory> aFactory(getComponentContext()->getServiceManager(), UNO_QUERY_THROW);
 241         Reference< XExporter > xExporter(aFactory->createInstanceWithArguments("com.sun.star.comp.Impress.oox.PowerPointExport", aArguments), UNO_QUERY);
 242
 243         if (xExporter.is())
 244         {
 245             Reference< XComponent > xDocument( getModel(), UNO_QUERY );
 246             Reference< XFilter > xFilter( xExporter, UNO_QUERY );
 247
 248             if (xFilter.is())
 249             {
 250                 xExporter->setSourceDocument( xDocument );
 251                 if( xFilter->filter( rDescriptor ) )
 252                     return true;
 253             }
 254         }
 255     }
 256
 257     return false;
 258 }
 259
 260 ::oox::vml::Drawing* PowerPointImport::getVmlDrawing()
 261 {
 262     return mpActualSlidePersist ? mpActualSlidePersist->getDrawing() : nullptr;
 263 }
 264
 265 const oox::drawingml::table::TableStyleListPtr PowerPointImport::getTableStyles()
 266 {
 267     if ( !mpTableStyleList && !maTableStyleListPath.isEmpty() )
 268     {
 269         mpTableStyleList = std::make_shared<oox::drawingml::table::TableStyleList>( );
 270         importFragment( new oox::drawingml::table::TableStyleListFragmentHandler(
 271             *this, maTableStyleListPath, *mpTableStyleList ) );
 272     }
 273     return mpTableStyleList;
 274 }
 275
 276 ::oox::drawingml::chart::ChartConverter* PowerPointImport::getChartConverter()
 277 {
 278     return mxChartConv.get();
 279 }
 280
 281 namespace {
 282
 283 class PptGraphicHelper : public GraphicHelper
 284 {
 285 public:
 286     explicit            PptGraphicHelper( const PowerPointImport& rFilter );
 287     virtual ::Color     getSchemeColor( sal_Int32 nToken ) const override;
 288     virtual sal_Int32   getDefaultChartAreaFillStyle() const override;
 289 private:
 290     const PowerPointImport& mrFilter;
 291 };
 292
 293 PptGraphicHelper::PptGraphicHelper( const PowerPointImport& rFilter ) :
 294     GraphicHelper( rFilter.getComponentContext(), rFilter.getTargetFrame(), rFilter.getStorage() ),
 295     mrFilter( rFilter )
 296 {
 297 }
 298
 299 ::Color PptGraphicHelper::getSchemeColor( sal_Int32 nToken ) const
 300 {
 301     return mrFilter.getSchemeColor( nToken );
 302 }
 303
 304 sal_Int32 PptGraphicHelper::getDefaultChartAreaFillStyle() const
 305 {
 306     return XML_noFill;
 307 }
 308
 309 } // namespace
 310
 311 GraphicHelper* PowerPointImport::implCreateGraphicHelper() const
 312 {
 313     return new PptGraphicHelper( *this );
 314 }
 315
 316 ::oox::ole::VbaProject* PowerPointImport::implCreateVbaProject() const
 317 {
 318     return new ::oox::ole::VbaProject( getComponentContext(), getModel(), "Impress" );
 319 }
 320
 321 OUString PowerPointImport::getImplementationName()
 322 {
 323     return PowerPointImport_getImplementationName();
 324 }
 325
 326 }}
 327
 328 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */