sw/source/filter/xml/xmlexp.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: xmlexp.cxx,v $
  10  * $Revision: 1.91 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_sw.hxx"
  33
  34
  35 #include <com/sun/star/text/XTextDocument.hpp>
  36 #include <com/sun/star/drawing/XDrawPageSupplier.hpp>
  37 #include <com/sun/star/beans/XPropertySet.hpp>
  38 #include <com/sun/star/container/XNameContainer.hpp>
  39 #include <com/sun/star/container/XIndexContainer.hpp>
  40 #include <com/sun/star/uno/RuntimeException.hpp>
  41 #include <com/sun/star/xforms/XFormsSupplier.hpp>
  42 #include <svx/svdmodel.hxx>
  43 #include <svx/svdpage.hxx>
  44 #ifndef _XMLGRHLP_HXX
  45 #ifndef _XMLGRHLP_HXX
  46 #include <svx/xmlgrhlp.hxx>
  47 #endif
  48 #include <svx/xmleohlp.hxx>
  49 #include <svx/xmlgrhlp.hxx>
  50 #endif
  51 #include <svx/eeitem.hxx>
  52 #include <svx/svddef.hxx>
  53 #include <xmloff/nmspmap.hxx>
  54 #include <xmloff/xmlnmspe.hxx>
  55 #include <svx/xmlcnitm.hxx>
  56 #include <xmloff/ProgressBarHelper.hxx>
  57 #include <xmloff/xmluconv.hxx>
  58 #include <xmloff/xformsexport.hxx>
  59 #include <pam.hxx>
  60 #include <doc.hxx>
  61 #include <swmodule.hxx>
  62 #include <docsh.hxx>
  63 #include <docstat.hxx>
  64 #include <swerror.h>
  65 #include <unoobj.hxx>
  66 #include <xmltexte.hxx>
  67 #include <xmlexp.hxx>
  68 #include <sfx2/viewsh.hxx>
  69 #ifndef _COMPHELPER_PROCESSFACTORYHXX_
  70 #include <comphelper/processfactory.hxx>
  71 #endif
  72 #include <docary.hxx>
  73 #include <svx/unolingu.hxx>
  74 #include <svx/forbiddencharacterstable.hxx>
  75 #include <ForbiddenCharactersEnum.hxx>
  76
  77 // for locking SolarMutex: svapp + mutex
  78 #include <vcl/svapp.hxx>
  79 #include <vos/mutex.hxx>
  80
  81 // --> OD 2007-03-30 #i73788#
  82 #include <pausethreadstarting.hxx>
  83 // <--
  84
  85 using ::rtl::OUString;
  86 using namespace ::com::sun::star;
  87 using namespace ::com::sun::star::frame;
  88 using namespace ::com::sun::star::lang;
  89 using namespace ::com::sun::star::xml::sax;
  90 using namespace ::com::sun::star::uno;
  91 using namespace ::com::sun::star::text;
  92 using namespace ::com::sun::star::container;
  93 using namespace ::com::sun::star::document;
  94 using namespace ::com::sun::star::drawing;
  95 using namespace ::com::sun::star::beans;
  96 using namespace ::com::sun::star::i18n;
  97 using namespace ::com::sun::star::xforms;
  98 using namespace ::xmloff::token;
  99
 100 #ifdef XML_CORE_API
 101 void SwXMLExport::SetCurPaM( SwPaM& rPaM, sal_Bool bWhole, sal_Bool bTabOnly )
 102 {
 103     if( !pCurPaM )
 104     {
 105         pCurPaM = new SwPaM( *rPaM.End(), *rPaM.Start() );
 106     }
 107     else
 108     {
 109         *pCurPaM->GetPoint() = *rPaM.Start();
 110         *pCurPaM->GetMark() = *rPaM.End();
 111     }
 112
 113     // Set PaM to table/section start node if whole doc should be exported
 114     if( bWhole )
 115     {
 116         SwTableNode *pTblNd = pCurPaM->GetNode()->FindTableNode();
 117         if( pTblNd )
 118         {
 119             pCurPaM->GetPoint()->nNode = *pTblNd;
 120
 121             if( bTabOnly )
 122                 pCurPaM->GetMark()->nNode = *pTblNd->EndOfSectionNode();
 123         }
 124
 125         SwSectionNode * pSectNd = pCurPaM->GetNode()->FindSectionNode();
 126         while( pSectNd )
 127         {
 128             pCurPaM->GetPoint()->nNode = *pSectNd;
 129
 130             // SwSectionNode::FindSectionNode() returns the section node itself
 131             pSectNd = pSectNd->StartOfSectionNode()->FindSectionNode();
 132         }
 133     }
 134 }
 135 #endif
 136
 137 // #110680#
 138 SwXMLExport::SwXMLExport(
 139     const uno::Reference< lang::XMultiServiceFactory > xServiceFactory,
 140     sal_uInt16 nExportFlags)
 141 :       SvXMLExport( xServiceFactory, MAP_INCH, XML_TEXT, nExportFlags ),
 142 #ifdef XML_CORE_API
 143     pCurPaM( 0 ),
 144     pOrigPaM( &rPaM ),
 145 #endif
 146     pTableItemMapper( 0 ),
 147     pTableLines( 0 ),
 148 #ifdef XML_CORE_API
 149     bExportWholeDoc( bExpWholeDoc ),
 150     bExportFirstTableOnly( bExpFirstTableOnly ),
 151 #endif
 152     bBlock( sal_False ),
 153     bShowProgress( sal_True ),
 154     sNumberFormat(RTL_CONSTASCII_USTRINGPARAM("NumberFormat")),
 155     sIsProtected(RTL_CONSTASCII_USTRINGPARAM("IsProtected")),
 156     sCell(RTL_CONSTASCII_USTRINGPARAM("Cell"))
 157 {
 158     _InitItemExport();
 159 }
 160
 161 #ifdef XML_CORE_API
 162 // #110680#
 163 SwXMLExport::SwXMLExport(
 164     const uno::Reference< lang::XMultiServiceFactory > xServiceFactory,
 165     const Reference< XModel >& rModel,
 166     SwPaM& rPaM,
 167     const OUString& rFileName,
 168     const Reference< XDocumentHandler > & rHandler,
 169     const Reference< XGraphicObjectResolver > & rEmbeddedGrfObjs,
 170     sal_Bool bExpWholeDoc, sal_Bool bExpFirstTableOnly,
 171     sal_Bool bShowProg )
 172 :       SvXMLExport( xServiceFactory, rFileName, rHandler, rModel, rEmbeddedGrfObjs,
 173                  SW_MOD()->GetMetric( rPaM.GetDoc()->get(IDocumentSettingAccess::HTML_MODE) ) ),
 174     pCurPaM( 0 ),
 175     pOrigPaM( &rPaM ),
 176     pTableItemMapper( 0 ),
 177     pTableLines( 0 ),
 178     bExportWholeDoc( bExpWholeDoc ),
 179     bExportFirstTableOnly( bExpFirstTableOnly ),
 180     bShowProgress( bShowProg ),
 181     sNumberFormat(RTL_CONSTASCII_USTRINGPARAM("NumberFormat")),
 182     sIsProtected(RTL_CONSTASCII_USTRINGPARAM("IsProtected")),
 183     sCell(RTL_CONSTASCII_USTRINGPARAM("Cell"))
 184 {
 185     _InitItemExport();
 186 }
 187 #endif
 188
 189 void SwXMLExport::setBlockMode()
 190 {
 191     bBlock = sal_True;
 192
 193 }
 194
 195 sal_uInt32 SwXMLExport::exportDoc( enum XMLTokenEnum eClass )
 196 {
 197     if( !GetModel().is() )
 198         return ERR_SWG_WRITE_ERROR;
 199
 200     // --> OD 2007-03-30 #i73788#
 201     SwPauseThreadStarting aPauseThreadStarting;
 202     // <--
 203
 204     Reference < XTextDocument > xTextDoc( GetModel(), UNO_QUERY );
 205     Reference < XText > xText = xTextDoc->getText();
 206     Reference<XUnoTunnel> xTextTunnel( xText, UNO_QUERY);
 207     ASSERT( xTextTunnel.is(), "missing XUnoTunnel for Cursor" );
 208     if( !xTextTunnel.is() )
 209         return ERR_SWG_WRITE_ERROR;
 210
 211     // from here, we use core interfaces -> lock Solar-Mutex (#91949#)
 212     vos::OGuard aGuard(Application::GetSolarMutex());
 213
 214     {
 215         Reference<XPropertySet> rInfoSet = getExportInfo();
 216         if( rInfoSet.is() )
 217         {
 218             OUString sAutoTextMode(
 219                 RTL_CONSTASCII_USTRINGPARAM("AutoTextMode"));
 220             if( rInfoSet->getPropertySetInfo()->hasPropertyByName(
 221                         sAutoTextMode ) )
 222             {
 223                 Any aAny = rInfoSet->getPropertyValue(sAutoTextMode);
 224                 if( aAny.getValueType() == ::getBooleanCppuType() &&
 225                     *static_cast<const sal_Bool*>(aAny.getValue()) )
 226                     setBlockMode();
 227             }
 228         }
 229     }
 230
 231     SwXText *pText = reinterpret_cast< SwXText * >(
 232             sal::static_int_cast< sal_IntPtr >( xTextTunnel->getSomething( SwXText::getUnoTunnelId() )));
 233     ASSERT( pText, "SwXText missing" );
 234     if( !pText )
 235         return ERR_SWG_WRITE_ERROR;
 236
 237     SwDoc *pDoc = pText->GetDoc();
 238
 239     sal_Bool bExtended = sal_False;
 240     if( (getExportFlags() & (EXPORT_FONTDECLS|EXPORT_STYLES|
 241                              EXPORT_MASTERSTYLES|EXPORT_CONTENT)) != 0 )
 242     {
 243         GetTextParagraphExport()->SetBlockMode( bBlock );
 244
 245         const SfxPoolItem* pItem;
 246         const SfxItemPool& rPool = pDoc->GetAttrPool();
 247         sal_uInt16 aWhichIds[5] = { RES_UNKNOWNATR_CONTAINER,
 248                                     RES_TXTATR_UNKNOWN_CONTAINER,
 249                                     SDRATTR_XMLATTRIBUTES,
 250                                     EE_PARA_XMLATTRIBS,
 251                                     EE_CHAR_XMLATTRIBS };
 252
 253         sal_uInt16 nWhichIds = rPool.GetSecondaryPool() ? 5 : 2;
 254         for( sal_uInt16 j=0; j < nWhichIds; j++ )
 255         {
 256             sal_uInt16 nWhichId = aWhichIds[j];
 257             sal_uInt16 i=0, nItems = rPool.GetItemCount( nWhichId );
 258             for( i = 0; i < nItems; ++i )
 259             {
 260                 if( 0 != (pItem = rPool.GetItem( nWhichId , i ) ) )
 261                 {
 262                     const SvXMLAttrContainerItem *pUnknown =
 263                                 PTR_CAST( SvXMLAttrContainerItem, pItem );
 264                     ASSERT( pUnknown, "illegal attribute container item" );
 265                     if( pUnknown && (pUnknown->GetAttrCount() > 0) )
 266                     {
 267                         sal_uInt16 nIdx = pUnknown->GetFirstNamespaceIndex();
 268                         while( USHRT_MAX != nIdx )
 269                         {
 270                             const OUString& rPrefix =
 271                                 pUnknown->GetPrefix( nIdx );
 272                             _GetNamespaceMap().Add( rPrefix,
 273                                                 pUnknown->GetNamespace( nIdx ),
 274                                                 XML_NAMESPACE_UNKNOWN );
 275                             nIdx = pUnknown->GetNextNamespaceIndex( nIdx );
 276                         }
 277                         bExtended = sal_True;
 278                     }
 279                 }
 280             }
 281         }
 282     }
 283
 284     MapUnit eUnit =
 285         SvXMLUnitConverter::GetMapUnit( SW_MOD()->GetMetric(pDoc->get(IDocumentSettingAccess::HTML_MODE)) );
 286     if( GetMM100UnitConverter().getXMLMeasureUnit() != eUnit )
 287     {
 288         GetMM100UnitConverter().setXMLMeasureUnit( eUnit );
 289         pTwipUnitConv->setXMLMeasureUnit( eUnit );
 290     }
 291
 292     SetExtended( bExtended );
 293
 294     SwDocStat aDocStat( pDoc->GetDocStat() );
 295     if( (getExportFlags() & EXPORT_META) != 0 )
 296     {
 297         // Update doc stat, so that correct values are exported and
 298         // the progress works correctly.
 299         if( aDocStat.bModified )
 300             pDoc->UpdateDocStat( aDocStat );
 301
 302         SfxObjectShell* pObjSh = pDoc->GetDocShell();
 303         if( pObjSh )
 304             pObjSh->UpdateDocInfoForSave();             // update information
 305     }
 306     if( bShowProgress )
 307     {
 308         ProgressBarHelper *pProgress = GetProgressBarHelper();
 309         if( -1 == pProgress->GetReference() )
 310         {
 311             // progress isn't initialized:
 312             // We assume that the whole doc is exported, and the following
 313             // durations:
 314             // - meta information: 2
 315             // - settings: 4 (TODO: not now!)
 316             // - styles (except page styles): 2
 317             // - page styles: 2 (TODO: not now!) + 2 for each paragraph
 318             // - paragraph: 2 (1 for automatic styles and one for content)
 319
 320             // If required, update doc stat, so that
 321             // the progress works correctly.
 322             if( aDocStat.bModified )
 323                 pDoc->UpdateDocStat( aDocStat );
 324
 325             // count each item once, and then multiply by two to reach the
 326             // figures given above
 327             // The styles in pDoc also count the default style that never
 328             // gets exported -> subtract one.
 329             sal_Int32 nRef = 1;
 330             nRef += pDoc->GetCharFmts()->Count() - 1;
 331             nRef += pDoc->GetFrmFmts()->Count() - 1;
 332             nRef += pDoc->GetTxtFmtColls()->Count() - 1;
 333 //                      nRef += pDoc->GetPageDescCnt();
 334             nRef += aDocStat.nPara;
 335             pProgress->SetReference( 2*nRef );
 336             pProgress->SetValue( 0 );
 337         }
 338     }
 339
 340     if( (getExportFlags() & (EXPORT_MASTERSTYLES|EXPORT_CONTENT)) != 0 )
 341     {
 342         //Auf die Korrektheit der OrdNums sind wir schon angewiesen.
 343         SdrModel* pModel = pDoc->GetDrawModel();
 344         if( pModel )
 345             pModel->GetPage( 0 )->RecalcObjOrdNums();
 346     }
 347
 348     // adjust document class (eClass)
 349     if (pDoc->get(IDocumentSettingAccess::GLOBAL_DOCUMENT))
 350     {
 351         eClass = XML_TEXT_GLOBAL;
 352
 353         // additionally, we take care of the save-linked-sections-thingy
 354         mbSaveLinkedSections = pDoc->get(IDocumentSettingAccess::GLOBAL_DOCUMENT_SAVE_LINKS);
 355     }
 356     // MIB: 03/26/04: The Label information is saved in the settings, so
 357     // we don't need it here.
 358     // else: keep default pClass that we received
 359
 360     SvXMLGraphicHelper *pGraphicResolver = 0;
 361     if( !GetGraphicResolver().is() )
 362     {
 363         pGraphicResolver = SvXMLGraphicHelper::Create( GRAPHICHELPER_MODE_WRITE );
 364         Reference< XGraphicObjectResolver > xGraphicResolver( pGraphicResolver );
 365         SetGraphicResolver( xGraphicResolver );
 366     }
 367
 368     SvXMLEmbeddedObjectHelper *pEmbeddedResolver = 0;
 369     if( !GetEmbeddedResolver().is() )
 370     {
 371         SfxObjectShell *pPersist = pDoc->GetPersist();
 372         if( pPersist )
 373         {
 374             pEmbeddedResolver = SvXMLEmbeddedObjectHelper::Create(
 375                                             *pPersist,
 376                                             EMBEDDEDOBJECTHELPER_MODE_WRITE );
 377             Reference< XEmbeddedObjectResolver > xEmbeddedResolver( pEmbeddedResolver );
 378             SetEmbeddedResolver( xEmbeddedResolver );
 379         }
 380     }
 381
 382     // set redline mode if we export STYLES or CONTENT, unless redline
 383     // mode is taken care of outside (through info XPropertySet)
 384     sal_Bool bSaveRedline =
 385         ( (getExportFlags() & (EXPORT_CONTENT|EXPORT_STYLES)) != 0 );
 386     if( bSaveRedline )
 387     {
 388         // if the info property set has a ShowChanges property,
 389         // then change tracking is taken care of on the outside,
 390         // so we don't have to!
 391         Reference<XPropertySet> rInfoSet = getExportInfo();
 392         if( rInfoSet.is() )
 393         {
 394             OUString sShowChanges( RTL_CONSTASCII_USTRINGPARAM("ShowChanges"));
 395             bSaveRedline = ! rInfoSet->getPropertySetInfo()->hasPropertyByName(
 396                                                                 sShowChanges );
 397         }
 398     }
 399     sal_uInt16 nRedlineMode = 0;
 400     bSavedShowChanges = IDocumentRedlineAccess::IsShowChanges( pDoc->GetRedlineMode() );
 401     if( bSaveRedline )
 402     {
 403         // now save and switch redline mode
 404         nRedlineMode = pDoc->GetRedlineMode();
 405         pDoc->SetRedlineMode(
 406                  (RedlineMode_t)(( nRedlineMode & nsRedlineMode_t::REDLINE_SHOW_MASK ) | nsRedlineType_t::REDLINE_INSERT ));
 407     }
 408
 409      sal_uInt32 nRet = SvXMLExport::exportDoc( eClass );
 410
 411     // now we can restore the redline mode (if we changed it previously)
 412     if( bSaveRedline )
 413     {
 414       pDoc->SetRedlineMode( (RedlineMode_t)(nRedlineMode ));
 415     }
 416
 417
 418     if( pGraphicResolver )
 419         SvXMLGraphicHelper::Destroy( pGraphicResolver );
 420     if( pEmbeddedResolver )
 421         SvXMLEmbeddedObjectHelper::Destroy( pEmbeddedResolver );
 422
 423     ASSERT( !pTableLines, "there are table columns infos left" );
 424
 425     return nRet;
 426 }
 427
 428 XMLTextParagraphExport* SwXMLExport::CreateTextParagraphExport()
 429 {
 430     return new SwXMLTextParagraphExport( *this, *GetAutoStylePool().get() );
 431 }
 432
 433 XMLShapeExport* SwXMLExport::CreateShapeExport()
 434 {
 435     XMLShapeExport* pShapeExport = new XMLShapeExport( *this, XMLTextParagraphExport::CreateShapeExtPropMapper( *this ) );
 436     Reference < XDrawPageSupplier > xDPS( GetModel(), UNO_QUERY );
 437     if( xDPS.is() )
 438     {
 439          Reference < XShapes > xShapes( xDPS->getDrawPage(), UNO_QUERY );
 440         pShapeExport->seekShapes( xShapes );
 441     }
 442
 443     return pShapeExport;
 444 }
 445
 446 __EXPORT SwXMLExport::~SwXMLExport()
 447 {
 448     _FinitItemExport();
 449 }
 450
 451
 452 void SwXMLExport::_ExportFontDecls()
 453 {
 454     GetFontAutoStylePool();     // make sure the pool is created
 455     SvXMLExport::_ExportFontDecls();
 456 }
 457
 458 #define NUM_EXPORTED_VIEW_SETTINGS 11
 459 void SwXMLExport::GetViewSettings(Sequence<PropertyValue>& aProps)
 460 {
 461     Reference< XMultiServiceFactory > xServiceFactory =
 462             comphelper::getProcessServiceFactory();
 463     ASSERT( xServiceFactory.is(),
 464             "XMLReader::Read: got no service manager" );
 465     if( !xServiceFactory.is() )
 466         return;
 467
 468     aProps.realloc( NUM_EXPORTED_VIEW_SETTINGS );
 469      // Currently exporting 9 properties
 470     PropertyValue *pValue = aProps.getArray();
 471     sal_Int32 nIndex = 0;
 472
 473     Reference < XIndexContainer > xBox (xServiceFactory->createInstance
 474             (OUString( RTL_CONSTASCII_USTRINGPARAM ("com.sun.star.document.IndexedPropertyValues") ) ), UNO_QUERY);
 475     if (xBox.is() )
 476     {
 477         pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "Views") );
 478         pValue[nIndex++].Value <<= Reference < XIndexAccess > ( xBox, UNO_QUERY );
 479     }
 480
 481     Reference < XText > xText;
 482     SwXText *pText = 0;
 483
 484     if( GetModel().is() )
 485     {
 486         Reference < XTextDocument > xTextDoc( GetModel(), UNO_QUERY );
 487         xText = xTextDoc->getText();
 488         Reference<XUnoTunnel> xTextTunnel( xText, UNO_QUERY);
 489         ASSERT( xTextTunnel.is(), "missing XUnoTunnel for Cursor" );
 490         if( xTextTunnel.is() )
 491         {
 492             pText = reinterpret_cast< SwXText * >(
 493                     sal::static_int_cast< sal_IntPtr >( xTextTunnel->getSomething( SwXText::getUnoTunnelId()) ));
 494             ASSERT( pText, "SwXText missing" );
 495         }
 496     }
 497
 498     if( !pText )
 499     {
 500         aProps.realloc(nIndex);
 501         return;
 502     }
 503
 504     SwDoc *pDoc = pText->GetDoc();
 505     const Rectangle rRect =
 506         pDoc->GetDocShell()->GetVisArea( ASPECT_CONTENT );
 507     sal_Bool bTwip = pDoc->GetDocShell()->GetMapUnit ( ) == MAP_TWIP;
 508
 509     ASSERT ( bTwip, "Map unit for visible area is not in TWIPS!" );
 510
 511     pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "ViewAreaTop") );
 512     pValue[nIndex++].Value <<= bTwip ? TWIP_TO_MM100 ( rRect.Top() ) : rRect.Top();
 513
 514     pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "ViewAreaLeft") );
 515     pValue[nIndex++].Value <<= bTwip ? TWIP_TO_MM100 ( rRect.Left() ) : rRect.Left();
 516
 517     pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "ViewAreaWidth") );
 518     pValue[nIndex++].Value <<= bTwip ? TWIP_TO_MM100 ( rRect.GetWidth() ) : rRect.GetWidth();
 519
 520     pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "ViewAreaHeight") );
 521     pValue[nIndex++].Value <<= bTwip ? TWIP_TO_MM100 ( rRect.GetHeight() ) : rRect.GetHeight();
 522
 523     // "show redline mode" cannot simply be read from the document
 524     // since it gets changed during execution. If it's in the info
 525     // XPropertySet, we take it from there.
 526     sal_Bool bShowRedlineChanges = bSavedShowChanges;
 527     Reference<XPropertySet> xInfoSet( getExportInfo() );
 528     if ( xInfoSet.is() )
 529     {
 530         OUString sShowChanges( RTL_CONSTASCII_USTRINGPARAM( "ShowChanges" ));
 531         if( xInfoSet->getPropertySetInfo()->hasPropertyByName( sShowChanges ) )
 532         {
 533             bShowRedlineChanges = *(sal_Bool*) xInfoSet->
 534                                    getPropertyValue( sShowChanges ).getValue();
 535         }
 536     }
 537
 538     pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "ShowRedlineChanges") );
 539     pValue[nIndex++].Value.setValue( &bShowRedlineChanges, ::getBooleanCppuType() );
 540
 541     sal_Bool bInBrowse =  pDoc->get(IDocumentSettingAccess::BROWSE_MODE);
 542     pValue[nIndex].Name = OUString( RTL_CONSTASCII_USTRINGPARAM ( "InBrowseMode") );
 543     pValue[nIndex++].Value.setValue( &bInBrowse, ::getBooleanCppuType() );
 544
 545     if ( nIndex < NUM_EXPORTED_VIEW_SETTINGS )
 546         aProps.realloc(nIndex);
 547 }
 548 #undef NUM_EXPORTED_VIEW_SETTINGS
 549
 550 void SwXMLExport::GetConfigurationSettings( Sequence < PropertyValue >& rProps)
 551 {
 552     Reference< XMultiServiceFactory > xFac( GetModel(), UNO_QUERY );
 553     if( xFac.is() )
 554     {
 555         Reference< XPropertySet > xProps( xFac->createInstance( OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.document.Settings" ) ) ), UNO_QUERY );
 556         if( xProps.is() )
 557             SvXMLUnitConverter::convertPropertySet( rProps, xProps );
 558     }
 559 }
 560
 561 sal_Int32 SwXMLExport::GetDocumentSpecificSettings( ::std::list< SettingsGroup >& _out_rSettings )
 562 {
 563     // the only doc-specific settings group we know so far are the XForms settings
 564     uno::Sequence<beans::PropertyValue> aXFormsSettings;
 565     Reference< XFormsSupplier > xXFormsSupp( GetModel(), UNO_QUERY );
 566     Reference< XNameAccess > xXForms;
 567     if ( xXFormsSupp.is() )
 568         xXForms = xXFormsSupp->getXForms().get();
 569     if ( xXForms.is() )
 570     {
 571         getXFormsSettings( xXForms, aXFormsSettings );
 572         _out_rSettings.push_back( SettingsGroup( XML_XFORM_MODEL_SETTINGS, aXFormsSettings ) );
 573     }
 574
 575     return aXFormsSettings.getLength() + SvXMLExport::GetDocumentSpecificSettings( _out_rSettings );
 576 }
 577
 578 void SwXMLExport::SetBodyAttributes()
 579 {
 580     Reference < XTextDocument > xTextDoc( GetModel(), UNO_QUERY );
 581     Reference < XText > xText = xTextDoc->getText();
 582     // export use of soft page breaks
 583     {
 584         Reference<XUnoTunnel> xTextTunnel( xText, UNO_QUERY);
 585         ASSERT( xTextTunnel.is(), "missing XUnoTunnel for Cursor" );
 586         if( xTextTunnel.is() )
 587         {
 588             SwXText *pText = reinterpret_cast< SwXText * >(
 589                     sal::static_int_cast< sal_IntPtr >( xTextTunnel->getSomething( SwXText::getUnoTunnelId() )));
 590             ASSERT( pText, "SwXText missing" );
 591             if( pText )
 592             {
 593                 SwDoc *pDoc = pText->GetDoc();
 594                 if( pDoc && pDoc->GetPageCount() > 1 )
 595                 {
 596                     sal_Bool bValue = sal_True;
 597                     rtl::OUStringBuffer sBuffer;
 598                     GetMM100UnitConverter().convertBool(sBuffer, bValue);
 599                     AddAttribute(XML_NAMESPACE_TEXT, XML_USE_SOFT_PAGE_BREAKS,
 600                         sBuffer.makeStringAndClear());
 601                 }
 602             }
 603         }
 604     }
 605 }
 606
 607
 608 void SwXMLExport::_ExportContent()
 609 {
 610     // export forms
 611     Reference<XDrawPageSupplier> xDrawPageSupplier(GetModel(), UNO_QUERY);
 612     if (xDrawPageSupplier.is())
 613     {
 614         // export only if we actually have elements
 615         Reference<XDrawPage> xPage = xDrawPageSupplier->getDrawPage();
 616         if (xPage.is())
 617         {
 618             // #103597# prevent export of form controls which are embedded in
 619             // mute sections
 620             Reference<XIndexAccess> xIAPage( xPage, UNO_QUERY );
 621             GetTextParagraphExport()->PreventExportOfControlsInMuteSections(
 622                 xIAPage, GetFormExport() );
 623
 624             // #i36597# / 2004-12-13 / fs@openoffice.org
 625             if ( GetFormExport()->pageContainsForms( xPage ) || GetFormExport()->documentContainsXForms() )
 626             {
 627                 ::xmloff::OOfficeFormsExport aOfficeForms(*this);
 628
 629                 GetFormExport()->exportXForms();
 630
 631                 GetFormExport()->seekPage(xPage);
 632                 GetFormExport()->exportForms(xPage);
 633             }
 634         }
 635     }
 636
 637     Reference<XPropertySet> xPropSet(GetModel(), UNO_QUERY);
 638     if (xPropSet.is())
 639     {
 640         OUString sTwoDigitYear(RTL_CONSTASCII_USTRINGPARAM("TwoDigitYear"));
 641
 642         Any aAny = xPropSet->getPropertyValue( sTwoDigitYear );
 643         aAny <<= (sal_Int16)1930;
 644
 645         sal_Int16 nYear = 0;
 646         aAny >>= nYear;
 647         if (nYear != 1930 )
 648         {
 649             rtl::OUStringBuffer sBuffer;
 650             GetMM100UnitConverter().convertNumber(sBuffer, nYear);
 651             AddAttribute(XML_NAMESPACE_TABLE, XML_NULL_YEAR, sBuffer.makeStringAndClear());
 652             SvXMLElementExport aCalcSettings(*this, XML_NAMESPACE_TABLE, XML_CALCULATION_SETTINGS, sal_True, sal_True);
 653         }
 654     }
 655
 656     GetTextParagraphExport()->exportTrackedChanges( sal_False );
 657     GetTextParagraphExport()->exportTextDeclarations();
 658     Reference < XTextDocument > xTextDoc( GetModel(), UNO_QUERY );
 659     Reference < XText > xText = xTextDoc->getText();
 660
 661     GetTextParagraphExport()->exportFramesBoundToPage( bShowProgress );
 662     GetTextParagraphExport()->exportText( xText, bShowProgress );
 663 }
 664
 665
 666
 667 //
 668 // uno component registration
 669 // helper functions for export service(s)
 670 //
 671
 672 // OOo
 673 OUString SAL_CALL SwXMLExportOOO_getImplementationName() throw()
 674 {
 675     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 676         "com.sun.star.comp.Writer.XMLExporter" ) );
 677 }
 678
 679 Sequence< OUString > SAL_CALL SwXMLExportOOO_getSupportedServiceNames()
 680     throw()
 681 {
 682     const OUString aServiceName(SwXMLExportOOO_getImplementationName());
 683     const Sequence< OUString > aSeq( &aServiceName, 1 );
 684     return aSeq;
 685 }
 686
 687 Reference< XInterface > SAL_CALL SwXMLExportOOO_createInstance(
 688         const Reference< XMultiServiceFactory > & rSMgr)
 689     throw( Exception )
 690 {
 691     return (cppu::OWeakObject*)new SwXMLExport( rSMgr, EXPORT_ALL);
 692 }
 693
 694 OUString SAL_CALL SwXMLExportStylesOOO_getImplementationName() throw()
 695 {
 696     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 697         "com.sun.star.comp.Writer.XMLStylesExporter" ) );
 698 }
 699
 700 Sequence< OUString > SAL_CALL SwXMLExportStylesOOO_getSupportedServiceNames()
 701     throw()
 702 {
 703     const OUString aServiceName(SwXMLExportStylesOOO_getImplementationName());
 704     const Sequence< OUString > aSeq( &aServiceName, 1 );
 705     return aSeq;
 706 }
 707
 708 Reference< XInterface > SAL_CALL SwXMLExportStylesOOO_createInstance(
 709         const Reference< XMultiServiceFactory > & rSMgr)
 710     throw( Exception )
 711 {
 712     return (cppu::OWeakObject*)new SwXMLExport( rSMgr,
 713         EXPORT_STYLES | EXPORT_MASTERSTYLES | EXPORT_AUTOSTYLES |
 714         EXPORT_FONTDECLS );
 715 }
 716
 717 OUString SAL_CALL SwXMLExportContentOOO_getImplementationName() throw()
 718 {
 719     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 720         "com.sun.star.comp.Writer.XMLContentExporter" ) );
 721 }
 722
 723 Sequence< OUString > SAL_CALL SwXMLExportContentOOO_getSupportedServiceNames()
 724     throw()
 725 {
 726     const OUString aServiceName(SwXMLExportContentOOO_getImplementationName());
 727     const Sequence< OUString > aSeq( &aServiceName, 1 );
 728     return aSeq;
 729 }
 730
 731 Reference< XInterface > SAL_CALL SwXMLExportContentOOO_createInstance(
 732         const Reference< XMultiServiceFactory > & rSMgr)
 733     throw( Exception )
 734 {
 735     return (cppu::OWeakObject*)new SwXMLExport(rSMgr,
 736         EXPORT_AUTOSTYLES | EXPORT_CONTENT | EXPORT_SCRIPTS |
 737         EXPORT_FONTDECLS );
 738 }
 739
 740 OUString SAL_CALL SwXMLExportMetaOOO_getImplementationName() throw()
 741 {
 742     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 743         "com.sun.star.comp.Writer.XMLMetaExporter" ) );
 744 }
 745
 746 Sequence< OUString > SAL_CALL SwXMLExportMetaOOO_getSupportedServiceNames()
 747     throw()
 748 {
 749     const OUString aServiceName(SwXMLExportMetaOOO_getImplementationName());
 750     const Sequence< OUString > aSeq( &aServiceName, 1 );
 751     return aSeq;
 752 }
 753
 754 Reference< XInterface > SAL_CALL SwXMLExportMetaOOO_createInstance(
 755         const Reference< XMultiServiceFactory > & rSMgr)
 756     throw( Exception )
 757 {
 758     return (cppu::OWeakObject*)new SwXMLExport( rSMgr, EXPORT_META);
 759 }
 760
 761 OUString SAL_CALL SwXMLExportSettingsOOO_getImplementationName() throw()
 762 {
 763     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 764         "com.sun.star.comp.Writer.XMLSettingsExporter" ) );
 765 }
 766
 767 Sequence< OUString > SAL_CALL SwXMLExportSettingsOOO_getSupportedServiceNames()
 768     throw()
 769 {
 770     const OUString aServiceName(SwXMLExportSettingsOOO_getImplementationName());
 771     const Sequence< OUString > aSeq( &aServiceName, 1 );
 772     return aSeq;
 773 }
 774
 775 Reference< XInterface > SAL_CALL SwXMLExportSettingsOOO_createInstance(
 776         const Reference< XMultiServiceFactory > & rSMgr)
 777     throw( Exception )
 778 {
 779     return (cppu::OWeakObject*)new SwXMLExport( rSMgr, EXPORT_SETTINGS);
 780 }
 781
 782 // OASIS
 783 OUString SAL_CALL SwXMLExport_getImplementationName() throw()
 784 {
 785     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 786         "com.sun.star.comp.Writer.XMLOasisExporter" ) );
 787 }
 788
 789 Sequence< OUString > SAL_CALL SwXMLExport_getSupportedServiceNames()
 790     throw()
 791 {
 792     const OUString aServiceName(SwXMLExport_getImplementationName());
 793     const Sequence< OUString > aSeq( &aServiceName, 1 );
 794     return aSeq;
 795 }
 796
 797 Reference< XInterface > SAL_CALL SwXMLExport_createInstance(
 798         const Reference< XMultiServiceFactory > & rSMgr)
 799     throw( Exception )
 800 {
 801     return (cppu::OWeakObject*)new SwXMLExport( rSMgr, EXPORT_ALL|EXPORT_OASIS);
 802 }
 803
 804 OUString SAL_CALL SwXMLExportStyles_getImplementationName() throw()
 805 {
 806     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 807         "com.sun.star.comp.Writer.XMLOasisStylesExporter" ) );
 808 }
 809
 810 Sequence< OUString > SAL_CALL SwXMLExportStyles_getSupportedServiceNames()
 811     throw()
 812 {
 813     const OUString aServiceName(SwXMLExportStyles_getImplementationName());
 814     const Sequence< OUString > aSeq( &aServiceName, 1 );
 815     return aSeq;
 816 }
 817
 818 Reference< XInterface > SAL_CALL SwXMLExportStyles_createInstance(
 819         const Reference< XMultiServiceFactory > & rSMgr)
 820     throw( Exception )
 821 {
 822     // #110680#
 823     //return (cppu::OWeakObject*)new SwXMLExport(
 824     //  EXPORT_STYLES | EXPORT_MASTERSTYLES | EXPORT_AUTOSTYLES |
 825     //  EXPORT_FONTDECLS );
 826     return (cppu::OWeakObject*)new SwXMLExport( rSMgr,
 827         EXPORT_STYLES | EXPORT_MASTERSTYLES | EXPORT_AUTOSTYLES |
 828         EXPORT_FONTDECLS|EXPORT_OASIS );
 829 }
 830
 831 OUString SAL_CALL SwXMLExportContent_getImplementationName() throw()
 832 {
 833     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 834         "com.sun.star.comp.Writer.XMLOasisContentExporter" ) );
 835 }
 836
 837 Sequence< OUString > SAL_CALL SwXMLExportContent_getSupportedServiceNames()
 838     throw()
 839 {
 840     const OUString aServiceName(SwXMLExportContent_getImplementationName());
 841     const Sequence< OUString > aSeq( &aServiceName, 1 );
 842     return aSeq;
 843 }
 844
 845 Reference< XInterface > SAL_CALL SwXMLExportContent_createInstance(
 846         const Reference< XMultiServiceFactory > & rSMgr)
 847     throw( Exception )
 848 {
 849     // #110680#
 850     //return (cppu::OWeakObject*)new SwXMLExport(
 851     //  EXPORT_AUTOSTYLES | EXPORT_CONTENT | EXPORT_SCRIPTS |
 852     //  EXPORT_FONTDECLS );
 853     return (cppu::OWeakObject*)new SwXMLExport(
 854         rSMgr,
 855         EXPORT_AUTOSTYLES | EXPORT_CONTENT | EXPORT_SCRIPTS |
 856         EXPORT_FONTDECLS|EXPORT_OASIS );
 857 }
 858
 859 OUString SAL_CALL SwXMLExportMeta_getImplementationName() throw()
 860 {
 861     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 862         "com.sun.star.comp.Writer.XMLOasisMetaExporter" ) );
 863 }
 864
 865 Sequence< OUString > SAL_CALL SwXMLExportMeta_getSupportedServiceNames()
 866     throw()
 867 {
 868     const OUString aServiceName(SwXMLExportMeta_getImplementationName());
 869     const Sequence< OUString > aSeq( &aServiceName, 1 );
 870     return aSeq;
 871 }
 872
 873 Reference< XInterface > SAL_CALL SwXMLExportMeta_createInstance(
 874         const Reference< XMultiServiceFactory > & rSMgr)
 875     throw( Exception )
 876 {
 877     return (cppu::OWeakObject*)new SwXMLExport(rSMgr, EXPORT_META|EXPORT_OASIS);
 878 }
 879
 880 OUString SAL_CALL SwXMLExportSettings_getImplementationName() throw()
 881 {
 882     return OUString( RTL_CONSTASCII_USTRINGPARAM(
 883         "com.sun.star.comp.Writer.XMLOasisSettingsExporter" ) );
 884 }
 885
 886 Sequence< OUString > SAL_CALL SwXMLExportSettings_getSupportedServiceNames()
 887     throw()
 888 {
 889     const OUString aServiceName(SwXMLExportSettings_getImplementationName());
 890     const Sequence< OUString > aSeq( &aServiceName, 1 );
 891     return aSeq;
 892 }
 893
 894 Reference< XInterface > SAL_CALL SwXMLExportSettings_createInstance(
 895         const Reference< XMultiServiceFactory > & rSMgr)
 896     throw( Exception )
 897 {
 898     return (cppu::OWeakObject*)new SwXMLExport(rSMgr, EXPORT_SETTINGS|EXPORT_OASIS);
 899 }
 900
 901 const Sequence< sal_Int8 > & SwXMLExport::getUnoTunnelId() throw()
 902 {
 903     static Sequence< sal_Int8 > aSeq = ::CreateUnoTunnelId();
 904     return aSeq;
 905 }
 906
 907 sal_Int64 SAL_CALL SwXMLExport::getSomething( const Sequence< sal_Int8 >& rId )
 908     throw(RuntimeException)
 909 {
 910     if( rId.getLength() == 16
 911         && 0 == rtl_compareMemory( getUnoTunnelId().getConstArray(),
 912                                         rId.getConstArray(), 16 ) )
 913     {
 914         return sal::static_int_cast< sal_Int64 >( reinterpret_cast< sal_IntPtr >(this) );
 915     }
 916     return SvXMLExport::getSomething( rId );
 917 }
 918
 919
 920 // XServiceInfo
 921 // override empty method from parent class
 922 OUString SAL_CALL SwXMLExport::getImplementationName()
 923     throw(RuntimeException)
 924 {
 925     switch( getExportFlags() )
 926     {
 927         case EXPORT_ALL:
 928             return SwXMLExport_getImplementationName();
 929         case (EXPORT_STYLES|EXPORT_MASTERSTYLES|EXPORT_AUTOSTYLES|EXPORT_FONTDECLS):
 930             return SwXMLExportStyles_getImplementationName();
 931         case (EXPORT_AUTOSTYLES|EXPORT_CONTENT|EXPORT_SCRIPTS|EXPORT_FONTDECLS):
 932             return SwXMLExportContent_getImplementationName();
 933         case EXPORT_META:
 934             return SwXMLExportMeta_getImplementationName();
 935         case EXPORT_SETTINGS:
 936             return SwXMLExportSettings_getImplementationName();
 937         default:
 938             // generic name for 'unknown' cases
 939             return OUString( RTL_CONSTASCII_USTRINGPARAM(
 940                 "com.sun.star.comp.Writer.SwXMLExport" ) );
 941     }
 942 }
 943
 944
 945 #ifdef XML_CORE_API
 946 void SwXMLExport::ExportCurPaM( sal_Bool bExportWholePaM )
 947 {
 948     sal_Bool bFirstNode = sal_True;
 949     sal_Bool bExportWholeNode = bExportWholePaM;
 950
 951     SwXMLNumRuleInfo aPrevNumInfo;
 952     SwXMLNumRuleInfo aNextNumInfo;
 953
 954     while( pCurPaM->GetPoint()->nNode.GetIndex() <
 955                                 pCurPaM->GetMark()->nNode.GetIndex() ||
 956            ( pCurPaM->GetPoint()->nNode.GetIndex() ==
 957                                 pCurPaM->GetMark()->nNode.GetIndex() &&
 958              pCurPaM->GetPoint()->nContent.GetIndex() <=
 959                                 pCurPaM->GetMark()->nContent.GetIndex() ) )
 960     {
 961         SwNode *pNd = pCurPaM->GetNode();
 962
 963         aNextNumInfo.Set( *pNd );
 964         ExportListChange( aPrevNumInfo, aNextNumInfo );
 965
 966         ASSERT( !(pNd->IsGrfNode() || pNd->IsOLENode()),
 967                 "SwXMLExport::exportCurPaM: grf or OLE node unexpected" );
 968         if( pNd->IsTxtNode() )
 969         {
 970             SwTxtNode* pTxtNd = pNd->GetTxtNode();
 971
 972             if( !bFirstNode )
 973                 pCurPaM->GetPoint()->nContent.Assign( pTxtNd, 0 );
 974
 975             ExportTxtNode( *pTxtNd, 0, STRING_LEN, bExportWholeNode );
 976         }
 977         else if( pNd->IsTableNode() )
 978         {
 979             ExportTable( *pNd->GetTableNode() );
 980         }
 981         else if( pNd->IsSectionNode() )
 982         {
 983             ExportSection( *pNd->GetSectionNode() );
 984         }
 985         else if( pNd == &pDoc->GetNodes().GetEndOfContent() )
 986             break;
 987
 988         pCurPaM->GetPoint()->nNode++;   // next node
 989
 990         sal_uInt32 nPos = pCurPaM->GetPoint()->nNode.GetIndex();
 991
 992         // if not everything should be exported, the WriteAll flag must be
 993         // set for all but the first and last node anyway.
 994         bExportWholeNode = bExportWholePaM ||
 995                            nPos != pCurPaM->GetMark()->nNode.GetIndex();
 996         bFirstNode = sal_False;
 997
 998         aPrevNumInfo = aNextNumInfo;
 999     }
1000     aNextNumInfo.Reset();
1001     ExportListChange( aPrevNumInfo, aNextNumInfo );
1002 }
1003 #endif